B4X

Verify the Timestamp Server Token (if any) while Validating a CMS Signature

Demonstrates how to also validate the timestamp server token (if any) while validating a CMS signature. B4X

Dim success As Boolean = False

Dim crypt As ChilkatCrypt2
crypt.Initialize("crypt")

'  Tell Chilkat to also validate the timestamp token if a timestamp exists in the CMS message's unauthenticated attributes.
Dim cmsOptions As ChilkatJsonObject
cmsOptions.Initialize
cmsOptions.UpdateBool("ValidateTimestampTokens", True)
crypt.CmsOptions = cmsOptions.Emit

Dim outputFile As String = "qa_output/original.xml"
Dim inFile As String = "qa_data/p7m/fattura_signature.xml.p7m"

'  Verify the signature and extract the contained file, which in this case is XML.
success = crypt.VerifyP7M(inFile, outputFile)
If success = False Then
    Log(crypt.LastErrorText)
    Return
End If


Log("Signature validated.")