_Crypt_HashData
Возвращает контрольную сумму (хеш) данных с указанным алгоритмом
#include <Crypt.au3>
_Crypt_HashData($vData, $iALG_ID [, $fFinal = True [, $hCryptHash = 0]])
Параметры
$vData | Данные |
$iALG_ID |
Используемый алгоритм хеширования |
$fFinal |
[необязательный] False, если это только часть полных данных, а также функция временно возвращает хеш объект вместо хеша |
$hCryptHash |
[необязательный] Хеш объект возвращённый от предыдущего вызова _Crypt_HashData |
Возвращаемое значение
Успех: | Возвращает хеш или хеш объект, если $fFinal=False |
Sets @error to 0 | |
Ошибка: | Возвращает -1 и устанавливает @error: |
1 - Не удалось создать хеш объект | |
2 - Не удалось хешировать данные | |
3 - Не удалось получить размер хеша | |
4 - Не удалось получить хеш |
Примечания
хеш возвращается как бинарная строка, размер которой зависит от алгоритма. Для использования с частями данных установите флаг fFinal равным False для всех незавершённых частей и используйте возвращаемый хеш объект со всеми последующими вызовами.См. также
_Crypt_HashFileСм. также
Искать CryptHashData в библиотеке MSDNПример
#include <Crypt.au3>
#include <ComboConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WinAPI.au3>
#include <WindowsConstants.au3>
Global $bAlgorithm = $CALG_SHA1, $iInputEdit = -1, $iOutputEdit = -1
GUICreate("Realtime Hashing", 400, 320)
$iInputEdit = GUICtrlCreateEdit("", 0, 0, 400, 150, $ES_WANTRETURN)
$iOutputEdit = GUICtrlCreateEdit("", 0, 150, 400, 150, $ES_READONLY)
Local $iCombo = GUICtrlCreateCombo("", 0, 300, 100, 20, $CBS_DROPDOWNLIST)
GUICtrlSetData(-1, "MD2|MD4|MD5|SHA1", "SHA1")
GUIRegisterMsg($WM_COMMAND, "WM_COMMAND")
GUISetState(@SW_SHOW)
_Crypt_Startup() ; To optimize performance start the crypt library.
While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
Exit
Case $iCombo ; Check when the combobox is selected and retrieve the correct algorithm.
Switch GUICtrlRead($iCombo) ; Read the combobox selection.
Case "MD2"
$bAlgorithm = $CALG_MD2
Case "MD4"
$bAlgorithm = $CALG_MD4
Case "MD5"
$bAlgorithm = $CALG_MD5
Case "SHA1"
$bAlgorithm = $CALG_SHA1
EndSwitch
Local $sRead = GUICtrlRead($iInputEdit)
If StringStripWS($sRead, 8) <> "" Then ; Check there is text available to hash.
Local $bHash = _Crypt_HashData($sRead, $bAlgorithm) ; Create a hash of the text entered.
GUICtrlSetData($iOutputEdit, $bHash) ; Set the output box with the hash data.
EndIf
EndSwitch
WEnd
_Crypt_Shutdown() ; Shutdown the crypt library.
Func WM_COMMAND($hWnd, $iMsg, $wParam, $lParam)
#forceref $hWnd, $iMsg, $lParam
Switch _WinAPI_LoWord($wParam)
Case $iInputEdit
Switch _WinAPI_HiWord($wParam)
Case $EN_CHANGE
Local $bHash = _Crypt_HashData(GUICtrlRead($iInputEdit), $bAlgorithm) ; Create a hash of the text entered.
GUICtrlSetData($iOutputEdit, $bHash) ; Set the output box with the hash data.
EndSwitch
EndSwitch
EndFunc ;==>WM_COMMAND