{-# 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 #-}

-- Derived from AWS service descriptions, licensed under Apache 2.0.

-- |
-- Module      : Amazonka.EC2.ModifyLocalGatewayRoute
-- Copyright   : (c) 2013-2023 Brendan Hay
-- License     : Mozilla Public License, v. 2.0.
-- Maintainer  : Brendan Hay
-- Stability   : auto-generated
-- Portability : non-portable (GHC extensions)
--
-- Modifies the specified local gateway route.
module Amazonka.EC2.ModifyLocalGatewayRoute
  ( -- * Creating a Request
    ModifyLocalGatewayRoute (..),
    newModifyLocalGatewayRoute,

    -- * Request Lenses
    modifyLocalGatewayRoute_dryRun,
    modifyLocalGatewayRoute_localGatewayVirtualInterfaceGroupId,
    modifyLocalGatewayRoute_networkInterfaceId,
    modifyLocalGatewayRoute_destinationCidrBlock,
    modifyLocalGatewayRoute_localGatewayRouteTableId,

    -- * Destructuring the Response
    ModifyLocalGatewayRouteResponse (..),
    newModifyLocalGatewayRouteResponse,

    -- * Response Lenses
    modifyLocalGatewayRouteResponse_route,
    modifyLocalGatewayRouteResponse_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

-- | /See:/ 'newModifyLocalGatewayRoute' smart constructor.
data ModifyLocalGatewayRoute = ModifyLocalGatewayRoute'
  { -- | Checks whether you have the required permissions for the action, without
    -- actually making the request, and provides an error response. If you have
    -- the required permissions, the error response is @DryRunOperation@.
    -- Otherwise, it is @UnauthorizedOperation@.
    ModifyLocalGatewayRoute -> Maybe Bool
dryRun :: Prelude.Maybe Prelude.Bool,
    -- | The ID of the virtual interface group.
    ModifyLocalGatewayRoute -> Maybe Text
localGatewayVirtualInterfaceGroupId :: Prelude.Maybe Prelude.Text,
    -- | The ID of the network interface.
    ModifyLocalGatewayRoute -> Maybe Text
networkInterfaceId :: Prelude.Maybe Prelude.Text,
    -- | The CIDR block used for destination matches. The value that you provide
    -- must match the CIDR of an existing route in the table.
    ModifyLocalGatewayRoute -> Text
destinationCidrBlock :: Prelude.Text,
    -- | The ID of the local gateway route table.
    ModifyLocalGatewayRoute -> Text
localGatewayRouteTableId :: Prelude.Text
  }
  deriving (ModifyLocalGatewayRoute -> ModifyLocalGatewayRoute -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ModifyLocalGatewayRoute -> ModifyLocalGatewayRoute -> Bool
$c/= :: ModifyLocalGatewayRoute -> ModifyLocalGatewayRoute -> Bool
== :: ModifyLocalGatewayRoute -> ModifyLocalGatewayRoute -> Bool
$c== :: ModifyLocalGatewayRoute -> ModifyLocalGatewayRoute -> Bool
Prelude.Eq, ReadPrec [ModifyLocalGatewayRoute]
ReadPrec ModifyLocalGatewayRoute
Int -> ReadS ModifyLocalGatewayRoute
ReadS [ModifyLocalGatewayRoute]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [ModifyLocalGatewayRoute]
$creadListPrec :: ReadPrec [ModifyLocalGatewayRoute]
readPrec :: ReadPrec ModifyLocalGatewayRoute
$creadPrec :: ReadPrec ModifyLocalGatewayRoute
readList :: ReadS [ModifyLocalGatewayRoute]
$creadList :: ReadS [ModifyLocalGatewayRoute]
readsPrec :: Int -> ReadS ModifyLocalGatewayRoute
$creadsPrec :: Int -> ReadS ModifyLocalGatewayRoute
Prelude.Read, Int -> ModifyLocalGatewayRoute -> ShowS
[ModifyLocalGatewayRoute] -> ShowS
ModifyLocalGatewayRoute -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ModifyLocalGatewayRoute] -> ShowS
$cshowList :: [ModifyLocalGatewayRoute] -> ShowS
show :: ModifyLocalGatewayRoute -> String
$cshow :: ModifyLocalGatewayRoute -> String
showsPrec :: Int -> ModifyLocalGatewayRoute -> ShowS
$cshowsPrec :: Int -> ModifyLocalGatewayRoute -> ShowS
Prelude.Show, forall x. Rep ModifyLocalGatewayRoute x -> ModifyLocalGatewayRoute
forall x. ModifyLocalGatewayRoute -> Rep ModifyLocalGatewayRoute x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep ModifyLocalGatewayRoute x -> ModifyLocalGatewayRoute
$cfrom :: forall x. ModifyLocalGatewayRoute -> Rep ModifyLocalGatewayRoute x
Prelude.Generic)

-- |
-- Create a value of 'ModifyLocalGatewayRoute' with all optional fields omitted.
--
-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.
--
-- The following record fields are available, with the corresponding lenses provided
-- for backwards compatibility:
--
-- 'dryRun', 'modifyLocalGatewayRoute_dryRun' - Checks whether you have the required permissions for the action, without
-- actually making the request, and provides an error response. If you have
-- the required permissions, the error response is @DryRunOperation@.
-- Otherwise, it is @UnauthorizedOperation@.
--
-- 'localGatewayVirtualInterfaceGroupId', 'modifyLocalGatewayRoute_localGatewayVirtualInterfaceGroupId' - The ID of the virtual interface group.
--
-- 'networkInterfaceId', 'modifyLocalGatewayRoute_networkInterfaceId' - The ID of the network interface.
--
-- 'destinationCidrBlock', 'modifyLocalGatewayRoute_destinationCidrBlock' - The CIDR block used for destination matches. The value that you provide
-- must match the CIDR of an existing route in the table.
--
-- 'localGatewayRouteTableId', 'modifyLocalGatewayRoute_localGatewayRouteTableId' - The ID of the local gateway route table.
newModifyLocalGatewayRoute ::
  -- | 'destinationCidrBlock'
  Prelude.Text ->
  -- | 'localGatewayRouteTableId'
  Prelude.Text ->
  ModifyLocalGatewayRoute
newModifyLocalGatewayRoute :: Text -> Text -> ModifyLocalGatewayRoute
newModifyLocalGatewayRoute
  Text
pDestinationCidrBlock_
  Text
pLocalGatewayRouteTableId_ =
    ModifyLocalGatewayRoute'
      { $sel:dryRun:ModifyLocalGatewayRoute' :: Maybe Bool
dryRun = forall a. Maybe a
Prelude.Nothing,
        $sel:localGatewayVirtualInterfaceGroupId:ModifyLocalGatewayRoute' :: Maybe Text
localGatewayVirtualInterfaceGroupId =
          forall a. Maybe a
Prelude.Nothing,
        $sel:networkInterfaceId:ModifyLocalGatewayRoute' :: Maybe Text
networkInterfaceId = forall a. Maybe a
Prelude.Nothing,
        $sel:destinationCidrBlock:ModifyLocalGatewayRoute' :: Text
destinationCidrBlock = Text
pDestinationCidrBlock_,
        $sel:localGatewayRouteTableId:ModifyLocalGatewayRoute' :: Text
localGatewayRouteTableId =
          Text
pLocalGatewayRouteTableId_
      }

-- | Checks whether you have the required permissions for the action, without
-- actually making the request, and provides an error response. If you have
-- the required permissions, the error response is @DryRunOperation@.
-- Otherwise, it is @UnauthorizedOperation@.
modifyLocalGatewayRoute_dryRun :: Lens.Lens' ModifyLocalGatewayRoute (Prelude.Maybe Prelude.Bool)
modifyLocalGatewayRoute_dryRun :: Lens' ModifyLocalGatewayRoute (Maybe Bool)
modifyLocalGatewayRoute_dryRun = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyLocalGatewayRoute' {Maybe Bool
dryRun :: Maybe Bool
$sel:dryRun:ModifyLocalGatewayRoute' :: ModifyLocalGatewayRoute -> Maybe Bool
dryRun} -> Maybe Bool
dryRun) (\s :: ModifyLocalGatewayRoute
s@ModifyLocalGatewayRoute' {} Maybe Bool
a -> ModifyLocalGatewayRoute
s {$sel:dryRun:ModifyLocalGatewayRoute' :: Maybe Bool
dryRun = Maybe Bool
a} :: ModifyLocalGatewayRoute)

