{-# 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 #-}

-- Derived from AWS service descriptions, licensed under Apache 2.0.

-- |
-- Module      : Amazonka.SSOAdmin.ListManagedPoliciesInPermissionSet
-- Copyright   : (c) 2013-2023 Brendan Hay
-- License     : Mozilla Public License, v. 2.0.
-- Maintainer  : Brendan Hay
-- Stability   : auto-generated
-- Portability : non-portable (GHC extensions)
--
-- Lists the AWS managed policy that is attached to a specified permission
-- set.
--
-- This operation returns paginated results.
module Amazonka.SSOAdmin.ListManagedPoliciesInPermissionSet
  ( -- * Creating a Request
    ListManagedPoliciesInPermissionSet (..),
    newListManagedPoliciesInPermissionSet,

    -- * Request Lenses
    listManagedPoliciesInPermissionSet_maxResults,
    listManagedPoliciesInPermissionSet_nextToken,
    listManagedPoliciesInPermissionSet_instanceArn,
    listManagedPoliciesInPermissionSet_permissionSetArn,

    -- * Destructuring the Response
    ListManagedPoliciesInPermissionSetResponse (..),
    newListManagedPoliciesInPermissionSetResponse,

    -- * Response Lenses
    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

-- | /See:/ 'newListManagedPoliciesInPermissionSet' smart constructor.
data ListManagedPoliciesInPermissionSet = ListManagedPoliciesInPermissionSet'
  { -- | The maximum number of results to display for the PermissionSet.
    ListManagedPoliciesInPermissionSet -> Maybe Natural
maxResults :: Prelude.Maybe Prelude.Natural,
    -- | The pagination token for the list API. Initially the value is null. Use
    -- the output of previous API calls to make subsequent calls.
    ListManagedPoliciesInPermissionSet -> Maybe Text
nextToken :: Prelude.Maybe Prelude.Text,
    -- | The ARN of the IAM Identity Center instance under which the operation
    -- will be executed. For more information about ARNs, see
    -- </general/latest/gr/aws-arns-and-namespaces.html Amazon Resource Names (ARNs) and AWS Service Namespaces>
    -- in the /AWS General Reference/.
    ListManagedPoliciesInPermissionSet -> Text
instanceArn :: Prelude.Text,
    -- | The ARN of the PermissionSet whose managed policies will be listed.
    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)

-- |
-- Create a value of 'ListManagedPoliciesInPermissionSet' with all optional fields omitted.
--
-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.
--
-- The following record fields are available, with the corresponding lenses provided
-- for backwards compatibility:
--
-- 'maxResults', 'listManagedPoliciesInPermissionSet_maxResults' - The maximum number of results to display for the PermissionSet.
--
-- 'nextToken', 'listManagedPoliciesInPermissionSet_nextToken' - The pagination token for the list API. Initially the value is null. Use
-- the output of previous API calls to make subsequent calls.
--
-- 'instanceArn', 'listManagedPoliciesInPermissionSet_instanceArn' - The ARN of the IAM Identity Center instance under which the operation
-- will be executed. For more information about ARNs, see
-- </general/latest/gr/aws-arns-and-namespaces.html Amazon Resource Names (ARNs) and AWS Service Namespaces>
-- in the /AWS General Reference/.
--
-- 'permissionSetArn', 'listManagedPoliciesInPermissionSet_permissionSetArn' - The ARN of the PermissionSet whose managed policies will be listed.
newListManagedPoliciesInPermissionSet ::
  -- | 'instanceArn'
  Prelude.Text ->
  -- | 'permissionSetArn'
  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_
      }

-- | The maximum number of results to display for the PermissionSet.
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)

-- | The pagination token for the list API. Initially the value is null. Use
-- the output of previous API calls to make subsequent calls.
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)

-- | The ARN of the IAM Identity Center instance under which the operation
-- will be executed. For more information about ARNs, see
-- </general/latest/gr/aws-arns-and-namespaces.html Amazon Resource Names (ARNs) and AWS Service Namespaces>
-- in the /AWS General Reference/.
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)

-- | The ARN of the PermissionSet whose managed policies will be listed.
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

-- | /See:/ 'newListManagedPoliciesInPermissionSetResponse' smart constructor.
data ListManagedPoliciesInPermissionSetResponse = ListManagedPoliciesInPermissionSetResponse'
  { -- | An array of the AttachedManagedPolicy data type object.
    ListManagedPoliciesInPermissionSetResponse
-> Maybe [AttachedManagedPolicy]
attachedManagedPolicies :: Prelude.Maybe [AttachedManagedPolicy],
    -- | The pagination token for the list API. Initially the value is null. Use
    -- the output of previous API calls to make subsequent calls.
    ListManagedPoliciesInPermissionSetResponse -> Maybe Text
nextToken :: Prelude.Maybe Prelude.Text,
    -- | The response's http status code.
    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)

-- |
-- Create a value of 'ListManagedPoliciesInPermissionSetResponse' with all optional fields omitted.
--
-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.
--
-- The following record fields are available, with the corresponding lenses provided
-- for backwards compatibility:
--
-- 'attachedManagedPolicies', 'listManagedPoliciesInPermissionSetResponse_attachedManagedPolicies' - An array of the AttachedManagedPolicy data type object.
--
-- 'nextToken', 'listManagedPoliciesInPermissionSetResponse_nextToken' - The pagination token for the list API. Initially the value is null. Use
-- the output of previous API calls to make subsequent calls.
--
-- 'httpStatus', 'listManagedPoliciesInPermissionSetResponse_httpStatus' - The response's http status code.
newListManagedPoliciesInPermissionSetResponse ::
  -- | 'httpStatus'
  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_
      }

-- | An array of the AttachedManagedPolicy data type object.
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

-- | The pagination token for the list API. Initially the value is null. Use
-- the output of previous API calls to make subsequent calls.
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)

-- | The response's http status code.
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