module Stratosphere.DataZone.DataSource.DataSourceConfigurationInputProperty (
module Exports, DataSourceConfigurationInputProperty(..),
mkDataSourceConfigurationInputProperty
) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.DataZone.DataSource.GlueRunConfigurationInputProperty as Exports
import {-# SOURCE #-} Stratosphere.DataZone.DataSource.RedshiftRunConfigurationInputProperty as Exports
import {-# SOURCE #-} Stratosphere.DataZone.DataSource.SageMakerRunConfigurationInputProperty as Exports
import Stratosphere.ResourceProperties
data DataSourceConfigurationInputProperty
=
DataSourceConfigurationInputProperty {DataSourceConfigurationInputProperty -> ()
haddock_workaround_ :: (),
DataSourceConfigurationInputProperty
-> Maybe GlueRunConfigurationInputProperty
glueRunConfiguration :: (Prelude.Maybe GlueRunConfigurationInputProperty),
DataSourceConfigurationInputProperty
-> Maybe RedshiftRunConfigurationInputProperty
redshiftRunConfiguration :: (Prelude.Maybe RedshiftRunConfigurationInputProperty),
DataSourceConfigurationInputProperty
-> Maybe SageMakerRunConfigurationInputProperty
sageMakerRunConfiguration :: (Prelude.Maybe SageMakerRunConfigurationInputProperty)}
deriving stock (DataSourceConfigurationInputProperty
-> DataSourceConfigurationInputProperty -> Bool
(DataSourceConfigurationInputProperty
-> DataSourceConfigurationInputProperty -> Bool)
-> (DataSourceConfigurationInputProperty
-> DataSourceConfigurationInputProperty -> Bool)
-> Eq DataSourceConfigurationInputProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: DataSourceConfigurationInputProperty
-> DataSourceConfigurationInputProperty -> Bool
== :: DataSourceConfigurationInputProperty
-> DataSourceConfigurationInputProperty -> Bool
$c/= :: DataSourceConfigurationInputProperty
-> DataSourceConfigurationInputProperty -> Bool
/= :: DataSourceConfigurationInputProperty
-> DataSourceConfigurationInputProperty -> Bool
Prelude.Eq, Int -> DataSourceConfigurationInputProperty -> ShowS
[DataSourceConfigurationInputProperty] -> ShowS
DataSourceConfigurationInputProperty -> String
(Int -> DataSourceConfigurationInputProperty -> ShowS)
-> (DataSourceConfigurationInputProperty -> String)
-> ([DataSourceConfigurationInputProperty] -> ShowS)
-> Show DataSourceConfigurationInputProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> DataSourceConfigurationInputProperty -> ShowS
showsPrec :: Int -> DataSourceConfigurationInputProperty -> ShowS
$cshow :: DataSourceConfigurationInputProperty -> String
show :: DataSourceConfigurationInputProperty -> String
$cshowList :: [DataSourceConfigurationInputProperty] -> ShowS
showList :: [DataSourceConfigurationInputProperty] -> ShowS
Prelude.Show)
mkDataSourceConfigurationInputProperty ::
DataSourceConfigurationInputProperty
mkDataSourceConfigurationInputProperty :: DataSourceConfigurationInputProperty
mkDataSourceConfigurationInputProperty
= DataSourceConfigurationInputProperty
{haddock_workaround_ :: ()
haddock_workaround_ = (), glueRunConfiguration :: Maybe GlueRunConfigurationInputProperty
glueRunConfiguration = Maybe GlueRunConfigurationInputProperty
forall a. Maybe a
Prelude.Nothing,
redshiftRunConfiguration :: Maybe RedshiftRunConfigurationInputProperty
redshiftRunConfiguration = Maybe RedshiftRunConfigurationInputProperty
forall a. Maybe a
Prelude.Nothing,
sageMakerRunConfiguration :: Maybe SageMakerRunConfigurationInputProperty
sageMakerRunConfiguration = Maybe SageMakerRunConfigurationInputProperty
forall a. Maybe a
Prelude.Nothing}
instance ToResourceProperties DataSourceConfigurationInputProperty where
toResourceProperties :: DataSourceConfigurationInputProperty -> ResourceProperties
toResourceProperties DataSourceConfigurationInputProperty {Maybe RedshiftRunConfigurationInputProperty
Maybe GlueRunConfigurationInputProperty
Maybe SageMakerRunConfigurationInputProperty
()
haddock_workaround_ :: DataSourceConfigurationInputProperty -> ()
glueRunConfiguration :: DataSourceConfigurationInputProperty
-> Maybe GlueRunConfigurationInputProperty
redshiftRunConfiguration :: DataSourceConfigurationInputProperty
-> Maybe RedshiftRunConfigurationInputProperty
sageMakerRunConfiguration :: DataSourceConfigurationInputProperty
-> Maybe SageMakerRunConfigurationInputProperty
haddock_workaround_ :: ()
glueRunConfiguration :: Maybe GlueRunConfigurationInputProperty
redshiftRunConfiguration :: Maybe RedshiftRunConfigurationInputProperty
sageMakerRunConfiguration :: Maybe SageMakerRunConfigurationInputProperty
..}
= ResourceProperties
{awsType :: Text
awsType = Text
"AWS::DataZone::DataSource.DataSourceConfigurationInput",
supportsTags :: Bool
supportsTags = Bool
Prelude.False,
properties :: Object
properties = [Item Object] -> Object
forall l. IsList l => [Item l] -> l
Prelude.fromList
([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
[Key -> GlueRunConfigurationInputProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"GlueRunConfiguration" (GlueRunConfigurationInputProperty -> (Key, Value))
-> Maybe GlueRunConfigurationInputProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe GlueRunConfigurationInputProperty
glueRunConfiguration,
Key -> RedshiftRunConfigurationInputProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"RedshiftRunConfiguration"
(RedshiftRunConfigurationInputProperty -> (Key, Value))
-> Maybe RedshiftRunConfigurationInputProperty
-> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe RedshiftRunConfigurationInputProperty
redshiftRunConfiguration,
Key -> SageMakerRunConfigurationInputProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"SageMakerRunConfiguration"
(SageMakerRunConfigurationInputProperty -> (Key, Value))
-> Maybe SageMakerRunConfigurationInputProperty
-> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe SageMakerRunConfigurationInputProperty
sageMakerRunConfiguration])}
instance JSON.ToJSON DataSourceConfigurationInputProperty where
toJSON :: DataSourceConfigurationInputProperty -> Value
toJSON DataSourceConfigurationInputProperty {Maybe RedshiftRunConfigurationInputProperty
Maybe GlueRunConfigurationInputProperty
Maybe SageMakerRunConfigurationInputProperty
()
haddock_workaround_ :: DataSourceConfigurationInputProperty -> ()
glueRunConfiguration :: DataSourceConfigurationInputProperty
-> Maybe GlueRunConfigurationInputProperty
redshiftRunConfiguration :: DataSourceConfigurationInputProperty
-> Maybe RedshiftRunConfigurationInputProperty
sageMakerRunConfiguration :: DataSourceConfigurationInputProperty
-> Maybe SageMakerRunConfigurationInputProperty
haddock_workaround_ :: ()
glueRunConfiguration :: Maybe GlueRunConfigurationInputProperty
redshiftRunConfiguration :: Maybe RedshiftRunConfigurationInputProperty
sageMakerRunConfiguration :: Maybe SageMakerRunConfigurationInputProperty
..}
= [(Key, Value)] -> Value
JSON.object
([Item [(Key, Value)]] -> [(Key, Value)]
forall l. IsList l => [Item l] -> l
Prelude.fromList
([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
[Key -> GlueRunConfigurationInputProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"GlueRunConfiguration" (GlueRunConfigurationInputProperty -> (Key, Value))
-> Maybe GlueRunConfigurationInputProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe GlueRunConfigurationInputProperty
glueRunConfiguration,
Key -> RedshiftRunConfigurationInputProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"RedshiftRunConfiguration"
(RedshiftRunConfigurationInputProperty -> (Key, Value))
-> Maybe RedshiftRunConfigurationInputProperty
-> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe RedshiftRunConfigurationInputProperty
redshiftRunConfiguration,
Key -> SageMakerRunConfigurationInputProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"SageMakerRunConfiguration"
(SageMakerRunConfigurationInputProperty -> (Key, Value))
-> Maybe SageMakerRunConfigurationInputProperty
-> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe SageMakerRunConfigurationInputProperty
sageMakerRunConfiguration]))
instance Property "GlueRunConfiguration" DataSourceConfigurationInputProperty where
type PropertyType "GlueRunConfiguration" DataSourceConfigurationInputProperty = GlueRunConfigurationInputProperty
set :: PropertyType
"GlueRunConfiguration" DataSourceConfigurationInputProperty
-> DataSourceConfigurationInputProperty
-> DataSourceConfigurationInputProperty
set PropertyType
"GlueRunConfiguration" DataSourceConfigurationInputProperty
newValue DataSourceConfigurationInputProperty {Maybe RedshiftRunConfigurationInputProperty
Maybe GlueRunConfigurationInputProperty
Maybe SageMakerRunConfigurationInputProperty
()
haddock_workaround_ :: DataSourceConfigurationInputProperty -> ()
glueRunConfiguration :: DataSourceConfigurationInputProperty
-> Maybe GlueRunConfigurationInputProperty
redshiftRunConfiguration :: DataSourceConfigurationInputProperty
-> Maybe RedshiftRunConfigurationInputProperty
sageMakerRunConfiguration :: DataSourceConfigurationInputProperty
-> Maybe SageMakerRunConfigurationInputProperty
haddock_workaround_ :: ()
glueRunConfiguration :: Maybe GlueRunConfigurationInputProperty
redshiftRunConfiguration :: Maybe RedshiftRunConfigurationInputProperty
sageMakerRunConfiguration :: Maybe SageMakerRunConfigurationInputProperty
..}
= DataSourceConfigurationInputProperty
{glueRunConfiguration :: Maybe GlueRunConfigurationInputProperty
glueRunConfiguration = GlueRunConfigurationInputProperty
-> Maybe GlueRunConfigurationInputProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType
"GlueRunConfiguration" DataSourceConfigurationInputProperty
GlueRunConfigurationInputProperty
newValue, Maybe RedshiftRunConfigurationInputProperty
Maybe SageMakerRunConfigurationInputProperty
()
haddock_workaround_ :: ()
redshiftRunConfiguration :: Maybe RedshiftRunConfigurationInputProperty
sageMakerRunConfiguration :: Maybe SageMakerRunConfigurationInputProperty
haddock_workaround_ :: ()
redshiftRunConfiguration :: Maybe RedshiftRunConfigurationInputProperty
sageMakerRunConfiguration :: Maybe SageMakerRunConfigurationInputProperty
..}
instance Property "RedshiftRunConfiguration" DataSourceConfigurationInputProperty where
type PropertyType "RedshiftRunConfiguration" DataSourceConfigurationInputProperty = RedshiftRunConfigurationInputProperty
set :: PropertyType
"RedshiftRunConfiguration" DataSourceConfigurationInputProperty
-> DataSourceConfigurationInputProperty
-> DataSourceConfigurationInputProperty
set PropertyType
"RedshiftRunConfiguration" DataSourceConfigurationInputProperty
newValue DataSourceConfigurationInputProperty {Maybe RedshiftRunConfigurationInputProperty
Maybe GlueRunConfigurationInputProperty
Maybe SageMakerRunConfigurationInputProperty
()
haddock_workaround_ :: DataSourceConfigurationInputProperty -> ()
glueRunConfiguration :: DataSourceConfigurationInputProperty
-> Maybe GlueRunConfigurationInputProperty
redshiftRunConfiguration :: DataSourceConfigurationInputProperty
-> Maybe RedshiftRunConfigurationInputProperty
sageMakerRunConfiguration :: DataSourceConfigurationInputProperty
-> Maybe SageMakerRunConfigurationInputProperty
haddock_workaround_ :: ()
glueRunConfiguration :: Maybe GlueRunConfigurationInputProperty
redshiftRunConfiguration :: Maybe RedshiftRunConfigurationInputProperty
sageMakerRunConfiguration :: Maybe SageMakerRunConfigurationInputProperty
..}
= DataSourceConfigurationInputProperty
{redshiftRunConfiguration :: Maybe RedshiftRunConfigurationInputProperty
redshiftRunConfiguration = RedshiftRunConfigurationInputProperty
-> Maybe RedshiftRunConfigurationInputProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType
"RedshiftRunConfiguration" DataSourceConfigurationInputProperty
RedshiftRunConfigurationInputProperty
newValue, Maybe GlueRunConfigurationInputProperty
Maybe SageMakerRunConfigurationInputProperty
()
haddock_workaround_ :: ()
glueRunConfiguration :: Maybe GlueRunConfigurationInputProperty
sageMakerRunConfiguration :: Maybe SageMakerRunConfigurationInputProperty
haddock_workaround_ :: ()
glueRunConfiguration :: Maybe GlueRunConfigurationInputProperty
sageMakerRunConfiguration :: Maybe SageMakerRunConfigurationInputProperty
..}
instance Property "SageMakerRunConfiguration" DataSourceConfigurationInputProperty where
type PropertyType "SageMakerRunConfiguration" DataSourceConfigurationInputProperty = SageMakerRunConfigurationInputProperty
set :: PropertyType
"SageMakerRunConfiguration" DataSourceConfigurationInputProperty
-> DataSourceConfigurationInputProperty
-> DataSourceConfigurationInputProperty
set PropertyType
"SageMakerRunConfiguration" DataSourceConfigurationInputProperty
newValue DataSourceConfigurationInputProperty {Maybe RedshiftRunConfigurationInputProperty
Maybe GlueRunConfigurationInputProperty
Maybe SageMakerRunConfigurationInputProperty
()
haddock_workaround_ :: DataSourceConfigurationInputProperty -> ()
glueRunConfiguration :: DataSourceConfigurationInputProperty
-> Maybe GlueRunConfigurationInputProperty
redshiftRunConfiguration :: DataSourceConfigurationInputProperty
-> Maybe RedshiftRunConfigurationInputProperty
sageMakerRunConfiguration :: DataSourceConfigurationInputProperty
-> Maybe SageMakerRunConfigurationInputProperty
haddock_workaround_ :: ()
glueRunConfiguration :: Maybe GlueRunConfigurationInputProperty
redshiftRunConfiguration :: Maybe RedshiftRunConfigurationInputProperty
sageMakerRunConfiguration :: Maybe SageMakerRunConfigurationInputProperty
..}
= DataSourceConfigurationInputProperty
{sageMakerRunConfiguration :: Maybe SageMakerRunConfigurationInputProperty
sageMakerRunConfiguration = SageMakerRunConfigurationInputProperty
-> Maybe SageMakerRunConfigurationInputProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType
"SageMakerRunConfiguration" DataSourceConfigurationInputProperty
SageMakerRunConfigurationInputProperty
newValue, Maybe RedshiftRunConfigurationInputProperty
Maybe GlueRunConfigurationInputProperty
()
haddock_workaround_ :: ()
glueRunConfiguration :: Maybe GlueRunConfigurationInputProperty
redshiftRunConfiguration :: Maybe RedshiftRunConfigurationInputProperty
haddock_workaround_ :: ()
glueRunConfiguration :: Maybe GlueRunConfigurationInputProperty
redshiftRunConfiguration :: Maybe RedshiftRunConfigurationInputProperty
..}