{-# 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.SSOAdmin.ListManagedPoliciesInPermissionSet
(
ListManagedPoliciesInPermissionSet (..),
newListManagedPoliciesInPermissionSet,
listManagedPoliciesInPermissionSet_maxResults,
listManagedPoliciesInPermissionSet_nextToken,
listManagedPoliciesInPermissionSet_instanceArn,
listManagedPoliciesInPermissionSet_permissionSetArn,
ListManagedPoliciesInPermissionSetResponse (..),
newListManagedPoliciesInPermissionSetResponse,
listManagedPoliciesInPermissionSetResponse_attachedManagedPolicies,
listManagedPoliciesInPermissionSetResponse_nextToken,
listManagedPoliciesInPermissionSetResponse_httpStatus,
)
where
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
import Amazonka.SSOAdmin.Types
data ListManagedPoliciesInPermissionSet = ListManagedPoliciesInPermissionSet'
{
ListManagedPoliciesInPermissionSet -> Maybe Natural
maxResults :: Prelude.Maybe Prelude.Natural,
ListManagedPoliciesInPermissionSet -> Maybe Text
nextToken :: Prelude.Maybe Prelude.Text,
ListManagedPoliciesInPermissionSet -> Text
instanceArn :: Prelude.Text,
ListManagedPoliciesInPermissionSet -> Text
permissionSetArn :: Prelude.Text
}
deriving (ListManagedPoliciesInPermissionSet
-> ListManagedPoliciesInPermissionSet -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ListManagedPoliciesInPermissionSet
-> ListManagedPoliciesInPermissionSet -> Bool
$c/= :: ListManagedPoliciesInPermissionSet
-> ListManagedPoliciesInPermissionSet -> Bool
== :: ListManagedPoliciesInPermissionSet
-> ListManagedPoliciesInPermissionSet -> Bool
$c== :: ListManagedPoliciesInPermissionSet
-> ListManagedPoliciesInPermissionSet -> Bool
Prelude.Eq, ReadPrec [ListManagedPoliciesInPermissionSet]
ReadPrec ListManagedPoliciesInPermissionSet
Int -> ReadS ListManagedPoliciesInPermissionSet
ReadS [ListManagedPoliciesInPermissionSet]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [ListManagedPoliciesInPermissionSet]
$creadListPrec :: ReadPrec [ListManagedPoliciesInPermissionSet]
readPrec :: ReadPrec ListManagedPoliciesInPermissionSet
$creadPrec :: ReadPrec ListManagedPoliciesInPermissionSet
readList :: ReadS [ListManagedPoliciesInPermissionSet]
$creadList :: ReadS [ListManagedPoliciesInPermissionSet]
readsPrec :: Int -> ReadS ListManagedPoliciesInPermissionSet
$creadsPrec :: Int -> ReadS ListManagedPoliciesInPermissionSet
Prelude.Read, Int -> ListManagedPoliciesInPermissionSet -> ShowS
[ListManagedPoliciesInPermissionSet] -> ShowS
ListManagedPoliciesInPermissionSet -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ListManagedPoliciesInPermissionSet] -> ShowS
$cshowList :: [ListManagedPoliciesInPermissionSet] -> ShowS
show :: ListManagedPoliciesInPermissionSet -> String
$cshow :: ListManagedPoliciesInPermissionSet -> String
showsPrec :: Int -> ListManagedPoliciesInPermissionSet -> ShowS
$cshowsPrec :: Int -> ListManagedPoliciesInPermissionSet -> ShowS
Prelude.Show, forall x.
Rep ListManagedPoliciesInPermissionSet x
-> ListManagedPoliciesInPermissionSet
forall x.
ListManagedPoliciesInPermissionSet
-> Rep ListManagedPoliciesInPermissionSet x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep ListManagedPoliciesInPermissionSet x
-> ListManagedPoliciesInPermissionSet
$cfrom :: forall x.
ListManagedPoliciesInPermissionSet
-> Rep ListManagedPoliciesInPermissionSet x
Prelude.Generic)
newListManagedPoliciesInPermissionSet ::
Prelude.Text ->
Prelude.Text ->
ListManagedPoliciesInPermissionSet
newListManagedPoliciesInPermissionSet :: Text -> Text -> ListManagedPoliciesInPermissionSet
newListManagedPoliciesInPermissionSet
Text
pInstanceArn_
Text
pPermissionSetArn_ =
ListManagedPoliciesInPermissionSet'
{ $sel:maxResults:ListManagedPoliciesInPermissionSet' :: Maybe Natural
maxResults =
forall a. Maybe a
Prelude.Nothing,
$sel:nextToken:ListManagedPoliciesInPermissionSet' :: Maybe Text
nextToken = forall a. Maybe a
Prelude.Nothing,
$sel:instanceArn:ListManagedPoliciesInPermissionSet' :: Text
instanceArn = Text
pInstanceArn_,
$sel:permissionSetArn:ListManagedPoliciesInPermissionSet' :: Text
permissionSetArn = Text
pPermissionSetArn_
}
listManagedPoliciesInPermissionSet_maxResults :: Lens.Lens' ListManagedPoliciesInPermissionSet (Prelude.Maybe Prelude.Natural)
listManagedPoliciesInPermissionSet_maxResults :: Lens' ListManagedPoliciesInPermissionSet (Maybe Natural)
listManagedPoliciesInPermissionSet_maxResults = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListManagedPoliciesInPermissionSet' {Maybe Natural
maxResults :: Maybe Natural
$sel:maxResults:ListManagedPoliciesInPermissionSet' :: ListManagedPoliciesInPermissionSet -> Maybe Natural
maxResults} -> Maybe Natural
maxResults) (\s :: ListManagedPoliciesInPermissionSet
s@ListManagedPoliciesInPermissionSet' {} Maybe Natural
a -> ListManagedPoliciesInPermissionSet
s {$sel:maxResults:ListManagedPoliciesInPermissionSet' :: Maybe Natural
maxResults = Maybe Natural
a} :: ListManagedPoliciesInPermissionSet)
listManagedPoliciesInPermissionSet_nextToken :: Lens.Lens' ListManagedPoliciesInPermissionSet (Prelude.Maybe Prelude.Text)
listManagedPoliciesInPermissionSet_nextToken :: Lens' ListManagedPoliciesInPermissionSet (Maybe Text)
listManagedPoliciesInPermissionSet_nextToken = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListManagedPoliciesInPermissionSet' {Maybe Text
nextToken :: Maybe Text
$sel:nextToken:ListManagedPoliciesInPermissionSet' :: ListManagedPoliciesInPermissionSet -> Maybe Text
nextToken} -> Maybe Text
nextToken) (\s :: ListManagedPoliciesInPermissionSet
s@ListManagedPoliciesInPermissionSet' {} Maybe Text
a -> ListManagedPoliciesInPermissionSet
s {$sel:nextToken:ListManagedPoliciesInPermissionSet' :: Maybe Text
nextToken = Maybe Text
a} :: ListManagedPoliciesInPermissionSet)
listManagedPoliciesInPermissionSet_instanceArn :: Lens.Lens' ListManagedPoliciesInPermissionSet Prelude.Text
listManagedPoliciesInPermissionSet_instanceArn :: Lens' ListManagedPoliciesInPermissionSet Text
listManagedPoliciesInPermissionSet_instanceArn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListManagedPoliciesInPermissionSet' {Text
instanceArn :: Text
$sel:instanceArn:ListManagedPoliciesInPermissionSet' :: ListManagedPoliciesInPermissionSet -> Text
instanceArn} -> Text
instanceArn) (\s :: ListManagedPoliciesInPermissionSet
s@ListManagedPoliciesInPermissionSet' {} Text
a -> ListManagedPoliciesInPermissionSet
s {$sel:instanceArn:ListManagedPoliciesInPermissionSet' :: Text
instanceArn = Text
a} :: ListManagedPoliciesInPermissionSet)
listManagedPoliciesInPermissionSet_permissionSetArn :: Lens.Lens' ListManagedPoliciesInPermissionSet Prelude.Text
listManagedPoliciesInPermissionSet_permissionSetArn :: Lens' ListManagedPoliciesInPermissionSet Text
listManagedPoliciesInPermissionSet_permissionSetArn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListManagedPoliciesInPermissionSet' {Text
permissionSetArn :: Text
$sel:permissionSetArn:ListManagedPoliciesInPermissionSet' :: ListManagedPoliciesInPermissionSet -> Text
permissionSetArn} -> Text
permissionSetArn) (\s :: ListManagedPoliciesInPermissionSet
s@ListManagedPoliciesInPermissionSet' {} Text
a -> ListManagedPoliciesInPermissionSet
s {$sel:permissionSetArn:ListManagedPoliciesInPermissionSet' :: Text
permissionSetArn = Text
a} :: ListManagedPoliciesInPermissionSet)
instance
Core.AWSPager
ListManagedPoliciesInPermissionSet
where
page :: ListManagedPoliciesInPermissionSet
-> AWSResponse ListManagedPoliciesInPermissionSet
-> Maybe ListManagedPoliciesInPermissionSet
page ListManagedPoliciesInPermissionSet
rq AWSResponse ListManagedPoliciesInPermissionSet
rs
| forall a. AWSTruncated a => a -> Bool
Core.stop
( AWSResponse ListManagedPoliciesInPermissionSet
rs
forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens' ListManagedPoliciesInPermissionSetResponse (Maybe Text)
listManagedPoliciesInPermissionSetResponse_nextToken
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall a b. Prism (Maybe a) (Maybe b) a b
Lens._Just
) =
forall a. Maybe a
Prelude.Nothing
| forall a. AWSTruncated a => a -> Bool
Core.stop
( AWSResponse ListManagedPoliciesInPermissionSet
rs
forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens'
ListManagedPoliciesInPermissionSetResponse
(Maybe [AttachedManagedPolicy])
listManagedPoliciesInPermissionSetResponse_attachedManagedPolicies
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall a b. Prism (Maybe a) (Maybe b) a b
Lens._Just
) =
forall a. Maybe a
Prelude.Nothing
| Bool
Prelude.otherwise =
forall a. a -> Maybe a
Prelude.Just
forall a b. (a -> b) -> a -> b
Prelude.$ ListManagedPoliciesInPermissionSet
rq
forall a b. a -> (a -> b) -> b
Prelude.& Lens' ListManagedPoliciesInPermissionSet (Maybe Text)
listManagedPoliciesInPermissionSet_nextToken
forall s t a b. ASetter s t a b -> b -> s -> t
Lens..~ AWSResponse ListManagedPoliciesInPermissionSet
rs
forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens' ListManagedPoliciesInPermissionSetResponse (Maybe Text)
listManagedPoliciesInPermissionSetResponse_nextToken
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall a b. Prism (Maybe a) (Maybe b) a b
Lens._Just
instance
Core.AWSRequest
ListManagedPoliciesInPermissionSet
where
type
AWSResponse ListManagedPoliciesInPermissionSet =
ListManagedPoliciesInPermissionSetResponse
request :: (Service -> Service)
-> ListManagedPoliciesInPermissionSet
-> Request ListManagedPoliciesInPermissionSet
request Service -> Service
overrides =
forall a. (ToRequest a, ToJSON a) => Service -> a -> Request a
Request.postJSON (Service -> Service
overrides Service
defaultService)
response :: forall (m :: * -> *).
MonadResource m =>
(ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy ListManagedPoliciesInPermissionSet
-> ClientResponse ClientBody
-> m (Either
Error
(ClientResponse (AWSResponse ListManagedPoliciesInPermissionSet)))
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 [AttachedManagedPolicy]
-> Maybe Text -> Int -> ListManagedPoliciesInPermissionSetResponse
ListManagedPoliciesInPermissionSetResponse'
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
"AttachedManagedPolicies"
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
"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
ListManagedPoliciesInPermissionSet
where
hashWithSalt :: Int -> ListManagedPoliciesInPermissionSet -> Int
hashWithSalt
Int
_salt
ListManagedPoliciesInPermissionSet' {Maybe Natural
Maybe Text
Text
permissionSetArn :: Text
instanceArn :: Text
nextToken :: Maybe Text
maxResults :: Maybe Natural
$sel:permissionSetArn:ListManagedPoliciesInPermissionSet' :: ListManagedPoliciesInPermissionSet -> Text
$sel:instanceArn:ListManagedPoliciesInPermissionSet' :: ListManagedPoliciesInPermissionSet -> Text
$sel:nextToken:ListManagedPoliciesInPermissionSet' :: ListManagedPoliciesInPermissionSet -> Maybe Text
$sel:maxResults:ListManagedPoliciesInPermissionSet' :: ListManagedPoliciesInPermissionSet -> 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 Text
nextToken
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
instanceArn
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
permissionSetArn
instance
Prelude.NFData
ListManagedPoliciesInPermissionSet
where
rnf :: ListManagedPoliciesInPermissionSet -> ()
rnf ListManagedPoliciesInPermissionSet' {Maybe Natural
Maybe Text
Text
permissionSetArn :: Text
instanceArn :: Text
nextToken :: Maybe Text
maxResults :: Maybe Natural
$sel:permissionSetArn:ListManagedPoliciesInPermissionSet' :: ListManagedPoliciesInPermissionSet -> Text
$sel:instanceArn:ListManagedPoliciesInPermissionSet' :: ListManagedPoliciesInPermissionSet -> Text
$sel:nextToken:ListManagedPoliciesInPermissionSet' :: ListManagedPoliciesInPermissionSet -> Maybe Text
$sel:maxResults:ListManagedPoliciesInPermissionSet' :: ListManagedPoliciesInPermissionSet -> 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 Text
nextToken
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
instanceArn
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
permissionSetArn
instance
Data.ToHeaders
ListManagedPoliciesInPermissionSet
where
toHeaders :: ListManagedPoliciesInPermissionSet -> ResponseHeaders
toHeaders =
forall a b. a -> b -> a
Prelude.const
( forall a. Monoid a => [a] -> a
Prelude.mconcat
[ HeaderName
"X-Amz-Target"
forall a. ToHeader a => HeaderName -> a -> ResponseHeaders
Data.=# ( ByteString
"SWBExternalService.ListManagedPoliciesInPermissionSet" ::
Prelude.ByteString
),
HeaderName
"Content-Type"
forall a. ToHeader a => HeaderName -> a -> ResponseHeaders
Data.=# ( ByteString
"application/x-amz-json-1.1" ::
Prelude.ByteString
)
]
)
instance
Data.ToJSON
ListManagedPoliciesInPermissionSet
where
toJSON :: ListManagedPoliciesInPermissionSet -> Value
toJSON ListManagedPoliciesInPermissionSet' {Maybe Natural
Maybe Text
Text
permissionSetArn :: Text
instanceArn :: Text
nextToken :: Maybe Text
maxResults :: Maybe Natural
$sel:permissionSetArn:ListManagedPoliciesInPermissionSet' :: ListManagedPoliciesInPermissionSet -> Text
$sel:instanceArn:ListManagedPoliciesInPermissionSet' :: ListManagedPoliciesInPermissionSet -> Text
$sel:nextToken:ListManagedPoliciesInPermissionSet' :: ListManagedPoliciesInPermissionSet -> Maybe Text
$sel:maxResults:ListManagedPoliciesInPermissionSet' :: ListManagedPoliciesInPermissionSet -> Maybe Natural
..} =
[Pair] -> Value
Data.object
( forall a. [Maybe a] -> [a]
Prelude.catMaybes
[ (Key
"MaxResults" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Natural
maxResults,
(Key
"NextToken" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Text
nextToken,
forall a. a -> Maybe a
Prelude.Just (Key
"InstanceArn" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..= Text
instanceArn),
forall a. a -> Maybe a
Prelude.Just
(Key
"PermissionSetArn" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..= Text
permissionSetArn)
]
)
instance
Data.ToPath
ListManagedPoliciesInPermissionSet
where
toPath :: ListManagedPoliciesInPermissionSet -> ByteString
toPath = forall a b. a -> b -> a
Prelude.const ByteString
"/"
instance
Data.ToQuery
ListManagedPoliciesInPermissionSet
where
toQuery :: ListManagedPoliciesInPermissionSet -> QueryString
toQuery = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty
data ListManagedPoliciesInPermissionSetResponse = ListManagedPoliciesInPermissionSetResponse'
{
ListManagedPoliciesInPermissionSetResponse
-> Maybe [AttachedManagedPolicy]
attachedManagedPolicies :: Prelude.Maybe [AttachedManagedPolicy],
ListManagedPoliciesInPermissionSetResponse -> Maybe Text
nextToken :: Prelude.Maybe Prelude.Text,
ListManagedPoliciesInPermissionSetResponse -> Int
httpStatus :: Prelude.Int
}
deriving (ListManagedPoliciesInPermissionSetResponse
-> ListManagedPoliciesInPermissionSetResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ListManagedPoliciesInPermissionSetResponse
-> ListManagedPoliciesInPermissionSetResponse -> Bool
$c/= :: ListManagedPoliciesInPermissionSetResponse
-> ListManagedPoliciesInPermissionSetResponse -> Bool
== :: ListManagedPoliciesInPermissionSetResponse
-> ListManagedPoliciesInPermissionSetResponse -> Bool
$c== :: ListManagedPoliciesInPermissionSetResponse
-> ListManagedPoliciesInPermissionSetResponse -> Bool
Prelude.Eq, ReadPrec [ListManagedPoliciesInPermissionSetResponse]
ReadPrec ListManagedPoliciesInPermissionSetResponse
Int -> ReadS ListManagedPoliciesInPermissionSetResponse
ReadS [ListManagedPoliciesInPermissionSetResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [ListManagedPoliciesInPermissionSetResponse]
$creadListPrec :: ReadPrec [ListManagedPoliciesInPermissionSetResponse]
readPrec :: ReadPrec ListManagedPoliciesInPermissionSetResponse
$creadPrec :: ReadPrec ListManagedPoliciesInPermissionSetResponse
readList :: ReadS [ListManagedPoliciesInPermissionSetResponse]
$creadList :: ReadS [ListManagedPoliciesInPermissionSetResponse]
readsPrec :: Int -> ReadS ListManagedPoliciesInPermissionSetResponse
$creadsPrec :: Int -> ReadS ListManagedPoliciesInPermissionSetResponse
Prelude.Read, Int -> ListManagedPoliciesInPermissionSetResponse -> ShowS
[ListManagedPoliciesInPermissionSetResponse] -> ShowS
ListManagedPoliciesInPermissionSetResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ListManagedPoliciesInPermissionSetResponse] -> ShowS
$cshowList :: [ListManagedPoliciesInPermissionSetResponse] -> ShowS
show :: ListManagedPoliciesInPermissionSetResponse -> String
$cshow :: ListManagedPoliciesInPermissionSetResponse -> String
showsPrec :: Int -> ListManagedPoliciesInPermissionSetResponse -> ShowS
$cshowsPrec :: Int -> ListManagedPoliciesInPermissionSetResponse -> ShowS
Prelude.Show, forall x.
Rep ListManagedPoliciesInPermissionSetResponse x
-> ListManagedPoliciesInPermissionSetResponse
forall x.
ListManagedPoliciesInPermissionSetResponse
-> Rep ListManagedPoliciesInPermissionSetResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep ListManagedPoliciesInPermissionSetResponse x
-> ListManagedPoliciesInPermissionSetResponse
$cfrom :: forall x.
ListManagedPoliciesInPermissionSetResponse
-> Rep ListManagedPoliciesInPermissionSetResponse x
Prelude.Generic)
newListManagedPoliciesInPermissionSetResponse ::
Prelude.Int ->
ListManagedPoliciesInPermissionSetResponse
newListManagedPoliciesInPermissionSetResponse :: Int -> ListManagedPoliciesInPermissionSetResponse
newListManagedPoliciesInPermissionSetResponse
Int
pHttpStatus_ =
ListManagedPoliciesInPermissionSetResponse'
{ $sel:attachedManagedPolicies:ListManagedPoliciesInPermissionSetResponse' :: Maybe [AttachedManagedPolicy]
attachedManagedPolicies =
forall a. Maybe a
Prelude.Nothing,
$sel:nextToken:ListManagedPoliciesInPermissionSetResponse' :: Maybe Text
nextToken = forall a. Maybe a
Prelude.Nothing,
$sel:httpStatus:ListManagedPoliciesInPermissionSetResponse' :: Int
httpStatus = Int
pHttpStatus_
}
listManagedPoliciesInPermissionSetResponse_attachedManagedPolicies :: Lens.Lens' ListManagedPoliciesInPermissionSetResponse (Prelude.Maybe [AttachedManagedPolicy])
listManagedPoliciesInPermissionSetResponse_attachedManagedPolicies :: Lens'
ListManagedPoliciesInPermissionSetResponse
(Maybe [AttachedManagedPolicy])
listManagedPoliciesInPermissionSetResponse_attachedManagedPolicies = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListManagedPoliciesInPermissionSetResponse' {Maybe [AttachedManagedPolicy]
attachedManagedPolicies :: Maybe [AttachedManagedPolicy]
$sel:attachedManagedPolicies:ListManagedPoliciesInPermissionSetResponse' :: ListManagedPoliciesInPermissionSetResponse
-> Maybe [AttachedManagedPolicy]
attachedManagedPolicies} -> Maybe [AttachedManagedPolicy]
attachedManagedPolicies) (\s :: ListManagedPoliciesInPermissionSetResponse
s@ListManagedPoliciesInPermissionSetResponse' {} Maybe [AttachedManagedPolicy]
a -> ListManagedPoliciesInPermissionSetResponse
s {$sel:attachedManagedPolicies:ListManagedPoliciesInPermissionSetResponse' :: Maybe [AttachedManagedPolicy]
attachedManagedPolicies = Maybe [AttachedManagedPolicy]
a} :: ListManagedPoliciesInPermissionSetResponse) 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
listManagedPoliciesInPermissionSetResponse_nextToken :: Lens.Lens' ListManagedPoliciesInPermissionSetResponse (Prelude.Maybe Prelude.Text)
listManagedPoliciesInPermissionSetResponse_nextToken :: Lens' ListManagedPoliciesInPermissionSetResponse (Maybe Text)
listManagedPoliciesInPermissionSetResponse_nextToken = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListManagedPoliciesInPermissionSetResponse' {Maybe Text
nextToken :: Maybe Text
$sel:nextToken:ListManagedPoliciesInPermissionSetResponse' :: ListManagedPoliciesInPermissionSetResponse -> Maybe Text
nextToken} -> Maybe Text
nextToken) (\s :: ListManagedPoliciesInPermissionSetResponse
s@ListManagedPoliciesInPermissionSetResponse' {} Maybe Text
a -> ListManagedPoliciesInPermissionSetResponse
s {$sel:nextToken:ListManagedPoliciesInPermissionSetResponse' :: Maybe Text
nextToken = Maybe Text
a} :: ListManagedPoliciesInPermissionSetResponse)
listManagedPoliciesInPermissionSetResponse_httpStatus :: Lens.Lens' ListManagedPoliciesInPermissionSetResponse Prelude.Int
listManagedPoliciesInPermissionSetResponse_httpStatus :: Lens' ListManagedPoliciesInPermissionSetResponse Int
listManagedPoliciesInPermissionSetResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListManagedPoliciesInPermissionSetResponse' {Int
httpStatus :: Int
$sel:httpStatus:ListManagedPoliciesInPermissionSetResponse' :: ListManagedPoliciesInPermissionSetResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: ListManagedPoliciesInPermissionSetResponse
s@ListManagedPoliciesInPermissionSetResponse' {} Int
a -> ListManagedPoliciesInPermissionSetResponse
s {$sel:httpStatus:ListManagedPoliciesInPermissionSetResponse' :: Int
httpStatus = Int
a} :: ListManagedPoliciesInPermissionSetResponse)
instance
Prelude.NFData
ListManagedPoliciesInPermissionSetResponse
where
rnf :: ListManagedPoliciesInPermissionSetResponse -> ()
rnf ListManagedPoliciesInPermissionSetResponse' {Int
Maybe [AttachedManagedPolicy]
Maybe Text
httpStatus :: Int
nextToken :: Maybe Text
attachedManagedPolicies :: Maybe [AttachedManagedPolicy]
$sel:httpStatus:ListManagedPoliciesInPermissionSetResponse' :: ListManagedPoliciesInPermissionSetResponse -> Int
$sel:nextToken:ListManagedPoliciesInPermissionSetResponse' :: ListManagedPoliciesInPermissionSetResponse -> Maybe Text
$sel:attachedManagedPolicies:ListManagedPoliciesInPermissionSetResponse' :: ListManagedPoliciesInPermissionSetResponse
-> Maybe [AttachedManagedPolicy]
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe [AttachedManagedPolicy]
attachedManagedPolicies
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
nextToken
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Int
httpStatus