module Stratosphere.Bedrock.KnowledgeBase.RdsConfigurationProperty (
module Exports, RdsConfigurationProperty(..),
mkRdsConfigurationProperty
) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.Bedrock.KnowledgeBase.RdsFieldMappingProperty as Exports
import Stratosphere.ResourceProperties
import Stratosphere.Value
data RdsConfigurationProperty
=
RdsConfigurationProperty {RdsConfigurationProperty -> ()
haddock_workaround_ :: (),
RdsConfigurationProperty -> Value Text
credentialsSecretArn :: (Value Prelude.Text),
RdsConfigurationProperty -> Value Text
databaseName :: (Value Prelude.Text),
RdsConfigurationProperty -> RdsFieldMappingProperty
fieldMapping :: RdsFieldMappingProperty,
RdsConfigurationProperty -> Value Text
resourceArn :: (Value Prelude.Text),
RdsConfigurationProperty -> Value Text
tableName :: (Value Prelude.Text)}
deriving stock (RdsConfigurationProperty -> RdsConfigurationProperty -> Bool
(RdsConfigurationProperty -> RdsConfigurationProperty -> Bool)
-> (RdsConfigurationProperty -> RdsConfigurationProperty -> Bool)
-> Eq RdsConfigurationProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: RdsConfigurationProperty -> RdsConfigurationProperty -> Bool
== :: RdsConfigurationProperty -> RdsConfigurationProperty -> Bool
$c/= :: RdsConfigurationProperty -> RdsConfigurationProperty -> Bool
/= :: RdsConfigurationProperty -> RdsConfigurationProperty -> Bool
Prelude.Eq, Int -> RdsConfigurationProperty -> ShowS
[RdsConfigurationProperty] -> ShowS
RdsConfigurationProperty -> String
(Int -> RdsConfigurationProperty -> ShowS)
-> (RdsConfigurationProperty -> String)
-> ([RdsConfigurationProperty] -> ShowS)
-> Show RdsConfigurationProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> RdsConfigurationProperty -> ShowS
showsPrec :: Int -> RdsConfigurationProperty -> ShowS
$cshow :: RdsConfigurationProperty -> String
show :: RdsConfigurationProperty -> String
$cshowList :: [RdsConfigurationProperty] -> ShowS
showList :: [RdsConfigurationProperty] -> ShowS
Prelude.Show)
mkRdsConfigurationProperty ::
Value Prelude.Text
-> Value Prelude.Text
-> RdsFieldMappingProperty
-> Value Prelude.Text
-> Value Prelude.Text -> RdsConfigurationProperty
mkRdsConfigurationProperty :: Value Text
-> Value Text
-> RdsFieldMappingProperty
-> Value Text
-> Value Text
-> RdsConfigurationProperty
mkRdsConfigurationProperty
Value Text
credentialsSecretArn
Value Text
databaseName
RdsFieldMappingProperty
fieldMapping
Value Text
resourceArn
Value Text
tableName
= RdsConfigurationProperty
{haddock_workaround_ :: ()
haddock_workaround_ = (),
credentialsSecretArn :: Value Text
credentialsSecretArn = Value Text
credentialsSecretArn,
databaseName :: Value Text
databaseName = Value Text
databaseName, fieldMapping :: RdsFieldMappingProperty
fieldMapping = RdsFieldMappingProperty
fieldMapping,
resourceArn :: Value Text
resourceArn = Value Text
resourceArn, tableName :: Value Text
tableName = Value Text
tableName}
instance ToResourceProperties RdsConfigurationProperty where
toResourceProperties :: RdsConfigurationProperty -> ResourceProperties
toResourceProperties RdsConfigurationProperty {()
Value Text
RdsFieldMappingProperty
haddock_workaround_ :: RdsConfigurationProperty -> ()
credentialsSecretArn :: RdsConfigurationProperty -> Value Text
databaseName :: RdsConfigurationProperty -> Value Text
fieldMapping :: RdsConfigurationProperty -> RdsFieldMappingProperty
resourceArn :: RdsConfigurationProperty -> Value Text
tableName :: RdsConfigurationProperty -> Value Text
haddock_workaround_ :: ()
credentialsSecretArn :: Value Text
databaseName :: Value Text
fieldMapping :: RdsFieldMappingProperty
resourceArn :: Value Text
tableName :: Value Text
..}
= ResourceProperties
{awsType :: Text
awsType = Text
"AWS::Bedrock::KnowledgeBase.RdsConfiguration",
supportsTags :: Bool
supportsTags = Bool
Prelude.False,
properties :: Object
properties = [Key
"CredentialsSecretArn" 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
credentialsSecretArn,
Key
"DatabaseName" 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
databaseName,
Key
"FieldMapping" Key -> RdsFieldMappingProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= RdsFieldMappingProperty
fieldMapping,
Key
"ResourceArn" 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
resourceArn, Key
"TableName" 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
tableName]}
instance JSON.ToJSON RdsConfigurationProperty where
toJSON :: RdsConfigurationProperty -> Value
toJSON RdsConfigurationProperty {()
Value Text
RdsFieldMappingProperty
haddock_workaround_ :: RdsConfigurationProperty -> ()
credentialsSecretArn :: RdsConfigurationProperty -> Value Text
databaseName :: RdsConfigurationProperty -> Value Text
fieldMapping :: RdsConfigurationProperty -> RdsFieldMappingProperty
resourceArn :: RdsConfigurationProperty -> Value Text
tableName :: RdsConfigurationProperty -> Value Text
haddock_workaround_ :: ()
credentialsSecretArn :: Value Text
databaseName :: Value Text
fieldMapping :: RdsFieldMappingProperty
resourceArn :: Value Text
tableName :: Value Text
..}
= [(Key, Value)] -> Value
JSON.object
[Key
"CredentialsSecretArn" 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
credentialsSecretArn,
Key
"DatabaseName" 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
databaseName,
Key
"FieldMapping" Key -> RdsFieldMappingProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= RdsFieldMappingProperty
fieldMapping,
Key
"ResourceArn" 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
resourceArn, Key
"TableName" 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
tableName]
instance Property "CredentialsSecretArn" RdsConfigurationProperty where
type PropertyType "CredentialsSecretArn" RdsConfigurationProperty = Value Prelude.Text
set :: PropertyType "CredentialsSecretArn" RdsConfigurationProperty
-> RdsConfigurationProperty -> RdsConfigurationProperty
set PropertyType "CredentialsSecretArn" RdsConfigurationProperty
newValue RdsConfigurationProperty {()
Value Text
RdsFieldMappingProperty
haddock_workaround_ :: RdsConfigurationProperty -> ()
credentialsSecretArn :: RdsConfigurationProperty -> Value Text
databaseName :: RdsConfigurationProperty -> Value Text
fieldMapping :: RdsConfigurationProperty -> RdsFieldMappingProperty
resourceArn :: RdsConfigurationProperty -> Value Text
tableName :: RdsConfigurationProperty -> Value Text
haddock_workaround_ :: ()
credentialsSecretArn :: Value Text
databaseName :: Value Text
fieldMapping :: RdsFieldMappingProperty
resourceArn :: Value Text
tableName :: Value Text
..}
= RdsConfigurationProperty {credentialsSecretArn :: Value Text
credentialsSecretArn = PropertyType "CredentialsSecretArn" RdsConfigurationProperty
Value Text
newValue, ()
Value Text
RdsFieldMappingProperty
haddock_workaround_ :: ()
databaseName :: Value Text
fieldMapping :: RdsFieldMappingProperty
resourceArn :: Value Text
tableName :: Value Text
haddock_workaround_ :: ()
databaseName :: Value Text
fieldMapping :: RdsFieldMappingProperty
resourceArn :: Value Text
tableName :: Value Text
..}
instance Property "DatabaseName" RdsConfigurationProperty where
type PropertyType "DatabaseName" RdsConfigurationProperty = Value Prelude.Text
set :: PropertyType "DatabaseName" RdsConfigurationProperty
-> RdsConfigurationProperty -> RdsConfigurationProperty
set PropertyType "DatabaseName" RdsConfigurationProperty
newValue RdsConfigurationProperty {()
Value Text
RdsFieldMappingProperty
haddock_workaround_ :: RdsConfigurationProperty -> ()
credentialsSecretArn :: RdsConfigurationProperty -> Value Text
databaseName :: RdsConfigurationProperty -> Value Text
fieldMapping :: RdsConfigurationProperty -> RdsFieldMappingProperty
resourceArn :: RdsConfigurationProperty -> Value Text
tableName :: RdsConfigurationProperty -> Value Text
haddock_workaround_ :: ()
credentialsSecretArn :: Value Text
databaseName :: Value Text
fieldMapping :: RdsFieldMappingProperty
resourceArn :: Value Text
tableName :: Value Text
..}
= RdsConfigurationProperty {databaseName :: Value Text
databaseName = PropertyType "DatabaseName" RdsConfigurationProperty
Value Text
newValue, ()
Value Text
RdsFieldMappingProperty
haddock_workaround_ :: ()
credentialsSecretArn :: Value Text
fieldMapping :: RdsFieldMappingProperty
resourceArn :: Value Text
tableName :: Value Text
haddock_workaround_ :: ()
credentialsSecretArn :: Value Text
fieldMapping :: RdsFieldMappingProperty
resourceArn :: Value Text
tableName :: Value Text
..}
instance Property "FieldMapping" RdsConfigurationProperty where
type PropertyType "FieldMapping" RdsConfigurationProperty = RdsFieldMappingProperty
set :: PropertyType "FieldMapping" RdsConfigurationProperty
-> RdsConfigurationProperty -> RdsConfigurationProperty
set PropertyType "FieldMapping" RdsConfigurationProperty
newValue RdsConfigurationProperty {()
Value Text
RdsFieldMappingProperty
haddock_workaround_ :: RdsConfigurationProperty -> ()
credentialsSecretArn :: RdsConfigurationProperty -> Value Text
databaseName :: RdsConfigurationProperty -> Value Text
fieldMapping :: RdsConfigurationProperty -> RdsFieldMappingProperty
resourceArn :: RdsConfigurationProperty -> Value Text
tableName :: RdsConfigurationProperty -> Value Text
haddock_workaround_ :: ()
credentialsSecretArn :: Value Text
databaseName :: Value Text
fieldMapping :: RdsFieldMappingProperty
resourceArn :: Value Text
tableName :: Value Text
..}
= RdsConfigurationProperty {fieldMapping :: RdsFieldMappingProperty
fieldMapping = PropertyType "FieldMapping" RdsConfigurationProperty
RdsFieldMappingProperty
newValue, ()
Value Text
haddock_workaround_ :: ()
credentialsSecretArn :: Value Text
databaseName :: Value Text
resourceArn :: Value Text
tableName :: Value Text
haddock_workaround_ :: ()
credentialsSecretArn :: Value Text
databaseName :: Value Text
resourceArn :: Value Text
tableName :: Value Text
..}
instance Property "ResourceArn" RdsConfigurationProperty where
type PropertyType "ResourceArn" RdsConfigurationProperty = Value Prelude.Text
set :: PropertyType "ResourceArn" RdsConfigurationProperty
-> RdsConfigurationProperty -> RdsConfigurationProperty
set PropertyType "ResourceArn" RdsConfigurationProperty
newValue RdsConfigurationProperty {()
Value Text
RdsFieldMappingProperty
haddock_workaround_ :: RdsConfigurationProperty -> ()
credentialsSecretArn :: RdsConfigurationProperty -> Value Text
databaseName :: RdsConfigurationProperty -> Value Text
fieldMapping :: RdsConfigurationProperty -> RdsFieldMappingProperty
resourceArn :: RdsConfigurationProperty -> Value Text
tableName :: RdsConfigurationProperty -> Value Text
haddock_workaround_ :: ()
credentialsSecretArn :: Value Text
databaseName :: Value Text
fieldMapping :: RdsFieldMappingProperty
resourceArn :: Value Text
tableName :: Value Text
..}
= RdsConfigurationProperty {resourceArn :: Value Text
resourceArn = PropertyType "ResourceArn" RdsConfigurationProperty
Value Text
newValue, ()
Value Text
RdsFieldMappingProperty
haddock_workaround_ :: ()
credentialsSecretArn :: Value Text
databaseName :: Value Text
fieldMapping :: RdsFieldMappingProperty
tableName :: Value Text
haddock_workaround_ :: ()
credentialsSecretArn :: Value Text
databaseName :: Value Text
fieldMapping :: RdsFieldMappingProperty
tableName :: Value Text
..}
instance Property "TableName" RdsConfigurationProperty where
type PropertyType "TableName" RdsConfigurationProperty = Value Prelude.Text
set :: PropertyType "TableName" RdsConfigurationProperty
-> RdsConfigurationProperty -> RdsConfigurationProperty
set PropertyType "TableName" RdsConfigurationProperty
newValue RdsConfigurationProperty {()
Value Text
RdsFieldMappingProperty
haddock_workaround_ :: RdsConfigurationProperty -> ()
credentialsSecretArn :: RdsConfigurationProperty -> Value Text
databaseName :: RdsConfigurationProperty -> Value Text
fieldMapping :: RdsConfigurationProperty -> RdsFieldMappingProperty
resourceArn :: RdsConfigurationProperty -> Value Text
tableName :: RdsConfigurationProperty -> Value Text
haddock_workaround_ :: ()
credentialsSecretArn :: Value Text
databaseName :: Value Text
fieldMapping :: RdsFieldMappingProperty
resourceArn :: Value Text
tableName :: Value Text
..}
= RdsConfigurationProperty {tableName :: Value Text
tableName = PropertyType "TableName" RdsConfigurationProperty
Value Text
newValue, ()
Value Text
RdsFieldMappingProperty
haddock_workaround_ :: ()
credentialsSecretArn :: Value Text
databaseName :: Value Text
fieldMapping :: RdsFieldMappingProperty
resourceArn :: Value Text
haddock_workaround_ :: ()
credentialsSecretArn :: Value Text
databaseName :: Value Text
fieldMapping :: RdsFieldMappingProperty
resourceArn :: Value Text
..}