Compiler ändert asm Code ?

[TKC]

Hallo,

ich benutze folgende Funktion um meinen Hook zu überspringen.

Delphi-Quellcode:

function xPostMessage(hWnd: hWnd; Msg: UINT; wParam: wParam; lParam: lParam): BOOL; stdcall;
asm
      mov  edi, edi
      push ebp
      mov  ebp, esp
      jmp OldDllFunc
end;

Warum macht der Compiler dann folgenden Code daraus, bzw. wie kann ich verhindern das er es macht ?

Code:

003A5C60 G> $  55                push    ebp
003A5C61    .  8BEC              mov     ebp, esp
003A5C63    .  89FF              mov     edi, edi
003A5C65    .  55                push    ebp
003A5C66    .  89E5              mov     ebp, esp
003A5C68    .  FF25 70FF3A00     jmp     near dword ptr [3AFF70]

Wie man sieht hat er einiges geändert.

[Apollonius]

Ich finde das auch extrem lästig. In C++ würde man das mit __declspec(naked) lösen; in Delphi gibt es das nicht. Als hässlichen Workaround kannst du die Parameter sowie das stdcall weglassen. Wenn du die Funktion dann aus Delphi-Code aufrufen willst, nimmst du @xPostMessage und castest in einen entsprechenden Funktionszeigertypen, sodass du die Funktion mit Parametern aufrufen kannst.

[Muetze1]

Schlüsselwort [oh]assembler;[/oh] vor stdcall; angeben.

[gammatester]

Was ist der Sinn von mov edi, edi?
Meinst Du mov edi, [edi]?

[Apollonius]

mov edi, edi steht auch am Anfang der meisten WinAPI-Funktionen und erleichtert erneutes Hooken - zumindest, wenn sich vor der Funktion noch fünf ungenutzte Bytes befinden.

[sirius]

Zitat von Muetze1:

Schlüsselwort [oh]assembler;[/oh] vor stdcall; angeben.

Und in welchen Delphi-Versionen funktioniert das? In D7 schon mal nicht.

[TKC]

Zitat von Muetze1:

Schlüsselwort [oh]assembler;[/oh] vor stdcall; angeben.

Also in Delphi 2010 funktioniert das auch nicht !

[TKC]

Zitat von Apollonius:

Ich finde das auch extrem lästig. In C++ würde man das mit __declspec(naked) lösen; in Delphi gibt es das nicht. Als hässlichen Workaround kannst du die Parameter sowie das stdcall weglassen. Wenn du die Funktion dann aus Delphi-Code aufrufen willst, nimmst du @xPostMessage und castest in einen entsprechenden Funktionszeigertypen, sodass du die Funktion mit Parametern aufrufen kannst.

Klingt etwas umständlich aber ich werde es einmal versuchen.

[TKC]

Also ich hab jetzt ne einfache Möglichkeit gefunden.

wenn ich es so mache ...

Delphi-Quellcode:

function xPostMessage(hWnd: hWnd; Msg: UINT; wParam: wParam; lParam: lParam): BOOL; stdcall;
 asm
      mov  edi, edi
      jmp OldDllFunc
end;

wird daraus ...

Code:

003A5C60 G> $  55                push    ebp
003A5C61    .  8BEC              mov     ebp, esp
003A5C63    .  89FF              mov     edi, edi
003A5C65    .  FF25 70FF3A00     jmp     near dword ptr [3AFF70]

und es funktioniert.

[Apollonius]

Das ändert am zugrunde liegenden Problem rein gar nichts. Nebenbei bemerkt kannst du dein mov edi, edi jetzt tatsächlich ersatzlos streichen.