{-# 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.CapacityReservationSpecification 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.CapacityReservationPreference
import Amazonka.EC2.Types.CapacityReservationTarget
import qualified Amazonka.Prelude as Prelude
data CapacityReservationSpecification = CapacityReservationSpecification'
{
CapacityReservationSpecification
-> Maybe CapacityReservationPreference
capacityReservationPreference :: Prelude.Maybe CapacityReservationPreference,
CapacityReservationSpecification -> Maybe CapacityReservationTarget
capacityReservationTarget :: Prelude.Maybe CapacityReservationTarget
}
deriving (CapacityReservationSpecification
-> CapacityReservationSpecification -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: CapacityReservationSpecification
-> CapacityReservationSpecification -> Bool
$c/= :: CapacityReservationSpecification
-> CapacityReservationSpecification -> Bool
== :: CapacityReservationSpecification
-> CapacityReservationSpecification -> Bool
$c== :: CapacityReservationSpecification
-> CapacityReservationSpecification -> Bool
Prelude.Eq, ReadPrec [CapacityReservationSpecification]
ReadPrec CapacityReservationSpecification
Int -> ReadS CapacityReservationSpecification
ReadS [CapacityReservationSpecification]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [CapacityReservationSpecification]
$creadListPrec :: ReadPrec [CapacityReservationSpecification]
readPrec :: ReadPrec CapacityReservationSpecification
$creadPrec :: ReadPrec CapacityReservationSpecification
readList :: ReadS [CapacityReservationSpecification]
$creadList :: ReadS [CapacityReservationSpecification]
readsPrec :: Int -> ReadS CapacityReservationSpecification
$creadsPrec :: Int -> ReadS CapacityReservationSpecification
Prelude.Read, Int -> CapacityReservationSpecification -> ShowS
[CapacityReservationSpecification] -> ShowS
CapacityReservationSpecification -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [CapacityReservationSpecification] -> ShowS
$cshowList :: [CapacityReservationSpecification] -> ShowS
show :: CapacityReservationSpecification -> String
$cshow :: CapacityReservationSpecification -> String
showsPrec :: Int -> CapacityReservationSpecification -> ShowS
$cshowsPrec :: Int -> CapacityReservationSpecification -> ShowS
Prelude.Show, forall x.
Rep CapacityReservationSpecification x
-> CapacityReservationSpecification
forall x.
CapacityReservationSpecification
-> Rep CapacityReservationSpecification x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep CapacityReservationSpecification x
-> CapacityReservationSpecification
$cfrom :: forall x.
CapacityReservationSpecification
-> Rep CapacityReservationSpecification x
Prelude.Generic)
newCapacityReservationSpecification ::
CapacityReservationSpecification
newCapacityReservationSpecification :: CapacityReservationSpecification
newCapacityReservationSpecification =
CapacityReservationSpecification'
{ $sel:capacityReservationPreference:CapacityReservationSpecification' :: Maybe CapacityReservationPreference
capacityReservationPreference =
forall a. Maybe a
Prelude.Nothing,
$sel:capacityReservationTarget:CapacityReservationSpecification' :: Maybe CapacityReservationTarget
capacityReservationTarget =
forall a. Maybe a
Prelude.Nothing
}
capacityReservationSpecification_capacityReservationPreference :: Lens.Lens' CapacityReservationSpecification (Prelude.Maybe CapacityReservationPreference)
capacityReservationSpecification_capacityReservationPreference :: Lens'
CapacityReservationSpecification
(Maybe CapacityReservationPreference)
capacityReservationSpecification_capacityReservationPreference = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CapacityReservationSpecification' {Maybe CapacityReservationPreference
capacityReservationPreference :: Maybe CapacityReservationPreference
$sel:capacityReservationPreference:CapacityReservationSpecification' :: CapacityReservationSpecification
-> Maybe CapacityReservationPreference
capacityReservationPreference} -> Maybe CapacityReservationPreference
capacityReservationPreference) (\s :: CapacityReservationSpecification
s@CapacityReservationSpecification' {} Maybe CapacityReservationPreference
a -> CapacityReservationSpecification
s {$sel:capacityReservationPreference:CapacityReservationSpecification' :: Maybe CapacityReservationPreference
capacityReservationPreference = Maybe CapacityReservationPreference
a} :: CapacityReservationSpecification)
capacityReservationSpecification_capacityReservationTarget :: Lens.Lens' CapacityReservationSpecification (Prelude.Maybe CapacityReservationTarget)
capacityReservationSpecification_capacityReservationTarget :: Lens'
CapacityReservationSpecification (Maybe CapacityReservationTarget)
capacityReservationSpecification_capacityReservationTarget = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CapacityReservationSpecification' {Maybe CapacityReservationTarget
capacityReservationTarget :: Maybe CapacityReservationTarget
$sel:capacityReservationTarget:CapacityReservationSpecification' :: CapacityReservationSpecification -> Maybe CapacityReservationTarget
capacityReservationTarget} -> Maybe CapacityReservationTarget
capacityReservationTarget) (\s :: CapacityReservationSpecification
s@CapacityReservationSpecification' {} Maybe CapacityReservationTarget
a -> CapacityReservationSpecification
s {$sel:capacityReservationTarget:CapacityReservationSpecification' :: Maybe CapacityReservationTarget
capacityReservationTarget = Maybe CapacityReservationTarget
a} :: CapacityReservationSpecification)
instance
Prelude.Hashable
CapacityReservationSpecification
where
hashWithSalt :: Int -> CapacityReservationSpecification -> Int
hashWithSalt
Int
_salt
CapacityReservationSpecification' {Maybe CapacityReservationPreference
Maybe CapacityReservationTarget
capacityReservationTarget :: Maybe CapacityReservationTarget
capacityReservationPreference :: Maybe CapacityReservationPreference
$sel:capacityReservationTarget:CapacityReservationSpecification' :: CapacityReservationSpecification -> Maybe CapacityReservationTarget
$sel:capacityReservationPreference:CapacityReservationSpecification' :: CapacityReservationSpecification
-> Maybe CapacityReservationPreference
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe CapacityReservationPreference
capacityReservationPreference
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe CapacityReservationTarget
capacityReservationTarget
instance
Prelude.NFData
CapacityReservationSpecification
where
rnf :: CapacityReservationSpecification -> ()
rnf CapacityReservationSpecification' {Maybe CapacityReservationPreference
Maybe CapacityReservationTarget
capacityReservationTarget :: Maybe CapacityReservationTarget
capacityReservationPreference :: Maybe CapacityReservationPreference
$sel:capacityReservationTarget:CapacityReservationSpecification' :: CapacityReservationSpecification -> Maybe CapacityReservationTarget
$sel:capacityReservationPreference:CapacityReservationSpecification' :: CapacityReservationSpecification
-> Maybe CapacityReservationPreference
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe CapacityReservationPreference
capacityReservationPreference
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe CapacityReservationTarget
capacityReservationTarget
instance
Data.ToQuery
CapacityReservationSpecification
where
toQuery :: CapacityReservationSpecification -> QueryString
toQuery CapacityReservationSpecification' {Maybe CapacityReservationPreference
Maybe CapacityReservationTarget
capacityReservationTarget :: Maybe CapacityReservationTarget
capacityReservationPreference :: Maybe CapacityReservationPreference
$sel:capacityReservationTarget:CapacityReservationSpecification' :: CapacityReservationSpecification -> Maybe CapacityReservationTarget
$sel:capacityReservationPreference:CapacityReservationSpecification' :: CapacityReservationSpecification
-> Maybe CapacityReservationPreference
..} =
forall a. Monoid a => [a] -> a
Prelude.mconcat
[ ByteString
"CapacityReservationPreference"
forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe CapacityReservationPreference
capacityReservationPreference,
ByteString
"CapacityReservationTarget"
forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe CapacityReservationTarget
capacityReservationTarget
]