(Unicode C) Azure Storage: Upload Binary Data to Block Blob using BinData

Sample code to upload binary bytes (contained in a Chilkat BinData object) to a block blob in Azure Cloud Storage. This creates the block blob, or replaces an existing block blob.

Note: The maximum size of a block blob created by uploading in a single step is 64MB. For larger files, the upload must be broken up into blocks. There is another Chilkat example for that..

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_CkRestW.h>
#include <C_CkAuthAzureStorageW.h>
#include <C_CkBinDataW.h>
#include <C_CkStringBuilderW.h>

void ChilkatSample(void)
    {
    HCkRestW rest;
    BOOL bTls;
    int port;
    BOOL bAutoReconnect;
    BOOL success;
    HCkAuthAzureStorageW azAuth;
    HCkBinDataW bd;
    HCkStringBuilderW sbResponseBody;

    // Azure Blob Service Example: Upload binary bytes to a block blob.
    // This creates a new block blob or replaces an existing one in its entirety.
    // See also: https://msdn.microsoft.com/en-us/library/azure/dd179451.aspx

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

    rest = CkRestW_Create();

    // Connect to the Azure Storage Blob Service
    bTls = TRUE;
    port = 443;
    bAutoReconnect = TRUE;
    // In this example, the storage account name is "chilkat".
    success = CkRestW_Connect(rest,L"chilkat.blob.core.windows.net",port,bTls,bAutoReconnect);
    if (success != TRUE) {
        wprintf(L"%s\n",CkRestW_lastErrorText(rest));
        CkRestW_Dispose(rest);
        return;
    }

    // Provide Azure Cloud credentials for the REST call.
    azAuth = CkAuthAzureStorageW_Create();
    CkAuthAzureStorageW_putAccessKey(azAuth,L"AZURE_ACCESS_KEY");
    // The account name used here should match the 1st part of the domain passed in the call to Connect (above).
    CkAuthAzureStorageW_putAccount(azAuth,L"chilkat");
    CkAuthAzureStorageW_putScheme(azAuth,L"SharedKey");
    CkAuthAzureStorageW_putService(azAuth,L"Blob");
    // This causes the "x-ms-version: 2020-08-04" header to be automatically added.
    CkAuthAzureStorageW_putXMsVersion(azAuth,L"2020-08-04");
    success = CkRestW_SetAuthAzureStorage(rest,azAuth);

    // Note: The application does not need to explicitly set the following
    // headers: Content-Length, x-ms-date, Authorization.  These headers
    // are automatically set by Chilkat.

    // IMPORTANT: Make sure to set the x-ms-blob-type header:
    success = CkRestW_AddHeader(rest,L"x-ms-blob-type",L"BlockBlob");

    // For this example, we'll just load a JPG file into memory..
    bd = CkBinDataW_Create();
    success = CkBinDataW_LoadFile(bd,L"qa_data/jpg/starfish.jpg");
    if (success == FALSE) {
        wprintf(L"Failed to load the file to be uploaded.\n");
        CkRestW_Dispose(rest);
        CkAuthAzureStorageW_Dispose(azAuth);
        CkBinDataW_Dispose(bd);
        return;
    }

    // Note: The maximum size of a block blob created by uploading in a single step is 64MB.  
    // For larger files, the upload must be broken up into blocks.  There is another Chilkat example for that..
    sbResponseBody = CkStringBuilderW_Create();
    success = CkRestW_FullRequestBd(rest,L"PUT",L"/mycontainer/starfish.jpg",bd,sbResponseBody);
    if (success == FALSE) {
        wprintf(L"%s\n",CkRestW_lastErrorText(rest));
        CkRestW_Dispose(rest);
        CkAuthAzureStorageW_Dispose(azAuth);
        CkBinDataW_Dispose(bd);
        CkStringBuilderW_Dispose(sbResponseBody);
        return;
    }

    // When successful, the Azure Storage service will respond with a 201 response status code,
    // with no response body.

    if (CkRestW_getResponseStatusCode(rest) != 201) {
        // Examine the request/response to see what happened.
        wprintf(L"response status code = %d\n",CkRestW_getResponseStatusCode(rest));
        wprintf(L"response status text = %s\n",CkRestW_responseStatusText(rest));
        wprintf(L"response header: %s\n",CkRestW_responseHeader(rest));
        wprintf(L"response body (if any): %s\n",CkStringBuilderW_getAsString(sbResponseBody));
        wprintf(L"---\n");
        wprintf(L"LastRequestStartLine: %s\n",CkRestW_lastRequestStartLine(rest));
        wprintf(L"LastRequestHeader: %s\n",CkRestW_lastRequestHeader(rest));
        CkRestW_Dispose(rest);
        CkAuthAzureStorageW_Dispose(azAuth);
        CkBinDataW_Dispose(bd);
        CkStringBuilderW_Dispose(sbResponseBody);
        return;
    }

    wprintf(L"Success.\n");


    CkRestW_Dispose(rest);
    CkAuthAzureStorageW_Dispose(azAuth);
    CkBinDataW_Dispose(bd);
    CkStringBuilderW_Dispose(sbResponseBody);

    }