HTTPS ohne OpenSSL?

[MmVisual]

Hallo,

Mein Provider hat leider umgestellt auf HTTPS und HTTP wird automatisch immer zu HTTPS, das ist echt doof, nun kann ich nicht mehr einfach eine Versionsinfo von meiner EXE laden.
Gibt es eine Komponente mit der ich per GET Befehl eine HTTPS Seite laden kann ohne dass ich extra die OpenSSL DLL's benötige?

Beispiel: http://www.mmvisual.de/download/version.xml

Die EXE läuft Stand allone in allen möglichen Betriebssystemen und wenn ich da noch zusätzlich dieses OpenSSL brauche, dann verkompliziert es die Einfachheit von der EXE enorm.

Vielen Dank für die Hilfe.

VG Markus.

[theo]

Kannst du das nicht so konfigurieren, dass nicht automatisch umgeleitet wird?
Bei meinem Provider ist das eine Option.

Um SSL Libs wirst du sonst nicht herum kommen, soweit ich weiss.

[MmVisual]

Mein früherer Provider hat seine Firma verkauft, das ging so lange gut bis die nun das ganze vollends in ihre eigene Server umgezogen haben.
Der neue Provider hat eine grottenschlechte Web Konfigurationsoberfläche wo man nichts einstellen kann.

Ich habe denen ein Support Ticket geschrieben, mal schauen ob die antworten.

[Jorg3000]

Moin!
Unter Windows geht HTTPS mit Bordmitteln, umgesetzt in der Unit WinINet
https://wiki.freepascal.org/Windows_Pro ... _retrieval
Grüße, Jörg

[corpsman]

Da würde ich dann doch lieber die .dll als Ressource ins Projekt hohlen und dynamisch nach laden, ..

[MmVisual]

Es sollte etwas sein, was nativ funktioniert, also nicht abhängig ist vom OS.

[Warf]

Es sollte etwas sein, was nativ funktioniert, also nicht abhängig ist vom OS.

Naja du könntest einfach über ein IFDEF sowohl die Windows als auch die FPWeb variante einbauen. Unter Linux (und ich glaube auch MacOS) sind die OpenSSL bibliotheken systemweit installiert, d.h. da brauchst du dir darum keine sorgen zu machen.

[theo]

@MmVisual: Ich glaube du wurdest von deinem Provider erhört.
So geht es jetzt bei mir:

Code: Alles auswählen

var
  HTTP: THTTPSend; //Synapse unit httpsend
  Res:Boolean;
begin
  HTTP := THTTPSend.Create;
  try
    HTTP.UserAgent:='Mozilla/5.0 (X11; Linux x86_64; rv:102.0) Gecko/20100101 Firefox/102.0';
    Res := HTTP.HTTPMethod('GET', 'http://www.mmvisual.de/download/version.xml');
    if Res then Memo1.Lines.LoadFromStream(HTTP.Document);
  finally
    HTTP.Free;
  end;
end;   

Achtung: Einen UserAgent braucht es, sonst mosert deine "Web Application Firewall "

[MmVisual]

Vielen Dank, theo! Es klappt!

Ja, diese Fehlermeldung hatte ich auch gesehen und ich konnte damit rein gar nichts anfangen, denn eine "index.html" liegt in dem Ordner bereits drin, damit man da keine "File Walking" betreiben kann. Wenn man kein Web-Spezi ist, dann weiß man das einfach nicht was deren Server noch extra haben will.

Bild1.png (15.29 KiB) 1424 mal betrachtet

[TBug]

Hallo,

Da würde ich dann doch lieber die .dll als Ressource ins Projekt hohlen und dynamisch nach laden, ..

Das hatte ich auch schon öfters im Sinn, aber scheitere jedesmal kläglich, wenn ich einen Versuch starte, die DLLs für die Nutzung mit den Indy-Komponenten in das Programm einzubinden und zu laden.

Falls jemand ein konkretes HowTo dafür hätte, wäre ich sehr dankbar.

[MmVisual]

Variante 1:
- Die OpenSSL DLL's als Ressource verpacken
- Mit in die EXE linken
- vor dem ersten Nutzen diese aus der Ressource laden und in das gleiche Verzeichnis der EXE ablegen

Variante 2:
- Die OpenSSL DLL's erst zippen und dann als Ressource verpacken
- Mit in die EXE linken
- vor dem ersten Nutzen diese aus der Ressource laden mit Abbrevia entpacken und in das gleiche Verzeichnis der EXE ablegen

Problem: Die Exe darf nicht nach C:\Programme schreiben, dann muss man irgend ein Temp-Verzeichnis verwenden und man muss die DLL aus diesem Temp Verzeichnis einbinden.

Wie man eine DLL direkt aus dem RAM nutzen kann weiß ich nicht, das wäre jedoch die "Krönung", dann muss man diese nicht unbedingt auf der Festplatte ablegen.

So ähnlich mit Dateien in Ressource packen habe ich es mit der Programm Hilfe gemacht, alle HTML Dateien rein in die Ressource, dann kann man diese innerhalb der EXE als Stream nutzen und über eine THTMLViewer Komponente laden, ganz ohne Dateien.
Jedoch wie man eine DLL als Stream laden kann weiß ich nicht (LoadLibrary(Stream: TStream) gibt es nicht, bzw. GetProcAddress(Stream, FunctionName) auch nicht).

[Socke]

Wie man eine DLL direkt aus dem RAM nutzen kann weiß ich nicht, das wäre jedoch die "Krönung", dann muss man diese nicht unbedingt auf der Festplatte ablegen.

Zumindest hat es mal jemand für Windows versucht: https://github.com/fancycode/MemoryModule

[Jorg3000]

Wie man eine DLL direkt aus dem RAM nutzen kann weiß ich nicht, das wäre jedoch die "Krönung", dann muss man diese nicht unbedingt auf der Festplatte ablegen.

Zumindest hat es mal jemand für Windows versucht: https://github.com/fancycode/MemoryModule

Moin!
Und hier die Adaption für Delphi/Lazarus: https://github.com/Fr0sT-Brutal/Delphi_MemoryModule

Ich habe es noch nicht getestet, bin aber interessiert. Leider kann ich aus der Beschreibung nicht herauslesen, ob es auch für 64-Bit DLLs funktioniert.
Ich hatte vor Jahren mal eine Umsetzung gefunden, die damals nur mit 32 Bit funktionierte und deshalb für mich uninteressant war.

[Socke]

Leider kann ich aus der Beschreibung nicht herauslesen, ob es auch für 64-Bit DLLs funktioniert.

Zumindest hat man sich im Code ein paar Gedanken zu 64Bit und auch zum FPC gemacht:

Code: Alles auswählen

{$IFDEF FPC}
  {$mode delphi}
  {$IFDEF CPU64}
    {$DEFINE CPUX64}
  {$ENDIF}
{$ENDIF}

[fliegermichl]

Ich habs nicht compiliert bekommen auch nicht 32 Bit