Unidad Mlde32Unit; // Interfaz de motor de desmerimiento de micro longitud // 作者忘记了 ， 不好意思。好像出自 29a-7。 // Lo siento, ¡el autor! función LDE32 (Opcode: Pointer): Integer; función de implementación LDE32 (Opcode: Pointer): Integer; const // **************** //*tipos de códigos*// **************** o_unique = 0; O_prefix = 1; O_imm8 = 2; O_imm16 = 3; O_imm24 = 4; O_imm32 = 5; O_imm48 = 6; O_modrm = 7; O_modrm8 = 8; O_modrm32 = 9; O_extended = 10; O_weird = 11; O_error = 12; función mlde32 (Opcode: Pointer): Integer; asm pushad cld xor edx, edx mov esi, [esp+(8*4)+4] mov ebp, esp // 256 bytes, index-compressed opcode type table push 01097F71Ch push 0F71C6780h push 017389718h push 0101CB718h push 017302C17h push 018173017h push 0F715F547h push 04C103748H PUSH 0272CE7F7H 13h Push 0288858260h Push 015124045h Push 05016A0C7H PUSH 028191812H 047101115h Mov Eax, 012472015h Push Eax Push Eax Push 012471a10h Agregar cl, 10h Push ECX Sub Cl, 20h Push Ecx Xor Ecx, ECX DEC ECX // El código comienza @@ PS: Inc Ecx Mov Edi, ESP @@ go: LODSB MOV BH , Al @@ ft: Mov Ah, [EDI] Inc Edi Shr ah, 4 Sub Al, ah Jnc @@ ft Mov Al, [edi-1] y Al, 0fh CMP AL, O_Error Jnz @@ i7 Pop EDX no edx @@ i7: Inc edx cmp al, o_unique jz @@ t_exit cmp al, o_prefix jz @@ ps add edi, 51h // (@@ _ ettbl - @@ _ ttbl) cmp al, o_extended jz @@ go mov edi, [ebp+ (8*4) +4] @@ i6: inc EDX CMP AL, O_IMM8 JZ @@ T_EXIT CMP AL, O_MODRM JZ @@ T_MODRM CMP AL, O_WEIRD JZ @@ t_weird @@ i5: inc EDX CMP AL, O_IMM16 JZ @ @T_EXIT CMP AL, O_MODRM8 JZ @@ t_modrm @@ i4: Inc edx cmp al, o_imm24 jz @@ t_exit @@ i3: inc edx @@ i2: inc edx pushad mov al, 66h repnz scesb popad jnz @@ c32 @@ @@ D2: Dec EDX DEC EDX @@ C32: CMP AL, O_MODRM32 JZ @@ T_MODRM SUB AL, O_IMM32 JZ @@ t_imm32 @@ i1: inc EDX @@ t_exit: Mov ESP, EBP MOV [ESP+(7*4)], Edx Popad Ret // ******************************** //*Procese el byte mod/rm*// * * // * 7 6 5 3 2 0 * // * | Mod | Reg/Opcode | R/m | *///**// ********************************* @@ t_modrm: lodsb mov ah, al shr Al, 7 JB @@ PRMK JZ @@ PRM ADD DL, 4 PUSHAD MOV AL, 67H REPNZ SCASB POPAD JNZ @@ PRM @@ D3: sub DL, 3 dec AL @@ PRMK: JNZ @@ T_EXIT INC EDX Incax @ @ @prm: y ah, 00000111b Pushad Mov Al, 67h Repnz scesb popad jz @@ prm67chk cmp ah, 04h jz @@ prmsib cmp ah, 05h jnz @@ t_exit @@ prm5chk: dec al jz @@ t_exit @@ i42: ADD DL, 4 jmp @@ t_exit @@ prm67chk: cmp ax, 0600h jnz @@ t_exit inc edx jmp @@ i1 @@ prmsib: cmp al, 00h jnz @@ i1 lodsb y al, 00000111b sub al, 05h jnz @i1 i1 Inc edx jmp @@ i42 // **************************** //*Process Weird Opcodes*//**//* Test de mierda (f6h/f7h)*//**// **************************** @@ t_weird: Test Byte Ptr [ esi], 00111000b jnz @@ t_modrm mov al, o_modrm8 shr bh, 1 adc al, 0 jmp @@ i5 // ********************************************************************************** *********** //*Procese alguna otra mierda*//**//*fucking mov (a0h/a1h/a2h/a3h)*//**// ******** ************************** @@ t_imm32: sub bh, 0a0h cmp bh, 04h jae @@ d2 pushad mov al, 67h repnz scesb popad jnz @@ chk66t @@ d4: diciembre edx edx @@ chk66t: pushad mov al, 66h repnz scesb popad jz @@ i1 jnz @@ d2 end; Comience ASM Push Opcode Llame Mlde32 Agregar ESP, 4 End; fin; fin. ========= 完