Delphi-PRAXiS
Seite 1 von 3  1 23      

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Win32/Win64 API (native code) (https://www.delphipraxis.net/17-win32-win64-api-native-code/)
-   -   Delphi Einen prozess in anderen Desktop befördern ohne switch! (https://www.delphipraxis.net/61083-einen-prozess-anderen-desktop-befoerdern-ohne-switch.html)

Neotracer64 16. Jan 2006 21:33


Einen prozess in anderen Desktop befördern ohne switch!
 
Ich möchte eine andere Anwendung starten, aber in einem anderen Desktop ohne selbst dahinzuswitchen!
Alle Beispiele, die ich gefunden habe, können nur das eigene Programm auf einen neuen Desktop befördern.

Also habe ich versucht Code in diesen Prozess zu injezieren und darin habe ich folgendes getan:

Delphi-Quellcode:
Desktop:= CreateDesktop('Neu', nil, nil, DF_ALLOWOTHERACCOUNTHOOK, GENERIC_ALL, nil);
SetThreadDesktop(Desktop);
Jedoch startet sich das Programm normal im Standard-Desktop. (Ja die injektion war erfolgreich, getestet mit einer Messagebox)

Dann habe ich etwas anderes versucht. Ich habe mir überlegt, dass ein Programm, dass schon im anderen Desktop läuft und selbst ein anderen Prozess startet, dass dieser dann auch auf dem neuen Desktop startet.... Fehlanzeige

Mir gehen so langsam die Ideen aus. Habt ihr ne Idee? Oder ist es zwingend notwendig das programm zu patchen?

RavenIV 17. Jan 2006 07:35

Re: Einen prozess in anderen Desktop befördern ohne switch!
 
schau dir mal in der Delphi-hilfe TScreen und vor allem TScreen.Monitors an.
Könnte sein, dass dies dir weiterhilft.

NicoDE 17. Jan 2006 09:50

Re: Einen prozess in anderen Desktop befördern ohne switch!
 
Ein Thread kann den Desktop mittels SetThreadDesktop nur wechseln, wenn er keine Referenzen auf seinen aktuellen Desktop hält (üblicherweise Fenster-Handle).
Insofern dürfte es schwierig werden Anwendungen auf einen anderen Desktop zu 'verschieben'.

Zitat:

Zitat von MSDN
The SetThreadDesktop function will fail if the calling thread has any windows or hooks on its current desktop (unless the hDesktop parameter is a handle to the current desktop).


Neotracer64 17. Jan 2006 15:03

Re: Einen prozess in anderen Desktop befördern ohne switch!
 
thx 4 answer.

Ergo heisst das, ich muss den SetThreadDesktop-Aufruf in die Executable patchen, bevor die ganzen Referenzen entstehen, nicht wahr?
Ich glaube ich hänge einfach eine Sektion ran, jumpe am Anfang hin,,tätige dort die notwendigen Api-Aufrufe und springe dann wieder zurück.
Ich werde verlauten lassen ob es funktioniert hat.

Neotracer64 17. Jan 2006 17:30

Re: Einen prozess in anderen Desktop befördern ohne switch!
 
Patchen hat geklappt.
Ich hab jetzt nicht extra eine Section rangehängt, da noch genug platz in der code-Section war.

Hier der ASM-Code den ich direkt mit Ollydbg reingeschrieben habe.
Am OEP der Executable hab ich einen Jump auf 0140B8D0 gemacht. Und dort erstmal die Register gesichert.
Der Code von 0140B919 bis 0140B91C ist das, was ich am OEP überschrieben habe.
Ich gebe zu, dass ich etwas umstänlich war und 2x GetModuleHandle aufgreufen habe, aber ich habe es halt on-the-fly implementiert.

Wenn ihr es bei einem programm nachmachen wollt, müsst ihr natürlich die Adressen fixen ;)
Delphi-Quellcode:
0140B8D0   > \60                PUSHAD
0140B8D1   . 9C               PUSHFD
0140B8D2   . 68 25B94001       PUSH _patch.0140B925                            ; /pModule = "user32.dll"
0140B8D7   . FF15 18C04001     CALL DWORD PTR DS:[<&KERNEL32.GetModuleHandleA>] ; \GetModuleHandleA
0140B8DD  . 68 30B94001       PUSH _patch.0140B930                            ; /ProcNameOrOrdinal = "CreateDesktopA"
0140B8E2   . 50                PUSH EAX                                         ; |hModule
0140B8E3   . FF15 48C04001     CALL DWORD PTR DS:[<&KERNEL32.GetProcAddress>]   ; \GetProcAddress
0140B8E9   . 6A 00             PUSH 0
0140B8EB  . 68 00000010       PUSH 10000000
0140B8F0   . 6A 01             PUSH 1
0140B8F2   . 6A 00             PUSH 0
0140B8F4   . 6A 00             PUSH 0
0140B8F6   . 68 F03F5103       PUSH _patch.03513FF0
0140B8FB  . FFD0              CALL EAX
0140B8FD  . 50                PUSH EAX
0140B8FE  . 68 25B94001       PUSH _patch.0140B925                            ; /pModule = "user32.dll"
0140B903   . FF15 18C04001     CALL DWORD PTR DS:[<&KERNEL32.GetModuleHandleA>] ; \GetModuleHandleA
0140B909   . 68 3FB94001       PUSH _patch.0140B93F                           ; /ProcNameOrOrdinal = "SetThreadDesktop"
0140B90E  . 50                PUSH EAX                                         ; |hModule
0140B90F  . FF15 48C04001     CALL DWORD PTR DS:[<&KERNEL32.GetProcAddress>]   ; \GetProcAddress
0140B915   . FFD0              CALL EAX
0140B917   . 9D               POPFD
0140B918   . 61                POPAD
0140B919   . 55                PUSH EBP
0140B91A  . 8BEC             MOV EBP,ESP
0140B91C  . 6A FF            PUSH -1
0140B91E  .^ E9 F37EFFFF      JMP _patch.01403816
0140B923      00                DB 00
0140B924      00                DB 00
0140B925   . 75 73 65 72 33 32>ASCII "user32.dll",0                              ; user32.dll
0140B930   . 43 72 65 61 74 65>ASCII "CreateDesktopA",0                          ; CreateDesktopA
0140B93F  . 53 65 74 54 68 72>ASCII "SetThreadDesktop"
0140B94F  . 00                ASCII 0

Luckie 17. Jan 2006 18:59

Re: Einen prozess in anderen Desktop befördern ohne switch!
 
Und wozu ist das jetzt gut? Wozu braucht man so was? :gruebel:

NicoDE 17. Jan 2006 19:05

Re: Einen prozess in anderen Desktop befördern ohne switch!
 
Ich frage mich ohnehin, warum er den Zieldesktop nicht 'einfach' in die TStartupInfo bei CreateProcess schreibt...
(bzw GetStartupInfo() verwendet um die Struktur zu initialisieren)

Neotracer64 17. Jan 2006 19:17

Re: Einen prozess in anderen Desktop befördern ohne switch!
 
Was ist wenn die Ziel-Executable GetStartUpInfo nicht callt?
Ich hab keinen Einfluss (also closed-source) auf die Programme, die ich auf dem anderen Desktop starten will und deswegen dachte ich jetz Patchen sei die einzige Möglichkeit.

NicoDE 17. Jan 2006 20:09

Re: Einen prozess in anderen Desktop befördern ohne switch!
 
Zitat:

Zitat von Neotracer64
Ich hab keinen Einfluss (also closed-source) auf die Programme, die ich auf dem anderen Desktop starten will und deswegen dachte ich jetz Patchen sei die einzige Möglichkeit.

Ich dachte du startest die Programme immer selbst... dann kannst du bei CreateProcess auch angeben, in welchem Desktop das Programm ausgeführt werden soll.

mh166 17. Jan 2006 20:48

Re: Einen prozess in anderen Desktop befördern ohne switch!
 
Wobei ich aber beim patchen von fremder Software vorsichtig wäre... Wenn dus nur für dich nutzt, dann wirds da vermutlich nich viel Probs geben. Aber letztendlich könnte es vom rein rechtlichen Standpunkt her sicher problematisch sein, oder täusch ich mich da (nur mal der Neugierde halber. :))?

mfg, mh166


Alle Zeitangaben in WEZ +1. Es ist jetzt 01:32 Uhr.
Seite 1 von 3  1 23      

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