Unicode C

MYOB Extend Refresh Access Token

See more MYOB Examples

Refreshes the access token for MYOB apps. Unicode C

#include <C_CkJsonObjectW.h>
#include <C_CkOAuth2W.h>
#include <C_CkStringBuilderW.h>

void ChilkatSample(void)
    {
    BOOL success;
    HCkJsonObjectW jsonToken;
    HCkOAuth2W oauth2;
    HCkStringBuilderW sbJson;

    success = FALSE;

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

    // See Get MYOB Access Token 
    // for sample code showing how to obtain a MYOB access token for desktop apps.

    jsonToken = CkJsonObjectW_Create();
    success = CkJsonObjectW_LoadFile(jsonToken,L"qa_data/tokens/myob.json");
    if (success != TRUE) {
        wprintf(L"Failed to load myob.json\n");
        CkJsonObjectW_Dispose(jsonToken);
        return;
    }

    oauth2 = CkOAuth2W_Create();

    CkOAuth2W_putTokenEndpoint(oauth2,L"https://secure.myob.com/oauth2/v1/authorize/");

    // Replace these with actual values.
    CkOAuth2W_putClientId(oauth2,L"CLIENT_ID");
    CkOAuth2W_putClientSecret(oauth2,L"CLIENT_SECRET");

    // Get the "refresh_token"
    CkOAuth2W_putRefreshToken(oauth2,CkJsonObjectW_stringOf(jsonToken,L"refresh_token"));

    // Send the HTTP POST to refresh the access token..
    CkOAuth2W_putVerboseLogging(oauth2,TRUE);
    success = CkOAuth2W_RefreshAccessToken(oauth2);
    if (success != TRUE) {
        wprintf(L"%s\n",CkOAuth2W_lastErrorText(oauth2));
        CkJsonObjectW_Dispose(jsonToken);
        CkOAuth2W_Dispose(oauth2);
        return;
    }

    // Load the access token response into the json object 
    CkJsonObjectW_Load(jsonToken,CkOAuth2W_accessTokenResponse(oauth2));

    // Save the new JSON access token response to a file.
    // The access + refresh tokens contained in this JSON will be needed for the next refresh.
    sbJson = CkStringBuilderW_Create();
    CkJsonObjectW_putEmitCompact(jsonToken,FALSE);
    CkJsonObjectW_EmitSb(jsonToken,sbJson);
    CkStringBuilderW_WriteFile(sbJson,L"qa_data/tokens/myob.json",L"utf-8",FALSE);

    wprintf(L"OAuth2 authorization granted!\n");
    wprintf(L"New Access Token = %s\n",CkOAuth2W_accessToken(oauth2));


    CkJsonObjectW_Dispose(jsonToken);
    CkOAuth2W_Dispose(oauth2);
    CkStringBuilderW_Dispose(sbJson);

    }