{-# 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.SSM.DescribeMaintenanceWindowTargets
(
DescribeMaintenanceWindowTargets (..),
newDescribeMaintenanceWindowTargets,
describeMaintenanceWindowTargets_filters,
describeMaintenanceWindowTargets_maxResults,
describeMaintenanceWindowTargets_nextToken,
describeMaintenanceWindowTargets_windowId,
DescribeMaintenanceWindowTargetsResponse (..),
newDescribeMaintenanceWindowTargetsResponse,
describeMaintenanceWindowTargetsResponse_nextToken,
describeMaintenanceWindowTargetsResponse_targets,
describeMaintenanceWindowTargetsResponse_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.SSM.Types
data DescribeMaintenanceWindowTargets = DescribeMaintenanceWindowTargets'
{
DescribeMaintenanceWindowTargets -> Maybe [MaintenanceWindowFilter]
filters :: Prelude.Maybe [MaintenanceWindowFilter],
DescribeMaintenanceWindowTargets -> Maybe Natural
maxResults :: Prelude.Maybe Prelude.Natural,
DescribeMaintenanceWindowTargets -> Maybe Text
nextToken :: Prelude.Maybe Prelude.Text,
DescribeMaintenanceWindowTargets -> Text
windowId :: Prelude.Text
}
deriving (DescribeMaintenanceWindowTargets
-> DescribeMaintenanceWindowTargets -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DescribeMaintenanceWindowTargets
-> DescribeMaintenanceWindowTargets -> Bool
$c/= :: DescribeMaintenanceWindowTargets
-> DescribeMaintenanceWindowTargets -> Bool
== :: DescribeMaintenanceWindowTargets
-> DescribeMaintenanceWindowTargets -> Bool
$c== :: DescribeMaintenanceWindowTargets
-> DescribeMaintenanceWindowTargets -> Bool
Prelude.Eq, ReadPrec [DescribeMaintenanceWindowTargets]
ReadPrec DescribeMaintenanceWindowTargets
Int -> ReadS DescribeMaintenanceWindowTargets
ReadS [DescribeMaintenanceWindowTargets]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [DescribeMaintenanceWindowTargets]
$creadListPrec :: ReadPrec [DescribeMaintenanceWindowTargets]
readPrec :: ReadPrec DescribeMaintenanceWindowTargets
$creadPrec :: ReadPrec DescribeMaintenanceWindowTargets
readList :: ReadS [DescribeMaintenanceWindowTargets]
$creadList :: ReadS [DescribeMaintenanceWindowTargets]
readsPrec :: Int -> ReadS DescribeMaintenanceWindowTargets
$creadsPrec :: Int -> ReadS DescribeMaintenanceWindowTargets
Prelude.Read, Int -> DescribeMaintenanceWindowTargets -> ShowS
[DescribeMaintenanceWindowTargets] -> ShowS
DescribeMaintenanceWindowTargets -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [DescribeMaintenanceWindowTargets] -> ShowS
$cshowList :: [DescribeMaintenanceWindowTargets] -> ShowS
show :: DescribeMaintenanceWindowTargets -> String
$cshow :: DescribeMaintenanceWindowTargets -> String
showsPrec :: Int -> DescribeMaintenanceWindowTargets -> ShowS
$cshowsPrec :: Int -> DescribeMaintenanceWindowTargets -> ShowS
Prelude.Show, forall x.
Rep DescribeMaintenanceWindowTargets x
-> DescribeMaintenanceWindowTargets
forall x.
DescribeMaintenanceWindowTargets
-> Rep DescribeMaintenanceWindowTargets x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep DescribeMaintenanceWindowTargets x
-> DescribeMaintenanceWindowTargets
$cfrom :: forall x.
DescribeMaintenanceWindowTargets
-> Rep DescribeMaintenanceWindowTargets x
Prelude.Generic)
newDescribeMaintenanceWindowTargets ::
Prelude.Text ->
DescribeMaintenanceWindowTargets
newDescribeMaintenanceWindowTargets :: Text -> DescribeMaintenanceWindowTargets
newDescribeMaintenanceWindowTargets Text
pWindowId_ =
DescribeMaintenanceWindowTargets'
{ $sel:filters:DescribeMaintenanceWindowTargets' :: Maybe [MaintenanceWindowFilter]
filters =
forall a. Maybe a
Prelude.Nothing,
$sel:maxResults:DescribeMaintenanceWindowTargets' :: Maybe Natural
maxResults = forall a. Maybe a
Prelude.Nothing,
$sel:nextToken:DescribeMaintenanceWindowTargets' :: Maybe Text
nextToken = forall a. Maybe a
Prelude.Nothing,
$sel:windowId:DescribeMaintenanceWindowTargets' :: Text
windowId = Text
pWindowId_
}
describeMaintenanceWindowTargets_filters :: Lens.Lens' DescribeMaintenanceWindowTargets (Prelude.Maybe [MaintenanceWindowFilter])
describeMaintenanceWindowTargets_filters :: Lens'
DescribeMaintenanceWindowTargets (Maybe [MaintenanceWindowFilter])
describeMaintenanceWindowTargets_filters = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeMaintenanceWindowTargets' {Maybe [MaintenanceWindowFilter]
filters :: Maybe [MaintenanceWindowFilter]
$sel:filters:DescribeMaintenanceWindowTargets' :: DescribeMaintenanceWindowTargets -> Maybe [MaintenanceWindowFilter]
filters} -> Maybe [MaintenanceWindowFilter]
filters) (\s :: DescribeMaintenanceWindowTargets
s@DescribeMaintenanceWindowTargets' {} Maybe [MaintenanceWindowFilter]
a -> DescribeMaintenanceWindowTargets
s {$sel:filters:DescribeMaintenanceWindowTargets' :: Maybe [MaintenanceWindowFilter]
filters = Maybe [MaintenanceWindowFilter]
a} :: DescribeMaintenanceWindowTargets) 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
describeMaintenanceWindowTargets_maxResults :: Lens.Lens' DescribeMaintenanceWindowTargets (Prelude.Maybe Prelude.Natural)
describeMaintenanceWindowTargets_maxResults :: Lens' DescribeMaintenanceWindowTargets (Maybe Natural)
describeMaintenanceWindowTargets_maxResults = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeMaintenanceWindowTargets' {Maybe Natural
maxResults :: Maybe Natural
$sel:maxResults:DescribeMaintenanceWindowTargets' :: DescribeMaintenanceWindowTargets -> Maybe Natural
maxResults} -> Maybe Natural
maxResults) (\s :: DescribeMaintenanceWindowTargets
s@DescribeMaintenanceWindowTargets' {} Maybe Natural
a -> DescribeMaintenanceWindowTargets
s {$sel:maxResults:DescribeMaintenanceWindowTargets' :: Maybe Natural
maxResults = Maybe Natural
a} :: DescribeMaintenanceWindowTargets)
describeMaintenanceWindowTargets_nextToken :: Lens.Lens' DescribeMaintenanceWindowTargets (Prelude.Maybe Prelude.Text)
describeMaintenanceWindowTargets_nextToken :: Lens' DescribeMaintenanceWindowTargets (Maybe Text)
describeMaintenanceWindowTargets_nextToken = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeMaintenanceWindowTargets' {Maybe Text
nextToken :: Maybe Text
$sel:nextToken:DescribeMaintenanceWindowTargets' :: DescribeMaintenanceWindowTargets -> Maybe Text
nextToken} -> Maybe Text
nextToken) (\s :: DescribeMaintenanceWindowTargets
s@DescribeMaintenanceWindowTargets' {} Maybe Text
a -> DescribeMaintenanceWindowTargets
s {$sel:nextToken:DescribeMaintenanceWindowTargets' :: Maybe Text
nextToken = Maybe Text
a} :: DescribeMaintenanceWindowTargets)
describeMaintenanceWindowTargets_windowId :: Lens.Lens' DescribeMaintenanceWindowTargets Prelude.Text
describeMaintenanceWindowTargets_windowId :: Lens' DescribeMaintenanceWindowTargets Text
describeMaintenanceWindowTargets_windowId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeMaintenanceWindowTargets' {Text
windowId :: Text
$sel:windowId:DescribeMaintenanceWindowTargets' :: DescribeMaintenanceWindowTargets -> Text
windowId} -> Text
windowId) (\s :: DescribeMaintenanceWindowTargets
s@DescribeMaintenanceWindowTargets' {} Text
a -> DescribeMaintenanceWindowTargets
s {$sel:windowId:DescribeMaintenanceWindowTargets' :: Text
windowId = Text
a} :: DescribeMaintenanceWindowTargets)
instance
Core.AWSPager
DescribeMaintenanceWindowTargets
where
page :: DescribeMaintenanceWindowTargets
-> AWSResponse DescribeMaintenanceWindowTargets
-> Maybe DescribeMaintenanceWindowTargets
page DescribeMaintenanceWindowTargets
rq AWSResponse DescribeMaintenanceWindowTargets
rs
| forall a. AWSTruncated a => a -> Bool
Core.stop
( AWSResponse DescribeMaintenanceWindowTargets
rs
forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens' DescribeMaintenanceWindowTargetsResponse (Maybe Text)
describeMaintenanceWindowTargetsResponse_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 DescribeMaintenanceWindowTargets
rs
forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens'
DescribeMaintenanceWindowTargetsResponse
(Maybe [MaintenanceWindowTarget])
describeMaintenanceWindowTargetsResponse_targets
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.$ DescribeMaintenanceWindowTargets
rq
forall a b. a -> (a -> b) -> b
Prelude.& Lens' DescribeMaintenanceWindowTargets (Maybe Text)
describeMaintenanceWindowTargets_nextToken
forall s t a b. ASetter s t a b -> b -> s -> t
Lens..~ AWSResponse DescribeMaintenanceWindowTargets
rs
forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens' DescribeMaintenanceWindowTargetsResponse (Maybe Text)
describeMaintenanceWindowTargetsResponse_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
DescribeMaintenanceWindowTargets
where
type
AWSResponse DescribeMaintenanceWindowTargets =
DescribeMaintenanceWindowTargetsResponse
request :: (Service -> Service)
-> DescribeMaintenanceWindowTargets
-> Request DescribeMaintenanceWindowTargets
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 DescribeMaintenanceWindowTargets
-> ClientResponse ClientBody
-> m (Either
Error
(ClientResponse (AWSResponse DescribeMaintenanceWindowTargets)))
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 Text
-> Maybe [MaintenanceWindowTarget]
-> Int
-> DescribeMaintenanceWindowTargetsResponse
DescribeMaintenanceWindowTargetsResponse'
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
"NextToken")
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
"Targets" 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.<*> (forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure (forall a. Enum a => a -> Int
Prelude.fromEnum Int
s))
)
instance
Prelude.Hashable
DescribeMaintenanceWindowTargets
where
hashWithSalt :: Int -> DescribeMaintenanceWindowTargets -> Int
hashWithSalt
Int
_salt
DescribeMaintenanceWindowTargets' {Maybe Natural
Maybe [MaintenanceWindowFilter]
Maybe Text
Text
windowId :: Text
nextToken :: Maybe Text
maxResults :: Maybe Natural
filters :: Maybe [MaintenanceWindowFilter]
$sel:windowId:DescribeMaintenanceWindowTargets' :: DescribeMaintenanceWindowTargets -> Text
$sel:nextToken:DescribeMaintenanceWindowTargets' :: DescribeMaintenanceWindowTargets -> Maybe Text
$sel:maxResults:DescribeMaintenanceWindowTargets' :: DescribeMaintenanceWindowTargets -> Maybe Natural
$sel:filters:DescribeMaintenanceWindowTargets' :: DescribeMaintenanceWindowTargets -> Maybe [MaintenanceWindowFilter]
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe [MaintenanceWindowFilter]
filters
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
windowId
instance
Prelude.NFData
DescribeMaintenanceWindowTargets
where
rnf :: DescribeMaintenanceWindowTargets -> ()
rnf DescribeMaintenanceWindowTargets' {Maybe Natural
Maybe [MaintenanceWindowFilter]
Maybe Text
Text
windowId :: Text
nextToken :: Maybe Text
maxResults :: Maybe Natural
filters :: Maybe [MaintenanceWindowFilter]
$sel:windowId:DescribeMaintenanceWindowTargets' :: DescribeMaintenanceWindowTargets -> Text
$sel:nextToken:DescribeMaintenanceWindowTargets' :: DescribeMaintenanceWindowTargets -> Maybe Text
$sel:maxResults:DescribeMaintenanceWindowTargets' :: DescribeMaintenanceWindowTargets -> Maybe Natural
$sel:filters:DescribeMaintenanceWindowTargets' :: DescribeMaintenanceWindowTargets -> Maybe [MaintenanceWindowFilter]
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe [MaintenanceWindowFilter]
filters
seq :: forall a b. a -> b -> b
`Prelude.seq` 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
windowId
instance
Data.ToHeaders
DescribeMaintenanceWindowTargets
where
toHeaders :: DescribeMaintenanceWindowTargets -> 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
"AmazonSSM.DescribeMaintenanceWindowTargets" ::
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 DescribeMaintenanceWindowTargets where
toJSON :: DescribeMaintenanceWindowTargets -> Value
toJSON DescribeMaintenanceWindowTargets' {Maybe Natural
Maybe [MaintenanceWindowFilter]
Maybe Text
Text
windowId :: Text
nextToken :: Maybe Text
maxResults :: Maybe Natural
filters :: Maybe [MaintenanceWindowFilter]
$sel:windowId:DescribeMaintenanceWindowTargets' :: DescribeMaintenanceWindowTargets -> Text
$sel:nextToken:DescribeMaintenanceWindowTargets' :: DescribeMaintenanceWindowTargets -> Maybe Text
$sel:maxResults:DescribeMaintenanceWindowTargets' :: DescribeMaintenanceWindowTargets -> Maybe Natural
$sel:filters:DescribeMaintenanceWindowTargets' :: DescribeMaintenanceWindowTargets -> Maybe [MaintenanceWindowFilter]
..} =
[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 [MaintenanceWindowFilter]
filters,
(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
"WindowId" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..= Text
windowId)
]
)
instance Data.ToPath DescribeMaintenanceWindowTargets where
toPath :: DescribeMaintenanceWindowTargets -> ByteString
toPath = forall a b. a -> b -> a
Prelude.const ByteString
"/"
instance
Data.ToQuery
DescribeMaintenanceWindowTargets
where
toQuery :: DescribeMaintenanceWindowTargets -> QueryString
toQuery = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty
data DescribeMaintenanceWindowTargetsResponse = DescribeMaintenanceWindowTargetsResponse'
{
DescribeMaintenanceWindowTargetsResponse -> Maybe Text
nextToken :: Prelude.Maybe Prelude.Text,
DescribeMaintenanceWindowTargetsResponse
-> Maybe [MaintenanceWindowTarget]
targets :: Prelude.Maybe [MaintenanceWindowTarget],
DescribeMaintenanceWindowTargetsResponse -> Int
httpStatus :: Prelude.Int
}
deriving (DescribeMaintenanceWindowTargetsResponse
-> DescribeMaintenanceWindowTargetsResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DescribeMaintenanceWindowTargetsResponse
-> DescribeMaintenanceWindowTargetsResponse -> Bool
$c/= :: DescribeMaintenanceWindowTargetsResponse
-> DescribeMaintenanceWindowTargetsResponse -> Bool
== :: DescribeMaintenanceWindowTargetsResponse
-> DescribeMaintenanceWindowTargetsResponse -> Bool
$c== :: DescribeMaintenanceWindowTargetsResponse
-> DescribeMaintenanceWindowTargetsResponse -> Bool
Prelude.Eq, Int -> DescribeMaintenanceWindowTargetsResponse -> ShowS
[DescribeMaintenanceWindowTargetsResponse] -> ShowS
DescribeMaintenanceWindowTargetsResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [DescribeMaintenanceWindowTargetsResponse] -> ShowS
$cshowList :: [DescribeMaintenanceWindowTargetsResponse] -> ShowS
show :: DescribeMaintenanceWindowTargetsResponse -> String
$cshow :: DescribeMaintenanceWindowTargetsResponse -> String
showsPrec :: Int -> DescribeMaintenanceWindowTargetsResponse -> ShowS
$cshowsPrec :: Int -> DescribeMaintenanceWindowTargetsResponse -> ShowS
Prelude.Show, forall x.
Rep DescribeMaintenanceWindowTargetsResponse x
-> DescribeMaintenanceWindowTargetsResponse
forall x.
DescribeMaintenanceWindowTargetsResponse
-> Rep DescribeMaintenanceWindowTargetsResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep DescribeMaintenanceWindowTargetsResponse x
-> DescribeMaintenanceWindowTargetsResponse
$cfrom :: forall x.
DescribeMaintenanceWindowTargetsResponse
-> Rep DescribeMaintenanceWindowTargetsResponse x
Prelude.Generic)
newDescribeMaintenanceWindowTargetsResponse ::
Prelude.Int ->
DescribeMaintenanceWindowTargetsResponse
newDescribeMaintenanceWindowTargetsResponse :: Int -> DescribeMaintenanceWindowTargetsResponse
newDescribeMaintenanceWindowTargetsResponse
Int
pHttpStatus_ =
DescribeMaintenanceWindowTargetsResponse'
{ $sel:nextToken:DescribeMaintenanceWindowTargetsResponse' :: Maybe Text
nextToken =
forall a. Maybe a
Prelude.Nothing,
$sel:targets:DescribeMaintenanceWindowTargetsResponse' :: Maybe [MaintenanceWindowTarget]
targets = forall a. Maybe a
Prelude.Nothing,
$sel:httpStatus:DescribeMaintenanceWindowTargetsResponse' :: Int
httpStatus = Int
pHttpStatus_
}
describeMaintenanceWindowTargetsResponse_nextToken :: Lens.Lens' DescribeMaintenanceWindowTargetsResponse (Prelude.Maybe Prelude.Text)
describeMaintenanceWindowTargetsResponse_nextToken :: Lens' DescribeMaintenanceWindowTargetsResponse (Maybe Text)
describeMaintenanceWindowTargetsResponse_nextToken = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeMaintenanceWindowTargetsResponse' {Maybe Text
nextToken :: Maybe Text
$sel:nextToken:DescribeMaintenanceWindowTargetsResponse' :: DescribeMaintenanceWindowTargetsResponse -> Maybe Text
nextToken} -> Maybe Text
nextToken) (\s :: DescribeMaintenanceWindowTargetsResponse
s@DescribeMaintenanceWindowTargetsResponse' {} Maybe Text
a -> DescribeMaintenanceWindowTargetsResponse
s {$sel:nextToken:DescribeMaintenanceWindowTargetsResponse' :: Maybe Text
nextToken = Maybe Text
a} :: DescribeMaintenanceWindowTargetsResponse)
describeMaintenanceWindowTargetsResponse_targets :: Lens.Lens' DescribeMaintenanceWindowTargetsResponse (Prelude.Maybe [MaintenanceWindowTarget])
describeMaintenanceWindowTargetsResponse_targets :: Lens'
DescribeMaintenanceWindowTargetsResponse
(Maybe [MaintenanceWindowTarget])
describeMaintenanceWindowTargetsResponse_targets = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeMaintenanceWindowTargetsResponse' {Maybe [MaintenanceWindowTarget]
targets :: Maybe [MaintenanceWindowTarget]
$sel:targets:DescribeMaintenanceWindowTargetsResponse' :: DescribeMaintenanceWindowTargetsResponse
-> Maybe [MaintenanceWindowTarget]
targets} -> Maybe [MaintenanceWindowTarget]
targets) (\s :: DescribeMaintenanceWindowTargetsResponse
s@DescribeMaintenanceWindowTargetsResponse' {} Maybe [MaintenanceWindowTarget]
a -> DescribeMaintenanceWindowTargetsResponse
s {$sel:targets:DescribeMaintenanceWindowTargetsResponse' :: Maybe [MaintenanceWindowTarget]
targets = Maybe [MaintenanceWindowTarget]
a} :: DescribeMaintenanceWindowTargetsResponse) 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
describeMaintenanceWindowTargetsResponse_httpStatus :: Lens.Lens' DescribeMaintenanceWindowTargetsResponse Prelude.Int
describeMaintenanceWindowTargetsResponse_httpStatus :: Lens' DescribeMaintenanceWindowTargetsResponse Int
describeMaintenanceWindowTargetsResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeMaintenanceWindowTargetsResponse' {Int
httpStatus :: Int
$sel:httpStatus:DescribeMaintenanceWindowTargetsResponse' :: DescribeMaintenanceWindowTargetsResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: DescribeMaintenanceWindowTargetsResponse
s@DescribeMaintenanceWindowTargetsResponse' {} Int
a -> DescribeMaintenanceWindowTargetsResponse
s {$sel:httpStatus:DescribeMaintenanceWindowTargetsResponse' :: Int
httpStatus = Int
a} :: DescribeMaintenanceWindowTargetsResponse)
instance
Prelude.NFData
DescribeMaintenanceWindowTargetsResponse
where
rnf :: DescribeMaintenanceWindowTargetsResponse -> ()
rnf DescribeMaintenanceWindowTargetsResponse' {Int
Maybe [MaintenanceWindowTarget]
Maybe Text
httpStatus :: Int
targets :: Maybe [MaintenanceWindowTarget]
nextToken :: Maybe Text
$sel:httpStatus:DescribeMaintenanceWindowTargetsResponse' :: DescribeMaintenanceWindowTargetsResponse -> Int
$sel:targets:DescribeMaintenanceWindowTargetsResponse' :: DescribeMaintenanceWindowTargetsResponse
-> Maybe [MaintenanceWindowTarget]
$sel:nextToken:DescribeMaintenanceWindowTargetsResponse' :: DescribeMaintenanceWindowTargetsResponse -> Maybe Text
..} =
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 Maybe [MaintenanceWindowTarget]
targets
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Int
httpStatus