module Stratosphere.Config.RemediationConfiguration (
        module Exports, RemediationConfiguration(..),
        mkRemediationConfiguration
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.Config.RemediationConfiguration.ExecutionControlsProperty as Exports
import Stratosphere.ResourceProperties
import Stratosphere.Value
data RemediationConfiguration
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-config-remediationconfiguration.html>
    RemediationConfiguration {RemediationConfiguration -> ()
haddock_workaround_ :: (),
                              -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-config-remediationconfiguration.html#cfn-config-remediationconfiguration-automatic>
                              RemediationConfiguration -> Maybe (Value Bool)
automatic :: (Prelude.Maybe (Value Prelude.Bool)),
                              -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-config-remediationconfiguration.html#cfn-config-remediationconfiguration-configrulename>
                              RemediationConfiguration -> Value Text
configRuleName :: (Value Prelude.Text),
                              -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-config-remediationconfiguration.html#cfn-config-remediationconfiguration-executioncontrols>
                              RemediationConfiguration -> Maybe ExecutionControlsProperty
executionControls :: (Prelude.Maybe ExecutionControlsProperty),
                              -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-config-remediationconfiguration.html#cfn-config-remediationconfiguration-maximumautomaticattempts>
                              RemediationConfiguration -> Maybe (Value Integer)
maximumAutomaticAttempts :: (Prelude.Maybe (Value Prelude.Integer)),
                              -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-config-remediationconfiguration.html#cfn-config-remediationconfiguration-parameters>
                              RemediationConfiguration -> Maybe Object
parameters :: (Prelude.Maybe JSON.Object),
                              -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-config-remediationconfiguration.html#cfn-config-remediationconfiguration-resourcetype>
                              RemediationConfiguration -> Maybe (Value Text)
resourceType :: (Prelude.Maybe (Value Prelude.Text)),
                              -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-config-remediationconfiguration.html#cfn-config-remediationconfiguration-retryattemptseconds>
                              RemediationConfiguration -> Maybe (Value Integer)
retryAttemptSeconds :: (Prelude.Maybe (Value Prelude.Integer)),
                              -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-config-remediationconfiguration.html#cfn-config-remediationconfiguration-targetid>
                              RemediationConfiguration -> Value Text
targetId :: (Value Prelude.Text),
                              -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-config-remediationconfiguration.html#cfn-config-remediationconfiguration-targettype>
                              RemediationConfiguration -> Value Text
targetType :: (Value Prelude.Text),
                              -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-config-remediationconfiguration.html#cfn-config-remediationconfiguration-targetversion>
                              RemediationConfiguration -> Maybe (Value Text)
targetVersion :: (Prelude.Maybe (Value Prelude.Text))}
  deriving stock (RemediationConfiguration -> RemediationConfiguration -> Bool
(RemediationConfiguration -> RemediationConfiguration -> Bool)
-> (RemediationConfiguration -> RemediationConfiguration -> Bool)
-> Eq RemediationConfiguration
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: RemediationConfiguration -> RemediationConfiguration -> Bool
== :: RemediationConfiguration -> RemediationConfiguration -> Bool
$c/= :: RemediationConfiguration -> RemediationConfiguration -> Bool
/= :: RemediationConfiguration -> RemediationConfiguration -> Bool
Prelude.Eq, Int -> RemediationConfiguration -> ShowS
[RemediationConfiguration] -> ShowS
RemediationConfiguration -> String
(Int -> RemediationConfiguration -> ShowS)
-> (RemediationConfiguration -> String)
-> ([RemediationConfiguration] -> ShowS)
-> Show RemediationConfiguration
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> RemediationConfiguration -> ShowS
showsPrec :: Int -> RemediationConfiguration -> ShowS
$cshow :: RemediationConfiguration -> String
show :: RemediationConfiguration -> String
$cshowList :: [RemediationConfiguration] -> ShowS
showList :: [RemediationConfiguration] -> ShowS
Prelude.Show)
mkRemediationConfiguration ::
  Value Prelude.Text
  -> Value Prelude.Text
     -> Value Prelude.Text -> RemediationConfiguration
mkRemediationConfiguration :: Value Text -> Value Text -> Value Text -> RemediationConfiguration
mkRemediationConfiguration Value Text
configRuleName Value Text
targetId Value Text
targetType
  = RemediationConfiguration
      {haddock_workaround_ :: ()
haddock_workaround_ = (), configRuleName :: Value Text
configRuleName = Value Text
configRuleName,
       targetId :: Value Text
targetId = Value Text
targetId, targetType :: Value Text
targetType = Value Text
targetType,
       automatic :: Maybe (Value Bool)
automatic = Maybe (Value Bool)
forall a. Maybe a
Prelude.Nothing, executionControls :: Maybe ExecutionControlsProperty
executionControls = Maybe ExecutionControlsProperty
forall a. Maybe a
Prelude.Nothing,
       maximumAutomaticAttempts :: Maybe (Value Integer)
maximumAutomaticAttempts = Maybe (Value Integer)
forall a. Maybe a
Prelude.Nothing,
       parameters :: Maybe Object
parameters = Maybe Object
forall a. Maybe a
Prelude.Nothing, resourceType :: Maybe (Value Text)
resourceType = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       retryAttemptSeconds :: Maybe (Value Integer)
retryAttemptSeconds = Maybe (Value Integer)
forall a. Maybe a
Prelude.Nothing,
       targetVersion :: Maybe (Value Text)
targetVersion = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing}
instance ToResourceProperties RemediationConfiguration where
  toResourceProperties :: RemediationConfiguration -> ResourceProperties
toResourceProperties RemediationConfiguration {Maybe Object
Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe ExecutionControlsProperty
()
Value Text
haddock_workaround_ :: RemediationConfiguration -> ()
automatic :: RemediationConfiguration -> Maybe (Value Bool)
configRuleName :: RemediationConfiguration -> Value Text
executionControls :: RemediationConfiguration -> Maybe ExecutionControlsProperty
maximumAutomaticAttempts :: RemediationConfiguration -> Maybe (Value Integer)
parameters :: RemediationConfiguration -> Maybe Object
resourceType :: RemediationConfiguration -> Maybe (Value Text)
retryAttemptSeconds :: RemediationConfiguration -> Maybe (Value Integer)
targetId :: RemediationConfiguration -> Value Text
targetType :: RemediationConfiguration -> Value Text
targetVersion :: RemediationConfiguration -> Maybe (Value Text)
haddock_workaround_ :: ()
automatic :: Maybe (Value Bool)
configRuleName :: Value Text
executionControls :: Maybe ExecutionControlsProperty
maximumAutomaticAttempts :: Maybe (Value Integer)
parameters :: Maybe Object
resourceType :: Maybe (Value Text)
retryAttemptSeconds :: Maybe (Value Integer)
targetId :: Value Text
targetType :: Value Text
targetVersion :: Maybe (Value Text)
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::Config::RemediationConfiguration",
         supportsTags :: Bool
supportsTags = Bool
Prelude.False,
         properties :: Object
properties = [Item Object] -> Object
forall l. IsList l => [Item l] -> l
Prelude.fromList
                        ([(Key, Value)] -> [(Key, Value)] -> [(Key, Value)]
forall a. Semigroup a => a -> a -> a
(Prelude.<>)
                           [Key
"ConfigRuleName" 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
configRuleName,
                            Key
"TargetId" 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
targetId, Key
"TargetType" 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
targetType]
                           ([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
                              [Key -> Value Bool -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Automatic" (Value Bool -> (Key, Value))
-> Maybe (Value Bool) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Bool)
automatic,
                               Key -> ExecutionControlsProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"ExecutionControls" (ExecutionControlsProperty -> (Key, Value))
-> Maybe ExecutionControlsProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe ExecutionControlsProperty
executionControls,
                               Key -> Value Integer -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"MaximumAutomaticAttempts"
                                 (Value Integer -> (Key, Value))
-> Maybe (Value Integer) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Integer)
maximumAutomaticAttempts,
                               Key -> Object -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Parameters" (Object -> (Key, Value)) -> Maybe Object -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Object
parameters,
                               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
"ResourceType" (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)
resourceType,
                               Key -> Value Integer -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"RetryAttemptSeconds" (Value Integer -> (Key, Value))
-> Maybe (Value Integer) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Integer)
retryAttemptSeconds,
                               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
"TargetVersion" (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)
targetVersion]))}
instance JSON.ToJSON RemediationConfiguration where
  toJSON :: RemediationConfiguration -> Value
