module Stratosphere.NetworkFirewall.TLSInspectionConfiguration.AddressProperty (
AddressProperty(..), mkAddressProperty
) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import Stratosphere.ResourceProperties
import Stratosphere.Value
data AddressProperty
=
AddressProperty {AddressProperty -> ()
haddock_workaround_ :: (),
AddressProperty -> Value Text
addressDefinition :: (Value Prelude.Text)}
deriving stock (AddressProperty -> AddressProperty -> Bool
(AddressProperty -> AddressProperty -> Bool)
-> (AddressProperty -> AddressProperty -> Bool)
-> Eq AddressProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: AddressProperty -> AddressProperty -> Bool
== :: AddressProperty -> AddressProperty -> Bool
$c/= :: AddressProperty -> AddressProperty -> Bool
/= :: AddressProperty -> AddressProperty -> Bool
Prelude.Eq, Int -> AddressProperty -> ShowS
[AddressProperty] -> ShowS
AddressProperty -> String
(Int -> AddressProperty -> ShowS)
-> (AddressProperty -> String)
-> ([AddressProperty] -> ShowS)
-> Show AddressProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> AddressProperty -> ShowS
showsPrec :: Int -> AddressProperty -> ShowS
$cshow :: AddressProperty -> String
show :: AddressProperty -> String
$cshowList :: [AddressProperty] -> ShowS
showList :: [AddressProperty] -> ShowS
Prelude.Show)
mkAddressProperty :: Value Prelude.Text -> AddressProperty
mkAddressProperty :: Value Text -> AddressProperty
mkAddressProperty Value Text
addressDefinition
= AddressProperty
{haddock_workaround_ :: ()
haddock_workaround_ = (), addressDefinition :: Value Text
addressDefinition = Value Text
addressDefinition}
instance ToResourceProperties AddressProperty where
toResourceProperties :: AddressProperty -> ResourceProperties
toResourceProperties AddressProperty {()
Value Text
haddock_workaround_ :: AddressProperty -> ()
addressDefinition :: AddressProperty -> Value Text
haddock_workaround_ :: ()
addressDefinition :: Value Text
..}
= ResourceProperties
{awsType :: Text
awsType = Text
"AWS::NetworkFirewall::TLSInspectionConfiguration.Address",
supportsTags :: Bool
supportsTags = Bool
Prelude.False,
properties :: Object
properties = [Key
"AddressDefinition" 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
addressDefinition]}
instance JSON.ToJSON AddressProperty where
toJSON :: AddressProperty -> Value
toJSON AddressProperty {()
Value Text
haddock_workaround_ :: AddressProperty -> ()
addressDefinition :: AddressProperty -> Value Text
haddock_workaround_ :: ()
addressDefinition :: Value Text
..}
= [(Key, Value)] -> Value
JSON.object [Key
"AddressDefinition" 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
addressDefinition]
instance Property "AddressDefinition" AddressProperty where
type PropertyType "AddressDefinition" AddressProperty = Value Prelude.Text
set :: PropertyType "AddressDefinition" AddressProperty
-> AddressProperty -> AddressProperty
set PropertyType "AddressDefinition" AddressProperty
newValue AddressProperty {()
Value Text
haddock_workaround_ :: AddressProperty -> ()
addressDefinition :: AddressProperty -> Value Text
haddock_workaround_ :: ()
addressDefinition :: Value Text
..}
= AddressProperty {addressDefinition :: Value Text
addressDefinition = PropertyType "AddressDefinition" AddressProperty
Value Text
newValue, ()
haddock_workaround_ :: ()
haddock_workaround_ :: ()
..}