module Stratosphere.NetworkFirewall.RuleGroup.CustomActionProperty (
        module Exports, CustomActionProperty(..), mkCustomActionProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.NetworkFirewall.RuleGroup.ActionDefinitionProperty as Exports
import Stratosphere.ResourceProperties
import Stratosphere.Value
data CustomActionProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-networkfirewall-rulegroup-customaction.html>
    CustomActionProperty {CustomActionProperty -> ()
haddock_workaround_ :: (),
                          -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-networkfirewall-rulegroup-customaction.html#cfn-networkfirewall-rulegroup-customaction-actiondefinition>
                          CustomActionProperty -> ActionDefinitionProperty
actionDefinition :: ActionDefinitionProperty,
                          -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-networkfirewall-rulegroup-customaction.html#cfn-networkfirewall-rulegroup-customaction-actionname>
                          CustomActionProperty -> Value Text
actionName :: (Value Prelude.Text)}
  deriving stock (CustomActionProperty -> CustomActionProperty -> Bool
(CustomActionProperty -> CustomActionProperty -> Bool)
-> (CustomActionProperty -> CustomActionProperty -> Bool)
-> Eq CustomActionProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: CustomActionProperty -> CustomActionProperty -> Bool
== :: CustomActionProperty -> CustomActionProperty -> Bool
$c/= :: CustomActionProperty -> CustomActionProperty -> Bool
/= :: CustomActionProperty -> CustomActionProperty -> Bool
Prelude.Eq, Int -> CustomActionProperty -> ShowS
[CustomActionProperty] -> ShowS
CustomActionProperty -> String
(Int -> CustomActionProperty -> ShowS)
-> (CustomActionProperty -> String)
-> ([CustomActionProperty] -> ShowS)
-> Show CustomActionProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> CustomActionProperty -> ShowS
showsPrec :: Int -> CustomActionProperty -> ShowS
$cshow :: CustomActionProperty -> String
show :: CustomActionProperty -> String
$cshowList :: [CustomActionProperty] -> ShowS
showList :: [CustomActionProperty] -> ShowS
Prelude.Show)
mkCustomActionProperty ::
  ActionDefinitionProperty
  -> Value Prelude.Text -> CustomActionProperty
mkCustomActionProperty :: ActionDefinitionProperty -> Value Text -> CustomActionProperty
mkCustomActionProperty ActionDefinitionProperty
actionDefinition Value Text
actionName
  = CustomActionProperty
      {haddock_workaround_ :: ()
haddock_workaround_ = (), actionDefinition :: ActionDefinitionProperty
actionDefinition = ActionDefinitionProperty
actionDefinition,
       actionName :: Value Text
actionName = Value Text
actionName}
instance ToResourceProperties CustomActionProperty where
  toResourceProperties :: CustomActionProperty -> ResourceProperties
toResourceProperties CustomActionProperty {()
Value Text
ActionDefinitionProperty
haddock_workaround_ :: CustomActionProperty -> ()
actionDefinition :: CustomActionProperty -> ActionDefinitionProperty
actionName :: CustomActionProperty -> Value Text
haddock_workaround_ :: ()
actionDefinition :: ActionDefinitionProperty
actionName :: Value Text
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::NetworkFirewall::RuleGroup.CustomAction",
         supportsTags :: Bool
supportsTags = Bool
Prelude.False,
         properties :: Object
properties = [Key
"ActionDefinition" Key -> ActionDefinitionProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= ActionDefinitionProperty
actionDefinition,
                       Key
"ActionName" 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
actionName]}
instance JSON.ToJSON CustomActionProperty where
  toJSON :: CustomActionProperty -> Value
toJSON CustomActionProperty {()
Value Text
ActionDefinitionProperty
haddock_workaround_ :: CustomActionProperty -> ()
actionDefinition :: CustomActionProperty -> ActionDefinitionProperty
actionName :: CustomActionProperty -> Value Text
haddock_workaround_ :: ()
actionDefinition :: ActionDefinitionProperty
actionName :: Value Text
..}
    = [(Key, Value)] -> Value
JSON.object
        [Key
"ActionDefinition" Key -> ActionDefinitionProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= ActionDefinitionProperty
actionDefinition,
         Key
"ActionName" 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
actionName]
instance Property "ActionDefinition" CustomActionProperty where
  type PropertyType "ActionDefinition" CustomActionProperty = ActionDefinitionProperty
  set :: PropertyType "ActionDefinition" CustomActionProperty
-> CustomActionProperty -> CustomActionProperty
set PropertyType "ActionDefinition" CustomActionProperty
newValue CustomActionProperty {()
Value Text
ActionDefinitionProperty
haddock_workaround_ :: CustomActionProperty -> ()
actionDefinition :: CustomActionProperty -> ActionDefinitionProperty
actionName :: CustomActionProperty -> Value Text
haddock_workaround_ :: ()
actionDefinition :: ActionDefinitionProperty
actionName :: Value Text
..}
    = CustomActionProperty {actionDefinition :: ActionDefinitionProperty
actionDefinition = PropertyType "ActionDefinition" CustomActionProperty
ActionDefinitionProperty
newValue, ()
Value Text
haddock_workaround_ :: ()
actionName :: Value Text
haddock_workaround_ :: ()
actionName :: Value Text
..}
instance Property "ActionName" CustomActionProperty where
  type PropertyType "ActionName" CustomActionProperty = Value Prelude.Text
  set :: PropertyType "ActionName" CustomActionProperty
-> CustomActionProperty -> CustomActionProperty
set PropertyType "ActionName" CustomActionProperty
newValue CustomActionProperty {()
Value Text
ActionDefinitionProperty
haddock_workaround_ :: CustomActionProperty -> ()
actionDefinition :: CustomActionProperty -> ActionDefinitionProperty
actionName :: CustomActionProperty -> Value Text
haddock_workaround_ :: ()
actionDefinition :: ActionDefinitionProperty
actionName :: Value Text
..}
    = CustomActionProperty {actionName :: Value Text
actionName = PropertyType "ActionName" CustomActionProperty
Value Text
newValue, ()
ActionDefinitionProperty
haddock_workaround_ :: ()
actionDefinition :: ActionDefinitionProperty
haddock_workaround_ :: ()
actionDefinition :: ActionDefinitionProperty
..}