PowerBuilder

SFTP Public-Key Authentication (id_ed25519)

See more SFTP Examples

Demonstrates how to authenticate with an SSH/SFTP server using publickey authentication with an Ed25519 private key (id_ed25519). PowerBuilder

integer li_rc
integer li_Success
oleobject loo_Key
string ls_PrivKeyText
oleobject loo_Sftp
string ls_Hostname
integer li_Port

li_Success = 0

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

loo_Key = create oleobject
li_rc = loo_Key.ConnectToNewObject("Chilkat.SshKey")
if li_rc < 0 then
    destroy loo_Key
    MessageBox("Error","Connecting to COM object failed")
    return
end if

// The id_ed25519 file should contain something like this:
// (You can open it in a text editor..)

// -----BEGIN OPENSSH PRIVATE KEY-----
// b3BlbnNzaC1rZXktdjEAAAAACmFlczI1Ni1jdHIAAAAGYmNyeXB0AAAAGAAAABDIeK9+Xw
// 6Do9gnhtrJu5iJAAAAZAAAAAEAAAAzAAAAC3NzaC1lZDI1NTE5AAAAIMh/Ge7fjQCssmVd
// BqjYZbRAI0pY8IrnB6J1yLetq34OAAAAoMVP7cvy4hTiAINA3I4v55OonkpKza8mzfUW18
// RDQeYL3ovCVaAYOGcCpf/SW3QiY6tnXq+5WDEfJ7Z/kQ0nl2+1wSLOytxpyO+IY0rRtLrX
// 6e/agR4nbZpt/MFG6xqcNASbtDgg+9IWGvDrtXOLFofx07/zml+UjFL0tXRpCjOxeqKyXH
// t8SRgdT97d9/bYPwapaXY+b2DVVy5/LVx4Sq8=
// -----END OPENSSH PRIVATE KEY-----

ls_PrivKeyText = loo_Key.LoadText("c:/temp/id_ed25519")
if loo_Key.LastMethodSuccess <> 1 then
    Write-Debug loo_Key.LastErrorText
    destroy loo_Key
    return
end if

// If your private key was saved encrypted, then you'll need the password.
// In this example, the password "blahblah" is valid for the above key -- which is a real Ed25519 key generated/saved from puttygen.
loo_Key.Password = "blahblah"

li_Success = loo_Key.FromOpenSshPrivateKey(ls_PrivKeyText)
if li_Success <> 1 then
    Write-Debug loo_Key.LastErrorText
    destroy loo_Key
    return
end if

loo_Sftp = create oleobject
li_rc = loo_Sftp.ConnectToNewObject("Chilkat.SFtp")

// Set some timeouts, in milliseconds:
loo_Sftp.ConnectTimeoutMs = 5000
loo_Sftp.IdleTimeoutMs = 15000

ls_Hostname = "sftp.example.com"
li_Port = 22
li_Success = loo_Sftp.Connect(ls_Hostname,li_Port)
if li_Success <> 1 then
    Write-Debug loo_Sftp.LastErrorText
    destroy loo_Key
    destroy loo_Sftp
    return
end if

// Authenticate with the SSH server.  Chilkat SFTP supports
// both password-based authenication as well as public-key
// authentication.  
li_Success = loo_Sftp.AuthenticatePk("myLogin",loo_Key)
if li_Success <> 1 then
    Write-Debug loo_Sftp.LastErrorText
    destroy loo_Key
    destroy loo_Sftp
    return
end if

Write-Debug loo_Sftp.LastErrorText
Write-Debug "Public-Key Authentication Successful!"

// Now go do whatever you're app needs to do...


destroy loo_Key
destroy loo_Sftp