module Stratosphere.WAFv2.RuleGroup.RegexPatternSetReferenceStatementProperty (
        module Exports, RegexPatternSetReferenceStatementProperty(..),
        mkRegexPatternSetReferenceStatementProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.WAFv2.RuleGroup.FieldToMatchProperty as Exports
import {-# SOURCE #-} Stratosphere.WAFv2.RuleGroup.TextTransformationProperty as Exports
import Stratosphere.ResourceProperties
import Stratosphere.Value
data RegexPatternSetReferenceStatementProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-wafv2-rulegroup-regexpatternsetreferencestatement.html>
    RegexPatternSetReferenceStatementProperty {RegexPatternSetReferenceStatementProperty -> ()
haddock_workaround_ :: (),
                                               -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-wafv2-rulegroup-regexpatternsetreferencestatement.html#cfn-wafv2-rulegroup-regexpatternsetreferencestatement-arn>
                                               RegexPatternSetReferenceStatementProperty -> Value Text
arn :: (Value Prelude.Text),
                                               -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-wafv2-rulegroup-regexpatternsetreferencestatement.html#cfn-wafv2-rulegroup-regexpatternsetreferencestatement-fieldtomatch>
                                               RegexPatternSetReferenceStatementProperty -> FieldToMatchProperty
fieldToMatch :: FieldToMatchProperty,
                                               -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-wafv2-rulegroup-regexpatternsetreferencestatement.html#cfn-wafv2-rulegroup-regexpatternsetreferencestatement-texttransformations>
                                               RegexPatternSetReferenceStatementProperty
-> [TextTransformationProperty]
textTransformations :: [TextTransformationProperty]}
  deriving stock (RegexPatternSetReferenceStatementProperty
-> RegexPatternSetReferenceStatementProperty -> Bool
(RegexPatternSetReferenceStatementProperty
 -> RegexPatternSetReferenceStatementProperty -> Bool)
-> (RegexPatternSetReferenceStatementProperty
    -> RegexPatternSetReferenceStatementProperty -> Bool)
-> Eq RegexPatternSetReferenceStatementProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: RegexPatternSetReferenceStatementProperty
-> RegexPatternSetReferenceStatementProperty -> Bool
== :: RegexPatternSetReferenceStatementProperty
-> RegexPatternSetReferenceStatementProperty -> Bool
$c/= :: RegexPatternSetReferenceStatementProperty
-> RegexPatternSetReferenceStatementProperty -> Bool
/= :: RegexPatternSetReferenceStatementProperty
-> RegexPatternSetReferenceStatementProperty -> Bool
Prelude.Eq, Int -> RegexPatternSetReferenceStatementProperty -> ShowS
[RegexPatternSetReferenceStatementProperty] -> ShowS
RegexPatternSetReferenceStatementProperty -> String
(Int -> RegexPatternSetReferenceStatementProperty -> ShowS)
-> (RegexPatternSetReferenceStatementProperty -> String)
-> ([RegexPatternSetReferenceStatementProperty] -> ShowS)
-> Show RegexPatternSetReferenceStatementProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> RegexPatternSetReferenceStatementProperty -> ShowS
showsPrec :: Int -> RegexPatternSetReferenceStatementProperty -> ShowS
$cshow :: RegexPatternSetReferenceStatementProperty -> String
show :: RegexPatternSetReferenceStatementProperty -> String
$cshowList :: [RegexPatternSetReferenceStatementProperty] -> ShowS
showList :: [RegexPatternSetReferenceStatementProperty] -> ShowS
Prelude.Show)
mkRegexPatternSetReferenceStatementProperty ::
  Value Prelude.Text
  -> FieldToMatchProperty
     -> [TextTransformationProperty]
        -> RegexPatternSetReferenceStatementProperty
mkRegexPatternSetReferenceStatementProperty :: Value Text
-> FieldToMatchProperty
-> [TextTransformationProperty]
-> RegexPatternSetReferenceStatementProperty
mkRegexPatternSetReferenceStatementProperty
  Value Text
arn
  FieldToMatchProperty
fieldToMatch
  [TextTransformationProperty]
textTransformations
  = RegexPatternSetReferenceStatementProperty
      {haddock_workaround_ :: ()
haddock_workaround_ = (), arn :: Value Text
arn = Value Text
arn, fieldToMatch :: FieldToMatchProperty
fieldToMatch = FieldToMatchProperty
fieldToMatch,
       textTransformations :: [TextTransformationProperty]
textTransformations = [TextTransformationProperty]
textTransformations}
instance ToResourceProperties RegexPatternSetReferenceStatementProperty where
  toResourceProperties :: RegexPatternSetReferenceStatementProperty -> ResourceProperties
toResourceProperties RegexPatternSetReferenceStatementProperty {[TextTransformationProperty]
()
Value Text
FieldToMatchProperty
haddock_workaround_ :: RegexPatternSetReferenceStatementProperty -> ()
arn :: RegexPatternSetReferenceStatementProperty -> Value Text
fieldToMatch :: RegexPatternSetReferenceStatementProperty -> FieldToMatchProperty
textTransformations :: RegexPatternSetReferenceStatementProperty
-> [TextTransformationProperty]
haddock_workaround_ :: ()
arn :: Value Text
fieldToMatch :: FieldToMatchProperty
textTransformations :: [TextTransformationProperty]
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::WAFv2::RuleGroup.RegexPatternSetReferenceStatement",
         supportsTags :: Bool
supportsTags = Bool
Prelude.False,
         properties :: Object
properties = [Key
"Arn" 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
arn,
                       Key
"FieldToMatch" Key -> FieldToMatchProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= FieldToMatchProperty
fieldToMatch,
                       Key
"TextTransformations" Key -> [TextTransformationProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= [TextTransformationProperty]
textTransformations]}
instance JSON.ToJSON RegexPatternSetReferenceStatementProperty where
  toJSON :: RegexPatternSetReferenceStatementProperty -> Value
toJSON RegexPatternSetReferenceStatementProperty {[TextTransformationProperty]
()
Value Text
FieldToMatchProperty
haddock_workaround_ :: RegexPatternSetReferenceStatementProperty -> ()
arn :: RegexPatternSetReferenceStatementProperty -> Value Text
fieldToMatch :: RegexPatternSetReferenceStatementProperty -> FieldToMatchProperty
textTransformations :: RegexPatternSetReferenceStatementProperty
-> [TextTransformationProperty]
haddock_workaround_ :: ()
arn :: Value Text
fieldToMatch :: FieldToMatchProperty
textTransformations :: [TextTransformationProperty]
..}
    = [(Key, Value)] -> Value
JSON.object
        [Key
"Arn" 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
arn, Key
"FieldToMatch" Key -> FieldToMatchProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= FieldToMatchProperty
fieldToMatch,
         Key
"TextTransformations" Key -> [TextTransformationProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= [TextTransformationProperty]
textTransformations]
instance Property "Arn" RegexPatternSetReferenceStatementProperty where
  type PropertyType "Arn" RegexPatternSetReferenceStatementProperty = Value Prelude.Text
  set :: PropertyType "Arn" RegexPatternSetReferenceStatementProperty
-> RegexPatternSetReferenceStatementProperty
-> RegexPatternSetReferenceStatementProperty
set PropertyType "Arn" RegexPatternSetReferenceStatementProperty
newValue RegexPatternSetReferenceStatementProperty {[TextTransformationProperty]
()
Value Text
FieldToMatchProperty
haddock_workaround_ :: RegexPatternSetReferenceStatementProperty -> ()
arn :: RegexPatternSetReferenceStatementProperty -> Value Text
fieldToMatch :: RegexPatternSetReferenceStatementProperty -> FieldToMatchProperty
textTransformations :: RegexPatternSetReferenceStatementProperty
-> [TextTransformationProperty]
haddock_workaround_ :: ()
arn :: Value Text
fieldToMatch :: FieldToMatchProperty
textTransformations :: [TextTransformationProperty]
..}
    = RegexPatternSetReferenceStatementProperty {arn :: Value Text
arn = PropertyType "Arn" RegexPatternSetReferenceStatementProperty
Value Text
newValue, [TextTransformationProperty]
()
FieldToMatchProperty
haddock_workaround_ :: ()
fieldToMatch :: FieldToMatchProperty
textTransformations :: [TextTransformationProperty]
haddock_workaround_ :: ()
fieldToMatch :: FieldToMatchProperty
textTransformations :: [TextTransformationProperty]
..}
instance Property "FieldToMatch" RegexPatternSetReferenceStatementProperty where
  type PropertyType "FieldToMatch" RegexPatternSetReferenceStatementProperty = FieldToMatchProperty
  set :: PropertyType
  "FieldToMatch" RegexPatternSetReferenceStatementProperty
-> RegexPatternSetReferenceStatementProperty
-> RegexPatternSetReferenceStatementProperty
set PropertyType
  "FieldToMatch" RegexPatternSetReferenceStatementProperty
newValue RegexPatternSetReferenceStatementProperty {[TextTransformationProperty]
()
Value Text
FieldToMatchProperty
haddock_workaround_ :: RegexPatternSetReferenceStatementProperty -> ()
arn :: RegexPatternSetReferenceStatementProperty -> Value Text
fieldToMatch :: RegexPatternSetReferenceStatementProperty -> FieldToMatchProperty
textTransformations :: RegexPatternSetReferenceStatementProperty
-> [TextTransformationProperty]
haddock_workaround_ :: ()
arn :: Value Text
fieldToMatch :: FieldToMatchProperty
textTransformations :: [TextTransformationProperty]
..}
    = RegexPatternSetReferenceStatementProperty
        {fieldToMatch :: FieldToMatchProperty
fieldToMatch = PropertyType
  "FieldToMatch" RegexPatternSetReferenceStatementProperty
FieldToMatchProperty
newValue, [TextTransformationProperty]
()
Value Text
haddock_workaround_ :: ()
arn :: Value Text
textTransformations :: [TextTransformationProperty]
haddock_workaround_ :: ()
arn :: Value Text
textTransformations :: [TextTransformationProperty]
..}
instance Property "TextTransformations" RegexPatternSetReferenceStatementProperty where
  type PropertyType "TextTransformations" RegexPatternSetReferenceStatementProperty = [TextTransformationProperty]
  set :: PropertyType
  "TextTransformations" RegexPatternSetReferenceStatementProperty
-> RegexPatternSetReferenceStatementProperty
-> RegexPatternSetReferenceStatementProperty
set PropertyType
  "TextTransformations" RegexPatternSetReferenceStatementProperty
newValue RegexPatternSetReferenceStatementProperty {[TextTransformationProperty]
()
Value Text
FieldToMatchProperty
haddock_workaround_ :: RegexPatternSetReferenceStatementProperty -> ()
arn :: RegexPatternSetReferenceStatementProperty -> Value Text
fieldToMatch :: RegexPatternSetReferenceStatementProperty -> FieldToMatchProperty
textTransformations :: RegexPatternSetReferenceStatementProperty
-> [TextTransformationProperty]
haddock_workaround_ :: ()
arn :: Value Text
fieldToMatch :: FieldToMatchProperty
textTransformations :: [TextTransformationProperty]
..}
    = RegexPatternSetReferenceStatementProperty
        {textTransformations :: [TextTransformationProperty]
textTransformations = [TextTransformationProperty]
PropertyType
  "TextTransformations" RegexPatternSetReferenceStatementProperty
newValue, ()
Value Text
FieldToMatchProperty
haddock_workaround_ :: ()
arn :: Value Text
fieldToMatch :: FieldToMatchProperty
haddock_workaround_ :: ()
arn :: Value Text
fieldToMatch :: FieldToMatchProperty
..}