module Stratosphere.SNS.Subscription (
        Subscription(..), mkSubscription
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import Stratosphere.ResourceProperties
import Stratosphere.Value
data Subscription
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-sns-subscription.html>
    Subscription {Subscription -> ()
haddock_workaround_ :: (),
                  -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-sns-subscription.html#cfn-sns-subscription-deliverypolicy>
                  Subscription -> Maybe Object
deliveryPolicy :: (Prelude.Maybe JSON.Object),
                  -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-sns-subscription.html#cfn-sns-subscription-endpoint>
                  Subscription -> Maybe (Value Text)
endpoint :: (Prelude.Maybe (Value Prelude.Text)),
                  -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-sns-subscription.html#cfn-sns-subscription-filterpolicy>
                  Subscription -> Maybe Object
filterPolicy :: (Prelude.Maybe JSON.Object),
                  -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-sns-subscription.html#cfn-sns-subscription-filterpolicyscope>
                  Subscription -> Maybe (Value Text)
filterPolicyScope :: (Prelude.Maybe (Value Prelude.Text)),
                  -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-sns-subscription.html#cfn-sns-subscription-protocol>
                  Subscription -> Value Text
protocol :: (Value Prelude.Text),
                  -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-sns-subscription.html#cfn-sns-subscription-rawmessagedelivery>
                  Subscription -> Maybe (Value Bool)
rawMessageDelivery :: (Prelude.Maybe (Value Prelude.Bool)),
                  -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-sns-subscription.html#cfn-sns-subscription-redrivepolicy>
                  Subscription -> Maybe Object
redrivePolicy :: (Prelude.Maybe JSON.Object),
                  -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-sns-subscription.html#cfn-sns-subscription-region>
                  Subscription -> Maybe (Value Text)
region :: (Prelude.Maybe (Value Prelude.Text)),
                  -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-sns-subscription.html#cfn-sns-subscription-replaypolicy>
                  Subscription -> Maybe Object
replayPolicy :: (Prelude.Maybe JSON.Object),
                  -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-sns-subscription.html#cfn-sns-subscription-subscriptionrolearn>
                  Subscription -> Maybe (Value Text)
subscriptionRoleArn :: (Prelude.Maybe (Value Prelude.Text)),
                  -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-sns-subscription.html#cfn-sns-subscription-topicarn>
                  Subscription -> Value Text
topicArn :: (Value Prelude.Text)}
  deriving stock (Subscription -> Subscription -> Bool
(Subscription -> Subscription -> Bool)
-> (Subscription -> Subscription -> Bool) -> Eq Subscription
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: Subscription -> Subscription -> Bool
== :: Subscription -> Subscription -> Bool
$c/= :: Subscription -> Subscription -> Bool
/= :: Subscription -> Subscription -> Bool
Prelude.Eq, Int -> Subscription -> ShowS
[Subscription] -> ShowS
Subscription -> String
(Int -> Subscription -> ShowS)
-> (Subscription -> String)
-> ([Subscription] -> ShowS)
-> Show Subscription
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> Subscription -> ShowS
showsPrec :: Int -> Subscription -> ShowS
$cshow :: Subscription -> String
show :: Subscription -> String
$cshowList :: [Subscription] -> ShowS
showList :: [Subscription] -> ShowS
Prelude.Show)
mkSubscription ::
  Value Prelude.Text -> Value Prelude.Text -> Subscription
mkSubscription :: Value Text -> Value Text -> Subscription
mkSubscription Value Text
protocol Value Text
topicArn
  = Subscription
      {haddock_workaround_ :: ()
haddock_workaround_ = (), protocol :: Value Text
protocol = Value Text
protocol,
       topicArn :: Value Text
topicArn = Value Text
topicArn, deliveryPolicy :: Maybe Object
deliveryPolicy = Maybe Object
forall a. Maybe a
Prelude.Nothing,
       endpoint :: Maybe (Value Text)
endpoint = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing, filterPolicy :: Maybe Object
filterPolicy = Maybe Object
forall a. Maybe a
Prelude.Nothing,
       filterPolicyScope :: Maybe (Value Text)
filterPolicyScope = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       rawMessageDelivery :: Maybe (Value Bool)
rawMessageDelivery = Maybe (Value Bool)
forall a. Maybe a
Prelude.Nothing,
       redrivePolicy :: Maybe Object
redrivePolicy = Maybe Object
forall a. Maybe a
Prelude.Nothing, region :: Maybe (Value Text)
region = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       replayPolicy :: Maybe Object
replayPolicy = Maybe Object
forall a. Maybe a
Prelude.Nothing,
       subscriptionRoleArn :: Maybe (Value Text)
subscriptionRoleArn = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing}
instance ToResourceProperties Subscription where
  toResourceProperties :: Subscription -> ResourceProperties
toResourceProperties Subscription {Maybe Object
Maybe (Value Bool)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: Subscription -> ()
deliveryPolicy :: Subscription -> Maybe Object
endpoint :: Subscription -> Maybe (Value Text)
filterPolicy :: Subscription -> Maybe Object
filterPolicyScope :: Subscription -> Maybe (Value Text)
protocol :: Subscription -> Value Text
rawMessageDelivery :: Subscription -> Maybe (Value Bool)
redrivePolicy :: Subscription -> Maybe Object
region :: Subscription -> Maybe (Value Text)
replayPolicy :: Subscription -> Maybe Object
subscriptionRoleArn :: Subscription -> Maybe (Value Text)
topicArn :: Subscription -> Value Text
haddock_workaround_ :: ()
deliveryPolicy :: Maybe Object
endpoint :: Maybe (Value Text)
filterPolicy :: Maybe Object
filterPolicyScope :: Maybe (Value Text)
protocol :: Value Text
rawMessageDelivery :: Maybe (Value Bool)
redrivePolicy :: Maybe Object
region :: Maybe (Value Text)
replayPolicy :: Maybe Object
subscriptionRoleArn :: Maybe (Value Text)
topicArn :: Value Text
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::SNS::Subscription", supportsTags :: Bool
supportsTags = Bool
Prelude.False,
         properties :: Object
properties = [Item Object] -> Object
forall l. IsList l => [Item l] -> l
Prelude.fromList
                        ([(Key, Value)] -> [(Key, Value)] -> [(Key, Value)]
forall a. Semigroup a => a -> a -> a
(Prelude.<>)
                           [Key
"Protocol" 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
protocol, Key
"TopicArn" 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
topicArn]
                           ([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
                              [Key -> Object -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"DeliveryPolicy" (Object -> (Key, Value)) -> Maybe Object -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Object
deliveryPolicy,
                               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..=) Key
"Endpoint" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
endpoint,
                               Key -> Object -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"FilterPolicy" (Object -> (Key, Value)) -> Maybe Object -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Object
filterPolicy,
                               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..=) Key
"FilterPolicyScope" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
filterPolicyScope,
                               Key -> Value Bool -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"RawMessageDelivery" (Value Bool -> (Key, Value))
-> Maybe (Value Bool) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Bool)
rawMessageDelivery,
                               Key -> Object -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"RedrivePolicy" (Object -> (Key, Value)) -> Maybe Object -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Object
redrivePolicy,
                               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..=) Key
"Region" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
region,
                               Key -> Object -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"ReplayPolicy" (Object -> (Key, Value)) -> Maybe Object -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Object
replayPolicy,
                               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..=) Key
"SubscriptionRoleArn" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
subscriptionRoleArn]))}
instance JSON.ToJSON Subscription where
  toJSON :: Subscription -> Value
