(VB.NET) WPA Key Calculation from PassPhrase to Hex
Demonstrates how to calculate a WPA key from a passprhase and network SSID.
' This example assumes the Chilkat API to have been previously unlocked.
' See Global Unlock Sample for sample code.
Dim crypt As New Chilkat.Crypt2
Dim wpaHexKey As String
' The "ps" is the WPA passphrase
Dim pw As String = "password"
Dim pwCharset As String = "ansi"
' Hash algorithms may be: sha1, md2, md5, etc.
Dim hashAlg As String = "sha1"
' Specify the SSID in hex:
' For example, if the SSID is "ABC", then the
' hex values for these us-ascii chars is "414243"
Dim ssidHex As String = "414243"
' The WPA key calculation will always use 4096 iterations.
Dim iterationCount As Integer = 4096
' The WPA hex output should be 256 bits.
Dim outputBitLen As Integer = 256
' Indicate that "hex" is to be returned.
Dim enc As String = "hex"
wpaHexKey = crypt.Pbkdf2(pw,pwCharset,hashAlg,ssidHex,iterationCount,outputBitLen,enc)
Debug.WriteLine(wpaHexKey)
|
