(AutoIt) Download and Trust the DigiCert Global Root CA

Demonstrates how to download a root certificate and trust it.

For more information, see https://www.digicert.com/digicert-root-certificates.htm

Chilkat ActiveX Downloads ActiveX for 32-bit and 64-bit Windows

; This requires the Chilkat API to have been previously unlocked.
; See Global Unlock Sample for sample code.

; In this example, the URLs for the DigiCert root CA certs are available at this web page:
; https://www.digicert.com/digicert-root-certificates.htm

; This example downloads the "DigiCert Global Root G3"
; Valid until: 15/Jan/2038
; Serial #: 05:55:56:BC:F2:5E:A4:35:35:C3:A4:0F:D5:AB:45:72
; Thumbprint: 7E04DE896A3E666D00E687D33FFAD93BE83D349E

Local $sCertUrl = "https://dl.cacerts.digicert.com/DigiCertGlobalRootG3.crt"

$oHttp = ObjCreate("Chilkat.Http")
$oBdCert = ObjCreate("Chilkat.BinData")
Local $bSuccess = $oHttp.DownloadBd($sCertUrl,$oBdCert)
If ($bSuccess = False) Then
    ConsoleWrite($oHttp.LastErrorText & @CRLF)
    Exit
EndIf

; Load it into a Chilkat cert object.
$oCert = ObjCreate("Chilkat.Cert")
$bSuccess = $oCert.LoadFromBd($oBdCert)
If ($bSuccess = False) Then
    ConsoleWrite($oCert.LastErrorText & @CRLF)
    Exit
EndIf

; Examine the common name,serial, and thumbprint:
ConsoleWrite("CN: " & $oCert.SubjectCN & @CRLF)
ConsoleWrite("Serial: " & $oCert.SerialNumber & @CRLF)
ConsoleWrite("Thumbprint: " & $oCert.Sha1Thumbprint & @CRLF)

; Output from the above:
; CN: DigiCert Global Root G3
; Serial: 055556BCF25EA43535C3A40FD5AB4572
; Thumbprint: 7E04DE896A3E666D00E687D33FFAD93BE83D349E

; If desired, the certificate can be saved to a local file so it does not need
; to be downloaded from the website every time.  
Local $sCertPath = "qa_data/certs/DigiCertGlobalRootG3.crt"
$bSuccess = $oBdCert.WriteFile($sCertPath)

; To load the cert from a file...
$bSuccess = $oCert.LoadFromFile($sCertPath)

; Do the following to add the cert to the collection of trusted roots
; for this application.  (Note:  The trust is not persisted.  Each time the
; application runs, it should load the cert (from whatever source, whether it is
; a file, a database,etc.) and do the following:
$oTroots = ObjCreate("Chilkat.TrustedRoots")

$oTroots.AddCert($oCert)
$oTroots.Activate()

ConsoleWrite($oCert.SubjectCN & " is now trusted for this run of this application." & @CRLF)