toJSON RemediationConfiguration {Maybe Object
Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe ExecutionControlsProperty
()
Value Text
haddock_workaround_ :: RemediationConfiguration -> ()
automatic :: RemediationConfiguration -> Maybe (Value Bool)
configRuleName :: RemediationConfiguration -> Value Text
executionControls :: RemediationConfiguration -> Maybe ExecutionControlsProperty
maximumAutomaticAttempts :: RemediationConfiguration -> Maybe (Value Integer)
parameters :: RemediationConfiguration -> Maybe Object
resourceType :: RemediationConfiguration -> Maybe (Value Text)
retryAttemptSeconds :: RemediationConfiguration -> Maybe (Value Integer)
targetId :: RemediationConfiguration -> Value Text
targetType :: RemediationConfiguration -> Value Text
targetVersion :: RemediationConfiguration -> Maybe (Value Text)
haddock_workaround_ :: ()
automatic :: Maybe (Value Bool)
configRuleName :: Value Text
executionControls :: Maybe ExecutionControlsProperty
maximumAutomaticAttempts :: Maybe (Value Integer)
parameters :: Maybe Object
resourceType :: Maybe (Value Text)
retryAttemptSeconds :: Maybe (Value Integer)
targetId :: Value Text
targetType :: Value Text
targetVersion :: Maybe (Value Text)
..}
    = [(Key, Value)] -> Value
