{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE DuplicateRecordFields #-}
{-# LANGUAGE NamedFieldPuns #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE RecordWildCards #-}
{-# LANGUAGE StrictData #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
{-# OPTIONS_GHC -fno-warn-unused-matches #-}
module Amazonka.DMS.Types.RedshiftSettings where
import qualified Amazonka.Core as Core
import qualified Amazonka.Core.Lens.Internal as Lens
import Amazonka.DMS.Types.EncryptionModeValue
import qualified Amazonka.Data as Data
import qualified Amazonka.Prelude as Prelude
data RedshiftSettings = RedshiftSettings'
{
RedshiftSettings -> Maybe Bool
acceptAnyDate :: Prelude.Maybe Prelude.Bool,
RedshiftSettings -> Maybe Text
afterConnectScript :: Prelude.Maybe Prelude.Text,
RedshiftSettings -> Maybe Text
bucketFolder :: Prelude.Maybe Prelude.Text,
RedshiftSettings -> Maybe Text
bucketName :: Prelude.Maybe Prelude.Text,
RedshiftSettings -> Maybe Bool
caseSensitiveNames :: Prelude.Maybe Prelude.Bool,
RedshiftSettings -> Maybe Bool
compUpdate :: Prelude.Maybe Prelude.Bool,
RedshiftSettings -> Maybe Int
connectionTimeout :: Prelude.Maybe Prelude.Int,
RedshiftSettings -> Maybe Text
databaseName :: Prelude.Maybe Prelude.Text,
RedshiftSettings -> Maybe Text
dateFormat :: Prelude.Maybe Prelude.Text,
RedshiftSettings -> Maybe Bool
emptyAsNull :: Prelude.Maybe Prelude.Bool,
RedshiftSettings -> Maybe EncryptionModeValue
encryptionMode :: Prelude.Maybe EncryptionModeValue,
RedshiftSettings -> Maybe Bool
explicitIds :: Prelude.Maybe Prelude.Bool,
RedshiftSettings -> Maybe Int
fileTransferUploadStreams :: Prelude.Maybe Prelude.Int,
RedshiftSettings -> Maybe Int
loadTimeout :: Prelude.Maybe Prelude.Int,
RedshiftSettings -> Maybe Int
maxFileSize :: Prelude.Maybe Prelude.Int,
RedshiftSettings -> Maybe (Sensitive Text)
password :: Prelude.Maybe (Data.Sensitive Prelude.Text),
RedshiftSettings -> Maybe Int
port :: Prelude.Maybe Prelude.Int,
RedshiftSettings -> Maybe Bool
removeQuotes :: Prelude.Maybe Prelude.Bool,
RedshiftSettings -> Maybe Text
replaceChars :: Prelude.Maybe Prelude.Text,
RedshiftSettings -> Maybe Text
replaceInvalidChars :: Prelude.Maybe Prelude.Text,
RedshiftSettings -> Maybe Text
secretsManagerAccessRoleArn :: Prelude.Maybe Prelude.Text,
RedshiftSettings -> Maybe Text
secretsManagerSecretId :: Prelude.Maybe Prelude.Text,
RedshiftSettings -> Maybe Text
serverName :: Prelude.Maybe Prelude.Text,
RedshiftSettings -> Maybe Text
serverSideEncryptionKmsKeyId :: Prelude.Maybe Prelude.Text,
RedshiftSettings -> Maybe Text
serviceAccessRoleArn :: Prelude.Maybe Prelude.Text,
RedshiftSettings -> Maybe Text
timeFormat :: Prelude.Maybe Prelude.Text,
RedshiftSettings -> Maybe Bool
trimBlanks :: Prelude.Maybe Prelude.Bool,
RedshiftSettings -> Maybe Bool
truncateColumns :: Prelude.Maybe Prelude.Bool,
RedshiftSettings -> Maybe Text
username :: Prelude.Maybe Prelude.Text,
RedshiftSettings -> Maybe Int
writeBufferSize :: Prelude.Maybe Prelude.Int
}
deriving (RedshiftSettings -> RedshiftSettings -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: RedshiftSettings -> RedshiftSettings -> Bool
$c/= :: RedshiftSettings -> RedshiftSettings -> Bool
== :: RedshiftSettings -> RedshiftSettings -> Bool
$c== :: RedshiftSettings -> RedshiftSettings -> Bool
Prelude.Eq, Int -> RedshiftSettings -> ShowS
[RedshiftSettings] -> ShowS
RedshiftSettings -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [RedshiftSettings] -> ShowS
$cshowList :: [RedshiftSettings] -> ShowS
show :: RedshiftSettings -> String
$cshow :: RedshiftSettings -> String
showsPrec :: Int -> RedshiftSettings -> ShowS
$cshowsPrec :: Int -> RedshiftSettings -> ShowS
Prelude.Show, forall x. Rep RedshiftSettings x -> RedshiftSettings
forall x. RedshiftSettings -> Rep RedshiftSettings x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep RedshiftSettings x -> RedshiftSettings
$cfrom :: forall x. RedshiftSettings -> Rep RedshiftSettings x
Prelude.Generic)
newRedshiftSettings ::
RedshiftSettings
newRedshiftSettings :: RedshiftSettings
newRedshiftSettings =
RedshiftSettings'
{ $sel:acceptAnyDate:RedshiftSettings' :: Maybe Bool
acceptAnyDate = forall a. Maybe a
Prelude.Nothing,
$sel:afterConnectScript:RedshiftSettings' :: Maybe Text
afterConnectScript = forall a. Maybe a
Prelude.Nothing,
$sel:bucketFolder:RedshiftSettings' :: Maybe Text
bucketFolder = forall a. Maybe a
Prelude.Nothing,
$sel:bucketName:RedshiftSettings' :: Maybe Text
bucketName = forall a. Maybe a
Prelude.Nothing,
$sel:caseSensitiveNames:RedshiftSettings' :: Maybe Bool
caseSensitiveNames = forall a. Maybe a
Prelude.Nothing,
$sel:compUpdate:RedshiftSettings' :: Maybe Bool
compUpdate = forall a. Maybe a
Prelude.Nothing,
$sel:connectionTimeout:RedshiftSettings' :: Maybe Int
connectionTimeout = forall a. Maybe a
Prelude.Nothing,
$sel:databaseName:RedshiftSettings' :: Maybe Text
databaseName = forall a. Maybe a
Prelude.Nothing,
$sel:dateFormat:RedshiftSettings' :: Maybe Text
dateFormat = forall a. Maybe a
Prelude.Nothing,
$sel:emptyAsNull:RedshiftSettings' :: Maybe Bool
emptyAsNull = forall a. Maybe a
Prelude.Nothing,
$sel:encryptionMode:RedshiftSettings' :: Maybe EncryptionModeValue
encryptionMode = forall a. Maybe a
Prelude.Nothing,
$sel:explicitIds:RedshiftSettings' :: Maybe Bool
explicitIds = forall a. Maybe a
Prelude.Nothing,
$sel:fileTransferUploadStreams:RedshiftSettings' :: Maybe Int
fileTransferUploadStreams = forall a. Maybe a
Prelude.Nothing,
$sel:loadTimeout:RedshiftSettings' :: Maybe Int
loadTimeout = forall a. Maybe a
Prelude.Nothing,
$sel:maxFileSize:RedshiftSettings' :: Maybe Int
maxFileSize = forall a. Maybe a
Prelude.Nothing,
$sel:password:RedshiftSettings' :: Maybe (Sensitive Text)
password = forall a. Maybe a
Prelude.Nothing,
$sel:port:RedshiftSettings' :: Maybe Int
port = forall a. Maybe a
Prelude.Nothing,
$sel:removeQuotes:RedshiftSettings' :: Maybe Bool
removeQuotes = forall a. Maybe a
Prelude.Nothing,
$sel:replaceChars:RedshiftSettings' :: Maybe Text
replaceChars = forall a. Maybe a
Prelude.Nothing,
$sel:replaceInvalidChars:RedshiftSettings' :: Maybe Text
replaceInvalidChars = forall a. Maybe a
Prelude.Nothing,
$sel:secretsManagerAccessRoleArn:RedshiftSettings' :: Maybe Text
secretsManagerAccessRoleArn = forall a. Maybe a
Prelude.Nothing,
$sel:secretsManagerSecretId:RedshiftSettings' :: Maybe Text
secretsManagerSecretId = forall a. Maybe a
Prelude.Nothing,
$sel:serverName:RedshiftSettings' :: Maybe Text
serverName = forall a. Maybe a
Prelude.Nothing,
$sel:serverSideEncryptionKmsKeyId:RedshiftSettings' :: Maybe Text
serverSideEncryptionKmsKeyId = forall a. Maybe a
Prelude.Nothing,
$sel:serviceAccessRoleArn:RedshiftSettings' :: Maybe Text
serviceAccessRoleArn = forall a. Maybe a
Prelude.Nothing,
$sel:timeFormat:RedshiftSettings' :: Maybe Text
timeFormat = forall a. Maybe a
Prelude.Nothing,
$sel:trimBlanks:RedshiftSettings' :: Maybe Bool
trimBlanks = forall a. Maybe a
Prelude.Nothing,
$sel:truncateColumns:RedshiftSettings' :: Maybe Bool
truncateColumns = forall a. Maybe a
Prelude.Nothing,
$sel:username:RedshiftSettings' :: Maybe Text
username = forall a. Maybe a
Prelude.Nothing,
$sel:writeBufferSize:RedshiftSettings' :: Maybe Int
writeBufferSize = forall a. Maybe a
Prelude.Nothing
}
redshiftSettings_acceptAnyDate :: Lens.Lens' RedshiftSettings (Prelude.Maybe Prelude.Bool)
redshiftSettings_acceptAnyDate :: Lens' RedshiftSettings (Maybe Bool)
redshiftSettings_acceptAnyDate = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RedshiftSettings' {Maybe Bool
acceptAnyDate :: Maybe Bool
$sel:acceptAnyDate:RedshiftSettings' :: RedshiftSettings -> Maybe Bool
acceptAnyDate} -> Maybe Bool
acceptAnyDate) (\s :: RedshiftSettings
s@RedshiftSettings' {} Maybe Bool
a -> RedshiftSettings
s {$sel:acceptAnyDate:RedshiftSettings' :: Maybe Bool
acceptAnyDate = Maybe Bool
a} :: RedshiftSettings)
redshiftSettings_afterConnectScript :: Lens.Lens' RedshiftSettings (Prelude.Maybe Prelude.Text)
redshiftSettings_afterConnectScript :: Lens' RedshiftSettings (Maybe Text)
redshiftSettings_afterConnectScript = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RedshiftSettings' {Maybe Text
afterConnectScript :: Maybe Text
$sel:afterConnectScript:RedshiftSettings' :: RedshiftSettings -> Maybe Text
afterConnectScript} -> Maybe Text
afterConnectScript) (\s :: RedshiftSettings
s@RedshiftSettings' {} Maybe Text
a -> RedshiftSettings
s {$sel:afterConnectScript:RedshiftSettings' :: Maybe Text
afterConnectScript = Maybe Text
a} :: RedshiftSettings)
redshiftSettings_bucketFolder :: Lens.Lens' RedshiftSettings (Prelude.Maybe Prelude.Text)
redshiftSettings_bucketFolder :: Lens' RedshiftSettings (Maybe Text)
redshiftSettings_bucketFolder = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RedshiftSettings' {Maybe Text
bucketFolder :: Maybe Text
$sel:bucketFolder:RedshiftSettings' :: RedshiftSettings -> Maybe Text
bucketFolder} -> Maybe Text
bucketFolder) (\s :: RedshiftSettings
s@RedshiftSettings' {} Maybe Text
a -> RedshiftSettings
s {$sel:bucketFolder:RedshiftSettings' :: Maybe Text
bucketFolder = Maybe Text
a} :: RedshiftSettings)
redshiftSettings_bucketName :: Lens.Lens' RedshiftSettings (Prelude.Maybe Prelude.Text)
redshiftSettings_bucketName :: Lens' RedshiftSettings (Maybe Text)
redshiftSettings_bucketName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RedshiftSettings' {Maybe Text
bucketName :: Maybe Text
$sel:bucketName:RedshiftSettings' :: RedshiftSettings -> Maybe Text
bucketName} -> Maybe Text
bucketName) (\s :: RedshiftSettings
s@RedshiftSettings' {} Maybe Text
a -> RedshiftSettings
s {$sel:bucketName:RedshiftSettings' :: Maybe Text
bucketName = Maybe Text
a} :: RedshiftSettings)
redshiftSettings_caseSensitiveNames :: Lens.Lens' RedshiftSettings (Prelude.Maybe Prelude.Bool)
redshiftSettings_caseSensitiveNames :: Lens' RedshiftSettings (Maybe Bool)
redshiftSettings_caseSensitiveNames = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RedshiftSettings' {Maybe Bool
caseSensitiveNames :: Maybe Bool
$sel:caseSensitiveNames:RedshiftSettings' :: RedshiftSettings -> Maybe Bool
caseSensitiveNames} -> Maybe Bool
caseSensitiveNames) (\s :: RedshiftSettings
s@RedshiftSettings' {} Maybe Bool
a -> RedshiftSettings
s {$sel:caseSensitiveNames:RedshiftSettings' :: Maybe Bool
caseSensitiveNames = Maybe Bool
a} :: RedshiftSettings)
redshiftSettings_compUpdate :: Lens.Lens' RedshiftSettings (Prelude.Maybe Prelude.Bool)
redshiftSettings_compUpdate :: Lens' RedshiftSettings (Maybe Bool)
redshiftSettings_compUpdate = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RedshiftSettings' {Maybe Bool
compUpdate :: Maybe Bool
$sel:compUpdate:RedshiftSettings' :: RedshiftSettings -> Maybe Bool
compUpdate} -> Maybe Bool
compUpdate) (\s :: RedshiftSettings
s@RedshiftSettings' {} Maybe Bool
a -> RedshiftSettings
s {$sel:compUpdate:RedshiftSettings' :: Maybe Bool
compUpdate = Maybe Bool
a} :: RedshiftSettings)
redshiftSettings_connectionTimeout :: Lens.Lens' RedshiftSettings (Prelude.Maybe Prelude.Int)
redshiftSettings_connectionTimeout :: Lens' RedshiftSettings (Maybe Int)
redshiftSettings_connectionTimeout = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RedshiftSettings' {Maybe Int
connectionTimeout :: Maybe Int
$sel:connectionTimeout:RedshiftSettings' :: RedshiftSettings -> Maybe Int
connectionTimeout} -> Maybe Int
connectionTimeout) (\s :: RedshiftSettings
s@RedshiftSettings' {} Maybe Int
a -> RedshiftSettings
s {$sel:connectionTimeout:RedshiftSettings' :: Maybe Int
connectionTimeout = Maybe Int
a} :: RedshiftSettings)
redshiftSettings_databaseName :: Lens.Lens' RedshiftSettings (Prelude.Maybe Prelude.Text)
redshiftSettings_databaseName :: Lens' RedshiftSettings (Maybe Text)
redshiftSettings_databaseName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RedshiftSettings' {Maybe Text
databaseName :: Maybe Text
$sel:databaseName:RedshiftSettings' :: RedshiftSettings -> Maybe Text
databaseName} -> Maybe Text
databaseName) (\s :: RedshiftSettings
s@RedshiftSettings' {} Maybe Text
a -> RedshiftSettings
s {$sel:databaseName:RedshiftSettings' :: Maybe Text
databaseName = Maybe Text
a} :: RedshiftSettings)
redshiftSettings_dateFormat :: Lens.Lens' RedshiftSettings (Prelude.Maybe Prelude.Text)
redshiftSettings_dateFormat :: Lens' RedshiftSettings (Maybe Text)
redshiftSettings_dateFormat = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RedshiftSettings' {Maybe Text
dateFormat :: Maybe Text
$sel:dateFormat:RedshiftSettings' :: RedshiftSettings -> Maybe Text
dateFormat} -> Maybe Text
dateFormat) (\s :: RedshiftSettings
s@RedshiftSettings' {} Maybe Text
a -> RedshiftSettings
s {$sel:dateFormat:RedshiftSettings' :: Maybe Text
dateFormat = Maybe Text
a} :: RedshiftSettings)
redshiftSettings_emptyAsNull :: Lens.Lens' RedshiftSettings (Prelude.Maybe Prelude.Bool)
redshiftSettings_emptyAsNull :: Lens' RedshiftSettings (Maybe Bool)
redshiftSettings_emptyAsNull = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RedshiftSettings' {Maybe Bool
emptyAsNull :: Maybe Bool
$sel:emptyAsNull:RedshiftSettings' :: RedshiftSettings -> Maybe Bool
emptyAsNull} -> Maybe Bool
emptyAsNull) (\s :: RedshiftSettings
s@RedshiftSettings' {} Maybe Bool
a -> RedshiftSettings
s {$sel:emptyAsNull:RedshiftSettings' :: Maybe Bool
emptyAsNull = Maybe Bool
a} :: RedshiftSettings)
redshiftSettings_encryptionMode :: Lens.Lens' RedshiftSettings (Prelude.Maybe EncryptionModeValue)
redshiftSettings_encryptionMode :: Lens' RedshiftSettings (Maybe EncryptionModeValue)
redshiftSettings_encryptionMode = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RedshiftSettings' {Maybe EncryptionModeValue
encryptionMode :: Maybe EncryptionModeValue
$sel:encryptionMode:RedshiftSettings' :: RedshiftSettings -> Maybe EncryptionModeValue
encryptionMode} -> Maybe EncryptionModeValue
encryptionMode) (\s :: RedshiftSettings
s@RedshiftSettings' {} Maybe EncryptionModeValue
a -> RedshiftSettings
s {$sel:encryptionMode:RedshiftSettings' :: Maybe EncryptionModeValue
encryptionMode = Maybe EncryptionModeValue
a} :: RedshiftSettings)
redshiftSettings_explicitIds :: Lens.Lens' RedshiftSettings (Prelude.Maybe Prelude.Bool)
redshiftSettings_explicitIds :: Lens' RedshiftSettings (Maybe Bool)
redshiftSettings_explicitIds = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RedshiftSettings' {Maybe Bool
explicitIds :: Maybe Bool
$sel:explicitIds:RedshiftSettings' :: RedshiftSettings -> Maybe Bool
explicitIds} -> Maybe Bool
explicitIds) (\s :: RedshiftSettings
s@RedshiftSettings' {} Maybe Bool
a -> RedshiftSettings
s {$sel:explicitIds:RedshiftSettings' :: Maybe Bool
explicitIds = Maybe Bool
a} :: RedshiftSettings)
redshiftSettings_fileTransferUploadStreams :: Lens.Lens' RedshiftSettings (Prelude.Maybe Prelude.Int)
redshiftSettings_fileTransferUploadStreams :: Lens' RedshiftSettings (Maybe Int)
redshiftSettings_fileTransferUploadStreams = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RedshiftSettings' {Maybe Int
fileTransferUploadStreams :: Maybe Int
$sel:fileTransferUploadStreams:RedshiftSettings' :: RedshiftSettings -> Maybe Int
fileTransferUploadStreams} -> Maybe Int
fileTransferUploadStreams) (\s :: RedshiftSettings
s@RedshiftSettings' {} Maybe Int
a -> RedshiftSettings
s {$sel:fileTransferUploadStreams:RedshiftSettings' :: Maybe Int
fileTransferUploadStreams = Maybe Int
a} :: RedshiftSettings)
redshiftSettings_loadTimeout :: Lens.Lens' RedshiftSettings (Prelude.Maybe Prelude.Int)
redshiftSettings_loadTimeout :: Lens' RedshiftSettings (Maybe Int)
redshiftSettings_loadTimeout = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RedshiftSettings' {Maybe Int
loadTimeout :: Maybe Int
$sel:loadTimeout:RedshiftSettings' :: RedshiftSettings -> Maybe Int
loadTimeout} -> Maybe Int
loadTimeout) (\s :: RedshiftSettings
s@RedshiftSettings' {} Maybe Int
a -> RedshiftSettings
s {$sel:loadTimeout:RedshiftSettings' :: Maybe Int
loadTimeout = Maybe Int
a} :: RedshiftSettings)
redshiftSettings_maxFileSize :: Lens.Lens' RedshiftSettings (Prelude.Maybe Prelude.Int)
redshiftSettings_maxFileSize :: Lens' RedshiftSettings (Maybe Int)
redshiftSettings_maxFileSize = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RedshiftSettings' {Maybe Int
maxFileSize :: Maybe Int
$sel:maxFileSize:RedshiftSettings' :: RedshiftSettings -> Maybe Int
maxFileSize} -> Maybe Int
maxFileSize) (\s :: RedshiftSettings
s@RedshiftSettings' {} Maybe Int
a -> RedshiftSettings
s {$sel:maxFileSize:RedshiftSettings' :: Maybe Int
maxFileSize = Maybe Int
a} :: RedshiftSettings)
redshiftSettings_password :: Lens.Lens' RedshiftSettings (Prelude.Maybe Prelude.Text)
redshiftSettings_password :: Lens' RedshiftSettings (Maybe Text)
redshiftSettings_password = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RedshiftSettings' {Maybe (Sensitive Text)
password :: Maybe (Sensitive Text)
$sel:password:RedshiftSettings' :: RedshiftSettings -> Maybe (Sensitive Text)
password} -> Maybe (Sensitive Text)
password) (\s :: RedshiftSettings
s@RedshiftSettings' {} Maybe (Sensitive Text)
a -> RedshiftSettings
s {$sel:password:RedshiftSettings' :: Maybe (Sensitive Text)
password = Maybe (Sensitive Text)
a} :: RedshiftSettings) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (g :: * -> *) s t a b.
(Functor f, Functor g) =>
AnIso s t a b -> Iso (f s) (g t) (f a) (g b)
Lens.mapping forall a. Iso' (Sensitive a) a
Data._Sensitive
redshiftSettings_port :: Lens.Lens' RedshiftSettings (Prelude.Maybe Prelude.Int)
redshiftSettings_port :: Lens' RedshiftSettings (Maybe Int)
redshiftSettings_port = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RedshiftSettings' {Maybe Int
port :: Maybe Int
$sel:port:RedshiftSettings' :: RedshiftSettings -> Maybe Int
port} -> Maybe Int
port) (\s :: RedshiftSettings
s@RedshiftSettings' {} Maybe Int
a -> RedshiftSettings
s {$sel:port:RedshiftSettings' :: Maybe Int
port = Maybe Int
a} :: RedshiftSettings)
redshiftSettings_removeQuotes :: Lens.Lens' RedshiftSettings (Prelude.Maybe Prelude.Bool)
redshiftSettings_removeQuotes :: Lens' RedshiftSettings (Maybe Bool)
redshiftSettings_removeQuotes = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RedshiftSettings' {Maybe Bool
removeQuotes :: Maybe Bool
$sel:removeQuotes:RedshiftSettings' :: RedshiftSettings -> Maybe Bool
removeQuotes} -> Maybe Bool
removeQuotes) (\s :: RedshiftSettings
s@RedshiftSettings' {} Maybe Bool
a -> RedshiftSettings
s {$sel:removeQuotes:RedshiftSettings' :: Maybe Bool
removeQuotes = Maybe Bool
a} :: RedshiftSettings)
redshiftSettings_replaceChars :: Lens.Lens' RedshiftSettings (Prelude.Maybe Prelude.Text)
redshiftSettings_replaceChars :: Lens' RedshiftSettings (Maybe Text)
redshiftSettings_replaceChars = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RedshiftSettings' {Maybe Text
replaceChars :: Maybe Text
$sel:replaceChars:RedshiftSettings' :: RedshiftSettings -> Maybe Text
replaceChars} -> Maybe Text
replaceChars) (\s :: RedshiftSettings
s@RedshiftSettings' {} Maybe Text
a -> RedshiftSettings
s {$sel:replaceChars:RedshiftSettings' :: Maybe Text
replaceChars = Maybe Text
a} :: RedshiftSettings)
redshiftSettings_replaceInvalidChars :: Lens.Lens' RedshiftSettings (Prelude.Maybe Prelude.Text)
redshiftSettings_replaceInvalidChars :: Lens' RedshiftSettings (Maybe Text)
redshiftSettings_replaceInvalidChars = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RedshiftSettings' {Maybe Text
replaceInvalidChars :: Maybe Text
$sel:replaceInvalidChars:RedshiftSettings' :: RedshiftSettings -> Maybe Text
replaceInvalidChars} -> Maybe Text
replaceInvalidChars) (\s :: RedshiftSettings
s@RedshiftSettings' {} Maybe Text
a -> RedshiftSettings
s {$sel:replaceInvalidChars:RedshiftSettings' :: Maybe Text
replaceInvalidChars = Maybe Text
a} :: RedshiftSettings)
redshiftSettings_secretsManagerAccessRoleArn :: Lens.Lens' RedshiftSettings (Prelude.Maybe Prelude.Text)
redshiftSettings_secretsManagerAccessRoleArn :: Lens' RedshiftSettings (Maybe Text)
redshiftSettings_secretsManagerAccessRoleArn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RedshiftSettings' {Maybe Text
secretsManagerAccessRoleArn :: Maybe Text
$sel:secretsManagerAccessRoleArn:RedshiftSettings' :: RedshiftSettings -> Maybe Text
secretsManagerAccessRoleArn} -> Maybe Text
secretsManagerAccessRoleArn) (\s :: RedshiftSettings
s@RedshiftSettings' {} Maybe Text
a -> RedshiftSettings
s {$sel:secretsManagerAccessRoleArn:RedshiftSettings' :: Maybe Text
secretsManagerAccessRoleArn = Maybe Text
a} :: RedshiftSettings)
redshiftSettings_secretsManagerSecretId :: Lens.Lens' RedshiftSettings (Prelude.Maybe Prelude.Text)
redshiftSettings_secretsManagerSecretId :: Lens' RedshiftSettings (Maybe Text)
redshiftSettings_secretsManagerSecretId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RedshiftSettings' {Maybe Text
secretsManagerSecretId :: Maybe Text
$sel:secretsManagerSecretId:RedshiftSettings' :: RedshiftSettings -> Maybe Text
secretsManagerSecretId} -> Maybe Text
secretsManagerSecretId) (\s :: RedshiftSettings
s@RedshiftSettings' {} Maybe Text
a -> RedshiftSettings
s {$sel:secretsManagerSecretId:RedshiftSettings' :: Maybe Text
secretsManagerSecretId = Maybe Text
a} :: RedshiftSettings)
redshiftSettings_serverName :: Lens.Lens' RedshiftSettings (Prelude.Maybe Prelude.Text)
redshiftSettings_serverName :: Lens' RedshiftSettings (Maybe Text)
redshiftSettings_serverName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RedshiftSettings' {Maybe Text
serverName :: Maybe Text
$sel:serverName:RedshiftSettings' :: RedshiftSettings -> Maybe Text
serverName} -> Maybe Text
serverName) (\s :: RedshiftSettings
s@RedshiftSettings' {} Maybe Text
a -> RedshiftSettings
s {$sel:serverName:RedshiftSettings' :: Maybe Text
serverName = Maybe Text
a} :: RedshiftSettings)
redshiftSettings_serverSideEncryptionKmsKeyId :: Lens.Lens' RedshiftSettings (Prelude.Maybe Prelude.Text)
redshiftSettings_serverSideEncryptionKmsKeyId :: Lens' RedshiftSettings (Maybe Text)
redshiftSettings_serverSideEncryptionKmsKeyId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RedshiftSettings' {Maybe Text
serverSideEncryptionKmsKeyId :: Maybe Text
$sel:serverSideEncryptionKmsKeyId:RedshiftSettings' :: RedshiftSettings -> Maybe Text
serverSideEncryptionKmsKeyId} -> Maybe Text
serverSideEncryptionKmsKeyId) (\s :: RedshiftSettings
s@RedshiftSettings' {} Maybe Text
a -> RedshiftSettings
s {$sel:serverSideEncryptionKmsKeyId:RedshiftSettings' :: Maybe Text
serverSideEncryptionKmsKeyId = Maybe Text
a} :: RedshiftSettings)
redshiftSettings_serviceAccessRoleArn :: Lens.Lens' RedshiftSettings (Prelude.Maybe Prelude.Text)
redshiftSettings_serviceAccessRoleArn :: Lens' RedshiftSettings (Maybe Text)
redshiftSettings_serviceAccessRoleArn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RedshiftSettings' {Maybe Text
serviceAccessRoleArn :: Maybe Text
$sel:serviceAccessRoleArn:RedshiftSettings' :: RedshiftSettings -> Maybe Text
serviceAccessRoleArn} -> Maybe Text
serviceAccessRoleArn) (\s :: RedshiftSettings
s@RedshiftSettings' {} Maybe Text
a -> RedshiftSettings
s {$sel:serviceAccessRoleArn:RedshiftSettings' :: Maybe Text
serviceAccessRoleArn = Maybe Text
a} :: RedshiftSettings)
redshiftSettings_timeFormat :: Lens.Lens' RedshiftSettings (Prelude.Maybe Prelude.Text)
redshiftSettings_timeFormat :: Lens' RedshiftSettings (Maybe Text)
redshiftSettings_timeFormat = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RedshiftSettings' {Maybe Text
timeFormat :: Maybe Text
$sel:timeFormat:RedshiftSettings' :: RedshiftSettings -> Maybe Text
timeFormat} -> Maybe Text
timeFormat) (\s :: RedshiftSettings
s@RedshiftSettings' {} Maybe Text
a -> RedshiftSettings
s {$sel:timeFormat:RedshiftSettings' :: Maybe Text
timeFormat = Maybe Text
a} :: RedshiftSettings)
redshiftSettings_trimBlanks :: Lens.Lens' RedshiftSettings (Prelude.Maybe Prelude.Bool)
redshiftSettings_trimBlanks :: Lens' RedshiftSettings (Maybe Bool)
redshiftSettings_trimBlanks = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RedshiftSettings' {Maybe Bool
trimBlanks :: Maybe Bool
$sel:trimBlanks:RedshiftSettings' :: RedshiftSettings -> Maybe Bool
trimBlanks} -> Maybe Bool
trimBlanks) (\s :: RedshiftSettings
s@RedshiftSettings' {} Maybe Bool
a -> RedshiftSettings
s {$sel:trimBlanks:RedshiftSettings' :: Maybe Bool
trimBlanks = Maybe Bool
a} :: RedshiftSettings)
redshiftSettings_truncateColumns :: Lens.Lens' RedshiftSettings (Prelude.Maybe Prelude.Bool)
redshiftSettings_truncateColumns :: Lens' RedshiftSettings (Maybe Bool)
redshiftSettings_truncateColumns = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RedshiftSettings' {Maybe Bool
truncateColumns :: Maybe Bool
$sel:truncateColumns:RedshiftSettings' :: RedshiftSettings -> Maybe Bool
truncateColumns} -> Maybe Bool
truncateColumns) (\s :: RedshiftSettings
s@RedshiftSettings' {} Maybe Bool
a -> RedshiftSettings
s {$sel:truncateColumns:RedshiftSettings' :: Maybe Bool
truncateColumns = Maybe Bool
a} :: RedshiftSettings)
redshiftSettings_username :: Lens.Lens' RedshiftSettings (Prelude.Maybe Prelude.Text)
redshiftSettings_username :: Lens' RedshiftSettings (Maybe Text)
redshiftSettings_username = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RedshiftSettings' {Maybe Text
username :: Maybe Text
$sel:username:RedshiftSettings' :: RedshiftSettings -> Maybe Text
username} -> Maybe Text
username) (\s :: RedshiftSettings
s@RedshiftSettings' {} Maybe Text
a -> RedshiftSettings
s {$sel:username:RedshiftSettings' :: Maybe Text
username = Maybe Text
a} :: RedshiftSettings)
redshiftSettings_writeBufferSize :: Lens.Lens' RedshiftSettings (Prelude.Maybe Prelude.Int)
redshiftSettings_writeBufferSize :: Lens' RedshiftSettings (Maybe Int)
redshiftSettings_writeBufferSize = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RedshiftSettings' {Maybe Int
writeBufferSize :: Maybe Int
$sel:writeBufferSize:RedshiftSettings' :: RedshiftSettings -> Maybe Int
writeBufferSize} -> Maybe Int
writeBufferSize) (\s :: RedshiftSettings
s@RedshiftSettings' {} Maybe Int
a -> RedshiftSettings
s {$sel:writeBufferSize:RedshiftSettings' :: Maybe Int
writeBufferSize = Maybe Int
a} :: RedshiftSettings)
instance Data.FromJSON RedshiftSettings where
parseJSON :: Value -> Parser RedshiftSettings
parseJSON =
forall a. String -> (Object -> Parser a) -> Value -> Parser a
Data.withObject
String
"RedshiftSettings"
( \Object
x ->
Maybe Bool
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Bool
-> Maybe Bool
-> Maybe Int
-> Maybe Text
-> Maybe Text
-> Maybe Bool
-> Maybe EncryptionModeValue
-> Maybe Bool
-> Maybe Int
-> Maybe Int
-> Maybe Int
-> Maybe (Sensitive Text)
-> Maybe Int
-> Maybe Bool
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Bool
-> Maybe Bool
-> Maybe Text
-> Maybe Int
-> RedshiftSettings
RedshiftSettings'
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"AcceptAnyDate")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"AfterConnectScript")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"BucketFolder")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"BucketName")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"CaseSensitiveNames")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"CompUpdate")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"ConnectionTimeout")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"DatabaseName")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"DateFormat")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"EmptyAsNull")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"EncryptionMode")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"ExplicitIds")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"FileTransferUploadStreams")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"LoadTimeout")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"MaxFileSize")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"Password")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"Port")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"RemoveQuotes")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"ReplaceChars")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"ReplaceInvalidChars")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"SecretsManagerAccessRoleArn")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"SecretsManagerSecretId")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"ServerName")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"ServerSideEncryptionKmsKeyId")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"ServiceAccessRoleArn")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"TimeFormat")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"TrimBlanks")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"TruncateColumns")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"Username")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"WriteBufferSize")
)
instance Prelude.Hashable RedshiftSettings where
hashWithSalt :: Int -> RedshiftSettings -> Int
hashWithSalt Int
_salt RedshiftSettings' {Maybe Bool
Maybe Int
Maybe Text
Maybe (Sensitive Text)
Maybe EncryptionModeValue
writeBufferSize :: Maybe Int
username :: Maybe Text
truncateColumns :: Maybe Bool
trimBlanks :: Maybe Bool
timeFormat :: Maybe Text
serviceAccessRoleArn :: Maybe Text
serverSideEncryptionKmsKeyId :: Maybe Text
serverName :: Maybe Text
secretsManagerSecretId :: Maybe Text
secretsManagerAccessRoleArn :: Maybe Text
replaceInvalidChars :: Maybe Text
replaceChars :: Maybe Text
removeQuotes :: Maybe Bool
port :: Maybe Int
password :: Maybe (Sensitive Text)
maxFileSize :: Maybe Int
loadTimeout :: Maybe Int
fileTransferUploadStreams :: Maybe Int
explicitIds :: Maybe Bool
encryptionMode :: Maybe EncryptionModeValue
emptyAsNull :: Maybe Bool
dateFormat :: Maybe Text
databaseName :: Maybe Text
connectionTimeout :: Maybe Int
compUpdate :: Maybe Bool
caseSensitiveNames :: Maybe Bool
bucketName :: Maybe Text
bucketFolder :: Maybe Text
afterConnectScript :: Maybe Text
acceptAnyDate :: Maybe Bool
$sel:writeBufferSize:RedshiftSettings' :: RedshiftSettings -> Maybe Int
$sel:username:RedshiftSettings' :: RedshiftSettings -> Maybe Text
$sel:truncateColumns:RedshiftSettings' :: RedshiftSettings -> Maybe Bool
$sel:trimBlanks:RedshiftSettings' :: RedshiftSettings -> Maybe Bool
$sel:timeFormat:RedshiftSettings' :: RedshiftSettings -> Maybe Text
$sel:serviceAccessRoleArn:RedshiftSettings' :: RedshiftSettings -> Maybe Text
$sel:serverSideEncryptionKmsKeyId:RedshiftSettings' :: RedshiftSettings -> Maybe Text
$sel:serverName:RedshiftSettings' :: RedshiftSettings -> Maybe Text
$sel:secretsManagerSecretId:RedshiftSettings' :: RedshiftSettings -> Maybe Text
$sel:secretsManagerAccessRoleArn:RedshiftSettings' :: RedshiftSettings -> Maybe Text
$sel:replaceInvalidChars:RedshiftSettings' :: RedshiftSettings -> Maybe Text
$sel:replaceChars:RedshiftSettings' :: RedshiftSettings -> Maybe Text
$sel:removeQuotes:RedshiftSettings' :: RedshiftSettings -> Maybe Bool
$sel:port:RedshiftSettings' :: RedshiftSettings -> Maybe Int
$sel:password:RedshiftSettings' :: RedshiftSettings -> Maybe (Sensitive Text)
$sel:maxFileSize:RedshiftSettings' :: RedshiftSettings -> Maybe Int
$sel:loadTimeout:RedshiftSettings' :: RedshiftSettings -> Maybe Int
$sel:fileTransferUploadStreams:RedshiftSettings' :: RedshiftSettings -> Maybe Int
$sel:explicitIds:RedshiftSettings' :: RedshiftSettings -> Maybe Bool
$sel:encryptionMode:RedshiftSettings' :: RedshiftSettings -> Maybe EncryptionModeValue
$sel:emptyAsNull:RedshiftSettings' :: RedshiftSettings -> Maybe Bool
$sel:dateFormat:RedshiftSettings' :: RedshiftSettings -> Maybe Text
$sel:databaseName:RedshiftSettings' :: RedshiftSettings -> Maybe Text
$sel:connectionTimeout:RedshiftSettings' :: RedshiftSettings -> Maybe Int
$sel:compUpdate:RedshiftSettings' :: RedshiftSettings -> Maybe Bool
$sel:caseSensitiveNames:RedshiftSettings' :: RedshiftSettings -> Maybe Bool
$sel:bucketName:RedshiftSettings' :: RedshiftSettings -> Maybe Text
$sel:bucketFolder:RedshiftSettings' :: RedshiftSettings -> Maybe Text
$sel:afterConnectScript:RedshiftSettings' :: RedshiftSettings -> Maybe Text
$sel:acceptAnyDate:RedshiftSettings' :: RedshiftSettings -> Maybe Bool
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Bool
acceptAnyDate
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
afterConnectScript
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
bucketFolder
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
bucketName
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Bool
caseSensitiveNames
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Bool
compUpdate
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Int
connectionTimeout
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
databaseName
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
dateFormat
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Bool
emptyAsNull
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe EncryptionModeValue
encryptionMode
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Bool
explicitIds
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Int
fileTransferUploadStreams
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Int
loadTimeout
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Int
maxFileSize
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe (Sensitive Text)
password
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Int
port
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Bool
removeQuotes
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
replaceChars
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
replaceInvalidChars
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
secretsManagerAccessRoleArn
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
secretsManagerSecretId
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
serverName
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
serverSideEncryptionKmsKeyId
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
serviceAccessRoleArn
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
timeFormat
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Bool
trimBlanks
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Bool
truncateColumns
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
username
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Int
writeBufferSize
instance Prelude.NFData RedshiftSettings where
rnf :: RedshiftSettings -> ()
rnf RedshiftSettings' {Maybe Bool
Maybe Int
Maybe Text
Maybe (Sensitive Text)
Maybe EncryptionModeValue
writeBufferSize :: Maybe Int
username :: Maybe Text
truncateColumns :: Maybe Bool
trimBlanks :: Maybe Bool
timeFormat :: Maybe Text
serviceAccessRoleArn :: Maybe Text
serverSideEncryptionKmsKeyId :: Maybe Text
serverName :: Maybe Text
secretsManagerSecretId :: Maybe Text
secretsManagerAccessRoleArn :: Maybe Text
replaceInvalidChars :: Maybe Text
replaceChars :: Maybe Text
removeQuotes :: Maybe Bool
port :: Maybe Int
password :: Maybe (Sensitive Text)
maxFileSize :: Maybe Int
loadTimeout :: Maybe Int
fileTransferUploadStreams :: Maybe Int
explicitIds :: Maybe Bool
encryptionMode :: Maybe EncryptionModeValue
emptyAsNull :: Maybe Bool
dateFormat :: Maybe Text
databaseName :: Maybe Text
connectionTimeout :: Maybe Int
compUpdate :: Maybe Bool
caseSensitiveNames :: Maybe Bool
bucketName :: Maybe Text
bucketFolder :: Maybe Text
afterConnectScript :: Maybe Text
acceptAnyDate :: Maybe Bool
$sel:writeBufferSize:RedshiftSettings' :: RedshiftSettings -> Maybe Int
$sel:username:RedshiftSettings' :: RedshiftSettings -> Maybe Text
$sel:truncateColumns:RedshiftSettings' :: RedshiftSettings -> Maybe Bool
$sel:trimBlanks:RedshiftSettings' :: RedshiftSettings -> Maybe Bool
$sel:timeFormat:RedshiftSettings' :: RedshiftSettings -> Maybe Text
$sel:serviceAccessRoleArn:RedshiftSettings' :: RedshiftSettings -> Maybe Text
$sel:serverSideEncryptionKmsKeyId:RedshiftSettings' :: RedshiftSettings -> Maybe Text
$sel:serverName:RedshiftSettings' :: RedshiftSettings -> Maybe Text
$sel:secretsManagerSecretId:RedshiftSettings' :: RedshiftSettings -> Maybe Text
$sel:secretsManagerAccessRoleArn:RedshiftSettings' :: RedshiftSettings -> Maybe Text
$sel:replaceInvalidChars:RedshiftSettings' :: RedshiftSettings -> Maybe Text
$sel:replaceChars:RedshiftSettings' :: RedshiftSettings -> Maybe Text
$sel:removeQuotes:RedshiftSettings' :: RedshiftSettings -> Maybe Bool
$sel:port:RedshiftSettings' :: RedshiftSettings -> Maybe Int
$sel:password:RedshiftSettings' :: RedshiftSettings -> Maybe (Sensitive Text)
$sel:maxFileSize:RedshiftSettings' :: RedshiftSettings -> Maybe Int
$sel:loadTimeout:RedshiftSettings' :: RedshiftSettings -> Maybe Int
$sel:fileTransferUploadStreams:RedshiftSettings' :: RedshiftSettings -> Maybe Int
$sel:explicitIds:RedshiftSettings' :: RedshiftSettings -> Maybe Bool
$sel:encryptionMode:RedshiftSettings' :: RedshiftSettings -> Maybe EncryptionModeValue
$sel:emptyAsNull:RedshiftSettings' :: RedshiftSettings -> Maybe Bool
$sel:dateFormat:RedshiftSettings' :: RedshiftSettings -> Maybe Text
$sel:databaseName:RedshiftSettings' :: RedshiftSettings -> Maybe Text
$sel:connectionTimeout:RedshiftSettings' :: RedshiftSettings -> Maybe Int
$sel:compUpdate:RedshiftSettings' :: RedshiftSettings -> Maybe Bool
$sel:caseSensitiveNames:RedshiftSettings' :: RedshiftSettings -> Maybe Bool
$sel:bucketName:RedshiftSettings' :: RedshiftSettings -> Maybe Text
$sel:bucketFolder:RedshiftSettings' :: RedshiftSettings -> Maybe Text
$sel:afterConnectScript:RedshiftSettings' :: RedshiftSettings -> Maybe Text
$sel:acceptAnyDate:RedshiftSettings' :: RedshiftSettings -> Maybe Bool
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe Bool
acceptAnyDate
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
afterConnectScript
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
bucketFolder
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
bucketName
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Bool
caseSensitiveNames
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Bool
compUpdate
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Int
connectionTimeout
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
databaseName
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
dateFormat
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Bool
emptyAsNull
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe EncryptionModeValue
encryptionMode
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Bool
explicitIds
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Int
fileTransferUploadStreams
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Int
loadTimeout
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Int
maxFileSize
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe (Sensitive Text)
password
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Int
port
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Bool
removeQuotes
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
replaceChars
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf
Maybe Text
replaceInvalidChars
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf
Maybe Text
secretsManagerAccessRoleArn
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf
Maybe Text
secretsManagerSecretId
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
serverName
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf
Maybe Text
serverSideEncryptionKmsKeyId
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf
Maybe Text
serviceAccessRoleArn
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf
Maybe Text
timeFormat
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf
Maybe Bool
trimBlanks
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf
Maybe Bool
truncateColumns
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf
Maybe Text
username
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf
Maybe Int
writeBufferSize
instance Data.ToJSON RedshiftSettings where
toJSON :: RedshiftSettings -> Value
toJSON RedshiftSettings' {Maybe Bool
Maybe Int
Maybe Text
Maybe (Sensitive Text)
Maybe EncryptionModeValue
writeBufferSize :: Maybe Int
username :: Maybe Text
truncateColumns :: Maybe Bool
trimBlanks :: Maybe Bool
timeFormat :: Maybe Text
serviceAccessRoleArn :: Maybe Text
serverSideEncryptionKmsKeyId :: Maybe Text
serverName :: Maybe Text
secretsManagerSecretId :: Maybe Text
secretsManagerAccessRoleArn :: Maybe Text
replaceInvalidChars :: Maybe Text
replaceChars :: Maybe Text
removeQuotes :: Maybe Bool
port :: Maybe Int
password :: Maybe (Sensitive Text)
maxFileSize :: Maybe Int
loadTimeout :: Maybe Int
fileTransferUploadStreams :: Maybe Int
explicitIds :: Maybe Bool
encryptionMode :: Maybe EncryptionModeValue
emptyAsNull :: Maybe Bool
dateFormat :: Maybe Text
databaseName :: Maybe Text
connectionTimeout :: Maybe Int
compUpdate :: Maybe Bool
caseSensitiveNames :: Maybe Bool
bucketName :: Maybe Text
bucketFolder :: Maybe Text
afterConnectScript :: Maybe Text
acceptAnyDate :: Maybe Bool
$sel:writeBufferSize:RedshiftSettings' :: RedshiftSettings -> Maybe Int
$sel:username:RedshiftSettings' :: RedshiftSettings -> Maybe Text
$sel:truncateColumns:RedshiftSettings' :: RedshiftSettings -> Maybe Bool
$sel:trimBlanks:RedshiftSettings' :: RedshiftSettings -> Maybe Bool
$sel:timeFormat:RedshiftSettings' :: RedshiftSettings -> Maybe Text
$sel:serviceAccessRoleArn:RedshiftSettings' :: RedshiftSettings -> Maybe Text
$sel:serverSideEncryptionKmsKeyId:RedshiftSettings' :: RedshiftSettings -> Maybe Text
$sel:serverName:RedshiftSettings' :: RedshiftSettings -> Maybe Text
$sel:secretsManagerSecretId:RedshiftSettings' :: RedshiftSettings -> Maybe Text
$sel:secretsManagerAccessRoleArn:RedshiftSettings' :: RedshiftSettings -> Maybe Text
$sel:replaceInvalidChars:RedshiftSettings' :: RedshiftSettings -> Maybe Text
$sel:replaceChars:RedshiftSettings' :: RedshiftSettings -> Maybe Text
$sel:removeQuotes:RedshiftSettings' :: RedshiftSettings -> Maybe Bool
$sel:port:RedshiftSettings' :: RedshiftSettings -> Maybe Int
$sel:password:RedshiftSettings' :: RedshiftSettings -> Maybe (Sensitive Text)
$sel:maxFileSize:RedshiftSettings' :: RedshiftSettings -> Maybe Int
$sel:loadTimeout:RedshiftSettings' :: RedshiftSettings -> Maybe Int
$sel:fileTransferUploadStreams:RedshiftSettings' :: RedshiftSettings -> Maybe Int
$sel:explicitIds:RedshiftSettings' :: RedshiftSettings -> Maybe Bool
$sel:encryptionMode:RedshiftSettings' :: RedshiftSettings -> Maybe EncryptionModeValue
$sel:emptyAsNull:RedshiftSettings' :: RedshiftSettings -> Maybe Bool
$sel:dateFormat:RedshiftSettings' :: RedshiftSettings -> Maybe Text
$sel:databaseName:RedshiftSettings' :: RedshiftSettings -> Maybe Text
$sel:connectionTimeout:RedshiftSettings' :: RedshiftSettings -> Maybe Int
$sel:compUpdate:RedshiftSettings' :: RedshiftSettings -> Maybe Bool
$sel:caseSensitiveNames:RedshiftSettings' :: RedshiftSettings -> Maybe Bool
$sel:bucketName:RedshiftSettings' :: RedshiftSettings -> Maybe Text
$sel:bucketFolder:RedshiftSettings' :: RedshiftSettings -> Maybe Text
$sel:afterConnectScript:RedshiftSettings' :: RedshiftSettings -> Maybe Text
$sel:acceptAnyDate:RedshiftSettings' :: RedshiftSettings -> Maybe Bool
..} =
[Pair] -> Value
Data.object
( forall a. [Maybe a] -> [a]
Prelude.catMaybes
[ (Key
"AcceptAnyDate" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Bool
acceptAnyDate,
(Key
"AfterConnectScript" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Text
afterConnectScript,
(Key
"BucketFolder" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Text
bucketFolder,
(Key
"BucketName" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Text
bucketName,
(Key
"CaseSensitiveNames" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Bool
caseSensitiveNames,
(Key
"CompUpdate" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Bool
compUpdate,
(Key
"ConnectionTimeout" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Int
connectionTimeout,
(Key
"DatabaseName" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Text
databaseName,
(Key
"DateFormat" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Text
dateFormat,
(Key
"EmptyAsNull" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Bool
emptyAsNull,
(Key
"EncryptionMode" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe EncryptionModeValue
encryptionMode,
(Key
"ExplicitIds" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Bool
explicitIds,
(Key
"FileTransferUploadStreams" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Int
fileTransferUploadStreams,
(Key
"LoadTimeout" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Int
loadTimeout,
(Key
"MaxFileSize" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Int
maxFileSize,
(Key
"Password" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Sensitive Text)
password,
(Key
"Port" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Int
port,
(Key
"RemoveQuotes" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Bool
removeQuotes,
(Key
"ReplaceChars" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Text
replaceChars,
(Key
"ReplaceInvalidChars" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Text
replaceInvalidChars,
(Key
"SecretsManagerAccessRoleArn" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Text
secretsManagerAccessRoleArn,
(Key
"SecretsManagerSecretId" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Text
secretsManagerSecretId,
(Key
"ServerName" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Text
serverName,
(Key
"ServerSideEncryptionKmsKeyId" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Text
serverSideEncryptionKmsKeyId,
(Key
"ServiceAccessRoleArn" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Text
serviceAccessRoleArn,
(Key
"TimeFormat" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Text
timeFormat,
(Key
"TrimBlanks" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Bool
trimBlanks,
(Key
"TruncateColumns" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Bool
truncateColumns,
(Key
"Username" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Text
username,
(Key
"WriteBufferSize" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Int
writeBufferSize
]
)