Quellcode aus einer exe auslesen

[Eppos]

Hallo zusammen,

besteht die Möglichkeit, aus einer compilierten delphi "EXE" den Quellcode auszulesen?!

Vielen Dank!

[Phoenix]

Nein. Nach dem compilieren sind nur noch Assembler-Anweisungen übrig. Namen von Variablen etc. werden alle wegoptimiert.

[Eppos]

das würde mir eigentlich schon reichen, gibt es dafür ein Programm?

edit:
und gibt es möglichkeiten, zugriffe auf eine datenbank abzufangen (dbtyp: firebird 1.5)

[sirius]

Disassembler heist das praktischerweise.

Aber, wenn du das schon fragst....... :gruebel:

Edit: Schon, das geht ja alles über TCP/IP. Da kannst du mitlauschen. Aber ob du das Protokoll verstehst.

[Progman]

Es gibt Disassembler, nur durch solche Code "durchzusteigen" erfordert schon viel Erfahrung in Assembler.

[Nuclear-Ping]

Vielleicht Windows Disassembler?

[edit]
Sry, roter Kasten ...
[/edit]

[Phoenix]

Zitat:

Zitat von Eppos

edit:
und gibt es möglichkeiten, zugriffe auf eine datenbank abzufangen (dbtyp: firebird 1.5)

Neue Frage -> neuer Thread! Idealerweise im Datenbank-Forum.

[Flips]

Also so ganz stimmt das nicht.
Es gibt ein Programm, welches im besten Fall:

• Die dfm darstellen kann
• Das Formular verändern (!) kann (nur die Speicherung der EXE ist noch nicht implementiert)
• Die verwendeten Units auflistet
• Die verwendeten Klassen auflistet
• Die Events aller Komponente und die Komponenten selbst auflistet (mit Originalname)
• Das komplette Programm inklusive PAS-Dateien (!) wiederherstellt (Allerdings mit viel Assemblercode und einigen Syntaxfehlern. Ein einfaches Testprogramm konnte zwar wieder in kompilierbarer Code zerlegt werden, doch die EXE war nicht lauffähig (Direkte Terminierung nach dem Start))

Allerdings weiß ich nicht ob das Programm irgendeinen illegalen Charakter hat, deshalb geb ich den Namen mal lieber nicht an^^

[lbccaleb]

such mal nach dem programm dede von DaFixer im internet per google oder so, dieses sollte dir event auch nen bissel weiter helfen...

[Nuclear-Ping]

Zitat:

Zitat von Flips

Also so ganz stimmt das nicht.
Es gibt ein Programm, welches im besten Fall:

• Die dfm darstellen kann
• Das Formular verändern (!) kann (nur die Speicherung der EXE ist noch nicht implementiert)
• Die verwendeten Units auflistet
• Die verwendeten Klassen auflistet
• Die Events aller Komponente und die Komponenten selbst auflistet (mit Originalname)
• Das komplette Programm inklusive PAS-Dateien (!) wiederherstellt (Allerdings mit viel Assemblercode und einigen Syntaxfehlern. Ein einfaches Testprogramm konnte zwar wieder in kompilierbarer Code zerlegt werden, doch die EXE war nicht lauffähig (Direkte Terminierung nach dem Start))

Allerdings weiß ich nicht ob das Programm irgendeinen illegalen Charakter hat, deshalb geb ich den Namen mal lieber nicht an^^

Nunja, wie du schon sagtest: im besten Fall. Komponenten selber mit Name würde ich behaupten geht nur, wenn du irgendwelche Debug-Infos in die Exe reinkompilierst oder vielleicht so Standardsachen wie "Edit1", "Button1", ... :P

Und das was dabei rauskommt ist dann auch nur was für Leute, die zum Frühstück im Assembler-Buch "für Systementwickler" oder so lesen - denn wie du schon sagtest: haufen Syntaxfehler und .exe ist in den meisten Fällen auch nicht lauffähig.

Entsprechende Ergebnisse findet man, wenn man z.B. nach Delphi Decompiler googelt. Illegal sind solche Programme nur, wenn man sie zu illegalen Zwecken einsätzt. ... Wobei, war da nicht kürzlich irgend'ne Gesetzesänderung oder 'n Vorschlag in die Richtung? :gruebel:

[Luckie]

Warum willst du denn das machen?

[Flips]

Also ich sag mal so...
Das ist ein Teil des Original-Codes:

Delphi-Quellcode:

unit main;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, ExtCtrls;

type
  TfrmMain = class(TForm)
    pnlEins: TPanel;
    pnlZwei: TPanel;
    pnlDrei: TPanel;
    lblWin: TLabel;
    lblLost: TLabel;
    lblTie: TLabel;
    btnStart: TButton;
    btnStop: TButton;
    procedure btnStartClick(Sender: TObject);
    procedure FormCreate(Sender: TObject);
    procedure btnStopClick(Sender: TObject);
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

Das ist der Reproduzierte:

Delphi-Quellcode:

unit main;

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics,
  Controls, Forms, Dialogs, StdCtrls
type
  TfrmMain=class(TForm)
    pnlEins: TPanel;
    pnlZwei: TPanel;
    pnlDrei: TPanel;
    lblWin: TLabel;
    lblLost: TLabel;
    lblTie: TLabel;
    btnStart: TButton;
    btnStop: TButton;
    OFFS_0240: N.A.;
    procedure btnStartClick(Sender : TObject);
    procedure FormCreate(Sender : TObject);
    procedure btnStopClick(Sender : TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end ;

var
  frmMain: TfrmMain;

Also ich find das Programm sehr geil, es baut auch die DFM exakt nach.
Aber du hast schon recht, das meiste bringt dir nichts :-), ich finde es aber trotzdem sehr interessant.

@Luckie: Das ist eine berechtigte Frage.

[Luckie]

Das Formular liegt als Ressource in der Exe, da braucht man nichts "nachzubauen".

[Flips]

Ok das wusste ich nicht, sry :oops:

[Assertor]

Naja, das

Zitat:

Zitat von Flips

Also ich find das Programm sehr geil, es baut auch die DFM exakt nach.

Ist das so schwer, die seh ich doch schon mit dem ResHacker so.

Und mit verwendeten Units würst Du bei meinen Programmen nichts, da ist keine PackageInfo mehr als Resource an der Exe.

[offtopic]Zusätzlich kann man auch DCVAL weglassen, muß dann aber die RTL und einmal eine DB Unit patchen. Da gibt es doch ein schönes Tutorial von Asserbad dazu.

Wer übrigens denkt, die DCVAL enthält seinen Compiler: Nur sehr grob richtig. Mein DCVAL Code ist exakt der gleiche wie bei Delphi 3 Enterprise oder so. Da ist nichts mit weiteren Infos.[/offtopic]

Zitat:

Zitat von Flips

[*]Das Formular verändern (!) kann (nur die Speicherung der EXE ist noch nicht implementiert)

Wie gesagt, den guten alten ResHacker mal auf eine Delphi Exe angewandt. Da geht das Speichern geänderter DFM Resourcen. Und wenn ResHacker meckert, die Datei ist ge-upx-ed oder ähnliches, einfach entpacken oder dumpen...

Gruß Assertor

[Mist, Luckie: roter Kasten ;)]