{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE DuplicateRecordFields #-}
{-# LANGUAGE NamedFieldPuns #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE RecordWildCards #-}
{-# LANGUAGE StrictData #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
{-# OPTIONS_GHC -fno-warn-unused-matches #-}
module Amazonka.EC2.Types.LaunchTemplateInstanceMaintenanceOptionsRequest where
import qualified Amazonka.Core as Core
import qualified Amazonka.Core.Lens.Internal as Lens
import qualified Amazonka.Data as Data
import Amazonka.EC2.Internal
import Amazonka.EC2.Types.LaunchTemplateAutoRecoveryState
import qualified Amazonka.Prelude as Prelude
data LaunchTemplateInstanceMaintenanceOptionsRequest = LaunchTemplateInstanceMaintenanceOptionsRequest'
{
LaunchTemplateInstanceMaintenanceOptionsRequest
-> Maybe LaunchTemplateAutoRecoveryState
autoRecovery :: Prelude.Maybe LaunchTemplateAutoRecoveryState
}
deriving (LaunchTemplateInstanceMaintenanceOptionsRequest
-> LaunchTemplateInstanceMaintenanceOptionsRequest -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: LaunchTemplateInstanceMaintenanceOptionsRequest
-> LaunchTemplateInstanceMaintenanceOptionsRequest -> Bool
$c/= :: LaunchTemplateInstanceMaintenanceOptionsRequest
-> LaunchTemplateInstanceMaintenanceOptionsRequest -> Bool
== :: LaunchTemplateInstanceMaintenanceOptionsRequest
-> LaunchTemplateInstanceMaintenanceOptionsRequest -> Bool
$c== :: LaunchTemplateInstanceMaintenanceOptionsRequest
-> LaunchTemplateInstanceMaintenanceOptionsRequest -> Bool
Prelude.Eq, ReadPrec [LaunchTemplateInstanceMaintenanceOptionsRequest]
ReadPrec LaunchTemplateInstanceMaintenanceOptionsRequest
Int -> ReadS LaunchTemplateInstanceMaintenanceOptionsRequest
ReadS [LaunchTemplateInstanceMaintenanceOptionsRequest]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [LaunchTemplateInstanceMaintenanceOptionsRequest]
$creadListPrec :: ReadPrec [LaunchTemplateInstanceMaintenanceOptionsRequest]
readPrec :: ReadPrec LaunchTemplateInstanceMaintenanceOptionsRequest
$creadPrec :: ReadPrec LaunchTemplateInstanceMaintenanceOptionsRequest
readList :: ReadS [LaunchTemplateInstanceMaintenanceOptionsRequest]
$creadList :: ReadS [LaunchTemplateInstanceMaintenanceOptionsRequest]
readsPrec :: Int -> ReadS LaunchTemplateInstanceMaintenanceOptionsRequest
$creadsPrec :: Int -> ReadS LaunchTemplateInstanceMaintenanceOptionsRequest
Prelude.Read, Int -> LaunchTemplateInstanceMaintenanceOptionsRequest -> ShowS
[LaunchTemplateInstanceMaintenanceOptionsRequest] -> ShowS
LaunchTemplateInstanceMaintenanceOptionsRequest -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [LaunchTemplateInstanceMaintenanceOptionsRequest] -> ShowS
$cshowList :: [LaunchTemplateInstanceMaintenanceOptionsRequest] -> ShowS
show :: LaunchTemplateInstanceMaintenanceOptionsRequest -> String
$cshow :: LaunchTemplateInstanceMaintenanceOptionsRequest -> String
showsPrec :: Int -> LaunchTemplateInstanceMaintenanceOptionsRequest -> ShowS
$cshowsPrec :: Int -> LaunchTemplateInstanceMaintenanceOptionsRequest -> ShowS
Prelude.Show, forall x.
Rep LaunchTemplateInstanceMaintenanceOptionsRequest x
-> LaunchTemplateInstanceMaintenanceOptionsRequest
forall x.
LaunchTemplateInstanceMaintenanceOptionsRequest
-> Rep LaunchTemplateInstanceMaintenanceOptionsRequest x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep LaunchTemplateInstanceMaintenanceOptionsRequest x
-> LaunchTemplateInstanceMaintenanceOptionsRequest
$cfrom :: forall x.
LaunchTemplateInstanceMaintenanceOptionsRequest
-> Rep LaunchTemplateInstanceMaintenanceOptionsRequest x
Prelude.Generic)
newLaunchTemplateInstanceMaintenanceOptionsRequest ::
LaunchTemplateInstanceMaintenanceOptionsRequest
newLaunchTemplateInstanceMaintenanceOptionsRequest :: LaunchTemplateInstanceMaintenanceOptionsRequest
newLaunchTemplateInstanceMaintenanceOptionsRequest =
LaunchTemplateInstanceMaintenanceOptionsRequest'
{ $sel:autoRecovery:LaunchTemplateInstanceMaintenanceOptionsRequest' :: Maybe LaunchTemplateAutoRecoveryState
autoRecovery =
forall a. Maybe a
Prelude.Nothing
}
launchTemplateInstanceMaintenanceOptionsRequest_autoRecovery :: Lens.Lens' LaunchTemplateInstanceMaintenanceOptionsRequest (Prelude.Maybe LaunchTemplateAutoRecoveryState)
launchTemplateInstanceMaintenanceOptionsRequest_autoRecovery :: Lens'
LaunchTemplateInstanceMaintenanceOptionsRequest
(Maybe LaunchTemplateAutoRecoveryState)
launchTemplateInstanceMaintenanceOptionsRequest_autoRecovery = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\LaunchTemplateInstanceMaintenanceOptionsRequest' {Maybe LaunchTemplateAutoRecoveryState
autoRecovery :: Maybe LaunchTemplateAutoRecoveryState
$sel:autoRecovery:LaunchTemplateInstanceMaintenanceOptionsRequest' :: LaunchTemplateInstanceMaintenanceOptionsRequest
-> Maybe LaunchTemplateAutoRecoveryState
autoRecovery} -> Maybe LaunchTemplateAutoRecoveryState
autoRecovery) (\s :: LaunchTemplateInstanceMaintenanceOptionsRequest
s@LaunchTemplateInstanceMaintenanceOptionsRequest' {} Maybe LaunchTemplateAutoRecoveryState
a -> LaunchTemplateInstanceMaintenanceOptionsRequest
s {$sel:autoRecovery:LaunchTemplateInstanceMaintenanceOptionsRequest' :: Maybe LaunchTemplateAutoRecoveryState
autoRecovery = Maybe LaunchTemplateAutoRecoveryState
a} :: LaunchTemplateInstanceMaintenanceOptionsRequest)
instance
Prelude.Hashable
LaunchTemplateInstanceMaintenanceOptionsRequest
where
hashWithSalt :: Int -> LaunchTemplateInstanceMaintenanceOptionsRequest -> Int
hashWithSalt
Int
_salt
LaunchTemplateInstanceMaintenanceOptionsRequest' {Maybe LaunchTemplateAutoRecoveryState
autoRecovery :: Maybe LaunchTemplateAutoRecoveryState
$sel:autoRecovery:LaunchTemplateInstanceMaintenanceOptionsRequest' :: LaunchTemplateInstanceMaintenanceOptionsRequest
-> Maybe LaunchTemplateAutoRecoveryState
..} =
Int
_salt forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe LaunchTemplateAutoRecoveryState
autoRecovery
instance
Prelude.NFData
LaunchTemplateInstanceMaintenanceOptionsRequest
where
rnf :: LaunchTemplateInstanceMaintenanceOptionsRequest -> ()
rnf
LaunchTemplateInstanceMaintenanceOptionsRequest' {Maybe LaunchTemplateAutoRecoveryState
autoRecovery :: Maybe LaunchTemplateAutoRecoveryState
$sel:autoRecovery:LaunchTemplateInstanceMaintenanceOptionsRequest' :: LaunchTemplateInstanceMaintenanceOptionsRequest
-> Maybe LaunchTemplateAutoRecoveryState
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe LaunchTemplateAutoRecoveryState
autoRecovery
instance
Data.ToQuery
LaunchTemplateInstanceMaintenanceOptionsRequest
where
toQuery :: LaunchTemplateInstanceMaintenanceOptionsRequest -> QueryString
toQuery
LaunchTemplateInstanceMaintenanceOptionsRequest' {Maybe LaunchTemplateAutoRecoveryState
autoRecovery :: Maybe LaunchTemplateAutoRecoveryState
$sel:autoRecovery:LaunchTemplateInstanceMaintenanceOptionsRequest' :: LaunchTemplateInstanceMaintenanceOptionsRequest
-> Maybe LaunchTemplateAutoRecoveryState
..} =
forall a. Monoid a => [a] -> a
Prelude.mconcat
[ByteString
"AutoRecovery" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe LaunchTemplateAutoRecoveryState
autoRecovery]