(PowerBuilder) Get PDF Signer Certs

See more PDF Signatures Examples

This example demonstrates how to validate the signatures in a PDF and also shows how to get each signature's signer certificate.

Note: This example requires Chilkat v9.5.0.87 or greater.

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

integer li_rc
oleobject loo_Pdf
integer li_Success
oleobject loo_SigInfo
integer li_NumSignatures
integer li_Validated
oleobject loo_Cert
integer i

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

loo_Pdf = create oleobject
// Use "Chilkat_9_5_0.Pdf" for versions of Chilkat < 10.0.0
li_rc = loo_Pdf.ConnectToNewObject("Chilkat.Pdf")
if li_rc < 0 then
    destroy loo_Pdf
    MessageBox("Error","Connecting to COM object failed")
    return
end if

// Load a PDF that has cryptographic signatures to be validated
li_Success = loo_Pdf.LoadFile("qa_data/pdf/sign_testing_1/helloSigned2.pdf")
if li_Success = 0 then
    Write-Debug loo_Pdf.LastErrorText
    destroy loo_Pdf
    return
end if

// Each time we verify a signature, information about the signature is written into
// sigInfo (replacing whatever sigInfo previously contained).
loo_SigInfo = create oleobject
// Use "Chilkat_9_5_0.JsonObject" for versions of Chilkat < 10.0.0
li_rc = loo_SigInfo.ConnectToNewObject("Chilkat.JsonObject")

// Iterate over each signature and validate each.
li_NumSignatures = loo_Pdf.NumSignatures
li_Validated = 0
loo_Cert = create oleobject
// Use "Chilkat_9_5_0.Cert" for versions of Chilkat < 10.0.0
li_rc = loo_Cert.ConnectToNewObject("Chilkat.Cert")

i = 0
do while i < li_NumSignatures
    li_Validated = loo_Pdf.VerifySignature(i,loo_SigInfo)
    Write-Debug "Signature " + string(i) + " validated: " + string(li_Validated)

    // The GetSignerCert method was added in Chilkat v9.5.0.87
    // After calling VerifySignature, you can get the signer certificate by calling
    // GetSignerCert with the same index. 
    li_Success = loo_Pdf.GetSignerCert(i,loo_Cert)
    if li_Success <> 0 then
        Write-Debug "PDF signer certificate: " + loo_Cert.SubjectDN
    end if

    i = i + 1
loop

Write-Debug "Finished."


destroy loo_Pdf
destroy loo_SigInfo
destroy loo_Cert