(C) Create Signed SOAP XML for DIAN Colombia WCF Service

Demonstrates how to create a signed SOAP XML document for DIAN Colombia.

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 <C_CkXml.h>
#include <C_CkXmlDSigGen.h>
#include <C_CkCert.h>
#include <C_CkStringBuilder.h>
#include <C_CkBinData.h>
#include <C_CkXmlDSig.h>

void ChilkatSample(void)
    {
    BOOL success;
    HCkXml xmlToSign;
    HCkXmlDSigGen gen;
    HCkCert cert;
    HCkXml xmlCustomKeyInfo;
    HCkStringBuilder sbXml;
    HCkBinData bdCert;
    int nReplaced;
    HCkXmlDSig verifier;
    int numSigs;
    int verifyIdx;
    BOOL verified;

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

    // This example will produce a signed SOAP XML message that looks like this:

    // <?xml version="1.0" encoding="utf-8"?>
    // <soap:Envelope xmlns:soap="http://www.w3.org/2003/05/soap-envelope" xmlns:wcf="http://wcf.dian.colombia">
    //     <soap:Header xmlns:wsa="http://www.w3.org/2005/08/addressing">
    //         <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">
    //             <wsu:Timestamp wsu:Id="TS-F25839120CBA3ECDAD68754D0443A667636FDA68">
    //                 <wsu:Created>2019-08-23T23:03:01Z</wsu:Created>
    //                 <wsu:Expires>2019-08-24T15:43:01Z</wsu:Expires>
    //             </wsu:Timestamp>
    //             <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="ABCXYZ-9F0F7E15A59816E680B4735080A789DC1EED6C9C">MIIG8jCCBd ... zLjGQUB6lcz</wsse:BinarySecurityToken>
    //             <ds:Signature Id="SIG-F25839120CBA3ECDAD68754D0443A667636FDA68" xmlns:ds="http://www.w3.org/2000/09/xmldsig#">
    //                 <ds:SignedInfo>
    //                     <ds:CanonicalizationMethod Algorithm="http://www.w3.org/2001/10/xml-exc-c14n#">
    //                         <ec:InclusiveNamespaces PrefixList="wsa soap wcf" xmlns:ec="http://www.w3.org/2001/10/xml-exc-c14n#"/>
    //                     </ds:CanonicalizationMethod>
    //                     <ds:SignatureMethod Algorithm="http://www.w3.org/2001/04/xmldsig-more#rsa-sha256"/>
    //                     <ds:Reference URI="#ID-F25839120CBA3ECDAD68754D0443A667636FDA68">
    //                         <ds:Transforms>
    //                             <ds:Transform Algorithm="http://www.w3.org/2001/10/xml-exc-c14n#">
    //                                 <ec:InclusiveNamespaces PrefixList="soap wcf" xmlns:ec="http://www.w3.org/2001/10/xml-exc-c14n#"/>
    //                             </ds:Transform>
    //                         </ds:Transforms>
    //                         <ds:DigestMethod Algorithm="http://www.w3.org/2001/04/xmlenc#sha256"/>
    //                         <ds:DigestValue>gSIKtjS/BKA2bgecXkM8lYVBDqlXcU3juNYT9a+bSnM=</ds:DigestValue>
    //                     </ds:Reference>
    //                 </ds:SignedInfo>
    //                 <ds:SignatureValue>sL7rOdyfkEnKgJja0eWrv ... YqG0T0pflBsGW9zXkjQ9NvAw==</ds:SignatureValue>
    //                 <ds:KeyInfo Id="KI-F25839120CBA3ECDAD68754D0443A667636FDA68">
    //                     <wsse:SecurityTokenReference wsu:Id="STR-F25839120CBA3ECDAD68754D0443A667636FDA68">
    //                         <wsse:Reference URI="#ABCXYZ-9F0F7E15A59816E680B4735080A789DC1EED6C9C" ValueType="http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-x509-token-profile-1.0#X509v3"/>
    //                     </wsse:SecurityTokenReference>
    //                 </ds:KeyInfo>
    //             </ds:Signature>
    //         </wsse:Security>
    //         <wsa:Action>http://wcf.dian.colombia/IWcfDianCustomerServices/GetStatus</wsa:Action>
    //         <wsa:To wsu:Id="ID-F25839120CBA3ECDAD68754D0443A667636FDA68" xmlns:wsu="http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-wssecurity-utility-1.0.xsd">https://vpfe-hab.dian.gov.co/WcfDianCustomerServices.svc</wsa:To>
    //     </soap:Header>
    //     <soap:Body>
    //         <wcf:GetStatus>
    //             <wcf:trackId>123456666</wcf:trackId>
    //         </wcf:GetStatus>
    //     </soap:Body>
    // </soap:Envelope>

    // Use this online tool to generate code from sample Signed XML: 
    // Generate Code to Create Signed XML

    success = TRUE;
    // Create the XML to be signed...
    xmlToSign = CkXml_Create();
    CkXml_putTag(xmlToSign,"soap:Envelope");
    CkXml_AddAttribute(xmlToSign,"xmlns:soap","http://www.w3.org/2003/05/soap-envelope");
    CkXml_AddAttribute(xmlToSign,"xmlns:wcf","http://wcf.dian.colombia");
    CkXml_UpdateAttrAt(xmlToSign,"soap:Header",TRUE,"xmlns:wsa","http://www.w3.org/2005/08/addressing");
    CkXml_UpdateAttrAt(xmlToSign,"soap:Header|wsse:Security",TRUE,"xmlns:wsse","http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-wssecurity-secext-1.0.xsd");
    CkXml_UpdateAttrAt(xmlToSign,"soap:Header|wsse:Security",TRUE,"xmlns:wsu","http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-wssecurity-utility-1.0.xsd");
    CkXml_UpdateAttrAt(xmlToSign,"soap:Header|wsse:Security|wsu:Timestamp",TRUE,"wsu:Id","TS-F25839120CBA3ECDAD68754D0443A667636FDA68");
    CkXml_UpdateChildContent(xmlToSign,"soap:Header|wsse:Security|wsu:Timestamp|wsu:Created","2019-08-23T23:03:01Z");
    CkXml_UpdateChildContent(xmlToSign,"soap:Header|wsse:Security|wsu:Timestamp|wsu:Expires","2019-08-24T15:43:01Z");
    CkXml_UpdateAttrAt(xmlToSign,"soap:Header|wsse:Security|wsse:BinarySecurityToken",TRUE,"EncodingType","http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-soap-message-security-1.0#Base64Binary");
    CkXml_UpdateAttrAt(xmlToSign,"soap:Header|wsse:Security|wsse:BinarySecurityToken",TRUE,"ValueType","http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-x509-token-profile-1.0#X509v3");
    CkXml_UpdateAttrAt(xmlToSign,"soap:Header|wsse:Security|wsse:BinarySecurityToken",TRUE,"wsu:Id","ABCXYZ-9F0F7E15A59816E680B4735080A789DC1EED6C9C");
    CkXml_UpdateChildContent(xmlToSign,"soap:Header|wsse:Security|wsse:BinarySecurityToken","BinarySecurityToken_Base64Binary_Content");
    CkXml_UpdateChildContent(xmlToSign,"soap:Header|wsa:Action","http://wcf.dian.colombia/IWcfDianCustomerServices/GetStatus");
    CkXml_UpdateAttrAt(xmlToSign,"soap:Header|wsa:To",TRUE,"wsu:Id","ID-F25839120CBA3ECDAD68754D0443A667636FDA68");
    CkXml_UpdateAttrAt(xmlToSign,"soap:Header|wsa:To",TRUE,"xmlns:wsu","http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-wssecurity-utility-1.0.xsd");
    CkXml_UpdateChildContent(xmlToSign,"soap:Header|wsa:To","https://vpfe-hab.dian.gov.co/WcfDianCustomerServices.svc");
    CkXml_UpdateChildContent(xmlToSign,"soap:Body|wcf:GetStatus|wcf:trackId","123456666");

    gen = CkXmlDSigGen_Create();

    CkXmlDSigGen_putSigLocation(gen,"soap:Envelope|soap:Header|wsse:Security");
    CkXmlDSigGen_putSigLocationMod(gen,0);
    CkXmlDSigGen_putSigId(gen,"SIG-F25839120CBA3ECDAD68754D0443A667636FDA68");
    CkXmlDSigGen_putSigNamespacePrefix(gen,"ds");
    CkXmlDSigGen_putSigNamespaceUri(gen,"http://www.w3.org/2000/09/xmldsig#");
    CkXmlDSigGen_putSignedInfoCanonAlg(gen,"EXCL_C14N");
    CkXmlDSigGen_putSignedInfoDigestMethod(gen,"sha256");

    // Set the KeyInfoId before adding references..
    CkXmlDSigGen_putKeyInfoId(gen,"KI-F25839120CBA3ECDAD68754D0443A667636FDA68");

    // -------- Reference 1 --------
    CkXmlDSigGen_AddSameDocRef(gen,"ID-F25839120CBA3ECDAD68754D0443A667636FDA68","sha256","EXCL_C14N","soap wcf","");

    // Provide a certificate + private key. (PFX password is test123)
    cert = CkCert_Create();
    success = CkCert_LoadPfxFile(cert,"qa_data/pfx/cert_test123.pfx","test123");
    if (success != TRUE) {
        printf("%s\n",CkCert_lastErrorText(cert));
        CkXml_Dispose(xmlToSign);
        CkXmlDSigGen_Dispose(gen);
        CkCert_Dispose(cert);
        return;
    }

    CkXmlDSigGen_SetX509Cert(gen,cert,TRUE);

    CkXmlDSigGen_putKeyInfoType(gen,"Custom");

    // Create the custom KeyInfo XML..
    xmlCustomKeyInfo = CkXml_Create();
    CkXml_putTag(xmlCustomKeyInfo,"wsse:SecurityTokenReference");
    CkXml_AddAttribute(xmlCustomKeyInfo,"wsu:Id","STR-F25839120CBA3ECDAD68754D0443A667636FDA68");
    CkXml_UpdateAttrAt(xmlCustomKeyInfo,"wsse:Reference",TRUE,"URI","#ABCXYZ-9F0F7E15A59816E680B4735080A789DC1EED6C9C");
    CkXml_UpdateAttrAt(xmlCustomKeyInfo,"wsse:Reference",TRUE,"ValueType","http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-x509-token-profile-1.0#X509v3");

    CkXml_putEmitXmlDecl(xmlCustomKeyInfo,FALSE);
    CkXmlDSigGen_putCustomKeyInfoXml(gen,CkXml_getXml(xmlCustomKeyInfo));

    // Load XML to be signed...
    sbXml = CkStringBuilder_Create();
    CkXml_GetXmlSb(xmlToSign,sbXml);

    // Update BinarySecurityToken_Base64Binary_Content with the actual X509 of the signing cert.
    bdCert = CkBinData_Create();
    CkCert_ExportCertDerBd(cert,bdCert);

    nReplaced = CkStringBuilder_Replace(sbXml,"BinarySecurityToken_Base64Binary_Content",CkBinData_getEncoded(bdCert,"base64"));

    CkXmlDSigGen_putBehaviors(gen,"IndentedSignature");

    // Sign the XML...
    success = CkXmlDSigGen_CreateXmlDSigSb(gen,sbXml);
    if (success != TRUE) {
        printf("%s\n",CkXmlDSigGen_lastErrorText(gen));
        CkXml_Dispose(xmlToSign);
        CkXmlDSigGen_Dispose(gen);
        CkCert_Dispose(cert);
        CkXml_Dispose(xmlCustomKeyInfo);
        CkStringBuilder_Dispose(sbXml);
        CkBinData_Dispose(bdCert);
        return;
    }

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

    // Save the signed XML to a file.
    success = CkStringBuilder_WriteFile(sbXml,"qa_output/signedXml.xml","utf-8",FALSE);

    printf("%s\n",CkStringBuilder_getAsString(sbXml));

    // ----------------------------------------
    // Verify the signatures we just produced...
    verifier = CkXmlDSig_Create();
    success = CkXmlDSig_LoadSignatureSb(verifier,sbXml);
    if (success != TRUE) {
        printf("%s\n",CkXmlDSig_lastErrorText(verifier));
        CkXml_Dispose(xmlToSign);
        CkXmlDSigGen_Dispose(gen);
        CkCert_Dispose(cert);
        CkXml_Dispose(xmlCustomKeyInfo);
        CkStringBuilder_Dispose(sbXml);
        CkBinData_Dispose(bdCert);
        CkXmlDSig_Dispose(verifier);
        return;
    }

    numSigs = CkXmlDSig_getNumSignatures(verifier);
    verifyIdx = 0;
    while (verifyIdx < numSigs) {
        CkXmlDSig_putSelector(verifier,verifyIdx);
        verified = CkXmlDSig_VerifySignature(verifier,TRUE);
        if (verified != TRUE) {
            printf("%s\n",CkXmlDSig_lastErrorText(verifier));
            CkXml_Dispose(xmlToSign);
            CkXmlDSigGen_Dispose(gen);
            CkCert_Dispose(cert);
            CkXml_Dispose(xmlCustomKeyInfo);
            CkStringBuilder_Dispose(sbXml);
            CkBinData_Dispose(bdCert);
            CkXmlDSig_Dispose(verifier);
            return;
        }

        verifyIdx = verifyIdx + 1;
    }

    printf("All signatures were successfully verified.\n");

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


    CkXml_Dispose(xmlToSign);
    CkXmlDSigGen_Dispose(gen);
    CkCert_Dispose(cert);
    CkXml_Dispose(xmlCustomKeyInfo);
    CkStringBuilder_Dispose(sbXml);
    CkBinData_Dispose(bdCert);
    CkXmlDSig_Dispose(verifier);

    }