Haskell SSH连接

Question

有人能告诉我如何编写一个简单的ssh应用程序，以检查某些凭据是否通过SSH服务器吗？

我在找这样的东西：

sshAuthCheck :: Int -> String -> String -> IO Bool

其中Int是某些端口，String是用户名，String是密码。

任何帮助都将不胜感激！

Answer 1

更新2017-04-03

由于darcsden.com下的示例已被删除，下面还有另一种方法可以实现相同的目标：

• Network.SSH.Client.SimpleSSH.openSession
• Network.SSH.Client.SimpleSSH.authenticateWithPasswordSource
• Network.SSH.Client.SimpleSSH.SimpleSSH
• Control.Monad.Error.runErrorT

步骤如下：

session <- openSession hostname port path_to_known_hosts
auth_session <- authenticateWithPasswordSource session username password
result <- runErrorT auth_session
case result of
    Left simple_ssh_error -> ... {- SimpleSSHError -}
    Right session -> ... {- Session -}

• 代码未被测试
• 有更好的方法来处理这类错误。例如，runEitherT只适用于。

原始答案：

该图书馆可供查阅：

http://hackage.haskell.org/package/ssh

它指向Carl提到的一个例子：

http://darcsden.com/alex/darcsden/browse/src/SSHServer.hs