(Visual FoxPro) SSH Host Key Fingerprint

See more SSH Examples

Demonstrates how to get the SSH server's host key fingerprint after connecting.

Chilkat ActiveX Downloads ActiveX for 32-bit and 64-bit Windows

LOCAL loSsh
LOCAL lcHostname
LOCAL lnPort
LOCAL lnSuccess
LOCAL lcMd5_fingerprint
LOCAL lnIncludeKeyType
LOCAL lnIncludeHashName
LOCAL lcSha256_fingerprint

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

* For versions of Chilkat < 10.0.0, use CreateObject('Chilkat_9_5_0.Ssh')
loSsh = CreateObject('Chilkat.Ssh')

lcHostname = "ssh.example.com"
lnPort = 22
lnSuccess = loSsh.Connect(lcHostname,lnPort)
IF (lnSuccess <> 1) THEN
    ? loSsh.LastErrorText
    RELEASE loSsh
    CANCEL
ENDIF

* Get the classic MD5 fingeprint
lcMd5_fingerprint = loSsh.HostKeyFingerprint
? lcMd5_fingerprint

* Sample output:
* ssh-rsa 3072 21:b0:d8:41:4e:ef:78:10:20:af:01:b7:71:5d:eb:94

* Starting in Chilkat v9.5.0.92, we can also get the SHA256 fingerprint.
* (it is also possible to get fingerprints using other hash algorithms such as SHA384, SHA512, etc.)

lnIncludeKeyType = 1
lnIncludeHashName = 1
lcSha256_fingerprint = loSsh.GetHostKeyFP("SHA256",lnIncludeKeyType,lnIncludeHashName)
? lcSha256_fingerprint

* Sample output:
* ssh-rsa SHA256:Ufgj480OsdsCZRjj9sSNM6fpgIcSJ61RsIG8usndUIY=

* The key type and hash name can be optionally included or not.
lnIncludeKeyType = 0
lnIncludeHashName = 1
lcSha256_fingerprint = loSsh.GetHostKeyFP("SHA256",lnIncludeKeyType,lnIncludeHashName)
? lcSha256_fingerprint

* SHA256:Ufgj480OsdsCZRjj9sSNM6fpgIcSJ61RsIG8usndUIY=

lnIncludeKeyType = 1
lnIncludeHashName = 0
lcSha256_fingerprint = loSsh.GetHostKeyFP("SHA256",lnIncludeKeyType,lnIncludeHashName)
? lcSha256_fingerprint

* ssh-rsa Ufgj480OsdsCZRjj9sSNM6fpgIcSJ61RsIG8usndUIY=

lnIncludeKeyType = 0
lnIncludeHashName = 0
lcSha256_fingerprint = loSsh.GetHostKeyFP("SHA256",lnIncludeKeyType,lnIncludeHashName)
? lcSha256_fingerprint

* Ufgj480OsdsCZRjj9sSNM6fpgIcSJ61RsIG8usndUIY=

RELEASE loSsh