(Lianja) Convert PuTTY Private Key (ppk) to OpenSSH (pem)

Convert a PuTTY format private key file (.ppk) to OpenSSH (.pem).

Chilkat Lianja Extension Download Chilkat Lianja Extension

loKey = createobject("CkSshKey")

// Load an unencrypted or encrypted PuTTY private key.

// If  your PuTTY private key is encrypted, set the Password
// property before calling FromPuttyPrivateKey.
// If your PuTTY private key is not encrypted, it makes no diffference
// if Password is set or not set.
loKey.Password = "secret"

// First load the .ppk file into a string:

lcKeyStr = loKey.LoadText("putty_private_key.ppk")

// Import into the SSH key object:
llSuccess = loKey.FromPuttyPrivateKey(lcKeyStr)
if (llSuccess <> .T.) then
    ? loKey.LastErrorText
    release loKey
    return
endif

// Convert to an encrypted or unencrypted OpenSSH key.

// First demonstrate converting to an unencrypted OpenSSH key

llBEncrypt = .F.
lcUnencryptedKeyStr = loKey.ToOpenSshPrivateKey(llBEncrypt)
llSuccess = loKey.SaveText(lcUnencryptedKeyStr,"unencrypted_openssh.pem")
if (llSuccess <> .T.) then
    ? loKey.LastErrorText
    release loKey
    return
endif

// Save to an encrypted OpenSSH PEM file:

llBEncrypt = .T.
loKey.Password = "myPassword"
lcEncryptedKeyStr = loKey.ToOpenSshPrivateKey(llBEncrypt)
llSuccess = loKey.SaveText(lcEncryptedKeyStr,"encrypted_openssh.pem")
if (llSuccess <> .T.) then
    ? loKey.LastErrorText
    release loKey
    return
endif

? "Done!"


release loKey