|
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
(Go) UBL XAdES Enveloped SignatureDemonstrates how to create a UBL XAdES enveloped signature.
// 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 := chilkat.NewXml() xmlToSign.SetTag("CreditNote") xmlToSign.AddAttribute("xmlns","urn:oasis:names:specification:ubl:schema:xsd:CreditNote-2") xmlToSign.AddAttribute("xmlns:cac","urn:oasis:names:specification:ubl:schema:xsd:CommonAggregateComponents-2") xmlToSign.AddAttribute("xmlns:cbc","urn:oasis:names:specification:ubl:schema:xsd:CommonBasicComponents-2") xmlToSign.AddAttribute("xmlns:ext","urn:oasis:names:specification:ubl:schema:xsd:CommonExtensionComponents-2") xmlToSign.UpdateAttrAt("ext:UBLExtensions|ext:UBLExtension",true,"xmlns:sac","urn:oasis:names:specification:ubl:schema:xsd:SignatureAggregateComponents-2") xmlToSign.UpdateAttrAt("ext:UBLExtensions|ext:UBLExtension",true,"xmlns:sig","urn:oasis:names:specification:ubl:schema:xsd:CommonSignatureComponents-2") xmlToSign.UpdateChildContent("ext:UBLExtensions|ext:UBLExtension|ext:ExtensionContent|sig:UBLDocumentSignatures|sac:SignatureInformation","") xmlToSign.UpdateChildContent("cbc:CustomizationID","urn:cen.eu:en16931:2017") xmlToSign.UpdateChildContent("cbc:ProfileID","P1") xmlToSign.UpdateChildContent("cbc:ID","c2ad1540-cf12-4e83-b47c-906aac70242e") xmlToSign.UpdateChildContent("cbc:IssueDate","2009-12-15") xmlToSign.UpdateAttrAt("cbc:Note",true,"languageID","en") xmlToSign.UpdateChildContent("cbc:Note","Ordered in our booth at the convention.") xmlToSign.UpdateAttrAt("cbc:DocumentCurrencyCode",true,"listAgencyID","6") xmlToSign.UpdateAttrAt("cbc:DocumentCurrencyCode",true,"listID","ISO 4217 Alpha") xmlToSign.UpdateChildContent("cbc:DocumentCurrencyCode","HRK") xmlToSign.UpdateChildContent("cbc:AccountingCost","Project cost code 123") xmlToSign.UpdateChildContent("cac:InvoicePeriod|cbc:StartDate","2009-11-01") xmlToSign.UpdateChildContent("cac:InvoicePeriod|cbc:EndDate","2009-11-30") xmlToSign.UpdateChildContent("cac:OrderReference|cbc:ID","123") xmlToSign.UpdateChildContent("cac:ContractDocumentReference|cbc:ID","Contract321") xmlToSign.UpdateChildContent("cac:ContractDocumentReference|cbc:DocumentType","Framework agreement") xmlToSign.UpdateChildContent("cac:AdditionalDocumentReference|cbc:ID","Doc1") xmlToSign.UpdateChildContent("cac:AdditionalDocumentReference|cbc:DocumentType","Timesheet") xmlToSign.UpdateChildContent("cac:AdditionalDocumentReference|cac:Attachment|cac:ExternalReference|cbc:URI","http://www.suppliersite.eu/sheet001.html") xmlToSign.UpdateChildContent("cac:AdditionalDocumentReference[1]|cbc:ID","Doc2") xmlToSign.UpdateChildContent("cac:AdditionalDocumentReference[1]|cbc:DocumentType","Drawing") xmlToSign.UpdateAttrAt("cac:AdditionalDocumentReference[1]|cac:Attachment|cbc:EmbeddedDocumentBinaryObject",true,"mimeCode","application/pdf") xmlToSign.UpdateChildContent("cac:AdditionalDocumentReference[1]|cac:Attachment|cbc:EmbeddedDocumentBinaryObject","UjBsR09EbGhjZ0dTQUxNQUFBUUNBRU1tQ1p0dU1GUXhEUzhi") xmlToSign.UpdateChildContent("cac:AccountingSupplierParty|cac:Party|cac:PartyIdentification|cbc:ID","9934:18683136487::HR99:276") xmlToSign.UpdateChildContent("cac:AccountingSupplierParty|cac:Party|cac:PostalAddress|cbc:StreetName","KATANCICEVA") xmlToSign.UpdateChildContent("cac:AccountingSupplierParty|cac:Party|cac:PostalAddress|cbc:CityName","ZAGREB") xmlToSign.UpdateChildContent("cac:AccountingSupplierParty|cac:Party|cac:PostalAddress|cbc:PostalZone","10000") xmlToSign.UpdateChildContent("cac:AccountingSupplierParty|cac:Party|cac:PostalAddress|cac:Country|cbc:IdentificationCode","HR") xmlToSign.UpdateChildContent("cac:AccountingSupplierParty|cac:Party|cac:PartyTaxScheme|cbc:CompanyID","HR18683136487") xmlToSign.UpdateChildContent("cac:AccountingSupplierParty|cac:Party|cac:PartyTaxScheme|cac:TaxScheme|cbc:ID","FRE") xmlToSign.UpdateChildContent("cac:AccountingSupplierParty|cac:Party|cac:PartyLegalEntity|cbc:RegistrationName","MINISTARSTVO FINANCIJA") xmlToSign.UpdateChildContent("cac:AccountingSupplierParty|cac:Party|cac:Contact|cbc:Name","JURAJ MARKOVIC") xmlToSign.UpdateChildContent("cac:AccountingSupplierParty|cac:Party|cac:Contact|cbc:ElectronicMail","juraj.markovic@fina.hr") xmlToSign.UpdateChildContent("cac:AccountingCustomerParty|cac:Party|cac:PartyIdentification|cbc:ID","9934:49811265576::HR99:NOVO1") xmlToSign.UpdateChildContent("cac:AccountingCustomerParty|cac:Party|cac:PostalAddress|cbc:StreetName","GETALDICEVA 4") xmlToSign.UpdateChildContent("cac:AccountingCustomerParty|cac:Party|cac:PostalAddress|cbc:CityName","ZAGREB") xmlToSign.UpdateChildContent("cac:AccountingCustomerParty|cac:Party|cac:PostalAddress|cbc:PostalZone","10000") xmlToSign.UpdateChildContent("cac:AccountingCustomerParty|cac:Party|cac:PostalAddress|cac:Country|cbc:IdentificationCode","HR") xmlToSign.UpdateChildContent("cac:AccountingCustomerParty|cac:Party|cac:PartyTaxScheme|cbc:CompanyID","HR49811265576") xmlToSign.UpdateChildContent("cac:AccountingCustomerParty|cac:Party|cac:PartyTaxScheme|cac:TaxScheme|cbc:ID","VAT") xmlToSign.UpdateChildContent("cac:AccountingCustomerParty|cac:Party|cac:PartyLegalEntity|cbc:RegistrationName","NOVO1") xmlToSign.UpdateChildContent("cac:Delivery|cac:DeliveryLocation|cac:Address|cac:Country|cbc:IdentificationCode","HR") xmlToSign.UpdateChildContent("cac:PaymentMeans|cbc:PaymentMeansCode","30") xmlToSign.UpdateChildContent("cac:PaymentMeans|cbc:InstructionNote","Neki opis placanja") xmlToSign.UpdateChildContent("cac:PaymentMeans|cbc:PaymentID","HR00 12456") xmlToSign.UpdateChildContent("cac:PaymentMeans|cac:PayeeFinancialAccount|cbc:ID","HR1210010051863000160") xmlToSign.UpdateChildContent("cac:PaymentTerms|cbc:Note","Neki uvjeti placanja") xmlToSign.UpdateAttrAt("cac:TaxTotal|cbc:TaxAmount",true,"currencyID","HRK") xmlToSign.UpdateChildContent("cac:TaxTotal|cbc:TaxAmount","25.00") xmlToSign.UpdateAttrAt("cac:TaxTotal|cac:TaxSubtotal|cbc:TaxableAmount",true,"currencyID","HRK") xmlToSign.UpdateChildContent("cac:TaxTotal|cac:TaxSubtotal|cbc:TaxableAmount","100.00") xmlToSign.UpdateAttrAt("cac:TaxTotal|cac:TaxSubtotal|cbc:TaxAmount",true,"currencyID","HRK") xmlToSign.UpdateChildContent("cac:TaxTotal|cac:TaxSubtotal|cbc:TaxAmount","25.00") xmlToSign.UpdateChildContent("cac:TaxTotal|cac:TaxSubtotal|cac:TaxCategory|cbc:ID","S") xmlToSign.UpdateChildContent("cac:TaxTotal|cac:TaxSubtotal|cac:TaxCategory|cbc:Percent","25") xmlToSign.UpdateChildContent("cac:TaxTotal|cac:TaxSubtotal|cac:TaxCategory|cac:TaxScheme|cbc:ID","VAT") xmlToSign.UpdateAttrAt("cac:LegalMonetaryTotal|cbc:LineExtensionAmount",true,"currencyID","HRK") xmlToSign.UpdateChildContent("cac:LegalMonetaryTotal|cbc:LineExtensionAmount","100.00") xmlToSign.UpdateAttrAt("cac:LegalMonetaryTotal|cbc:TaxExclusiveAmount",true,"currencyID","HRK") xmlToSign.UpdateChildContent("cac:LegalMonetaryTotal|cbc:TaxExclusiveAmount","100.00") xmlToSign.UpdateAttrAt("cac:LegalMonetaryTotal|cbc:TaxInclusiveAmount",true,"currencyID","HRK") xmlToSign.UpdateChildContent("cac:LegalMonetaryTotal|cbc:TaxInclusiveAmount","125.00") xmlToSign.UpdateAttrAt("cac:LegalMonetaryTotal|cbc:PayableAmount",true,"currencyID","HRK") xmlToSign.UpdateChildContent("cac:LegalMonetaryTotal|cbc:PayableAmount","125.00") xmlToSign.UpdateChildContent("cac:CreditNoteLine|cbc:ID","1") xmlToSign.UpdateAttrAt("cac:CreditNoteLine|cbc:CreditedQuantity",true,"unitCode","H87") xmlToSign.UpdateChildContent("cac:CreditNoteLine|cbc:CreditedQuantity","1.000") xmlToSign.UpdateAttrAt("cac:CreditNoteLine|cbc:LineExtensionAmount",true,"currencyID","HRK") xmlToSign.UpdateChildContent("cac:CreditNoteLine|cbc:LineExtensionAmount","100.00") xmlToSign.UpdateChildContent("cac:CreditNoteLine|cac:Item|cbc:Description","Neki detaljniji opis proizvoda ide ovdje") xmlToSign.UpdateChildContent("cac:CreditNoteLine|cac:Item|cbc:Name","Neki proizvod") xmlToSign.UpdateChildContent("cac:CreditNoteLine|cac:Item|cac:OriginCountry|cbc:IdentificationCode","HR") xmlToSign.UpdateChildContent("cac:CreditNoteLine|cac:Item|cac:ClassifiedTaxCategory|cbc:ID","S") xmlToSign.UpdateChildContent("cac:CreditNoteLine|cac:Item|cac:ClassifiedTaxCategory|cbc:Percent","25") xmlToSign.UpdateChildContent("cac:CreditNoteLine|cac:Item|cac:ClassifiedTaxCategory|cac:TaxScheme|cbc:ID","VAT") xmlToSign.UpdateChildContent("cac:CreditNoteLine|cac:Item|cac:AdditionalItemProperty|cbc:Name","Boja") xmlToSign.UpdateChildContent("cac:CreditNoteLine|cac:Item|cac:AdditionalItemProperty|cbc:Value","Plava") xmlToSign.UpdateChildContent("cac:CreditNoteLine|cac:Item|cac:AdditionalItemProperty[1]|cbc:Name","Masa") xmlToSign.UpdateChildContent("cac:CreditNoteLine|cac:Item|cac:AdditionalItemProperty[1]|cbc:Value","1,2 Kg") xmlToSign.UpdateAttrAt("cac:CreditNoteLine|cac:Price|cbc:PriceAmount",true,"currencyID","HRK") xmlToSign.UpdateChildContent("cac:CreditNoteLine|cac:Price|cbc:PriceAmount","100.000000") xmlToSign.UpdateAttrAt("cac:CreditNoteLine|cac:Price|cbc:BaseQuantity",true,"unitCode","H87") xmlToSign.UpdateChildContent("cac:CreditNoteLine|cac:Price|cbc:BaseQuantity","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 := chilkat.NewXmlDSigGen() gen.SetSigLocation("CreditNote|ext:UBLExtensions|ext:UBLExtension|ext:ExtensionContent|sig:UBLDocumentSignatures|sac:SignatureInformation") gen.SetSigLocationMod(0) gen.SetSigId("Signature-7f4c4719515a4a0a8ce4d1b983a2ec69") gen.SetSigNamespacePrefix("") gen.SetSigNamespaceUri("http://www.w3.org/2000/09/xmldsig#") gen.SetSignedInfoCanonAlg("C14N") gen.SetSignedInfoDigestMethod("sha256") // Create an Object to be added to the Signature. object1 := chilkat.NewXml() object1.SetTag("xades:QualifyingProperties") object1.AddAttribute("xmlns:ds","http://www.w3.org/2000/09/xmldsig#") object1.AddAttribute("xmlns:xades","http://uri.etsi.org/01903/v1.3.2#") object1.AddAttribute("Target","#Signature-7f4c4719515a4a0a8ce4d1b983a2ec69") object1.UpdateAttrAt("xades:SignedProperties",true,"Id","SignedProperties-6573207f4ad64b49b0310f7a9e2dfadc") object1.UpdateChildContent("xades:SignedProperties|xades:SignedSignatureProperties|xades:SigningTime","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 object1.UpdateAttrAt("xades:SignedProperties|xades:SignedSignatureProperties|xades:SigningCertificateV2|xades:Cert|xades:CertDigest|ds:DigestMethod",true,"Algorithm","http://www.w3.org/2000/09/xmldsig#sha1") object1.UpdateChildContent("xades:SignedProperties|xades:SignedSignatureProperties|xades:SigningCertificateV2|xades:Cert|xades:CertDigest|ds:DigestValue","TO BE GENERATED BY CHILKAT") object1.UpdateChildContent("xades:SignedProperties|xades:SignedSignatureProperties|xades:SigningCertificateV2|xades:Cert|xades:IssuerSerialV2","TO BE GENERATED BY CHILKAT") object1.UpdateAttrAt("xades:SignedProperties|xades:SignedDataObjectProperties|xades:DataObjectFormat",true,"ObjectReference","") object1.UpdateChildContent("xades:SignedProperties|xades:SignedDataObjectProperties|xades:DataObjectFormat|xades:Description","document") object1.UpdateChildContent("xades:SignedProperties|xades:SignedDataObjectProperties|xades:DataObjectFormat|xades:MimeType","application/xml") object1.UpdateChildContent("xades:SignedProperties|xades:SignedDataObjectProperties|xades:DataObjectFormat|xades:Encoding","UTF-8") gen.AddObject("",*object1.GetXml(),"","") // -------- Reference 1 -------- gen.AddSameDocRef("","sha256","","","") // -------- Reference 2 -------- gen.AddObjectRef("SignedProperties-6573207f4ad64b49b0310f7a9e2dfadc","sha256","","","http://uri.etsi.org/01903#SignedProperties") // Provide a certificate + private key. (PFX password is test123) cert := chilkat.NewCert() success = cert.LoadPfxFile("qa_data/pfx/cert_test123.pfx","test123") if success != true { fmt.Println(cert.LastErrorText()) xmlToSign.DisposeXml() gen.DisposeXmlDSigGen() object1.DisposeXml() cert.DisposeCert() return } gen.SetX509Cert(cert,true) gen.SetKeyInfoType("X509Data+KeyValue") gen.SetX509Type("IssuerSerial,SubjectName,SKI,Certificate") // Load XML to be signed... sbXml := chilkat.NewStringBuilder() xmlToSign.GetXmlSb(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> gen.SetBehaviors("IndentedSignature,UBLDocumentSignatures") // Sign the XML... success = gen.CreateXmlDSigSb(sbXml) if success != true { fmt.Println(gen.LastErrorText()) xmlToSign.DisposeXml() gen.DisposeXmlDSigGen() object1.DisposeXml() cert.DisposeCert() sbXml.DisposeStringBuilder() return } // ----------------------------------------------- // Save the signed XML to a file. success = sbXml.WriteFile("qa_output/signedXml.xml","utf-8",false) fmt.Println(*sbXml.GetAsString()) // ---------------------------------------- // Verify the signature we just produced... verifier := chilkat.NewXmlDSig() success = verifier.LoadSignatureSb(sbXml) if success != true { fmt.Println(verifier.LastErrorText()) xmlToSign.DisposeXml() gen.DisposeXmlDSigGen() object1.DisposeXml() cert.DisposeCert() sbXml.DisposeStringBuilder() verifier.DisposeXmlDSig() return } // We should have just one signature.. numSigs := verifier.NumSignatures() verifyIdx := 0 for verifyIdx < numSigs { verifier.SetSelector(verifyIdx) verified := verifier.VerifySignature(true) if verified != true { fmt.Println(verifier.LastErrorText()) xmlToSign.DisposeXml() gen.DisposeXmlDSigGen() object1.DisposeXml() cert.DisposeCert() sbXml.DisposeStringBuilder() verifier.DisposeXmlDSig() return } verifyIdx = verifyIdx + 1 } fmt.Println("The signature was successfully verified.") xmlToSign.DisposeXml() gen.DisposeXmlDSigGen() object1.DisposeXml() cert.DisposeCert() sbXml.DisposeStringBuilder() verifier.DisposeXmlDSig() |
||||
© 2000-2024 Chilkat Software, Inc. All Rights Reserved.