Unicode C
Unicode C
UBL XAdES Enveloped Signature
See more XAdES Examples
Demonstrates how to create a UBL XAdES enveloped signature.Chilkat Unicode C Downloads
#include <C_CkXmlW.h>
#include <C_CkXmlDSigGenW.h>
#include <C_CkCertW.h>
#include <C_CkStringBuilderW.h>
#include <C_CkXmlDSigW.h>
void ChilkatSample(void)
{
BOOL success;
HCkXmlW xmlToSign;
HCkXmlDSigGenW gen;
HCkXmlW object1;
HCkCertW cert;
HCkStringBuilderW sbXml;
HCkXmlDSigW verifier;
int numSigs;
int verifyIdx;
BOOL verified;
success = FALSE;
// This example requires the Chilkat API to have been previously unlocked.
// See Global Unlock Sample for sample code.
success = TRUE;
//
// The following code creates the XML document to be signed.
// (It is also possible to simply load the XML into the Chilkat XML object by calling the LoadXml method.)
// A sample (already signed) of this XML is available here: External link: credit-note-en16931-xades-signed.xml
// Also, you may use this online tool to generate code from sample XML:
// Generate Code to Create XML
xmlToSign = CkXmlW_Create();
CkXmlW_putTag(xmlToSign,L"CreditNote");
CkXmlW_AddAttribute(xmlToSign,L"xmlns",L"urn:oasis:names:specification:ubl:schema:xsd:CreditNote-2");
CkXmlW_AddAttribute(xmlToSign,L"xmlns:cac",L"urn:oasis:names:specification:ubl:schema:xsd:CommonAggregateComponents-2");
CkXmlW_AddAttribute(xmlToSign,L"xmlns:cbc",L"urn:oasis:names:specification:ubl:schema:xsd:CommonBasicComponents-2");
CkXmlW_AddAttribute(xmlToSign,L"xmlns:ext",L"urn:oasis:names:specification:ubl:schema:xsd:CommonExtensionComponents-2");
CkXmlW_UpdateAttrAt(xmlToSign,L"ext:UBLExtensions|ext:UBLExtension",TRUE,L"xmlns:sac",L"urn:oasis:names:specification:ubl:schema:xsd:SignatureAggregateComponents-2");
CkXmlW_UpdateAttrAt(xmlToSign,L"ext:UBLExtensions|ext:UBLExtension",TRUE,L"xmlns:sig",L"urn:oasis:names:specification:ubl:schema:xsd:CommonSignatureComponents-2");
CkXmlW_UpdateChildContent(xmlToSign,L"ext:UBLExtensions|ext:UBLExtension|ext:ExtensionContent|sig:UBLDocumentSignatures|sac:SignatureInformation",L"");
CkXmlW_UpdateChildContent(xmlToSign,L"cbc:CustomizationID",L"urn:cen.eu:en16931:2017");
CkXmlW_UpdateChildContent(xmlToSign,L"cbc:ProfileID",L"P1");
CkXmlW_UpdateChildContent(xmlToSign,L"cbc:ID",L"c2ad1540-cf12-4e83-b47c-906aac70242e");
CkXmlW_UpdateChildContent(xmlToSign,L"cbc:IssueDate",L"2009-12-15");
CkXmlW_UpdateAttrAt(xmlToSign,L"cbc:Note",TRUE,L"languageID",L"en");
CkXmlW_UpdateChildContent(xmlToSign,L"cbc:Note",L"Ordered in our booth at the convention.");
CkXmlW_UpdateAttrAt(xmlToSign,L"cbc:DocumentCurrencyCode",TRUE,L"listAgencyID",L"6");
CkXmlW_UpdateAttrAt(xmlToSign,L"cbc:DocumentCurrencyCode",TRUE,L"listID",L"ISO 4217 Alpha");
CkXmlW_UpdateChildContent(xmlToSign,L"cbc:DocumentCurrencyCode",L"HRK");
CkXmlW_UpdateChildContent(xmlToSign,L"cbc:AccountingCost",L"Project cost code 123");
CkXmlW_UpdateChildContent(xmlToSign,L"cac:InvoicePeriod|cbc:StartDate",L"2009-11-01");
CkXmlW_UpdateChildContent(xmlToSign,L"cac:InvoicePeriod|cbc:EndDate",L"2009-11-30");
CkXmlW_UpdateChildContent(xmlToSign,L"cac:OrderReference|cbc:ID",L"123");
CkXmlW_UpdateChildContent(xmlToSign,L"cac:ContractDocumentReference|cbc:ID",L"Contract321");
CkXmlW_UpdateChildContent(xmlToSign,L"cac:ContractDocumentReference|cbc:DocumentType",L"Framework agreement");
CkXmlW_UpdateChildContent(xmlToSign,L"cac:AdditionalDocumentReference|cbc:ID",L"Doc1");
CkXmlW_UpdateChildContent(xmlToSign,L"cac:AdditionalDocumentReference|cbc:DocumentType",L"Timesheet");
CkXmlW_UpdateChildContent(xmlToSign,L"cac:AdditionalDocumentReference|cac:Attachment|cac:ExternalReference|cbc:URI",L"http://www.suppliersite.eu/sheet001.html");
CkXmlW_UpdateChildContent(xmlToSign,L"cac:AdditionalDocumentReference[1]|cbc:ID",L"Doc2");
CkXmlW_UpdateChildContent(xmlToSign,L"cac:AdditionalDocumentReference[1]|cbc:DocumentType",L"Drawing");
CkXmlW_UpdateAttrAt(xmlToSign,L"cac:AdditionalDocumentReference[1]|cac:Attachment|cbc:EmbeddedDocumentBinaryObject",TRUE,L"mimeCode",L"application/pdf");
CkXmlW_UpdateChildContent(xmlToSign,L"cac:AdditionalDocumentReference[1]|cac:Attachment|cbc:EmbeddedDocumentBinaryObject",L"UjBsR09EbGhjZ0dTQUxNQUFBUUNBRU1tQ1p0dU1GUXhEUzhi");
CkXmlW_UpdateChildContent(xmlToSign,L"cac:AccountingSupplierParty|cac:Party|cac:PartyIdentification|cbc:ID",L"9934:18683136487::HR99:276");
CkXmlW_UpdateChildContent(xmlToSign,L"cac:AccountingSupplierParty|cac:Party|cac:PostalAddress|cbc:StreetName",L"KATANCICEVA");
CkXmlW_UpdateChildContent(xmlToSign,L"cac:AccountingSupplierParty|cac:Party|cac:PostalAddress|cbc:CityName",L"ZAGREB");
CkXmlW_UpdateChildContent(xmlToSign,L"cac:AccountingSupplierParty|cac:Party|cac:PostalAddress|cbc:PostalZone",L"10000");
CkXmlW_UpdateChildContent(xmlToSign,L"cac:AccountingSupplierParty|cac:Party|cac:PostalAddress|cac:Country|cbc:IdentificationCode",L"HR");
CkXmlW_UpdateChildContent(xmlToSign,L"cac:AccountingSupplierParty|cac:Party|cac:PartyTaxScheme|cbc:CompanyID",L"HR18683136487");
CkXmlW_UpdateChildContent(xmlToSign,L"cac:AccountingSupplierParty|cac:Party|cac:PartyTaxScheme|cac:TaxScheme|cbc:ID",L"FRE");
CkXmlW_UpdateChildContent(xmlToSign,L"cac:AccountingSupplierParty|cac:Party|cac:PartyLegalEntity|cbc:RegistrationName",L"MINISTARSTVO FINANCIJA");
CkXmlW_UpdateChildContent(xmlToSign,L"cac:AccountingSupplierParty|cac:Party|cac:Contact|cbc:Name",L"JURAJ MARKOVIC");
CkXmlW_UpdateChildContent(xmlToSign,L"cac:AccountingSupplierParty|cac:Party|cac:Contact|cbc:ElectronicMail",L"juraj.markovic@fina.hr");
CkXmlW_UpdateChildContent(xmlToSign,L"cac:AccountingCustomerParty|cac:Party|cac:PartyIdentification|cbc:ID",L"9934:49811265576::HR99:NOVO1");
CkXmlW_UpdateChildContent(xmlToSign,L"cac:AccountingCustomerParty|cac:Party|cac:PostalAddress|cbc:StreetName",L"GETALDICEVA 4");
CkXmlW_UpdateChildContent(xmlToSign,L"cac:AccountingCustomerParty|cac:Party|cac:PostalAddress|cbc:CityName",L"ZAGREB");
CkXmlW_UpdateChildContent(xmlToSign,L"cac:AccountingCustomerParty|cac:Party|cac:PostalAddress|cbc:PostalZone",L"10000");
CkXmlW_UpdateChildContent(xmlToSign,L"cac:AccountingCustomerParty|cac:Party|cac:PostalAddress|cac:Country|cbc:IdentificationCode",L"HR");
CkXmlW_UpdateChildContent(xmlToSign,L"cac:AccountingCustomerParty|cac:Party|cac:PartyTaxScheme|cbc:CompanyID",L"HR49811265576");
CkXmlW_UpdateChildContent(xmlToSign,L"cac:AccountingCustomerParty|cac:Party|cac:PartyTaxScheme|cac:TaxScheme|cbc:ID",L"VAT");
CkXmlW_UpdateChildContent(xmlToSign,L"cac:AccountingCustomerParty|cac:Party|cac:PartyLegalEntity|cbc:RegistrationName",L"NOVO1");
CkXmlW_UpdateChildContent(xmlToSign,L"cac:Delivery|cac:DeliveryLocation|cac:Address|cac:Country|cbc:IdentificationCode",L"HR");
CkXmlW_UpdateChildContent(xmlToSign,L"cac:PaymentMeans|cbc:PaymentMeansCode",L"30");
CkXmlW_UpdateChildContent(xmlToSign,L"cac:PaymentMeans|cbc:InstructionNote",L"Neki opis placanja");
CkXmlW_UpdateChildContent(xmlToSign,L"cac:PaymentMeans|cbc:PaymentID",L"HR00 12456");
CkXmlW_UpdateChildContent(xmlToSign,L"cac:PaymentMeans|cac:PayeeFinancialAccount|cbc:ID",L"HR1210010051863000160");
CkXmlW_UpdateChildContent(xmlToSign,L"cac:PaymentTerms|cbc:Note",L"Neki uvjeti placanja");
CkXmlW_UpdateAttrAt(xmlToSign,L"cac:TaxTotal|cbc:TaxAmount",TRUE,L"currencyID",L"HRK");
CkXmlW_UpdateChildContent(xmlToSign,L"cac:TaxTotal|cbc:TaxAmount",L"25.00");
CkXmlW_UpdateAttrAt(xmlToSign,L"cac:TaxTotal|cac:TaxSubtotal|cbc:TaxableAmount",TRUE,L"currencyID",L"HRK");
CkXmlW_UpdateChildContent(xmlToSign,L"cac:TaxTotal|cac:TaxSubtotal|cbc:TaxableAmount",L"100.00");
CkXmlW_UpdateAttrAt(xmlToSign,L"cac:TaxTotal|cac:TaxSubtotal|cbc:TaxAmount",TRUE,L"currencyID",L"HRK");
CkXmlW_UpdateChildContent(xmlToSign,L"cac:TaxTotal|cac:TaxSubtotal|cbc:TaxAmount",L"25.00");
CkXmlW_UpdateChildContent(xmlToSign,L"cac:TaxTotal|cac:TaxSubtotal|cac:TaxCategory|cbc:ID",L"S");
CkXmlW_UpdateChildContent(xmlToSign,L"cac:TaxTotal|cac:TaxSubtotal|cac:TaxCategory|cbc:Percent",L"25");
CkXmlW_UpdateChildContent(xmlToSign,L"cac:TaxTotal|cac:TaxSubtotal|cac:TaxCategory|cac:TaxScheme|cbc:ID",L"VAT");
CkXmlW_UpdateAttrAt(xmlToSign,L"cac:LegalMonetaryTotal|cbc:LineExtensionAmount",TRUE,L"currencyID",L"HRK");
CkXmlW_UpdateChildContent(xmlToSign,L"cac:LegalMonetaryTotal|cbc:LineExtensionAmount",L"100.00");
CkXmlW_UpdateAttrAt(xmlToSign,L"cac:LegalMonetaryTotal|cbc:TaxExclusiveAmount",TRUE,L"currencyID",L"HRK");
CkXmlW_UpdateChildContent(xmlToSign,L"cac:LegalMonetaryTotal|cbc:TaxExclusiveAmount",L"100.00");
CkXmlW_UpdateAttrAt(xmlToSign,L"cac:LegalMonetaryTotal|cbc:TaxInclusiveAmount",TRUE,L"currencyID",L"HRK");
CkXmlW_UpdateChildContent(xmlToSign,L"cac:LegalMonetaryTotal|cbc:TaxInclusiveAmount",L"125.00");
CkXmlW_UpdateAttrAt(xmlToSign,L"cac:LegalMonetaryTotal|cbc:PayableAmount",TRUE,L"currencyID",L"HRK");
CkXmlW_UpdateChildContent(xmlToSign,L"cac:LegalMonetaryTotal|cbc:PayableAmount",L"125.00");
CkXmlW_UpdateChildContent(xmlToSign,L"cac:CreditNoteLine|cbc:ID",L"1");
CkXmlW_UpdateAttrAt(xmlToSign,L"cac:CreditNoteLine|cbc:CreditedQuantity",TRUE,L"unitCode",L"H87");
CkXmlW_UpdateChildContent(xmlToSign,L"cac:CreditNoteLine|cbc:CreditedQuantity",L"1.000");
CkXmlW_UpdateAttrAt(xmlToSign,L"cac:CreditNoteLine|cbc:LineExtensionAmount",TRUE,L"currencyID",L"HRK");
CkXmlW_UpdateChildContent(xmlToSign,L"cac:CreditNoteLine|cbc:LineExtensionAmount",L"100.00");
CkXmlW_UpdateChildContent(xmlToSign,L"cac:CreditNoteLine|cac:Item|cbc:Description",L"Neki detaljniji opis proizvoda ide ovdje");
CkXmlW_UpdateChildContent(xmlToSign,L"cac:CreditNoteLine|cac:Item|cbc:Name",L"Neki proizvod");
CkXmlW_UpdateChildContent(xmlToSign,L"cac:CreditNoteLine|cac:Item|cac:OriginCountry|cbc:IdentificationCode",L"HR");
CkXmlW_UpdateChildContent(xmlToSign,L"cac:CreditNoteLine|cac:Item|cac:ClassifiedTaxCategory|cbc:ID",L"S");
CkXmlW_UpdateChildContent(xmlToSign,L"cac:CreditNoteLine|cac:Item|cac:ClassifiedTaxCategory|cbc:Percent",L"25");
CkXmlW_UpdateChildContent(xmlToSign,L"cac:CreditNoteLine|cac:Item|cac:ClassifiedTaxCategory|cac:TaxScheme|cbc:ID",L"VAT");
CkXmlW_UpdateChildContent(xmlToSign,L"cac:CreditNoteLine|cac:Item|cac:AdditionalItemProperty|cbc:Name",L"Boja");
CkXmlW_UpdateChildContent(xmlToSign,L"cac:CreditNoteLine|cac:Item|cac:AdditionalItemProperty|cbc:Value",L"Plava");
CkXmlW_UpdateChildContent(xmlToSign,L"cac:CreditNoteLine|cac:Item|cac:AdditionalItemProperty[1]|cbc:Name",L"Masa");
CkXmlW_UpdateChildContent(xmlToSign,L"cac:CreditNoteLine|cac:Item|cac:AdditionalItemProperty[1]|cbc:Value",L"1,2 Kg");
CkXmlW_UpdateAttrAt(xmlToSign,L"cac:CreditNoteLine|cac:Price|cbc:PriceAmount",TRUE,L"currencyID",L"HRK");
CkXmlW_UpdateChildContent(xmlToSign,L"cac:CreditNoteLine|cac:Price|cbc:PriceAmount",L"100.000000");
CkXmlW_UpdateAttrAt(xmlToSign,L"cac:CreditNoteLine|cac:Price|cbc:BaseQuantity",TRUE,L"unitCode",L"H87");
CkXmlW_UpdateChildContent(xmlToSign,L"cac:CreditNoteLine|cac:Price|cbc:BaseQuantity",L"1.000");
// Use this online tool to generate XAdES code from a sample signed XML:
// Generate Code to Creaet XAdES from Sample XAdES
// The following code was generated by the online tool.
gen = CkXmlDSigGenW_Create();
CkXmlDSigGenW_putSigLocation(gen,L"CreditNote|ext:UBLExtensions|ext:UBLExtension|ext:ExtensionContent|sig:UBLDocumentSignatures|sac:SignatureInformation");
CkXmlDSigGenW_putSigLocationMod(gen,0);
CkXmlDSigGenW_putSigId(gen,L"Signature-7f4c4719515a4a0a8ce4d1b983a2ec69");
CkXmlDSigGenW_putSigNamespacePrefix(gen,L"");
CkXmlDSigGenW_putSigNamespaceUri(gen,L"http://www.w3.org/2000/09/xmldsig#");
CkXmlDSigGenW_putSignedInfoCanonAlg(gen,L"C14N");
CkXmlDSigGenW_putSignedInfoDigestMethod(gen,L"sha256");
// Create an Object to be added to the Signature.
object1 = CkXmlW_Create();
CkXmlW_putTag(object1,L"xades:QualifyingProperties");
CkXmlW_AddAttribute(object1,L"xmlns:ds",L"http://www.w3.org/2000/09/xmldsig#");
CkXmlW_AddAttribute(object1,L"xmlns:xades",L"http://uri.etsi.org/01903/v1.3.2#");
CkXmlW_AddAttribute(object1,L"Target",L"#Signature-7f4c4719515a4a0a8ce4d1b983a2ec69");
CkXmlW_UpdateAttrAt(object1,L"xades:SignedProperties",TRUE,L"Id",L"SignedProperties-6573207f4ad64b49b0310f7a9e2dfadc");
CkXmlW_UpdateChildContent(object1,L"xades:SignedProperties|xades:SignedSignatureProperties|xades:SigningTime",L"TO BE GENERATED BY CHILKAT");
// Note: It may be that http://www.w3.org/2001/04/xmlenc#sha256 is needed in the following line instead of http://www.w3.org/2000/09/xmldsig#sha1
CkXmlW_UpdateAttrAt(object1,L"xades:SignedProperties|xades:SignedSignatureProperties|xades:SigningCertificateV2|xades:Cert|xades:CertDigest|ds:DigestMethod",TRUE,L"Algorithm",L"http://www.w3.org/2000/09/xmldsig#sha1");
CkXmlW_UpdateChildContent(object1,L"xades:SignedProperties|xades:SignedSignatureProperties|xades:SigningCertificateV2|xades:Cert|xades:CertDigest|ds:DigestValue",L"TO BE GENERATED BY CHILKAT");
CkXmlW_UpdateChildContent(object1,L"xades:SignedProperties|xades:SignedSignatureProperties|xades:SigningCertificateV2|xades:Cert|xades:IssuerSerialV2",L"TO BE GENERATED BY CHILKAT");
CkXmlW_UpdateAttrAt(object1,L"xades:SignedProperties|xades:SignedDataObjectProperties|xades:DataObjectFormat",TRUE,L"ObjectReference",L"");
CkXmlW_UpdateChildContent(object1,L"xades:SignedProperties|xades:SignedDataObjectProperties|xades:DataObjectFormat|xades:Description",L"document");
CkXmlW_UpdateChildContent(object1,L"xades:SignedProperties|xades:SignedDataObjectProperties|xades:DataObjectFormat|xades:MimeType",L"application/xml");
CkXmlW_UpdateChildContent(object1,L"xades:SignedProperties|xades:SignedDataObjectProperties|xades:DataObjectFormat|xades:Encoding",L"UTF-8");
CkXmlDSigGenW_AddObject(gen,L"",CkXmlW_getXml(object1),L"",L"");
// -------- Reference 1 --------
CkXmlDSigGenW_AddSameDocRef(gen,L"",L"sha256",L"",L"",L"");
// -------- Reference 2 --------
CkXmlDSigGenW_AddObjectRef(gen,L"SignedProperties-6573207f4ad64b49b0310f7a9e2dfadc",L"sha256",L"",L"",L"http://uri.etsi.org/01903#SignedProperties");
// Provide a certificate + private key. (PFX password is test123)
cert = CkCertW_Create();
success = CkCertW_LoadPfxFile(cert,L"qa_data/pfx/cert_test123.pfx",L"test123");
if (success != TRUE) {
wprintf(L"%s\n",CkCertW_lastErrorText(cert));
CkXmlW_Dispose(xmlToSign);
CkXmlDSigGenW_Dispose(gen);
CkXmlW_Dispose(object1);
CkCertW_Dispose(cert);
return;
}
CkXmlDSigGenW_SetX509Cert(gen,cert,TRUE);
CkXmlDSigGenW_putKeyInfoType(gen,L"X509Data+KeyValue");
CkXmlDSigGenW_putX509Type(gen,L"IssuerSerial,SubjectName,SKI,Certificate");
// Load XML to be signed...
sbXml = CkStringBuilderW_Create();
CkXmlW_GetXmlSb(xmlToSign,sbXml);
// Adding the "UBLDocumentSignatures" behavior causes the following Transform to be used for the
// first Reference:
// <Transform Algorithm="http://www.w3.org/TR/1999/REC-xpath-19991116"><XPath>count(ancestor-or-self::sig:UBLDocumentSignatures | here()/ancestor::sig:UBLDocumentSignatures[1]) > count(ancestor-or-self::sig:UBLDocumentSignatures)</XPath></Transform>
CkXmlDSigGenW_putBehaviors(gen,L"IndentedSignature,UBLDocumentSignatures");
// Sign the XML...
success = CkXmlDSigGenW_CreateXmlDSigSb(gen,sbXml);
if (success != TRUE) {
wprintf(L"%s\n",CkXmlDSigGenW_lastErrorText(gen));
CkXmlW_Dispose(xmlToSign);
CkXmlDSigGenW_Dispose(gen);
CkXmlW_Dispose(object1);
CkCertW_Dispose(cert);
CkStringBuilderW_Dispose(sbXml);
return;
}
// -----------------------------------------------
// Save the signed XML to a file.
success = CkStringBuilderW_WriteFile(sbXml,L"qa_output/signedXml.xml",L"utf-8",FALSE);
wprintf(L"%s\n",CkStringBuilderW_getAsString(sbXml));
// ----------------------------------------
// Verify the signature we just produced...
verifier = CkXmlDSigW_Create();
success = CkXmlDSigW_LoadSignatureSb(verifier,sbXml);
if (success != TRUE) {
wprintf(L"%s\n",CkXmlDSigW_lastErrorText(verifier));
CkXmlW_Dispose(xmlToSign);
CkXmlDSigGenW_Dispose(gen);
CkXmlW_Dispose(object1);
CkCertW_Dispose(cert);
CkStringBuilderW_Dispose(sbXml);
CkXmlDSigW_Dispose(verifier);
return;
}
// We should have just one signature..
numSigs = CkXmlDSigW_getNumSignatures(verifier);
verifyIdx = 0;
while (verifyIdx < numSigs) {
CkXmlDSigW_putSelector(verifier,verifyIdx);
verified = CkXmlDSigW_VerifySignature(verifier,TRUE);
if (verified != TRUE) {
wprintf(L"%s\n",CkXmlDSigW_lastErrorText(verifier));
CkXmlW_Dispose(xmlToSign);
CkXmlDSigGenW_Dispose(gen);
CkXmlW_Dispose(object1);
CkCertW_Dispose(cert);
CkStringBuilderW_Dispose(sbXml);
CkXmlDSigW_Dispose(verifier);
return;
}
verifyIdx = verifyIdx + 1;
}
wprintf(L"The signature was successfully verified.\n");
CkXmlW_Dispose(xmlToSign);
CkXmlDSigGenW_Dispose(gen);
CkXmlW_Dispose(object1);
CkCertW_Dispose(cert);
CkStringBuilderW_Dispose(sbXml);
CkXmlDSigW_Dispose(verifier);
}