module Stratosphere.NotificationsContacts.EmailContact.EmailContactProperty (
        EmailContactProperty(..), mkEmailContactProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import Stratosphere.ResourceProperties
import Stratosphere.Value
data EmailContactProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-notificationscontacts-emailcontact-emailcontact.html>
    EmailContactProperty {EmailContactProperty -> ()
haddock_workaround_ :: (),
                          -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-notificationscontacts-emailcontact-emailcontact.html#cfn-notificationscontacts-emailcontact-emailcontact-address>
                          EmailContactProperty -> Value Text
address :: (Value Prelude.Text),
                          -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-notificationscontacts-emailcontact-emailcontact.html#cfn-notificationscontacts-emailcontact-emailcontact-arn>
                          EmailContactProperty -> Value Text
arn :: (Value Prelude.Text),
                          -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-notificationscontacts-emailcontact-emailcontact.html#cfn-notificationscontacts-emailcontact-emailcontact-creationtime>
                          EmailContactProperty -> Value Text
creationTime :: (Value Prelude.Text),
                          -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-notificationscontacts-emailcontact-emailcontact.html#cfn-notificationscontacts-emailcontact-emailcontact-name>
                          EmailContactProperty -> Value Text
name :: (Value Prelude.Text),
                          -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-notificationscontacts-emailcontact-emailcontact.html#cfn-notificationscontacts-emailcontact-emailcontact-status>
                          EmailContactProperty -> Value Text
status :: (Value Prelude.Text),
                          -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-notificationscontacts-emailcontact-emailcontact.html#cfn-notificationscontacts-emailcontact-emailcontact-updatetime>
                          EmailContactProperty -> Value Text
updateTime :: (Value Prelude.Text)}
  deriving stock (EmailContactProperty -> EmailContactProperty -> Bool
(EmailContactProperty -> EmailContactProperty -> Bool)
-> (EmailContactProperty -> EmailContactProperty -> Bool)
-> Eq EmailContactProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: EmailContactProperty -> EmailContactProperty -> Bool
== :: EmailContactProperty -> EmailContactProperty -> Bool
$c/= :: EmailContactProperty -> EmailContactProperty -> Bool
/= :: EmailContactProperty -> EmailContactProperty -> Bool
Prelude.Eq, Int -> EmailContactProperty -> ShowS
[EmailContactProperty] -> ShowS
EmailContactProperty -> String
(Int -> EmailContactProperty -> ShowS)
-> (EmailContactProperty -> String)
-> ([EmailContactProperty] -> ShowS)
-> Show EmailContactProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> EmailContactProperty -> ShowS
showsPrec :: Int -> EmailContactProperty -> ShowS
$cshow :: EmailContactProperty -> String
show :: EmailContactProperty -> String
$cshowList :: [EmailContactProperty] -> ShowS
showList :: [EmailContactProperty] -> ShowS
Prelude.Show)
mkEmailContactProperty ::
  Value Prelude.Text
  -> Value Prelude.Text
     -> Value Prelude.Text
        -> Value Prelude.Text
           -> Value Prelude.Text -> Value Prelude.Text -> EmailContactProperty
mkEmailContactProperty :: Value Text
-> Value Text
-> Value Text
-> Value Text
-> Value Text
-> Value Text
-> EmailContactProperty
mkEmailContactProperty
  Value Text
address
  Value Text
arn
  Value Text
creationTime
  Value Text
name
  Value Text
status
  Value Text
updateTime
  = EmailContactProperty
      {haddock_workaround_ :: ()
haddock_workaround_ = (), address :: Value Text
address = Value Text
address, arn :: Value Text
arn = Value Text
arn,
       creationTime :: Value Text
creationTime = Value Text
creationTime, name :: Value Text
name = Value Text
name, status :: Value Text
status = Value Text
status,
       updateTime :: Value Text
updateTime = Value Text
updateTime}
instance ToResourceProperties EmailContactProperty where
  toResourceProperties :: EmailContactProperty -> ResourceProperties
toResourceProperties EmailContactProperty {()
Value Text
haddock_workaround_ :: EmailContactProperty -> ()
address :: EmailContactProperty -> Value Text
arn :: EmailContactProperty -> Value Text
creationTime :: EmailContactProperty -> Value Text
name :: EmailContactProperty -> Value Text
status :: EmailContactProperty -> Value Text
updateTime :: EmailContactProperty -> Value Text
haddock_workaround_ :: ()
address :: Value Text
arn :: Value Text
creationTime :: Value Text
name :: Value Text
status :: Value Text
updateTime :: Value Text
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::NotificationsContacts::EmailContact.EmailContact",
         supportsTags :: Bool
supportsTags = Bool
Prelude.False,
         properties :: Object
properties = [Key
"Address" 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
address, Key
"Arn" 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
arn,
                       Key
"CreationTime" 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
creationTime, Key
"Name" 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
name,
                       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
"UpdateTime" 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
updateTime]}
instance JSON.ToJSON EmailContactProperty where
  toJSON :: EmailContactProperty -> Value
toJSON EmailContactProperty {()
Value Text
haddock_workaround_ :: EmailContactProperty -> ()
address :: EmailContactProperty -> Value Text
arn :: EmailContactProperty -> Value Text
creationTime :: EmailContactProperty -> Value Text
name :: EmailContactProperty -> Value Text
status :: EmailContactProperty -> Value Text
updateTime :: EmailContactProperty -> Value Text
haddock_workaround_ :: ()
address :: Value Text
arn :: Value Text
creationTime :: Value Text
name :: Value Text
status :: Value Text
updateTime :: Value Text
..}
    = [(Key, Value)] -> Value
JSON.object
        [Key
"Address" 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
address, Key
"Arn" 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
arn,
         Key
"CreationTime" 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
creationTime, Key
"Name" 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
name,
         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
"UpdateTime" 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
updateTime]
instance Property "Address" EmailContactProperty where
  type PropertyType "Address" EmailContactProperty = Value Prelude.Text
  set :: PropertyType "Address" EmailContactProperty
-> EmailContactProperty -> EmailContactProperty
set PropertyType "Address" EmailContactProperty
newValue EmailContactProperty {()
Value Text
haddock_workaround_ :: EmailContactProperty -> ()
address :: EmailContactProperty -> Value Text
arn :: EmailContactProperty -> Value Text
creationTime :: EmailContactProperty -> Value Text
name :: EmailContactProperty -> Value Text
status :: EmailContactProperty -> Value Text
updateTime :: EmailContactProperty -> Value Text
haddock_workaround_ :: ()
address :: Value Text
arn :: Value Text
creationTime :: Value Text
name :: Value Text
status :: Value Text
updateTime :: Value Text
..}
    = EmailContactProperty {address :: Value Text
address = PropertyType "Address" EmailContactProperty
Value Text
newValue, ()
Value Text
haddock_workaround_ :: ()
arn :: Value Text
creationTime :: Value Text
name :: Value Text
status :: Value Text
updateTime :: Value Text
haddock_workaround_ :: ()
arn :: Value Text
creationTime :: Value Text
name :: Value Text
status :: Value Text
updateTime :: Value Text
..}
instance Property "Arn" EmailContactProperty where
  type PropertyType "Arn" EmailContactProperty = Value Prelude.Text
  set :: PropertyType "Arn" EmailContactProperty
-> EmailContactProperty -> EmailContactProperty
set PropertyType "Arn" EmailContactProperty
newValue EmailContactProperty {()
Value Text
haddock_workaround_ :: EmailContactProperty -> ()
address :: EmailContactProperty -> Value Text
arn :: EmailContactProperty -> Value Text
creationTime :: EmailContactProperty -> Value Text
name :: EmailContactProperty -> Value Text
status :: EmailContactProperty -> Value Text
updateTime :: EmailContactProperty -> Value Text
haddock_workaround_ :: ()
address :: Value Text
arn :: Value Text
creationTime :: Value Text
name :: Value Text
status :: Value Text
updateTime :: Value Text
..}
    = EmailContactProperty {arn :: Value Text
arn = PropertyType "Arn" EmailContactProperty
Value Text
newValue, ()
Value Text
haddock_workaround_ :: ()
address :: Value Text
creationTime :: Value Text
name :: Value Text
status :: Value Text
updateTime :: Value Text
haddock_workaround_ :: ()
address :: Value Text
creationTime :: Value Text
name :: Value Text
status :: Value Text
updateTime :: Value Text
..}
instance Property "CreationTime" EmailContactProperty where
  type PropertyType "CreationTime" EmailContactProperty = Value Prelude.Text
  set :: PropertyType "CreationTime" EmailContactProperty
-> EmailContactProperty -> EmailContactProperty
set PropertyType "CreationTime" EmailContactProperty
newValue EmailContactProperty {()
Value Text
haddock_workaround_ :: EmailContactProperty -> ()
address :: EmailContactProperty -> Value Text
arn :: EmailContactProperty -> Value Text
creationTime :: EmailContactProperty -> Value Text
name :: EmailContactProperty -> Value Text
status :: EmailContactProperty -> Value Text
updateTime :: EmailContactProperty -> Value Text
haddock_workaround_ :: ()
address :: Value Text
arn :: Value Text
creationTime :: Value Text
name :: Value Text
status :: Value Text
updateTime :: Value Text
..}
    = EmailContactProperty {creationTime :: Value Text
creationTime = PropertyType "CreationTime" EmailContactProperty
Value Text
newValue, ()
Value Text
haddock_workaround_ :: ()
address :: Value Text
arn :: Value Text
name :: Value Text
status :: Value Text
updateTime :: Value Text
haddock_workaround_ :: ()
address :: Value Text
arn :: Value Text
name :: Value Text
status :: Value Text
updateTime :: Value Text
..}
instance Property "Name" EmailContactProperty where
  type PropertyType "Name" EmailContactProperty = Value Prelude.Text
  set :: PropertyType "Name" EmailContactProperty
-> EmailContactProperty -> EmailContactProperty
set PropertyType "Name" EmailContactProperty
newValue EmailContactProperty {()
Value Text
haddock_workaround_ :: EmailContactProperty -> ()
address :: EmailContactProperty -> Value Text
arn :: EmailContactProperty -> Value Text
creationTime :: EmailContactProperty -> Value Text
name :: EmailContactProperty -> Value Text
status :: EmailContactProperty -> Value Text
updateTime :: EmailContactProperty -> Value Text
haddock_workaround_ :: ()
address :: Value Text
arn :: Value Text
creationTime :: Value Text
name :: Value Text
status :: Value Text
updateTime :: Value Text
..}
    = EmailContactProperty {name :: Value Text
name = PropertyType "Name" EmailContactProperty
Value Text
newValue, ()
Value Text
haddock_workaround_ :: ()
address :: Value Text
arn :: Value Text
creationTime :: Value Text
status :: Value Text
updateTime :: Value Text
haddock_workaround_ :: ()
address :: Value Text
arn :: Value Text
creationTime :: Value Text
status :: Value Text
updateTime :: Value Text
..}
instance Property "Status" EmailContactProperty where
  type PropertyType "Status" EmailContactProperty = Value Prelude.Text
  set :: PropertyType "Status" EmailContactProperty
-> EmailContactProperty -> EmailContactProperty
set PropertyType "Status" EmailContactProperty
newValue EmailContactProperty {()
Value Text
haddock_workaround_ :: EmailContactProperty -> ()
address :: EmailContactProperty -> Value Text
arn :: EmailContactProperty -> Value Text
creationTime :: EmailContactProperty -> Value Text
name :: EmailContactProperty -> Value Text
status :: EmailContactProperty -> Value Text
updateTime :: EmailContactProperty -> Value Text
haddock_workaround_ :: ()
address :: Value Text
arn :: Value Text
creationTime :: Value Text
name :: Value Text
status :: Value Text
updateTime :: Value Text
..}
    = EmailContactProperty {status :: Value Text
status = PropertyType "Status" EmailContactProperty
Value Text
newValue, ()
Value Text
haddock_workaround_ :: ()
address :: Value Text
arn :: Value Text
creationTime :: Value Text
name :: Value Text
updateTime :: Value Text
haddock_workaround_ :: ()
address :: Value Text
arn :: Value Text
creationTime :: Value Text
name :: Value Text
updateTime :: Value Text
..}
instance Property "UpdateTime" EmailContactProperty where
  type PropertyType "UpdateTime" EmailContactProperty = Value Prelude.Text
  set :: PropertyType "UpdateTime" EmailContactProperty
-> EmailContactProperty -> EmailContactProperty
set PropertyType "UpdateTime" EmailContactProperty
newValue EmailContactProperty {()
Value Text
haddock_workaround_ :: EmailContactProperty -> ()
address :: EmailContactProperty -> Value Text
arn :: EmailContactProperty -> Value Text
creationTime :: EmailContactProperty -> Value Text
name :: EmailContactProperty -> Value Text
status :: EmailContactProperty -> Value Text
updateTime :: EmailContactProperty -> Value Text
haddock_workaround_ :: ()
address :: Value Text
arn :: Value Text
creationTime :: Value Text
name :: Value Text
status :: Value Text
updateTime :: Value Text
..}
    = EmailContactProperty {updateTime :: Value Text
updateTime = PropertyType "UpdateTime" EmailContactProperty
Value Text
newValue, ()
Value Text
haddock_workaround_ :: ()
address :: Value Text
arn :: Value Text
creationTime :: Value Text
name :: Value Text
status :: Value Text
haddock_workaround_ :: ()
address :: Value Text
arn :: Value Text
creationTime :: Value Text
name :: Value Text
status :: Value Text
..}