(PureBasic) Get SSH Server Authentication Methods

Demonstrates how to get the authentication methods of an SSH server.

This example requires Chilkat v9.5.0.78 or greater.

Chilkat PureBasic Module Download Chilkat PureBasic Module

IncludeFile "CkSsh.pb"

Procedure ChilkatExample()

    ; This example requires the Chilkat API to have been previously unlocked.
    ; See Global Unlock Sample for sample code.

    ssh.i = CkSsh::ckCreate()
    If ssh.i = 0
        Debug "Failed to create object."
        ProcedureReturn
    EndIf

    ; To get the authentication methods offered by an SSH server, we first connect.
    success.i = CkSsh::ckConnect(ssh,"example.com",22)
    If success <> 1
        Debug CkSsh::ckLastErrorText(ssh)
        CkSsh::ckDispose(ssh)
        ProcedureReturn
    EndIf

    ; Next, we call GetAuthMethods to receive a comma separated list of authentication methods
    authMethods.s = CkSsh::ckGetAuthMethods(ssh)
    If CkSsh::ckLastMethodSuccess(ssh) <> 1
        Debug CkSsh::ckLastErrorText(ssh)
        CkSsh::ckDispose(ssh)
        ProcedureReturn
    EndIf

    ; For example: publickey,password,keyboard-interactive
    Debug "Authentication methods suported by this serve: " + authMethods

    ; IMPORTANT:
    ; Getting the authentication methods will intentionally disconnect from the server.
    ; We'll need to re-connect, etc. to continue..

    ; For example..
    success.i = CkSsh::ckConnect(ssh,"example.com",22)
    If success <> 1
        Debug CkSsh::ckLastErrorText(ssh)
        CkSsh::ckDispose(ssh)
        ProcedureReturn
    EndIf

    success = CkSsh::ckAuthenticatePw(ssh,"myLogin","myPassword")
    If success <> 1
        Debug CkSsh::ckLastErrorText(ssh)
        CkSsh::ckDispose(ssh)
        ProcedureReturn
    EndIf

    Debug "SSH Authentication successful."

    ; ...

    CkSsh::ckDisconnect(ssh)


    CkSsh::ckDispose(ssh)


    ProcedureReturn
EndProcedure