Delphi-PRAXiS - Delphi Certificate lesen IdSSLIOHandlerSocketOpenSSL

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)

- GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)

- - Delphi Certificate lesen IdSSLIOHandlerSocketOpenSSL (https://www.delphipraxis.net/146481-certificate-lesen-idssliohandlersocketopenssl.html)

Certificate lesen IdSSLIOHandlerSocketOpenSSL

Hi,

ich finde einfach nicht raus wie ich an das empfangene Cert. komme um es zu speichern. Dann könnte man das sichern und in dem object angeben. Dann muss es nicht jedesmal gehohlt werden.

Danke im voraus

Re: Certificate lesen IdSSLIOHandlerSocketOpenSSL

Hallo DelTurbo,

Zitat:

Zitat von DelTurbo

ich finde einfach nicht raus wie ich an das empfangene Cert. komme um es zu speichern. Dann könnte man das sichern und in dem object angeben. Dann muss es nicht jedesmal gehohlt werden.

Nicht jedesmal holen :?: Das der Server sein Zertifikat sendet ist Teil des SSL/TLS Handshakes, nicht optional und daher unumgänglich...

Aber wems nützt: Die Methode OnVerifyPeer nutzen, dort Certificate.DisplayInfo auswerten (abstrakte TStrings).

Delphi-Quellcode:

			function TForm1.IdSSLIOHandlerSocketOpenSSL1VerifyPeer(Certificate: TIdX509;

  AOk: Boolean; ADepth: Integer): Boolean;

begin

  Memo1.Lines.Add(Certificate.DisplayInfo); // dump cert

end;

Das macht einen Dump des erhaltenen X.509 Zertifikats.

Gruß Assertor