(C) ETrade Renew Access Token

Renews an ETrade OAuth access token.

For more information, see https://apisb.etrade.com/docs/api/authorization/renew_access_token.html

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_CkJsonObject.h>
#include <C_CkHttpResponse.h>
#include <C_CkStringBuilder.h>
#include <C_CkHashtable.h>
#include <C_CkFileAccess.h>

void ChilkatSample(void)
    {
    HCkHttp http;
    HCkJsonObject jsonToken;
    BOOL success;
    HCkHttpResponse resp;
    HCkStringBuilder sbRespBody;
    HCkHashtable hashTab;
    const char *accessToken;
    const char *accessTokenSecret;
    HCkJsonObject json;
    HCkFileAccess fac;

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

    http = CkHttp_Create();

    CkHttp_putOAuth1(http,TRUE);
    CkHttp_putOAuthVerifier(http,"");
    CkHttp_putOAuthConsumerKey(http,"ETRADE_CONSUMER_KEY");
    CkHttp_putOAuthConsumerSecret(http,"ETRADE_CONSUMER_SECRET");

    // Load the access token previously obtained via the OAuth1 Authorization
    jsonToken = CkJsonObject_Create();
    success = CkJsonObject_LoadFile(jsonToken,"qa_data/tokens/etrade.json");
    if (success != TRUE) {
        printf("Failed to load OAuth1 token\n");
        CkHttp_Dispose(http);
        CkJsonObject_Dispose(jsonToken);
        return;
    }

    CkHttp_putOAuthToken(http,CkJsonObject_stringOf(jsonToken,"oauth_token"));
    CkHttp_putOAuthTokenSecret(http,CkJsonObject_stringOf(jsonToken,"oauth_token_secret"));

    resp = CkHttp_QuickGetObj(http,"https://api.etrade.com/oauth/renew_access_token");
    if (CkHttp_getLastMethodSuccess(http) != TRUE) {
        printf("%s\n",CkHttp_lastErrorText(http));
        CkHttp_Dispose(http);
        CkJsonObject_Dispose(jsonToken);
        return;
    }

    // Make sure a successful response was received.
    if (CkHttpResponse_getStatusCode(resp) != 200) {
        printf("%s\n",CkHttpResponse_statusLine(resp));
        printf("%s\n",CkHttpResponse_header(resp));
        printf("%s\n",CkHttpResponse_bodyStr(resp));
        CkHttp_Dispose(http);
        CkJsonObject_Dispose(jsonToken);
        return;
    }

    // If successful, the resp.BodyStr contains something like this:
    // oauth_token=%3TiQRgQCRGPo7Xdk6G8QDSEzX0Jsy6sKNcULcDavAGgU%3D&oauth_token_secret=%7RrC9scEpzcwSEMy4vE7nodSzPLqfRINnTNY4voczyFM%3D
    printf("%s\n",CkHttpResponse_bodyStr(resp));

    sbRespBody = CkStringBuilder_Create();
    CkHttpResponse_GetBodySb(resp,sbRespBody);
    if (CkStringBuilder_ContentsEqual(sbRespBody,"Access Token has been renewed",FALSE)) {
        // The documentation at https://apisb.etrade.com/docs/api/authorization/renew_access_token.html
        // indicates that the response should be as described above.  However, the response received when
        // trying to refresh a non-expired token was "Access Token has been renewed"
        printf("Keeping the same access token, but it's renewed...\n");
        CkHttp_Dispose(http);
        CkJsonObject_Dispose(jsonToken);
        CkStringBuilder_Dispose(sbRespBody);
        return;
    }

    hashTab = CkHashtable_Create();
    CkHashtable_AddQueryParams(hashTab,CkHttpResponse_bodyStr(resp));

    accessToken = CkHashtable_lookupStr(hashTab,"oauth_token");
    accessTokenSecret = CkHashtable_lookupStr(hashTab,"oauth_token_secret");

    CkHttpResponse_Dispose(resp);

    // The access token + secret is what should be saved and used for
    // subsequent REST API calls.
    printf("Access Token = %s\n",accessToken);
    printf("Access Token Secret = %s\n",accessTokenSecret);

    // Save this access token for future calls.
    // Just in case we need user_id and screen_name, save those also..
    json = CkJsonObject_Create();
    CkJsonObject_AppendString(json,"oauth_token",accessToken);
    CkJsonObject_AppendString(json,"oauth_token_secret",accessTokenSecret);

    fac = CkFileAccess_Create();
    CkFileAccess_WriteEntireTextFile(fac,"qa_data/tokens/etrade.json",CkJsonObject_emit(json),"utf-8",FALSE);

    printf("Success.\n");


    CkHttp_Dispose(http);
    CkJsonObject_Dispose(jsonToken);
    CkStringBuilder_Dispose(sbRespBody);
    CkHashtable_Dispose(hashTab);
    CkJsonObject_Dispose(json);
    CkFileAccess_Dispose(fac);

    }