Sample code for 30+ languages & platforms
Unicode C

Belgium eHealth Platform - AddressBook - Search for Professionals

See more Belgian eHealth Platform Examples

Demonstrates how to search for professionals using the AddressBook API.

Chilkat Unicode C Downloads

Unicode C
#include <C_CkCertW.h>
#include <C_CkBinDataW.h>
#include <C_CkXmlW.h>
#include <C_CkDateTimeW.h>
#include <C_CkHttpW.h>
#include <C_CkHttpResponseW.h>

void ChilkatSample(void)
    {
    BOOL success;
    HCkCertW cert;
    HCkBinDataW bdSecToken;
    int startIdx;
    int endIdx;
    const wchar_t *base64_saml_token;
    HCkXmlW xml;
    HCkDateTimeW dt;
    HCkHttpW http;
    const wchar_t *xmlStr;
    HCkHttpResponseW resp;

    success = FALSE;

    // This example assumes the Chilkat API to have been previously unlocked.
    // See Global Unlock Sample for sample code.

    // --------------------------------------------------------------------------------
    // Also see Chilkat's Online WSDL Code Generator
    // to generate code and SOAP Request and Response XML for each operation in a WSDL.
    // --------------------------------------------------------------------------------

    // 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..
    cert = CkCertW_Create();
    success = CkCertW_LoadPfxFile(cert,L"SSIN=12345678.acc.p12",L"p12_password");
    if (success == FALSE) {
        wprintf(L"%s\n",CkCertW_lastErrorText(cert));
        CkCertW_Dispose(cert);
        return;
    }

    // Let's get the SAML Security Token obtained from https://services-acpt.ehealth.fgov.be/IAM/SecurityTokenService/v1/RequestSecurityToken
    // a very short time ago..

    // See this example for how we got the SAML security token: eHealth Belgium Request Security Token
    bdSecToken = CkBinDataW_Create();
    success = CkBinDataW_LoadFile(bdSecToken,L"qa_data/tokens/ehealth-fgov-be-sectoken.xml");
    if (success == FALSE) {
        wprintf(L"Failed to load SAML security token\n");
        CkCertW_Dispose(cert);
        CkBinDataW_Dispose(bdSecToken);
        return;
    }

    // The SAML security token is just the part from <Assertion ..> ... </Assertion>
    // So let's get just that part..
    startIdx = CkBinDataW_FindString(bdSecToken,L"<Assertion",0,L"utf-8");
    if (startIdx < 0) {
        wprintf(L"Did not find the start of the SAML assertion.\n");
        CkCertW_Dispose(cert);
        CkBinDataW_Dispose(bdSecToken);
        return;
    }

    endIdx = CkBinDataW_FindString(bdSecToken,L"</Assertion>",0,L"utf-8");
    if (endIdx < 0) {
        wprintf(L"Did not find the end of the SAML assertion.\n");
        CkCertW_Dispose(cert);
        CkBinDataW_Dispose(bdSecToken);
        return;
    }

    // Adjust the index to the 1st byte after "</Assertion>"
    endIdx = endIdx + 12;
    base64_saml_token = CkBinDataW_getEncodedChunk(bdSecToken,startIdx,endIdx - startIdx,L"base64");

    wprintf(L"%s\n",base64_saml_token);

    // Our SOAP request will look like this:

    // The SOAP request to search for professionals looks like this:

    // <soapenv:Envelope xmlns:soapenv="http://schemas.xmlsoap.org/soap/envelope/" xmlns:add="urn:be:fgov:ehealth:addressbook:protocol:v1">
    //     <soapenv:Header>
    // 	      <wsse:Security xmlns:wsse="http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-wssecurity-secext-1.0.xsd">
    // 	         <wsse:BinarySecurityToken
    // 	            ValueType="http://docs.oasis-open.org/wss/oasis-wss-saml-token-profile-1.0#SAMLAssertionID"
    // 	            EncodingType="http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-soap-message-security-1.0#Base64Binary">BASE64_SAML_TOKEN</wsse:BinarySecurityToken>
    // 	      </wsse:Security>
    //     </soapenv:Header>
    //     <soapenv:Body>
    //         <add:SearchProfessionalsRequest Id="bdc38ae62-3e7f-4f80-80f7-c3e745500fa3" IssueInstant="2016-03-23T18:49:26.968+01:00" Offset="0" MaxElements="100">
    //             <add:SSIN>74062423769</add:SSIN>
    //         </add:SearchProfessionalsRequest>
    //     </soapenv:Body>
    // </soapenv:Envelope>

    xml = CkXmlW_Create();
    CkXmlW_putTag(xml,L"soapenv:Envelope");
    CkXmlW_UpdateAttrAt(xml,L"soapenv:Header|wsse:Security",TRUE,L"xmlns:wsse",L"http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-wssecurity-secext-1.0.xsd");
    CkXmlW_UpdateAttrAt(xml,L"soapenv:Header|wsse:Security|wsse:BinarySecurityToken",TRUE,L"ValueType",L"http://docs.oasis-open.org/wss/oasis-wss-saml-token-profile-1.0#SAMLAssertionID");
    CkXmlW_UpdateAttrAt(xml,L"soapenv:Header|wsse:Security|wsse:BinarySecurityToken",TRUE,L"EncodingType",L"http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-soap-message-security-1.0#Base64Binary");

    CkXmlW_UpdateChildContent(xml,L"soapenv:Header|wsse:Security|wsse:BinarySecurityToken",base64_saml_token);

    CkXmlW_UpdateAttrAt(xml,L"soapenv:Body|add:SearchProfessionalsRequest",TRUE,L"Id",L"bdc38ae62-3e7f-4f80-80f7-c3e745500fa3");

    dt = CkDateTimeW_Create();
    CkDateTimeW_SetFromCurrentSystemTime(dt);
    CkXmlW_UpdateAttrAt(xml,L"soapenv:Body|add:SearchProfessionalsRequest",TRUE,L"IssueInstant",CkDateTimeW_getAsTimestamp(dt,TRUE));

    CkXmlW_UpdateAttrAt(xml,L"soapenv:Body|add:SearchProfessionalsRequest",TRUE,L"Offset",L"0");
    CkXmlW_UpdateAttrAt(xml,L"soapenv:Body|add:SearchProfessionalsRequest",TRUE,L"MaxElements",L"100");
    CkXmlW_UpdateChildContent(xml,L"soapenv:Body|add:SearchProfessionalsRequest|urn:SSIN",L"74062423769");

    wprintf(L"%s\n",CkXmlW_getXml(xml));

    http = CkHttpW_Create();

    success = CkHttpW_SetSslClientCert(http,cert);
    if (success == FALSE) {
        wprintf(L"%s\n",CkHttpW_lastErrorText(http));
        CkCertW_Dispose(cert);
        CkBinDataW_Dispose(bdSecToken);
        CkXmlW_Dispose(xml);
        CkDateTimeW_Dispose(dt);
        CkHttpW_Dispose(http);
        return;
    }

    CkHttpW_SetRequestHeader(http,L"Content-Type",L"text/xml");
    CkHttpW_SetRequestHeader(http,L"SOAPAction",L"urn:be:fgov:ehealth:addressbook:protocol:v1:searchProfessionals");

    xmlStr = CkXmlW_getXml(xml);
    resp = CkHttpResponseW_Create();
    success = CkHttpW_HttpStr(http,L"POST",L"https://services.ehealth.fgov.be/AddressBook/v1",xmlStr,L"utf-8",L"application/xml",resp);
    if (success == FALSE) {
        wprintf(L"%s\n",CkHttpW_lastErrorText(http));
        CkCertW_Dispose(cert);
        CkBinDataW_Dispose(bdSecToken);
        CkXmlW_Dispose(xml);
        CkDateTimeW_Dispose(dt);
        CkHttpW_Dispose(http);
        CkHttpResponseW_Dispose(resp);
        return;
    }

    wprintf(L"%s\n",CkHttpResponseW_bodyStr(resp));
    wprintf(L"response status code = %d\n",CkHttpResponseW_getStatusCode(resp));


    CkCertW_Dispose(cert);
    CkBinDataW_Dispose(bdSecToken);
    CkXmlW_Dispose(xml);
    CkDateTimeW_Dispose(dt);
    CkHttpW_Dispose(http);
    CkHttpResponseW_Dispose(resp);

    }