toJSON Subscription {Maybe Object
Maybe (Value Bool)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: Subscription -> ()
deliveryPolicy :: Subscription -> Maybe Object
endpoint :: Subscription -> Maybe (Value Text)
filterPolicy :: Subscription -> Maybe Object
filterPolicyScope :: Subscription -> Maybe (Value Text)
protocol :: Subscription -> Value Text
rawMessageDelivery :: Subscription -> Maybe (Value Bool)
redrivePolicy :: Subscription -> Maybe Object
region :: Subscription -> Maybe (Value Text)
replayPolicy :: Subscription -> Maybe Object
subscriptionRoleArn :: Subscription -> Maybe (Value Text)
topicArn :: Subscription -> Value Text
haddock_workaround_ :: ()
deliveryPolicy :: Maybe Object
endpoint :: Maybe (Value Text)
filterPolicy :: Maybe Object
filterPolicyScope :: Maybe (Value Text)
protocol :: Value Text
rawMessageDelivery :: Maybe (Value Bool)
redrivePolicy :: Maybe Object
region :: Maybe (Value Text)
replayPolicy :: Maybe Object
subscriptionRoleArn :: Maybe (Value Text)
topicArn :: Value Text
..}
    = [(Key, Value)] -> Value
JSON.object
        ([Item [(Key, Value)]] -> [(Key, Value)]
forall l. IsList l => [Item l] -> l
Prelude.fromList
           ([(Key, Value)] -> [(Key, Value)] -> [(Key, Value)]
forall a. Semigroup a => a -> a -> a
(Prelude.<>)
              [Key
"Protocol" 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
protocol, Key
"TopicArn" 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
topicArn]
              ([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
                 [Key -> Object -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"DeliveryPolicy" (Object -> (Key, Value)) -> Maybe Object -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Object
deliveryPolicy,
                  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..=) Key
"Endpoint" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
endpoint,
                  Key -> Object -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"FilterPolicy" (Object -> (Key, Value)) -> Maybe Object -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Object
filterPolicy,
                  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..=) Key
"FilterPolicyScope" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
filterPolicyScope,
                  Key -> Value Bool -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"RawMessageDelivery" (Value Bool -> (Key, Value))
-> Maybe (Value Bool) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Bool)
rawMessageDelivery,
                  Key -> Object -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"RedrivePolicy" (Object -> (Key, Value)) -> Maybe Object -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Object
redrivePolicy,
                  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..=) Key
"Region" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
region,
                  Key -> Object -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"ReplayPolicy" (Object -> (Key, Value)) -> Maybe Object -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Object
replayPolicy,
                  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..=) Key
