B4X

Require SSL Server Certificate Domain Match

See more HTTP Examples

Demonstrates how to require that the SSL server certificate's domain matches the intended domain. B4X

Dim success As Boolean = False

'  This example assumes the Chilkat API to have been previously unlocked.
'  See Global Unlock Sample for sample code.

Dim http As ChilkatHttp
http.Initialize("http")

'  Call SetSslCertRequirement to require that the SSL server certificate's domain
'  matches only the domain we are intending to communicate with.

'  In this example we will test with the URL https://wrong.host.badssl.com/
'  which intentionally has an SSL certificate that does not match "wrong.host.badssl.com"

http.SetSslCertRequirement("SAN", "wrong.host.badssl.com")

'  Also validate the server cert..
http.RequireSslCertVerify = True

'  Try sending the request.  It should fail within the SSL/TLS handshake
'  because the server's certificate does not match the domain "wrong.host.badssl.com"
Dim html As String = http.QuickGetStr("https://wrong.host.badssl.com/")
If http.LastMethodSuccess = False Then
    Log(http.LastErrorText)
Else
    Log("Unexpected success.")
End If