module Stratosphere.MediaTailor.VodSource.HttpPackageConfigurationProperty (
        HttpPackageConfigurationProperty(..),
        mkHttpPackageConfigurationProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import Stratosphere.ResourceProperties
import Stratosphere.Value
data HttpPackageConfigurationProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-mediatailor-vodsource-httppackageconfiguration.html>
    HttpPackageConfigurationProperty {HttpPackageConfigurationProperty -> ()
haddock_workaround_ :: (),
                                      -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-mediatailor-vodsource-httppackageconfiguration.html#cfn-mediatailor-vodsource-httppackageconfiguration-path>
                                      HttpPackageConfigurationProperty -> Value Text
path :: (Value Prelude.Text),
                                      -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-mediatailor-vodsource-httppackageconfiguration.html#cfn-mediatailor-vodsource-httppackageconfiguration-sourcegroup>
                                      HttpPackageConfigurationProperty -> Value Text
sourceGroup :: (Value Prelude.Text),
                                      -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-mediatailor-vodsource-httppackageconfiguration.html#cfn-mediatailor-vodsource-httppackageconfiguration-type>
                                      HttpPackageConfigurationProperty -> Value Text
type' :: (Value Prelude.Text)}
  deriving stock (HttpPackageConfigurationProperty
-> HttpPackageConfigurationProperty -> Bool
(HttpPackageConfigurationProperty
 -> HttpPackageConfigurationProperty -> Bool)
-> (HttpPackageConfigurationProperty
    -> HttpPackageConfigurationProperty -> Bool)
-> Eq HttpPackageConfigurationProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: HttpPackageConfigurationProperty
-> HttpPackageConfigurationProperty -> Bool
== :: HttpPackageConfigurationProperty
-> HttpPackageConfigurationProperty -> Bool
$c/= :: HttpPackageConfigurationProperty
-> HttpPackageConfigurationProperty -> Bool
/= :: HttpPackageConfigurationProperty
-> HttpPackageConfigurationProperty -> Bool
Prelude.Eq, Int -> HttpPackageConfigurationProperty -> ShowS
[HttpPackageConfigurationProperty] -> ShowS
HttpPackageConfigurationProperty -> String
(Int -> HttpPackageConfigurationProperty -> ShowS)
-> (HttpPackageConfigurationProperty -> String)
-> ([HttpPackageConfigurationProperty] -> ShowS)
-> Show HttpPackageConfigurationProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> HttpPackageConfigurationProperty -> ShowS
showsPrec :: Int -> HttpPackageConfigurationProperty -> ShowS
$cshow :: HttpPackageConfigurationProperty -> String
show :: HttpPackageConfigurationProperty -> String
$cshowList :: [HttpPackageConfigurationProperty] -> ShowS
showList :: [HttpPackageConfigurationProperty] -> ShowS
Prelude.Show)
mkHttpPackageConfigurationProperty ::
  Value Prelude.Text
  -> Value Prelude.Text
     -> Value Prelude.Text -> HttpPackageConfigurationProperty
mkHttpPackageConfigurationProperty :: Value Text
-> Value Text -> Value Text -> HttpPackageConfigurationProperty
mkHttpPackageConfigurationProperty Value Text
path Value Text
sourceGroup Value Text
type'
  = HttpPackageConfigurationProperty
      {haddock_workaround_ :: ()
haddock_workaround_ = (), path :: Value Text
path = Value Text
path, sourceGroup :: Value Text
sourceGroup = Value Text
sourceGroup,
       type' :: Value Text
type' = Value Text
type'}
instance ToResourceProperties HttpPackageConfigurationProperty where
  toResourceProperties :: HttpPackageConfigurationProperty -> ResourceProperties
toResourceProperties HttpPackageConfigurationProperty {()
Value Text
haddock_workaround_ :: HttpPackageConfigurationProperty -> ()
path :: HttpPackageConfigurationProperty -> Value Text
sourceGroup :: HttpPackageConfigurationProperty -> Value Text
type' :: HttpPackageConfigurationProperty -> Value Text
haddock_workaround_ :: ()
path :: Value Text
sourceGroup :: Value Text
type' :: Value Text
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::MediaTailor::VodSource.HttpPackageConfiguration",
         supportsTags :: Bool
supportsTags = Bool
Prelude.False,
         properties :: Object
properties = [Key
"Path" 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
path,
                       Key
"SourceGroup" 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
sourceGroup, Key
"Type" 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
type']}
instance JSON.ToJSON HttpPackageConfigurationProperty where
  toJSON :: HttpPackageConfigurationProperty -> Value
toJSON HttpPackageConfigurationProperty {()
Value Text
haddock_workaround_ :: HttpPackageConfigurationProperty -> ()
path :: HttpPackageConfigurationProperty -> Value Text
sourceGroup :: HttpPackageConfigurationProperty -> Value Text
type' :: HttpPackageConfigurationProperty -> Value Text
haddock_workaround_ :: ()
path :: Value Text
sourceGroup :: Value Text
type' :: Value Text
..}
    = [(Key, Value)] -> Value
JSON.object
        [Key
"Path" 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
path, Key
"SourceGroup" 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
sourceGroup,
         Key
"Type" 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
type']
instance Property "Path" HttpPackageConfigurationProperty where
  type PropertyType "Path" HttpPackageConfigurationProperty = Value Prelude.Text
  set :: PropertyType "Path" HttpPackageConfigurationProperty
-> HttpPackageConfigurationProperty
-> HttpPackageConfigurationProperty
set PropertyType "Path" HttpPackageConfigurationProperty
newValue HttpPackageConfigurationProperty {()
Value Text
haddock_workaround_ :: HttpPackageConfigurationProperty -> ()
path :: HttpPackageConfigurationProperty -> Value Text
sourceGroup :: HttpPackageConfigurationProperty -> Value Text
type' :: HttpPackageConfigurationProperty -> Value Text
haddock_workaround_ :: ()
path :: Value Text
sourceGroup :: Value Text
type' :: Value Text
..}
    = HttpPackageConfigurationProperty {path :: Value Text
path = PropertyType "Path" HttpPackageConfigurationProperty
Value Text
newValue, ()
Value Text
haddock_workaround_ :: ()
sourceGroup :: Value Text
type' :: Value Text
haddock_workaround_ :: ()
sourceGroup :: Value Text
type' :: Value Text
..}
instance Property "SourceGroup" HttpPackageConfigurationProperty where
  type PropertyType "SourceGroup" HttpPackageConfigurationProperty = Value Prelude.Text
  set :: PropertyType "SourceGroup" HttpPackageConfigurationProperty
-> HttpPackageConfigurationProperty
-> HttpPackageConfigurationProperty
set PropertyType "SourceGroup" HttpPackageConfigurationProperty
newValue HttpPackageConfigurationProperty {()
Value Text
haddock_workaround_ :: HttpPackageConfigurationProperty -> ()
path :: HttpPackageConfigurationProperty -> Value Text
sourceGroup :: HttpPackageConfigurationProperty -> Value Text
type' :: HttpPackageConfigurationProperty -> Value Text
haddock_workaround_ :: ()
path :: Value Text
sourceGroup :: Value Text
type' :: Value Text
..}
    = HttpPackageConfigurationProperty {sourceGroup :: Value Text
sourceGroup = PropertyType "SourceGroup" HttpPackageConfigurationProperty
Value Text
newValue, ()
Value Text
haddock_workaround_ :: ()
path :: Value Text
type' :: Value Text
haddock_workaround_ :: ()
path :: Value Text
type' :: Value Text
..}
instance Property "Type" HttpPackageConfigurationProperty where
  type PropertyType "Type" HttpPackageConfigurationProperty = Value Prelude.Text
  set :: PropertyType "Type" HttpPackageConfigurationProperty
-> HttpPackageConfigurationProperty
-> HttpPackageConfigurationProperty
set PropertyType "Type" HttpPackageConfigurationProperty
newValue HttpPackageConfigurationProperty {()
Value Text
haddock_workaround_ :: HttpPackageConfigurationProperty -> ()
path :: HttpPackageConfigurationProperty -> Value Text
sourceGroup :: HttpPackageConfigurationProperty -> Value Text
type' :: HttpPackageConfigurationProperty -> Value Text
haddock_workaround_ :: ()
path :: Value Text
sourceGroup :: Value Text
type' :: Value Text
..}
    = HttpPackageConfigurationProperty {type' :: Value Text
type' = PropertyType "Type" HttpPackageConfigurationProperty
Value Text
newValue, ()
Value Text
haddock_workaround_ :: ()
path :: Value Text
sourceGroup :: Value Text
haddock_workaround_ :: ()
path :: Value Text
sourceGroup :: Value Text
..}