C
C
Amazon Glacier Set Vault Access Policy
See more Amazon Glacier Examples
Demonstrates how to set an access policy for a vault (will overwrite the existing policy).Chilkat C Downloads
#include <C_CkRest.h>
#include <C_CkAuthAws.h>
#include <C_CkJsonObject.h>
#include <C_CkStringBuilder.h>
void ChilkatSample(void)
{
BOOL success;
HCkRest rest;
BOOL bTls;
int port;
BOOL bAutoReconnect;
HCkAuthAws authAws;
HCkJsonObject jsonPolicy;
HCkJsonObject json;
HCkStringBuilder sbRequestBody;
HCkStringBuilder sbResponseBody;
int respStatusCode;
success = FALSE;
// This example requires the Chilkat API to have been previously unlocked.
// See Global Unlock Sample for sample code.
rest = CkRest_Create();
// Connect to the Amazon AWS REST server in the desired region.
bTls = TRUE;
port = 443;
bAutoReconnect = TRUE;
success = CkRest_Connect(rest,"glacier.us-west-2.amazonaws.com",port,bTls,bAutoReconnect);
// Provide AWS credentials.
authAws = CkAuthAws_Create();
CkAuthAws_putAccessKey(authAws,"AWS_ACCESS_KEY");
CkAuthAws_putSecretKey(authAws,"AWS_SECRET_KEY");
CkAuthAws_putServiceName(authAws,"glacier");
CkAuthAws_putRegion(authAws,"us-west-2");
success = CkRest_SetAuthAws(rest,authAws);
// --------------------------------------------------------------------------
// Note: The above REST connection and setup of the AWS credentials
// can be done once. After connecting, any number of REST calls can be made.
// The "auto reconnect" property passed to rest.Connect indicates that if
// the connection is lost, a REST method call will automatically reconnect
// if needed.
// --------------------------------------------------------------------------
// For more information, see Glacier Set Vault Access Policy Reference Documentation
//
CkRest_AddHeader(rest,"x-amz-glacier-version","2012-06-01");
// Create the following JSON
// Use this online tool to generate the code from sample JSON:
// Generate Code to Create JSON
// {
// "Version": "2012-10-17",
// "Statement": [
// {
// "Sid": "Define-owner-access-rights",
// "Effect": "Allow",
// "Principal": {
// "AWS": "arn:aws:iam::AWS_ACCOUNT_ID:root"
// },
// "Action": "glacier:DeleteArchive",
// "Resource": "arn:aws:glacier:us-west-2:AWS_ACCOUNT_ID:vaults/chilkat"
// }
// ]
// }
jsonPolicy = CkJsonObject_Create();
CkJsonObject_UpdateString(jsonPolicy,"Version","2012-10-17");
CkJsonObject_UpdateString(jsonPolicy,"Statement[0].Sid","Define-owner-access-rights");
CkJsonObject_UpdateString(jsonPolicy,"Statement[0].Effect","Allow");
CkJsonObject_UpdateString(jsonPolicy,"Statement[0].Principal.AWS","arn:aws:iam::AWS_ACCOUNT_ID:root");
CkJsonObject_UpdateString(jsonPolicy,"Statement[0].Action","glacier:DeleteArchive");
// Notice here the name of the vault: "chilkat". Change it to your vault name. Also use your actual AWS account ID.
CkJsonObject_UpdateString(jsonPolicy,"Statement[0].Resource","arn:aws:glacier:us-west-2:AWS_ACCOUNT_ID:vaults/chilkat");
// Wrap the above JSON in this JSON:
// {
// "Policy": "{ ... the above JSON ... }"
// }
json = CkJsonObject_Create();
CkJsonObject_UpdateString(json,"Policy",CkJsonObject_emit(jsonPolicy));
sbRequestBody = CkStringBuilder_Create();
CkJsonObject_EmitSb(json,sbRequestBody);
sbResponseBody = CkStringBuilder_Create();
success = CkRest_FullRequestSb(rest,"PUT","/AWS_ACCOUNT_ID/vaults/chilkat/access-policy",sbRequestBody,sbResponseBody);
if (success != TRUE) {
printf("%s\n",CkRest_lastErrorText(rest));
CkRest_Dispose(rest);
CkAuthAws_Dispose(authAws);
CkJsonObject_Dispose(jsonPolicy);
CkJsonObject_Dispose(json);
CkStringBuilder_Dispose(sbRequestBody);
CkStringBuilder_Dispose(sbResponseBody);
return;
}
respStatusCode = CkRest_getResponseStatusCode(rest);
if (respStatusCode >= 400) {
printf("Response Status Code = %d\n",respStatusCode);
printf("Response Header:\n");
printf("%s\n",CkRest_responseHeader(rest));
printf("Response Body:\n");
printf("%s\n",CkStringBuilder_getAsString(sbResponseBody));
CkRest_Dispose(rest);
CkAuthAws_Dispose(authAws);
CkJsonObject_Dispose(jsonPolicy);
CkJsonObject_Dispose(json);
CkStringBuilder_Dispose(sbRequestBody);
CkStringBuilder_Dispose(sbResponseBody);
return;
}
// Success is indicated by a 204 response status with an empty response body.
printf("response status code = %d\n",respStatusCode);
CkRest_Dispose(rest);
CkAuthAws_Dispose(authAws);
CkJsonObject_Dispose(jsonPolicy);
CkJsonObject_Dispose(json);
CkStringBuilder_Dispose(sbRequestBody);
CkStringBuilder_Dispose(sbResponseBody);
}