module Stratosphere.SMSVOICE.ConfigurationSet.KinesisFirehoseDestinationProperty (
        KinesisFirehoseDestinationProperty(..),
        mkKinesisFirehoseDestinationProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import Stratosphere.ResourceProperties
import Stratosphere.Value
data KinesisFirehoseDestinationProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-smsvoice-configurationset-kinesisfirehosedestination.html>
    KinesisFirehoseDestinationProperty {KinesisFirehoseDestinationProperty -> ()
haddock_workaround_ :: (),
                                        -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-smsvoice-configurationset-kinesisfirehosedestination.html#cfn-smsvoice-configurationset-kinesisfirehosedestination-deliverystreamarn>
                                        KinesisFirehoseDestinationProperty -> Value Text
deliveryStreamArn :: (Value Prelude.Text),
                                        -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-smsvoice-configurationset-kinesisfirehosedestination.html#cfn-smsvoice-configurationset-kinesisfirehosedestination-iamrolearn>
                                        KinesisFirehoseDestinationProperty -> Value Text
iamRoleArn :: (Value Prelude.Text)}
  deriving stock (KinesisFirehoseDestinationProperty
-> KinesisFirehoseDestinationProperty -> Bool
(KinesisFirehoseDestinationProperty
 -> KinesisFirehoseDestinationProperty -> Bool)
-> (KinesisFirehoseDestinationProperty
    -> KinesisFirehoseDestinationProperty -> Bool)
-> Eq KinesisFirehoseDestinationProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: KinesisFirehoseDestinationProperty
-> KinesisFirehoseDestinationProperty -> Bool
== :: KinesisFirehoseDestinationProperty
-> KinesisFirehoseDestinationProperty -> Bool
$c/= :: KinesisFirehoseDestinationProperty
-> KinesisFirehoseDestinationProperty -> Bool
/= :: KinesisFirehoseDestinationProperty
-> KinesisFirehoseDestinationProperty -> Bool
Prelude.Eq, Int -> KinesisFirehoseDestinationProperty -> ShowS
[KinesisFirehoseDestinationProperty] -> ShowS
KinesisFirehoseDestinationProperty -> String
(Int -> KinesisFirehoseDestinationProperty -> ShowS)
-> (KinesisFirehoseDestinationProperty -> String)
-> ([KinesisFirehoseDestinationProperty] -> ShowS)
-> Show KinesisFirehoseDestinationProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> KinesisFirehoseDestinationProperty -> ShowS
showsPrec :: Int -> KinesisFirehoseDestinationProperty -> ShowS
$cshow :: KinesisFirehoseDestinationProperty -> String
show :: KinesisFirehoseDestinationProperty -> String
$cshowList :: [KinesisFirehoseDestinationProperty] -> ShowS
showList :: [KinesisFirehoseDestinationProperty] -> ShowS
Prelude.Show)
mkKinesisFirehoseDestinationProperty ::
  Value Prelude.Text
  -> Value Prelude.Text -> KinesisFirehoseDestinationProperty
mkKinesisFirehoseDestinationProperty :: Value Text -> Value Text -> KinesisFirehoseDestinationProperty
mkKinesisFirehoseDestinationProperty Value Text
deliveryStreamArn Value Text
iamRoleArn
  = KinesisFirehoseDestinationProperty
      {haddock_workaround_ :: ()
haddock_workaround_ = (), deliveryStreamArn :: Value Text
deliveryStreamArn = Value Text
deliveryStreamArn,
       iamRoleArn :: Value Text
iamRoleArn = Value Text
iamRoleArn}
instance ToResourceProperties KinesisFirehoseDestinationProperty where
  toResourceProperties :: KinesisFirehoseDestinationProperty -> ResourceProperties
toResourceProperties KinesisFirehoseDestinationProperty {()
Value Text
haddock_workaround_ :: KinesisFirehoseDestinationProperty -> ()
deliveryStreamArn :: KinesisFirehoseDestinationProperty -> Value Text
iamRoleArn :: KinesisFirehoseDestinationProperty -> Value Text
haddock_workaround_ :: ()
deliveryStreamArn :: Value Text
iamRoleArn :: Value Text
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::SMSVOICE::ConfigurationSet.KinesisFirehoseDestination",
         supportsTags :: Bool
supportsTags = Bool
Prelude.False,
         properties :: Object
properties = [Key
"DeliveryStreamArn" 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
deliveryStreamArn,
                       Key
"IamRoleArn" 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
iamRoleArn]}
instance JSON.ToJSON KinesisFirehoseDestinationProperty where
  toJSON :: KinesisFirehoseDestinationProperty -> Value
toJSON KinesisFirehoseDestinationProperty {()
Value Text
haddock_workaround_ :: KinesisFirehoseDestinationProperty -> ()
deliveryStreamArn :: KinesisFirehoseDestinationProperty -> Value Text
iamRoleArn :: KinesisFirehoseDestinationProperty -> Value Text
haddock_workaround_ :: ()
deliveryStreamArn :: Value Text
iamRoleArn :: Value Text
..}
    = [(Key, Value)] -> Value
JSON.object
        [Key
"DeliveryStreamArn" 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
deliveryStreamArn,
         Key
"IamRoleArn" 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
iamRoleArn]
instance Property "DeliveryStreamArn" KinesisFirehoseDestinationProperty where
  type PropertyType "DeliveryStreamArn" KinesisFirehoseDestinationProperty = Value Prelude.Text
  set :: PropertyType "DeliveryStreamArn" KinesisFirehoseDestinationProperty
-> KinesisFirehoseDestinationProperty
-> KinesisFirehoseDestinationProperty
set PropertyType "DeliveryStreamArn" KinesisFirehoseDestinationProperty
newValue KinesisFirehoseDestinationProperty {()
Value Text
haddock_workaround_ :: KinesisFirehoseDestinationProperty -> ()
deliveryStreamArn :: KinesisFirehoseDestinationProperty -> Value Text
iamRoleArn :: KinesisFirehoseDestinationProperty -> Value Text
haddock_workaround_ :: ()
deliveryStreamArn :: Value Text
iamRoleArn :: Value Text
..}
    = KinesisFirehoseDestinationProperty
        {deliveryStreamArn :: Value Text
deliveryStreamArn = PropertyType "DeliveryStreamArn" KinesisFirehoseDestinationProperty
Value Text
newValue, ()
Value Text
haddock_workaround_ :: ()
iamRoleArn :: Value Text
haddock_workaround_ :: ()
iamRoleArn :: Value Text
..}
instance Property "IamRoleArn" KinesisFirehoseDestinationProperty where
  type PropertyType "IamRoleArn" KinesisFirehoseDestinationProperty = Value Prelude.Text
  set :: PropertyType "IamRoleArn" KinesisFirehoseDestinationProperty
-> KinesisFirehoseDestinationProperty
-> KinesisFirehoseDestinationProperty
set PropertyType "IamRoleArn" KinesisFirehoseDestinationProperty
newValue KinesisFirehoseDestinationProperty {()
Value Text
haddock_workaround_ :: KinesisFirehoseDestinationProperty -> ()
deliveryStreamArn :: KinesisFirehoseDestinationProperty -> Value Text
iamRoleArn :: KinesisFirehoseDestinationProperty -> Value Text
haddock_workaround_ :: ()
deliveryStreamArn :: Value Text
iamRoleArn :: Value Text
..}
    = KinesisFirehoseDestinationProperty {iamRoleArn :: Value Text
iamRoleArn = PropertyType "IamRoleArn" KinesisFirehoseDestinationProperty
Value Text
newValue, ()
Value Text
haddock_workaround_ :: ()
deliveryStreamArn :: Value Text
haddock_workaround_ :: ()
deliveryStreamArn :: Value Text
..}