-- | The ID of the virtual interface group.
modifyLocalGatewayRoute_localGatewayVirtualInterfaceGroupId :: Lens.Lens' ModifyLocalGatewayRoute (Prelude.Maybe Prelude.Text)
modifyLocalGatewayRoute_localGatewayVirtualInterfaceGroupId :: Lens' ModifyLocalGatewayRoute (Maybe Text)
modifyLocalGatewayRoute_localGatewayVirtualInterfaceGroupId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyLocalGatewayRoute' {Maybe Text
localGatewayVirtualInterfaceGroupId :: Maybe Text
$sel:localGatewayVirtualInterfaceGroupId:ModifyLocalGatewayRoute' :: ModifyLocalGatewayRoute -> Maybe Text
localGatewayVirtualInterfaceGroupId} -> Maybe Text
localGatewayVirtualInterfaceGroupId) (\s :: ModifyLocalGatewayRoute
s@ModifyLocalGatewayRoute' {} Maybe Text
a -> ModifyLocalGatewayRoute
s {$sel:localGatewayVirtualInterfaceGroupId:ModifyLocalGatewayRoute' :: Maybe Text
localGatewayVirtualInterfaceGroupId = Maybe Text
a} :: ModifyLocalGatewayRoute)

-- | The ID of the network interface.
modifyLocalGatewayRoute_networkInterfaceId :: Lens.Lens' ModifyLocalGatewayRoute (Prelude.Maybe Prelude.Text)
modifyLocalGatewayRoute_networkInterfaceId :: Lens' ModifyLocalGatewayRoute (Maybe Text)
modifyLocalGatewayRoute_networkInterfaceId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyLocalGatewayRoute' {Maybe Text
networkInterfaceId :: Maybe Text
$sel:networkInterfaceId:ModifyLocalGatewayRoute' :: ModifyLocalGatewayRoute -> Maybe Text
networkInterfaceId} -> Maybe Text
networkInterfaceId) (\s :: ModifyLocalGatewayRoute
s@ModifyLocalGatewayRoute' {} Maybe Text
a -> ModifyLocalGatewayRoute
s {$sel:networkInterfaceId:ModifyLocalGatewayRoute' :: Maybe Text
networkInterfaceId = Maybe Text
a} :: ModifyLocalGatewayRoute)

