Sample code for 30+ languages & platforms
Tcl Requires Chilkat v11.0.0+

Generate RSA Key and Export to Encrypted PEM

See more RSA Examples

_LANGUAGE_ sample showing how to generate an RSA key and export to encrypted PEM.

Chilkat Tcl Downloads

Tcl

load ./chilkat.dll

set success 0

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

set rsa [new_CkRsa]

#  Generate a 1024-bit key.  Chilkat RSA supports
#  key sizes ranging from 512 bits to 4096 bits.
set privKey [new_CkPrivateKey]

set success [CkRsa_GenKey $rsa 1024 $privKey]
if {$success == 0} then {
    puts [CkRsa_lastErrorText $rsa]
    delete_CkRsa $rsa
    delete_CkPrivateKey $privKey
    exit
}

set strEncPem [CkPrivateKey_getPkcs8EncryptedPem $privKey "myPassword"]

#  You now have the private key in an encrypted format,
#  which may be (for example) saved to a database.

puts "$strEncPem"

delete_CkRsa $rsa
delete_CkPrivateKey $privKey