crc32dll.asm

CRC原理及源程序

;**********************************************************
;程序名称：演示CRC32原理
;作者：罗聪
;日期：2002-9-8
;出处：http://laoluoc.yeah.net（老罗的缤纷天地）
;注意事项：如欲转载，请保持本程序的完整，并注明：转载自
;“老罗的缤纷天地”（http://laoluoc.yeah.net）

;特别感谢Win32ASM高手—— dREAMtHEATER 为我的代码作了相当好的优化！
;请各位前去 http://NoteXPad.yeah.net 下载他的小巧的
;“cool 记事本”—— NoteXPad 来试用！（100% Win32ASM 编写）
;**********************************************************

.386
.model flat, stdcall
option casemap:none

include \masm32\include\windows.inc
include \masm32\include\kernel32.inc
include \masm32\include\user32.inc
includelib \masm32\lib\kernel32.lib
includelib \masm32\lib\user32.lib

DllEntry		proto :HINSTANCE, :DWORD, :DWORD
init_crc32table proto
arraycrc32		proto

.const
MAXSIZE			equ	260

.data
crc32tbl	    dd	256 dup(0)	;CRC-32 table
szFileName		db	MAXSIZE dup(0)

.data?
szCRC32			dd	4 dup(?)	;计算后的CRC-32值

.code
DllEntry	proc	hInst: HINSTANCE, reason: DWORD, reserved1: DWORD
	mov eax, TRUE
	ret
DllEntry	endp

;**********************************************************
;函数功能：动态生成CRC-32表
;**********************************************************
init_crc32table	proc

	;如果用C语言来表示，应该如下：
        ;
        ;	for (i = 0; i < 256; i++)
		;	{
        ;		crc = i;
        ;		for (j = 0; j < 8; j++)
		;		{
        ;			if (crc & 1)
        ;				crc = (crc >> 1) ^ 0xEDB88320;
        ;			else
        ;				crc >>= 1;
		;		}
        ;		crc32tbl[i] = crc;
        ;	}
        ;
		;呵呵，让我们把上面的语句改成assembly的：

        mov     ecx, 256        ; repeat for every DWORD in table
$BigLoop:
        lea     eax, [ecx-1]
        push    ecx
        mov     ecx, 8
$SmallLoop:
        shr     eax, 1
        jnc     @F
        xor     eax, 0EDB88320h
@@:
        dec		ecx
        jne		$SmallLoop
        pop     ecx
        mov     [crc32tbl+ecx*4-4], eax
        dec		ecx
        jne		$BigLoop

        ret
init_crc32table      endp

;**************************************************************
;函数功能：计算CRC-32
;**************************************************************
arraycrc32	proc uses ebx

		;计算 CRC-32 ，我采用的是把整个字符串当作一个数组，然后把这个数组的首地址赋值给 EBX，
		;把数组的长度赋值给 ECX，然后循环计算，返回值（计算出来的 CRC-32 值）储存在 EAX 中：
		;
        ; 参数：
        ;       EBX = address of first byte
		;		ECX = number of bytes in array
        ; 返回值：
        ;       EAX = CRC-32 of the entire array

        mov     eax, -1 ; 先初始化eax
		or 		ecx, ecx
		jz		$Done	;如果表为空，就bye bye
        or      ebx, ebx
        jz      $Done   ; 避免出现空指针
@@:
        mov     dl, [ebx]
        
 		;这里我用查表法来计算 CRC-32 ，因此非常快速：
        ;因为这是assembly代码，所以不需要给这个过程传递参数，只需要把oldcrc赋值给EAX，以及把byte赋值给DL：
		;
        ; 在C语言中的形式：
        ;
        ;   temp = (oldcrc ^ abyte) & 0x000000FF;
        ;   crc  = (( oldcrc >> 8) & 0x00FFFFFF) ^ crc32tbl[temp];
        ;
        ; 参数：
        ;       EAX = old CRC-32
        ;        DL = a byte
        ; 返回值：
        ;       EAX = new CRC-32
        ;       EDX = ?
               
        xor     dl, al
        movzx   edx, dl
        shr     eax, 8
        xor     eax, [crc32tbl+edx*4]
        
        inc     ebx
		dec		ecx   
		jne		@B

		not		eax

$Done:
        ret
arraycrc32      endp

end DllEntry
;********************	over	********************
;by LC