module Stratosphere.CustomerProfiles.EventStream.DestinationDetailsProperty (
        DestinationDetailsProperty(..), mkDestinationDetailsProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import Stratosphere.ResourceProperties
import Stratosphere.Value
data DestinationDetailsProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-customerprofiles-eventstream-destinationdetails.html>
    DestinationDetailsProperty {DestinationDetailsProperty -> ()
haddock_workaround_ :: (),
                                -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-customerprofiles-eventstream-destinationdetails.html#cfn-customerprofiles-eventstream-destinationdetails-status>
                                DestinationDetailsProperty -> Value Text
status :: (Value Prelude.Text),
                                -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-customerprofiles-eventstream-destinationdetails.html#cfn-customerprofiles-eventstream-destinationdetails-uri>
                                DestinationDetailsProperty -> Value Text
uri :: (Value Prelude.Text)}
  deriving stock (DestinationDetailsProperty -> DestinationDetailsProperty -> Bool
(DestinationDetailsProperty -> DestinationDetailsProperty -> Bool)
-> (DestinationDetailsProperty
    -> DestinationDetailsProperty -> Bool)
-> Eq DestinationDetailsProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: DestinationDetailsProperty -> DestinationDetailsProperty -> Bool
== :: DestinationDetailsProperty -> DestinationDetailsProperty -> Bool
$c/= :: DestinationDetailsProperty -> DestinationDetailsProperty -> Bool
/= :: DestinationDetailsProperty -> DestinationDetailsProperty -> Bool
Prelude.Eq, Int -> DestinationDetailsProperty -> ShowS
[DestinationDetailsProperty] -> ShowS
DestinationDetailsProperty -> String
(Int -> DestinationDetailsProperty -> ShowS)
-> (DestinationDetailsProperty -> String)
-> ([DestinationDetailsProperty] -> ShowS)
-> Show DestinationDetailsProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> DestinationDetailsProperty -> ShowS
showsPrec :: Int -> DestinationDetailsProperty -> ShowS
$cshow :: DestinationDetailsProperty -> String
show :: DestinationDetailsProperty -> String
$cshowList :: [DestinationDetailsProperty] -> ShowS
showList :: [DestinationDetailsProperty] -> ShowS
Prelude.Show)
mkDestinationDetailsProperty ::
  Value Prelude.Text
  -> Value Prelude.Text -> DestinationDetailsProperty
mkDestinationDetailsProperty :: Value Text -> Value Text -> DestinationDetailsProperty
mkDestinationDetailsProperty Value Text
status Value Text
uri
  = DestinationDetailsProperty
      {haddock_workaround_ :: ()
haddock_workaround_ = (), status :: Value Text
status = Value Text
status, uri :: Value Text
uri = Value Text
uri}
instance ToResourceProperties DestinationDetailsProperty where
  toResourceProperties :: DestinationDetailsProperty -> ResourceProperties
toResourceProperties DestinationDetailsProperty {()
Value Text
haddock_workaround_ :: DestinationDetailsProperty -> ()
status :: DestinationDetailsProperty -> Value Text
uri :: DestinationDetailsProperty -> Value Text
haddock_workaround_ :: ()
status :: Value Text
uri :: Value Text
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::CustomerProfiles::EventStream.DestinationDetails",
         supportsTags :: Bool
supportsTags = Bool
Prelude.False,
         properties :: Object
properties = [Key
"Status" 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
status, Key
"Uri" 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
uri]}
instance JSON.ToJSON DestinationDetailsProperty where
  toJSON :: DestinationDetailsProperty -> Value
toJSON DestinationDetailsProperty {()
Value Text
haddock_workaround_ :: DestinationDetailsProperty -> ()
status :: DestinationDetailsProperty -> Value Text
uri :: DestinationDetailsProperty -> Value Text
haddock_workaround_ :: ()
status :: Value Text
uri :: Value Text
..}
    = [(Key, Value)] -> Value
JSON.object [Key
"Status" 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
status, Key
"Uri" 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
uri]
instance Property "Status" DestinationDetailsProperty where
  type PropertyType "Status" DestinationDetailsProperty = Value Prelude.Text
  set :: PropertyType "Status" DestinationDetailsProperty
-> DestinationDetailsProperty -> DestinationDetailsProperty
set PropertyType "Status" DestinationDetailsProperty
newValue DestinationDetailsProperty {()
Value Text
haddock_workaround_ :: DestinationDetailsProperty -> ()
status :: DestinationDetailsProperty -> Value Text
uri :: DestinationDetailsProperty -> Value Text
haddock_workaround_ :: ()
status :: Value Text
uri :: Value Text
..}
    = DestinationDetailsProperty {status :: Value Text
status = PropertyType "Status" DestinationDetailsProperty
Value Text
newValue, ()
Value Text
haddock_workaround_ :: ()
uri :: Value Text
haddock_workaround_ :: ()
uri :: Value Text
..}
instance Property "Uri" DestinationDetailsProperty where
  type PropertyType "Uri" DestinationDetailsProperty = Value Prelude.Text
  set :: PropertyType "Uri" DestinationDetailsProperty
-> DestinationDetailsProperty -> DestinationDetailsProperty
set PropertyType "Uri" DestinationDetailsProperty
newValue DestinationDetailsProperty {()
Value Text
haddock_workaround_ :: DestinationDetailsProperty -> ()
status :: DestinationDetailsProperty -> Value Text
uri :: DestinationDetailsProperty -> Value Text
haddock_workaround_ :: ()
status :: Value Text
uri :: Value Text
..}
    = DestinationDetailsProperty {uri :: Value Text
uri = PropertyType "Uri" DestinationDetailsProperty
Value Text
newValue, ()
Value Text
haddock_workaround_ :: ()
status :: Value Text
haddock_workaround_ :: ()
status :: Value Text
..}