|
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
(PureBasic) Sign SOAP XML using a wsse:SecurityTokenReferenceThis example signs SOAP XML such that the KeyInfo in the XML Signature is a wsse:SecurityTokenReference to the X.509 certificate embedded elsewhere in the SOAP XML.
IncludeFile "CkBinData.pb" IncludeFile "CkHttp.pb" IncludeFile "CkXml.pb" IncludeFile "CkPfx.pb" IncludeFile "CkXmlDSigGen.pb" IncludeFile "CkStringBuilder.pb" IncludeFile "CkCert.pb" Procedure ChilkatExample() ; This example requires the Chilkat API to have been previously unlocked. ; See Global Unlock Sample for sample code. ; To begin, we'll need a PFX containing a certificate and private key, and the SOAP XML to be signed. ; Chilkat provides sample data at chilkatsoft.com and chilkatdownload.com, and our first step is to download. ; ------------------------------------------------------------------------- ; Step 1: Get the SOAP XML template to be signed. ; sbXml.i = CkStringBuilder::ckCreate() If sbXml.i = 0 Debug "Failed to create object." ProcedureReturn EndIf http.i = CkHttp::ckCreate() If http.i = 0 Debug "Failed to create object." ProcedureReturn EndIf success.i = CkHttp::ckQuickGetSb(http,"https://www.chilkatsoft.com/exampleData/wssSoapTemplate.xml",sbXml) If success <> 1 Debug CkHttp::ckLastErrorText(http) CkStringBuilder::ckDispose(sbXml) CkHttp::ckDispose(http) ProcedureReturn EndIf ; The SOAP XML template contains this: ; <?xml version="1.0" encoding="UTF8"?> ; <SOAP-ENV:Envelope xmlns:SOAP-ENV="http://schemas.xmlsoap.org/soap/envelope/"> ; <SOAP-ENV:Header> ; <wsse:Security xmlns:ds="http://www.w3.org/2000/09/xmldsig#" ; xmlns:wsse="http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-wssecurity-secext-1.0.xsd" ; xmlns:wsu="http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-wssecurity-utility-1.0.xsd" ; xmlns:xenc="http://www.w3.org/2001/04/xmlenc#" SOAP-ENV:mustUnderstand="1"> ; <wsse:BinarySecurityToken ; EncodingType="http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-soap-message-security-1.0#Base64Binary" ; ValueType="http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-x509-token-profile-1.0#X509" ; wsu:Id="x509cert00">BASE64_CERT</wsse:BinarySecurityToken> ; </wsse:Security> ; </SOAP-ENV:Header> ; <SOAP-ENV:Body xmlns:wsu="http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-wssecurity-utility-1.0.xsd" wsu:Id="TheBody"> ; <getVersion xmlns="http://msgsec.wssecfvt.ws.ibm.com"/> ; </SOAP-ENV:Body> ; </SOAP-ENV:Envelope> ; ; ------------------------------------------------------------------------- ; Step 2: Get the test certificate and private key stored in a .pfx ; pfxData.i = CkBinData::ckCreate() If pfxData.i = 0 Debug "Failed to create object." ProcedureReturn EndIf success = CkHttp::ckQuickGetBd(http,"http://chilkatdownload.com/example_data/testcertificate.pfx",pfxData) If success <> 1 Debug CkHttp::ckLastErrorText(http) CkStringBuilder::ckDispose(sbXml) CkHttp::ckDispose(http) CkBinData::ckDispose(pfxData) ProcedureReturn EndIf pfx.i = CkPfx::ckCreate() If pfx.i = 0 Debug "Failed to create object." ProcedureReturn EndIf password.s = "test" success = CkPfx::ckLoadPfxEncoded(pfx,CkBinData::ckGetEncoded(pfxData,"base64"),"base64",password) If success <> 1 Debug CkPfx::ckLastErrorText(pfx) CkStringBuilder::ckDispose(sbXml) CkHttp::ckDispose(http) CkBinData::ckDispose(pfxData) CkPfx::ckDispose(pfx) ProcedureReturn EndIf ; ------------------------------------------------------------------------- ; Step 3: Get the certificate from the PFX. ; cert.i = CkPfx::ckGetCert(pfx,0) If CkPfx::ckLastMethodSuccess(pfx) <> 1 Debug CkPfx::ckLastErrorText(pfx) CkStringBuilder::ckDispose(sbXml) CkHttp::ckDispose(http) CkBinData::ckDispose(pfxData) CkPfx::ckDispose(pfx) ProcedureReturn EndIf ; ------------------------------------------------------------------------- ; Step 4: Replace "BASE64_CERT" with the actual base64 encoded certificate. ; bdCert.i = CkBinData::ckCreate() If bdCert.i = 0 Debug "Failed to create object." ProcedureReturn EndIf CkCert::ckExportCertDerBd(cert,bdCert) numReplaced.i = CkStringBuilder::ckReplace(sbXml,"BASE64_CERT",CkBinData::ckGetEncoded(bdCert,"base64")) ; ------------------------------------------------------------------------- ; Step 5: Build the wsse:SecurityTokenReference XML. ; This will be the CustomKeyInfoXml (see below). ; refXml.i = CkXml::ckCreate() If refXml.i = 0 Debug "Failed to create object." ProcedureReturn EndIf CkXml::setCkTag(refXml, "wsse:SecurityTokenReference") CkXml::ckUpdateAttrAt(refXml,"wsse:Reference",1,"URI","#x509cert00") CkXml::ckUpdateAttrAt(refXml,"wsse:Reference",1,"ValueType","http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-x509-token-profile-1.0#X509") ; The above lines of code builds the following XML: ; <wsse:SecurityTokenReference> ; <wsse:Reference URI="#x509cert00" ValueType="http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-x509-token-profile-1.0#X509" /> ; </wsse:SecurityTokenReference> ; CkXml::setCkEmitXmlDecl(refXml, 0) Debug CkXml::ckGetXml(refXml) ; ------------------------------------------------------------------------- ; Step 6: Setup the XML Digital Signature Generator and add the XML Signature. ; gen.i = CkXmlDSigGen::ckCreate() If gen.i = 0 Debug "Failed to create object." ProcedureReturn EndIf CkXmlDSigGen::setCkSigLocation(gen, "SOAP-ENV:Envelope|SOAP-ENV:Header|wsse:Security") CkXmlDSigGen::setCkSignedInfoPrefixList(gen, "wsse SOAP-ENV") CkXmlDSigGen::ckAddSameDocRef(gen,"TheBody","sha1","EXCL_C14N","","") CkXmlDSigGen::setCkKeyInfoType(gen, "Custom") CkXml::setCkEmitCompact(refXml, 1) CkXmlDSigGen::setCkCustomKeyInfoXml(gen, CkXml::ckGetXml(refXml)) CkXmlDSigGen::ckSetX509Cert(gen,cert,1) CkCert::ckDispose(cert) success = CkXmlDSigGen::ckCreateXmlDSigSb(gen,sbXml) If success <> 1 Debug CkXmlDSigGen::ckLastErrorText(gen) CkStringBuilder::ckDispose(sbXml) CkHttp::ckDispose(http) CkBinData::ckDispose(pfxData) CkPfx::ckDispose(pfx) CkBinData::ckDispose(bdCert) CkXml::ckDispose(refXml) CkXmlDSigGen::ckDispose(gen) ProcedureReturn EndIf ; Examine the signed XML Debug CkStringBuilder::ckGetAsString(sbXml) ; Pretty-printed, the XML signature looks as shown here: ; (The exact XML signature is shown below. Pretty-printing invalidates the XML signature.) ; <?xml version="1.0" encoding="UTF8" ?> ; <SOAP-ENV:Envelope xmlns:SOAP-ENV="http://schemas.xmlsoap.org/soap/envelope/"> ; <SOAP-ENV:Header> ; <wsse:Security xmlns:ds="http://www.w3.org/2000/09/xmldsig#" xmlns:wsse="http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-wssecurity-secext-1.0.xsd" xmlns:wsu="http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-wssecurity-utility-1.0.xsd" xmlns:xenc="http://www.w3.org/2001/04/xmlenc#" SOAP-ENV:mustUnderstand="1"> ; <wsse:BinarySecurityToken EncodingType="http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-soap-message-security-1.0#Base64Binary" ValueType="http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-x509-token-profile-1.0#X509" wsu:Id="x509cert00">MIID...</wsse:BinarySecurityToken> ; <ds:Signature xmlns:ds="http://www.w3.org/2000/09/xmldsig#"> ; <ds:SignedInfo> ; <ds:CanonicalizationMethod Algorithm="http://www.w3.org/2001/10/xml-exc-c14n#"> ; <InclusiveNamespaces xmlns="http://www.w3.org/2001/10/xml-exc-c14n#" PrefixList="wsse SOAP-ENV" /> ; </ds:CanonicalizationMethod> ; <ds:SignatureMethod Algorithm="http://www.w3.org/2001/04/xmldsig-more#rsa-sha256" /> ; <ds:Reference URI="#TheBody"> ; <ds:Transforms> ; <ds:Transform Algorithm="http://www.w3.org/2001/10/xml-exc-c14n#" /> ; </ds:Transforms> ; <ds:DigestMethod Algorithm="http://www.w3.org/2000/09/xmldsig#sha1" /> ; <ds:DigestValue>VhsSnaEAFsY0OYegKQh99v9csXg=</ds:DigestValue> ; </ds:Reference> ; </ds:SignedInfo> ; <ds:SignatureValue>Ynp3H4rtzpXIh4TaVxkpEkS1bMCCu672aeCzUOzheNNfnpmLsCZz3+zQjMBbchPggCayC5ihpEdhRe3XvPXjPXXAgxDP4mic091QPmjHlmUcu8yqRKfxnPtD35nqaxDtCYw+jGIzj+ch094vA4RPCfY8JQnb1mpy1ZjjsMW8741CIh1epbsd/0bZt6tfINUQ37seg07yvLbCJZ/Zf+h8FlFryQk6lHTTeZl/GfQ9NlDBcShby3x8Hc1KwW++zFqEA7G783R9AYPYn3fWTOBhYk5gkgFc+HaPRLR/L0Bp7ZPbmOR/iZQ+HK4W672tTdN/R2GdN7/deV7QTp2DYK1Z8w==</ds:SignatureValue> ; <ds:KeyInfo> ; <wsse:SecurityTokenReference> ; <wsse:Reference URI="#x509cert00" ValueType="http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-x509-token-profile-1.0#X509" /> ; </wsse:SecurityTokenReference> ; </ds:KeyInfo> ; </ds:Signature> ; </wsse:Security> ; </SOAP-ENV:Header> ; <SOAP-ENV:Body xmlns:wsu="http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-wssecurity-utility-1.0.xsd" wsu:Id="TheBody"> ; <getVersion xmlns="http://msgsec.wssecfvt.ws.ibm.com" /> ; </SOAP-ENV:Body> ; </SOAP-ENV:Envelope> ; ; -------------------------------------------------------------------------------------------- ; This is the XML signature, which is also available at https://www.chilkatsoft.com/exampleData/signedSoapBinarySecurityToken.xml ; ; <?xml version="1.0" encoding="UTF8"?> ; <SOAP-ENV:Envelope xmlns:SOAP-ENV="http://schemas.xmlsoap.org/soap/envelope/"> ; <SOAP-ENV:Header> ; <wsse:Security xmlns:ds="http://www.w3.org/2000/09/xmldsig#" ; xmlns:wsse="http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-wssecurity-secext-1.0.xsd" ; xmlns:wsu="http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-wssecurity-utility-1.0.xsd" ; xmlns:xenc="http://www.w3.org/2001/04/xmlenc#" SOAP-ENV:mustUnderstand="1"> ; <wsse:BinarySecurityToken ; EncodingType="http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-soap-message-security-1.0#Base64Binary" ; ValueType="http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-x509-token-profile-1.0#X509" ; wsu:Id="x509cert00">MIIDg...</wsse:BinarySecurityToken> ; <ds:Signature xmlns:ds="http://www.w3.org/2000/09/xmldsig#"><ds:SignedInfo><ds:CanonicalizationMethod Algorithm="http://www.w3.org/2001/10/xml-exc-c14n#"><InclusiveNamespaces xmlns="http://www.w3.org/2001/10/xml-exc-c14n#" PrefixList="wsse SOAP-ENV"/></ds:CanonicalizationMethod><ds:SignatureMethod Algorithm="http://www.w3.org/2001/04/xmldsig-more#rsa-sha256"/><ds:Reference URI="#TheBody"><ds:Transforms><ds:Transform Algorithm="http://www.w3.org/2001/10/xml-exc-c14n#"/></ds:Transforms><ds:DigestMethod Algorithm="http://www.w3.org/2000/09/xmldsig#sha1"/><ds:DigestValue>VhsSnaEAFsY0OYegKQh99v9csXg=</ds:DigestValue></ds:Reference></ds:SignedInfo><ds:SignatureValue>Ynp3H4rtzpXIh4TaVxkpEkS1bMCCu672aeCzUOzheNNfnpmLsCZz3+zQjMBbchPggCayC5ihpEdhRe3XvPXjPXXAgxDP4mic091QPmjHlmUcu8yqRKfxnPtD35nqaxDtCYw+jGIzj+ch094vA4RPCfY8JQnb1mpy1ZjjsMW8741CIh1epbsd/0bZt6tfINUQ37seg07yvLbCJZ/Zf+h8FlFryQk6lHTTeZl/GfQ9NlDBcShby3x8Hc1KwW++zFqEA7G783R9AYPYn3fWTOBhYk5gkgFc+HaPRLR/L0Bp7ZPbmOR/iZQ+HK4W672tTdN/R2GdN7/deV7QTp2DYK1Z8w==</ds:SignatureValue><ds:KeyInfo><wsse:SecurityTokenReference><wsse:Reference URI="#x509cert00" ValueType="http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-x509-token-profile-1.0#X509" /></wsse:SecurityTokenReference></ds:KeyInfo></ds:Signature></wsse:Security> ; </SOAP-ENV:Header> ; <SOAP-ENV:Body xmlns:wsu="http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-wssecurity-utility-1.0.xsd" wsu:Id="TheBody"> ; <getVersion xmlns="http://msgsec.wssecfvt.ws.ibm.com"/> ; </SOAP-ENV:Body> ; </SOAP-ENV:Envelope> ; CkStringBuilder::ckDispose(sbXml) CkHttp::ckDispose(http) CkBinData::ckDispose(pfxData) CkPfx::ckDispose(pfx) CkBinData::ckDispose(bdCert) CkXml::ckDispose(refXml) CkXmlDSigGen::ckDispose(gen) ProcedureReturn EndProcedure |
||||
© 2000-2024 Chilkat Software, Inc. All Rights Reserved.