Delphi-Record mit Java aus Datei lesen

[MPirious]

Guten Morgen zusammen,

nachdem ich seit ca. 8 Jahren mit Delphi unterwegs war, habe ich micht entschieden, mich nun auch intensiver mit Java zu beschäftigen.

Es geht um Folgendes:

Zusammen mit einem Bekannten habe ich ein Programm "B" entwickelt, das als Zusatzmodul zu einem weiteren Programm "A" dient. B liest dabei die Dateien, die vorher von A geschrieben wurden.
(Hintergrund: A ist ein Programm zur Auswertung von Schwimm-Wettkämpfen und B dient als Schnittstelle von/zu elektonischen Zeitmessanlagen.)

Beide Programme wurden in Delphi entwickelt (A Delphi 1, B Delphi 7). Ein Großteil der Dateien besteht dabei aus Delphi-Records ("packed records" in Delphi 7).

Bsp:

         TNamensatz = packed record
                      SatzNr : Word;
                      Verein : Word;
                      Familienname,
                      Vorname,
                      WkPass : string[25];
                      Jahrgang : string[4];
                      Geschlecht : Char;
                      ArchivNr : Word;
                      RangCup : array [1..5] of Boolean;
                      Abmeldung : Boolean;
                      keinePunkte : Boolean;
                      Handicap : array [0..5] of Byte;
                      IDNr : string[5];
                      NamenZusatz : string[10];
                      end;

