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.

Visual FoxPro

LOCAL lnSuccess
LOCAL loPdf
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

lnSuccess = 0

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

loPdf = CreateObject('Chilkat.Pdf')

* Load a PDF.
lnSuccess = loPdf.LoadFile("c:/someDir/sample.pdf")
IF (lnSuccess = 0) THEN
    ? loPdf.LastErrorText
    RELEASE loPdf
    CANCEL
ENDIF

* Get information about the PDF that was collected in the call to LoadFile.
loLjd = CreateObject('Chilkat.JsonObject')
loPdf.GetLastJsonData(loLjd)

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
RELEASE loLjd