Delphi-PRAXiS
Seite 2 von 2     12   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi Funktionsname herausfinden (https://www.delphipraxis.net/130511-funktionsname-herausfinden.html)

DMW 10. Mär 2009 14:35

Re: Funktionsname herausfinden
 
Zitat:

Zitat von Cyf
Zitat:

Zitat von generic
Allerdings ist es praktisch unmöglich, eine beliebige Codeposition zweifelsfrei mit der Adresse der zugehörigen Funktion zu assoziieren, ohne über eine vollständige Funktionsliste zu verfügen, daher hilft das nichts.

Das ist nicht ganz richtig, es funktioniert in manchen Fällen allerdings nicht allen.

Wieso ist es dann nicht ganz richtig? :gruebel:
Zitat:

Zitat von DMW
... praktisch unmöglich, eine beliebige Codeposition zweifelsfrei ...


Cyf 10. Mär 2009 16:52

Re: Funktionsname herausfinden
 
Ich halte es einfach nur nicht für praktisch unmöglich, jedoch in einigen Fällen für extrem aufwendig. :wink:
In den meisten ist es jedoch recht einfach. (Rücksprungaddresse auslesen und vor ihr den offset lesen)
Es ist so zumindest möglich, sich was zu bauen, was einem in den meisten Fällen mit wenig Aufwand den Funktionsnamen/Einsprungspunkt mitloggt (ansonsten "unbekannt") und ihn ergänzend mit dem EIP aufführt.

[Edit]Es müsste sogar immer möglich sein, wenn man Zugriffe auf die RTTI eines Objektes zulässt und dort den aktuellen EIP mit den Einsprungspunkten der Methoden vergleicht, die in der PE hintereinanderliegen sollten. Somit kommt man dann immer an den Einsprungspunkt, jedoch nur für Methoden, nicht für alle Funktionen. Außerdem sind die RTTI laut Hilfe versionsabhängig.

sirius 10. Mär 2009 17:31

Re: Funktionsname herausfinden
 
Die RTTI speichert nur das, was man auch über Methodaddress bekommt.

Cyf 10. Mär 2009 18:16

Re: Funktionsname herausfinden
 
Das Porblem ist mehr, dass man für Methodaddress den Metodennamen wissen muss. Methodaddress gibt den Einsprungspunkt zurück und um den geht es ja, ist also schon das Richtige. Das Problem ist also alle in der RTTI gespeicherten Einsprungspunkte durchzugehen und dann zu schauen, zwischen welchen der momentane EIP liegt.
Das müsste entweder über

Delphi-Quellcode:
GetTypeData(Self.ClassInfo);
und dann mit den Informationen weiter arbeiten gehen, oder über was anderes anderes aus TypInfo oder über manuelles durchforsten der RTTI gehen, wenn man denn den genauen Aufbau wüsste.
Die brauchbarste Information über die RTTI, die ich gefunden habe ist http://www.suite101.com/article.cfm/...gramming/64922 , allerdings schreib ich morgen nen LK und werde das heute nicht mehr weiter verfolgen.

Apollonius 10. Mär 2009 18:21

Re: Funktionsname herausfinden
 
Die nützlichste mir bekannte Quelle über RTTI in Delphi ist
Hallvard Vassbotns Blog. Dort sind alle Datenstrukturen, insbesondere die undokumentierten, aufgelistet. Die Methodeninformationen sind nicht dokumentiert und auch nicht bei ClassInfo verzeichnet, sondern an einem anderen Offset, nämlich System.vmtMethodTable.

DMW 10. Mär 2009 21:32

Re: Funktionsname herausfinden
 
Zitat:

Zitat von Cyf
[Edit]Es müsste sogar immer möglich sein, wenn man Zugriffe auf die RTTI eines Objektes zulässt und dort den aktuellen EIP mit den Einsprungspunkten der Methoden vergleicht, die in der PE hintereinanderliegen sollten. Somit kommt man dann immer an den Einsprungspunkt, jedoch nur für Methoden, nicht für alle Funktionen. Außerdem sind die RTTI laut Hilfe versionsabhängig.

Problematisch ist nur, daß du nicht wissen kannst, wo die Methode endet, sofern du nicht über eine vollständige Map-Datei verfügst.

(Für das Enumerieren der Methoden-RTTI einer Klasse hatte ich hier mal ein Beispiel gepostet, allerdings in C++.)

Felix015 11. Mär 2009 14:57

Re: Funktionsname herausfinden
 
mal so'ne frage wozu brauchst du das
?


Alle Zeitangaben in WEZ +1. Es ist jetzt 16:18 Uhr.
Seite 2 von 2     12   

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