Suche Unit: "IsDebuggerPresent"

[Balu der Bär]

Moin,

ich hatte damals mal in einem der Anti-Cracking-Threads aus der DP eine fertige Unit gefunden, IsDebuggerPresent.pas. Dummerweise habe ich diese Datei vor ein paar Wochen von meiner Festplatte gelöscht, ich habe jetzt die Anti-Cracking-Threads durchsucht, kann aber diese Unit nicht mehr finden.

Hat die vielleicht noch jemand und könnte sie hier bereitsstellen? Danke.

[3_of_8]

Wofür ist die gut? Willst du testen, ob der Debugger läuft? Das geht recht einfach:

Delphi-Quellcode:

function DebuggerRunning: Boolean;
begin
Result:=DebugHook<>0;
end;

[Daniel B]

Man kann rausfinden ob das Programm in einen Debugger läuft, das würde jemand tun, der das Programm cracken will, diese unit hilft einem da ein bisschen entgegen zu wirken, aber ich würde die so nicht hergeben, es gibt noch genug Artikel dazu.

[Balu der Bär]

@3_of_8: Nein, so wie ich Michaels Artikel verstanden hab kann man das auch einfach wegpatchen da spezielle API-Funktionen benutzt werden.

Problem is nur das in der Unit auch noch andere kleine Funktionen zum Schutz enthalten waren, deshalb würde ich mich freuen wenn die noch jemand finden würde (für IsDebuggerPresent reicht mir auch Luckies Artikel, nur dann hab ich halt das andere nicht mehr).

@Daniel B: Warum schreibst du in diesen Thread wenn du sie eh nicht "hergeben" würdest? Ich erwarte keine Antwort auf die Frage.

[brechi]

isDebuggerPresentX
in der uallKernel @ http://uall.overclock.ch/uallCollection
Da Luckies Funktion nur für winNT ist.

[Balu der Bär]

Danke brechi, ich hatte mittlerweile bereits eine IsDebuggerPresent-Variante von dir gefunden, die wohl auch unter Win9.x funktioniert (teste ich später). Danke dir.

[gugelhupf]

Zitat von 3_of_8:

Wofür ist die gut? Willst du testen, ob der Debugger läuft? Das geht recht einfach:

Delphi-Quellcode:

function DebuggerRunning: Boolean;
begin
Result:=DebugHook<>0;
end;

Das funktioniert aber bei mir net, wenn ich's mit OllyDbg starte...
Also er erkennt den Debugger nicht

[Balu der Bär]

Mit dem hier geht es.

[gugelhupf]

Zitat von Balu der Bär:

Mit dem hier geht es.

Hierbei
MOVZX EAX, [EAX+2] gibt es folgenden Fehler:
121. Ungültige Kombination von Opcode und Operanden

[Balu der Bär]

Unter Delphi 2006 lässt sich das fehlerfrei kompilieren.