"SubscriptionRoleArn" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
subscriptionRoleArn])))
instance Property "DeliveryPolicy" Subscription where
  type PropertyType "DeliveryPolicy" Subscription = JSON.Object
  set :: PropertyType "DeliveryPolicy" Subscription
-> Subscription -> Subscription
set PropertyType "DeliveryPolicy" Subscription
newValue Subscription {Maybe Object
Maybe (Value Bool)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: Subscription -> ()
deliveryPolicy :: Subscription -> Maybe Object
endpoint :: Subscription -> Maybe (Value Text)
filterPolicy :: Subscription -> Maybe Object
filterPolicyScope :: Subscription -> Maybe (Value Text)
protocol :: Subscription -> Value Text
rawMessageDelivery :: Subscription -> Maybe (Value Bool)
redrivePolicy :: Subscription -> Maybe Object
region :: Subscription -> Maybe (Value Text)
replayPolicy :: Subscription -> Maybe Object
subscriptionRoleArn :: Subscription -> Maybe (Value Text)
topicArn :: Subscription -> Value Text
haddock_workaround_ :: ()
deliveryPolicy :: Maybe Object
endpoint :: Maybe (Value Text)
filterPolicy :: Maybe Object
filterPolicyScope :: Maybe (Value Text)
protocol :: Value Text
rawMessageDelivery :: Maybe (Value Bool)
redrivePolicy :: Maybe Object
region :: Maybe (Value Text)
replayPolicy :: Maybe Object
subscriptionRoleArn :: Maybe (Value Text)
topicArn :: Value Text
..}
    = Subscription {deliveryPolicy :: Maybe Object
deliveryPolicy = Object -> Maybe Object
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure Object
PropertyType "DeliveryPolicy" Subscription
newValue, Maybe Object
Maybe (Value Bool)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: ()
endpoint :: Maybe (Value Text)
filterPolicy :: Maybe Object
filterPolicyScope :: Maybe (Value Text)
protocol :: Value Text
rawMessageDelivery :: Maybe (Value Bool)
redrivePolicy :: Maybe Object
region :: Maybe (Value Text)
replayPolicy :: Maybe Object
subscriptionRoleArn :: Maybe (Value Text)
topicArn :: Value Text
haddock_workaround_ :: ()
endpoint :: Maybe (Value Text)
filterPolicy :: Maybe Object
filterPolicyScope :: Maybe (Value Text)
protocol :: Value Text
rawMessageDelivery :: Maybe (Value Bool)
redrivePolicy :: Maybe Object
region :: Maybe (Value Text)
replayPolicy :: Maybe Object
subscriptionRoleArn :: Maybe (Value Text)
topicArn :: Value Text
..}
instance Property "Endpoint" Subscription where
  type PropertyType "Endpoint" Subscription = Value Prelude.Text
  set :: PropertyType "Endpoint" Subscription
-> Subscription -> Subscription
set PropertyType "Endpoint" Subscription
newValue Subscription {Maybe Object
Maybe (Value Bool)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: Subscription -> ()
deliveryPolicy :: Subscription -> Maybe Object
endpoint :: Subscription -> Maybe (Value Text)
filterPolicy :: Subscription -> Maybe Object
filterPolicyScope :: Subscription -> Maybe (Value Text)
protocol :: Subscription -> Value Text
rawMessageDelivery :: Subscription -> Maybe (Value Bool)
redrivePolicy :: Subscription -> Maybe Object
region :: Subscription -> Maybe (Value Text)
replayPolicy :: Subscription -> Maybe Object
subscriptionRoleArn :: Subscription -> Maybe (Value Text)
topicArn :: Subscription -> Value Text
haddock_workaround_ :: ()
deliveryPolicy :: Maybe Object
endpoint :: Maybe (Value Text)
filterPolicy :: Maybe Object
filterPolicyScope :: Maybe (Value Text)
protocol :: Value Text
rawMessageDelivery :: Maybe (Value Bool)
redrivePolicy :: Maybe Object
region :: Maybe (Value Text)
replayPolicy :: Maybe Object
subscriptionRoleArn :: Maybe (Value Text)
topicArn :: Value Text
..}
    = Subscription {endpoint :: Maybe (Value Text)
endpoint = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "Endpoint" Subscription
Value Text
newValue, Maybe Object
Maybe (Value Bool)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: ()
deliveryPolicy :: Maybe Object
filterPolicy :: Maybe Object
filterPolicyScope :: Maybe (Value Text)
protocol :: Value Text
rawMessageDelivery :: Maybe (Value Bool)
redrivePolicy :: Maybe Object
region :: Maybe (Value Text)
replayPolicy :: Maybe Object
subscriptionRoleArn :: Maybe (Value Text)
topicArn :: Value Text
haddock_workaround_ :: ()
deliveryPolicy :: Maybe Object
filterPolicy :: Maybe Object
filterPolicyScope :: Maybe (Value Text)
protocol :: Value Text
rawMessageDelivery :: Maybe (Value Bool)
redrivePolicy :: Maybe Object
region :: Maybe (Value Text)
replayPolicy :: Maybe Object
subscriptionRoleArn :: Maybe (Value Text)
topicArn :: Value Text
..}
instance Property "FilterPolicy" Subscription where
  type PropertyType "FilterPolicy" Subscription = JSON.Object
  set :: PropertyType "FilterPolicy" Subscription
