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