module Stratosphere.S3.Bucket.MetadataTableConfigurationProperty (
module Exports, MetadataTableConfigurationProperty(..),
mkMetadataTableConfigurationProperty
) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.S3.Bucket.S3TablesDestinationProperty as Exports
import Stratosphere.ResourceProperties
data MetadataTableConfigurationProperty
=
MetadataTableConfigurationProperty {MetadataTableConfigurationProperty -> ()
haddock_workaround_ :: (),
MetadataTableConfigurationProperty -> S3TablesDestinationProperty
s3TablesDestination :: S3TablesDestinationProperty}
deriving stock (MetadataTableConfigurationProperty
-> MetadataTableConfigurationProperty -> Bool
(MetadataTableConfigurationProperty
-> MetadataTableConfigurationProperty -> Bool)
-> (MetadataTableConfigurationProperty
-> MetadataTableConfigurationProperty -> Bool)
-> Eq MetadataTableConfigurationProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: MetadataTableConfigurationProperty
-> MetadataTableConfigurationProperty -> Bool
== :: MetadataTableConfigurationProperty
-> MetadataTableConfigurationProperty -> Bool
$c/= :: MetadataTableConfigurationProperty
-> MetadataTableConfigurationProperty -> Bool
/= :: MetadataTableConfigurationProperty
-> MetadataTableConfigurationProperty -> Bool
Prelude.Eq, Int -> MetadataTableConfigurationProperty -> ShowS
[MetadataTableConfigurationProperty] -> ShowS
MetadataTableConfigurationProperty -> String
(Int -> MetadataTableConfigurationProperty -> ShowS)
-> (MetadataTableConfigurationProperty -> String)
-> ([MetadataTableConfigurationProperty] -> ShowS)
-> Show MetadataTableConfigurationProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> MetadataTableConfigurationProperty -> ShowS
showsPrec :: Int -> MetadataTableConfigurationProperty -> ShowS
$cshow :: MetadataTableConfigurationProperty -> String
show :: MetadataTableConfigurationProperty -> String
$cshowList :: [MetadataTableConfigurationProperty] -> ShowS
showList :: [MetadataTableConfigurationProperty] -> ShowS
Prelude.Show)
mkMetadataTableConfigurationProperty ::
S3TablesDestinationProperty -> MetadataTableConfigurationProperty
mkMetadataTableConfigurationProperty :: S3TablesDestinationProperty -> MetadataTableConfigurationProperty
mkMetadataTableConfigurationProperty S3TablesDestinationProperty
s3TablesDestination
= MetadataTableConfigurationProperty
{haddock_workaround_ :: ()
haddock_workaround_ = (),
s3TablesDestination :: S3TablesDestinationProperty
s3TablesDestination = S3TablesDestinationProperty
s3TablesDestination}
instance ToResourceProperties MetadataTableConfigurationProperty where
toResourceProperties :: MetadataTableConfigurationProperty -> ResourceProperties
toResourceProperties MetadataTableConfigurationProperty {()
S3TablesDestinationProperty
haddock_workaround_ :: MetadataTableConfigurationProperty -> ()
s3TablesDestination :: MetadataTableConfigurationProperty -> S3TablesDestinationProperty
haddock_workaround_ :: ()
s3TablesDestination :: S3TablesDestinationProperty
..}
= ResourceProperties
{awsType :: Text
awsType = Text
"AWS::S3::Bucket.MetadataTableConfiguration",
supportsTags :: Bool
supportsTags = Bool
Prelude.False,
properties :: Object
properties = [Key
"S3TablesDestination" Key -> S3TablesDestinationProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= S3TablesDestinationProperty
s3TablesDestination]}
instance JSON.ToJSON MetadataTableConfigurationProperty where
toJSON :: MetadataTableConfigurationProperty -> Value
toJSON MetadataTableConfigurationProperty {()
S3TablesDestinationProperty
haddock_workaround_ :: MetadataTableConfigurationProperty -> ()
s3TablesDestination :: MetadataTableConfigurationProperty -> S3TablesDestinationProperty
haddock_workaround_ :: ()
s3TablesDestination :: S3TablesDestinationProperty
..}
= [(Key, Value)] -> Value
JSON.object [Key
"S3TablesDestination" Key -> S3TablesDestinationProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= S3TablesDestinationProperty
s3TablesDestination]
instance Property "S3TablesDestination" MetadataTableConfigurationProperty where
type PropertyType "S3TablesDestination" MetadataTableConfigurationProperty = S3TablesDestinationProperty
set :: PropertyType
"S3TablesDestination" MetadataTableConfigurationProperty
-> MetadataTableConfigurationProperty
-> MetadataTableConfigurationProperty
set PropertyType
"S3TablesDestination" MetadataTableConfigurationProperty
newValue MetadataTableConfigurationProperty {()
S3TablesDestinationProperty
haddock_workaround_ :: MetadataTableConfigurationProperty -> ()
s3TablesDestination :: MetadataTableConfigurationProperty -> S3TablesDestinationProperty
haddock_workaround_ :: ()
s3TablesDestination :: S3TablesDestinationProperty
..}
= MetadataTableConfigurationProperty
{s3TablesDestination :: S3TablesDestinationProperty
s3TablesDestination = PropertyType
"S3TablesDestination" MetadataTableConfigurationProperty
S3TablesDestinationProperty
newValue, ()
haddock_workaround_ :: ()
haddock_workaround_ :: ()
..}