-- | The CIDR block used for destination matches. The value that you provide
-- must match the CIDR of an existing route in the table.
modifyLocalGatewayRoute_destinationCidrBlock :: Lens.Lens' ModifyLocalGatewayRoute Prelude.Text
modifyLocalGatewayRoute_destinationCidrBlock :: Lens' ModifyLocalGatewayRoute Text
modifyLocalGatewayRoute_destinationCidrBlock = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyLocalGatewayRoute' {Text
destinationCidrBlock :: Text
$sel:destinationCidrBlock:ModifyLocalGatewayRoute' :: ModifyLocalGatewayRoute -> Text
destinationCidrBlock} -> Text
destinationCidrBlock) (\s :: ModifyLocalGatewayRoute
s@ModifyLocalGatewayRoute' {} Text
a -> ModifyLocalGatewayRoute
s {$sel:destinationCidrBlock:ModifyLocalGatewayRoute' :: Text
destinationCidrBlock = Text
a} :: ModifyLocalGatewayRoute)

-- | The ID of the local gateway route table.
modifyLocalGatewayRoute_localGatewayRouteTableId :: Lens.Lens' ModifyLocalGatewayRoute Prelude.Text
modifyLocalGatewayRoute_localGatewayRouteTableId :: Lens' ModifyLocalGatewayRoute Text
modifyLocalGatewayRoute_localGatewayRouteTableId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyLocalGatewayRoute' {Text
localGatewayRouteTableId :: Text
$sel:localGatewayRouteTableId:ModifyLocalGatewayRoute' :: ModifyLocalGatewayRoute -> Text
localGatewayRouteTableId} -> Text
localGatewayRouteTableId) (\s :: ModifyLocalGatewayRoute
s@ModifyLocalGatewayRoute' {} Text
a -> ModifyLocalGatewayRoute
s {$sel:localGatewayRouteTableId:ModifyLocalGatewayRoute' :: Text
localGatewayRouteTableId = Text
a} :: ModifyLocalGatewayRoute)

