PHP gzcompress(); Delphi ZDecompressStr ( ) Data error

[luisk]

weitere Versuche:

bleibt in einer Endlosschleife hängen:

Delphi-Quellcode:

idhttp1.Get( l_url , l_in_Stream );
   ZDecompressStream(l_in_Stream,  l_out_Stream );

bringt Data Error

Delphi-Quellcode:

idhttp1.Get( l_url , l_in_Stream );
   GZDecompressStream(l_in_Stream,  l_out_Stream );

Diese Variante bleibt auch hängen :
https://www.experts-exchange.com/que...P-content.html

Delphi-Quellcode:

 idhttp1.Intercept:= self.IdCompressionIntercept1;
           ls :=  idhttp1.Put( l_url , nil );

hier kommt die Meldung "Dekomprimierungsfehler":

Delphi-Quellcode:

idhttp1.Intercept:= self.IdCompressionIntercept1;
       idhttp1.Get( l_url , l_in_Stream );

Anmerkung: wenn ich nicht zippe, kann ich auch über den Stream die Daten richtig empfangen
und darstellen.

[Valle]

mjustin hat es schon angedeutet. Eine andere Möglichkeit wäre es, die in HTTP eingebaute Übertragungskompression zu verwenden.

Dazu musst du deinen Webserver entsprechend einrichten. Oft ist er das auch schon. Falls nicht kann ich dir dabei helfen.

Außerdem musst du im Client die Kompression aktivieren.

Technisch betrachtet sendet der Client einen HTTP Header mit (Accept-Encoding: gzip, deflate). Der Server antwortet dann, wenn er gzip unterstützt, mit einem weiteren Header (Content-Encoding: gzip). Der Content-Type Header bleibt unverändert.

[Luckie]

Wie viele MB hat denn der String, den du übertragen willst, dass man ihn komprimieren muss?

[luisk]

Zitat:

Zitat von Luckie (Beitrag 1339099)

Wie viele MB hat denn der String, den du übertragen willst, dass man ihn komprimieren muss?

ich sende an PHP meine SQL-Abfragen und erhalte dann die Abfrageergebnisse zurück.
Es läuft super. Mit Komprimierung könnte ich hat das Volumen über das Netz deutlich reduzieren.
Die Tabelle mit der ich getestet habe, hatte 0,3 MB. Es kommen natürlich auch noch größere.
Allerdings kann man dann ja die Menge über Limit x,y einteilen.
Mich interessiert es mal generell, wie man diese Kopplung PHP-Delphi über die Komprimierung hinbekommt.

[luisk]

Zitat:

Zitat von Valle (Beitrag 1339098)

mjustin hat es schon angedeutet. Eine andere Möglichkeit wäre es, die in HTTP eingebaute Übertragungskompression zu verwenden.

Dazu musst du deinen Webserver entsprechend einrichten. Oft ist er das auch schon. Falls nicht kann ich dir dabei helfen.

Außerdem musst du im Client die Kompression aktivieren.

Technisch betrachtet sendet der Client einen HTTP Header mit (Accept-Encoding: gzip, deflate). Der Server antwortet dann, wenn er gzip unterstützt, mit einem weiteren Header (Content-Encoding: gzip). Der Content-Type Header bleibt unverändert.

Ich hole die SQL-Abfragedaten Daten ja über Tidhttp. Daher muss ich ja in Verbindung mit dieser Klasse dekomprimieren, oder gleich nach der Übertragung.
Über

Delphi-Quellcode:

<?php  ob_start("ob_gzhandler");?>

kann ich auch alle php-Ausgaben automatisch zippen.
Das Problem ist nun die Dekompression über Indy.

[Valle]

Zitat:

Zitat von luisk (Beitrag 1339101)

Ich hole die SQL-Abfragedaten Daten ja über Tidhttp. Daher muss ich ja in Verbindung mit dieser Klasse dekomprimieren, oder gleich nach der Übertragung.
Über [...] kann ich auch alle php-Ausgaben automatisch zippen.
Das Problem ist nun die Dekompression über Indy.

Ja, das habe ich schon verstanden!

Aber wenn das nicht funktioniert, kann ich dir empfehlen den dafür vorgesehenen Weg über den Webserver und -Browser zu verwenden. Dein Webserver kann das bereits. Und das aus gutem Grund. Benutz es doch, wenn er es kann. Dafür ist es da. Und ich vermute dass es damit einfacher funktioniert.

[luisk]

Zitat:

Zitat von Valle (Beitrag 1339102)

Zitat:

Zitat von luisk (Beitrag 1339101)

Ich hole die SQL-Abfragedaten Daten ja über Tidhttp. Daher muss ich ja in Verbindung mit dieser Klasse dekomprimieren, oder gleich nach der Übertragung.
Über [...] kann ich auch alle php-Ausgaben automatisch zippen.
Das Problem ist nun die Dekompression über Indy.

Ja, das habe ich schon verstanden!

Aber wenn das nicht funktioniert, kann ich dir empfehlen den dafür vorgesehenen Weg über den Webserver und -Browser zu verwenden. Dein Webserver kann das bereits. Und das aus gutem Grund. Benutz es doch, wenn er es kann. Dafür ist es da. Und ich vermute dass es damit einfacher funktioniert.

Ich brauche die Daten ja nicht im Webbrowser, sondern in meiner Delphi-Anwendung.
Und dazu muss ich ja die Daten über diese Indy-Komponente holen, was auch funktioniert.
Nur wie kann ich sie nun entpacken ?
Hätte nicht gedacht, dass es ein Problem ist.
Umgekehrt zippe ich meine Daten auch vor dem Upload mit Delphi, und PHP kann sie problemlos auspacken.

[Valle]

Uff.

Also, nochmal. Du kannst das deinen Webserver machen lassen. Der kann bereits gzip und macht genau das was du da vorhast. Nur dass du dir den Code sparst und die Probleme die du damit (offensichtlich!) hast auch. Schau dir mjustins Beitrag an, wie man das in der TIdHTTP Komponente einstellt. Die allermeisten Webserver haben Gzip in ihrer Standardkonfiguration bereits aktiviert. Falls das bei deinem nicht der Fall ist, kann man das aber einfach aktivieren.

(Und dabei ist es egal ob Browser oder Indy HTTP Client. Der Transportweg HTTP hat Gzip Komprimierung eingebaut und das kannst du nutzen, wenn es manuell über deine Anwendungsdaten nicht so einfach funktioniert.)

[luisk]

das mit dem Zippen funktioniert doch auf der Serverseite
Das Problem liegt doch bei IdHTTP1: TIdHTTP; in meiner Delphi-FMX-Anwendung

[luisk]

Zitat:

Zitat von mjustin (Beitrag 1339083)

Die Indy TIdHTTP Komponente kann auch von Haus aus GZIP dekomprimieren, dazu muss einfach eiine TIdCompressorZLib Komponente erzeugt und der TIdHTTP.Compressor Property zugewiesen werden. Fundstelle: http://stackoverflow.com/a/8597492/80901

Das hab ich probiert - Funktioniert aber nicht !

Diese Variante bleibt auch hängen :
Quelle:
https://www.experts-exchange.com/que...P-content.html

Delphi-Quellcode:

 idhttp1.Intercept:= self.IdCompressionIntercept1;
           ls :=  idhttp1.Put( l_url , nil );

hier kommt die Meldung "Dekomprimierungsfehler":

Delphi-Quellcode:

idhttp1.Intercept:= self.IdCompressionIntercept1;
       idhttp1.Get( l_url , l_in_Stream );

Vielleicht klappt es bei Dir und Du kannst mir nen Tip geben.