JSON.object
        ([Item [(Key, Value)]] -> [(Key, Value)]
forall l. IsList l => [Item l] -> l
Prelude.fromList
           ([(Key, Value)] -> [(Key, Value)] -> [(Key, Value)]
forall a. Semigroup a => a -> a -> a
(Prelude.<>)
              [Key
"ConfigRuleName" 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
configRuleName,
               Key
"TargetId" 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
targetId, Key
"TargetType" 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
targetType]
              ([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
                 [Key -> Value Bool -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Automatic" (Value Bool -> (Key, Value))
-> Maybe (Value Bool) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Bool)
automatic,
                  Key -> ExecutionControlsProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"ExecutionControls" (ExecutionControlsProperty -> (Key, Value))
-> Maybe ExecutionControlsProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe ExecutionControlsProperty
executionControls,
                  Key -> Value Integer -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"MaximumAutomaticAttempts"
                    (Value Integer -> (Key, Value))
-> Maybe (Value Integer) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Integer)
maximumAutomaticAttempts,
                  Key -> Object -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Parameters" (Object -> (Key, Value)) -> Maybe Object -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Object
parameters,
                  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
"ResourceType" (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)
resourceType,
                  Key -> Value Integer -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"RetryAttemptSeconds" (Value Integer -> (Key, Value))
-> Maybe (Value Integer) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Integer)
retryAttemptSeconds,
                  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
"TargetVersion" (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)
targetVersion])))
instance Property "Automatic" RemediationConfiguration where
  type PropertyType "Automatic" RemediationConfiguration = Value Prelude.Bool
  set :: PropertyType "Automatic" RemediationConfiguration
-> RemediationConfiguration -> RemediationConfiguration
set PropertyType "Automatic" RemediationConfiguration
newValue RemediationConfiguration {Maybe Object
Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe ExecutionControlsProperty
()
Value Text
haddock_workaround_ :: RemediationConfiguration -> ()
automatic :: RemediationConfiguration -> Maybe (Value Bool)
configRuleName :: RemediationConfiguration -> Value Text
executionControls :: RemediationConfiguration -> Maybe ExecutionControlsProperty
maximumAutomaticAttempts :: RemediationConfiguration -> Maybe (Value Integer)
parameters :: RemediationConfiguration -> Maybe Object
resourceType :: RemediationConfiguration -> Maybe (Value Text)
retryAttemptSeconds :: RemediationConfiguration -> Maybe (Value Integer)
targetId :: RemediationConfiguration -> Value Text
targetType :: RemediationConfiguration -> Value Text
targetVersion :: RemediationConfiguration -> Maybe (Value Text)
haddock_workaround_ :: ()
automatic :: Maybe (Value Bool)
configRuleName :: Value Text
executionControls :: Maybe ExecutionControlsProperty
maximumAutomaticAttempts :: Maybe (Value Integer)
parameters :: Maybe Object
resourceType :: Maybe (Value Text)
retryAttemptSeconds :: Maybe (Value Integer)
targetId :: Value Text
targetType :: Value Text
targetVersion :: Maybe (Value Text)
..}
    = RemediationConfiguration {automatic :: Maybe (Value Bool)
automatic = Value Bool -> Maybe (Value Bool)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "Automatic" RemediationConfiguration
Value Bool
newValue, Maybe Object
Maybe (Value Integer)
Maybe (Value Text)
Maybe ExecutionControlsProperty
()
Value Text
haddock_workaround_ :: ()
configRuleName :: Value Text
executionControls :: Maybe ExecutionControlsProperty
maximumAutomaticAttempts :: Maybe (Value Integer)
parameters :: Maybe Object
resourceType :: Maybe (Value Text)
retryAttemptSeconds :: Maybe (Value Integer)
targetId :: Value Text
targetType :: Value Text
targetVersion :: Maybe (Value Text)
haddock_workaround_ :: ()
configRuleName :: Value Text
executionControls :: Maybe ExecutionControlsProperty
maximumAutomaticAttempts :: Maybe (Value Integer)
parameters :: Maybe Object
resourceType :: Maybe (Value Text)
retryAttemptSeconds :: Maybe (Value Integer)
targetId :: Value Text
targetType :: Value Text
targetVersion :: Maybe (Value Text)
..}
instance Property "ConfigRuleName" RemediationConfiguration where
  type PropertyType "ConfigRuleName" RemediationConfiguration = Value Prelude.Text
  set :: PropertyType "ConfigRuleName" RemediationConfiguration
