(PowerBuilder) Deriving a 256-bit AES Secret Key from a Password Using SHA256

This example demonstrates how to derive a 256-bit secret key for AES encryption from an password string. (A more secure way of deriving secret keys from passwords is via PBKDF2, and Chilkat has examples for this on example-code.com).

Chilkat ActiveX Downloads ActiveX for 32-bit and 64-bit Windows

integer li_rc
oleobject loo_Crypt
string ls_Password
string ls_StrSecretKeyHex

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

loo_Crypt = create oleobject
// Use "Chilkat_9_5_0.Crypt2" for versions of Chilkat < 10.0.0
li_rc = loo_Crypt.ConnectToNewObject("Chilkat.Crypt2")
if li_rc < 0 then
    destroy loo_Crypt
    MessageBox("Error","Connecting to COM object failed")
    return
end if

ls_Password = "mySecretPassword"

loo_Crypt.EncodingMode = "hex"

// We're going to hash the utf-8 byte representation of the password.
// For this example, the utf-8 byte representation is identical to the us-ascii 
// representation because there are no 8bit chars (such as non-English or chars with accent marks.)
loo_Crypt.Charset = "utf-8"

// Compute the SHA-256 hash of the password, and return the hash
// in hexidecimal string form:
ls_StrSecretKeyHex = loo_Crypt.HashStringENC(ls_Password)

// Set our encryption algorithm to 256-bit AES (CBC mode)
loo_Crypt.CryptAlgorithm = "aes"
loo_Crypt.CipherMode = "cbc"
loo_Crypt.KeyLength = 256
loo_Crypt.SetEncodedIV("000102030405060708090A0B0C0D0E0F","hex")

// Now set the 256-bit binary secret key:
loo_Crypt.SetEncodedKey(ls_StrSecretKeyHex,"hex")

// That's all for this example.  We've setup the encryptor with our
// 256-bit key derived from a password string.  There are other examples
// to show the calls for encrpyting / decrypting..


destroy loo_Crypt