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
(AutoIt) eHealth.gov.be RequestSecurityTokenRequest a security token for use with the eHealth.gov.be SOAP web services. For more information, see https://www.ehealth.fgov.be/ehealthplatform/fr/data/file/view/bf25682e28c6ccd0d06768c73a467176f63791dd?name=STS%20-%20WS%20Trust%20-%20Cookbook%20v1.0%20dd%2020012023.pdf
; This requires the Chilkat API to have been previously unlocked. ; See Global Unlock Sample for sample code. Local $bSuccess = True ; Provide a certificate + private key. ; Note: If your certificate + private key is located on a hardware token or smartcard, you can call a different function to load from smartcard.. $oCert = ObjCreate("Chilkat.Cert") $bSuccess = $oCert.LoadPfxFile("SSIN=12345678.acc.p12","p12_password") If ($bSuccess <> True) Then ConsoleWrite($oCert.LastErrorText & @CRLF) Exit EndIf ; Create the following XML to be signed.. ; <?xml version="1.0" encoding="UTF-8"?> ; <soapenv:Envelope xmlns:ns="http://docs.oasis-open.org/ws-sx/ws-trust/200512" xmlns:soapenv="http://schemas.xmlsoap.org/soap/envelope/"> ; <soapenv:Header> ; <wsse:Security 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"> ; <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#X509v3" ; wsu:Id="X509-4A13D668E59AAC4F3816750824965588">{organization certificate}</wsse:BinarySecurityToken> ; <wsu:Timestamp wsu:Id="TS-4A13D668E59AAC4F3816750824965567"> ; <wsu:Created>2023-02-01T12:42:11.156Z</wsu:Created> ; <wsu:Expires>2023-02-01T12:58:51.156Z</wsu:Expires> ; </wsu:Timestamp> ; </wsse:Security> ; </soapenv:Header> ; <soapenv:Body wsu:Id="id-4A13D668E59AAC4F38167508249655911" xmlns:wsu="http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-wssecurity-utility-1.0.xsd"> ; <wst:RequestSecurityToken Context="RC-302613de-a809-46b5-931a-0a55bfca5937" ; xmlns:auth="http://docs.oasis-open.org/wsfed/authorization/200706" ; xmlns:ds="http://www.w3.org/2000/09/xmldsig#" ; xmlns:wsa="http://schemas.xmlsoap.org/ws/2004/08/addressing" ; xmlns:wsp="http://schemas.xmlsoap.org/ws/2004/09/policy" ; xmlns:wsse="http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-wssecurity-secext-1.0.xsd" ; xmlns:wst="http://docs.oasis-open.org/ws-sx/ws-trust/200512"> ; <wst:TokenType>http://docs.oasis-open.org/wss/oasis-wss-saml-token-profile-1.1#SAMLV1.1</wst:TokenType> ; <wst:RequestType>http://docs.oasis-open.org/ws-sx/ws-trust/200512/Issue</wst:RequestType> ; <wst:Claims Dialect="http://docs.oasis-open.org/wsfed/authorization/200706/authclaims"> ; <auth:ClaimType Uri="urn:be:fgov:kbo-bce:organization:cbe-number"> ; <auth:Value>{cbenumber}</auth:Value> ; </auth:ClaimType> ; <auth:ClaimType Uri="urn:be:fgov:ehealth:1.0:certificateholder:enterprise:cbe-number"> ; <auth:Value>{cbenumber}</auth:Value> ; </auth:ClaimType> ; </wst:Claims> ; <wst:Lifetime> ; <wsu:Created>2023-02-01T08:30:10+02:00</wsu:Created> ; <wsu:Expires>2023-02-01T09:30:10+02:00</wsu:Expires> ; </wst:Lifetime> ; <wst:KeyType>http://docs.oasis-open.org/ws-sx/wstrust/200512/PublicKey</wst:KeyType> ; </wst:RequestSecurityToken> ; </soapenv:Body> ; </soapenv:Envelope> $oXmlToSign = ObjCreate("Chilkat.Xml") $oXmlToSign.Tag = "soapenv:Envelope" $oXmlToSign.AddAttribute("xmlns:ns","http://docs.oasis-open.org/ws-sx/ws-trust/200512") $oXmlToSign.AddAttribute("xmlns:soapenv","http://schemas.xmlsoap.org/soap/envelope/") $oXmlToSign.UpdateAttrAt("soapenv:Header|wsse:Security",True,"xmlns:wsse","http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-wssecurity-secext-1.0.xsd") $oXmlToSign.UpdateAttrAt("soapenv:Header|wsse:Security",True,"xmlns:wsu","http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-wssecurity-utility-1.0.xsd") $oXmlToSign.UpdateAttrAt("soapenv:Header|wsse:Security|wsse:BinarySecurityToken",True,"EncodingType","http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-soap-message-security-1.0#Base64Binary") $oXmlToSign.UpdateAttrAt("soapenv:Header|wsse:Security|wsse:BinarySecurityToken",True,"ValueType","http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-x509-token-profile-1.0#X509v3") $oXmlToSign.UpdateAttrAt("soapenv:Header|wsse:Security|wsse:BinarySecurityToken",True,"wsu:Id","X509-4A13D668E59AAC4F3816750824965588") $oBdCert = ObjCreate("Chilkat.BinData") $oCert.ExportCertDerBd($oBdCert) $oXmlToSign.UpdateChildContent "soapenv:Header|wsse:Security|wsse:BinarySecurityToken",$oBdCert.GetEncoded("base64") $oXmlToSign.UpdateAttrAt("soapenv:Header|wsse:Security|wsu:Timestamp",True,"wsu:Id","TS-4A13D668E59AAC4F3816750824965567") $oDt = ObjCreate("Chilkat.CkDateTime") $oDt.SetFromCurrentSystemTime() $oXmlToSign.UpdateChildContent "soapenv:Header|wsse:Security|wsu:Timestamp|wsu:Created",$oDt.GetAsTimestamp(False) $oDt.AddSeconds(300) $oXmlToSign.UpdateChildContent "soapenv:Header|wsse:Security|wsu:Timestamp|wsu:Expires",$oDt.GetAsTimestamp(False) $oDt.AddSeconds(-300) $oXmlToSign.UpdateAttrAt("soapenv:Body",True,"wsu:Id","id-4A13D668E59AAC4F38167508249655911") $oXmlToSign.UpdateAttrAt("soapenv:Body",True,"xmlns:wsu","http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-wssecurity-utility-1.0.xsd") $oXmlToSign.UpdateAttrAt("soapenv:Body|wst:RequestSecurityToken",True,"Context","RC-302613de-a809-46b5-931a-0a55bfca5937") $oXmlToSign.UpdateAttrAt("soapenv:Body|wst:RequestSecurityToken",True,"xmlns:auth","http://docs.oasis-open.org/wsfed/authorization/200706") $oXmlToSign.UpdateAttrAt("soapenv:Body|wst:RequestSecurityToken",True,"xmlns:ds","http://www.w3.org/2000/09/xmldsig#") $oXmlToSign.UpdateAttrAt("soapenv:Body|wst:RequestSecurityToken",True,"xmlns:wsa","http://schemas.xmlsoap.org/ws/2004/08/addressing") $oXmlToSign.UpdateAttrAt("soapenv:Body|wst:RequestSecurityToken",True,"xmlns:wsp","http://schemas.xmlsoap.org/ws/2004/09/policy") $oXmlToSign.UpdateAttrAt("soapenv:Body|wst:RequestSecurityToken",True,"xmlns:wsse","http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-wssecurity-secext-1.0.xsd") $oXmlToSign.UpdateAttrAt("soapenv:Body|wst:RequestSecurityToken",True,"xmlns:wst","http://docs.oasis-open.org/ws-sx/ws-trust/200512") $oXmlToSign.UpdateChildContent "soapenv:Body|wst:RequestSecurityToken|wst:TokenType","http://docs.oasis-open.org/wss/oasis-wss-saml-token-profile-1.1#SAMLV1.1" $oXmlToSign.UpdateChildContent "soapenv:Body|wst:RequestSecurityToken|wst:RequestType","http://docs.oasis-open.org/ws-sx/ws-trust/200512/Issue" $bSuccess = $oXmlToSign.UpdateAttrAt("soapenv:Body|wst:RequestSecurityToken|wst:Claims",True,"Dialect","http://docs.oasis-open.org/wsfed/authorization/200706/authclaims") $bSuccess = $oXmlToSign.UpdateAttrAt("soapenv:Body|wst:RequestSecurityToken|wst:Claims|auth:ClaimType[1]",True,"Uri","urn:be:fgov:ehealth:1.0:certificateholder:person:ssin") $oXmlToSign.UpdateChildContent "soapenv:Body|wst:RequestSecurityToken|wst:KeyType","http://docs.oasis-open.org/ws-sx/wstrust/200512/PublicKey" $oGen = ObjCreate("Chilkat.XmlDSigGen") $oGen.SigLocation = "soapenv:Envelope|soapenv:Header|wsse:Security|wsse:BinarySecurityToken" $oGen.SigLocationMod = 1 $oGen.SigId = "SIG-4A13D668E59AAC4F38167508249656212" $oGen.SigNamespacePrefix = "ds" $oGen.SigNamespaceUri = "http://www.w3.org/2000/09/xmldsig#" $oGen.SignedInfoPrefixList = "soapenv urn urn1" $oGen.IncNamespacePrefix = "ec" $oGen.IncNamespaceUri = "http://www.w3.org/2001/10/xml-exc-c14n#" $oGen.SignedInfoCanonAlg = "EXCL_C14N" $oGen.SignedInfoDigestMethod = "sha256" ; Set the KeyInfoId before adding references.. $oGen.KeyInfoId = "KI-4A13D668E59AAC4F3816750824965589" ; -------- Reference 1 -------- $oGen.AddSameDocRef("TS-4A13D668E59AAC4F3816750824965567","sha256","EXCL_C14N","wsse soapenv urn urn1","") ; -------- Reference 2 -------- $oGen.AddSameDocRef("id-4A13D668E59AAC4F38167508249655911","sha256","EXCL_C14N","urn urn1","") ; -------- Reference 3 -------- $oGen.AddSameDocRef("X509-4A13D668E59AAC4F3816750824965588","sha256","EXCL_C14N","_EMPTY_","") $oGen.SetX509Cert($oCert,True) $oGen.KeyInfoType = "Custom" ; Create the custom KeyInfo XML.. $oXmlCustomKeyInfo = ObjCreate("Chilkat.Xml") $oXmlCustomKeyInfo.Tag = "wsse:SecurityTokenReference" $oXmlCustomKeyInfo.AddAttribute("wsu:Id","STR-4A13D668E59AAC4F38167508249655810") $oXmlCustomKeyInfo.UpdateAttrAt("wsse:Reference",True,"URI","#X509-4A13D668E59AAC4F3816750824965588") $oXmlCustomKeyInfo.UpdateAttrAt("wsse:Reference",True,"ValueType","http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-x509-token-profile-1.0#X509v3") $oXmlCustomKeyInfo.EmitXmlDecl = False $oGen.CustomKeyInfoXml = $oXmlCustomKeyInfo.GetXml() ; Load XML to be signed... $oSbXml = ObjCreate("Chilkat.StringBuilder") $oXmlToSign.GetXmlSb($oSbXml) $oGen.Behaviors = "IndentedSignature" ; Sign the XML... $bSuccess = $oGen.CreateXmlDSigSb($oSbXml) If ($bSuccess <> True) Then ConsoleWrite($oGen.LastErrorText & @CRLF) Exit EndIf ; The sbXml is sent as the HTTP request body below.. ConsoleWrite($oSbXml.GetAsString() & @CRLF) ; ----------------------------------------------------------------------------------------------------------- ; Send the SOAP requet to ask the server to issue a security token, which can then be used to access other SOAP services.. $oHttp = ObjCreate("Chilkat.Http") $bSuccess = $oHttp.SetSslClientCert($oCert) If ($bSuccess = False) Then ConsoleWrite($oHttp.LastErrorText & @CRLF) Exit EndIf $oHttp.SetRequestHeader "Content-Type","text/xml" Local $sUrl = "https://services-acpt.ehealth.fgov.be/IAM/SecurityTokenService/v1/RequestSecurityToken" Local $oResp = $oHttp.PostXml($sUrl,$oSbXml.GetAsString(),"utf-8") If ($oHttp.LastMethodSuccess = False) Then ConsoleWrite($oHttp.LastErrorText & @CRLF) Exit EndIf Local $iResponseStatus = $oResp.StatusCode ConsoleWrite("Response Status Code = " & $iResponseStatus & @CRLF) ; You'll want to check to see if the response status code = 200. ; If not, then the response body contains error information instead of a security token. ; This example will assume we received 200 status code. ConsoleWrite($oResp.BodyStr & @CRLF) ; The response body contains XML like this: ; <SOAP-ENV:Envelope xmlns:SOAP-ENV="http://schemas.xmlsoap.org/soap/envelope/"> ; <SOAP-ENV:Header/> ; <SOAP-ENV:Body> ; <wst:RequestSecurityTokenResponse xmlns:wst="http://docs.oasis-open.org/ws-sx/ws-trust/200512" Context="RC-302613de-a809-46b5-931a-0a55bfca5937"> ; <wst:RequestedSecurityToken> ; <Assertion xmlns="urn:oasis:names:tc:SAML:1.0:assertion" AssertionID="_3e8ea5c951b2167c274974750ace9b5d" ; ... ; </Assertion> ; </wst:RequestedSecurityToken> ; </wst:RequestSecurityTokenResponse> ; </SOAP-ENV:Body> ; </SOAP-ENV:Envelope> ; The portion of the response from <Assertion ..> ... </Assertion> is the SAML security token to be included ; in a subsesquent SOAP request. It is extremely important to not modify the contents of the security token in any way, including not changing ; whitespace or any formatting. Therefore, we get the response body exactly as-is, to be used in a SOAP request. ; Copy the response body to a Chilkat BinData object. $oBdSecToken = ObjCreate("Chilkat.BinData") $oResp.GetBodyBd($oBdSecToken) ; Let's save the bdSecToken to a file, and pick it up in the next example where it is used ; in a SOAP request, such as in this example: AddressBook Search for Professionals $oBdSecToken.WriteFile("qa_data/tokens/ehealth-fgov-be-sectoken.xml") ConsoleWrite("OK" & @CRLF) |
© 2000-2024 Chilkat Software, Inc. All Rights Reserved.