module Stratosphere.MediaConnect.Bridge.BridgeNetworkOutputProperty (
        BridgeNetworkOutputProperty(..), mkBridgeNetworkOutputProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import Stratosphere.ResourceProperties
import Stratosphere.Value
data BridgeNetworkOutputProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-mediaconnect-bridge-bridgenetworkoutput.html>
    BridgeNetworkOutputProperty {BridgeNetworkOutputProperty -> ()
haddock_workaround_ :: (),
                                 -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-mediaconnect-bridge-bridgenetworkoutput.html#cfn-mediaconnect-bridge-bridgenetworkoutput-ipaddress>
                                 BridgeNetworkOutputProperty -> Value Text
ipAddress :: (Value Prelude.Text),
                                 -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-mediaconnect-bridge-bridgenetworkoutput.html#cfn-mediaconnect-bridge-bridgenetworkoutput-name>
                                 BridgeNetworkOutputProperty -> Value Text
name :: (Value Prelude.Text),
                                 -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-mediaconnect-bridge-bridgenetworkoutput.html#cfn-mediaconnect-bridge-bridgenetworkoutput-networkname>
                                 BridgeNetworkOutputProperty -> Value Text
networkName :: (Value Prelude.Text),
                                 -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-mediaconnect-bridge-bridgenetworkoutput.html#cfn-mediaconnect-bridge-bridgenetworkoutput-port>
                                 BridgeNetworkOutputProperty -> Value Integer
port :: (Value Prelude.Integer),
                                 -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-mediaconnect-bridge-bridgenetworkoutput.html#cfn-mediaconnect-bridge-bridgenetworkoutput-protocol>
                                 BridgeNetworkOutputProperty -> Value Text
protocol :: (Value Prelude.Text),
                                 -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-mediaconnect-bridge-bridgenetworkoutput.html#cfn-mediaconnect-bridge-bridgenetworkoutput-ttl>
                                 BridgeNetworkOutputProperty -> Value Integer
ttl :: (Value Prelude.Integer)}
  deriving stock (BridgeNetworkOutputProperty -> BridgeNetworkOutputProperty -> Bool
(BridgeNetworkOutputProperty
 -> BridgeNetworkOutputProperty -> Bool)
-> (BridgeNetworkOutputProperty
    -> BridgeNetworkOutputProperty -> Bool)
-> Eq BridgeNetworkOutputProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: BridgeNetworkOutputProperty -> BridgeNetworkOutputProperty -> Bool
== :: BridgeNetworkOutputProperty -> BridgeNetworkOutputProperty -> Bool
$c/= :: BridgeNetworkOutputProperty -> BridgeNetworkOutputProperty -> Bool
/= :: BridgeNetworkOutputProperty -> BridgeNetworkOutputProperty -> Bool
Prelude.Eq, Int -> BridgeNetworkOutputProperty -> ShowS
[BridgeNetworkOutputProperty] -> ShowS
BridgeNetworkOutputProperty -> String
(Int -> BridgeNetworkOutputProperty -> ShowS)
-> (BridgeNetworkOutputProperty -> String)
-> ([BridgeNetworkOutputProperty] -> ShowS)
-> Show BridgeNetworkOutputProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> BridgeNetworkOutputProperty -> ShowS
showsPrec :: Int -> BridgeNetworkOutputProperty -> ShowS
$cshow :: BridgeNetworkOutputProperty -> String
show :: BridgeNetworkOutputProperty -> String
$cshowList :: [BridgeNetworkOutputProperty] -> ShowS
showList :: [BridgeNetworkOutputProperty] -> ShowS
Prelude.Show)
mkBridgeNetworkOutputProperty ::
  Value Prelude.Text
  -> Value Prelude.Text
     -> Value Prelude.Text
        -> Value Prelude.Integer
           -> Value Prelude.Text
              -> Value Prelude.Integer -> BridgeNetworkOutputProperty
mkBridgeNetworkOutputProperty :: Value Text
-> Value Text
-> Value Text
-> Value Integer
-> Value Text
-> Value Integer
-> BridgeNetworkOutputProperty
mkBridgeNetworkOutputProperty
  Value Text
ipAddress
  Value Text
name
  Value Text
networkName
  Value Integer
port
  Value Text
protocol
  Value Integer
ttl
  = BridgeNetworkOutputProperty
      {haddock_workaround_ :: ()
haddock_workaround_ = (), ipAddress :: Value Text
ipAddress = Value Text
ipAddress, name :: Value Text
name = Value Text
name,
       networkName :: Value Text
networkName = Value Text
networkName, port :: Value Integer
port = Value Integer
port, protocol :: Value Text
protocol = Value Text
protocol,
       ttl :: Value Integer
ttl = Value Integer
ttl}
instance ToResourceProperties BridgeNetworkOutputProperty where
  toResourceProperties :: BridgeNetworkOutputProperty -> ResourceProperties
toResourceProperties BridgeNetworkOutputProperty {()
Value Integer
Value Text
haddock_workaround_ :: BridgeNetworkOutputProperty -> ()
ipAddress :: BridgeNetworkOutputProperty -> Value Text
name :: BridgeNetworkOutputProperty -> Value Text
networkName :: BridgeNetworkOutputProperty -> Value Text
port :: BridgeNetworkOutputProperty -> Value Integer
protocol :: BridgeNetworkOutputProperty -> Value Text
ttl :: BridgeNetworkOutputProperty -> Value Integer
haddock_workaround_ :: ()
ipAddress :: Value Text
name :: Value Text
networkName :: Value Text
port :: Value Integer
protocol :: Value Text
ttl :: Value Integer
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::MediaConnect::Bridge.BridgeNetworkOutput",
         supportsTags :: Bool
supportsTags = Bool
Prelude.False,
         properties :: Object
properties = [Key
"IpAddress" Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Text
ipAddress, Key
"Name" Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Text
name,
                       Key
"NetworkName" Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Text
networkName, Key
"Port" Key -> Value Integer -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Integer
port,
                       Key
"Protocol" Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Text
protocol, Key
"Ttl" Key -> Value Integer -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Integer
ttl]}
instance JSON.ToJSON BridgeNetworkOutputProperty where
  toJSON :: BridgeNetworkOutputProperty -> Value
toJSON BridgeNetworkOutputProperty {()
Value Integer
Value Text
haddock_workaround_ :: BridgeNetworkOutputProperty -> ()
ipAddress :: BridgeNetworkOutputProperty -> Value Text
name :: BridgeNetworkOutputProperty -> Value Text
networkName :: BridgeNetworkOutputProperty -> Value Text
port :: BridgeNetworkOutputProperty -> Value Integer
protocol :: BridgeNetworkOutputProperty -> Value Text
ttl :: BridgeNetworkOutputProperty -> Value Integer
haddock_workaround_ :: ()
ipAddress :: Value Text
name :: Value Text
networkName :: Value Text
port :: Value Integer
protocol :: Value Text
ttl :: Value Integer
..}
    = [(Key, Value)] -> Value
JSON.object
        [Key
"IpAddress" Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Text
ipAddress, Key
"Name" Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Text
name,
         Key
"NetworkName" Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Text
networkName, Key
"Port" Key -> Value Integer -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Integer
port,
         Key
"Protocol" Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Text
protocol, Key
"Ttl" Key -> Value Integer -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Integer
ttl]
instance Property "IpAddress" BridgeNetworkOutputProperty where
  type PropertyType "IpAddress" BridgeNetworkOutputProperty = Value Prelude.Text
  set :: PropertyType "IpAddress" BridgeNetworkOutputProperty
-> BridgeNetworkOutputProperty -> BridgeNetworkOutputProperty
set PropertyType "IpAddress" BridgeNetworkOutputProperty
newValue BridgeNetworkOutputProperty {()
Value Integer
Value Text
haddock_workaround_ :: BridgeNetworkOutputProperty -> ()
ipAddress :: BridgeNetworkOutputProperty -> Value Text
name :: BridgeNetworkOutputProperty -> Value Text
networkName :: BridgeNetworkOutputProperty -> Value Text
port :: BridgeNetworkOutputProperty -> Value Integer
protocol :: BridgeNetworkOutputProperty -> Value Text
ttl :: BridgeNetworkOutputProperty -> Value Integer
haddock_workaround_ :: ()
ipAddress :: Value Text
name :: Value Text
networkName :: Value Text
port :: Value Integer
protocol :: Value Text
ttl :: Value Integer
..}
    = BridgeNetworkOutputProperty {ipAddress :: Value Text
ipAddress = PropertyType "IpAddress" BridgeNetworkOutputProperty
Value Text
newValue, ()
Value Integer
Value Text
haddock_workaround_ :: ()
name :: Value Text
networkName :: Value Text
port :: Value Integer
protocol :: Value Text
ttl :: Value Integer
haddock_workaround_ :: ()
name :: Value Text
networkName :: Value Text
port :: Value Integer
protocol :: Value Text
ttl :: Value Integer
..}
instance Property "Name" BridgeNetworkOutputProperty where
  type PropertyType "Name" BridgeNetworkOutputProperty = Value Prelude.Text
  set :: PropertyType "Name" BridgeNetworkOutputProperty
-> BridgeNetworkOutputProperty -> BridgeNetworkOutputProperty
set PropertyType "Name" BridgeNetworkOutputProperty
newValue BridgeNetworkOutputProperty {()
Value Integer
Value Text
haddock_workaround_ :: BridgeNetworkOutputProperty -> ()
ipAddress :: BridgeNetworkOutputProperty -> Value Text
name :: BridgeNetworkOutputProperty -> Value Text
networkName :: BridgeNetworkOutputProperty -> Value Text
port :: BridgeNetworkOutputProperty -> Value Integer
protocol :: BridgeNetworkOutputProperty -> Value Text
ttl :: BridgeNetworkOutputProperty -> Value Integer
haddock_workaround_ :: ()
ipAddress :: Value Text
name :: Value Text
networkName :: Value Text
port :: Value Integer
protocol :: Value Text
ttl :: Value Integer
..}
    = BridgeNetworkOutputProperty {name :: Value Text
name = PropertyType "Name" BridgeNetworkOutputProperty
Value Text
newValue, ()
Value Integer
Value Text
haddock_workaround_ :: ()
ipAddress :: Value Text
networkName :: Value Text
port :: Value Integer
protocol :: Value Text
ttl :: Value Integer
haddock_workaround_ :: ()
ipAddress :: Value Text
networkName :: Value Text
port :: Value Integer
protocol :: Value Text
ttl :: Value Integer
..}
instance Property "NetworkName" BridgeNetworkOutputProperty where
  type PropertyType "NetworkName" BridgeNetworkOutputProperty = Value Prelude.Text
  set :: PropertyType "NetworkName" BridgeNetworkOutputProperty
-> BridgeNetworkOutputProperty -> BridgeNetworkOutputProperty
set PropertyType "NetworkName" BridgeNetworkOutputProperty
newValue BridgeNetworkOutputProperty {()
Value Integer
Value Text
haddock_workaround_ :: BridgeNetworkOutputProperty -> ()
ipAddress :: BridgeNetworkOutputProperty -> Value Text
name :: BridgeNetworkOutputProperty -> Value Text
networkName :: BridgeNetworkOutputProperty -> Value Text
port :: BridgeNetworkOutputProperty -> Value Integer
protocol :: BridgeNetworkOutputProperty -> Value Text
ttl :: BridgeNetworkOutputProperty -> Value Integer
haddock_workaround_ :: ()
ipAddress :: Value Text
name :: Value Text
networkName :: Value Text
port :: Value Integer
protocol :: Value Text
ttl :: Value Integer
..}
    = BridgeNetworkOutputProperty {networkName :: Value Text
networkName = PropertyType "NetworkName" BridgeNetworkOutputProperty
Value Text
newValue, ()
Value Integer
Value Text
haddock_workaround_ :: ()
ipAddress :: Value Text
name :: Value Text
port :: Value Integer
protocol :: Value Text
ttl :: Value Integer
haddock_workaround_ :: ()
ipAddress :: Value Text
name :: Value Text
port :: Value Integer
protocol :: Value Text
ttl :: Value Integer
..}
instance Property "Port" BridgeNetworkOutputProperty where
  type PropertyType "Port" BridgeNetworkOutputProperty = Value Prelude.Integer
  set :: PropertyType "Port" BridgeNetworkOutputProperty
-> BridgeNetworkOutputProperty -> BridgeNetworkOutputProperty
set PropertyType "Port" BridgeNetworkOutputProperty
newValue BridgeNetworkOutputProperty {()
Value Integer
Value Text
haddock_workaround_ :: BridgeNetworkOutputProperty -> ()
ipAddress :: BridgeNetworkOutputProperty -> Value Text
name :: BridgeNetworkOutputProperty -> Value Text
networkName :: BridgeNetworkOutputProperty -> Value Text
port :: BridgeNetworkOutputProperty -> Value Integer
protocol :: BridgeNetworkOutputProperty -> Value Text
ttl :: BridgeNetworkOutputProperty -> Value Integer
haddock_workaround_ :: ()
ipAddress :: Value Text
name :: Value Text
networkName :: Value Text
port :: Value Integer
protocol :: Value Text
ttl :: Value Integer
..}
    = BridgeNetworkOutputProperty {port :: Value Integer
port = PropertyType "Port" BridgeNetworkOutputProperty
Value Integer
newValue, ()
Value Integer
Value Text
haddock_workaround_ :: ()
ipAddress :: Value Text
name :: Value Text
networkName :: Value Text
protocol :: Value Text
ttl :: Value Integer
haddock_workaround_ :: ()
ipAddress :: Value Text
name :: Value Text
networkName :: Value Text
protocol :: Value Text
ttl :: Value Integer
..}
instance Property "Protocol" BridgeNetworkOutputProperty where
  type PropertyType "Protocol" BridgeNetworkOutputProperty = Value Prelude.Text
  set :: PropertyType "Protocol" BridgeNetworkOutputProperty
-> BridgeNetworkOutputProperty -> BridgeNetworkOutputProperty
set PropertyType "Protocol" BridgeNetworkOutputProperty
newValue BridgeNetworkOutputProperty {()
Value Integer
Value Text
haddock_workaround_ :: BridgeNetworkOutputProperty -> ()
ipAddress :: BridgeNetworkOutputProperty -> Value Text
name :: BridgeNetworkOutputProperty -> Value Text
networkName :: BridgeNetworkOutputProperty -> Value Text
port :: BridgeNetworkOutputProperty -> Value Integer
protocol :: BridgeNetworkOutputProperty -> Value Text
ttl :: BridgeNetworkOutputProperty -> Value Integer
haddock_workaround_ :: ()
ipAddress :: Value Text
name :: Value Text
networkName :: Value Text
port :: Value Integer
protocol :: Value Text
ttl :: Value Integer
..}
    = BridgeNetworkOutputProperty {protocol :: Value Text
protocol = PropertyType "Protocol" BridgeNetworkOutputProperty
Value Text
newValue, ()
Value Integer
Value Text
haddock_workaround_ :: ()
ipAddress :: Value Text
name :: Value Text
networkName :: Value Text
port :: Value Integer
ttl :: Value Integer
haddock_workaround_ :: ()
ipAddress :: Value Text
name :: Value Text
networkName :: Value Text
port :: Value Integer
ttl :: Value Integer
..}
instance Property "Ttl" BridgeNetworkOutputProperty where
  type PropertyType "Ttl" BridgeNetworkOutputProperty = Value Prelude.Integer
  set :: PropertyType "Ttl" BridgeNetworkOutputProperty
-> BridgeNetworkOutputProperty -> BridgeNetworkOutputProperty
set PropertyType "Ttl" BridgeNetworkOutputProperty
newValue BridgeNetworkOutputProperty {()
Value Integer
Value Text
haddock_workaround_ :: BridgeNetworkOutputProperty -> ()
ipAddress :: BridgeNetworkOutputProperty -> Value Text
name :: BridgeNetworkOutputProperty -> Value Text
networkName :: BridgeNetworkOutputProperty -> Value Text
port :: BridgeNetworkOutputProperty -> Value Integer
protocol :: BridgeNetworkOutputProperty -> Value Text
ttl :: BridgeNetworkOutputProperty -> Value Integer
haddock_workaround_ :: ()
ipAddress :: Value Text
name :: Value Text
networkName :: Value Text
port :: Value Integer
protocol :: Value Text
ttl :: Value Integer
..}
    = BridgeNetworkOutputProperty {ttl :: Value Integer
ttl = PropertyType "Ttl" BridgeNetworkOutputProperty
Value Integer
newValue, ()
Value Integer
Value Text
haddock_workaround_ :: ()
ipAddress :: Value Text
name :: Value Text
networkName :: Value Text
port :: Value Integer
protocol :: Value Text
haddock_workaround_ :: ()
ipAddress :: Value Text
name :: Value Text
networkName :: Value Text
port :: Value Integer
protocol :: Value Text
..}