module Stratosphere.QuickSight.DataSource.ManifestFileLocationProperty (
ManifestFileLocationProperty(..), mkManifestFileLocationProperty
) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import Stratosphere.ResourceProperties
import Stratosphere.Value
data ManifestFileLocationProperty
=
ManifestFileLocationProperty {ManifestFileLocationProperty -> ()
haddock_workaround_ :: (),
ManifestFileLocationProperty -> Value Text
bucket :: (Value Prelude.Text),
ManifestFileLocationProperty -> Value Text
key :: (Value Prelude.Text)}
deriving stock (ManifestFileLocationProperty
-> ManifestFileLocationProperty -> Bool
(ManifestFileLocationProperty
-> ManifestFileLocationProperty -> Bool)
-> (ManifestFileLocationProperty
-> ManifestFileLocationProperty -> Bool)
-> Eq ManifestFileLocationProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ManifestFileLocationProperty
-> ManifestFileLocationProperty -> Bool
== :: ManifestFileLocationProperty
-> ManifestFileLocationProperty -> Bool
$c/= :: ManifestFileLocationProperty
-> ManifestFileLocationProperty -> Bool
/= :: ManifestFileLocationProperty
-> ManifestFileLocationProperty -> Bool
Prelude.Eq, Int -> ManifestFileLocationProperty -> ShowS
[ManifestFileLocationProperty] -> ShowS
ManifestFileLocationProperty -> String
(Int -> ManifestFileLocationProperty -> ShowS)
-> (ManifestFileLocationProperty -> String)
-> ([ManifestFileLocationProperty] -> ShowS)
-> Show ManifestFileLocationProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> ManifestFileLocationProperty -> ShowS
showsPrec :: Int -> ManifestFileLocationProperty -> ShowS
$cshow :: ManifestFileLocationProperty -> String
show :: ManifestFileLocationProperty -> String
$cshowList :: [ManifestFileLocationProperty] -> ShowS
showList :: [ManifestFileLocationProperty] -> ShowS
Prelude.Show)
mkManifestFileLocationProperty ::
Value Prelude.Text
-> Value Prelude.Text -> ManifestFileLocationProperty
mkManifestFileLocationProperty :: Value Text -> Value Text -> ManifestFileLocationProperty
mkManifestFileLocationProperty Value Text
bucket Value Text
key
= ManifestFileLocationProperty
{haddock_workaround_ :: ()
haddock_workaround_ = (), bucket :: Value Text
bucket = Value Text
bucket, key :: Value Text
key = Value Text
key}
instance ToResourceProperties ManifestFileLocationProperty where
toResourceProperties :: ManifestFileLocationProperty -> ResourceProperties
toResourceProperties ManifestFileLocationProperty {()
Value Text
haddock_workaround_ :: ManifestFileLocationProperty -> ()
bucket :: ManifestFileLocationProperty -> Value Text
key :: ManifestFileLocationProperty -> Value Text
haddock_workaround_ :: ()
bucket :: Value Text
key :: Value Text
..}
= ResourceProperties
{awsType :: Text
awsType = Text
"AWS::QuickSight::DataSource.ManifestFileLocation",
supportsTags :: Bool
supportsTags = Bool
Prelude.False,
properties :: Object
properties = [Key
"Bucket" 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
bucket, Key
"Key" 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
key]}
instance JSON.ToJSON ManifestFileLocationProperty where
toJSON :: ManifestFileLocationProperty -> Value
toJSON ManifestFileLocationProperty {()
Value Text
haddock_workaround_ :: ManifestFileLocationProperty -> ()
bucket :: ManifestFileLocationProperty -> Value Text
key :: ManifestFileLocationProperty -> Value Text
haddock_workaround_ :: ()
bucket :: Value Text
key :: Value Text
..}
= [(Key, Value)] -> Value
JSON.object [Key
"Bucket" 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
bucket, Key
"Key" 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
key]
instance Property "Bucket" ManifestFileLocationProperty where
type PropertyType "Bucket" ManifestFileLocationProperty = Value Prelude.Text
set :: PropertyType "Bucket" ManifestFileLocationProperty
-> ManifestFileLocationProperty -> ManifestFileLocationProperty
set PropertyType "Bucket" ManifestFileLocationProperty
newValue ManifestFileLocationProperty {()
Value Text
haddock_workaround_ :: ManifestFileLocationProperty -> ()
bucket :: ManifestFileLocationProperty -> Value Text
key :: ManifestFileLocationProperty -> Value Text
haddock_workaround_ :: ()
bucket :: Value Text
key :: Value Text
..}
= ManifestFileLocationProperty {bucket :: Value Text
bucket = PropertyType "Bucket" ManifestFileLocationProperty
Value Text
newValue, ()
Value Text
haddock_workaround_ :: ()
key :: Value Text
haddock_workaround_ :: ()
key :: Value Text
..}
instance Property "Key" ManifestFileLocationProperty where
type PropertyType "Key" ManifestFileLocationProperty = Value Prelude.Text
set :: PropertyType "Key" ManifestFileLocationProperty
-> ManifestFileLocationProperty -> ManifestFileLocationProperty
set PropertyType "Key" ManifestFileLocationProperty
newValue ManifestFileLocationProperty {()
Value Text
haddock_workaround_ :: ManifestFileLocationProperty -> ()
bucket :: ManifestFileLocationProperty -> Value Text
key :: ManifestFileLocationProperty -> Value Text
haddock_workaround_ :: ()
bucket :: Value Text
key :: Value Text
..}
= ManifestFileLocationProperty {key :: Value Text
key = PropertyType "Key" ManifestFileLocationProperty
Value Text
newValue, ()
Value Text
haddock_workaround_ :: ()
bucket :: Value Text
haddock_workaround_ :: ()
bucket :: Value Text
..}