{-# 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.EC2.ModifyVpnConnectionOptions
(
ModifyVpnConnectionOptions (..),
newModifyVpnConnectionOptions,
modifyVpnConnectionOptions_dryRun,
modifyVpnConnectionOptions_localIpv4NetworkCidr,
modifyVpnConnectionOptions_localIpv6NetworkCidr,
modifyVpnConnectionOptions_remoteIpv4NetworkCidr,
modifyVpnConnectionOptions_remoteIpv6NetworkCidr,
modifyVpnConnectionOptions_vpnConnectionId,
ModifyVpnConnectionOptionsResponse (..),
newModifyVpnConnectionOptionsResponse,
modifyVpnConnectionOptionsResponse_vpnConnection,
modifyVpnConnectionOptionsResponse_httpStatus,
)
where
import qualified Amazonka.Core as Core
import qualified Amazonka.Core.Lens.Internal as Lens
import qualified Amazonka.Data as Data
import Amazonka.EC2.Types
import qualified Amazonka.Prelude as Prelude
import qualified Amazonka.Request as Request
import qualified Amazonka.Response as Response
data ModifyVpnConnectionOptions = ModifyVpnConnectionOptions'
{
ModifyVpnConnectionOptions -> Maybe Bool
dryRun :: Prelude.Maybe Prelude.Bool,
ModifyVpnConnectionOptions -> Maybe Text
localIpv4NetworkCidr :: Prelude.Maybe Prelude.Text,
ModifyVpnConnectionOptions -> Maybe Text
localIpv6NetworkCidr :: Prelude.Maybe Prelude.Text,
ModifyVpnConnectionOptions -> Maybe Text
remoteIpv4NetworkCidr :: Prelude.Maybe Prelude.Text,
ModifyVpnConnectionOptions -> Maybe Text
remoteIpv6NetworkCidr :: Prelude.Maybe Prelude.Text,
ModifyVpnConnectionOptions -> Text
vpnConnectionId :: Prelude.Text
}
deriving (ModifyVpnConnectionOptions -> ModifyVpnConnectionOptions -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ModifyVpnConnectionOptions -> ModifyVpnConnectionOptions -> Bool
$c/= :: ModifyVpnConnectionOptions -> ModifyVpnConnectionOptions -> Bool
== :: ModifyVpnConnectionOptions -> ModifyVpnConnectionOptions -> Bool
$c== :: ModifyVpnConnectionOptions -> ModifyVpnConnectionOptions -> Bool
Prelude.Eq, ReadPrec [ModifyVpnConnectionOptions]
ReadPrec ModifyVpnConnectionOptions
Int -> ReadS ModifyVpnConnectionOptions
ReadS [ModifyVpnConnectionOptions]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [ModifyVpnConnectionOptions]
$creadListPrec :: ReadPrec [ModifyVpnConnectionOptions]
readPrec :: ReadPrec ModifyVpnConnectionOptions
$creadPrec :: ReadPrec ModifyVpnConnectionOptions
readList :: ReadS [ModifyVpnConnectionOptions]
$creadList :: ReadS [ModifyVpnConnectionOptions]
readsPrec :: Int -> ReadS ModifyVpnConnectionOptions
$creadsPrec :: Int -> ReadS ModifyVpnConnectionOptions
Prelude.Read, Int -> ModifyVpnConnectionOptions -> ShowS
[ModifyVpnConnectionOptions] -> ShowS
ModifyVpnConnectionOptions -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ModifyVpnConnectionOptions] -> ShowS
$cshowList :: [ModifyVpnConnectionOptions] -> ShowS
show :: ModifyVpnConnectionOptions -> String
$cshow :: ModifyVpnConnectionOptions -> String
showsPrec :: Int -> ModifyVpnConnectionOptions -> ShowS
$cshowsPrec :: Int -> ModifyVpnConnectionOptions -> ShowS
Prelude.Show, forall x.
Rep ModifyVpnConnectionOptions x -> ModifyVpnConnectionOptions
forall x.
ModifyVpnConnectionOptions -> Rep ModifyVpnConnectionOptions x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep ModifyVpnConnectionOptions x -> ModifyVpnConnectionOptions
$cfrom :: forall x.
ModifyVpnConnectionOptions -> Rep ModifyVpnConnectionOptions x
Prelude.Generic)
newModifyVpnConnectionOptions ::
Prelude.Text ->
ModifyVpnConnectionOptions
newModifyVpnConnectionOptions :: Text -> ModifyVpnConnectionOptions
newModifyVpnConnectionOptions Text
pVpnConnectionId_ =
ModifyVpnConnectionOptions'
{ $sel:dryRun:ModifyVpnConnectionOptions' :: Maybe Bool
dryRun =
forall a. Maybe a
Prelude.Nothing,
$sel:localIpv4NetworkCidr:ModifyVpnConnectionOptions' :: Maybe Text
localIpv4NetworkCidr = forall a. Maybe a
Prelude.Nothing,
$sel:localIpv6NetworkCidr:ModifyVpnConnectionOptions' :: Maybe Text
localIpv6NetworkCidr = forall a. Maybe a
Prelude.Nothing,
$sel:remoteIpv4NetworkCidr:ModifyVpnConnectionOptions' :: Maybe Text
remoteIpv4NetworkCidr = forall a. Maybe a
Prelude.Nothing,
$sel:remoteIpv6NetworkCidr:ModifyVpnConnectionOptions' :: Maybe Text
remoteIpv6NetworkCidr = forall a. Maybe a
Prelude.Nothing,
$sel:vpnConnectionId:ModifyVpnConnectionOptions' :: Text
vpnConnectionId = Text
pVpnConnectionId_
}
modifyVpnConnectionOptions_dryRun :: Lens.Lens' ModifyVpnConnectionOptions (Prelude.Maybe Prelude.Bool)
modifyVpnConnectionOptions_dryRun :: Lens' ModifyVpnConnectionOptions (Maybe Bool)
modifyVpnConnectionOptions_dryRun = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyVpnConnectionOptions' {Maybe Bool
dryRun :: Maybe Bool
$sel:dryRun:ModifyVpnConnectionOptions' :: ModifyVpnConnectionOptions -> Maybe Bool
dryRun} -> Maybe Bool
dryRun) (\s :: ModifyVpnConnectionOptions
s@ModifyVpnConnectionOptions' {} Maybe Bool
a -> ModifyVpnConnectionOptions
s {$sel:dryRun:ModifyVpnConnectionOptions' :: Maybe Bool
dryRun = Maybe Bool
a} :: ModifyVpnConnectionOptions)
modifyVpnConnectionOptions_localIpv4NetworkCidr :: Lens.Lens' ModifyVpnConnectionOptions (Prelude.Maybe Prelude.Text)
modifyVpnConnectionOptions_localIpv4NetworkCidr :: Lens' ModifyVpnConnectionOptions (Maybe Text)
modifyVpnConnectionOptions_localIpv4NetworkCidr = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyVpnConnectionOptions' {Maybe Text
localIpv4NetworkCidr :: Maybe Text
$sel:localIpv4NetworkCidr:ModifyVpnConnectionOptions' :: ModifyVpnConnectionOptions -> Maybe Text
localIpv4NetworkCidr} -> Maybe Text
localIpv4NetworkCidr) (\s :: ModifyVpnConnectionOptions
s@ModifyVpnConnectionOptions' {} Maybe Text
a -> ModifyVpnConnectionOptions
s {$sel:localIpv4NetworkCidr:ModifyVpnConnectionOptions' :: Maybe Text
localIpv4NetworkCidr = Maybe Text
a} :: ModifyVpnConnectionOptions)
modifyVpnConnectionOptions_localIpv6NetworkCidr :: Lens.Lens' ModifyVpnConnectionOptions (Prelude.Maybe Prelude.Text)
modifyVpnConnectionOptions_localIpv6NetworkCidr :: Lens' ModifyVpnConnectionOptions (Maybe Text)
modifyVpnConnectionOptions_localIpv6NetworkCidr = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyVpnConnectionOptions' {Maybe Text
localIpv6NetworkCidr :: Maybe Text
$sel:localIpv6NetworkCidr:ModifyVpnConnectionOptions' :: ModifyVpnConnectionOptions -> Maybe Text
localIpv6NetworkCidr} -> Maybe Text
localIpv6NetworkCidr) (\s :: ModifyVpnConnectionOptions
s@ModifyVpnConnectionOptions' {} Maybe Text
a -> ModifyVpnConnectionOptions
s {$sel:localIpv6NetworkCidr:ModifyVpnConnectionOptions' :: Maybe Text
localIpv6NetworkCidr = Maybe Text
a} :: ModifyVpnConnectionOptions)
modifyVpnConnectionOptions_remoteIpv4NetworkCidr :: Lens.Lens' ModifyVpnConnectionOptions (Prelude.Maybe Prelude.Text)
modifyVpnConnectionOptions_remoteIpv4NetworkCidr :: Lens' ModifyVpnConnectionOptions (Maybe Text)
modifyVpnConnectionOptions_remoteIpv4NetworkCidr = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyVpnConnectionOptions' {Maybe Text
remoteIpv4NetworkCidr :: Maybe Text
$sel:remoteIpv4NetworkCidr:ModifyVpnConnectionOptions' :: ModifyVpnConnectionOptions -> Maybe Text
remoteIpv4NetworkCidr} -> Maybe Text
remoteIpv4NetworkCidr) (\s :: ModifyVpnConnectionOptions
s@ModifyVpnConnectionOptions' {} Maybe Text
a -> ModifyVpnConnectionOptions
s {$sel:remoteIpv4NetworkCidr:ModifyVpnConnectionOptions' :: Maybe Text
remoteIpv4NetworkCidr = Maybe Text
a} :: ModifyVpnConnectionOptions)
modifyVpnConnectionOptions_remoteIpv6NetworkCidr :: Lens.Lens' ModifyVpnConnectionOptions (Prelude.Maybe Prelude.Text)
modifyVpnConnectionOptions_remoteIpv6NetworkCidr :: Lens' ModifyVpnConnectionOptions (Maybe Text)
modifyVpnConnectionOptions_remoteIpv6NetworkCidr = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyVpnConnectionOptions' {Maybe Text
remoteIpv6NetworkCidr :: Maybe Text
$sel:remoteIpv6NetworkCidr:ModifyVpnConnectionOptions' :: ModifyVpnConnectionOptions -> Maybe Text
remoteIpv6NetworkCidr} -> Maybe Text
remoteIpv6NetworkCidr) (\s :: ModifyVpnConnectionOptions
s@ModifyVpnConnectionOptions' {} Maybe Text
a -> ModifyVpnConnectionOptions
s {$sel:remoteIpv6NetworkCidr:ModifyVpnConnectionOptions' :: Maybe Text
remoteIpv6NetworkCidr = Maybe Text
a} :: ModifyVpnConnectionOptions)
modifyVpnConnectionOptions_vpnConnectionId :: Lens.Lens' ModifyVpnConnectionOptions Prelude.Text
modifyVpnConnectionOptions_vpnConnectionId :: Lens' ModifyVpnConnectionOptions Text
modifyVpnConnectionOptions_vpnConnectionId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyVpnConnectionOptions' {Text
vpnConnectionId :: Text
$sel:vpnConnectionId:ModifyVpnConnectionOptions' :: ModifyVpnConnectionOptions -> Text
vpnConnectionId} -> Text
vpnConnectionId) (\s :: ModifyVpnConnectionOptions
s@ModifyVpnConnectionOptions' {} Text
a -> ModifyVpnConnectionOptions
s {$sel:vpnConnectionId:ModifyVpnConnectionOptions' :: Text
vpnConnectionId = Text
a} :: ModifyVpnConnectionOptions)
instance Core.AWSRequest ModifyVpnConnectionOptions where
type
AWSResponse ModifyVpnConnectionOptions =
ModifyVpnConnectionOptionsResponse
request :: (Service -> Service)
-> ModifyVpnConnectionOptions -> Request ModifyVpnConnectionOptions
request Service -> Service
overrides =
forall a. ToRequest a => Service -> a -> Request a
Request.postQuery (Service -> Service
overrides Service
defaultService)
response :: forall (m :: * -> *).
MonadResource m =>
(ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy ModifyVpnConnectionOptions
-> ClientResponse ClientBody
-> m (Either
Error (ClientResponse (AWSResponse ModifyVpnConnectionOptions)))
response =
forall (m :: * -> *) a.
MonadResource m =>
(Int -> ResponseHeaders -> [Node] -> Either String (AWSResponse a))
-> (ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy a
-> ClientResponse ClientBody
-> m (Either Error (ClientResponse (AWSResponse a)))
Response.receiveXML
( \Int
s ResponseHeaders
h [Node]
x ->
Maybe VpnConnection -> Int -> ModifyVpnConnectionOptionsResponse
ModifyVpnConnectionOptionsResponse'
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> ([Node]
x forall a. FromXML a => [Node] -> Text -> Either String (Maybe a)
Data..@? Text
"vpnConnection")
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 ModifyVpnConnectionOptions where
hashWithSalt :: Int -> ModifyVpnConnectionOptions -> Int
hashWithSalt Int
_salt ModifyVpnConnectionOptions' {Maybe Bool
Maybe Text
Text
vpnConnectionId :: Text
remoteIpv6NetworkCidr :: Maybe Text
remoteIpv4NetworkCidr :: Maybe Text
localIpv6NetworkCidr :: Maybe Text
localIpv4NetworkCidr :: Maybe Text
dryRun :: Maybe Bool
$sel:vpnConnectionId:ModifyVpnConnectionOptions' :: ModifyVpnConnectionOptions -> Text
$sel:remoteIpv6NetworkCidr:ModifyVpnConnectionOptions' :: ModifyVpnConnectionOptions -> Maybe Text
$sel:remoteIpv4NetworkCidr:ModifyVpnConnectionOptions' :: ModifyVpnConnectionOptions -> Maybe Text
$sel:localIpv6NetworkCidr:ModifyVpnConnectionOptions' :: ModifyVpnConnectionOptions -> Maybe Text
$sel:localIpv4NetworkCidr:ModifyVpnConnectionOptions' :: ModifyVpnConnectionOptions -> Maybe Text
$sel:dryRun:ModifyVpnConnectionOptions' :: ModifyVpnConnectionOptions -> Maybe Bool
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Bool
dryRun
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
localIpv4NetworkCidr
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
localIpv6NetworkCidr
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
remoteIpv4NetworkCidr
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
remoteIpv6NetworkCidr
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
vpnConnectionId
instance Prelude.NFData ModifyVpnConnectionOptions where
rnf :: ModifyVpnConnectionOptions -> ()
rnf ModifyVpnConnectionOptions' {Maybe Bool
Maybe Text
Text
vpnConnectionId :: Text
remoteIpv6NetworkCidr :: Maybe Text
remoteIpv4NetworkCidr :: Maybe Text
localIpv6NetworkCidr :: Maybe Text
localIpv4NetworkCidr :: Maybe Text
dryRun :: Maybe Bool
$sel:vpnConnectionId:ModifyVpnConnectionOptions' :: ModifyVpnConnectionOptions -> Text
$sel:remoteIpv6NetworkCidr:ModifyVpnConnectionOptions' :: ModifyVpnConnectionOptions -> Maybe Text
$sel:remoteIpv4NetworkCidr:ModifyVpnConnectionOptions' :: ModifyVpnConnectionOptions -> Maybe Text
$sel:localIpv6NetworkCidr:ModifyVpnConnectionOptions' :: ModifyVpnConnectionOptions -> Maybe Text
$sel:localIpv4NetworkCidr:ModifyVpnConnectionOptions' :: ModifyVpnConnectionOptions -> Maybe Text
$sel:dryRun:ModifyVpnConnectionOptions' :: ModifyVpnConnectionOptions -> Maybe Bool
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe Bool
dryRun
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
localIpv4NetworkCidr
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
localIpv6NetworkCidr
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
remoteIpv4NetworkCidr
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
remoteIpv6NetworkCidr
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
vpnConnectionId
instance Data.ToHeaders ModifyVpnConnectionOptions where
toHeaders :: ModifyVpnConnectionOptions -> ResponseHeaders
toHeaders = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty
instance Data.ToPath ModifyVpnConnectionOptions where
toPath :: ModifyVpnConnectionOptions -> ByteString
toPath = forall a b. a -> b -> a
Prelude.const ByteString
"/"
instance Data.ToQuery ModifyVpnConnectionOptions where
toQuery :: ModifyVpnConnectionOptions -> QueryString
toQuery ModifyVpnConnectionOptions' {Maybe Bool
Maybe Text
Text
vpnConnectionId :: Text
remoteIpv6NetworkCidr :: Maybe Text
remoteIpv4NetworkCidr :: Maybe Text
localIpv6NetworkCidr :: Maybe Text
localIpv4NetworkCidr :: Maybe Text
dryRun :: Maybe Bool
$sel:vpnConnectionId:ModifyVpnConnectionOptions' :: ModifyVpnConnectionOptions -> Text
$sel:remoteIpv6NetworkCidr:ModifyVpnConnectionOptions' :: ModifyVpnConnectionOptions -> Maybe Text
$sel:remoteIpv4NetworkCidr:ModifyVpnConnectionOptions' :: ModifyVpnConnectionOptions -> Maybe Text
$sel:localIpv6NetworkCidr:ModifyVpnConnectionOptions' :: ModifyVpnConnectionOptions -> Maybe Text
$sel:localIpv4NetworkCidr:ModifyVpnConnectionOptions' :: ModifyVpnConnectionOptions -> Maybe Text
$sel:dryRun:ModifyVpnConnectionOptions' :: ModifyVpnConnectionOptions -> Maybe Bool
..} =
forall a. Monoid a => [a] -> a
Prelude.mconcat
[ ByteString
"Action"
forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: (ByteString
"ModifyVpnConnectionOptions" :: Prelude.ByteString),
ByteString
"Version"
forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: (ByteString
"2016-11-15" :: Prelude.ByteString),
ByteString
"DryRun" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Bool
dryRun,
ByteString
"LocalIpv4NetworkCidr" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
localIpv4NetworkCidr,
ByteString
"LocalIpv6NetworkCidr" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
localIpv6NetworkCidr,
ByteString
"RemoteIpv4NetworkCidr"
forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
remoteIpv4NetworkCidr,
ByteString
"RemoteIpv6NetworkCidr"
forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
remoteIpv6NetworkCidr,
ByteString
"VpnConnectionId" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Text
vpnConnectionId
]
data ModifyVpnConnectionOptionsResponse = ModifyVpnConnectionOptionsResponse'
{
ModifyVpnConnectionOptionsResponse -> Maybe VpnConnection
vpnConnection :: Prelude.Maybe VpnConnection,
ModifyVpnConnectionOptionsResponse -> Int
httpStatus :: Prelude.Int
}
deriving (ModifyVpnConnectionOptionsResponse
-> ModifyVpnConnectionOptionsResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ModifyVpnConnectionOptionsResponse
-> ModifyVpnConnectionOptionsResponse -> Bool
$c/= :: ModifyVpnConnectionOptionsResponse
-> ModifyVpnConnectionOptionsResponse -> Bool
== :: ModifyVpnConnectionOptionsResponse
-> ModifyVpnConnectionOptionsResponse -> Bool
$c== :: ModifyVpnConnectionOptionsResponse
-> ModifyVpnConnectionOptionsResponse -> Bool
Prelude.Eq, ReadPrec [ModifyVpnConnectionOptionsResponse]
ReadPrec ModifyVpnConnectionOptionsResponse
Int -> ReadS ModifyVpnConnectionOptionsResponse
ReadS [ModifyVpnConnectionOptionsResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [ModifyVpnConnectionOptionsResponse]
$creadListPrec :: ReadPrec [ModifyVpnConnectionOptionsResponse]
readPrec :: ReadPrec ModifyVpnConnectionOptionsResponse
$creadPrec :: ReadPrec ModifyVpnConnectionOptionsResponse
readList :: ReadS [ModifyVpnConnectionOptionsResponse]
$creadList :: ReadS [ModifyVpnConnectionOptionsResponse]
readsPrec :: Int -> ReadS ModifyVpnConnectionOptionsResponse
$creadsPrec :: Int -> ReadS ModifyVpnConnectionOptionsResponse
Prelude.Read, Int -> ModifyVpnConnectionOptionsResponse -> ShowS
[ModifyVpnConnectionOptionsResponse] -> ShowS
ModifyVpnConnectionOptionsResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ModifyVpnConnectionOptionsResponse] -> ShowS
$cshowList :: [ModifyVpnConnectionOptionsResponse] -> ShowS
show :: ModifyVpnConnectionOptionsResponse -> String
$cshow :: ModifyVpnConnectionOptionsResponse -> String
showsPrec :: Int -> ModifyVpnConnectionOptionsResponse -> ShowS
$cshowsPrec :: Int -> ModifyVpnConnectionOptionsResponse -> ShowS
Prelude.Show, forall x.
Rep ModifyVpnConnectionOptionsResponse x
-> ModifyVpnConnectionOptionsResponse
forall x.
ModifyVpnConnectionOptionsResponse
-> Rep ModifyVpnConnectionOptionsResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep ModifyVpnConnectionOptionsResponse x
-> ModifyVpnConnectionOptionsResponse
$cfrom :: forall x.
ModifyVpnConnectionOptionsResponse
-> Rep ModifyVpnConnectionOptionsResponse x
Prelude.Generic)
newModifyVpnConnectionOptionsResponse ::
Prelude.Int ->
ModifyVpnConnectionOptionsResponse
newModifyVpnConnectionOptionsResponse :: Int -> ModifyVpnConnectionOptionsResponse
newModifyVpnConnectionOptionsResponse Int
pHttpStatus_ =
ModifyVpnConnectionOptionsResponse'
{ $sel:vpnConnection:ModifyVpnConnectionOptionsResponse' :: Maybe VpnConnection
vpnConnection =
forall a. Maybe a
Prelude.Nothing,
$sel:httpStatus:ModifyVpnConnectionOptionsResponse' :: Int
httpStatus = Int
pHttpStatus_
}
modifyVpnConnectionOptionsResponse_vpnConnection :: Lens.Lens' ModifyVpnConnectionOptionsResponse (Prelude.Maybe VpnConnection)
modifyVpnConnectionOptionsResponse_vpnConnection :: Lens' ModifyVpnConnectionOptionsResponse (Maybe VpnConnection)
modifyVpnConnectionOptionsResponse_vpnConnection = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyVpnConnectionOptionsResponse' {Maybe VpnConnection
vpnConnection :: Maybe VpnConnection
$sel:vpnConnection:ModifyVpnConnectionOptionsResponse' :: ModifyVpnConnectionOptionsResponse -> Maybe VpnConnection
vpnConnection} -> Maybe VpnConnection
vpnConnection) (\s :: ModifyVpnConnectionOptionsResponse
s@ModifyVpnConnectionOptionsResponse' {} Maybe VpnConnection
a -> ModifyVpnConnectionOptionsResponse
s {$sel:vpnConnection:ModifyVpnConnectionOptionsResponse' :: Maybe VpnConnection
vpnConnection = Maybe VpnConnection
a} :: ModifyVpnConnectionOptionsResponse)
modifyVpnConnectionOptionsResponse_httpStatus :: Lens.Lens' ModifyVpnConnectionOptionsResponse Prelude.Int
modifyVpnConnectionOptionsResponse_httpStatus :: Lens' ModifyVpnConnectionOptionsResponse Int
modifyVpnConnectionOptionsResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyVpnConnectionOptionsResponse' {Int
httpStatus :: Int
$sel:httpStatus:ModifyVpnConnectionOptionsResponse' :: ModifyVpnConnectionOptionsResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: ModifyVpnConnectionOptionsResponse
s@ModifyVpnConnectionOptionsResponse' {} Int
a -> ModifyVpnConnectionOptionsResponse
s {$sel:httpStatus:ModifyVpnConnectionOptionsResponse' :: Int
httpStatus = Int
a} :: ModifyVpnConnectionOptionsResponse)
instance
Prelude.NFData
ModifyVpnConnectionOptionsResponse
where
rnf :: ModifyVpnConnectionOptionsResponse -> ()
rnf ModifyVpnConnectionOptionsResponse' {Int
Maybe VpnConnection
httpStatus :: Int
vpnConnection :: Maybe VpnConnection
$sel:httpStatus:ModifyVpnConnectionOptionsResponse' :: ModifyVpnConnectionOptionsResponse -> Int
$sel:vpnConnection:ModifyVpnConnectionOptionsResponse' :: ModifyVpnConnectionOptionsResponse -> Maybe VpnConnection
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe VpnConnection
vpnConnection
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Int
httpStatus