module Stratosphere.Kendra.DataSource.DatabaseConfigurationProperty (
        module Exports, DatabaseConfigurationProperty(..),
        mkDatabaseConfigurationProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.Kendra.DataSource.AclConfigurationProperty as Exports
import {-# SOURCE #-} Stratosphere.Kendra.DataSource.ColumnConfigurationProperty as Exports
import {-# SOURCE #-} Stratosphere.Kendra.DataSource.ConnectionConfigurationProperty as Exports
import {-# SOURCE #-} Stratosphere.Kendra.DataSource.DataSourceVpcConfigurationProperty as Exports
import {-# SOURCE #-} Stratosphere.Kendra.DataSource.SqlConfigurationProperty as Exports
import Stratosphere.ResourceProperties
import Stratosphere.Value
data DatabaseConfigurationProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-kendra-datasource-databaseconfiguration.html>
    DatabaseConfigurationProperty {DatabaseConfigurationProperty -> ()
haddock_workaround_ :: (),
                                   -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-kendra-datasource-databaseconfiguration.html#cfn-kendra-datasource-databaseconfiguration-aclconfiguration>
                                   DatabaseConfigurationProperty -> Maybe AclConfigurationProperty
aclConfiguration :: (Prelude.Maybe AclConfigurationProperty),
                                   -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-kendra-datasource-databaseconfiguration.html#cfn-kendra-datasource-databaseconfiguration-columnconfiguration>
                                   DatabaseConfigurationProperty -> ColumnConfigurationProperty
columnConfiguration :: ColumnConfigurationProperty,
                                   -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-kendra-datasource-databaseconfiguration.html#cfn-kendra-datasource-databaseconfiguration-connectionconfiguration>
                                   DatabaseConfigurationProperty -> ConnectionConfigurationProperty
connectionConfiguration :: ConnectionConfigurationProperty,
                                   -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-kendra-datasource-databaseconfiguration.html#cfn-kendra-datasource-databaseconfiguration-databaseenginetype>
                                   DatabaseConfigurationProperty -> Value Text
databaseEngineType :: (Value Prelude.Text),
                                   -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-kendra-datasource-databaseconfiguration.html#cfn-kendra-datasource-databaseconfiguration-sqlconfiguration>
                                   DatabaseConfigurationProperty -> Maybe SqlConfigurationProperty
sqlConfiguration :: (Prelude.Maybe SqlConfigurationProperty),
                                   -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-kendra-datasource-databaseconfiguration.html#cfn-kendra-datasource-databaseconfiguration-vpcconfiguration>
                                   DatabaseConfigurationProperty
-> Maybe DataSourceVpcConfigurationProperty
vpcConfiguration :: (Prelude.Maybe DataSourceVpcConfigurationProperty)}
  deriving stock (DatabaseConfigurationProperty
-> DatabaseConfigurationProperty -> Bool
(DatabaseConfigurationProperty
 -> DatabaseConfigurationProperty -> Bool)
-> (DatabaseConfigurationProperty
    -> DatabaseConfigurationProperty -> Bool)
-> Eq DatabaseConfigurationProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: DatabaseConfigurationProperty
-> DatabaseConfigurationProperty -> Bool
== :: DatabaseConfigurationProperty
-> DatabaseConfigurationProperty -> Bool
$c/= :: DatabaseConfigurationProperty
-> DatabaseConfigurationProperty -> Bool
/= :: DatabaseConfigurationProperty
-> DatabaseConfigurationProperty -> Bool
Prelude.Eq, Int -> DatabaseConfigurationProperty -> ShowS
[DatabaseConfigurationProperty] -> ShowS
DatabaseConfigurationProperty -> String
(Int -> DatabaseConfigurationProperty -> ShowS)
-> (DatabaseConfigurationProperty -> String)
-> ([DatabaseConfigurationProperty] -> ShowS)
-> Show DatabaseConfigurationProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> DatabaseConfigurationProperty -> ShowS
showsPrec :: Int -> DatabaseConfigurationProperty -> ShowS
$cshow :: DatabaseConfigurationProperty -> String
show :: DatabaseConfigurationProperty -> String
$cshowList :: [DatabaseConfigurationProperty] -> ShowS
showList :: [DatabaseConfigurationProperty] -> ShowS
Prelude.Show)
mkDatabaseConfigurationProperty ::
  ColumnConfigurationProperty
  -> ConnectionConfigurationProperty
     -> Value Prelude.Text -> DatabaseConfigurationProperty
mkDatabaseConfigurationProperty :: ColumnConfigurationProperty
-> ConnectionConfigurationProperty
-> Value Text
-> DatabaseConfigurationProperty
mkDatabaseConfigurationProperty
  ColumnConfigurationProperty
columnConfiguration
  ConnectionConfigurationProperty
connectionConfiguration
  Value Text
databaseEngineType
  = DatabaseConfigurationProperty
      {haddock_workaround_ :: ()
haddock_workaround_ = (),
       columnConfiguration :: ColumnConfigurationProperty
columnConfiguration = ColumnConfigurationProperty
columnConfiguration,
       connectionConfiguration :: ConnectionConfigurationProperty
connectionConfiguration = ConnectionConfigurationProperty
connectionConfiguration,
       databaseEngineType :: Value Text
databaseEngineType = Value Text
databaseEngineType,
       aclConfiguration :: Maybe AclConfigurationProperty
aclConfiguration = Maybe AclConfigurationProperty
forall a. Maybe a
Prelude.Nothing,
       sqlConfiguration :: Maybe SqlConfigurationProperty
sqlConfiguration = Maybe SqlConfigurationProperty
forall a. Maybe a
Prelude.Nothing,
       vpcConfiguration :: Maybe DataSourceVpcConfigurationProperty
vpcConfiguration = Maybe DataSourceVpcConfigurationProperty
forall a. Maybe a
Prelude.Nothing}
instance ToResourceProperties DatabaseConfigurationProperty where
  toResourceProperties :: DatabaseConfigurationProperty -> ResourceProperties
toResourceProperties DatabaseConfigurationProperty {Maybe AclConfigurationProperty
Maybe DataSourceVpcConfigurationProperty
Maybe SqlConfigurationProperty
()
Value Text
ConnectionConfigurationProperty
ColumnConfigurationProperty
haddock_workaround_ :: DatabaseConfigurationProperty -> ()
aclConfiguration :: DatabaseConfigurationProperty -> Maybe AclConfigurationProperty
columnConfiguration :: DatabaseConfigurationProperty -> ColumnConfigurationProperty
connectionConfiguration :: DatabaseConfigurationProperty -> ConnectionConfigurationProperty
databaseEngineType :: DatabaseConfigurationProperty -> Value Text
sqlConfiguration :: DatabaseConfigurationProperty -> Maybe SqlConfigurationProperty
vpcConfiguration :: DatabaseConfigurationProperty
-> Maybe DataSourceVpcConfigurationProperty
haddock_workaround_ :: ()
aclConfiguration :: Maybe AclConfigurationProperty
columnConfiguration :: ColumnConfigurationProperty
connectionConfiguration :: ConnectionConfigurationProperty
databaseEngineType :: Value Text
sqlConfiguration :: Maybe SqlConfigurationProperty
vpcConfiguration :: Maybe DataSourceVpcConfigurationProperty
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::Kendra::DataSource.DatabaseConfiguration",
         supportsTags :: Bool
supportsTags = Bool
Prelude.False,
         properties :: Object
properties = [Item Object] -> Object
forall l. IsList l => [Item l] -> l
Prelude.fromList
                        ([(Key, Value)] -> [(Key, Value)] -> [(Key, Value)]
forall a. Semigroup a => a -> a -> a
(Prelude.<>)
                           [Key
"ColumnConfiguration" Key -> ColumnConfigurationProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= ColumnConfigurationProperty
columnConfiguration,
                            Key
"ConnectionConfiguration" Key -> ConnectionConfigurationProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= ConnectionConfigurationProperty
connectionConfiguration,
                            Key
"DatabaseEngineType" 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
databaseEngineType]
                           ([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
                              [Key -> AclConfigurationProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"AclConfiguration" (AclConfigurationProperty -> (Key, Value))
-> Maybe AclConfigurationProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe AclConfigurationProperty
aclConfiguration,
                               Key -> SqlConfigurationProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"SqlConfiguration" (SqlConfigurationProperty -> (Key, Value))
-> Maybe SqlConfigurationProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe SqlConfigurationProperty
sqlConfiguration,
                               Key -> DataSourceVpcConfigurationProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"VpcConfiguration" (DataSourceVpcConfigurationProperty -> (Key, Value))
-> Maybe DataSourceVpcConfigurationProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe DataSourceVpcConfigurationProperty
vpcConfiguration]))}
instance JSON.ToJSON DatabaseConfigurationProperty where
  toJSON :: DatabaseConfigurationProperty -> Value
toJSON DatabaseConfigurationProperty {Maybe AclConfigurationProperty
Maybe DataSourceVpcConfigurationProperty
Maybe SqlConfigurationProperty
()
Value Text
ConnectionConfigurationProperty
ColumnConfigurationProperty
haddock_workaround_ :: DatabaseConfigurationProperty -> ()
aclConfiguration :: DatabaseConfigurationProperty -> Maybe AclConfigurationProperty
columnConfiguration :: DatabaseConfigurationProperty -> ColumnConfigurationProperty
connectionConfiguration :: DatabaseConfigurationProperty -> ConnectionConfigurationProperty
databaseEngineType :: DatabaseConfigurationProperty -> Value Text
sqlConfiguration :: DatabaseConfigurationProperty -> Maybe SqlConfigurationProperty
vpcConfiguration :: DatabaseConfigurationProperty
-> Maybe DataSourceVpcConfigurationProperty
haddock_workaround_ :: ()
aclConfiguration :: Maybe AclConfigurationProperty
columnConfiguration :: ColumnConfigurationProperty
connectionConfiguration :: ConnectionConfigurationProperty
databaseEngineType :: Value Text
sqlConfiguration :: Maybe SqlConfigurationProperty
vpcConfiguration :: Maybe DataSourceVpcConfigurationProperty
..}
    = [(Key, Value)] -> Value
JSON.object
        ([Item [(Key, Value)]] -> [(Key, Value)]
forall l. IsList l => [Item l] -> l
Prelude.fromList
           ([(Key, Value)] -> [(Key, Value)] -> [(Key, Value)]
forall a. Semigroup a => a -> a -> a
(Prelude.<>)
              [Key
"ColumnConfiguration" Key -> ColumnConfigurationProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= ColumnConfigurationProperty
columnConfiguration,
               Key
"ConnectionConfiguration" Key -> ConnectionConfigurationProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= ConnectionConfigurationProperty
connectionConfiguration,
               Key
"DatabaseEngineType" 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
databaseEngineType]
              ([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
                 [Key -> AclConfigurationProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"AclConfiguration" (AclConfigurationProperty -> (Key, Value))
-> Maybe AclConfigurationProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe AclConfigurationProperty
aclConfiguration,
                  Key -> SqlConfigurationProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"SqlConfiguration" (SqlConfigurationProperty -> (Key, Value))
-> Maybe SqlConfigurationProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe SqlConfigurationProperty
sqlConfiguration,
                  Key -> DataSourceVpcConfigurationProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"VpcConfiguration" (DataSourceVpcConfigurationProperty -> (Key, Value))
-> Maybe DataSourceVpcConfigurationProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe DataSourceVpcConfigurationProperty
vpcConfiguration])))
instance Property "AclConfiguration" DatabaseConfigurationProperty where
  type PropertyType "AclConfiguration" DatabaseConfigurationProperty = AclConfigurationProperty
  set :: PropertyType "AclConfiguration" DatabaseConfigurationProperty
-> DatabaseConfigurationProperty -> DatabaseConfigurationProperty
set PropertyType "AclConfiguration" DatabaseConfigurationProperty
newValue DatabaseConfigurationProperty {Maybe AclConfigurationProperty
Maybe DataSourceVpcConfigurationProperty
Maybe SqlConfigurationProperty
()
Value Text
ConnectionConfigurationProperty
ColumnConfigurationProperty
haddock_workaround_ :: DatabaseConfigurationProperty -> ()
aclConfiguration :: DatabaseConfigurationProperty -> Maybe AclConfigurationProperty
columnConfiguration :: DatabaseConfigurationProperty -> ColumnConfigurationProperty
connectionConfiguration :: DatabaseConfigurationProperty -> ConnectionConfigurationProperty
databaseEngineType :: DatabaseConfigurationProperty -> Value Text
sqlConfiguration :: DatabaseConfigurationProperty -> Maybe SqlConfigurationProperty
vpcConfiguration :: DatabaseConfigurationProperty
-> Maybe DataSourceVpcConfigurationProperty
haddock_workaround_ :: ()
aclConfiguration :: Maybe AclConfigurationProperty
columnConfiguration :: ColumnConfigurationProperty
connectionConfiguration :: ConnectionConfigurationProperty
databaseEngineType :: Value Text
sqlConfiguration :: Maybe SqlConfigurationProperty
vpcConfiguration :: Maybe DataSourceVpcConfigurationProperty
..}
    = DatabaseConfigurationProperty
        {aclConfiguration :: Maybe AclConfigurationProperty
aclConfiguration = AclConfigurationProperty -> Maybe AclConfigurationProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "AclConfiguration" DatabaseConfigurationProperty
AclConfigurationProperty
newValue, Maybe DataSourceVpcConfigurationProperty
Maybe SqlConfigurationProperty
()
Value Text
ConnectionConfigurationProperty
ColumnConfigurationProperty
haddock_workaround_ :: ()
columnConfiguration :: ColumnConfigurationProperty
connectionConfiguration :: ConnectionConfigurationProperty
databaseEngineType :: Value Text
sqlConfiguration :: Maybe SqlConfigurationProperty
vpcConfiguration :: Maybe DataSourceVpcConfigurationProperty
haddock_workaround_ :: ()
columnConfiguration :: ColumnConfigurationProperty
connectionConfiguration :: ConnectionConfigurationProperty
databaseEngineType :: Value Text
sqlConfiguration :: Maybe SqlConfigurationProperty
vpcConfiguration :: Maybe DataSourceVpcConfigurationProperty
..}
instance Property "ColumnConfiguration" DatabaseConfigurationProperty where
  type PropertyType "ColumnConfiguration" DatabaseConfigurationProperty = ColumnConfigurationProperty
  set :: PropertyType "ColumnConfiguration" DatabaseConfigurationProperty
-> DatabaseConfigurationProperty -> DatabaseConfigurationProperty
set PropertyType "ColumnConfiguration" DatabaseConfigurationProperty
newValue DatabaseConfigurationProperty {Maybe AclConfigurationProperty
Maybe DataSourceVpcConfigurationProperty
Maybe SqlConfigurationProperty
()
Value Text
ConnectionConfigurationProperty
ColumnConfigurationProperty
haddock_workaround_ :: DatabaseConfigurationProperty -> ()
aclConfiguration :: DatabaseConfigurationProperty -> Maybe AclConfigurationProperty
columnConfiguration :: DatabaseConfigurationProperty -> ColumnConfigurationProperty
connectionConfiguration :: DatabaseConfigurationProperty -> ConnectionConfigurationProperty
databaseEngineType :: DatabaseConfigurationProperty -> Value Text
sqlConfiguration :: DatabaseConfigurationProperty -> Maybe SqlConfigurationProperty
vpcConfiguration :: DatabaseConfigurationProperty
-> Maybe DataSourceVpcConfigurationProperty
haddock_workaround_ :: ()
aclConfiguration :: Maybe AclConfigurationProperty
columnConfiguration :: ColumnConfigurationProperty
connectionConfiguration :: ConnectionConfigurationProperty
databaseEngineType :: Value Text
sqlConfiguration :: Maybe SqlConfigurationProperty
vpcConfiguration :: Maybe DataSourceVpcConfigurationProperty
..}
    = DatabaseConfigurationProperty
        {columnConfiguration :: ColumnConfigurationProperty
columnConfiguration = PropertyType "ColumnConfiguration" DatabaseConfigurationProperty
ColumnConfigurationProperty
newValue, Maybe AclConfigurationProperty
Maybe DataSourceVpcConfigurationProperty
Maybe SqlConfigurationProperty
()
Value Text
ConnectionConfigurationProperty
haddock_workaround_ :: ()
aclConfiguration :: Maybe AclConfigurationProperty
connectionConfiguration :: ConnectionConfigurationProperty
databaseEngineType :: Value Text
sqlConfiguration :: Maybe SqlConfigurationProperty
vpcConfiguration :: Maybe DataSourceVpcConfigurationProperty
haddock_workaround_ :: ()
aclConfiguration :: Maybe AclConfigurationProperty
connectionConfiguration :: ConnectionConfigurationProperty
databaseEngineType :: Value Text
sqlConfiguration :: Maybe SqlConfigurationProperty
vpcConfiguration :: Maybe DataSourceVpcConfigurationProperty
..}
instance Property "ConnectionConfiguration" DatabaseConfigurationProperty where
  type PropertyType "ConnectionConfiguration" DatabaseConfigurationProperty = ConnectionConfigurationProperty
  set :: PropertyType
  "ConnectionConfiguration" DatabaseConfigurationProperty
-> DatabaseConfigurationProperty -> DatabaseConfigurationProperty
set PropertyType
  "ConnectionConfiguration" DatabaseConfigurationProperty
newValue DatabaseConfigurationProperty {Maybe AclConfigurationProperty
Maybe DataSourceVpcConfigurationProperty
Maybe SqlConfigurationProperty
()
Value Text
ConnectionConfigurationProperty
ColumnConfigurationProperty
haddock_workaround_ :: DatabaseConfigurationProperty -> ()
aclConfiguration :: DatabaseConfigurationProperty -> Maybe AclConfigurationProperty
columnConfiguration :: DatabaseConfigurationProperty -> ColumnConfigurationProperty
connectionConfiguration :: DatabaseConfigurationProperty -> ConnectionConfigurationProperty
databaseEngineType :: DatabaseConfigurationProperty -> Value Text
sqlConfiguration :: DatabaseConfigurationProperty -> Maybe SqlConfigurationProperty
vpcConfiguration :: DatabaseConfigurationProperty
-> Maybe DataSourceVpcConfigurationProperty
haddock_workaround_ :: ()
aclConfiguration :: Maybe AclConfigurationProperty
columnConfiguration :: ColumnConfigurationProperty
connectionConfiguration :: ConnectionConfigurationProperty
databaseEngineType :: Value Text
sqlConfiguration :: Maybe SqlConfigurationProperty
vpcConfiguration :: Maybe DataSourceVpcConfigurationProperty
..}
    = DatabaseConfigurationProperty
        {connectionConfiguration :: ConnectionConfigurationProperty
connectionConfiguration = PropertyType
  "ConnectionConfiguration" DatabaseConfigurationProperty
ConnectionConfigurationProperty
newValue, Maybe AclConfigurationProperty
Maybe DataSourceVpcConfigurationProperty
Maybe SqlConfigurationProperty
()
Value Text
ColumnConfigurationProperty
haddock_workaround_ :: ()
aclConfiguration :: Maybe AclConfigurationProperty
columnConfiguration :: ColumnConfigurationProperty
databaseEngineType :: Value Text
sqlConfiguration :: Maybe SqlConfigurationProperty
vpcConfiguration :: Maybe DataSourceVpcConfigurationProperty
haddock_workaround_ :: ()
aclConfiguration :: Maybe AclConfigurationProperty
columnConfiguration :: ColumnConfigurationProperty
databaseEngineType :: Value Text
sqlConfiguration :: Maybe SqlConfigurationProperty
vpcConfiguration :: Maybe DataSourceVpcConfigurationProperty
..}
instance Property "DatabaseEngineType" DatabaseConfigurationProperty where
  type PropertyType "DatabaseEngineType" DatabaseConfigurationProperty = Value Prelude.Text
  set :: PropertyType "DatabaseEngineType" DatabaseConfigurationProperty
-> DatabaseConfigurationProperty -> DatabaseConfigurationProperty
set PropertyType "DatabaseEngineType" DatabaseConfigurationProperty
newValue DatabaseConfigurationProperty {Maybe AclConfigurationProperty
Maybe DataSourceVpcConfigurationProperty
Maybe SqlConfigurationProperty
()
Value Text
ConnectionConfigurationProperty
ColumnConfigurationProperty
haddock_workaround_ :: DatabaseConfigurationProperty -> ()
aclConfiguration :: DatabaseConfigurationProperty -> Maybe AclConfigurationProperty
columnConfiguration :: DatabaseConfigurationProperty -> ColumnConfigurationProperty
connectionConfiguration :: DatabaseConfigurationProperty -> ConnectionConfigurationProperty
databaseEngineType :: DatabaseConfigurationProperty -> Value Text
sqlConfiguration :: DatabaseConfigurationProperty -> Maybe SqlConfigurationProperty
vpcConfiguration :: DatabaseConfigurationProperty
-> Maybe DataSourceVpcConfigurationProperty
haddock_workaround_ :: ()
aclConfiguration :: Maybe AclConfigurationProperty
columnConfiguration :: ColumnConfigurationProperty
connectionConfiguration :: ConnectionConfigurationProperty
databaseEngineType :: Value Text
sqlConfiguration :: Maybe SqlConfigurationProperty
vpcConfiguration :: Maybe DataSourceVpcConfigurationProperty
..}
    = DatabaseConfigurationProperty {databaseEngineType :: Value Text
databaseEngineType = PropertyType "DatabaseEngineType" DatabaseConfigurationProperty
Value Text
newValue, Maybe AclConfigurationProperty
Maybe DataSourceVpcConfigurationProperty
Maybe SqlConfigurationProperty
()
ConnectionConfigurationProperty
ColumnConfigurationProperty
haddock_workaround_ :: ()
aclConfiguration :: Maybe AclConfigurationProperty
columnConfiguration :: ColumnConfigurationProperty
connectionConfiguration :: ConnectionConfigurationProperty
sqlConfiguration :: Maybe SqlConfigurationProperty
vpcConfiguration :: Maybe DataSourceVpcConfigurationProperty
haddock_workaround_ :: ()
aclConfiguration :: Maybe AclConfigurationProperty
columnConfiguration :: ColumnConfigurationProperty
connectionConfiguration :: ConnectionConfigurationProperty
sqlConfiguration :: Maybe SqlConfigurationProperty
vpcConfiguration :: Maybe DataSourceVpcConfigurationProperty
..}
instance Property "SqlConfiguration" DatabaseConfigurationProperty where
  type PropertyType "SqlConfiguration" DatabaseConfigurationProperty = SqlConfigurationProperty
  set :: PropertyType "SqlConfiguration" DatabaseConfigurationProperty
-> DatabaseConfigurationProperty -> DatabaseConfigurationProperty
set PropertyType "SqlConfiguration" DatabaseConfigurationProperty
newValue DatabaseConfigurationProperty {Maybe AclConfigurationProperty
Maybe DataSourceVpcConfigurationProperty
Maybe SqlConfigurationProperty
()
Value Text
ConnectionConfigurationProperty
ColumnConfigurationProperty
haddock_workaround_ :: DatabaseConfigurationProperty -> ()
aclConfiguration :: DatabaseConfigurationProperty -> Maybe AclConfigurationProperty
columnConfiguration :: DatabaseConfigurationProperty -> ColumnConfigurationProperty
connectionConfiguration :: DatabaseConfigurationProperty -> ConnectionConfigurationProperty
databaseEngineType :: DatabaseConfigurationProperty -> Value Text
sqlConfiguration :: DatabaseConfigurationProperty -> Maybe SqlConfigurationProperty
vpcConfiguration :: DatabaseConfigurationProperty
-> Maybe DataSourceVpcConfigurationProperty
haddock_workaround_ :: ()
aclConfiguration :: Maybe AclConfigurationProperty
columnConfiguration :: ColumnConfigurationProperty
connectionConfiguration :: ConnectionConfigurationProperty
databaseEngineType :: Value Text
sqlConfiguration :: Maybe SqlConfigurationProperty
vpcConfiguration :: Maybe DataSourceVpcConfigurationProperty
..}
    = DatabaseConfigurationProperty
        {sqlConfiguration :: Maybe SqlConfigurationProperty
sqlConfiguration = SqlConfigurationProperty -> Maybe SqlConfigurationProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "SqlConfiguration" DatabaseConfigurationProperty
SqlConfigurationProperty
newValue, Maybe AclConfigurationProperty
Maybe DataSourceVpcConfigurationProperty
()
Value Text
ConnectionConfigurationProperty
ColumnConfigurationProperty
haddock_workaround_ :: ()
aclConfiguration :: Maybe AclConfigurationProperty
columnConfiguration :: ColumnConfigurationProperty
connectionConfiguration :: ConnectionConfigurationProperty
databaseEngineType :: Value Text
vpcConfiguration :: Maybe DataSourceVpcConfigurationProperty
haddock_workaround_ :: ()
aclConfiguration :: Maybe AclConfigurationProperty
columnConfiguration :: ColumnConfigurationProperty
connectionConfiguration :: ConnectionConfigurationProperty
databaseEngineType :: Value Text
vpcConfiguration :: Maybe DataSourceVpcConfigurationProperty
..}
instance Property "VpcConfiguration" DatabaseConfigurationProperty where
  type PropertyType "VpcConfiguration" DatabaseConfigurationProperty = DataSourceVpcConfigurationProperty
  set :: PropertyType "VpcConfiguration" DatabaseConfigurationProperty
-> DatabaseConfigurationProperty -> DatabaseConfigurationProperty
set PropertyType "VpcConfiguration" DatabaseConfigurationProperty
newValue DatabaseConfigurationProperty {Maybe AclConfigurationProperty
Maybe DataSourceVpcConfigurationProperty
Maybe SqlConfigurationProperty
()
Value Text
ConnectionConfigurationProperty
ColumnConfigurationProperty
haddock_workaround_ :: DatabaseConfigurationProperty -> ()
aclConfiguration :: DatabaseConfigurationProperty -> Maybe AclConfigurationProperty
columnConfiguration :: DatabaseConfigurationProperty -> ColumnConfigurationProperty
connectionConfiguration :: DatabaseConfigurationProperty -> ConnectionConfigurationProperty
databaseEngineType :: DatabaseConfigurationProperty -> Value Text
sqlConfiguration :: DatabaseConfigurationProperty -> Maybe SqlConfigurationProperty
vpcConfiguration :: DatabaseConfigurationProperty
-> Maybe DataSourceVpcConfigurationProperty
haddock_workaround_ :: ()
aclConfiguration :: Maybe AclConfigurationProperty
columnConfiguration :: ColumnConfigurationProperty
connectionConfiguration :: ConnectionConfigurationProperty
databaseEngineType :: Value Text
sqlConfiguration :: Maybe SqlConfigurationProperty
vpcConfiguration :: Maybe DataSourceVpcConfigurationProperty
..}
    = DatabaseConfigurationProperty
        {vpcConfiguration :: Maybe DataSourceVpcConfigurationProperty
vpcConfiguration = DataSourceVpcConfigurationProperty
-> Maybe DataSourceVpcConfigurationProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "VpcConfiguration" DatabaseConfigurationProperty
DataSourceVpcConfigurationProperty
newValue, Maybe AclConfigurationProperty
Maybe SqlConfigurationProperty
()
Value Text
ConnectionConfigurationProperty
ColumnConfigurationProperty
haddock_workaround_ :: ()
aclConfiguration :: Maybe AclConfigurationProperty
columnConfiguration :: ColumnConfigurationProperty
connectionConfiguration :: ConnectionConfigurationProperty
databaseEngineType :: Value Text
sqlConfiguration :: Maybe SqlConfigurationProperty
haddock_workaround_ :: ()
aclConfiguration :: Maybe AclConfigurationProperty
columnConfiguration :: ColumnConfigurationProperty
connectionConfiguration :: ConnectionConfigurationProperty
databaseEngineType :: Value Text
sqlConfiguration :: Maybe SqlConfigurationProperty
..}