(PureBasic) HMAC with SHA256
Demonstrates how to compute a HMAC SHA256 keyed-hash message authentication code.
IncludeFile "CkCrypt2.pb"
Procedure ChilkatExample()
; This example assumes the Chilkat API to have been previously unlocked.
; See Global Unlock Sample for sample code.
crypt.i = CkCrypt2::ckCreate()
If crypt.i = 0
Debug "Failed to create object."
ProcedureReturn
EndIf
; The output will be Hex, so set the EncodingMode:
CkCrypt2::setCkEncodingMode(crypt, "hex")
; Set the hash algorithm:
; Choices are: md5, sha-1, sha256, sha384, sha512, md2, haval
CkCrypt2::setCkHashAlgorithm(crypt, "sha256")
mac.s
; Set the HMAC key:
CkCrypt2::ckSetHmacKeyEncoded(crypt,"The_API_Secret","ascii")
mac = CkCrypt2::ckHmacStringENC(crypt,"The quick brown fox jumps over the lazy dog")
Debug mac
CkCrypt2::ckDispose(crypt)
ProcedureReturn
EndProcedure
|