-> RemediationConfiguration -> RemediationConfiguration
set PropertyType "ConfigRuleName" RemediationConfiguration
newValue RemediationConfiguration {Maybe Object
Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe ExecutionControlsProperty
()
Value Text
haddock_workaround_ :: RemediationConfiguration -> ()
automatic :: RemediationConfiguration -> Maybe (Value Bool)
configRuleName :: RemediationConfiguration -> Value Text
executionControls :: RemediationConfiguration -> Maybe ExecutionControlsProperty
maximumAutomaticAttempts :: RemediationConfiguration -> Maybe (Value Integer)
parameters :: RemediationConfiguration -> Maybe Object
resourceType :: RemediationConfiguration -> Maybe (Value Text)
retryAttemptSeconds :: RemediationConfiguration -> Maybe (Value Integer)
targetId :: RemediationConfiguration -> Value Text
targetType :: RemediationConfiguration -> Value Text
targetVersion :: RemediationConfiguration -> Maybe (Value Text)
haddock_workaround_ :: ()
automatic :: Maybe (Value Bool)
configRuleName :: Value Text
executionControls :: Maybe ExecutionControlsProperty
maximumAutomaticAttempts :: Maybe (Value Integer)
parameters :: Maybe Object
resourceType :: Maybe (Value Text)
retryAttemptSeconds :: Maybe (Value Integer)
targetId :: Value Text
targetType :: Value Text
targetVersion :: Maybe (Value Text)
..}
    = RemediationConfiguration {configRuleName :: Value Text
configRuleName = PropertyType "ConfigRuleName" RemediationConfiguration
Value Text
newValue, Maybe Object
Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe ExecutionControlsProperty
()
Value Text
haddock_workaround_ :: ()
automatic :: Maybe (Value Bool)
executionControls :: Maybe ExecutionControlsProperty
maximumAutomaticAttempts :: Maybe (Value Integer)
parameters :: Maybe Object
resourceType :: Maybe (Value Text)
retryAttemptSeconds :: Maybe (Value Integer)
targetId :: Value Text
targetType :: Value Text
targetVersion :: Maybe (Value Text)
haddock_workaround_ :: ()
automatic :: Maybe (Value Bool)
executionControls :: Maybe ExecutionControlsProperty
maximumAutomaticAttempts :: Maybe (Value Integer)
parameters :: Maybe Object
resourceType :: Maybe (Value Text)
retryAttemptSeconds :: Maybe (Value Integer)
targetId :: Value Text
targetType :: Value Text
targetVersion :: Maybe (Value Text)
..}
instance Property "ExecutionControls" RemediationConfiguration where
  type PropertyType "ExecutionControls" RemediationConfiguration = ExecutionControlsProperty
  set :: PropertyType "ExecutionControls" RemediationConfiguration
-> RemediationConfiguration -> RemediationConfiguration
set PropertyType "ExecutionControls" RemediationConfiguration
newValue RemediationConfiguration {Maybe Object
Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe ExecutionControlsProperty
()
Value Text
haddock_workaround_ :: RemediationConfiguration -> ()
automatic :: RemediationConfiguration -> Maybe (Value Bool)
configRuleName :: RemediationConfiguration -> Value Text
executionControls :: RemediationConfiguration -> Maybe ExecutionControlsProperty
maximumAutomaticAttempts :: RemediationConfiguration -> Maybe (Value Integer)
parameters :: RemediationConfiguration -> Maybe Object
resourceType :: RemediationConfiguration -> Maybe (Value Text)
retryAttemptSeconds :: RemediationConfiguration -> Maybe (Value Integer)
targetId :: RemediationConfiguration -> Value Text
targetType :: RemediationConfiguration -> Value Text
targetVersion :: RemediationConfiguration -> Maybe (Value Text)
haddock_workaround_ :: ()
automatic :: Maybe (Value Bool)
configRuleName :: Value Text
executionControls :: Maybe ExecutionControlsProperty
maximumAutomaticAttempts :: Maybe (Value Integer)
parameters :: Maybe Object
resourceType :: Maybe (Value Text)
retryAttemptSeconds :: Maybe (Value Integer)
targetId :: Value Text
targetType :: Value Text
targetVersion :: Maybe (Value Text)
..}
    = RemediationConfiguration
        {executionControls :: Maybe ExecutionControlsProperty
executionControls = ExecutionControlsProperty -> Maybe ExecutionControlsProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "ExecutionControls" RemediationConfiguration
ExecutionControlsProperty
newValue, Maybe Object
Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: ()
automatic :: Maybe (Value Bool)
configRuleName :: Value Text
maximumAutomaticAttempts :: Maybe (Value Integer)
parameters :: Maybe Object
resourceType :: Maybe (Value Text)
retryAttemptSeconds :: Maybe (Value Integer)
targetId :: Value Text
targetType :: Value Text
targetVersion :: Maybe (Value Text)
haddock_workaround_ :: ()
automatic :: Maybe (Value Bool)
configRuleName :: Value Text
maximumAutomaticAttempts :: Maybe (Value Integer)
parameters :: Maybe Object
resourceType :: Maybe (Value Text)
retryAttemptSeconds :: Maybe (Value Integer)
targetId :: Value Text
targetType :: Value Text
targetVersion :: Maybe (Value Text)
..}
instance Property "MaximumAutomaticAttempts" RemediationConfiguration where
  type PropertyType "MaximumAutomaticAttempts" RemediationConfiguration = Value Prelude.Integer
  set :: PropertyType "MaximumAutomaticAttempts" RemediationConfiguration
