{-# 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.CreateDBInstanceReadReplica
(
CreateDBInstanceReadReplica (..),
newCreateDBInstanceReadReplica,
createDBInstanceReadReplica_autoMinorVersionUpgrade,
createDBInstanceReadReplica_availabilityZone,
createDBInstanceReadReplica_copyTagsToSnapshot,
createDBInstanceReadReplica_customIamInstanceProfile,
createDBInstanceReadReplica_dbInstanceClass,
createDBInstanceReadReplica_dbParameterGroupName,
createDBInstanceReadReplica_dbSubnetGroupName,
createDBInstanceReadReplica_deletionProtection,
createDBInstanceReadReplica_destinationRegion,
createDBInstanceReadReplica_domain,
createDBInstanceReadReplica_domainIAMRoleName,
createDBInstanceReadReplica_enableCloudwatchLogsExports,
createDBInstanceReadReplica_enableCustomerOwnedIp,
createDBInstanceReadReplica_enableIAMDatabaseAuthentication,
createDBInstanceReadReplica_enablePerformanceInsights,
createDBInstanceReadReplica_iops,
createDBInstanceReadReplica_kmsKeyId,
createDBInstanceReadReplica_maxAllocatedStorage,
createDBInstanceReadReplica_monitoringInterval,
createDBInstanceReadReplica_monitoringRoleArn,
createDBInstanceReadReplica_multiAZ,
createDBInstanceReadReplica_networkType,
createDBInstanceReadReplica_optionGroupName,
createDBInstanceReadReplica_performanceInsightsKMSKeyId,
createDBInstanceReadReplica_performanceInsightsRetentionPeriod,
createDBInstanceReadReplica_port,
createDBInstanceReadReplica_preSignedUrl,
createDBInstanceReadReplica_processorFeatures,
createDBInstanceReadReplica_publiclyAccessible,
createDBInstanceReadReplica_replicaMode,
createDBInstanceReadReplica_storageThroughput,
createDBInstanceReadReplica_storageType,
createDBInstanceReadReplica_tags,
createDBInstanceReadReplica_useDefaultProcessorFeatures,
createDBInstanceReadReplica_vpcSecurityGroupIds,
createDBInstanceReadReplica_dbInstanceIdentifier,
createDBInstanceReadReplica_sourceDBInstanceIdentifier,
CreateDBInstanceReadReplicaResponse (..),
newCreateDBInstanceReadReplicaResponse,
createDBInstanceReadReplicaResponse_dbInstance,
createDBInstanceReadReplicaResponse_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 CreateDBInstanceReadReplica = CreateDBInstanceReadReplica'
{
CreateDBInstanceReadReplica -> Maybe Bool
autoMinorVersionUpgrade :: Prelude.Maybe Prelude.Bool,
CreateDBInstanceReadReplica -> Maybe Text
availabilityZone :: Prelude.Maybe Prelude.Text,
CreateDBInstanceReadReplica -> Maybe Bool
copyTagsToSnapshot :: Prelude.Maybe Prelude.Bool,
CreateDBInstanceReadReplica -> Maybe Text
customIamInstanceProfile :: Prelude.Maybe Prelude.Text,
CreateDBInstanceReadReplica -> Maybe Text
dbInstanceClass :: Prelude.Maybe Prelude.Text,
CreateDBInstanceReadReplica -> Maybe Text
dbParameterGroupName :: Prelude.Maybe Prelude.Text,
CreateDBInstanceReadReplica -> Maybe Text
dbSubnetGroupName :: Prelude.Maybe Prelude.Text,
CreateDBInstanceReadReplica -> Maybe Bool
deletionProtection :: Prelude.Maybe Prelude.Bool,
CreateDBInstanceReadReplica -> Maybe Text
destinationRegion :: Prelude.Maybe Prelude.Text,
CreateDBInstanceReadReplica -> Maybe Text
domain :: Prelude.Maybe Prelude.Text,
CreateDBInstanceReadReplica -> Maybe Text
domainIAMRoleName :: Prelude.Maybe Prelude.Text,
CreateDBInstanceReadReplica -> Maybe [Text]
enableCloudwatchLogsExports :: Prelude.Maybe [Prelude.Text],
CreateDBInstanceReadReplica -> Maybe Bool
enableCustomerOwnedIp :: Prelude.Maybe Prelude.Bool,
CreateDBInstanceReadReplica -> Maybe Bool
enableIAMDatabaseAuthentication :: Prelude.Maybe Prelude.Bool,
CreateDBInstanceReadReplica -> Maybe Bool
enablePerformanceInsights :: Prelude.Maybe Prelude.Bool,
CreateDBInstanceReadReplica -> Maybe Int
iops :: Prelude.Maybe Prelude.Int,
CreateDBInstanceReadReplica -> Maybe Text
kmsKeyId :: Prelude.Maybe Prelude.Text,
CreateDBInstanceReadReplica -> Maybe Int
maxAllocatedStorage :: Prelude.Maybe Prelude.Int,
CreateDBInstanceReadReplica -> Maybe Int
monitoringInterval :: Prelude.Maybe Prelude.Int,
CreateDBInstanceReadReplica -> Maybe Text
monitoringRoleArn :: Prelude.Maybe Prelude.Text,
CreateDBInstanceReadReplica -> Maybe Bool
multiAZ :: Prelude.Maybe Prelude.Bool,
CreateDBInstanceReadReplica -> Maybe Text
networkType :: Prelude.Maybe Prelude.Text,
CreateDBInstanceReadReplica -> Maybe Text
optionGroupName :: Prelude.Maybe Prelude.Text,
CreateDBInstanceReadReplica -> Maybe Text
performanceInsightsKMSKeyId :: Prelude.Maybe Prelude.Text,
CreateDBInstanceReadReplica -> Maybe Int
performanceInsightsRetentionPeriod :: Prelude.Maybe Prelude.Int,
CreateDBInstanceReadReplica -> Maybe Int
port :: Prelude.Maybe Prelude.Int,
CreateDBInstanceReadReplica -> Maybe Text
preSignedUrl :: Prelude.Maybe Prelude.Text,
CreateDBInstanceReadReplica -> Maybe [ProcessorFeature]
processorFeatures :: Prelude.Maybe [ProcessorFeature],
CreateDBInstanceReadReplica -> Maybe Bool
publiclyAccessible :: Prelude.Maybe Prelude.Bool,
CreateDBInstanceReadReplica -> Maybe ReplicaMode
replicaMode :: Prelude.Maybe ReplicaMode,
CreateDBInstanceReadReplica -> Maybe Int
storageThroughput :: Prelude.Maybe Prelude.Int,
CreateDBInstanceReadReplica -> Maybe Text
storageType :: Prelude.Maybe Prelude.Text,
CreateDBInstanceReadReplica -> Maybe [Tag]
tags :: Prelude.Maybe [Tag],
CreateDBInstanceReadReplica -> Maybe Bool
useDefaultProcessorFeatures :: Prelude.Maybe Prelude.Bool,
CreateDBInstanceReadReplica -> Maybe [Text]
vpcSecurityGroupIds :: Prelude.Maybe [Prelude.Text],
CreateDBInstanceReadReplica -> Text
dbInstanceIdentifier :: Prelude.Text,
CreateDBInstanceReadReplica -> Text
sourceDBInstanceIdentifier :: Prelude.Text
}
deriving (CreateDBInstanceReadReplica -> CreateDBInstanceReadReplica -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: CreateDBInstanceReadReplica -> CreateDBInstanceReadReplica -> Bool
$c/= :: CreateDBInstanceReadReplica -> CreateDBInstanceReadReplica -> Bool
== :: CreateDBInstanceReadReplica -> CreateDBInstanceReadReplica -> Bool
$c== :: CreateDBInstanceReadReplica -> CreateDBInstanceReadReplica -> Bool
Prelude.Eq, ReadPrec [CreateDBInstanceReadReplica]
ReadPrec CreateDBInstanceReadReplica
Int -> ReadS CreateDBInstanceReadReplica
ReadS [CreateDBInstanceReadReplica]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [CreateDBInstanceReadReplica]
$creadListPrec :: ReadPrec [CreateDBInstanceReadReplica]
readPrec :: ReadPrec CreateDBInstanceReadReplica
$creadPrec :: ReadPrec CreateDBInstanceReadReplica
readList :: ReadS [CreateDBInstanceReadReplica]
$creadList :: ReadS [CreateDBInstanceReadReplica]
readsPrec :: Int -> ReadS CreateDBInstanceReadReplica
$creadsPrec :: Int -> ReadS CreateDBInstanceReadReplica
Prelude.Read, Int -> CreateDBInstanceReadReplica -> ShowS
[CreateDBInstanceReadReplica] -> ShowS
CreateDBInstanceReadReplica -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [CreateDBInstanceReadReplica] -> ShowS
$cshowList :: [CreateDBInstanceReadReplica] -> ShowS
show :: CreateDBInstanceReadReplica -> String
$cshow :: CreateDBInstanceReadReplica -> String
showsPrec :: Int -> CreateDBInstanceReadReplica -> ShowS
$cshowsPrec :: Int -> CreateDBInstanceReadReplica -> ShowS
Prelude.Show, forall x.
Rep CreateDBInstanceReadReplica x -> CreateDBInstanceReadReplica
forall x.
CreateDBInstanceReadReplica -> Rep CreateDBInstanceReadReplica x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep CreateDBInstanceReadReplica x -> CreateDBInstanceReadReplica
$cfrom :: forall x.
CreateDBInstanceReadReplica -> Rep CreateDBInstanceReadReplica x
Prelude.Generic)
newCreateDBInstanceReadReplica ::
Prelude.Text ->
Prelude.Text ->
CreateDBInstanceReadReplica
newCreateDBInstanceReadReplica :: Text -> Text -> CreateDBInstanceReadReplica
newCreateDBInstanceReadReplica
Text
pDBInstanceIdentifier_
Text
pSourceDBInstanceIdentifier_ =
CreateDBInstanceReadReplica'
{ $sel:autoMinorVersionUpgrade:CreateDBInstanceReadReplica' :: Maybe Bool
autoMinorVersionUpgrade =
forall a. Maybe a
Prelude.Nothing,
$sel:availabilityZone:CreateDBInstanceReadReplica' :: Maybe Text
availabilityZone = forall a. Maybe a
Prelude.Nothing,
$sel:copyTagsToSnapshot:CreateDBInstanceReadReplica' :: Maybe Bool
copyTagsToSnapshot = forall a. Maybe a
Prelude.Nothing,
$sel:customIamInstanceProfile:CreateDBInstanceReadReplica' :: Maybe Text
customIamInstanceProfile = forall a. Maybe a
Prelude.Nothing,
$sel:dbInstanceClass:CreateDBInstanceReadReplica' :: Maybe Text
dbInstanceClass = forall a. Maybe a
Prelude.Nothing,
$sel:dbParameterGroupName:CreateDBInstanceReadReplica' :: Maybe Text
dbParameterGroupName = forall a. Maybe a
Prelude.Nothing,
$sel:dbSubnetGroupName:CreateDBInstanceReadReplica' :: Maybe Text
dbSubnetGroupName = forall a. Maybe a
Prelude.Nothing,
$sel:deletionProtection:CreateDBInstanceReadReplica' :: Maybe Bool
deletionProtection = forall a. Maybe a
Prelude.Nothing,
$sel:destinationRegion:CreateDBInstanceReadReplica' :: Maybe Text
destinationRegion = forall a. Maybe a
Prelude.Nothing,
$sel:domain:CreateDBInstanceReadReplica' :: Maybe Text
domain = forall a. Maybe a
Prelude.Nothing,
$sel:domainIAMRoleName:CreateDBInstanceReadReplica' :: Maybe Text
domainIAMRoleName = forall a. Maybe a
Prelude.Nothing,
$sel:enableCloudwatchLogsExports:CreateDBInstanceReadReplica' :: Maybe [Text]
enableCloudwatchLogsExports = forall a. Maybe a
Prelude.Nothing,
$sel:enableCustomerOwnedIp:CreateDBInstanceReadReplica' :: Maybe Bool
enableCustomerOwnedIp = forall a. Maybe a
Prelude.Nothing,
$sel:enableIAMDatabaseAuthentication:CreateDBInstanceReadReplica' :: Maybe Bool
enableIAMDatabaseAuthentication =
forall a. Maybe a
Prelude.Nothing,
$sel:enablePerformanceInsights:CreateDBInstanceReadReplica' :: Maybe Bool
enablePerformanceInsights = forall a. Maybe a
Prelude.Nothing,
$sel:iops:CreateDBInstanceReadReplica' :: Maybe Int
iops = forall a. Maybe a
Prelude.Nothing,
$sel:kmsKeyId:CreateDBInstanceReadReplica' :: Maybe Text
kmsKeyId = forall a. Maybe a
Prelude.Nothing,
$sel:maxAllocatedStorage:CreateDBInstanceReadReplica' :: Maybe Int
maxAllocatedStorage = forall a. Maybe a
Prelude.Nothing,
$sel:monitoringInterval:CreateDBInstanceReadReplica' :: Maybe Int
monitoringInterval = forall a. Maybe a
Prelude.Nothing,
$sel:monitoringRoleArn:CreateDBInstanceReadReplica' :: Maybe Text
monitoringRoleArn = forall a. Maybe a
Prelude.Nothing,
$sel:multiAZ:CreateDBInstanceReadReplica' :: Maybe Bool
multiAZ = forall a. Maybe a
Prelude.Nothing,
$sel:networkType:CreateDBInstanceReadReplica' :: Maybe Text
networkType = forall a. Maybe a
Prelude.Nothing,
$sel:optionGroupName:CreateDBInstanceReadReplica' :: Maybe Text
optionGroupName = forall a. Maybe a
Prelude.Nothing,
$sel:performanceInsightsKMSKeyId:CreateDBInstanceReadReplica' :: Maybe Text
performanceInsightsKMSKeyId = forall a. Maybe a
Prelude.Nothing,
$sel:performanceInsightsRetentionPeriod:CreateDBInstanceReadReplica' :: Maybe Int
performanceInsightsRetentionPeriod =
forall a. Maybe a
Prelude.Nothing,
$sel:port:CreateDBInstanceReadReplica' :: Maybe Int
port = forall a. Maybe a
Prelude.Nothing,
$sel:preSignedUrl:CreateDBInstanceReadReplica' :: Maybe Text
preSignedUrl = forall a. Maybe a
Prelude.Nothing,
$sel:processorFeatures:CreateDBInstanceReadReplica' :: Maybe [ProcessorFeature]
processorFeatures = forall a. Maybe a
Prelude.Nothing,
$sel:publiclyAccessible:CreateDBInstanceReadReplica' :: Maybe Bool
publiclyAccessible = forall a. Maybe a
Prelude.Nothing,
$sel:replicaMode:CreateDBInstanceReadReplica' :: Maybe ReplicaMode
replicaMode = forall a. Maybe a
Prelude.Nothing,
$sel:storageThroughput:CreateDBInstanceReadReplica' :: Maybe Int
storageThroughput = forall a. Maybe a
Prelude.Nothing,
$sel:storageType:CreateDBInstanceReadReplica' :: Maybe Text
storageType = forall a. Maybe a
Prelude.Nothing,
$sel:tags:CreateDBInstanceReadReplica' :: Maybe [Tag]
tags = forall a. Maybe a
Prelude.Nothing,
$sel:useDefaultProcessorFeatures:CreateDBInstanceReadReplica' :: Maybe Bool
useDefaultProcessorFeatures = forall a. Maybe a
Prelude.Nothing,
$sel:vpcSecurityGroupIds:CreateDBInstanceReadReplica' :: Maybe [Text]
vpcSecurityGroupIds = forall a. Maybe a
Prelude.Nothing,
$sel:dbInstanceIdentifier:CreateDBInstanceReadReplica' :: Text
dbInstanceIdentifier = Text
pDBInstanceIdentifier_,
$sel:sourceDBInstanceIdentifier:CreateDBInstanceReadReplica' :: Text
sourceDBInstanceIdentifier =
Text
pSourceDBInstanceIdentifier_
}
createDBInstanceReadReplica_autoMinorVersionUpgrade :: Lens.Lens' CreateDBInstanceReadReplica (Prelude.Maybe Prelude.Bool)
createDBInstanceReadReplica_autoMinorVersionUpgrade :: Lens' CreateDBInstanceReadReplica (Maybe Bool)
createDBInstanceReadReplica_autoMinorVersionUpgrade = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDBInstanceReadReplica' {Maybe Bool
autoMinorVersionUpgrade :: Maybe Bool
$sel:autoMinorVersionUpgrade:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Bool
autoMinorVersionUpgrade} -> Maybe Bool
autoMinorVersionUpgrade) (\s :: CreateDBInstanceReadReplica
s@CreateDBInstanceReadReplica' {} Maybe Bool
a -> CreateDBInstanceReadReplica
s {$sel:autoMinorVersionUpgrade:CreateDBInstanceReadReplica' :: Maybe Bool
autoMinorVersionUpgrade = Maybe Bool
a} :: CreateDBInstanceReadReplica)
createDBInstanceReadReplica_availabilityZone :: Lens.Lens' CreateDBInstanceReadReplica (Prelude.Maybe Prelude.Text)
createDBInstanceReadReplica_availabilityZone :: Lens' CreateDBInstanceReadReplica (Maybe Text)
createDBInstanceReadReplica_availabilityZone = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDBInstanceReadReplica' {Maybe Text
availabilityZone :: Maybe Text
$sel:availabilityZone:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Text
availabilityZone} -> Maybe Text
availabilityZone) (\s :: CreateDBInstanceReadReplica
s@CreateDBInstanceReadReplica' {} Maybe Text
a -> CreateDBInstanceReadReplica
s {$sel:availabilityZone:CreateDBInstanceReadReplica' :: Maybe Text
availabilityZone = Maybe Text
a} :: CreateDBInstanceReadReplica)
createDBInstanceReadReplica_copyTagsToSnapshot :: Lens.Lens' CreateDBInstanceReadReplica (Prelude.Maybe Prelude.Bool)
createDBInstanceReadReplica_copyTagsToSnapshot :: Lens' CreateDBInstanceReadReplica (Maybe Bool)
createDBInstanceReadReplica_copyTagsToSnapshot = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDBInstanceReadReplica' {Maybe Bool
copyTagsToSnapshot :: Maybe Bool
$sel:copyTagsToSnapshot:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Bool
copyTagsToSnapshot} -> Maybe Bool
copyTagsToSnapshot) (\s :: CreateDBInstanceReadReplica
s@CreateDBInstanceReadReplica' {} Maybe Bool
a -> CreateDBInstanceReadReplica
s {$sel:copyTagsToSnapshot:CreateDBInstanceReadReplica' :: Maybe Bool
copyTagsToSnapshot = Maybe Bool
a} :: CreateDBInstanceReadReplica)
createDBInstanceReadReplica_customIamInstanceProfile :: Lens.Lens' CreateDBInstanceReadReplica (Prelude.Maybe Prelude.Text)
createDBInstanceReadReplica_customIamInstanceProfile :: Lens' CreateDBInstanceReadReplica (Maybe Text)
createDBInstanceReadReplica_customIamInstanceProfile = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDBInstanceReadReplica' {Maybe Text
customIamInstanceProfile :: Maybe Text
$sel:customIamInstanceProfile:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Text
customIamInstanceProfile} -> Maybe Text
customIamInstanceProfile) (\s :: CreateDBInstanceReadReplica
s@CreateDBInstanceReadReplica' {} Maybe Text
a -> CreateDBInstanceReadReplica
s {$sel:customIamInstanceProfile:CreateDBInstanceReadReplica' :: Maybe Text
customIamInstanceProfile = Maybe Text
a} :: CreateDBInstanceReadReplica)
createDBInstanceReadReplica_dbInstanceClass :: Lens.Lens' CreateDBInstanceReadReplica (Prelude.Maybe Prelude.Text)
createDBInstanceReadReplica_dbInstanceClass :: Lens' CreateDBInstanceReadReplica (Maybe Text)
createDBInstanceReadReplica_dbInstanceClass = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDBInstanceReadReplica' {Maybe Text
dbInstanceClass :: Maybe Text
$sel:dbInstanceClass:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Text
dbInstanceClass} -> Maybe Text
dbInstanceClass) (\s :: CreateDBInstanceReadReplica
s@CreateDBInstanceReadReplica' {} Maybe Text
a -> CreateDBInstanceReadReplica
s {$sel:dbInstanceClass:CreateDBInstanceReadReplica' :: Maybe Text
dbInstanceClass = Maybe Text
a} :: CreateDBInstanceReadReplica)
createDBInstanceReadReplica_dbParameterGroupName :: Lens.Lens' CreateDBInstanceReadReplica (Prelude.Maybe Prelude.Text)
createDBInstanceReadReplica_dbParameterGroupName :: Lens' CreateDBInstanceReadReplica (Maybe Text)
createDBInstanceReadReplica_dbParameterGroupName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDBInstanceReadReplica' {Maybe Text
dbParameterGroupName :: Maybe Text
$sel:dbParameterGroupName:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Text
dbParameterGroupName} -> Maybe Text
dbParameterGroupName) (\s :: CreateDBInstanceReadReplica
s@CreateDBInstanceReadReplica' {} Maybe Text
a -> CreateDBInstanceReadReplica
s {$sel:dbParameterGroupName:CreateDBInstanceReadReplica' :: Maybe Text
dbParameterGroupName = Maybe Text
a} :: CreateDBInstanceReadReplica)
createDBInstanceReadReplica_dbSubnetGroupName :: Lens.Lens' CreateDBInstanceReadReplica (Prelude.Maybe Prelude.Text)
createDBInstanceReadReplica_dbSubnetGroupName :: Lens' CreateDBInstanceReadReplica (Maybe Text)
createDBInstanceReadReplica_dbSubnetGroupName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDBInstanceReadReplica' {Maybe Text
dbSubnetGroupName :: Maybe Text
$sel:dbSubnetGroupName:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Text
dbSubnetGroupName} -> Maybe Text
dbSubnetGroupName) (\s :: CreateDBInstanceReadReplica
s@CreateDBInstanceReadReplica' {} Maybe Text
a -> CreateDBInstanceReadReplica
s {$sel:dbSubnetGroupName:CreateDBInstanceReadReplica' :: Maybe Text
dbSubnetGroupName = Maybe Text
a} :: CreateDBInstanceReadReplica)
createDBInstanceReadReplica_deletionProtection :: Lens.Lens' CreateDBInstanceReadReplica (Prelude.Maybe Prelude.Bool)
createDBInstanceReadReplica_deletionProtection :: Lens' CreateDBInstanceReadReplica (Maybe Bool)
createDBInstanceReadReplica_deletionProtection = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDBInstanceReadReplica' {Maybe Bool
deletionProtection :: Maybe Bool
$sel:deletionProtection:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Bool
deletionProtection} -> Maybe Bool
deletionProtection) (\s :: CreateDBInstanceReadReplica
s@CreateDBInstanceReadReplica' {} Maybe Bool
a -> CreateDBInstanceReadReplica
s {$sel:deletionProtection:CreateDBInstanceReadReplica' :: Maybe Bool
deletionProtection = Maybe Bool
a} :: CreateDBInstanceReadReplica)
createDBInstanceReadReplica_destinationRegion :: Lens.Lens' CreateDBInstanceReadReplica (Prelude.Maybe Prelude.Text)
createDBInstanceReadReplica_destinationRegion :: Lens' CreateDBInstanceReadReplica (Maybe Text)
createDBInstanceReadReplica_destinationRegion = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDBInstanceReadReplica' {Maybe Text
destinationRegion :: Maybe Text
$sel:destinationRegion:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Text
destinationRegion} -> Maybe Text
destinationRegion) (\s :: CreateDBInstanceReadReplica
s@CreateDBInstanceReadReplica' {} Maybe Text
a -> CreateDBInstanceReadReplica
s {$sel:destinationRegion:CreateDBInstanceReadReplica' :: Maybe Text
destinationRegion = Maybe Text
a} :: CreateDBInstanceReadReplica)
createDBInstanceReadReplica_domain :: Lens.Lens' CreateDBInstanceReadReplica (Prelude.Maybe Prelude.Text)
createDBInstanceReadReplica_domain :: Lens' CreateDBInstanceReadReplica (Maybe Text)
createDBInstanceReadReplica_domain = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDBInstanceReadReplica' {Maybe Text
domain :: Maybe Text
$sel:domain:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Text
domain} -> Maybe Text
domain) (\s :: CreateDBInstanceReadReplica
s@CreateDBInstanceReadReplica' {} Maybe Text
a -> CreateDBInstanceReadReplica
s {$sel:domain:CreateDBInstanceReadReplica' :: Maybe Text
domain = Maybe Text
a} :: CreateDBInstanceReadReplica)
createDBInstanceReadReplica_domainIAMRoleName :: Lens.Lens' CreateDBInstanceReadReplica (Prelude.Maybe Prelude.Text)
createDBInstanceReadReplica_domainIAMRoleName :: Lens' CreateDBInstanceReadReplica (Maybe Text)
createDBInstanceReadReplica_domainIAMRoleName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDBInstanceReadReplica' {Maybe Text
domainIAMRoleName :: Maybe Text
$sel:domainIAMRoleName:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Text
domainIAMRoleName} -> Maybe Text
domainIAMRoleName) (\s :: CreateDBInstanceReadReplica
s@CreateDBInstanceReadReplica' {} Maybe Text
a -> CreateDBInstanceReadReplica
s {$sel:domainIAMRoleName:CreateDBInstanceReadReplica' :: Maybe Text
domainIAMRoleName = Maybe Text
a} :: CreateDBInstanceReadReplica)
createDBInstanceReadReplica_enableCloudwatchLogsExports :: Lens.Lens' CreateDBInstanceReadReplica (Prelude.Maybe [Prelude.Text])
createDBInstanceReadReplica_enableCloudwatchLogsExports :: Lens' CreateDBInstanceReadReplica (Maybe [Text])
createDBInstanceReadReplica_enableCloudwatchLogsExports = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDBInstanceReadReplica' {Maybe [Text]
enableCloudwatchLogsExports :: Maybe [Text]
$sel:enableCloudwatchLogsExports:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe [Text]
enableCloudwatchLogsExports} -> Maybe [Text]
enableCloudwatchLogsExports) (\s :: CreateDBInstanceReadReplica
s@CreateDBInstanceReadReplica' {} Maybe [Text]
a -> CreateDBInstanceReadReplica
s {$sel:enableCloudwatchLogsExports:CreateDBInstanceReadReplica' :: Maybe [Text]
enableCloudwatchLogsExports = Maybe [Text]
a} :: CreateDBInstanceReadReplica) 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
createDBInstanceReadReplica_enableCustomerOwnedIp :: Lens.Lens' CreateDBInstanceReadReplica (Prelude.Maybe Prelude.Bool)
createDBInstanceReadReplica_enableCustomerOwnedIp :: Lens' CreateDBInstanceReadReplica (Maybe Bool)
createDBInstanceReadReplica_enableCustomerOwnedIp = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDBInstanceReadReplica' {Maybe Bool
enableCustomerOwnedIp :: Maybe Bool
$sel:enableCustomerOwnedIp:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Bool
enableCustomerOwnedIp} -> Maybe Bool
enableCustomerOwnedIp) (\s :: CreateDBInstanceReadReplica
s@CreateDBInstanceReadReplica' {} Maybe Bool
a -> CreateDBInstanceReadReplica
s {$sel:enableCustomerOwnedIp:CreateDBInstanceReadReplica' :: Maybe Bool
enableCustomerOwnedIp = Maybe Bool
a} :: CreateDBInstanceReadReplica)
createDBInstanceReadReplica_enableIAMDatabaseAuthentication :: Lens.Lens' CreateDBInstanceReadReplica (Prelude.Maybe Prelude.Bool)
createDBInstanceReadReplica_enableIAMDatabaseAuthentication :: Lens' CreateDBInstanceReadReplica (Maybe Bool)
createDBInstanceReadReplica_enableIAMDatabaseAuthentication = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDBInstanceReadReplica' {Maybe Bool
enableIAMDatabaseAuthentication :: Maybe Bool
$sel:enableIAMDatabaseAuthentication:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Bool
enableIAMDatabaseAuthentication} -> Maybe Bool
enableIAMDatabaseAuthentication) (\s :: CreateDBInstanceReadReplica
s@CreateDBInstanceReadReplica' {} Maybe Bool
a -> CreateDBInstanceReadReplica
s {$sel:enableIAMDatabaseAuthentication:CreateDBInstanceReadReplica' :: Maybe Bool
enableIAMDatabaseAuthentication = Maybe Bool
a} :: CreateDBInstanceReadReplica)
createDBInstanceReadReplica_enablePerformanceInsights :: Lens.Lens' CreateDBInstanceReadReplica (Prelude.Maybe Prelude.Bool)
createDBInstanceReadReplica_enablePerformanceInsights :: Lens' CreateDBInstanceReadReplica (Maybe Bool)
createDBInstanceReadReplica_enablePerformanceInsights = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDBInstanceReadReplica' {Maybe Bool
enablePerformanceInsights :: Maybe Bool
$sel:enablePerformanceInsights:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Bool
enablePerformanceInsights} -> Maybe Bool
enablePerformanceInsights) (\s :: CreateDBInstanceReadReplica
s@CreateDBInstanceReadReplica' {} Maybe Bool
a -> CreateDBInstanceReadReplica
s {$sel:enablePerformanceInsights:CreateDBInstanceReadReplica' :: Maybe Bool
enablePerformanceInsights = Maybe Bool
a} :: CreateDBInstanceReadReplica)
createDBInstanceReadReplica_iops :: Lens.Lens' CreateDBInstanceReadReplica (Prelude.Maybe Prelude.Int)
createDBInstanceReadReplica_iops :: Lens' CreateDBInstanceReadReplica (Maybe Int)
createDBInstanceReadReplica_iops = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDBInstanceReadReplica' {Maybe Int
iops :: Maybe Int
$sel:iops:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Int
iops} -> Maybe Int
iops) (\s :: CreateDBInstanceReadReplica
s@CreateDBInstanceReadReplica' {} Maybe Int
a -> CreateDBInstanceReadReplica
s {$sel:iops:CreateDBInstanceReadReplica' :: Maybe Int
iops = Maybe Int
a} :: CreateDBInstanceReadReplica)
createDBInstanceReadReplica_kmsKeyId :: Lens.Lens' CreateDBInstanceReadReplica (Prelude.Maybe Prelude.Text)
createDBInstanceReadReplica_kmsKeyId :: Lens' CreateDBInstanceReadReplica (Maybe Text)
createDBInstanceReadReplica_kmsKeyId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDBInstanceReadReplica' {Maybe Text
kmsKeyId :: Maybe Text
$sel:kmsKeyId:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Text
kmsKeyId} -> Maybe Text
kmsKeyId) (\s :: CreateDBInstanceReadReplica
s@CreateDBInstanceReadReplica' {} Maybe Text
a -> CreateDBInstanceReadReplica
s {$sel:kmsKeyId:CreateDBInstanceReadReplica' :: Maybe Text
kmsKeyId = Maybe Text
a} :: CreateDBInstanceReadReplica)
createDBInstanceReadReplica_maxAllocatedStorage :: Lens.Lens' CreateDBInstanceReadReplica (Prelude.Maybe Prelude.Int)
createDBInstanceReadReplica_maxAllocatedStorage :: Lens' CreateDBInstanceReadReplica (Maybe Int)
createDBInstanceReadReplica_maxAllocatedStorage = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDBInstanceReadReplica' {Maybe Int
maxAllocatedStorage :: Maybe Int
$sel:maxAllocatedStorage:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Int
maxAllocatedStorage} -> Maybe Int
maxAllocatedStorage) (\s :: CreateDBInstanceReadReplica
s@CreateDBInstanceReadReplica' {} Maybe Int
a -> CreateDBInstanceReadReplica
s {$sel:maxAllocatedStorage:CreateDBInstanceReadReplica' :: Maybe Int
maxAllocatedStorage = Maybe Int
a} :: CreateDBInstanceReadReplica)
createDBInstanceReadReplica_monitoringInterval :: Lens.Lens' CreateDBInstanceReadReplica (Prelude.Maybe Prelude.Int)
createDBInstanceReadReplica_monitoringInterval :: Lens' CreateDBInstanceReadReplica (Maybe Int)
createDBInstanceReadReplica_monitoringInterval = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDBInstanceReadReplica' {Maybe Int
monitoringInterval :: Maybe Int
$sel:monitoringInterval:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Int
monitoringInterval} -> Maybe Int
monitoringInterval) (\s :: CreateDBInstanceReadReplica
s@CreateDBInstanceReadReplica' {} Maybe Int
a -> CreateDBInstanceReadReplica
s {$sel:monitoringInterval:CreateDBInstanceReadReplica' :: Maybe Int
monitoringInterval = Maybe Int
a} :: CreateDBInstanceReadReplica)
createDBInstanceReadReplica_monitoringRoleArn :: Lens.Lens' CreateDBInstanceReadReplica (Prelude.Maybe Prelude.Text)
createDBInstanceReadReplica_monitoringRoleArn :: Lens' CreateDBInstanceReadReplica (Maybe Text)
createDBInstanceReadReplica_monitoringRoleArn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDBInstanceReadReplica' {Maybe Text
monitoringRoleArn :: Maybe Text
$sel:monitoringRoleArn:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Text
monitoringRoleArn} -> Maybe Text
monitoringRoleArn) (\s :: CreateDBInstanceReadReplica
s@CreateDBInstanceReadReplica' {} Maybe Text
a -> CreateDBInstanceReadReplica
s {$sel:monitoringRoleArn:CreateDBInstanceReadReplica' :: Maybe Text
monitoringRoleArn = Maybe Text
a} :: CreateDBInstanceReadReplica)
createDBInstanceReadReplica_multiAZ :: Lens.Lens' CreateDBInstanceReadReplica (Prelude.Maybe Prelude.Bool)
createDBInstanceReadReplica_multiAZ :: Lens' CreateDBInstanceReadReplica (Maybe Bool)
createDBInstanceReadReplica_multiAZ = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDBInstanceReadReplica' {Maybe Bool
multiAZ :: Maybe Bool
$sel:multiAZ:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Bool
multiAZ} -> Maybe Bool
multiAZ) (\s :: CreateDBInstanceReadReplica
s@CreateDBInstanceReadReplica' {} Maybe Bool
a -> CreateDBInstanceReadReplica
s {$sel:multiAZ:CreateDBInstanceReadReplica' :: Maybe Bool
multiAZ = Maybe Bool
a} :: CreateDBInstanceReadReplica)
createDBInstanceReadReplica_networkType :: Lens.Lens' CreateDBInstanceReadReplica (Prelude.Maybe Prelude.Text)
createDBInstanceReadReplica_networkType :: Lens' CreateDBInstanceReadReplica (Maybe Text)
createDBInstanceReadReplica_networkType = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDBInstanceReadReplica' {Maybe Text
networkType :: Maybe Text
$sel:networkType:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Text
networkType} -> Maybe Text
networkType) (\s :: CreateDBInstanceReadReplica
s@CreateDBInstanceReadReplica' {} Maybe Text
a -> CreateDBInstanceReadReplica
s {$sel:networkType:CreateDBInstanceReadReplica' :: Maybe Text
networkType = Maybe Text
a} :: CreateDBInstanceReadReplica)
createDBInstanceReadReplica_optionGroupName :: Lens.Lens' CreateDBInstanceReadReplica (Prelude.Maybe Prelude.Text)
createDBInstanceReadReplica_optionGroupName :: Lens' CreateDBInstanceReadReplica (Maybe Text)
createDBInstanceReadReplica_optionGroupName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDBInstanceReadReplica' {Maybe Text
optionGroupName :: Maybe Text
$sel:optionGroupName:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Text
optionGroupName} -> Maybe Text
optionGroupName) (\s :: CreateDBInstanceReadReplica
s@CreateDBInstanceReadReplica' {} Maybe Text
a -> CreateDBInstanceReadReplica
s {$sel:optionGroupName:CreateDBInstanceReadReplica' :: Maybe Text
optionGroupName = Maybe Text
a} :: CreateDBInstanceReadReplica)
createDBInstanceReadReplica_performanceInsightsKMSKeyId :: Lens.Lens' CreateDBInstanceReadReplica (Prelude.Maybe Prelude.Text)
createDBInstanceReadReplica_performanceInsightsKMSKeyId :: Lens' CreateDBInstanceReadReplica (Maybe Text)
createDBInstanceReadReplica_performanceInsightsKMSKeyId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDBInstanceReadReplica' {Maybe Text
performanceInsightsKMSKeyId :: Maybe Text
$sel:performanceInsightsKMSKeyId:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Text
performanceInsightsKMSKeyId} -> Maybe Text
performanceInsightsKMSKeyId) (\s :: CreateDBInstanceReadReplica
s@CreateDBInstanceReadReplica' {} Maybe Text
a -> CreateDBInstanceReadReplica
s {$sel:performanceInsightsKMSKeyId:CreateDBInstanceReadReplica' :: Maybe Text
performanceInsightsKMSKeyId = Maybe Text
a} :: CreateDBInstanceReadReplica)
createDBInstanceReadReplica_performanceInsightsRetentionPeriod :: Lens.Lens' CreateDBInstanceReadReplica (Prelude.Maybe Prelude.Int)
createDBInstanceReadReplica_performanceInsightsRetentionPeriod :: Lens' CreateDBInstanceReadReplica (Maybe Int)
createDBInstanceReadReplica_performanceInsightsRetentionPeriod = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDBInstanceReadReplica' {Maybe Int
performanceInsightsRetentionPeriod :: Maybe Int
$sel:performanceInsightsRetentionPeriod:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Int
performanceInsightsRetentionPeriod} -> Maybe Int
performanceInsightsRetentionPeriod) (\s :: CreateDBInstanceReadReplica
s@CreateDBInstanceReadReplica' {} Maybe Int
a -> CreateDBInstanceReadReplica
s {$sel:performanceInsightsRetentionPeriod:CreateDBInstanceReadReplica' :: Maybe Int
performanceInsightsRetentionPeriod = Maybe Int
a} :: CreateDBInstanceReadReplica)
createDBInstanceReadReplica_port :: Lens.Lens' CreateDBInstanceReadReplica (Prelude.Maybe Prelude.Int)
createDBInstanceReadReplica_port :: Lens' CreateDBInstanceReadReplica (Maybe Int)
createDBInstanceReadReplica_port = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDBInstanceReadReplica' {Maybe Int
port :: Maybe Int
$sel:port:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Int
port} -> Maybe Int
port) (\s :: CreateDBInstanceReadReplica
s@CreateDBInstanceReadReplica' {} Maybe Int
a -> CreateDBInstanceReadReplica
s {$sel:port:CreateDBInstanceReadReplica' :: Maybe Int
port = Maybe Int
a} :: CreateDBInstanceReadReplica)
createDBInstanceReadReplica_preSignedUrl :: Lens.Lens' CreateDBInstanceReadReplica (Prelude.Maybe Prelude.Text)
createDBInstanceReadReplica_preSignedUrl :: Lens' CreateDBInstanceReadReplica (Maybe Text)
createDBInstanceReadReplica_preSignedUrl = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDBInstanceReadReplica' {Maybe Text
preSignedUrl :: Maybe Text
$sel:preSignedUrl:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Text
preSignedUrl} -> Maybe Text
preSignedUrl) (\s :: CreateDBInstanceReadReplica
s@CreateDBInstanceReadReplica' {} Maybe Text
a -> CreateDBInstanceReadReplica
s {$sel:preSignedUrl:CreateDBInstanceReadReplica' :: Maybe Text
preSignedUrl = Maybe Text
a} :: CreateDBInstanceReadReplica)
createDBInstanceReadReplica_processorFeatures :: Lens.Lens' CreateDBInstanceReadReplica (Prelude.Maybe [ProcessorFeature])
createDBInstanceReadReplica_processorFeatures :: Lens' CreateDBInstanceReadReplica (Maybe [ProcessorFeature])
createDBInstanceReadReplica_processorFeatures = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDBInstanceReadReplica' {Maybe [ProcessorFeature]
processorFeatures :: Maybe [ProcessorFeature]
$sel:processorFeatures:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe [ProcessorFeature]
processorFeatures} -> Maybe [ProcessorFeature]
processorFeatures) (\s :: CreateDBInstanceReadReplica
s@CreateDBInstanceReadReplica' {} Maybe [ProcessorFeature]
a -> CreateDBInstanceReadReplica
s {$sel:processorFeatures:CreateDBInstanceReadReplica' :: Maybe [ProcessorFeature]
processorFeatures = Maybe [ProcessorFeature]
a} :: CreateDBInstanceReadReplica) 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
createDBInstanceReadReplica_publiclyAccessible :: Lens.Lens' CreateDBInstanceReadReplica (Prelude.Maybe Prelude.Bool)
createDBInstanceReadReplica_publiclyAccessible :: Lens' CreateDBInstanceReadReplica (Maybe Bool)
createDBInstanceReadReplica_publiclyAccessible = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDBInstanceReadReplica' {Maybe Bool
publiclyAccessible :: Maybe Bool
$sel:publiclyAccessible:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Bool
publiclyAccessible} -> Maybe Bool
publiclyAccessible) (\s :: CreateDBInstanceReadReplica
s@CreateDBInstanceReadReplica' {} Maybe Bool
a -> CreateDBInstanceReadReplica
s {$sel:publiclyAccessible:CreateDBInstanceReadReplica' :: Maybe Bool
publiclyAccessible = Maybe Bool
a} :: CreateDBInstanceReadReplica)
createDBInstanceReadReplica_replicaMode :: Lens.Lens' CreateDBInstanceReadReplica (Prelude.Maybe ReplicaMode)
createDBInstanceReadReplica_replicaMode :: Lens' CreateDBInstanceReadReplica (Maybe ReplicaMode)
createDBInstanceReadReplica_replicaMode = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDBInstanceReadReplica' {Maybe ReplicaMode
replicaMode :: Maybe ReplicaMode
$sel:replicaMode:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe ReplicaMode
replicaMode} -> Maybe ReplicaMode
replicaMode) (\s :: CreateDBInstanceReadReplica
s@CreateDBInstanceReadReplica' {} Maybe ReplicaMode
a -> CreateDBInstanceReadReplica
s {$sel:replicaMode:CreateDBInstanceReadReplica' :: Maybe ReplicaMode
replicaMode = Maybe ReplicaMode
a} :: CreateDBInstanceReadReplica)
createDBInstanceReadReplica_storageThroughput :: Lens.Lens' CreateDBInstanceReadReplica (Prelude.Maybe Prelude.Int)
createDBInstanceReadReplica_storageThroughput :: Lens' CreateDBInstanceReadReplica (Maybe Int)
createDBInstanceReadReplica_storageThroughput = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDBInstanceReadReplica' {Maybe Int
storageThroughput :: Maybe Int
$sel:storageThroughput:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Int
storageThroughput} -> Maybe Int
storageThroughput) (\s :: CreateDBInstanceReadReplica
s@CreateDBInstanceReadReplica' {} Maybe Int
a -> CreateDBInstanceReadReplica
s {$sel:storageThroughput:CreateDBInstanceReadReplica' :: Maybe Int
storageThroughput = Maybe Int
a} :: CreateDBInstanceReadReplica)
createDBInstanceReadReplica_storageType :: Lens.Lens' CreateDBInstanceReadReplica (Prelude.Maybe Prelude.Text)
createDBInstanceReadReplica_storageType :: Lens' CreateDBInstanceReadReplica (Maybe Text)
createDBInstanceReadReplica_storageType = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDBInstanceReadReplica' {Maybe Text
storageType :: Maybe Text
$sel:storageType:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Text
storageType} -> Maybe Text
storageType) (\s :: CreateDBInstanceReadReplica
s@CreateDBInstanceReadReplica' {} Maybe Text
a -> CreateDBInstanceReadReplica
s {$sel:storageType:CreateDBInstanceReadReplica' :: Maybe Text
storageType = Maybe Text
a} :: CreateDBInstanceReadReplica)
createDBInstanceReadReplica_tags :: Lens.Lens' CreateDBInstanceReadReplica (Prelude.Maybe [Tag])
createDBInstanceReadReplica_tags :: Lens' CreateDBInstanceReadReplica (Maybe [Tag])
createDBInstanceReadReplica_tags = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDBInstanceReadReplica' {Maybe [Tag]
tags :: Maybe [Tag]
$sel:tags:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe [Tag]
tags} -> Maybe [Tag]
tags) (\s :: CreateDBInstanceReadReplica
s@CreateDBInstanceReadReplica' {} Maybe [Tag]
a -> CreateDBInstanceReadReplica
s {$sel:tags:CreateDBInstanceReadReplica' :: Maybe [Tag]
tags = Maybe [Tag]
a} :: CreateDBInstanceReadReplica) 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
createDBInstanceReadReplica_useDefaultProcessorFeatures :: Lens.Lens' CreateDBInstanceReadReplica (Prelude.Maybe Prelude.Bool)
createDBInstanceReadReplica_useDefaultProcessorFeatures :: Lens' CreateDBInstanceReadReplica (Maybe Bool)
createDBInstanceReadReplica_useDefaultProcessorFeatures = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDBInstanceReadReplica' {Maybe Bool
useDefaultProcessorFeatures :: Maybe Bool
$sel:useDefaultProcessorFeatures:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Bool
useDefaultProcessorFeatures} -> Maybe Bool
useDefaultProcessorFeatures) (\s :: CreateDBInstanceReadReplica
s@CreateDBInstanceReadReplica' {} Maybe Bool
a -> CreateDBInstanceReadReplica
s {$sel:useDefaultProcessorFeatures:CreateDBInstanceReadReplica' :: Maybe Bool
useDefaultProcessorFeatures = Maybe Bool
a} :: CreateDBInstanceReadReplica)
createDBInstanceReadReplica_vpcSecurityGroupIds :: Lens.Lens' CreateDBInstanceReadReplica (Prelude.Maybe [Prelude.Text])
createDBInstanceReadReplica_vpcSecurityGroupIds :: Lens' CreateDBInstanceReadReplica (Maybe [Text])
createDBInstanceReadReplica_vpcSecurityGroupIds = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDBInstanceReadReplica' {Maybe [Text]
vpcSecurityGroupIds :: Maybe [Text]
$sel:vpcSecurityGroupIds:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe [Text]
vpcSecurityGroupIds} -> Maybe [Text]
vpcSecurityGroupIds) (\s :: CreateDBInstanceReadReplica
s@CreateDBInstanceReadReplica' {} Maybe [Text]
a -> CreateDBInstanceReadReplica
s {$sel:vpcSecurityGroupIds:CreateDBInstanceReadReplica' :: Maybe [Text]
vpcSecurityGroupIds = Maybe [Text]
a} :: CreateDBInstanceReadReplica) 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
createDBInstanceReadReplica_dbInstanceIdentifier :: Lens.Lens' CreateDBInstanceReadReplica Prelude.Text
createDBInstanceReadReplica_dbInstanceIdentifier :: Lens' CreateDBInstanceReadReplica Text
createDBInstanceReadReplica_dbInstanceIdentifier = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDBInstanceReadReplica' {Text
dbInstanceIdentifier :: Text
$sel:dbInstanceIdentifier:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Text
dbInstanceIdentifier} -> Text
dbInstanceIdentifier) (\s :: CreateDBInstanceReadReplica
s@CreateDBInstanceReadReplica' {} Text
a -> CreateDBInstanceReadReplica
s {$sel:dbInstanceIdentifier:CreateDBInstanceReadReplica' :: Text
dbInstanceIdentifier = Text
a} :: CreateDBInstanceReadReplica)
createDBInstanceReadReplica_sourceDBInstanceIdentifier :: Lens.Lens' CreateDBInstanceReadReplica Prelude.Text
createDBInstanceReadReplica_sourceDBInstanceIdentifier :: Lens' CreateDBInstanceReadReplica Text
createDBInstanceReadReplica_sourceDBInstanceIdentifier = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDBInstanceReadReplica' {Text
sourceDBInstanceIdentifier :: Text
$sel:sourceDBInstanceIdentifier:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Text
sourceDBInstanceIdentifier} -> Text
sourceDBInstanceIdentifier) (\s :: CreateDBInstanceReadReplica
s@CreateDBInstanceReadReplica' {} Text
a -> CreateDBInstanceReadReplica
s {$sel:sourceDBInstanceIdentifier:CreateDBInstanceReadReplica' :: Text
sourceDBInstanceIdentifier = Text
a} :: CreateDBInstanceReadReplica)
instance Core.AWSRequest CreateDBInstanceReadReplica where
type
AWSResponse CreateDBInstanceReadReplica =
CreateDBInstanceReadReplicaResponse
request :: (Service -> Service)
-> CreateDBInstanceReadReplica
-> Request CreateDBInstanceReadReplica
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 CreateDBInstanceReadReplica
-> ClientResponse ClientBody
-> m (Either
Error (ClientResponse (AWSResponse CreateDBInstanceReadReplica)))
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
"CreateDBInstanceReadReplicaResult"
( \Int
s ResponseHeaders
h [Node]
x ->
Maybe DBInstance -> Int -> CreateDBInstanceReadReplicaResponse
CreateDBInstanceReadReplicaResponse'
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
"DBInstance")
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 CreateDBInstanceReadReplica where
hashWithSalt :: Int -> CreateDBInstanceReadReplica -> Int
hashWithSalt Int
_salt CreateDBInstanceReadReplica' {Maybe Bool
Maybe Int
Maybe [Text]
Maybe [ProcessorFeature]
Maybe [Tag]
Maybe Text
Maybe ReplicaMode
Text
sourceDBInstanceIdentifier :: Text
dbInstanceIdentifier :: Text
vpcSecurityGroupIds :: Maybe [Text]
useDefaultProcessorFeatures :: Maybe Bool
tags :: Maybe [Tag]
storageType :: Maybe Text
storageThroughput :: Maybe Int
replicaMode :: Maybe ReplicaMode
publiclyAccessible :: Maybe Bool
processorFeatures :: Maybe [ProcessorFeature]
preSignedUrl :: Maybe Text
port :: Maybe Int
performanceInsightsRetentionPeriod :: Maybe Int
performanceInsightsKMSKeyId :: Maybe Text
optionGroupName :: Maybe Text
networkType :: Maybe Text
multiAZ :: Maybe Bool
monitoringRoleArn :: Maybe Text
monitoringInterval :: Maybe Int
maxAllocatedStorage :: Maybe Int
kmsKeyId :: Maybe Text
iops :: Maybe Int
enablePerformanceInsights :: Maybe Bool
enableIAMDatabaseAuthentication :: Maybe Bool
enableCustomerOwnedIp :: Maybe Bool
enableCloudwatchLogsExports :: Maybe [Text]
domainIAMRoleName :: Maybe Text
domain :: Maybe Text
destinationRegion :: Maybe Text
deletionProtection :: Maybe Bool
dbSubnetGroupName :: Maybe Text
dbParameterGroupName :: Maybe Text
dbInstanceClass :: Maybe Text
customIamInstanceProfile :: Maybe Text
copyTagsToSnapshot :: Maybe Bool
availabilityZone :: Maybe Text
autoMinorVersionUpgrade :: Maybe Bool
$sel:sourceDBInstanceIdentifier:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Text
$sel:dbInstanceIdentifier:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Text
$sel:vpcSecurityGroupIds:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe [Text]
$sel:useDefaultProcessorFeatures:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Bool
$sel:tags:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe [Tag]
$sel:storageType:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Text
$sel:storageThroughput:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Int
$sel:replicaMode:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe ReplicaMode
$sel:publiclyAccessible:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Bool
$sel:processorFeatures:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe [ProcessorFeature]
$sel:preSignedUrl:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Text
$sel:port:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Int
$sel:performanceInsightsRetentionPeriod:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Int
$sel:performanceInsightsKMSKeyId:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Text
$sel:optionGroupName:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Text
$sel:networkType:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Text
$sel:multiAZ:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Bool
$sel:monitoringRoleArn:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Text
$sel:monitoringInterval:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Int
$sel:maxAllocatedStorage:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Int
$sel:kmsKeyId:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Text
$sel:iops:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Int
$sel:enablePerformanceInsights:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Bool
$sel:enableIAMDatabaseAuthentication:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Bool
$sel:enableCustomerOwnedIp:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Bool
$sel:enableCloudwatchLogsExports:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe [Text]
$sel:domainIAMRoleName:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Text
$sel:domain:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Text
$sel:destinationRegion:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Text
$sel:deletionProtection:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Bool
$sel:dbSubnetGroupName:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Text
$sel:dbParameterGroupName:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Text
$sel:dbInstanceClass:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Text
$sel:customIamInstanceProfile:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Text
$sel:copyTagsToSnapshot:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Bool
$sel:availabilityZone:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Text
$sel:autoMinorVersionUpgrade:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Bool
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Bool
autoMinorVersionUpgrade
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
availabilityZone
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Bool
copyTagsToSnapshot
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
customIamInstanceProfile
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
dbInstanceClass
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
dbParameterGroupName
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
dbSubnetGroupName
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Bool
deletionProtection
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
destinationRegion
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 [Text]
enableCloudwatchLogsExports
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Bool
enableCustomerOwnedIp
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 Int
iops
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
kmsKeyId
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Int
maxAllocatedStorage
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 Bool
multiAZ
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
networkType
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
preSignedUrl
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe [ProcessorFeature]
processorFeatures
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Bool
publiclyAccessible
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe ReplicaMode
replicaMode
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Int
storageThroughput
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
storageType
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe [Tag]
tags
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Bool
useDefaultProcessorFeatures
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe [Text]
vpcSecurityGroupIds
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
dbInstanceIdentifier
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
sourceDBInstanceIdentifier
instance Prelude.NFData CreateDBInstanceReadReplica where
rnf :: CreateDBInstanceReadReplica -> ()
rnf CreateDBInstanceReadReplica' {Maybe Bool
Maybe Int
Maybe [Text]
Maybe [ProcessorFeature]
Maybe [Tag]
Maybe Text
Maybe ReplicaMode
Text
sourceDBInstanceIdentifier :: Text
dbInstanceIdentifier :: Text
vpcSecurityGroupIds :: Maybe [Text]
useDefaultProcessorFeatures :: Maybe Bool
tags :: Maybe [Tag]
storageType :: Maybe Text
storageThroughput :: Maybe Int
replicaMode :: Maybe ReplicaMode
publiclyAccessible :: Maybe Bool
processorFeatures :: Maybe [ProcessorFeature]
preSignedUrl :: Maybe Text
port :: Maybe Int
performanceInsightsRetentionPeriod :: Maybe Int
performanceInsightsKMSKeyId :: Maybe Text
optionGroupName :: Maybe Text
networkType :: Maybe Text
multiAZ :: Maybe Bool
monitoringRoleArn :: Maybe Text
monitoringInterval :: Maybe Int
maxAllocatedStorage :: Maybe Int
kmsKeyId :: Maybe Text
iops :: Maybe Int
enablePerformanceInsights :: Maybe Bool
enableIAMDatabaseAuthentication :: Maybe Bool
enableCustomerOwnedIp :: Maybe Bool
enableCloudwatchLogsExports :: Maybe [Text]
domainIAMRoleName :: Maybe Text
domain :: Maybe Text
destinationRegion :: Maybe Text
deletionProtection :: Maybe Bool
dbSubnetGroupName :: Maybe Text
dbParameterGroupName :: Maybe Text
dbInstanceClass :: Maybe Text
customIamInstanceProfile :: Maybe Text
copyTagsToSnapshot :: Maybe Bool
availabilityZone :: Maybe Text
autoMinorVersionUpgrade :: Maybe Bool
$sel:sourceDBInstanceIdentifier:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Text
$sel:dbInstanceIdentifier:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Text
$sel:vpcSecurityGroupIds:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe [Text]
$sel:useDefaultProcessorFeatures:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Bool
$sel:tags:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe [Tag]
$sel:storageType:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Text
$sel:storageThroughput:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Int
$sel:replicaMode:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe ReplicaMode
$sel:publiclyAccessible:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Bool
$sel:processorFeatures:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe [ProcessorFeature]
$sel:preSignedUrl:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Text
$sel:port:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Int
$sel:performanceInsightsRetentionPeriod:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Int
$sel:performanceInsightsKMSKeyId:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Text
$sel:optionGroupName:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Text
$sel:networkType:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Text
$sel:multiAZ:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Bool
$sel:monitoringRoleArn:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Text
$sel:monitoringInterval:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Int
$sel:maxAllocatedStorage:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Int
$sel:kmsKeyId:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Text
$sel:iops:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Int
$sel:enablePerformanceInsights:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Bool
$sel:enableIAMDatabaseAuthentication:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Bool
$sel:enableCustomerOwnedIp:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Bool
$sel:enableCloudwatchLogsExports:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe [Text]
$sel:domainIAMRoleName:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Text
$sel:domain:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Text
$sel:destinationRegion:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Text
$sel:deletionProtection:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Bool
$sel:dbSubnetGroupName:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Text
$sel:dbParameterGroupName:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Text
$sel:dbInstanceClass:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Text
$sel:customIamInstanceProfile:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Text
$sel:copyTagsToSnapshot:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Bool
$sel:availabilityZone:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Text
$sel:autoMinorVersionUpgrade:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Bool
..} =
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 Text
availabilityZone
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
customIamInstanceProfile
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
dbInstanceClass
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
dbParameterGroupName
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
dbSubnetGroupName
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
destinationRegion
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 [Text]
enableCloudwatchLogsExports
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Bool
enableCustomerOwnedIp
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 Int
iops
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
kmsKeyId
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Int
maxAllocatedStorage
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 Bool
multiAZ
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
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
preSignedUrl
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf
Maybe [ProcessorFeature]
processorFeatures
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf
Maybe Bool
publiclyAccessible
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf
Maybe ReplicaMode
replicaMode
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf
Maybe Int
storageThroughput
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 [Tag]
tags
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf
Maybe Bool
useDefaultProcessorFeatures
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
dbInstanceIdentifier
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf
Text
sourceDBInstanceIdentifier
instance Data.ToHeaders CreateDBInstanceReadReplica where
toHeaders :: CreateDBInstanceReadReplica -> ResponseHeaders
toHeaders = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty
instance Data.ToPath CreateDBInstanceReadReplica where
toPath :: CreateDBInstanceReadReplica -> ByteString
toPath = forall a b. a -> b -> a
Prelude.const ByteString
"/"
instance Data.ToQuery CreateDBInstanceReadReplica where
toQuery :: CreateDBInstanceReadReplica -> QueryString
toQuery CreateDBInstanceReadReplica' {Maybe Bool
Maybe Int
Maybe [Text]
Maybe [ProcessorFeature]
Maybe [Tag]
Maybe Text
Maybe ReplicaMode
Text
sourceDBInstanceIdentifier :: Text
dbInstanceIdentifier :: Text
vpcSecurityGroupIds :: Maybe [Text]
useDefaultProcessorFeatures :: Maybe Bool
tags :: Maybe [Tag]
storageType :: Maybe Text
storageThroughput :: Maybe Int
replicaMode :: Maybe ReplicaMode
publiclyAccessible :: Maybe Bool
processorFeatures :: Maybe [ProcessorFeature]
preSignedUrl :: Maybe Text
port :: Maybe Int
performanceInsightsRetentionPeriod :: Maybe Int
performanceInsightsKMSKeyId :: Maybe Text
optionGroupName :: Maybe Text
networkType :: Maybe Text
multiAZ :: Maybe Bool
monitoringRoleArn :: Maybe Text
monitoringInterval :: Maybe Int
maxAllocatedStorage :: Maybe Int
kmsKeyId :: Maybe Text
iops :: Maybe Int
enablePerformanceInsights :: Maybe Bool
enableIAMDatabaseAuthentication :: Maybe Bool
enableCustomerOwnedIp :: Maybe Bool
enableCloudwatchLogsExports :: Maybe [Text]
domainIAMRoleName :: Maybe Text
domain :: Maybe Text
destinationRegion :: Maybe Text
deletionProtection :: Maybe Bool
dbSubnetGroupName :: Maybe Text
dbParameterGroupName :: Maybe Text
dbInstanceClass :: Maybe Text
customIamInstanceProfile :: Maybe Text
copyTagsToSnapshot :: Maybe Bool
availabilityZone :: Maybe Text
autoMinorVersionUpgrade :: Maybe Bool
$sel:sourceDBInstanceIdentifier:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Text
$sel:dbInstanceIdentifier:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Text
$sel:vpcSecurityGroupIds:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe [Text]
$sel:useDefaultProcessorFeatures:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Bool
$sel:tags:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe [Tag]
$sel:storageType:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Text
$sel:storageThroughput:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Int
$sel:replicaMode:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe ReplicaMode
$sel:publiclyAccessible:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Bool
$sel:processorFeatures:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe [ProcessorFeature]
$sel:preSignedUrl:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Text
$sel:port:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Int
$sel:performanceInsightsRetentionPeriod:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Int
$sel:performanceInsightsKMSKeyId:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Text
$sel:optionGroupName:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Text
$sel:networkType:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Text
$sel:multiAZ:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Bool
$sel:monitoringRoleArn:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Text
$sel:monitoringInterval:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Int
$sel:maxAllocatedStorage:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Int
$sel:kmsKeyId:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Text
$sel:iops:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Int
$sel:enablePerformanceInsights:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Bool
$sel:enableIAMDatabaseAuthentication:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Bool
$sel:enableCustomerOwnedIp:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Bool
$sel:enableCloudwatchLogsExports:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe [Text]
$sel:domainIAMRoleName:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Text
$sel:domain:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Text
$sel:destinationRegion:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Text
$sel:deletionProtection:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Bool
$sel:dbSubnetGroupName:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Text
$sel:dbParameterGroupName:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Text
$sel:dbInstanceClass:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Text
$sel:customIamInstanceProfile:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Text
$sel:copyTagsToSnapshot:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Bool
$sel:availabilityZone:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Text
$sel:autoMinorVersionUpgrade:CreateDBInstanceReadReplica' :: CreateDBInstanceReadReplica -> Maybe Bool
..} =
forall a. Monoid a => [a] -> a
Prelude.mconcat
[ ByteString
"Action"
forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: ( ByteString
"CreateDBInstanceReadReplica" ::
Prelude.ByteString
),
ByteString
"Version"
forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: (ByteString
"2014-10-31" :: Prelude.ByteString),
ByteString
"AutoMinorVersionUpgrade"
forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Bool
autoMinorVersionUpgrade,
ByteString
"AvailabilityZone" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
availabilityZone,
ByteString
"CopyTagsToSnapshot" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Bool
copyTagsToSnapshot,
ByteString
"CustomIamInstanceProfile"
forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
customIamInstanceProfile,
ByteString
"DBInstanceClass" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
dbInstanceClass,
ByteString
"DBParameterGroupName" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
dbParameterGroupName,
ByteString
"DBSubnetGroupName" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
dbSubnetGroupName,
ByteString
"DeletionProtection" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Bool
deletionProtection,
ByteString
"DestinationRegion" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
destinationRegion,
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
"EnableCloudwatchLogsExports"
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
"member"
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [Text]
enableCloudwatchLogsExports
),
ByteString
"EnableCustomerOwnedIp"
forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Bool
enableCustomerOwnedIp,
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
"Iops" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Int
iops,
ByteString
"KmsKeyId" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
kmsKeyId,
ByteString
"MaxAllocatedStorage" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Int
maxAllocatedStorage,
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
"MultiAZ" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Bool
multiAZ,
ByteString
"NetworkType" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
networkType,
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
"PreSignedUrl" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
preSignedUrl,
ByteString
"ProcessorFeatures"
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
"ProcessorFeature"
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [ProcessorFeature]
processorFeatures
),
ByteString
"PubliclyAccessible" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Bool
publiclyAccessible,
ByteString
"ReplicaMode" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe ReplicaMode
replicaMode,
ByteString
"StorageThroughput" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Int
storageThroughput,
ByteString
"StorageType" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
storageType,
ByteString
"Tags"
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
"Tag" forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [Tag]
tags),
ByteString
"UseDefaultProcessorFeatures"
forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Bool
useDefaultProcessorFeatures,
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
"DBInstanceIdentifier" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Text
dbInstanceIdentifier,
ByteString
"SourceDBInstanceIdentifier"
forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Text
sourceDBInstanceIdentifier
]
data CreateDBInstanceReadReplicaResponse = CreateDBInstanceReadReplicaResponse'
{ CreateDBInstanceReadReplicaResponse -> Maybe DBInstance
dbInstance :: Prelude.Maybe DBInstance,
CreateDBInstanceReadReplicaResponse -> Int
httpStatus :: Prelude.Int
}
deriving (CreateDBInstanceReadReplicaResponse
-> CreateDBInstanceReadReplicaResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: CreateDBInstanceReadReplicaResponse
-> CreateDBInstanceReadReplicaResponse -> Bool
$c/= :: CreateDBInstanceReadReplicaResponse
-> CreateDBInstanceReadReplicaResponse -> Bool
== :: CreateDBInstanceReadReplicaResponse
-> CreateDBInstanceReadReplicaResponse -> Bool
$c== :: CreateDBInstanceReadReplicaResponse
-> CreateDBInstanceReadReplicaResponse -> Bool
Prelude.Eq, ReadPrec [CreateDBInstanceReadReplicaResponse]
ReadPrec CreateDBInstanceReadReplicaResponse
Int -> ReadS CreateDBInstanceReadReplicaResponse
ReadS [CreateDBInstanceReadReplicaResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [CreateDBInstanceReadReplicaResponse]
$creadListPrec :: ReadPrec [CreateDBInstanceReadReplicaResponse]
readPrec :: ReadPrec CreateDBInstanceReadReplicaResponse
$creadPrec :: ReadPrec CreateDBInstanceReadReplicaResponse
readList :: ReadS [CreateDBInstanceReadReplicaResponse]
$creadList :: ReadS [CreateDBInstanceReadReplicaResponse]
readsPrec :: Int -> ReadS CreateDBInstanceReadReplicaResponse
$creadsPrec :: Int -> ReadS CreateDBInstanceReadReplicaResponse
Prelude.Read, Int -> CreateDBInstanceReadReplicaResponse -> ShowS
[CreateDBInstanceReadReplicaResponse] -> ShowS
CreateDBInstanceReadReplicaResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [CreateDBInstanceReadReplicaResponse] -> ShowS
$cshowList :: [CreateDBInstanceReadReplicaResponse] -> ShowS
show :: CreateDBInstanceReadReplicaResponse -> String
$cshow :: CreateDBInstanceReadReplicaResponse -> String
showsPrec :: Int -> CreateDBInstanceReadReplicaResponse -> ShowS
$cshowsPrec :: Int -> CreateDBInstanceReadReplicaResponse -> ShowS
Prelude.Show, forall x.
Rep CreateDBInstanceReadReplicaResponse x
-> CreateDBInstanceReadReplicaResponse
forall x.
CreateDBInstanceReadReplicaResponse
-> Rep CreateDBInstanceReadReplicaResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep CreateDBInstanceReadReplicaResponse x
-> CreateDBInstanceReadReplicaResponse
$cfrom :: forall x.
CreateDBInstanceReadReplicaResponse
-> Rep CreateDBInstanceReadReplicaResponse x
Prelude.Generic)
newCreateDBInstanceReadReplicaResponse ::
Prelude.Int ->
CreateDBInstanceReadReplicaResponse
newCreateDBInstanceReadReplicaResponse :: Int -> CreateDBInstanceReadReplicaResponse
newCreateDBInstanceReadReplicaResponse Int
pHttpStatus_ =
CreateDBInstanceReadReplicaResponse'
{ $sel:dbInstance:CreateDBInstanceReadReplicaResponse' :: Maybe DBInstance
dbInstance =
forall a. Maybe a
Prelude.Nothing,
$sel:httpStatus:CreateDBInstanceReadReplicaResponse' :: Int
httpStatus = Int
pHttpStatus_
}
createDBInstanceReadReplicaResponse_dbInstance :: Lens.Lens' CreateDBInstanceReadReplicaResponse (Prelude.Maybe DBInstance)
createDBInstanceReadReplicaResponse_dbInstance :: Lens' CreateDBInstanceReadReplicaResponse (Maybe DBInstance)
createDBInstanceReadReplicaResponse_dbInstance = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDBInstanceReadReplicaResponse' {Maybe DBInstance
dbInstance :: Maybe DBInstance
$sel:dbInstance:CreateDBInstanceReadReplicaResponse' :: CreateDBInstanceReadReplicaResponse -> Maybe DBInstance
dbInstance} -> Maybe DBInstance
dbInstance) (\s :: CreateDBInstanceReadReplicaResponse
s@CreateDBInstanceReadReplicaResponse' {} Maybe DBInstance
a -> CreateDBInstanceReadReplicaResponse
s {$sel:dbInstance:CreateDBInstanceReadReplicaResponse' :: Maybe DBInstance
dbInstance = Maybe DBInstance
a} :: CreateDBInstanceReadReplicaResponse)
createDBInstanceReadReplicaResponse_httpStatus :: Lens.Lens' CreateDBInstanceReadReplicaResponse Prelude.Int
createDBInstanceReadReplicaResponse_httpStatus :: Lens' CreateDBInstanceReadReplicaResponse Int
createDBInstanceReadReplicaResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDBInstanceReadReplicaResponse' {Int
httpStatus :: Int
$sel:httpStatus:CreateDBInstanceReadReplicaResponse' :: CreateDBInstanceReadReplicaResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: CreateDBInstanceReadReplicaResponse
s@CreateDBInstanceReadReplicaResponse' {} Int
a -> CreateDBInstanceReadReplicaResponse
s {$sel:httpStatus:CreateDBInstanceReadReplicaResponse' :: Int
httpStatus = Int
a} :: CreateDBInstanceReadReplicaResponse)
instance
Prelude.NFData
CreateDBInstanceReadReplicaResponse
where
rnf :: CreateDBInstanceReadReplicaResponse -> ()
rnf CreateDBInstanceReadReplicaResponse' {Int
Maybe DBInstance
httpStatus :: Int
dbInstance :: Maybe DBInstance
$sel:httpStatus:CreateDBInstanceReadReplicaResponse' :: CreateDBInstanceReadReplicaResponse -> Int
$sel:dbInstance:CreateDBInstanceReadReplicaResponse' :: CreateDBInstanceReadReplicaResponse -> Maybe DBInstance
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe DBInstance
dbInstance
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Int
httpStatus