forked from KolibriOS/kolibrios
43 lines
1.2 KiB
PHP
43 lines
1.2 KiB
PHP
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
||
|
|
;; ;;
|
||
|
|
;; Copyright (C) KolibriOS team 2004-2017. All rights reserved. ;;
|
||
|
|
;; Distributed under terms of the GNU General Public License. ;;
|
||
|
|
;; ;;
|
||
|
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
||
|
|
|
||
|
|
$Revision$
|
||
|
|
|
||
|
|
; This crc32 routine doesn't use precomputed table to allow different
|
||
|
|
; polynomials, which is the first param.
|
||
|
|
; Partial hash in assumed to be eax (both in and out).
|
||
|
|
; Usage:
|
||
|
|
; 1. mov eax, -1
|
||
|
|
; 2. stdcall crypto.crc32 zero or more times
|
||
|
|
; 3. xor eax, -1
|
||
|
|
proc crc_32 _poly, _buffer, _length
|
||
|
|
push ebx ecx edx esi
|
||
|
|
|
||
|
|
mov esi, [_buffer]
|
||
|
|
.next_byte:
|
||
|
|
dec [_length]
|
||
|
|
js .done
|
||
|
|
movzx ebx, byte[esi]
|
||
|
|
inc esi
|
||
|
|
mov ecx, 8
|
||
|
|
.next_bit:
|
||
|
|
mov edx, eax
|
||
|
|
xor edx, ebx
|
||
|
|
shr eax, 1
|
||
|
|
test edx, 1
|
||
|
|
jz @f
|
||
|
|
xor eax, [_poly]
|
||
|
|
@@:
|
||
|
|
shr ebx, 1
|
||
|
|
dec ecx
|
||
|
|
jnz .next_bit
|
||
|
|
jmp .next_byte
|
||
|
|
.done:
|
||
|
|
pop esi edx ecx ebx
|
||
|
|
ret
|
||
|
|
endp
|