Hash data with specified algorithm
#include <Crypt.au3>
_Crypt_HashData ( $vData, $iAlgID [, $bFinal = True [, $hCryptHash = 0]] )
$vData | Data to hash |
$iAlgID | Hash ID to use. See _Crypt_DeriveKey(). |
$bFinal | [optional] False if this is only a segment of the full data, also makes the function return a hash object instead of hash |
$hCryptHash | [optional] Hash object returned from a previous call to _Crypt_HashData() |
Success: | a binary hash or hash object if $bFinal = False. |
Failure: | sets the @error flag to non-zero. |
@error: | 10 - Failed to create hash object 20 - Failed to hash data 30 - Failed to get hash size 40 - Failed to get hash 1000+ _Crypt_Startup() failed |
The hash digest will be returned as a binary string, the size is specified by the algorithm.
To use this with segments of data set the $bFinal flag to False for all non ending segments and use the returned hash object with all subsequent calls.
Search CryptHashData in MSDN Library.
#include <ComboConstants.au3>
#include <Crypt.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StringConstants.au3>
#include <WinAPIConv.au3>
#include <WindowsConstants.au3>
Global $g_iAlgorithm = $CALG_SHA1, $g_idInputEdit = -1, $g_idOutputEdit = -1
Example()
Func Example()
Local $hGUI = GUICreate("Realtime Hashing", 400, 320)
$g_idInputEdit = GUICtrlCreateEdit("", 0, 0, 400, 150, $ES_WANTRETURN)
$g_idOutputEdit = GUICtrlCreateEdit("", 0, 150, 400, 150, $ES_READONLY)
Local $idCombo = GUICtrlCreateCombo("", 0, 300, 100, 20, $CBS_DROPDOWNLIST)
GUICtrlSetData($idCombo, "MD2 (128bit)|MD4 (128bit)|MD5 (128bit)|SHA1 (160bit)|SHA_256|SHA_384|SHA_512", "SHA1 (160bit)")
GUIRegisterMsg($WM_COMMAND, "WM_COMMAND")
GUISetState(@SW_SHOW, $hGUI)
_Crypt_Startup() ; To optimize performance start the crypt library.
Local $dHash = 0, _
$sRead = ""
While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
ExitLoop
Case $idCombo ; Check when the combobox is selected and retrieve the correct algorithm.
Switch GUICtrlRead($idCombo) ; Read the combobox selection.
Case "MD2 (128bit)"
$g_iAlgorithm = $CALG_MD2
Case "MD4 (128bit)"
$g_iAlgorithm = $CALG_MD4
Case "MD5 (128bit)"
$g_iAlgorithm = $CALG_MD5
Case "SHA1 (160bit)"
$g_iAlgorithm = $CALG_SHA1
Case "SHA_256"
$g_iAlgorithm = $CALG_SHA_256
Case "SHA_384"
$g_iAlgorithm = $CALG_SHA_384
Case "SHA_512"
$g_iAlgorithm = $CALG_SHA_512
EndSwitch
$sRead = GUICtrlRead($g_idInputEdit)
If StringStripWS($sRead, $STR_STRIPALL) <> "" Then ; Check there is text available to hash.
$dHash = _Crypt_HashData($sRead, $g_iAlgorithm) ; Create a hash of the text entered.
GUICtrlSetData($g_idOutputEdit, $dHash) ; Set the output box with the hash data.
EndIf
EndSwitch
WEnd
GUIDelete($hGUI) ; Delete the previous GUI and all controls.
_Crypt_Shutdown() ; Shutdown the crypt library.
EndFunc ;==>Example
Func WM_COMMAND($hWnd, $iMsg, $wParam, $lParam)
#forceref $hWnd, $iMsg, $lParam
Switch _WinAPI_LoWord($wParam)
Case $g_idInputEdit
Switch _WinAPI_HiWord($wParam)
Case $EN_CHANGE
Local $dHash = _Crypt_HashData(GUICtrlRead($g_idInputEdit), $g_iAlgorithm) ; Create a hash of the text entered.
GUICtrlSetData($g_idOutputEdit, $dHash) ; Set the output box with the hash data.
EndSwitch
EndSwitch
EndFunc ;==>WM_COMMAND