(Unicode C) Create S3 Bucket in a Region

Demonstrates how to create an S3 bucket in a specified region. This example will create a bucket in the eu-west-2 region.

Chilkat C/C++ Library Downloads
MS Visual C/C++ Linux/CentOS/Heroku C/C++ MAC OS X C/C++ C++ Builder	Solaris C/C++ iOS C/C++ Android C/C++ Raspberry Pi C/C++ Windows Mobile 5.0/Pocket PC 2003	ARM Embedded Linux C/C++ PowerLinux C/C++ FreeBSD C/C++ MinGW C/C++

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

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

    // 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.
    bTls = TRUE;
    port = 443;
    bAutoReconnect = TRUE;
    success = CkRestW_Connect(rest,L"s3.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");
    CkAuthAwsW_putServiceName(authAws,L"s3");
    success = CkRestW_SetAuthAws(rest,authAws);

    // We'll send a PUT request having an XML body such as this:
    // <CreateBucketConfiguration xmlns="http://s3.amazonaws.com/doc/2006-03-01/"> 
    //   <LocationConstraint>BucketRegion</LocationConstraint> 
    //   </CreateBucketConfiguration>

    // Create the XML body specifying the region as "eu-west-2"
    xml = CkXmlW_Create();
    CkXmlW_putTag(xml,L"CreateBucketConfiguration");
    CkXmlW_AddAttribute(xml,L"xmlns",L"http://s3.amazonaws.com/doc/2006-03-01/");
    CkXmlW_UpdateChildContent(xml,L"LocationConstraint",L"eu-west-2");

    // Set the bucket name via the HOST header.
    // In this case, the bucket name is "chilkateuwest2".
    CkRestW_putHost(rest,L"chilkateuwest2.s3.amazonaws.com");

    // Make the call to create the bucket.
    responseStr = CkRestW_fullRequestString(rest,L"PUT",L"/",CkXmlW_getXml(xml));
    if (CkRestW_getLastMethodSuccess(rest) != TRUE) {
        wprintf(L"%s\n",CkRestW_lastErrorText(rest));
        CkRestW_Dispose(rest);
        CkAuthAwsW_Dispose(authAws);
        CkXmlW_Dispose(xml);
        return;
    }

    if (CkRestW_getResponseStatusCode(rest) != 200) {
        wprintf(L"status code = %d\n",CkRestW_getResponseStatusCode(rest));
        responseXml = CkXmlW_Create();
        CkXmlW_LoadXml(responseXml,responseStr);
        wprintf(L"%s\n",CkXmlW_getXml(responseXml));
        wprintf(L"Failed.\n");
        CkRestW_Dispose(rest);
        CkAuthAwsW_Dispose(authAws);
        CkXmlW_Dispose(xml);
        CkXmlW_Dispose(responseXml);
        return;
    }

    wprintf(L"Bucket in the eu-west-2 region created.\n");


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

    }