(Unicode C++) palena.sii.cl getToken SOAP Request

Demonstrates how to call getToken SOAP request at palena.sii.cl

Chilkat C/C++ Library Downloads
MS Visual C/C++ Linux/CentOS C/C++ Alpine Linux C/C++ MAC OS X C/C++	armhf/aarch64 C/C++ C++ Builder iOS C/C++ Android C/C++	Solaris C/C++ MinGW C/C++

#include <CkXmlW.h>
#include <CkXmlDSigGenW.h>
#include <CkCertW.h>
#include <CkStringBuilderW.h>
#include <CkHttpW.h>
#include <CkHttpResponseW.h>

void ChilkatSample(void)
    {
    // This example requires the Chilkat API to have been previously unlocked.
    // See Global Unlock Sample for sample code.

    bool success;

    // Create the XML to be signed...
    CkXmlW xmlToSign;
    xmlToSign.put_Tag(L"getToken");
    // This is the seed obtained from palena.sii.cl getSeed
    xmlToSign.UpdateChildContent(L"item|Semilla",L"033878794660");

    CkXmlDSigGenW gen;

    gen.put_SigLocation(L"getToken");
    gen.put_SigLocationMod(0);
    gen.put_SigNamespacePrefix(L"");
    gen.put_SigNamespaceUri(L"http://www.w3.org/2000/09/xmldsig#");
    gen.put_SignedInfoCanonAlg(L"EXCL_C14N");
    gen.put_SignedInfoDigestMethod(L"sha1");

    gen.AddSameDocRef(L"",L"sha1",L"",L"",L"");

    // Provide a certificate + private key. (PFX password is test123)
    CkCertW cert;
    success = cert.LoadPfxFile(L"qa_data/pfx/cert_test123.pfx",L"test123");
    if (success != true) {
        wprintf(L"%s\n",cert.lastErrorText());
        return;
    }

    gen.SetX509Cert(cert,true);

    gen.put_KeyInfoType(L"X509Data");
    gen.put_X509Type(L"Certificate");

    // Load XML to be signed...
    CkStringBuilderW sbXml;
    xmlToSign.put_EmitXmlDecl(false);
    xmlToSign.GetXmlSb(sbXml);

    gen.put_Behaviors(L"IndentedSignature");

    // Sign the XML...
    success = gen.CreateXmlDSigSb(sbXml);
    if (success != true) {
        wprintf(L"%s\n",gen.lastErrorText());
        return;
    }

    // -----------------------------------------------

    CkHttpW http;

    int responseStatusCode;

    http.put_UncommonOptions(L"AllowEmptyHeaders");
    http.SetRequestHeader(L"SOAPAction",L"");

    http.SetRequestHeader(L"Content-Type",L"text/xml; charset=utf-8");

    // The endpoint for this soap service is:
    const wchar_t *endPoint = L"https://palena.sii.cl/DTEWS/GetTokenFromSeed.jws";

    // Send the following SOAP XML

    // <soapenv:Envelope xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:soapenv="http://schemas.xmlsoap.org/soap/envelope/" xmlns:def="http://DefaultNamespace">
    //    <soapenv:Header/>
    //    <soapenv:Body>
    //       <def:getToken soapenv:encodingStyle="http://schemas.xmlsoap.org/soap/encoding/">
    //          <pszXml>SIGNED_XML_GOES_HERE</pszXml>
    //       </def:getToken>
    //    </soapenv:Body>
    // </soapenv:Envelope>

    CkXmlW xml;
    xml.put_Tag(L"soapenv:Envelope");
    xml.AddAttribute(L"xmlns:xsi",L"http://www.w3.org/2001/XMLSchema-instance");
    xml.AddAttribute(L"xmlns:xsd",L"http://www.w3.org/2001/XMLSchema");
    xml.AddAttribute(L"xmlns:soapenv",L"http://schemas.xmlsoap.org/soap/envelope/");
    xml.AddAttribute(L"xmlns:def",L"http://DefaultNamespace");
    xml.UpdateChildContent(L"soapenv:Header",L"");
    xml.UpdateAttrAt(L"soapenv:Body|def:getToken",true,L"soapenv:encodingStyle",L"http://schemas.xmlsoap.org/soap/encoding/");
    xml.UpdateChildContent(L"soapenv:Body|def:getToken|pszXml",L"SIGNED_XML_GOES_HERE");

    // We must replace the "SIGNED_XML_GOES_HERE" with the exact contents of the signed XML to ensure the signed XML is not modified in any way.
    CkStringBuilderW sbSoapXml;
    sbSoapXml.Append(xml.getXml());
    int numReplaced = sbXml.Replace(L"&",L"&amp;");
    numReplaced = sbXml.Replace(L">",L"&gt;");
    numReplaced = sbXml.Replace(L"<",L"&lt;");
    numReplaced = sbXml.Replace(L"\"",L"&quot;");
    numReplaced = sbSoapXml.Replace(L"SIGNED_XML_GOES_HERE",sbXml.getAsString());

    CkHttpResponseW *resp = http.PostXml(endPoint,sbSoapXml.getAsString(),L"utf-8");
    if (http.get_LastMethodSuccess() != true) {
        wprintf(L"%s\n",http.lastErrorText());
        wprintf(L"LastHeader:\n");
        wprintf(L"%s\n",http.lastHeader());
        return;
    }

    responseStatusCode = resp->get_StatusCode();

    wprintf(L"Response Status Code: %d\n",responseStatusCode);

    // You may examine the exact HTTP header sent with the POST like this:
    wprintf(L"LastHeader:\n");
    wprintf(L"%s\n",http.lastHeader());

    // Examine the XML returned by the web service:
    wprintf(L"XML Response:\n");
    CkXmlW xmlResp;
    xmlResp.LoadXml(resp->bodyStr());
    wprintf(L"%s\n",xmlResp.getXml());

    // Use this online tool to generate parsing code from response XML: 
    // Generate Parsing Code from XML

    delete resp;
    }