Unicode C

SQS List Queues

See more Amazon SQS Examples

Returns a list of your Amazon SQS queues. The maximum number of queues that can be returned is 1000. If you specify a value for the optional QueueNamePrefix query parameter, only queues with a name beginning with the specified value are returned. Unicode C

#include <C_CkRestW.h>
#include <C_CkAuthAwsW.h>
#include <C_CkXmlW.h>

void ChilkatSample(void)
    {
    BOOL success;
    HCkRestW rest;
    BOOL bTls;
    int port;
    BOOL bAutoReconnect;
    HCkAuthAwsW authAws;
    const wchar_t *responseXml;
    HCkXmlW xml;
    int i;
    int numQueues;

    success = FALSE;

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

    rest = CkRestW_Create();

    // Connect to the Amazon AWS REST server.
    // such as https://sqs.us-west-2.amazonaws.com/
    bTls = TRUE;
    port = 443;
    bAutoReconnect = TRUE;
    success = CkRestW_Connect(rest,L"sqs.us-west-2.amazonaws.com",port,bTls,bAutoReconnect);

    // Provide AWS credentials for the REST call.
    authAws = CkAuthAwsW_Create();
    CkAuthAwsW_putAccessKey(authAws,L"AWS_ACCESS_KEY");
    CkAuthAwsW_putSecretKey(authAws,L"AWS_SECRET_KEY");
    // the region should match our URL above..
    CkAuthAwsW_putRegion(authAws,L"us-west-2");
    CkAuthAwsW_putServiceName(authAws,L"sqs");

    CkRestW_SetAuthAws(rest,authAws);

    CkRestW_AddQueryParam(rest,L"Action",L"ListQueues");
    // List only queues having a name starting with "c".
    // Comment out this line to list all queues.
    CkRestW_AddQueryParam(rest,L"QueueNamePrefix",L"c");

    responseXml = CkRestW_fullRequestNoBody(rest,L"GET",L"/");
    if (CkRestW_getLastMethodSuccess(rest) != TRUE) {
        wprintf(L"%s\n",CkRestW_lastErrorText(rest));
        CkRestW_Dispose(rest);
        CkAuthAwsW_Dispose(authAws);
        return;
    }

    // A successful response will have a status code equal to 200.
    if (CkRestW_getResponseStatusCode(rest) != 200) {
        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: %s\n",responseXml);
        CkRestW_Dispose(rest);
        CkAuthAwsW_Dispose(authAws);
        return;
    }

    // Examine the successful XML response.
    xml = CkXmlW_Create();
    CkXmlW_LoadXml(xml,responseXml);
    wprintf(L"%s\n",CkXmlW_getXml(xml));
    wprintf(L"----\n");

    // A successful response looks like this:
    // <?xml version="1.0" encoding="utf-8" ?>
    // <ListQueuesResponse xmlns="http://queue.amazonaws.com/doc/2012-11-05/">
    //     <ListQueuesResult>
    //         <QueueUrl>https://sqs.us-west-2.amazonaws.com/123491855557/chilkatTest</QueueUrl>
    //         <QueueUrl>https://sqs.us-west-2.amazonaws.com/123496666627/chilkatses</QueueUrl>
    //     </ListQueuesResult>
    //     <ResponseMetadata>
    //         <RequestId>77bce138-fbcc-5e42-9ee3-b15c1f7178c2</RequestId>
    //     </ResponseMetadata>
    // </ListQueuesResponse>

    // Get each queue URL..
    CkXmlW_FindChild2(xml,L"ListQueuesResult");
    i = 0;
    numQueues = CkXmlW_getNumChildren(xml);
    while (i < numQueues) {
        wprintf(L"QueueUrl: %s\n",CkXmlW_getChildContentByIndex(xml,i));
        i = i + 1;
    }

    CkXmlW_GetRoot2(xml);


    CkRestW_Dispose(rest);
    CkAuthAwsW_Dispose(authAws);
    CkXmlW_Dispose(xml);

    }