BufferedReader in Firemonkey?

[mjustin]

Zitat von Mavarik:

Wofür das ganze "geraffel" mit Java?
In der Zeit wo Du das gegoogled hast hättest Du das 3x schon in Delphi programmiert...

Die verlinkte Frage besagt ja, dass ein JInputStream (wo der jetzt her kommt ist wird nicht erläutert) über einen BufferedReader gelesen werden soll. Keiner mir bekannten Delphi Stream-Funktion kann man einen JInputStream als (z.B. Konstruktor-) Argument übergeben...

[Mavarik]

Zitat von mjustin:

über einen BufferedReader gelesen werden soll.

Von "gelesen werden soll" war keine Rede, sondern

Zitat von blackdrake:

die Java-Klasse "BufferedReader" und "InputStreamReader" verwenden möchte, um einen InputStream blockierungsfrei Zeile für Zeile lesen zu können.

Hierbei geht es für mich in erster Linie um die Funktionalität eines blockungsfreien Lesens...
Daher meine Antwort schreib es doch schnell in Delphi!

Mavarik

[blackdrake]

Vielen Dank für den Hinweis mit Java2OP! Ich habe dieses Tool noch nicht gekannt - hätte nicht gedacht, dass das Verwenden der Android API so einfach sein kann


Bzgl. "Blockierungsfrei lesen selbst programmieren" - das habe ich schon versucht. Allerdings ging das (wie in StackOverflow beschrieben) nur mit der JInputStream.available() Funktion, die laut Javadokumentation nicht für diesen Zweck verwendet werden soll, da der Wert nur eine grobe Schätzung ist - in der Tat haben manche Geräte wegen der schlechten Schätzung dauerhaft blockiert oder nie gelesen, da available() bei manchen Geräten immer 0 oder immer >0 war.

Daher war meine Absicht, den BufferedReader zu verwenden, da das die einzige saubere Möglichkeit ist, einen Stream zuverlässig blockierungsfrei zu lesen.

Der Vollständigkeit halber meinen alten Code, der wegen der schlechten Schätzung von available() nicht auf allen Geräten läuft:

Delphi-Quellcode:

var // of TBufLineJStream
  buf: TJavaArray<Byte>;
  FStream: JInputStream;
  FCurIncompleteString: String;
  FReadLines: TQueue<String>;

const // of TBufLineJStream
  BufferSize = 65536;

procedure TBufLineJStream._ReadFromStream;
var
  c: Char;
  i, readCount: integer;
begin
  while FStream.available > 0 do
  begin
    readCount := FStream.read(buf, 0, BufferSize);
    for i := 0 to readCount-1 do
    begin
      c := Chr(buf.Items[i]);
      if c = #13 then
      begin
        // The line is complete
        FReadLines.Enqueue(FCurIncompleteString);
        FCurIncompleteString := '';
      end
      else
      begin
        // The line is not complete yet
        FCurIncompleteString := FCurIncompleteString + c;
      end;
    end;
  end;
end;

function TBufLineJStream.ReadLineNonBlocking(var outStr: string): boolean;
begin
  _ReadFromStream;

  result := FReadLines.Count > 0;
  if result then outStr := FReadLines.Dequeue;
end;

Die Dokumentation von Java warnt vor eer Verwendung von available() um blockierungsfreies Lesen zu realisieren:

Zitat:

[...]

Note that this method provides such a weak guarantee that it is not very useful in practice.

Firstly, the guarantee is "without blocking for more input" rather than "without blocking": a read may still block waiting for I/O to complete — [...]

[...]

The default implementation of this method in InputStream always returns 0. Subclasses should override this method if they are able to indicate the number of bytes available.

[blackdrake]

Hallo,

ich konnte nun Java2OP nachvollziehen und habe die gleiche Unit herausbekommen.

Allerdings kommt bei folgender Zeile eine Fehlermeldung:

TRegTypes.RegisterType('Androidapi.JNI.Interfaces.JBufferedReader', TypeInfo(Androidapi.JNI.Interfaces.JBufferedReader));

[DCC Error] Androidapi.JNI.java.io.BufferedReader.pas(48): E2003 Undeclared identifier: 'Androidapi.Jni'

In der Tat gibt es keine Datei Androidapi.JNI.Interfaces.JBufferedReader.pas - wo bekomme ich die her?



PS: Wie ruft man den Konstruktor nun auf?

Delphi-Quellcode:

var
  x: JBufferedReader;
  AInputStream: JInputStream;
begin
  AInputStream := ...;
  x:= TJBufferedReader.Create; // <-- keine Parameter erwartet!
  TJBufferedReader(x).Init(AInputStream); // so?
end;

[mkinzler]

In der Tat gibt es keine Datei Androidapi.JNI.Interfaces.JBufferedReader.pas - wo bekomme ich die her? Das ist die Datei, die Java2OP erzeugt hat( entsprechend umbenennen, Dateiname = Unitname).

Zitat:

PS: Wie ruft man den Konstruktor nun auf?

Wenn ich die Beispiele richtig interpretiere, so:

Delphi-Quellcode:

var
  x: JBufferedReader;
  AInputStream: JInputStream;
begin
  AInputStream := ...;
  TJBufferedReader.JAVACLASS.Init(AInputStream); // so?
end;

[Sir Rufo]

Seid ihr euch alle sicher, dass Jave2Op hier richtig importiert?

Delphi-Quellcode:

unit Androidapi.JNI.java.io.BufferedReader; // aha, so heißt die Unit

interface

...

type
// ===== Forward declarations =====

  JBufferedReader = interface;//java.io.BufferedReader // aha, so heißt das Interface

...

implementation

procedure RegisterTypes;
begin
  TRegTypes.RegisterType(
    'Androidapi.JNI.Interfaces.JBufferedReader', // ähm, ist die nicht mit DIESER Unit deklariert worden
    TypeInfo(
      Androidapi.JNI.Interfaces.JBufferedReader // ähm, den Typen gibt es HIER
    )
  );
end;

initialization
  RegisterTypes;
end.

Also entweder man benennt die Unit um oder man passt das RegisterTypes an

Delphi-Quellcode:

unit Androidapi.JNI.java.io.BufferedReader; // aha, so heißt die Unit

type
    JBufferedReader = interface;//java.io.BufferedReader // aha, so heißt das Interface
...
procedure RegisterTypes;
begin
  TRegTypes.RegisterType(
    'Androidapi.JNI.java.io.BufferedReader.JBufferedReader', // ähm, ist die nicht mit DIESER Unit deklariert worden
    TypeInfo(
      Androidapi.JNI.java.io.BufferedReader.JBufferedReader // ähm, den Typen gibt es HIER
    )
  );
end;

[Union]

Das Registertype ist sowieso nur von Nöten, wenn man diese Typen in JNI Arrays verwenden möchte.

[Mavarik]

Zitat von blackdrake:

Bzgl. "Blockierungsfrei lesen selbst programmieren" - das habe ich schon versucht. Allerdings ging das (wie in StackOverflow beschrieben) nur mit der JInputStream.available() Funktion, die laut Javadokumentation nicht für diesen Zweck verwendet werden soll, da der Wert nur eine grobe Schätzung ist - in der Tat haben manche Geräte wegen der schlechten Schätzung dauerhaft blockiert oder nie gelesen, da available() bei manchen Geräten immer 0 oder immer >0 war.

OK, mach was Du willst.. aber lass doch einfach "JInputStream.available()" mist weg... Bau dir nen netten Thread mit einen Buffer und lies über davon Blockungsfrei ein. Fertig in 10 min.

Ich habe fertig...