(C) Global Payments Card Authorization

Demonstrates how to send a card payments authorization request.

For more information, see https://developer.globalpay.com/#!/api/card-payments#api-authorisation

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_CkHttp.h>
#include <C_CkDateTime.h>
#include <C_CkPrng.h>
#include <C_CkCrypt2.h>
#include <C_CkStringBuilder.h>
#include <C_CkXml.h>
#include <C_CkHttpResponse.h>

void ChilkatSample(void)
    {
    HCkHttp http;
    BOOL success;
    const char *testUrl;
    const char *clientID;
    const char *sharedSecret;
    const char *amount;
    const char *currency;
    const char *cardNumber;
    HCkDateTime dt;
    const char *dtStr;
    HCkPrng prng;
    const char *orderId;
    HCkCrypt2 crypt;
    HCkStringBuilder sbA;
    int numReplaced;
    const char *hashA;
    HCkStringBuilder sbB;
    const char *hashB;
    HCkXml xml;
    HCkHttpResponse resp;
    int result;

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

    http = CkHttp_Create();

    // if you don't have a Client ID yet you can still quickly test some basic request types using the following URL and credentials:

    // Test URL - https://test.realexpayments.com/epage-remote.cgi
    // Client ID: realexsandbox
    // Shared Secret: Po8lRRT67a
    testUrl = "https://test.realexpayments.com/epage-remote.cgi";
    clientID = "realexsandbox";
    sharedSecret = "Po8lRRT67a";

    amount = "1001";
    currency = "EUR";
    cardNumber = "4263970000005262";

    // We'll be sending the following XML in the body of the request:

    // <?xml version="1.0" encoding="UTF-8"?>
    // <request type="auth" timestamp="20180613141207">
    //   <merchantid>MerchantId</merchantid>
    //   <account>internet</account>
    //   <channel>ECOM</channel>
    //   <orderid>N6qsk4kYRZihmPrTXWYS6g</orderid>
    //   <amount currency="EUR">1001</amount>
    //   <card>
    //     <number>4263970000005262</number>
    //     <expdate>0425</expdate>
    //     <chname>James Mason</chname>
    //     <type>VISA</type>
    //     <cvn>
    //       <number>123</number>
    //       <presind>1</presind>
    //     </cvn>
    //   </card>
    //   <autosettle flag="1"/>
    //   <sha1hash>87707637a34ba651b6185718c863abc64b673f20</sha1hash>
    // </request>

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

    // Get the current date/time in this format:  20180613141207
    dt = CkDateTime_Create();
    CkDateTime_SetFromCurrentSystemTime(dt);
    dtStr = CkDateTime_getAsIso8601(dt,"YYYYMMDDhhmmss",TRUE);

    // Generate a unique order ID
    prng = CkPrng_Create();
    orderId = CkPrng_genRandom(prng,32,"base64url");

    // Compute the sha1hash
    crypt = CkCrypt2_Create();
    CkCrypt2_putHashAlgorithm(crypt,"sha1");
    CkCrypt2_putEncodingMode(crypt,"hexlower");

    sbA = CkStringBuilder_Create();
    CkStringBuilder_Append(sbA,"timestamp.merchantid.orderid.amount.currency.cardnumber");
    numReplaced = CkStringBuilder_Replace(sbA,"timestamp",dtStr);
    numReplaced = CkStringBuilder_Replace(sbA,"merchantid",clientID);
    numReplaced = CkStringBuilder_Replace(sbA,"orderid",orderId);
    numReplaced = CkStringBuilder_Replace(sbA,"amount",amount);
    numReplaced = CkStringBuilder_Replace(sbA,"currency",currency);
    numReplaced = CkStringBuilder_Replace(sbA,"cardnumber",cardNumber);

    hashA = CkCrypt2_hashStringENC(crypt,CkStringBuilder_getAsString(sbA));

    sbB = CkStringBuilder_Create();
    CkStringBuilder_Append(sbB,hashA);
    CkStringBuilder_Append(sbB,".");
    CkStringBuilder_Append(sbB,sharedSecret);

    hashB = CkCrypt2_hashStringENC(crypt,CkStringBuilder_getAsString(sbB));

    xml = CkXml_Create();
    CkXml_putTag(xml,"request");
    CkXml_AddAttribute(xml,"type","auth");
    CkXml_AddAttribute(xml,"timestamp",dtStr);
    CkXml_UpdateChildContent(xml,"merchantid",clientID);
    CkXml_UpdateChildContent(xml,"account","internet");
    CkXml_UpdateChildContent(xml,"channel","ECOM");
    CkXml_UpdateChildContent(xml,"orderid",orderId);
    CkXml_UpdateAttrAt(xml,"amount",TRUE,"currency",currency);
    CkXml_UpdateChildContent(xml,"amount",amount);
    CkXml_UpdateChildContent(xml,"card|number",cardNumber);
    CkXml_UpdateChildContent(xml,"card|expdate","0425");
    CkXml_UpdateChildContent(xml,"card|chname","James Mason");
    CkXml_UpdateChildContent(xml,"card|type","VISA");
    CkXml_UpdateChildContent(xml,"card|cvn|number","123");
    CkXml_UpdateChildContent(xml,"card|cvn|presind","1");
    CkXml_UpdateAttrAt(xml,"autosettle",TRUE,"flag","1");
    CkXml_UpdateChildContent(xml,"sha1hash",hashB);

    resp = CkHttp_PostXml(http,testUrl,CkXml_getXml(xml),"utf-8");
    if (CkHttp_getLastMethodSuccess(http) == FALSE) {
        printf("%s\n",CkHttp_lastErrorText(http));
        CkHttp_Dispose(http);
        CkDateTime_Dispose(dt);
        CkPrng_Dispose(prng);
        CkCrypt2_Dispose(crypt);
        CkStringBuilder_Dispose(sbA);
        CkStringBuilder_Dispose(sbB);
        CkXml_Dispose(xml);
        return;
    }

    printf("Response Status Code: %d\n",CkHttpResponse_getStatusCode(resp));

    printf("Response Body:\n");
    printf("%s\n",CkHttpResponse_bodyStr(resp));

    if (CkHttpResponse_getStatusCode(resp) != 200) {
        printf("Failed.\n");
        CkHttp_Dispose(http);
        CkDateTime_Dispose(dt);
        CkPrng_Dispose(prng);
        CkCrypt2_Dispose(crypt);
        CkStringBuilder_Dispose(sbA);
        CkStringBuilder_Dispose(sbB);
        CkXml_Dispose(xml);
        return;
    }

    // A status code of 200 indicates we received an XML response, but it could be an error message.
    // Here's an example of an error response:

    // <?xml version="1.0" encoding="UTF-8" standalone="yes"?>
    // <response timestamp="20200418142356">
    //     <orderid>N6qsk4kYRZihmPrTXWYS6g</orderid>
    //     <result>508</result>
    //     <message>Invalid timestamp: '{' Value exceeds allowable limit: '}'</message>
    // </response>

    // We need to check the "result" within the XML.
    CkXml_LoadXml(xml,CkHttpResponse_bodyStr(resp));

    result = CkXml_GetChildIntValue(xml,"result");
    printf("result = %d\n",result);

    // A successful result looks like this:

    // <?xml version="1.0" encoding="UTF-8" standalone="yes"?>
    // <response timestamp="20200418145519">
    //     <merchantid>realexsandbox</merchantid>
    //     <account>internet</account>
    //     <orderid>Cw93I1nFWVZuaATh46qMUCBlCcfrOvLo65C2cq5X-AY</orderid>
    //     <result>00</result>
    //     <authcode>L3pHww</authcode>
    //     <message>AUTH CODE: L3pHww</message>
    //     <pasref>96838535689610806</pasref>
    //     <cvnresult>M</cvnresult>
    //     <timetaken>87</timetaken>
    //     <authtimetaken>67</authtimetaken>
    //     <batchid>6322506</batchid>
    //     <sha1hash>2fd2f15f97f1775779fe9bda536dc8317a4b39f6</sha1hash>
    // </response>

    if (result == 0) {
        printf("authcode = %s\n",CkXml_getChildContent(xml,"authcode"));
        printf("Success.\n");

    }
    else {
        printf("Failed.\n");
    }

    CkHttpResponse_Dispose(resp);


    CkHttp_Dispose(http);
    CkDateTime_Dispose(dt);
    CkPrng_Dispose(prng);
    CkCrypt2_Dispose(crypt);
    CkStringBuilder_Dispose(sbA);
    CkStringBuilder_Dispose(sbB);
    CkXml_Dispose(xml);

    }