Sample code for 30+ languages & platforms
Xbase++

Create Egypt ITIDA CAdES-BES Signature with Automatic JSON Canonicalization

See more Egypt ITIDA Examples

Demonstrates how to create a .p7s signature that fits Egypt's ITIDA requirements where Chilkat automatically does the ITIDA JSON canonicalization.

Note: This example requires Chilkat v9.5.0.75 or greater.

Chilkat Xbase++ Downloads

Xbase++
LOCAL nSuccess
LOCAL oCrypt
LOCAL oCert
LOCAL oCmsOptions
LOCAL oJsonSigningAttrs
LOCAL oJson
LOCAL cSigBase64

nSuccess := 0

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

oCrypt := CreateObject("Chilkat.Crypt2")
oCrypt:VerboseLogging := 1

oCert := CreateObject("Chilkat.Cert")
oCert:VerboseLogging := 1

//  Set the smart card PIN, which will be needed for signing.
oCert:SmartCardPin := "12345678"

//  There are many ways to load the certificate.  
//  This example was created for a customer using an ePass2003 USB token.
//  Assuming the USB token is the only source of a hardware-based private key..
nSuccess := oCert:LoadFromSmartcard("")
IF (nSuccess != 1)
    ? oCert:LastErrorText
    oCrypt:destroy()
    oCert:destroy()
    RETURN
ENDIF

//  Tell the crypt class to use this cert.
nSuccess := oCrypt:SetSigningCert(oCert)
IF (nSuccess != 1)
    ? oCrypt:LastErrorText
    oCrypt:destroy()
    oCert:destroy()
    RETURN
ENDIF

oCmsOptions := CreateObject("Chilkat.JsonObject")
//  Setting "DigestData" causes OID 1.2.840.113549.1.7.5 (digestData) to be used.
oCmsOptions:UpdateBool("DigestData", 1)
oCmsOptions:UpdateBool("OmitAlgorithmIdNull", 1)

//  Indicate that we are passing normal JSON and we want Chilkat do automatically
//  do the ITIDA JSON canonicalization:
oCmsOptions:UpdateBool("CanonicalizeITIDA", 1)

oCrypt:CmsOptions := oCmsOptions:Emit()

//  The CadesEnabled property applies to all methods that create CMS/PKCS7 signatures. 
//  To create a CAdES-BES signature, set this property equal to true. 
oCrypt:CadesEnabled := 1

oCrypt:HashAlgorithm := "sha256"

oJsonSigningAttrs := CreateObject("Chilkat.JsonObject")
oJsonSigningAttrs:UpdateInt("contentType", 1)
oJsonSigningAttrs:UpdateInt("signingTime", 1)
oJsonSigningAttrs:UpdateInt("messageDigest", 1)
oJsonSigningAttrs:UpdateInt("signingCertificateV2", 1)
oCrypt:SigningAttributes := oJsonSigningAttrs:Emit()

//  By default, all the certs in the chain of authentication are included in the signature.
//  If desired, we can choose to only include the signing certificate:
oCrypt:IncludeCertChain := 0

//  Pass a JSON document such as the following.  Chilkat will do the ITIDA canonicalization.
//  (It is the canonicalized JSON that gets signed.)

//        {
//           "issuer":{
//              "address":{
//                 "branchID":"0",
//                 "country":"EG",
//                 "regionCity":"Cairo",
//                 "postalCode":"",
//                 "buildingNumber":"0",
//                 "street":"123rd Street",
//                 "governate":"GOVERNATE"
//              },
//              "type":"B",
//              "id":"209999899",
//              "name":"Xyz SAE"
//           },
//           "receiver":{
//              "address":{
//                 "country":"EG",
//                 "regionCity":"CAIRO",
//                 "postalCode":"11435",
//                 "buildingNumber":"0",
//                 "street":"Autostrad Road Abc",
//                 "governate":"GOVERNATE"
//              },
//              "type":"B",
//              "id":"999999999",
//              "name":"XYZ EGYPT FOR TRADE"
//           },
//           "documentType":"I",
//           "documentTypeVersion":"1.0",
//           "dateTimeIssued":"2020-11-15T11:04:53Z",
//           "taxpayerActivityCode":"1073",
//           "internalID":"ZZZZ999",
//           "purchaseOrderReference":"2009199918",
//           "salesOrderReference":"",
//           "payment":{
//              "bankName":"",
//              "bankAddress":"",
//              "bankAccountNo":"",
//              "bankAccountIBAN":"",
//              "swiftCode":"",
//              "terms":""
//           },
//           "delivery":{
//              "approach":"",
//              "packaging":"",
//              "dateValidity":"",
//              "exportPort":"",
//              "countryOfOrigin":"EG",
//              "grossWeight":0,
//              "netWeight":0,
//              "terms":""
//           },
//           "invoiceLines":[
//              {
//                 "description":"CDM Widget 48GX99X12BA",
//                 "itemType":"GS1",
//                 "itemCode":"7622213335056",
//                 "unitType":"CS",
//                 "quantity":1.00,
//                 "unitValue":{
//                    "currencySold":"EGP",
//                    "amountEGP":588.67,
//                    "amountSold":0,
//                    "currencyExchangeRate":0
//                 },
//                 "salesTotal":588.67,
//                 "total":603.97,
//                 "valueDifference":0,
//                 "totalTaxableFees":0,
//                 "netTotal":529.8,
//                 "itemsDiscount":0,
//                 "discount":{
//                    "rate":10.00,
//                    "amount":58.87
//                 },
//                 "taxableItems":[
//                    {
//                       "taxType":"T1",
//                       "amount":74.17,
//                       "subType":"No sub",
//                       "rate":14.00
//                    }
//                 ],
//                 "internalCode":"9099994"
//              }
//           ],
//           "totalSales":588.67,
//           "totalSalesAmount":588.67,
//           "totalDiscountAmount":58.87,
//           "netAmount":529.80,
//           "taxTotals":[
//              {
//                 "taxType":"T1",
//                 "amount":74.17
//              }
//           ],
//           "extraDiscountAmount":0,
//           "totalItemsDiscountAmount":0,
//           "totalAmount":603.97,
//        }
//  

oJson := CreateObject("Chilkat.JsonObject")
nSuccess := oJson:LoadFile("qa_data/itida/sdk.invoicing.eta.gov.eg/files/one-doc.json")
IF (nSuccess == 0)
    ? oJson:LastErrorText
    oCrypt:destroy()
    oCert:destroy()
    oCmsOptions:destroy()
    oJsonSigningAttrs:destroy()
    oJson:destroy()
    RETURN
ENDIF

oJson:EmitCompact := 0

//  Create the CAdES-BES signature.
oCrypt:EncodingMode := "base64"

//  Make sure we sign the utf-8 byte representation of the JSON string
oCrypt:Charset := "utf-8"

cSigBase64 := oCrypt:SignStringENC(oJson:Emit())
IF (oCrypt:LastMethodSuccess == 0)
    ? oCrypt:LastErrorText
    oCrypt:destroy()
    oCert:destroy()
    oCmsOptions:destroy()
    oJsonSigningAttrs:destroy()
    oJson:destroy()
    RETURN
ENDIF

? "Base64 signature:"
? cSigBase64

//  Add the signature to the JSON.
oJson:UpdateString("signatures[0].signatureType", "I")
oJson:UpdateString("signatures[0].value", cSigBase64)

? "JSON with signature added:"
? oJson:Emit()

oCrypt:destroy()
oCert:destroy()
oCmsOptions:destroy()
oJsonSigningAttrs:destroy()
oJson:destroy()