{-# 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.AppMesh.Types.GatewayRouteData where
import Amazonka.AppMesh.Types.GatewayRouteSpec
import Amazonka.AppMesh.Types.GatewayRouteStatus
import Amazonka.AppMesh.Types.ResourceMetadata
import qualified Amazonka.Core as Core
import qualified Amazonka.Core.Lens.Internal as Lens
import qualified Amazonka.Data as Data
import qualified Amazonka.Prelude as Prelude
data GatewayRouteData = GatewayRouteData'
{
GatewayRouteData -> Text
gatewayRouteName :: Prelude.Text,
GatewayRouteData -> Text
meshName :: Prelude.Text,
GatewayRouteData -> ResourceMetadata
metadata :: ResourceMetadata,
GatewayRouteData -> GatewayRouteSpec
spec :: GatewayRouteSpec,
GatewayRouteData -> GatewayRouteStatus
status :: GatewayRouteStatus,
GatewayRouteData -> Text
virtualGatewayName :: Prelude.Text
}
deriving (GatewayRouteData -> GatewayRouteData -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: GatewayRouteData -> GatewayRouteData -> Bool
$c/= :: GatewayRouteData -> GatewayRouteData -> Bool
== :: GatewayRouteData -> GatewayRouteData -> Bool
$c== :: GatewayRouteData -> GatewayRouteData -> Bool
Prelude.Eq, ReadPrec [GatewayRouteData]
ReadPrec GatewayRouteData
Int -> ReadS GatewayRouteData
ReadS [GatewayRouteData]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [GatewayRouteData]
$creadListPrec :: ReadPrec [GatewayRouteData]
readPrec :: ReadPrec GatewayRouteData
$creadPrec :: ReadPrec GatewayRouteData
readList :: ReadS [GatewayRouteData]
$creadList :: ReadS [GatewayRouteData]
readsPrec :: Int -> ReadS GatewayRouteData
$creadsPrec :: Int -> ReadS GatewayRouteData
Prelude.Read, Int -> GatewayRouteData -> ShowS
[GatewayRouteData] -> ShowS
GatewayRouteData -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [GatewayRouteData] -> ShowS
$cshowList :: [GatewayRouteData] -> ShowS
show :: GatewayRouteData -> String
$cshow :: GatewayRouteData -> String
showsPrec :: Int -> GatewayRouteData -> ShowS
$cshowsPrec :: Int -> GatewayRouteData -> ShowS
Prelude.Show, forall x. Rep GatewayRouteData x -> GatewayRouteData
forall x. GatewayRouteData -> Rep GatewayRouteData x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep GatewayRouteData x -> GatewayRouteData
$cfrom :: forall x. GatewayRouteData -> Rep GatewayRouteData x
Prelude.Generic)
newGatewayRouteData ::
Prelude.Text ->
Prelude.Text ->
ResourceMetadata ->
GatewayRouteSpec ->
GatewayRouteStatus ->
Prelude.Text ->
GatewayRouteData
newGatewayRouteData :: Text
-> Text
-> ResourceMetadata
-> GatewayRouteSpec
-> GatewayRouteStatus
-> Text
-> GatewayRouteData
newGatewayRouteData
Text
pGatewayRouteName_
Text
pMeshName_
ResourceMetadata
pMetadata_
GatewayRouteSpec
pSpec_
GatewayRouteStatus
pStatus_
Text
pVirtualGatewayName_ =
GatewayRouteData'
{ $sel:gatewayRouteName:GatewayRouteData' :: Text
gatewayRouteName =
Text
pGatewayRouteName_,
$sel:meshName:GatewayRouteData' :: Text
meshName = Text
pMeshName_,
$sel:metadata:GatewayRouteData' :: ResourceMetadata
metadata = ResourceMetadata
pMetadata_,
$sel:spec:GatewayRouteData' :: GatewayRouteSpec
spec = GatewayRouteSpec
pSpec_,
$sel:status:GatewayRouteData' :: GatewayRouteStatus
status = GatewayRouteStatus
pStatus_,
$sel:virtualGatewayName:GatewayRouteData' :: Text
virtualGatewayName = Text
pVirtualGatewayName_
}
gatewayRouteData_gatewayRouteName :: Lens.Lens' GatewayRouteData Prelude.Text
gatewayRouteData_gatewayRouteName :: Lens' GatewayRouteData Text
gatewayRouteData_gatewayRouteName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GatewayRouteData' {Text
gatewayRouteName :: Text
$sel:gatewayRouteName:GatewayRouteData' :: GatewayRouteData -> Text
gatewayRouteName} -> Text
gatewayRouteName) (\s :: GatewayRouteData
s@GatewayRouteData' {} Text
a -> GatewayRouteData
s {$sel:gatewayRouteName:GatewayRouteData' :: Text
gatewayRouteName = Text
a} :: GatewayRouteData)
gatewayRouteData_meshName :: Lens.Lens' GatewayRouteData Prelude.Text
gatewayRouteData_meshName :: Lens' GatewayRouteData Text
gatewayRouteData_meshName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GatewayRouteData' {Text
meshName :: Text
$sel:meshName:GatewayRouteData' :: GatewayRouteData -> Text
meshName} -> Text
meshName) (\s :: GatewayRouteData
s@GatewayRouteData' {} Text
a -> GatewayRouteData
s {$sel:meshName:GatewayRouteData' :: Text
meshName = Text
a} :: GatewayRouteData)
gatewayRouteData_metadata :: Lens.Lens' GatewayRouteData ResourceMetadata
gatewayRouteData_metadata :: Lens' GatewayRouteData ResourceMetadata
gatewayRouteData_metadata = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GatewayRouteData' {ResourceMetadata
metadata :: ResourceMetadata
$sel:metadata:GatewayRouteData' :: GatewayRouteData -> ResourceMetadata
metadata} -> ResourceMetadata
metadata) (\s :: GatewayRouteData
s@GatewayRouteData' {} ResourceMetadata
a -> GatewayRouteData
s {$sel:metadata:GatewayRouteData' :: ResourceMetadata
metadata = ResourceMetadata
a} :: GatewayRouteData)
gatewayRouteData_spec :: Lens.Lens' GatewayRouteData GatewayRouteSpec
gatewayRouteData_spec :: Lens' GatewayRouteData GatewayRouteSpec
gatewayRouteData_spec = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GatewayRouteData' {GatewayRouteSpec
spec :: GatewayRouteSpec
$sel:spec:GatewayRouteData' :: GatewayRouteData -> GatewayRouteSpec
spec} -> GatewayRouteSpec
spec) (\s :: GatewayRouteData
s@GatewayRouteData' {} GatewayRouteSpec
a -> GatewayRouteData
s {$sel:spec:GatewayRouteData' :: GatewayRouteSpec
spec = GatewayRouteSpec
a} :: GatewayRouteData)
gatewayRouteData_status :: Lens.Lens' GatewayRouteData GatewayRouteStatus
gatewayRouteData_status :: Lens' GatewayRouteData GatewayRouteStatus
gatewayRouteData_status = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GatewayRouteData' {GatewayRouteStatus
status :: GatewayRouteStatus
$sel:status:GatewayRouteData' :: GatewayRouteData -> GatewayRouteStatus
status} -> GatewayRouteStatus
status) (\s :: GatewayRouteData
s@GatewayRouteData' {} GatewayRouteStatus
a -> GatewayRouteData
s {$sel:status:GatewayRouteData' :: GatewayRouteStatus
status = GatewayRouteStatus
a} :: GatewayRouteData)
gatewayRouteData_virtualGatewayName :: Lens.Lens' GatewayRouteData Prelude.Text
gatewayRouteData_virtualGatewayName :: Lens' GatewayRouteData Text
gatewayRouteData_virtualGatewayName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GatewayRouteData' {Text
virtualGatewayName :: Text
$sel:virtualGatewayName:GatewayRouteData' :: GatewayRouteData -> Text
virtualGatewayName} -> Text
virtualGatewayName) (\s :: GatewayRouteData
s@GatewayRouteData' {} Text
a -> GatewayRouteData
s {$sel:virtualGatewayName:GatewayRouteData' :: Text
virtualGatewayName = Text
a} :: GatewayRouteData)
instance Data.FromJSON GatewayRouteData where
parseJSON :: Value -> Parser GatewayRouteData
parseJSON =
forall a. String -> (Object -> Parser a) -> Value -> Parser a
Data.withObject
String
"GatewayRouteData"
( \Object
x ->
Text
-> Text
-> ResourceMetadata
-> GatewayRouteSpec
-> GatewayRouteStatus
-> Text
-> GatewayRouteData
GatewayRouteData'
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> (Object
x forall a. FromJSON a => Object -> Key -> Parser a
Data..: Key
"gatewayRouteName")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser a
Data..: Key
"meshName")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser a
Data..: Key
"metadata")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser a
Data..: Key
"spec")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser a
Data..: Key
"status")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser a
Data..: Key
"virtualGatewayName")
)
instance Prelude.Hashable GatewayRouteData where
hashWithSalt :: Int -> GatewayRouteData -> Int
hashWithSalt Int
_salt GatewayRouteData' {Text
GatewayRouteStatus
GatewayRouteSpec
ResourceMetadata
virtualGatewayName :: Text
status :: GatewayRouteStatus
spec :: GatewayRouteSpec
metadata :: ResourceMetadata
meshName :: Text
gatewayRouteName :: Text
$sel:virtualGatewayName:GatewayRouteData' :: GatewayRouteData -> Text
$sel:status:GatewayRouteData' :: GatewayRouteData -> GatewayRouteStatus
$sel:spec:GatewayRouteData' :: GatewayRouteData -> GatewayRouteSpec
$sel:metadata:GatewayRouteData' :: GatewayRouteData -> ResourceMetadata
$sel:meshName:GatewayRouteData' :: GatewayRouteData -> Text
$sel:gatewayRouteName:GatewayRouteData' :: GatewayRouteData -> Text
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
gatewayRouteName
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
meshName
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` ResourceMetadata
metadata
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` GatewayRouteSpec
spec
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` GatewayRouteStatus
status
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
virtualGatewayName
instance Prelude.NFData GatewayRouteData where
rnf :: GatewayRouteData -> ()
rnf GatewayRouteData' {Text
GatewayRouteStatus
GatewayRouteSpec
ResourceMetadata
virtualGatewayName :: Text
status :: GatewayRouteStatus
spec :: GatewayRouteSpec
metadata :: ResourceMetadata
meshName :: Text
gatewayRouteName :: Text
$sel:virtualGatewayName:GatewayRouteData' :: GatewayRouteData -> Text
$sel:status:GatewayRouteData' :: GatewayRouteData -> GatewayRouteStatus
$sel:spec:GatewayRouteData' :: GatewayRouteData -> GatewayRouteSpec
$sel:metadata:GatewayRouteData' :: GatewayRouteData -> ResourceMetadata
$sel:meshName:GatewayRouteData' :: GatewayRouteData -> Text
$sel:gatewayRouteName:GatewayRouteData' :: GatewayRouteData -> Text
..} =
forall a. NFData a => a -> ()
Prelude.rnf Text
gatewayRouteName
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
meshName
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf ResourceMetadata
metadata
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf GatewayRouteSpec
spec
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf GatewayRouteStatus
status
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
virtualGatewayName