PureBasic

HMAC with SHA256

See more Encryption Examples

Demonstrates how to compute a HMAC SHA256 keyed-hash message authentication code. PureBasic

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")
    CkCrypt2::setCkMacAlgorithm(crypt, "hmac")

    mac.s

    ; Set the HMAC key:
    CkCrypt2::ckSetMacKeyEncoded(crypt,"The_API_Secret","ascii")
    mac = CkCrypt2::ckMacStringENC(crypt,"The quick brown fox jumps over the lazy dog")
    Debug mac


    CkCrypt2::ckDispose(crypt)


    ProcedureReturn
EndProcedure