| ; Don't even think of reading this code |
| ; It was automatically generated by cast-586.pl |
| ; Which is a perl program used to generate the x86 assember for |
| ; any of elf, a.out, BSDI,Win32, or Solaris |
| ; eric <eay@cryptsoft.com> |
| ; |
| TITLE cast-586.asm |
| .486 |
| .model FLAT |
| _TEXT SEGMENT |
| PUBLIC _CAST_encrypt |
| EXTERN _CAST_S_table0:DWORD |
| EXTERN _CAST_S_table1:DWORD |
| EXTERN _CAST_S_table2:DWORD |
| EXTERN _CAST_S_table3:DWORD |
| |
| _CAST_encrypt PROC NEAR |
| ; |
| push ebp |
| push ebx |
| mov ebx, DWORD PTR 12[esp] |
| mov ebp, DWORD PTR 16[esp] |
| push esi |
| push edi |
| ; Load the 2 words |
| mov edi, DWORD PTR [ebx] |
| mov esi, DWORD PTR 4[ebx] |
| ; Get short key flag |
| mov eax, DWORD PTR 128[ebp] |
| push eax |
| xor eax, eax |
| ; round 0 |
| mov edx, DWORD PTR [ebp] |
| mov ecx, DWORD PTR 4[ebp] |
| add edx, esi |
| rol edx, cl |
| mov ebx, edx |
| xor ecx, ecx |
| mov cl, dh |
| and ebx, 255 |
| shr edx, 16 |
| xor eax, eax |
| mov al, dh |
| and edx, 255 |
| mov ecx, DWORD PTR _CAST_S_table0[ecx*4] |
| mov ebx, DWORD PTR _CAST_S_table1[ebx*4] |
| xor ecx, ebx |
| mov ebx, DWORD PTR _CAST_S_table2[eax*4] |
| sub ecx, ebx |
| mov ebx, DWORD PTR _CAST_S_table3[edx*4] |
| add ecx, ebx |
| xor edi, ecx |
| ; round 1 |
| mov edx, DWORD PTR 8[ebp] |
| mov ecx, DWORD PTR 12[ebp] |
| xor edx, edi |
| rol edx, cl |
| mov ebx, edx |
| xor ecx, ecx |
| mov cl, dh |
| and ebx, 255 |
| shr edx, 16 |
| xor eax, eax |
| mov al, dh |
| and edx, 255 |
| mov ecx, DWORD PTR _CAST_S_table0[ecx*4] |
| mov ebx, DWORD PTR _CAST_S_table1[ebx*4] |
| sub ecx, ebx |
| mov ebx, DWORD PTR _CAST_S_table2[eax*4] |
| add ecx, ebx |
| mov ebx, DWORD PTR _CAST_S_table3[edx*4] |
| xor ecx, ebx |
| xor esi, ecx |
| ; round 2 |
| mov edx, DWORD PTR 16[ebp] |
| mov ecx, DWORD PTR 20[ebp] |
| sub edx, esi |
| rol edx, cl |
| mov ebx, edx |
| xor ecx, ecx |
| mov cl, dh |
| and ebx, 255 |
| shr edx, 16 |
| xor eax, eax |
| mov al, dh |
| and edx, 255 |
| mov ecx, DWORD PTR _CAST_S_table0[ecx*4] |
| mov ebx, DWORD PTR _CAST_S_table1[ebx*4] |
| add ecx, ebx |
| mov ebx, DWORD PTR _CAST_S_table2[eax*4] |
| xor ecx, ebx |
| mov ebx, DWORD PTR _CAST_S_table3[edx*4] |
| sub ecx, ebx |
| xor edi, ecx |
| ; round 3 |
| mov edx, DWORD PTR 24[ebp] |
| mov ecx, DWORD PTR 28[ebp] |
| add edx, edi |
| rol edx, cl |
| mov ebx, edx |
| xor ecx, ecx |
| mov cl, dh |
| and ebx, 255 |
| shr edx, 16 |
| xor eax, eax |
| mov al, dh |
| and edx, 255 |
| mov ecx, DWORD PTR _CAST_S_table0[ecx*4] |
| mov ebx, DWORD PTR _CAST_S_table1[ebx*4] |
| xor ecx, ebx |
| mov ebx, DWORD PTR _CAST_S_table2[eax*4] |
| sub ecx, ebx |
| mov ebx, DWORD PTR _CAST_S_table3[edx*4] |
| add ecx, ebx |
| xor esi, ecx |
| ; round 4 |
| mov edx, DWORD PTR 32[ebp] |
| mov ecx, DWORD PTR 36[ebp] |
| xor edx, esi |
| rol edx, cl |
| mov ebx, edx |
| xor ecx, ecx |
| mov cl, dh |
| and ebx, 255 |
| shr edx, 16 |
| xor eax, eax |
| mov al, dh |
| and edx, 255 |
| mov ecx, DWORD PTR _CAST_S_table0[ecx*4] |
| mov ebx, DWORD PTR _CAST_S_table1[ebx*4] |
| sub ecx, ebx |
| mov ebx, DWORD PTR _CAST_S_table2[eax*4] |
| add ecx, ebx |
| mov ebx, DWORD PTR _CAST_S_table3[edx*4] |
| xor ecx, ebx |
| xor edi, ecx |
| ; round 5 |
| mov edx, DWORD PTR 40[ebp] |
| mov ecx, DWORD PTR 44[ebp] |
| sub edx, edi |
| rol edx, cl |
| mov ebx, edx |
| xor ecx, ecx |
| mov cl, dh |
| and ebx, 255 |
| shr edx, 16 |
| xor eax, eax |
| mov al, dh |
| and edx, 255 |
| mov ecx, DWORD PTR _CAST_S_table0[ecx*4] |
| mov ebx, DWORD PTR _CAST_S_table1[ebx*4] |
| add ecx, ebx |
| mov ebx, DWORD PTR _CAST_S_table2[eax*4] |
| xor ecx, ebx |
| mov ebx, DWORD PTR _CAST_S_table3[edx*4] |
| sub ecx, ebx |
| xor esi, ecx |
| ; round 6 |
| mov edx, DWORD PTR 48[ebp] |
| mov ecx, DWORD PTR 52[ebp] |
| add edx, esi |
| rol edx, cl |
| mov ebx, edx |
| xor ecx, ecx |
| mov cl, dh |
| and ebx, 255 |
| shr edx, 16 |
| xor eax, eax |
| mov al, dh |
| and edx, 255 |
| mov ecx, DWORD PTR _CAST_S_table0[ecx*4] |
| mov ebx, DWORD PTR _CAST_S_table1[ebx*4] |
| xor ecx, ebx |
| mov ebx, DWORD PTR _CAST_S_table2[eax*4] |
| sub ecx, ebx |
| mov ebx, DWORD PTR _CAST_S_table3[edx*4] |
| add ecx, ebx |
| xor edi, ecx |
| ; round 7 |
| mov edx, DWORD PTR 56[ebp] |
| mov ecx, DWORD PTR 60[ebp] |
| xor edx, edi |
| rol edx, cl |
| mov ebx, edx |
| xor ecx, ecx |
| mov cl, dh |
| and ebx, 255 |
| shr edx, 16 |
| xor eax, eax |
| mov al, dh |
| and edx, 255 |
| mov ecx, DWORD PTR _CAST_S_table0[ecx*4] |
| mov ebx, DWORD PTR _CAST_S_table1[ebx*4] |
| sub ecx, ebx |
| mov ebx, DWORD PTR _CAST_S_table2[eax*4] |
| add ecx, ebx |
| mov ebx, DWORD PTR _CAST_S_table3[edx*4] |
| xor ecx, ebx |
| xor esi, ecx |
| ; round 8 |
| mov edx, DWORD PTR 64[ebp] |
| mov ecx, DWORD PTR 68[ebp] |
| sub edx, esi |
| rol edx, cl |
| mov ebx, edx |
| xor ecx, ecx |
| mov cl, dh |
| and ebx, 255 |
| shr edx, 16 |
| xor eax, eax |
| mov al, dh |
| and edx, 255 |
| mov ecx, DWORD PTR _CAST_S_table0[ecx*4] |
| mov ebx, DWORD PTR _CAST_S_table1[ebx*4] |
| add ecx, ebx |
| mov ebx, DWORD PTR _CAST_S_table2[eax*4] |
| xor ecx, ebx |
| mov ebx, DWORD PTR _CAST_S_table3[edx*4] |
| sub ecx, ebx |
| xor edi, ecx |
| ; round 9 |
| mov edx, DWORD PTR 72[ebp] |
| mov ecx, DWORD PTR 76[ebp] |
| add edx, edi |
| rol edx, cl |
| mov ebx, edx |
| xor ecx, ecx |
| mov cl, dh |
| and ebx, 255 |
| shr edx, 16 |
| xor eax, eax |
| mov al, dh |
| and edx, 255 |
| mov ecx, DWORD PTR _CAST_S_table0[ecx*4] |
| mov ebx, DWORD PTR _CAST_S_table1[ebx*4] |
| xor ecx, ebx |
| mov ebx, DWORD PTR _CAST_S_table2[eax*4] |
| sub ecx, ebx |
| mov ebx, DWORD PTR _CAST_S_table3[edx*4] |
| add ecx, ebx |
| xor esi, ecx |
| ; round 10 |
| mov edx, DWORD PTR 80[ebp] |
| mov ecx, DWORD PTR 84[ebp] |
| xor edx, esi |
| rol edx, cl |
| mov ebx, edx |
| xor ecx, ecx |
| mov cl, dh |
| and ebx, 255 |
| shr edx, 16 |
| xor eax, eax |
| mov al, dh |
| and edx, 255 |
| mov ecx, DWORD PTR _CAST_S_table0[ecx*4] |
| mov ebx, DWORD PTR _CAST_S_table1[ebx*4] |
| sub ecx, ebx |
| mov ebx, DWORD PTR _CAST_S_table2[eax*4] |
| add ecx, ebx |
| mov ebx, DWORD PTR _CAST_S_table3[edx*4] |
| xor ecx, ebx |
| xor edi, ecx |
| ; round 11 |
| mov edx, DWORD PTR 88[ebp] |
| mov ecx, DWORD PTR 92[ebp] |
| sub edx, edi |
| rol edx, cl |
| mov ebx, edx |
| xor ecx, ecx |
| mov cl, dh |
| and ebx, 255 |
| shr edx, 16 |
| xor eax, eax |
| mov al, dh |
| and edx, 255 |
| mov ecx, DWORD PTR _CAST_S_table0[ecx*4] |
| mov ebx, DWORD PTR _CAST_S_table1[ebx*4] |
| add ecx, ebx |
| mov ebx, DWORD PTR _CAST_S_table2[eax*4] |
| xor ecx, ebx |
| mov ebx, DWORD PTR _CAST_S_table3[edx*4] |
| sub ecx, ebx |
| xor esi, ecx |
| ; test short key flag |
| pop edx |
| or edx, edx |
| jnz $L000cast_enc_done |
| ; round 12 |
| mov edx, DWORD PTR 96[ebp] |
| mov ecx, DWORD PTR 100[ebp] |
| add edx, esi |
| rol edx, cl |
| mov ebx, edx |
| xor ecx, ecx |
| mov cl, dh |
| and ebx, 255 |
| shr edx, 16 |
| xor eax, eax |
| mov al, dh |
| and edx, 255 |
| mov ecx, DWORD PTR _CAST_S_table0[ecx*4] |
| mov ebx, DWORD PTR _CAST_S_table1[ebx*4] |
| xor ecx, ebx |
| mov ebx, DWORD PTR _CAST_S_table2[eax*4] |
| sub ecx, ebx |
| mov ebx, DWORD PTR _CAST_S_table3[edx*4] |
| add ecx, ebx |
| xor edi, ecx |
| ; round 13 |
| mov edx, DWORD PTR 104[ebp] |
| mov ecx, DWORD PTR 108[ebp] |
| xor edx, edi |
| rol edx, cl |
| mov ebx, edx |
| xor ecx, ecx |
| mov cl, dh |
| and ebx, 255 |
| shr edx, 16 |
| xor eax, eax |
| mov al, dh |
| and edx, 255 |
| mov ecx, DWORD PTR _CAST_S_table0[ecx*4] |
| mov ebx, DWORD PTR _CAST_S_table1[ebx*4] |
| sub ecx, ebx |
| mov ebx, DWORD PTR _CAST_S_table2[eax*4] |
| add ecx, ebx |
| mov ebx, DWORD PTR _CAST_S_table3[edx*4] |
| xor ecx, ebx |
| xor esi, ecx |
| ; round 14 |
| mov edx, DWORD PTR 112[ebp] |
| mov ecx, DWORD PTR 116[ebp] |
| sub edx, esi |
| rol edx, cl |
| mov ebx, edx |
| xor ecx, ecx |
| mov cl, dh |
| and ebx, 255 |
| shr edx, 16 |
| xor eax, eax |
| mov al, dh |
| and edx, 255 |
| mov ecx, DWORD PTR _CAST_S_table0[ecx*4] |
| mov ebx, DWORD PTR _CAST_S_table1[ebx*4] |
| add ecx, ebx |
| mov ebx, DWORD PTR _CAST_S_table2[eax*4] |
| xor ecx, ebx |
| mov ebx, DWORD PTR _CAST_S_table3[edx*4] |
| sub ecx, ebx |
| xor edi, ecx |
| ; round 15 |
| mov edx, DWORD PTR 120[ebp] |
| mov ecx, DWORD PTR 124[ebp] |
| add edx, edi |
| rol edx, cl |
| mov ebx, edx |
| xor ecx, ecx |
| mov cl, dh |
| and ebx, 255 |
| shr edx, 16 |
| xor eax, eax |
| mov al, dh |
| and edx, 255 |
| mov ecx, DWORD PTR _CAST_S_table0[ecx*4] |
| mov ebx, DWORD PTR _CAST_S_table1[ebx*4] |
| xor ecx, ebx |
| mov ebx, DWORD PTR _CAST_S_table2[eax*4] |
| sub ecx, ebx |
| mov ebx, DWORD PTR _CAST_S_table3[edx*4] |
| add ecx, ebx |
| xor esi, ecx |
| $L000cast_enc_done: |
| nop |
| mov eax, DWORD PTR 20[esp] |
| mov DWORD PTR 4[eax],edi |
| mov DWORD PTR [eax],esi |
| pop edi |
| pop esi |
| pop ebx |
| pop ebp |
| ret |
| _CAST_encrypt ENDP |
| _TEXT ENDS |
| _TEXT SEGMENT |
| PUBLIC _CAST_decrypt |
| EXTERN _CAST_S_table0:DWORD |
| EXTERN _CAST_S_table1:DWORD |
| EXTERN _CAST_S_table2:DWORD |
| EXTERN _CAST_S_table3:DWORD |
| |
| _CAST_decrypt PROC NEAR |
| ; |
| push ebp |
| push ebx |
| mov ebx, DWORD PTR 12[esp] |
| mov ebp, DWORD PTR 16[esp] |
| push esi |
| push edi |
| ; Load the 2 words |
| mov edi, DWORD PTR [ebx] |
| mov esi, DWORD PTR 4[ebx] |
| ; Get short key flag |
| mov eax, DWORD PTR 128[ebp] |
| or eax, eax |
| jnz $L001cast_dec_skip |
| xor eax, eax |
| ; round 15 |
| mov edx, DWORD PTR 120[ebp] |
| mov ecx, DWORD PTR 124[ebp] |
| add edx, esi |
| rol edx, cl |
| mov ebx, edx |
| xor ecx, ecx |
| mov cl, dh |
| and ebx, 255 |
| shr edx, 16 |
| xor eax, eax |
| mov al, dh |
| and edx, 255 |
| mov ecx, DWORD PTR _CAST_S_table0[ecx*4] |
| mov ebx, DWORD PTR _CAST_S_table1[ebx*4] |
| xor ecx, ebx |
| mov ebx, DWORD PTR _CAST_S_table2[eax*4] |
| sub ecx, ebx |
| mov ebx, DWORD PTR _CAST_S_table3[edx*4] |
| add ecx, ebx |
| xor edi, ecx |
| ; round 14 |
| mov edx, DWORD PTR 112[ebp] |
| mov ecx, DWORD PTR 116[ebp] |
| sub edx, edi |
| rol edx, cl |
| mov ebx, edx |
| xor ecx, ecx |
| mov cl, dh |
| and ebx, 255 |
| shr edx, 16 |
| xor eax, eax |
| mov al, dh |
| and edx, 255 |
| mov ecx, DWORD PTR _CAST_S_table0[ecx*4] |
| mov ebx, DWORD PTR _CAST_S_table1[ebx*4] |
| add ecx, ebx |
| mov ebx, DWORD PTR _CAST_S_table2[eax*4] |
| xor ecx, ebx |
| mov ebx, DWORD PTR _CAST_S_table3[edx*4] |
| sub ecx, ebx |
| xor esi, ecx |
| ; round 13 |
| mov edx, DWORD PTR 104[ebp] |
| mov ecx, DWORD PTR 108[ebp] |
| xor edx, esi |
| rol edx, cl |
| mov ebx, edx |
| xor ecx, ecx |
| mov cl, dh |
| and ebx, 255 |
| shr edx, 16 |
| xor eax, eax |
| mov al, dh |
| and edx, 255 |
| mov ecx, DWORD PTR _CAST_S_table0[ecx*4] |
| mov ebx, DWORD PTR _CAST_S_table1[ebx*4] |
| sub ecx, ebx |
| mov ebx, DWORD PTR _CAST_S_table2[eax*4] |
| add ecx, ebx |
| mov ebx, DWORD PTR _CAST_S_table3[edx*4] |
| xor ecx, ebx |
| xor edi, ecx |
| ; round 12 |
| mov edx, DWORD PTR 96[ebp] |
| mov ecx, DWORD PTR 100[ebp] |
| add edx, edi |
| rol edx, cl |
| mov ebx, edx |
| xor ecx, ecx |
| mov cl, dh |
| and ebx, 255 |
| shr edx, 16 |
| xor eax, eax |
| mov al, dh |
| and edx, 255 |
| mov ecx, DWORD PTR _CAST_S_table0[ecx*4] |
| mov ebx, DWORD PTR _CAST_S_table1[ebx*4] |
| xor ecx, ebx |
| mov ebx, DWORD PTR _CAST_S_table2[eax*4] |
| sub ecx, ebx |
| mov ebx, DWORD PTR _CAST_S_table3[edx*4] |
| add ecx, ebx |
| xor esi, ecx |
| $L001cast_dec_skip: |
| ; round 11 |
| mov edx, DWORD PTR 88[ebp] |
| mov ecx, DWORD PTR 92[ebp] |
| sub edx, esi |
| rol edx, cl |
| mov ebx, edx |
| xor ecx, ecx |
| mov cl, dh |
| and ebx, 255 |
| shr edx, 16 |
| xor eax, eax |
| mov al, dh |
| and edx, 255 |
| mov ecx, DWORD PTR _CAST_S_table0[ecx*4] |
| mov ebx, DWORD PTR _CAST_S_table1[ebx*4] |
| add ecx, ebx |
| mov ebx, DWORD PTR _CAST_S_table2[eax*4] |
| xor ecx, ebx |
| mov ebx, DWORD PTR _CAST_S_table3[edx*4] |
| sub ecx, ebx |
| xor edi, ecx |
| ; round 10 |
| mov edx, DWORD PTR 80[ebp] |
| mov ecx, DWORD PTR 84[ebp] |
| xor edx, edi |
| rol edx, cl |
| mov ebx, edx |
| xor ecx, ecx |
| mov cl, dh |
| and ebx, 255 |
| shr edx, 16 |
| xor eax, eax |
| mov al, dh |
| and edx, 255 |
| mov ecx, DWORD PTR _CAST_S_table0[ecx*4] |
| mov ebx, DWORD PTR _CAST_S_table1[ebx*4] |
| sub ecx, ebx |
| mov ebx, DWORD PTR _CAST_S_table2[eax*4] |
| add ecx, ebx |
| mov ebx, DWORD PTR _CAST_S_table3[edx*4] |
| xor ecx, ebx |
| xor esi, ecx |
| ; round 9 |
| mov edx, DWORD PTR 72[ebp] |
| mov ecx, DWORD PTR 76[ebp] |
| add edx, esi |
| rol edx, cl |
| mov ebx, edx |
| xor ecx, ecx |
| mov cl, dh |
| and ebx, 255 |
| shr edx, 16 |
| xor eax, eax |
| mov al, dh |
| and edx, 255 |
| mov ecx, DWORD PTR _CAST_S_table0[ecx*4] |
| mov ebx, DWORD PTR _CAST_S_table1[ebx*4] |
| xor ecx, ebx |
| mov ebx, DWORD PTR _CAST_S_table2[eax*4] |
| sub ecx, ebx |
| mov ebx, DWORD PTR _CAST_S_table3[edx*4] |
| add ecx, ebx |
| xor edi, ecx |
| ; round 8 |
| mov edx, DWORD PTR 64[ebp] |
| mov ecx, DWORD PTR 68[ebp] |
| sub edx, edi |
| rol edx, cl |
| mov ebx, edx |
| xor ecx, ecx |
| mov cl, dh |
| and ebx, 255 |
| shr edx, 16 |
| xor eax, eax |
| mov al, dh |
| and edx, 255 |
| mov ecx, DWORD PTR _CAST_S_table0[ecx*4] |
| mov ebx, DWORD PTR _CAST_S_table1[ebx*4] |
| add ecx, ebx |
| mov ebx, DWORD PTR _CAST_S_table2[eax*4] |
| xor ecx, ebx |
| mov ebx, DWORD PTR _CAST_S_table3[edx*4] |
| sub ecx, ebx |
| xor esi, ecx |
| ; round 7 |
| mov edx, DWORD PTR 56[ebp] |
| mov ecx, DWORD PTR 60[ebp] |
| xor edx, esi |
| rol edx, cl |
| mov ebx, edx |
| xor ecx, ecx |
| mov cl, dh |
| and ebx, 255 |
| shr edx, 16 |
| xor eax, eax |
| mov al, dh |
| and edx, 255 |
| mov ecx, DWORD PTR _CAST_S_table0[ecx*4] |
| mov ebx, DWORD PTR _CAST_S_table1[ebx*4] |
| sub ecx, ebx |
| mov ebx, DWORD PTR _CAST_S_table2[eax*4] |
| add ecx, ebx |
| mov ebx, DWORD PTR _CAST_S_table3[edx*4] |
| xor ecx, ebx |
| xor edi, ecx |
| ; round 6 |
| mov edx, DWORD PTR 48[ebp] |
| mov ecx, DWORD PTR 52[ebp] |
| add edx, edi |
| rol edx, cl |
| mov ebx, edx |
| xor ecx, ecx |
| mov cl, dh |
| and ebx, 255 |
| shr edx, 16 |
| xor eax, eax |
| mov al, dh |
| and edx, 255 |
| mov ecx, DWORD PTR _CAST_S_table0[ecx*4] |
| mov ebx, DWORD PTR _CAST_S_table1[ebx*4] |
| xor ecx, ebx |
| mov ebx, DWORD PTR _CAST_S_table2[eax*4] |
| sub ecx, ebx |
| mov ebx, DWORD PTR _CAST_S_table3[edx*4] |
| add ecx, ebx |
| xor esi, ecx |
| ; round 5 |
| mov edx, DWORD PTR 40[ebp] |
| mov ecx, DWORD PTR 44[ebp] |
| sub edx, esi |
| rol edx, cl |
| mov ebx, edx |
| xor ecx, ecx |
| mov cl, dh |
| and ebx, 255 |
| shr edx, 16 |
| xor eax, eax |
| mov al, dh |
| and edx, 255 |
| mov ecx, DWORD PTR _CAST_S_table0[ecx*4] |
| mov ebx, DWORD PTR _CAST_S_table1[ebx*4] |
| add ecx, ebx |
| mov ebx, DWORD PTR _CAST_S_table2[eax*4] |
| xor ecx, ebx |
| mov ebx, DWORD PTR _CAST_S_table3[edx*4] |
| sub ecx, ebx |
| xor edi, ecx |
| ; round 4 |
| mov edx, DWORD PTR 32[ebp] |
| mov ecx, DWORD PTR 36[ebp] |
| xor edx, edi |
| rol edx, cl |
| mov ebx, edx |
| xor ecx, ecx |
| mov cl, dh |
| and ebx, 255 |
| shr edx, 16 |
| xor eax, eax |
| mov al, dh |
| and edx, 255 |
| mov ecx, DWORD PTR _CAST_S_table0[ecx*4] |
| mov ebx, DWORD PTR _CAST_S_table1[ebx*4] |
| sub ecx, ebx |
| mov ebx, DWORD PTR _CAST_S_table2[eax*4] |
| add ecx, ebx |
| mov ebx, DWORD PTR _CAST_S_table3[edx*4] |
| xor ecx, ebx |
| xor esi, ecx |
| ; round 3 |
| mov edx, DWORD PTR 24[ebp] |
| mov ecx, DWORD PTR 28[ebp] |
| add edx, esi |
| rol edx, cl |
| mov ebx, edx |
| xor ecx, ecx |
| mov cl, dh |
| and ebx, 255 |
| shr edx, 16 |
| xor eax, eax |
| mov al, dh |
| and edx, 255 |
| mov ecx, DWORD PTR _CAST_S_table0[ecx*4] |
| mov ebx, DWORD PTR _CAST_S_table1[ebx*4] |
| xor ecx, ebx |
| mov ebx, DWORD PTR _CAST_S_table2[eax*4] |
| sub ecx, ebx |
| mov ebx, DWORD PTR _CAST_S_table3[edx*4] |
| add ecx, ebx |
| xor edi, ecx |
| ; round 2 |
| mov edx, DWORD PTR 16[ebp] |
| mov ecx, DWORD PTR 20[ebp] |
| sub edx, edi |
| rol edx, cl |
| mov ebx, edx |
| xor ecx, ecx |
| mov cl, dh |
| and ebx, 255 |
| shr edx, 16 |
| xor eax, eax |
| mov al, dh |
| and edx, 255 |
| mov ecx, DWORD PTR _CAST_S_table0[ecx*4] |
| mov ebx, DWORD PTR _CAST_S_table1[ebx*4] |
| add ecx, ebx |
| mov ebx, DWORD PTR _CAST_S_table2[eax*4] |
| xor ecx, ebx |
| mov ebx, DWORD PTR _CAST_S_table3[edx*4] |
| sub ecx, ebx |
| xor esi, ecx |
| ; round 1 |
| mov edx, DWORD PTR 8[ebp] |
| mov ecx, DWORD PTR 12[ebp] |
| xor edx, esi |
| rol edx, cl |
| mov ebx, edx |
| xor ecx, ecx |
| mov cl, dh |
| and ebx, 255 |
| shr edx, 16 |
| xor eax, eax |
| mov al, dh |
| and edx, 255 |
| mov ecx, DWORD PTR _CAST_S_table0[ecx*4] |
| mov ebx, DWORD PTR _CAST_S_table1[ebx*4] |
| sub ecx, ebx |
| mov ebx, DWORD PTR _CAST_S_table2[eax*4] |
| add ecx, ebx |
| mov ebx, DWORD PTR _CAST_S_table3[edx*4] |
| xor ecx, ebx |
| xor edi, ecx |
| ; round 0 |
| mov edx, DWORD PTR [ebp] |
| mov ecx, DWORD PTR 4[ebp] |
| add edx, edi |
| rol edx, cl |
| mov ebx, edx |
| xor ecx, ecx |
| mov cl, dh |
| and ebx, 255 |
| shr edx, 16 |
| xor eax, eax |
| mov al, dh |
| and edx, 255 |
| mov ecx, DWORD PTR _CAST_S_table0[ecx*4] |
| mov ebx, DWORD PTR _CAST_S_table1[ebx*4] |
| xor ecx, ebx |
| mov ebx, DWORD PTR _CAST_S_table2[eax*4] |
| sub ecx, ebx |
| mov ebx, DWORD PTR _CAST_S_table3[edx*4] |
| add ecx, ebx |
| xor esi, ecx |
| nop |
| mov eax, DWORD PTR 20[esp] |
| mov DWORD PTR 4[eax],edi |
| mov DWORD PTR [eax],esi |
| pop edi |
| pop esi |
| pop ebx |
| pop ebp |
| ret |
| _CAST_decrypt ENDP |
| _TEXT ENDS |
| _TEXT SEGMENT |
| PUBLIC _CAST_cbc_encrypt |
| |
| _CAST_cbc_encrypt PROC NEAR |
| ; |
| push ebp |
| push ebx |
| push esi |
| push edi |
| mov ebp, DWORD PTR 28[esp] |
| ; getting iv ptr from parameter 4 |
| mov ebx, DWORD PTR 36[esp] |
| mov esi, DWORD PTR [ebx] |
| mov edi, DWORD PTR 4[ebx] |
| push edi |
| push esi |
| push edi |
| push esi |
| mov ebx, esp |
| mov esi, DWORD PTR 36[esp] |
| mov edi, DWORD PTR 40[esp] |
| ; getting encrypt flag from parameter 5 |
| mov ecx, DWORD PTR 56[esp] |
| ; get and push parameter 3 |
| mov eax, DWORD PTR 48[esp] |
| push eax |
| push ebx |
| cmp ecx, 0 |
| jz $L002decrypt |
| and ebp, 4294967288 |
| mov eax, DWORD PTR 8[esp] |
| mov ebx, DWORD PTR 12[esp] |
| jz $L003encrypt_finish |
| L004encrypt_loop: |
| mov ecx, DWORD PTR [esi] |
| mov edx, DWORD PTR 4[esi] |
| xor eax, ecx |
| xor ebx, edx |
| bswap eax |
| bswap ebx |
| mov DWORD PTR 8[esp],eax |
| mov DWORD PTR 12[esp],ebx |
| call _CAST_encrypt |
| mov eax, DWORD PTR 8[esp] |
| mov ebx, DWORD PTR 12[esp] |
| bswap eax |
| bswap ebx |
| mov DWORD PTR [edi],eax |
| mov DWORD PTR 4[edi],ebx |
| add esi, 8 |
| add edi, 8 |
| sub ebp, 8 |
| jnz L004encrypt_loop |
| $L003encrypt_finish: |
| mov ebp, DWORD PTR 52[esp] |
| and ebp, 7 |
| jz $L005finish |
| xor ecx, ecx |
| xor edx, edx |
| mov ebp, DWORD PTR $L006cbc_enc_jmp_table[ebp*4] |
| jmp ebp |
| L007ej7: |
| xor edx, edx |
| mov dh, BYTE PTR 6[esi] |
| shl edx, 8 |
| L008ej6: |
| mov dh, BYTE PTR 5[esi] |
| L009ej5: |
| mov dl, BYTE PTR 4[esi] |
| L010ej4: |
| mov ecx, DWORD PTR [esi] |
| jmp $L011ejend |
| L012ej3: |
| mov ch, BYTE PTR 2[esi] |
| xor ecx, ecx |
| shl ecx, 8 |
| L013ej2: |
| mov ch, BYTE PTR 1[esi] |
| L014ej1: |
| mov cl, BYTE PTR [esi] |
| $L011ejend: |
| xor eax, ecx |
| xor ebx, edx |
| bswap eax |
| bswap ebx |
| mov DWORD PTR 8[esp],eax |
| mov DWORD PTR 12[esp],ebx |
| call _CAST_encrypt |
| mov eax, DWORD PTR 8[esp] |
| mov ebx, DWORD PTR 12[esp] |
| bswap eax |
| bswap ebx |
| mov DWORD PTR [edi],eax |
| mov DWORD PTR 4[edi],ebx |
| jmp $L005finish |
| $L002decrypt: |
| and ebp, 4294967288 |
| mov eax, DWORD PTR 16[esp] |
| mov ebx, DWORD PTR 20[esp] |
| jz $L015decrypt_finish |
| L016decrypt_loop: |
| mov eax, DWORD PTR [esi] |
| mov ebx, DWORD PTR 4[esi] |
| bswap eax |
| bswap ebx |
| mov DWORD PTR 8[esp],eax |
| mov DWORD PTR 12[esp],ebx |
| call _CAST_decrypt |
| mov eax, DWORD PTR 8[esp] |
| mov ebx, DWORD PTR 12[esp] |
| bswap eax |
| bswap ebx |
| mov ecx, DWORD PTR 16[esp] |
| mov edx, DWORD PTR 20[esp] |
| xor ecx, eax |
| xor edx, ebx |
| mov eax, DWORD PTR [esi] |
| mov ebx, DWORD PTR 4[esi] |
| mov DWORD PTR [edi],ecx |
| mov DWORD PTR 4[edi],edx |
| mov DWORD PTR 16[esp],eax |
| mov DWORD PTR 20[esp],ebx |
| add esi, 8 |
| add edi, 8 |
| sub ebp, 8 |
| jnz L016decrypt_loop |
| $L015decrypt_finish: |
| mov ebp, DWORD PTR 52[esp] |
| and ebp, 7 |
| jz $L005finish |
| mov eax, DWORD PTR [esi] |
| mov ebx, DWORD PTR 4[esi] |
| bswap eax |
| bswap ebx |
| mov DWORD PTR 8[esp],eax |
| mov DWORD PTR 12[esp],ebx |
| call _CAST_decrypt |
| mov eax, DWORD PTR 8[esp] |
| mov ebx, DWORD PTR 12[esp] |
| bswap eax |
| bswap ebx |
| mov ecx, DWORD PTR 16[esp] |
| mov edx, DWORD PTR 20[esp] |
| xor ecx, eax |
| xor edx, ebx |
| mov eax, DWORD PTR [esi] |
| mov ebx, DWORD PTR 4[esi] |
| L017dj7: |
| ror edx, 16 |
| mov BYTE PTR 6[edi],dl |
| shr edx, 16 |
| L018dj6: |
| mov BYTE PTR 5[edi],dh |
| L019dj5: |
| mov BYTE PTR 4[edi],dl |
| L020dj4: |
| mov DWORD PTR [edi],ecx |
| jmp $L021djend |
| L022dj3: |
| ror ecx, 16 |
| mov BYTE PTR 2[edi],cl |
| shl ecx, 16 |
| L023dj2: |
| mov BYTE PTR 1[esi],ch |
| L024dj1: |
| mov BYTE PTR [esi], cl |
| $L021djend: |
| jmp $L005finish |
| $L005finish: |
| mov ecx, DWORD PTR 60[esp] |
| add esp, 24 |
| mov DWORD PTR [ecx],eax |
| mov DWORD PTR 4[ecx],ebx |
| pop edi |
| pop esi |
| pop ebx |
| pop ebp |
| ret |
| $L006cbc_enc_jmp_table: |
| DD 0 |
| DD L014ej1 |
| DD L013ej2 |
| DD L012ej3 |
| DD L010ej4 |
| DD L009ej5 |
| DD L008ej6 |
| DD L007ej7 |
| L025cbc_dec_jmp_table: |
| DD 0 |
| DD L024dj1 |
| DD L023dj2 |
| DD L022dj3 |
| DD L020dj4 |
| DD L019dj5 |
| DD L018dj6 |
| DD L017dj7 |
| _CAST_cbc_encrypt ENDP |
| _TEXT ENDS |
| END |
