Quelltext-Parsen von Delphi-Methoden

[urs.liska]

@Christian Seehase:
Nee, so sehe ich das eigentlich auch. Der Programmierer muss schon selbst sehen, dass sein Quelltext zumindest korrekt ist.
Aber trotzdem wäre es wahrscheinlich korrekt (zumindest, wenn man ein Tool aus der Hand gibt), den Benutzer auf potenzielle Risiken hinzuweisen.

Was ich aber berücksichtigen müsste, ist die Möglichkeit, Sourcecode sehr eigenwillig zu formatieren. Z.B. ist das folgende ja wohl korrekt:

Delphi-Quellcode:

function TForm1.Create(AOwner:
TComponent);var
i, j; integer;{ Kommentar }begin doSomething;end;

.Oder eine Klassendeklaration wie:

Delphi-Quellcode:

TExStringList { = Meine tolle neue Klasse } = 
class(TStringList) private 
FEigenschaft: string; public property
    Eigenschaft: string
        read FEigenschaft
        write FEigenschaft; end;

Man würde zwar jedem, der so schreibt sagen, er soll erstmal selbst Hand anlegen, aber trotzedm: es ist korrekt, also sollte auch ein Tool nicht daran scheitern...

Aber, wenn es denn schon ein (teilweiser) Delphi-Parser sein muss: dazu müsste es doch Ansätze geben und Material, das verwendbar ist (Algorithmen oder sogar Klassen). Ich habe beim Googlen aber erstmal nichts gefunden...

[Christian Seehase]

Moin Urs,

einige Stichworte die mir dazu einfallen:

• Lexikalische Analyse
• Syntaktische Analyse
• (Determinierender) Endlicher Automat

Ich denke mal, dass Du mit diesen Stichworten den Kern des Parsers abdecken können solltest.

[Dezipaitor]

Zitat von urs.liska:

@Christian Seehase:
Nee, so sehe ich das eigentlich auch. Der Programmierer muss schon selbst sehen, dass sein Quelltext zumindest korrekt ist.
Aber trotzdem wäre es wahrscheinlich korrekt (zumindest, wenn man ein Tool aus der Hand gibt), den Benutzer auf potenzielle Risiken hinzuweisen.

Nope, wenn ein Fehler im Quelltext drin ist, dann sollte das Tool sowas erkennen und zumindest eine Warnung geben - es kann ja trotzdem weitermachen.

Zitat von urs.liska:

Was ich aber berücksichtigen müsste, ist die Möglichkeit, Sourcecode sehr eigenwillig zu formatieren. Z.B. ist das folgende ja wohl korrekt:

Delphi-Quellcode:

function TForm1.Create(AOwner:
TComponent);var
i, j; integer;{ Kommentar }begin doSomething;end;

.Oder eine Klassendeklaration wie:

Delphi-Quellcode:

TExStringList { = Meine tolle neue Klasse } = 
class(TStringList) private 
FEigenschaft: string; public property
    Eigenschaft: string
        read FEigenschaft
        write FEigenschaft; end;

Man würde zwar jedem, der so schreibt sagen, er soll erstmal selbst Hand anlegen, aber trotzedm: es ist korrekt, also sollte auch ein Tool nicht daran scheitern...

Ich denke die Formatierung ist relativ einfach zu handhaben, es sind ja nur Leerzeichen und Zeilenumbrüche.
Viel schwieriger wird es sein, die vielen Möglichkeiten der Sprache Pascal/Delphi reinzubringen, weil jeder gerne auf seinen eigenwilligen Syntax besteht (ich meine damit speziellen Syntax wie default usw).
schau dir das mal an:

Delphi-Quellcode:

  PVariantManager = ^TVariantManager; 
  {$EXTERNALSYM PVariantManager}
  TVariantManager = record
    VarClear: procedure(var V : Variant);
    VarCopy: procedure(var Dest: Variant; const Source: Variant);
...

sowas schonmal gesehen?

oder

Delphi-Quellcode:

type
  IStringsDisp = dispinterface
    ['{EE05DFE2-5549-11D0-9EA9-0020AF3D82DA}']
    property ControlDefault[Index: Integer]: OleVariant dispid 0; default;
    function Count: Integer; dispid 1;
    property Item[Index: Integer]: OleVariant dispid 2;
    procedure Remove(Index: Integer); dispid 3;
    procedure Clear; dispid 4;
    function Add(Item: OleVariant): Integer; dispid 5;

    function _NewEnum: IUnknown; dispid -4;
  end;

und..

 type
  IAncestor = interface
  end;
  IDescendant = interface(IAncestor)
    procedure P1;
  end;
  TSomething = class(TInterfacedObject, IDescendant)
    procedure P1;
    procedure P2;
  end;
  ...

sowas schon benutzt?

TVarData = packed record
    case Integer of
      0: (VType: TVarType;
          case Integer of
            0: (Reserved1: Word;
                case Integer of
                  0: (Reserved2, Reserved3: Word;
                      case Integer of
                        varSmallInt: (VSmallInt: SmallInt);
                        varInteger:  (VInteger: Integer);
                        varSingle:   (VSingle: Single);
                        varDouble:   (VDouble: Double);
                        varCurrency: (VCurrency: Currency);
                        varDate:     (VDate: TDateTime);
                        varOleStr:   (VOleStr: PWideChar);
                        varDispatch: (VDispatch: Pointer);
                        varError:    (VError: HRESULT);
                        varBoolean:  (VBoolean: WordBool);
                        varUnknown:  (VUnknown: Pointer);
                        varShortInt: (VShortInt: ShortInt);
                        varByte:     (VByte: Byte);
                        varWord:     (VWord: Word);
                        varLongWord: (VLongWord: LongWord);
                        varInt64:    (VInt64: Int64);
                        varString:   (VString: Pointer);
                        varAny:      (VAny: Pointer);
                        varArray:    (VArray: PVarArray);
                        varByRef:    (VPointer: Pointer);
                     );
                  1: (VLongs: array[0..2] of LongInt);
               );
            2: (VWords: array [0..6] of Word);
            3: (VBytes: array [0..13] of Byte);
          );
      1: (RawData: array [0..3] of LongInt);
  end;

Zitat von urs.liska:

Aber, wenn es denn schon ein (teilweiser) Delphi-Parser sein muss: dazu müsste es doch Ansätze geben und Material, das verwendbar ist (Algorithmen oder sogar Klassen). Ich habe beim Googlen aber erstmal nichts gefunden...

ja gibt es :
hier ein Link:

The purpose of PasDoc is to document Object Pascal / Delphi source code from comments within the source code. :
http://pasdoc.sourceforge.net/phpwiki/

suche nach PasDoc und es gibt noch mehr!
außerdem suche vermehrt, nach Programmen die Quelltexte scannen und daraus Hilfedateien machen - d.h. die Kommentare zu den Funktionen und so in eine Hilfe schreiben.