Lianja

Generate RSA Public/Private Key Pair and Export to PEM

See more RSA Examples

_LANGUAGE_ example code showing how to generate an RSA public/private key pair and export to PEM files. Lianja

llSuccess = .F.

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

loRsa = createobject("CkRsa")

// Generate a 2048-bit key.  Chilkat RSA supports
// key sizes ranging from 512 bits to 8192 bits.
loPrivKey = createobject("CkPrivateKey")
llSuccess = loRsa.GenKey(2048,loPrivKey)
if (llSuccess = .F.) then
    ? loRsa.LastErrorText
    release loRsa
    release loPrivKey
    return
endif

loPubKey = createobject("CkPublicKey")
loPrivKey.ToPublicKey(loPubKey)

// Save the private key in PEM format:
llSuccess = loPrivKey.SavePemFile("privateKey.pem")
if (llSuccess = .F.) then
    ? loPrivKey.LastErrorText
    release loRsa
    release loPrivKey
    release loPubKey
    return
endif

// Save the public key in PEM format:
llSuccess = loPubKey.SavePemFile(.F.,"publicKey.pem")
if (llSuccess = .F.) then
    ? loPubKey.LastErrorText
    release loRsa
    release loPrivKey
    release loPubKey
    return
endif

? "Success."


release loRsa
release loPrivKey
release loPubKey