PowerBuilder

Load a PuTTY Public Key

See more SSH Key Examples

Demonstrates how to load a PuTTY public key. PowerBuilder

integer li_rc
long li_Success
oleobject loo_PuttyKey
string ls_PubKeyText
string ls_OpenSshPubKeyStr
string ls_XmlPubKeyStr

li_Success = 0

//  Load a PuTTY public key.
loo_PuttyKey = create oleobject
li_rc = loo_PuttyKey.ConnectToNewObject("Chilkat.SshKey")
if li_rc < 0 then
    destroy loo_PuttyKey
    MessageBox("Error","Connecting to COM object failed")
    return
end if
ls_PubKeyText = loo_PuttyKey.LoadText("qa_data/ppk/putty_public.pem")

//  The pubKeyText contains this content:

//  	---- BEGIN SSH2 PUBLIC KEY ----
//  	Comment: "rsa-key-20170126"
//  	AAAAB3NzaC1yc2EAAAABJQAAAQEAx+52s7vvaZ8rT2UdFZWlSUVDHDQ+5ZRFvgRW
//  	6nm2sO1c9WqNg7u2PQL4jeKSDX2XWcMnpleALz2x8Rr4rMy5E1iZzvWov8VtFd8l
//  	fa9HOkgEeJB3VFuYR3NlnD3eyCoYJYPVpHJHrIeui2WZs5vQ76HDe+th8+z5Ald4
//  	zPw3p2c6ZJpBrkSBM67hWokoBDi23c7NhszDHhJBrv+B98cQxnagI1PUKqN7E8Vg
//  	bNtBI8beIMHyI69up9G1AXSEi0cGIjYNx9RNUPau1mRk/SvfqxgWkAjM005lj7hc
//  	bOsjbdKK3T2NtrKTaYjEiXlEXcj1iGuApsD/m73pYaEJB3Nd7w==
//  	---- END SSH2 PUBLIC KEY ----

li_Success = loo_PuttyKey.FromRfc4716PublicKey(ls_PubKeyText)
if li_Success <> 1 then
    Write-Debug loo_PuttyKey.LastErrorText
    destroy loo_PuttyKey
    return
end if

//  If desired, convert to other public key formats:
ls_OpenSshPubKeyStr = loo_PuttyKey.ToOpenSshPublicKey()
Write-Debug ls_OpenSshPubKeyStr

//  openSshPubKeyStr contains:
//  ssh-rsa AAAAB3NzaC1yc2EAAAABJQAAAQEAx+52s7vvaZ8rT2UdFZWlSUVDHDQ+5ZRFvgRW6nm2sO1c9WqNg7u2PQL4jeKSDX2XWcMnpleALz2x8Rr4rMy5E1iZzvWov8VtFd8lfa9HOkgEeJB3VFuYR3NlnD3eyCoYJYPVpHJHrIeui2WZs5vQ76HDe+th8+z5Ald4zPw3p2c6ZJpBrkSBM67hWokoBDi23c7NhszDHhJBrv+B98cQxnagI1PUKqN7E8VgbNtBI8beIMHyI69up9G1AXSEi0cGIjYNx9RNUPau1mRk/SvfqxgWkAjM005lj7hcbOsjbdKK3T2NtrKTaYjEiXlEXcj1iGuApsD/m73pYaEJB3Nd7w== rsa-key-20170126

//  Convert to an XML format:
ls_XmlPubKeyStr = loo_PuttyKey.ToXml()
Write-Debug ls_XmlPubKeyStr

//  xmlPubKeyStr contains:
//  <RSAPublicKey>
//      <Modulus>x+52s7vvaZ8rT2UdFZWlSUVDHDQ+5ZRFvgRW6nm2sO1c9WqNg7u2PQL4jeKSDX2XWcMnpleALz2x8Rr4rMy5E1iZzvWov8VtFd8lfa9HOkgEeJB3VFuYR3NlnD3eyCoYJYPVpHJHrIeui2WZs5vQ76HDe+th8+z5Ald4zPw3p2c6ZJpBrkSBM67hWokoBDi23c7NhszDHhJBrv+B98cQxnagI1PUKqN7E8VgbNtBI8beIMHyI69up9G1AXSEi0cGIjYNx9RNUPau1mRk/SvfqxgWkAjM005lj7hcbOsjbdKK3T2NtrKTaYjEiXlEXcj1iGuApsD/m73pYaEJB3Nd7w==</Modulus>
//      <Exponent>JQ==</Exponent>
//  </RSAPublicKey>
//  
//  


destroy loo_PuttyKey