DescribeServers autoit Example
; This example requires the Chilkat API to have been previously unlocked.
; See Global Unlock Sample for sample code.
$oRest = ObjCreate("Chilkat_9_5_0.Rest")
Local $bSuccess
$oAuthAws = ObjCreate("Chilkat_9_5_0.AuthAws")
$oAuthAws.AccessKey = "AWS_ACCESS_KEY"
$oAuthAws.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.)
$oAuthAws.Region = "us-west-2"
$oAuthAws.ServiceName = "opsworks-cm"
; SetAuthAws causes Chilkat to automatically add the following headers: Authorization, X-Amz-Date
$oRest.SetAuthAws($oAuthAws)
; URL: https://opsworks-cm.us-west-2.amazonaws.com/
; Use the same region as specified above.
$bSuccess = $oRest.Connect("opsworks-cm.us-west-2.amazonaws.com",443,True,True)
If ($bSuccess <> True) Then
ConsoleWrite("ConnectFailReason: " & $oRest.ConnectFailReason & @CRLF)
ConsoleWrite($oRest.LastErrorText & @CRLF)
Exit
EndIf
; 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
$oJson = ObjCreate("Chilkat_9_5_0.JsonObject")
$oJson.UpdateInt("MaxResults",123)
$oJson.UpdateString("NextToken","string")
$oJson.UpdateString("ServerName","string")
; The JSON request body created by the above code:
; {
; "MaxResults": number,
; "NextToken": "string",
; "ServerName": "string"
; }
$oRest.AddHeader("Content-Type","application/x-amz-json-1.1")
$oRest.AddHeader("X-Amz-Target","OpsWorksCM_V2016_11_01.DescribeServers")
$oSbRequestBody = ObjCreate("Chilkat_9_5_0.StringBuilder")
$oJson.EmitSb($oSbRequestBody)
$oSbResponseBody = ObjCreate("Chilkat_9_5_0.StringBuilder")
$bSuccess = $oRest.FullRequestSb("POST","/",$oSbRequestBody,$oSbResponseBody)
If ($bSuccess <> True) Then
ConsoleWrite($oRest.LastErrorText & @CRLF)
Exit
EndIf
Local $iRespStatusCode = $oRest.ResponseStatusCode
ConsoleWrite("response status code = " & $iRespStatusCode & @CRLF)
If ($iRespStatusCode <> 200) Then
ConsoleWrite("Response Header:" & @CRLF)
ConsoleWrite($oRest.ResponseHeader & @CRLF)
ConsoleWrite("Response Body:" & @CRLF)
ConsoleWrite($oSbResponseBody.GetAsString() & @CRLF)
Exit
EndIf
$oJResp = ObjCreate("Chilkat_9_5_0.JsonObject")
$oJResp.LoadSb($oSbResponseBody)
; 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
Local $iAssociatePublicIpAddress
Local $iBackupRetentionCount
Local $sCloudFormationStackArn
Local $iCreatedAt
Local $sCustomDomain
Local $iDisableAutomatedBackup
Local $sEndpoint
Local $sEngine
Local $sEngineModel
Local $sEngineVersion
Local $sInstanceProfileArn
Local $sInstanceType
Local $sKeyPair
Local $sMaintenanceStatus
Local $sPreferredBackupWindow
Local $sPreferredMaintenanceWindow
Local $sServerArn
Local $sServerName
Local $sServiceRoleArn
Local $sStatus
Local $sStatusReason
Local $iJ
Local $iCount_j
Local $sName
Local $sValue
Local $strVal
Local $sNextToken = $oJResp.StringOf("NextToken")
Local $i = 0
Local $iCount_i = $oJResp.SizeOfArray("Servers")
While $i < $iCount_i
$oJResp.I = $i
$iAssociatePublicIpAddress = $oJResp.IntOf("Servers[i].AssociatePublicIpAddress")
$iBackupRetentionCount = $oJResp.IntOf("Servers[i].BackupRetentionCount")
$sCloudFormationStackArn = $oJResp.StringOf("Servers[i].CloudFormationStackArn")
$iCreatedAt = $oJResp.IntOf("Servers[i].CreatedAt")
$sCustomDomain = $oJResp.StringOf("Servers[i].CustomDomain")
$iDisableAutomatedBackup = $oJResp.IntOf("Servers[i].DisableAutomatedBackup")
$sEndpoint = $oJResp.StringOf("Servers[i].Endpoint")
$sEngine = $oJResp.StringOf("Servers[i].Engine")
$sEngineModel = $oJResp.StringOf("Servers[i].EngineModel")
$sEngineVersion = $oJResp.StringOf("Servers[i].EngineVersion")
$sInstanceProfileArn = $oJResp.StringOf("Servers[i].InstanceProfileArn")
$sInstanceType = $oJResp.StringOf("Servers[i].InstanceType")
$sKeyPair = $oJResp.StringOf("Servers[i].KeyPair")
$sMaintenanceStatus = $oJResp.StringOf("Servers[i].MaintenanceStatus")
$sPreferredBackupWindow = $oJResp.StringOf("Servers[i].PreferredBackupWindow")
$sPreferredMaintenanceWindow = $oJResp.StringOf("Servers[i].PreferredMaintenanceWindow")
$sServerArn = $oJResp.StringOf("Servers[i].ServerArn")
$sServerName = $oJResp.StringOf("Servers[i].ServerName")
$sServiceRoleArn = $oJResp.StringOf("Servers[i].ServiceRoleArn")
$sStatus = $oJResp.StringOf("Servers[i].Status")
$sStatusReason = $oJResp.StringOf("Servers[i].StatusReason")
$iJ = 0
$iCount_j = $oJResp.SizeOfArray("Servers[i].EngineAttributes")
While $iJ < $iCount_j
$oJResp.J = $iJ
$sName = $oJResp.StringOf("Servers[i].EngineAttributes[j].Name")
$sValue = $oJResp.StringOf("Servers[i].EngineAttributes[j].Value")
$iJ = $iJ + 1
Wend
$iJ = 0
$iCount_j = $oJResp.SizeOfArray("Servers[i].SecurityGroupIds")
While $iJ < $iCount_j
$oJResp.J = $iJ
$strVal = $oJResp.StringOf("Servers[i].SecurityGroupIds[j]")
$iJ = $iJ + 1
Wend
$iJ = 0
$iCount_j = $oJResp.SizeOfArray("Servers[i].SubnetIds")
While $iJ < $iCount_j
$oJResp.J = $iJ
$strVal = $oJResp.StringOf("Servers[i].SubnetIds[j]")
$iJ = $iJ + 1
Wend
$i = $i + 1
Wend
; A sample JSON response body parsed by the above code:
; {
; "NextToken": "string",
; "Servers": [
; {
; "AssociatePublicIpAddress": boolean,
; "BackupRetentionCount": number,
; "CloudFormationStackArn": "string",
; "CreatedAt": number,
; "CustomDomain": "string",
; "DisableAutomatedBackup": boolean,
; "Endpoint": "string",
; "Engine": "string",
; "EngineAttributes": [
; {
; "Name": "string",
; "Value": "string"
; }
; ],
; "EngineModel": "string",
; "EngineVersion": "string",
; "InstanceProfileArn": "string",
; "InstanceType": "string",
; "KeyPair": "string",
; "MaintenanceStatus": "string",
; "PreferredBackupWindow": "string",
; "PreferredMaintenanceWindow": "string",
; "SecurityGroupIds": [
; "string"
; ],
; "ServerArn": "string",
; "ServerName": "string",
; "ServiceRoleArn": "string",
; "Status": "string",
; "StatusReason": "string",
; "SubnetIds": [
; "string"
; ]
; }
; ]
; }
