BatchGetBuilds delphiAx Example
var
rest: TChilkatRest;
success: Integer;
authAws: TChilkatAuthAws;
json: TChilkatJsonObject;
sbRequestBody: TChilkatStringBuilder;
sbResponseBody: TChilkatStringBuilder;
respStatusCode: Integer;
jResp: TChilkatJsonObject;
arn: WideString;
ArtifactIdentifier: WideString;
BucketOwnerAccess: WideString;
EncryptionDisabled: Integer;
Location: WideString;
Md5sum: WideString;
OverrideArtifactName: Integer;
Sha256sum: WideString;
buildBatchArn: WideString;
buildComplete: Integer;
buildNumber: Integer;
buildStatus: WideString;
cacheLocation: WideString;
v_Type: WideString;
currentPhase: WideString;
SessionEnabled: Integer;
SessionTarget: WideString;
encryptionKey: WideString;
endTime: Integer;
Certificate: WideString;
ComputeType: WideString;
Image: WideString;
ImagePullCredentialsType: WideString;
PrivilegedMode: Integer;
Credential: WideString;
CredentialProvider: WideString;
environmentType: WideString;
id: WideString;
initiator: WideString;
GroupName: WideString;
Status: WideString;
StreamName: WideString;
CloudWatchLogsArn: WideString;
DeepLink: WideString;
logsGroupName: WideString;
S3DeepLink: WideString;
S3LogsBucketOwnerAccess: WideString;
S3LogsEncryptionDisabled: Integer;
S3LogsLocation: WideString;
S3LogsStatus: WideString;
S3LogsArn: WideString;
logsStreamName: WideString;
NetworkInterfaceId: WideString;
SubnetId: WideString;
projectName: WideString;
queuedTimeoutInMinutes: Integer;
resolvedSourceVersion: WideString;
serviceRole: WideString;
Resource: WideString;
AuthType: WideString;
Buildspec: WideString;
Context: WideString;
TargetUrl: WideString;
GitCloneDepth: Integer;
FetchSubmodules: Integer;
InsecureSsl: Integer;
sourceLocation: WideString;
ReportBuildStatus: Integer;
SourceIdentifier: WideString;
sourceType: WideString;
sourceVersion: WideString;
startTime: Integer;
timeoutInMinutes: Integer;
VpcId: WideString;
j: Integer;
count_j: Integer;
strVal: WideString;
name: WideString;
v_type: WideString;
value: WideString;
identifier: WideString;
location: WideString;
mountOptions: WideString;
mountPoint: WideString;
durationInSeconds: Integer;
phaseStatus: WideString;
phaseType: WideString;
k: Integer;
count_k: Integer;
message: WideString;
statusCode: WideString;
artifactIdentifier: WideString;
bucketOwnerAccess: WideString;
encryptionDisabled: Integer;
md5sum: WideString;
overrideArtifactName: Integer;
sha256sum: WideString;
authResource: WideString;
authType: WideString;
buildspec: WideString;
buildStatusConfigContext: WideString;
buildStatusConfigTargetUrl: WideString;
gitCloneDepth: Integer;
gitSubmodulesConfigFetchSubmodules: Integer;
insecureSsl: Integer;
reportBuildStatus: Integer;
sourceIdentifier: WideString;
i: Integer;
count_i: Integer;
begin
// This example requires the Chilkat API to have been previously unlocked.
// See Global Unlock Sample for sample code.
rest := TChilkatRest.Create(Self);
authAws := TChilkatAuthAws.Create(Self);
authAws.AccessKey := 'AWS_ACCESS_KEY';
authAws.SecretKey := 'AWS_SECRET_KEY';
// Don't forget to change the region to your particular region. (Also make the same change in the call to Connect below.)
authAws.Region := 'us-west-2';
authAws.ServiceName := 'codebuild';
// SetAuthAws causes Chilkat to automatically add the following headers: Authorization, X-Amz-Date
rest.SetAuthAws(authAws.ControlInterface);
// URL: https://codebuild.us-west-2.amazonaws.com/
// Use the same region as specified above.
success := rest.Connect('codebuild.us-west-2.amazonaws.com',443,1,1);
if (success <> 1) then
begin
Memo1.Lines.Add('ConnectFailReason: ' + IntToStr(rest.ConnectFailReason));
Memo1.Lines.Add(rest.LastErrorText);
Exit;
end;
// The following code creates the JSON request body.
// The JSON created by this code is shown below.
// Use this online tool to generate code from sample JSON:
// Generate Code to Create JSON
json := TChilkatJsonObject.Create(Self);
json.UpdateString('ids[0]','string');
// The JSON request body created by the above code:
// {
// "ids": [
// "string"
// ]
// }
rest.AddHeader('Content-Type','application/x-amz-json-1.1');
rest.AddHeader('X-Amz-Target','CodeBuild_20161006.BatchGetBuilds');
sbRequestBody := TChilkatStringBuilder.Create(Self);
json.EmitSb(sbRequestBody.ControlInterface);
sbResponseBody := TChilkatStringBuilder.Create(Self);
success := rest.FullRequestSb('POST','/',sbRequestBody.ControlInterface,sbResponseBody.ControlInterface);
if (success <> 1) then
begin
Memo1.Lines.Add(rest.LastErrorText);
Exit;
end;
respStatusCode := rest.ResponseStatusCode;
Memo1.Lines.Add('response status code = ' + IntToStr(respStatusCode));
if (respStatusCode <> 200) then
begin
Memo1.Lines.Add('Response Header:');
Memo1.Lines.Add(rest.ResponseHeader);
Memo1.Lines.Add('Response Body:');
Memo1.Lines.Add(sbResponseBody.GetAsString());
Exit;
end;
jResp := TChilkatJsonObject.Create(Self);
jResp.LoadSb(sbResponseBody.ControlInterface);
// The following code parses the JSON response.
// A sample JSON response is shown below the sample code.
// Use this online tool to generate parsing code from sample JSON:
// Generate Parsing Code from JSON
i := 0;
count_i := jResp.SizeOfArray('builds');
while i < count_i do
begin
jResp.I := i;
arn := jResp.StringOf('builds[i].arn');
ArtifactIdentifier := jResp.StringOf('builds[i].artifacts.artifactIdentifier');
BucketOwnerAccess := jResp.StringOf('builds[i].artifacts.bucketOwnerAccess');
EncryptionDisabled := jResp.IntOf('builds[i].artifacts.encryptionDisabled');
Location := jResp.StringOf('builds[i].artifacts.location');
Md5sum := jResp.StringOf('builds[i].artifacts.md5sum');
OverrideArtifactName := jResp.IntOf('builds[i].artifacts.overrideArtifactName');
Sha256sum := jResp.StringOf('builds[i].artifacts.sha256sum');
buildBatchArn := jResp.StringOf('builds[i].buildBatchArn');
buildComplete := jResp.IntOf('builds[i].buildComplete');
buildNumber := jResp.IntOf('builds[i].buildNumber');
buildStatus := jResp.StringOf('builds[i].buildStatus');
cacheLocation := jResp.StringOf('builds[i].cache.location');
v_Type := jResp.StringOf('builds[i].cache.type');
currentPhase := jResp.StringOf('builds[i].currentPhase');
SessionEnabled := jResp.IntOf('builds[i].debugSession.sessionEnabled');
SessionTarget := jResp.StringOf('builds[i].debugSession.sessionTarget');
encryptionKey := jResp.StringOf('builds[i].encryptionKey');
endTime := jResp.IntOf('builds[i].endTime');
Certificate := jResp.StringOf('builds[i].environment.certificate');
ComputeType := jResp.StringOf('builds[i].environment.computeType');
Image := jResp.StringOf('builds[i].environment.image');
ImagePullCredentialsType := jResp.StringOf('builds[i].environment.imagePullCredentialsType');
PrivilegedMode := jResp.IntOf('builds[i].environment.privilegedMode');
Credential := jResp.StringOf('builds[i].environment.registryCredential.credential');
CredentialProvider := jResp.StringOf('builds[i].environment.registryCredential.credentialProvider');
environmentType := jResp.StringOf('builds[i].environment.type');
id := jResp.StringOf('builds[i].id');
initiator := jResp.StringOf('builds[i].initiator');
GroupName := jResp.StringOf('builds[i].logs.cloudWatchLogs.groupName');
Status := jResp.StringOf('builds[i].logs.cloudWatchLogs.status');
StreamName := jResp.StringOf('builds[i].logs.cloudWatchLogs.streamName');
CloudWatchLogsArn := jResp.StringOf('builds[i].logs.cloudWatchLogsArn');
DeepLink := jResp.StringOf('builds[i].logs.deepLink');
logsGroupName := jResp.StringOf('builds[i].logs.groupName');
S3DeepLink := jResp.StringOf('builds[i].logs.s3DeepLink');
S3LogsBucketOwnerAccess := jResp.StringOf('builds[i].logs.s3Logs.bucketOwnerAccess');
S3LogsEncryptionDisabled := jResp.IntOf('builds[i].logs.s3Logs.encryptionDisabled');
S3LogsLocation := jResp.StringOf('builds[i].logs.s3Logs.location');
S3LogsStatus := jResp.StringOf('builds[i].logs.s3Logs.status');
S3LogsArn := jResp.StringOf('builds[i].logs.s3LogsArn');
logsStreamName := jResp.StringOf('builds[i].logs.streamName');
NetworkInterfaceId := jResp.StringOf('builds[i].networkInterface.networkInterfaceId');
SubnetId := jResp.StringOf('builds[i].networkInterface.subnetId');
projectName := jResp.StringOf('builds[i].projectName');
queuedTimeoutInMinutes := jResp.IntOf('builds[i].queuedTimeoutInMinutes');
resolvedSourceVersion := jResp.StringOf('builds[i].resolvedSourceVersion');
serviceRole := jResp.StringOf('builds[i].serviceRole');
Resource := jResp.StringOf('builds[i].source.auth.resource');
AuthType := jResp.StringOf('builds[i].source.auth.type');
Buildspec := jResp.StringOf('builds[i].source.buildspec');
Context := jResp.StringOf('builds[i].source.buildStatusConfig.context');
TargetUrl := jResp.StringOf('builds[i].source.buildStatusConfig.targetUrl');
GitCloneDepth := jResp.IntOf('builds[i].source.gitCloneDepth');
FetchSubmodules := jResp.IntOf('builds[i].source.gitSubmodulesConfig.fetchSubmodules');
InsecureSsl := jResp.IntOf('builds[i].source.insecureSsl');
sourceLocation := jResp.StringOf('builds[i].source.location');
ReportBuildStatus := jResp.IntOf('builds[i].source.reportBuildStatus');
SourceIdentifier := jResp.StringOf('builds[i].source.sourceIdentifier');
sourceType := jResp.StringOf('builds[i].source.type');
sourceVersion := jResp.StringOf('builds[i].sourceVersion');
startTime := jResp.IntOf('builds[i].startTime');
timeoutInMinutes := jResp.IntOf('builds[i].timeoutInMinutes');
VpcId := jResp.StringOf('builds[i].vpcConfig.vpcId');
j := 0;
count_j := jResp.SizeOfArray('builds[i].cache.modes');
while j < count_j do
begin
jResp.J := j;
strVal := jResp.StringOf('builds[i].cache.modes[j]');
j := j + 1;
end;
j := 0;
count_j := jResp.SizeOfArray('builds[i].environment.environmentVariables');
while j < count_j do
begin
jResp.J := j;
name := jResp.StringOf('builds[i].environment.environmentVariables[j].name');
v_type := jResp.StringOf('builds[i].environment.environmentVariables[j].type');
value := jResp.StringOf('builds[i].environment.environmentVariables[j].value');
j := j + 1;
end;
j := 0;
count_j := jResp.SizeOfArray('builds[i].exportedEnvironmentVariables');
while j < count_j do
begin
jResp.J := j;
name := jResp.StringOf('builds[i].exportedEnvironmentVariables[j].name');
value := jResp.StringOf('builds[i].exportedEnvironmentVariables[j].value');
j := j + 1;
end;
j := 0;
count_j := jResp.SizeOfArray('builds[i].fileSystemLocations');
while j < count_j do
begin
jResp.J := j;
identifier := jResp.StringOf('builds[i].fileSystemLocations[j].identifier');
location := jResp.StringOf('builds[i].fileSystemLocations[j].location');
mountOptions := jResp.StringOf('builds[i].fileSystemLocations[j].mountOptions');
mountPoint := jResp.StringOf('builds[i].fileSystemLocations[j].mountPoint');
v_type := jResp.StringOf('builds[i].fileSystemLocations[j].type');
j := j + 1;
end;
j := 0;
count_j := jResp.SizeOfArray('builds[i].phases');
while j < count_j do
begin
jResp.J := j;
durationInSeconds := jResp.IntOf('builds[i].phases[j].durationInSeconds');
endTime := jResp.IntOf('builds[i].phases[j].endTime');
phaseStatus := jResp.StringOf('builds[i].phases[j].phaseStatus');
phaseType := jResp.StringOf('builds[i].phases[j].phaseType');
startTime := jResp.IntOf('builds[i].phases[j].startTime');
k := 0;
count_k := jResp.SizeOfArray('builds[i].phases[j].contexts');
while k < count_k do
begin
jResp.K := k;
message := jResp.StringOf('builds[i].phases[j].contexts[k].message');
statusCode := jResp.StringOf('builds[i].phases[j].contexts[k].statusCode');
k := k + 1;
end;
j := j + 1;
end;
j := 0;
count_j := jResp.SizeOfArray('builds[i].reportArns');
while j < count_j do
begin
jResp.J := j;
strVal := jResp.StringOf('builds[i].reportArns[j]');
j := j + 1;
end;
j := 0;
count_j := jResp.SizeOfArray('builds[i].secondaryArtifacts');
while j < count_j do
begin
jResp.J := j;
artifactIdentifier := jResp.StringOf('builds[i].secondaryArtifacts[j].artifactIdentifier');
bucketOwnerAccess := jResp.StringOf('builds[i].secondaryArtifacts[j].bucketOwnerAccess');
encryptionDisabled := jResp.IntOf('builds[i].secondaryArtifacts[j].encryptionDisabled');
location := jResp.StringOf('builds[i].secondaryArtifacts[j].location');
md5sum := jResp.StringOf('builds[i].secondaryArtifacts[j].md5sum');
overrideArtifactName := jResp.IntOf('builds[i].secondaryArtifacts[j].overrideArtifactName');
sha256sum := jResp.StringOf('builds[i].secondaryArtifacts[j].sha256sum');
j := j + 1;
end;
j := 0;
count_j := jResp.SizeOfArray('builds[i].secondarySources');
while j < count_j do
begin
jResp.J := j;
authResource := jResp.StringOf('builds[i].secondarySources[j].auth.resource');
authType := jResp.StringOf('builds[i].secondarySources[j].auth.type');
buildspec := jResp.StringOf('builds[i].secondarySources[j].buildspec');
buildStatusConfigContext := jResp.StringOf('builds[i].secondarySources[j].buildStatusConfig.context');
buildStatusConfigTargetUrl := jResp.StringOf('builds[i].secondarySources[j].buildStatusConfig.targetUrl');
gitCloneDepth := jResp.IntOf('builds[i].secondarySources[j].gitCloneDepth');
gitSubmodulesConfigFetchSubmodules := jResp.IntOf('builds[i].secondarySources[j].gitSubmodulesConfig.fetchSubmodules');
insecureSsl := jResp.IntOf('builds[i].secondarySources[j].insecureSsl');
location := jResp.StringOf('builds[i].secondarySources[j].location');
reportBuildStatus := jResp.IntOf('builds[i].secondarySources[j].reportBuildStatus');
sourceIdentifier := jResp.StringOf('builds[i].secondarySources[j].sourceIdentifier');
v_type := jResp.StringOf('builds[i].secondarySources[j].type');
j := j + 1;
end;
j := 0;
count_j := jResp.SizeOfArray('builds[i].secondarySourceVersions');
while j < count_j do
begin
jResp.J := j;
sourceIdentifier := jResp.StringOf('builds[i].secondarySourceVersions[j].sourceIdentifier');
sourceVersion := jResp.StringOf('builds[i].secondarySourceVersions[j].sourceVersion');
j := j + 1;
end;
j := 0;
count_j := jResp.SizeOfArray('builds[i].vpcConfig.securityGroupIds');
while j < count_j do
begin
jResp.J := j;
strVal := jResp.StringOf('builds[i].vpcConfig.securityGroupIds[j]');
j := j + 1;
end;
j := 0;
count_j := jResp.SizeOfArray('builds[i].vpcConfig.subnets');
while j < count_j do
begin
jResp.J := j;
strVal := jResp.StringOf('builds[i].vpcConfig.subnets[j]');
j := j + 1;
end;
i := i + 1;
end;
i := 0;
count_i := jResp.SizeOfArray('buildsNotFound');
while i < count_i do
begin
jResp.I := i;
strVal := jResp.StringOf('buildsNotFound[i]');
i := i + 1;
end;
// A sample JSON response body parsed by the above code:
// {
// "builds": [
// {
// "arn": "string",
// "artifacts": {
// "artifactIdentifier": "string",
// "bucketOwnerAccess": "string",
// "encryptionDisabled": boolean,
// "location": "string",
// "md5sum": "string",
// "overrideArtifactName": boolean,
// "sha256sum": "string"
// },
// "buildBatchArn": "string",
// "buildComplete": boolean,
// "buildNumber": number,
// "buildStatus": "string",
// "cache": {
// "location": "string",
// "modes": [
// "string"
// ],
// "type": "string"
// },
// "currentPhase": "string",
// "debugSession": {
// "sessionEnabled": boolean,
// "sessionTarget": "string"
// },
// "encryptionKey": "string",
// "endTime": number,
// "environment": {
// "certificate": "string",
// "computeType": "string",
// "environmentVariables": [
// {
// "name": "string",
// "type": "string",
// "value": "string"
// }
// ],
// "image": "string",
// "imagePullCredentialsType": "string",
// "privilegedMode": boolean,
// "registryCredential": {
// "credential": "string",
// "credentialProvider": "string"
// },
// "type": "string"
// },
// "exportedEnvironmentVariables": [
// {
// "name": "string",
// "value": "string"
// }
// ],
// "fileSystemLocations": [
// {
// "identifier": "string",
// "location": "string",
// "mountOptions": "string",
// "mountPoint": "string",
// "type": "string"
// }
// ],
// "id": "string",
// "initiator": "string",
// "logs": {
// "cloudWatchLogs": {
// "groupName": "string",
// "status": "string",
// "streamName": "string"
// },
// "cloudWatchLogsArn": "string",
// "deepLink": "string",
// "groupName": "string",
// "s3DeepLink": "string",
// "s3Logs": {
// "bucketOwnerAccess": "string",
// "encryptionDisabled": boolean,
// "location": "string",
// "status": "string"
// },
// "s3LogsArn": "string",
// "streamName": "string"
// },
// "networkInterface": {
// "networkInterfaceId": "string",
// "subnetId": "string"
// },
// "phases": [
// {
// "contexts": [
// {
// "message": "string",
// "statusCode": "string"
// }
// ],
// "durationInSeconds": number,
// "endTime": number,
// "phaseStatus": "string",
// "phaseType": "string",
// "startTime": number
// }
// ],
// "projectName": "string",
// "queuedTimeoutInMinutes": number,
// "reportArns": [
// "string"
// ],
// "resolvedSourceVersion": "string",
// "secondaryArtifacts": [
// {
// "artifactIdentifier": "string",
// "bucketOwnerAccess": "string",
// "encryptionDisabled": boolean,
// "location": "string",
// "md5sum": "string",
// "overrideArtifactName": boolean,
// "sha256sum": "string"
// }
// ],
// "secondarySources": [
// {
// "auth": {
// "resource": "string",
// "type": "string"
// },
// "buildspec": "string",
// "buildStatusConfig": {
// "context": "string",
// "targetUrl": "string"
// },
// "gitCloneDepth": number,
// "gitSubmodulesConfig": {
// "fetchSubmodules": boolean
// },
// "insecureSsl": boolean,
// "location": "string",
// "reportBuildStatus": boolean,
// "sourceIdentifier": "string",
// "type": "string"
// }
// ],
// "secondarySourceVersions": [
// {
// "sourceIdentifier": "string",
// "sourceVersion": "string"
// }
// ],
// "serviceRole": "string",
// "source": {
// "auth": {
// "resource": "string",
// "type": "string"
// },
// "buildspec": "string",
// "buildStatusConfig": {
// "context": "string",
// "targetUrl": "string"
// },
// "gitCloneDepth": number,
// "gitSubmodulesConfig": {
// "fetchSubmodules": boolean
// },
// "insecureSsl": boolean,
// "location": "string",
// "reportBuildStatus": boolean,
// "sourceIdentifier": "string",
// "type": "string"
// },
// "sourceVersion": "string",
// "startTime": number,
// "timeoutInMinutes": number,
// "vpcConfig": {
// "securityGroupIds": [
// "string"
// ],
// "subnets": [
// "string"
// ],
// "vpcId": "string"
// }
// }
// ],
// "buildsNotFound": [
// "string"
// ]
// }
