Unicode C

Isabel Connect Revoke Access Token

See more Ibanity Examples

Revokes an access token. Unicode C

#include <C_CkHttpW.h>
#include <C_CkCertW.h>
#include <C_CkHttpRequestW.h>
#include <C_CkJsonObjectW.h>
#include <C_CkHttpResponseW.h>
#include <C_CkStringBuilderW.h>

void ChilkatSample(void)
    {
    BOOL success;
    HCkHttpW http;
    HCkCertW cert;
    HCkHttpRequestW req;
    HCkJsonObjectW jsonToken;
    HCkHttpResponseW resp;
    HCkStringBuilderW sbResponseBody;
    int respStatusCode;

    success = FALSE;

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

    http = CkHttpW_Create();

    // // Implements the following CURL command:
    // 
    // curl -X POST https://api.ibanity.com/isabel-connect/oauth2/revoke \
    // --cert certificate.pem:qwertyuiop1 \
    // --key private_key.pem  \
    // -H "Content-Type: application/x-www-form-urlencoded" \
    // -H "Accept: application/vnd.api+json"  \
    // -d token=8787 \
    // -d client_id=valid_client_id \
    // -d client_secret=valid_client_secret 

    // Ibanity provides the certificate + private key in PFX format.  This example will use the .pfx instead of the pair of PEM files.
    // (It is also possible to implement using Chilkat with the PEM files, but PFX is easier.)
    cert = CkCertW_Create();
    success = CkCertW_LoadPfxFile(cert,L"qa_data/pfx/my_ibanity_certificate.pfx",L"my_pfx_password");
    if (success == FALSE) {
        wprintf(L"%s\n",CkCertW_lastErrorText(cert));
        CkHttpW_Dispose(http);
        CkCertW_Dispose(cert);
        return;
    }

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

    req = CkHttpRequestW_Create();
    CkHttpRequestW_putHttpVerb(req,L"POST");
    CkHttpRequestW_putPath(req,L"/isabel-connect/oauth2/revoke");
    CkHttpRequestW_putContentType(req,L"application/x-www-form-urlencoded");

    // Load the previously obtained access token.
    jsonToken = CkJsonObjectW_Create();
    success = CkJsonObjectW_LoadFile(jsonToken,L"qa_data/tokens/isabel_access_token.json");
    if (success == FALSE) {
        wprintf(L"No existing access token.\n");
        CkHttpW_Dispose(http);
        CkCertW_Dispose(cert);
        CkHttpRequestW_Dispose(req);
        CkJsonObjectW_Dispose(jsonToken);
        return;
    }

    CkHttpRequestW_AddParam(req,L"token",CkJsonObjectW_stringOf(jsonToken,L"access_token"));

    // Note: For sandbox testing, we literally want to use the strings
    // "valid_client_id", and "valid_client_secret".
    // For the live app, you would replace these with actual values.
    CkHttpRequestW_AddParam(req,L"client_id",L"valid_client_id");
    CkHttpRequestW_AddParam(req,L"client_secret",L"valid_client_secret");

    CkHttpRequestW_AddHeader(req,L"Accept",L"application/vnd.api+json");

    resp = CkHttpResponseW_Create();
    success = CkHttpW_HttpReq(http,L"https://api.ibanity.com/isabel-connect/oauth2/revoke",req,resp);
    if (success == FALSE) {
        wprintf(L"%s\n",CkHttpW_lastErrorText(http));
        CkHttpW_Dispose(http);
        CkCertW_Dispose(cert);
        CkHttpRequestW_Dispose(req);
        CkJsonObjectW_Dispose(jsonToken);
        CkHttpResponseW_Dispose(resp);
        return;
    }

    sbResponseBody = CkStringBuilderW_Create();
    CkHttpResponseW_GetBodySb(resp,sbResponseBody);

    respStatusCode = CkHttpResponseW_getStatusCode(resp);
    wprintf(L"Response Status Code = %d\n",respStatusCode);
    if (respStatusCode >= 400) {
        wprintf(L"Response Header:\n");
        wprintf(L"%s\n",CkHttpResponseW_header(resp));
        wprintf(L"Failed.\n");
        CkHttpW_Dispose(http);
        CkCertW_Dispose(cert);
        CkHttpRequestW_Dispose(req);
        CkJsonObjectW_Dispose(jsonToken);
        CkHttpResponseW_Dispose(resp);
        CkStringBuilderW_Dispose(sbResponseBody);
        return;
    }

    wprintf(L"Response Body:\n");
    wprintf(L"%s\n",CkStringBuilderW_getAsString(sbResponseBody));

    // If successful, the response status code = 200, and the response body is "{}"


    CkHttpW_Dispose(http);
    CkCertW_Dispose(cert);
    CkHttpRequestW_Dispose(req);
    CkJsonObjectW_Dispose(jsonToken);
    CkHttpResponseW_Dispose(resp);
    CkStringBuilderW_Dispose(sbResponseBody);

    }