{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE DuplicateRecordFields #-}
{-# LANGUAGE NamedFieldPuns #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE RecordWildCards #-}
{-# LANGUAGE StrictData #-}
{-# LANGUAGE TypeFamilies #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# OPTIONS_GHC -fno-warn-unused-binds #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
{-# OPTIONS_GHC -fno-warn-unused-matches #-}
module Amazonka.Chime.ListAppInstanceAdmins
(
ListAppInstanceAdmins (..),
newListAppInstanceAdmins,
listAppInstanceAdmins_maxResults,
listAppInstanceAdmins_nextToken,
listAppInstanceAdmins_appInstanceArn,
ListAppInstanceAdminsResponse (..),
newListAppInstanceAdminsResponse,
listAppInstanceAdminsResponse_appInstanceAdmins,
listAppInstanceAdminsResponse_appInstanceArn,
listAppInstanceAdminsResponse_nextToken,
listAppInstanceAdminsResponse_httpStatus,
)
where
import Amazonka.Chime.Types
import qualified Amazonka.Core as Core
import qualified Amazonka.Core.Lens.Internal as Lens
import qualified Amazonka.Data as Data
import qualified Amazonka.Prelude as Prelude
import qualified Amazonka.Request as Request
import qualified Amazonka.Response as Response
data ListAppInstanceAdmins = ListAppInstanceAdmins'
{
ListAppInstanceAdmins -> Maybe Natural
maxResults :: Prelude.Maybe Prelude.Natural,
ListAppInstanceAdmins -> Maybe (Sensitive Text)
nextToken :: Prelude.Maybe (Data.Sensitive Prelude.Text),
ListAppInstanceAdmins -> Text
appInstanceArn :: Prelude.Text
}
deriving (ListAppInstanceAdmins -> ListAppInstanceAdmins -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ListAppInstanceAdmins -> ListAppInstanceAdmins -> Bool
$c/= :: ListAppInstanceAdmins -> ListAppInstanceAdmins -> Bool
== :: ListAppInstanceAdmins -> ListAppInstanceAdmins -> Bool
$c== :: ListAppInstanceAdmins -> ListAppInstanceAdmins -> Bool
Prelude.Eq, Int -> ListAppInstanceAdmins -> ShowS
[ListAppInstanceAdmins] -> ShowS
ListAppInstanceAdmins -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ListAppInstanceAdmins] -> ShowS
$cshowList :: [ListAppInstanceAdmins] -> ShowS
show :: ListAppInstanceAdmins -> String
$cshow :: ListAppInstanceAdmins -> String
showsPrec :: Int -> ListAppInstanceAdmins -> ShowS
$cshowsPrec :: Int -> ListAppInstanceAdmins -> ShowS
Prelude.Show, forall x. Rep ListAppInstanceAdmins x -> ListAppInstanceAdmins
forall x. ListAppInstanceAdmins -> Rep ListAppInstanceAdmins x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep ListAppInstanceAdmins x -> ListAppInstanceAdmins
$cfrom :: forall x. ListAppInstanceAdmins -> Rep ListAppInstanceAdmins x
Prelude.Generic)
newListAppInstanceAdmins ::
Prelude.Text ->
ListAppInstanceAdmins
newListAppInstanceAdmins :: Text -> ListAppInstanceAdmins
newListAppInstanceAdmins Text
pAppInstanceArn_ =
ListAppInstanceAdmins'
{ $sel:maxResults:ListAppInstanceAdmins' :: Maybe Natural
maxResults =
forall a. Maybe a
Prelude.Nothing,
$sel:nextToken:ListAppInstanceAdmins' :: Maybe (Sensitive Text)
nextToken = forall a. Maybe a
Prelude.Nothing,
$sel:appInstanceArn:ListAppInstanceAdmins' :: Text
appInstanceArn = Text
pAppInstanceArn_
}
listAppInstanceAdmins_maxResults :: Lens.Lens' ListAppInstanceAdmins (Prelude.Maybe Prelude.Natural)
listAppInstanceAdmins_maxResults :: Lens' ListAppInstanceAdmins (Maybe Natural)
listAppInstanceAdmins_maxResults = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListAppInstanceAdmins' {Maybe Natural
maxResults :: Maybe Natural
$sel:maxResults:ListAppInstanceAdmins' :: ListAppInstanceAdmins -> Maybe Natural
maxResults} -> Maybe Natural
maxResults) (\s :: ListAppInstanceAdmins
s@ListAppInstanceAdmins' {} Maybe Natural
a -> ListAppInstanceAdmins
s {$sel:maxResults:ListAppInstanceAdmins' :: Maybe Natural
maxResults = Maybe Natural
a} :: ListAppInstanceAdmins)
listAppInstanceAdmins_nextToken :: Lens.Lens' ListAppInstanceAdmins (Prelude.Maybe Prelude.Text)
listAppInstanceAdmins_nextToken :: Lens' ListAppInstanceAdmins (Maybe Text)
listAppInstanceAdmins_nextToken = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListAppInstanceAdmins' {Maybe (Sensitive Text)
nextToken :: Maybe (Sensitive Text)
$sel:nextToken:ListAppInstanceAdmins' :: ListAppInstanceAdmins -> Maybe (Sensitive Text)
nextToken} -> Maybe (Sensitive Text)
nextToken) (\s :: ListAppInstanceAdmins
s@ListAppInstanceAdmins' {} Maybe (Sensitive Text)
a -> ListAppInstanceAdmins
s {$sel:nextToken:ListAppInstanceAdmins' :: Maybe (Sensitive Text)
nextToken = Maybe (Sensitive Text)
a} :: ListAppInstanceAdmins) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (g :: * -> *) s t a b.
(Functor f, Functor g) =>
AnIso s t a b -> Iso (f s) (g t) (f a) (g b)
Lens.mapping forall a. Iso' (Sensitive a) a
Data._Sensitive
listAppInstanceAdmins_appInstanceArn :: Lens.Lens' ListAppInstanceAdmins Prelude.Text
listAppInstanceAdmins_appInstanceArn :: Lens' ListAppInstanceAdmins Text
listAppInstanceAdmins_appInstanceArn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListAppInstanceAdmins' {Text
appInstanceArn :: Text
$sel:appInstanceArn:ListAppInstanceAdmins' :: ListAppInstanceAdmins -> Text
appInstanceArn} -> Text
appInstanceArn) (\s :: ListAppInstanceAdmins
s@ListAppInstanceAdmins' {} Text
a -> ListAppInstanceAdmins
s {$sel:appInstanceArn:ListAppInstanceAdmins' :: Text
appInstanceArn = Text
a} :: ListAppInstanceAdmins)
instance Core.AWSRequest ListAppInstanceAdmins where
type
AWSResponse ListAppInstanceAdmins =
ListAppInstanceAdminsResponse
request :: (Service -> Service)
-> ListAppInstanceAdmins -> Request ListAppInstanceAdmins
request Service -> Service
overrides =
forall a. ToRequest a => Service -> a -> Request a
Request.get (Service -> Service
overrides Service
defaultService)
response :: forall (m :: * -> *).
MonadResource m =>
(ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy ListAppInstanceAdmins
-> ClientResponse ClientBody
-> m (Either
Error (ClientResponse (AWSResponse ListAppInstanceAdmins)))
response =
forall (m :: * -> *) a.
MonadResource m =>
(Int -> ResponseHeaders -> Object -> Either String (AWSResponse a))
-> (ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy a
-> ClientResponse ClientBody
-> m (Either Error (ClientResponse (AWSResponse a)))
Response.receiveJSON
( \Int
s ResponseHeaders
h Object
x ->
Maybe [AppInstanceAdminSummary]
-> Maybe Text
-> Maybe (Sensitive Text)
-> Int
-> ListAppInstanceAdminsResponse
ListAppInstanceAdminsResponse'
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> ( Object
x
forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"AppInstanceAdmins"
forall (f :: * -> *) a. Functor f => f (Maybe a) -> a -> f a
Core..!@ forall a. Monoid a => a
Prelude.mempty
)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"AppInstanceArn")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"NextToken")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure (forall a. Enum a => a -> Int
Prelude.fromEnum Int
s))
)
instance Prelude.Hashable ListAppInstanceAdmins where
hashWithSalt :: Int -> ListAppInstanceAdmins -> Int
hashWithSalt Int
_salt ListAppInstanceAdmins' {Maybe Natural
Maybe (Sensitive Text)
Text
appInstanceArn :: Text
nextToken :: Maybe (Sensitive Text)
maxResults :: Maybe Natural
$sel:appInstanceArn:ListAppInstanceAdmins' :: ListAppInstanceAdmins -> Text
$sel:nextToken:ListAppInstanceAdmins' :: ListAppInstanceAdmins -> Maybe (Sensitive Text)
$sel:maxResults:ListAppInstanceAdmins' :: ListAppInstanceAdmins -> Maybe Natural
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Natural
maxResults
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe (Sensitive Text)
nextToken
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
appInstanceArn
instance Prelude.NFData ListAppInstanceAdmins where
rnf :: ListAppInstanceAdmins -> ()
rnf ListAppInstanceAdmins' {Maybe Natural
Maybe (Sensitive Text)
Text
appInstanceArn :: Text
nextToken :: Maybe (Sensitive Text)
maxResults :: Maybe Natural
$sel:appInstanceArn:ListAppInstanceAdmins' :: ListAppInstanceAdmins -> Text
$sel:nextToken:ListAppInstanceAdmins' :: ListAppInstanceAdmins -> Maybe (Sensitive Text)
$sel:maxResults:ListAppInstanceAdmins' :: ListAppInstanceAdmins -> Maybe Natural
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe Natural
maxResults
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe (Sensitive Text)
nextToken
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
appInstanceArn
instance Data.ToHeaders ListAppInstanceAdmins where
toHeaders :: ListAppInstanceAdmins -> ResponseHeaders
toHeaders = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty
instance Data.ToPath ListAppInstanceAdmins where
toPath :: ListAppInstanceAdmins -> ByteString
toPath ListAppInstanceAdmins' {Maybe Natural
Maybe (Sensitive Text)
Text
appInstanceArn :: Text
nextToken :: Maybe (Sensitive Text)
maxResults :: Maybe Natural
$sel:appInstanceArn:ListAppInstanceAdmins' :: ListAppInstanceAdmins -> Text
$sel:nextToken:ListAppInstanceAdmins' :: ListAppInstanceAdmins -> Maybe (Sensitive Text)
$sel:maxResults:ListAppInstanceAdmins' :: ListAppInstanceAdmins -> Maybe Natural
..} =
forall a. Monoid a => [a] -> a
Prelude.mconcat
[ ByteString
"/app-instances/",
forall a. ToByteString a => a -> ByteString
Data.toBS Text
appInstanceArn,
ByteString
"/admins"
]
instance Data.ToQuery ListAppInstanceAdmins where
toQuery :: ListAppInstanceAdmins -> QueryString
toQuery ListAppInstanceAdmins' {Maybe Natural
Maybe (Sensitive Text)
Text
appInstanceArn :: Text
nextToken :: Maybe (Sensitive Text)
maxResults :: Maybe Natural
$sel:appInstanceArn:ListAppInstanceAdmins' :: ListAppInstanceAdmins -> Text
$sel:nextToken:ListAppInstanceAdmins' :: ListAppInstanceAdmins -> Maybe (Sensitive Text)
$sel:maxResults:ListAppInstanceAdmins' :: ListAppInstanceAdmins -> Maybe Natural
..} =
forall a. Monoid a => [a] -> a
Prelude.mconcat
[ ByteString
"max-results" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Natural
maxResults,
ByteString
"next-token" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe (Sensitive Text)
nextToken
]
data ListAppInstanceAdminsResponse = ListAppInstanceAdminsResponse'
{
ListAppInstanceAdminsResponse -> Maybe [AppInstanceAdminSummary]
appInstanceAdmins :: Prelude.Maybe [AppInstanceAdminSummary],
ListAppInstanceAdminsResponse -> Maybe Text
appInstanceArn :: Prelude.Maybe Prelude.Text,
ListAppInstanceAdminsResponse -> Maybe (Sensitive Text)
nextToken :: Prelude.Maybe (Data.Sensitive Prelude.Text),
ListAppInstanceAdminsResponse -> Int
httpStatus :: Prelude.Int
}
deriving (ListAppInstanceAdminsResponse
-> ListAppInstanceAdminsResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ListAppInstanceAdminsResponse
-> ListAppInstanceAdminsResponse -> Bool
$c/= :: ListAppInstanceAdminsResponse
-> ListAppInstanceAdminsResponse -> Bool
== :: ListAppInstanceAdminsResponse
-> ListAppInstanceAdminsResponse -> Bool
$c== :: ListAppInstanceAdminsResponse
-> ListAppInstanceAdminsResponse -> Bool
Prelude.Eq, Int -> ListAppInstanceAdminsResponse -> ShowS
[ListAppInstanceAdminsResponse] -> ShowS
ListAppInstanceAdminsResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ListAppInstanceAdminsResponse] -> ShowS
$cshowList :: [ListAppInstanceAdminsResponse] -> ShowS
show :: ListAppInstanceAdminsResponse -> String
$cshow :: ListAppInstanceAdminsResponse -> String
showsPrec :: Int -> ListAppInstanceAdminsResponse -> ShowS
$cshowsPrec :: Int -> ListAppInstanceAdminsResponse -> ShowS
Prelude.Show, forall x.
Rep ListAppInstanceAdminsResponse x
-> ListAppInstanceAdminsResponse
forall x.
ListAppInstanceAdminsResponse
-> Rep ListAppInstanceAdminsResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep ListAppInstanceAdminsResponse x
-> ListAppInstanceAdminsResponse
$cfrom :: forall x.
ListAppInstanceAdminsResponse
-> Rep ListAppInstanceAdminsResponse x
Prelude.Generic)
newListAppInstanceAdminsResponse ::
Prelude.Int ->
ListAppInstanceAdminsResponse
newListAppInstanceAdminsResponse :: Int -> ListAppInstanceAdminsResponse
newListAppInstanceAdminsResponse Int
pHttpStatus_ =
ListAppInstanceAdminsResponse'
{ $sel:appInstanceAdmins:ListAppInstanceAdminsResponse' :: Maybe [AppInstanceAdminSummary]
appInstanceAdmins =
forall a. Maybe a
Prelude.Nothing,
$sel:appInstanceArn:ListAppInstanceAdminsResponse' :: Maybe Text
appInstanceArn = forall a. Maybe a
Prelude.Nothing,
$sel:nextToken:ListAppInstanceAdminsResponse' :: Maybe (Sensitive Text)
nextToken = forall a. Maybe a
Prelude.Nothing,
$sel:httpStatus:ListAppInstanceAdminsResponse' :: Int
httpStatus = Int
pHttpStatus_
}
listAppInstanceAdminsResponse_appInstanceAdmins :: Lens.Lens' ListAppInstanceAdminsResponse (Prelude.Maybe [AppInstanceAdminSummary])
listAppInstanceAdminsResponse_appInstanceAdmins :: Lens'
ListAppInstanceAdminsResponse (Maybe [AppInstanceAdminSummary])
listAppInstanceAdminsResponse_appInstanceAdmins = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListAppInstanceAdminsResponse' {Maybe [AppInstanceAdminSummary]
appInstanceAdmins :: Maybe [AppInstanceAdminSummary]
$sel:appInstanceAdmins:ListAppInstanceAdminsResponse' :: ListAppInstanceAdminsResponse -> Maybe [AppInstanceAdminSummary]
appInstanceAdmins} -> Maybe [AppInstanceAdminSummary]
appInstanceAdmins) (\s :: ListAppInstanceAdminsResponse
s@ListAppInstanceAdminsResponse' {} Maybe [AppInstanceAdminSummary]
a -> ListAppInstanceAdminsResponse
s {$sel:appInstanceAdmins:ListAppInstanceAdminsResponse' :: Maybe [AppInstanceAdminSummary]
appInstanceAdmins = Maybe [AppInstanceAdminSummary]
a} :: ListAppInstanceAdminsResponse) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (g :: * -> *) s t a b.
(Functor f, Functor g) =>
AnIso s t a b -> Iso (f s) (g t) (f a) (g b)
Lens.mapping forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced
listAppInstanceAdminsResponse_appInstanceArn :: Lens.Lens' ListAppInstanceAdminsResponse (Prelude.Maybe Prelude.Text)
listAppInstanceAdminsResponse_appInstanceArn :: Lens' ListAppInstanceAdminsResponse (Maybe Text)
listAppInstanceAdminsResponse_appInstanceArn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListAppInstanceAdminsResponse' {Maybe Text
appInstanceArn :: Maybe Text
$sel:appInstanceArn:ListAppInstanceAdminsResponse' :: ListAppInstanceAdminsResponse -> Maybe Text
appInstanceArn} -> Maybe Text
appInstanceArn) (\s :: ListAppInstanceAdminsResponse
s@ListAppInstanceAdminsResponse' {} Maybe Text
a -> ListAppInstanceAdminsResponse
s {$sel:appInstanceArn:ListAppInstanceAdminsResponse' :: Maybe Text
appInstanceArn = Maybe Text
a} :: ListAppInstanceAdminsResponse)
listAppInstanceAdminsResponse_nextToken :: Lens.Lens' ListAppInstanceAdminsResponse (Prelude.Maybe Prelude.Text)
listAppInstanceAdminsResponse_nextToken :: Lens' ListAppInstanceAdminsResponse (Maybe Text)
listAppInstanceAdminsResponse_nextToken = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListAppInstanceAdminsResponse' {Maybe (Sensitive Text)
nextToken :: Maybe (Sensitive Text)
$sel:nextToken:ListAppInstanceAdminsResponse' :: ListAppInstanceAdminsResponse -> Maybe (Sensitive Text)
nextToken} -> Maybe (Sensitive Text)
nextToken) (\s :: ListAppInstanceAdminsResponse
s@ListAppInstanceAdminsResponse' {} Maybe (Sensitive Text)
a -> ListAppInstanceAdminsResponse
s {$sel:nextToken:ListAppInstanceAdminsResponse' :: Maybe (Sensitive Text)
nextToken = Maybe (Sensitive Text)
a} :: ListAppInstanceAdminsResponse) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (g :: * -> *) s t a b.
(Functor f, Functor g) =>
AnIso s t a b -> Iso (f s) (g t) (f a) (g b)
Lens.mapping forall a. Iso' (Sensitive a) a
Data._Sensitive
listAppInstanceAdminsResponse_httpStatus :: Lens.Lens' ListAppInstanceAdminsResponse Prelude.Int
listAppInstanceAdminsResponse_httpStatus :: Lens' ListAppInstanceAdminsResponse Int
listAppInstanceAdminsResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListAppInstanceAdminsResponse' {Int
httpStatus :: Int
$sel:httpStatus:ListAppInstanceAdminsResponse' :: ListAppInstanceAdminsResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: ListAppInstanceAdminsResponse
s@ListAppInstanceAdminsResponse' {} Int
a -> ListAppInstanceAdminsResponse
s {$sel:httpStatus:ListAppInstanceAdminsResponse' :: Int
httpStatus = Int
a} :: ListAppInstanceAdminsResponse)
instance Prelude.NFData ListAppInstanceAdminsResponse where
rnf :: ListAppInstanceAdminsResponse -> ()
rnf ListAppInstanceAdminsResponse' {Int
Maybe [AppInstanceAdminSummary]
Maybe Text
Maybe (Sensitive Text)
httpStatus :: Int
nextToken :: Maybe (Sensitive Text)
appInstanceArn :: Maybe Text
appInstanceAdmins :: Maybe [AppInstanceAdminSummary]
$sel:httpStatus:ListAppInstanceAdminsResponse' :: ListAppInstanceAdminsResponse -> Int
$sel:nextToken:ListAppInstanceAdminsResponse' :: ListAppInstanceAdminsResponse -> Maybe (Sensitive Text)
$sel:appInstanceArn:ListAppInstanceAdminsResponse' :: ListAppInstanceAdminsResponse -> Maybe Text
$sel:appInstanceAdmins:ListAppInstanceAdminsResponse' :: ListAppInstanceAdminsResponse -> Maybe [AppInstanceAdminSummary]
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe [AppInstanceAdminSummary]
appInstanceAdmins
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
appInstanceArn
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe (Sensitive Text)
nextToken
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Int
httpStatus