-> RemediationConfiguration -> RemediationConfiguration
set PropertyType "MaximumAutomaticAttempts" RemediationConfiguration
newValue RemediationConfiguration {Maybe Object
Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe ExecutionControlsProperty
()
Value Text
haddock_workaround_ :: RemediationConfiguration -> ()
automatic :: RemediationConfiguration -> Maybe (Value Bool)
configRuleName :: RemediationConfiguration -> Value Text
executionControls :: RemediationConfiguration -> Maybe ExecutionControlsProperty
maximumAutomaticAttempts :: RemediationConfiguration -> Maybe (Value Integer)
parameters :: RemediationConfiguration -> Maybe Object
resourceType :: RemediationConfiguration -> Maybe (Value Text)
retryAttemptSeconds :: RemediationConfiguration -> Maybe (Value Integer)
targetId :: RemediationConfiguration -> Value Text
targetType :: RemediationConfiguration -> Value Text
targetVersion :: RemediationConfiguration -> Maybe (Value Text)
haddock_workaround_ :: ()
automatic :: Maybe (Value Bool)
configRuleName :: Value Text
executionControls :: Maybe ExecutionControlsProperty
maximumAutomaticAttempts :: Maybe (Value Integer)
parameters :: Maybe Object
resourceType :: Maybe (Value Text)
retryAttemptSeconds :: Maybe (Value Integer)
targetId :: Value Text
targetType :: Value Text
targetVersion :: Maybe (Value Text)
..}
    = RemediationConfiguration
        {maximumAutomaticAttempts :: Maybe (Value Integer)
maximumAutomaticAttempts = Value Integer -> Maybe (Value Integer)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "MaximumAutomaticAttempts" RemediationConfiguration
Value Integer
newValue, Maybe Object
Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe ExecutionControlsProperty
()
Value Text
haddock_workaround_ :: ()
automatic :: Maybe (Value Bool)
configRuleName :: Value Text
executionControls :: Maybe ExecutionControlsProperty
parameters :: Maybe Object
resourceType :: Maybe (Value Text)
retryAttemptSeconds :: Maybe (Value Integer)
targetId :: Value Text
targetType :: Value Text
targetVersion :: Maybe (Value Text)
haddock_workaround_ :: ()
automatic :: Maybe (Value Bool)
configRuleName :: Value Text
executionControls :: Maybe ExecutionControlsProperty
parameters :: Maybe Object
resourceType :: Maybe (Value Text)
retryAttemptSeconds :: Maybe (Value Integer)
targetId :: Value Text
targetType :: Value Text
targetVersion :: Maybe (Value Text)
..}
instance Property "Parameters" RemediationConfiguration where
  type PropertyType "Parameters" RemediationConfiguration = JSON.Object
  set :: PropertyType "Parameters" RemediationConfiguration
-> RemediationConfiguration -> RemediationConfiguration
set PropertyType "Parameters" RemediationConfiguration
newValue RemediationConfiguration {Maybe Object
Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe ExecutionControlsProperty
()
Value Text
haddock_workaround_ :: RemediationConfiguration -> ()
automatic :: RemediationConfiguration -> Maybe (Value Bool)
configRuleName :: RemediationConfiguration -> Value Text
executionControls :: RemediationConfiguration -> Maybe ExecutionControlsProperty
maximumAutomaticAttempts :: RemediationConfiguration -> Maybe (Value Integer)
parameters :: RemediationConfiguration -> Maybe Object
resourceType :: RemediationConfiguration -> Maybe (Value Text)
retryAttemptSeconds :: RemediationConfiguration -> Maybe (Value Integer)
targetId :: RemediationConfiguration -> Value Text
targetType :: RemediationConfiguration -> Value Text
targetVersion :: RemediationConfiguration -> Maybe (Value Text)
haddock_workaround_ :: ()
automatic :: Maybe (Value Bool)
configRuleName :: Value Text
executionControls :: Maybe ExecutionControlsProperty
maximumAutomaticAttempts :: Maybe (Value Integer)
parameters :: Maybe Object
resourceType :: Maybe (Value Text)
retryAttemptSeconds :: Maybe (Value Integer)
targetId :: Value Text
targetType :: Value Text
targetVersion :: Maybe (Value Text)
..}
    = RemediationConfiguration {parameters :: Maybe Object
parameters = Object -> Maybe Object
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure Object
PropertyType "Parameters" RemediationConfiguration
newValue, Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe ExecutionControlsProperty
()
Value Text
haddock_workaround_ :: ()
automatic :: Maybe (Value Bool)
configRuleName :: Value Text
executionControls :: Maybe ExecutionControlsProperty
maximumAutomaticAttempts :: Maybe (Value Integer)
resourceType :: Maybe (Value Text)
retryAttemptSeconds :: Maybe (Value Integer)
targetId :: Value Text
targetType :: Value Text
targetVersion :: Maybe (Value Text)
haddock_workaround_ :: ()
automatic :: Maybe (Value Bool)
configRuleName :: Value Text
executionControls :: Maybe ExecutionControlsProperty
maximumAutomaticAttempts :: Maybe (Value Integer)
resourceType :: Maybe (Value Text)
retryAttemptSeconds :: Maybe (Value Integer)
targetId :: Value Text
targetType :: Value Text
targetVersion :: Maybe (Value Text)
..}
instance Property "ResourceType" RemediationConfiguration where
  type PropertyType "ResourceType" RemediationConfiguration = Value Prelude.Text
  set :: PropertyType "ResourceType" RemediationConfiguration
