|
|
|
TITLE rc4-586.asm
|
|
|
|
IF @Version LT 800
|
|
|
|
ECHO MASM version 8.00 or later is strongly recommended.
|
|
|
|
ENDIF
|
|
|
|
.586
|
|
|
|
.MODEL FLAT
|
|
|
|
OPTION DOTNAME
|
|
|
|
IF @Version LT 800
|
|
|
|
.text$ SEGMENT PAGE 'CODE'
|
|
|
|
ELSE
|
|
|
|
.text$ SEGMENT ALIGN(64) 'CODE'
|
|
|
|
ENDIF
|
|
|
|
ALIGN 16
|
|
|
|
_RC4 PROC PUBLIC
|
|
|
|
$L_RC4_begin::
|
|
|
|
push ebp
|
|
|
|
push ebx
|
|
|
|
push esi
|
|
|
|
push edi
|
|
|
|
mov edi,DWORD PTR 20[esp]
|
|
|
|
mov edx,DWORD PTR 24[esp]
|
|
|
|
mov esi,DWORD PTR 28[esp]
|
|
|
|
mov ebp,DWORD PTR 32[esp]
|
|
|
|
xor eax,eax
|
|
|
|
xor ebx,ebx
|
|
|
|
cmp edx,0
|
|
|
|
je $L000abort
|
|
|
|
mov al,BYTE PTR [edi]
|
|
|
|
mov bl,BYTE PTR 4[edi]
|
|
|
|
add edi,8
|
|
|
|
lea ecx,DWORD PTR [edx*1+esi]
|
|
|
|
sub ebp,esi
|
|
|
|
mov DWORD PTR 24[esp],ecx
|
|
|
|
inc al
|
|
|
|
cmp DWORD PTR 256[edi],-1
|
|
|
|
je $L001RC4_CHAR
|
|
|
|
mov ecx,DWORD PTR [eax*4+edi]
|
|
|
|
and edx,-4
|
|
|
|
jz $L002loop1
|
|
|
|
lea edx,DWORD PTR [edx*1+esi-4]
|
|
|
|
mov DWORD PTR 28[esp],edx
|
|
|
|
mov DWORD PTR 32[esp],ebp
|
|
|
|
ALIGN 16
|
|
|
|
$L003loop4:
|
|
|
|
add bl,cl
|
|
|
|
mov edx,DWORD PTR [ebx*4+edi]
|
|
|
|
mov DWORD PTR [ebx*4+edi],ecx
|
|
|
|
mov DWORD PTR [eax*4+edi],edx
|
|
|
|
add edx,ecx
|
|
|
|
inc al
|
|
|
|
and edx,255
|
|
|
|
mov ecx,DWORD PTR [eax*4+edi]
|
|
|
|
mov ebp,DWORD PTR [edx*4+edi]
|
|
|
|
add bl,cl
|
|
|
|
mov edx,DWORD PTR [ebx*4+edi]
|
|
|
|
mov DWORD PTR [ebx*4+edi],ecx
|
|
|
|
mov DWORD PTR [eax*4+edi],edx
|
|
|
|
add edx,ecx
|
|
|
|
inc al
|
|
|
|
and edx,255
|
|
|
|
ror ebp,8
|
|
|
|
mov ecx,DWORD PTR [eax*4+edi]
|
|
|
|
or ebp,DWORD PTR [edx*4+edi]
|
|
|
|
add bl,cl
|
|
|
|
mov edx,DWORD PTR [ebx*4+edi]
|
|
|
|
mov DWORD PTR [ebx*4+edi],ecx
|
|
|
|
mov DWORD PTR [eax*4+edi],edx
|
|
|
|
add edx,ecx
|
|
|
|
inc al
|
|
|
|
and edx,255
|
|
|
|
ror ebp,8
|
|
|
|
mov ecx,DWORD PTR [eax*4+edi]
|
|
|
|
or ebp,DWORD PTR [edx*4+edi]
|
|
|
|
add bl,cl
|
|
|
|
mov edx,DWORD PTR [ebx*4+edi]
|
|
|
|
mov DWORD PTR [ebx*4+edi],ecx
|
|
|
|
mov DWORD PTR [eax*4+edi],edx
|
|
|
|
add edx,ecx
|
|
|
|
inc al
|
|
|
|
and edx,255
|
|
|
|
ror ebp,8
|
|
|
|
mov ecx,DWORD PTR 32[esp]
|
|
|
|
or ebp,DWORD PTR [edx*4+edi]
|
|
|
|
ror ebp,8
|
|
|
|
xor ebp,DWORD PTR [esi]
|
|
|
|
cmp esi,DWORD PTR 28[esp]
|
|
|
|
mov DWORD PTR [esi*1+ecx],ebp
|
|
|
|
lea esi,DWORD PTR 4[esi]
|
|
|
|
mov ecx,DWORD PTR [eax*4+edi]
|
|
|
|
jb $L003loop4
|
|
|
|
cmp esi,DWORD PTR 24[esp]
|
|
|
|
je $L004done
|
|
|
|
mov ebp,DWORD PTR 32[esp]
|
|
|
|
ALIGN 16
|
|
|
|
$L002loop1:
|
|
|
|
add bl,cl
|
|
|
|
mov edx,DWORD PTR [ebx*4+edi]
|
|
|
|
mov DWORD PTR [ebx*4+edi],ecx
|
|
|
|
mov DWORD PTR [eax*4+edi],edx
|
|
|
|
add edx,ecx
|
|
|
|
inc al
|
|
|
|
and edx,255
|
|
|
|
mov edx,DWORD PTR [edx*4+edi]
|
|
|
|
xor dl,BYTE PTR [esi]
|
|
|
|
lea esi,DWORD PTR 1[esi]
|
|
|
|
mov ecx,DWORD PTR [eax*4+edi]
|
|
|
|
cmp esi,DWORD PTR 24[esp]
|
|
|
|
mov BYTE PTR [esi*1+ebp-1],dl
|
|
|
|
jb $L002loop1
|
|
|
|
jmp $L004done
|
|
|
|
ALIGN 16
|
|
|
|
$L001RC4_CHAR:
|
|
|
|
movzx ecx,BYTE PTR [eax*1+edi]
|
|
|
|
$L005cloop1:
|
|
|
|
add bl,cl
|
|
|
|
movzx edx,BYTE PTR [ebx*1+edi]
|
|
|
|
mov BYTE PTR [ebx*1+edi],cl
|
|
|
|
mov BYTE PTR [eax*1+edi],dl
|
|
|
|
add dl,cl
|
|
|
|
movzx edx,BYTE PTR [edx*1+edi]
|
|
|
|
add al,1
|
|
|
|
xor dl,BYTE PTR [esi]
|
|
|
|
lea esi,DWORD PTR 1[esi]
|
|
|
|
movzx ecx,BYTE PTR [eax*1+edi]
|
|
|
|
cmp esi,DWORD PTR 24[esp]
|
|
|
|
mov BYTE PTR [esi*1+ebp-1],dl
|
|
|
|
jb $L005cloop1
|
|
|
|
$L004done:
|
|
|
|
dec al
|
|
|
|
mov BYTE PTR [edi-4],bl
|
|
|
|
mov BYTE PTR [edi-8],al
|
|
|
|
$L000abort:
|
|
|
|
pop edi
|
|
|
|
pop esi
|
|
|
|
pop ebx
|
|
|
|
pop ebp
|
|
|
|
ret
|
|
|
|
_RC4 ENDP
|
|
|
|
;EXTERN _OPENSSL_ia32cap_P:NEAR
|
|
|
|
ALIGN 16
|
|
|
|
_RC4_set_key PROC PUBLIC
|
|
|
|
$L_RC4_set_key_begin::
|
|
|
|
push ebp
|
|
|
|
push ebx
|
|
|
|
push esi
|
|
|
|
push edi
|
|
|
|
mov edi,DWORD PTR 20[esp]
|
|
|
|
mov ebp,DWORD PTR 24[esp]
|
|
|
|
mov esi,DWORD PTR 28[esp]
|
|
|
|
lea edx,DWORD PTR _OPENSSL_ia32cap_P
|
|
|
|
lea edi,DWORD PTR 8[edi]
|
|
|
|
lea esi,DWORD PTR [ebp*1+esi]
|
|
|
|
neg ebp
|
|
|
|
xor eax,eax
|
|
|
|
mov DWORD PTR [edi-4],ebp
|
|
|
|
bt DWORD PTR [edx],20
|
|
|
|
jc $L006c1stloop
|
|
|
|
ALIGN 16
|
|
|
|
$L007w1stloop:
|
|
|
|
mov DWORD PTR [eax*4+edi],eax
|
|
|
|
add al,1
|
|
|
|
jnc $L007w1stloop
|
|
|
|
xor ecx,ecx
|
|
|
|
xor edx,edx
|
|
|
|
ALIGN 16
|
|
|
|
$L008w2ndloop:
|
|
|
|
mov eax,DWORD PTR [ecx*4+edi]
|
|
|
|
add dl,BYTE PTR [ebp*1+esi]
|
|
|
|
add dl,al
|
|
|
|
add ebp,1
|
|
|
|
mov ebx,DWORD PTR [edx*4+edi]
|
|
|
|
jnz $L009wnowrap
|
|
|
|
mov ebp,DWORD PTR [edi-4]
|
|
|
|
$L009wnowrap:
|
|
|
|
mov DWORD PTR [edx*4+edi],eax
|
|
|
|
mov DWORD PTR [ecx*4+edi],ebx
|
|
|
|
add cl,1
|
|
|
|
jnc $L008w2ndloop
|
|
|
|
jmp $L010exit
|
|
|
|
ALIGN 16
|
|
|
|
$L006c1stloop:
|
|
|
|
mov BYTE PTR [eax*1+edi],al
|
|
|
|
add al,1
|
|
|
|
jnc $L006c1stloop
|
|
|
|
xor ecx,ecx
|
|
|
|
xor edx,edx
|
|
|
|
xor ebx,ebx
|
|
|
|
ALIGN 16
|
|
|
|
$L011c2ndloop:
|
|
|
|
mov al,BYTE PTR [ecx*1+edi]
|
|
|
|
add dl,BYTE PTR [ebp*1+esi]
|
|
|
|
add dl,al
|
|
|
|
add ebp,1
|
|
|
|
mov bl,BYTE PTR [edx*1+edi]
|
|
|
|
jnz $L012cnowrap
|
|
|
|
mov ebp,DWORD PTR [edi-4]
|
|
|
|
$L012cnowrap:
|
|
|
|
mov BYTE PTR [edx*1+edi],al
|
|
|
|
mov BYTE PTR [ecx*1+edi],bl
|
|
|
|
add cl,1
|
|
|
|
jnc $L011c2ndloop
|
|
|
|
mov DWORD PTR 256[edi],-1
|
|
|
|
$L010exit:
|
|
|
|
xor eax,eax
|
|
|
|
mov DWORD PTR [edi-8],eax
|
|
|
|
mov DWORD PTR [edi-4],eax
|
|
|
|
pop edi
|
|
|
|
pop esi
|
|
|
|
pop ebx
|
|
|
|
pop ebp
|
|
|
|
ret
|
|
|
|
_RC4_set_key ENDP
|
|
|
|
ALIGN 16
|
|
|
|
_RC4_options PROC PUBLIC
|
|
|
|
$L_RC4_options_begin::
|
|
|
|
call $L013pic_point
|
|
|
|
$L013pic_point:
|
|
|
|
pop eax
|
|
|
|
lea eax,DWORD PTR ($L014opts-$L013pic_point)[eax]
|
|
|
|
lea edx,DWORD PTR _OPENSSL_ia32cap_P
|
|
|
|
bt DWORD PTR [edx],20
|
|
|
|
jnc $L015skip
|
|
|
|
add eax,12
|
|
|
|
$L015skip:
|
|
|
|
ret
|
|
|
|
ALIGN 64
|
|
|
|
$L014opts:
|
|
|
|
DB 114,99,52,40,52,120,44,105,110,116,41,0
|
|
|
|
DB 114,99,52,40,49,120,44,99,104,97,114,41,0
|
|
|
|
DB 82,67,52,32,102,111,114,32,120,56,54,44,32,67,82,89
|
|
|
|
DB 80,84,79,71,65,77,83,32,98,121,32,60,97,112,112,114
|
|
|
|
DB 111,64,111,112,101,110,115,115,108,46,111,114,103,62,0
|
|
|
|
ALIGN 64
|
|
|
|
_RC4_options ENDP
|
|
|
|
.text$ ENDS
|
|
|
|
.bss SEGMENT 'BSS'
|
|
|
|
COMM _OPENSSL_ia32cap_P:DWORD
|
|
|
|
.bss ENDS
|
|
|
|
END
|