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