-> Subscription -> Subscription
set PropertyType "FilterPolicy" Subscription
newValue Subscription {Maybe Object
Maybe (Value Bool)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: Subscription -> ()
deliveryPolicy :: Subscription -> Maybe Object
endpoint :: Subscription -> Maybe (Value Text)
filterPolicy :: Subscription -> Maybe Object
filterPolicyScope :: Subscription -> Maybe (Value Text)
protocol :: Subscription -> Value Text
rawMessageDelivery :: Subscription -> Maybe (Value Bool)
redrivePolicy :: Subscription -> Maybe Object
region :: Subscription -> Maybe (Value Text)
replayPolicy :: Subscription -> Maybe Object
subscriptionRoleArn :: Subscription -> Maybe (Value Text)
topicArn :: Subscription -> Value Text
haddock_workaround_ :: ()
deliveryPolicy :: Maybe Object
endpoint :: Maybe (Value Text)
filterPolicy :: Maybe Object
filterPolicyScope :: Maybe (Value Text)
protocol :: Value Text
rawMessageDelivery :: Maybe (Value Bool)
redrivePolicy :: Maybe Object
region :: Maybe (Value Text)
replayPolicy :: Maybe Object
subscriptionRoleArn :: Maybe (Value Text)
topicArn :: Value Text
..}
    = Subscription {filterPolicy :: Maybe Object
filterPolicy = Object -> Maybe Object
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure Object
PropertyType "FilterPolicy" Subscription
newValue, Maybe Object
Maybe (Value Bool)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: ()
deliveryPolicy :: Maybe Object
endpoint :: Maybe (Value Text)
filterPolicyScope :: Maybe (Value Text)
protocol :: Value Text
rawMessageDelivery :: Maybe (Value Bool)
redrivePolicy :: Maybe Object
region :: Maybe (Value Text)
replayPolicy :: Maybe Object
subscriptionRoleArn :: Maybe (Value Text)
topicArn :: Value Text
haddock_workaround_ :: ()
deliveryPolicy :: Maybe Object
endpoint :: Maybe (Value Text)
filterPolicyScope :: Maybe (Value Text)
protocol :: Value Text
rawMessageDelivery :: Maybe (Value Bool)
redrivePolicy :: Maybe Object
region :: Maybe (Value Text)
replayPolicy :: Maybe Object
subscriptionRoleArn :: Maybe (Value Text)
topicArn :: Value Text
..}
instance Property "FilterPolicyScope" Subscription where
  type PropertyType "FilterPolicyScope" Subscription = Value Prelude.Text
  set :: PropertyType "FilterPolicyScope" Subscription
