Unicode C

Azure File Service: List Shares

See more Azure Cloud Storage Examples

Sample code to list the file shares in an Azure storage account. Unicode C

#include <C_CkRestW.h>
#include <C_CkAuthAzureStorageW.h>
#include <C_CkXmlW.h>
#include <C_CkDateTimeW.h>
#include <C_CkDtObjW.h>

void ChilkatSample(void)
    {
    BOOL success;
    HCkRestW rest;
    BOOL bTls;
    int port;
    BOOL bAutoReconnect;
    HCkAuthAzureStorageW azAuth;
    const wchar_t *responseStr;
    HCkXmlW xml;
    HCkDateTimeW lastMod;
    int numShares;
    int i;
    HCkDtObjW dt;

    success = FALSE;

    //  Azure File Service Example: List all the file shares in a storage account.
    //  See also: https://docs.microsoft.com/en-us/rest/api/storageservices/list-shares

    //  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.file.core.windows.net",port,bTls,bAutoReconnect);
    if (success == FALSE) {
        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"File");
    //  This causes the "x-ms-version: 2021-08-06" header to be automatically added.
    CkAuthAzureStorageW_putXMsVersion(azAuth,L"2021-08-06");
    success = CkRestW_SetAuthAzureStorage(rest,azAuth);

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

    //  Send the GET request to list the shares.
    responseStr = CkRestW_fullRequestNoBody(rest,L"GET",L"/?comp=list");
    if (CkRestW_getLastMethodSuccess(rest) == FALSE) {
        wprintf(L"%s\n",CkRestW_lastErrorText(rest));
        CkRestW_Dispose(rest);
        CkAuthAzureStorageW_Dispose(azAuth);
        return;
    }

    //  When successful, the Azure Storage service will respond with a 200 response status code,
    //  with an XML response body.

    if (CkRestW_getResponseStatusCode(rest) != 200) {
        //  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",responseStr);
        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);
        return;
    }

    //  Load the XML response for parsing.
    //  An example of the response XML is shown below.
    xml = CkXmlW_Create();
    success = CkXmlW_LoadXml(xml,responseStr);

    wprintf(L"%s\n",CkXmlW_getXml(xml));

    //  Here's a sample response:

    //  <?xml version="1.0" encoding="utf-8" ?>
    //  <EnumerationResults ServiceEndpoint="https://chilkat.file.core.windows.net/">
    //      <Shares>
    //          <Share>
    //              <Name>beardie</Name>
    //              <Properties>
    //                  <Last-Modified>Mon, 26 Jun 2017 21:24:57 GMT</Last-Modified>
    //                  <Etag>"0x8D4BCD9CBD872E5"</Etag>
    //                  <Quota>5120</Quota>
    //              </Properties>
    //          </Share>
    //          <Share>
    //              <Name>pip</Name>
    //              <Properties>
    //                  <Last-Modified>Mon, 26 Jun 2017 21:24:44 GMT</Last-Modified>
    //                  <Etag>"0x8D4BCD9C3D823D1"</Etag>
    //                  <Quota>5120</Quota>
    //              </Properties>
    //          </Share>
    //      </Shares>
    //      <NextMarker />
    //  </EnumerationResults>

    //  Let's iterate over the file shares
    lastMod = CkDateTimeW_Create();

    numShares = CkXmlW_NumChildrenAt(xml,L"Shares");
    i = 0;
    dt = CkDtObjW_Create();
    while (i < numShares) {
        wprintf(L"---- Share %d ----\n",i);
        CkXmlW_putI(xml,i);
        wprintf(L"Name: %s\n",CkXmlW_getChildContent(xml,L"Shares|Share[i]|Name"));
        CkDateTimeW_SetFromRfc822(lastMod,CkXmlW_getChildContent(xml,L"Shares|Share[i]|Properties|Last-Modified"));
        CkDateTimeW_ToDtObj(lastMod,TRUE,dt);

        wprintf(L"Last-Modified YMD: %d,%d,%d\n",CkDtObjW_getYear(dt),CkDtObjW_getMonth(dt),CkDtObjW_getDay(dt));
        i = i + 1;
    }

    //  Output for the above loop:

    //  ---- Share 0 ----
    //  Name: beardie
    //  Last-Modified YMD: 2017,6,26
    //  ---- Share 1 ----
    //  Name: pip
    //  Last-Modified YMD: 2017,6,26
    //  

    wprintf(L"Success.\n");


    CkRestW_Dispose(rest);
    CkAuthAzureStorageW_Dispose(azAuth);
    CkXmlW_Dispose(xml);
    CkDateTimeW_Dispose(lastMod);
    CkDtObjW_Dispose(dt);

    }