{-# 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.Config.DescribeAggregateComplianceByConfigRules
(
DescribeAggregateComplianceByConfigRules (..),
newDescribeAggregateComplianceByConfigRules,
describeAggregateComplianceByConfigRules_filters,
describeAggregateComplianceByConfigRules_limit,
describeAggregateComplianceByConfigRules_nextToken,
describeAggregateComplianceByConfigRules_configurationAggregatorName,
DescribeAggregateComplianceByConfigRulesResponse (..),
newDescribeAggregateComplianceByConfigRulesResponse,
describeAggregateComplianceByConfigRulesResponse_aggregateComplianceByConfigRules,
describeAggregateComplianceByConfigRulesResponse_nextToken,
describeAggregateComplianceByConfigRulesResponse_httpStatus,
)
where
import Amazonka.Config.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 DescribeAggregateComplianceByConfigRules = DescribeAggregateComplianceByConfigRules'
{
DescribeAggregateComplianceByConfigRules
-> Maybe ConfigRuleComplianceFilters
filters :: Prelude.Maybe ConfigRuleComplianceFilters,
DescribeAggregateComplianceByConfigRules -> Maybe Natural
limit :: Prelude.Maybe Prelude.Natural,
DescribeAggregateComplianceByConfigRules -> Maybe Text
nextToken :: Prelude.Maybe Prelude.Text,
DescribeAggregateComplianceByConfigRules -> Text
configurationAggregatorName :: Prelude.Text
}
deriving (DescribeAggregateComplianceByConfigRules
-> DescribeAggregateComplianceByConfigRules -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DescribeAggregateComplianceByConfigRules
-> DescribeAggregateComplianceByConfigRules -> Bool
$c/= :: DescribeAggregateComplianceByConfigRules
-> DescribeAggregateComplianceByConfigRules -> Bool
== :: DescribeAggregateComplianceByConfigRules
-> DescribeAggregateComplianceByConfigRules -> Bool
$c== :: DescribeAggregateComplianceByConfigRules
-> DescribeAggregateComplianceByConfigRules -> Bool
Prelude.Eq, ReadPrec [DescribeAggregateComplianceByConfigRules]
ReadPrec DescribeAggregateComplianceByConfigRules
Int -> ReadS DescribeAggregateComplianceByConfigRules
ReadS [DescribeAggregateComplianceByConfigRules]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [DescribeAggregateComplianceByConfigRules]
$creadListPrec :: ReadPrec [DescribeAggregateComplianceByConfigRules]
readPrec :: ReadPrec DescribeAggregateComplianceByConfigRules
$creadPrec :: ReadPrec DescribeAggregateComplianceByConfigRules
readList :: ReadS [DescribeAggregateComplianceByConfigRules]
$creadList :: ReadS [DescribeAggregateComplianceByConfigRules]
readsPrec :: Int -> ReadS DescribeAggregateComplianceByConfigRules
$creadsPrec :: Int -> ReadS DescribeAggregateComplianceByConfigRules
Prelude.Read, Int -> DescribeAggregateComplianceByConfigRules -> ShowS
[DescribeAggregateComplianceByConfigRules] -> ShowS
DescribeAggregateComplianceByConfigRules -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [DescribeAggregateComplianceByConfigRules] -> ShowS
$cshowList :: [DescribeAggregateComplianceByConfigRules] -> ShowS
show :: DescribeAggregateComplianceByConfigRules -> String
$cshow :: DescribeAggregateComplianceByConfigRules -> String
showsPrec :: Int -> DescribeAggregateComplianceByConfigRules -> ShowS
$cshowsPrec :: Int -> DescribeAggregateComplianceByConfigRules -> ShowS
Prelude.Show, forall x.
Rep DescribeAggregateComplianceByConfigRules x
-> DescribeAggregateComplianceByConfigRules
forall x.
DescribeAggregateComplianceByConfigRules
-> Rep DescribeAggregateComplianceByConfigRules x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep DescribeAggregateComplianceByConfigRules x
-> DescribeAggregateComplianceByConfigRules
$cfrom :: forall x.
DescribeAggregateComplianceByConfigRules
-> Rep DescribeAggregateComplianceByConfigRules x
Prelude.Generic)
newDescribeAggregateComplianceByConfigRules ::
Prelude.Text ->
DescribeAggregateComplianceByConfigRules
newDescribeAggregateComplianceByConfigRules :: Text -> DescribeAggregateComplianceByConfigRules
newDescribeAggregateComplianceByConfigRules
Text
pConfigurationAggregatorName_ =
DescribeAggregateComplianceByConfigRules'
{ $sel:filters:DescribeAggregateComplianceByConfigRules' :: Maybe ConfigRuleComplianceFilters
filters =
forall a. Maybe a
Prelude.Nothing,
$sel:limit:DescribeAggregateComplianceByConfigRules' :: Maybe Natural
limit = forall a. Maybe a
Prelude.Nothing,
$sel:nextToken:DescribeAggregateComplianceByConfigRules' :: Maybe Text
nextToken = forall a. Maybe a
Prelude.Nothing,
$sel:configurationAggregatorName:DescribeAggregateComplianceByConfigRules' :: Text
configurationAggregatorName =
Text
pConfigurationAggregatorName_
}
describeAggregateComplianceByConfigRules_filters :: Lens.Lens' DescribeAggregateComplianceByConfigRules (Prelude.Maybe ConfigRuleComplianceFilters)
describeAggregateComplianceByConfigRules_filters :: Lens'
DescribeAggregateComplianceByConfigRules
(Maybe ConfigRuleComplianceFilters)
describeAggregateComplianceByConfigRules_filters = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeAggregateComplianceByConfigRules' {Maybe ConfigRuleComplianceFilters
filters :: Maybe ConfigRuleComplianceFilters
$sel:filters:DescribeAggregateComplianceByConfigRules' :: DescribeAggregateComplianceByConfigRules
-> Maybe ConfigRuleComplianceFilters
filters} -> Maybe ConfigRuleComplianceFilters
filters) (\s :: DescribeAggregateComplianceByConfigRules
s@DescribeAggregateComplianceByConfigRules' {} Maybe ConfigRuleComplianceFilters
a -> DescribeAggregateComplianceByConfigRules
s {$sel:filters:DescribeAggregateComplianceByConfigRules' :: Maybe ConfigRuleComplianceFilters
filters = Maybe ConfigRuleComplianceFilters
a} :: DescribeAggregateComplianceByConfigRules)
describeAggregateComplianceByConfigRules_limit :: Lens.Lens' DescribeAggregateComplianceByConfigRules (Prelude.Maybe Prelude.Natural)
describeAggregateComplianceByConfigRules_limit :: Lens' DescribeAggregateComplianceByConfigRules (Maybe Natural)
describeAggregateComplianceByConfigRules_limit = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeAggregateComplianceByConfigRules' {Maybe Natural
limit :: Maybe Natural
$sel:limit:DescribeAggregateComplianceByConfigRules' :: DescribeAggregateComplianceByConfigRules -> Maybe Natural
limit} -> Maybe Natural
limit) (\s :: DescribeAggregateComplianceByConfigRules
s@DescribeAggregateComplianceByConfigRules' {} Maybe Natural
a -> DescribeAggregateComplianceByConfigRules
s {$sel:limit:DescribeAggregateComplianceByConfigRules' :: Maybe Natural
limit = Maybe Natural
a} :: DescribeAggregateComplianceByConfigRules)
describeAggregateComplianceByConfigRules_nextToken :: Lens.Lens' DescribeAggregateComplianceByConfigRules (Prelude.Maybe Prelude.Text)
describeAggregateComplianceByConfigRules_nextToken :: Lens' DescribeAggregateComplianceByConfigRules (Maybe Text)
describeAggregateComplianceByConfigRules_nextToken = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeAggregateComplianceByConfigRules' {Maybe Text
nextToken :: Maybe Text
$sel:nextToken:DescribeAggregateComplianceByConfigRules' :: DescribeAggregateComplianceByConfigRules -> Maybe Text
nextToken} -> Maybe Text
nextToken) (\s :: DescribeAggregateComplianceByConfigRules
s@DescribeAggregateComplianceByConfigRules' {} Maybe Text
a -> DescribeAggregateComplianceByConfigRules
s {$sel:nextToken:DescribeAggregateComplianceByConfigRules' :: Maybe Text
nextToken = Maybe Text
a} :: DescribeAggregateComplianceByConfigRules)
describeAggregateComplianceByConfigRules_configurationAggregatorName :: Lens.Lens' DescribeAggregateComplianceByConfigRules Prelude.Text
describeAggregateComplianceByConfigRules_configurationAggregatorName :: Lens' DescribeAggregateComplianceByConfigRules Text
describeAggregateComplianceByConfigRules_configurationAggregatorName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeAggregateComplianceByConfigRules' {Text
configurationAggregatorName :: Text
$sel:configurationAggregatorName:DescribeAggregateComplianceByConfigRules' :: DescribeAggregateComplianceByConfigRules -> Text
configurationAggregatorName} -> Text
configurationAggregatorName) (\s :: DescribeAggregateComplianceByConfigRules
s@DescribeAggregateComplianceByConfigRules' {} Text
a -> DescribeAggregateComplianceByConfigRules
s {$sel:configurationAggregatorName:DescribeAggregateComplianceByConfigRules' :: Text
configurationAggregatorName = Text
a} :: DescribeAggregateComplianceByConfigRules)
instance
Core.AWSPager
DescribeAggregateComplianceByConfigRules
where
page :: DescribeAggregateComplianceByConfigRules
-> AWSResponse DescribeAggregateComplianceByConfigRules
-> Maybe DescribeAggregateComplianceByConfigRules
page DescribeAggregateComplianceByConfigRules
rq AWSResponse DescribeAggregateComplianceByConfigRules
rs
| forall a. AWSTruncated a => a -> Bool
Core.stop
( AWSResponse DescribeAggregateComplianceByConfigRules
rs
forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens' DescribeAggregateComplianceByConfigRulesResponse (Maybe Text)
describeAggregateComplianceByConfigRulesResponse_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 DescribeAggregateComplianceByConfigRules
rs
forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens'
DescribeAggregateComplianceByConfigRulesResponse
(Maybe [AggregateComplianceByConfigRule])
describeAggregateComplianceByConfigRulesResponse_aggregateComplianceByConfigRules
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.$ DescribeAggregateComplianceByConfigRules
rq
forall a b. a -> (a -> b) -> b
Prelude.& Lens' DescribeAggregateComplianceByConfigRules (Maybe Text)
describeAggregateComplianceByConfigRules_nextToken
forall s t a b. ASetter s t a b -> b -> s -> t
Lens..~ AWSResponse DescribeAggregateComplianceByConfigRules
rs
forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens' DescribeAggregateComplianceByConfigRulesResponse (Maybe Text)
describeAggregateComplianceByConfigRulesResponse_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
DescribeAggregateComplianceByConfigRules
where
type
AWSResponse
DescribeAggregateComplianceByConfigRules =
DescribeAggregateComplianceByConfigRulesResponse
request :: (Service -> Service)
-> DescribeAggregateComplianceByConfigRules
-> Request DescribeAggregateComplianceByConfigRules
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 DescribeAggregateComplianceByConfigRules
-> ClientResponse ClientBody
-> m (Either
Error
(ClientResponse
(AWSResponse DescribeAggregateComplianceByConfigRules)))
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 [AggregateComplianceByConfigRule]
-> Maybe Text
-> Int
-> DescribeAggregateComplianceByConfigRulesResponse
DescribeAggregateComplianceByConfigRulesResponse'
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
"AggregateComplianceByConfigRules"
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
DescribeAggregateComplianceByConfigRules
where
hashWithSalt :: Int -> DescribeAggregateComplianceByConfigRules -> Int
hashWithSalt
Int
_salt
DescribeAggregateComplianceByConfigRules' {Maybe Natural
Maybe Text
Maybe ConfigRuleComplianceFilters
Text
configurationAggregatorName :: Text
nextToken :: Maybe Text
limit :: Maybe Natural
filters :: Maybe ConfigRuleComplianceFilters
$sel:configurationAggregatorName:DescribeAggregateComplianceByConfigRules' :: DescribeAggregateComplianceByConfigRules -> Text
$sel:nextToken:DescribeAggregateComplianceByConfigRules' :: DescribeAggregateComplianceByConfigRules -> Maybe Text
$sel:limit:DescribeAggregateComplianceByConfigRules' :: DescribeAggregateComplianceByConfigRules -> Maybe Natural
$sel:filters:DescribeAggregateComplianceByConfigRules' :: DescribeAggregateComplianceByConfigRules
-> Maybe ConfigRuleComplianceFilters
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe ConfigRuleComplianceFilters
filters
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Natural
limit
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
nextToken
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
configurationAggregatorName
instance
Prelude.NFData
DescribeAggregateComplianceByConfigRules
where
rnf :: DescribeAggregateComplianceByConfigRules -> ()
rnf DescribeAggregateComplianceByConfigRules' {Maybe Natural
Maybe Text
Maybe ConfigRuleComplianceFilters
Text
configurationAggregatorName :: Text
nextToken :: Maybe Text
limit :: Maybe Natural
filters :: Maybe ConfigRuleComplianceFilters
$sel:configurationAggregatorName:DescribeAggregateComplianceByConfigRules' :: DescribeAggregateComplianceByConfigRules -> Text
$sel:nextToken:DescribeAggregateComplianceByConfigRules' :: DescribeAggregateComplianceByConfigRules -> Maybe Text
$sel:limit:DescribeAggregateComplianceByConfigRules' :: DescribeAggregateComplianceByConfigRules -> Maybe Natural
$sel:filters:DescribeAggregateComplianceByConfigRules' :: DescribeAggregateComplianceByConfigRules
-> Maybe ConfigRuleComplianceFilters
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe ConfigRuleComplianceFilters
filters
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Natural
limit
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
configurationAggregatorName
instance
Data.ToHeaders
DescribeAggregateComplianceByConfigRules
where
toHeaders :: DescribeAggregateComplianceByConfigRules -> 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
"StarlingDoveService.DescribeAggregateComplianceByConfigRules" ::
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
DescribeAggregateComplianceByConfigRules
where
toJSON :: DescribeAggregateComplianceByConfigRules -> Value
toJSON DescribeAggregateComplianceByConfigRules' {Maybe Natural
Maybe Text
Maybe ConfigRuleComplianceFilters
Text
configurationAggregatorName :: Text
nextToken :: Maybe Text
limit :: Maybe Natural
filters :: Maybe ConfigRuleComplianceFilters
$sel:configurationAggregatorName:DescribeAggregateComplianceByConfigRules' :: DescribeAggregateComplianceByConfigRules -> Text
$sel:nextToken:DescribeAggregateComplianceByConfigRules' :: DescribeAggregateComplianceByConfigRules -> Maybe Text
$sel:limit:DescribeAggregateComplianceByConfigRules' :: DescribeAggregateComplianceByConfigRules -> Maybe Natural
$sel:filters:DescribeAggregateComplianceByConfigRules' :: DescribeAggregateComplianceByConfigRules
-> Maybe ConfigRuleComplianceFilters
..} =
[Pair] -> Value
Data.object
( forall a. [Maybe a] -> [a]
Prelude.catMaybes
[ (Key
"Filters" 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 ConfigRuleComplianceFilters
filters,
(Key
"Limit" 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
limit,
(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
"ConfigurationAggregatorName"
forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..= Text
configurationAggregatorName
)
]
)
instance
Data.ToPath
DescribeAggregateComplianceByConfigRules
where
toPath :: DescribeAggregateComplianceByConfigRules -> ByteString
toPath = forall a b. a -> b -> a
Prelude.const ByteString
"/"
instance
Data.ToQuery
DescribeAggregateComplianceByConfigRules
where
toQuery :: DescribeAggregateComplianceByConfigRules -> QueryString
toQuery = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty
data DescribeAggregateComplianceByConfigRulesResponse = DescribeAggregateComplianceByConfigRulesResponse'
{
DescribeAggregateComplianceByConfigRulesResponse
-> Maybe [AggregateComplianceByConfigRule]
aggregateComplianceByConfigRules :: Prelude.Maybe [AggregateComplianceByConfigRule],
DescribeAggregateComplianceByConfigRulesResponse -> Maybe Text
nextToken :: Prelude.Maybe Prelude.Text,
DescribeAggregateComplianceByConfigRulesResponse -> Int
httpStatus :: Prelude.Int
}
deriving (DescribeAggregateComplianceByConfigRulesResponse
-> DescribeAggregateComplianceByConfigRulesResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DescribeAggregateComplianceByConfigRulesResponse
-> DescribeAggregateComplianceByConfigRulesResponse -> Bool
$c/= :: DescribeAggregateComplianceByConfigRulesResponse
-> DescribeAggregateComplianceByConfigRulesResponse -> Bool
== :: DescribeAggregateComplianceByConfigRulesResponse
-> DescribeAggregateComplianceByConfigRulesResponse -> Bool
$c== :: DescribeAggregateComplianceByConfigRulesResponse
-> DescribeAggregateComplianceByConfigRulesResponse -> Bool
Prelude.Eq, ReadPrec [DescribeAggregateComplianceByConfigRulesResponse]
ReadPrec DescribeAggregateComplianceByConfigRulesResponse
Int -> ReadS DescribeAggregateComplianceByConfigRulesResponse
ReadS [DescribeAggregateComplianceByConfigRulesResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [DescribeAggregateComplianceByConfigRulesResponse]
$creadListPrec :: ReadPrec [DescribeAggregateComplianceByConfigRulesResponse]
readPrec :: ReadPrec DescribeAggregateComplianceByConfigRulesResponse
$creadPrec :: ReadPrec DescribeAggregateComplianceByConfigRulesResponse
readList :: ReadS [DescribeAggregateComplianceByConfigRulesResponse]
$creadList :: ReadS [DescribeAggregateComplianceByConfigRulesResponse]
readsPrec :: Int -> ReadS DescribeAggregateComplianceByConfigRulesResponse
$creadsPrec :: Int -> ReadS DescribeAggregateComplianceByConfigRulesResponse
Prelude.Read, Int -> DescribeAggregateComplianceByConfigRulesResponse -> ShowS
[DescribeAggregateComplianceByConfigRulesResponse] -> ShowS
DescribeAggregateComplianceByConfigRulesResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [DescribeAggregateComplianceByConfigRulesResponse] -> ShowS
$cshowList :: [DescribeAggregateComplianceByConfigRulesResponse] -> ShowS
show :: DescribeAggregateComplianceByConfigRulesResponse -> String
$cshow :: DescribeAggregateComplianceByConfigRulesResponse -> String
showsPrec :: Int -> DescribeAggregateComplianceByConfigRulesResponse -> ShowS
$cshowsPrec :: Int -> DescribeAggregateComplianceByConfigRulesResponse -> ShowS
Prelude.Show, forall x.
Rep DescribeAggregateComplianceByConfigRulesResponse x
-> DescribeAggregateComplianceByConfigRulesResponse
forall x.
DescribeAggregateComplianceByConfigRulesResponse
-> Rep DescribeAggregateComplianceByConfigRulesResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep DescribeAggregateComplianceByConfigRulesResponse x
-> DescribeAggregateComplianceByConfigRulesResponse
$cfrom :: forall x.
DescribeAggregateComplianceByConfigRulesResponse
-> Rep DescribeAggregateComplianceByConfigRulesResponse x
Prelude.Generic)
newDescribeAggregateComplianceByConfigRulesResponse ::
Prelude.Int ->
DescribeAggregateComplianceByConfigRulesResponse
newDescribeAggregateComplianceByConfigRulesResponse :: Int -> DescribeAggregateComplianceByConfigRulesResponse
newDescribeAggregateComplianceByConfigRulesResponse
Int
pHttpStatus_ =
DescribeAggregateComplianceByConfigRulesResponse'
{ $sel:aggregateComplianceByConfigRules:DescribeAggregateComplianceByConfigRulesResponse' :: Maybe [AggregateComplianceByConfigRule]
aggregateComplianceByConfigRules =
forall a. Maybe a
Prelude.Nothing,
$sel:nextToken:DescribeAggregateComplianceByConfigRulesResponse' :: Maybe Text
nextToken =
forall a. Maybe a
Prelude.Nothing,
$sel:httpStatus:DescribeAggregateComplianceByConfigRulesResponse' :: Int
httpStatus = Int
pHttpStatus_
}
describeAggregateComplianceByConfigRulesResponse_aggregateComplianceByConfigRules :: Lens.Lens' DescribeAggregateComplianceByConfigRulesResponse (Prelude.Maybe [AggregateComplianceByConfigRule])
describeAggregateComplianceByConfigRulesResponse_aggregateComplianceByConfigRules :: Lens'
DescribeAggregateComplianceByConfigRulesResponse
(Maybe [AggregateComplianceByConfigRule])
describeAggregateComplianceByConfigRulesResponse_aggregateComplianceByConfigRules = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeAggregateComplianceByConfigRulesResponse' {Maybe [AggregateComplianceByConfigRule]
aggregateComplianceByConfigRules :: Maybe [AggregateComplianceByConfigRule]
$sel:aggregateComplianceByConfigRules:DescribeAggregateComplianceByConfigRulesResponse' :: DescribeAggregateComplianceByConfigRulesResponse
-> Maybe [AggregateComplianceByConfigRule]
aggregateComplianceByConfigRules} -> Maybe [AggregateComplianceByConfigRule]
aggregateComplianceByConfigRules) (\s :: DescribeAggregateComplianceByConfigRulesResponse
s@DescribeAggregateComplianceByConfigRulesResponse' {} Maybe [AggregateComplianceByConfigRule]
a -> DescribeAggregateComplianceByConfigRulesResponse
s {$sel:aggregateComplianceByConfigRules:DescribeAggregateComplianceByConfigRulesResponse' :: Maybe [AggregateComplianceByConfigRule]
aggregateComplianceByConfigRules = Maybe [AggregateComplianceByConfigRule]
a} :: DescribeAggregateComplianceByConfigRulesResponse) 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
describeAggregateComplianceByConfigRulesResponse_nextToken :: Lens.Lens' DescribeAggregateComplianceByConfigRulesResponse (Prelude.Maybe Prelude.Text)
describeAggregateComplianceByConfigRulesResponse_nextToken :: Lens' DescribeAggregateComplianceByConfigRulesResponse (Maybe Text)
describeAggregateComplianceByConfigRulesResponse_nextToken = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeAggregateComplianceByConfigRulesResponse' {Maybe Text
nextToken :: Maybe Text
$sel:nextToken:DescribeAggregateComplianceByConfigRulesResponse' :: DescribeAggregateComplianceByConfigRulesResponse -> Maybe Text
nextToken} -> Maybe Text
nextToken) (\s :: DescribeAggregateComplianceByConfigRulesResponse
s@DescribeAggregateComplianceByConfigRulesResponse' {} Maybe Text
a -> DescribeAggregateComplianceByConfigRulesResponse
s {$sel:nextToken:DescribeAggregateComplianceByConfigRulesResponse' :: Maybe Text
nextToken = Maybe Text
a} :: DescribeAggregateComplianceByConfigRulesResponse)
describeAggregateComplianceByConfigRulesResponse_httpStatus :: Lens.Lens' DescribeAggregateComplianceByConfigRulesResponse Prelude.Int
describeAggregateComplianceByConfigRulesResponse_httpStatus :: Lens' DescribeAggregateComplianceByConfigRulesResponse Int
describeAggregateComplianceByConfigRulesResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeAggregateComplianceByConfigRulesResponse' {Int
httpStatus :: Int
$sel:httpStatus:DescribeAggregateComplianceByConfigRulesResponse' :: DescribeAggregateComplianceByConfigRulesResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: DescribeAggregateComplianceByConfigRulesResponse
s@DescribeAggregateComplianceByConfigRulesResponse' {} Int
a -> DescribeAggregateComplianceByConfigRulesResponse
s {$sel:httpStatus:DescribeAggregateComplianceByConfigRulesResponse' :: Int
httpStatus = Int
a} :: DescribeAggregateComplianceByConfigRulesResponse)
instance
Prelude.NFData
DescribeAggregateComplianceByConfigRulesResponse
where
rnf :: DescribeAggregateComplianceByConfigRulesResponse -> ()
rnf
DescribeAggregateComplianceByConfigRulesResponse' {Int
Maybe [AggregateComplianceByConfigRule]
Maybe Text
httpStatus :: Int
nextToken :: Maybe Text
aggregateComplianceByConfigRules :: Maybe [AggregateComplianceByConfigRule]
$sel:httpStatus:DescribeAggregateComplianceByConfigRulesResponse' :: DescribeAggregateComplianceByConfigRulesResponse -> Int
$sel:nextToken:DescribeAggregateComplianceByConfigRulesResponse' :: DescribeAggregateComplianceByConfigRulesResponse -> Maybe Text
$sel:aggregateComplianceByConfigRules:DescribeAggregateComplianceByConfigRulesResponse' :: DescribeAggregateComplianceByConfigRulesResponse
-> Maybe [AggregateComplianceByConfigRule]
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe [AggregateComplianceByConfigRule]
aggregateComplianceByConfigRules
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