Tcl

Extract XML File from a .p7m (e.g. FATTURA ELETTRONICA, ITALY)

See more Digital Signatures Examples

_LANGUAGE_ example to extract the original file from a .p7m (Signed-Data PKCS7 Format) The .p7m contains the signed contents of the original file.

One use for this example is to extract the XML file from a Fattura Elettronica .p7m signature.

Tcl

load ./chilkat.dll

set success 0

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

set crypt [new_CkCrypt2]

set outputFile "testData/xml/original.xml"
set inFile "testData/p7m/fattura_signature.p7m"

# Verify the signature and extract the XML file.
set success [CkCrypt2_VerifyP7M $crypt $inFile $outputFile]
if {$success == 0} then {
    puts [CkCrypt2_lastErrorText $crypt]
    delete_CkCrypt2 $crypt
    exit
}

puts "Success!"

delete_CkCrypt2 $crypt