Sample code for 30+ languages & platforms
AutoIt

eHealth.gov.be RequestSecurityToken

Request a security token for use with the eHealth.gov.be SOAP web services.

Chilkat AutoIt Downloads

Download Chilkat for AutoIt
AutoIt 
Local $bSuccess = False

; This requires the Chilkat API to have been previously unlocked.
; See Global Unlock Sample for sample code.

; 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 = False) 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 = False) 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"
$oResp = ObjCreate("Chilkat.HttpResponse")
$bSuccess = $oHttp.HttpSb("POST",$sUrl,$oSbXml,"utf-8","application/xml",$oResp)
If ($bSuccess = 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)