bn-win32.asm

cryptlib安全工具包

	jmp	$L020pw_end
$L041pw_nc_loop:
	mov	ecx,		DWORD PTR [esi]
	mov	DWORD PTR [ebx],ecx
$L026pw_nc0:
	mov	ecx,		DWORD PTR 4[esi]
	mov	DWORD PTR 4[ebx],ecx
$L027pw_nc1:
	mov	ecx,		DWORD PTR 8[esi]
	mov	DWORD PTR 8[ebx],ecx
$L028pw_nc2:
	mov	ecx,		DWORD PTR 12[esi]
	mov	DWORD PTR 12[ebx],ecx
$L029pw_nc3:
	mov	ecx,		DWORD PTR 16[esi]
	mov	DWORD PTR 16[ebx],ecx
$L030pw_nc4:
	mov	ecx,		DWORD PTR 20[esi]
	mov	DWORD PTR 20[ebx],ecx
$L031pw_nc5:
	mov	ecx,		DWORD PTR 24[esi]
	mov	DWORD PTR 24[ebx],ecx
$L032pw_nc6:
	mov	ecx,		DWORD PTR 28[esi]
	mov	DWORD PTR 28[ebx],ecx
$L033pw_nc7:
	;
	add	esi,		32
	add	ebx,		32
	sub	ebp,		8
	jnz	$L041pw_nc_loop
	mov	ebp,		DWORD PTR 36[esp]
	and	ebp,		7
	jz	$L042pw_nc_end
	mov	ecx,		DWORD PTR [esi]
	mov	DWORD PTR [ebx],ecx
$L034pw_tail_nc0:
	dec	ebp
	jz	$L042pw_nc_end
	mov	ecx,		DWORD PTR 4[esi]
	mov	DWORD PTR 4[ebx],ecx
$L035pw_tail_nc1:
	dec	ebp
	jz	$L042pw_nc_end
	mov	ecx,		DWORD PTR 8[esi]
	mov	DWORD PTR 8[ebx],ecx
$L036pw_tail_nc2:
	dec	ebp
	jz	$L042pw_nc_end
	mov	ecx,		DWORD PTR 12[esi]
	mov	DWORD PTR 12[ebx],ecx
$L037pw_tail_nc3:
	dec	ebp
	jz	$L042pw_nc_end
	mov	ecx,		DWORD PTR 16[esi]
	mov	DWORD PTR 16[ebx],ecx
$L038pw_tail_nc4:
	dec	ebp
	jz	$L042pw_nc_end
	mov	ecx,		DWORD PTR 20[esi]
	mov	DWORD PTR 20[ebx],ecx
$L039pw_tail_nc5:
	dec	ebp
	jz	$L042pw_nc_end
	mov	ecx,		DWORD PTR 24[esi]
	mov	DWORD PTR 24[ebx],ecx
$L040pw_tail_nc6:
$L042pw_nc_end:
	mov	eax,		0
$L020pw_end:
	pop	edi
	pop	esi
	pop	ebx
	pop	ebp
	ret
_bn_sub_part_words ENDP
_TEXT$	ENDS

	; Don't even think of reading this code
	; It was automatically generated by co-586.pl
	; Which is a perl program used to generate the x86 assember for
	; any of ELF, a.out, COFF, Win32, ...
	; eric <[e-mail]>
	;
_TEXT$	SEGMENT	PAGE 'CODE'
PUBLIC	_bn_mul_comba8

