Xbase++
Sign PDF for ICP-Brasil

Sign a PDF to create a signed PDF compliant with the ICP-Brasil Digital Signature Standard Conformity Checker. (Verificador de Conformidade do Padrão de Assinatura Digital ICP-Brasil)
Chilkat Xbase++ Downloads

Download Chilkat for Xbase++
Xbase++
LOCAL nSuccess
LOCAL oPdf
LOCAL oJson
LOCAL oCert

nSuccess := 0

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

//  The signed PDF produced by this example should be verifiable at https://validar.iti.gov.br/
oPdf := CreateObject("Chilkat.Pdf")

//  Load a PDF to be signed.
//  The "hello.pdf" is available at https://chilkatsoft.com/hello.pdf
nSuccess := oPdf:LoadFile("qa_data/pdf/hello.pdf")
IF (nSuccess == 0)
    ? oPdf:LastErrorText
    oPdf:destroy()
    RETURN
ENDIF

oJson := CreateObject("Chilkat.JsonObject")

//  Define the appearance and location of the signature.
oJson:UpdateInt("page", 1)
oJson:UpdateString("appearance.y", "bottom")
oJson:UpdateString("appearance.x", "middle")
oJson:UpdateString("appearance.fontScale", "9.0")
oJson:UpdateString("appearance.text[0]", "Digitally signed by: cert_cn")
oJson:UpdateString("appearance.text[1]", "current_dt")
oJson:UpdateString("appearance.image", "document-accepted")
oJson:UpdateString("appearance.imagePlacement", "left")
oJson:UpdateString("appearance.imageOpacity", "100")

//  Add the CMS options required for ICP-Brasil
oJson:UpdateInt("contentType", 1)
oJson:UpdateInt("messageDigest", 1)
oJson:UpdateInt("signingCertificateV2", 1)
oJson:UpdateBool("ltvOcsp", 1)

//  Listed here are the currently existing profiles. (Chilkat will add additional ICP Brasil policy profiles in future versions as new ones are created.)
//  See https://www.gov.br/iti/pt-br/assuntos/repositorio/artefatos-de-assinatura-digital for more information.
//  
//  PA_AD_RA_v1_1 --> 2.16.76.1.7.1.5.1.1
//  PA_AD_RA_v1_2 --> 2.16.76.1.7.1.5.1.2
//  PA_AD_RA_v2_0 --> 2.16.76.1.7.1.5.2
//  PA_AD_RA_v2_1 --> 2.16.76.1.7.1.5.2.1
//  PA_AD_RA_v2_2 --> 2.16.76.1.7.1.5.2.2
//  PA_AD_RA_v2_3 --> 2.16.76.1.7.1.5.2.3
//  PA_AD_RA_v2_4 --> 2.16.76.1.7.1.5.2.4

//  PA_AD_RB_v1_1 --> 2.16.76.1.7.1.1.1.1
//  PA_AD_RB_v2_0 --> 2.16.76.1.7.1.1.2
//  PA_AD_RB_v2_1 --> 2.16.76.1.7.1.1.2.1
//  PA_AD_RB_v2_2 --> 2.16.76.1.7.1.1.2.2
//  PA_AD_RB_v2_3 --> 2.16.76.1.7.1.1.2.3

//  PA_AD_RC_v1_1 --> 2.16.76.1.7.1.4.1.1
//  PA_AD_RC_v2_0 --> 2.16.76.1.7.1.4.2
//  PA_AD_RC_v2_1 --> 2.16.76.1.7.1.4.2.1
//  PA_AD_RC_v2_2 --> 2.16.76.1.7.1.4.2.2
//  PA_AD_RC_v2_3 --> 2.16.76.1.7.1.4.2.3

//  PA_AD_RT_v1_1 --> 2.16.76.1.7.1.2.1.1
//  PA_AD_RT_v2_0 --> 2.16.76.1.7.1.2.2
//  PA_AD_RT_v2_1 --> 2.16.76.1.7.1.2.2.1
//  PA_AD_RT_v2_2 --> 2.16.76.1.7.1.2.2.2
//  PA_AD_RT_v2_3 --> 2.16.76.1.7.1.2.2.3

//  PA_AD_RV_v1_1 --> 2.16.76.1.7.1.3.1.1
//  PA_AD_RV_v2_0 --> 2.16.76.1.7.1.3.2
//  PA_AD_RV_v2_1 --> 2.16.76.1.7.1.3.2.1
//  PA_AD_RV_v2_2 --> 2.16.76.1.7.1.3.2.2
//  PA_AD_RV_v2_3 --> 2.16.76.1.7.1.3.2.3

//  PA_PAdES_AD_RA_v1_0 --> 2.16.76.1.7.1.14.1
//  PA_PAdES_AD_RA_v1_1 --> 2.16.76.1.7.1.14.1.1
//  PA_PAdES_AD_RA_v1_2 --> 2.16.76.1.7.1.14.1.2
//  PA_PAdES_AD_RB_v1_0 --> 2.16.76.1.7.1.11.1
//  PA_PAdES_AD_RB_v1_1 --> 2.16.76.1.7.1.11.1.1
//  PA_PAdES_AD_RC_v1_0 --> 2.16.76.1.7.1.13.1
//  PA_PAdES_AD_RC_v1_1 --> 2.16.76.1.7.1.13.1.1
//  PA_PAdES_AD_RC_v1_2 --> 2.16.76.1.7.1.13.1.2
//  PA_PAdES_AD_RT_v1_0 --> 2.16.76.1.7.1.12.1
//  PA_PAdES_AD_RT_v1_1 --> 2.16.76.1.7.1.12.1.1

//  Set the policy profile name
//  ---------------------------------------------------
//  Note: On 24-May-2024, I was informed that adding the "policyId.profile"
//  causes the PDF signature to fail validation at https://validar.iti.gov.br/
//  Perhaps something changed in the years since this example was originally written and tested to be working.
//  You may need to omit the "policyId.profile".
//  ---------------------------------------------------
oJson:UpdateString("policyId.profile", "PA_PAdES_AD_RB_v1_1")

//  Load the signing certificate. (Use your own certificate.)
//  Note: If loading from a smart card, call LoadFromSmartcard instead, and make sure to use Chilkat v9.5.0.88 or later.
oCert := CreateObject("Chilkat.Cert")
nSuccess := oCert:LoadPfxFile("qa_data/pfx/myPdfSigningCert.pfx", "pfx_password")
IF (nSuccess == 0)
    ? oCert:LastErrorText
    oPdf:destroy()
    oJson:destroy()
    oCert:destroy()
    RETURN
ENDIF

//  Tell the pdf object to use the certificate for signing.
nSuccess := oPdf:SetSigningCert(oCert)
IF (nSuccess == 0)
    ? oPdf:LastErrorText
    oPdf:destroy()
    oJson:destroy()
    oCert:destroy()
    RETURN
ENDIF

nSuccess := oPdf:SignPdf(oJson, "qa_output/hello_signed.pdf")
IF (nSuccess == 0)
    ? oPdf:LastErrorText
    oPdf:destroy()
    oJson:destroy()
    oCert:destroy()
    RETURN
ENDIF

? "The PDF has been successfully cryptographically signed."

oPdf:destroy()
oJson:destroy()
oCert:destroy()