C++ Headerdatei in Pascal

[NickelM]

Hallo ihr,

Ich bin gerade dabei das TS3 Plugin SDK von C++ in Pascal zuübersetzen. Soweit sogut.
Nur am übersetzen eines structs, der Funktionen enthält, funkt irgendwas net.

Eine Funktion als Beispiel, die ich verwenden wollte:

Code:

//Auszug von einen anderen Datei für Definition 
//des anyid types (hab ich weggelassen da ich net weis ich das übersetzen soll)
#if defined(WIN32) || defined(__WIN32__) || defined(_WIN32)
   typedef unsigned __int16 anyID;
   typedef unsigned __int64 uint64;
   #ifdef BUILDING_DLL
      #define EXPORTDLL __declspec(dllexport)
   #else
      #define EXPORTDLL
   #endif
#else
   #include <stdint.h>
   typedef uint16_t anyID;
   typedef uint64_t uint64;
   #ifdef BUILDING_DLL
      #define EXPORTDLL __attribute__ ((visibility("default")))
   #else
      #define EXPORTDLL
   #endif
#endif

//Aus der "Problemdatei"
#ifdef __cplusplus
extern "C" {
#endif
struct TS3Functions {
unsigned int (*requestSendPrivateTextMsg)(uint64 serverConnectionHandlerID, const char* message, anyID targetClientID, const char* returnCode);
}

Ich hab das jetzt bisher so übersetzt:

Delphi-Quellcode:

type
anyID = Word;

TrequestSendPrivateTextMsg = function (serverConnectionHandlerID : uint64; const message : PAnsiChar; targetClientID : anyID; const returnCode : PAnsiChar) :  Cardinal; //Muss PAnsiChar sein, da es keine Unicode zeichen sind

TTS3Functions = record
requestSendPrivateTextMsg : TrequestSendPrivateTextMsg;
end;

Hat es was mit den Teilen zutun die ich rausgelassen habe? das mit dem extern "c" weis ich hat was mit exportieren der Funktionen zutun.
Wenn ich aber an die Funktion ein cdecl; dranhäng, ändert sich nichts.

Ich muss zugeben mit den Grundlagen und Typumwundlung gehts ja noch, aber bei solchen Compiler "Anweisungen" bin ich überfragt...

[NickelM]

*push*

[phade]

function (...): Cardinal; stdcall;

[Robotiker]

Zitat:

Zitat von NickelM (Beitrag 1081348)

Hallo ihr,
Nur am übersetzen eines structs, der Funktionen enthält, funkt irgendwas net.

Der struct enthält keine Funktion, sondern einen Zeiger auf eine Funktion.

[Assarbad]

Zitat:

Zitat von phade (Beitrag 1081512)

function (...): Cardinal; stdcall;

Wieso? Normal wäre __cdecl, aber das hängt komplett vom Compiler ab - kann man also nicht sagen.

[NickelM]

Es geht mir darum, stimmt das soweit oder nicht? Soll ich jetzt also an jeden Pointer einer Funktion cdecl danhängen? Weil es muss cdecl sein, da die Funktionen, die dan exportiert werden, auch nur mit cdecl funktionieren.

EDIT: Ich hab jetzt mal an jedem Pointer der Funktion cdecl; angehängt.
Bei manchen Funktionene sind auch float enthalten diese hab ich als Single gemacht. Liegt es vllt dadurch an eine Verschiebung der Adressen sowas?
Es kommt immer noch der gleiche Fehler (siehe Anhang)

[turboPASCAL]

Wie jetzt, Delphi schmeisst VisualStudio-Fehler ? :gruebel: :stupid:

[Assarbad]

Zitat:

Zitat von turboPASCAL (Beitrag 1081759)

Wie jetzt, Delphi schmeisst VisualStudio-Fehler ? :gruebel: :stupid:

Nee, das bedeutet nur daß der JIT-Debugger von VS installiert und konfiguriert ist.

Zitat:

Zitat von NickelM (Beitrag 1081758)

Es geht mir darum, stimmt das soweit oder nicht? Soll ich jetzt also an jeden Pointer einer Funktion cdecl danhängen? Weil es muss cdecl sein, da die Funktionen, die dan exportiert werden, auch nur mit cdecl funktionieren.

Nein, nicht an jeden. Interessant ist was die Orginaleinstellung des Projektes ist. Üblicherweise ist dies __cdecl. Wichtig ist es aber nur dort wo eine Schnittstelle mit dem anderen Code existiert.

Zitat:

Zitat von NickelM (Beitrag 1081758)

EDIT: Ich hab jetzt mal an jedem Pointer der Funktion cdecl; angehängt.

Wie gesagt, es geht darum, daß der Prototyp __cdecl ist, wenn das Elternprojekt (also der Code welcher dein Plugin aufruft) __cdecl ist. Und das muß dokumentiert sein oder es ist die Standardeinstellung (und das ist __cdecl).

Zitat:

Zitat von NickelM (Beitrag 1081758)

Bei manchen Funktionene sind auch float enthalten diese hab ich als Single gemacht. Liegt es vllt dadurch an eine Verschiebung der Adressen sowas?
Es kommt immer noch der gleiche Fehler (siehe Anhang)

float (C/C++) ist Single (Delphi). Sie sollten binärkompatibel sein.

Aber wir bräuchten schon mehr Infos. Bspw. welche Exception geworfen wird. Oder du gibst uns mindestens die Binärdateien, so daß wir es im Debugger/Disassembler anschauen können.

[NickelM]

Naja okay. Das Programm Teamspeak 3 schemiste eine dmp datei raus. Ich lade sie mal hoch gugt mal ob ihr damit was anfangen könnt.

Weil ich persönlich kann mit der Datei nichts anfangen. Kenn mich da auch nicht so aus xD.
Ich stell auch mal den Originalcode der Datei rein. Die txt ist eine .h Datei.

[Assarbad]

Zitat:

Zitat von NickelM (Beitrag 1082292)

Naja okay. Das Programm Teamspeak 3 schemiste eine dmp datei raus. Ich lade sie mal hoch gugt mal ob ihr damit was anfangen könnt.

Die Dump-Datei wäre nochmal so gut, wenn die Debugsymbole (.pdb-Dateien) dabei wären ;)