Lua Requires Chilkat v11.0.0+
Lua
eHealth.gov.be RequestSecurityToken
Request a security token for use with the eHealth.gov.be SOAP web services.Chilkat Lua Downloads
local chilkat = require("chilkat")
-- 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..
local cert = chilkat.Cert.new()
local success = cert:load_pfx_file("SSIN=12345678.acc.p12", "p12_password")
if not success then
print(cert.last_error_text)
return
end
-- 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>
local xmlToSign = chilkat.Xml.new()
xmlToSign.tag = "soapenv:Envelope"
xmlToSign:add_attribute("xmlns:ns", "http://docs.oasis-open.org/ws-sx/ws-trust/200512")
xmlToSign:add_attribute("xmlns:soapenv", "http://schemas.xmlsoap.org/soap/envelope/")
xmlToSign:update_attr_at("soapenv:Header|wsse:Security", true, "xmlns:wsse", "http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-wssecurity-secext-1.0.xsd")
xmlToSign:update_attr_at("soapenv:Header|wsse:Security", true, "xmlns:wsu", "http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-wssecurity-utility-1.0.xsd")
xmlToSign:update_attr_at("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")
xmlToSign:update_attr_at("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")
xmlToSign:update_attr_at("soapenv:Header|wsse:Security|wsse:BinarySecurityToken", true, "wsu:Id", "X509-4A13D668E59AAC4F3816750824965588")
local bdCert = chilkat.BinData.new()
cert:export_cert_der_bd(bdCert)
xmlToSign:update_child_content("soapenv:Header|wsse:Security|wsse:BinarySecurityToken", bdCert:get_encoded("base64"))
xmlToSign:update_attr_at("soapenv:Header|wsse:Security|wsu:Timestamp", true, "wsu:Id", "TS-4A13D668E59AAC4F3816750824965567")
local dt = chilkat.DateTime.new()
dt:set_from_current_system_time()
xmlToSign:update_child_content("soapenv:Header|wsse:Security|wsu:Timestamp|wsu:Created", dt:get_as_timestamp(false))
dt:add_seconds(300)
xmlToSign:update_child_content("soapenv:Header|wsse:Security|wsu:Timestamp|wsu:Expires", dt:get_as_timestamp(false))
dt:add_seconds(-300)
xmlToSign:update_attr_at("soapenv:Body", true, "wsu:Id", "id-4A13D668E59AAC4F38167508249655911")
xmlToSign:update_attr_at("soapenv:Body", true, "xmlns:wsu", "http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-wssecurity-utility-1.0.xsd")
xmlToSign:update_attr_at("soapenv:Body|wst:RequestSecurityToken", true, "Context", "RC-302613de-a809-46b5-931a-0a55bfca5937")
xmlToSign:update_attr_at("soapenv:Body|wst:RequestSecurityToken", true, "xmlns:auth", "http://docs.oasis-open.org/wsfed/authorization/200706")
xmlToSign:update_attr_at("soapenv:Body|wst:RequestSecurityToken", true, "xmlns:ds", "http://www.w3.org/2000/09/xmldsig#")
xmlToSign:update_attr_at("soapenv:Body|wst:RequestSecurityToken", true, "xmlns:wsa", "http://schemas.xmlsoap.org/ws/2004/08/addressing")
xmlToSign:update_attr_at("soapenv:Body|wst:RequestSecurityToken", true, "xmlns:wsp", "http://schemas.xmlsoap.org/ws/2004/09/policy")
xmlToSign:update_attr_at("soapenv:Body|wst:RequestSecurityToken", true, "xmlns:wsse", "http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-wssecurity-secext-1.0.xsd")
xmlToSign:update_attr_at("soapenv:Body|wst:RequestSecurityToken", true, "xmlns:wst", "http://docs.oasis-open.org/ws-sx/ws-trust/200512")
xmlToSign:update_child_content("soapenv:Body|wst:RequestSecurityToken|wst:TokenType", "http://docs.oasis-open.org/wss/oasis-wss-saml-token-profile-1.1#SAMLV1.1")
xmlToSign:update_child_content("soapenv:Body|wst:RequestSecurityToken|wst:RequestType", "http://docs.oasis-open.org/ws-sx/ws-trust/200512/Issue")
success = xmlToSign:update_attr_at("soapenv:Body|wst:RequestSecurityToken|wst:Claims", true, "Dialect", "http://docs.oasis-open.org/wsfed/authorization/200706/authclaims")
success = xmlToSign:update_attr_at("soapenv:Body|wst:RequestSecurityToken|wst:Claims|auth:ClaimType[1]", true, "Uri", "urn:be:fgov:ehealth:1.0:certificateholder:person:ssin")
xmlToSign:update_child_content("soapenv:Body|wst:RequestSecurityToken|wst:KeyType", "http://docs.oasis-open.org/ws-sx/wstrust/200512/PublicKey")
local gen = chilkat.XmlDSigGen.new()
gen.sig_location = "soapenv:Envelope|soapenv:Header|wsse:Security|wsse:BinarySecurityToken"
gen.sig_location_mod = 1
gen.sig_id = "SIG-4A13D668E59AAC4F38167508249656212"
gen.sig_namespace_prefix = "ds"
gen.sig_namespace_uri = "http://www.w3.org/2000/09/xmldsig#"
gen.signed_info_prefix_list = "soapenv urn urn1"
gen.inc_namespace_prefix = "ec"
gen.inc_namespace_uri = "http://www.w3.org/2001/10/xml-exc-c14n#"
gen.signed_info_canon_alg = "EXCL_C14N"
gen.signed_info_digest_method = "sha256"
-- Set the KeyInfoId before adding references..
gen.key_info_id = "KI-4A13D668E59AAC4F3816750824965589"
-- -------- Reference 1 --------
gen:add_same_doc_ref("TS-4A13D668E59AAC4F3816750824965567", "sha256", "EXCL_C14N", "wsse soapenv urn urn1", "")
-- -------- Reference 2 --------
gen:add_same_doc_ref("id-4A13D668E59AAC4F38167508249655911", "sha256", "EXCL_C14N", "urn urn1", "")
-- -------- Reference 3 --------
gen:add_same_doc_ref("X509-4A13D668E59AAC4F3816750824965588", "sha256", "EXCL_C14N", "_EMPTY_", "")
gen:set_x509_cert(cert, true)
gen.key_info_type = "Custom"
-- Create the custom KeyInfo XML..
local xmlCustomKeyInfo = chilkat.Xml.new()
xmlCustomKeyInfo.tag = "wsse:SecurityTokenReference"
xmlCustomKeyInfo:add_attribute("wsu:Id", "STR-4A13D668E59AAC4F38167508249655810")
xmlCustomKeyInfo:update_attr_at("wsse:Reference", true, "URI", "#X509-4A13D668E59AAC4F3816750824965588")
xmlCustomKeyInfo:update_attr_at("wsse:Reference", true, "ValueType", "http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-x509-token-profile-1.0#X509v3")
xmlCustomKeyInfo.emit_xml_decl = false
gen.custom_key_info_xml = xmlCustomKeyInfo:get_xml()
-- Load XML to be signed...
local sbXml = chilkat.StringBuilder.new()
xmlToSign:get_xml_sb(sbXml)
gen.behaviors = "IndentedSignature"
-- Sign the XML...
success = gen:create_xml_dsig_sb(sbXml)
if not success then
print(gen.last_error_text)
return
end
-- The sbXml is sent as the HTTP request body below..
print(sbXml:get_as_string())
-- -----------------------------------------------------------------------------------------------------------
-- Send the SOAP requet to ask the server to issue a security token, which can then be used to access other SOAP services..
local http = chilkat.Http.new()
success = http:set_ssl_client_cert(cert)
if not success then
print(http.last_error_text)
return
end
http:set_request_header("Content-Type", "text/xml")
local url = "https://services-acpt.ehealth.fgov.be/IAM/SecurityTokenService/v1/RequestSecurityToken"
local resp = chilkat.HttpResponse.new()
success = http:http_sb("POST", url, sbXml, "utf-8", "application/xml", resp)
if not success then
print(http.last_error_text)
return
end
local responseStatus = resp.status_code
print("Response Status Code = " .. responseStatus)
-- 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.
print(resp.body_str)
-- 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.
local bdSecToken = chilkat.BinData.new()
resp:get_body_bd(bdSecToken)
-- 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
bdSecToken:write_file("qa_data/tokens/ehealth-fgov-be-sectoken.xml")
print("OK")