Lua

Amazon Cognito - List User Pools

See more Amazon Cognito Examples

Lists the user pools associated with an AWS account. Lua

local chilkat = require("chilkat")

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

local rest = chilkat.Rest.new()

local authAws = chilkat.AuthAws.new()
authAws.access_key = "AWS_ACCESS_KEY"
authAws.secret_key = "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.service_name = "cognito-idp"
-- SetAuthAws causes Chilkat to automatically add the following headers: Authorization, X-Amz-Date
rest:set_auth_aws(authAws)

-- URL: https://cognito-idp.us-west-2.amazonaws.com/
local bTls = true
local port = 443
local bAutoReconnect = true
-- Use the same region as specified above.
local success = rest:connect("cognito-idp.us-west-2.amazonaws.com", port, bTls, bAutoReconnect)
if not success then
    print("ConnectFailReason: " .. rest.connect_fail_reason)
    print(rest.last_error_text)
    return
end

-- Note: The above code does not need to be repeatedly called for each REST request.
-- The rest object can be setup once, and then many requests can be sent.  Chilkat will automatically
-- reconnect within a FullRequest* method as needed.  It is only the very first connection that is explicitly
-- made via the Connect method.

local json = chilkat.JsonObject.new()
json:update_int("MaxResults", 60)

rest:add_header("Content-Type", "application/x-amz-json-1.0")
rest:add_header("X-Amz-Target", "AWSCognitoIdentityProviderService.ListUserPools")
rest:add_header("Accept-Encoding", "identity")

local sbRequestBody = chilkat.StringBuilder.new()
json:emit_sb(sbRequestBody)
local sbResponseBody = chilkat.StringBuilder.new()
success = rest:full_request_sb("POST", "/", sbRequestBody, sbResponseBody)
if not success then
    print(rest.last_error_text)
    return
end

local respStatusCode = rest.response_status_code
print("response status code = " .. respStatusCode)
if respStatusCode ~= 200 then
    print("Response Status Code = " .. respStatusCode)
    print("Response Header:")
    print(rest.response_header)
    print("Response Body:")
    print(sbResponseBody:get_as_string())
    return
end

local jsonResponse = chilkat.JsonObject.new()
jsonResponse:load_sb(sbResponseBody)

jsonResponse.emit_compact = false
print(jsonResponse:emit())

-- Sample JSON response:
-- (Sample code for parsing the JSON response is shown below)

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

-- {
--   "UserPools": [
--     {
--       "CreationDate": 1.636388909817E9,
--       "Id": "us-west-2_yt6WzO3SA",
--       "LambdaConfig": {},
--       "LastModifiedDate": 1.636388910377E9,
--       "Name": "chilkat"
--     }
--   ]
-- }

local CreationDate = ""
local Id = ""
local LastModifiedDate = ""
local Name = ""

local i = 0
local count_i = jsonResponse:size_of_array("UserPools")
while i < count_i do
    jsonResponse.i = i
    CreationDate = jsonResponse:string_of("UserPools[i].CreationDate")
    Id = jsonResponse:string_of("UserPools[i].Id")
    LastModifiedDate = jsonResponse:string_of("UserPools[i].LastModifiedDate")
    Name = jsonResponse:string_of("UserPools[i].Name")
    i = i + 1
end