PureBasic

Set the S/MIME Encryption Key Length

Demonstrates the Chilkat Email.Pkcs7KeyLength property, which sets the key length of the symmetric algorithm used for PKCS#7 (S/MIME) encryption. The allowed values depend on Pkcs7CryptAlg: for aes use 128, 192, or 256; for 3des use 192; for des use 40; for rc2 use 40, 56, 64, or 128. The default is 128, and an unsupported algorithm/key-length combination causes encryption to fail. This example pairs AES with a 192-bit key.

Background: Key length is the size, in bits, of the secret key a symmetric cipher uses — a longer key means exponentially more possible keys and thus more resistance to brute-force attack. But length is only meaningful within a given algorithm: AES-128 is already very strong, and a key size must be one the chosen cipher actually supports, which is why Pkcs7KeyLength and Pkcs7CryptAlg have to agree.

Chilkat PureBasic Downloads

Download Chilkat for PureBasic

PureBasic

IncludeFile "CkEmail.pb"

Procedure ChilkatExample()

    ;  Demonstrates the Email.Pkcs7KeyLength property, which sets the key length (in bits)
    ;  of the symmetric algorithm used for PKCS#7 (S/MIME) encryption.  The allowed values
    ;  depend on Pkcs7CryptAlg; for aes they are 128, 192, or 256.  The default is 128.

    email.i = CkEmail::ckCreate()
    If email.i = 0
        Debug "Failed to create object."
        ProcedureReturn
    EndIf

    CkEmail::setCkPkcs7CryptAlg(email, "aes")
    CkEmail::setCkPkcs7KeyLength(email, 192)

    Debug "Pkcs7CryptAlg = " + CkEmail::ckPkcs7CryptAlg(email)
    Debug "Pkcs7KeyLength = " + Str(CkEmail::ckPkcs7KeyLength(email))


    CkEmail::ckDispose(email)


    ProcedureReturn
EndProcedure