{-# 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.NetworkManager.Types.NetworkTelemetry where
import qualified Amazonka.Core as Core
import qualified Amazonka.Core.Lens.Internal as Lens
import qualified Amazonka.Data as Data
import Amazonka.NetworkManager.Types.ConnectionHealth
import qualified Amazonka.Prelude as Prelude
data NetworkTelemetry = NetworkTelemetry'
{
NetworkTelemetry -> Maybe Text
accountId :: Prelude.Maybe Prelude.Text,
NetworkTelemetry -> Maybe Text
address :: Prelude.Maybe Prelude.Text,
NetworkTelemetry -> Maybe Text
awsRegion :: Prelude.Maybe Prelude.Text,
NetworkTelemetry -> Maybe Text
coreNetworkId :: Prelude.Maybe Prelude.Text,
NetworkTelemetry -> Maybe ConnectionHealth
health :: Prelude.Maybe ConnectionHealth,
NetworkTelemetry -> Maybe Text
registeredGatewayArn :: Prelude.Maybe Prelude.Text,
NetworkTelemetry -> Maybe Text
resourceArn :: Prelude.Maybe Prelude.Text,
NetworkTelemetry -> Maybe Text
resourceId :: Prelude.Maybe Prelude.Text,
NetworkTelemetry -> Maybe Text
resourceType :: Prelude.Maybe Prelude.Text
}
deriving (NetworkTelemetry -> NetworkTelemetry -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: NetworkTelemetry -> NetworkTelemetry -> Bool
$c/= :: NetworkTelemetry -> NetworkTelemetry -> Bool
== :: NetworkTelemetry -> NetworkTelemetry -> Bool
$c== :: NetworkTelemetry -> NetworkTelemetry -> Bool
Prelude.Eq, ReadPrec [NetworkTelemetry]
ReadPrec NetworkTelemetry
Int -> ReadS NetworkTelemetry
ReadS [NetworkTelemetry]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [NetworkTelemetry]
$creadListPrec :: ReadPrec [NetworkTelemetry]
readPrec :: ReadPrec NetworkTelemetry
$creadPrec :: ReadPrec NetworkTelemetry
readList :: ReadS [NetworkTelemetry]
$creadList :: ReadS [NetworkTelemetry]
readsPrec :: Int -> ReadS NetworkTelemetry
$creadsPrec :: Int -> ReadS NetworkTelemetry
Prelude.Read, Int -> NetworkTelemetry -> ShowS
[NetworkTelemetry] -> ShowS
NetworkTelemetry -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [NetworkTelemetry] -> ShowS
$cshowList :: [NetworkTelemetry] -> ShowS
show :: NetworkTelemetry -> String
$cshow :: NetworkTelemetry -> String
showsPrec :: Int -> NetworkTelemetry -> ShowS
$cshowsPrec :: Int -> NetworkTelemetry -> ShowS
Prelude.Show, forall x. Rep NetworkTelemetry x -> NetworkTelemetry
forall x. NetworkTelemetry -> Rep NetworkTelemetry x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep NetworkTelemetry x -> NetworkTelemetry
$cfrom :: forall x. NetworkTelemetry -> Rep NetworkTelemetry x
Prelude.Generic)
newNetworkTelemetry ::
NetworkTelemetry
newNetworkTelemetry :: NetworkTelemetry
newNetworkTelemetry =
NetworkTelemetry'
{ $sel:accountId:NetworkTelemetry' :: Maybe Text
accountId = forall a. Maybe a
Prelude.Nothing,
$sel:address:NetworkTelemetry' :: Maybe Text
address = forall a. Maybe a
Prelude.Nothing,
$sel:awsRegion:NetworkTelemetry' :: Maybe Text
awsRegion = forall a. Maybe a
Prelude.Nothing,
$sel:coreNetworkId:NetworkTelemetry' :: Maybe Text
coreNetworkId = forall a. Maybe a
Prelude.Nothing,
$sel:health:NetworkTelemetry' :: Maybe ConnectionHealth
health = forall a. Maybe a
Prelude.Nothing,
$sel:registeredGatewayArn:NetworkTelemetry' :: Maybe Text
registeredGatewayArn = forall a. Maybe a
Prelude.Nothing,
$sel:resourceArn:NetworkTelemetry' :: Maybe Text
resourceArn = forall a. Maybe a
Prelude.Nothing,
$sel:resourceId:NetworkTelemetry' :: Maybe Text
resourceId = forall a. Maybe a
Prelude.Nothing,
$sel:resourceType:NetworkTelemetry' :: Maybe Text
resourceType = forall a. Maybe a
Prelude.Nothing
}
networkTelemetry_accountId :: Lens.Lens' NetworkTelemetry (Prelude.Maybe Prelude.Text)
networkTelemetry_accountId :: Lens' NetworkTelemetry (Maybe Text)
networkTelemetry_accountId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\NetworkTelemetry' {Maybe Text
accountId :: Maybe Text
$sel:accountId:NetworkTelemetry' :: NetworkTelemetry -> Maybe Text
accountId} -> Maybe Text
accountId) (\s :: NetworkTelemetry
s@NetworkTelemetry' {} Maybe Text
a -> NetworkTelemetry
s {$sel:accountId:NetworkTelemetry' :: Maybe Text
accountId = Maybe Text
a} :: NetworkTelemetry)
networkTelemetry_address :: Lens.Lens' NetworkTelemetry (Prelude.Maybe Prelude.Text)
networkTelemetry_address :: Lens' NetworkTelemetry (Maybe Text)
networkTelemetry_address = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\NetworkTelemetry' {Maybe Text
address :: Maybe Text
$sel:address:NetworkTelemetry' :: NetworkTelemetry -> Maybe Text
address} -> Maybe Text
address) (\s :: NetworkTelemetry
s@NetworkTelemetry' {} Maybe Text
a -> NetworkTelemetry
s {$sel:address:NetworkTelemetry' :: Maybe Text
address = Maybe Text
a} :: NetworkTelemetry)
networkTelemetry_awsRegion :: Lens.Lens' NetworkTelemetry (Prelude.Maybe Prelude.Text)
networkTelemetry_awsRegion :: Lens' NetworkTelemetry (Maybe Text)
networkTelemetry_awsRegion = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\NetworkTelemetry' {Maybe Text
awsRegion :: Maybe Text
$sel:awsRegion:NetworkTelemetry' :: NetworkTelemetry -> Maybe Text
awsRegion} -> Maybe Text
awsRegion) (\s :: NetworkTelemetry
s@NetworkTelemetry' {} Maybe Text
a -> NetworkTelemetry
s {$sel:awsRegion:NetworkTelemetry' :: Maybe Text
awsRegion = Maybe Text
a} :: NetworkTelemetry)
networkTelemetry_coreNetworkId :: Lens.Lens' NetworkTelemetry (Prelude.Maybe Prelude.Text)
networkTelemetry_coreNetworkId :: Lens' NetworkTelemetry (Maybe Text)
networkTelemetry_coreNetworkId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\NetworkTelemetry' {Maybe Text
coreNetworkId :: Maybe Text
$sel:coreNetworkId:NetworkTelemetry' :: NetworkTelemetry -> Maybe Text
coreNetworkId} -> Maybe Text
coreNetworkId) (\s :: NetworkTelemetry
s@NetworkTelemetry' {} Maybe Text
a -> NetworkTelemetry
s {$sel:coreNetworkId:NetworkTelemetry' :: Maybe Text
coreNetworkId = Maybe Text
a} :: NetworkTelemetry)
networkTelemetry_health :: Lens.Lens' NetworkTelemetry (Prelude.Maybe ConnectionHealth)
networkTelemetry_health :: Lens' NetworkTelemetry (Maybe ConnectionHealth)
networkTelemetry_health = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\NetworkTelemetry' {Maybe ConnectionHealth
health :: Maybe ConnectionHealth
$sel:health:NetworkTelemetry' :: NetworkTelemetry -> Maybe ConnectionHealth
health} -> Maybe ConnectionHealth
health) (\s :: NetworkTelemetry
s@NetworkTelemetry' {} Maybe ConnectionHealth
a -> NetworkTelemetry
s {$sel:health:NetworkTelemetry' :: Maybe ConnectionHealth
health = Maybe ConnectionHealth
a} :: NetworkTelemetry)
networkTelemetry_registeredGatewayArn :: Lens.Lens' NetworkTelemetry (Prelude.Maybe Prelude.Text)
networkTelemetry_registeredGatewayArn :: Lens' NetworkTelemetry (Maybe Text)
networkTelemetry_registeredGatewayArn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\NetworkTelemetry' {Maybe Text
registeredGatewayArn :: Maybe Text
$sel:registeredGatewayArn:NetworkTelemetry' :: NetworkTelemetry -> Maybe Text
registeredGatewayArn} -> Maybe Text
registeredGatewayArn) (\s :: NetworkTelemetry
s@NetworkTelemetry' {} Maybe Text
a -> NetworkTelemetry
s {$sel:registeredGatewayArn:NetworkTelemetry' :: Maybe Text
registeredGatewayArn = Maybe Text
a} :: NetworkTelemetry)
networkTelemetry_resourceArn :: Lens.Lens' NetworkTelemetry (Prelude.Maybe Prelude.Text)
networkTelemetry_resourceArn :: Lens' NetworkTelemetry (Maybe Text)
networkTelemetry_resourceArn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\NetworkTelemetry' {Maybe Text
resourceArn :: Maybe Text
$sel:resourceArn:NetworkTelemetry' :: NetworkTelemetry -> Maybe Text
resourceArn} -> Maybe Text
resourceArn) (\s :: NetworkTelemetry
s@NetworkTelemetry' {} Maybe Text
a -> NetworkTelemetry
s {$sel:resourceArn:NetworkTelemetry' :: Maybe Text
resourceArn = Maybe Text
a} :: NetworkTelemetry)
networkTelemetry_resourceId :: Lens.Lens' NetworkTelemetry (Prelude.Maybe Prelude.Text)
networkTelemetry_resourceId :: Lens' NetworkTelemetry (Maybe Text)
networkTelemetry_resourceId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\NetworkTelemetry' {Maybe Text
resourceId :: Maybe Text
$sel:resourceId:NetworkTelemetry' :: NetworkTelemetry -> Maybe Text
resourceId} -> Maybe Text
resourceId) (\s :: NetworkTelemetry
s@NetworkTelemetry' {} Maybe Text
a -> NetworkTelemetry
s {$sel:resourceId:NetworkTelemetry' :: Maybe Text
resourceId = Maybe Text
a} :: NetworkTelemetry)
networkTelemetry_resourceType :: Lens.Lens' NetworkTelemetry (Prelude.Maybe Prelude.Text)
networkTelemetry_resourceType :: Lens' NetworkTelemetry (Maybe Text)
networkTelemetry_resourceType = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\NetworkTelemetry' {Maybe Text
resourceType :: Maybe Text
$sel:resourceType:NetworkTelemetry' :: NetworkTelemetry -> Maybe Text
resourceType} -> Maybe Text
resourceType) (\s :: NetworkTelemetry
s@NetworkTelemetry' {} Maybe Text
a -> NetworkTelemetry
s {$sel:resourceType:NetworkTelemetry' :: Maybe Text
resourceType = Maybe Text
a} :: NetworkTelemetry)
instance Data.FromJSON NetworkTelemetry where
parseJSON :: Value -> Parser NetworkTelemetry
parseJSON =
forall a. String -> (Object -> Parser a) -> Value -> Parser a
Data.withObject
String
"NetworkTelemetry"
( \Object
x ->
Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe ConnectionHealth
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> NetworkTelemetry
NetworkTelemetry'
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"AccountId")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"Address")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"AwsRegion")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"CoreNetworkId")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"Health")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"RegisteredGatewayArn")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"ResourceArn")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"ResourceId")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"ResourceType")
)
instance Prelude.Hashable NetworkTelemetry where
hashWithSalt :: Int -> NetworkTelemetry -> Int
hashWithSalt Int
_salt NetworkTelemetry' {Maybe Text
Maybe ConnectionHealth
resourceType :: Maybe Text
resourceId :: Maybe Text
resourceArn :: Maybe Text
registeredGatewayArn :: Maybe Text
health :: Maybe ConnectionHealth
coreNetworkId :: Maybe Text
awsRegion :: Maybe Text
address :: Maybe Text
accountId :: Maybe Text
$sel:resourceType:NetworkTelemetry' :: NetworkTelemetry -> Maybe Text
$sel:resourceId:NetworkTelemetry' :: NetworkTelemetry -> Maybe Text
$sel:resourceArn:NetworkTelemetry' :: NetworkTelemetry -> Maybe Text
$sel:registeredGatewayArn:NetworkTelemetry' :: NetworkTelemetry -> Maybe Text
$sel:health:NetworkTelemetry' :: NetworkTelemetry -> Maybe ConnectionHealth
$sel:coreNetworkId:NetworkTelemetry' :: NetworkTelemetry -> Maybe Text
$sel:awsRegion:NetworkTelemetry' :: NetworkTelemetry -> Maybe Text
$sel:address:NetworkTelemetry' :: NetworkTelemetry -> Maybe Text
$sel:accountId:NetworkTelemetry' :: NetworkTelemetry -> Maybe Text
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
accountId
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
address
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
awsRegion
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
coreNetworkId
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe ConnectionHealth
health
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
registeredGatewayArn
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
resourceArn
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
resourceId
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
resourceType
instance Prelude.NFData NetworkTelemetry where
rnf :: NetworkTelemetry -> ()
rnf NetworkTelemetry' {Maybe Text
Maybe ConnectionHealth
resourceType :: Maybe Text
resourceId :: Maybe Text
resourceArn :: Maybe Text
registeredGatewayArn :: Maybe Text
health :: Maybe ConnectionHealth
coreNetworkId :: Maybe Text
awsRegion :: Maybe Text
address :: Maybe Text
accountId :: Maybe Text
$sel:resourceType:NetworkTelemetry' :: NetworkTelemetry -> Maybe Text
$sel:resourceId:NetworkTelemetry' :: NetworkTelemetry -> Maybe Text
$sel:resourceArn:NetworkTelemetry' :: NetworkTelemetry -> Maybe Text
$sel:registeredGatewayArn:NetworkTelemetry' :: NetworkTelemetry -> Maybe Text
$sel:health:NetworkTelemetry' :: NetworkTelemetry -> Maybe ConnectionHealth
$sel:coreNetworkId:NetworkTelemetry' :: NetworkTelemetry -> Maybe Text
$sel:awsRegion:NetworkTelemetry' :: NetworkTelemetry -> Maybe Text
$sel:address:NetworkTelemetry' :: NetworkTelemetry -> Maybe Text
$sel:accountId:NetworkTelemetry' :: NetworkTelemetry -> Maybe Text
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
accountId
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
address
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
awsRegion
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
coreNetworkId
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe ConnectionHealth
health
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
registeredGatewayArn
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
resourceArn
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
resourceId
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
resourceType