Ermitteln Sie den übergeordneten Prozess der aktuellen App

Question

Ich schrieb dieses Dienstprogramm (Exe), die aus dieser Host-Anwendung aufgerufen werden kann. Und ich würde es vorziehen, dass das Dienstprogramm nur von der Host-Anwendung aufgerufen werden kann. Wenn Sie es von außen oder von einem anderen Host ausführen, sollte das Dienstprogramm sofort beendet werden.

Gibt es eine Möglichkeit, herauszufinden, welcher Prozess mein Dienstprogramm gestartet hat?

Danke für die Antworten.

Answer 1

können Sie die CreateToolhelp32Snapshot Funktion verwenden, um die laufenden Prozess Liste und dann die Process32First Funktion zum Aufzählen die th32ParentProcessID zu erhalten, die die Kennung des Prozesses ist, dass dieser Prozess erstellt (seine Eltern-Prozess).

Siehe dieses Beispiel.

uses 
    Psapi, 
    Windows, 
    tlhelp32, 
    SysUtils; 

function GetTheParentProcessFileName(): String; 
const 
    BufferSize = 4096; 
var 
    HandleSnapShot : THandle; 
    EntryParentProc : TProcessEntry32; 
    CurrentProcessId: DWORD; 
    HandleParentProc: THandle; 
    ParentProcessId : DWORD; 
    ParentProcessFound : Boolean; 
    ParentProcPath  : String; 

begin 
    ParentProcessFound := False; 
    HandleSnapShot := CreateToolhelp32Snapshot(TH32CS_SNAPPROCESS, 0); //enumerate the process 
    if HandleSnapShot <> INVALID_HANDLE_VALUE then 
    begin 
    EntryParentProc.dwSize := SizeOf(EntryParentProc); 
    if Process32First(HandleSnapShot, EntryParentProc) then //find the first process 
    begin 
     CurrentProcessId := GetCurrentProcessId(); //get the id of the current process 
     repeat 
     if EntryParentProc.th32ProcessID = CurrentProcessId then 
     begin 
      ParentProcessId := EntryParentProc.th32ParentProcessID; //get the id of the parent process 
      HandleParentProc := OpenProcess(PROCESS_QUERY_INFORMATION or PROCESS_VM_READ, False, ParentProcessId); 
      if HandleParentProc <> 0 then 
      begin 
       ParentProcessFound := True; 
       SetLength(ParentProcPath, BufferSize); 
       GetModuleFileNameEx(HandleParentProc, 0, PChar(ParentProcPath),BufferSize); 
       ParentProcPath := PChar(ParentProcPath); 
       CloseHandle(HandleParentProc); 
      end; 
      break; 
     end; 
     until not Process32Next(HandleSnapShot, EntryParentProc); 
    end; 
    CloseHandle(HandleSnapShot); 
    end; 

    if ParentProcessFound then 
    Result := ParentProcPath 
    else 
    Result := ''; 
end; 

Answer 2

Wenn diese Anwendung nur von innerhalb des Hosts ausgeführt wird, warum nicht einfach die Formulare für die Anwendung in die Hauptanwendung einfügen und sie wie ein anderes Formular aktivieren?

Answer 3

Ich würde einen zusätzlichen Parameter hinzufügen, den Sie nur kennen (es kann eine GUID sein), wenn diese GUID nicht Teil der Parameter an Ihr Dienstprogramm übergeben .. Beenden Sie die Anwendung sofort.

Answer 4

Die schnelle Antwort auf Ihre Frage lautet: "Nun, nein, Sie können nicht verhindern, dass eine Anwendung ausgeführt wird". Wenn es eine ausführbare Datei ist, kann sie ausgeführt werden. Keine Möglichkeit, das zu stoppen.

Und, wenn Sie die Anwendung nicht steuern können (wie Ihre Kommentare zu zeigen scheinen) dann wird Gs ausgezeichneter Vorschlag nicht funktionieren, oder? Sie haben keine Möglichkeit zu kontrollieren, was die App macht, und Sie können nicht kontrollieren, ob die App auf Ihre spezielle Befehlszeile reagiert.

Das ist also eine interessante Situation.

Die einzige Möglichkeit, die ich sehe, ist, den Zugriff auf die EXE insgesamt zu verhindern oder es zumindest schwer zu machen.

Sie können dies tun:

1. einbetten EXE in Ihrem Host-EXE als Ressource
2. Wenn die Zeit, um die EXE zu laufen kommt, dann entpacken Sie es TResourceStream mit
3. schreiben es aus der heraus TResourceStream mit TFileStream
4. Führen Sie es
5. Löschen Sie es, wenn Sie fertig sind.

Nicht schön, aber es ist die einzige Möglichkeit, die EXE davon abzuhalten, zu Ihren Bedingungen und nur zu Ihren Bedingungen ausgeführt zu werden.

Answer 5

Wir verwenden eine ziemlich einfache Technik, die nur ein paar Zeilen Code benötigt. Die Eltern-App und die Dienstprogramm-App verwenden einige gängige GUIID-Zeichenfolgen (im Code) und rufen RegisterWindowMessage auf, um eine Art "Hallo" -Handshake-Protokoll zu erstellen. Wenn die Dienstprogramm-App zum ersten Mal gestartet wird, wird diese Nachricht veröffentlicht. Wenn die übergeordnete App ausgeführt wird und das Dienstprogramm gestartet wurde, wird die Antwortnachricht veröffentlicht, die vom Dienstprogramm angezeigt wird und alles in Ordnung ist. Wenn nicht, wird das Zeitlimit überschritten und das Programm beendet.