StorageConfigurationProperty.hs

module Stratosphere.Bedrock.KnowledgeBase.StorageConfigurationProperty (
        module Exports, StorageConfigurationProperty(..),
        mkStorageConfigurationProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.Bedrock.KnowledgeBase.MongoDbAtlasConfigurationProperty as Exports
import {-# SOURCE #-} Stratosphere.Bedrock.KnowledgeBase.NeptuneAnalyticsConfigurationProperty as Exports
import {-# SOURCE #-} Stratosphere.Bedrock.KnowledgeBase.OpenSearchManagedClusterConfigurationProperty as Exports
import {-# SOURCE #-} Stratosphere.Bedrock.KnowledgeBase.OpenSearchServerlessConfigurationProperty as Exports
import {-# SOURCE #-} Stratosphere.Bedrock.KnowledgeBase.PineconeConfigurationProperty as Exports
import {-# SOURCE #-} Stratosphere.Bedrock.KnowledgeBase.RdsConfigurationProperty as Exports
import Stratosphere.ResourceProperties
import Stratosphere.Value
data StorageConfigurationProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-bedrock-knowledgebase-storageconfiguration.html>
    StorageConfigurationProperty {haddock_workaround_ :: (),
                                  -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-bedrock-knowledgebase-storageconfiguration.html#cfn-bedrock-knowledgebase-storageconfiguration-mongodbatlasconfiguration>
                                  mongoDbAtlasConfiguration :: (Prelude.Maybe MongoDbAtlasConfigurationProperty),
                                  -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-bedrock-knowledgebase-storageconfiguration.html#cfn-bedrock-knowledgebase-storageconfiguration-neptuneanalyticsconfiguration>
                                  neptuneAnalyticsConfiguration :: (Prelude.Maybe NeptuneAnalyticsConfigurationProperty),
                                  -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-bedrock-knowledgebase-storageconfiguration.html#cfn-bedrock-knowledgebase-storageconfiguration-opensearchmanagedclusterconfiguration>
                                  opensearchManagedClusterConfiguration :: (Prelude.Maybe OpenSearchManagedClusterConfigurationProperty),
                                  -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-bedrock-knowledgebase-storageconfiguration.html#cfn-bedrock-knowledgebase-storageconfiguration-opensearchserverlessconfiguration>
                                  opensearchServerlessConfiguration :: (Prelude.Maybe OpenSearchServerlessConfigurationProperty),
                                  -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-bedrock-knowledgebase-storageconfiguration.html#cfn-bedrock-knowledgebase-storageconfiguration-pineconeconfiguration>
                                  pineconeConfiguration :: (Prelude.Maybe PineconeConfigurationProperty),
                                  -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-bedrock-knowledgebase-storageconfiguration.html#cfn-bedrock-knowledgebase-storageconfiguration-rdsconfiguration>
                                  rdsConfiguration :: (Prelude.Maybe RdsConfigurationProperty),
                                  -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-bedrock-knowledgebase-storageconfiguration.html#cfn-bedrock-knowledgebase-storageconfiguration-type>
                                  type' :: (Value Prelude.Text)}
  deriving stock (Prelude.Eq, Prelude.Show)
mkStorageConfigurationProperty ::
  Value Prelude.Text -> StorageConfigurationProperty
mkStorageConfigurationProperty type'
  = StorageConfigurationProperty
      {haddock_workaround_ = (), type' = type',
       mongoDbAtlasConfiguration = Prelude.Nothing,
       neptuneAnalyticsConfiguration = Prelude.Nothing,
       opensearchManagedClusterConfiguration = Prelude.Nothing,
       opensearchServerlessConfiguration = Prelude.Nothing,
       pineconeConfiguration = Prelude.Nothing,
       rdsConfiguration = Prelude.Nothing}
instance ToResourceProperties StorageConfigurationProperty where
  toResourceProperties StorageConfigurationProperty {..}
    = ResourceProperties
        {awsType = "AWS::Bedrock::KnowledgeBase.StorageConfiguration",
         supportsTags = Prelude.False,
         properties = Prelude.fromList
                        ((Prelude.<>)
                           ["Type" JSON..= type']
                           (Prelude.catMaybes
                              [(JSON..=) "MongoDbAtlasConfiguration"
                                 Prelude.<$> mongoDbAtlasConfiguration,
                               (JSON..=) "NeptuneAnalyticsConfiguration"
                                 Prelude.<$> neptuneAnalyticsConfiguration,
                               (JSON..=) "OpensearchManagedClusterConfiguration"
                                 Prelude.<$> opensearchManagedClusterConfiguration,
                               (JSON..=) "OpensearchServerlessConfiguration"
                                 Prelude.<$> opensearchServerlessConfiguration,
                               (JSON..=) "PineconeConfiguration"
                                 Prelude.<$> pineconeConfiguration,
                               (JSON..=) "RdsConfiguration" Prelude.<$> rdsConfiguration]))}
instance JSON.ToJSON StorageConfigurationProperty where
  toJSON StorageConfigurationProperty {..}
    = JSON.object
        (Prelude.fromList
           ((Prelude.<>)
              ["Type" JSON..= type']
              (Prelude.catMaybes
                 [(JSON..=) "MongoDbAtlasConfiguration"
                    Prelude.<$> mongoDbAtlasConfiguration,
                  (JSON..=) "NeptuneAnalyticsConfiguration"
                    Prelude.<$> neptuneAnalyticsConfiguration,
                  (JSON..=) "OpensearchManagedClusterConfiguration"
                    Prelude.<$> opensearchManagedClusterConfiguration,
                  (JSON..=) "OpensearchServerlessConfiguration"
                    Prelude.<$> opensearchServerlessConfiguration,
                  (JSON..=) "PineconeConfiguration"
                    Prelude.<$> pineconeConfiguration,
                  (JSON..=) "RdsConfiguration" Prelude.<$> rdsConfiguration])))
instance Property "MongoDbAtlasConfiguration" StorageConfigurationProperty where
  type PropertyType "MongoDbAtlasConfiguration" StorageConfigurationProperty = MongoDbAtlasConfigurationProperty
  set newValue StorageConfigurationProperty {..}
    = StorageConfigurationProperty
        {mongoDbAtlasConfiguration = Prelude.pure newValue, ..}
instance Property "NeptuneAnalyticsConfiguration" StorageConfigurationProperty where
  type PropertyType "NeptuneAnalyticsConfiguration" StorageConfigurationProperty = NeptuneAnalyticsConfigurationProperty
  set newValue StorageConfigurationProperty {..}
    = StorageConfigurationProperty
        {neptuneAnalyticsConfiguration = Prelude.pure newValue, ..}
instance Property "OpensearchManagedClusterConfiguration" StorageConfigurationProperty where
  type PropertyType "OpensearchManagedClusterConfiguration" StorageConfigurationProperty = OpenSearchManagedClusterConfigurationProperty
  set newValue StorageConfigurationProperty {..}
    = StorageConfigurationProperty
        {opensearchManagedClusterConfiguration = Prelude.pure newValue, ..}
instance Property "OpensearchServerlessConfiguration" StorageConfigurationProperty where
  type PropertyType "OpensearchServerlessConfiguration" StorageConfigurationProperty = OpenSearchServerlessConfigurationProperty
  set newValue StorageConfigurationProperty {..}
    = StorageConfigurationProperty
        {opensearchServerlessConfiguration = Prelude.pure newValue, ..}
instance Property "PineconeConfiguration" StorageConfigurationProperty where
  type PropertyType "PineconeConfiguration" StorageConfigurationProperty = PineconeConfigurationProperty
  set newValue StorageConfigurationProperty {..}
    = StorageConfigurationProperty
        {pineconeConfiguration = Prelude.pure newValue, ..}
instance Property "RdsConfiguration" StorageConfigurationProperty where
  type PropertyType "RdsConfiguration" StorageConfigurationProperty = RdsConfigurationProperty
  set newValue StorageConfigurationProperty {..}
    = StorageConfigurationProperty
        {rdsConfiguration = Prelude.pure newValue, ..}
instance Property "Type" StorageConfigurationProperty where
  type PropertyType "Type" StorageConfigurationProperty = Value Prelude.Text
  set newValue StorageConfigurationProperty {..}
    = StorageConfigurationProperty {type' = newValue, ..}