Generate RSA SSH Key

Generates an RSA SSH key and saves to various public and private key file formats (OpenSSH and PuTTY).

Download Chilkat SSH / SFTP ActiveX

LOCAL loKey
LOCAL lnSuccess
LOCAL lnNumBits
LOCAL lnExponent
LOCAL lcExportedKey
LOCAL lnExportEncrypted

loKey = CreateObject('Chilkat.SshKey')

*  numBits may range from 384 to 4096.  Typical values are
*  1024 or 2048.  (must be a multiple of 64)
*  A good choice for the exponent is 65537.  Chilkat recommends
*  always using this value.
lnNumBits = 2048
lnExponent = 65537
lnSuccess = loKey.GenerateRsaKey(lnNumBits,lnExponent)
IF (lnSuccess <> 1) THEN
    ? "Bad params passed to RSA key generation method."
    QUIT
ENDIF

*  Note: Generating a public/private key pair is CPU intensive
*  and may take a short amount of time (more than few seconds,
*  but less than a minute).

*  Export the RSA private key to OpenSSH, PuTTY, and XML and save.
lnExportEncrypted = 0
lcExportedKey = loKey.ToOpenSshPrivateKey(lnExportEncrypted)
*  Chilkat provides a SaveText method for convenience...
lnSuccess = loKey.SaveText(lcExportedKey,"privkey_openssh_unencrypted.pem")

*  Export with encryption to OpenSSH private key format:
loKey.Password = "secret"
lnExportEncrypted = 1
lcExportedKey = loKey.ToOpenSshPrivateKey(lnExportEncrypted)
lnSuccess = loKey.SaveText(lcExportedKey,"privkey_openssh_encrypted.pem")

*  Export the RSA private key to unencrypted PuTTY format:
lnExportEncrypted = 0
lcExportedKey = loKey.ToPuttyPrivateKey(lnExportEncrypted)
lnSuccess = loKey.SaveText(lcExportedKey,"privkey_putty_unencrypted.ppk")

*  Export the RSA private key to encrypted PuTTY format:
loKey.Password = "secret"
lnExportEncrypted = 1
lcExportedKey = loKey.ToPuttyPrivateKey(lnExportEncrypted)
lnSuccess = loKey.SaveText(lcExportedKey,"privkey_putty_encrypted.ppk")

*  Export private key to XML:
lcExportedKey = loKey.ToXml()
lnSuccess = loKey.SaveText(lcExportedKey,"privkey.xml")

*  ----------------------------------------------------
*  Now for the public key....
*  ----------------------------------------------------

*  The Secure Shell (SSH) Public Key File Format
*  is documented in RFC 4716.
lcExportedKey = loKey.ToRfc4716PublicKey()
lnSuccess = loKey.SaveText(lcExportedKey,"pubkey_rfc4716.pub")

*  OpenSSH has a separate public-key file format, which
*  is also supported by Chilkat SshKey:
lcExportedKey = loKey.ToOpenSshPublicKey()
lnSuccess = loKey.SaveText(lcExportedKey,"pubkey_openSsh.pub")