(Lianja) X509Certificate GetCertHash SHA256
Shows how to get the SHA256 hash of a certificate.
loCert = createobject("CkCert")
// Load a certificate object with a certificate.
// The certificate object could have come from any source,
// or perhaps was obtained from another Chilkat function.
// The source does not matter. What matters is that we have
// a cert object loaded with the certificate..
llSuccess = loCert.LoadFromFile("qa_data/certs/cert_test123.cer")
if (llSuccess <> .T.) then
? loCert.LastErrorText
release loCert
return
endif
// Get the binary DER of the certificae, and compute the SHA256 hash:
loBdDer = createobject("CkBinData")
loCert.ExportCertDerBd(loBdDer)
// Get the base64 representation of the SHA256 hash.
lcCertHash = loBdDer.GetHash("sha256","base64")
? "Certificate hash in base64 = " + lcCertHash
release loCert
release loBdDer
|