module Stratosphere.GuardDuty.Detector.CFNKubernetesConfigurationProperty (
module Exports, CFNKubernetesConfigurationProperty(..),
mkCFNKubernetesConfigurationProperty
) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.GuardDuty.Detector.CFNKubernetesAuditLogsConfigurationProperty as Exports
import Stratosphere.ResourceProperties
data CFNKubernetesConfigurationProperty
=
CFNKubernetesConfigurationProperty {CFNKubernetesConfigurationProperty -> ()
haddock_workaround_ :: (),
CFNKubernetesConfigurationProperty
-> CFNKubernetesAuditLogsConfigurationProperty
auditLogs :: CFNKubernetesAuditLogsConfigurationProperty}
deriving stock (CFNKubernetesConfigurationProperty
-> CFNKubernetesConfigurationProperty -> Bool
(CFNKubernetesConfigurationProperty
-> CFNKubernetesConfigurationProperty -> Bool)
-> (CFNKubernetesConfigurationProperty
-> CFNKubernetesConfigurationProperty -> Bool)
-> Eq CFNKubernetesConfigurationProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: CFNKubernetesConfigurationProperty
-> CFNKubernetesConfigurationProperty -> Bool
== :: CFNKubernetesConfigurationProperty
-> CFNKubernetesConfigurationProperty -> Bool
$c/= :: CFNKubernetesConfigurationProperty
-> CFNKubernetesConfigurationProperty -> Bool
/= :: CFNKubernetesConfigurationProperty
-> CFNKubernetesConfigurationProperty -> Bool
Prelude.Eq, Int -> CFNKubernetesConfigurationProperty -> ShowS
[CFNKubernetesConfigurationProperty] -> ShowS
CFNKubernetesConfigurationProperty -> String
(Int -> CFNKubernetesConfigurationProperty -> ShowS)
-> (CFNKubernetesConfigurationProperty -> String)
-> ([CFNKubernetesConfigurationProperty] -> ShowS)
-> Show CFNKubernetesConfigurationProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> CFNKubernetesConfigurationProperty -> ShowS
showsPrec :: Int -> CFNKubernetesConfigurationProperty -> ShowS
$cshow :: CFNKubernetesConfigurationProperty -> String
show :: CFNKubernetesConfigurationProperty -> String
$cshowList :: [CFNKubernetesConfigurationProperty] -> ShowS
showList :: [CFNKubernetesConfigurationProperty] -> ShowS
Prelude.Show)
mkCFNKubernetesConfigurationProperty ::
CFNKubernetesAuditLogsConfigurationProperty
-> CFNKubernetesConfigurationProperty
mkCFNKubernetesConfigurationProperty :: CFNKubernetesAuditLogsConfigurationProperty
-> CFNKubernetesConfigurationProperty
mkCFNKubernetesConfigurationProperty CFNKubernetesAuditLogsConfigurationProperty
auditLogs
= CFNKubernetesConfigurationProperty
{haddock_workaround_ :: ()
haddock_workaround_ = (), auditLogs :: CFNKubernetesAuditLogsConfigurationProperty
auditLogs = CFNKubernetesAuditLogsConfigurationProperty
auditLogs}
instance ToResourceProperties CFNKubernetesConfigurationProperty where
toResourceProperties :: CFNKubernetesConfigurationProperty -> ResourceProperties
toResourceProperties CFNKubernetesConfigurationProperty {()
CFNKubernetesAuditLogsConfigurationProperty
haddock_workaround_ :: CFNKubernetesConfigurationProperty -> ()
auditLogs :: CFNKubernetesConfigurationProperty
-> CFNKubernetesAuditLogsConfigurationProperty
haddock_workaround_ :: ()
auditLogs :: CFNKubernetesAuditLogsConfigurationProperty
..}
= ResourceProperties
{awsType :: Text
awsType = Text
"AWS::GuardDuty::Detector.CFNKubernetesConfiguration",
supportsTags :: Bool
supportsTags = Bool
Prelude.False,
properties :: Object
properties = [Key
"AuditLogs" Key -> CFNKubernetesAuditLogsConfigurationProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= CFNKubernetesAuditLogsConfigurationProperty
auditLogs]}
instance JSON.ToJSON CFNKubernetesConfigurationProperty where
toJSON :: CFNKubernetesConfigurationProperty -> Value
toJSON CFNKubernetesConfigurationProperty {()
CFNKubernetesAuditLogsConfigurationProperty
haddock_workaround_ :: CFNKubernetesConfigurationProperty -> ()
auditLogs :: CFNKubernetesConfigurationProperty
-> CFNKubernetesAuditLogsConfigurationProperty
haddock_workaround_ :: ()
auditLogs :: CFNKubernetesAuditLogsConfigurationProperty
..}
= [(Key, Value)] -> Value
JSON.object [Key
"AuditLogs" Key -> CFNKubernetesAuditLogsConfigurationProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= CFNKubernetesAuditLogsConfigurationProperty
auditLogs]
instance Property "AuditLogs" CFNKubernetesConfigurationProperty where
type PropertyType "AuditLogs" CFNKubernetesConfigurationProperty = CFNKubernetesAuditLogsConfigurationProperty
set :: PropertyType "AuditLogs" CFNKubernetesConfigurationProperty
-> CFNKubernetesConfigurationProperty
-> CFNKubernetesConfigurationProperty
set PropertyType "AuditLogs" CFNKubernetesConfigurationProperty
newValue CFNKubernetesConfigurationProperty {()
CFNKubernetesAuditLogsConfigurationProperty
haddock_workaround_ :: CFNKubernetesConfigurationProperty -> ()
auditLogs :: CFNKubernetesConfigurationProperty
-> CFNKubernetesAuditLogsConfigurationProperty
haddock_workaround_ :: ()
auditLogs :: CFNKubernetesAuditLogsConfigurationProperty
..}
= CFNKubernetesConfigurationProperty {auditLogs :: CFNKubernetesAuditLogsConfigurationProperty
auditLogs = PropertyType "AuditLogs" CFNKubernetesConfigurationProperty
CFNKubernetesAuditLogsConfigurationProperty
newValue, ()
haddock_workaround_ :: ()
haddock_workaround_ :: ()
..}