module Stratosphere.KinesisAnalytics.Application.KinesisStreamsInputProperty (
        KinesisStreamsInputProperty(..), mkKinesisStreamsInputProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import Stratosphere.ResourceProperties
import Stratosphere.Value
data KinesisStreamsInputProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-kinesisanalytics-application-kinesisstreamsinput.html>
    KinesisStreamsInputProperty {KinesisStreamsInputProperty -> ()
haddock_workaround_ :: (),
                                 -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-kinesisanalytics-application-kinesisstreamsinput.html#cfn-kinesisanalytics-application-kinesisstreamsinput-resourcearn>
                                 KinesisStreamsInputProperty -> Value Text
resourceARN :: (Value Prelude.Text),
                                 -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-kinesisanalytics-application-kinesisstreamsinput.html#cfn-kinesisanalytics-application-kinesisstreamsinput-rolearn>
                                 KinesisStreamsInputProperty -> Value Text
roleARN :: (Value Prelude.Text)}
  deriving stock (KinesisStreamsInputProperty -> KinesisStreamsInputProperty -> Bool
(KinesisStreamsInputProperty
 -> KinesisStreamsInputProperty -> Bool)
-> (KinesisStreamsInputProperty
    -> KinesisStreamsInputProperty -> Bool)
-> Eq KinesisStreamsInputProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: KinesisStreamsInputProperty -> KinesisStreamsInputProperty -> Bool
== :: KinesisStreamsInputProperty -> KinesisStreamsInputProperty -> Bool
$c/= :: KinesisStreamsInputProperty -> KinesisStreamsInputProperty -> Bool
/= :: KinesisStreamsInputProperty -> KinesisStreamsInputProperty -> Bool
Prelude.Eq, Int -> KinesisStreamsInputProperty -> ShowS
[KinesisStreamsInputProperty] -> ShowS
KinesisStreamsInputProperty -> String
(Int -> KinesisStreamsInputProperty -> ShowS)
-> (KinesisStreamsInputProperty -> String)
-> ([KinesisStreamsInputProperty] -> ShowS)
-> Show KinesisStreamsInputProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> KinesisStreamsInputProperty -> ShowS
showsPrec :: Int -> KinesisStreamsInputProperty -> ShowS
$cshow :: KinesisStreamsInputProperty -> String
show :: KinesisStreamsInputProperty -> String
$cshowList :: [KinesisStreamsInputProperty] -> ShowS
showList :: [KinesisStreamsInputProperty] -> ShowS
Prelude.Show)
mkKinesisStreamsInputProperty ::
  Value Prelude.Text
  -> Value Prelude.Text -> KinesisStreamsInputProperty
mkKinesisStreamsInputProperty :: Value Text -> Value Text -> KinesisStreamsInputProperty
mkKinesisStreamsInputProperty Value Text
resourceARN Value Text
roleARN
  = KinesisStreamsInputProperty
      {haddock_workaround_ :: ()
haddock_workaround_ = (), resourceARN :: Value Text
resourceARN = Value Text
resourceARN,
       roleARN :: Value Text
roleARN = Value Text
roleARN}
instance ToResourceProperties KinesisStreamsInputProperty where
  toResourceProperties :: KinesisStreamsInputProperty -> ResourceProperties
toResourceProperties KinesisStreamsInputProperty {()
Value Text
haddock_workaround_ :: KinesisStreamsInputProperty -> ()
resourceARN :: KinesisStreamsInputProperty -> Value Text
roleARN :: KinesisStreamsInputProperty -> Value Text
haddock_workaround_ :: ()
resourceARN :: Value Text
roleARN :: Value Text
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::KinesisAnalytics::Application.KinesisStreamsInput",
         supportsTags :: Bool
supportsTags = Bool
Prelude.False,
         properties :: Object
properties = [Key
"ResourceARN" 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
resourceARN,
                       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]}
instance JSON.ToJSON KinesisStreamsInputProperty where
  toJSON :: KinesisStreamsInputProperty -> Value
toJSON KinesisStreamsInputProperty {()
Value Text
haddock_workaround_ :: KinesisStreamsInputProperty -> ()
resourceARN :: KinesisStreamsInputProperty -> Value Text
roleARN :: KinesisStreamsInputProperty -> Value Text
haddock_workaround_ :: ()
resourceARN :: Value Text
roleARN :: Value Text
..}
    = [(Key, Value)] -> Value
JSON.object
        [Key
"ResourceARN" 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
resourceARN, 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]
instance Property "ResourceARN" KinesisStreamsInputProperty where
  type PropertyType "ResourceARN" KinesisStreamsInputProperty = Value Prelude.Text
  set :: PropertyType "ResourceARN" KinesisStreamsInputProperty
-> KinesisStreamsInputProperty -> KinesisStreamsInputProperty
set PropertyType "ResourceARN" KinesisStreamsInputProperty
newValue KinesisStreamsInputProperty {()
Value Text
haddock_workaround_ :: KinesisStreamsInputProperty -> ()
resourceARN :: KinesisStreamsInputProperty -> Value Text
roleARN :: KinesisStreamsInputProperty -> Value Text
haddock_workaround_ :: ()
resourceARN :: Value Text
roleARN :: Value Text
..}
    = KinesisStreamsInputProperty {resourceARN :: Value Text
resourceARN = PropertyType "ResourceARN" KinesisStreamsInputProperty
Value Text
newValue, ()
Value Text
haddock_workaround_ :: ()
roleARN :: Value Text
haddock_workaround_ :: ()
roleARN :: Value Text
..}
instance Property "RoleARN" KinesisStreamsInputProperty where
  type PropertyType "RoleARN" KinesisStreamsInputProperty = Value Prelude.Text
  set :: PropertyType "RoleARN" KinesisStreamsInputProperty
-> KinesisStreamsInputProperty -> KinesisStreamsInputProperty
set PropertyType "RoleARN" KinesisStreamsInputProperty
newValue KinesisStreamsInputProperty {()
Value Text
haddock_workaround_ :: KinesisStreamsInputProperty -> ()
resourceARN :: KinesisStreamsInputProperty -> Value Text
roleARN :: KinesisStreamsInputProperty -> Value Text
haddock_workaround_ :: ()
resourceARN :: Value Text
roleARN :: Value Text
..}
    = KinesisStreamsInputProperty {roleARN :: Value Text
roleARN = PropertyType "RoleARN" KinesisStreamsInputProperty
Value Text
newValue, ()
Value Text
haddock_workaround_ :: ()
resourceARN :: Value Text
haddock_workaround_ :: ()
resourceARN :: Value Text
..}