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