module Stratosphere.Kendra.DataSource.CustomDocumentEnrichmentConfigurationProperty (
module Exports, CustomDocumentEnrichmentConfigurationProperty(..),
mkCustomDocumentEnrichmentConfigurationProperty
) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.Kendra.DataSource.HookConfigurationProperty as Exports
import {-# SOURCE #-} Stratosphere.Kendra.DataSource.InlineCustomDocumentEnrichmentConfigurationProperty as Exports
import Stratosphere.ResourceProperties
import Stratosphere.Value
data CustomDocumentEnrichmentConfigurationProperty
=
CustomDocumentEnrichmentConfigurationProperty {CustomDocumentEnrichmentConfigurationProperty -> ()
haddock_workaround_ :: (),
CustomDocumentEnrichmentConfigurationProperty
-> Maybe [InlineCustomDocumentEnrichmentConfigurationProperty]
inlineConfigurations :: (Prelude.Maybe [InlineCustomDocumentEnrichmentConfigurationProperty]),
:: (Prelude.Maybe HookConfigurationProperty),
:: (Prelude.Maybe HookConfigurationProperty),
CustomDocumentEnrichmentConfigurationProperty -> Maybe (Value Text)
roleArn :: (Prelude.Maybe (Value Prelude.Text))}
deriving stock (CustomDocumentEnrichmentConfigurationProperty
-> CustomDocumentEnrichmentConfigurationProperty -> Bool
(CustomDocumentEnrichmentConfigurationProperty
-> CustomDocumentEnrichmentConfigurationProperty -> Bool)
-> (CustomDocumentEnrichmentConfigurationProperty
-> CustomDocumentEnrichmentConfigurationProperty -> Bool)
-> Eq CustomDocumentEnrichmentConfigurationProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: CustomDocumentEnrichmentConfigurationProperty
-> CustomDocumentEnrichmentConfigurationProperty -> Bool
== :: CustomDocumentEnrichmentConfigurationProperty
-> CustomDocumentEnrichmentConfigurationProperty -> Bool
$c/= :: CustomDocumentEnrichmentConfigurationProperty
-> CustomDocumentEnrichmentConfigurationProperty -> Bool
/= :: CustomDocumentEnrichmentConfigurationProperty
-> CustomDocumentEnrichmentConfigurationProperty -> Bool
Prelude.Eq, Int -> CustomDocumentEnrichmentConfigurationProperty -> ShowS
[CustomDocumentEnrichmentConfigurationProperty] -> ShowS
CustomDocumentEnrichmentConfigurationProperty -> String
(Int -> CustomDocumentEnrichmentConfigurationProperty -> ShowS)
-> (CustomDocumentEnrichmentConfigurationProperty -> String)
-> ([CustomDocumentEnrichmentConfigurationProperty] -> ShowS)
-> Show CustomDocumentEnrichmentConfigurationProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> CustomDocumentEnrichmentConfigurationProperty -> ShowS
showsPrec :: Int -> CustomDocumentEnrichmentConfigurationProperty -> ShowS
$cshow :: CustomDocumentEnrichmentConfigurationProperty -> String
show :: CustomDocumentEnrichmentConfigurationProperty -> String
$cshowList :: [CustomDocumentEnrichmentConfigurationProperty] -> ShowS
showList :: [CustomDocumentEnrichmentConfigurationProperty] -> ShowS
Prelude.Show)
mkCustomDocumentEnrichmentConfigurationProperty ::
CustomDocumentEnrichmentConfigurationProperty
mkCustomDocumentEnrichmentConfigurationProperty :: CustomDocumentEnrichmentConfigurationProperty
mkCustomDocumentEnrichmentConfigurationProperty
= CustomDocumentEnrichmentConfigurationProperty
{haddock_workaround_ :: ()
haddock_workaround_ = (), inlineConfigurations :: Maybe [InlineCustomDocumentEnrichmentConfigurationProperty]
inlineConfigurations = Maybe [InlineCustomDocumentEnrichmentConfigurationProperty]
forall a. Maybe a
Prelude.Nothing,
postExtractionHookConfiguration :: Maybe HookConfigurationProperty
postExtractionHookConfiguration = Maybe HookConfigurationProperty
forall a. Maybe a
Prelude.Nothing,
preExtractionHookConfiguration :: Maybe HookConfigurationProperty
preExtractionHookConfiguration = Maybe HookConfigurationProperty
forall a. Maybe a
Prelude.Nothing,
roleArn :: Maybe (Value Text)
roleArn = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing}
instance ToResourceProperties CustomDocumentEnrichmentConfigurationProperty where
toResourceProperties :: CustomDocumentEnrichmentConfigurationProperty -> ResourceProperties
toResourceProperties
CustomDocumentEnrichmentConfigurationProperty {Maybe [InlineCustomDocumentEnrichmentConfigurationProperty]
Maybe (Value Text)
Maybe HookConfigurationProperty
()
haddock_workaround_ :: CustomDocumentEnrichmentConfigurationProperty -> ()
inlineConfigurations :: CustomDocumentEnrichmentConfigurationProperty
-> Maybe [InlineCustomDocumentEnrichmentConfigurationProperty]
postExtractionHookConfiguration :: CustomDocumentEnrichmentConfigurationProperty
-> Maybe HookConfigurationProperty
preExtractionHookConfiguration :: CustomDocumentEnrichmentConfigurationProperty
-> Maybe HookConfigurationProperty
roleArn :: CustomDocumentEnrichmentConfigurationProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
inlineConfigurations :: Maybe [InlineCustomDocumentEnrichmentConfigurationProperty]
postExtractionHookConfiguration :: Maybe HookConfigurationProperty
preExtractionHookConfiguration :: Maybe HookConfigurationProperty
roleArn :: Maybe (Value Text)
..}
= ResourceProperties
{awsType :: Text
awsType = Text
"AWS::Kendra::DataSource.CustomDocumentEnrichmentConfiguration",
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
-> [InlineCustomDocumentEnrichmentConfigurationProperty]
-> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"InlineConfigurations" ([InlineCustomDocumentEnrichmentConfigurationProperty]
-> (Key, Value))
-> Maybe [InlineCustomDocumentEnrichmentConfigurationProperty]
-> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [InlineCustomDocumentEnrichmentConfigurationProperty]
inlineConfigurations,
Key -> HookConfigurationProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"PostExtractionHookConfiguration"
(HookConfigurationProperty -> (Key, Value))
-> Maybe HookConfigurationProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe HookConfigurationProperty
postExtractionHookConfiguration,
Key -> HookConfigurationProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"PreExtractionHookConfiguration"
(HookConfigurationProperty -> (Key, Value))
-> Maybe HookConfigurationProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe HookConfigurationProperty
preExtractionHookConfiguration,
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..=) Key
"RoleArn" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
roleArn])}
instance JSON.ToJSON CustomDocumentEnrichmentConfigurationProperty where
toJSON :: CustomDocumentEnrichmentConfigurationProperty -> Value
toJSON CustomDocumentEnrichmentConfigurationProperty {Maybe [InlineCustomDocumentEnrichmentConfigurationProperty]
Maybe (Value Text)
Maybe HookConfigurationProperty
()
haddock_workaround_ :: CustomDocumentEnrichmentConfigurationProperty -> ()
inlineConfigurations :: CustomDocumentEnrichmentConfigurationProperty
-> Maybe [InlineCustomDocumentEnrichmentConfigurationProperty]
postExtractionHookConfiguration :: CustomDocumentEnrichmentConfigurationProperty
-> Maybe HookConfigurationProperty
preExtractionHookConfiguration :: CustomDocumentEnrichmentConfigurationProperty
-> Maybe HookConfigurationProperty
roleArn :: CustomDocumentEnrichmentConfigurationProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
inlineConfigurations :: Maybe [InlineCustomDocumentEnrichmentConfigurationProperty]
postExtractionHookConfiguration :: Maybe HookConfigurationProperty
preExtractionHookConfiguration :: Maybe HookConfigurationProperty
roleArn :: Maybe (Value Text)
..}
= [(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
-> [InlineCustomDocumentEnrichmentConfigurationProperty]
-> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"InlineConfigurations" ([InlineCustomDocumentEnrichmentConfigurationProperty]
-> (Key, Value))
-> Maybe [InlineCustomDocumentEnrichmentConfigurationProperty]
-> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [InlineCustomDocumentEnrichmentConfigurationProperty]
inlineConfigurations,
Key -> HookConfigurationProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"PostExtractionHookConfiguration"
(HookConfigurationProperty -> (Key, Value))
-> Maybe HookConfigurationProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe HookConfigurationProperty
postExtractionHookConfiguration,
Key -> HookConfigurationProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"PreExtractionHookConfiguration"
(HookConfigurationProperty -> (Key, Value))
-> Maybe HookConfigurationProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe HookConfigurationProperty
preExtractionHookConfiguration,
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..=) Key
"RoleArn" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
roleArn]))
instance Property "InlineConfigurations" CustomDocumentEnrichmentConfigurationProperty where
type PropertyType "InlineConfigurations" CustomDocumentEnrichmentConfigurationProperty = [InlineCustomDocumentEnrichmentConfigurationProperty]
set :: PropertyType
"InlineConfigurations"
CustomDocumentEnrichmentConfigurationProperty
-> CustomDocumentEnrichmentConfigurationProperty
-> CustomDocumentEnrichmentConfigurationProperty
set PropertyType
"InlineConfigurations"
CustomDocumentEnrichmentConfigurationProperty
newValue CustomDocumentEnrichmentConfigurationProperty {Maybe [InlineCustomDocumentEnrichmentConfigurationProperty]
Maybe (Value Text)
Maybe HookConfigurationProperty
()
haddock_workaround_ :: CustomDocumentEnrichmentConfigurationProperty -> ()
inlineConfigurations :: CustomDocumentEnrichmentConfigurationProperty
-> Maybe [InlineCustomDocumentEnrichmentConfigurationProperty]
postExtractionHookConfiguration :: CustomDocumentEnrichmentConfigurationProperty
-> Maybe HookConfigurationProperty
preExtractionHookConfiguration :: CustomDocumentEnrichmentConfigurationProperty
-> Maybe HookConfigurationProperty
roleArn :: CustomDocumentEnrichmentConfigurationProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
inlineConfigurations :: Maybe [InlineCustomDocumentEnrichmentConfigurationProperty]
postExtractionHookConfiguration :: Maybe HookConfigurationProperty
preExtractionHookConfiguration :: Maybe HookConfigurationProperty
roleArn :: Maybe (Value Text)
..}
= CustomDocumentEnrichmentConfigurationProperty
{inlineConfigurations :: Maybe [InlineCustomDocumentEnrichmentConfigurationProperty]
inlineConfigurations = [InlineCustomDocumentEnrichmentConfigurationProperty]
-> Maybe [InlineCustomDocumentEnrichmentConfigurationProperty]
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure [InlineCustomDocumentEnrichmentConfigurationProperty]
PropertyType
"InlineConfigurations"
CustomDocumentEnrichmentConfigurationProperty
newValue, Maybe (Value Text)
Maybe HookConfigurationProperty
()
haddock_workaround_ :: ()
postExtractionHookConfiguration :: Maybe HookConfigurationProperty
preExtractionHookConfiguration :: Maybe HookConfigurationProperty
roleArn :: Maybe (Value Text)
haddock_workaround_ :: ()
postExtractionHookConfiguration :: Maybe HookConfigurationProperty
preExtractionHookConfiguration :: Maybe HookConfigurationProperty
roleArn :: Maybe (Value Text)
..}
instance Property "PostExtractionHookConfiguration" CustomDocumentEnrichmentConfigurationProperty where
type PropertyType "PostExtractionHookConfiguration" CustomDocumentEnrichmentConfigurationProperty = HookConfigurationProperty
set :: PropertyType
"PostExtractionHookConfiguration"
CustomDocumentEnrichmentConfigurationProperty
-> CustomDocumentEnrichmentConfigurationProperty
-> CustomDocumentEnrichmentConfigurationProperty
set PropertyType
"PostExtractionHookConfiguration"
CustomDocumentEnrichmentConfigurationProperty
newValue CustomDocumentEnrichmentConfigurationProperty {Maybe [InlineCustomDocumentEnrichmentConfigurationProperty]
Maybe (Value Text)
Maybe HookConfigurationProperty
()
haddock_workaround_ :: CustomDocumentEnrichmentConfigurationProperty -> ()
inlineConfigurations :: CustomDocumentEnrichmentConfigurationProperty
-> Maybe [InlineCustomDocumentEnrichmentConfigurationProperty]
postExtractionHookConfiguration :: CustomDocumentEnrichmentConfigurationProperty
-> Maybe HookConfigurationProperty
preExtractionHookConfiguration :: CustomDocumentEnrichmentConfigurationProperty
-> Maybe HookConfigurationProperty
roleArn :: CustomDocumentEnrichmentConfigurationProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
inlineConfigurations :: Maybe [InlineCustomDocumentEnrichmentConfigurationProperty]
postExtractionHookConfiguration :: Maybe HookConfigurationProperty
preExtractionHookConfiguration :: Maybe HookConfigurationProperty
roleArn :: Maybe (Value Text)
..}
= CustomDocumentEnrichmentConfigurationProperty
{postExtractionHookConfiguration :: Maybe HookConfigurationProperty
postExtractionHookConfiguration = HookConfigurationProperty -> Maybe HookConfigurationProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType
"PostExtractionHookConfiguration"
CustomDocumentEnrichmentConfigurationProperty
HookConfigurationProperty
newValue, Maybe [InlineCustomDocumentEnrichmentConfigurationProperty]
Maybe (Value Text)
Maybe HookConfigurationProperty
()
haddock_workaround_ :: ()
inlineConfigurations :: Maybe [InlineCustomDocumentEnrichmentConfigurationProperty]
preExtractionHookConfiguration :: Maybe HookConfigurationProperty
roleArn :: Maybe (Value Text)
haddock_workaround_ :: ()
inlineConfigurations :: Maybe [InlineCustomDocumentEnrichmentConfigurationProperty]
preExtractionHookConfiguration :: Maybe HookConfigurationProperty
roleArn :: Maybe (Value Text)
..}
instance Property "PreExtractionHookConfiguration" CustomDocumentEnrichmentConfigurationProperty where
type PropertyType "PreExtractionHookConfiguration" CustomDocumentEnrichmentConfigurationProperty = HookConfigurationProperty
set :: PropertyType
"PreExtractionHookConfiguration"
CustomDocumentEnrichmentConfigurationProperty
-> CustomDocumentEnrichmentConfigurationProperty
-> CustomDocumentEnrichmentConfigurationProperty
set PropertyType
"PreExtractionHookConfiguration"
CustomDocumentEnrichmentConfigurationProperty
newValue CustomDocumentEnrichmentConfigurationProperty {Maybe [InlineCustomDocumentEnrichmentConfigurationProperty]
Maybe (Value Text)
Maybe HookConfigurationProperty
()
haddock_workaround_ :: CustomDocumentEnrichmentConfigurationProperty -> ()
inlineConfigurations :: CustomDocumentEnrichmentConfigurationProperty
-> Maybe [InlineCustomDocumentEnrichmentConfigurationProperty]
postExtractionHookConfiguration :: CustomDocumentEnrichmentConfigurationProperty
-> Maybe HookConfigurationProperty
preExtractionHookConfiguration :: CustomDocumentEnrichmentConfigurationProperty
-> Maybe HookConfigurationProperty
roleArn :: CustomDocumentEnrichmentConfigurationProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
inlineConfigurations :: Maybe [InlineCustomDocumentEnrichmentConfigurationProperty]
postExtractionHookConfiguration :: Maybe HookConfigurationProperty
preExtractionHookConfiguration :: Maybe HookConfigurationProperty
roleArn :: Maybe (Value Text)
..}
= CustomDocumentEnrichmentConfigurationProperty
{preExtractionHookConfiguration :: Maybe HookConfigurationProperty
preExtractionHookConfiguration = HookConfigurationProperty -> Maybe HookConfigurationProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType
"PreExtractionHookConfiguration"
CustomDocumentEnrichmentConfigurationProperty
HookConfigurationProperty
newValue, Maybe [InlineCustomDocumentEnrichmentConfigurationProperty]
Maybe (Value Text)
Maybe HookConfigurationProperty
()
haddock_workaround_ :: ()
inlineConfigurations :: Maybe [InlineCustomDocumentEnrichmentConfigurationProperty]
postExtractionHookConfiguration :: Maybe HookConfigurationProperty
roleArn :: Maybe (Value Text)
haddock_workaround_ :: ()
inlineConfigurations :: Maybe [InlineCustomDocumentEnrichmentConfigurationProperty]
postExtractionHookConfiguration :: Maybe HookConfigurationProperty
roleArn :: Maybe (Value Text)
..}
instance Property "RoleArn" CustomDocumentEnrichmentConfigurationProperty where
type PropertyType "RoleArn" CustomDocumentEnrichmentConfigurationProperty = Value Prelude.Text
set :: PropertyType
"RoleArn" CustomDocumentEnrichmentConfigurationProperty
-> CustomDocumentEnrichmentConfigurationProperty
-> CustomDocumentEnrichmentConfigurationProperty
set PropertyType
"RoleArn" CustomDocumentEnrichmentConfigurationProperty
newValue CustomDocumentEnrichmentConfigurationProperty {Maybe [InlineCustomDocumentEnrichmentConfigurationProperty]
Maybe (Value Text)
Maybe HookConfigurationProperty
()
haddock_workaround_ :: CustomDocumentEnrichmentConfigurationProperty -> ()
inlineConfigurations :: CustomDocumentEnrichmentConfigurationProperty
-> Maybe [InlineCustomDocumentEnrichmentConfigurationProperty]
postExtractionHookConfiguration :: CustomDocumentEnrichmentConfigurationProperty
-> Maybe HookConfigurationProperty
preExtractionHookConfiguration :: CustomDocumentEnrichmentConfigurationProperty
-> Maybe HookConfigurationProperty
roleArn :: CustomDocumentEnrichmentConfigurationProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
inlineConfigurations :: Maybe [InlineCustomDocumentEnrichmentConfigurationProperty]
postExtractionHookConfiguration :: Maybe HookConfigurationProperty
preExtractionHookConfiguration :: Maybe HookConfigurationProperty
roleArn :: Maybe (Value Text)
..}
= CustomDocumentEnrichmentConfigurationProperty
{roleArn :: Maybe (Value Text)
roleArn = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType
"RoleArn" CustomDocumentEnrichmentConfigurationProperty
Value Text
newValue, Maybe [InlineCustomDocumentEnrichmentConfigurationProperty]
Maybe HookConfigurationProperty
()
haddock_workaround_ :: ()
inlineConfigurations :: Maybe [InlineCustomDocumentEnrichmentConfigurationProperty]
postExtractionHookConfiguration :: Maybe HookConfigurationProperty
preExtractionHookConfiguration :: Maybe HookConfigurationProperty
haddock_workaround_ :: ()
inlineConfigurations :: Maybe [InlineCustomDocumentEnrichmentConfigurationProperty]
postExtractionHookConfiguration :: Maybe HookConfigurationProperty
preExtractionHookConfiguration :: Maybe HookConfigurationProperty
..}