AutoIt

Example: Crypt2.GetSignedAttributes method

Demonstrates how to call the GetSignedAttributes method. AutoIt

Local $bSuccess = False

$oCrypt = ObjCreate("Chilkat.Crypt2")

$oBdPkcs7 = ObjCreate("Chilkat.BinData")
$bSuccess = $oBdPkcs7.LoadFile("qa_data/cades/CAdES-T/Signature-C-T-1.p7m")
If ($bSuccess = False) Then
    ConsoleWrite($oBdPkcs7.LastErrorText & @CRLF)
    Exit
EndIf

$oJson = ObjCreate("Chilkat.JsonObject")
$oJson.EmitCompact = False

$oSbJson = ObjCreate("Chilkat.StringBuilder")
Local $i = 0
Local $bTryNext = True
While $bTryNext
    If ($oCrypt.GetSignedAttributes($i,$oBdPkcs7,$oSbJson) = True) Then
        $oJson.LoadSb($oSbJson)
        ConsoleWrite($i & ": " & @CRLF)
        ConsoleWrite($oJson.Emit() & @CRLF)
    Else
        $bTryNext = False
    EndIf

    $i = $i + 1
Wend

; Sample output:

; 0: 
; {
;   "signedAttributes": [
;     {
;       "oid": "1.2.840.113549.1.9.3",
;       "name": "Content Type"
;     },
;     {
;       "oid": "1.2.840.113549.1.9.5",
;       "name": "Signing Time"
;     },
;     {
;       "oid": "1.2.840.113549.1.9.4",
;       "name": "Message Digest"
;     },
;     {
;       "oid": "1.2.840.113549.1.9.16.2.47",
;       "name": "Signing Certificate V2"
;     }
;   ]
; }