module Stratosphere.ObservabilityAdmin.OrganizationCentralizationRule.CentralizationRuleProperty (
module Exports, CentralizationRuleProperty(..),
mkCentralizationRuleProperty
) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.ObservabilityAdmin.OrganizationCentralizationRule.CentralizationRuleDestinationProperty as Exports
import {-# SOURCE #-} Stratosphere.ObservabilityAdmin.OrganizationCentralizationRule.CentralizationRuleSourceProperty as Exports
import Stratosphere.ResourceProperties
data CentralizationRuleProperty
=
CentralizationRuleProperty {CentralizationRuleProperty -> ()
haddock_workaround_ :: (),
CentralizationRuleProperty -> CentralizationRuleDestinationProperty
destination :: CentralizationRuleDestinationProperty,
CentralizationRuleProperty -> CentralizationRuleSourceProperty
source :: CentralizationRuleSourceProperty}
deriving stock (CentralizationRuleProperty -> CentralizationRuleProperty -> Bool
(CentralizationRuleProperty -> CentralizationRuleProperty -> Bool)
-> (CentralizationRuleProperty
-> CentralizationRuleProperty -> Bool)
-> Eq CentralizationRuleProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: CentralizationRuleProperty -> CentralizationRuleProperty -> Bool
== :: CentralizationRuleProperty -> CentralizationRuleProperty -> Bool
$c/= :: CentralizationRuleProperty -> CentralizationRuleProperty -> Bool
/= :: CentralizationRuleProperty -> CentralizationRuleProperty -> Bool
Prelude.Eq, Int -> CentralizationRuleProperty -> ShowS
[CentralizationRuleProperty] -> ShowS
CentralizationRuleProperty -> String
(Int -> CentralizationRuleProperty -> ShowS)
-> (CentralizationRuleProperty -> String)
-> ([CentralizationRuleProperty] -> ShowS)
-> Show CentralizationRuleProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> CentralizationRuleProperty -> ShowS
showsPrec :: Int -> CentralizationRuleProperty -> ShowS
$cshow :: CentralizationRuleProperty -> String
show :: CentralizationRuleProperty -> String
$cshowList :: [CentralizationRuleProperty] -> ShowS
showList :: [CentralizationRuleProperty] -> ShowS
Prelude.Show)
mkCentralizationRuleProperty ::
CentralizationRuleDestinationProperty
-> CentralizationRuleSourceProperty -> CentralizationRuleProperty
mkCentralizationRuleProperty :: CentralizationRuleDestinationProperty
-> CentralizationRuleSourceProperty -> CentralizationRuleProperty
mkCentralizationRuleProperty CentralizationRuleDestinationProperty
destination CentralizationRuleSourceProperty
source
= CentralizationRuleProperty
{haddock_workaround_ :: ()
haddock_workaround_ = (), destination :: CentralizationRuleDestinationProperty
destination = CentralizationRuleDestinationProperty
destination,
source :: CentralizationRuleSourceProperty
source = CentralizationRuleSourceProperty
source}
instance ToResourceProperties CentralizationRuleProperty where
toResourceProperties :: CentralizationRuleProperty -> ResourceProperties
toResourceProperties CentralizationRuleProperty {()
CentralizationRuleDestinationProperty
CentralizationRuleSourceProperty
haddock_workaround_ :: CentralizationRuleProperty -> ()
destination :: CentralizationRuleProperty -> CentralizationRuleDestinationProperty
source :: CentralizationRuleProperty -> CentralizationRuleSourceProperty
haddock_workaround_ :: ()
destination :: CentralizationRuleDestinationProperty
source :: CentralizationRuleSourceProperty
..}
= ResourceProperties
{awsType :: Text
awsType = Text
"AWS::ObservabilityAdmin::OrganizationCentralizationRule.CentralizationRule",
supportsTags :: Bool
supportsTags = Bool
Prelude.False,
properties :: Object
properties = [Key
"Destination" Key -> CentralizationRuleDestinationProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= CentralizationRuleDestinationProperty
destination,
Key
"Source" Key -> CentralizationRuleSourceProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= CentralizationRuleSourceProperty
source]}
instance JSON.ToJSON CentralizationRuleProperty where
toJSON :: CentralizationRuleProperty -> Value
toJSON CentralizationRuleProperty {()
CentralizationRuleDestinationProperty
CentralizationRuleSourceProperty
haddock_workaround_ :: CentralizationRuleProperty -> ()
destination :: CentralizationRuleProperty -> CentralizationRuleDestinationProperty
source :: CentralizationRuleProperty -> CentralizationRuleSourceProperty
haddock_workaround_ :: ()
destination :: CentralizationRuleDestinationProperty
source :: CentralizationRuleSourceProperty
..}
= [(Key, Value)] -> Value
JSON.object
[Key
"Destination" Key -> CentralizationRuleDestinationProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= CentralizationRuleDestinationProperty
destination, Key
"Source" Key -> CentralizationRuleSourceProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= CentralizationRuleSourceProperty
source]
instance Property "Destination" CentralizationRuleProperty where
type PropertyType "Destination" CentralizationRuleProperty = CentralizationRuleDestinationProperty
set :: PropertyType "Destination" CentralizationRuleProperty
-> CentralizationRuleProperty -> CentralizationRuleProperty
set PropertyType "Destination" CentralizationRuleProperty
newValue CentralizationRuleProperty {()
CentralizationRuleDestinationProperty
CentralizationRuleSourceProperty
haddock_workaround_ :: CentralizationRuleProperty -> ()
destination :: CentralizationRuleProperty -> CentralizationRuleDestinationProperty
source :: CentralizationRuleProperty -> CentralizationRuleSourceProperty
haddock_workaround_ :: ()
destination :: CentralizationRuleDestinationProperty
source :: CentralizationRuleSourceProperty
..}
= CentralizationRuleProperty {destination :: CentralizationRuleDestinationProperty
destination = PropertyType "Destination" CentralizationRuleProperty
CentralizationRuleDestinationProperty
newValue, ()
CentralizationRuleSourceProperty
haddock_workaround_ :: ()
source :: CentralizationRuleSourceProperty
haddock_workaround_ :: ()
source :: CentralizationRuleSourceProperty
..}
instance Property "Source" CentralizationRuleProperty where
type PropertyType "Source" CentralizationRuleProperty = CentralizationRuleSourceProperty
set :: PropertyType "Source" CentralizationRuleProperty
-> CentralizationRuleProperty -> CentralizationRuleProperty
set PropertyType "Source" CentralizationRuleProperty
newValue CentralizationRuleProperty {()
CentralizationRuleDestinationProperty
CentralizationRuleSourceProperty
haddock_workaround_ :: CentralizationRuleProperty -> ()
destination :: CentralizationRuleProperty -> CentralizationRuleDestinationProperty
source :: CentralizationRuleProperty -> CentralizationRuleSourceProperty
haddock_workaround_ :: ()
destination :: CentralizationRuleDestinationProperty
source :: CentralizationRuleSourceProperty
..}
= CentralizationRuleProperty {source :: CentralizationRuleSourceProperty
source = PropertyType "Source" CentralizationRuleProperty
CentralizationRuleSourceProperty
newValue, ()
CentralizationRuleDestinationProperty
haddock_workaround_ :: ()
destination :: CentralizationRuleDestinationProperty
haddock_workaround_ :: ()
destination :: CentralizationRuleDestinationProperty
..}