instance Core.AWSRequest ModifyLocalGatewayRoute where
  type
    AWSResponse ModifyLocalGatewayRoute =
      ModifyLocalGatewayRouteResponse
  request :: (Service -> Service)
-> ModifyLocalGatewayRoute -> Request ModifyLocalGatewayRoute
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 ModifyLocalGatewayRoute
-> ClientResponse ClientBody
-> m (Either
        Error (ClientResponse (AWSResponse ModifyLocalGatewayRoute)))
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 LocalGatewayRoute -> Int -> ModifyLocalGatewayRouteResponse
ModifyLocalGatewayRouteResponse'
            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
"route")
            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 ModifyLocalGatewayRoute where
  hashWithSalt :: Int -> ModifyLocalGatewayRoute -> Int
hashWithSalt Int
_salt ModifyLocalGatewayRoute' {Maybe Bool
Maybe Text
Text
localGatewayRouteTableId :: Text
destinationCidrBlock :: Text
networkInterfaceId :: Maybe Text
localGatewayVirtualInterfaceGroupId :: Maybe Text
dryRun :: Maybe Bool
$sel:localGatewayRouteTableId:ModifyLocalGatewayRoute' :: ModifyLocalGatewayRoute -> Text
$sel:destinationCidrBlock:ModifyLocalGatewayRoute' :: ModifyLocalGatewayRoute -> Text
$sel:networkInterfaceId:ModifyLocalGatewayRoute' :: ModifyLocalGatewayRoute -> Maybe Text
$sel:localGatewayVirtualInterfaceGroupId:ModifyLocalGatewayRoute' :: ModifyLocalGatewayRoute -> Maybe Text
$sel:dryRun:ModifyLocalGatewayRoute' :: ModifyLocalGatewayRoute -> 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
localGatewayVirtualInterfaceGroupId
      forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
networkInterfaceId
      forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
destinationCidrBlock
      forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
localGatewayRouteTableId

instance Prelude.NFData ModifyLocalGatewayRoute where
  rnf :: ModifyLocalGatewayRoute -> ()
rnf ModifyLocalGatewayRoute' {Maybe Bool
Maybe Text
Text
localGatewayRouteTableId :: Text
destinationCidrBlock :: Text
networkInterfaceId :: Maybe Text
localGatewayVirtualInterfaceGroupId :: Maybe Text
dryRun :: Maybe Bool
$sel:localGatewayRouteTableId:ModifyLocalGatewayRoute' :: ModifyLocalGatewayRoute -> Text
$sel:destinationCidrBlock:ModifyLocalGatewayRoute' :: ModifyLocalGatewayRoute -> Text
$sel:networkInterfaceId:ModifyLocalGatewayRoute' :: ModifyLocalGatewayRoute -> Maybe Text
$sel:localGatewayVirtualInterfaceGroupId:ModifyLocalGatewayRoute' :: ModifyLocalGatewayRoute -> Maybe Text
$sel:dryRun:ModifyLocalGatewayRoute' :: ModifyLocalGatewayRoute -> 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
localGatewayVirtualInterfaceGroupId
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
networkInterfaceId
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
destinationCidrBlock
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
localGatewayRouteTableId

instance Data.ToHeaders ModifyLocalGatewayRoute where
  toHeaders :: ModifyLocalGatewayRoute -> ResponseHeaders
toHeaders = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty

instance Data.ToPath ModifyLocalGatewayRoute where
  toPath :: ModifyLocalGatewayRoute -> ByteString
toPath = forall a b. a -> b -> a
Prelude.const ByteString
"/"

instance Data.ToQuery ModifyLocalGatewayRoute where
  toQuery :: ModifyLocalGatewayRoute -> QueryString
