(Visual FoxPro) PDF Get Encryption and Permissions Information

See more PDF Signatures Examples

Determine if a PDF is encrypted, and the associated user permissions.

Note: Some PDFs are encrypted but not password-protected. In such cases, encryption is used primarily for preventing unauthorized modifications to the document, but it doesn't restrict access. Therefore, you can open and read the document without a password.

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

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

LOCAL loPdf
LOCAL lnSuccess
LOCAL loLjd
LOCAL lcPdfVersion
LOCAL lcFilter
LOCAL lnKeyLength
LOCAL V
LOCAL R
LOCAL P
LOCAL lcPrintLowResolution
LOCAL lcPrintHighResolution
LOCAL lcModifyOther
LOCAL lcModifyAnnotations
LOCAL lcModifyForms
LOCAL lcFillInForms
LOCAL lcAssembleDoc
LOCAL lcExtractAnyPurpose
LOCAL lcExtractAccessibility
LOCAL lcMethod

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

* For versions of Chilkat < 10.0.0, use CreateObject('Chilkat_9_5_0.Pdf')
loPdf = CreateObject('Chilkat.Pdf')

* Open a PDF.
* Starting in Chilkat v9.5.0.96, the LastJsonData will contain information about encryption and permissions.
lnSuccess = loPdf.LoadFile("c:/someDir/sample.pdf")
IF (lnSuccess = 0) THEN
    ? loPdf.LastErrorText
    RELEASE loPdf
    CANCEL
ENDIF

* Examine the LastJsonData
loLjd = loPdf.LastJsonData()
loLjd.EmitCompact = 0

? loLjd.Emit()

* Sample output:

* {
*   "pdfVersion": "1.6",
*   "encrypt": {
*     "filter": "/Standard",
*     "keyLength": 128,
*     "V": 4,
*     "R": 4,
*     "P": -1340,
*     "perm": {
*       "printLowResolution": "allowed",
*       "printHighResolution": "allowed",
*       "modifyOther": "not allowed",
*       "modifyAnnotations": "allowed",
*       "modifyForms": "not allowed",
*       "fillInForms": "allowed",
*       "assembleDoc": "allowed",
*       "extractAnyPurpose": "not allowed",
*       "extractAccessibility": "not allowed"
*     },
*     "method": "AESV2"
*   }
* }

* Use this online tool to generate parsing code from sample JSON: 
* Generate Parsing Code from JSON

lcPdfVersion = loLjd.StringOf("pdfVersion")
lcFilter = loLjd.StringOf("encrypt.filter")
lnKeyLength = loLjd.IntOf("encrypt.keyLength")
V = loLjd.IntOf("encrypt.V")
R = loLjd.IntOf("encrypt.R")
P = loLjd.IntOf("encrypt.P")
lcPrintLowResolution = loLjd.StringOf("encrypt.perm.printLowResolution")
lcPrintHighResolution = loLjd.StringOf("encrypt.perm.printHighResolution")
lcModifyOther = loLjd.StringOf("encrypt.perm.modifyOther")
lcModifyAnnotations = loLjd.StringOf("encrypt.perm.modifyAnnotations")
lcModifyForms = loLjd.StringOf("encrypt.perm.modifyForms")
lcFillInForms = loLjd.StringOf("encrypt.perm.fillInForms")
lcAssembleDoc = loLjd.StringOf("encrypt.perm.assembleDoc")
lcExtractAnyPurpose = loLjd.StringOf("encrypt.perm.extractAnyPurpose")
lcExtractAccessibility = loLjd.StringOf("encrypt.perm.extractAccessibility")
lcMethod = loLjd.StringOf("encrypt.method")

RELEASE loPdf