-> RemediationConfiguration -> RemediationConfiguration
set PropertyType "ResourceType" RemediationConfiguration
newValue RemediationConfiguration {Maybe Object
Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe ExecutionControlsProperty
()
Value Text
haddock_workaround_ :: RemediationConfiguration -> ()
automatic :: RemediationConfiguration -> Maybe (Value Bool)
configRuleName :: RemediationConfiguration -> Value Text
executionControls :: RemediationConfiguration -> Maybe ExecutionControlsProperty
maximumAutomaticAttempts :: RemediationConfiguration -> Maybe (Value Integer)
parameters :: RemediationConfiguration -> Maybe Object
resourceType :: RemediationConfiguration -> Maybe (Value Text)
retryAttemptSeconds :: RemediationConfiguration -> Maybe (Value Integer)
targetId :: RemediationConfiguration -> Value Text
targetType :: RemediationConfiguration -> Value Text
targetVersion :: RemediationConfiguration -> Maybe (Value Text)
haddock_workaround_ :: ()
automatic :: Maybe (Value Bool)
configRuleName :: Value Text
executionControls :: Maybe ExecutionControlsProperty
maximumAutomaticAttempts :: Maybe (Value Integer)
parameters :: Maybe Object
resourceType :: Maybe (Value Text)
retryAttemptSeconds :: Maybe (Value Integer)
targetId :: Value Text
targetType :: Value Text
targetVersion :: Maybe (Value Text)
..}
    = RemediationConfiguration
        {resourceType :: Maybe (Value Text)
resourceType = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "ResourceType" RemediationConfiguration
Value Text
newValue, Maybe Object
Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe ExecutionControlsProperty
()
Value Text
haddock_workaround_ :: ()
automatic :: Maybe (Value Bool)
configRuleName :: Value Text
executionControls :: Maybe ExecutionControlsProperty
maximumAutomaticAttempts :: Maybe (Value Integer)
parameters :: Maybe Object
retryAttemptSeconds :: Maybe (Value Integer)
targetId :: Value Text
targetType :: Value Text
targetVersion :: Maybe (Value Text)
haddock_workaround_ :: ()
automatic :: Maybe (Value Bool)
configRuleName :: Value Text
executionControls :: Maybe ExecutionControlsProperty
maximumAutomaticAttempts :: Maybe (Value Integer)
parameters :: Maybe Object
retryAttemptSeconds :: Maybe (Value Integer)
targetId :: Value Text
targetType :: Value Text
targetVersion :: Maybe (Value Text)
..}
instance Property "RetryAttemptSeconds" RemediationConfiguration where
  type PropertyType "RetryAttemptSeconds" RemediationConfiguration = Value Prelude.Integer
  set :: PropertyType "RetryAttemptSeconds" RemediationConfiguration
