Unicode C
Unicode C
TicketBAI Sign XML Example 2
See more TicketBAI Examples
Second example to demonstrate how to sign XML for TicketBAI.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;
// Create the XML to be signed...
xmlToSign = CkXmlW_Create();
CkXmlW_putTag(xmlToSign,L"T:TicketBai");
CkXmlW_AddAttribute(xmlToSign,L"xmlns:T",L"urn:ticketbai:emision");
CkXmlW_UpdateChildContent(xmlToSign,L"Cabecera|IDVersionTBAI",L"1.2");
CkXmlW_UpdateChildContent(xmlToSign,L"Sujetos|Emisor|NIF",L"79732487C");
CkXmlW_UpdateChildContent(xmlToSign,L"Sujetos|Emisor|ApellidosNombreRazonSocial",L"ARRIOLA LEJARDI ANE");
CkXmlW_UpdateChildContent(xmlToSign,L"Sujetos|Destinatarios|IDDestinatario|NIF",L"A48012363");
CkXmlW_UpdateChildContent(xmlToSign,L"Sujetos|Destinatarios|IDDestinatario|ApellidosNombreRazonSocial",L"ACADEMIA ESKOLA");
CkXmlW_UpdateChildContent(xmlToSign,L"Factura|CabeceraFactura|SerieFactura",L"A2022");
CkXmlW_UpdateChildContent(xmlToSign,L"Factura|CabeceraFactura|NumFactura",L"0400");
CkXmlW_UpdateChildContent(xmlToSign,L"Factura|CabeceraFactura|FechaExpedicionFactura",L"12-05-2022");
CkXmlW_UpdateChildContent(xmlToSign,L"Factura|CabeceraFactura|HoraExpedicionFactura",L"12:20:15");
CkXmlW_UpdateChildContent(xmlToSign,L"Factura|DatosFactura|DescripcionFactura",L"Venta maquinaria y existencias");
CkXmlW_UpdateChildContent(xmlToSign,L"Factura|DatosFactura|ImporteTotalFactura",L"1936.00");
CkXmlW_UpdateChildContent(xmlToSign,L"Factura|DatosFactura|Claves|IDClave|ClaveRegimenIvaOpTrascendencia",L"01");
CkXmlW_UpdateChildContent(xmlToSign,L"Factura|TipoDesglose|DesgloseFactura|Sujeta|NoExenta|DetalleNoExenta|TipoNoExenta",L"S1");
CkXmlW_UpdateChildContent(xmlToSign,L"Factura|TipoDesglose|DesgloseFactura|Sujeta|NoExenta|DetalleNoExenta|DesgloseIVA|DetalleIVA|BaseImponible",L"1600.00");
CkXmlW_UpdateChildContent(xmlToSign,L"Factura|TipoDesglose|DesgloseFactura|Sujeta|NoExenta|DetalleNoExenta|DesgloseIVA|DetalleIVA|TipoImpositivo",L"21.00");
CkXmlW_UpdateChildContent(xmlToSign,L"Factura|TipoDesglose|DesgloseFactura|Sujeta|NoExenta|DetalleNoExenta|DesgloseIVA|DetalleIVA|CuotaImpuesto",L"336.00");
CkXmlW_UpdateChildContent(xmlToSign,L"HuellaTBAI|EncadenamientoFacturaAnterior|SerieFacturaAnterior",L"A2022");
CkXmlW_UpdateChildContent(xmlToSign,L"HuellaTBAI|EncadenamientoFacturaAnterior|NumFacturaAnterior",L"0399");
CkXmlW_UpdateChildContent(xmlToSign,L"HuellaTBAI|EncadenamientoFacturaAnterior|FechaExpedicionFacturaAnterior",L"06-05-2022");
CkXmlW_UpdateChildContent(xmlToSign,L"HuellaTBAI|EncadenamientoFacturaAnterior|SignatureValueFirmaFacturaAnterior",L"KdxKFNXeNJuBZNjgvKEa9lICamXs9MHuin6R+yuFHZw9aMewuBvdhaMr7g0eUz8aNYEa1elpCTr7aLgVZjQrFQK/TjIg353iAVxA");
CkXmlW_UpdateChildContent(xmlToSign,L"HuellaTBAI|Software|LicenciaTBAI",L"TBAIPRUEBA");
CkXmlW_UpdateChildContent(xmlToSign,L"HuellaTBAI|Software|EntidadDesarrolladora|NIF",L"A48119820");
CkXmlW_UpdateChildContent(xmlToSign,L"HuellaTBAI|Software|Nombre",L"DFBTBAI");
CkXmlW_UpdateChildContent(xmlToSign,L"HuellaTBAI|Software|Version",L"1.04.00");
CkXmlW_UpdateChildContent(xmlToSign,L"HuellaTBAI|NumSerieDispositivo",L"GP4FC5J");
gen = CkXmlDSigGenW_Create();
CkXmlDSigGenW_putSigLocation(gen,L"T:TicketBai");
CkXmlDSigGenW_putSigLocationMod(gen,0);
CkXmlDSigGenW_putSigId(gen,L"Signature-43861174-a0e6-45f9-afbf-8b48c46c6c13-Signature");
CkXmlDSigGenW_putSigNamespacePrefix(gen,L"ds");
CkXmlDSigGenW_putSigNamespaceUri(gen,L"http://www.w3.org/2000/09/xmldsig#");
CkXmlDSigGenW_putSigValueId(gen,L"Signature-43861174-a0e6-45f9-afbf-8b48c46c6c13-SignatureValue");
CkXmlDSigGenW_putSignedInfoCanonAlg(gen,L"C14N");
CkXmlDSigGenW_putSignedInfoDigestMethod(gen,L"sha256");
// Set the KeyInfoId before adding references..
CkXmlDSigGenW_putKeyInfoId(gen,L"Signature-43861174-a0e6-45f9-afbf-8b48c46c6c13-KeyInfo");
// Create an Object to be added to the Signature.
object1 = CkXmlW_Create();
CkXmlW_putTag(object1,L"xades:QualifyingProperties");
CkXmlW_AddAttribute(object1,L"xmlns:xades",L"http://uri.etsi.org/01903/v1.3.2#");
CkXmlW_AddAttribute(object1,L"Id",L"Signature-43861174-a0e6-45f9-afbf-8b48c46c6c13-QualifyingProperties");
CkXmlW_AddAttribute(object1,L"Target",L"#Signature-43861174-a0e6-45f9-afbf-8b48c46c6c13-Signature");
CkXmlW_AddAttribute(object1,L"xmlns:ds",L"http://www.w3.org/2000/09/xmldsig#");
CkXmlW_UpdateAttrAt(object1,L"xades:SignedProperties",TRUE,L"Id",L"Signature-43861174-a0e6-45f9-afbf-8b48c46c6c13-SignedProperties");
CkXmlW_UpdateChildContent(object1,L"xades:SignedProperties|xades:SignedSignatureProperties|xades:SigningTime",L"TO BE GENERATED BY CHILKAT");
CkXmlW_UpdateAttrAt(object1,L"xades:SignedProperties|xades:SignedSignatureProperties|xades:SigningCertificateV2|xades:Cert|xades:CertDigest|ds:DigestMethod",TRUE,L"Algorithm",L"http://www.w3.org/2001/04/xmlenc#sha512");
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_UpdateChildContent(object1,L"xades:SignedProperties|xades:SignedSignatureProperties|xades:SignaturePolicyIdentifier|xades:SignaturePolicyId|xades:SigPolicyId|xades:Identifier",L"https://www.batuz.eus/fitxategiak/batuz/ticketbai/sinadura_elektronikoaren_zehaztapenak_especificaciones_de_la_firma_electronica_v1_0.pdf");
CkXmlW_UpdateChildContent(object1,L"xades:SignedProperties|xades:SignedSignatureProperties|xades:SignaturePolicyIdentifier|xades:SignaturePolicyId|xades:SigPolicyId|xades:Description",L"");
CkXmlW_UpdateAttrAt(object1,L"xades:SignedProperties|xades:SignedSignatureProperties|xades:SignaturePolicyIdentifier|xades:SignaturePolicyId|xades:SigPolicyHash|ds:DigestMethod",TRUE,L"Algorithm",L"http://www.w3.org/2001/04/xmlenc#sha256");
CkXmlW_UpdateChildContent(object1,L"xades:SignedProperties|xades:SignedSignatureProperties|xades:SignaturePolicyIdentifier|xades:SignaturePolicyId|xades:SigPolicyHash|ds:DigestValue",L"Quzn98x3PMbSHwbUzaj5f5KOpiH0u8bvmwbbbNkO9Es=");
CkXmlW_UpdateChildContent(object1,L"xades:SignedProperties|xades:SignedSignatureProperties|xades:SignaturePolicyIdentifier|xades:SignaturePolicyId|xades:SigPolicyQualifiers|xades:SigPolicyQualifier|xades:SPURI",L"https://www.batuz.eus/fitxategiak/batuz/ticketbai/sinadura_elektronikoaren_zehaztapenak_especificaciones_de_la_firma_electronica_v1_0.pdf");
CkXmlW_UpdateAttrAt(object1,L"xades:SignedProperties|xades:SignedDataObjectProperties|xades:DataObjectFormat",TRUE,L"ObjectReference",L"#Reference-43b5c8a3-7ce0-4056-bdbe-d2076d8ac825");
CkXmlW_UpdateChildContent(object1,L"xades:SignedProperties|xades:SignedDataObjectProperties|xades:DataObjectFormat|xades:Description",L"");
CkXmlW_UpdateAttrAt(object1,L"xades:SignedProperties|xades:SignedDataObjectProperties|xades:DataObjectFormat|xades:ObjectIdentifier|xades:Identifier",TRUE,L"Qualifier",L"OIDAsURN");
CkXmlW_UpdateChildContent(object1,L"xades:SignedProperties|xades:SignedDataObjectProperties|xades:DataObjectFormat|xades:ObjectIdentifier|xades:Identifier",L"urn:oid:1.2.840.10003.5.109.10");
CkXmlW_UpdateChildContent(object1,L"xades:SignedProperties|xades:SignedDataObjectProperties|xades:DataObjectFormat|xades:ObjectIdentifier|xades:Description",L"");
CkXmlW_UpdateChildContent(object1,L"xades:SignedProperties|xades:SignedDataObjectProperties|xades:DataObjectFormat|xades:MimeType",L"text/xml");
CkXmlW_UpdateChildContent(object1,L"xades:SignedProperties|xades:SignedDataObjectProperties|xades:DataObjectFormat|xades:Encoding",L"");
CkXmlDSigGenW_AddObject(gen,L"",CkXmlW_getXml(object1),L"",L"");
// -------- Reference 1 --------
CkXmlDSigGenW_AddSameDocRef(gen,L"",L"sha512",L"C14N",L"",L"http://www.w3.org/2000/09/xmldsig#Object");
CkXmlDSigGenW_SetRefIdAttr(gen,L"",L"Reference-43b5c8a3-7ce0-4056-bdbe-d2076d8ac825");
// -------- Reference 2 --------
CkXmlDSigGenW_AddObjectRef(gen,L"Signature-43861174-a0e6-45f9-afbf-8b48c46c6c13-SignedProperties",L"sha512",L"",L"",L"http://uri.etsi.org/01903#SignedProperties");
// -------- Reference 3 --------
CkXmlDSigGenW_AddSameDocRef(gen,L"Signature-43861174-a0e6-45f9-afbf-8b48c46c6c13-KeyInfo",L"sha512",L"",L"",L"");
// 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"Certificate");
// Load XML to be signed...
sbXml = CkStringBuilderW_Create();
CkXmlW_GetXmlSb(xmlToSign,sbXml);
CkXmlDSigGenW_putBehaviors(gen,L"IndentedSignature,TransformSignatureXPath");
// 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_2.xml",L"utf-8",FALSE);
wprintf(L"%s\n",CkStringBuilderW_getAsString(sbXml));
// ----------------------------------------
// Verify the signatures 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;
}
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"All signatures were successfully verified.\n");
CkXmlW_Dispose(xmlToSign);
CkXmlDSigGenW_Dispose(gen);
CkXmlW_Dispose(object1);
CkCertW_Dispose(cert);
CkStringBuilderW_Dispose(sbXml);
CkXmlDSigW_Dispose(verifier);
}