{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE DuplicateRecordFields #-}
{-# LANGUAGE NamedFieldPuns #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE RecordWildCards #-}
{-# LANGUAGE StrictData #-}
{-# LANGUAGE TypeFamilies #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# OPTIONS_GHC -fno-warn-unused-binds #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
{-# OPTIONS_GHC -fno-warn-unused-matches #-}
module Amazonka.RDS.ModifyDBCluster
(
ModifyDBCluster (..),
newModifyDBCluster,
modifyDBCluster_allocatedStorage,
modifyDBCluster_allowMajorVersionUpgrade,
modifyDBCluster_applyImmediately,
modifyDBCluster_autoMinorVersionUpgrade,
modifyDBCluster_backtrackWindow,
modifyDBCluster_backupRetentionPeriod,
modifyDBCluster_cloudwatchLogsExportConfiguration,
modifyDBCluster_copyTagsToSnapshot,
modifyDBCluster_dbClusterInstanceClass,
modifyDBCluster_dbClusterParameterGroupName,
modifyDBCluster_dbInstanceParameterGroupName,
modifyDBCluster_deletionProtection,
modifyDBCluster_domain,
modifyDBCluster_domainIAMRoleName,
modifyDBCluster_enableGlobalWriteForwarding,
modifyDBCluster_enableHttpEndpoint,
modifyDBCluster_enableIAMDatabaseAuthentication,
modifyDBCluster_enablePerformanceInsights,
modifyDBCluster_engineVersion,
modifyDBCluster_iops,
modifyDBCluster_manageMasterUserPassword,
modifyDBCluster_masterUserPassword,
modifyDBCluster_masterUserSecretKmsKeyId,
modifyDBCluster_monitoringInterval,
modifyDBCluster_monitoringRoleArn,
modifyDBCluster_networkType,
modifyDBCluster_newDBClusterIdentifier,
modifyDBCluster_optionGroupName,
modifyDBCluster_performanceInsightsKMSKeyId,
modifyDBCluster_performanceInsightsRetentionPeriod,
modifyDBCluster_port,
modifyDBCluster_preferredBackupWindow,
modifyDBCluster_preferredMaintenanceWindow,
modifyDBCluster_rotateMasterUserPassword,
modifyDBCluster_scalingConfiguration,
modifyDBCluster_serverlessV2ScalingConfiguration,
modifyDBCluster_storageType,
modifyDBCluster_vpcSecurityGroupIds,
modifyDBCluster_dbClusterIdentifier,
ModifyDBClusterResponse (..),
newModifyDBClusterResponse,
modifyDBClusterResponse_dbCluster,
modifyDBClusterResponse_httpStatus,
)
where
import qualified Amazonka.Core as Core
import qualified Amazonka.Core.Lens.Internal as Lens
import qualified Amazonka.Data as Data
import qualified Amazonka.Prelude as Prelude
import Amazonka.RDS.Types
import qualified Amazonka.Request as Request
import qualified Amazonka.Response as Response
data ModifyDBCluster = ModifyDBCluster'
{
ModifyDBCluster -> Maybe Int
allocatedStorage :: Prelude.Maybe Prelude.Int,
ModifyDBCluster -> Maybe Bool
allowMajorVersionUpgrade :: Prelude.Maybe Prelude.Bool,
ModifyDBCluster -> Maybe Bool
applyImmediately :: Prelude.Maybe Prelude.Bool,
ModifyDBCluster -> Maybe Bool
autoMinorVersionUpgrade :: Prelude.Maybe Prelude.Bool,
ModifyDBCluster -> Maybe Integer
backtrackWindow :: Prelude.Maybe Prelude.Integer,
ModifyDBCluster -> Maybe Int
backupRetentionPeriod :: Prelude.Maybe Prelude.Int,
ModifyDBCluster -> Maybe CloudwatchLogsExportConfiguration
cloudwatchLogsExportConfiguration :: Prelude.Maybe CloudwatchLogsExportConfiguration,
ModifyDBCluster -> Maybe Bool
copyTagsToSnapshot :: Prelude.Maybe Prelude.Bool,
ModifyDBCluster -> Maybe Text
dbClusterInstanceClass :: Prelude.Maybe Prelude.Text,
ModifyDBCluster -> Maybe Text
dbClusterParameterGroupName :: Prelude.Maybe Prelude.Text,
ModifyDBCluster -> Maybe Text
dbInstanceParameterGroupName :: Prelude.Maybe Prelude.Text,
ModifyDBCluster -> Maybe Bool
deletionProtection :: Prelude.Maybe Prelude.Bool,
ModifyDBCluster -> Maybe Text
domain :: Prelude.Maybe Prelude.Text,
ModifyDBCluster -> Maybe Text
domainIAMRoleName :: Prelude.Maybe Prelude.Text,
ModifyDBCluster -> Maybe Bool
enableGlobalWriteForwarding :: Prelude.Maybe Prelude.Bool,
ModifyDBCluster -> Maybe Bool
enableHttpEndpoint :: Prelude.Maybe Prelude.Bool,
ModifyDBCluster -> Maybe Bool
enableIAMDatabaseAuthentication :: Prelude.Maybe Prelude.Bool,
ModifyDBCluster -> Maybe Bool
enablePerformanceInsights :: Prelude.Maybe Prelude.Bool,
ModifyDBCluster -> Maybe Text
engineVersion :: Prelude.Maybe Prelude.Text,
ModifyDBCluster -> Maybe Int
iops :: Prelude.Maybe Prelude.Int,
ModifyDBCluster -> Maybe Bool
manageMasterUserPassword :: Prelude.Maybe Prelude.Bool,
ModifyDBCluster -> Maybe Text
masterUserPassword :: Prelude.Maybe Prelude.Text,
ModifyDBCluster -> Maybe Text
masterUserSecretKmsKeyId :: Prelude.Maybe Prelude.Text,
ModifyDBCluster -> Maybe Int
monitoringInterval :: Prelude.Maybe Prelude.Int,
ModifyDBCluster -> Maybe Text
monitoringRoleArn :: Prelude.Maybe Prelude.Text,
ModifyDBCluster -> Maybe Text
networkType :: Prelude.Maybe Prelude.Text,
ModifyDBCluster -> Maybe Text
newDBClusterIdentifier' :: Prelude.Maybe Prelude.Text,
ModifyDBCluster -> Maybe Text
optionGroupName :: Prelude.Maybe Prelude.Text,
ModifyDBCluster -> Maybe Text
performanceInsightsKMSKeyId :: Prelude.Maybe Prelude.Text,
ModifyDBCluster -> Maybe Int
performanceInsightsRetentionPeriod :: Prelude.Maybe Prelude.Int,
ModifyDBCluster -> Maybe Int
port :: Prelude.Maybe Prelude.Int,
ModifyDBCluster -> Maybe Text
preferredBackupWindow :: Prelude.Maybe Prelude.Text,
ModifyDBCluster -> Maybe Text
preferredMaintenanceWindow :: Prelude.Maybe Prelude.Text,
ModifyDBCluster -> Maybe Bool
rotateMasterUserPassword :: Prelude.Maybe Prelude.Bool,
ModifyDBCluster -> Maybe ScalingConfiguration
scalingConfiguration :: Prelude.Maybe ScalingConfiguration,
ModifyDBCluster -> Maybe ServerlessV2ScalingConfiguration
serverlessV2ScalingConfiguration :: Prelude.Maybe ServerlessV2ScalingConfiguration,
ModifyDBCluster -> Maybe Text
storageType :: Prelude.Maybe Prelude.Text,
ModifyDBCluster -> Maybe [Text]
vpcSecurityGroupIds :: Prelude.Maybe [Prelude.Text],
ModifyDBCluster -> Text
dbClusterIdentifier :: Prelude.Text
}
deriving (ModifyDBCluster -> ModifyDBCluster -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ModifyDBCluster -> ModifyDBCluster -> Bool
$c/= :: ModifyDBCluster -> ModifyDBCluster -> Bool
== :: ModifyDBCluster -> ModifyDBCluster -> Bool
$c== :: ModifyDBCluster -> ModifyDBCluster -> Bool
Prelude.Eq, ReadPrec [ModifyDBCluster]
ReadPrec ModifyDBCluster
Int -> ReadS ModifyDBCluster
ReadS [ModifyDBCluster]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [ModifyDBCluster]
$creadListPrec :: ReadPrec [ModifyDBCluster]
readPrec :: ReadPrec ModifyDBCluster
$creadPrec :: ReadPrec ModifyDBCluster
readList :: ReadS [ModifyDBCluster]
$creadList :: ReadS [ModifyDBCluster]
readsPrec :: Int -> ReadS ModifyDBCluster
$creadsPrec :: Int -> ReadS ModifyDBCluster
Prelude.Read, Int -> ModifyDBCluster -> ShowS
[ModifyDBCluster] -> ShowS
ModifyDBCluster -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ModifyDBCluster] -> ShowS
$cshowList :: [ModifyDBCluster] -> ShowS
show :: ModifyDBCluster -> String
$cshow :: ModifyDBCluster -> String
showsPrec :: Int -> ModifyDBCluster -> ShowS
$cshowsPrec :: Int -> ModifyDBCluster -> ShowS
Prelude.Show, forall x. Rep ModifyDBCluster x -> ModifyDBCluster
forall x. ModifyDBCluster -> Rep ModifyDBCluster x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep ModifyDBCluster x -> ModifyDBCluster
$cfrom :: forall x. ModifyDBCluster -> Rep ModifyDBCluster x
Prelude.Generic)
newModifyDBCluster ::
Prelude.Text ->
ModifyDBCluster
newModifyDBCluster :: Text -> ModifyDBCluster
newModifyDBCluster Text
pDBClusterIdentifier_ =
ModifyDBCluster'
{ $sel:allocatedStorage:ModifyDBCluster' :: Maybe Int
allocatedStorage =
forall a. Maybe a
Prelude.Nothing,
$sel:allowMajorVersionUpgrade:ModifyDBCluster' :: Maybe Bool
allowMajorVersionUpgrade = forall a. Maybe a
Prelude.Nothing,
$sel:applyImmediately:ModifyDBCluster' :: Maybe Bool
applyImmediately = forall a. Maybe a
Prelude.Nothing,
$sel:autoMinorVersionUpgrade:ModifyDBCluster' :: Maybe Bool
autoMinorVersionUpgrade = forall a. Maybe a
Prelude.Nothing,
$sel:backtrackWindow:ModifyDBCluster' :: Maybe Integer
backtrackWindow = forall a. Maybe a
Prelude.Nothing,
$sel:backupRetentionPeriod:ModifyDBCluster' :: Maybe Int
backupRetentionPeriod = forall a. Maybe a
Prelude.Nothing,
$sel:cloudwatchLogsExportConfiguration:ModifyDBCluster' :: Maybe CloudwatchLogsExportConfiguration
cloudwatchLogsExportConfiguration = forall a. Maybe a
Prelude.Nothing,
$sel:copyTagsToSnapshot:ModifyDBCluster' :: Maybe Bool
copyTagsToSnapshot = forall a. Maybe a
Prelude.Nothing,
$sel:dbClusterInstanceClass:ModifyDBCluster' :: Maybe Text
dbClusterInstanceClass = forall a. Maybe a
Prelude.Nothing,
$sel:dbClusterParameterGroupName:ModifyDBCluster' :: Maybe Text
dbClusterParameterGroupName = forall a. Maybe a
Prelude.Nothing,
$sel:dbInstanceParameterGroupName:ModifyDBCluster' :: Maybe Text
dbInstanceParameterGroupName = forall a. Maybe a
Prelude.Nothing,
$sel:deletionProtection:ModifyDBCluster' :: Maybe Bool
deletionProtection = forall a. Maybe a
Prelude.Nothing,
$sel:domain:ModifyDBCluster' :: Maybe Text
domain = forall a. Maybe a
Prelude.Nothing,
$sel:domainIAMRoleName:ModifyDBCluster' :: Maybe Text
domainIAMRoleName = forall a. Maybe a
Prelude.Nothing,
$sel:enableGlobalWriteForwarding:ModifyDBCluster' :: Maybe Bool
enableGlobalWriteForwarding = forall a. Maybe a
Prelude.Nothing,
$sel:enableHttpEndpoint:ModifyDBCluster' :: Maybe Bool
enableHttpEndpoint = forall a. Maybe a
Prelude.Nothing,
$sel:enableIAMDatabaseAuthentication:ModifyDBCluster' :: Maybe Bool
enableIAMDatabaseAuthentication = forall a. Maybe a
Prelude.Nothing,
$sel:enablePerformanceInsights:ModifyDBCluster' :: Maybe Bool
enablePerformanceInsights = forall a. Maybe a
Prelude.Nothing,
$sel:engineVersion:ModifyDBCluster' :: Maybe Text
engineVersion = forall a. Maybe a
Prelude.Nothing,
$sel:iops:ModifyDBCluster' :: Maybe Int
iops = forall a. Maybe a
Prelude.Nothing,
$sel:manageMasterUserPassword:ModifyDBCluster' :: Maybe Bool
manageMasterUserPassword = forall a. Maybe a
Prelude.Nothing,
$sel:masterUserPassword:ModifyDBCluster' :: Maybe Text
masterUserPassword = forall a. Maybe a
Prelude.Nothing,
$sel:masterUserSecretKmsKeyId:ModifyDBCluster' :: Maybe Text
masterUserSecretKmsKeyId = forall a. Maybe a
Prelude.Nothing,
$sel:monitoringInterval:ModifyDBCluster' :: Maybe Int
monitoringInterval = forall a. Maybe a
Prelude.Nothing,
$sel:monitoringRoleArn:ModifyDBCluster' :: Maybe Text
monitoringRoleArn = forall a. Maybe a
Prelude.Nothing,
$sel:networkType:ModifyDBCluster' :: Maybe Text
networkType = forall a. Maybe a
Prelude.Nothing,
$sel:newDBClusterIdentifier':ModifyDBCluster' :: Maybe Text
newDBClusterIdentifier' = forall a. Maybe a
Prelude.Nothing,
$sel:optionGroupName:ModifyDBCluster' :: Maybe Text
optionGroupName = forall a. Maybe a
Prelude.Nothing,
$sel:performanceInsightsKMSKeyId:ModifyDBCluster' :: Maybe Text
performanceInsightsKMSKeyId = forall a. Maybe a
Prelude.Nothing,
$sel:performanceInsightsRetentionPeriod:ModifyDBCluster' :: Maybe Int
performanceInsightsRetentionPeriod = forall a. Maybe a
Prelude.Nothing,
$sel:port:ModifyDBCluster' :: Maybe Int
port = forall a. Maybe a
Prelude.Nothing,
$sel:preferredBackupWindow:ModifyDBCluster' :: Maybe Text
preferredBackupWindow = forall a. Maybe a
Prelude.Nothing,
$sel:preferredMaintenanceWindow:ModifyDBCluster' :: Maybe Text
preferredMaintenanceWindow = forall a. Maybe a
Prelude.Nothing,
$sel:rotateMasterUserPassword:ModifyDBCluster' :: Maybe Bool
rotateMasterUserPassword = forall a. Maybe a
Prelude.Nothing,
$sel:scalingConfiguration:ModifyDBCluster' :: Maybe ScalingConfiguration
scalingConfiguration = forall a. Maybe a
Prelude.Nothing,
$sel:serverlessV2ScalingConfiguration:ModifyDBCluster' :: Maybe ServerlessV2ScalingConfiguration
serverlessV2ScalingConfiguration = forall a. Maybe a
Prelude.Nothing,
$sel:storageType:ModifyDBCluster' :: Maybe Text
storageType = forall a. Maybe a
Prelude.Nothing,
$sel:vpcSecurityGroupIds:ModifyDBCluster' :: Maybe [Text]
vpcSecurityGroupIds = forall a. Maybe a
Prelude.Nothing,
$sel:dbClusterIdentifier:ModifyDBCluster' :: Text
dbClusterIdentifier = Text
pDBClusterIdentifier_
}
modifyDBCluster_allocatedStorage :: Lens.Lens' ModifyDBCluster (Prelude.Maybe Prelude.Int)
modifyDBCluster_allocatedStorage :: Lens' ModifyDBCluster (Maybe Int)
modifyDBCluster_allocatedStorage = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyDBCluster' {Maybe Int
allocatedStorage :: Maybe Int
$sel:allocatedStorage:ModifyDBCluster' :: ModifyDBCluster -> Maybe Int
allocatedStorage} -> Maybe Int
allocatedStorage) (\s :: ModifyDBCluster
s@ModifyDBCluster' {} Maybe Int
a -> ModifyDBCluster
s {$sel:allocatedStorage:ModifyDBCluster' :: Maybe Int
allocatedStorage = Maybe Int
a} :: ModifyDBCluster)
modifyDBCluster_allowMajorVersionUpgrade :: Lens.Lens' ModifyDBCluster (Prelude.Maybe Prelude.Bool)
modifyDBCluster_allowMajorVersionUpgrade :: Lens' ModifyDBCluster (Maybe Bool)
modifyDBCluster_allowMajorVersionUpgrade = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyDBCluster' {Maybe Bool
allowMajorVersionUpgrade :: Maybe Bool
$sel:allowMajorVersionUpgrade:ModifyDBCluster' :: ModifyDBCluster -> Maybe Bool
allowMajorVersionUpgrade} -> Maybe Bool
allowMajorVersionUpgrade) (\s :: ModifyDBCluster
s@ModifyDBCluster' {} Maybe Bool
a -> ModifyDBCluster
s {$sel:allowMajorVersionUpgrade:ModifyDBCluster' :: Maybe Bool
allowMajorVersionUpgrade = Maybe Bool
a} :: ModifyDBCluster)
modifyDBCluster_applyImmediately :: Lens.Lens' ModifyDBCluster (Prelude.Maybe Prelude.Bool)
modifyDBCluster_applyImmediately :: Lens' ModifyDBCluster (Maybe Bool)
modifyDBCluster_applyImmediately = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyDBCluster' {Maybe Bool
applyImmediately :: Maybe Bool
$sel:applyImmediately:ModifyDBCluster' :: ModifyDBCluster -> Maybe Bool
applyImmediately} -> Maybe Bool
applyImmediately) (\s :: ModifyDBCluster
s@ModifyDBCluster' {} Maybe Bool
a -> ModifyDBCluster
s {$sel:applyImmediately:ModifyDBCluster' :: Maybe Bool
applyImmediately = Maybe Bool
a} :: ModifyDBCluster)
modifyDBCluster_autoMinorVersionUpgrade :: Lens.Lens' ModifyDBCluster (Prelude.Maybe Prelude.Bool)
modifyDBCluster_autoMinorVersionUpgrade :: Lens' ModifyDBCluster (Maybe Bool)
modifyDBCluster_autoMinorVersionUpgrade = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyDBCluster' {Maybe Bool
autoMinorVersionUpgrade :: Maybe Bool
$sel:autoMinorVersionUpgrade:ModifyDBCluster' :: ModifyDBCluster -> Maybe Bool
autoMinorVersionUpgrade} -> Maybe Bool
autoMinorVersionUpgrade) (\s :: ModifyDBCluster
s@ModifyDBCluster' {} Maybe Bool
a -> ModifyDBCluster
s {$sel:autoMinorVersionUpgrade:ModifyDBCluster' :: Maybe Bool
autoMinorVersionUpgrade = Maybe Bool
a} :: ModifyDBCluster)
modifyDBCluster_backtrackWindow :: Lens.Lens' ModifyDBCluster (Prelude.Maybe Prelude.Integer)
modifyDBCluster_backtrackWindow :: Lens' ModifyDBCluster (Maybe Integer)
modifyDBCluster_backtrackWindow = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyDBCluster' {Maybe Integer
backtrackWindow :: Maybe Integer
$sel:backtrackWindow:ModifyDBCluster' :: ModifyDBCluster -> Maybe Integer
backtrackWindow} -> Maybe Integer
backtrackWindow) (\s :: ModifyDBCluster
s@ModifyDBCluster' {} Maybe Integer
a -> ModifyDBCluster
s {$sel:backtrackWindow:ModifyDBCluster' :: Maybe Integer
backtrackWindow = Maybe Integer
a} :: ModifyDBCluster)
modifyDBCluster_backupRetentionPeriod :: Lens.Lens' ModifyDBCluster (Prelude.Maybe Prelude.Int)
modifyDBCluster_backupRetentionPeriod :: Lens' ModifyDBCluster (Maybe Int)
modifyDBCluster_backupRetentionPeriod = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyDBCluster' {Maybe Int
backupRetentionPeriod :: Maybe Int
$sel:backupRetentionPeriod:ModifyDBCluster' :: ModifyDBCluster -> Maybe Int
backupRetentionPeriod} -> Maybe Int
backupRetentionPeriod) (\s :: ModifyDBCluster
s@ModifyDBCluster' {} Maybe Int
a -> ModifyDBCluster
s {$sel:backupRetentionPeriod:ModifyDBCluster' :: Maybe Int
backupRetentionPeriod = Maybe Int
a} :: ModifyDBCluster)
modifyDBCluster_cloudwatchLogsExportConfiguration :: Lens.Lens' ModifyDBCluster (Prelude.Maybe CloudwatchLogsExportConfiguration)
modifyDBCluster_cloudwatchLogsExportConfiguration :: Lens' ModifyDBCluster (Maybe CloudwatchLogsExportConfiguration)
modifyDBCluster_cloudwatchLogsExportConfiguration = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyDBCluster' {Maybe CloudwatchLogsExportConfiguration
cloudwatchLogsExportConfiguration :: Maybe CloudwatchLogsExportConfiguration
$sel:cloudwatchLogsExportConfiguration:ModifyDBCluster' :: ModifyDBCluster -> Maybe CloudwatchLogsExportConfiguration
cloudwatchLogsExportConfiguration} -> Maybe CloudwatchLogsExportConfiguration
cloudwatchLogsExportConfiguration) (\s :: ModifyDBCluster
s@ModifyDBCluster' {} Maybe CloudwatchLogsExportConfiguration
a -> ModifyDBCluster
s {$sel:cloudwatchLogsExportConfiguration:ModifyDBCluster' :: Maybe CloudwatchLogsExportConfiguration
cloudwatchLogsExportConfiguration = Maybe CloudwatchLogsExportConfiguration
a} :: ModifyDBCluster)
modifyDBCluster_copyTagsToSnapshot :: Lens.Lens' ModifyDBCluster (Prelude.Maybe Prelude.Bool)
modifyDBCluster_copyTagsToSnapshot :: Lens' ModifyDBCluster (Maybe Bool)
modifyDBCluster_copyTagsToSnapshot = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyDBCluster' {Maybe Bool
copyTagsToSnapshot :: Maybe Bool
$sel:copyTagsToSnapshot:ModifyDBCluster' :: ModifyDBCluster -> Maybe Bool
copyTagsToSnapshot} -> Maybe Bool
copyTagsToSnapshot) (\s :: ModifyDBCluster
s@ModifyDBCluster' {} Maybe Bool
a -> ModifyDBCluster
s {$sel:copyTagsToSnapshot:ModifyDBCluster' :: Maybe Bool
copyTagsToSnapshot = Maybe Bool
a} :: ModifyDBCluster)
modifyDBCluster_dbClusterInstanceClass :: Lens.Lens' ModifyDBCluster (Prelude.Maybe Prelude.Text)
modifyDBCluster_dbClusterInstanceClass :: Lens' ModifyDBCluster (Maybe Text)
modifyDBCluster_dbClusterInstanceClass = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyDBCluster' {Maybe Text
dbClusterInstanceClass :: Maybe Text
$sel:dbClusterInstanceClass:ModifyDBCluster' :: ModifyDBCluster -> Maybe Text
dbClusterInstanceClass} -> Maybe Text
dbClusterInstanceClass) (\s :: ModifyDBCluster
s@ModifyDBCluster' {} Maybe Text
a -> ModifyDBCluster
s {$sel:dbClusterInstanceClass:ModifyDBCluster' :: Maybe Text
dbClusterInstanceClass = Maybe Text
a} :: ModifyDBCluster)
modifyDBCluster_dbClusterParameterGroupName :: Lens.Lens' ModifyDBCluster (Prelude.Maybe Prelude.Text)
modifyDBCluster_dbClusterParameterGroupName :: Lens' ModifyDBCluster (Maybe Text)
modifyDBCluster_dbClusterParameterGroupName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyDBCluster' {Maybe Text
dbClusterParameterGroupName :: Maybe Text
$sel:dbClusterParameterGroupName:ModifyDBCluster' :: ModifyDBCluster -> Maybe Text
dbClusterParameterGroupName} -> Maybe Text
dbClusterParameterGroupName) (\s :: ModifyDBCluster
s@ModifyDBCluster' {} Maybe Text
a -> ModifyDBCluster
s {$sel:dbClusterParameterGroupName:ModifyDBCluster' :: Maybe Text
dbClusterParameterGroupName = Maybe Text
a} :: ModifyDBCluster)
modifyDBCluster_dbInstanceParameterGroupName :: Lens.Lens' ModifyDBCluster (Prelude.Maybe Prelude.Text)
modifyDBCluster_dbInstanceParameterGroupName :: Lens' ModifyDBCluster (Maybe Text)
modifyDBCluster_dbInstanceParameterGroupName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyDBCluster' {Maybe Text
dbInstanceParameterGroupName :: Maybe Text
$sel:dbInstanceParameterGroupName:ModifyDBCluster' :: ModifyDBCluster -> Maybe Text
dbInstanceParameterGroupName} -> Maybe Text
dbInstanceParameterGroupName) (\s :: ModifyDBCluster
s@ModifyDBCluster' {} Maybe Text
a -> ModifyDBCluster
s {$sel:dbInstanceParameterGroupName:ModifyDBCluster' :: Maybe Text
dbInstanceParameterGroupName = Maybe Text
a} :: ModifyDBCluster)
modifyDBCluster_deletionProtection :: Lens.Lens' ModifyDBCluster (Prelude.Maybe Prelude.Bool)
modifyDBCluster_deletionProtection :: Lens' ModifyDBCluster (Maybe Bool)
modifyDBCluster_deletionProtection = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyDBCluster' {Maybe Bool
deletionProtection :: Maybe Bool
$sel:deletionProtection:ModifyDBCluster' :: ModifyDBCluster -> Maybe Bool
deletionProtection} -> Maybe Bool
deletionProtection) (\s :: ModifyDBCluster
s@ModifyDBCluster' {} Maybe Bool
a -> ModifyDBCluster
s {$sel:deletionProtection:ModifyDBCluster' :: Maybe Bool
deletionProtection = Maybe Bool
a} :: ModifyDBCluster)
modifyDBCluster_domain :: Lens.Lens' ModifyDBCluster (Prelude.Maybe Prelude.Text)
modifyDBCluster_domain :: Lens' ModifyDBCluster (Maybe Text)
modifyDBCluster_domain = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyDBCluster' {Maybe Text
domain :: Maybe Text
$sel:domain:ModifyDBCluster' :: ModifyDBCluster -> Maybe Text
domain} -> Maybe Text
domain) (\s :: ModifyDBCluster
s@ModifyDBCluster' {} Maybe Text
a -> ModifyDBCluster
s {$sel:domain:ModifyDBCluster' :: Maybe Text
domain = Maybe Text
a} :: ModifyDBCluster)
modifyDBCluster_domainIAMRoleName :: Lens.Lens' ModifyDBCluster (Prelude.Maybe Prelude.Text)
modifyDBCluster_domainIAMRoleName :: Lens' ModifyDBCluster (Maybe Text)
modifyDBCluster_domainIAMRoleName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyDBCluster' {Maybe Text
domainIAMRoleName :: Maybe Text
$sel:domainIAMRoleName:ModifyDBCluster' :: ModifyDBCluster -> Maybe Text
domainIAMRoleName} -> Maybe Text
domainIAMRoleName) (\s :: ModifyDBCluster
s@ModifyDBCluster' {} Maybe Text
a -> ModifyDBCluster
s {$sel:domainIAMRoleName:ModifyDBCluster' :: Maybe Text
domainIAMRoleName = Maybe Text
a} :: ModifyDBCluster)
modifyDBCluster_enableGlobalWriteForwarding :: Lens.Lens' ModifyDBCluster (Prelude.Maybe Prelude.Bool)
modifyDBCluster_enableGlobalWriteForwarding :: Lens' ModifyDBCluster (Maybe Bool)
modifyDBCluster_enableGlobalWriteForwarding = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyDBCluster' {Maybe Bool
enableGlobalWriteForwarding :: Maybe Bool
$sel:enableGlobalWriteForwarding:ModifyDBCluster' :: ModifyDBCluster -> Maybe Bool
enableGlobalWriteForwarding} -> Maybe Bool
enableGlobalWriteForwarding) (\s :: ModifyDBCluster
s@ModifyDBCluster' {} Maybe Bool
a -> ModifyDBCluster
s {$sel:enableGlobalWriteForwarding:ModifyDBCluster' :: Maybe Bool
enableGlobalWriteForwarding = Maybe Bool
a} :: ModifyDBCluster)
modifyDBCluster_enableHttpEndpoint :: Lens.Lens' ModifyDBCluster (Prelude.Maybe Prelude.Bool)
modifyDBCluster_enableHttpEndpoint :: Lens' ModifyDBCluster (Maybe Bool)
modifyDBCluster_enableHttpEndpoint = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyDBCluster' {Maybe Bool
enableHttpEndpoint :: Maybe Bool
$sel:enableHttpEndpoint:ModifyDBCluster' :: ModifyDBCluster -> Maybe Bool
enableHttpEndpoint} -> Maybe Bool
enableHttpEndpoint) (\s :: ModifyDBCluster
s@ModifyDBCluster' {} Maybe Bool
a -> ModifyDBCluster
s {$sel:enableHttpEndpoint:ModifyDBCluster' :: Maybe Bool
enableHttpEndpoint = Maybe Bool
a} :: ModifyDBCluster)
modifyDBCluster_enableIAMDatabaseAuthentication :: Lens.Lens' ModifyDBCluster (Prelude.Maybe Prelude.Bool)
modifyDBCluster_enableIAMDatabaseAuthentication :: Lens' ModifyDBCluster (Maybe Bool)
modifyDBCluster_enableIAMDatabaseAuthentication = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyDBCluster' {Maybe Bool
enableIAMDatabaseAuthentication :: Maybe Bool
$sel:enableIAMDatabaseAuthentication:ModifyDBCluster' :: ModifyDBCluster -> Maybe Bool
enableIAMDatabaseAuthentication} -> Maybe Bool
enableIAMDatabaseAuthentication) (\s :: ModifyDBCluster
s@ModifyDBCluster' {} Maybe Bool
a -> ModifyDBCluster
s {$sel:enableIAMDatabaseAuthentication:ModifyDBCluster' :: Maybe Bool
enableIAMDatabaseAuthentication = Maybe Bool
a} :: ModifyDBCluster)
modifyDBCluster_enablePerformanceInsights :: Lens.Lens' ModifyDBCluster (Prelude.Maybe Prelude.Bool)
modifyDBCluster_enablePerformanceInsights :: Lens' ModifyDBCluster (Maybe Bool)
modifyDBCluster_enablePerformanceInsights = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyDBCluster' {Maybe Bool
enablePerformanceInsights :: Maybe Bool
$sel:enablePerformanceInsights:ModifyDBCluster' :: ModifyDBCluster -> Maybe Bool
enablePerformanceInsights} -> Maybe Bool
enablePerformanceInsights) (\s :: ModifyDBCluster
s@ModifyDBCluster' {} Maybe Bool
a -> ModifyDBCluster
s {$sel:enablePerformanceInsights:ModifyDBCluster' :: Maybe Bool
enablePerformanceInsights = Maybe Bool
a} :: ModifyDBCluster)
modifyDBCluster_engineVersion :: Lens.Lens' ModifyDBCluster (Prelude.Maybe Prelude.Text)
modifyDBCluster_engineVersion :: Lens' ModifyDBCluster (Maybe Text)
modifyDBCluster_engineVersion = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyDBCluster' {Maybe Text
engineVersion :: Maybe Text
$sel:engineVersion:ModifyDBCluster' :: ModifyDBCluster -> Maybe Text
engineVersion} -> Maybe Text
engineVersion) (\s :: ModifyDBCluster
s@ModifyDBCluster' {} Maybe Text
a -> ModifyDBCluster
s {$sel:engineVersion:ModifyDBCluster' :: Maybe Text
engineVersion = Maybe Text
a} :: ModifyDBCluster)
modifyDBCluster_iops :: Lens.Lens' ModifyDBCluster (Prelude.Maybe Prelude.Int)
modifyDBCluster_iops :: Lens' ModifyDBCluster (Maybe Int)
modifyDBCluster_iops = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyDBCluster' {Maybe Int
iops :: Maybe Int
$sel:iops:ModifyDBCluster' :: ModifyDBCluster -> Maybe Int
iops} -> Maybe Int
iops) (\s :: ModifyDBCluster
s@ModifyDBCluster' {} Maybe Int
a -> ModifyDBCluster
s {$sel:iops:ModifyDBCluster' :: Maybe Int
iops = Maybe Int
a} :: ModifyDBCluster)
modifyDBCluster_manageMasterUserPassword :: Lens.Lens' ModifyDBCluster (Prelude.Maybe Prelude.Bool)
modifyDBCluster_manageMasterUserPassword :: Lens' ModifyDBCluster (Maybe Bool)
modifyDBCluster_manageMasterUserPassword = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyDBCluster' {Maybe Bool
manageMasterUserPassword :: Maybe Bool
$sel:manageMasterUserPassword:ModifyDBCluster' :: ModifyDBCluster -> Maybe Bool
manageMasterUserPassword} -> Maybe Bool
manageMasterUserPassword) (\s :: ModifyDBCluster
s@ModifyDBCluster' {} Maybe Bool
a -> ModifyDBCluster
s {$sel:manageMasterUserPassword:ModifyDBCluster' :: Maybe Bool
manageMasterUserPassword = Maybe Bool
a} :: ModifyDBCluster)
modifyDBCluster_masterUserPassword :: Lens.Lens' ModifyDBCluster (Prelude.Maybe Prelude.Text)
modifyDBCluster_masterUserPassword :: Lens' ModifyDBCluster (Maybe Text)
modifyDBCluster_masterUserPassword = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyDBCluster' {Maybe Text
masterUserPassword :: Maybe Text
$sel:masterUserPassword:ModifyDBCluster' :: ModifyDBCluster -> Maybe Text
masterUserPassword} -> Maybe Text
masterUserPassword) (\s :: ModifyDBCluster
s@ModifyDBCluster' {} Maybe Text
a -> ModifyDBCluster
s {$sel:masterUserPassword:ModifyDBCluster' :: Maybe Text
masterUserPassword = Maybe Text
a} :: ModifyDBCluster)
modifyDBCluster_masterUserSecretKmsKeyId :: Lens.Lens' ModifyDBCluster (Prelude.Maybe Prelude.Text)
modifyDBCluster_masterUserSecretKmsKeyId :: Lens' ModifyDBCluster (Maybe Text)
modifyDBCluster_masterUserSecretKmsKeyId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyDBCluster' {Maybe Text
masterUserSecretKmsKeyId :: Maybe Text
$sel:masterUserSecretKmsKeyId:ModifyDBCluster' :: ModifyDBCluster -> Maybe Text
masterUserSecretKmsKeyId} -> Maybe Text
masterUserSecretKmsKeyId) (\s :: ModifyDBCluster
s@ModifyDBCluster' {} Maybe Text
a -> ModifyDBCluster
s {$sel:masterUserSecretKmsKeyId:ModifyDBCluster' :: Maybe Text
masterUserSecretKmsKeyId = Maybe Text
a} :: ModifyDBCluster)
modifyDBCluster_monitoringInterval :: Lens.Lens' ModifyDBCluster (Prelude.Maybe Prelude.Int)
modifyDBCluster_monitoringInterval :: Lens' ModifyDBCluster (Maybe Int)
modifyDBCluster_monitoringInterval = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyDBCluster' {Maybe Int
monitoringInterval :: Maybe Int
$sel:monitoringInterval:ModifyDBCluster' :: ModifyDBCluster -> Maybe Int
monitoringInterval} -> Maybe Int
monitoringInterval) (\s :: ModifyDBCluster
s@ModifyDBCluster' {} Maybe Int
a -> ModifyDBCluster
s {$sel:monitoringInterval:ModifyDBCluster' :: Maybe Int
monitoringInterval = Maybe Int
a} :: ModifyDBCluster)
modifyDBCluster_monitoringRoleArn :: Lens.Lens' ModifyDBCluster (Prelude.Maybe Prelude.Text)
modifyDBCluster_monitoringRoleArn :: Lens' ModifyDBCluster (Maybe Text)
modifyDBCluster_monitoringRoleArn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyDBCluster' {Maybe Text
monitoringRoleArn :: Maybe Text
$sel:monitoringRoleArn:ModifyDBCluster' :: ModifyDBCluster -> Maybe Text
monitoringRoleArn} -> Maybe Text
monitoringRoleArn) (\s :: ModifyDBCluster
s@ModifyDBCluster' {} Maybe Text
a -> ModifyDBCluster
s {$sel:monitoringRoleArn:ModifyDBCluster' :: Maybe Text
monitoringRoleArn = Maybe Text
a} :: ModifyDBCluster)
modifyDBCluster_networkType :: Lens.Lens' ModifyDBCluster (Prelude.Maybe Prelude.Text)
modifyDBCluster_networkType :: Lens' ModifyDBCluster (Maybe Text)
modifyDBCluster_networkType = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyDBCluster' {Maybe Text
networkType :: Maybe Text
$sel:networkType:ModifyDBCluster' :: ModifyDBCluster -> Maybe Text
networkType} -> Maybe Text
networkType) (\s :: ModifyDBCluster
s@ModifyDBCluster' {} Maybe Text
a -> ModifyDBCluster
s {$sel:networkType:ModifyDBCluster' :: Maybe Text
networkType = Maybe Text
a} :: ModifyDBCluster)
modifyDBCluster_newDBClusterIdentifier :: Lens.Lens' ModifyDBCluster (Prelude.Maybe Prelude.Text)
modifyDBCluster_newDBClusterIdentifier :: Lens' ModifyDBCluster (Maybe Text)
modifyDBCluster_newDBClusterIdentifier = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyDBCluster' {Maybe Text
newDBClusterIdentifier' :: Maybe Text
$sel:newDBClusterIdentifier':ModifyDBCluster' :: ModifyDBCluster -> Maybe Text
newDBClusterIdentifier'} -> Maybe Text
newDBClusterIdentifier') (\s :: ModifyDBCluster
s@ModifyDBCluster' {} Maybe Text
a -> ModifyDBCluster
s {$sel:newDBClusterIdentifier':ModifyDBCluster' :: Maybe Text
newDBClusterIdentifier' = Maybe Text
a} :: ModifyDBCluster)
modifyDBCluster_optionGroupName :: Lens.Lens' ModifyDBCluster (Prelude.Maybe Prelude.Text)
modifyDBCluster_optionGroupName :: Lens' ModifyDBCluster (Maybe Text)
modifyDBCluster_optionGroupName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyDBCluster' {Maybe Text
optionGroupName :: Maybe Text
$sel:optionGroupName:ModifyDBCluster' :: ModifyDBCluster -> Maybe Text
optionGroupName} -> Maybe Text
optionGroupName) (\s :: ModifyDBCluster
s@ModifyDBCluster' {} Maybe Text
a -> ModifyDBCluster
s {$sel:optionGroupName:ModifyDBCluster' :: Maybe Text
optionGroupName = Maybe Text
a} :: ModifyDBCluster)
modifyDBCluster_performanceInsightsKMSKeyId :: Lens.Lens' ModifyDBCluster (Prelude.Maybe Prelude.Text)
modifyDBCluster_performanceInsightsKMSKeyId :: Lens' ModifyDBCluster (Maybe Text)
modifyDBCluster_performanceInsightsKMSKeyId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyDBCluster' {Maybe Text
performanceInsightsKMSKeyId :: Maybe Text
$sel:performanceInsightsKMSKeyId:ModifyDBCluster' :: ModifyDBCluster -> Maybe Text
performanceInsightsKMSKeyId} -> Maybe Text
performanceInsightsKMSKeyId) (\s :: ModifyDBCluster
s@ModifyDBCluster' {} Maybe Text
a -> ModifyDBCluster
s {$sel:performanceInsightsKMSKeyId:ModifyDBCluster' :: Maybe Text
performanceInsightsKMSKeyId = Maybe Text
a} :: ModifyDBCluster)
modifyDBCluster_performanceInsightsRetentionPeriod :: Lens.Lens' ModifyDBCluster (Prelude.Maybe Prelude.Int)
modifyDBCluster_performanceInsightsRetentionPeriod :: Lens' ModifyDBCluster (Maybe Int)
modifyDBCluster_performanceInsightsRetentionPeriod = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyDBCluster' {Maybe Int
performanceInsightsRetentionPeriod :: Maybe Int
$sel:performanceInsightsRetentionPeriod:ModifyDBCluster' :: ModifyDBCluster -> Maybe Int
performanceInsightsRetentionPeriod} -> Maybe Int
performanceInsightsRetentionPeriod) (\s :: ModifyDBCluster
s@ModifyDBCluster' {} Maybe Int
a -> ModifyDBCluster
s {$sel:performanceInsightsRetentionPeriod:ModifyDBCluster' :: Maybe Int
performanceInsightsRetentionPeriod = Maybe Int
a} :: ModifyDBCluster)
modifyDBCluster_port :: Lens.Lens' ModifyDBCluster (Prelude.Maybe Prelude.Int)
modifyDBCluster_port :: Lens' ModifyDBCluster (Maybe Int)
modifyDBCluster_port = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyDBCluster' {Maybe Int
port :: Maybe Int
$sel:port:ModifyDBCluster' :: ModifyDBCluster -> Maybe Int
port} -> Maybe Int
port) (\s :: ModifyDBCluster
s@ModifyDBCluster' {} Maybe Int
a -> ModifyDBCluster
s {$sel:port:ModifyDBCluster' :: Maybe Int
port = Maybe Int
a} :: ModifyDBCluster)
modifyDBCluster_preferredBackupWindow :: Lens.Lens' ModifyDBCluster (Prelude.Maybe Prelude.Text)
modifyDBCluster_preferredBackupWindow :: Lens' ModifyDBCluster (Maybe Text)
modifyDBCluster_preferredBackupWindow = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyDBCluster' {Maybe Text
preferredBackupWindow :: Maybe Text
$sel:preferredBackupWindow:ModifyDBCluster' :: ModifyDBCluster -> Maybe Text
preferredBackupWindow} -> Maybe Text
preferredBackupWindow) (\s :: ModifyDBCluster
s@ModifyDBCluster' {} Maybe Text
a -> ModifyDBCluster
s {$sel:preferredBackupWindow:ModifyDBCluster' :: Maybe Text
preferredBackupWindow = Maybe Text
a} :: ModifyDBCluster)
modifyDBCluster_preferredMaintenanceWindow :: Lens.Lens' ModifyDBCluster (Prelude.Maybe Prelude.Text)
modifyDBCluster_preferredMaintenanceWindow :: Lens' ModifyDBCluster (Maybe Text)
modifyDBCluster_preferredMaintenanceWindow = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyDBCluster' {Maybe Text
preferredMaintenanceWindow :: Maybe Text
$sel:preferredMaintenanceWindow:ModifyDBCluster' :: ModifyDBCluster -> Maybe Text
preferredMaintenanceWindow} -> Maybe Text
preferredMaintenanceWindow) (\s :: ModifyDBCluster
s@ModifyDBCluster' {} Maybe Text
a -> ModifyDBCluster
s {$sel:preferredMaintenanceWindow:ModifyDBCluster' :: Maybe Text
preferredMaintenanceWindow = Maybe Text
a} :: ModifyDBCluster)
modifyDBCluster_rotateMasterUserPassword :: Lens.Lens' ModifyDBCluster (Prelude.Maybe Prelude.Bool)
modifyDBCluster_rotateMasterUserPassword :: Lens' ModifyDBCluster (Maybe Bool)
modifyDBCluster_rotateMasterUserPassword = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyDBCluster' {Maybe Bool
rotateMasterUserPassword :: Maybe Bool
$sel:rotateMasterUserPassword:ModifyDBCluster' :: ModifyDBCluster -> Maybe Bool
rotateMasterUserPassword} -> Maybe Bool
rotateMasterUserPassword) (\s :: ModifyDBCluster
s@ModifyDBCluster' {} Maybe Bool
a -> ModifyDBCluster
s {$sel:rotateMasterUserPassword:ModifyDBCluster' :: Maybe Bool
rotateMasterUserPassword = Maybe Bool
a} :: ModifyDBCluster)
modifyDBCluster_scalingConfiguration :: Lens.Lens' ModifyDBCluster (Prelude.Maybe ScalingConfiguration)
modifyDBCluster_scalingConfiguration :: Lens' ModifyDBCluster (Maybe ScalingConfiguration)
modifyDBCluster_scalingConfiguration = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyDBCluster' {Maybe ScalingConfiguration
scalingConfiguration :: Maybe ScalingConfiguration
$sel:scalingConfiguration:ModifyDBCluster' :: ModifyDBCluster -> Maybe ScalingConfiguration
scalingConfiguration} -> Maybe ScalingConfiguration
scalingConfiguration) (\s :: ModifyDBCluster
s@ModifyDBCluster' {} Maybe ScalingConfiguration
a -> ModifyDBCluster
s {$sel:scalingConfiguration:ModifyDBCluster' :: Maybe ScalingConfiguration
scalingConfiguration = Maybe ScalingConfiguration
a} :: ModifyDBCluster)
modifyDBCluster_serverlessV2ScalingConfiguration :: Lens.Lens' ModifyDBCluster (Prelude.Maybe ServerlessV2ScalingConfiguration)
modifyDBCluster_serverlessV2ScalingConfiguration :: Lens' ModifyDBCluster (Maybe ServerlessV2ScalingConfiguration)
modifyDBCluster_serverlessV2ScalingConfiguration = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyDBCluster' {Maybe ServerlessV2ScalingConfiguration
serverlessV2ScalingConfiguration :: Maybe ServerlessV2ScalingConfiguration
$sel:serverlessV2ScalingConfiguration:ModifyDBCluster' :: ModifyDBCluster -> Maybe ServerlessV2ScalingConfiguration
serverlessV2ScalingConfiguration} -> Maybe ServerlessV2ScalingConfiguration
serverlessV2ScalingConfiguration) (\s :: ModifyDBCluster
s@ModifyDBCluster' {} Maybe ServerlessV2ScalingConfiguration
a -> ModifyDBCluster
s {$sel:serverlessV2ScalingConfiguration:ModifyDBCluster' :: Maybe ServerlessV2ScalingConfiguration
serverlessV2ScalingConfiguration = Maybe ServerlessV2ScalingConfiguration
a} :: ModifyDBCluster)
modifyDBCluster_storageType :: Lens.Lens' ModifyDBCluster (Prelude.Maybe Prelude.Text)
modifyDBCluster_storageType :: Lens' ModifyDBCluster (Maybe Text)
modifyDBCluster_storageType = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyDBCluster' {Maybe Text
storageType :: Maybe Text
$sel:storageType:ModifyDBCluster' :: ModifyDBCluster -> Maybe Text
storageType} -> Maybe Text
storageType) (\s :: ModifyDBCluster
s@ModifyDBCluster' {} Maybe Text
a -> ModifyDBCluster
s {$sel:storageType:ModifyDBCluster' :: Maybe Text
storageType = Maybe Text
a} :: ModifyDBCluster)
modifyDBCluster_vpcSecurityGroupIds :: Lens.Lens' ModifyDBCluster (Prelude.Maybe [Prelude.Text])
modifyDBCluster_vpcSecurityGroupIds :: Lens' ModifyDBCluster (Maybe [Text])
modifyDBCluster_vpcSecurityGroupIds = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyDBCluster' {Maybe [Text]
vpcSecurityGroupIds :: Maybe [Text]
$sel:vpcSecurityGroupIds:ModifyDBCluster' :: ModifyDBCluster -> Maybe [Text]
vpcSecurityGroupIds} -> Maybe [Text]
vpcSecurityGroupIds) (\s :: ModifyDBCluster
s@ModifyDBCluster' {} Maybe [Text]
a -> ModifyDBCluster
s {$sel:vpcSecurityGroupIds:ModifyDBCluster' :: Maybe [Text]
vpcSecurityGroupIds = Maybe [Text]
a} :: ModifyDBCluster) 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 s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced
modifyDBCluster_dbClusterIdentifier :: Lens.Lens' ModifyDBCluster Prelude.Text
modifyDBCluster_dbClusterIdentifier :: Lens' ModifyDBCluster Text
modifyDBCluster_dbClusterIdentifier = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyDBCluster' {Text
dbClusterIdentifier :: Text
$sel:dbClusterIdentifier:ModifyDBCluster' :: ModifyDBCluster -> Text
dbClusterIdentifier} -> Text
dbClusterIdentifier) (\s :: ModifyDBCluster
s@ModifyDBCluster' {} Text
a -> ModifyDBCluster
s {$sel:dbClusterIdentifier:ModifyDBCluster' :: Text
dbClusterIdentifier = Text
a} :: ModifyDBCluster)
instance Core.AWSRequest ModifyDBCluster where
type
AWSResponse ModifyDBCluster =
ModifyDBClusterResponse
request :: (Service -> Service) -> ModifyDBCluster -> Request ModifyDBCluster
request Service -> Service
overrides =
forall a. ToRequest a => Service -> a -> Request a
Request.postQuery (Service -> Service
overrides Service
defaultService)
response :: forall (m :: * -> *).
MonadResource m =>
(ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy ModifyDBCluster
-> ClientResponse ClientBody
-> m (Either Error (ClientResponse (AWSResponse ModifyDBCluster)))
response =
forall (m :: * -> *) a.
MonadResource m =>
Text
-> (Int
-> ResponseHeaders -> [Node] -> Either String (AWSResponse a))
-> (ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy a
-> ClientResponse ClientBody
-> m (Either Error (ClientResponse (AWSResponse a)))
Response.receiveXMLWrapper
Text
"ModifyDBClusterResult"
( \Int
s ResponseHeaders
h [Node]
x ->
Maybe DBCluster -> Int -> ModifyDBClusterResponse
ModifyDBClusterResponse'
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> ([Node]
x forall a. FromXML a => [Node] -> Text -> Either String (Maybe a)
Data..@? Text
"DBCluster")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure (forall a. Enum a => a -> Int
Prelude.fromEnum Int
s))
)
instance Prelude.Hashable ModifyDBCluster where
hashWithSalt :: Int -> ModifyDBCluster -> Int
hashWithSalt Int
_salt ModifyDBCluster' {Maybe Bool
Maybe Int
Maybe Integer
Maybe [Text]
Maybe Text
Maybe CloudwatchLogsExportConfiguration
Maybe ScalingConfiguration
Maybe ServerlessV2ScalingConfiguration
Text
dbClusterIdentifier :: Text
vpcSecurityGroupIds :: Maybe [Text]
storageType :: Maybe Text
serverlessV2ScalingConfiguration :: Maybe ServerlessV2ScalingConfiguration
scalingConfiguration :: Maybe ScalingConfiguration
rotateMasterUserPassword :: Maybe Bool
preferredMaintenanceWindow :: Maybe Text
preferredBackupWindow :: Maybe Text
port :: Maybe Int
performanceInsightsRetentionPeriod :: Maybe Int
performanceInsightsKMSKeyId :: Maybe Text
optionGroupName :: Maybe Text
newDBClusterIdentifier' :: Maybe Text
networkType :: Maybe Text
monitoringRoleArn :: Maybe Text
monitoringInterval :: Maybe Int
masterUserSecretKmsKeyId :: Maybe Text
masterUserPassword :: Maybe Text
manageMasterUserPassword :: Maybe Bool
iops :: Maybe Int
engineVersion :: Maybe Text
enablePerformanceInsights :: Maybe Bool
enableIAMDatabaseAuthentication :: Maybe Bool
enableHttpEndpoint :: Maybe Bool
enableGlobalWriteForwarding :: Maybe Bool
domainIAMRoleName :: Maybe Text
domain :: Maybe Text
deletionProtection :: Maybe Bool
dbInstanceParameterGroupName :: Maybe Text
dbClusterParameterGroupName :: Maybe Text
dbClusterInstanceClass :: Maybe Text
copyTagsToSnapshot :: Maybe Bool
cloudwatchLogsExportConfiguration :: Maybe CloudwatchLogsExportConfiguration
backupRetentionPeriod :: Maybe Int
backtrackWindow :: Maybe Integer
autoMinorVersionUpgrade :: Maybe Bool
applyImmediately :: Maybe Bool
allowMajorVersionUpgrade :: Maybe Bool
allocatedStorage :: Maybe Int
$sel:dbClusterIdentifier:ModifyDBCluster' :: ModifyDBCluster -> Text
$sel:vpcSecurityGroupIds:ModifyDBCluster' :: ModifyDBCluster -> Maybe [Text]
$sel:storageType:ModifyDBCluster' :: ModifyDBCluster -> Maybe Text
$sel:serverlessV2ScalingConfiguration:ModifyDBCluster' :: ModifyDBCluster -> Maybe ServerlessV2ScalingConfiguration
$sel:scalingConfiguration:ModifyDBCluster' :: ModifyDBCluster -> Maybe ScalingConfiguration
$sel:rotateMasterUserPassword:ModifyDBCluster' :: ModifyDBCluster -> Maybe Bool
$sel:preferredMaintenanceWindow:ModifyDBCluster' :: ModifyDBCluster -> Maybe Text
$sel:preferredBackupWindow:ModifyDBCluster' :: ModifyDBCluster -> Maybe Text
$sel:port:ModifyDBCluster' :: ModifyDBCluster -> Maybe Int
$sel:performanceInsightsRetentionPeriod:ModifyDBCluster' :: ModifyDBCluster -> Maybe Int
$sel:performanceInsightsKMSKeyId:ModifyDBCluster' :: ModifyDBCluster -> Maybe Text
$sel:optionGroupName:ModifyDBCluster' :: ModifyDBCluster -> Maybe Text
$sel:newDBClusterIdentifier':ModifyDBCluster' :: ModifyDBCluster -> Maybe Text
$sel:networkType:ModifyDBCluster' :: ModifyDBCluster -> Maybe Text
$sel:monitoringRoleArn:ModifyDBCluster' :: ModifyDBCluster -> Maybe Text
$sel:monitoringInterval:ModifyDBCluster' :: ModifyDBCluster -> Maybe Int
$sel:masterUserSecretKmsKeyId:ModifyDBCluster' :: ModifyDBCluster -> Maybe Text
$sel:masterUserPassword:ModifyDBCluster' :: ModifyDBCluster -> Maybe Text
$sel:manageMasterUserPassword:ModifyDBCluster' :: ModifyDBCluster -> Maybe Bool
$sel:iops:ModifyDBCluster' :: ModifyDBCluster -> Maybe Int
$sel:engineVersion:ModifyDBCluster' :: ModifyDBCluster -> Maybe Text
$sel:enablePerformanceInsights:ModifyDBCluster' :: ModifyDBCluster -> Maybe Bool
$sel:enableIAMDatabaseAuthentication:ModifyDBCluster' :: ModifyDBCluster -> Maybe Bool
$sel:enableHttpEndpoint:ModifyDBCluster' :: ModifyDBCluster -> Maybe Bool
$sel:enableGlobalWriteForwarding:ModifyDBCluster' :: ModifyDBCluster -> Maybe Bool
$sel:domainIAMRoleName:ModifyDBCluster' :: ModifyDBCluster -> Maybe Text
$sel:domain:ModifyDBCluster' :: ModifyDBCluster -> Maybe Text
$sel:deletionProtection:ModifyDBCluster' :: ModifyDBCluster -> Maybe Bool
$sel:dbInstanceParameterGroupName:ModifyDBCluster' :: ModifyDBCluster -> Maybe Text
$sel:dbClusterParameterGroupName:ModifyDBCluster' :: ModifyDBCluster -> Maybe Text
$sel:dbClusterInstanceClass:ModifyDBCluster' :: ModifyDBCluster -> Maybe Text
$sel:copyTagsToSnapshot:ModifyDBCluster' :: ModifyDBCluster -> Maybe Bool
$sel:cloudwatchLogsExportConfiguration:ModifyDBCluster' :: ModifyDBCluster -> Maybe CloudwatchLogsExportConfiguration
$sel:backupRetentionPeriod:ModifyDBCluster' :: ModifyDBCluster -> Maybe Int
$sel:backtrackWindow:ModifyDBCluster' :: ModifyDBCluster -> Maybe Integer
$sel:autoMinorVersionUpgrade:ModifyDBCluster' :: ModifyDBCluster -> Maybe Bool
$sel:applyImmediately:ModifyDBCluster' :: ModifyDBCluster -> Maybe Bool
$sel:allowMajorVersionUpgrade:ModifyDBCluster' :: ModifyDBCluster -> Maybe Bool
$sel:allocatedStorage:ModifyDBCluster' :: ModifyDBCluster -> Maybe Int
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Int
allocatedStorage
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Bool
allowMajorVersionUpgrade
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Bool
applyImmediately
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Bool
autoMinorVersionUpgrade
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Integer
backtrackWindow
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Int
backupRetentionPeriod
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe CloudwatchLogsExportConfiguration
cloudwatchLogsExportConfiguration
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Bool
copyTagsToSnapshot
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
dbClusterInstanceClass
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
dbClusterParameterGroupName
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
dbInstanceParameterGroupName
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Bool
deletionProtection
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
domain
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
domainIAMRoleName
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Bool
enableGlobalWriteForwarding
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Bool
enableHttpEndpoint
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Bool
enableIAMDatabaseAuthentication
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Bool
enablePerformanceInsights
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
engineVersion
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Int
iops
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Bool
manageMasterUserPassword
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
masterUserPassword
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
masterUserSecretKmsKeyId
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Int
monitoringInterval
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
monitoringRoleArn
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
networkType
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
newDBClusterIdentifier'
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
optionGroupName
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
performanceInsightsKMSKeyId
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Int
performanceInsightsRetentionPeriod
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Int
port
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
preferredBackupWindow
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
preferredMaintenanceWindow
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Bool
rotateMasterUserPassword
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe ScalingConfiguration
scalingConfiguration
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe ServerlessV2ScalingConfiguration
serverlessV2ScalingConfiguration
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
storageType
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe [Text]
vpcSecurityGroupIds
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
dbClusterIdentifier
instance Prelude.NFData ModifyDBCluster where
rnf :: ModifyDBCluster -> ()
rnf ModifyDBCluster' {Maybe Bool
Maybe Int
Maybe Integer
Maybe [Text]
Maybe Text
Maybe CloudwatchLogsExportConfiguration
Maybe ScalingConfiguration
Maybe ServerlessV2ScalingConfiguration
Text
dbClusterIdentifier :: Text
vpcSecurityGroupIds :: Maybe [Text]
storageType :: Maybe Text
serverlessV2ScalingConfiguration :: Maybe ServerlessV2ScalingConfiguration
scalingConfiguration :: Maybe ScalingConfiguration
rotateMasterUserPassword :: Maybe Bool
preferredMaintenanceWindow :: Maybe Text
preferredBackupWindow :: Maybe Text
port :: Maybe Int
performanceInsightsRetentionPeriod :: Maybe Int
performanceInsightsKMSKeyId :: Maybe Text
optionGroupName :: Maybe Text
newDBClusterIdentifier' :: Maybe Text
networkType :: Maybe Text
monitoringRoleArn :: Maybe Text
monitoringInterval :: Maybe Int
masterUserSecretKmsKeyId :: Maybe Text
masterUserPassword :: Maybe Text
manageMasterUserPassword :: Maybe Bool
iops :: Maybe Int
engineVersion :: Maybe Text
enablePerformanceInsights :: Maybe Bool
enableIAMDatabaseAuthentication :: Maybe Bool
enableHttpEndpoint :: Maybe Bool
enableGlobalWriteForwarding :: Maybe Bool
domainIAMRoleName :: Maybe Text
domain :: Maybe Text
deletionProtection :: Maybe Bool
dbInstanceParameterGroupName :: Maybe Text
dbClusterParameterGroupName :: Maybe Text
dbClusterInstanceClass :: Maybe Text
copyTagsToSnapshot :: Maybe Bool
cloudwatchLogsExportConfiguration :: Maybe CloudwatchLogsExportConfiguration
backupRetentionPeriod :: Maybe Int
backtrackWindow :: Maybe Integer
autoMinorVersionUpgrade :: Maybe Bool
applyImmediately :: Maybe Bool
allowMajorVersionUpgrade :: Maybe Bool
allocatedStorage :: Maybe Int
$sel:dbClusterIdentifier:ModifyDBCluster' :: ModifyDBCluster -> Text
$sel:vpcSecurityGroupIds:ModifyDBCluster' :: ModifyDBCluster -> Maybe [Text]
$sel:storageType:ModifyDBCluster' :: ModifyDBCluster -> Maybe Text
$sel:serverlessV2ScalingConfiguration:ModifyDBCluster' :: ModifyDBCluster -> Maybe ServerlessV2ScalingConfiguration
$sel:scalingConfiguration:ModifyDBCluster' :: ModifyDBCluster -> Maybe ScalingConfiguration
$sel:rotateMasterUserPassword:ModifyDBCluster' :: ModifyDBCluster -> Maybe Bool
$sel:preferredMaintenanceWindow:ModifyDBCluster' :: ModifyDBCluster -> Maybe Text
$sel:preferredBackupWindow:ModifyDBCluster' :: ModifyDBCluster -> Maybe Text
$sel:port:ModifyDBCluster' :: ModifyDBCluster -> Maybe Int
$sel:performanceInsightsRetentionPeriod:ModifyDBCluster' :: ModifyDBCluster -> Maybe Int
$sel:performanceInsightsKMSKeyId:ModifyDBCluster' :: ModifyDBCluster -> Maybe Text
$sel:optionGroupName:ModifyDBCluster' :: ModifyDBCluster -> Maybe Text
$sel:newDBClusterIdentifier':ModifyDBCluster' :: ModifyDBCluster -> Maybe Text
$sel:networkType:ModifyDBCluster' :: ModifyDBCluster -> Maybe Text
$sel:monitoringRoleArn:ModifyDBCluster' :: ModifyDBCluster -> Maybe Text
$sel:monitoringInterval:ModifyDBCluster' :: ModifyDBCluster -> Maybe Int
$sel:masterUserSecretKmsKeyId:ModifyDBCluster' :: ModifyDBCluster -> Maybe Text
$sel:masterUserPassword:ModifyDBCluster' :: ModifyDBCluster -> Maybe Text
$sel:manageMasterUserPassword:ModifyDBCluster' :: ModifyDBCluster -> Maybe Bool
$sel:iops:ModifyDBCluster' :: ModifyDBCluster -> Maybe Int
$sel:engineVersion:ModifyDBCluster' :: ModifyDBCluster -> Maybe Text
$sel:enablePerformanceInsights:ModifyDBCluster' :: ModifyDBCluster -> Maybe Bool
$sel:enableIAMDatabaseAuthentication:ModifyDBCluster' :: ModifyDBCluster -> Maybe Bool
$sel:enableHttpEndpoint:ModifyDBCluster' :: ModifyDBCluster -> Maybe Bool
$sel:enableGlobalWriteForwarding:ModifyDBCluster' :: ModifyDBCluster -> Maybe Bool
$sel:domainIAMRoleName:ModifyDBCluster' :: ModifyDBCluster -> Maybe Text
$sel:domain:ModifyDBCluster' :: ModifyDBCluster -> Maybe Text
$sel:deletionProtection:ModifyDBCluster' :: ModifyDBCluster -> Maybe Bool
$sel:dbInstanceParameterGroupName:ModifyDBCluster' :: ModifyDBCluster -> Maybe Text
$sel:dbClusterParameterGroupName:ModifyDBCluster' :: ModifyDBCluster -> Maybe Text
$sel:dbClusterInstanceClass:ModifyDBCluster' :: ModifyDBCluster -> Maybe Text
$sel:copyTagsToSnapshot:ModifyDBCluster' :: ModifyDBCluster -> Maybe Bool
$sel:cloudwatchLogsExportConfiguration:ModifyDBCluster' :: ModifyDBCluster -> Maybe CloudwatchLogsExportConfiguration
$sel:backupRetentionPeriod:ModifyDBCluster' :: ModifyDBCluster -> Maybe Int
$sel:backtrackWindow:ModifyDBCluster' :: ModifyDBCluster -> Maybe Integer
$sel:autoMinorVersionUpgrade:ModifyDBCluster' :: ModifyDBCluster -> Maybe Bool
$sel:applyImmediately:ModifyDBCluster' :: ModifyDBCluster -> Maybe Bool
$sel:allowMajorVersionUpgrade:ModifyDBCluster' :: ModifyDBCluster -> Maybe Bool
$sel:allocatedStorage:ModifyDBCluster' :: ModifyDBCluster -> Maybe Int
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe Int
allocatedStorage
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Bool
allowMajorVersionUpgrade
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Bool
applyImmediately
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Bool
autoMinorVersionUpgrade
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Integer
backtrackWindow
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Int
backupRetentionPeriod
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe CloudwatchLogsExportConfiguration
cloudwatchLogsExportConfiguration
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Bool
copyTagsToSnapshot
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
dbClusterInstanceClass
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
dbClusterParameterGroupName
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
dbInstanceParameterGroupName
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Bool
deletionProtection
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
domain
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
domainIAMRoleName
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Bool
enableGlobalWriteForwarding
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Bool
enableHttpEndpoint
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf
Maybe Bool
enableIAMDatabaseAuthentication
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf
Maybe Bool
enablePerformanceInsights
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
engineVersion
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Int
iops
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf
Maybe Bool
manageMasterUserPassword
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf
Maybe Text
masterUserPassword
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf
Maybe Text
masterUserSecretKmsKeyId
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf
Maybe Int
monitoringInterval
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf
Maybe Text
monitoringRoleArn
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf
Maybe Text
networkType
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf
Maybe Text
newDBClusterIdentifier'
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf
Maybe Text
optionGroupName
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf
Maybe Text
performanceInsightsKMSKeyId
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf
Maybe Int
performanceInsightsRetentionPeriod
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 Text
preferredBackupWindow
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf
Maybe Text
preferredMaintenanceWindow
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf
Maybe Bool
rotateMasterUserPassword
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf
Maybe ScalingConfiguration
scalingConfiguration
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf
Maybe ServerlessV2ScalingConfiguration
serverlessV2ScalingConfiguration
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf
Maybe Text
storageType
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf
Maybe [Text]
vpcSecurityGroupIds
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf
Text
dbClusterIdentifier
instance Data.ToHeaders ModifyDBCluster where
toHeaders :: ModifyDBCluster -> ResponseHeaders
toHeaders = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty
instance Data.ToPath ModifyDBCluster where
toPath :: ModifyDBCluster -> ByteString
toPath = forall a b. a -> b -> a
Prelude.const ByteString
"/"
instance Data.ToQuery ModifyDBCluster where
toQuery :: ModifyDBCluster -> QueryString
toQuery ModifyDBCluster' {Maybe Bool
Maybe Int
Maybe Integer
Maybe [Text]
Maybe Text
Maybe CloudwatchLogsExportConfiguration
Maybe ScalingConfiguration
Maybe ServerlessV2ScalingConfiguration
Text
dbClusterIdentifier :: Text
vpcSecurityGroupIds :: Maybe [Text]
storageType :: Maybe Text
serverlessV2ScalingConfiguration :: Maybe ServerlessV2ScalingConfiguration
scalingConfiguration :: Maybe ScalingConfiguration
rotateMasterUserPassword :: Maybe Bool
preferredMaintenanceWindow :: Maybe Text
preferredBackupWindow :: Maybe Text
port :: Maybe Int
performanceInsightsRetentionPeriod :: Maybe Int
performanceInsightsKMSKeyId :: Maybe Text
optionGroupName :: Maybe Text
newDBClusterIdentifier' :: Maybe Text
networkType :: Maybe Text
monitoringRoleArn :: Maybe Text
monitoringInterval :: Maybe Int
masterUserSecretKmsKeyId :: Maybe Text
masterUserPassword :: Maybe Text
manageMasterUserPassword :: Maybe Bool
iops :: Maybe Int
engineVersion :: Maybe Text
enablePerformanceInsights :: Maybe Bool
enableIAMDatabaseAuthentication :: Maybe Bool
enableHttpEndpoint :: Maybe Bool
enableGlobalWriteForwarding :: Maybe Bool
domainIAMRoleName :: Maybe Text
domain :: Maybe Text
deletionProtection :: Maybe Bool
dbInstanceParameterGroupName :: Maybe Text
dbClusterParameterGroupName :: Maybe Text
dbClusterInstanceClass :: Maybe Text
copyTagsToSnapshot :: Maybe Bool
cloudwatchLogsExportConfiguration :: Maybe CloudwatchLogsExportConfiguration
backupRetentionPeriod :: Maybe Int
backtrackWindow :: Maybe Integer
autoMinorVersionUpgrade :: Maybe Bool
applyImmediately :: Maybe Bool
allowMajorVersionUpgrade :: Maybe Bool
allocatedStorage :: Maybe Int
$sel:dbClusterIdentifier:ModifyDBCluster' :: ModifyDBCluster -> Text
$sel:vpcSecurityGroupIds:ModifyDBCluster' :: ModifyDBCluster -> Maybe [Text]
$sel:storageType:ModifyDBCluster' :: ModifyDBCluster -> Maybe Text
$sel:serverlessV2ScalingConfiguration:ModifyDBCluster' :: ModifyDBCluster -> Maybe ServerlessV2ScalingConfiguration
$sel:scalingConfiguration:ModifyDBCluster' :: ModifyDBCluster -> Maybe ScalingConfiguration
$sel:rotateMasterUserPassword:ModifyDBCluster' :: ModifyDBCluster -> Maybe Bool
$sel:preferredMaintenanceWindow:ModifyDBCluster' :: ModifyDBCluster -> Maybe Text
$sel:preferredBackupWindow:ModifyDBCluster' :: ModifyDBCluster -> Maybe Text
$sel:port:ModifyDBCluster' :: ModifyDBCluster -> Maybe Int
$sel:performanceInsightsRetentionPeriod:ModifyDBCluster' :: ModifyDBCluster -> Maybe Int
$sel:performanceInsightsKMSKeyId:ModifyDBCluster' :: ModifyDBCluster -> Maybe Text
$sel:optionGroupName:ModifyDBCluster' :: ModifyDBCluster -> Maybe Text
$sel:newDBClusterIdentifier':ModifyDBCluster' :: ModifyDBCluster -> Maybe Text
$sel:networkType:ModifyDBCluster' :: ModifyDBCluster -> Maybe Text
$sel:monitoringRoleArn:ModifyDBCluster' :: ModifyDBCluster -> Maybe Text
$sel:monitoringInterval:ModifyDBCluster' :: ModifyDBCluster -> Maybe Int
$sel:masterUserSecretKmsKeyId:ModifyDBCluster' :: ModifyDBCluster -> Maybe Text
$sel:masterUserPassword:ModifyDBCluster' :: ModifyDBCluster -> Maybe Text
$sel:manageMasterUserPassword:ModifyDBCluster' :: ModifyDBCluster -> Maybe Bool
$sel:iops:ModifyDBCluster' :: ModifyDBCluster -> Maybe Int
$sel:engineVersion:ModifyDBCluster' :: ModifyDBCluster -> Maybe Text
$sel:enablePerformanceInsights:ModifyDBCluster' :: ModifyDBCluster -> Maybe Bool
$sel:enableIAMDatabaseAuthentication:ModifyDBCluster' :: ModifyDBCluster -> Maybe Bool
$sel:enableHttpEndpoint:ModifyDBCluster' :: ModifyDBCluster -> Maybe Bool
$sel:enableGlobalWriteForwarding:ModifyDBCluster' :: ModifyDBCluster -> Maybe Bool
$sel:domainIAMRoleName:ModifyDBCluster' :: ModifyDBCluster -> Maybe Text
$sel:domain:ModifyDBCluster' :: ModifyDBCluster -> Maybe Text
$sel:deletionProtection:ModifyDBCluster' :: ModifyDBCluster -> Maybe Bool
$sel:dbInstanceParameterGroupName:ModifyDBCluster' :: ModifyDBCluster -> Maybe Text
$sel:dbClusterParameterGroupName:ModifyDBCluster' :: ModifyDBCluster -> Maybe Text
$sel:dbClusterInstanceClass:ModifyDBCluster' :: ModifyDBCluster -> Maybe Text
$sel:copyTagsToSnapshot:ModifyDBCluster' :: ModifyDBCluster -> Maybe Bool
$sel:cloudwatchLogsExportConfiguration:ModifyDBCluster' :: ModifyDBCluster -> Maybe CloudwatchLogsExportConfiguration
$sel:backupRetentionPeriod:ModifyDBCluster' :: ModifyDBCluster -> Maybe Int
$sel:backtrackWindow:ModifyDBCluster' :: ModifyDBCluster -> Maybe Integer
$sel:autoMinorVersionUpgrade:ModifyDBCluster' :: ModifyDBCluster -> Maybe Bool
$sel:applyImmediately:ModifyDBCluster' :: ModifyDBCluster -> Maybe Bool
$sel:allowMajorVersionUpgrade:ModifyDBCluster' :: ModifyDBCluster -> Maybe Bool
$sel:allocatedStorage:ModifyDBCluster' :: ModifyDBCluster -> Maybe Int
..} =
forall a. Monoid a => [a] -> a
Prelude.mconcat
[ ByteString
"Action"
forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: (ByteString
"ModifyDBCluster" :: Prelude.ByteString),
ByteString
"Version"
forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: (ByteString
"2014-10-31" :: Prelude.ByteString),
ByteString
"AllocatedStorage" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Int
allocatedStorage,
ByteString
"AllowMajorVersionUpgrade"
forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Bool
allowMajorVersionUpgrade,
ByteString
"ApplyImmediately" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Bool
applyImmediately,
ByteString
"AutoMinorVersionUpgrade"
forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Bool
autoMinorVersionUpgrade,
ByteString
"BacktrackWindow" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Integer
backtrackWindow,
ByteString
"BackupRetentionPeriod"
forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Int
backupRetentionPeriod,
ByteString
"CloudwatchLogsExportConfiguration"
forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe CloudwatchLogsExportConfiguration
cloudwatchLogsExportConfiguration,
ByteString
"CopyTagsToSnapshot" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Bool
copyTagsToSnapshot,
ByteString
"DBClusterInstanceClass"
forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
dbClusterInstanceClass,
ByteString
"DBClusterParameterGroupName"
forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
dbClusterParameterGroupName,
ByteString
"DBInstanceParameterGroupName"
forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
dbInstanceParameterGroupName,
ByteString
"DeletionProtection" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Bool
deletionProtection,
ByteString
"Domain" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
domain,
ByteString
"DomainIAMRoleName" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
domainIAMRoleName,
ByteString
"EnableGlobalWriteForwarding"
forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Bool
enableGlobalWriteForwarding,
ByteString
"EnableHttpEndpoint" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Bool
enableHttpEndpoint,
ByteString
"EnableIAMDatabaseAuthentication"
forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Bool
enableIAMDatabaseAuthentication,
ByteString
"EnablePerformanceInsights"
forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Bool
enablePerformanceInsights,
ByteString
"EngineVersion" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
engineVersion,
ByteString
"Iops" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Int
iops,
ByteString
"ManageMasterUserPassword"
forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Bool
manageMasterUserPassword,
ByteString
"MasterUserPassword" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
masterUserPassword,
ByteString
"MasterUserSecretKmsKeyId"
forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
masterUserSecretKmsKeyId,
ByteString
"MonitoringInterval" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Int
monitoringInterval,
ByteString
"MonitoringRoleArn" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
monitoringRoleArn,
ByteString
"NetworkType" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
networkType,
ByteString
"NewDBClusterIdentifier"
forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
newDBClusterIdentifier',
ByteString
"OptionGroupName" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
optionGroupName,
ByteString
"PerformanceInsightsKMSKeyId"
forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
performanceInsightsKMSKeyId,
ByteString
"PerformanceInsightsRetentionPeriod"
forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Int
performanceInsightsRetentionPeriod,
ByteString
"Port" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Int
port,
ByteString
"PreferredBackupWindow"
forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
preferredBackupWindow,
ByteString
"PreferredMaintenanceWindow"
forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
preferredMaintenanceWindow,
ByteString
"RotateMasterUserPassword"
forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Bool
rotateMasterUserPassword,
ByteString
"ScalingConfiguration" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe ScalingConfiguration
scalingConfiguration,
ByteString
"ServerlessV2ScalingConfiguration"
forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe ServerlessV2ScalingConfiguration
serverlessV2ScalingConfiguration,
ByteString
"StorageType" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
storageType,
ByteString
"VpcSecurityGroupIds"
forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: forall a. ToQuery a => a -> QueryString
Data.toQuery
( forall a.
(IsList a, ToQuery (Item a)) =>
ByteString -> a -> QueryString
Data.toQueryList ByteString
"VpcSecurityGroupId"
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [Text]
vpcSecurityGroupIds
),
ByteString
"DBClusterIdentifier" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Text
dbClusterIdentifier
]
data ModifyDBClusterResponse = ModifyDBClusterResponse'
{ ModifyDBClusterResponse -> Maybe DBCluster
dbCluster :: Prelude.Maybe DBCluster,
ModifyDBClusterResponse -> Int
httpStatus :: Prelude.Int
}
deriving (ModifyDBClusterResponse -> ModifyDBClusterResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ModifyDBClusterResponse -> ModifyDBClusterResponse -> Bool
$c/= :: ModifyDBClusterResponse -> ModifyDBClusterResponse -> Bool
== :: ModifyDBClusterResponse -> ModifyDBClusterResponse -> Bool
$c== :: ModifyDBClusterResponse -> ModifyDBClusterResponse -> Bool
Prelude.Eq, ReadPrec [ModifyDBClusterResponse]
ReadPrec ModifyDBClusterResponse
Int -> ReadS ModifyDBClusterResponse
ReadS [ModifyDBClusterResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [ModifyDBClusterResponse]
$creadListPrec :: ReadPrec [ModifyDBClusterResponse]
readPrec :: ReadPrec ModifyDBClusterResponse
$creadPrec :: ReadPrec ModifyDBClusterResponse
readList :: ReadS [ModifyDBClusterResponse]
$creadList :: ReadS [ModifyDBClusterResponse]
readsPrec :: Int -> ReadS ModifyDBClusterResponse
$creadsPrec :: Int -> ReadS ModifyDBClusterResponse
Prelude.Read, Int -> ModifyDBClusterResponse -> ShowS
[ModifyDBClusterResponse] -> ShowS
ModifyDBClusterResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ModifyDBClusterResponse] -> ShowS
$cshowList :: [ModifyDBClusterResponse] -> ShowS
show :: ModifyDBClusterResponse -> String
$cshow :: ModifyDBClusterResponse -> String
showsPrec :: Int -> ModifyDBClusterResponse -> ShowS
$cshowsPrec :: Int -> ModifyDBClusterResponse -> ShowS
Prelude.Show, forall x. Rep ModifyDBClusterResponse x -> ModifyDBClusterResponse
forall x. ModifyDBClusterResponse -> Rep ModifyDBClusterResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep ModifyDBClusterResponse x -> ModifyDBClusterResponse
$cfrom :: forall x. ModifyDBClusterResponse -> Rep ModifyDBClusterResponse x
Prelude.Generic)
newModifyDBClusterResponse ::
Prelude.Int ->
ModifyDBClusterResponse
newModifyDBClusterResponse :: Int -> ModifyDBClusterResponse
newModifyDBClusterResponse Int
pHttpStatus_ =
ModifyDBClusterResponse'
{ $sel:dbCluster:ModifyDBClusterResponse' :: Maybe DBCluster
dbCluster =
forall a. Maybe a
Prelude.Nothing,
$sel:httpStatus:ModifyDBClusterResponse' :: Int
httpStatus = Int
pHttpStatus_
}
modifyDBClusterResponse_dbCluster :: Lens.Lens' ModifyDBClusterResponse (Prelude.Maybe DBCluster)
modifyDBClusterResponse_dbCluster :: Lens' ModifyDBClusterResponse (Maybe DBCluster)
modifyDBClusterResponse_dbCluster = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyDBClusterResponse' {Maybe DBCluster
dbCluster :: Maybe DBCluster
$sel:dbCluster:ModifyDBClusterResponse' :: ModifyDBClusterResponse -> Maybe DBCluster
dbCluster} -> Maybe DBCluster
dbCluster) (\s :: ModifyDBClusterResponse
s@ModifyDBClusterResponse' {} Maybe DBCluster
a -> ModifyDBClusterResponse
s {$sel:dbCluster:ModifyDBClusterResponse' :: Maybe DBCluster
dbCluster = Maybe DBCluster
a} :: ModifyDBClusterResponse)
modifyDBClusterResponse_httpStatus :: Lens.Lens' ModifyDBClusterResponse Prelude.Int
modifyDBClusterResponse_httpStatus :: Lens' ModifyDBClusterResponse Int
modifyDBClusterResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyDBClusterResponse' {Int
httpStatus :: Int
$sel:httpStatus:ModifyDBClusterResponse' :: ModifyDBClusterResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: ModifyDBClusterResponse
s@ModifyDBClusterResponse' {} Int
a -> ModifyDBClusterResponse
s {$sel:httpStatus:ModifyDBClusterResponse' :: Int
httpStatus = Int
a} :: ModifyDBClusterResponse)
instance Prelude.NFData ModifyDBClusterResponse where
rnf :: ModifyDBClusterResponse -> ()
rnf ModifyDBClusterResponse' {Int
Maybe DBCluster
httpStatus :: Int
dbCluster :: Maybe DBCluster
$sel:httpStatus:ModifyDBClusterResponse' :: ModifyDBClusterResponse -> Int
$sel:dbCluster:ModifyDBClusterResponse' :: ModifyDBClusterResponse -> Maybe DBCluster
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe DBCluster
dbCluster
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Int
httpStatus