-> RemediationConfiguration -> RemediationConfiguration
set PropertyType "RetryAttemptSeconds" RemediationConfiguration
newValue RemediationConfiguration {Maybe Object
Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe ExecutionControlsProperty
()
Value Text
haddock_workaround_ :: RemediationConfiguration -> ()
automatic :: RemediationConfiguration -> Maybe (Value Bool)
configRuleName :: RemediationConfiguration -> Value Text
executionControls :: RemediationConfiguration -> Maybe ExecutionControlsProperty
maximumAutomaticAttempts :: RemediationConfiguration -> Maybe (Value Integer)
parameters :: RemediationConfiguration -> Maybe Object
resourceType :: RemediationConfiguration -> Maybe (Value Text)
retryAttemptSeconds :: RemediationConfiguration -> Maybe (Value Integer)
targetId :: RemediationConfiguration -> Value Text
targetType :: RemediationConfiguration -> Value Text
targetVersion :: RemediationConfiguration -> Maybe (Value Text)
haddock_workaround_ :: ()
automatic :: Maybe (Value Bool)
configRuleName :: Value Text
executionControls :: Maybe ExecutionControlsProperty
maximumAutomaticAttempts :: Maybe (Value Integer)
parameters :: Maybe Object
resourceType :: Maybe (Value Text)
retryAttemptSeconds :: Maybe (Value Integer)
targetId :: Value Text
targetType :: Value Text
targetVersion :: Maybe (Value Text)
..}
    = RemediationConfiguration
        {retryAttemptSeconds :: Maybe (Value Integer)
retryAttemptSeconds = Value Integer -> Maybe (Value Integer)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "RetryAttemptSeconds" RemediationConfiguration
Value Integer
newValue, Maybe Object
Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe ExecutionControlsProperty
()
Value Text
haddock_workaround_ :: ()
automatic :: Maybe (Value Bool)
configRuleName :: Value Text
executionControls :: Maybe ExecutionControlsProperty
maximumAutomaticAttempts :: Maybe (Value Integer)
parameters :: Maybe Object
resourceType :: Maybe (Value Text)
targetId :: Value Text
targetType :: Value Text
targetVersion :: Maybe (Value Text)
haddock_workaround_ :: ()
automatic :: Maybe (Value Bool)
configRuleName :: Value Text
executionControls :: Maybe ExecutionControlsProperty
maximumAutomaticAttempts :: Maybe (Value Integer)
parameters :: Maybe Object
resourceType :: Maybe (Value Text)
targetId :: Value Text
targetType :: Value Text
targetVersion :: Maybe (Value Text)
..}
instance Property "TargetId" RemediationConfiguration where
  type PropertyType "TargetId" RemediationConfiguration = Value Prelude.Text
  set :: PropertyType "TargetId" RemediationConfiguration
-> RemediationConfiguration -> RemediationConfiguration
set PropertyType "TargetId" RemediationConfiguration
newValue RemediationConfiguration {Maybe Object
Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe ExecutionControlsProperty
()
Value Text
haddock_workaround_ :: RemediationConfiguration -> ()
automatic :: RemediationConfiguration -> Maybe (Value Bool)
configRuleName :: RemediationConfiguration -> Value Text
executionControls :: RemediationConfiguration -> Maybe ExecutionControlsProperty
maximumAutomaticAttempts :: RemediationConfiguration -> Maybe (Value Integer)
parameters :: RemediationConfiguration -> Maybe Object
resourceType :: RemediationConfiguration -> Maybe (Value Text)
retryAttemptSeconds :: RemediationConfiguration -> Maybe (Value Integer)
targetId :: RemediationConfiguration -> Value Text
targetType :: RemediationConfiguration -> Value Text
targetVersion :: RemediationConfiguration -> Maybe (Value Text)
haddock_workaround_ :: ()
automatic :: Maybe (Value Bool)
configRuleName :: Value Text
executionControls :: Maybe ExecutionControlsProperty
maximumAutomaticAttempts :: Maybe (Value Integer)
parameters :: Maybe Object
resourceType :: Maybe (Value Text)
retryAttemptSeconds :: Maybe (Value Integer)
targetId :: Value Text
targetType :: Value Text
targetVersion :: Maybe (Value Text)
..}
    = RemediationConfiguration {targetId :: Value Text
targetId = PropertyType "TargetId" RemediationConfiguration
Value Text
newValue, Maybe Object
Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe ExecutionControlsProperty
()
Value Text
haddock_workaround_ :: ()
automatic :: Maybe (Value Bool)
configRuleName :: Value Text
executionControls :: Maybe ExecutionControlsProperty
maximumAutomaticAttempts :: Maybe (Value Integer)
parameters :: Maybe Object
resourceType :: Maybe (Value Text)
retryAttemptSeconds :: Maybe (Value Integer)
targetType :: Value Text
targetVersion :: Maybe (Value Text)
haddock_workaround_ :: ()
automatic :: Maybe (Value Bool)
configRuleName :: Value Text
executionControls :: Maybe ExecutionControlsProperty
maximumAutomaticAttempts :: Maybe (Value Integer)
parameters :: Maybe Object
resourceType :: Maybe (Value Text)
retryAttemptSeconds :: Maybe (Value Integer)
targetType :: Value Text
targetVersion :: Maybe (Value Text)
..}
instance Property "TargetType" RemediationConfiguration where
  type PropertyType "TargetType" RemediationConfiguration = Value Prelude.Text
  set :: PropertyType "TargetType" RemediationConfiguration
