forked from KolibriOS/kolibrios
libcrash: switch to standard init/update/final API
git-svn-id: svn://kolibrios.org@6461 a494cfbc-eb01-0410-851d-a64ba20cac60
This commit is contained in:
@@ -1,6 +1,6 @@
|
||||
; libcrash -- cryptographic hash functions
|
||||
;
|
||||
; Copyright (C) 2012-2013 Ivan Baravy (dunkaist)
|
||||
; Copyright (C) 2012-2013,2016 Ivan Baravy (dunkaist)
|
||||
;
|
||||
; This program is free software: you can redistribute it and/or modify
|
||||
; it under the terms of the GNU General Public License as published by
|
||||
@@ -15,109 +15,237 @@
|
||||
; You should have received a copy of the GNU General Public License
|
||||
; along with this program. If not, see <http://www.gnu.org/licenses/>.
|
||||
|
||||
macro crash.md4.f b, c, d
|
||||
|
||||
MD4_BLOCK_SIZE = 64
|
||||
MD4_HASH_SIZE = 16
|
||||
MD4_ALIGN = 4
|
||||
MD4_ALIGN_MASK = MD4_ALIGN - 1
|
||||
|
||||
struct ctx_md4
|
||||
hash rb MD4_HASH_SIZE
|
||||
block rb MD4_BLOCK_SIZE
|
||||
index rd 1
|
||||
msglen_0 rd 1
|
||||
msglen_1 rd 1
|
||||
ends
|
||||
|
||||
|
||||
macro md4._.f b, c, d
|
||||
{
|
||||
push c
|
||||
xor c, d
|
||||
and b, c
|
||||
xor b, d
|
||||
pop c
|
||||
mov eax, c
|
||||
xor eax, d
|
||||
and eax, b
|
||||
xor eax, d
|
||||
}
|
||||
|
||||
macro crash.md4.g b, c, d
|
||||
macro md4._.g b, c, d
|
||||
{
|
||||
push c d
|
||||
mov edi, b
|
||||
and b, c
|
||||
and c, d
|
||||
and d, edi
|
||||
or b, c
|
||||
or b, d
|
||||
pop d c
|
||||
push c d
|
||||
mov eax, b
|
||||
and eax, c
|
||||
and c, d
|
||||
and d, b
|
||||
or eax, c
|
||||
or eax, d
|
||||
pop d c
|
||||
}
|
||||
|
||||
macro crash.md4.h b, c, d
|
||||
macro md4._.h b, c, d
|
||||
{
|
||||
xor b, c
|
||||
xor b, d
|
||||
mov eax, b
|
||||
xor eax, c
|
||||
xor eax, d
|
||||
}
|
||||
|
||||
macro crash.md4.round func, a, b, c, d, index, shift, ac
|
||||
macro md4._.round func, a, b, c, d, index, shift, ac
|
||||
{
|
||||
push b
|
||||
func b, c, d
|
||||
lea a, [a + b + ac]
|
||||
add a, [esi + index*4]
|
||||
rol a, shift
|
||||
pop b
|
||||
func b, c, d
|
||||
add eax, [esi + index*4]
|
||||
lea a, [a + eax + ac]
|
||||
rol a, shift
|
||||
}
|
||||
|
||||
|
||||
proc crash.md4 _md4, _data
|
||||
mov edi, [_md4]
|
||||
mov eax, [edi + 0x0]
|
||||
mov ebx, [edi + 0x4]
|
||||
mov ecx, [edi + 0x8]
|
||||
mov edx, [edi + 0xc]
|
||||
|
||||
crash.md4.round crash.md4.f, eax, ebx, ecx, edx, 0, 3, 0x00000000
|
||||
crash.md4.round crash.md4.f, edx, eax, ebx, ecx, 1, 7, 0x00000000
|
||||
crash.md4.round crash.md4.f, ecx, edx, eax, ebx, 2, 11, 0x00000000
|
||||
crash.md4.round crash.md4.f, ebx, ecx, edx, eax, 3, 19, 0x00000000
|
||||
crash.md4.round crash.md4.f, eax, ebx, ecx, edx, 4, 3, 0x00000000
|
||||
crash.md4.round crash.md4.f, edx, eax, ebx, ecx, 5, 7, 0x00000000
|
||||
crash.md4.round crash.md4.f, ecx, edx, eax, ebx, 6, 11, 0x00000000
|
||||
crash.md4.round crash.md4.f, ebx, ecx, edx, eax, 7, 19, 0x00000000
|
||||
crash.md4.round crash.md4.f, eax, ebx, ecx, edx, 8, 3, 0x00000000
|
||||
crash.md4.round crash.md4.f, edx, eax, ebx, ecx, 9, 7, 0x00000000
|
||||
crash.md4.round crash.md4.f, ecx, edx, eax, ebx, 10, 11, 0x00000000
|
||||
crash.md4.round crash.md4.f, ebx, ecx, edx, eax, 11, 19, 0x00000000
|
||||
crash.md4.round crash.md4.f, eax, ebx, ecx, edx, 12, 3, 0x00000000
|
||||
crash.md4.round crash.md4.f, edx, eax, ebx, ecx, 13, 7, 0x00000000
|
||||
crash.md4.round crash.md4.f, ecx, edx, eax, ebx, 14, 11, 0x00000000
|
||||
crash.md4.round crash.md4.f, ebx, ecx, edx, eax, 15, 19, 0x00000000
|
||||
|
||||
crash.md4.round crash.md4.g, eax, ebx, ecx, edx, 0, 3, 0x5a827999
|
||||
crash.md4.round crash.md4.g, edx, eax, ebx, ecx, 4, 5, 0x5a827999
|
||||
crash.md4.round crash.md4.g, ecx, edx, eax, ebx, 8, 9, 0x5a827999
|
||||
crash.md4.round crash.md4.g, ebx, ecx, edx, eax, 12, 13, 0x5a827999
|
||||
crash.md4.round crash.md4.g, eax, ebx, ecx, edx, 1, 3, 0x5a827999
|
||||
crash.md4.round crash.md4.g, edx, eax, ebx, ecx, 5, 5, 0x5a827999
|
||||
crash.md4.round crash.md4.g, ecx, edx, eax, ebx, 9, 9, 0x5a827999
|
||||
crash.md4.round crash.md4.g, ebx, ecx, edx, eax, 13, 13, 0x5a827999
|
||||
crash.md4.round crash.md4.g, eax, ebx, ecx, edx, 2, 3, 0x5a827999
|
||||
crash.md4.round crash.md4.g, edx, eax, ebx, ecx, 6, 5, 0x5a827999
|
||||
crash.md4.round crash.md4.g, ecx, edx, eax, ebx, 10, 9, 0x5a827999
|
||||
crash.md4.round crash.md4.g, ebx, ecx, edx, eax, 14, 13, 0x5a827999
|
||||
crash.md4.round crash.md4.g, eax, ebx, ecx, edx, 3, 3, 0x5a827999
|
||||
crash.md4.round crash.md4.g, edx, eax, ebx, ecx, 7, 5, 0x5a827999
|
||||
crash.md4.round crash.md4.g, ecx, edx, eax, ebx, 11, 9, 0x5a827999
|
||||
crash.md4.round crash.md4.g, ebx, ecx, edx, eax, 15, 13, 0x5a827999
|
||||
|
||||
crash.md4.round crash.md4.h, eax, ebx, ecx, edx, 0, 3, 0x6ed9eba1
|
||||
crash.md4.round crash.md4.h, edx, eax, ebx, ecx, 8, 9, 0x6ed9eba1
|
||||
crash.md4.round crash.md4.h, ecx, edx, eax, ebx, 4, 11, 0x6ed9eba1
|
||||
crash.md4.round crash.md4.h, ebx, ecx, edx, eax, 12, 15, 0x6ed9eba1
|
||||
crash.md4.round crash.md4.h, eax, ebx, ecx, edx, 2, 3, 0x6ed9eba1
|
||||
crash.md4.round crash.md4.h, edx, eax, ebx, ecx, 10, 9, 0x6ed9eba1
|
||||
crash.md4.round crash.md4.h, ecx, edx, eax, ebx, 6, 11, 0x6ed9eba1
|
||||
crash.md4.round crash.md4.h, ebx, ecx, edx, eax, 14, 15, 0x6ed9eba1
|
||||
crash.md4.round crash.md4.h, eax, ebx, ecx, edx, 1, 3, 0x6ed9eba1
|
||||
crash.md4.round crash.md4.h, edx, eax, ebx, ecx, 9, 9, 0x6ed9eba1
|
||||
crash.md4.round crash.md4.h, ecx, edx, eax, ebx, 5, 11, 0x6ed9eba1
|
||||
crash.md4.round crash.md4.h, ebx, ecx, edx, eax, 13, 15, 0x6ed9eba1
|
||||
crash.md4.round crash.md4.h, eax, ebx, ecx, edx, 3, 3, 0x6ed9eba1
|
||||
crash.md4.round crash.md4.h, edx, eax, ebx, ecx, 11, 9, 0x6ed9eba1
|
||||
crash.md4.round crash.md4.h, ecx, edx, eax, ebx, 7, 11, 0x6ed9eba1
|
||||
crash.md4.round crash.md4.h, ebx, ecx, edx, eax, 15, 15, 0x6ed9eba1
|
||||
|
||||
mov edi, [_md4]
|
||||
add [edi + 0x0], eax
|
||||
add [edi + 0x4], ebx
|
||||
add [edi + 0x8], ecx
|
||||
add [edi + 0xc], edx
|
||||
add esi, 64
|
||||
|
||||
ret
|
||||
proc md4.init _ctx
|
||||
mov ebx, [_ctx]
|
||||
lea edi, [ebx + ctx_md4.hash]
|
||||
mov esi, md4._.hash_init
|
||||
mov ecx, MD4_HASH_SIZE/4
|
||||
rep movsd
|
||||
xor eax, eax
|
||||
mov [ebx + ctx_md4.index], eax
|
||||
mov [ebx + ctx_md4.msglen_0], eax
|
||||
mov [ebx + ctx_md4.msglen_1], eax
|
||||
ret
|
||||
endp
|
||||
|
||||
|
||||
proc md4._.block _hash
|
||||
|
||||
mov eax, [_hash]
|
||||
mov edi, [eax + 0x0]
|
||||
mov ebx, [eax + 0x4]
|
||||
mov ecx, [eax + 0x8]
|
||||
mov edx, [eax + 0xc]
|
||||
|
||||
md4._.round md4._.f, edi, ebx, ecx, edx, 0, 3, 0x00000000
|
||||
md4._.round md4._.f, edx, edi, ebx, ecx, 1, 7, 0x00000000
|
||||
md4._.round md4._.f, ecx, edx, edi, ebx, 2, 11, 0x00000000
|
||||
md4._.round md4._.f, ebx, ecx, edx, edi, 3, 19, 0x00000000
|
||||
md4._.round md4._.f, edi, ebx, ecx, edx, 4, 3, 0x00000000
|
||||
md4._.round md4._.f, edx, edi, ebx, ecx, 5, 7, 0x00000000
|
||||
md4._.round md4._.f, ecx, edx, edi, ebx, 6, 11, 0x00000000
|
||||
md4._.round md4._.f, ebx, ecx, edx, edi, 7, 19, 0x00000000
|
||||
md4._.round md4._.f, edi, ebx, ecx, edx, 8, 3, 0x00000000
|
||||
md4._.round md4._.f, edx, edi, ebx, ecx, 9, 7, 0x00000000
|
||||
md4._.round md4._.f, ecx, edx, edi, ebx, 10, 11, 0x00000000
|
||||
md4._.round md4._.f, ebx, ecx, edx, edi, 11, 19, 0x00000000
|
||||
md4._.round md4._.f, edi, ebx, ecx, edx, 12, 3, 0x00000000
|
||||
md4._.round md4._.f, edx, edi, ebx, ecx, 13, 7, 0x00000000
|
||||
md4._.round md4._.f, ecx, edx, edi, ebx, 14, 11, 0x00000000
|
||||
md4._.round md4._.f, ebx, ecx, edx, edi, 15, 19, 0x00000000
|
||||
|
||||
md4._.round md4._.g, edi, ebx, ecx, edx, 0, 3, 0x5a827999
|
||||
md4._.round md4._.g, edx, edi, ebx, ecx, 4, 5, 0x5a827999
|
||||
md4._.round md4._.g, ecx, edx, edi, ebx, 8, 9, 0x5a827999
|
||||
md4._.round md4._.g, ebx, ecx, edx, edi, 12, 13, 0x5a827999
|
||||
md4._.round md4._.g, edi, ebx, ecx, edx, 1, 3, 0x5a827999
|
||||
md4._.round md4._.g, edx, edi, ebx, ecx, 5, 5, 0x5a827999
|
||||
md4._.round md4._.g, ecx, edx, edi, ebx, 9, 9, 0x5a827999
|
||||
md4._.round md4._.g, ebx, ecx, edx, edi, 13, 13, 0x5a827999
|
||||
md4._.round md4._.g, edi, ebx, ecx, edx, 2, 3, 0x5a827999
|
||||
md4._.round md4._.g, edx, edi, ebx, ecx, 6, 5, 0x5a827999
|
||||
md4._.round md4._.g, ecx, edx, edi, ebx, 10, 9, 0x5a827999
|
||||
md4._.round md4._.g, ebx, ecx, edx, edi, 14, 13, 0x5a827999
|
||||
md4._.round md4._.g, edi, ebx, ecx, edx, 3, 3, 0x5a827999
|
||||
md4._.round md4._.g, edx, edi, ebx, ecx, 7, 5, 0x5a827999
|
||||
md4._.round md4._.g, ecx, edx, edi, ebx, 11, 9, 0x5a827999
|
||||
md4._.round md4._.g, ebx, ecx, edx, edi, 15, 13, 0x5a827999
|
||||
|
||||
md4._.round md4._.h, edi, ebx, ecx, edx, 0, 3, 0x6ed9eba1
|
||||
md4._.round md4._.h, edx, edi, ebx, ecx, 8, 9, 0x6ed9eba1
|
||||
md4._.round md4._.h, ecx, edx, edi, ebx, 4, 11, 0x6ed9eba1
|
||||
md4._.round md4._.h, ebx, ecx, edx, edi, 12, 15, 0x6ed9eba1
|
||||
md4._.round md4._.h, edi, ebx, ecx, edx, 2, 3, 0x6ed9eba1
|
||||
md4._.round md4._.h, edx, edi, ebx, ecx, 10, 9, 0x6ed9eba1
|
||||
md4._.round md4._.h, ecx, edx, edi, ebx, 6, 11, 0x6ed9eba1
|
||||
md4._.round md4._.h, ebx, ecx, edx, edi, 14, 15, 0x6ed9eba1
|
||||
md4._.round md4._.h, edi, ebx, ecx, edx, 1, 3, 0x6ed9eba1
|
||||
md4._.round md4._.h, edx, edi, ebx, ecx, 9, 9, 0x6ed9eba1
|
||||
md4._.round md4._.h, ecx, edx, edi, ebx, 5, 11, 0x6ed9eba1
|
||||
md4._.round md4._.h, ebx, ecx, edx, edi, 13, 15, 0x6ed9eba1
|
||||
md4._.round md4._.h, edi, ebx, ecx, edx, 3, 3, 0x6ed9eba1
|
||||
md4._.round md4._.h, edx, edi, ebx, ecx, 11, 9, 0x6ed9eba1
|
||||
md4._.round md4._.h, ecx, edx, edi, ebx, 7, 11, 0x6ed9eba1
|
||||
md4._.round md4._.h, ebx, ecx, edx, edi, 15, 15, 0x6ed9eba1
|
||||
|
||||
mov eax, [_hash]
|
||||
add [eax + 0x0], edi
|
||||
add [eax + 0x4], ebx
|
||||
add [eax + 0x8], ecx
|
||||
add [eax + 0xc], edx
|
||||
|
||||
ret
|
||||
endp
|
||||
|
||||
|
||||
proc md4.update _ctx, _msg, _size
|
||||
mov ebx, [_ctx]
|
||||
mov ecx, [_size]
|
||||
add [ebx + ctx_md4.msglen_0], ecx
|
||||
adc [ebx + ctx_md4.msglen_1], 0
|
||||
|
||||
.next_block:
|
||||
mov ebx, [_ctx]
|
||||
mov esi, [_msg]
|
||||
mov eax, [ebx + ctx_md4.index]
|
||||
and eax, MD4_BLOCK_SIZE-1
|
||||
jnz .copy_to_buf
|
||||
test esi, MD4_ALIGN_MASK
|
||||
jnz .copy_to_buf
|
||||
.no_copy:
|
||||
; data is aligned, hash it in place without copying
|
||||
mov ebx, [_ctx]
|
||||
cmp [_size], MD4_BLOCK_SIZE
|
||||
jb .copy_quit
|
||||
lea eax, [ebx + ctx_md4.hash]
|
||||
stdcall md4._.block, eax
|
||||
sub [_size], MD4_BLOCK_SIZE
|
||||
add esi, MD4_BLOCK_SIZE
|
||||
jmp .no_copy
|
||||
|
||||
.copy_to_buf:
|
||||
lea edi, [ebx + ctx_md4.block]
|
||||
add edi, eax
|
||||
mov ecx, MD4_BLOCK_SIZE
|
||||
sub ecx, eax
|
||||
cmp [_size], ecx
|
||||
jb .copy_quit
|
||||
sub [_size], ecx
|
||||
add [_msg], ecx
|
||||
add [ebx + ctx_md4.index], ecx
|
||||
rep movsb
|
||||
lea eax, [ebx + ctx_md4.hash]
|
||||
lea esi, [ebx + ctx_md4.block]
|
||||
stdcall md4._.block, eax
|
||||
jmp .next_block
|
||||
|
||||
.copy_quit:
|
||||
mov ebx, [_ctx]
|
||||
lea edi, [ebx + ctx_md4.block]
|
||||
mov eax, [ebx + ctx_md4.index]
|
||||
and eax, MD4_BLOCK_SIZE-1
|
||||
add edi, eax
|
||||
mov ecx, [_size]
|
||||
add [ebx + ctx_md4.index], ecx
|
||||
rep movsb
|
||||
.quit:
|
||||
ret
|
||||
endp
|
||||
|
||||
|
||||
proc md4.final _ctx
|
||||
mov ebx, [_ctx]
|
||||
lea edi, [ebx + ctx_md4.block]
|
||||
mov ecx, [ebx + ctx_md4.msglen_0]
|
||||
and ecx, MD4_BLOCK_SIZE-1
|
||||
add edi, ecx
|
||||
mov byte[edi], 0x80
|
||||
inc edi
|
||||
neg ecx
|
||||
add ecx, MD4_BLOCK_SIZE
|
||||
cmp ecx, 8
|
||||
ja .last
|
||||
|
||||
dec ecx
|
||||
xor eax, eax
|
||||
rep stosb
|
||||
lea esi, [ebx + ctx_md4.block]
|
||||
lea eax, [ebx + ctx_md4.hash]
|
||||
stdcall md4._.block, eax
|
||||
mov ebx, [_ctx]
|
||||
lea edi, [ebx + ctx_md4.block]
|
||||
mov ecx, MD4_BLOCK_SIZE+1
|
||||
.last:
|
||||
dec ecx
|
||||
sub ecx, 8
|
||||
xor eax, eax
|
||||
rep stosb
|
||||
mov eax, [ebx + ctx_md4.msglen_0]
|
||||
mov edx, [ebx + ctx_md4.msglen_1]
|
||||
shld edx, eax, 3
|
||||
shl eax, 3
|
||||
mov dword[edi], eax
|
||||
mov dword[edi+4], edx
|
||||
lea esi, [ebx + ctx_md4.block]
|
||||
lea eax, [ebx + ctx_md4.hash]
|
||||
stdcall md4._.block, eax
|
||||
|
||||
ret
|
||||
endp
|
||||
|
||||
|
||||
align MD4_ALIGN
|
||||
|
||||
md4._.hash_init dd 0x67452301, 0xefcdab89, 0x98badcfe, 0x10325476, 0xc3d2e1f0
|
||||
|
||||
|
||||
Reference in New Issue
Block a user