{-# 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.ElastiCache.CreateReplicationGroup
(
CreateReplicationGroup (..),
newCreateReplicationGroup,
createReplicationGroup_atRestEncryptionEnabled,
createReplicationGroup_authToken,
createReplicationGroup_autoMinorVersionUpgrade,
createReplicationGroup_automaticFailoverEnabled,
createReplicationGroup_cacheNodeType,
createReplicationGroup_cacheParameterGroupName,
createReplicationGroup_cacheSecurityGroupNames,
createReplicationGroup_cacheSubnetGroupName,
createReplicationGroup_dataTieringEnabled,
createReplicationGroup_engine,
createReplicationGroup_engineVersion,
createReplicationGroup_globalReplicationGroupId,
createReplicationGroup_ipDiscovery,
createReplicationGroup_kmsKeyId,
createReplicationGroup_logDeliveryConfigurations,
createReplicationGroup_multiAZEnabled,
createReplicationGroup_networkType,
createReplicationGroup_nodeGroupConfiguration,
createReplicationGroup_notificationTopicArn,
createReplicationGroup_numCacheClusters,
createReplicationGroup_numNodeGroups,
createReplicationGroup_port,
createReplicationGroup_preferredCacheClusterAZs,
createReplicationGroup_preferredMaintenanceWindow,
createReplicationGroup_primaryClusterId,
createReplicationGroup_replicasPerNodeGroup,
createReplicationGroup_securityGroupIds,
createReplicationGroup_snapshotArns,
createReplicationGroup_snapshotName,
createReplicationGroup_snapshotRetentionLimit,
createReplicationGroup_snapshotWindow,
createReplicationGroup_tags,
createReplicationGroup_transitEncryptionEnabled,
createReplicationGroup_transitEncryptionMode,
createReplicationGroup_userGroupIds,
createReplicationGroup_replicationGroupId,
createReplicationGroup_replicationGroupDescription,
CreateReplicationGroupResponse (..),
newCreateReplicationGroupResponse,
createReplicationGroupResponse_replicationGroup,
createReplicationGroupResponse_httpStatus,
)
where
import qualified Amazonka.Core as Core
import qualified Amazonka.Core.Lens.Internal as Lens
import qualified Amazonka.Data as Data
import Amazonka.ElastiCache.Types
import qualified Amazonka.Prelude as Prelude
import qualified Amazonka.Request as Request
import qualified Amazonka.Response as Response
data CreateReplicationGroup = CreateReplicationGroup'
{
CreateReplicationGroup -> Maybe Bool
atRestEncryptionEnabled :: Prelude.Maybe Prelude.Bool,
CreateReplicationGroup -> Maybe Text
authToken :: Prelude.Maybe Prelude.Text,
CreateReplicationGroup -> Maybe Bool
autoMinorVersionUpgrade :: Prelude.Maybe Prelude.Bool,
CreateReplicationGroup -> Maybe Bool
automaticFailoverEnabled :: Prelude.Maybe Prelude.Bool,
CreateReplicationGroup -> Maybe Text
cacheNodeType :: Prelude.Maybe Prelude.Text,
CreateReplicationGroup -> Maybe Text
cacheParameterGroupName :: Prelude.Maybe Prelude.Text,
CreateReplicationGroup -> Maybe [Text]
cacheSecurityGroupNames :: Prelude.Maybe [Prelude.Text],
CreateReplicationGroup -> Maybe Text
cacheSubnetGroupName :: Prelude.Maybe Prelude.Text,
CreateReplicationGroup -> Maybe Bool
dataTieringEnabled :: Prelude.Maybe Prelude.Bool,
CreateReplicationGroup -> Maybe Text
engine :: Prelude.Maybe Prelude.Text,
CreateReplicationGroup -> Maybe Text
engineVersion :: Prelude.Maybe Prelude.Text,
CreateReplicationGroup -> Maybe Text
globalReplicationGroupId :: Prelude.Maybe Prelude.Text,
CreateReplicationGroup -> Maybe IpDiscovery
ipDiscovery :: Prelude.Maybe IpDiscovery,
CreateReplicationGroup -> Maybe Text
kmsKeyId :: Prelude.Maybe Prelude.Text,
CreateReplicationGroup -> Maybe [LogDeliveryConfigurationRequest]
logDeliveryConfigurations :: Prelude.Maybe [LogDeliveryConfigurationRequest],
CreateReplicationGroup -> Maybe Bool
multiAZEnabled :: Prelude.Maybe Prelude.Bool,
CreateReplicationGroup -> Maybe NetworkType
networkType :: Prelude.Maybe NetworkType,
CreateReplicationGroup -> Maybe [NodeGroupConfiguration]
nodeGroupConfiguration :: Prelude.Maybe [NodeGroupConfiguration],
CreateReplicationGroup -> Maybe Text
notificationTopicArn :: Prelude.Maybe Prelude.Text,
CreateReplicationGroup -> Maybe Int
numCacheClusters :: Prelude.Maybe Prelude.Int,
CreateReplicationGroup -> Maybe Int
numNodeGroups :: Prelude.Maybe Prelude.Int,
CreateReplicationGroup -> Maybe Int
port :: Prelude.Maybe Prelude.Int,
CreateReplicationGroup -> Maybe [Text]
preferredCacheClusterAZs :: Prelude.Maybe [Prelude.Text],
CreateReplicationGroup -> Maybe Text
preferredMaintenanceWindow :: Prelude.Maybe Prelude.Text,
CreateReplicationGroup -> Maybe Text
primaryClusterId :: Prelude.Maybe Prelude.Text,
CreateReplicationGroup -> Maybe Int
replicasPerNodeGroup :: Prelude.Maybe Prelude.Int,
CreateReplicationGroup -> Maybe [Text]
securityGroupIds :: Prelude.Maybe [Prelude.Text],
CreateReplicationGroup -> Maybe [Text]
snapshotArns :: Prelude.Maybe [Prelude.Text],
CreateReplicationGroup -> Maybe Text
snapshotName :: Prelude.Maybe Prelude.Text,
CreateReplicationGroup -> Maybe Int
snapshotRetentionLimit :: Prelude.Maybe Prelude.Int,
CreateReplicationGroup -> Maybe Text
snapshotWindow :: Prelude.Maybe Prelude.Text,
CreateReplicationGroup -> Maybe [Tag]
tags :: Prelude.Maybe [Tag],
CreateReplicationGroup -> Maybe Bool
transitEncryptionEnabled :: Prelude.Maybe Prelude.Bool,
CreateReplicationGroup -> Maybe TransitEncryptionMode
transitEncryptionMode :: Prelude.Maybe TransitEncryptionMode,
CreateReplicationGroup -> Maybe (NonEmpty Text)
userGroupIds :: Prelude.Maybe (Prelude.NonEmpty Prelude.Text),
CreateReplicationGroup -> Text
replicationGroupId :: Prelude.Text,
CreateReplicationGroup -> Text
replicationGroupDescription :: Prelude.Text
}
deriving (CreateReplicationGroup -> CreateReplicationGroup -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: CreateReplicationGroup -> CreateReplicationGroup -> Bool
$c/= :: CreateReplicationGroup -> CreateReplicationGroup -> Bool
== :: CreateReplicationGroup -> CreateReplicationGroup -> Bool
$c== :: CreateReplicationGroup -> CreateReplicationGroup -> Bool
Prelude.Eq, ReadPrec [CreateReplicationGroup]
ReadPrec CreateReplicationGroup
Int -> ReadS CreateReplicationGroup
ReadS [CreateReplicationGroup]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [CreateReplicationGroup]
$creadListPrec :: ReadPrec [CreateReplicationGroup]
readPrec :: ReadPrec CreateReplicationGroup
$creadPrec :: ReadPrec CreateReplicationGroup
readList :: ReadS [CreateReplicationGroup]
$creadList :: ReadS [CreateReplicationGroup]
readsPrec :: Int -> ReadS CreateReplicationGroup
$creadsPrec :: Int -> ReadS CreateReplicationGroup
Prelude.Read, Int -> CreateReplicationGroup -> ShowS
[CreateReplicationGroup] -> ShowS
CreateReplicationGroup -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [CreateReplicationGroup] -> ShowS
$cshowList :: [CreateReplicationGroup] -> ShowS
show :: CreateReplicationGroup -> String
$cshow :: CreateReplicationGroup -> String
showsPrec :: Int -> CreateReplicationGroup -> ShowS
$cshowsPrec :: Int -> CreateReplicationGroup -> ShowS
Prelude.Show, forall x. Rep CreateReplicationGroup x -> CreateReplicationGroup
forall x. CreateReplicationGroup -> Rep CreateReplicationGroup x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep CreateReplicationGroup x -> CreateReplicationGroup
$cfrom :: forall x. CreateReplicationGroup -> Rep CreateReplicationGroup x
Prelude.Generic)
newCreateReplicationGroup ::
Prelude.Text ->
Prelude.Text ->
CreateReplicationGroup
newCreateReplicationGroup :: Text -> Text -> CreateReplicationGroup
newCreateReplicationGroup
Text
pReplicationGroupId_
Text
pReplicationGroupDescription_ =
CreateReplicationGroup'
{ $sel:atRestEncryptionEnabled:CreateReplicationGroup' :: Maybe Bool
atRestEncryptionEnabled =
forall a. Maybe a
Prelude.Nothing,
$sel:authToken:CreateReplicationGroup' :: Maybe Text
authToken = forall a. Maybe a
Prelude.Nothing,
$sel:autoMinorVersionUpgrade:CreateReplicationGroup' :: Maybe Bool
autoMinorVersionUpgrade = forall a. Maybe a
Prelude.Nothing,
$sel:automaticFailoverEnabled:CreateReplicationGroup' :: Maybe Bool
automaticFailoverEnabled = forall a. Maybe a
Prelude.Nothing,
$sel:cacheNodeType:CreateReplicationGroup' :: Maybe Text
cacheNodeType = forall a. Maybe a
Prelude.Nothing,
$sel:cacheParameterGroupName:CreateReplicationGroup' :: Maybe Text
cacheParameterGroupName = forall a. Maybe a
Prelude.Nothing,
$sel:cacheSecurityGroupNames:CreateReplicationGroup' :: Maybe [Text]
cacheSecurityGroupNames = forall a. Maybe a
Prelude.Nothing,
$sel:cacheSubnetGroupName:CreateReplicationGroup' :: Maybe Text
cacheSubnetGroupName = forall a. Maybe a
Prelude.Nothing,
$sel:dataTieringEnabled:CreateReplicationGroup' :: Maybe Bool
dataTieringEnabled = forall a. Maybe a
Prelude.Nothing,
$sel:engine:CreateReplicationGroup' :: Maybe Text
engine = forall a. Maybe a
Prelude.Nothing,
$sel:engineVersion:CreateReplicationGroup' :: Maybe Text
engineVersion = forall a. Maybe a
Prelude.Nothing,
$sel:globalReplicationGroupId:CreateReplicationGroup' :: Maybe Text
globalReplicationGroupId = forall a. Maybe a
Prelude.Nothing,
$sel:ipDiscovery:CreateReplicationGroup' :: Maybe IpDiscovery
ipDiscovery = forall a. Maybe a
Prelude.Nothing,
$sel:kmsKeyId:CreateReplicationGroup' :: Maybe Text
kmsKeyId = forall a. Maybe a
Prelude.Nothing,
$sel:logDeliveryConfigurations:CreateReplicationGroup' :: Maybe [LogDeliveryConfigurationRequest]
logDeliveryConfigurations = forall a. Maybe a
Prelude.Nothing,
$sel:multiAZEnabled:CreateReplicationGroup' :: Maybe Bool
multiAZEnabled = forall a. Maybe a
Prelude.Nothing,
$sel:networkType:CreateReplicationGroup' :: Maybe NetworkType
networkType = forall a. Maybe a
Prelude.Nothing,
$sel:nodeGroupConfiguration:CreateReplicationGroup' :: Maybe [NodeGroupConfiguration]
nodeGroupConfiguration = forall a. Maybe a
Prelude.Nothing,
$sel:notificationTopicArn:CreateReplicationGroup' :: Maybe Text
notificationTopicArn = forall a. Maybe a
Prelude.Nothing,
$sel:numCacheClusters:CreateReplicationGroup' :: Maybe Int
numCacheClusters = forall a. Maybe a
Prelude.Nothing,
$sel:numNodeGroups:CreateReplicationGroup' :: Maybe Int
numNodeGroups = forall a. Maybe a
Prelude.Nothing,
$sel:port:CreateReplicationGroup' :: Maybe Int
port = forall a. Maybe a
Prelude.Nothing,
$sel:preferredCacheClusterAZs:CreateReplicationGroup' :: Maybe [Text]
preferredCacheClusterAZs = forall a. Maybe a
Prelude.Nothing,
$sel:preferredMaintenanceWindow:CreateReplicationGroup' :: Maybe Text
preferredMaintenanceWindow = forall a. Maybe a
Prelude.Nothing,
$sel:primaryClusterId:CreateReplicationGroup' :: Maybe Text
primaryClusterId = forall a. Maybe a
Prelude.Nothing,
$sel:replicasPerNodeGroup:CreateReplicationGroup' :: Maybe Int
replicasPerNodeGroup = forall a. Maybe a
Prelude.Nothing,
$sel:securityGroupIds:CreateReplicationGroup' :: Maybe [Text]
securityGroupIds = forall a. Maybe a
Prelude.Nothing,
$sel:snapshotArns:CreateReplicationGroup' :: Maybe [Text]
snapshotArns = forall a. Maybe a
Prelude.Nothing,
$sel:snapshotName:CreateReplicationGroup' :: Maybe Text
snapshotName = forall a. Maybe a
Prelude.Nothing,
$sel:snapshotRetentionLimit:CreateReplicationGroup' :: Maybe Int
snapshotRetentionLimit = forall a. Maybe a
Prelude.Nothing,
$sel:snapshotWindow:CreateReplicationGroup' :: Maybe Text
snapshotWindow = forall a. Maybe a
Prelude.Nothing,
$sel:tags:CreateReplicationGroup' :: Maybe [Tag]
tags = forall a. Maybe a
Prelude.Nothing,
$sel:transitEncryptionEnabled:CreateReplicationGroup' :: Maybe Bool
transitEncryptionEnabled = forall a. Maybe a
Prelude.Nothing,
$sel:transitEncryptionMode:CreateReplicationGroup' :: Maybe TransitEncryptionMode
transitEncryptionMode = forall a. Maybe a
Prelude.Nothing,
$sel:userGroupIds:CreateReplicationGroup' :: Maybe (NonEmpty Text)
userGroupIds = forall a. Maybe a
Prelude.Nothing,
$sel:replicationGroupId:CreateReplicationGroup' :: Text
replicationGroupId = Text
pReplicationGroupId_,
$sel:replicationGroupDescription:CreateReplicationGroup' :: Text
replicationGroupDescription =
Text
pReplicationGroupDescription_
}
createReplicationGroup_atRestEncryptionEnabled :: Lens.Lens' CreateReplicationGroup (Prelude.Maybe Prelude.Bool)
createReplicationGroup_atRestEncryptionEnabled :: Lens' CreateReplicationGroup (Maybe Bool)
createReplicationGroup_atRestEncryptionEnabled = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateReplicationGroup' {Maybe Bool
atRestEncryptionEnabled :: Maybe Bool
$sel:atRestEncryptionEnabled:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Bool
atRestEncryptionEnabled} -> Maybe Bool
atRestEncryptionEnabled) (\s :: CreateReplicationGroup
s@CreateReplicationGroup' {} Maybe Bool
a -> CreateReplicationGroup
s {$sel:atRestEncryptionEnabled:CreateReplicationGroup' :: Maybe Bool
atRestEncryptionEnabled = Maybe Bool
a} :: CreateReplicationGroup)
createReplicationGroup_authToken :: Lens.Lens' CreateReplicationGroup (Prelude.Maybe Prelude.Text)
createReplicationGroup_authToken :: Lens' CreateReplicationGroup (Maybe Text)
createReplicationGroup_authToken = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateReplicationGroup' {Maybe Text
authToken :: Maybe Text
$sel:authToken:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Text
authToken} -> Maybe Text
authToken) (\s :: CreateReplicationGroup
s@CreateReplicationGroup' {} Maybe Text
a -> CreateReplicationGroup
s {$sel:authToken:CreateReplicationGroup' :: Maybe Text
authToken = Maybe Text
a} :: CreateReplicationGroup)
createReplicationGroup_autoMinorVersionUpgrade :: Lens.Lens' CreateReplicationGroup (Prelude.Maybe Prelude.Bool)
createReplicationGroup_autoMinorVersionUpgrade :: Lens' CreateReplicationGroup (Maybe Bool)
createReplicationGroup_autoMinorVersionUpgrade = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateReplicationGroup' {Maybe Bool
autoMinorVersionUpgrade :: Maybe Bool
$sel:autoMinorVersionUpgrade:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Bool
autoMinorVersionUpgrade} -> Maybe Bool
autoMinorVersionUpgrade) (\s :: CreateReplicationGroup
s@CreateReplicationGroup' {} Maybe Bool
a -> CreateReplicationGroup
s {$sel:autoMinorVersionUpgrade:CreateReplicationGroup' :: Maybe Bool
autoMinorVersionUpgrade = Maybe Bool
a} :: CreateReplicationGroup)
createReplicationGroup_automaticFailoverEnabled :: Lens.Lens' CreateReplicationGroup (Prelude.Maybe Prelude.Bool)
createReplicationGroup_automaticFailoverEnabled :: Lens' CreateReplicationGroup (Maybe Bool)
createReplicationGroup_automaticFailoverEnabled = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateReplicationGroup' {Maybe Bool
automaticFailoverEnabled :: Maybe Bool
$sel:automaticFailoverEnabled:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Bool
automaticFailoverEnabled} -> Maybe Bool
automaticFailoverEnabled) (\s :: CreateReplicationGroup
s@CreateReplicationGroup' {} Maybe Bool
a -> CreateReplicationGroup
s {$sel:automaticFailoverEnabled:CreateReplicationGroup' :: Maybe Bool
automaticFailoverEnabled = Maybe Bool
a} :: CreateReplicationGroup)
createReplicationGroup_cacheNodeType :: Lens.Lens' CreateReplicationGroup (Prelude.Maybe Prelude.Text)
createReplicationGroup_cacheNodeType :: Lens' CreateReplicationGroup (Maybe Text)
createReplicationGroup_cacheNodeType = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateReplicationGroup' {Maybe Text
cacheNodeType :: Maybe Text
$sel:cacheNodeType:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Text
cacheNodeType} -> Maybe Text
cacheNodeType) (\s :: CreateReplicationGroup
s@CreateReplicationGroup' {} Maybe Text
a -> CreateReplicationGroup
s {$sel:cacheNodeType:CreateReplicationGroup' :: Maybe Text
cacheNodeType = Maybe Text
a} :: CreateReplicationGroup)
createReplicationGroup_cacheParameterGroupName :: Lens.Lens' CreateReplicationGroup (Prelude.Maybe Prelude.Text)
createReplicationGroup_cacheParameterGroupName :: Lens' CreateReplicationGroup (Maybe Text)
createReplicationGroup_cacheParameterGroupName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateReplicationGroup' {Maybe Text
cacheParameterGroupName :: Maybe Text
$sel:cacheParameterGroupName:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Text
cacheParameterGroupName} -> Maybe Text
cacheParameterGroupName) (\s :: CreateReplicationGroup
s@CreateReplicationGroup' {} Maybe Text
a -> CreateReplicationGroup
s {$sel:cacheParameterGroupName:CreateReplicationGroup' :: Maybe Text
cacheParameterGroupName = Maybe Text
a} :: CreateReplicationGroup)
createReplicationGroup_cacheSecurityGroupNames :: Lens.Lens' CreateReplicationGroup (Prelude.Maybe [Prelude.Text])
createReplicationGroup_cacheSecurityGroupNames :: Lens' CreateReplicationGroup (Maybe [Text])
createReplicationGroup_cacheSecurityGroupNames = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateReplicationGroup' {Maybe [Text]
cacheSecurityGroupNames :: Maybe [Text]
$sel:cacheSecurityGroupNames:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe [Text]
cacheSecurityGroupNames} -> Maybe [Text]
cacheSecurityGroupNames) (\s :: CreateReplicationGroup
s@CreateReplicationGroup' {} Maybe [Text]
a -> CreateReplicationGroup
s {$sel:cacheSecurityGroupNames:CreateReplicationGroup' :: Maybe [Text]
cacheSecurityGroupNames = Maybe [Text]
a} :: CreateReplicationGroup) 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
createReplicationGroup_cacheSubnetGroupName :: Lens.Lens' CreateReplicationGroup (Prelude.Maybe Prelude.Text)
createReplicationGroup_cacheSubnetGroupName :: Lens' CreateReplicationGroup (Maybe Text)
createReplicationGroup_cacheSubnetGroupName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateReplicationGroup' {Maybe Text
cacheSubnetGroupName :: Maybe Text
$sel:cacheSubnetGroupName:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Text
cacheSubnetGroupName} -> Maybe Text
cacheSubnetGroupName) (\s :: CreateReplicationGroup
s@CreateReplicationGroup' {} Maybe Text
a -> CreateReplicationGroup
s {$sel:cacheSubnetGroupName:CreateReplicationGroup' :: Maybe Text
cacheSubnetGroupName = Maybe Text
a} :: CreateReplicationGroup)
createReplicationGroup_dataTieringEnabled :: Lens.Lens' CreateReplicationGroup (Prelude.Maybe Prelude.Bool)
createReplicationGroup_dataTieringEnabled :: Lens' CreateReplicationGroup (Maybe Bool)
createReplicationGroup_dataTieringEnabled = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateReplicationGroup' {Maybe Bool
dataTieringEnabled :: Maybe Bool
$sel:dataTieringEnabled:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Bool
dataTieringEnabled} -> Maybe Bool
dataTieringEnabled) (\s :: CreateReplicationGroup
s@CreateReplicationGroup' {} Maybe Bool
a -> CreateReplicationGroup
s {$sel:dataTieringEnabled:CreateReplicationGroup' :: Maybe Bool
dataTieringEnabled = Maybe Bool
a} :: CreateReplicationGroup)
createReplicationGroup_engine :: Lens.Lens' CreateReplicationGroup (Prelude.Maybe Prelude.Text)
createReplicationGroup_engine :: Lens' CreateReplicationGroup (Maybe Text)
createReplicationGroup_engine = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateReplicationGroup' {Maybe Text
engine :: Maybe Text
$sel:engine:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Text
engine} -> Maybe Text
engine) (\s :: CreateReplicationGroup
s@CreateReplicationGroup' {} Maybe Text
a -> CreateReplicationGroup
s {$sel:engine:CreateReplicationGroup' :: Maybe Text
engine = Maybe Text
a} :: CreateReplicationGroup)
createReplicationGroup_engineVersion :: Lens.Lens' CreateReplicationGroup (Prelude.Maybe Prelude.Text)
createReplicationGroup_engineVersion :: Lens' CreateReplicationGroup (Maybe Text)
createReplicationGroup_engineVersion = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateReplicationGroup' {Maybe Text
engineVersion :: Maybe Text
$sel:engineVersion:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Text
engineVersion} -> Maybe Text
engineVersion) (\s :: CreateReplicationGroup
s@CreateReplicationGroup' {} Maybe Text
a -> CreateReplicationGroup
s {$sel:engineVersion:CreateReplicationGroup' :: Maybe Text
engineVersion = Maybe Text
a} :: CreateReplicationGroup)
createReplicationGroup_globalReplicationGroupId :: Lens.Lens' CreateReplicationGroup (Prelude.Maybe Prelude.Text)
createReplicationGroup_globalReplicationGroupId :: Lens' CreateReplicationGroup (Maybe Text)
createReplicationGroup_globalReplicationGroupId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateReplicationGroup' {Maybe Text
globalReplicationGroupId :: Maybe Text
$sel:globalReplicationGroupId:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Text
globalReplicationGroupId} -> Maybe Text
globalReplicationGroupId) (\s :: CreateReplicationGroup
s@CreateReplicationGroup' {} Maybe Text
a -> CreateReplicationGroup
s {$sel:globalReplicationGroupId:CreateReplicationGroup' :: Maybe Text
globalReplicationGroupId = Maybe Text
a} :: CreateReplicationGroup)
createReplicationGroup_ipDiscovery :: Lens.Lens' CreateReplicationGroup (Prelude.Maybe IpDiscovery)
createReplicationGroup_ipDiscovery :: Lens' CreateReplicationGroup (Maybe IpDiscovery)
createReplicationGroup_ipDiscovery = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateReplicationGroup' {Maybe IpDiscovery
ipDiscovery :: Maybe IpDiscovery
$sel:ipDiscovery:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe IpDiscovery
ipDiscovery} -> Maybe IpDiscovery
ipDiscovery) (\s :: CreateReplicationGroup
s@CreateReplicationGroup' {} Maybe IpDiscovery
a -> CreateReplicationGroup
s {$sel:ipDiscovery:CreateReplicationGroup' :: Maybe IpDiscovery
ipDiscovery = Maybe IpDiscovery
a} :: CreateReplicationGroup)
createReplicationGroup_kmsKeyId :: Lens.Lens' CreateReplicationGroup (Prelude.Maybe Prelude.Text)
createReplicationGroup_kmsKeyId :: Lens' CreateReplicationGroup (Maybe Text)
createReplicationGroup_kmsKeyId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateReplicationGroup' {Maybe Text
kmsKeyId :: Maybe Text
$sel:kmsKeyId:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Text
kmsKeyId} -> Maybe Text
kmsKeyId) (\s :: CreateReplicationGroup
s@CreateReplicationGroup' {} Maybe Text
a -> CreateReplicationGroup
s {$sel:kmsKeyId:CreateReplicationGroup' :: Maybe Text
kmsKeyId = Maybe Text
a} :: CreateReplicationGroup)
createReplicationGroup_logDeliveryConfigurations :: Lens.Lens' CreateReplicationGroup (Prelude.Maybe [LogDeliveryConfigurationRequest])
createReplicationGroup_logDeliveryConfigurations :: Lens'
CreateReplicationGroup (Maybe [LogDeliveryConfigurationRequest])
createReplicationGroup_logDeliveryConfigurations = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateReplicationGroup' {Maybe [LogDeliveryConfigurationRequest]
logDeliveryConfigurations :: Maybe [LogDeliveryConfigurationRequest]
$sel:logDeliveryConfigurations:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe [LogDeliveryConfigurationRequest]
logDeliveryConfigurations} -> Maybe [LogDeliveryConfigurationRequest]
logDeliveryConfigurations) (\s :: CreateReplicationGroup
s@CreateReplicationGroup' {} Maybe [LogDeliveryConfigurationRequest]
a -> CreateReplicationGroup
s {$sel:logDeliveryConfigurations:CreateReplicationGroup' :: Maybe [LogDeliveryConfigurationRequest]
logDeliveryConfigurations = Maybe [LogDeliveryConfigurationRequest]
a} :: CreateReplicationGroup) 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
createReplicationGroup_multiAZEnabled :: Lens.Lens' CreateReplicationGroup (Prelude.Maybe Prelude.Bool)
createReplicationGroup_multiAZEnabled :: Lens' CreateReplicationGroup (Maybe Bool)
createReplicationGroup_multiAZEnabled = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateReplicationGroup' {Maybe Bool
multiAZEnabled :: Maybe Bool
$sel:multiAZEnabled:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Bool
multiAZEnabled} -> Maybe Bool
multiAZEnabled) (\s :: CreateReplicationGroup
s@CreateReplicationGroup' {} Maybe Bool
a -> CreateReplicationGroup
s {$sel:multiAZEnabled:CreateReplicationGroup' :: Maybe Bool
multiAZEnabled = Maybe Bool
a} :: CreateReplicationGroup)
createReplicationGroup_networkType :: Lens.Lens' CreateReplicationGroup (Prelude.Maybe NetworkType)
createReplicationGroup_networkType :: Lens' CreateReplicationGroup (Maybe NetworkType)
createReplicationGroup_networkType = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateReplicationGroup' {Maybe NetworkType
networkType :: Maybe NetworkType
$sel:networkType:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe NetworkType
networkType} -> Maybe NetworkType
networkType) (\s :: CreateReplicationGroup
s@CreateReplicationGroup' {} Maybe NetworkType
a -> CreateReplicationGroup
s {$sel:networkType:CreateReplicationGroup' :: Maybe NetworkType
networkType = Maybe NetworkType
a} :: CreateReplicationGroup)
createReplicationGroup_nodeGroupConfiguration :: Lens.Lens' CreateReplicationGroup (Prelude.Maybe [NodeGroupConfiguration])
createReplicationGroup_nodeGroupConfiguration :: Lens' CreateReplicationGroup (Maybe [NodeGroupConfiguration])
createReplicationGroup_nodeGroupConfiguration = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateReplicationGroup' {Maybe [NodeGroupConfiguration]
nodeGroupConfiguration :: Maybe [NodeGroupConfiguration]
$sel:nodeGroupConfiguration:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe [NodeGroupConfiguration]
nodeGroupConfiguration} -> Maybe [NodeGroupConfiguration]
nodeGroupConfiguration) (\s :: CreateReplicationGroup
s@CreateReplicationGroup' {} Maybe [NodeGroupConfiguration]
a -> CreateReplicationGroup
s {$sel:nodeGroupConfiguration:CreateReplicationGroup' :: Maybe [NodeGroupConfiguration]
nodeGroupConfiguration = Maybe [NodeGroupConfiguration]
a} :: CreateReplicationGroup) 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
createReplicationGroup_notificationTopicArn :: Lens.Lens' CreateReplicationGroup (Prelude.Maybe Prelude.Text)
createReplicationGroup_notificationTopicArn :: Lens' CreateReplicationGroup (Maybe Text)
createReplicationGroup_notificationTopicArn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateReplicationGroup' {Maybe Text
notificationTopicArn :: Maybe Text
$sel:notificationTopicArn:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Text
notificationTopicArn} -> Maybe Text
notificationTopicArn) (\s :: CreateReplicationGroup
s@CreateReplicationGroup' {} Maybe Text
a -> CreateReplicationGroup
s {$sel:notificationTopicArn:CreateReplicationGroup' :: Maybe Text
notificationTopicArn = Maybe Text
a} :: CreateReplicationGroup)
createReplicationGroup_numCacheClusters :: Lens.Lens' CreateReplicationGroup (Prelude.Maybe Prelude.Int)
createReplicationGroup_numCacheClusters :: Lens' CreateReplicationGroup (Maybe Int)
createReplicationGroup_numCacheClusters = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateReplicationGroup' {Maybe Int
numCacheClusters :: Maybe Int
$sel:numCacheClusters:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Int
numCacheClusters} -> Maybe Int
numCacheClusters) (\s :: CreateReplicationGroup
s@CreateReplicationGroup' {} Maybe Int
a -> CreateReplicationGroup
s {$sel:numCacheClusters:CreateReplicationGroup' :: Maybe Int
numCacheClusters = Maybe Int
a} :: CreateReplicationGroup)
createReplicationGroup_numNodeGroups :: Lens.Lens' CreateReplicationGroup (Prelude.Maybe Prelude.Int)
createReplicationGroup_numNodeGroups :: Lens' CreateReplicationGroup (Maybe Int)
createReplicationGroup_numNodeGroups = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateReplicationGroup' {Maybe Int
numNodeGroups :: Maybe Int
$sel:numNodeGroups:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Int
numNodeGroups} -> Maybe Int
numNodeGroups) (\s :: CreateReplicationGroup
s@CreateReplicationGroup' {} Maybe Int
a -> CreateReplicationGroup
s {$sel:numNodeGroups:CreateReplicationGroup' :: Maybe Int
numNodeGroups = Maybe Int
a} :: CreateReplicationGroup)
createReplicationGroup_port :: Lens.Lens' CreateReplicationGroup (Prelude.Maybe Prelude.Int)
createReplicationGroup_port :: Lens' CreateReplicationGroup (Maybe Int)
createReplicationGroup_port = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateReplicationGroup' {Maybe Int
port :: Maybe Int
$sel:port:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Int
port} -> Maybe Int
port) (\s :: CreateReplicationGroup
s@CreateReplicationGroup' {} Maybe Int
a -> CreateReplicationGroup
s {$sel:port:CreateReplicationGroup' :: Maybe Int
port = Maybe Int
a} :: CreateReplicationGroup)
createReplicationGroup_preferredCacheClusterAZs :: Lens.Lens' CreateReplicationGroup (Prelude.Maybe [Prelude.Text])
createReplicationGroup_preferredCacheClusterAZs :: Lens' CreateReplicationGroup (Maybe [Text])
createReplicationGroup_preferredCacheClusterAZs = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateReplicationGroup' {Maybe [Text]
preferredCacheClusterAZs :: Maybe [Text]
$sel:preferredCacheClusterAZs:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe [Text]
preferredCacheClusterAZs} -> Maybe [Text]
preferredCacheClusterAZs) (\s :: CreateReplicationGroup
s@CreateReplicationGroup' {} Maybe [Text]
a -> CreateReplicationGroup
s {$sel:preferredCacheClusterAZs:CreateReplicationGroup' :: Maybe [Text]
preferredCacheClusterAZs = Maybe [Text]
a} :: CreateReplicationGroup) 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
createReplicationGroup_preferredMaintenanceWindow :: Lens.Lens' CreateReplicationGroup (Prelude.Maybe Prelude.Text)
createReplicationGroup_preferredMaintenanceWindow :: Lens' CreateReplicationGroup (Maybe Text)
createReplicationGroup_preferredMaintenanceWindow = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateReplicationGroup' {Maybe Text
preferredMaintenanceWindow :: Maybe Text
$sel:preferredMaintenanceWindow:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Text
preferredMaintenanceWindow} -> Maybe Text
preferredMaintenanceWindow) (\s :: CreateReplicationGroup
s@CreateReplicationGroup' {} Maybe Text
a -> CreateReplicationGroup
s {$sel:preferredMaintenanceWindow:CreateReplicationGroup' :: Maybe Text
preferredMaintenanceWindow = Maybe Text
a} :: CreateReplicationGroup)
createReplicationGroup_primaryClusterId :: Lens.Lens' CreateReplicationGroup (Prelude.Maybe Prelude.Text)
createReplicationGroup_primaryClusterId :: Lens' CreateReplicationGroup (Maybe Text)
createReplicationGroup_primaryClusterId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateReplicationGroup' {Maybe Text
primaryClusterId :: Maybe Text
$sel:primaryClusterId:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Text
primaryClusterId} -> Maybe Text
primaryClusterId) (\s :: CreateReplicationGroup
s@CreateReplicationGroup' {} Maybe Text
a -> CreateReplicationGroup
s {$sel:primaryClusterId:CreateReplicationGroup' :: Maybe Text
primaryClusterId = Maybe Text
a} :: CreateReplicationGroup)
createReplicationGroup_replicasPerNodeGroup :: Lens.Lens' CreateReplicationGroup (Prelude.Maybe Prelude.Int)
createReplicationGroup_replicasPerNodeGroup :: Lens' CreateReplicationGroup (Maybe Int)
createReplicationGroup_replicasPerNodeGroup = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateReplicationGroup' {Maybe Int
replicasPerNodeGroup :: Maybe Int
$sel:replicasPerNodeGroup:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Int
replicasPerNodeGroup} -> Maybe Int
replicasPerNodeGroup) (\s :: CreateReplicationGroup
s@CreateReplicationGroup' {} Maybe Int
a -> CreateReplicationGroup
s {$sel:replicasPerNodeGroup:CreateReplicationGroup' :: Maybe Int
replicasPerNodeGroup = Maybe Int
a} :: CreateReplicationGroup)
createReplicationGroup_securityGroupIds :: Lens.Lens' CreateReplicationGroup (Prelude.Maybe [Prelude.Text])
createReplicationGroup_securityGroupIds :: Lens' CreateReplicationGroup (Maybe [Text])
createReplicationGroup_securityGroupIds = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateReplicationGroup' {Maybe [Text]
securityGroupIds :: Maybe [Text]
$sel:securityGroupIds:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe [Text]
securityGroupIds} -> Maybe [Text]
securityGroupIds) (\s :: CreateReplicationGroup
s@CreateReplicationGroup' {} Maybe [Text]
a -> CreateReplicationGroup
s {$sel:securityGroupIds:CreateReplicationGroup' :: Maybe [Text]
securityGroupIds = Maybe [Text]
a} :: CreateReplicationGroup) 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
createReplicationGroup_snapshotArns :: Lens.Lens' CreateReplicationGroup (Prelude.Maybe [Prelude.Text])
createReplicationGroup_snapshotArns :: Lens' CreateReplicationGroup (Maybe [Text])
createReplicationGroup_snapshotArns = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateReplicationGroup' {Maybe [Text]
snapshotArns :: Maybe [Text]
$sel:snapshotArns:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe [Text]
snapshotArns} -> Maybe [Text]
snapshotArns) (\s :: CreateReplicationGroup
s@CreateReplicationGroup' {} Maybe [Text]
a -> CreateReplicationGroup
s {$sel:snapshotArns:CreateReplicationGroup' :: Maybe [Text]
snapshotArns = Maybe [Text]
a} :: CreateReplicationGroup) 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
createReplicationGroup_snapshotName :: Lens.Lens' CreateReplicationGroup (Prelude.Maybe Prelude.Text)
createReplicationGroup_snapshotName :: Lens' CreateReplicationGroup (Maybe Text)
createReplicationGroup_snapshotName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateReplicationGroup' {Maybe Text
snapshotName :: Maybe Text
$sel:snapshotName:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Text
snapshotName} -> Maybe Text
snapshotName) (\s :: CreateReplicationGroup
s@CreateReplicationGroup' {} Maybe Text
a -> CreateReplicationGroup
s {$sel:snapshotName:CreateReplicationGroup' :: Maybe Text
snapshotName = Maybe Text
a} :: CreateReplicationGroup)
createReplicationGroup_snapshotRetentionLimit :: Lens.Lens' CreateReplicationGroup (Prelude.Maybe Prelude.Int)
createReplicationGroup_snapshotRetentionLimit :: Lens' CreateReplicationGroup (Maybe Int)
createReplicationGroup_snapshotRetentionLimit = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateReplicationGroup' {Maybe Int
snapshotRetentionLimit :: Maybe Int
$sel:snapshotRetentionLimit:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Int
snapshotRetentionLimit} -> Maybe Int
snapshotRetentionLimit) (\s :: CreateReplicationGroup
s@CreateReplicationGroup' {} Maybe Int
a -> CreateReplicationGroup
s {$sel:snapshotRetentionLimit:CreateReplicationGroup' :: Maybe Int
snapshotRetentionLimit = Maybe Int
a} :: CreateReplicationGroup)
createReplicationGroup_snapshotWindow :: Lens.Lens' CreateReplicationGroup (Prelude.Maybe Prelude.Text)
createReplicationGroup_snapshotWindow :: Lens' CreateReplicationGroup (Maybe Text)
createReplicationGroup_snapshotWindow = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateReplicationGroup' {Maybe Text
snapshotWindow :: Maybe Text
$sel:snapshotWindow:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Text
snapshotWindow} -> Maybe Text
snapshotWindow) (\s :: CreateReplicationGroup
s@CreateReplicationGroup' {} Maybe Text
a -> CreateReplicationGroup
s {$sel:snapshotWindow:CreateReplicationGroup' :: Maybe Text
snapshotWindow = Maybe Text
a} :: CreateReplicationGroup)
createReplicationGroup_tags :: Lens.Lens' CreateReplicationGroup (Prelude.Maybe [Tag])
createReplicationGroup_tags :: Lens' CreateReplicationGroup (Maybe [Tag])
createReplicationGroup_tags = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateReplicationGroup' {Maybe [Tag]
tags :: Maybe [Tag]
$sel:tags:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe [Tag]
tags} -> Maybe [Tag]
tags) (\s :: CreateReplicationGroup
s@CreateReplicationGroup' {} Maybe [Tag]
a -> CreateReplicationGroup
s {$sel:tags:CreateReplicationGroup' :: Maybe [Tag]
tags = Maybe [Tag]
a} :: CreateReplicationGroup) 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
createReplicationGroup_transitEncryptionEnabled :: Lens.Lens' CreateReplicationGroup (Prelude.Maybe Prelude.Bool)
createReplicationGroup_transitEncryptionEnabled :: Lens' CreateReplicationGroup (Maybe Bool)
createReplicationGroup_transitEncryptionEnabled = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateReplicationGroup' {Maybe Bool
transitEncryptionEnabled :: Maybe Bool
$sel:transitEncryptionEnabled:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Bool
transitEncryptionEnabled} -> Maybe Bool
transitEncryptionEnabled) (\s :: CreateReplicationGroup
s@CreateReplicationGroup' {} Maybe Bool
a -> CreateReplicationGroup
s {$sel:transitEncryptionEnabled:CreateReplicationGroup' :: Maybe Bool
transitEncryptionEnabled = Maybe Bool
a} :: CreateReplicationGroup)
createReplicationGroup_transitEncryptionMode :: Lens.Lens' CreateReplicationGroup (Prelude.Maybe TransitEncryptionMode)
createReplicationGroup_transitEncryptionMode :: Lens' CreateReplicationGroup (Maybe TransitEncryptionMode)
createReplicationGroup_transitEncryptionMode = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateReplicationGroup' {Maybe TransitEncryptionMode
transitEncryptionMode :: Maybe TransitEncryptionMode
$sel:transitEncryptionMode:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe TransitEncryptionMode
transitEncryptionMode} -> Maybe TransitEncryptionMode
transitEncryptionMode) (\s :: CreateReplicationGroup
s@CreateReplicationGroup' {} Maybe TransitEncryptionMode
a -> CreateReplicationGroup
s {$sel:transitEncryptionMode:CreateReplicationGroup' :: Maybe TransitEncryptionMode
transitEncryptionMode = Maybe TransitEncryptionMode
a} :: CreateReplicationGroup)
createReplicationGroup_userGroupIds :: Lens.Lens' CreateReplicationGroup (Prelude.Maybe (Prelude.NonEmpty Prelude.Text))
createReplicationGroup_userGroupIds :: Lens' CreateReplicationGroup (Maybe (NonEmpty Text))
createReplicationGroup_userGroupIds = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateReplicationGroup' {Maybe (NonEmpty Text)
userGroupIds :: Maybe (NonEmpty Text)
$sel:userGroupIds:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe (NonEmpty Text)
userGroupIds} -> Maybe (NonEmpty Text)
userGroupIds) (\s :: CreateReplicationGroup
s@CreateReplicationGroup' {} Maybe (NonEmpty Text)
a -> CreateReplicationGroup
s {$sel:userGroupIds:CreateReplicationGroup' :: Maybe (NonEmpty Text)
userGroupIds = Maybe (NonEmpty Text)
a} :: CreateReplicationGroup) 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
createReplicationGroup_replicationGroupId :: Lens.Lens' CreateReplicationGroup Prelude.Text
createReplicationGroup_replicationGroupId :: Lens' CreateReplicationGroup Text
createReplicationGroup_replicationGroupId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateReplicationGroup' {Text
replicationGroupId :: Text
$sel:replicationGroupId:CreateReplicationGroup' :: CreateReplicationGroup -> Text
replicationGroupId} -> Text
replicationGroupId) (\s :: CreateReplicationGroup
s@CreateReplicationGroup' {} Text
a -> CreateReplicationGroup
s {$sel:replicationGroupId:CreateReplicationGroup' :: Text
replicationGroupId = Text
a} :: CreateReplicationGroup)
createReplicationGroup_replicationGroupDescription :: Lens.Lens' CreateReplicationGroup Prelude.Text
createReplicationGroup_replicationGroupDescription :: Lens' CreateReplicationGroup Text
createReplicationGroup_replicationGroupDescription = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateReplicationGroup' {Text
replicationGroupDescription :: Text
$sel:replicationGroupDescription:CreateReplicationGroup' :: CreateReplicationGroup -> Text
replicationGroupDescription} -> Text
replicationGroupDescription) (\s :: CreateReplicationGroup
s@CreateReplicationGroup' {} Text
a -> CreateReplicationGroup
s {$sel:replicationGroupDescription:CreateReplicationGroup' :: Text
replicationGroupDescription = Text
a} :: CreateReplicationGroup)
instance Core.AWSRequest CreateReplicationGroup where
type
AWSResponse CreateReplicationGroup =
CreateReplicationGroupResponse
request :: (Service -> Service)
-> CreateReplicationGroup -> Request CreateReplicationGroup
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 CreateReplicationGroup
-> ClientResponse ClientBody
-> m (Either
Error (ClientResponse (AWSResponse CreateReplicationGroup)))
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
"CreateReplicationGroupResult"
( \Int
s ResponseHeaders
h [Node]
x ->
Maybe ReplicationGroup -> Int -> CreateReplicationGroupResponse
CreateReplicationGroupResponse'
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
"ReplicationGroup")
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 CreateReplicationGroup where
hashWithSalt :: Int -> CreateReplicationGroup -> Int
hashWithSalt Int
_salt CreateReplicationGroup' {Maybe Bool
Maybe Int
Maybe [Text]
Maybe [LogDeliveryConfigurationRequest]
Maybe [NodeGroupConfiguration]
Maybe [Tag]
Maybe (NonEmpty Text)
Maybe Text
Maybe IpDiscovery
Maybe NetworkType
Maybe TransitEncryptionMode
Text
replicationGroupDescription :: Text
replicationGroupId :: Text
userGroupIds :: Maybe (NonEmpty Text)
transitEncryptionMode :: Maybe TransitEncryptionMode
transitEncryptionEnabled :: Maybe Bool
tags :: Maybe [Tag]
snapshotWindow :: Maybe Text
snapshotRetentionLimit :: Maybe Int
snapshotName :: Maybe Text
snapshotArns :: Maybe [Text]
securityGroupIds :: Maybe [Text]
replicasPerNodeGroup :: Maybe Int
primaryClusterId :: Maybe Text
preferredMaintenanceWindow :: Maybe Text
preferredCacheClusterAZs :: Maybe [Text]
port :: Maybe Int
numNodeGroups :: Maybe Int
numCacheClusters :: Maybe Int
notificationTopicArn :: Maybe Text
nodeGroupConfiguration :: Maybe [NodeGroupConfiguration]
networkType :: Maybe NetworkType
multiAZEnabled :: Maybe Bool
logDeliveryConfigurations :: Maybe [LogDeliveryConfigurationRequest]
kmsKeyId :: Maybe Text
ipDiscovery :: Maybe IpDiscovery
globalReplicationGroupId :: Maybe Text
engineVersion :: Maybe Text
engine :: Maybe Text
dataTieringEnabled :: Maybe Bool
cacheSubnetGroupName :: Maybe Text
cacheSecurityGroupNames :: Maybe [Text]
cacheParameterGroupName :: Maybe Text
cacheNodeType :: Maybe Text
automaticFailoverEnabled :: Maybe Bool
autoMinorVersionUpgrade :: Maybe Bool
authToken :: Maybe Text
atRestEncryptionEnabled :: Maybe Bool
$sel:replicationGroupDescription:CreateReplicationGroup' :: CreateReplicationGroup -> Text
$sel:replicationGroupId:CreateReplicationGroup' :: CreateReplicationGroup -> Text
$sel:userGroupIds:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe (NonEmpty Text)
$sel:transitEncryptionMode:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe TransitEncryptionMode
$sel:transitEncryptionEnabled:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Bool
$sel:tags:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe [Tag]
$sel:snapshotWindow:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Text
$sel:snapshotRetentionLimit:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Int
$sel:snapshotName:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Text
$sel:snapshotArns:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe [Text]
$sel:securityGroupIds:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe [Text]
$sel:replicasPerNodeGroup:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Int
$sel:primaryClusterId:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Text
$sel:preferredMaintenanceWindow:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Text
$sel:preferredCacheClusterAZs:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe [Text]
$sel:port:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Int
$sel:numNodeGroups:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Int
$sel:numCacheClusters:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Int
$sel:notificationTopicArn:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Text
$sel:nodeGroupConfiguration:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe [NodeGroupConfiguration]
$sel:networkType:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe NetworkType
$sel:multiAZEnabled:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Bool
$sel:logDeliveryConfigurations:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe [LogDeliveryConfigurationRequest]
$sel:kmsKeyId:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Text
$sel:ipDiscovery:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe IpDiscovery
$sel:globalReplicationGroupId:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Text
$sel:engineVersion:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Text
$sel:engine:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Text
$sel:dataTieringEnabled:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Bool
$sel:cacheSubnetGroupName:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Text
$sel:cacheSecurityGroupNames:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe [Text]
$sel:cacheParameterGroupName:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Text
$sel:cacheNodeType:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Text
$sel:automaticFailoverEnabled:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Bool
$sel:autoMinorVersionUpgrade:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Bool
$sel:authToken:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Text
$sel:atRestEncryptionEnabled:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Bool
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Bool
atRestEncryptionEnabled
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
authToken
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Bool
autoMinorVersionUpgrade
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Bool
automaticFailoverEnabled
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
cacheNodeType
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
cacheParameterGroupName
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe [Text]
cacheSecurityGroupNames
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
cacheSubnetGroupName
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Bool
dataTieringEnabled
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
engine
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
engineVersion
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
globalReplicationGroupId
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe IpDiscovery
ipDiscovery
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
kmsKeyId
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe [LogDeliveryConfigurationRequest]
logDeliveryConfigurations
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Bool
multiAZEnabled
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe NetworkType
networkType
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe [NodeGroupConfiguration]
nodeGroupConfiguration
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
notificationTopicArn
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Int
numCacheClusters
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Int
numNodeGroups
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Int
port
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe [Text]
preferredCacheClusterAZs
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
preferredMaintenanceWindow
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
primaryClusterId
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Int
replicasPerNodeGroup
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe [Text]
securityGroupIds
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe [Text]
snapshotArns
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
snapshotName
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Int
snapshotRetentionLimit
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
snapshotWindow
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe [Tag]
tags
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Bool
transitEncryptionEnabled
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe TransitEncryptionMode
transitEncryptionMode
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe (NonEmpty Text)
userGroupIds
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
replicationGroupId
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
replicationGroupDescription
instance Prelude.NFData CreateReplicationGroup where
rnf :: CreateReplicationGroup -> ()
rnf CreateReplicationGroup' {Maybe Bool
Maybe Int
Maybe [Text]
Maybe [LogDeliveryConfigurationRequest]
Maybe [NodeGroupConfiguration]
Maybe [Tag]
Maybe (NonEmpty Text)
Maybe Text
Maybe IpDiscovery
Maybe NetworkType
Maybe TransitEncryptionMode
Text
replicationGroupDescription :: Text
replicationGroupId :: Text
userGroupIds :: Maybe (NonEmpty Text)
transitEncryptionMode :: Maybe TransitEncryptionMode
transitEncryptionEnabled :: Maybe Bool
tags :: Maybe [Tag]
snapshotWindow :: Maybe Text
snapshotRetentionLimit :: Maybe Int
snapshotName :: Maybe Text
snapshotArns :: Maybe [Text]
securityGroupIds :: Maybe [Text]
replicasPerNodeGroup :: Maybe Int
primaryClusterId :: Maybe Text
preferredMaintenanceWindow :: Maybe Text
preferredCacheClusterAZs :: Maybe [Text]
port :: Maybe Int
numNodeGroups :: Maybe Int
numCacheClusters :: Maybe Int
notificationTopicArn :: Maybe Text
nodeGroupConfiguration :: Maybe [NodeGroupConfiguration]
networkType :: Maybe NetworkType
multiAZEnabled :: Maybe Bool
logDeliveryConfigurations :: Maybe [LogDeliveryConfigurationRequest]
kmsKeyId :: Maybe Text
ipDiscovery :: Maybe IpDiscovery
globalReplicationGroupId :: Maybe Text
engineVersion :: Maybe Text
engine :: Maybe Text
dataTieringEnabled :: Maybe Bool
cacheSubnetGroupName :: Maybe Text
cacheSecurityGroupNames :: Maybe [Text]
cacheParameterGroupName :: Maybe Text
cacheNodeType :: Maybe Text
automaticFailoverEnabled :: Maybe Bool
autoMinorVersionUpgrade :: Maybe Bool
authToken :: Maybe Text
atRestEncryptionEnabled :: Maybe Bool
$sel:replicationGroupDescription:CreateReplicationGroup' :: CreateReplicationGroup -> Text
$sel:replicationGroupId:CreateReplicationGroup' :: CreateReplicationGroup -> Text
$sel:userGroupIds:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe (NonEmpty Text)
$sel:transitEncryptionMode:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe TransitEncryptionMode
$sel:transitEncryptionEnabled:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Bool
$sel:tags:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe [Tag]
$sel:snapshotWindow:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Text
$sel:snapshotRetentionLimit:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Int
$sel:snapshotName:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Text
$sel:snapshotArns:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe [Text]
$sel:securityGroupIds:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe [Text]
$sel:replicasPerNodeGroup:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Int
$sel:primaryClusterId:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Text
$sel:preferredMaintenanceWindow:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Text
$sel:preferredCacheClusterAZs:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe [Text]
$sel:port:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Int
$sel:numNodeGroups:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Int
$sel:numCacheClusters:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Int
$sel:notificationTopicArn:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Text
$sel:nodeGroupConfiguration:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe [NodeGroupConfiguration]
$sel:networkType:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe NetworkType
$sel:multiAZEnabled:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Bool
$sel:logDeliveryConfigurations:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe [LogDeliveryConfigurationRequest]
$sel:kmsKeyId:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Text
$sel:ipDiscovery:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe IpDiscovery
$sel:globalReplicationGroupId:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Text
$sel:engineVersion:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Text
$sel:engine:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Text
$sel:dataTieringEnabled:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Bool
$sel:cacheSubnetGroupName:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Text
$sel:cacheSecurityGroupNames:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe [Text]
$sel:cacheParameterGroupName:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Text
$sel:cacheNodeType:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Text
$sel:automaticFailoverEnabled:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Bool
$sel:autoMinorVersionUpgrade:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Bool
$sel:authToken:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Text
$sel:atRestEncryptionEnabled:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Bool
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe Bool
atRestEncryptionEnabled
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
authToken
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 Bool
automaticFailoverEnabled
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
cacheNodeType
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
cacheParameterGroupName
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe [Text]
cacheSecurityGroupNames
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
cacheSubnetGroupName
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Bool
dataTieringEnabled
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
engine
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 Text
globalReplicationGroupId
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe IpDiscovery
ipDiscovery
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 [LogDeliveryConfigurationRequest]
logDeliveryConfigurations
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Bool
multiAZEnabled
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe NetworkType
networkType
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe [NodeGroupConfiguration]
nodeGroupConfiguration
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
notificationTopicArn
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Int
numCacheClusters
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Int
numNodeGroups
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]
preferredCacheClusterAZs
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 Text
primaryClusterId
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf
Maybe Int
replicasPerNodeGroup
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf
Maybe [Text]
securityGroupIds
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf
Maybe [Text]
snapshotArns
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf
Maybe Text
snapshotName
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf
Maybe Int
snapshotRetentionLimit
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf
Maybe Text
snapshotWindow
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
transitEncryptionEnabled
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf
Maybe TransitEncryptionMode
transitEncryptionMode
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf
Maybe (NonEmpty Text)
userGroupIds
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf
Text
replicationGroupId
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf
Text
replicationGroupDescription
instance Data.ToHeaders CreateReplicationGroup where
toHeaders :: CreateReplicationGroup -> ResponseHeaders
toHeaders = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty
instance Data.ToPath CreateReplicationGroup where
toPath :: CreateReplicationGroup -> ByteString
toPath = forall a b. a -> b -> a
Prelude.const ByteString
"/"
instance Data.ToQuery CreateReplicationGroup where
toQuery :: CreateReplicationGroup -> QueryString
toQuery CreateReplicationGroup' {Maybe Bool
Maybe Int
Maybe [Text]
Maybe [LogDeliveryConfigurationRequest]
Maybe [NodeGroupConfiguration]
Maybe [Tag]
Maybe (NonEmpty Text)
Maybe Text
Maybe IpDiscovery
Maybe NetworkType
Maybe TransitEncryptionMode
Text
replicationGroupDescription :: Text
replicationGroupId :: Text
userGroupIds :: Maybe (NonEmpty Text)
transitEncryptionMode :: Maybe TransitEncryptionMode
transitEncryptionEnabled :: Maybe Bool
tags :: Maybe [Tag]
snapshotWindow :: Maybe Text
snapshotRetentionLimit :: Maybe Int
snapshotName :: Maybe Text
snapshotArns :: Maybe [Text]
securityGroupIds :: Maybe [Text]
replicasPerNodeGroup :: Maybe Int
primaryClusterId :: Maybe Text
preferredMaintenanceWindow :: Maybe Text
preferredCacheClusterAZs :: Maybe [Text]
port :: Maybe Int
numNodeGroups :: Maybe Int
numCacheClusters :: Maybe Int
notificationTopicArn :: Maybe Text
nodeGroupConfiguration :: Maybe [NodeGroupConfiguration]
networkType :: Maybe NetworkType
multiAZEnabled :: Maybe Bool
logDeliveryConfigurations :: Maybe [LogDeliveryConfigurationRequest]
kmsKeyId :: Maybe Text
ipDiscovery :: Maybe IpDiscovery
globalReplicationGroupId :: Maybe Text
engineVersion :: Maybe Text
engine :: Maybe Text
dataTieringEnabled :: Maybe Bool
cacheSubnetGroupName :: Maybe Text
cacheSecurityGroupNames :: Maybe [Text]
cacheParameterGroupName :: Maybe Text
cacheNodeType :: Maybe Text
automaticFailoverEnabled :: Maybe Bool
autoMinorVersionUpgrade :: Maybe Bool
authToken :: Maybe Text
atRestEncryptionEnabled :: Maybe Bool
$sel:replicationGroupDescription:CreateReplicationGroup' :: CreateReplicationGroup -> Text
$sel:replicationGroupId:CreateReplicationGroup' :: CreateReplicationGroup -> Text
$sel:userGroupIds:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe (NonEmpty Text)
$sel:transitEncryptionMode:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe TransitEncryptionMode
$sel:transitEncryptionEnabled:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Bool
$sel:tags:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe [Tag]
$sel:snapshotWindow:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Text
$sel:snapshotRetentionLimit:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Int
$sel:snapshotName:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Text
$sel:snapshotArns:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe [Text]
$sel:securityGroupIds:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe [Text]
$sel:replicasPerNodeGroup:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Int
$sel:primaryClusterId:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Text
$sel:preferredMaintenanceWindow:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Text
$sel:preferredCacheClusterAZs:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe [Text]
$sel:port:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Int
$sel:numNodeGroups:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Int
$sel:numCacheClusters:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Int
$sel:notificationTopicArn:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Text
$sel:nodeGroupConfiguration:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe [NodeGroupConfiguration]
$sel:networkType:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe NetworkType
$sel:multiAZEnabled:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Bool
$sel:logDeliveryConfigurations:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe [LogDeliveryConfigurationRequest]
$sel:kmsKeyId:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Text
$sel:ipDiscovery:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe IpDiscovery
$sel:globalReplicationGroupId:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Text
$sel:engineVersion:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Text
$sel:engine:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Text
$sel:dataTieringEnabled:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Bool
$sel:cacheSubnetGroupName:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Text
$sel:cacheSecurityGroupNames:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe [Text]
$sel:cacheParameterGroupName:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Text
$sel:cacheNodeType:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Text
$sel:automaticFailoverEnabled:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Bool
$sel:autoMinorVersionUpgrade:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Bool
$sel:authToken:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Text
$sel:atRestEncryptionEnabled:CreateReplicationGroup' :: CreateReplicationGroup -> Maybe Bool
..} =
forall a. Monoid a => [a] -> a
Prelude.mconcat
[ ByteString
"Action"
forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: (ByteString
"CreateReplicationGroup" :: Prelude.ByteString),
ByteString
"Version"
forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: (ByteString
"2015-02-02" :: Prelude.ByteString),
ByteString
"AtRestEncryptionEnabled"
forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Bool
atRestEncryptionEnabled,
ByteString
"AuthToken" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
authToken,
ByteString
"AutoMinorVersionUpgrade"
forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Bool
autoMinorVersionUpgrade,
ByteString
"AutomaticFailoverEnabled"
forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Bool
automaticFailoverEnabled,
ByteString
"CacheNodeType" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
cacheNodeType,
ByteString
"CacheParameterGroupName"
forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
cacheParameterGroupName,
ByteString
"CacheSecurityGroupNames"
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
"CacheSecurityGroupName"
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [Text]
cacheSecurityGroupNames
),
ByteString
"CacheSubnetGroupName" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
cacheSubnetGroupName,
ByteString
"DataTieringEnabled" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Bool
dataTieringEnabled,
ByteString
"Engine" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
engine,
ByteString
"EngineVersion" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
engineVersion,
ByteString
"GlobalReplicationGroupId"
forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
globalReplicationGroupId,
ByteString
"IpDiscovery" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe IpDiscovery
ipDiscovery,
ByteString
"KmsKeyId" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
kmsKeyId,
ByteString
"LogDeliveryConfigurations"
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
"LogDeliveryConfigurationRequest"
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [LogDeliveryConfigurationRequest]
logDeliveryConfigurations
),
ByteString
"MultiAZEnabled" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Bool
multiAZEnabled,
ByteString
"NetworkType" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe NetworkType
networkType,
ByteString
"NodeGroupConfiguration"
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
"NodeGroupConfiguration"
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [NodeGroupConfiguration]
nodeGroupConfiguration
),
ByteString
"NotificationTopicArn" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
notificationTopicArn,
ByteString
"NumCacheClusters" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Int
numCacheClusters,
ByteString
"NumNodeGroups" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Int
numNodeGroups,
ByteString
"Port" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Int
port,
ByteString
"PreferredCacheClusterAZs"
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
"AvailabilityZone"
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [Text]
preferredCacheClusterAZs
),
ByteString
"PreferredMaintenanceWindow"
forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
preferredMaintenanceWindow,
ByteString
"PrimaryClusterId" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
primaryClusterId,
ByteString
"ReplicasPerNodeGroup" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Int
replicasPerNodeGroup,
ByteString
"SecurityGroupIds"
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
"SecurityGroupId"
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [Text]
securityGroupIds
),
ByteString
"SnapshotArns"
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
"SnapshotArn"
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [Text]
snapshotArns
),
ByteString
"SnapshotName" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
snapshotName,
ByteString
"SnapshotRetentionLimit"
forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Int
snapshotRetentionLimit,
ByteString
"SnapshotWindow" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
snapshotWindow,
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
"TransitEncryptionEnabled"
forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Bool
transitEncryptionEnabled,
ByteString
"TransitEncryptionMode"
forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe TransitEncryptionMode
transitEncryptionMode,
ByteString
"UserGroupIds"
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 (NonEmpty Text)
userGroupIds),
ByteString
"ReplicationGroupId" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Text
replicationGroupId,
ByteString
"ReplicationGroupDescription"
forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Text
replicationGroupDescription
]
data CreateReplicationGroupResponse = CreateReplicationGroupResponse'
{ CreateReplicationGroupResponse -> Maybe ReplicationGroup
replicationGroup :: Prelude.Maybe ReplicationGroup,
CreateReplicationGroupResponse -> Int
httpStatus :: Prelude.Int
}
deriving (CreateReplicationGroupResponse
-> CreateReplicationGroupResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: CreateReplicationGroupResponse
-> CreateReplicationGroupResponse -> Bool
$c/= :: CreateReplicationGroupResponse
-> CreateReplicationGroupResponse -> Bool
== :: CreateReplicationGroupResponse
-> CreateReplicationGroupResponse -> Bool
$c== :: CreateReplicationGroupResponse
-> CreateReplicationGroupResponse -> Bool
Prelude.Eq, ReadPrec [CreateReplicationGroupResponse]
ReadPrec CreateReplicationGroupResponse
Int -> ReadS CreateReplicationGroupResponse
ReadS [CreateReplicationGroupResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [CreateReplicationGroupResponse]
$creadListPrec :: ReadPrec [CreateReplicationGroupResponse]
readPrec :: ReadPrec CreateReplicationGroupResponse
$creadPrec :: ReadPrec CreateReplicationGroupResponse
readList :: ReadS [CreateReplicationGroupResponse]
$creadList :: ReadS [CreateReplicationGroupResponse]
readsPrec :: Int -> ReadS CreateReplicationGroupResponse
$creadsPrec :: Int -> ReadS CreateReplicationGroupResponse
Prelude.Read, Int -> CreateReplicationGroupResponse -> ShowS
[CreateReplicationGroupResponse] -> ShowS
CreateReplicationGroupResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [CreateReplicationGroupResponse] -> ShowS
$cshowList :: [CreateReplicationGroupResponse] -> ShowS
show :: CreateReplicationGroupResponse -> String
$cshow :: CreateReplicationGroupResponse -> String
showsPrec :: Int -> CreateReplicationGroupResponse -> ShowS
$cshowsPrec :: Int -> CreateReplicationGroupResponse -> ShowS
Prelude.Show, forall x.
Rep CreateReplicationGroupResponse x
-> CreateReplicationGroupResponse
forall x.
CreateReplicationGroupResponse
-> Rep CreateReplicationGroupResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep CreateReplicationGroupResponse x
-> CreateReplicationGroupResponse
$cfrom :: forall x.
CreateReplicationGroupResponse
-> Rep CreateReplicationGroupResponse x
Prelude.Generic)
newCreateReplicationGroupResponse ::
Prelude.Int ->
CreateReplicationGroupResponse
newCreateReplicationGroupResponse :: Int -> CreateReplicationGroupResponse
newCreateReplicationGroupResponse Int
pHttpStatus_ =
CreateReplicationGroupResponse'
{ $sel:replicationGroup:CreateReplicationGroupResponse' :: Maybe ReplicationGroup
replicationGroup =
forall a. Maybe a
Prelude.Nothing,
$sel:httpStatus:CreateReplicationGroupResponse' :: Int
httpStatus = Int
pHttpStatus_
}
createReplicationGroupResponse_replicationGroup :: Lens.Lens' CreateReplicationGroupResponse (Prelude.Maybe ReplicationGroup)
createReplicationGroupResponse_replicationGroup :: Lens' CreateReplicationGroupResponse (Maybe ReplicationGroup)
createReplicationGroupResponse_replicationGroup = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateReplicationGroupResponse' {Maybe ReplicationGroup
replicationGroup :: Maybe ReplicationGroup
$sel:replicationGroup:CreateReplicationGroupResponse' :: CreateReplicationGroupResponse -> Maybe ReplicationGroup
replicationGroup} -> Maybe ReplicationGroup
replicationGroup) (\s :: CreateReplicationGroupResponse
s@CreateReplicationGroupResponse' {} Maybe ReplicationGroup
a -> CreateReplicationGroupResponse
s {$sel:replicationGroup:CreateReplicationGroupResponse' :: Maybe ReplicationGroup
replicationGroup = Maybe ReplicationGroup
a} :: CreateReplicationGroupResponse)
createReplicationGroupResponse_httpStatus :: Lens.Lens' CreateReplicationGroupResponse Prelude.Int
createReplicationGroupResponse_httpStatus :: Lens' CreateReplicationGroupResponse Int
createReplicationGroupResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateReplicationGroupResponse' {Int
httpStatus :: Int
$sel:httpStatus:CreateReplicationGroupResponse' :: CreateReplicationGroupResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: CreateReplicationGroupResponse
s@CreateReplicationGroupResponse' {} Int
a -> CreateReplicationGroupResponse
s {$sel:httpStatus:CreateReplicationGroupResponse' :: Int
httpStatus = Int
a} :: CreateReplicationGroupResponse)
instance
Prelude.NFData
CreateReplicationGroupResponse
where
rnf :: CreateReplicationGroupResponse -> ()
rnf CreateReplicationGroupResponse' {Int
Maybe ReplicationGroup
httpStatus :: Int
replicationGroup :: Maybe ReplicationGroup
$sel:httpStatus:CreateReplicationGroupResponse' :: CreateReplicationGroupResponse -> Int
$sel:replicationGroup:CreateReplicationGroupResponse' :: CreateReplicationGroupResponse -> Maybe ReplicationGroup
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe ReplicationGroup
replicationGroup
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Int
httpStatus