Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Win32/Win64 API (native code) (https://www.delphipraxis.net/17-win32-win64-api-native-code/)
-   -   Delphi Dll Injection aus einer Ressource oder eigener Exe (https://www.delphipraxis.net/83483-dll-injection-aus-einer-ressource-oder-eigener-exe.html)

Zacherl 3. Jan 2007 14:45


Dll Injection aus einer Ressource oder eigener Exe
 
So, ich mach lieber mal hier dazu einen Thread auf. Also ich injiziere meine Dll mit folgender Funktion in meinen Zielprozess:
Delphi-Quellcode:
function InjectLibrary(Process: LongWord; ModulePath: PChar): Boolean;
var
  Parameters: Pointer;
  Thread, TID: dword;
  BytesWritten: dword;
  pCreateRemoteThread: function(hProcess: THandle; lpThreadAttributes: Pointer; dwStackSize: DWORD; lpStartAddress: TFNThreadStartRoutine; lpParameter: Pointer; dwCreationFlags: DWORD; var lpThreadId: DWORD): THandle; stdcall;
  pVirtualAllocEx: function(hProcess: THandle; lpAddress: Pointer; dwSize, flAllocationType: DWORD; flProtect: DWORD): Pointer; stdcall;
  pWriteProcessMemory: function(hProcess: THandle; const lpBaseAddress: Pointer; lpBuffer: Pointer; nSize: DWORD; var lpNumberOfBytesWritten: DWORD): BOOL; stdcall;
begin
  Result := False;
  pCreateRemoteThread := GetRealProcAddress(GetModuleHandle('kernel32'), 'CreateRemoteThread');
  pVirtualAllocEx := GetRealProcAddress(GetModuleHandle('kernel32'), 'VirtualAllocEx');
  pWriteProcessMemory := GetRealProcAddress(GetModuleHandle('kernel32'), 'WriteProcessMemory');
  Parameters := pVirtualAllocEx(Process, nil, Length(ModulePath) + 1, MEM_COMMIT or MEM_RESERVE, PAGE_EXECUTE_READWRITE);
  pWriteProcessMemory(Process, Parameters, ModulePath, Length(ModulePath) + 1, BytesWritten);
  Thread := pCreateRemoteThread(Process, nil, 0, GetProcAddress(GetModuleHandle('kernel32'), 'LoadLibraryA'), Parameters, 0, TID);
  if Thread = 0 then Exit;
  CloseHandle(Thread);
  Result := True;
end;
Das GetRealProcAddress ist aus der madDisAsm und umgeht nur mögliche Hooks der Funktionen.

Jetzt meine Frage:

Ich habe die Dll als RCDATA Ressource in meine Exe integriert und möchte nun, dass die Dll vom anderen Prozess direkt aus der Ressource geladen wird.
Oder noch besser wäre es, wenn ich die eigene Exe injizieren könnte und aus dieser aber nicht DllMain, sondern eine von mir exportierte Funktion aufrufen könnte.

Ich hoffe das war jetzt nicht zu kompliziert.
Florian

brechi 3. Jan 2007 15:19

Re: Dll Injection aus einer Ressource oder eigener Exe
 
schau dir mal http://uall.overclock.ch/uallCollection/ und dort InjectMe

Zacherl 3. Jan 2007 18:10

Re: Dll Injection aus einer Ressource oder eigener Exe
 
Sieht EIGENTLICH ganz gut aus. Es wird zwar auch ziemlich erfolgreich die eigene Funktion aus der EXE aufgerufen, allerdings schlägt selbst ein einfacher Befehl wie ShowMessage fehl und endet in einer AV ..

Irgendne Idee, wie man meinen Code umschreiben könnte, dass er eine Dll evt aus einem Pointer laden kann?

Olli 7. Jan 2007 06:20

Re: Dll Injection aus einer Ressource oder eigener Exe
 
Wenn es in deiner EXE ist, mußt kommst du schon in deinem eigenen Prozeß in Schwierigkeiten, ist aber möglich. Aphex hatte da mal Delphi-Beispielcode. Wenn es allerdings in einen anderen Prozeß geht, mußt du natürlich die Prozeßgrenzen beachten und die DLL sauber ausgerichtet in den Prozeßraum des Zielprozesses schreiben. Im Gegensatz zu dem Beispiel welches du oben gepostet hast, dürfte damit die Idee, daß sich alle Prozesse deine injezierte DLL teilen passé sein.


Alle Zeitangaben in WEZ +1. Es ist jetzt 10:11 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz