Sample code for 30+ languages & platforms
Unicode C

SII POST boleta.electronica.token

See more SII Chile Examples

Obtener un token de at autenticación para el envío y consultas automatizadas de boletas electrónicas.

Chilkat Unicode C Downloads

Unicode C
#include <C_CkXmlW.h>
#include <C_CkXmlDSigGenW.h>
#include <C_CkCertW.h>
#include <C_CkStringBuilderW.h>
#include <C_CkHttpW.h>
#include <C_CkHttpResponseW.h>

void ChilkatSample(void)
    {
    BOOL success;
    HCkXmlW xmlToSign;
    HCkXmlDSigGenW gen;
    HCkCertW cert;
    HCkStringBuilderW sbXml;
    HCkHttpW http;
    const wchar_t *url;
    HCkHttpResponseW resp;
    HCkXmlW xml;
    int ESTADO;
    const wchar_t *GLOSA;
    const wchar_t *TOKEN;

    success = FALSE;

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

    // Create the XML to be signed...
    // The following XML is created:
    // 
    //   <?xml version="1.0" encoding="UTF-8"?>
    //   <getToken><item><Semilla>030530912644</Semilla></item></getToken>
    // 
    xmlToSign = CkXmlW_Create();
    CkXmlW_putTag(xmlToSign,L"getToken");
    CkXmlW_UpdateChildContent(xmlToSign,L"item|Semilla",L"030530912644");

    // Sign the XML.
    // 
    // We wish to create the following signed XML:

    //   <?xml version="1.0" encoding="UTF-8"?>
    //   <getToken>
    //   	<item>
    //   		<Semilla>030530912644</Semilla>
    //   	</item>
    //   	<Signature xmlns="http://www.w3.org/2000/09/xmldsig#">
    //   		<SignedInfo>
    //   			<CanonicalizationMethod Algorithm="http://www.w3.org/TR/2001/REC-xml-c14n-20010315">
    //   			</CanonicalizationMethod>
    //   			<SignatureMethod Algorithm="http://www.w3.org/2000/09/xmldsig#rsa-sha1">
    //   			</SignatureMethod>
    //   			<Reference URI="">
    //   				<Transforms>
    //   					<Transform Algorithm="http://www.w3.org/2000/09/xmldsig#enveloped-signature">
    //   					</Transform>
    //   				</Transforms>
    //   				<DigestMethod Algorithm="http://www.w3.org/2000/09/xmldsig#sha1">
    //   				</DigestMethod>
    //   				<DigestValue>l2s9BqLppHaWo+w1Al1J5SsYScs=</DigestValue>
    //   			</Reference>
    //   		</SignedInfo>
    //   		<SignatureValue>jlbzatIIBLW8AjH++5uVTTrGIMVwGButuoAR88y/hvSc1+6/eW1K864fK3cKi76oArqk7lAM4pP okoXme0JT/hRXXGo6ecuKzO18z2WfPWwgnN0f3ac03TDu7PwfqiDG9mhQpYfIkNp6GNJIiqlg9PG2w1fOJ1QoypsrQmKq6 YU=</SignatureValue>
    //   		<KeyInfo>
    //   			<KeyValue>
    //   				<RSAKeyValue>
    //   					<Modulus>2Pb4kEB19m7NmOUYew9f36325yrTLTPMU7qzYG2A0/BsubxDdgQw2Op0x6zXvOVX sYI9KkPXtD5orKJMjwxYRv9wUWdyiE776Rv4ljfJO7EQhIK1fDQDnPt0HefBS06Xzg2QLBvLR+pe1vc6C02Dr99v+lnLA8 mnZiJlRHndhNU=</Modulus>
    //   					<Exponent>AQAB</Exponent>
    //   				</RSAKeyValue>
    //   			</KeyValue>
    //   			<X509Data>
    //   				<X509Certificate>MIIF1DCCBLygAwIBAgIDAQNtMA0GCSqGSIb3DQEBBQUAMIHGMQswCQYDVQQG
    //   EwJDTDEYMBYGA1UEChMPQWNlcHRhLmNvbSBTLkEuMTgwNgYDVQQLEy9BdXRv
    //   cmlkYWQgY2VydGlmaWNhZG9yYSBDbGFzZSAzIHBlcnNvbmEgbmF0dXJhbDFD
    //   MEEGA1UEAxM6QWNlcHRhLmNvbSBBdXRvcmlkYWQgY2VydGlmaWNhZG9yYSBD
    //   bGFzZSAzIHBlcnNvbmEgbmF0dXJhbDEeMBwGCSqGSIb3DQEJARYPaW5mb0Bh
    //   Y2VwdGEuY29tMB4XDTAxMDkyNTIxMDgxMloXDTAyMDkyNTIxMDgxMlowgZ8x
    //   CzAJBgNVBAYTAkNMMRgwFgYDVQQKEw9BY2VwdGEuY29tIFMuQS4xLDAqBgNV
    //   BAsTI0NlcnRpZmljYWRvIENsYXNlIDMgUGVyc29uYSBOYXR1cmFsMRwwGgYJ
    //   KoZIhvcNAQkBFg1uY2hlbGVAc2lpLmNsMSowKAYDVQQDEyFOSUNPTEFTIFpB
    //   UFJJQU4gQ0hFTEVCSUZTS0kgQkFFWkEwgZ8wDQYJKoZIhvcNAQEBBQADgY0A
    //   MIGJAoGBANj2+JBAdfZuzZjlGHsPX9+t9ucq0y0zzFO6s2BtgNPwbLm8Q3YE
    //   MNjqdMes17zlV7GCPSpD17Q+aKyiTI8MWEb/cFFncohO++kb+JY3yTuxEISC
    //   tXw0A5z7dB3nwUtOl84NkCwby0fqXtb3OgtNg6/fb/pZywPJp2YiZUR53YTV
    //   AgMBAAGjggJyMIICbjAdBggrBgEEAbVrDwQRFg9BY2VwdGEuY29tIFMuQS4w
    //   JQYDVR0RBB4wHKAaBggrBgEEAcEBAaAOFgwxMC40MTEuODcxLTIwDwYIKwYB
    //   Jh0z1DR3Pl3xOiaFIjSXsQO2PSzcA3wZXYF+KDrMul8e5lAF2NNiLmMVtXEx
    //   ZykMaTGGWS0ZETDhJmBwEZGpP4+lt/JhgwF1Sb6wdrXp7MFCJUc1Tj+/5JqH
    //   1kP0E63/hVElrcP0g8Zn8Z+vr/PMGW1kKgE0IyS4iJ8eIhNSK5phFyKJUn0l
    //   BmIZX7u89d5u7X8=
    //   </X509Certificate>
    //   			</X509Data>
    //   		</KeyInfo>
    //   	</Signature>
    //   </getToken>

    gen = CkXmlDSigGenW_Create();

    CkXmlDSigGenW_putSigLocation(gen,L"getToken");
    CkXmlDSigGenW_putSigLocationMod(gen,0);
    CkXmlDSigGenW_putSigNamespacePrefix(gen,L"");
    CkXmlDSigGenW_putSigNamespaceUri(gen,L"http://www.w3.org/2000/09/xmldsig#");
    CkXmlDSigGenW_putSignedInfoCanonAlg(gen,L"C14N");
    CkXmlDSigGenW_putSignedInfoDigestMethod(gen,L"sha1");

    // -------- Reference 1 --------
    CkXmlDSigGenW_AddSameDocRef(gen,L"",L"sha1",L"",L"",L"");

    // Provide a certificate + private key. (PFX password is test123)
    cert = CkCertW_Create();
    success = CkCertW_LoadPfxFile(cert,L"qa_data/pfx/cert_test123.pfx",L"test123");
    if (success == FALSE) {
        wprintf(L"%s\n",CkCertW_lastErrorText(cert));
        CkXmlW_Dispose(xmlToSign);
        CkXmlDSigGenW_Dispose(gen);
        CkCertW_Dispose(cert);
        return;
    }

    CkXmlDSigGenW_SetX509Cert(gen,cert,TRUE);

    CkXmlDSigGenW_putKeyInfoType(gen,L"X509Data+KeyValue");
    CkXmlDSigGenW_putX509Type(gen,L"Certificate");

    // Load XML to be signed...
    sbXml = CkStringBuilderW_Create();
    CkXmlW_GetXmlSb(xmlToSign,sbXml);

    CkXmlDSigGenW_putBehaviors(gen,L"IndentedSignature");

    // Sign the XML...
    success = CkXmlDSigGenW_CreateXmlDSigSb(gen,sbXml);
    if (success == FALSE) {
        wprintf(L"%s\n",CkXmlDSigGenW_lastErrorText(gen));
        CkXmlW_Dispose(xmlToSign);
        CkXmlDSigGenW_Dispose(gen);
        CkCertW_Dispose(cert);
        CkStringBuilderW_Dispose(sbXml);
        return;
    }

    wprintf(L"%s\n",CkStringBuilderW_getAsString(sbXml));

    // Send the POST with signed XML in the request body
    http = CkHttpW_Create();

    CkHttpW_SetRequestHeader(http,L"accept",L"application/xml");

    // Use one of the following domains, depending on the environment:
    // apicert.sii.cl  - Certification Environment
    // api.sii.cl      - Production Environment
    url = L"https://apicert.sii.cl/recursos/v1/boleta.electronica.token";
    resp = CkHttpResponseW_Create();
    success = CkHttpW_HttpSb(http,L"POST",url,sbXml,L"utf-8",L"application/xml",resp);
    if (success == FALSE) {
        wprintf(L"%s\n",CkHttpW_lastErrorText(http));
        CkXmlW_Dispose(xmlToSign);
        CkXmlDSigGenW_Dispose(gen);
        CkCertW_Dispose(cert);
        CkStringBuilderW_Dispose(sbXml);
        CkHttpW_Dispose(http);
        CkHttpResponseW_Dispose(resp);
        return;
    }

    // Examine the response status code:
    wprintf(L"response status code = %d\n",CkHttpResponseW_getStatusCode(resp));

    // Examine the response body:
    wprintf(L"response body: %s\n",CkHttpResponseW_bodyStr(resp));

    // We expect a response like this:
    //   <?xml version="1.0" encoding="UTF-8"?>
    //   <SII:RESPUESTA xmlns:SII="http://www.sii.cl/XMLSchema">
    //   	<SII:RESP_HDR>
    //   		<ESTADO>00</ESTADO>
    //   		<GLOSA>Token Creado</GLOSA>
    //   	</SII:RESP_HDR>
    //   	<SII:RESP_BODY>
    //   		<TOKEN>XAuSbYXiNh9Ik</TOKEN>
    //   	</SII:RESP_BODY>
    //   </SII:RESPUESTA>

    // Parse the XML response.
    xml = CkXmlW_Create();
    CkXmlW_LoadXml(xml,CkHttpResponseW_bodyStr(resp));
    ESTADO = CkXmlW_GetChildIntValue(xml,L"SII:RESP_HDR|ESTADO");
    GLOSA = CkXmlW_getChildContent(xml,L"SII:RESP_HDR|GLOSA");
    TOKEN = CkXmlW_getChildContent(xml,L"SII:RESP_BODY|TOKEN");


    CkXmlW_Dispose(xmlToSign);
    CkXmlDSigGenW_Dispose(gen);
    CkCertW_Dispose(cert);
    CkStringBuilderW_Dispose(sbXml);
    CkHttpW_Dispose(http);
    CkHttpResponseW_Dispose(resp);
    CkXmlW_Dispose(xml);

    }