_bn_mul_comba8 PROC NEAR
	push	esi
	mov	esi,		DWORD PTR 12[esp]
	push	edi
	mov	edi,		DWORD PTR 20[esp]
	push	ebp
	push	ebx
	xor	ebx,		ebx
	mov	eax,		DWORD PTR [esi]
	xor	ecx,		ecx
	mov	edx,		DWORD PTR [edi]
	; ################## Calculate word 0
	xor	ebp,		ebp
	; mul a[0]*b[0]
	mul	edx
	add	ebx,		eax
	mov	eax,		DWORD PTR 20[esp]
	adc	ecx,		edx
	mov	edx,		DWORD PTR [edi]
	adc	ebp,		0
	mov	DWORD PTR [eax],ebx
	mov	eax,		DWORD PTR 4[esi]
	; saved r[0]
	; ################## Calculate word 1
	xor	ebx,		ebx
	; mul a[1]*b[0]
	mul	edx
	add	ecx,		eax
	mov	eax,		DWORD PTR [esi]
	adc	ebp,		edx
	mov	edx,		DWORD PTR 4[edi]
	adc	ebx,		0
	; mul a[0]*b[1]
	mul	edx
	add	ecx,		eax
	mov	eax,		DWORD PTR 20[esp]
	adc	ebp,		edx
	mov	edx,		DWORD PTR [edi]
	adc	ebx,		0
	mov	DWORD PTR 4[eax],ecx
	mov	eax,		DWORD PTR 8[esi]
	; saved r[1]
	; ################## Calculate word 2
	xor	ecx,		ecx
	; mul a[2]*b[0]
	mul	edx
	add	ebp,		eax
	mov	eax,		DWORD PTR 4[esi]
	adc	ebx,		edx
	mov	edx,		DWORD PTR 4[edi]
	adc	ecx,		0
	; mul a[1]*b[1]
	mul	edx
	add	ebp,		eax
	mov	eax,		DWORD PTR [esi]
	adc	ebx,		edx
	mov	edx,		DWORD PTR 8[edi]
	adc	ecx,		0
	; mul a[0]*b[2]
	mul	edx
	add	ebp,		eax
	mov	eax,		DWORD PTR 20[esp]
	adc	ebx,		edx
	mov	edx,		DWORD PTR [edi]
	adc	ecx,		0
	mov	DWORD PTR 8[eax],ebp
	mov	eax,		DWORD PTR 12[esi]
	; saved r[2]
	; ################## Calculate word 3
	xor	ebp,		ebp
	; mul a[3]*b[0]
	mul	edx
	add	ebx,		eax
	mov	eax,		DWORD PTR 8[esi]
	adc	ecx,		edx
	mov	edx,		DWORD PTR 4[edi]
	adc	ebp,		0
	; mul a[2]*b[1]
	mul	edx
	add	ebx,		eax
	mov	eax,		DWORD PTR 4[esi]
	adc	ecx,		edx
	mov	edx,		DWORD PTR 8[edi]
	adc	ebp,		0
	; mul a[1]*b[2]
	mul	edx
	add	ebx,		eax
	mov	eax,		DWORD PTR [esi]
	adc	ecx,		edx
	mov	edx,		DWORD PTR 12[edi]
	adc	ebp,		0
	; mul a[0]*b[3]
	mul	edx
	add	ebx,		eax
	mov	eax,		DWORD PTR 20[esp]
	adc	ecx,		edx
	mov	edx,		DWORD PTR [edi]
	adc	ebp,		0
	mov	DWORD PTR 12[eax],ebx
	mov	eax,		DWORD PTR 16[esi]
	; saved r[3]
	; ################## Calculate word 4
	xor	ebx,		ebx
	; mul a[4]*b[0]
	mul	edx
	add	ecx,		eax
	mov	eax,		DWORD PTR 12[esi]
	adc	ebp,		edx
	mov	edx,		DWORD PTR 4[edi]
	adc	ebx,		0
	; mul a[3]*b[1]
	mul	edx
	add	ecx,		eax
	mov	eax,		DWORD PTR 8[esi]
	adc	ebp,		edx
	mov	edx,		DWORD PTR 8[edi]
	adc	ebx,		0
	; mul a[2]*b[2]
	mul	edx
	add	ecx,		eax
	mov	eax,		DWORD PTR 4[esi]
	adc	ebp,		edx
	mov	edx,		DWORD PTR 12[edi]
	adc	ebx,		0
	; mul a[1]*b[3]
	mul	edx
	add	ecx,		eax
	mov	eax,		DWORD PTR [esi]
	adc	ebp,		edx
	mov	edx,		DWORD PTR 16[edi]
	adc	ebx,		0
	; mul a[0]*b[4]
	mul	edx
	add	ecx,		eax
	mov	eax,		DWORD PTR 20[esp]
	adc	ebp,		edx
	mov	edx,		DWORD PTR [edi]
	adc	ebx,		0
	mov	DWORD PTR 16[eax],ecx
	mov	eax,		DWORD PTR 20[esi]
	; saved r[4]
	; ################## Calculate word 5
	xor	ecx,		ecx
	; mul a[5]*b[0]
	mul	edx
	add	ebp,		eax
	mov	eax,		DWORD PTR 16[esi]
	adc	ebx,		edx
	mov	edx,		DWORD PTR 4[edi]
	adc	ecx,		0
	; mul a[4]*b[1]
	mul	edx
	add	ebp,		eax
	mov	eax,		DWORD PTR 12[esi]
	adc	ebx,		edx
	mov	edx,		DWORD PTR 8[edi]
	adc	ecx,		0
	; mul a[3]*b[2]
	mul	edx
	add	ebp,		eax
	mov	eax,		DWORD PTR 8[esi]
	adc	ebx,		edx
	mov	edx,		DWORD PTR 12[edi]
	adc	ecx,		0
	; mul a[2]*b[3]
	mul	edx
	add	ebp,		eax
	mov	eax,		DWORD PTR 4[esi]
	adc	ebx,		edx
	mov	edx,		DWORD PTR 16[edi]
	adc	ecx,		0
	; mul a[1]*b[4]
	mul	edx
	add	ebp,		eax
	mov	eax,		DWORD PTR [esi]
	adc	ebx,		edx
	mov	edx,		DWORD PTR 20[edi]
	adc	ecx,		0
	; mul a[0]*b[5]
	mul	edx
	add	ebp,		eax
	mov	eax,		DWORD PTR 20[esp]
	adc	ebx,		edx
	mov	edx,		DWORD PTR [edi]
	adc	ecx,		0
	mov	DWORD PTR 20[eax],ebp
	mov	eax,		DWORD PTR 24[esi]
	; saved r[5]
	; ################## Calculate word 6
	xor	ebp,		ebp
	; mul a[6]*b[0]
	mul	edx
	add	ebx,		eax
	mov	eax,		DWORD PTR 20[esi]
	adc	ecx,		edx
	mov	edx,		DWORD PTR 4[edi]
	adc	ebp,		0
	; mul a[5]*b[1]
	mul	edx
	add	ebx,		eax
	mov	eax,		DWORD PTR 16[esi]
	adc	ecx,		edx
	mov	edx,		DWORD PTR 8[edi]
	adc	ebp,		0
	; mul a[4]*b[2]
	mul	edx
	add	ebx,		eax
	mov	eax,		DWORD PTR 12[esi]
	adc	ecx,		edx
	mov	edx,		DWORD PTR 12[edi]
	adc	ebp,		0
	; mul a[3]*b[3]
	mul	edx
	add	ebx,		eax
	mov	eax,		DWORD PTR 8[esi]
	adc	ecx,		edx
	mov	edx,		DWORD PTR 16[edi]
	adc	ebp,		0
	; mul a[2]*b[4]
	mul	edx
	add	ebx,		eax
	mov	eax,		DWORD PTR 4[esi]
	adc	ecx,		edx
	mov	edx,		DWORD PTR 20[edi]
	adc	ebp,		0
	; mul a[1]*b[5]
	mul	edx
	add	ebx,		eax
	mov	eax,		DWORD PTR [esi]
	adc	ecx,		edx
	mov	edx,		DWORD PTR 24[edi]
	adc	ebp,		0
	; mul a[0]*b[6]
	mul	edx
	add	ebx,		eax
	mov	eax,		DWORD PTR 20[esp]
	adc	ecx,		edx
	mov	edx,		DWORD PTR [edi]
	adc	ebp,		0
	mov	DWORD PTR 24[eax],ebx
	mov	eax,		DWORD PTR 28[esi]
	; saved r[6]
	; ################## Calculate word 7
	xor	ebx,		ebx
	; mul a[7]*b[0]
	mul	edx
	add	ecx,		eax
	mov	eax,		DWORD PTR 24[esi]
	adc	ebp,		edx
	mov	edx,		DWORD PTR 4[edi]
	adc	ebx,		0
	; mul a[6]*b[1]
	mul	edx
	add	ecx,		eax
	mov	eax,		DWORD PTR 20[esi]
	adc	ebp,		edx
	mov	edx,		DWORD PTR 8[edi]
	adc	ebx,		0
	; mul a[5]*b[2]
	mul	edx
	add	ecx,		eax
	mov	eax,		DWORD PTR 16[esi]
	adc	ebp,		edx
	mov	edx,		DWORD PTR 12[edi]
	adc	ebx,		0
	; mul a[4]*b[3]
	mul	edx
	add	ecx,		eax
	mov	eax,		DWORD PTR 12[esi]
	adc	ebp,		edx
	mov	edx,		DWORD PTR 16[edi]
	adc	ebx,		0
	; mul a[3]*b[4]
	mul	edx
	add	ecx,		eax
	mov	eax,		DWORD PTR 8[esi]
	adc	ebp,		edx
	mov	edx,		DWORD PTR 20[edi]
	adc	ebx,		0
	; mul a[2]*b[5]
	mul	edx
	add	ecx,		eax
	mov	eax,		DWORD PTR 4[esi]
	adc	ebp,		edx
	mov	edx,		DWORD PTR 24[edi]
	adc	ebx,		0
	; mul a[1]*b[6]
	mul	edx
	add	ecx,		eax
	mov	eax,		DWORD PTR [esi]
	adc	ebp,		edx
	mov	edx,		DWORD PTR 28[edi]
	adc	ebx,		0
	; mul a[0]*b[7]
	mul	edx
	add	ecx,		eax
	mov	eax,		DWORD PTR 20[esp]
	adc	ebp,		edx
	mov	edx,		DWORD PTR 4[edi]
	adc	ebx,		0
	mov	DWORD PTR 28[eax],ecx
	mov	eax,		DWORD PTR 28[esi]
	; saved r[7]
	; ################## Calculate word 8
	xor	ecx,		ecx
	; mul a[7]*b[1]
	mul	edx
	add	ebp,		eax
	mov	eax,		DWORD PTR 24[esi]
	adc	ebx,		edx
	mov	edx,		DWORD PTR 8[edi]
	adc	ecx,		0
	; mul a[6]*b[2]
	mul	edx
	add	ebp,		eax
	mov	eax,		DWORD PTR 20[esi]
	adc	ebx,		edx
	mov	edx,		DWORD PTR 12[edi]
	adc	ecx,		0
	; mul a[5]*b[3]
	mul	edx
	add	ebp,		eax
	mov	eax,		DWORD PTR 16[esi]
	adc	ebx,		edx
	mov	edx,		DWORD PTR 16[edi]
	adc	ecx,		0
	; mul a[4]*b[4]
	mul	edx
	add	ebp,		eax
	mov	eax,		DWORD PTR 12[esi]
	adc	ebx,		edx
	mov	edx,		DWORD PTR 20[edi]
	adc	ecx,		0
	; mul a[3]*b[5]
	mul	edx
	add	ebp,		eax
	mov	eax,		DWORD PTR 8[esi]
	adc	ebx,		edx
	mov	edx,		DWORD PTR 24[edi]
	adc	ecx,		0
	; mul a[2]*b[6]
	mul	edx
	add	ebp,		eax
	mov	eax,		DWORD PTR 4[esi]
	adc	ebx,		edx
	mov	edx,		DWORD PTR 28[edi]
	adc	ecx,		0
	; mul a[1]*b[7]
	mul	edx
	add	ebp,		eax
	mov	eax,		DWORD PTR 20[esp]
	adc	ebx,		edx
	mov	edx,		DWORD PTR 8[edi]
	adc	ecx,		0
	mov	DWORD PTR 32[eax],ebp
	mov	eax,		DWORD PTR 28[esi]
	; saved r[8]
	; ################## Calculate word 9
	xor	ebp,		ebp
	; mul a[7]*b[2]
	mul	edx
	add	ebx,		eax
	mov	eax,		DWORD PTR 24[esi]
	adc	ecx,		edx
	mov	edx,		DWORD PTR 12[edi]
	adc	ebp,		0
	; mul a[6]*b[3]
	mul	edx
	add	ebx,		eax
	mov	eax,		DWORD PTR 20[esi]
	adc	ecx,		edx
	mov	edx,		DWORD PTR 16[edi]
	adc	ebp,		0
	; mul a[5]*b[4]
	mul	edx
	add	ebx,		eax
	mov	eax,		DWORD PTR 16[esi]
	adc	ecx,		edx
	mov	edx,		DWORD PTR 20[edi]
	adc	ebp,		0
	; mul a[4]*b[5]
	mul	edx
	add	ebx,		eax
	mov	eax,		DWORD PTR 12[esi]
	adc	ecx,		edx
	mov	edx,		DWORD PTR 24[edi]
	adc	ebp,		0
	; mul a[3]*b[6]
	mul	edx
	add	ebx,		eax
	mov	eax,		DWORD PTR 8[esi]
	adc	ecx,		edx
	mov	edx,		DWORD PTR 28[edi]
	adc	ebp,		0
	; mul a[2]*b[7]
	mul	edx
	add	ebx,		eax
	mov	eax,		DWORD PTR 20[esp]
	adc	ecx,		edx
	mov	edx,		DWORD PTR 12[edi]
	adc	ebp,		0
	mov	DWORD PTR 36[eax],ebx
	mov	eax,		DWORD PTR 28[esi]
	; saved r[9]
	; ################## Calculate word 10
	xor	ebx,		ebx
	; mul a[7]*b[3]
	mul	edx
	add	ecx,		eax
	mov	eax,		DWORD PTR 24[esi]
	adc	ebp,		edx
	mov	edx,		DWORD PTR 16[edi]
	adc	ebx,		0
	; mul a[6]*b[4]
	mul	edx
	add	ecx,		eax
	mov	eax,		DWORD PTR 20[esi]
	adc	ebp,		edx
	mov	edx,		DWORD PTR 20[edi]
	adc	ebx,		0
	; mul a[5]*b[5]
	mul	edx
	add	ecx,		eax
	mov	eax,		DWORD PTR 16[esi]
	adc	ebp,		edx
	mov	edx,		DWORD PTR 24[edi]
	adc	ebx,		0
	; mul a[4]*b[6]
	mul	edx
	add	ecx,		eax
	mov	eax,		DWORD PTR 12[esi]
	adc	ebp,		edx
	mov	edx,		DWORD PTR 28[edi]
	adc	ebx,		0
	; mul a[3]*b[7]
	mul	edx
	add	ecx,		eax
	mov	eax,		DWORD PTR 20[esp]
	adc	ebp,		edx
	mov	edx,		DWORD PTR 16[edi]
	adc	ebx,		0
	mov	DWORD PTR 40[eax],ecx
	mov	eax,		DWORD PTR 28[esi]
	; saved r[10]
	; ################## Calculate word 11
	xor	ecx,		ecx
	; mul a[7]*b[4]
	mul	edx
	add	ebp,		eax
	mov	eax,		DWORD PTR 24[esi]
	adc	ebx,		edx
	mov	edx,		DWORD PTR 20[edi]
	adc	ecx,		0
	; mul a[6]*b[5]
	mul	edx
	add	ebp,		eax
	mov	eax,		DWORD PTR 20[esi]
	adc	ebx,		edx
	mov	edx,		DWORD PTR 24[edi]
	adc	ecx,		0
	; mul a[5]*b[6]
	mul	edx
	add	ebp,		eax
	mov	eax,		DWORD PTR 16[esi]
	adc	ebx,		edx
	mov	edx,		DWORD PTR 28[edi]
	adc	ecx,		0
	; mul a[4]*b[7]
	mul	edx
	add	ebp,		eax
	mov	eax,		DWORD PTR 20[esp]
	adc	ebx,		edx
	mov	edx,		DWORD PTR 20[edi]
	adc	ecx,		0
	mov	DWORD PTR 44[eax],ebp
	mov	eax,		DWORD PTR 28[esi]
	; saved r[11]
	; ################## Calculate word 12
	xor	ebp,		ebp
	; mul a[7]*b[5]
	mul	edx
	add	ebx,		eax
	mov	eax,		DWORD PTR 24[esi]
	adc	ecx,		edx
	mov	edx,		DWORD PTR 24[edi]
	adc	ebp,		0
	; mul a[6]*b[6]
	mul	edx
	add	ebx,		eax
	mov	eax,		DWORD PTR 20[esi]
	adc	ecx,		edx
	mov	edx,		DWORD PTR 28[edi]
	adc	ebp,		0
	; mul a[5]*b[7]
	mul	edx
	add	ebx,		eax
	mov	eax,		DWORD PTR 20[esp]
	adc	ecx,		edx
	mov	edx,		DWORD PTR 24[edi]
	adc	ebp,		0
	mov	DWORD PTR 48[eax],ebx
	mov	eax,		DWORD PTR 28[esi]
	; saved r[12]
	; ################## Calculate word 13
	xor	ebx,		ebx
	; mul a[7]*b[6]
	mul	edx
	add	ecx,		eax
	mov	eax,		DWORD PTR 24[esi]
	adc	ebp,		edx
	mov	edx,		DWORD PTR 28[edi]
	adc	ebx,		0
	; mul a[6]*b[7]
	mul	edx
	add	ecx,		eax
	mov	eax,		DWORD PTR 20[esp]
	adc	ebp,		edx
	mov	edx,		DWORD PTR 28[edi]
	adc	ebx,		0
	mov	DWORD PTR 52[eax],ecx
	mov	eax,		DWORD PTR 28[esi]
	; saved r[13]
	; ################## Calculate word 14
	xor	ecx,		ecx
	; mul a[7]*b[7]
	mul	edx
	add	ebp,		eax
	mov	eax,		DWORD PTR 20[esp]
	adc	ebx,		edx
	adc	ecx,		0
	mov	DWORD PTR 56[eax],ebp
	; saved r[14]
	; save r[15]
	mov	DWORD PTR 60[eax],ebx
	pop	ebx
	pop	ebp
	pop	edi
	pop	esi
	ret
