TsgcWebSocketClient › Olaylar › OnSSLVerifyPeer
VerifyCertificate etkinleştirildiğinde tetiklenir, böylece uygulama sunucu sertifikasını kabul edebilir veya reddedebilir.
property OnSSLVerifyPeer: TsgcOnSSLVerifyPeer;
// TsgcOnSSLVerifyPeer = procedure(Sender: TObject; Certificate: TIdX509; AOk: Boolean; ADepth, AError: Integer; var Accept: Boolean) of object
—
TLSOptions.VerifyCertificate True olduğunda ve seçilen IOHandler OpenSSL olduğunda, OnSSLVerifyPeer, sunucu tarafından sunulan zincirdeki her sertifika için bir kez tetiklenir. Certificate parametresi X.509 verilerini ortaya çıkarır, AOk OpenSSL'in kendi doğrulama sonucunu içerir, ADepth zincirdeki konumdur (leaf için 0) ve AError doğrulama başarısız olduğunda OpenSSL hata kodudur. Sertifikaya güvenmek için Accept'i True veya bağlantıyı iptal etmek için False olarak ayarlayın. OpenSSL yerine SChannel kullanıldığında, OnSChannelVerifyPeer kullanın.
function OnSSLVerifyPeer(Sender: TObject; Certificate: TIdX509;
AOk: Boolean; ADepth, AError: Integer; var Accept: Boolean);
begin
// ... validate the certificate
if AOk then
Accept := True
else
Accept := False;
end;