Wie patcht man die classes.pas unter XE2?

[himitsu]

Eventuell muß noch die Protection von dem Speichern geändert werden, damit man da schreiben darf.
WriteProcessMemory bräuchte man eigentlich nicht, da man sich ja schon in seinem eigenen Speicher befindet und direkten Zugriff hat.

Und man darf nicht vergessen, daß man die Originalfunktion nicht mehr aufrufen kann, da dort ja die ersten Bytes überschrieben wurden.

[Stevie]

Zitat von himitsu:

Eventuell muß noch die Protection von dem Speichern geändert werden, damit man da schreiben darf.
WriteProcessMemory bräuchte man eigentlich nicht, da man sich ja schon in seinem eigenen Speicher befindet und direkten Zugriff hat.

Dann müsste man mit VirtualProtect und Move arbeiten, da man ansonsten eine AV bekommt. Da erschien mir der Einzeiler mit WriteProcessMemory einfacher und er erledigt den gleichen Job.

[himitsu]

Sagen wir es mal so:

Zitat:

Delphi-Quellcode:

  if not WriteProcessMemory(GetCurrentProcess, OrgProc, @JmpOp, SizeOf(TJmpOp), n) then
    RaiseLastOSError;

Ob nun das Move eine Excepition (Zugriffsverlezung) auslöst,
oder ob man manuell eine Exception (konnte nicht schreiben) auslöst,
ist am Ende auch egal.

Und VirtualProtect braucht man doch sowieso?
Ich hoffe mal, daß WriteProcessMemory nicht einfach so in geschützte Bereiche reinschreiben kann.

[Stevie]

Zitat von himitsu:

Ich hoffe mal, daß WriteProcessMemory nicht einfach so in geschützte Bereiche reinschreiben kann.

Doch, allerdings sind bestimmte Zugriffsrechte erforderlich (siehe Remarks unter WriteProcessMemory ), welche man in diesem Fall hat, da man ja im eigenen Prozess bleibt.

Ich patche damit in DSharp schon seit Monaten zur Laufzeit zahlreiche Bugs rund um die RTTI.

[himitsu]

Klar, daß man diese Recht hat. Ich meinte ja auch die Dinge, welche eventuell über VirtualProtect gesperrt sind.