Unicode C

GeoOp Exchange Refresh Token for New Access Token

See more GeoOp Examples

Demonstrates how to use the /oauth2/token endpoint to exchange it for a new access token once the current access token has expired.

Note: This example requires Chilkat v9.5.0.65 or greater.

Unicode C

#include <C_CkJsonObjectW.h>
#include <C_CkRestW.h>

void ChilkatSample(void)
    {
    BOOL success;
    HCkJsonObjectW jsonToken;
    HCkRestW rest;
    BOOL bAutoReconnect;
    const wchar_t *responseBody;
    HCkJsonObjectW json;

    success = FALSE;

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

    // This example also assumes that OAuth2 access and refresh tokens were previously fetched.
    // and saved in a JSON file.  

    // First get our previously obtained refresh token.
    // { .... "refresh_token":"e6dqdG....mzjpT04w==", .... }
    jsonToken = CkJsonObjectW_Create();
    success = CkJsonObjectW_LoadFile(jsonToken,L"qa_data/tokens/geoop.json");

    rest = CkRestW_Create();

    // Connect to GeoOp...
    bAutoReconnect = TRUE;
    success = CkRestW_Connect(rest,L"login.geoop.com",443,TRUE,bAutoReconnect);
    if (success != TRUE) {
        wprintf(L"%s\n",CkRestW_lastErrorText(rest));
        CkJsonObjectW_Dispose(jsonToken);
        CkRestW_Dispose(rest);
        return;
    }

    // Set the X-Version header.
    CkRestW_AddHeader(rest,L"X-Version",L"1.0");

    // Provide the required form params to get the new access token
    wprintf(L"refresh_token = %s\n",CkJsonObjectW_stringOf(jsonToken,L"refresh_token"));
    CkRestW_AddQueryParam(rest,L"refresh_token",CkJsonObjectW_stringOf(jsonToken,L"refresh_token"));
    CkRestW_AddQueryParam(rest,L"grant_type",L"refresh_token");
    CkRestW_AddQueryParam(rest,L"client_id",L"GEOOP-CLIENT-ID");
    CkRestW_AddQueryParam(rest,L"client_secret",L"GEOOP-CLIENT-SECRET");

    responseBody = CkRestW_fullRequestFormUrlEncoded(rest,L"POST",L"/oauth2/token");
    if (CkRestW_getLastMethodSuccess(rest) != TRUE) {
        wprintf(L"%s\n",CkRestW_lastErrorText(rest));
        CkJsonObjectW_Dispose(jsonToken);
        CkRestW_Dispose(rest);
        return;
    }

    // If the response status code did not indicate success, then see what happened..
    if (CkRestW_getResponseStatusCode(rest) != 200) {
        wprintf(L"Request Header: \n");
        wprintf(L"%s\n",CkRestW_lastRequestHeader(rest));
        wprintf(L"----\n");
        wprintf(L"Response StatusCode = %d\n",CkRestW_getResponseStatusCode(rest));
        wprintf(L"Response StatusLine: %s\n",CkRestW_responseStatusText(rest));
        wprintf(L"Response Header:\n");
        wprintf(L"%s\n",CkRestW_responseHeader(rest));
        wprintf(L"%s\n",responseBody);
        CkJsonObjectW_Dispose(jsonToken);
        CkRestW_Dispose(rest);
        return;
    }

    json = CkJsonObjectW_Create();
    CkJsonObjectW_putEmitCompact(json,FALSE);
    CkJsonObjectW_Load(json,responseBody);

    // Show the full JSON response.  It should contain the new access token...
    wprintf(L"%s\n",CkJsonObjectW_emit(json));


    CkJsonObjectW_Dispose(jsonToken);
    CkRestW_Dispose(rest);
    CkJsonObjectW_Dispose(json);

    }