HMAC SHA-1 to Match RFC 2022 Test Vectors

Demonstrates using Chilkat in VB.NET to computer HMAC SHA-1 message authentication codes to match the test vectors given by RFC 2202.

Download Chilkat .NET for 2.0 Framework

Download Chilkat .NET for 1.0 / 1.1 Framework

Dim crypt As New Chilkat.Crypt2()

'  Any string argument automatically begins the 30-day trial.
Dim success As Boolean
success = crypt.UnlockComponent("30-day trial")
If (success <> true) Then
    MsgBox("Crypt component unlock failed")
    Exit Sub
End If


'  The output will be Hex, so set the EncodingMode:
crypt.EncodingMode = "hex"

'  Set the hash algorithm:
'  Choices are: md5, sha-1, sha256, sha384, sha512, md2, haval
crypt.HashAlgorithm = "sha-1"

Dim mac As String

'  Set the HMAC key:
crypt.SetHmacKeyEncoded("0b0b0b0b0b0b0b0b0b0b0b0b0b0b0b0b0b0b0b0b","hex")
mac = crypt.HmacStringENC("Hi There")
TextBox1.Text = TextBox1.Text & mac & vbCrLf
TextBox1.Refresh()

crypt.SetHmacKeyEncoded("Jefe","us-ascii")
mac = crypt.HmacStringENC("what do ya want for nothing?")
TextBox1.Text = TextBox1.Text & mac & vbCrLf
TextBox1.Refresh()