Unicode C

HMRC OAuth2 Access Token

See more OAuth2 Examples

Demonstrates how to get an HMRC OAuth2 access token from a desktop (installed) application or script. This example gets an HMRC MTD VAT read/write access token. Unicode C

#include <C_CkOAuth2W.h>
#include <C_CkJsonObjectW.h>
#include <C_CkDateTimeW.h>
#include <C_CkFileAccessW.h>

void ChilkatSample(void)
    {
    BOOL success;
    HCkOAuth2W oauth2;
    const wchar_t *url;
    int numMsWaited;
    HCkJsonObjectW json;
    HCkDateTimeW dtExpire;
    HCkFileAccessW fac;

    success = FALSE;

    // To further clarify, see OAuth 2.0 Authorization Flow

    oauth2 = CkOAuth2W_Create();

    // This should be the port in the localhost callback URL for your app.
    // Important: Make sure the callback URI in your HMRC developer app 
    // is exactly "http://localhost:3017/".  Don't forget the ending "/" char.
    // The callback URL would look like "http://localhost:3017/" if the port number is 3017.

    // IMPORTANT: Don't forget to setup your HMRC application to use the Redirect URI "http://localhost:3017/" as shown
    // here: Configure Redirect URI for HMRC application
    CkOAuth2W_putListenPort(oauth2,3017);

    CkOAuth2W_putAuthorizationEndpoint(oauth2,L"https://test-api.service.hmrc.gov.uk/oauth/authorize");
    CkOAuth2W_putTokenEndpoint(oauth2,L"https://test-api.service.hmrc.gov.uk/oauth/token");

    // Replace with your actual client ID
    CkOAuth2W_putClientId(oauth2,L"HMRC-CLIENT-ID");

    // The scopes are documented in the HMRC reference documentation for each API.
    // This example gets a read/write access token for the HMRC MTD VAT API.
    CkOAuth2W_putScope(oauth2,L"read:vat write:vat");

    // Begin the OAuth2 Authorization code flow.  This returns a URL that should be loaded in a browser.
    url = CkOAuth2W_startAuth(oauth2);
    if (CkOAuth2W_getLastMethodSuccess(oauth2) != TRUE) {
        wprintf(L"%s\n",CkOAuth2W_lastErrorText(oauth2));
        CkOAuth2W_Dispose(oauth2);
        return;
    }

    // Launch the default browser on the system and navigate to the url.
    // The LaunchBrowser method was added in Chilkat v10.1.2.
    success = CkOAuth2W_LaunchBrowser(oauth2,url);
    if (success == FALSE) {
        wprintf(L"%s\n",CkOAuth2W_lastErrorText(oauth2));
        CkOAuth2W_Dispose(oauth2);
        return;
    }

    // Wait for the user to approve or deny authorization in the browser.
    numMsWaited = 0;
    while ((numMsWaited < 90000) && (CkOAuth2W_getAuthFlowState(oauth2) < 3)) {
        CkOAuth2W_SleepMs(oauth2,100);
        numMsWaited = numMsWaited + 100;
    }

    // If the browser does not respond within the specified time, AuthFlowState will be:
    // 
    // 1: Waiting for Redirect – The OAuth2 background thread is waiting for the browser's redirect request.
    // 2: Waiting for Final Response – The thread is awaiting the final access token response.
    // In either case, cancel the background task initiated by StartAuth.

    if (CkOAuth2W_getAuthFlowState(oauth2) < 3) {
        CkOAuth2W_Cancel(oauth2);
        wprintf(L"No response from the browser!\n");
        CkOAuth2W_Dispose(oauth2);
        return;
    }

    // Check AuthFlowState to determine if authorization was granted, denied, or failed:
    // 
    // 3: Success – OAuth2 flow completed, the background thread exited, and the successful response is in AccessTokenResponse.
    // 4: Access Denied – OAuth2 flow completed, the background thread exited, and the error response is in AccessTokenResponse.
    // 5: Failure – OAuth2 flow failed before completion, the background thread exited, and error details are in FailureInfo.

    if (CkOAuth2W_getAuthFlowState(oauth2) == 5) {
        wprintf(L"OAuth2 failed to complete.\n");
        wprintf(L"%s\n",CkOAuth2W_failureInfo(oauth2));
        CkOAuth2W_Dispose(oauth2);
        return;
    }

    if (CkOAuth2W_getAuthFlowState(oauth2) == 4) {
        wprintf(L"OAuth2 authorization was denied.\n");
        wprintf(L"%s\n",CkOAuth2W_accessTokenResponse(oauth2));
        CkOAuth2W_Dispose(oauth2);
        return;
    }

    if (CkOAuth2W_getAuthFlowState(oauth2) != 3) {
        wprintf(L"Unexpected AuthFlowState:%d\n",CkOAuth2W_getAuthFlowState(oauth2));
        CkOAuth2W_Dispose(oauth2);
        return;
    }

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

    // Get the full JSON response:
    json = CkJsonObjectW_Create();
    CkJsonObjectW_Load(json,CkOAuth2W_accessTokenResponse(oauth2));
    CkJsonObjectW_putEmitCompact(json,FALSE);
    wprintf(L"%s\n",CkJsonObjectW_emit(json));

    // The JSON response looks like this:

    // {
    //   "token_type": "Bearer",
    //   "scope": "user_impersonation",
    //   "expires_in": "3599",
    //   "ext_expires_in": "0",
    //   "expires_on": "1524783438",
    //   "not_before": "1524779538",
    //   "resource": "https://mydomain.api.crm.dynamics.com",
    //   "access_token": "...",
    //   "refresh_token": "...",
    //   "id_token": "..."
    // }

    // If an "expires_on" member does not exist, then add the JSON member by
    // getting the current system date/time and adding the "expires_in" seconds.
    // This way we'll know when the token expires.
    if (CkJsonObjectW_HasMember(json,L"expires_on") != TRUE) {
        dtExpire = CkDateTimeW_Create();
        CkDateTimeW_SetFromCurrentSystemTime(dtExpire);
        CkDateTimeW_AddSeconds(dtExpire,CkJsonObjectW_IntOf(json,L"expires_in"));
        CkJsonObjectW_AppendString(json,L"expires_on",CkDateTimeW_getAsUnixTimeStr(dtExpire,FALSE));
    }

    wprintf(L"%s\n",CkJsonObjectW_emit(json));

    // Save the JSON to a file for future requests.
    fac = CkFileAccessW_Create();
    CkFileAccessW_WriteEntireTextFile(fac,L"qa_data/tokens/hmrc.json",CkJsonObjectW_emit(json),L"utf-8",FALSE);


    CkOAuth2W_Dispose(oauth2);
    CkJsonObjectW_Dispose(json);
    CkDateTimeW_Dispose(dtExpire);
    CkFileAccessW_Dispose(fac);

    }