-> Subscription -> Subscription
set PropertyType "FilterPolicyScope" Subscription
newValue Subscription {Maybe Object
Maybe (Value Bool)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: Subscription -> ()
deliveryPolicy :: Subscription -> Maybe Object
endpoint :: Subscription -> Maybe (Value Text)
filterPolicy :: Subscription -> Maybe Object
filterPolicyScope :: Subscription -> Maybe (Value Text)
protocol :: Subscription -> Value Text
rawMessageDelivery :: Subscription -> Maybe (Value Bool)
redrivePolicy :: Subscription -> Maybe Object
region :: Subscription -> Maybe (Value Text)
replayPolicy :: Subscription -> Maybe Object
subscriptionRoleArn :: Subscription -> Maybe (Value Text)
topicArn :: Subscription -> Value Text
haddock_workaround_ :: ()
deliveryPolicy :: Maybe Object
endpoint :: Maybe (Value Text)
filterPolicy :: Maybe Object
filterPolicyScope :: Maybe (Value Text)
protocol :: Value Text
rawMessageDelivery :: Maybe (Value Bool)
redrivePolicy :: Maybe Object
region :: Maybe (Value Text)
replayPolicy :: Maybe Object
subscriptionRoleArn :: Maybe (Value Text)
topicArn :: Value Text
..}
    = Subscription {filterPolicyScope :: Maybe (Value Text)
filterPolicyScope = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "FilterPolicyScope" Subscription
Value Text
newValue, Maybe Object
Maybe (Value Bool)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: ()
deliveryPolicy :: Maybe Object
endpoint :: Maybe (Value Text)
filterPolicy :: Maybe Object
protocol :: Value Text
rawMessageDelivery :: Maybe (Value Bool)
redrivePolicy :: Maybe Object
region :: Maybe (Value Text)
replayPolicy :: Maybe Object
subscriptionRoleArn :: Maybe (Value Text)
topicArn :: Value Text
haddock_workaround_ :: ()
deliveryPolicy :: Maybe Object
endpoint :: Maybe (Value Text)
filterPolicy :: Maybe Object
protocol :: Value Text
rawMessageDelivery :: Maybe (Value Bool)
redrivePolicy :: Maybe Object
region :: Maybe (Value Text)
replayPolicy :: Maybe Object
subscriptionRoleArn :: Maybe (Value Text)
topicArn :: Value Text
..}
instance Property "Protocol" Subscription where
  type PropertyType "Protocol" Subscription = Value Prelude.Text
  set :: PropertyType "Protocol" Subscription
-> Subscription -> Subscription
set PropertyType "Protocol" Subscription
newValue Subscription {Maybe Object
Maybe (Value Bool)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: Subscription -> ()
deliveryPolicy :: Subscription -> Maybe Object
endpoint :: Subscription -> Maybe (Value Text)
filterPolicy :: Subscription -> Maybe Object
filterPolicyScope :: Subscription -> Maybe (Value Text)
protocol :: Subscription -> Value Text
rawMessageDelivery :: Subscription -> Maybe (Value Bool)
redrivePolicy :: Subscription -> Maybe Object
region :: Subscription -> Maybe (Value Text)
replayPolicy :: Subscription -> Maybe Object
subscriptionRoleArn :: Subscription -> Maybe (Value Text)
topicArn :: Subscription -> Value Text
haddock_workaround_ :: ()
deliveryPolicy :: Maybe Object
endpoint :: Maybe (Value Text)
filterPolicy :: Maybe Object
filterPolicyScope :: Maybe (Value Text)
protocol :: Value Text
rawMessageDelivery :: Maybe (Value Bool)
redrivePolicy :: Maybe Object
region :: Maybe (Value Text)
replayPolicy :: Maybe Object
subscriptionRoleArn :: Maybe (Value Text)
topicArn :: Value Text
..}
    = Subscription {protocol :: Value Text
protocol = PropertyType "Protocol" Subscription
Value Text
newValue, Maybe Object
Maybe (Value Bool)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: ()
deliveryPolicy :: Maybe Object
endpoint :: Maybe (Value Text)
filterPolicy :: Maybe Object
filterPolicyScope :: Maybe (Value Text)
rawMessageDelivery :: Maybe (Value Bool)
redrivePolicy :: Maybe Object
region :: Maybe (Value Text)
replayPolicy :: Maybe Object
subscriptionRoleArn :: Maybe (Value Text)
topicArn :: Value Text
haddock_workaround_ :: ()
deliveryPolicy :: Maybe Object
endpoint :: Maybe (Value Text)
filterPolicy :: Maybe Object
filterPolicyScope :: Maybe (Value Text)
rawMessageDelivery :: Maybe (Value Bool)
redrivePolicy :: Maybe Object
region :: Maybe (Value Text)
replayPolicy :: Maybe Object
subscriptionRoleArn :: Maybe (Value Text)
topicArn :: Value Text
..}
instance Property "RawMessageDelivery" Subscription where
  type PropertyType "RawMessageDelivery" Subscription = Value Prelude.Bool
  set :: PropertyType "RawMessageDelivery" Subscription
-> Subscription -> Subscription
set PropertyType "RawMessageDelivery" Subscription
newValue Subscription {Maybe Object
Maybe (Value Bool)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: Subscription -> ()
deliveryPolicy :: Subscription -> Maybe Object
endpoint :: Subscription -> Maybe (Value Text)
filterPolicy :: Subscription -> Maybe Object
filterPolicyScope :: Subscription -> Maybe (Value Text)
protocol :: Subscription -> Value Text
rawMessageDelivery :: Subscription -> Maybe (Value Bool)
redrivePolicy :: Subscription -> Maybe Object
region :: Subscription -> Maybe (Value Text)
replayPolicy :: Subscription -> Maybe Object
subscriptionRoleArn :: Subscription -> Maybe (Value Text)
topicArn :: Subscription -> Value Text
haddock_workaround_ :: ()
deliveryPolicy :: Maybe Object
endpoint :: Maybe (Value Text)
filterPolicy :: Maybe Object
filterPolicyScope :: Maybe (Value Text)
protocol :: Value Text
rawMessageDelivery :: Maybe (Value Bool)
redrivePolicy :: Maybe Object
region :: Maybe (Value Text)
replayPolicy :: Maybe Object
subscriptionRoleArn :: Maybe (Value Text)
topicArn :: Value Text
..}
    = Subscription {rawMessageDelivery :: Maybe (Value Bool)
rawMessageDelivery = Value Bool -> Maybe (Value Bool)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "RawMessageDelivery" Subscription
Value Bool
newValue, Maybe Object
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: ()
deliveryPolicy :: Maybe Object
endpoint :: Maybe (Value Text)
filterPolicy :: Maybe Object
filterPolicyScope :: Maybe (Value Text)
protocol :: Value Text
redrivePolicy :: Maybe Object
region :: Maybe (Value Text)
replayPolicy :: Maybe Object
subscriptionRoleArn :: Maybe (Value Text)
topicArn :: Value Text
haddock_workaround_ :: ()
deliveryPolicy :: Maybe Object
endpoint :: Maybe (Value Text)
filterPolicy :: Maybe Object
filterPolicyScope :: Maybe (Value Text)
protocol :: Value Text
redrivePolicy :: Maybe Object
region :: Maybe (Value Text)
replayPolicy :: Maybe Object
subscriptionRoleArn :: Maybe (Value Text)
topicArn :: Value Text
..}
instance Property "RedrivePolicy" Subscription where
  type PropertyType "RedrivePolicy" Subscription = JSON.Object
  set :: PropertyType "RedrivePolicy" Subscription
-> Subscription -> Subscription
set PropertyType "RedrivePolicy" Subscription
newValue Subscription {Maybe Object
Maybe (Value Bool)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: Subscription -> ()
deliveryPolicy :: Subscription -> Maybe Object
endpoint :: Subscription -> Maybe (Value Text)
filterPolicy :: Subscription -> Maybe Object
filterPolicyScope :: Subscription -> Maybe (Value Text)
protocol :: Subscription -> Value Text
rawMessageDelivery :: Subscription -> Maybe (Value Bool)
redrivePolicy :: Subscription -> Maybe Object
region :: Subscription -> Maybe (Value Text)
replayPolicy :: Subscription -> Maybe Object
subscriptionRoleArn :: Subscription -> Maybe (Value Text)
topicArn :: Subscription -> Value Text
haddock_workaround_ :: ()
deliveryPolicy :: Maybe Object
endpoint :: Maybe (Value Text)
filterPolicy :: Maybe Object
filterPolicyScope :: Maybe (Value Text)
protocol :: Value Text
rawMessageDelivery :: Maybe (Value Bool)
redrivePolicy :: Maybe Object
region :: Maybe (Value Text)
replayPolicy :: Maybe Object
subscriptionRoleArn :: Maybe (Value Text)
topicArn :: Value Text
..}
    = Subscription {redrivePolicy :: Maybe Object
redrivePolicy = Object -> Maybe Object
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure Object
PropertyType "RedrivePolicy" Subscription
newValue, Maybe Object
Maybe (Value Bool)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: ()
deliveryPolicy :: Maybe Object
endpoint :: Maybe (Value Text)
filterPolicy :: Maybe Object
filterPolicyScope :: Maybe (Value Text)
protocol :: Value Text
rawMessageDelivery :: Maybe (Value Bool)
region :: Maybe (Value Text)
replayPolicy :: Maybe Object
subscriptionRoleArn :: Maybe (Value Text)
topicArn :: Value Text
haddock_workaround_ :: ()
deliveryPolicy :: Maybe Object
endpoint :: Maybe (Value Text)
filterPolicy :: Maybe Object
filterPolicyScope :: Maybe (Value Text)
protocol :: Value Text
rawMessageDelivery :: Maybe (Value Bool)
region :: Maybe (Value Text)
replayPolicy :: Maybe Object
subscriptionRoleArn :: Maybe (Value Text)
topicArn :: Value Text
..}
instance Property "Region" Subscription where
  type PropertyType "Region" Subscription = Value Prelude.Text
  set :: PropertyType "Region" Subscription -> Subscription -> Subscription
