(AutoIt) WPA Key Calculation from PassPhrase to Hex

Demonstrates how to calculate a WPA key from a passprhase and network SSID.

Chilkat ActiveX Downloads ActiveX for 32-bit and 64-bit Windows

; 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)