(PowerBuilder) Download S3 CloudTrail Log and Un-Gzip

Demonstrates how to download a Amazon CloudTrail log from an S3 bucket. The file in this example is a .json.gz. The file is uncompressed and the JSON parsed.

Chilkat ActiveX Downloads ActiveX for 32-bit and 64-bit Windows

integer li_rc
oleobject loo_Http
string ls_BucketName
string ls_ObjectName
string ls_LocalFilePath
integer li_Success
integer li_StatusCode
string ls_JsonPath
oleobject loo_Gzip
oleobject loo_Json

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

loo_Http = create oleobject
// Use "Chilkat_9_5_0.Http" for versions of Chilkat < 10.0.0
li_rc = loo_Http.ConnectToNewObject("Chilkat.Http")
if li_rc < 0 then
    destroy loo_Http
    MessageBox("Error","Connecting to COM object failed")
    return
end if

loo_Http.AwsAccessKey = "AWS_ACCESS_KEY"
loo_Http.AwsSecretKey = "AWS_SECRET_KEY"
loo_Http.S3Ssl = 1
loo_Http.AwsRegion = "us-west-2"
loo_Http.AwsEndpoint = "s3-us-west-2.amazonaws.com"

ls_BucketName = "chilkat.logs"
ls_ObjectName = "/AWSLogs/957491831129/CloudTrail/us-west-1/2016/11/12/957491831129_CloudTrail_us-west-1_20161112T1335Z_umXfD4RxHE5nDGuI.json.gz"
ls_LocalFilePath = "qa_output/cloudTrailLog.json.gz"

li_Success = loo_Http.S3_DownloadFile(ls_BucketName,ls_ObjectName,ls_LocalFilePath)
if li_Success <> 1 then
    Write-Debug loo_Http.LastErrorText
    destroy loo_Http
    return
end if

li_StatusCode = loo_Http.LastStatus
if li_StatusCode <> 200 then
    Write-Debug "Failed to download, response status code = " + string(li_StatusCode)
    destroy loo_Http
    return
end if

ls_JsonPath = "qa_output/cloudTrailLog.json"
loo_Gzip = create oleobject
// Use "Chilkat_9_5_0.Gzip" for versions of Chilkat < 10.0.0
li_rc = loo_Gzip.ConnectToNewObject("Chilkat.Gzip")

li_Success = loo_Gzip.UncompressFile(ls_LocalFilePath,ls_JsonPath)
if li_Success = 0 then
    Write-Debug loo_Gzip.LastErrorText
    destroy loo_Http
    destroy loo_Gzip
    return
end if

loo_Json = create oleobject
// Use "Chilkat_9_5_0.JsonObject" for versions of Chilkat < 10.0.0
li_rc = loo_Json.ConnectToNewObject("Chilkat.JsonObject")

loo_Json.LoadFile(ls_JsonPath)
loo_Json.EmitCompact = 0
Write-Debug loo_Json.Emit()

// Sample JSON is shown below.
// Go to http://tools.chilkat.io/jsonParse.cshtml 
// and copy/paste the JSON into the online tool to generate parsing code.

// {
//   "Records": [
//     {
//       "eventVersion": "1.05",
//       "userIdentity": {
//         "type": "Root",
//         "principalId": "954591834127",
//         "arn": "arn:aws:iam::954591834127:root",
//         "accountId": "954591834127",
//         "accessKeyId": "ASIAJ3DEMXUXI43B6FYQ",
//         "sessionContext": {
//           "attributes": {
//             "mfaAuthenticated": "false",
//             "creationDate": "2016-11-12T13:09:31Z"
//           }
//         }
//       },
//       "eventTime": "2016-11-12T13:34:39Z",
//       "eventSource": "cloudtrail.amazonaws.com",
//       "eventName": "DescribeTrails",
//       "awsRegion": "us-west-1",
//       "sourceIPAddress": "98.228.98.57",
//       "userAgent": "console.amazonaws.com",
//       "requestParameters": {
//         "trailNameList": [
//         ]
//       },
//       "responseElements": null,
//       "requestID": "c2a0376c-a8dc-11e6-89e7-85ac5ce5ee56",
//       "eventID": "eb5afd70-dae1-41f0-82b4-91c3c936d9ba",
//       "eventType": "AwsApiCall",
//       "recipientAccountId": "954591834127"
//     }
//   ]
// }


destroy loo_Http
destroy loo_Gzip
destroy loo_Json