set PropertyType "Region" Subscription
newValue Subscription {Maybe Object
Maybe (Value Bool)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: Subscription -> ()
deliveryPolicy :: Subscription -> Maybe Object
endpoint :: Subscription -> Maybe (Value Text)
filterPolicy :: Subscription -> Maybe Object
filterPolicyScope :: Subscription -> Maybe (Value Text)
protocol :: Subscription -> Value Text
rawMessageDelivery :: Subscription -> Maybe (Value Bool)
redrivePolicy :: Subscription -> Maybe Object
region :: Subscription -> Maybe (Value Text)
replayPolicy :: Subscription -> Maybe Object
subscriptionRoleArn :: Subscription -> Maybe (Value Text)
topicArn :: Subscription -> Value Text
haddock_workaround_ :: ()
deliveryPolicy :: Maybe Object
endpoint :: Maybe (Value Text)
filterPolicy :: Maybe Object
filterPolicyScope :: Maybe (Value Text)
protocol :: Value Text
rawMessageDelivery :: Maybe (Value Bool)
redrivePolicy :: Maybe Object
region :: Maybe (Value Text)
replayPolicy :: Maybe Object
subscriptionRoleArn :: Maybe (Value Text)
topicArn :: Value Text
..}
    = Subscription {region :: Maybe (Value Text)
region = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "Region" Subscription
Value Text
newValue, Maybe Object
Maybe (Value Bool)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: ()
deliveryPolicy :: Maybe Object
endpoint :: Maybe (Value Text)
filterPolicy :: Maybe Object
filterPolicyScope :: Maybe (Value Text)
protocol :: Value Text
rawMessageDelivery :: Maybe (Value Bool)
redrivePolicy :: Maybe Object
replayPolicy :: Maybe Object
subscriptionRoleArn :: Maybe (Value Text)
topicArn :: Value Text
haddock_workaround_ :: ()
deliveryPolicy :: Maybe Object
endpoint :: Maybe (Value Text)
filterPolicy :: Maybe Object
filterPolicyScope :: Maybe (Value Text)
protocol :: Value Text
rawMessageDelivery :: Maybe (Value Bool)
redrivePolicy :: Maybe Object
replayPolicy :: Maybe Object
subscriptionRoleArn :: Maybe (Value Text)
topicArn :: Value Text
..}
instance Property "ReplayPolicy" Subscription where
  type PropertyType "ReplayPolicy" Subscription = JSON.Object
  set :: PropertyType "ReplayPolicy" Subscription
-> Subscription -> Subscription
set PropertyType "ReplayPolicy" Subscription
newValue Subscription {Maybe Object
Maybe (Value Bool)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: Subscription -> ()
deliveryPolicy :: Subscription -> Maybe Object
endpoint :: Subscription -> Maybe (Value Text)
filterPolicy :: Subscription -> Maybe Object
filterPolicyScope :: Subscription -> Maybe (Value Text)
protocol :: Subscription -> Value Text
rawMessageDelivery :: Subscription -> Maybe (Value Bool)
redrivePolicy :: Subscription -> Maybe Object
region :: Subscription -> Maybe (Value Text)
replayPolicy :: Subscription -> Maybe Object
subscriptionRoleArn :: Subscription -> Maybe (Value Text)
topicArn :: Subscription -> Value Text
haddock_workaround_ :: ()
deliveryPolicy :: Maybe Object
endpoint :: Maybe (Value Text)
filterPolicy :: Maybe Object
filterPolicyScope :: Maybe (Value Text)
protocol :: Value Text
rawMessageDelivery :: Maybe (Value Bool)
redrivePolicy :: Maybe Object
region :: Maybe (Value Text)
replayPolicy :: Maybe Object
subscriptionRoleArn :: Maybe (Value Text)
topicArn :: Value Text
..}
    = Subscription {replayPolicy :: Maybe Object
replayPolicy = Object -> Maybe Object
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure Object
PropertyType "ReplayPolicy" Subscription
newValue, Maybe Object
Maybe (Value Bool)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: ()
deliveryPolicy :: Maybe Object
endpoint :: Maybe (Value Text)
filterPolicy :: Maybe Object
filterPolicyScope :: Maybe (Value Text)
protocol :: Value Text
rawMessageDelivery :: Maybe (Value Bool)
redrivePolicy :: Maybe Object
region :: Maybe (Value Text)
subscriptionRoleArn :: Maybe (Value Text)
topicArn :: Value Text
haddock_workaround_ :: ()
deliveryPolicy :: Maybe Object
endpoint :: Maybe (Value Text)
filterPolicy :: Maybe Object
filterPolicyScope :: Maybe (Value Text)
protocol :: Value Text
rawMessageDelivery :: Maybe (Value Bool)
redrivePolicy :: Maybe Object
region :: Maybe (Value Text)
subscriptionRoleArn :: Maybe (Value Text)
topicArn :: Value Text
..}
instance Property "SubscriptionRoleArn" Subscription where
  type PropertyType "SubscriptionRoleArn" Subscription = Value Prelude.Text
  set :: PropertyType "SubscriptionRoleArn" Subscription