_bn_mul_comba8 ENDP
_TEXT$	ENDS
_TEXT$	SEGMENT	PAGE 'CODE'
PUBLIC	_bn_mul_comba4

_bn_mul_comba4 PROC NEAR
	push	esi
	mov	esi,		DWORD PTR 12[esp]
	push	edi
	mov	edi,		DWORD PTR 20[esp]
	push	ebp
	push	ebx
	xor	ebx,		ebx
	mov	eax,		DWORD PTR [esi]
	xor	ecx,		ecx
	mov	edx,		DWORD PTR [edi]
	; ################## Calculate word 0
	xor	ebp,		ebp
	; mul a[0]*b[0]
	mul	edx
	add	ebx,		eax
	mov	eax,		DWORD PTR 20[esp]
	adc	ecx,		edx
	mov	edx,		DWORD PTR [edi]
	adc	ebp,		0
	mov	DWORD PTR [eax],ebx
	mov	eax,		DWORD PTR 4[esi]
	; saved r[0]
	; ################## Calculate word 1
	xor	ebx,		ebx
	; mul a[1]*b[0]
	mul	edx
	add	ecx,		eax
	mov	eax,		DWORD PTR [esi]
	adc	ebp,		edx
	mov	edx,		DWORD PTR 4[edi]
	adc	ebx,		0
	; mul a[0]*b[1]
	mul	edx
	add	ecx,		eax
	mov	eax,		DWORD PTR 20[esp]
	adc	ebp,		edx
	mov	edx,		DWORD PTR [edi]