module Stratosphere.IoT.SecurityProfile (
module Exports, SecurityProfile(..), mkSecurityProfile
) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.IoT.SecurityProfile.AlertTargetProperty as Exports
import {-# SOURCE #-} Stratosphere.IoT.SecurityProfile.BehaviorProperty as Exports
import {-# SOURCE #-} Stratosphere.IoT.SecurityProfile.MetricToRetainProperty as Exports
import {-# SOURCE #-} Stratosphere.IoT.SecurityProfile.MetricsExportConfigProperty as Exports
import Stratosphere.ResourceProperties
import Stratosphere.Tag
import Stratosphere.Value
data SecurityProfile
=
SecurityProfile {SecurityProfile -> ()
haddock_workaround_ :: (),
SecurityProfile -> Maybe [MetricToRetainProperty]
additionalMetricsToRetainV2 :: (Prelude.Maybe [MetricToRetainProperty]),
SecurityProfile -> Maybe (Map Text AlertTargetProperty)
alertTargets :: (Prelude.Maybe (Prelude.Map Prelude.Text AlertTargetProperty)),
SecurityProfile -> Maybe [BehaviorProperty]
behaviors :: (Prelude.Maybe [BehaviorProperty]),
SecurityProfile -> Maybe MetricsExportConfigProperty
metricsExportConfig :: (Prelude.Maybe MetricsExportConfigProperty),
SecurityProfile -> Maybe (Value Text)
securityProfileDescription :: (Prelude.Maybe (Value Prelude.Text)),
SecurityProfile -> Maybe (Value Text)
securityProfileName :: (Prelude.Maybe (Value Prelude.Text)),
SecurityProfile -> Maybe [Tag]
tags :: (Prelude.Maybe [Tag]),
SecurityProfile -> Maybe (ValueList Text)
targetArns :: (Prelude.Maybe (ValueList Prelude.Text))}
deriving stock (SecurityProfile -> SecurityProfile -> Bool
(SecurityProfile -> SecurityProfile -> Bool)
-> (SecurityProfile -> SecurityProfile -> Bool)
-> Eq SecurityProfile
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: SecurityProfile -> SecurityProfile -> Bool
== :: SecurityProfile -> SecurityProfile -> Bool
$c/= :: SecurityProfile -> SecurityProfile -> Bool
/= :: SecurityProfile -> SecurityProfile -> Bool
Prelude.Eq, Int -> SecurityProfile -> ShowS
[SecurityProfile] -> ShowS
SecurityProfile -> String
(Int -> SecurityProfile -> ShowS)
-> (SecurityProfile -> String)
-> ([SecurityProfile] -> ShowS)
-> Show SecurityProfile
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> SecurityProfile -> ShowS
showsPrec :: Int -> SecurityProfile -> ShowS
$cshow :: SecurityProfile -> String
show :: SecurityProfile -> String
$cshowList :: [SecurityProfile] -> ShowS
showList :: [SecurityProfile] -> ShowS
Prelude.Show)
mkSecurityProfile :: SecurityProfile
mkSecurityProfile :: SecurityProfile
mkSecurityProfile
= SecurityProfile
{haddock_workaround_ :: ()
haddock_workaround_ = (),
additionalMetricsToRetainV2 :: Maybe [MetricToRetainProperty]
additionalMetricsToRetainV2 = Maybe [MetricToRetainProperty]
forall a. Maybe a
Prelude.Nothing,
alertTargets :: Maybe (Map Text AlertTargetProperty)
alertTargets = Maybe (Map Text AlertTargetProperty)
forall a. Maybe a
Prelude.Nothing, behaviors :: Maybe [BehaviorProperty]
behaviors = Maybe [BehaviorProperty]
forall a. Maybe a
Prelude.Nothing,
metricsExportConfig :: Maybe MetricsExportConfigProperty
metricsExportConfig = Maybe MetricsExportConfigProperty
forall a. Maybe a
Prelude.Nothing,
securityProfileDescription :: Maybe (Value Text)
securityProfileDescription = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
securityProfileName :: Maybe (Value Text)
securityProfileName = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing, tags :: Maybe [Tag]
tags = Maybe [Tag]
forall a. Maybe a
Prelude.Nothing,
targetArns :: Maybe (ValueList Text)
targetArns = Maybe (ValueList Text)
forall a. Maybe a
Prelude.Nothing}
instance ToResourceProperties SecurityProfile where
toResourceProperties :: SecurityProfile -> ResourceProperties
toResourceProperties SecurityProfile {Maybe [Tag]
Maybe [MetricToRetainProperty]
Maybe [BehaviorProperty]
Maybe (Map Text AlertTargetProperty)
Maybe (ValueList Text)
Maybe (Value Text)
Maybe MetricsExportConfigProperty
()
haddock_workaround_ :: SecurityProfile -> ()
additionalMetricsToRetainV2 :: SecurityProfile -> Maybe [MetricToRetainProperty]
alertTargets :: SecurityProfile -> Maybe (Map Text AlertTargetProperty)
behaviors :: SecurityProfile -> Maybe [BehaviorProperty]
metricsExportConfig :: SecurityProfile -> Maybe MetricsExportConfigProperty
securityProfileDescription :: SecurityProfile -> Maybe (Value Text)
securityProfileName :: SecurityProfile -> Maybe (Value Text)
tags :: SecurityProfile -> Maybe [Tag]
targetArns :: SecurityProfile -> Maybe (ValueList Text)
haddock_workaround_ :: ()
additionalMetricsToRetainV2 :: Maybe [MetricToRetainProperty]
alertTargets :: Maybe (Map Text AlertTargetProperty)
behaviors :: Maybe [BehaviorProperty]
metricsExportConfig :: Maybe MetricsExportConfigProperty
securityProfileDescription :: Maybe (Value Text)
securityProfileName :: Maybe (Value Text)
tags :: Maybe [Tag]
targetArns :: Maybe (ValueList Text)
..}
= ResourceProperties
{awsType :: Text
awsType = Text
"AWS::IoT::SecurityProfile",
supportsTags :: Bool
supportsTags = Bool
Prelude.True,
properties :: Object
properties = [Item Object] -> Object
forall l. IsList l => [Item l] -> l
Prelude.fromList
([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
[Key -> [MetricToRetainProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"AdditionalMetricsToRetainV2"
([MetricToRetainProperty] -> (Key, Value))
-> Maybe [MetricToRetainProperty] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [MetricToRetainProperty]
additionalMetricsToRetainV2,
Key -> Map Text AlertTargetProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"AlertTargets" (Map Text AlertTargetProperty -> (Key, Value))
-> Maybe (Map Text AlertTargetProperty) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Map Text AlertTargetProperty)
alertTargets,
Key -> [BehaviorProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Behaviors" ([BehaviorProperty] -> (Key, Value))
-> Maybe [BehaviorProperty] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [BehaviorProperty]
behaviors,
Key -> MetricsExportConfigProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"MetricsExportConfig" (MetricsExportConfigProperty -> (Key, Value))
-> Maybe MetricsExportConfigProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe MetricsExportConfigProperty
metricsExportConfig,
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..=) Key
"SecurityProfileDescription"
(Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
securityProfileDescription,
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..=) Key
"SecurityProfileName" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
securityProfileName,
Key -> [Tag] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Tags" ([Tag] -> (Key, Value)) -> Maybe [Tag] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [Tag]
tags,
Key -> ValueList Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"TargetArns" (ValueList Text -> (Key, Value))
-> Maybe (ValueList Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (ValueList Text)
targetArns])}
instance JSON.ToJSON SecurityProfile where
toJSON :: SecurityProfile -> Value
toJSON SecurityProfile {Maybe [Tag]
Maybe [MetricToRetainProperty]
Maybe [BehaviorProperty]
Maybe (Map Text AlertTargetProperty)
Maybe (ValueList Text)
Maybe (Value Text)
Maybe MetricsExportConfigProperty
()
haddock_workaround_ :: SecurityProfile -> ()
additionalMetricsToRetainV2 :: SecurityProfile -> Maybe [MetricToRetainProperty]
alertTargets :: SecurityProfile -> Maybe (Map Text AlertTargetProperty)
behaviors :: SecurityProfile -> Maybe [BehaviorProperty]
metricsExportConfig :: SecurityProfile -> Maybe MetricsExportConfigProperty
securityProfileDescription :: SecurityProfile -> Maybe (Value Text)
securityProfileName :: SecurityProfile -> Maybe (Value Text)
tags :: SecurityProfile -> Maybe [Tag]
targetArns :: SecurityProfile -> Maybe (ValueList Text)
haddock_workaround_ :: ()
additionalMetricsToRetainV2 :: Maybe [MetricToRetainProperty]
alertTargets :: Maybe (Map Text AlertTargetProperty)
behaviors :: Maybe [BehaviorProperty]
metricsExportConfig :: Maybe MetricsExportConfigProperty
securityProfileDescription :: Maybe (Value Text)
securityProfileName :: Maybe (Value Text)
tags :: Maybe [Tag]
targetArns :: Maybe (ValueList Text)
..}
= [(Key, Value)] -> Value
JSON.object
([Item [(Key, Value)]] -> [(Key, Value)]
forall l. IsList l => [Item l] -> l
Prelude.fromList
([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
[Key -> [MetricToRetainProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"AdditionalMetricsToRetainV2"
([MetricToRetainProperty] -> (Key, Value))
-> Maybe [MetricToRetainProperty] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [MetricToRetainProperty]
additionalMetricsToRetainV2,
Key -> Map Text AlertTargetProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"AlertTargets" (Map Text AlertTargetProperty -> (Key, Value))
-> Maybe (Map Text AlertTargetProperty) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Map Text AlertTargetProperty)
alertTargets,
Key -> [BehaviorProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Behaviors" ([BehaviorProperty] -> (Key, Value))
-> Maybe [BehaviorProperty] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [BehaviorProperty]
behaviors,
Key -> MetricsExportConfigProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"MetricsExportConfig" (MetricsExportConfigProperty -> (Key, Value))
-> Maybe MetricsExportConfigProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe MetricsExportConfigProperty
metricsExportConfig,
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..=) Key
"SecurityProfileDescription"
(Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
securityProfileDescription,
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..=) Key
"SecurityProfileName" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
securityProfileName,
Key -> [Tag] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Tags" ([Tag] -> (Key, Value)) -> Maybe [Tag] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [Tag]
tags,
Key -> ValueList Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"TargetArns" (ValueList Text -> (Key, Value))
-> Maybe (ValueList Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (ValueList Text)
targetArns]))
instance Property "AdditionalMetricsToRetainV2" SecurityProfile where
type PropertyType "AdditionalMetricsToRetainV2" SecurityProfile = [MetricToRetainProperty]
set :: PropertyType "AdditionalMetricsToRetainV2" SecurityProfile
-> SecurityProfile -> SecurityProfile
set PropertyType "AdditionalMetricsToRetainV2" SecurityProfile
newValue SecurityProfile {Maybe [Tag]
Maybe [MetricToRetainProperty]
Maybe [BehaviorProperty]
Maybe (Map Text AlertTargetProperty)
Maybe (ValueList Text)
Maybe (Value Text)
Maybe MetricsExportConfigProperty
()
haddock_workaround_ :: SecurityProfile -> ()
additionalMetricsToRetainV2 :: SecurityProfile -> Maybe [MetricToRetainProperty]
alertTargets :: SecurityProfile -> Maybe (Map Text AlertTargetProperty)
behaviors :: SecurityProfile -> Maybe [BehaviorProperty]
metricsExportConfig :: SecurityProfile -> Maybe MetricsExportConfigProperty
securityProfileDescription :: SecurityProfile -> Maybe (Value Text)
securityProfileName :: SecurityProfile -> Maybe (Value Text)
tags :: SecurityProfile -> Maybe [Tag]
targetArns :: SecurityProfile -> Maybe (ValueList Text)
haddock_workaround_ :: ()
additionalMetricsToRetainV2 :: Maybe [MetricToRetainProperty]
alertTargets :: Maybe (Map Text AlertTargetProperty)
behaviors :: Maybe [BehaviorProperty]
metricsExportConfig :: Maybe MetricsExportConfigProperty
securityProfileDescription :: Maybe (Value Text)
securityProfileName :: Maybe (Value Text)
tags :: Maybe [Tag]
targetArns :: Maybe (ValueList Text)
..}
= SecurityProfile
{additionalMetricsToRetainV2 :: Maybe [MetricToRetainProperty]
additionalMetricsToRetainV2 = [MetricToRetainProperty] -> Maybe [MetricToRetainProperty]
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure [MetricToRetainProperty]
PropertyType "AdditionalMetricsToRetainV2" SecurityProfile
newValue, Maybe [Tag]
Maybe [BehaviorProperty]
Maybe (Map Text AlertTargetProperty)
Maybe (ValueList Text)
Maybe (Value Text)
Maybe MetricsExportConfigProperty
()
haddock_workaround_ :: ()
alertTargets :: Maybe (Map Text AlertTargetProperty)
behaviors :: Maybe [BehaviorProperty]
metricsExportConfig :: Maybe MetricsExportConfigProperty
securityProfileDescription :: Maybe (Value Text)
securityProfileName :: Maybe (Value Text)
tags :: Maybe [Tag]
targetArns :: Maybe (ValueList Text)
haddock_workaround_ :: ()
alertTargets :: Maybe (Map Text AlertTargetProperty)
behaviors :: Maybe [BehaviorProperty]
metricsExportConfig :: Maybe MetricsExportConfigProperty
securityProfileDescription :: Maybe (Value Text)
securityProfileName :: Maybe (Value Text)
tags :: Maybe [Tag]
targetArns :: Maybe (ValueList Text)
..}
instance Property "AlertTargets" SecurityProfile where
type PropertyType "AlertTargets" SecurityProfile = Prelude.Map Prelude.Text AlertTargetProperty
set :: PropertyType "AlertTargets" SecurityProfile
-> SecurityProfile -> SecurityProfile
set PropertyType "AlertTargets" SecurityProfile
newValue SecurityProfile {Maybe [Tag]
Maybe [MetricToRetainProperty]
Maybe [BehaviorProperty]
Maybe (Map Text AlertTargetProperty)
Maybe (ValueList Text)
Maybe (Value Text)
Maybe MetricsExportConfigProperty
()
haddock_workaround_ :: SecurityProfile -> ()
additionalMetricsToRetainV2 :: SecurityProfile -> Maybe [MetricToRetainProperty]
alertTargets :: SecurityProfile -> Maybe (Map Text AlertTargetProperty)
behaviors :: SecurityProfile -> Maybe [BehaviorProperty]
metricsExportConfig :: SecurityProfile -> Maybe MetricsExportConfigProperty
securityProfileDescription :: SecurityProfile -> Maybe (Value Text)
securityProfileName :: SecurityProfile -> Maybe (Value Text)
tags :: SecurityProfile -> Maybe [Tag]
targetArns :: SecurityProfile -> Maybe (ValueList Text)
haddock_workaround_ :: ()
additionalMetricsToRetainV2 :: Maybe [MetricToRetainProperty]
alertTargets :: Maybe (Map Text AlertTargetProperty)
behaviors :: Maybe [BehaviorProperty]
metricsExportConfig :: Maybe MetricsExportConfigProperty
securityProfileDescription :: Maybe (Value Text)
securityProfileName :: Maybe (Value Text)
tags :: Maybe [Tag]
targetArns :: Maybe (ValueList Text)
..}
= SecurityProfile {alertTargets :: Maybe (Map Text AlertTargetProperty)
alertTargets = Map Text AlertTargetProperty
-> Maybe (Map Text AlertTargetProperty)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure Map Text AlertTargetProperty
PropertyType "AlertTargets" SecurityProfile
newValue, Maybe [Tag]
Maybe [MetricToRetainProperty]
Maybe [BehaviorProperty]
Maybe (ValueList Text)
Maybe (Value Text)
Maybe MetricsExportConfigProperty
()
haddock_workaround_ :: ()
additionalMetricsToRetainV2 :: Maybe [MetricToRetainProperty]
behaviors :: Maybe [BehaviorProperty]
metricsExportConfig :: Maybe MetricsExportConfigProperty
securityProfileDescription :: Maybe (Value Text)
securityProfileName :: Maybe (Value Text)
tags :: Maybe [Tag]
targetArns :: Maybe (ValueList Text)
haddock_workaround_ :: ()
additionalMetricsToRetainV2 :: Maybe [MetricToRetainProperty]
behaviors :: Maybe [BehaviorProperty]
metricsExportConfig :: Maybe MetricsExportConfigProperty
securityProfileDescription :: Maybe (Value Text)
securityProfileName :: Maybe (Value Text)
tags :: Maybe [Tag]
targetArns :: Maybe (ValueList Text)
..}
instance Property "Behaviors" SecurityProfile where
type PropertyType "Behaviors" SecurityProfile = [BehaviorProperty]
set :: PropertyType "Behaviors" SecurityProfile
-> SecurityProfile -> SecurityProfile
set PropertyType "Behaviors" SecurityProfile
newValue SecurityProfile {Maybe [Tag]
Maybe [MetricToRetainProperty]
Maybe [BehaviorProperty]
Maybe (Map Text AlertTargetProperty)
Maybe (ValueList Text)
Maybe (Value Text)
Maybe MetricsExportConfigProperty
()
haddock_workaround_ :: SecurityProfile -> ()
additionalMetricsToRetainV2 :: SecurityProfile -> Maybe [MetricToRetainProperty]
alertTargets :: SecurityProfile -> Maybe (Map Text AlertTargetProperty)
behaviors :: SecurityProfile -> Maybe [BehaviorProperty]
metricsExportConfig :: SecurityProfile -> Maybe MetricsExportConfigProperty
securityProfileDescription :: SecurityProfile -> Maybe (Value Text)
securityProfileName :: SecurityProfile -> Maybe (Value Text)
tags :: SecurityProfile -> Maybe [Tag]
targetArns :: SecurityProfile -> Maybe (ValueList Text)
haddock_workaround_ :: ()
additionalMetricsToRetainV2 :: Maybe [MetricToRetainProperty]
alertTargets :: Maybe (Map Text AlertTargetProperty)
behaviors :: Maybe [BehaviorProperty]
metricsExportConfig :: Maybe MetricsExportConfigProperty
securityProfileDescription :: Maybe (Value Text)
securityProfileName :: Maybe (Value Text)
tags :: Maybe [Tag]
targetArns :: Maybe (ValueList Text)
..}
= SecurityProfile {behaviors :: Maybe [BehaviorProperty]
behaviors = [BehaviorProperty] -> Maybe [BehaviorProperty]
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure [BehaviorProperty]
PropertyType "Behaviors" SecurityProfile
newValue, Maybe [Tag]
Maybe [MetricToRetainProperty]
Maybe (Map Text AlertTargetProperty)
Maybe (ValueList Text)
Maybe (Value Text)
Maybe MetricsExportConfigProperty
()
haddock_workaround_ :: ()
additionalMetricsToRetainV2 :: Maybe [MetricToRetainProperty]
alertTargets :: Maybe (Map Text AlertTargetProperty)
metricsExportConfig :: Maybe MetricsExportConfigProperty
securityProfileDescription :: Maybe (Value Text)
securityProfileName :: Maybe (Value Text)
tags :: Maybe [Tag]
targetArns :: Maybe (ValueList Text)
haddock_workaround_ :: ()
additionalMetricsToRetainV2 :: Maybe [MetricToRetainProperty]
alertTargets :: Maybe (Map Text AlertTargetProperty)
metricsExportConfig :: Maybe MetricsExportConfigProperty
securityProfileDescription :: Maybe (Value Text)
securityProfileName :: Maybe (Value Text)
tags :: Maybe [Tag]
targetArns :: Maybe (ValueList Text)
..}
instance Property "MetricsExportConfig" SecurityProfile where
type PropertyType "MetricsExportConfig" SecurityProfile = MetricsExportConfigProperty
set :: PropertyType "MetricsExportConfig" SecurityProfile
-> SecurityProfile -> SecurityProfile
set PropertyType "MetricsExportConfig" SecurityProfile
newValue SecurityProfile {Maybe [Tag]
Maybe [MetricToRetainProperty]
Maybe [BehaviorProperty]
Maybe (Map Text AlertTargetProperty)
Maybe (ValueList Text)
Maybe (Value Text)
Maybe MetricsExportConfigProperty
()
haddock_workaround_ :: SecurityProfile -> ()
additionalMetricsToRetainV2 :: SecurityProfile -> Maybe [MetricToRetainProperty]
alertTargets :: SecurityProfile -> Maybe (Map Text AlertTargetProperty)
behaviors :: SecurityProfile -> Maybe [BehaviorProperty]
metricsExportConfig :: SecurityProfile -> Maybe MetricsExportConfigProperty
securityProfileDescription :: SecurityProfile -> Maybe (Value Text)
securityProfileName :: SecurityProfile -> Maybe (Value Text)
tags :: SecurityProfile -> Maybe [Tag]
targetArns :: SecurityProfile -> Maybe (ValueList Text)
haddock_workaround_ :: ()
additionalMetricsToRetainV2 :: Maybe [MetricToRetainProperty]
alertTargets :: Maybe (Map Text AlertTargetProperty)
behaviors :: Maybe [BehaviorProperty]
metricsExportConfig :: Maybe MetricsExportConfigProperty
securityProfileDescription :: Maybe (Value Text)
securityProfileName :: Maybe (Value Text)
tags :: Maybe [Tag]
targetArns :: Maybe (ValueList Text)
..}
= SecurityProfile {metricsExportConfig :: Maybe MetricsExportConfigProperty
metricsExportConfig = MetricsExportConfigProperty -> Maybe MetricsExportConfigProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "MetricsExportConfig" SecurityProfile
MetricsExportConfigProperty
newValue, Maybe [Tag]
Maybe [MetricToRetainProperty]
Maybe [BehaviorProperty]
Maybe (Map Text AlertTargetProperty)
Maybe (ValueList Text)
Maybe (Value Text)
()
haddock_workaround_ :: ()
additionalMetricsToRetainV2 :: Maybe [MetricToRetainProperty]
alertTargets :: Maybe (Map Text AlertTargetProperty)
behaviors :: Maybe [BehaviorProperty]
securityProfileDescription :: Maybe (Value Text)
securityProfileName :: Maybe (Value Text)
tags :: Maybe [Tag]
targetArns :: Maybe (ValueList Text)
haddock_workaround_ :: ()
additionalMetricsToRetainV2 :: Maybe [MetricToRetainProperty]
alertTargets :: Maybe (Map Text AlertTargetProperty)
behaviors :: Maybe [BehaviorProperty]
securityProfileDescription :: Maybe (Value Text)
securityProfileName :: Maybe (Value Text)
tags :: Maybe [Tag]
targetArns :: Maybe (ValueList Text)
..}
instance Property "SecurityProfileDescription" SecurityProfile where
type PropertyType "SecurityProfileDescription" SecurityProfile = Value Prelude.Text
set :: PropertyType "SecurityProfileDescription" SecurityProfile
-> SecurityProfile -> SecurityProfile
set PropertyType "SecurityProfileDescription" SecurityProfile
newValue SecurityProfile {Maybe [Tag]
Maybe [MetricToRetainProperty]
Maybe [BehaviorProperty]
Maybe (Map Text AlertTargetProperty)
Maybe (ValueList Text)
Maybe (Value Text)
Maybe MetricsExportConfigProperty
()
haddock_workaround_ :: SecurityProfile -> ()
additionalMetricsToRetainV2 :: SecurityProfile -> Maybe [MetricToRetainProperty]
alertTargets :: SecurityProfile -> Maybe (Map Text AlertTargetProperty)
behaviors :: SecurityProfile -> Maybe [BehaviorProperty]
metricsExportConfig :: SecurityProfile -> Maybe MetricsExportConfigProperty
securityProfileDescription :: SecurityProfile -> Maybe (Value Text)
securityProfileName :: SecurityProfile -> Maybe (Value Text)
tags :: SecurityProfile -> Maybe [Tag]
targetArns :: SecurityProfile -> Maybe (ValueList Text)
haddock_workaround_ :: ()
additionalMetricsToRetainV2 :: Maybe [MetricToRetainProperty]
alertTargets :: Maybe (Map Text AlertTargetProperty)
behaviors :: Maybe [BehaviorProperty]
metricsExportConfig :: Maybe MetricsExportConfigProperty
securityProfileDescription :: Maybe (Value Text)
securityProfileName :: Maybe (Value Text)
tags :: Maybe [Tag]
targetArns :: Maybe (ValueList Text)
..}
= SecurityProfile
{securityProfileDescription :: Maybe (Value Text)
securityProfileDescription = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "SecurityProfileDescription" SecurityProfile
Value Text
newValue, Maybe [Tag]
Maybe [MetricToRetainProperty]
Maybe [BehaviorProperty]
Maybe (Map Text AlertTargetProperty)
Maybe (ValueList Text)
Maybe (Value Text)
Maybe MetricsExportConfigProperty
()
haddock_workaround_ :: ()
additionalMetricsToRetainV2 :: Maybe [MetricToRetainProperty]
alertTargets :: Maybe (Map Text AlertTargetProperty)
behaviors :: Maybe [BehaviorProperty]
metricsExportConfig :: Maybe MetricsExportConfigProperty
securityProfileName :: Maybe (Value Text)
tags :: Maybe [Tag]
targetArns :: Maybe (ValueList Text)
haddock_workaround_ :: ()
additionalMetricsToRetainV2 :: Maybe [MetricToRetainProperty]
alertTargets :: Maybe (Map Text AlertTargetProperty)
behaviors :: Maybe [BehaviorProperty]
metricsExportConfig :: Maybe MetricsExportConfigProperty
securityProfileName :: Maybe (Value Text)
tags :: Maybe [Tag]
targetArns :: Maybe (ValueList Text)
..}
instance Property "SecurityProfileName" SecurityProfile where
type PropertyType "SecurityProfileName" SecurityProfile = Value Prelude.Text
set :: PropertyType "SecurityProfileName" SecurityProfile
-> SecurityProfile -> SecurityProfile
set PropertyType "SecurityProfileName" SecurityProfile
newValue SecurityProfile {Maybe [Tag]
Maybe [MetricToRetainProperty]
Maybe [BehaviorProperty]
Maybe (Map Text AlertTargetProperty)
Maybe (ValueList Text)
Maybe (Value Text)
Maybe MetricsExportConfigProperty
()
haddock_workaround_ :: SecurityProfile -> ()
additionalMetricsToRetainV2 :: SecurityProfile -> Maybe [MetricToRetainProperty]
alertTargets :: SecurityProfile -> Maybe (Map Text AlertTargetProperty)
behaviors :: SecurityProfile -> Maybe [BehaviorProperty]
metricsExportConfig :: SecurityProfile -> Maybe MetricsExportConfigProperty
securityProfileDescription :: SecurityProfile -> Maybe (Value Text)
securityProfileName :: SecurityProfile -> Maybe (Value Text)
tags :: SecurityProfile -> Maybe [Tag]
targetArns :: SecurityProfile -> Maybe (ValueList Text)
haddock_workaround_ :: ()
additionalMetricsToRetainV2 :: Maybe [MetricToRetainProperty]
alertTargets :: Maybe (Map Text AlertTargetProperty)
behaviors :: Maybe [BehaviorProperty]
metricsExportConfig :: Maybe MetricsExportConfigProperty
securityProfileDescription :: Maybe (Value Text)
securityProfileName :: Maybe (Value Text)
tags :: Maybe [Tag]
targetArns :: Maybe (ValueList Text)
..}
= SecurityProfile {securityProfileName :: Maybe (Value Text)
securityProfileName = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "SecurityProfileName" SecurityProfile
Value Text
newValue, Maybe [Tag]
Maybe [MetricToRetainProperty]
Maybe [BehaviorProperty]
Maybe (Map Text AlertTargetProperty)
Maybe (ValueList Text)
Maybe (Value Text)
Maybe MetricsExportConfigProperty
()
haddock_workaround_ :: ()
additionalMetricsToRetainV2 :: Maybe [MetricToRetainProperty]
alertTargets :: Maybe (Map Text AlertTargetProperty)
behaviors :: Maybe [BehaviorProperty]
metricsExportConfig :: Maybe MetricsExportConfigProperty
securityProfileDescription :: Maybe (Value Text)
tags :: Maybe [Tag]
targetArns :: Maybe (ValueList Text)
haddock_workaround_ :: ()
additionalMetricsToRetainV2 :: Maybe [MetricToRetainProperty]
alertTargets :: Maybe (Map Text AlertTargetProperty)
behaviors :: Maybe [BehaviorProperty]
metricsExportConfig :: Maybe MetricsExportConfigProperty
securityProfileDescription :: Maybe (Value Text)
tags :: Maybe [Tag]
targetArns :: Maybe (ValueList Text)
..}
instance Property "Tags" SecurityProfile where
type PropertyType "Tags" SecurityProfile = [Tag]
set :: PropertyType "Tags" SecurityProfile
-> SecurityProfile -> SecurityProfile
set PropertyType "Tags" SecurityProfile
newValue SecurityProfile {Maybe [Tag]
Maybe [MetricToRetainProperty]
Maybe [BehaviorProperty]
Maybe (Map Text AlertTargetProperty)
Maybe (ValueList Text)
Maybe (Value Text)
Maybe MetricsExportConfigProperty
()
haddock_workaround_ :: SecurityProfile -> ()
additionalMetricsToRetainV2 :: SecurityProfile -> Maybe [MetricToRetainProperty]
alertTargets :: SecurityProfile -> Maybe (Map Text AlertTargetProperty)
behaviors :: SecurityProfile -> Maybe [BehaviorProperty]
metricsExportConfig :: SecurityProfile -> Maybe MetricsExportConfigProperty
securityProfileDescription :: SecurityProfile -> Maybe (Value Text)
securityProfileName :: SecurityProfile -> Maybe (Value Text)
tags :: SecurityProfile -> Maybe [Tag]
targetArns :: SecurityProfile -> Maybe (ValueList Text)
haddock_workaround_ :: ()
additionalMetricsToRetainV2 :: Maybe [MetricToRetainProperty]
alertTargets :: Maybe (Map Text AlertTargetProperty)
behaviors :: Maybe [BehaviorProperty]
metricsExportConfig :: Maybe MetricsExportConfigProperty
securityProfileDescription :: Maybe (Value Text)
securityProfileName :: Maybe (Value Text)
tags :: Maybe [Tag]
targetArns :: Maybe (ValueList Text)
..}
= SecurityProfile {tags :: Maybe [Tag]
tags = [Tag] -> Maybe [Tag]
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure [Tag]
PropertyType "Tags" SecurityProfile
newValue, Maybe [MetricToRetainProperty]
Maybe [BehaviorProperty]
Maybe (Map Text AlertTargetProperty)
Maybe (ValueList Text)
Maybe (Value Text)
Maybe MetricsExportConfigProperty
()
haddock_workaround_ :: ()
additionalMetricsToRetainV2 :: Maybe [MetricToRetainProperty]
alertTargets :: Maybe (Map Text AlertTargetProperty)
behaviors :: Maybe [BehaviorProperty]
metricsExportConfig :: Maybe MetricsExportConfigProperty
securityProfileDescription :: Maybe (Value Text)
securityProfileName :: Maybe (Value Text)
targetArns :: Maybe (ValueList Text)
haddock_workaround_ :: ()
additionalMetricsToRetainV2 :: Maybe [MetricToRetainProperty]
alertTargets :: Maybe (Map Text AlertTargetProperty)
behaviors :: Maybe [BehaviorProperty]
metricsExportConfig :: Maybe MetricsExportConfigProperty
securityProfileDescription :: Maybe (Value Text)
securityProfileName :: Maybe (Value Text)
targetArns :: Maybe (ValueList Text)
..}
instance Property "TargetArns" SecurityProfile where
type PropertyType "TargetArns" SecurityProfile = ValueList Prelude.Text
set :: PropertyType "TargetArns" SecurityProfile
-> SecurityProfile -> SecurityProfile
set PropertyType "TargetArns" SecurityProfile
newValue SecurityProfile {Maybe [Tag]
Maybe [MetricToRetainProperty]
Maybe [BehaviorProperty]
Maybe (Map Text AlertTargetProperty)
Maybe (ValueList Text)
Maybe (Value Text)
Maybe MetricsExportConfigProperty
()
haddock_workaround_ :: SecurityProfile -> ()
additionalMetricsToRetainV2 :: SecurityProfile -> Maybe [MetricToRetainProperty]
alertTargets :: SecurityProfile -> Maybe (Map Text AlertTargetProperty)
behaviors :: SecurityProfile -> Maybe [BehaviorProperty]
metricsExportConfig :: SecurityProfile -> Maybe MetricsExportConfigProperty
securityProfileDescription :: SecurityProfile -> Maybe (Value Text)
securityProfileName :: SecurityProfile -> Maybe (Value Text)
tags :: SecurityProfile -> Maybe [Tag]
targetArns :: SecurityProfile -> Maybe (ValueList Text)
haddock_workaround_ :: ()
additionalMetricsToRetainV2 :: Maybe [MetricToRetainProperty]
alertTargets :: Maybe (Map Text AlertTargetProperty)
behaviors :: Maybe [BehaviorProperty]
metricsExportConfig :: Maybe MetricsExportConfigProperty
securityProfileDescription :: Maybe (Value Text)
securityProfileName :: Maybe (Value Text)
tags :: Maybe [Tag]
targetArns :: Maybe (ValueList Text)
..}
= SecurityProfile {targetArns :: Maybe (ValueList Text)
targetArns = ValueList Text -> Maybe (ValueList Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "TargetArns" SecurityProfile
ValueList Text
newValue, Maybe [Tag]
Maybe [MetricToRetainProperty]
Maybe [BehaviorProperty]
Maybe (Map Text AlertTargetProperty)
Maybe (Value Text)
Maybe MetricsExportConfigProperty
()
haddock_workaround_ :: ()
additionalMetricsToRetainV2 :: Maybe [MetricToRetainProperty]
alertTargets :: Maybe (Map Text AlertTargetProperty)
behaviors :: Maybe [BehaviorProperty]
metricsExportConfig :: Maybe MetricsExportConfigProperty
securityProfileDescription :: Maybe (Value Text)
securityProfileName :: Maybe (Value Text)
tags :: Maybe [Tag]
haddock_workaround_ :: ()
additionalMetricsToRetainV2 :: Maybe [MetricToRetainProperty]
alertTargets :: Maybe (Map Text AlertTargetProperty)
behaviors :: Maybe [BehaviorProperty]
metricsExportConfig :: Maybe MetricsExportConfigProperty
securityProfileDescription :: Maybe (Value Text)
securityProfileName :: Maybe (Value Text)
tags :: Maybe [Tag]
..}