Unicode C

Azure Service Bus - Send Message to Queue

See more Azure Service Bus Examples

Demonstrates sending a message to an Azure Service Bus Queue. Unicode C

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

void ChilkatSample(void)
    {
    BOOL success;
    HCkRestW rest;
    BOOL bAutoReconnect;
    HCkStringBuilderW sbToken;
    const wchar_t *queueName;
    HCkStringBuilderW sbRequestBody;
    HCkStringBuilderW sbPath;
    HCkJsonObjectW json;
    HCkStringBuilderW sbResponseBody;

    success = FALSE;

    // Note: Requires Chilkat v9.5.0.65 or greater.

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

    // Make the initial connection.
    // A single REST object, once connected, can be used for many Azure Service Bus REST API calls.
    // The auto-reconnect indicates that if the already-established HTTPS connection is closed,
    // then it will be automatically re-established as needed.
    rest = CkRestW_Create();
    bAutoReconnect = TRUE;
    success = CkRestW_Connect(rest,L"<yournamespace>.servicebus.windows.net",443,TRUE,bAutoReconnect);
    if (success != TRUE) {
        wprintf(L"%s\n",CkRestW_lastErrorText(rest));
        CkRestW_Dispose(rest);
        return;
    }

    // ----------------------------------------------------------------------------------------------
    // The code above this comment could be placed inside a function/subroutine within the application
    // because the connection does not need to be made for every request.  Once the connection is made
    // the app may send many requests..
    // ----------------------------------------------------------------------------------------------

    // Let's load a previously computed SAS token and use it.
    // See Azure Shared Access Signature for an example to genenerate an Azure SAS token.
    sbToken = CkStringBuilderW_Create();
    CkStringBuilderW_LoadFile(sbToken,L"qa_data/tokens/serviceBusSas.txt",L"utf-8");

    // Tell the REST object to use the Azure Shared Access Signature for authorization.
    CkStringBuilderW_Prepend(sbToken,L"SharedAccessSignature ");
    CkRestW_AddHeader(rest,L"Authorization",CkStringBuilderW_getAsString(sbToken));

    // ----------------------------------------------------------------------------------------------

    // Send to a queue named "gila";
    queueName = L"gila";

    // The HTTP request body contains the content of the message sent to the queue.
    sbRequestBody = CkStringBuilderW_Create();
    CkStringBuilderW_Append(sbRequestBody,L"Hello, I'm a gila monster, and I may bite!");

    // Build the path..
    sbPath = CkStringBuilderW_Create();
    CkStringBuilderW_Append(sbPath,L"/");
    CkStringBuilderW_Append(sbPath,queueName);
    CkStringBuilderW_Append(sbPath,L"/messages");

    // Add timeout and api-version query parameters.
    CkRestW_AddQueryParam(rest,L"timeout",L"20");
    CkRestW_AddQueryParam(rest,L"api-version",L"2013-08");

    // Standard brokered message properties are placed in a BrokerProperties HTTP header. 
    // The broker properties must be serialized in JSON format. To specify a TimeToLive value of 3600 seconds 
    // and to add a message label "M1" to the message..
    json = CkJsonObjectW_Create();
    CkJsonObjectW_AppendInt(json,L"TimeToLive",3600);
    CkJsonObjectW_AppendString(json,L"Label",L"M1");
    CkRestW_AddHeader(rest,L"BrokerProperties",CkJsonObjectW_emit(json));

    // To add custom properties, such as "Priority" and "Color"
    CkRestW_AddHeader(rest,L"Priority",L"High");
    CkRestW_AddHeader(rest,L"Customer",L"12345");

    sbResponseBody = CkStringBuilderW_Create();
    success = CkRestW_FullRequestSb(rest,L"POST",CkStringBuilderW_getAsString(sbPath),sbRequestBody,sbResponseBody);
    if (success != TRUE) {
        wprintf(L"%s\n",CkRestW_lastErrorText(rest));
        CkRestW_Dispose(rest);
        CkStringBuilderW_Dispose(sbToken);
        CkStringBuilderW_Dispose(sbRequestBody);
        CkStringBuilderW_Dispose(sbPath);
        CkJsonObjectW_Dispose(json);
        CkStringBuilderW_Dispose(sbResponseBody);
        return;
    }

    wprintf(L"Response Status Code = %d\n",CkRestW_getResponseStatusCode(rest));

    // Check for a success response.
    if (CkRestW_getResponseStatusCode(rest) != 201) {
        wprintf(L"%s\n",CkRestW_lastRequestStartLine(rest));
        wprintf(L"%s\n",CkRestW_lastRequestHeader(rest));
        wprintf(L"%s\n",CkStringBuilderW_getAsString(sbResponseBody));
        wprintf(L"Failed.\n");
        CkRestW_Dispose(rest);
        CkStringBuilderW_Dispose(sbToken);
        CkStringBuilderW_Dispose(sbRequestBody);
        CkStringBuilderW_Dispose(sbPath);
        CkJsonObjectW_Dispose(json);
        CkStringBuilderW_Dispose(sbResponseBody);
        return;
    }

    // If successful, the 201 response will have no response body.

    wprintf(L"Success.\n");


    CkRestW_Dispose(rest);
    CkStringBuilderW_Dispose(sbToken);
    CkStringBuilderW_Dispose(sbRequestBody);
    CkStringBuilderW_Dispose(sbPath);
    CkJsonObjectW_Dispose(json);
    CkStringBuilderW_Dispose(sbResponseBody);

    }