Chilkat HOME .NET Core C# Android™ AutoIt C C# C++ Chilkat2-Python CkPython Classic ASP DataFlex Delphi ActiveX Delphi DLL Go Java Lianja Mono C# Node.js Objective-C PHP ActiveX PHP Extension Perl PowerBuilder PowerShell PureBasic Ruby SQL Server Swift 2 Swift 3,4,5... Tcl Unicode C Unicode C++ VB.NET VBScript Visual Basic 6.0 Visual FoxPro Xojo Plugin
(PureBasic) HMAC SHA-1 to Match RFC 2022 Test VectorsDemonstrates using Chilkat in PureBasic to computer HMAC SHA-1 message authentication codes to match the test vectors given by RFC 2202.
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, "sha-1") mac.s ; Set the HMAC key: CkCrypt2::ckSetHmacKeyEncoded(crypt,"0b0b0b0b0b0b0b0b0b0b0b0b0b0b0b0b0b0b0b0b","hex") mac = CkCrypt2::ckHmacStringENC(crypt,"Hi There") Debug mac CkCrypt2::ckSetHmacKeyEncoded(crypt,"Jefe","ansi") mac = CkCrypt2::ckHmacStringENC(crypt,"what do ya want for nothing?") Debug mac CkCrypt2::ckDispose(crypt) ProcedureReturn EndProcedure |
© 2000-2023 Chilkat Software, Inc. All Rights Reserved.