(PowerBuilder) Hash Binary Data (SHA256 and other hash algorithms)

Demonstrates how to hash binary bytes using SHA256, SHA384, SHA512, MD2, MD5, HAVAL, RIPEMD, etc.

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

integer li_rc
oleobject loo_JpgData
integer li_Success
oleobject loo_Crypt
oleobject loo_Sb
string ls_HashHexStr

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

// Let's load a binary file to get the bytes..
loo_JpgData = create oleobject
// Use "Chilkat_9_5_0.BinData" for versions of Chilkat < 10.0.0
li_rc = loo_JpgData.ConnectToNewObject("Chilkat.BinData")
if li_rc < 0 then
    destroy loo_JpgData
    MessageBox("Error","Connecting to COM object failed")
    return
end if
li_Success = loo_JpgData.LoadFile("qa_data/jpg/starfish.jpg")
if li_Success <> 1 then
    Write-Debug "Failed to load file."
    destroy loo_JpgData
    return
end if

loo_JpgBytes = loo_JpgData.GetBinary()

loo_Crypt = create oleobject
// Use "Chilkat_9_5_0.Crypt2" for versions of Chilkat < 10.0.0
li_rc = loo_Crypt.ConnectToNewObject("Chilkat.Crypt2")

// Choose the hash algorithm.
// Can be  "sha1", "sha256", "sha384", "sha512", "md2", "md5", "haval", "ripemd128", "ripemd160","ripemd256", or "ripemd320".
loo_Crypt.HashAlgorithm = "sha256"

loo_HashBytes = loo_Crypt.HashBytes(loo_JpgBytes)

// Let's examine the hash as a hex string.
loo_Sb = create oleobject
// Use "Chilkat_9_5_0.StringBuilder" for versions of Chilkat < 10.0.0
li_rc = loo_Sb.ConnectToNewObject("Chilkat.StringBuilder")

loo_Sb.AppendEncoded(loo_HashBytes,"hex")
Write-Debug "SHA256 hash = " + loo_Sb.GetAsString()

// We could alternatively hash the bytes and receive the hex result directly:
loo_Crypt.EncodingMode = "hex"
ls_HashHexStr = loo_Crypt.HashBytesENC(loo_JpgBytes)
Write-Debug "SHA256 hash = " + ls_HashHexStr


destroy loo_JpgData
destroy loo_Crypt
destroy loo_Sb