module Stratosphere.IoT.TopicRule.OpenSearchActionProperty (
OpenSearchActionProperty(..), mkOpenSearchActionProperty
) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import Stratosphere.ResourceProperties
import Stratosphere.Value
data OpenSearchActionProperty
=
OpenSearchActionProperty {OpenSearchActionProperty -> ()
haddock_workaround_ :: (),
OpenSearchActionProperty -> Value Text
endpoint :: (Value Prelude.Text),
OpenSearchActionProperty -> Value Text
id :: (Value Prelude.Text),
OpenSearchActionProperty -> Value Text
index :: (Value Prelude.Text),
OpenSearchActionProperty -> Value Text
roleArn :: (Value Prelude.Text),
OpenSearchActionProperty -> Value Text
type' :: (Value Prelude.Text)}
deriving stock (OpenSearchActionProperty -> OpenSearchActionProperty -> Bool
(OpenSearchActionProperty -> OpenSearchActionProperty -> Bool)
-> (OpenSearchActionProperty -> OpenSearchActionProperty -> Bool)
-> Eq OpenSearchActionProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: OpenSearchActionProperty -> OpenSearchActionProperty -> Bool
== :: OpenSearchActionProperty -> OpenSearchActionProperty -> Bool
$c/= :: OpenSearchActionProperty -> OpenSearchActionProperty -> Bool
/= :: OpenSearchActionProperty -> OpenSearchActionProperty -> Bool
Prelude.Eq, Int -> OpenSearchActionProperty -> ShowS
[OpenSearchActionProperty] -> ShowS
OpenSearchActionProperty -> String
(Int -> OpenSearchActionProperty -> ShowS)
-> (OpenSearchActionProperty -> String)
-> ([OpenSearchActionProperty] -> ShowS)
-> Show OpenSearchActionProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> OpenSearchActionProperty -> ShowS
showsPrec :: Int -> OpenSearchActionProperty -> ShowS
$cshow :: OpenSearchActionProperty -> String
show :: OpenSearchActionProperty -> String
$cshowList :: [OpenSearchActionProperty] -> ShowS
showList :: [OpenSearchActionProperty] -> ShowS
Prelude.Show)
mkOpenSearchActionProperty ::
Value Prelude.Text
-> Value Prelude.Text
-> Value Prelude.Text
-> Value Prelude.Text
-> Value Prelude.Text -> OpenSearchActionProperty
mkOpenSearchActionProperty :: Value Text
-> Value Text
-> Value Text
-> Value Text
-> Value Text
-> OpenSearchActionProperty
mkOpenSearchActionProperty Value Text
endpoint Value Text
id Value Text
index Value Text
roleArn Value Text
type'
= OpenSearchActionProperty
{haddock_workaround_ :: ()
haddock_workaround_ = (), endpoint :: Value Text
endpoint = Value Text
endpoint, id :: Value Text
id = Value Text
id,
index :: Value Text
index = Value Text
index, roleArn :: Value Text
roleArn = Value Text
roleArn, type' :: Value Text
type' = Value Text
type'}
instance ToResourceProperties OpenSearchActionProperty where
toResourceProperties :: OpenSearchActionProperty -> ResourceProperties
toResourceProperties OpenSearchActionProperty {()
Value Text
haddock_workaround_ :: OpenSearchActionProperty -> ()
endpoint :: OpenSearchActionProperty -> Value Text
id :: OpenSearchActionProperty -> Value Text
index :: OpenSearchActionProperty -> Value Text
roleArn :: OpenSearchActionProperty -> Value Text
type' :: OpenSearchActionProperty -> Value Text
haddock_workaround_ :: ()
endpoint :: Value Text
id :: Value Text
index :: Value Text
roleArn :: Value Text
type' :: Value Text
..}
= ResourceProperties
{awsType :: Text
awsType = Text
"AWS::IoT::TopicRule.OpenSearchAction",
supportsTags :: Bool
supportsTags = Bool
Prelude.False,
properties :: Object
properties = [Key
"Endpoint" 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
endpoint, Key
"Id" 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
id,
Key
"Index" 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
index, Key
"RoleArn" 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
roleArn,
Key
"Type" 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
type']}
instance JSON.ToJSON OpenSearchActionProperty where
toJSON :: OpenSearchActionProperty -> Value
toJSON OpenSearchActionProperty {()
Value Text
haddock_workaround_ :: OpenSearchActionProperty -> ()
endpoint :: OpenSearchActionProperty -> Value Text
id :: OpenSearchActionProperty -> Value Text
index :: OpenSearchActionProperty -> Value Text
roleArn :: OpenSearchActionProperty -> Value Text
type' :: OpenSearchActionProperty -> Value Text
haddock_workaround_ :: ()
endpoint :: Value Text
id :: Value Text
index :: Value Text
roleArn :: Value Text
type' :: Value Text
..}
= [(Key, Value)] -> Value
JSON.object
[Key
"Endpoint" 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
endpoint, Key
"Id" 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
id,
Key
"Index" 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
index, Key
"RoleArn" 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
roleArn,
Key
"Type" 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
type']
instance Property "Endpoint" OpenSearchActionProperty where
type PropertyType "Endpoint" OpenSearchActionProperty = Value Prelude.Text
set :: PropertyType "Endpoint" OpenSearchActionProperty
-> OpenSearchActionProperty -> OpenSearchActionProperty
set PropertyType "Endpoint" OpenSearchActionProperty
newValue OpenSearchActionProperty {()
Value Text
haddock_workaround_ :: OpenSearchActionProperty -> ()
endpoint :: OpenSearchActionProperty -> Value Text
id :: OpenSearchActionProperty -> Value Text
index :: OpenSearchActionProperty -> Value Text
roleArn :: OpenSearchActionProperty -> Value Text
type' :: OpenSearchActionProperty -> Value Text
haddock_workaround_ :: ()
endpoint :: Value Text
id :: Value Text
index :: Value Text
roleArn :: Value Text
type' :: Value Text
..}
= OpenSearchActionProperty {endpoint :: Value Text
endpoint = PropertyType "Endpoint" OpenSearchActionProperty
Value Text
newValue, ()
Value Text
haddock_workaround_ :: ()
id :: Value Text
index :: Value Text
roleArn :: Value Text
type' :: Value Text
haddock_workaround_ :: ()
id :: Value Text
index :: Value Text
roleArn :: Value Text
type' :: Value Text
..}
instance Property "Id" OpenSearchActionProperty where
type PropertyType "Id" OpenSearchActionProperty = Value Prelude.Text
set :: PropertyType "Id" OpenSearchActionProperty
-> OpenSearchActionProperty -> OpenSearchActionProperty
set PropertyType "Id" OpenSearchActionProperty
newValue OpenSearchActionProperty {()
Value Text
haddock_workaround_ :: OpenSearchActionProperty -> ()
endpoint :: OpenSearchActionProperty -> Value Text
id :: OpenSearchActionProperty -> Value Text
index :: OpenSearchActionProperty -> Value Text
roleArn :: OpenSearchActionProperty -> Value Text
type' :: OpenSearchActionProperty -> Value Text
haddock_workaround_ :: ()
endpoint :: Value Text
id :: Value Text
index :: Value Text
roleArn :: Value Text
type' :: Value Text
..}
= OpenSearchActionProperty {id :: Value Text
id = PropertyType "Id" OpenSearchActionProperty
Value Text
newValue, ()
Value Text
haddock_workaround_ :: ()
endpoint :: Value Text
index :: Value Text
roleArn :: Value Text
type' :: Value Text
haddock_workaround_ :: ()
endpoint :: Value Text
index :: Value Text
roleArn :: Value Text
type' :: Value Text
..}
instance Property "Index" OpenSearchActionProperty where
type PropertyType "Index" OpenSearchActionProperty = Value Prelude.Text
set :: PropertyType "Index" OpenSearchActionProperty
-> OpenSearchActionProperty -> OpenSearchActionProperty
set PropertyType "Index" OpenSearchActionProperty
newValue OpenSearchActionProperty {()
Value Text
haddock_workaround_ :: OpenSearchActionProperty -> ()
endpoint :: OpenSearchActionProperty -> Value Text
id :: OpenSearchActionProperty -> Value Text
index :: OpenSearchActionProperty -> Value Text
roleArn :: OpenSearchActionProperty -> Value Text
type' :: OpenSearchActionProperty -> Value Text
haddock_workaround_ :: ()
endpoint :: Value Text
id :: Value Text
index :: Value Text
roleArn :: Value Text
type' :: Value Text
..}
= OpenSearchActionProperty {index :: Value Text
index = PropertyType "Index" OpenSearchActionProperty
Value Text
newValue, ()
Value Text
haddock_workaround_ :: ()
endpoint :: Value Text
id :: Value Text
roleArn :: Value Text
type' :: Value Text
haddock_workaround_ :: ()
endpoint :: Value Text
id :: Value Text
roleArn :: Value Text
type' :: Value Text
..}
instance Property "RoleArn" OpenSearchActionProperty where
type PropertyType "RoleArn" OpenSearchActionProperty = Value Prelude.Text
set :: PropertyType "RoleArn" OpenSearchActionProperty
-> OpenSearchActionProperty -> OpenSearchActionProperty
set PropertyType "RoleArn" OpenSearchActionProperty
newValue OpenSearchActionProperty {()
Value Text
haddock_workaround_ :: OpenSearchActionProperty -> ()
endpoint :: OpenSearchActionProperty -> Value Text
id :: OpenSearchActionProperty -> Value Text
index :: OpenSearchActionProperty -> Value Text
roleArn :: OpenSearchActionProperty -> Value Text
type' :: OpenSearchActionProperty -> Value Text
haddock_workaround_ :: ()
endpoint :: Value Text
id :: Value Text
index :: Value Text
roleArn :: Value Text
type' :: Value Text
..}
= OpenSearchActionProperty {roleArn :: Value Text
roleArn = PropertyType "RoleArn" OpenSearchActionProperty
Value Text
newValue, ()
Value Text
haddock_workaround_ :: ()
endpoint :: Value Text
id :: Value Text
index :: Value Text
type' :: Value Text
haddock_workaround_ :: ()
endpoint :: Value Text
id :: Value Text
index :: Value Text
type' :: Value Text
..}
instance Property "Type" OpenSearchActionProperty where
type PropertyType "Type" OpenSearchActionProperty = Value Prelude.Text
set :: PropertyType "Type" OpenSearchActionProperty
-> OpenSearchActionProperty -> OpenSearchActionProperty
set PropertyType "Type" OpenSearchActionProperty
newValue OpenSearchActionProperty {()
Value Text
haddock_workaround_ :: OpenSearchActionProperty -> ()
endpoint :: OpenSearchActionProperty -> Value Text
id :: OpenSearchActionProperty -> Value Text
index :: OpenSearchActionProperty -> Value Text
roleArn :: OpenSearchActionProperty -> Value Text
type' :: OpenSearchActionProperty -> Value Text
haddock_workaround_ :: ()
endpoint :: Value Text
id :: Value Text
index :: Value Text
roleArn :: Value Text
type' :: Value Text
..}
= OpenSearchActionProperty {type' :: Value Text
type' = PropertyType "Type" OpenSearchActionProperty
Value Text
newValue, ()
Value Text
haddock_workaround_ :: ()
endpoint :: Value Text
id :: Value Text
index :: Value Text
roleArn :: Value Text
haddock_workaround_ :: ()
endpoint :: Value Text
id :: Value Text
index :: Value Text
roleArn :: Value Text
..}