toQuery ModifyLocalGatewayRoute' {Maybe Bool
Maybe Text
Text
localGatewayRouteTableId :: Text
destinationCidrBlock :: Text
networkInterfaceId :: Maybe Text
localGatewayVirtualInterfaceGroupId :: Maybe Text
dryRun :: Maybe Bool
$sel:localGatewayRouteTableId:ModifyLocalGatewayRoute' :: ModifyLocalGatewayRoute -> Text
$sel:destinationCidrBlock:ModifyLocalGatewayRoute' :: ModifyLocalGatewayRoute -> Text
$sel:networkInterfaceId:ModifyLocalGatewayRoute' :: ModifyLocalGatewayRoute -> Maybe Text
$sel:localGatewayVirtualInterfaceGroupId:ModifyLocalGatewayRoute' :: ModifyLocalGatewayRoute -> Maybe Text
$sel:dryRun:ModifyLocalGatewayRoute' :: ModifyLocalGatewayRoute -> Maybe Bool
..} =
    forall a. Monoid a => [a] -> a
Prelude.mconcat
      [ ByteString
"Action"
          forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: (ByteString
"ModifyLocalGatewayRoute" :: 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
"LocalGatewayVirtualInterfaceGroupId"
          forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
localGatewayVirtualInterfaceGroupId,
        ByteString
"NetworkInterfaceId" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
networkInterfaceId,
        ByteString
"DestinationCidrBlock" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Text
destinationCidrBlock,
        ByteString
"LocalGatewayRouteTableId"
          forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Text
localGatewayRouteTableId
      ]

-- | /See:/ 'newModifyLocalGatewayRouteResponse' smart constructor.
data ModifyLocalGatewayRouteResponse = ModifyLocalGatewayRouteResponse'
  { -- | Information about the local gateway route table.
    ModifyLocalGatewayRouteResponse -> Maybe LocalGatewayRoute
route :: Prelude.Maybe LocalGatewayRoute,
    -- | The response's http status code.
    ModifyLocalGatewayRouteResponse -> Int
httpStatus :: Prelude.Int
  }
  deriving (ModifyLocalGatewayRouteResponse
-> ModifyLocalGatewayRouteResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ModifyLocalGatewayRouteResponse
-> ModifyLocalGatewayRouteResponse -> Bool
$c/= :: ModifyLocalGatewayRouteResponse
-> ModifyLocalGatewayRouteResponse -> Bool
== :: ModifyLocalGatewayRouteResponse
-> ModifyLocalGatewayRouteResponse -> Bool
$c== :: ModifyLocalGatewayRouteResponse
-> ModifyLocalGatewayRouteResponse -> Bool
Prelude.Eq, ReadPrec [ModifyLocalGatewayRouteResponse]
ReadPrec ModifyLocalGatewayRouteResponse
Int -> ReadS ModifyLocalGatewayRouteResponse
ReadS [ModifyLocalGatewayRouteResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [ModifyLocalGatewayRouteResponse]
$creadListPrec :: ReadPrec [ModifyLocalGatewayRouteResponse]
readPrec :: ReadPrec ModifyLocalGatewayRouteResponse
$creadPrec :: ReadPrec ModifyLocalGatewayRouteResponse
readList :: ReadS [ModifyLocalGatewayRouteResponse]
$creadList :: ReadS [ModifyLocalGatewayRouteResponse]
readsPrec :: Int -> ReadS ModifyLocalGatewayRouteResponse
$creadsPrec :: Int -> ReadS ModifyLocalGatewayRouteResponse
Prelude.Read, Int -> ModifyLocalGatewayRouteResponse -> ShowS
[ModifyLocalGatewayRouteResponse] -> ShowS
ModifyLocalGatewayRouteResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ModifyLocalGatewayRouteResponse] -> ShowS
$cshowList :: [ModifyLocalGatewayRouteResponse] -> ShowS
show :: ModifyLocalGatewayRouteResponse -> String
$cshow :: ModifyLocalGatewayRouteResponse -> String
showsPrec :: Int -> ModifyLocalGatewayRouteResponse -> ShowS
$cshowsPrec :: Int -> ModifyLocalGatewayRouteResponse -> ShowS
Prelude.Show, forall x.
Rep ModifyLocalGatewayRouteResponse x
-> ModifyLocalGatewayRouteResponse
forall x.
ModifyLocalGatewayRouteResponse
-> Rep ModifyLocalGatewayRouteResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep ModifyLocalGatewayRouteResponse x
-> ModifyLocalGatewayRouteResponse
$cfrom :: forall x.
ModifyLocalGatewayRouteResponse
-> Rep ModifyLocalGatewayRouteResponse x
Prelude.Generic)

-- |
-- Create a value of 'ModifyLocalGatewayRouteResponse' with all optional fields omitted.
--
-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.
--
-- The following record fields are available, with the corresponding lenses provided
-- for backwards compatibility:
--
-- 'route', 'modifyLocalGatewayRouteResponse_route' - Information about the local gateway route table.
--
-- 'httpStatus', 'modifyLocalGatewayRouteResponse_httpStatus' - The response's http status code.
newModifyLocalGatewayRouteResponse ::
  -- | 'httpStatus'
  Prelude.Int ->
  ModifyLocalGatewayRouteResponse
newModifyLocalGatewayRouteResponse :: Int -> ModifyLocalGatewayRouteResponse
newModifyLocalGatewayRouteResponse Int
pHttpStatus_ =
  ModifyLocalGatewayRouteResponse'
    { $sel:route:ModifyLocalGatewayRouteResponse' :: Maybe LocalGatewayRoute
route =
        forall a. Maybe a
Prelude.Nothing,
      $sel:httpStatus:ModifyLocalGatewayRouteResponse' :: Int
httpStatus = Int
pHttpStatus_
    }

-- | Information about the local gateway route table.
modifyLocalGatewayRouteResponse_route :: Lens.Lens' ModifyLocalGatewayRouteResponse (Prelude.Maybe LocalGatewayRoute)
modifyLocalGatewayRouteResponse_route :: Lens' ModifyLocalGatewayRouteResponse (Maybe LocalGatewayRoute)
modifyLocalGatewayRouteResponse_route = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyLocalGatewayRouteResponse' {Maybe LocalGatewayRoute
route :: Maybe LocalGatewayRoute
$sel:route:ModifyLocalGatewayRouteResponse' :: ModifyLocalGatewayRouteResponse -> Maybe LocalGatewayRoute
route} -> Maybe LocalGatewayRoute
route) (\s :: ModifyLocalGatewayRouteResponse
s@ModifyLocalGatewayRouteResponse' {} Maybe LocalGatewayRoute
a -> ModifyLocalGatewayRouteResponse
s {$sel:route:ModifyLocalGatewayRouteResponse' :: Maybe LocalGatewayRoute
route = Maybe LocalGatewayRoute
a} :: ModifyLocalGatewayRouteResponse)

