{-# 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.DescribeMaintenanceWindowsForTarget
(
DescribeMaintenanceWindowsForTarget (..),
newDescribeMaintenanceWindowsForTarget,
describeMaintenanceWindowsForTarget_maxResults,
describeMaintenanceWindowsForTarget_nextToken,
describeMaintenanceWindowsForTarget_targets,
describeMaintenanceWindowsForTarget_resourceType,
DescribeMaintenanceWindowsForTargetResponse (..),
newDescribeMaintenanceWindowsForTargetResponse,
describeMaintenanceWindowsForTargetResponse_nextToken,
describeMaintenanceWindowsForTargetResponse_windowIdentities,
describeMaintenanceWindowsForTargetResponse_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 DescribeMaintenanceWindowsForTarget = DescribeMaintenanceWindowsForTarget'
{
DescribeMaintenanceWindowsForTarget -> Maybe Natural
maxResults :: Prelude.Maybe Prelude.Natural,
DescribeMaintenanceWindowsForTarget -> Maybe Text
nextToken :: Prelude.Maybe Prelude.Text,
DescribeMaintenanceWindowsForTarget -> [Target]
targets :: [Target],
DescribeMaintenanceWindowsForTarget
-> MaintenanceWindowResourceType
resourceType :: MaintenanceWindowResourceType
}
deriving (DescribeMaintenanceWindowsForTarget
-> DescribeMaintenanceWindowsForTarget -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DescribeMaintenanceWindowsForTarget
-> DescribeMaintenanceWindowsForTarget -> Bool
$c/= :: DescribeMaintenanceWindowsForTarget
-> DescribeMaintenanceWindowsForTarget -> Bool
== :: DescribeMaintenanceWindowsForTarget
-> DescribeMaintenanceWindowsForTarget -> Bool
$c== :: DescribeMaintenanceWindowsForTarget
-> DescribeMaintenanceWindowsForTarget -> Bool
Prelude.Eq, ReadPrec [DescribeMaintenanceWindowsForTarget]
ReadPrec DescribeMaintenanceWindowsForTarget
Int -> ReadS DescribeMaintenanceWindowsForTarget
ReadS [DescribeMaintenanceWindowsForTarget]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [DescribeMaintenanceWindowsForTarget]
$creadListPrec :: ReadPrec [DescribeMaintenanceWindowsForTarget]
readPrec :: ReadPrec DescribeMaintenanceWindowsForTarget
$creadPrec :: ReadPrec DescribeMaintenanceWindowsForTarget
readList :: ReadS [DescribeMaintenanceWindowsForTarget]
$creadList :: ReadS [DescribeMaintenanceWindowsForTarget]
readsPrec :: Int -> ReadS DescribeMaintenanceWindowsForTarget
$creadsPrec :: Int -> ReadS DescribeMaintenanceWindowsForTarget
Prelude.Read, Int -> DescribeMaintenanceWindowsForTarget -> ShowS
[DescribeMaintenanceWindowsForTarget] -> ShowS
DescribeMaintenanceWindowsForTarget -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [DescribeMaintenanceWindowsForTarget] -> ShowS
$cshowList :: [DescribeMaintenanceWindowsForTarget] -> ShowS
show :: DescribeMaintenanceWindowsForTarget -> String
$cshow :: DescribeMaintenanceWindowsForTarget -> String
showsPrec :: Int -> DescribeMaintenanceWindowsForTarget -> ShowS
$cshowsPrec :: Int -> DescribeMaintenanceWindowsForTarget -> ShowS
Prelude.Show, forall x.
Rep DescribeMaintenanceWindowsForTarget x
-> DescribeMaintenanceWindowsForTarget
forall x.
DescribeMaintenanceWindowsForTarget
-> Rep DescribeMaintenanceWindowsForTarget x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep DescribeMaintenanceWindowsForTarget x
-> DescribeMaintenanceWindowsForTarget
$cfrom :: forall x.
DescribeMaintenanceWindowsForTarget
-> Rep DescribeMaintenanceWindowsForTarget x
Prelude.Generic)
newDescribeMaintenanceWindowsForTarget ::
MaintenanceWindowResourceType ->
DescribeMaintenanceWindowsForTarget
newDescribeMaintenanceWindowsForTarget :: MaintenanceWindowResourceType
-> DescribeMaintenanceWindowsForTarget
newDescribeMaintenanceWindowsForTarget MaintenanceWindowResourceType
pResourceType_ =
DescribeMaintenanceWindowsForTarget'
{ $sel:maxResults:DescribeMaintenanceWindowsForTarget' :: Maybe Natural
maxResults =
forall a. Maybe a
Prelude.Nothing,
$sel:nextToken:DescribeMaintenanceWindowsForTarget' :: Maybe Text
nextToken = forall a. Maybe a
Prelude.Nothing,
$sel:targets:DescribeMaintenanceWindowsForTarget' :: [Target]
targets = forall a. Monoid a => a
Prelude.mempty,
$sel:resourceType:DescribeMaintenanceWindowsForTarget' :: MaintenanceWindowResourceType
resourceType = MaintenanceWindowResourceType
pResourceType_
}
describeMaintenanceWindowsForTarget_maxResults :: Lens.Lens' DescribeMaintenanceWindowsForTarget (Prelude.Maybe Prelude.Natural)
describeMaintenanceWindowsForTarget_maxResults :: Lens' DescribeMaintenanceWindowsForTarget (Maybe Natural)
describeMaintenanceWindowsForTarget_maxResults = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeMaintenanceWindowsForTarget' {Maybe Natural
maxResults :: Maybe Natural
$sel:maxResults:DescribeMaintenanceWindowsForTarget' :: DescribeMaintenanceWindowsForTarget -> Maybe Natural
maxResults} -> Maybe Natural
maxResults) (\s :: DescribeMaintenanceWindowsForTarget
s@DescribeMaintenanceWindowsForTarget' {} Maybe Natural
a -> DescribeMaintenanceWindowsForTarget
s {$sel:maxResults:DescribeMaintenanceWindowsForTarget' :: Maybe Natural
maxResults = Maybe Natural
a} :: DescribeMaintenanceWindowsForTarget)
describeMaintenanceWindowsForTarget_nextToken :: Lens.Lens' DescribeMaintenanceWindowsForTarget (Prelude.Maybe Prelude.Text)
describeMaintenanceWindowsForTarget_nextToken :: Lens' DescribeMaintenanceWindowsForTarget (Maybe Text)
describeMaintenanceWindowsForTarget_nextToken = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeMaintenanceWindowsForTarget' {Maybe Text
nextToken :: Maybe Text
$sel:nextToken:DescribeMaintenanceWindowsForTarget' :: DescribeMaintenanceWindowsForTarget -> Maybe Text
nextToken} -> Maybe Text
nextToken) (\s :: DescribeMaintenanceWindowsForTarget
s@DescribeMaintenanceWindowsForTarget' {} Maybe Text
a -> DescribeMaintenanceWindowsForTarget
s {$sel:nextToken:DescribeMaintenanceWindowsForTarget' :: Maybe Text
nextToken = Maybe Text
a} :: DescribeMaintenanceWindowsForTarget)
describeMaintenanceWindowsForTarget_targets :: Lens.Lens' DescribeMaintenanceWindowsForTarget [Target]
describeMaintenanceWindowsForTarget_targets :: Lens' DescribeMaintenanceWindowsForTarget [Target]
describeMaintenanceWindowsForTarget_targets = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeMaintenanceWindowsForTarget' {[Target]
targets :: [Target]
$sel:targets:DescribeMaintenanceWindowsForTarget' :: DescribeMaintenanceWindowsForTarget -> [Target]
targets} -> [Target]
targets) (\s :: DescribeMaintenanceWindowsForTarget
s@DescribeMaintenanceWindowsForTarget' {} [Target]
a -> DescribeMaintenanceWindowsForTarget
s {$sel:targets:DescribeMaintenanceWindowsForTarget' :: [Target]
targets = [Target]
a} :: DescribeMaintenanceWindowsForTarget) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced
describeMaintenanceWindowsForTarget_resourceType :: Lens.Lens' DescribeMaintenanceWindowsForTarget MaintenanceWindowResourceType
describeMaintenanceWindowsForTarget_resourceType :: Lens'
DescribeMaintenanceWindowsForTarget MaintenanceWindowResourceType
describeMaintenanceWindowsForTarget_resourceType = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeMaintenanceWindowsForTarget' {MaintenanceWindowResourceType
resourceType :: MaintenanceWindowResourceType
$sel:resourceType:DescribeMaintenanceWindowsForTarget' :: DescribeMaintenanceWindowsForTarget
-> MaintenanceWindowResourceType
resourceType} -> MaintenanceWindowResourceType
resourceType) (\s :: DescribeMaintenanceWindowsForTarget
s@DescribeMaintenanceWindowsForTarget' {} MaintenanceWindowResourceType
a -> DescribeMaintenanceWindowsForTarget
s {$sel:resourceType:DescribeMaintenanceWindowsForTarget' :: MaintenanceWindowResourceType
resourceType = MaintenanceWindowResourceType
a} :: DescribeMaintenanceWindowsForTarget)
instance
Core.AWSPager
DescribeMaintenanceWindowsForTarget
where
page :: DescribeMaintenanceWindowsForTarget
-> AWSResponse DescribeMaintenanceWindowsForTarget
-> Maybe DescribeMaintenanceWindowsForTarget
page DescribeMaintenanceWindowsForTarget
rq AWSResponse DescribeMaintenanceWindowsForTarget
rs
| forall a. AWSTruncated a => a -> Bool
Core.stop
( AWSResponse DescribeMaintenanceWindowsForTarget
rs
forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens' DescribeMaintenanceWindowsForTargetResponse (Maybe Text)
describeMaintenanceWindowsForTargetResponse_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 DescribeMaintenanceWindowsForTarget
rs
forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens'
DescribeMaintenanceWindowsForTargetResponse
(Maybe [MaintenanceWindowIdentityForTarget])
describeMaintenanceWindowsForTargetResponse_windowIdentities
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.$ DescribeMaintenanceWindowsForTarget
rq
forall a b. a -> (a -> b) -> b
Prelude.& Lens' DescribeMaintenanceWindowsForTarget (Maybe Text)
describeMaintenanceWindowsForTarget_nextToken
forall s t a b. ASetter s t a b -> b -> s -> t
Lens..~ AWSResponse DescribeMaintenanceWindowsForTarget
rs
forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens' DescribeMaintenanceWindowsForTargetResponse (Maybe Text)
describeMaintenanceWindowsForTargetResponse_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
DescribeMaintenanceWindowsForTarget
where
type
AWSResponse DescribeMaintenanceWindowsForTarget =
DescribeMaintenanceWindowsForTargetResponse
request :: (Service -> Service)
-> DescribeMaintenanceWindowsForTarget
-> Request DescribeMaintenanceWindowsForTarget
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 DescribeMaintenanceWindowsForTarget
-> ClientResponse ClientBody
-> m (Either
Error
(ClientResponse (AWSResponse DescribeMaintenanceWindowsForTarget)))
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 [MaintenanceWindowIdentityForTarget]
-> Int
-> DescribeMaintenanceWindowsForTargetResponse
DescribeMaintenanceWindowsForTargetResponse'
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
"WindowIdentities"
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
DescribeMaintenanceWindowsForTarget
where
hashWithSalt :: Int -> DescribeMaintenanceWindowsForTarget -> Int
hashWithSalt
Int
_salt
DescribeMaintenanceWindowsForTarget' {[Target]
Maybe Natural
Maybe Text
MaintenanceWindowResourceType
resourceType :: MaintenanceWindowResourceType
targets :: [Target]
nextToken :: Maybe Text
maxResults :: Maybe Natural
$sel:resourceType:DescribeMaintenanceWindowsForTarget' :: DescribeMaintenanceWindowsForTarget
-> MaintenanceWindowResourceType
$sel:targets:DescribeMaintenanceWindowsForTarget' :: DescribeMaintenanceWindowsForTarget -> [Target]
$sel:nextToken:DescribeMaintenanceWindowsForTarget' :: DescribeMaintenanceWindowsForTarget -> Maybe Text
$sel:maxResults:DescribeMaintenanceWindowsForTarget' :: DescribeMaintenanceWindowsForTarget -> 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` [Target]
targets
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` MaintenanceWindowResourceType
resourceType
instance
Prelude.NFData
DescribeMaintenanceWindowsForTarget
where
rnf :: DescribeMaintenanceWindowsForTarget -> ()
rnf DescribeMaintenanceWindowsForTarget' {[Target]
Maybe Natural
Maybe Text
MaintenanceWindowResourceType
resourceType :: MaintenanceWindowResourceType
targets :: [Target]
nextToken :: Maybe Text
maxResults :: Maybe Natural
$sel:resourceType:DescribeMaintenanceWindowsForTarget' :: DescribeMaintenanceWindowsForTarget
-> MaintenanceWindowResourceType
$sel:targets:DescribeMaintenanceWindowsForTarget' :: DescribeMaintenanceWindowsForTarget -> [Target]
$sel:nextToken:DescribeMaintenanceWindowsForTarget' :: DescribeMaintenanceWindowsForTarget -> Maybe Text
$sel:maxResults:DescribeMaintenanceWindowsForTarget' :: DescribeMaintenanceWindowsForTarget -> 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 [Target]
targets
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf MaintenanceWindowResourceType
resourceType
instance
Data.ToHeaders
DescribeMaintenanceWindowsForTarget
where
toHeaders :: DescribeMaintenanceWindowsForTarget -> 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.DescribeMaintenanceWindowsForTarget" ::
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
DescribeMaintenanceWindowsForTarget
where
toJSON :: DescribeMaintenanceWindowsForTarget -> Value
toJSON DescribeMaintenanceWindowsForTarget' {[Target]
Maybe Natural
Maybe Text
MaintenanceWindowResourceType
resourceType :: MaintenanceWindowResourceType
targets :: [Target]
nextToken :: Maybe Text
maxResults :: Maybe Natural
$sel:resourceType:DescribeMaintenanceWindowsForTarget' :: DescribeMaintenanceWindowsForTarget
-> MaintenanceWindowResourceType
$sel:targets:DescribeMaintenanceWindowsForTarget' :: DescribeMaintenanceWindowsForTarget -> [Target]
$sel:nextToken:DescribeMaintenanceWindowsForTarget' :: DescribeMaintenanceWindowsForTarget -> Maybe Text
$sel:maxResults:DescribeMaintenanceWindowsForTarget' :: DescribeMaintenanceWindowsForTarget -> 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
"Targets" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..= [Target]
targets),
forall a. a -> Maybe a
Prelude.Just (Key
"ResourceType" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..= MaintenanceWindowResourceType
resourceType)
]
)
instance
Data.ToPath
DescribeMaintenanceWindowsForTarget
where
toPath :: DescribeMaintenanceWindowsForTarget -> ByteString
toPath = forall a b. a -> b -> a
Prelude.const ByteString
"/"
instance
Data.ToQuery
DescribeMaintenanceWindowsForTarget
where
toQuery :: DescribeMaintenanceWindowsForTarget -> QueryString
toQuery = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty
data DescribeMaintenanceWindowsForTargetResponse = DescribeMaintenanceWindowsForTargetResponse'
{
DescribeMaintenanceWindowsForTargetResponse -> Maybe Text
nextToken :: Prelude.Maybe Prelude.Text,
DescribeMaintenanceWindowsForTargetResponse
-> Maybe [MaintenanceWindowIdentityForTarget]
windowIdentities :: Prelude.Maybe [MaintenanceWindowIdentityForTarget],
DescribeMaintenanceWindowsForTargetResponse -> Int
httpStatus :: Prelude.Int
}
deriving (DescribeMaintenanceWindowsForTargetResponse
-> DescribeMaintenanceWindowsForTargetResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DescribeMaintenanceWindowsForTargetResponse
-> DescribeMaintenanceWindowsForTargetResponse -> Bool
$c/= :: DescribeMaintenanceWindowsForTargetResponse
-> DescribeMaintenanceWindowsForTargetResponse -> Bool
== :: DescribeMaintenanceWindowsForTargetResponse
-> DescribeMaintenanceWindowsForTargetResponse -> Bool
$c== :: DescribeMaintenanceWindowsForTargetResponse
-> DescribeMaintenanceWindowsForTargetResponse -> Bool
Prelude.Eq, ReadPrec [DescribeMaintenanceWindowsForTargetResponse]
ReadPrec DescribeMaintenanceWindowsForTargetResponse
Int -> ReadS DescribeMaintenanceWindowsForTargetResponse
ReadS [DescribeMaintenanceWindowsForTargetResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [DescribeMaintenanceWindowsForTargetResponse]
$creadListPrec :: ReadPrec [DescribeMaintenanceWindowsForTargetResponse]
readPrec :: ReadPrec DescribeMaintenanceWindowsForTargetResponse
$creadPrec :: ReadPrec DescribeMaintenanceWindowsForTargetResponse
readList :: ReadS [DescribeMaintenanceWindowsForTargetResponse]
$creadList :: ReadS [DescribeMaintenanceWindowsForTargetResponse]
readsPrec :: Int -> ReadS DescribeMaintenanceWindowsForTargetResponse
$creadsPrec :: Int -> ReadS DescribeMaintenanceWindowsForTargetResponse
Prelude.Read, Int -> DescribeMaintenanceWindowsForTargetResponse -> ShowS
[DescribeMaintenanceWindowsForTargetResponse] -> ShowS
DescribeMaintenanceWindowsForTargetResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [DescribeMaintenanceWindowsForTargetResponse] -> ShowS
$cshowList :: [DescribeMaintenanceWindowsForTargetResponse] -> ShowS
show :: DescribeMaintenanceWindowsForTargetResponse -> String
$cshow :: DescribeMaintenanceWindowsForTargetResponse -> String
showsPrec :: Int -> DescribeMaintenanceWindowsForTargetResponse -> ShowS
$cshowsPrec :: Int -> DescribeMaintenanceWindowsForTargetResponse -> ShowS
Prelude.Show, forall x.
Rep DescribeMaintenanceWindowsForTargetResponse x
-> DescribeMaintenanceWindowsForTargetResponse
forall x.
DescribeMaintenanceWindowsForTargetResponse
-> Rep DescribeMaintenanceWindowsForTargetResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep DescribeMaintenanceWindowsForTargetResponse x
-> DescribeMaintenanceWindowsForTargetResponse
$cfrom :: forall x.
DescribeMaintenanceWindowsForTargetResponse
-> Rep DescribeMaintenanceWindowsForTargetResponse x
Prelude.Generic)
newDescribeMaintenanceWindowsForTargetResponse ::
Prelude.Int ->
DescribeMaintenanceWindowsForTargetResponse
newDescribeMaintenanceWindowsForTargetResponse :: Int -> DescribeMaintenanceWindowsForTargetResponse
newDescribeMaintenanceWindowsForTargetResponse
Int
pHttpStatus_ =
DescribeMaintenanceWindowsForTargetResponse'
{ $sel:nextToken:DescribeMaintenanceWindowsForTargetResponse' :: Maybe Text
nextToken =
forall a. Maybe a
Prelude.Nothing,
$sel:windowIdentities:DescribeMaintenanceWindowsForTargetResponse' :: Maybe [MaintenanceWindowIdentityForTarget]
windowIdentities =
forall a. Maybe a
Prelude.Nothing,
$sel:httpStatus:DescribeMaintenanceWindowsForTargetResponse' :: Int
httpStatus = Int
pHttpStatus_
}
describeMaintenanceWindowsForTargetResponse_nextToken :: Lens.Lens' DescribeMaintenanceWindowsForTargetResponse (Prelude.Maybe Prelude.Text)
describeMaintenanceWindowsForTargetResponse_nextToken :: Lens' DescribeMaintenanceWindowsForTargetResponse (Maybe Text)
describeMaintenanceWindowsForTargetResponse_nextToken = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeMaintenanceWindowsForTargetResponse' {Maybe Text
nextToken :: Maybe Text
$sel:nextToken:DescribeMaintenanceWindowsForTargetResponse' :: DescribeMaintenanceWindowsForTargetResponse -> Maybe Text
nextToken} -> Maybe Text
nextToken) (\s :: DescribeMaintenanceWindowsForTargetResponse
s@DescribeMaintenanceWindowsForTargetResponse' {} Maybe Text
a -> DescribeMaintenanceWindowsForTargetResponse
s {$sel:nextToken:DescribeMaintenanceWindowsForTargetResponse' :: Maybe Text
nextToken = Maybe Text
a} :: DescribeMaintenanceWindowsForTargetResponse)
describeMaintenanceWindowsForTargetResponse_windowIdentities :: Lens.Lens' DescribeMaintenanceWindowsForTargetResponse (Prelude.Maybe [MaintenanceWindowIdentityForTarget])
describeMaintenanceWindowsForTargetResponse_windowIdentities :: Lens'
DescribeMaintenanceWindowsForTargetResponse
(Maybe [MaintenanceWindowIdentityForTarget])
describeMaintenanceWindowsForTargetResponse_windowIdentities = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeMaintenanceWindowsForTargetResponse' {Maybe [MaintenanceWindowIdentityForTarget]
windowIdentities :: Maybe [MaintenanceWindowIdentityForTarget]
$sel:windowIdentities:DescribeMaintenanceWindowsForTargetResponse' :: DescribeMaintenanceWindowsForTargetResponse
-> Maybe [MaintenanceWindowIdentityForTarget]
windowIdentities} -> Maybe [MaintenanceWindowIdentityForTarget]
windowIdentities) (\s :: DescribeMaintenanceWindowsForTargetResponse
s@DescribeMaintenanceWindowsForTargetResponse' {} Maybe [MaintenanceWindowIdentityForTarget]
a -> DescribeMaintenanceWindowsForTargetResponse
s {$sel:windowIdentities:DescribeMaintenanceWindowsForTargetResponse' :: Maybe [MaintenanceWindowIdentityForTarget]
windowIdentities = Maybe [MaintenanceWindowIdentityForTarget]
a} :: DescribeMaintenanceWindowsForTargetResponse) 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
describeMaintenanceWindowsForTargetResponse_httpStatus :: Lens.Lens' DescribeMaintenanceWindowsForTargetResponse Prelude.Int
describeMaintenanceWindowsForTargetResponse_httpStatus :: Lens' DescribeMaintenanceWindowsForTargetResponse Int
describeMaintenanceWindowsForTargetResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeMaintenanceWindowsForTargetResponse' {Int
httpStatus :: Int
$sel:httpStatus:DescribeMaintenanceWindowsForTargetResponse' :: DescribeMaintenanceWindowsForTargetResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: DescribeMaintenanceWindowsForTargetResponse
s@DescribeMaintenanceWindowsForTargetResponse' {} Int
a -> DescribeMaintenanceWindowsForTargetResponse
s {$sel:httpStatus:DescribeMaintenanceWindowsForTargetResponse' :: Int
httpStatus = Int
a} :: DescribeMaintenanceWindowsForTargetResponse)
instance
Prelude.NFData
DescribeMaintenanceWindowsForTargetResponse
where
rnf :: DescribeMaintenanceWindowsForTargetResponse -> ()
rnf DescribeMaintenanceWindowsForTargetResponse' {Int
Maybe [MaintenanceWindowIdentityForTarget]
Maybe Text
httpStatus :: Int
windowIdentities :: Maybe [MaintenanceWindowIdentityForTarget]
nextToken :: Maybe Text
$sel:httpStatus:DescribeMaintenanceWindowsForTargetResponse' :: DescribeMaintenanceWindowsForTargetResponse -> Int
$sel:windowIdentities:DescribeMaintenanceWindowsForTargetResponse' :: DescribeMaintenanceWindowsForTargetResponse
-> Maybe [MaintenanceWindowIdentityForTarget]
$sel:nextToken:DescribeMaintenanceWindowsForTargetResponse' :: DescribeMaintenanceWindowsForTargetResponse -> 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 [MaintenanceWindowIdentityForTarget]
windowIdentities
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Int
httpStatus