|
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
(Classic ASP) Create XML Signature using Java KeyStore (.jks)Demonstrates how to create an XML digital signature using a certificate and private key from a Java KeyStore (.jks)
<html> <head> <meta http-equiv="Content-Type" content="text/html; charset=utf-8"> </head> <body> <% ' This example requires the Chilkat API to have been previously unlocked. ' See Global Unlock Sample for sample code. ' The SOAP XML to be signed in this example contains the following: ' <?xml version="1.0" encoding="UTF-8" standalone="no" ?> ' <SOAP-ENV:Envelope xmlns:SOAP-ENV="http://schemas.xmlsoap.org/soap/envelope/"> ' <SOAP-ENV:Header> ' <wsse:Security xmlns:wsse="http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-wssecurity-secext-1.0.xsd" SOAP-ENV:mustUnderstand="1"></wsse:Security> ' </SOAP-ENV:Header> ' <SOAP-ENV:Body xmlns:SOAP-SEC="http://schemas.xmlsoap.org/soap/security/2000-12" SOAP-SEC:id="Body"> ' <z:FooBar xmlns:z="http://example.com" /> ' </SOAP-ENV:Body> ' </SOAP-ENV:Envelope> ' ' Build the XML to sign. ' Use this online tool to generate the code from sample XML: ' Generate Code to Create XML ' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.Xml") set xml = Server.CreateObject("Chilkat.Xml") xml.Tag = "SOAP-ENV:Envelope" success = xml.AddAttribute("xmlns:SOAP-ENV","http://schemas.xmlsoap.org/soap/envelope/") success = xml.UpdateAttrAt("SOAP-ENV:Header|wsse:Security",1,"xmlns:wsse","http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-wssecurity-secext-1.0.xsd") success = xml.UpdateAttrAt("SOAP-ENV:Header|wsse:Security",1,"SOAP-ENV:mustUnderstand","1") success = xml.UpdateAttrAt("SOAP-ENV:Body",1,"xmlns:SOAP-SEC","http://schemas.xmlsoap.org/soap/security/2000-12") success = xml.UpdateAttrAt("SOAP-ENV:Body",1,"SOAP-SEC:id","Body") success = xml.UpdateAttrAt("SOAP-ENV:Body|z:FooBar",1,"xmlns:z","http://example.com") ' Load a JavaKeyStore file containing the certificate + private key. ' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.JavaKeyStore") set jks = Server.CreateObject("Chilkat.JavaKeyStore") password = "secret" success = jks.LoadFile(password,"qa_data/jks/test_secret.jks") If (success <> 1) Then Response.Write "<pre>" & Server.HTMLEncode( jks.LastErrorText) & "</pre>" Response.End End If ' Make sure we have a private key. If (jks.NumPrivateKeys < 1) Then Response.Write "<pre>" & Server.HTMLEncode( "No private key available.") & "</pre>" Response.End End If ' ------------------------------------------------------------------------- ' Get the certificate chain associated with the 1st (and probably only) private key in the JKS. ' chain is a Chilkat.CertChain Set chain = jks.GetCertChain(0) If (jks.LastMethodSuccess <> 1) Then Response.Write "<pre>" & Server.HTMLEncode( jks.LastErrorText) & "</pre>" Response.End End If ' cert is a Chilkat.Cert Set cert = chain.GetCert(0) If (chain.LastMethodSuccess <> 1) Then Response.Write "<pre>" & Server.HTMLEncode( chain.LastErrorText) & "</pre>" Response.End End If ' Verify again that this cert has a private key. If (cert.HasPrivateKey() <> 1) Then Response.Write "<pre>" & Server.HTMLEncode( "Certificate has no associated private key.") & "</pre>" Response.End End If ' Prepare for signing... ' Use this online tool to generate the following code from an already-signed XML sample: ' Generate Code to Create an XML Signature ' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.XmlDSigGen") set gen = Server.CreateObject("Chilkat.XmlDSigGen") ' Indicate where the Signature will be inserted. gen.SigLocation = "SOAP-ENV:Envelope|SOAP-ENV:Header|wsse:Security" ' Add a reference to the fragment of the XML to be signed. success = gen.AddSameDocRef("Body","sha1","EXCL_C14N","","") ' (You can read about the SignedInfoPrefixList in the online reference documentation. It's optional..) gen.SignedInfoPrefixList = "wsse SOAP-ENV" ' Provide the private key for signing via the certificate, and indicate that ' we want the base64 of the certificate embedded in the KeyInfo. gen.KeyInfoType = "X509Data" gen.X509Type = "Certificate" ' Note: Because our certificate was loaded from a JKS which also contained the private key, ' Chilkat automatically knows and has the private key associated with the certificate. ' We set bUsePrivateKey to tell the SetX509Cert method to automatically use the private key ' associated with the certificate for signing. bUsePrivateKey = 1 success = gen.SetX509Cert(cert,bUsePrivateKey) If (success <> 1) Then Response.Write "<pre>" & Server.HTMLEncode( gen.LastErrorText) & "</pre>" Response.End End If ' Everything's specified. Now create and insert the Signature ' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.StringBuilder") set sbXml = Server.CreateObject("Chilkat.StringBuilder") success = xml.GetXmlSb(sbXml) success = gen.CreateXmlDSigSb(sbXml) If (success <> 1) Then Response.Write "<pre>" & Server.HTMLEncode( gen.LastErrorText) & "</pre>" Response.End End If ' Examine the XML with the digital signature inserted Response.Write "<pre>" & Server.HTMLEncode( sbXml.GetAsString()) & "</pre>" %> </body> </html> |
||||
© 2000-2024 Chilkat Software, Inc. All Rights Reserved.