-- | The response's http status code.
modifyLocalGatewayRouteResponse_httpStatus :: Lens.Lens' ModifyLocalGatewayRouteResponse Prelude.Int
modifyLocalGatewayRouteResponse_httpStatus :: Lens' ModifyLocalGatewayRouteResponse Int
modifyLocalGatewayRouteResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyLocalGatewayRouteResponse' {Int
httpStatus :: Int
$sel:httpStatus:ModifyLocalGatewayRouteResponse' :: ModifyLocalGatewayRouteResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: ModifyLocalGatewayRouteResponse
s@ModifyLocalGatewayRouteResponse' {} Int
a -> ModifyLocalGatewayRouteResponse
s {$sel:httpStatus:ModifyLocalGatewayRouteResponse' :: Int
httpStatus = Int
a} :: ModifyLocalGatewayRouteResponse)

instance
  Prelude.NFData
    ModifyLocalGatewayRouteResponse
  where
  rnf :: ModifyLocalGatewayRouteResponse -> ()
rnf ModifyLocalGatewayRouteResponse' {Int
Maybe LocalGatewayRoute
httpStatus :: Int
route :: Maybe LocalGatewayRoute
$sel:httpStatus:ModifyLocalGatewayRouteResponse' :: ModifyLocalGatewayRouteResponse -> Int
$sel:route:ModifyLocalGatewayRouteResponse' :: ModifyLocalGatewayRouteResponse -> Maybe LocalGatewayRoute
..} =
    forall a. NFData a => a -> ()
Prelude.rnf Maybe LocalGatewayRoute
route
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Int
httpStatus