-> RemediationConfiguration -> RemediationConfiguration
set PropertyType "TargetType" RemediationConfiguration
newValue RemediationConfiguration {Maybe Object
Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe ExecutionControlsProperty
()
Value Text
haddock_workaround_ :: RemediationConfiguration -> ()
automatic :: RemediationConfiguration -> Maybe (Value Bool)
configRuleName :: RemediationConfiguration -> Value Text
executionControls :: RemediationConfiguration -> Maybe ExecutionControlsProperty
maximumAutomaticAttempts :: RemediationConfiguration -> Maybe (Value Integer)
parameters :: RemediationConfiguration -> Maybe Object
resourceType :: RemediationConfiguration -> Maybe (Value Text)
retryAttemptSeconds :: RemediationConfiguration -> Maybe (Value Integer)
targetId :: RemediationConfiguration -> Value Text
targetType :: RemediationConfiguration -> Value Text
targetVersion :: RemediationConfiguration -> Maybe (Value Text)
haddock_workaround_ :: ()
automatic :: Maybe (Value Bool)
configRuleName :: Value Text
executionControls :: Maybe ExecutionControlsProperty
maximumAutomaticAttempts :: Maybe (Value Integer)
parameters :: Maybe Object
resourceType :: Maybe (Value Text)
retryAttemptSeconds :: Maybe (Value Integer)
targetId :: Value Text
targetType :: Value Text
targetVersion :: Maybe (Value Text)
..}
    = RemediationConfiguration {targetType :: Value Text
targetType = PropertyType "TargetType" RemediationConfiguration
Value Text
newValue, Maybe Object
Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe ExecutionControlsProperty
()
Value Text
haddock_workaround_ :: ()
automatic :: Maybe (Value Bool)
configRuleName :: Value Text
executionControls :: Maybe ExecutionControlsProperty
maximumAutomaticAttempts :: Maybe (Value Integer)
parameters :: Maybe Object
resourceType :: Maybe (Value Text)
retryAttemptSeconds :: Maybe (Value Integer)
targetId :: Value Text
targetVersion :: Maybe (Value Text)
haddock_workaround_ :: ()
automatic :: Maybe (Value Bool)
configRuleName :: Value Text
executionControls :: Maybe ExecutionControlsProperty
maximumAutomaticAttempts :: Maybe (Value Integer)
parameters :: Maybe Object
resourceType :: Maybe (Value Text)
retryAttemptSeconds :: Maybe (Value Integer)
targetId :: Value Text
targetVersion :: Maybe (Value Text)
..}
instance Property "TargetVersion" RemediationConfiguration where
  type PropertyType "TargetVersion" RemediationConfiguration = Value Prelude.Text
  set :: PropertyType "TargetVersion" RemediationConfiguration
-> RemediationConfiguration -> RemediationConfiguration
set PropertyType "TargetVersion" RemediationConfiguration
newValue RemediationConfiguration {Maybe Object
Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe ExecutionControlsProperty
()
Value Text
haddock_workaround_ :: RemediationConfiguration -> ()
automatic :: RemediationConfiguration -> Maybe (Value Bool)
configRuleName :: RemediationConfiguration -> Value Text
executionControls :: RemediationConfiguration -> Maybe ExecutionControlsProperty
maximumAutomaticAttempts :: RemediationConfiguration -> Maybe (Value Integer)
parameters :: RemediationConfiguration -> Maybe Object
resourceType :: RemediationConfiguration -> Maybe (Value Text)
retryAttemptSeconds :: RemediationConfiguration -> Maybe (Value Integer)
targetId :: RemediationConfiguration -> Value Text
targetType :: RemediationConfiguration -> Value Text
targetVersion :: RemediationConfiguration -> Maybe (Value Text)
haddock_workaround_ :: ()
automatic :: Maybe (Value Bool)
configRuleName :: Value Text
executionControls :: Maybe ExecutionControlsProperty
maximumAutomaticAttempts :: Maybe (Value Integer)
parameters :: Maybe Object
resourceType :: Maybe (Value Text)
retryAttemptSeconds :: Maybe (Value Integer)
targetId :: Value Text
targetType :: Value Text
targetVersion :: Maybe (Value Text)
..}
    = RemediationConfiguration
        {targetVersion :: Maybe (Value Text)
targetVersion = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "TargetVersion" RemediationConfiguration
Value Text
newValue, Maybe Object
Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe ExecutionControlsProperty
()
Value Text
haddock_workaround_ :: ()
automatic :: Maybe (Value Bool)
configRuleName :: Value Text
executionControls :: Maybe ExecutionControlsProperty
maximumAutomaticAttempts :: Maybe (Value Integer)
parameters :: Maybe Object
resourceType :: Maybe (Value Text)
retryAttemptSeconds :: Maybe (Value Integer)
targetId :: Value Text
targetType :: Value Text
haddock_workaround_ :: ()
automatic :: Maybe (Value Bool)
configRuleName :: Value Text
executionControls :: Maybe ExecutionControlsProperty
maximumAutomaticAttempts :: Maybe (Value Integer)
parameters :: Maybe Object
resourceType :: Maybe (Value Text)
retryAttemptSeconds :: Maybe (Value Integer)
targetId :: Value Text
targetType :: Value Text
..}