Sample code for 30+ languages & platforms
Objective-C

Amazon Glacier Get Vault Access Policy

See more Amazon Glacier Examples

Demonstrates how to retrieve the access-policy subresource set on the vault

Chilkat Objective-C Downloads

Objective-C
#import <CkoRest.h>
#import <CkoAuthAws.h>
#import <CkoStringBuilder.h>
#import <CkoJsonObject.h>
#import <NSString.h>

BOOL success = NO;

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

CkoRest *rest = [[CkoRest alloc] init];

//  Connect to the Amazon AWS REST server in the desired region.
BOOL bTls = YES;
int port = 443;
BOOL bAutoReconnect = YES;
success = [rest Connect: @"glacier.us-west-2.amazonaws.com" port: [NSNumber numberWithInt: port] tls: bTls autoReconnect: bAutoReconnect];

//  Provide AWS credentials.
CkoAuthAws *authAws = [[CkoAuthAws alloc] init];
authAws.AccessKey = @"AWS_ACCESS_KEY";
authAws.SecretKey = @"AWS_SECRET_KEY";
authAws.ServiceName = @"glacier";
authAws.Region = @"us-west-2";

success = [rest SetAuthAws: 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 Get Vault Access Policy Reference Documentation
//  
[rest AddHeader: @"x-amz-glacier-version" value: @"2012-06-01"];

//  Get the access policy for the "chilkat" vault.
CkoStringBuilder *sbResponseBody = [[CkoStringBuilder alloc] init];
success = [rest FullRequestNoBodySb: @"GET" uriPath: @"/AWS_ACCOUNT_ID/vaults/chilkat/access-policy" sb: sbResponseBody];
if (success != YES) {
    NSLog(@"%@",rest.LastErrorText);
    return;
}

int respStatusCode = [rest.ResponseStatusCode intValue];
if (respStatusCode >= 400) {
    NSLog(@"%@%d",@"Response Status Code = ",respStatusCode);
    NSLog(@"%@",@"Response Header:");
    NSLog(@"%@",rest.ResponseHeader);
    NSLog(@"%@",@"Response Body:");
    NSLog(@"%@",[sbResponseBody GetAsString]);
    return;
}

//  Success is indicated by a 200 response status.
NSLog(@"%@%d",@"response status code = ",respStatusCode);

CkoJsonObject *json = [[CkoJsonObject alloc] init];
[json LoadSb: sbResponseBody];
json.EmitCompact = NO;

//  Returns JSON such as this:
//  {
//    "Policy": "{\"Version\":\"2012-10-17\",\"Statement\":[{\"Sid\":\"Define-owner-access-rights\",\"Effect\":\"Allow\",\"Principal\":{\"AWS\":\"arn:aws:iam::9999999999999:root\"},\"Action\":\"glacier:DeleteArchive\",\"Resource\":\"arn:aws:glacier:us-west-2:9999999999999:vaults/chilkat\"}]}"
//  }

//  Unwrap...
CkoJsonObject *jsonPolicy = [[CkoJsonObject alloc] init];
[jsonPolicy Load: [json StringOf: @"Policy"]];
jsonPolicy.EmitCompact = NO;

NSLog(@"%@",[jsonPolicy Emit]);
NSLog(@"%@",@"----");

//  The jsonPolicy contains:

//  {
//    "Version": "2012-10-17",
//    "Statement": [
//      {
//        "Sid": "Define-owner-access-rights",
//        "Effect": "Allow",
//        "Principal": {
//          "AWS": "arn:aws:iam::9999999999999:root"
//        },
//        "Action": "glacier:DeleteArchive",
//        "Resource": "arn:aws:glacier:us-west-2:9999999999999:vaults/chilkat"
//      }
//    ]
//  }
//  

//  Use this online tool to generate parsing code from sample JSON: 
//  Generate Parsing Code from JSON

//  To parse the above contents of jsonPolicy...
NSString *Version = 0;
int i;
int count_i;
NSString *Sid = 0;
NSString *Effect = 0;
NSString *PrincipalAWS = 0;
NSString *Action = 0;
NSString *Resource = 0;

Version = [jsonPolicy StringOf: @"Version"];
i = 0;
count_i = [[jsonPolicy SizeOfArray: @"Statement"] intValue];
while (i < count_i) {
    jsonPolicy.I = [NSNumber numberWithInt: i];
    Sid = [jsonPolicy StringOf: @"Statement[i].Sid"];
    Effect = [jsonPolicy StringOf: @"Statement[i].Effect"];
    PrincipalAWS = [jsonPolicy StringOf: @"Statement[i].Principal.AWS"];
    Action = [jsonPolicy StringOf: @"Statement[i].Action"];
    Resource = [jsonPolicy StringOf: @"Statement[i].Resource"];
    i = i + 1;
}