(PowerBuilder) Hash Algorithms: SHA-1, HAVAL, MD2, MD5, SHA-256, SHA-384, SHA-512

How to create hashes (message digests) for strings.

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

integer li_rc
oleobject loo_Crypt
string s
string ls_Hash

// 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

s = "The quick brown fox jumps over the lazy dog"

loo_Crypt.HashAlgorithm = "sha1"
loo_Crypt.EncodingMode = "hex"

// Other possible EncodingMode settings are: 
// "quoted-printable", "base64","url", and many more..

ls_Hash = loo_Crypt.HashStringENC(s)
Write-Debug "SHA1: " + ls_Hash

// Hash using MD2
loo_Crypt.HashAlgorithm = "md2"
ls_Hash = loo_Crypt.HashStringENC(s)
Write-Debug "MD2: " + ls_Hash

// Hash using MD5
loo_Crypt.HashAlgorithm = "md5"
ls_Hash = loo_Crypt.HashStringENC(s)
Write-Debug "MD5: " + ls_Hash

// Note: SHA-2 is a set of cryptographic hash functions (SHA-224, SHA-256, SHA-384, SHA-512)

// Hash using SHA-256
loo_Crypt.HashAlgorithm = "sha256"
ls_Hash = loo_Crypt.HashStringENC(s)
Write-Debug "SHA256: " + ls_Hash

// Hash using SHA-384
loo_Crypt.HashAlgorithm = "sha384"
ls_Hash = loo_Crypt.HashStringENC(s)
Write-Debug "SHA384: " + ls_Hash

// Hash using SHA-512
loo_Crypt.HashAlgorithm = "sha512"
ls_Hash = loo_Crypt.HashStringENC(s)
Write-Debug "SHA512: " + ls_Hash

// Hash using HAVAL
// There are two additional properties relevant to HAVAL:
// HavalRounds, and KeyLength.
// HavalRounds can have values of 3, 4, or 5.
// KeyLength can have values of 128, 160, 192, 224, or 256
loo_Crypt.HashAlgorithm = "haval"
loo_Crypt.HavalRounds = 5
loo_Crypt.KeyLength = 256
ls_Hash = loo_Crypt.HashStringENC(s)
Write-Debug "Haval: " + ls_Hash

// Hashes for "The quick brown fox jumps over the lazy dog"

// SHA1:
// 2FD4E1C67A2D28FCED849EE1BB76E7391B93EB12

// MD2:
// 03D85A0D629D2C442E987525319FC471

// MD5:
// 9E107D9D372BB6826BD81D3542A419D6

// SHA256:
// D7A8FBB307D7809469CA9ABCB0082E4F8D5651E46D3CDB762D02D0BF37C9E592

// SHA384:
// CA737F1014A48F4C0B6DD43CB177B0AFD9E5169367544C494011E3317DBF9A509CB1E5DC1E85A941BBEE3D7F2AFBC9B1

// SHA512:
// 07E547D9586F6A73F73FBAC0435ED76951218FB7D0C8D788A309D785436BBB642E93A252A954F23912547D1E8A3B5ED6E1BFD7097821233FA0538F3DB854FEE6

// Haval:
// B89C551CDFE2E06DBD4CEA2BE1BC7D557416C58EBB4D07CBC94E49F710C55BE


destroy loo_Crypt