Bisher war es für uns natürlich kein Problem, diese Daten wieder auszulesen. Nun möchten wir aber Programm B auf Java umstellen (während A - zunächst - Delphi bleibt.

Meine Frage ist nun:

Gibt es eine Möglichkeit, diese Daten in eine entsprechende Java-Klasse einzulesen, ohne die Datei byte-/zeichenweise auszulesen?


Ich habe mich bereits in Richtung Serialisierung von Objekten umgeschaut, bin da aber recht schnell gebremst worden, da die Klassen (ich habe ObjectInputStream verwendet) wohl neben den Feldern auch eine Kennzeichnung der Klasse im Stream erwarten.
Ich erhalte bei meinem Versuch also eine Exception "java.io.StreamCorruptedException: invalid stream header".

[highlight=Java]
import java.io.*;
import java.io.IOException;

public class TempLoader {

/**
* @param args
*/
public static void main(String[] args) {
// TODO Auto-generated method stub


try {
ObjectInputStream f = new ObjectInputStream(new FileInputStream("G:/CPS/[url="[URL]http://SCWIMM.CPS/VERAN/TW_AUTOM/NAMEN.DAT[/URL]"][URL="http://SCWIMM.CPS/VERAN/TW_AUTOM/NAMEN.DAT"]SCWIMM.CPS/VERAN/TW_AUTOM/NAMEN.DAT[/url][/url]"));
Temp t = (Temp) f.readObject();
t.test();
} catch (FileNotFoundException e) {
// TODO Auto-generated catch block
e.printStackTrace();
} catch (IOException e) {
// TODO Auto-generated catch block
e.printStackTrace();
} catch (ClassNotFoundException e) {
// TODO Auto-generated catch block
e.printStackTrace();
}
}

}
[/highlight]

Gibt es vielleicht eine Klasse, die das, was ich möchte, kann?


Oder bewahrheitet sich eher meine Befürchtung, dass Java beim Einlesen von Objekten immer eine Kennzeichnung benötigt, welches Feld nun gelesen wird und dass die Reihenfolge/Typen der Felder alleine nicht ausreicht.

Mit der Hoffnung einen regelkonformen, ersten Einstieg in dieses Forum gefunden zu haben, verbleibe ich

mit freundlichen Grüßen

Markus Patt


PS:
Bitte keine Kritik zum Stil dieses Codeschnipsels. Ich kann auch "schön".

 

[0x7F800000]

nachdem ich seit ca. 8 Jahren mit Delphi unterwegs war, habe ich micht entschieden, mich nun auch intensiver mit Java zu beschäftigen

Java hin oder her... mit XML wäre man wohl von anfang an besser dran gewesen, immerhin verstehen das alle. :noe: Nun gut, jetzt ist eh zu spät^^

Beide Programme wurden in Delphi entwickelt (A Delphi 1, B Delphi 7). Ein Großteil der Dateien besteht dabei aus Delphi-Records ("packed records" in Delphi 7).

Das sind einfach solche Textdateien? Ist doch schonmal schön übersichtlich...

Gibt es eine Möglichkeit, diese Daten in eine entsprechende Java-Klasse einzulesen, ohne die Datei byte-/zeichenweise auszulesen?

kA, kenn mich mit Delphi nicht so wirklich aus... Wie populär schätzst du denn das Format ein? Könnte ja sein, dass das jemand schonmal benötigt und ordentlich implementiert hat. Schon ordentlich rumgegoogelt? Wenn es bisher nichts gibt: dann bist du halt der Pionier *fahne-in-die-hände-drück*

"Zeichenweise" müsstest du das sicherlich nicht auslesen... Zum einen gibt es für Java zuhauf parsergeneratoren um jeden beliebig komplexen Quatsch zu parsen, zum anderen sieht das Format regulär aus, lässt sich also mit Regex kleinkriegen
(java.util.regex.*) Wenn du schon 8 Jahre lang programmiert hast, wird dir das Konzept ja wohl bekannt sein, ein bisschen in die Syntax einarbeiten und los gehts...

Ich habe mich bereits in Richtung Serialisierung von Objekten umgeschaut, bin da aber recht schnell gebremst worden, da die Klassen (ich habe ObjectInputStream verwendet) wohl neben den Feldern auch eine Kennzeichnung der Klasse im Stream erwarten.
Ich erhalte bei meinem Versuch also eine Exception "java.io.StreamCorruptedException: invalid stream header".

Was soll denn deiner Meinung nach beim Aufruf von f.readObject(); passieren? ???:L Woher soll die methode denn wissen, welche konkrete readObject()-implementierung sie aufrufen soll, wenn sie nichts vom einzulesenden Objekt weiß? Soll sie das blind mit Integer, Long, Double, String usw. durchprobieren or what... Wie sieht denn deine readObject()-implementierung bei "Temp" denn überhaupt aus?

Gibt es vielleicht eine Klasse, die das, was ich möchte, kann?

kA. Wie gesagt: weitergoogln, oder abwarten, bis hier vielleicht jemand mit delphi-erfahrung meldet.

Oder bewahrheitet sich eher meine Befürchtung, dass Java beim Einlesen von Objekten immer eine Kennzeichnung benötigt, welches Feld nun gelesen wird und dass die Reihenfolge/Typen der Felder alleine nicht ausreicht.

Ich versteh ehrlich gesagt bisher nicht, was du da überhaupt versucht hast... Hast du die Standard-readObject methode auf eine textdatei losgelassen oder was soll man sich unter dem code da vorstellen? :bahnhof:

Naja, mal schaun... Java ist auf jeden fall turing-vollständig, also findet sich auch für dein problem früher oder später eine Lösung^^ :smoke:

 

[Noctarius]

Ich glaube nicht, dass es eine entsprechende Klasse bereits gibt. Ich glaube du bist schneller dran direinen Converter in Delphi zu bauen, der es einließt und in XML oder als CSV exportiert. Dafür baust du dir dann einen Loader in Java

 

[0x7F800000]

Ich glaube nicht, dass es eine entsprechende Klasse bereits gibt. Ich glaube du bist schneller dran direinen Converter in Delphi zu bauen, der es einließt und in XML oder als CSV exportiert. Dafür baust du dir dann einen Loader in Java

Aaah, wirklich, gute idee... Das ist wie mit der französischen Eisenbahn: auch wenn es keine direkte Verbindung A-B gibt, dann gibt es sicherlich verbindung A-Paris-B.
Von Delphi-Record nach XML muss es sicher was in Delphi geben.
Von XML nach Java ist dann sowieso kein Problem...

 

[HannsW]

Eine Möglichkeit wäre, von packed Record auf normale Recors umzusteigen, dann hast Du feste Strukturlängen.
Ansonsten weisst DU , welche Daten du erwartest, und kannst mir nem ByteStream die Werte einlesen.

ICh nehme an, Ihr schreibt die Daten als Zwischenpuffer auf ne PlattenDatei ?
dann als Textdatei schreiben.

Ansonsten empfehle ich Euch, zuerst das ZeitMesssystem umzustellen, und dann Euer AuswerteProgramm.

Mir ist nicht ganz klar, WIE Ihr den Austausch in Delphi vollzogen habt? greifen beide auf ne Datenbank zu ?
Ich selbst habe das auch mal mit Delphi5 und Pervasive gemacht, aber da war es kein Problem: Delphi grieft auf Pervasive zu , un Java hat ne wunderbare Schnittstelle. ( Aber das hilftEuch sicher nicht weiter?)

 

[Noctarius]

Aaah, wirklich, gute idee... Das ist wie mit der französischen Eisenbahn: auch wenn es keine direkte Verbindung A-B gibt, dann gibt es sicherlich verbindung A-Paris-B.

Ähm? Oo Fehlte da ein Ironie-Tag? Wenn ja, hast du dann eine bessere Idee?

 

[0x7F800000]

Ähm? Oo Fehlte da ein Ironie-Tag?

nein, wieso... :bahnhof:? Ich habe das mit XML in einer weniger konstruktiven Form doch auch gleich erwähnt, nur ist mir blöderweise nicht eingefallen, dass man auch nachträglich mit delphi alles in xml umwandeln kann, deswegen fand ich deinen Vorschlag recht erleuchtend. War keine Ironie drin. Bessere Ideen habe ich auch nicht (es sei denn der OP findet jetzt irgendeine java-klasse, mit der man das direkter bewerkstelligen kann...)

 

[Noctarius]

Achso ok, der Satz mit der französischen Eisenbahn hatte einen leichten Anflug von Ironie ^^ Deswegen lieber einmal mehr nachfragen

Mit dem Packet Record als Bytestream ginge bestimmt, dazu müsste man aber die Beschreibung haben und vor allem wofür das "packet" steht, das aus den Daten herausfinden ist vermutlich nicht so einfach.

Für zukünftige Fälle entweder dann das Delphiprogramm anpassen, dass es direkt Daten in XML speichert (falls es weiter verwendet werden soll) oder eben einmal Datenbestand konvertieren und dann ab sofort in Java wegspeichern

 

[HannsW]

Achso ok, der Satz mit der französischen Eisenbahn hatte einen leichten Anflug von Ironie

wieso : verbindung A-Paris-B.
Du fährst von A nach Paris, steigst dort um, und fährst weiter nach B

das "packet" steht,

Kann man bei Delphi erfahren = keine festen Datenlängen!


Komisch nur, dass der ThreadOwner sich um sein Problem nicht mehr kümmert?

 

[MPirious]

Zunächst einmal vielen Dank für die zahlreichen Antworten.

Einige Punkte scheinen in meiner ersten Beschreibung noch nicht ganz richtig rüber gekommen zu sein.

Java hin oder her... mit XML wäre man wohl von anfang an besser dran gewesen, immerhin verstehen das alle.

Das Programm ist nicht von mir, aber als es erstellt wurde, war noch gar nicht klar, dass die Daten von jemand anderem gelesen werden müssen.

Das sind einfach solche Textdateien? Ist doch schonmal schön übersichtlich...

Leider nein. Die Dateien, die das Programm schreibt (und ich lesen will) sind leider gar nicht übersichtlich.
Zunächst sind es keine Textdateien.
Delphi schreibt das (in etwa) so:

SatzNr : Word; --> 2 Byte = eine Zahl
WkPass : string[25]; -> 26 Byte, 1. Byte Länge,
                                 2 - Länge Inhalt,
                                 Länge+1 - Ende Zufall

Wie populär schätzst du denn das Format ein?

Es dürfte ziemlich genau 2 Programme geben, die dieses Format nutzen.

Eine Möglichkeit wäre, von packed Record auf normale Recors umzusteigen, dann hast Du feste Strukturlängen.

Delphi 1 (schreibendes Programm) kann nur packed, soweit ich weiß.
Mit packet Records habe ich aber auch feste Längen. (Sogar genauere, als normale, da diese ausgerichtet werden.)

Ansonsten weisst DU , welche Daten du erwartest, und kannst mir nem ByteStream die Werte einlesen.

Das war genau der Punkt, den ich vermeiden wollte. Natürlich weiß ich, dass z.B. in den ersten beiden Bytes die Satznr. steht und in den beiden nächsten die VereinsID. Aber ich hatte gehofft, die Struktur vorgeben zu können, Java zu sagen "lesen" und die Struktur fertig zu erhalten, ohne die einzelnen Felder von Hand zu füllen.

ICh nehme an, Ihr schreibt die Daten als Zwischenpuffer auf ne PlattenDatei ?

Das Programm zur Auswertung benutzt diese Daten als Speicher. Wir greifen nur darauf zu.

dann als Textdatei schreiben.

Ansonsten empfehle ich Euch, zuerst das ZeitMesssystem umzustellen, und dann Euer AuswerteProgramm.

Eine Umstellung der Auswertung ist leider (noch) nicht möglich, da diese nicht von mir/uns ist. Wir arbeiten nur relativ eng mit dem Entwickler dieses Programmes zusammen.

Mir ist nicht ganz klar, WIE Ihr den Austausch in Delphi vollzogen habt? greifen beide auf ne Datenbank zu ?

Jain. Im Prinzip hat der Entwickler der Auswertung eine Datenbank nachgebildet. (Ein furchtbares Format!)

Wir arbeiten daran ihn zu überzeugen, auch umzustellen. Java (Plattformunabhängigkeit) und ordentliche Datenbank.

Ich glaube du bist schneller dran direinen Converter in Delphi zu bauen, der es einließt und in XML oder als CSV exportiert. Dafür baust du dir dann einen Loader in Java

Da die Daten sich laufend ändern (können), ist ein Konverter leider keine Möglichkeit.

dazu müsste man aber die Beschreibung haben und vor allem wofür das "packet" steht, das aus den Daten herausfinden ist vermutlich nicht so einfach.

Beschreibung ist vorhanden.

Das Schlüsselwort "packet" hat in Delphi folgende Bedeutung:

Man kann Delphi mitteilen, dass es Records (=STRUCTs) und Arrays an 1, 2, 4 oder 8-Byte Grenzen ausrichten soll, um die Zugriffsgeschwindigkeit zu erhöhen.
Wenn ich also z.B: ein Byte Array habe und dieses an 4-Byte Grenzen ausgerichtet werden soll, habe ich Byte Daten (1. Element), 3 Byte "frei", 1 Byte Daten (2. Element), 3 Byte "frei", usw.
Durch Verwendung des Schlüsselwortes "packed" entfällt dieser Freiraum.

Komisch nur, dass der ThreadOwner sich um sein Problem nicht mehr kümmert?

Entschuldigt bitte, aber ich war zum Zeitpunkt meiner Frage

Heute 05:53

nicht schon, sondern noch wach. Und ich gehöre zu den Entwicklern, die zwischendurch schlafen.

Gruß

Markus

 

[0x7F800000]

Das Programm ist nicht von mir, aber als es erstellt wurde, war noch gar nicht klar, dass die Daten von jemand anderem gelesen werden müssen.

Perfekt für die Zukunft geplant^^ ;(

Das war genau der Punkt, den ich vermeiden wollte. Natürlich weiß ich, dass z.B. in den ersten beiden Bytes die Satznr. steht und in den beiden nächsten die VereinsID. Aber ich hatte gehofft, die Struktur vorgeben zu können, Java zu sagen "lesen" und die Struktur fertig zu erhalten, ohne die einzelnen Felder von Hand zu füllen.

Öhm, wo ist da der Unterschied? Ob du jetzt irgendeine "Strukturbeschreibung" a lá
"dies ist hier und da, fängt am 137. byte an und es ist ein integer-array der länge 100 bytes"
angibst, oder direkt sagst:
"lese integer-array anfangend bei byte 137, länge 100 ein"
ist doch vollkommen gleichwertig... Hier ist das Erklären wie etwas zu machen ist genauso aufwendig wie selber machen.

Jain. Im Prinzip hat der Entwickler der Auswertung eine Datenbank nachgebildet. (Ein furchtbares Format!)

Wir arbeiten daran ihn zu überzeugen, auch umzustellen. Java (Plattformunabhängigkeit) und ordentliche Datenbank.

Hört sich nach einem Fall für Napalm an. Sicher, dass alles einreißen und selber neubauen nicht billiger wäre, als sich mit einer unschönen Lösung von jemand anders rumzuschlagen?

Da die Daten sich laufend ändern (können), ist ein Konverter leider keine Möglichkeit.

Schreib Java-Prog, das nur sinnvoll strukturiertes XML einliest, und zwar auch so, dass sich auch dieses Modul schnell aus schmerzlos auswechseln lässt. Um an die Delphi-gespeicherten daten zu kommen, schreibst du dir einen Konverter in Delphi, der diese merkwürdigen Delphi-Dateien nimmt, und XML ausgibt. Den rufst du dann von Java über JNI jedes mal auf, wenn du was einlesen willst. Ist zwar ne Menge Overhead, und es ist nicht Plattformunabhängig, aber was soll's... Worum ging's da? Schwimmwettbewerbe...?

 

[MPirious]

Hallo,

entschuldigt zunächst bitte, dass ich nichts habe von mir hören lassen.

"dies ist hier und da, fängt am 137. byte an und es ist ein integer-array der länge 100 bytes"[/i] angibst, oder direkt sagst:
"lese integer-array anfangend bei byte 137, länge 100 ein"
ist doch vollkommen gleichwertig... Hier ist das Erklären wie etwas zu machen ist genauso aufwendig wie selber machen.

Nicht unbedingt.
In Delphi hatte ich die Möglichkeit, ein Record zu erstellen. Dies diente einerseits als Beschreibung, wie die Daten aufgebaut sind, und andererseits als "Datenspeicher" innerhalb des Programms.

Ich brauchte also nur sagen, "lies mir den x. Record aus der Datei" und hatte die Daten fix und fertig vorliegen.

Sicher, dass alles einreißen und selber neubauen nicht billiger wäre, als sich mit einer unschönen Lösung von jemand anders rumzuschlagen? ;-)

Auch wenn das Programm unschön ist: Wir sind nicht nur Entwickler, sondern auch Anwender dieses Programms. Und bis wir ein Programm mit gleichwertigem Funktionsumfang haben (ohne "abzuschreiben", da ersteres kommerziell vertrieben wird), dauert seine Zeit.

Davon abgesehen: Um eine Neuentwicklung des Programms wird der Entwickler nicht drumherum kommen, da es unter Vista nur sehr eingeschränkt und unter Win7 gar nicht mehr läuft. Wie gesagt: Delphi 1 = 16 Bit-Programmierung.

Schreib Java-Prog, das nur sinnvoll strukturiertes XML einliest, und zwar auch so, dass sich auch dieses Modul schnell aus schmerzlos auswechseln lässt. Um an die Delphi-gespeicherten daten zu kommen, schreibst du dir einen Konverter in Delphi, der diese merkwürdigen Delphi-Dateien nimmt, und XML ausgibt. Den rufst du dann von Java über JNI jedes mal auf, wenn du was einlesen willst. Ist zwar ne Menge Overhead, und es ist nicht Plattformunabhängig, aber was soll's... Worum ging's da? Schwimmwettbewerbe...?

Ich denke, wir werden in den sauren Apfel beißen und die Daten byteweise auslsesen. (Dabei aber natürlich daran denken, dass diese auch aus andern Quellen stammen können/werden.)

Worum ging's da? Schwimmwettbewerbe...?

Yep.

Zum Schluss nochmal ein großes Dankeschön an alle Helfer und Ideengeber. :applaus:

Viele Grüße
Markus

PS: Weiß jemand, warum mir das Forum bei jeder Vorschau Folgendes an meinen Text hängt?

[COLOR=#000000 ! important][FONT=Arial ! important][/FONT][/color][COLOR=#000000 ! important][FONT=Arial ! important][/FONT][/COLOR]