(AutoIt) 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.
$oCrypt = ObjCreate("Chilkat.Crypt2")
Local $sWpaHexKey
; The "ps" is the WPA passphrase
Local $sPw = "password"
Local $sPwCharset = "ansi"
; Hash algorithms may be: sha1, md2, md5, etc.
Local $sHashAlg = "sha1"
; Specify the SSID in hex:
; For example, if the SSID is "ABC", then the
; hex values for these us-ascii chars is "414243"
Local $ssidHex = "414243"
; The WPA key calculation will always use 4096 iterations.
Local $iterationCount = 4096
; The WPA hex output should be 256 bits.
Local $iOutputBitLen = 256
; Indicate that "hex" is to be returned.
Local $sEnc = "hex"
$sWpaHexKey = $oCrypt.Pbkdf2($sPw,$sPwCharset,$sHashAlg,$ssidHex,$iterationCount,$iOutputBitLen,$sEnc)
ConsoleWrite($sWpaHexKey & @CRLF)
|
