|
Chilkat • HOME • .NET Core C# • Android™ • AutoIt • C • C# • C++ • Chilkat2-Python • CkPython • Classic ASP • DataFlex • Delphi ActiveX • Delphi DLL • Go • Java • Lianja • Mono C# • Node.js • Objective-C • PHP ActiveX • PHP Extension • Perl • PowerBuilder • PowerShell • PureBasic • Ruby • SQL Server • Swift 2 • Swift 3,4,5... • Tcl • Unicode C • Unicode C++ • VB.NET • VBScript • Visual Basic 6.0 • Visual FoxPro • Xojo Plugin
(PowerShell) TicketBAI Sign XML Example 1See more TicketBAI ExamplesFirst example to demonstrate how to sign XML for TicketBAI.
Add-Type -Path "C:\chilkat\ChilkatDotNet47-9.5.0-x64\ChilkatDotNet47.dll" # 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 = New-Object Chilkat.Xml $xmlToSign.Tag = "T:TicketBai" $xmlToSign.AddAttribute("xmlns:T","urn:ticketbai:emision") $xmlToSign.UpdateChildContent("Cabecera|IDVersionTBAI","1.2") $xmlToSign.UpdateChildContent("Sujetos|Emisor|NIF","79732487C") $xmlToSign.UpdateChildContent("Sujetos|Emisor|ApellidosNombreRazonSocial","ARRIOLA LEJARDI ANE") $xmlToSign.UpdateChildContent("Sujetos|Destinatarios|IDDestinatario|NIF","B00000034") $xmlToSign.UpdateChildContent("Sujetos|Destinatarios|IDDestinatario|ApellidosNombreRazonSocial","CONSULTORIA GALDETU") $xmlToSign.UpdateChildContent("Factura|CabeceraFactura|SerieFactura","A2022") $xmlToSign.UpdateChildContent("Factura|CabeceraFactura|NumFactura","0399") $xmlToSign.UpdateChildContent("Factura|CabeceraFactura|FechaExpedicionFactura","06-05-2022") $xmlToSign.UpdateChildContent("Factura|CabeceraFactura|HoraExpedicionFactura","10:30:28") $xmlToSign.UpdateChildContent("Factura|DatosFactura|DescripcionFactura","Venta Fotocopistera") $xmlToSign.UpdateChildContent("Factura|DatosFactura|ImporteTotalFactura","31.46") $xmlToSign.UpdateChildContent("Factura|DatosFactura|Claves|IDClave|ClaveRegimenIvaOpTrascendencia","01") $xmlToSign.UpdateChildContent("Factura|TipoDesglose|DesgloseFactura|Sujeta|NoExenta|DetalleNoExenta|TipoNoExenta","S1") $xmlToSign.UpdateChildContent("Factura|TipoDesglose|DesgloseFactura|Sujeta|NoExenta|DetalleNoExenta|DesgloseIVA|DetalleIVA|BaseImponible","26.00") $xmlToSign.UpdateChildContent("Factura|TipoDesglose|DesgloseFactura|Sujeta|NoExenta|DetalleNoExenta|DesgloseIVA|DetalleIVA|TipoImpositivo","21.00") $xmlToSign.UpdateChildContent("Factura|TipoDesglose|DesgloseFactura|Sujeta|NoExenta|DetalleNoExenta|DesgloseIVA|DetalleIVA|CuotaImpuesto","5.46") $xmlToSign.UpdateChildContent("HuellaTBAI|EncadenamientoFacturaAnterior|SerieFacturaAnterior","A2022") $xmlToSign.UpdateChildContent("HuellaTBAI|EncadenamientoFacturaAnterior|NumFacturaAnterior","0398") $xmlToSign.UpdateChildContent("HuellaTBAI|EncadenamientoFacturaAnterior|FechaExpedicionFacturaAnterior","05-05-2022") $xmlToSign.UpdateChildContent("HuellaTBAI|EncadenamientoFacturaAnterior|SignatureValueFirmaFacturaAnterior","KwXaQec65SKpVP7EU9o4nUXOx7SAftIToFsxH+2j2tXPXhpBUnS26dhdSpiMl2DlTuqRsFdZfWyYazaGHgSRQHZZAnFtpbi4BeMk") $xmlToSign.UpdateChildContent("HuellaTBAI|Software|LicenciaTBAI","TBAIPRUEBA") $xmlToSign.UpdateChildContent("HuellaTBAI|Software|EntidadDesarrolladora|NIF","A48119820") $xmlToSign.UpdateChildContent("HuellaTBAI|Software|Nombre","DFBTBAI") $xmlToSign.UpdateChildContent("HuellaTBAI|Software|Version","1.04.00") $xmlToSign.UpdateChildContent("HuellaTBAI|NumSerieDispositivo","GP4FC5J") $gen = New-Object Chilkat.XmlDSigGen $gen.SigLocation = "T:TicketBai" $gen.SigLocationMod = 0 $gen.SigId = "Signature-63c35f38-2b5f-4600-b3da-3ddee86d62b3-Signature" $gen.SigNamespacePrefix = "ds" $gen.SigNamespaceUri = "http://www.w3.org/2000/09/xmldsig#" $gen.SigValueId = "Signature-63c35f38-2b5f-4600-b3da-3ddee86d62b3-SignatureValue" $gen.SignedInfoCanonAlg = "C14N" $gen.SignedInfoDigestMethod = "sha256" # Set the KeyInfoId before adding references.. $gen.KeyInfoId = "Signature-63c35f38-2b5f-4600-b3da-3ddee86d62b3-KeyInfo" # Create an Object to be added to the Signature. $object1 = New-Object Chilkat.Xml $object1.Tag = "xades:QualifyingProperties" $object1.AddAttribute("xmlns:xades","http://uri.etsi.org/01903/v1.3.2#") $object1.AddAttribute("Id","Signature-63c35f38-2b5f-4600-b3da-3ddee86d62b3-QualifyingProperties") $object1.AddAttribute("Target","#Signature-63c35f38-2b5f-4600-b3da-3ddee86d62b3-Signature") $object1.AddAttribute("xmlns:ds","http://www.w3.org/2000/09/xmldsig#") $object1.UpdateAttrAt("xades:SignedProperties",$true,"Id","Signature-63c35f38-2b5f-4600-b3da-3ddee86d62b3-SignedProperties") $object1.UpdateChildContent("xades:SignedProperties|xades:SignedSignatureProperties|xades:SigningTime","TO BE GENERATED BY CHILKAT") $object1.UpdateAttrAt("xades:SignedProperties|xades:SignedSignatureProperties|xades:SigningCertificate|xades:Cert|xades:CertDigest|ds:DigestMethod",$true,"Algorithm","http://www.w3.org/2001/04/xmlenc#sha512") $object1.UpdateChildContent("xades:SignedProperties|xades:SignedSignatureProperties|xades:SigningCertificate|xades:Cert|xades:CertDigest|ds:DigestValue","TO BE GENERATED BY CHILKAT") $object1.UpdateChildContent("xades:SignedProperties|xades:SignedSignatureProperties|xades:SigningCertificate|xades:Cert|xades:IssuerSerial|ds:X509IssuerName","TO BE GENERATED BY CHILKAT") $object1.UpdateChildContent("xades:SignedProperties|xades:SignedSignatureProperties|xades:SigningCertificate|xades:Cert|xades:IssuerSerial|ds:X509SerialNumber","TO BE GENERATED BY CHILKAT") $object1.UpdateChildContent("xades:SignedProperties|xades:SignedSignatureProperties|xades:SignaturePolicyIdentifier|xades:SignaturePolicyId|xades:SigPolicyId|xades:Identifier","https://www.batuz.eus/fitxategiak/batuz/ticketbai/sinadura_elektronikoaren_zehaztapenak_especificaciones_de_la_firma_electronica_v1_0.pdf") $object1.UpdateChildContent("xades:SignedProperties|xades:SignedSignatureProperties|xades:SignaturePolicyIdentifier|xades:SignaturePolicyId|xades:SigPolicyId|xades:Description","") $object1.UpdateAttrAt("xades:SignedProperties|xades:SignedSignatureProperties|xades:SignaturePolicyIdentifier|xades:SignaturePolicyId|xades:SigPolicyHash|ds:DigestMethod",$true,"Algorithm","http://www.w3.org/2001/04/xmlenc#sha256") $object1.UpdateChildContent("xades:SignedProperties|xades:SignedSignatureProperties|xades:SignaturePolicyIdentifier|xades:SignaturePolicyId|xades:SigPolicyHash|ds:DigestValue","Quzn98x3PMbSHwbUzaj5f5KOpiH0u8bvmwbbbNkO9Es=") $object1.UpdateChildContent("xades:SignedProperties|xades:SignedSignatureProperties|xades:SignaturePolicyIdentifier|xades:SignaturePolicyId|xades:SigPolicyQualifiers|xades:SigPolicyQualifier|xades:SPURI","https://www.batuz.eus/fitxategiak/batuz/ticketbai/sinadura_elektronikoaren_zehaztapenak_especificaciones_de_la_firma_electronica_v1_0.pdf") $object1.UpdateAttrAt("xades:SignedProperties|xades:SignedDataObjectProperties|xades:DataObjectFormat",$true,"ObjectReference","#Reference-7e6f3481-4acc-47de-90fd-67878ad15e8e") $object1.UpdateChildContent("xades:SignedProperties|xades:SignedDataObjectProperties|xades:DataObjectFormat|xades:Description","") $object1.UpdateAttrAt("xades:SignedProperties|xades:SignedDataObjectProperties|xades:DataObjectFormat|xades:ObjectIdentifier|xades:Identifier",$true,"Qualifier","OIDAsURN") $object1.UpdateChildContent("xades:SignedProperties|xades:SignedDataObjectProperties|xades:DataObjectFormat|xades:ObjectIdentifier|xades:Identifier","urn:oid:1.2.840.10003.5.109.10") $object1.UpdateChildContent("xades:SignedProperties|xades:SignedDataObjectProperties|xades:DataObjectFormat|xades:ObjectIdentifier|xades:Description","") $object1.UpdateChildContent("xades:SignedProperties|xades:SignedDataObjectProperties|xades:DataObjectFormat|xades:MimeType","text/xml") $object1.UpdateChildContent("xades:SignedProperties|xades:SignedDataObjectProperties|xades:DataObjectFormat|xades:Encoding","") $gen.AddObject("",$object1.GetXml(),"","") # -------- Reference 1 -------- $gen.AddSameDocRef("","sha512","C14N","","http://www.w3.org/2000/09/xmldsig#Object") $gen.SetRefIdAttr("","Reference-7e6f3481-4acc-47de-90fd-67878ad15e8e") # -------- Reference 2 -------- $gen.AddObjectRef("Signature-63c35f38-2b5f-4600-b3da-3ddee86d62b3-SignedProperties","sha512","","","http://uri.etsi.org/01903#SignedProperties") # -------- Reference 3 -------- $gen.AddSameDocRef("Signature-63c35f38-2b5f-4600-b3da-3ddee86d62b3-KeyInfo","sha512","","","") # Provide a certificate + private key. (PFX password is test123) $cert = New-Object Chilkat.Cert $success = $cert.LoadPfxFile("qa_data/pfx/cert_test123.pfx","test123") if ($success -ne $true) { $($cert.LastErrorText) exit } $gen.SetX509Cert($cert,$true) $gen.KeyInfoType = "X509Data+KeyValue" $gen.X509Type = "Certificate" # Load XML to be signed... $sbXml = New-Object Chilkat.StringBuilder $xmlToSign.GetXmlSb($sbXml) $gen.Behaviors = "TransformSignatureXPath" # Sign the XML... $success = $gen.CreateXmlDSigSb($sbXml) if ($success -ne $true) { $($gen.LastErrorText) exit } # ----------------------------------------------- # Save the signed XML to a file. $success = $sbXml.WriteFile("qa_output/signedXml_1.xml","utf-8",$false) $($sbXml.GetAsString()) # ---------------------------------------- # Verify the signatures we just produced... $verifier = New-Object Chilkat.XmlDSig $success = $verifier.LoadSignatureSb($sbXml) if ($success -ne $true) { $($verifier.LastErrorText) exit } $numSigs = $verifier.NumSignatures $verifyIdx = 0 while ($verifyIdx -lt $numSigs) { $verifier.Selector = $verifyIdx $verified = $verifier.VerifySignature($true) if ($verified -ne $true) { $($verifier.LastErrorText) exit } $verifyIdx = $verifyIdx + 1 } $("All signatures were successfully verified.") |
||||
© 2000-2024 Chilkat Software, Inc. All Rights Reserved.