-> Subscription -> Subscription
set PropertyType "SubscriptionRoleArn" Subscription
newValue Subscription {Maybe Object
Maybe (Value Bool)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: Subscription -> ()
deliveryPolicy :: Subscription -> Maybe Object
endpoint :: Subscription -> Maybe (Value Text)
filterPolicy :: Subscription -> Maybe Object
filterPolicyScope :: Subscription -> Maybe (Value Text)
protocol :: Subscription -> Value Text
rawMessageDelivery :: Subscription -> Maybe (Value Bool)
redrivePolicy :: Subscription -> Maybe Object
region :: Subscription -> Maybe (Value Text)
replayPolicy :: Subscription -> Maybe Object
subscriptionRoleArn :: Subscription -> Maybe (Value Text)
topicArn :: Subscription -> Value Text
haddock_workaround_ :: ()
deliveryPolicy :: Maybe Object
endpoint :: Maybe (Value Text)
filterPolicy :: Maybe Object
filterPolicyScope :: Maybe (Value Text)
protocol :: Value Text
rawMessageDelivery :: Maybe (Value Bool)
redrivePolicy :: Maybe Object
region :: Maybe (Value Text)
replayPolicy :: Maybe Object
subscriptionRoleArn :: Maybe (Value Text)
topicArn :: Value Text
..}
    = Subscription {subscriptionRoleArn :: Maybe (Value Text)
subscriptionRoleArn = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "SubscriptionRoleArn" Subscription
Value Text
newValue, Maybe Object
Maybe (Value Bool)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: ()
deliveryPolicy :: Maybe Object
endpoint :: Maybe (Value Text)
filterPolicy :: Maybe Object
filterPolicyScope :: Maybe (Value Text)
protocol :: Value Text
rawMessageDelivery :: Maybe (Value Bool)
redrivePolicy :: Maybe Object
region :: Maybe (Value Text)
replayPolicy :: Maybe Object
topicArn :: Value Text
haddock_workaround_ :: ()
deliveryPolicy :: Maybe Object
endpoint :: Maybe (Value Text)
filterPolicy :: Maybe Object
filterPolicyScope :: Maybe (Value Text)
protocol :: Value Text
rawMessageDelivery :: Maybe (Value Bool)
redrivePolicy :: Maybe Object
region :: Maybe (Value Text)
replayPolicy :: Maybe Object
topicArn :: Value Text
..}
instance Property "TopicArn" Subscription where
  type PropertyType "TopicArn" Subscription = Value Prelude.Text
  set :: PropertyType "TopicArn" Subscription
-> Subscription -> Subscription
set PropertyType "TopicArn" Subscription
newValue Subscription {Maybe Object
Maybe (Value Bool)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: Subscription -> ()
deliveryPolicy :: Subscription -> Maybe Object
endpoint :: Subscription -> Maybe (Value Text)
filterPolicy :: Subscription -> Maybe Object
filterPolicyScope :: Subscription -> Maybe (Value Text)
protocol :: Subscription -> Value Text
rawMessageDelivery :: Subscription -> Maybe (Value Bool)
redrivePolicy :: Subscription -> Maybe Object
region :: Subscription -> Maybe (Value Text)
replayPolicy :: Subscription -> Maybe Object
subscriptionRoleArn :: Subscription -> Maybe (Value Text)
topicArn :: Subscription -> Value Text
haddock_workaround_ :: ()
deliveryPolicy :: Maybe Object
endpoint :: Maybe (Value Text)
filterPolicy :: Maybe Object
filterPolicyScope :: Maybe (Value Text)
protocol :: Value Text
rawMessageDelivery :: Maybe (Value Bool)
redrivePolicy :: Maybe Object
region :: Maybe (Value Text)
replayPolicy :: Maybe Object
subscriptionRoleArn :: Maybe (Value Text)
topicArn :: Value Text
..}
    = Subscription {topicArn :: Value Text
topicArn = PropertyType "TopicArn" Subscription
Value Text
newValue, Maybe Object
Maybe (Value Bool)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: ()
deliveryPolicy :: Maybe Object
endpoint :: Maybe (Value Text)
filterPolicy :: Maybe Object
filterPolicyScope :: Maybe (Value Text)
protocol :: Value Text
rawMessageDelivery :: Maybe (Value Bool)
redrivePolicy :: Maybe Object
region :: Maybe (Value Text)
replayPolicy :: Maybe Object
subscriptionRoleArn :: Maybe (Value Text)
haddock_workaround_ :: ()
deliveryPolicy :: Maybe Object
endpoint :: Maybe (Value Text)
filterPolicy :: Maybe Object
filterPolicyScope :: Maybe (Value Text)
protocol :: Value Text
rawMessageDelivery :: Maybe (Value Bool)
redrivePolicy :: Maybe Object
region :: Maybe (Value Text)
replayPolicy :: Maybe Object
subscriptionRoleArn :: Maybe (Value Text)
..}