Perl

Get the SSH Server's Authentication Methods

Demonstrates the Chilkat Ssh.GetAuthMethods method, which queries a connected but unauthenticated SSH server for the authentication methods it advertises. It takes no arguments and returns a lowercase, comma-separated list such as publickey,password,keyboard-interactive. Call it after Connect and before authenticating.

Background: Knowing what the server accepts lets a client choose the right authentication path — for example, falling back to keyboard-interactive when password auth is not offered. Note the documented connection side effect: querying methods advances the SSH authentication state, so call it at the correct point in the sequence.

Chilkat Perl Downloads

Download Chilkat for Perl

Perl

use chilkat();

$success = 0;

#  Demonstrates the Ssh.GetAuthMethods method, which queries a connected but unauthenticated SSH
#  server for the authentication methods it advertises.  It takes no arguments and returns a
#  lowercase, comma-separated list such as "publickey,password,keyboard-interactive".

$ssh = chilkat::CkSsh->new();

#  Connect to the SSH server.  Port 22 is the usual SSH port.
$sshPort = 22;
$success = $ssh->Connect("ssh.example.com",$sshPort);
if ($success == 0) {
    print $ssh->lastErrorText() . "\r\n";
    exit;
}

#  Query the advertised authentication methods.  Call after Connect, before authenticating.
$methods = $ssh->getAuthMethods();
if ($ssh->get_LastMethodSuccess() == 0) {
    print $ssh->lastErrorText() . "\r\n";
    exit;
}

print "Server auth methods: " . $methods . "\r\n";

$ssh->Disconnect();