(Visual FoxPro) Sign PDF using ARSS (Aruba Remote Signing Service)

See more Signing in the Cloud Examples

Demonstrates how to sign a PDF using the Aruba Remote Signing Service (ARSS).

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

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

LOCAL loPdf
LOCAL lnSuccess
LOCAL loJson
LOCAL loCert
LOCAL loJsonArss

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

loPdf = CreateObject('Chilkat_9_5_0.Pdf')

* Load a PDF to be signed.
lnSuccess = loPdf.LoadFile("qa_data/pdf/hello.pdf")
IF (lnSuccess = 0) THEN
    ? loPdf.LastErrorText
    RELEASE loPdf
    CANCEL
ENDIF

* Options for signing are specified in JSON.
loJson = CreateObject('Chilkat_9_5_0.JsonObject')

* Indicate that we want an LTV-enabled signature
loJson.UpdateBool("ltvOcsp",1)

* Define the appearance of the signature.
loJson.UpdateInt("page",1)
loJson.UpdateString("appearance.y","top")
loJson.UpdateString("appearance.x","left")
loJson.UpdateString("appearance.fontScale","10.0")
loJson.UpdateString("appearance.text[0]","Digitally signed by: cert_cn")
loJson.UpdateString("appearance.text[1]","current_dt")
loJson.UpdateString("appearance.text[2]","This is an LTV-enabled signature.")

* Load the certificate used for signing.  The certificate's private key is stored on 
* the Aruba.it server and the signing will happen remotely using the
* ARSS (Aruba Remote Signing Service).
* However, we still need the certificate locally (without private key).
loCert = CreateObject('Chilkat_9_5_0.Cert')
lnSuccess = loCert.LoadFromFile("qa_data/certs/myCert.cer")
IF (lnSuccess = 0) THEN
    ? loCert.LastErrorText
    RELEASE loPdf
    RELEASE loJson
    RELEASE loCert
    CANCEL
ENDIF

* To sign using the Aruba Remote Signing Service, 
* add the following lines of code to specify your authentication credentials,
* and the ID of the certificate w/ private key on the server to be used.
loJsonArss = CreateObject('Chilkat_9_5_0.JsonObject')

* Set the "service" equal to "ARSS" to tell Chilkat to use ARSS for signing.
loJsonArss.UpdateString("service","ARSS")
* Specify the certificate ID, such as "AS0"
* This certificate should match the certificate loaded in the above code.
loJsonArss.UpdateString("certID","YOUR_ARSS_CERT_ID")
loJsonArss.UpdateString("otpPwd","YOUR_OTP_PWD")
loJsonArss.UpdateString("typeOtpAuth","demoprod")
loJsonArss.UpdateString("user","YOUR_ARSS_USERNAME")
loJsonArss.UpdateString("userPWD","YOUR_ARSS_PASSWORD")
lnSuccess = loCert.SetCloudSigner(loJsonArss)

* Tell the pdf object to use the certificate for signing.
lnSuccess = loPdf.SetSigningCert(loCert)
IF (lnSuccess = 0) THEN
    ? loPdf.LastErrorText
    RELEASE loPdf
    RELEASE loJson
    RELEASE loCert
    RELEASE loJsonArss
    CANCEL
ENDIF

* Chilkat will build the signed PDF locally, but will (internally) use ARSS
* to do the RSA sign hash operation.
lnSuccess = loPdf.SignPdf(loJson,"qa_output/hello_ltv_signed.pdf")
IF (lnSuccess = 0) THEN
    ? loPdf.LastErrorText
    RELEASE loPdf
    RELEASE loJson
    RELEASE loCert
    RELEASE loJsonArss
    CANCEL
ENDIF

? "The PDF has been successfully cryptographically signed with long-term validation."

RELEASE loPdf
RELEASE loJson
RELEASE loCert
RELEASE loJsonArss