rm-win32.asm

老外写的加密库cryptlib(版本3.1)

	; Don't even think of reading this code
	; It was automatically generated by rmd-586.pl
	; Which is a perl program used to generate the x86 assember for
	; any of elf, a.out, BSDI, Win32, gaswin (for GNU as on Win32) or Solaris
	; eric <[e-mail]>
	; 
segment .text
global	_ripemd160_block_asm_host_order
_ripemd160_block_asm_host_order:
	mov	edx,		[4+esp]
	mov	eax,		[8+esp]
	push	esi
	mov	ecx,		[edx]
	push	edi
	mov	esi,		[4+edx]
	push	ebp
	mov	edi,		[8+edx]
	push	ebx
	sub	esp,		108
L000start:
	; 
	mov	ebx,		[eax]
	mov	ebp,		[4+eax]
	mov	[esp],		ebx
	mov	[4+esp],	ebp
	mov	ebx,		[8+eax]
	mov	ebp,		[12+eax]
	mov	[8+esp],	ebx
	mov	[12+esp],	ebp
	mov	ebx,		[16+eax]
	mov	ebp,		[20+eax]
	mov	[16+esp],	ebx
	mov	[20+esp],	ebp
	mov	ebx,		[24+eax]
	mov	ebp,		[28+eax]
	mov	[24+esp],	ebx
	mov	[28+esp],	ebp
	mov	ebx,		[32+eax]
	mov	ebp,		[36+eax]
	mov	[32+esp],	ebx
	mov	[36+esp],	ebp
	mov	ebx,		[40+eax]
	mov	ebp,		[44+eax]
	mov	[40+esp],	ebx
	mov	[44+esp],	ebp
	mov	ebx,		[48+eax]
	mov	ebp,		[52+eax]
	mov	[48+esp],	ebx
	mov	[52+esp],	ebp
	mov	ebx,		[56+eax]
	mov	ebp,		[60+eax]
	mov	[56+esp],	ebx
	mov	[60+esp],	ebp
	mov	eax,		edi
	mov	ebx,		[12+edx]
	mov	ebp,		[16+edx]
	; 0
	xor	eax,		ebx
	mov	edx,		[esp]
	xor	eax,		esi
	add	ecx,		edx
	rol	edi,		10
	add	ecx,		eax
	mov	eax,		esi
	rol	ecx,		11
	add	ecx,		ebp
	; 1
	xor	eax,		edi
	mov	edx,		[4+esp]
	xor	eax,		ecx
	add	ebp,		eax
	mov	eax,		ecx
	rol	esi,		10
	add	ebp,		edx
	xor	eax,		esi
	rol	ebp,		14
	add	ebp,		ebx
	; 2
	mov	edx,		[8+esp]
	xor	eax,		ebp
	add	ebx,		edx
	rol	ecx,		10
	add	ebx,		eax
	mov	eax,		ebp
	rol	ebx,		15
	add	ebx,		edi
	; 3
	xor	eax,		ecx
	mov	edx,		[12+esp]
	xor	eax,		ebx
	add	edi,		eax
	mov	eax,		ebx
	rol	ebp,		10
	add	edi,		edx
	xor	eax,		ebp
	rol	edi,		12
	add	edi,		esi
	; 4
	mov	edx,		[16+esp]
	xor	eax,		edi
	add	esi,		edx
	rol	ebx,		10
	add	esi,		eax
	mov	eax,		edi
	rol	esi,		5
	add	esi,		ecx
	; 5
	xor	eax,		ebx
	mov	edx,		[20+esp]
	xor	eax,		esi
	add	ecx,		eax
	mov	eax,		esi
	rol	edi,		10
	add	ecx,		edx
	xor	eax,		edi
	rol	ecx,		8
	add	ecx,		ebp
	; 6
	mov	edx,		[24+esp]
	xor	eax,		ecx
	add	ebp,		edx
	rol	esi,		10
	add	ebp,		eax
	mov	eax,		ecx
	rol	ebp,		7
	add	ebp,		ebx
	; 7
	xor	eax,		esi
	mov	edx,		[28+esp]
	xor	eax,		ebp
	add	ebx,		eax
	mov	eax,		ebp
	rol	ecx,		10
	add	ebx,		edx
	xor	eax,		ecx
	rol	ebx,		9
	add	ebx,		edi
	; 8
	mov	edx,		[32+esp]
	xor	eax,		ebx
	add	edi,		edx
	rol	ebp,		10
	add	edi,		eax
	mov	eax,		ebx
	rol	edi,		11
	add	edi,		esi
	; 9
	xor	eax,		ebp
	mov	edx,		[36+esp]
	xor	eax,		edi
	add	esi,		eax
	mov	eax,		edi
	rol	ebx,		10
	add	esi,		edx
	xor	eax,		ebx
	rol	esi,		13
	add	esi,		ecx
	; 10
	mov	edx,		[40+esp]
	xor	eax,		esi
	add	ecx,		edx
	rol	edi,		10
	add	ecx,		eax
	mov	eax,		esi
	rol	ecx,		14
	add	ecx,		ebp
	; 11
	xor	eax,		edi
	mov	edx,		[44+esp]
	xor	eax,		ecx
	add	ebp,		eax
	mov	eax,		ecx
	rol	esi,		10
	add	ebp,		edx
	xor	eax,		esi
	rol	ebp,		15
	add	ebp,		ebx
	; 12
	mov	edx,		[48+esp]
	xor	eax,		ebp
	add	ebx,		edx
	rol	ecx,		10
	add	ebx,		eax
	mov	eax,		ebp
	rol	ebx,		6
	add	ebx,		edi
	; 13
	xor	eax,		ecx
	mov	edx,		[52+esp]
	xor	eax,		ebx
	add	edi,		eax
	mov	eax,		ebx
	rol	ebp,		10
	add	edi,		edx
	xor	eax,		ebp
	rol	edi,		7
	add	edi,		esi
	; 14
	mov	edx,		[56+esp]
	xor	eax,		edi
	add	esi,		edx
	rol	ebx,		10
	add	esi,		eax
	mov	eax,		edi
	rol	esi,		9
	add	esi,		ecx
	; 15
	xor	eax,		ebx
	mov	edx,		[60+esp]
	xor	eax,		esi
	add	ecx,		eax
	mov	eax,		-1
	rol	edi,		10
	add	ecx,		edx
	mov	edx,		[28+esp]
	rol	ecx,		8
	add	ecx,		ebp
	; 16
	add	ebp,		edx
	mov	edx,		esi
	sub	eax,		ecx
	and	edx,		ecx
	and	eax,		edi
	or	edx,		eax
	mov	eax,		[16+esp]
	rol	esi,		10
	lea	ebp,		[1518500249+edx*1+ebp]
	mov	edx,		-1
	rol	ebp,		7
	add	ebp,		ebx
	; 17
	add	ebx,		eax
	mov	eax,		ecx
	sub	edx,		ebp
	and	eax,		ebp
	and	edx,		esi
	or	eax,		edx
	mov	edx,		[52+esp]
	rol	ecx,		10
	lea	ebx,		[1518500249+eax*1+ebx]
	mov	eax,		-1
	rol	ebx,		6
	add	ebx,		edi
	; 18
	add	edi,		edx
	mov	edx,		ebp
	sub	eax,		ebx
	and	edx,		ebx
	and	eax,		ecx
	or	edx,		eax
	mov	eax,		[4+esp]
	rol	ebp,		10
	lea	edi,		[1518500249+edx*1+edi]
	mov	edx,		-1
	rol	edi,		8
	add	edi,		esi
	; 19
	add	esi,		eax
	mov	eax,		ebx
	sub	edx,		edi
	and	eax,		edi
	and	edx,		ebp
	or	eax,		edx
	mov	edx,		[40+esp]
	rol	ebx,		10
	lea	esi,		[1518500249+eax*1+esi]
	mov	eax,		-1
	rol	esi,		13
	add	esi,		ecx
	; 20
	add	ecx,		edx
	mov	edx,		edi
	sub	eax,		esi
	and	edx,		esi
	and	eax,		ebx
	or	edx,		eax
	mov	eax,		[24+esp]
	rol	edi,		10
	lea	ecx,		[1518500249+edx*1+ecx]
	mov	edx,		-1
	rol	ecx,		11
	add	ecx,		ebp
	; 21
	add	ebp,		eax
	mov	eax,		esi
	sub	edx,		ecx
	and	eax,		ecx
	and	edx,		edi
	or	eax,		edx
	mov	edx,		[60+esp]
	rol	esi,		10
	lea	ebp,		[1518500249+eax*1+ebp]
	mov	eax,		-1
	rol	ebp,		9
	add	ebp,		ebx
	; 22
	add	ebx,		edx
	mov	edx,		ecx
	sub	eax,		ebp
	and	edx,		ebp
	and	eax,		esi
	or	edx,		eax
	mov	eax,		[12+esp]
	rol	ecx,		10
	lea	ebx,		[1518500249+edx*1+ebx]
	mov	edx,		-1
	rol	ebx,		7
	add	ebx,		edi
	; 23
	add	edi,		eax
	mov	eax,		ebp
	sub	edx,		ebx
	and	eax,		ebx
	and	edx,		ecx
	or	eax,		edx
	mov	edx,		[48+esp]
	rol	ebp,		10
	lea	edi,		[1518500249+eax*1+edi]
	mov	eax,		-1
	rol	edi,		15
	add	edi,		esi
	; 24
	add	esi,		edx
	mov	edx,		ebx
	sub	eax,		edi
	and	edx,		edi
	and	eax,		ebp
	or	edx,		eax
	mov	eax,		[esp]
	rol	ebx,		10
	lea	esi,		[1518500249+edx*1+esi]
	mov	edx,		-1
	rol	esi,		7
	add	esi,		ecx
	; 25
	add	ecx,		eax
	mov	eax,		edi
	sub	edx,		esi
	and	eax,		esi
	and	edx,		ebx
	or	eax,		edx
	mov	edx,		[36+esp]
	rol	edi,		10
	lea	ecx,		[1518500249+eax*1+ecx]
	mov	eax,		-1
	rol	ecx,		12
	add	ecx,		ebp
	; 26
	add	ebp,		edx
	mov	edx,		esi
	sub	eax,		ecx
	and	edx,		ecx
	and	eax,		edi
	or	edx,		eax
	mov	eax,		[20+esp]
	rol	esi,		10
	lea	ebp,		[1518500249+edx*1+ebp]
	mov	edx,		-1
	rol	ebp,		15
	add	ebp,		ebx
	; 27
	add	ebx,		eax
	mov	eax,		ecx
	sub	edx,		ebp
	and	eax,		ebp
	and	edx,		esi
	or	eax,		edx
	mov	edx,		[8+esp]
	rol	ecx,		10
	lea	ebx,		[1518500249+eax*1+ebx]
	mov	eax,		-1
	rol	ebx,		9
	add	ebx,		edi
	; 28
	add	edi,		edx
	mov	edx,		ebp
	sub	eax,		ebx
	and	edx,		ebx
	and	eax,		ecx
	or	edx,		eax
	mov	eax,		[56+esp]
	rol	ebp,		10
	lea	edi,		[1518500249+edx*1+edi]
	mov	edx,		-1
	rol	edi,		11
	add	edi,		esi
	; 29
	add	esi,		eax
	mov	eax,		ebx
	sub	edx,		edi
	and	eax,		edi
	and	edx,		ebp
	or	eax,		edx
	mov	edx,		[44+esp]
	rol	ebx,		10
	lea	esi,		[1518500249+eax*1+esi]
	mov	eax,		-1
	rol	esi,		7
	add	esi,		ecx
	; 30
	add	ecx,		edx
	mov	edx,		edi
	sub	eax,		esi
	and	edx,		esi
	and	eax,		ebx
	or	edx,		eax
	mov	eax,		[32+esp]
	rol	edi,		10
	lea	ecx,		[1518500249+edx*1+ecx]
	mov	edx,		-1
	rol	ecx,		13
	add	ecx,		ebp
	; 31
	add	ebp,		eax
	mov	eax,		esi
	sub	edx,		ecx
	and	eax,		ecx
	and	edx,		edi
	or	eax,		edx
	mov	edx,		-1
	rol	esi,		10
	lea	ebp,		[1518500249+eax*1+ebp]
	sub	edx,		ecx
	rol	ebp,		12
	add	ebp,		ebx
	; 32
	mov	eax,		[12+esp]
	or	edx,		ebp
	add	ebx,		eax
	xor	edx,		esi
	mov	eax,		-1
	rol	ecx,		10
	lea	ebx,		[1859775393+edx*1+ebx]
	sub	eax,		ebp
	rol	ebx,		11
	add	ebx,		edi
	; 33
	mov	edx,		[40+esp]
	or	eax,		ebx
	add	edi,		edx
	xor	eax,		ecx
	mov	edx,		-1
	rol	ebp,		10
	lea	edi,		[1859775393+eax*1+edi]
	sub	edx,		ebx
	rol	edi,		13
	add	edi,		esi
	; 34
	mov	eax,		[56+esp]
	or	edx,		edi
	add	esi,		eax
	xor	edx,		ebp
	mov	eax,		-1
	rol	ebx,		10
	lea	esi,		[1859775393+edx*1+esi]
	sub	eax,		edi
	rol	esi,		6
	add	esi,		ecx
	; 35
	mov	edx,		[16+esp]
	or	eax,		esi
	add	ecx,		edx
	xor	eax,		ebx
	mov	edx,		-1
	rol	edi,		10
	lea	ecx,		[1859775393+eax*1+ecx]
	sub	edx,		esi
	rol	ecx,		7
	add	ecx,		ebp
	; 36
	mov	eax,		[36+esp]
	or	edx,		ecx
	add	ebp,		eax
	xor	edx,		edi
	mov	eax,		-1
	rol	esi,		10
	lea	ebp,		[1859775393+edx*1+ebp]
	sub	eax,		ecx
	rol	ebp,		14
	add	ebp,		ebx
	; 37
	mov	edx,		[60+esp]
	or	eax,		ebp
	add	ebx,		edx
	xor	eax,		esi
	mov	edx,		-1
	rol	ecx,		10
	lea	ebx,		[1859775393+eax*1+ebx]
	sub	edx,		ebp
	rol	ebx,		9
	add	ebx,		edi
	; 38
	mov	eax,		[32+esp]
	or	edx,		ebx
	add	edi,		eax
	xor	edx,		ecx
	mov	eax,		-1
	rol	ebp,		10
	lea	edi,		[1859775393+edx*1+edi]
	sub	eax,		ebx
	rol	edi,		13
	add	edi,		esi
	; 39
	mov	edx,		[4+esp]
	or	eax,		edi
	add	esi,		edx
	xor	eax,		ebp
	mov	edx,		-1
	rol	ebx,		10
	lea	esi,		[1859775393+eax*1+esi]
	sub	edx,		edi
	rol	esi,		15
	add	esi,		ecx
	; 40
	mov	eax,		[8+esp]
	or	edx,		esi
	add	ecx,		eax
	xor	edx,		ebx
	mov	eax,		-1
	rol	edi,		10
	lea	ecx,		[1859775393+edx*1+ecx]
	sub	eax,		esi
	rol	ecx,		14
	add	ecx,		ebp
	; 41
	mov	edx,		[28+esp]
	or	eax,		ecx
	add	ebp,		edx
	xor	eax,		edi
	mov	edx,		-1
	rol	esi,		10
	lea	ebp,		[1859775393+eax*1+ebp]
	sub	edx,		ecx
	rol	ebp,		8
	add	ebp,		ebx
	; 42
	mov	eax,		[esp]
	or	edx,		ebp
	add	ebx,		eax
	xor	edx,		esi
	mov	eax,		-1
	rol	ecx,		10
	lea	ebx,		[1859775393+edx*1+ebx]
	sub	eax,		ebp
	rol	ebx,		13
	add	ebx,		edi
	; 43
	mov	edx,		[24+esp]
	or	eax,		ebx
	add	edi,		edx
	xor	eax,		ecx
	mov	edx,		-1
	rol	ebp,		10
	lea	edi,		[1859775393+eax*1+edi]
	sub	edx,		ebx
	rol	edi,		6
	add	edi,		esi
	; 44
	mov	eax,		[52+esp]
	or	edx,		edi
	add	esi,		eax
	xor	edx,		ebp
	mov	eax,		-1
	rol	ebx,		10
	lea	esi,		[1859775393+edx*1+esi]
	sub	eax,		edi
	rol	esi,		5
	add	esi,		ecx
	; 45
	mov	edx,		[44+esp]
	or	eax,		esi
	add	ecx,		edx
	xor	eax,		ebx
	mov	edx,		-1
	rol	edi,		10
	lea	ecx,		[1859775393+eax*1+ecx]
	sub	edx,		esi
	rol	ecx,		12
	add	ecx,		ebp
	; 46
	mov	eax,		[20+esp]
	or	edx,		ecx
	add	ebp,		eax
	xor	edx,		edi
	mov	eax,		-1
	rol	esi,		10
	lea	ebp,		[1859775393+edx*1+ebp]
	sub	eax,		ecx
	rol	ebp,		7
	add	ebp,		ebx
	; 47
	mov	edx,		[48+esp]
	or	eax,		ebp
	add	ebx,		edx
	xor	eax,		esi
	mov	edx,		-1
	rol	ecx,		10
	lea	ebx,		[1859775393+eax*1+ebx]
	mov	eax,		ecx
	rol	ebx,		5
	add	ebx,		edi
	; 48
	sub	edx,		ecx
	and	eax,		ebx
	and	edx,		ebp
	or	edx,		eax
	mov	eax,		[4+esp]
	rol	ebp,		10
	lea	edi,		[2400959708+edx+edi]
	mov	edx,		-1
	add	edi,		eax
	mov	eax,		ebp
	rol	edi,		11
	add	edi,		esi
	; 49
	sub	edx,		ebp
	and	eax,		edi
	and	edx,		ebx
	or	edx,		eax
	mov	eax,		[36+esp]
	rol	ebx,		10
	lea	esi,		[2400959708+edx+esi]
	mov	edx,		-1
	add	esi,		eax
	mov	eax,		ebx
	rol	esi,		12
	add	esi,		ecx
	; 50
	sub	edx,		ebx
	and	eax,		esi
	and	edx,		edi
	or	edx,		eax
	mov	eax,		[44+esp]
	rol	edi,		10
	lea	ecx,		[2400959708+edx+ecx]
	mov	edx,		-1
	add	ecx,		eax
	mov	eax,		edi
	rol	ecx,		14
	add	ecx,		ebp
	; 51
	sub	edx,		edi
	and	eax,		ecx
	and	edx,		esi
	or	edx,		eax
	mov	eax,		[40+esp]
	rol	esi,		10
	lea	ebp,		[2400959708+edx+ebp]
	mov	edx,		-1
	add	ebp,		eax
	mov	eax,		esi
	rol	ebp,		15
	add	ebp,		ebx
	; 52
	sub	edx,		esi
	and	eax,		ebp