{-# 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 #-}

-- Derived from AWS service descriptions, licensed under Apache 2.0.

-- |
-- Module      : Amazonka.ElastiCache.ModifyReplicationGroup
-- Copyright   : (c) 2013-2023 Brendan Hay
-- License     : Mozilla Public License, v. 2.0.
-- Maintainer  : Brendan Hay
-- Stability   : auto-generated
-- Portability : non-portable (GHC extensions)
--
-- Modifies the settings for a replication group.
--
-- -   <https://docs.aws.amazon.com/AmazonElastiCache/latest/red-ug/scaling-redis-cluster-mode-enabled.html Scaling for Amazon ElastiCache for Redis (cluster mode enabled)>
--     in the ElastiCache User Guide
--
-- -   <https://docs.aws.amazon.com/AmazonElastiCache/latest/APIReference/API_ModifyReplicationGroupShardConfiguration.html ModifyReplicationGroupShardConfiguration>
--     in the ElastiCache API Reference
--
-- This operation is valid for Redis only.
module Amazonka.ElastiCache.ModifyReplicationGroup
  ( -- * Creating a Request
    ModifyReplicationGroup (..),
    newModifyReplicationGroup,

    -- * Request Lenses
    modifyReplicationGroup_applyImmediately,
    modifyReplicationGroup_authToken,
    modifyReplicationGroup_authTokenUpdateStrategy,
    modifyReplicationGroup_autoMinorVersionUpgrade,
    modifyReplicationGroup_automaticFailoverEnabled,
    modifyReplicationGroup_cacheNodeType,
    modifyReplicationGroup_cacheParameterGroupName,
    modifyReplicationGroup_cacheSecurityGroupNames,
    modifyReplicationGroup_engineVersion,
    modifyReplicationGroup_ipDiscovery,
    modifyReplicationGroup_logDeliveryConfigurations,
    modifyReplicationGroup_multiAZEnabled,
    modifyReplicationGroup_nodeGroupId,
    modifyReplicationGroup_notificationTopicArn,
    modifyReplicationGroup_notificationTopicStatus,
    modifyReplicationGroup_preferredMaintenanceWindow,
    modifyReplicationGroup_primaryClusterId,
    modifyReplicationGroup_removeUserGroups,
    modifyReplicationGroup_replicationGroupDescription,
    modifyReplicationGroup_securityGroupIds,
    modifyReplicationGroup_snapshotRetentionLimit,
    modifyReplicationGroup_snapshotWindow,
    modifyReplicationGroup_snapshottingClusterId,
    modifyReplicationGroup_transitEncryptionEnabled,
    modifyReplicationGroup_transitEncryptionMode,
    modifyReplicationGroup_userGroupIdsToAdd,
    modifyReplicationGroup_userGroupIdsToRemove,
    modifyReplicationGroup_replicationGroupId,

    -- * Destructuring the Response
    ModifyReplicationGroupResponse (..),
    newModifyReplicationGroupResponse,

    -- * Response Lenses
    modifyReplicationGroupResponse_replicationGroup,
    modifyReplicationGroupResponse_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

-- | Represents the input of a @ModifyReplicationGroups@ operation.
--
-- /See:/ 'newModifyReplicationGroup' smart constructor.
data ModifyReplicationGroup = ModifyReplicationGroup'
  { -- | If @true@, this parameter causes the modifications in this request and
    -- any pending modifications to be applied, asynchronously and as soon as
    -- possible, regardless of the @PreferredMaintenanceWindow@ setting for the
    -- replication group.
    --
    -- If @false@, changes to the nodes in the replication group are applied on
    -- the next maintenance reboot, or the next failure reboot, whichever
    -- occurs first.
    --
    -- Valid values: @true@ | @false@
    --
    -- Default: @false@
    ModifyReplicationGroup -> Maybe Bool
applyImmediately :: Prelude.Maybe Prelude.Bool,
    -- | Reserved parameter. The password used to access a password protected
    -- server. This parameter must be specified with the
    -- @auth-token-update-strategy @ parameter. Password constraints:
    --
    -- -   Must be only printable ASCII characters
    --
    -- -   Must be at least 16 characters and no more than 128 characters in
    --     length
    --
    -- -   Cannot contain any of the following characters: \'\/\', \'\"\', or
    --     \'\@\', \'%\'
    --
    -- For more information, see AUTH password at
    -- <http://redis.io/commands/AUTH AUTH>.
    ModifyReplicationGroup -> Maybe Text
authToken :: Prelude.Maybe Prelude.Text,
    -- | Specifies the strategy to use to update the AUTH token. This parameter
    -- must be specified with the @auth-token@ parameter. Possible values:
    --
    -- -   Rotate
    --
    -- -   Set
    --
    -- For more information, see
    -- <http://docs.aws.amazon.com/AmazonElastiCache/latest/red-ug/auth.html Authenticating Users with Redis AUTH>
    ModifyReplicationGroup -> Maybe AuthTokenUpdateStrategyType
authTokenUpdateStrategy :: Prelude.Maybe AuthTokenUpdateStrategyType,
    -- | If you are running Redis engine version 6.0 or later, set this
    -- parameter to yes if you want to opt-in to the next auto minor version
    -- upgrade campaign. This parameter is disabled for previous versions.
    ModifyReplicationGroup -> Maybe Bool
autoMinorVersionUpgrade :: Prelude.Maybe Prelude.Bool,
    -- | Determines whether a read replica is automatically promoted to
    -- read\/write primary if the existing primary encounters a failure.
    --
    -- Valid values: @true@ | @false@
    ModifyReplicationGroup -> Maybe Bool
automaticFailoverEnabled :: Prelude.Maybe Prelude.Bool,
    -- | A valid cache node type that you want to scale this replication group
    -- to.
    ModifyReplicationGroup -> Maybe Text
cacheNodeType :: Prelude.Maybe Prelude.Text,
    -- | The name of the cache parameter group to apply to all of the clusters in
    -- this replication group. This change is asynchronously applied as soon as
    -- possible for parameters when the @ApplyImmediately@ parameter is
    -- specified as @true@ for this request.
    ModifyReplicationGroup -> Maybe Text
cacheParameterGroupName :: Prelude.Maybe Prelude.Text,
    -- | A list of cache security group names to authorize for the clusters in
    -- this replication group. This change is asynchronously applied as soon as
    -- possible.
    --
    -- This parameter can be used only with replication group containing
    -- clusters running outside of an Amazon Virtual Private Cloud (Amazon
    -- VPC).
    --
    -- Constraints: Must contain no more than 255 alphanumeric characters. Must
    -- not be @Default@.
    ModifyReplicationGroup -> Maybe [Text]
cacheSecurityGroupNames :: Prelude.Maybe [Prelude.Text],
    -- | The upgraded version of the cache engine to be run on the clusters in
    -- the replication group.
    --
    -- __Important:__ You can upgrade to a newer engine version (see
    -- <https://docs.aws.amazon.com/AmazonElastiCache/latest/red-ug/SelectEngine.html#VersionManagement Selecting a Cache Engine and Version>),
    -- but you cannot downgrade to an earlier engine version. If you want to
    -- use an earlier engine version, you must delete the existing replication
    -- group and create it anew with the earlier engine version.
    ModifyReplicationGroup -> Maybe Text
engineVersion :: Prelude.Maybe Prelude.Text,
    -- | The network type you choose when modifying a cluster, either @ipv4@ |
    -- @ipv6@. IPv6 is supported for workloads using Redis engine version 6.2
    -- onward or Memcached engine version 1.6.6 on all instances built on the
    -- <https://aws.amazon.com/ec2/nitro/ Nitro system>.
    ModifyReplicationGroup -> Maybe IpDiscovery
ipDiscovery :: Prelude.Maybe IpDiscovery,
    -- | Specifies the destination, format and type of the logs.
    ModifyReplicationGroup -> Maybe [LogDeliveryConfigurationRequest]
logDeliveryConfigurations :: Prelude.Maybe [LogDeliveryConfigurationRequest],
    -- | A flag to indicate MultiAZ is enabled.
    ModifyReplicationGroup -> Maybe Bool
multiAZEnabled :: Prelude.Maybe Prelude.Bool,
    -- | Deprecated. This parameter is not used.
    ModifyReplicationGroup -> Maybe Text
nodeGroupId :: Prelude.Maybe Prelude.Text,
    -- | The Amazon Resource Name (ARN) of the Amazon SNS topic to which
    -- notifications are sent.
    --
    -- The Amazon SNS topic owner must be same as the replication group owner.
    ModifyReplicationGroup -> Maybe Text
notificationTopicArn :: Prelude.Maybe Prelude.Text,
    -- | The status of the Amazon SNS notification topic for the replication
    -- group. Notifications are sent only if the status is @active@.
    --
    -- Valid values: @active@ | @inactive@
    ModifyReplicationGroup -> Maybe Text
notificationTopicStatus :: Prelude.Maybe Prelude.Text,
    -- | Specifies the weekly time range during which maintenance on the cluster
    -- is performed. It is specified as a range in the format
    -- ddd:hh24:mi-ddd:hh24:mi (24H Clock UTC). The minimum maintenance window
    -- is a 60 minute period.
    --
    -- Valid values for @ddd@ are:
    --
    -- -   @sun@
    --
    -- -   @mon@
    --
    -- -   @tue@
    --
    -- -   @wed@
    --
    -- -   @thu@
    --
    -- -   @fri@
    --
    -- -   @sat@
    --
    -- Example: @sun:23:00-mon:01:30@
    ModifyReplicationGroup -> Maybe Text
preferredMaintenanceWindow :: Prelude.Maybe Prelude.Text,
    -- | For replication groups with a single primary, if this parameter is
    -- specified, ElastiCache promotes the specified cluster in the specified
    -- replication group to the primary role. The nodes of all other clusters
    -- in the replication group are read replicas.
    ModifyReplicationGroup -> Maybe Text
primaryClusterId :: Prelude.Maybe Prelude.Text,
    -- | Removes the user group associated with this replication group.
    ModifyReplicationGroup -> Maybe Bool
removeUserGroups :: Prelude.Maybe Prelude.Bool,
    -- | A description for the replication group. Maximum length is 255
    -- characters.
    ModifyReplicationGroup -> Maybe Text
replicationGroupDescription :: Prelude.Maybe Prelude.Text,
    -- | Specifies the VPC Security Groups associated with the clusters in the
    -- replication group.
    --
    -- This parameter can be used only with replication group containing
    -- clusters running in an Amazon Virtual Private Cloud (Amazon VPC).
    ModifyReplicationGroup -> Maybe [Text]
securityGroupIds :: Prelude.Maybe [Prelude.Text],
    -- | The number of days for which ElastiCache retains automatic node group
    -- (shard) snapshots before deleting them. For example, if you set
    -- @SnapshotRetentionLimit@ to 5, a snapshot that was taken today is
    -- retained for 5 days before being deleted.
    --
    -- __Important__ If the value of SnapshotRetentionLimit is set to zero (0),
    -- backups are turned off.
    ModifyReplicationGroup -> Maybe Int
snapshotRetentionLimit :: Prelude.Maybe Prelude.Int,
    -- | The daily time range (in UTC) during which ElastiCache begins taking a
    -- daily snapshot of the node group (shard) specified by
    -- @SnapshottingClusterId@.
    --
    -- Example: @05:00-09:00@
    --
    -- If you do not specify this parameter, ElastiCache automatically chooses
    -- an appropriate time range.
    ModifyReplicationGroup -> Maybe Text
snapshotWindow :: Prelude.Maybe Prelude.Text,
    -- | The cluster ID that is used as the daily snapshot source for the
    -- replication group. This parameter cannot be set for Redis (cluster mode
    -- enabled) replication groups.
    ModifyReplicationGroup -> Maybe Text
snapshottingClusterId :: Prelude.Maybe Prelude.Text,
    -- | A flag that enables in-transit encryption when set to true. If you are
    -- enabling in-transit encryption for an existing cluster, you must also
    -- set @TransitEncryptionMode@ to @preferred@.
    ModifyReplicationGroup -> Maybe Bool
transitEncryptionEnabled :: Prelude.Maybe Prelude.Bool,
    -- | A setting that allows you to migrate your clients to use in-transit
    -- encryption, with no downtime.
    --
    -- You must set @TransitEncryptionEnabled@ to @true@, for your existing
    -- cluster, and set @TransitEncryptionMode@ to @preferred@ in the same
    -- request to allow both encrypted and unencrypted connections at the same
    -- time. Once you migrate all your Redis clients to use encrypted
    -- connections you can set the value to @required@ to allow encrypted
    -- connections only.
    --
    -- Setting @TransitEncryptionMode@ to @required@ is a two-step process that
    -- requires you to first set the @TransitEncryptionMode@ to @preferred@
    -- first, after that you can set @TransitEncryptionMode@ to @required@.
    ModifyReplicationGroup -> Maybe TransitEncryptionMode
transitEncryptionMode :: Prelude.Maybe TransitEncryptionMode,
    -- | The ID of the user group you are associating with the replication group.
    ModifyReplicationGroup -> Maybe [Text]
userGroupIdsToAdd :: Prelude.Maybe [Prelude.Text],
    -- | The ID of the user group to disassociate from the replication group,
    -- meaning the users in the group no longer can access the replication
    -- group.
    ModifyReplicationGroup -> Maybe [Text]
userGroupIdsToRemove :: Prelude.Maybe [Prelude.Text],
    -- | The identifier of the replication group to modify.
    ModifyReplicationGroup -> Text
replicationGroupId :: Prelude.Text
  }
  deriving (ModifyReplicationGroup -> ModifyReplicationGroup -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ModifyReplicationGroup -> ModifyReplicationGroup -> Bool
$c/= :: ModifyReplicationGroup -> ModifyReplicationGroup -> Bool
== :: ModifyReplicationGroup -> ModifyReplicationGroup -> Bool
$c== :: ModifyReplicationGroup -> ModifyReplicationGroup -> Bool
Prelude.Eq, ReadPrec [ModifyReplicationGroup]
ReadPrec ModifyReplicationGroup
Int -> ReadS ModifyReplicationGroup
ReadS [ModifyReplicationGroup]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [ModifyReplicationGroup]
$creadListPrec :: ReadPrec [ModifyReplicationGroup]
readPrec :: ReadPrec ModifyReplicationGroup
$creadPrec :: ReadPrec ModifyReplicationGroup
readList :: ReadS [ModifyReplicationGroup]
$creadList :: ReadS [ModifyReplicationGroup]
readsPrec :: Int -> ReadS ModifyReplicationGroup
$creadsPrec :: Int -> ReadS ModifyReplicationGroup
Prelude.Read, Int -> ModifyReplicationGroup -> ShowS
[ModifyReplicationGroup] -> ShowS
ModifyReplicationGroup -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ModifyReplicationGroup] -> ShowS
$cshowList :: [ModifyReplicationGroup] -> ShowS
show :: ModifyReplicationGroup -> String
$cshow :: ModifyReplicationGroup -> String
showsPrec :: Int -> ModifyReplicationGroup -> ShowS
$cshowsPrec :: Int -> ModifyReplicationGroup -> ShowS
Prelude.Show, forall x. Rep ModifyReplicationGroup x -> ModifyReplicationGroup
forall x. ModifyReplicationGroup -> Rep ModifyReplicationGroup x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep ModifyReplicationGroup x -> ModifyReplicationGroup
$cfrom :: forall x. ModifyReplicationGroup -> Rep ModifyReplicationGroup x
Prelude.Generic)

-- |
-- Create a value of 'ModifyReplicationGroup' with all optional fields omitted.
--
-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.
--
-- The following record fields are available, with the corresponding lenses provided
-- for backwards compatibility:
--
-- 'applyImmediately', 'modifyReplicationGroup_applyImmediately' - If @true@, this parameter causes the modifications in this request and
-- any pending modifications to be applied, asynchronously and as soon as
-- possible, regardless of the @PreferredMaintenanceWindow@ setting for the
-- replication group.
--
-- If @false@, changes to the nodes in the replication group are applied on
-- the next maintenance reboot, or the next failure reboot, whichever
-- occurs first.
--
-- Valid values: @true@ | @false@
--
-- Default: @false@
--
-- 'authToken', 'modifyReplicationGroup_authToken' - Reserved parameter. The password used to access a password protected
-- server. This parameter must be specified with the
-- @auth-token-update-strategy @ parameter. Password constraints:
--
-- -   Must be only printable ASCII characters
--
-- -   Must be at least 16 characters and no more than 128 characters in
--     length
--
-- -   Cannot contain any of the following characters: \'\/\', \'\"\', or
--     \'\@\', \'%\'
--
-- For more information, see AUTH password at
-- <http://redis.io/commands/AUTH AUTH>.
--
-- 'authTokenUpdateStrategy', 'modifyReplicationGroup_authTokenUpdateStrategy' - Specifies the strategy to use to update the AUTH token. This parameter
-- must be specified with the @auth-token@ parameter. Possible values:
--
-- -   Rotate
--
-- -   Set
--
-- For more information, see
-- <http://docs.aws.amazon.com/AmazonElastiCache/latest/red-ug/auth.html Authenticating Users with Redis AUTH>
--
-- 'autoMinorVersionUpgrade', 'modifyReplicationGroup_autoMinorVersionUpgrade' - If you are running Redis engine version 6.0 or later, set this
-- parameter to yes if you want to opt-in to the next auto minor version
-- upgrade campaign. This parameter is disabled for previous versions.
--
-- 'automaticFailoverEnabled', 'modifyReplicationGroup_automaticFailoverEnabled' - Determines whether a read replica is automatically promoted to
-- read\/write primary if the existing primary encounters a failure.
--
-- Valid values: @true@ | @false@
--
-- 'cacheNodeType', 'modifyReplicationGroup_cacheNodeType' - A valid cache node type that you want to scale this replication group
-- to.
--
-- 'cacheParameterGroupName', 'modifyReplicationGroup_cacheParameterGroupName' - The name of the cache parameter group to apply to all of the clusters in
-- this replication group. This change is asynchronously applied as soon as
-- possible for parameters when the @ApplyImmediately@ parameter is
-- specified as @true@ for this request.
--
-- 'cacheSecurityGroupNames', 'modifyReplicationGroup_cacheSecurityGroupNames' - A list of cache security group names to authorize for the clusters in
-- this replication group. This change is asynchronously applied as soon as
-- possible.
--
-- This parameter can be used only with replication group containing
-- clusters running outside of an Amazon Virtual Private Cloud (Amazon
-- VPC).
--
-- Constraints: Must contain no more than 255 alphanumeric characters. Must
-- not be @Default@.
--
-- 'engineVersion', 'modifyReplicationGroup_engineVersion' - The upgraded version of the cache engine to be run on the clusters in
-- the replication group.
--
-- __Important:__ You can upgrade to a newer engine version (see
-- <https://docs.aws.amazon.com/AmazonElastiCache/latest/red-ug/SelectEngine.html#VersionManagement Selecting a Cache Engine and Version>),
-- but you cannot downgrade to an earlier engine version. If you want to
-- use an earlier engine version, you must delete the existing replication
-- group and create it anew with the earlier engine version.
--
-- 'ipDiscovery', 'modifyReplicationGroup_ipDiscovery' - The network type you choose when modifying a cluster, either @ipv4@ |
-- @ipv6@. IPv6 is supported for workloads using Redis engine version 6.2
-- onward or Memcached engine version 1.6.6 on all instances built on the
-- <https://aws.amazon.com/ec2/nitro/ Nitro system>.
--
-- 'logDeliveryConfigurations', 'modifyReplicationGroup_logDeliveryConfigurations' - Specifies the destination, format and type of the logs.
--
-- 'multiAZEnabled', 'modifyReplicationGroup_multiAZEnabled' - A flag to indicate MultiAZ is enabled.
--
-- 'nodeGroupId', 'modifyReplicationGroup_nodeGroupId' - Deprecated. This parameter is not used.
--
-- 'notificationTopicArn', 'modifyReplicationGroup_notificationTopicArn' - The Amazon Resource Name (ARN) of the Amazon SNS topic to which
-- notifications are sent.
--
-- The Amazon SNS topic owner must be same as the replication group owner.
--
-- 'notificationTopicStatus', 'modifyReplicationGroup_notificationTopicStatus' - The status of the Amazon SNS notification topic for the replication
-- group. Notifications are sent only if the status is @active@.
--
-- Valid values: @active@ | @inactive@
--
-- 'preferredMaintenanceWindow', 'modifyReplicationGroup_preferredMaintenanceWindow' - Specifies the weekly time range during which maintenance on the cluster
-- is performed. It is specified as a range in the format
-- ddd:hh24:mi-ddd:hh24:mi (24H Clock UTC). The minimum maintenance window
-- is a 60 minute period.
--
-- Valid values for @ddd@ are:
--
-- -   @sun@
--
-- -   @mon@
--
-- -   @tue@
--
-- -   @wed@
--
-- -   @thu@
--
-- -   @fri@
--
-- -   @sat@
--
-- Example: @sun:23:00-mon:01:30@
--
-- 'primaryClusterId', 'modifyReplicationGroup_primaryClusterId' - For replication groups with a single primary, if this parameter is
-- specified, ElastiCache promotes the specified cluster in the specified
-- replication group to the primary role. The nodes of all other clusters
-- in the replication group are read replicas.
--
-- 'removeUserGroups', 'modifyReplicationGroup_removeUserGroups' - Removes the user group associated with this replication group.
--
-- 'replicationGroupDescription', 'modifyReplicationGroup_replicationGroupDescription' - A description for the replication group. Maximum length is 255
-- characters.
--
-- 'securityGroupIds', 'modifyReplicationGroup_securityGroupIds' - Specifies the VPC Security Groups associated with the clusters in the
-- replication group.
--
-- This parameter can be used only with replication group containing
-- clusters running in an Amazon Virtual Private Cloud (Amazon VPC).
--
-- 'snapshotRetentionLimit', 'modifyReplicationGroup_snapshotRetentionLimit' - The number of days for which ElastiCache retains automatic node group
-- (shard) snapshots before deleting them. For example, if you set
-- @SnapshotRetentionLimit@ to 5, a snapshot that was taken today is
-- retained for 5 days before being deleted.
--
-- __Important__ If the value of SnapshotRetentionLimit is set to zero (0),
-- backups are turned off.
--
-- 'snapshotWindow', 'modifyReplicationGroup_snapshotWindow' - The daily time range (in UTC) during which ElastiCache begins taking a
-- daily snapshot of the node group (shard) specified by
-- @SnapshottingClusterId@.
--
-- Example: @05:00-09:00@
--
-- If you do not specify this parameter, ElastiCache automatically chooses
-- an appropriate time range.
--
-- 'snapshottingClusterId', 'modifyReplicationGroup_snapshottingClusterId' - The cluster ID that is used as the daily snapshot source for the
-- replication group. This parameter cannot be set for Redis (cluster mode
-- enabled) replication groups.
--
-- 'transitEncryptionEnabled', 'modifyReplicationGroup_transitEncryptionEnabled' - A flag that enables in-transit encryption when set to true. If you are
-- enabling in-transit encryption for an existing cluster, you must also
-- set @TransitEncryptionMode@ to @preferred@.
--
-- 'transitEncryptionMode', 'modifyReplicationGroup_transitEncryptionMode' - A setting that allows you to migrate your clients to use in-transit
-- encryption, with no downtime.
--
-- You must set @TransitEncryptionEnabled@ to @true@, for your existing
-- cluster, and set @TransitEncryptionMode@ to @preferred@ in the same
-- request to allow both encrypted and unencrypted connections at the same
-- time. Once you migrate all your Redis clients to use encrypted
-- connections you can set the value to @required@ to allow encrypted
-- connections only.
--
-- Setting @TransitEncryptionMode@ to @required@ is a two-step process that
-- requires you to first set the @TransitEncryptionMode@ to @preferred@
-- first, after that you can set @TransitEncryptionMode@ to @required@.
--
-- 'userGroupIdsToAdd', 'modifyReplicationGroup_userGroupIdsToAdd' - The ID of the user group you are associating with the replication group.
--
-- 'userGroupIdsToRemove', 'modifyReplicationGroup_userGroupIdsToRemove' - The ID of the user group to disassociate from the replication group,
-- meaning the users in the group no longer can access the replication
-- group.
--
-- 'replicationGroupId', 'modifyReplicationGroup_replicationGroupId' - The identifier of the replication group to modify.
newModifyReplicationGroup ::
  -- | 'replicationGroupId'
  Prelude.Text ->
  ModifyReplicationGroup
newModifyReplicationGroup :: Text -> ModifyReplicationGroup
newModifyReplicationGroup Text
pReplicationGroupId_ =
  ModifyReplicationGroup'
    { $sel:applyImmediately:ModifyReplicationGroup' :: Maybe Bool
applyImmediately =
        forall a. Maybe a
Prelude.Nothing,
      $sel:authToken:ModifyReplicationGroup' :: Maybe Text
authToken = forall a. Maybe a
Prelude.Nothing,
      $sel:authTokenUpdateStrategy:ModifyReplicationGroup' :: Maybe AuthTokenUpdateStrategyType
authTokenUpdateStrategy = forall a. Maybe a
Prelude.Nothing,
      $sel:autoMinorVersionUpgrade:ModifyReplicationGroup' :: Maybe Bool
autoMinorVersionUpgrade = forall a. Maybe a
Prelude.Nothing,
      $sel:automaticFailoverEnabled:ModifyReplicationGroup' :: Maybe Bool
automaticFailoverEnabled = forall a. Maybe a
Prelude.Nothing,
      $sel:cacheNodeType:ModifyReplicationGroup' :: Maybe Text
cacheNodeType = forall a. Maybe a
Prelude.Nothing,
      $sel:cacheParameterGroupName:ModifyReplicationGroup' :: Maybe Text
cacheParameterGroupName = forall a. Maybe a
Prelude.Nothing,
      $sel:cacheSecurityGroupNames:ModifyReplicationGroup' :: Maybe [Text]
cacheSecurityGroupNames = forall a. Maybe a
Prelude.Nothing,
      $sel:engineVersion:ModifyReplicationGroup' :: Maybe Text
engineVersion = forall a. Maybe a
Prelude.Nothing,
      $sel:ipDiscovery:ModifyReplicationGroup' :: Maybe IpDiscovery
ipDiscovery = forall a. Maybe a
Prelude.Nothing,
      $sel:logDeliveryConfigurations:ModifyReplicationGroup' :: Maybe [LogDeliveryConfigurationRequest]
logDeliveryConfigurations = forall a. Maybe a
Prelude.Nothing,
      $sel:multiAZEnabled:ModifyReplicationGroup' :: Maybe Bool
multiAZEnabled = forall a. Maybe a
Prelude.Nothing,
      $sel:nodeGroupId:ModifyReplicationGroup' :: Maybe Text
nodeGroupId = forall a. Maybe a
Prelude.Nothing,
      $sel:notificationTopicArn:ModifyReplicationGroup' :: Maybe Text
notificationTopicArn = forall a. Maybe a
Prelude.Nothing,
      $sel:notificationTopicStatus:ModifyReplicationGroup' :: Maybe Text
notificationTopicStatus = forall a. Maybe a
Prelude.Nothing,
      $sel:preferredMaintenanceWindow:ModifyReplicationGroup' :: Maybe Text
preferredMaintenanceWindow = forall a. Maybe a
Prelude.Nothing,
      $sel:primaryClusterId:ModifyReplicationGroup' :: Maybe Text
primaryClusterId = forall a. Maybe a
Prelude.Nothing,
      $sel:removeUserGroups:ModifyReplicationGroup' :: Maybe Bool
removeUserGroups = forall a. Maybe a
Prelude.Nothing,
      $sel:replicationGroupDescription:ModifyReplicationGroup' :: Maybe Text
replicationGroupDescription = forall a. Maybe a
Prelude.Nothing,
      $sel:securityGroupIds:ModifyReplicationGroup' :: Maybe [Text]
securityGroupIds = forall a. Maybe a
Prelude.Nothing,
      $sel:snapshotRetentionLimit:ModifyReplicationGroup' :: Maybe Int
snapshotRetentionLimit = forall a. Maybe a
Prelude.Nothing,
      $sel:snapshotWindow:ModifyReplicationGroup' :: Maybe Text
snapshotWindow = forall a. Maybe a
Prelude.Nothing,
      $sel:snapshottingClusterId:ModifyReplicationGroup' :: Maybe Text
snapshottingClusterId = forall a. Maybe a
Prelude.Nothing,
      $sel:transitEncryptionEnabled:ModifyReplicationGroup' :: Maybe Bool
transitEncryptionEnabled = forall a. Maybe a
Prelude.Nothing,
      $sel:transitEncryptionMode:ModifyReplicationGroup' :: Maybe TransitEncryptionMode
transitEncryptionMode = forall a. Maybe a
Prelude.Nothing,
      $sel:userGroupIdsToAdd:ModifyReplicationGroup' :: Maybe [Text]
userGroupIdsToAdd = forall a. Maybe a
Prelude.Nothing,
      $sel:userGroupIdsToRemove:ModifyReplicationGroup' :: Maybe [Text]
userGroupIdsToRemove = forall a. Maybe a
Prelude.Nothing,
      $sel:replicationGroupId:ModifyReplicationGroup' :: Text
replicationGroupId = Text
pReplicationGroupId_
    }

-- | If @true@, this parameter causes the modifications in this request and
-- any pending modifications to be applied, asynchronously and as soon as
-- possible, regardless of the @PreferredMaintenanceWindow@ setting for the
-- replication group.
--
-- If @false@, changes to the nodes in the replication group are applied on
-- the next maintenance reboot, or the next failure reboot, whichever
-- occurs first.
--
-- Valid values: @true@ | @false@
--
-- Default: @false@
modifyReplicationGroup_applyImmediately :: Lens.Lens' ModifyReplicationGroup (Prelude.Maybe Prelude.Bool)
modifyReplicationGroup_applyImmediately :: Lens' ModifyReplicationGroup (Maybe Bool)
modifyReplicationGroup_applyImmediately = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyReplicationGroup' {Maybe Bool
applyImmediately :: Maybe Bool
$sel:applyImmediately:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe Bool
applyImmediately} -> Maybe Bool
applyImmediately) (\s :: ModifyReplicationGroup
s@ModifyReplicationGroup' {} Maybe Bool
a -> ModifyReplicationGroup
s {$sel:applyImmediately:ModifyReplicationGroup' :: Maybe Bool
applyImmediately = Maybe Bool
a} :: ModifyReplicationGroup)

-- | Reserved parameter. The password used to access a password protected
-- server. This parameter must be specified with the
-- @auth-token-update-strategy @ parameter. Password constraints:
--
-- -   Must be only printable ASCII characters
--
-- -   Must be at least 16 characters and no more than 128 characters in
--     length
--
-- -   Cannot contain any of the following characters: \'\/\', \'\"\', or
--     \'\@\', \'%\'
--
-- For more information, see AUTH password at
-- <http://redis.io/commands/AUTH AUTH>.
modifyReplicationGroup_authToken :: Lens.Lens' ModifyReplicationGroup (Prelude.Maybe Prelude.Text)
modifyReplicationGroup_authToken :: Lens' ModifyReplicationGroup (Maybe Text)
modifyReplicationGroup_authToken = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyReplicationGroup' {Maybe Text
authToken :: Maybe Text
$sel:authToken:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe Text
authToken} -> Maybe Text
authToken) (\s :: ModifyReplicationGroup
s@ModifyReplicationGroup' {} Maybe Text
a -> ModifyReplicationGroup
s {$sel:authToken:ModifyReplicationGroup' :: Maybe Text
authToken = Maybe Text
a} :: ModifyReplicationGroup)

-- | Specifies the strategy to use to update the AUTH token. This parameter
-- must be specified with the @auth-token@ parameter. Possible values:
--
-- -   Rotate
--
-- -   Set
--
-- For more information, see
-- <http://docs.aws.amazon.com/AmazonElastiCache/latest/red-ug/auth.html Authenticating Users with Redis AUTH>
modifyReplicationGroup_authTokenUpdateStrategy :: Lens.Lens' ModifyReplicationGroup (Prelude.Maybe AuthTokenUpdateStrategyType)
modifyReplicationGroup_authTokenUpdateStrategy :: Lens' ModifyReplicationGroup (Maybe AuthTokenUpdateStrategyType)
modifyReplicationGroup_authTokenUpdateStrategy = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyReplicationGroup' {Maybe AuthTokenUpdateStrategyType
authTokenUpdateStrategy :: Maybe AuthTokenUpdateStrategyType
$sel:authTokenUpdateStrategy:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe AuthTokenUpdateStrategyType
authTokenUpdateStrategy} -> Maybe AuthTokenUpdateStrategyType
authTokenUpdateStrategy) (\s :: ModifyReplicationGroup
s@ModifyReplicationGroup' {} Maybe AuthTokenUpdateStrategyType
a -> ModifyReplicationGroup
s {$sel:authTokenUpdateStrategy:ModifyReplicationGroup' :: Maybe AuthTokenUpdateStrategyType
authTokenUpdateStrategy = Maybe AuthTokenUpdateStrategyType
a} :: ModifyReplicationGroup)

-- | If you are running Redis engine version 6.0 or later, set this
-- parameter to yes if you want to opt-in to the next auto minor version
-- upgrade campaign. This parameter is disabled for previous versions.
modifyReplicationGroup_autoMinorVersionUpgrade :: Lens.Lens' ModifyReplicationGroup (Prelude.Maybe Prelude.Bool)
modifyReplicationGroup_autoMinorVersionUpgrade :: Lens' ModifyReplicationGroup (Maybe Bool)
modifyReplicationGroup_autoMinorVersionUpgrade = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyReplicationGroup' {Maybe Bool
autoMinorVersionUpgrade :: Maybe Bool
$sel:autoMinorVersionUpgrade:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe Bool
autoMinorVersionUpgrade} -> Maybe Bool
autoMinorVersionUpgrade) (\s :: ModifyReplicationGroup
s@ModifyReplicationGroup' {} Maybe Bool
a -> ModifyReplicationGroup
s {$sel:autoMinorVersionUpgrade:ModifyReplicationGroup' :: Maybe Bool
autoMinorVersionUpgrade = Maybe Bool
a} :: ModifyReplicationGroup)

-- | Determines whether a read replica is automatically promoted to
-- read\/write primary if the existing primary encounters a failure.
--
-- Valid values: @true@ | @false@
modifyReplicationGroup_automaticFailoverEnabled :: Lens.Lens' ModifyReplicationGroup (Prelude.Maybe Prelude.Bool)
modifyReplicationGroup_automaticFailoverEnabled :: Lens' ModifyReplicationGroup (Maybe Bool)
modifyReplicationGroup_automaticFailoverEnabled = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyReplicationGroup' {Maybe Bool
automaticFailoverEnabled :: Maybe Bool
$sel:automaticFailoverEnabled:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe Bool
automaticFailoverEnabled} -> Maybe Bool
automaticFailoverEnabled) (\s :: ModifyReplicationGroup
s@ModifyReplicationGroup' {} Maybe Bool
a -> ModifyReplicationGroup
s {$sel:automaticFailoverEnabled:ModifyReplicationGroup' :: Maybe Bool
automaticFailoverEnabled = Maybe Bool
a} :: ModifyReplicationGroup)

-- | A valid cache node type that you want to scale this replication group
-- to.
modifyReplicationGroup_cacheNodeType :: Lens.Lens' ModifyReplicationGroup (Prelude.Maybe Prelude.Text)
modifyReplicationGroup_cacheNodeType :: Lens' ModifyReplicationGroup (Maybe Text)
modifyReplicationGroup_cacheNodeType = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyReplicationGroup' {Maybe Text
cacheNodeType :: Maybe Text
$sel:cacheNodeType:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe Text
cacheNodeType} -> Maybe Text
cacheNodeType) (\s :: ModifyReplicationGroup
s@ModifyReplicationGroup' {} Maybe Text
a -> ModifyReplicationGroup
s {$sel:cacheNodeType:ModifyReplicationGroup' :: Maybe Text
cacheNodeType = Maybe Text
a} :: ModifyReplicationGroup)

-- | The name of the cache parameter group to apply to all of the clusters in
-- this replication group. This change is asynchronously applied as soon as
-- possible for parameters when the @ApplyImmediately@ parameter is
-- specified as @true@ for this request.
modifyReplicationGroup_cacheParameterGroupName :: Lens.Lens' ModifyReplicationGroup (Prelude.Maybe Prelude.Text)
modifyReplicationGroup_cacheParameterGroupName :: Lens' ModifyReplicationGroup (Maybe Text)
modifyReplicationGroup_cacheParameterGroupName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyReplicationGroup' {Maybe Text
cacheParameterGroupName :: Maybe Text
$sel:cacheParameterGroupName:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe Text
cacheParameterGroupName} -> Maybe Text
cacheParameterGroupName) (\s :: ModifyReplicationGroup
s@ModifyReplicationGroup' {} Maybe Text
a -> ModifyReplicationGroup
s {$sel:cacheParameterGroupName:ModifyReplicationGroup' :: Maybe Text
cacheParameterGroupName = Maybe Text
a} :: ModifyReplicationGroup)

-- | A list of cache security group names to authorize for the clusters in
-- this replication group. This change is asynchronously applied as soon as
-- possible.
--
-- This parameter can be used only with replication group containing
-- clusters running outside of an Amazon Virtual Private Cloud (Amazon
-- VPC).
--
-- Constraints: Must contain no more than 255 alphanumeric characters. Must
-- not be @Default@.
modifyReplicationGroup_cacheSecurityGroupNames :: Lens.Lens' ModifyReplicationGroup (Prelude.Maybe [Prelude.Text])
modifyReplicationGroup_cacheSecurityGroupNames :: Lens' ModifyReplicationGroup (Maybe [Text])
modifyReplicationGroup_cacheSecurityGroupNames = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyReplicationGroup' {Maybe [Text]
cacheSecurityGroupNames :: Maybe [Text]
$sel:cacheSecurityGroupNames:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe [Text]
cacheSecurityGroupNames} -> Maybe [Text]
cacheSecurityGroupNames) (\s :: ModifyReplicationGroup
s@ModifyReplicationGroup' {} Maybe [Text]
a -> ModifyReplicationGroup
s {$sel:cacheSecurityGroupNames:ModifyReplicationGroup' :: Maybe [Text]
cacheSecurityGroupNames = Maybe [Text]
a} :: ModifyReplicationGroup) 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

-- | The upgraded version of the cache engine to be run on the clusters in
-- the replication group.
--
-- __Important:__ You can upgrade to a newer engine version (see
-- <https://docs.aws.amazon.com/AmazonElastiCache/latest/red-ug/SelectEngine.html#VersionManagement Selecting a Cache Engine and Version>),
-- but you cannot downgrade to an earlier engine version. If you want to
-- use an earlier engine version, you must delete the existing replication
-- group and create it anew with the earlier engine version.
modifyReplicationGroup_engineVersion :: Lens.Lens' ModifyReplicationGroup (Prelude.Maybe Prelude.Text)
modifyReplicationGroup_engineVersion :: Lens' ModifyReplicationGroup (Maybe Text)
modifyReplicationGroup_engineVersion = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyReplicationGroup' {Maybe Text
engineVersion :: Maybe Text
$sel:engineVersion:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe Text
engineVersion} -> Maybe Text
engineVersion) (\s :: ModifyReplicationGroup
s@ModifyReplicationGroup' {} Maybe Text
a -> ModifyReplicationGroup
s {$sel:engineVersion:ModifyReplicationGroup' :: Maybe Text
engineVersion = Maybe Text
a} :: ModifyReplicationGroup)

-- | The network type you choose when modifying a cluster, either @ipv4@ |
-- @ipv6@. IPv6 is supported for workloads using Redis engine version 6.2
-- onward or Memcached engine version 1.6.6 on all instances built on the
-- <https://aws.amazon.com/ec2/nitro/ Nitro system>.
modifyReplicationGroup_ipDiscovery :: Lens.Lens' ModifyReplicationGroup (Prelude.Maybe IpDiscovery)
modifyReplicationGroup_ipDiscovery :: Lens' ModifyReplicationGroup (Maybe IpDiscovery)
modifyReplicationGroup_ipDiscovery = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyReplicationGroup' {Maybe IpDiscovery
ipDiscovery :: Maybe IpDiscovery
$sel:ipDiscovery:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe IpDiscovery
ipDiscovery} -> Maybe IpDiscovery
ipDiscovery) (\s :: ModifyReplicationGroup
s@ModifyReplicationGroup' {} Maybe IpDiscovery
a -> ModifyReplicationGroup
s {$sel:ipDiscovery:ModifyReplicationGroup' :: Maybe IpDiscovery
ipDiscovery = Maybe IpDiscovery
a} :: ModifyReplicationGroup)

-- | Specifies the destination, format and type of the logs.
modifyReplicationGroup_logDeliveryConfigurations :: Lens.Lens' ModifyReplicationGroup (Prelude.Maybe [LogDeliveryConfigurationRequest])
modifyReplicationGroup_logDeliveryConfigurations :: Lens'
  ModifyReplicationGroup (Maybe [LogDeliveryConfigurationRequest])
modifyReplicationGroup_logDeliveryConfigurations = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyReplicationGroup' {Maybe [LogDeliveryConfigurationRequest]
logDeliveryConfigurations :: Maybe [LogDeliveryConfigurationRequest]
$sel:logDeliveryConfigurations:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe [LogDeliveryConfigurationRequest]
logDeliveryConfigurations} -> Maybe [LogDeliveryConfigurationRequest]
logDeliveryConfigurations) (\s :: ModifyReplicationGroup
s@ModifyReplicationGroup' {} Maybe [LogDeliveryConfigurationRequest]
a -> ModifyReplicationGroup
s {$sel:logDeliveryConfigurations:ModifyReplicationGroup' :: Maybe [LogDeliveryConfigurationRequest]
logDeliveryConfigurations = Maybe [LogDeliveryConfigurationRequest]
a} :: ModifyReplicationGroup) 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

-- | A flag to indicate MultiAZ is enabled.
modifyReplicationGroup_multiAZEnabled :: Lens.Lens' ModifyReplicationGroup (Prelude.Maybe Prelude.Bool)
modifyReplicationGroup_multiAZEnabled :: Lens' ModifyReplicationGroup (Maybe Bool)
modifyReplicationGroup_multiAZEnabled = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyReplicationGroup' {Maybe Bool
multiAZEnabled :: Maybe Bool
$sel:multiAZEnabled:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe Bool
multiAZEnabled} -> Maybe Bool
multiAZEnabled) (\s :: ModifyReplicationGroup
s@ModifyReplicationGroup' {} Maybe Bool
a -> ModifyReplicationGroup
s {$sel:multiAZEnabled:ModifyReplicationGroup' :: Maybe Bool
multiAZEnabled = Maybe Bool
a} :: ModifyReplicationGroup)

-- | Deprecated. This parameter is not used.
modifyReplicationGroup_nodeGroupId :: Lens.Lens' ModifyReplicationGroup (Prelude.Maybe Prelude.Text)
modifyReplicationGroup_nodeGroupId :: Lens' ModifyReplicationGroup (Maybe Text)
modifyReplicationGroup_nodeGroupId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyReplicationGroup' {Maybe Text
nodeGroupId :: Maybe Text
$sel:nodeGroupId:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe Text
nodeGroupId} -> Maybe Text
nodeGroupId) (\s :: ModifyReplicationGroup
s@ModifyReplicationGroup' {} Maybe Text
a -> ModifyReplicationGroup
s {$sel:nodeGroupId:ModifyReplicationGroup' :: Maybe Text
nodeGroupId = Maybe Text
a} :: ModifyReplicationGroup)

-- | The Amazon Resource Name (ARN) of the Amazon SNS topic to which
-- notifications are sent.
--
-- The Amazon SNS topic owner must be same as the replication group owner.
modifyReplicationGroup_notificationTopicArn :: Lens.Lens' ModifyReplicationGroup (Prelude.Maybe Prelude.Text)
modifyReplicationGroup_notificationTopicArn :: Lens' ModifyReplicationGroup (Maybe Text)
modifyReplicationGroup_notificationTopicArn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyReplicationGroup' {Maybe Text
notificationTopicArn :: Maybe Text
$sel:notificationTopicArn:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe Text
notificationTopicArn} -> Maybe Text
notificationTopicArn) (\s :: ModifyReplicationGroup
s@ModifyReplicationGroup' {} Maybe Text
a -> ModifyReplicationGroup
s {$sel:notificationTopicArn:ModifyReplicationGroup' :: Maybe Text
notificationTopicArn = Maybe Text
a} :: ModifyReplicationGroup)

-- | The status of the Amazon SNS notification topic for the replication
-- group. Notifications are sent only if the status is @active@.
--
-- Valid values: @active@ | @inactive@
modifyReplicationGroup_notificationTopicStatus :: Lens.Lens' ModifyReplicationGroup (Prelude.Maybe Prelude.Text)
modifyReplicationGroup_notificationTopicStatus :: Lens' ModifyReplicationGroup (Maybe Text)
modifyReplicationGroup_notificationTopicStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyReplicationGroup' {Maybe Text
notificationTopicStatus :: Maybe Text
$sel:notificationTopicStatus:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe Text
notificationTopicStatus} -> Maybe Text
notificationTopicStatus) (\s :: ModifyReplicationGroup
s@ModifyReplicationGroup' {} Maybe Text
a -> ModifyReplicationGroup
s {$sel:notificationTopicStatus:ModifyReplicationGroup' :: Maybe Text
notificationTopicStatus = Maybe Text
a} :: ModifyReplicationGroup)

-- | Specifies the weekly time range during which maintenance on the cluster
-- is performed. It is specified as a range in the format
-- ddd:hh24:mi-ddd:hh24:mi (24H Clock UTC). The minimum maintenance window
-- is a 60 minute period.
--
-- Valid values for @ddd@ are:
--
-- -   @sun@
--
-- -   @mon@
--
-- -   @tue@
--
-- -   @wed@
--
-- -   @thu@
--
-- -   @fri@
--
-- -   @sat@
--
-- Example: @sun:23:00-mon:01:30@
modifyReplicationGroup_preferredMaintenanceWindow :: Lens.Lens' ModifyReplicationGroup (Prelude.Maybe Prelude.Text)
modifyReplicationGroup_preferredMaintenanceWindow :: Lens' ModifyReplicationGroup (Maybe Text)
modifyReplicationGroup_preferredMaintenanceWindow = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyReplicationGroup' {Maybe Text
preferredMaintenanceWindow :: Maybe Text
$sel:preferredMaintenanceWindow:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe Text
preferredMaintenanceWindow} -> Maybe Text
preferredMaintenanceWindow) (\s :: ModifyReplicationGroup
s@ModifyReplicationGroup' {} Maybe Text
a -> ModifyReplicationGroup
s {$sel:preferredMaintenanceWindow:ModifyReplicationGroup' :: Maybe Text
preferredMaintenanceWindow = Maybe Text
a} :: ModifyReplicationGroup)

-- | For replication groups with a single primary, if this parameter is
-- specified, ElastiCache promotes the specified cluster in the specified
-- replication group to the primary role. The nodes of all other clusters
-- in the replication group are read replicas.
modifyReplicationGroup_primaryClusterId :: Lens.Lens' ModifyReplicationGroup (Prelude.Maybe Prelude.Text)
modifyReplicationGroup_primaryClusterId :: Lens' ModifyReplicationGroup (Maybe Text)
modifyReplicationGroup_primaryClusterId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyReplicationGroup' {Maybe Text
primaryClusterId :: Maybe Text
$sel:primaryClusterId:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe Text
primaryClusterId} -> Maybe Text
primaryClusterId) (\s :: ModifyReplicationGroup
s@ModifyReplicationGroup' {} Maybe Text
a -> ModifyReplicationGroup
s {$sel:primaryClusterId:ModifyReplicationGroup' :: Maybe Text
primaryClusterId = Maybe Text
a} :: ModifyReplicationGroup)

-- | Removes the user group associated with this replication group.
modifyReplicationGroup_removeUserGroups :: Lens.Lens' ModifyReplicationGroup (Prelude.Maybe Prelude.Bool)
modifyReplicationGroup_removeUserGroups :: Lens' ModifyReplicationGroup (Maybe Bool)
modifyReplicationGroup_removeUserGroups = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyReplicationGroup' {Maybe Bool
removeUserGroups :: Maybe Bool
$sel:removeUserGroups:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe Bool
removeUserGroups} -> Maybe Bool
removeUserGroups) (\s :: ModifyReplicationGroup
s@ModifyReplicationGroup' {} Maybe Bool
a -> ModifyReplicationGroup
s {$sel:removeUserGroups:ModifyReplicationGroup' :: Maybe Bool
removeUserGroups = Maybe Bool
a} :: ModifyReplicationGroup)

-- | A description for the replication group. Maximum length is 255
-- characters.
modifyReplicationGroup_replicationGroupDescription :: Lens.Lens' ModifyReplicationGroup (Prelude.Maybe Prelude.Text)
modifyReplicationGroup_replicationGroupDescription :: Lens' ModifyReplicationGroup (Maybe Text)
modifyReplicationGroup_replicationGroupDescription = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyReplicationGroup' {Maybe Text
replicationGroupDescription :: Maybe Text
$sel:replicationGroupDescription:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe Text
replicationGroupDescription} -> Maybe Text
replicationGroupDescription) (\s :: ModifyReplicationGroup
s@ModifyReplicationGroup' {} Maybe Text
a -> ModifyReplicationGroup
s {$sel:replicationGroupDescription:ModifyReplicationGroup' :: Maybe Text
replicationGroupDescription = Maybe Text
a} :: ModifyReplicationGroup)

-- | Specifies the VPC Security Groups associated with the clusters in the
-- replication group.
--
-- This parameter can be used only with replication group containing
-- clusters running in an Amazon Virtual Private Cloud (Amazon VPC).
modifyReplicationGroup_securityGroupIds :: Lens.Lens' ModifyReplicationGroup (Prelude.Maybe [Prelude.Text])
modifyReplicationGroup_securityGroupIds :: Lens' ModifyReplicationGroup (Maybe [Text])
modifyReplicationGroup_securityGroupIds = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyReplicationGroup' {Maybe [Text]
securityGroupIds :: Maybe [Text]
$sel:securityGroupIds:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe [Text]
securityGroupIds} -> Maybe [Text]
securityGroupIds) (\s :: ModifyReplicationGroup
s@ModifyReplicationGroup' {} Maybe [Text]
a -> ModifyReplicationGroup
s {$sel:securityGroupIds:ModifyReplicationGroup' :: Maybe [Text]
securityGroupIds = Maybe [Text]
a} :: ModifyReplicationGroup) 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

-- | The number of days for which ElastiCache retains automatic node group
-- (shard) snapshots before deleting them. For example, if you set
-- @SnapshotRetentionLimit@ to 5, a snapshot that was taken today is
-- retained for 5 days before being deleted.
--
-- __Important__ If the value of SnapshotRetentionLimit is set to zero (0),
-- backups are turned off.
modifyReplicationGroup_snapshotRetentionLimit :: Lens.Lens' ModifyReplicationGroup (Prelude.Maybe Prelude.Int)
modifyReplicationGroup_snapshotRetentionLimit :: Lens' ModifyReplicationGroup (Maybe Int)
modifyReplicationGroup_snapshotRetentionLimit = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyReplicationGroup' {Maybe Int
snapshotRetentionLimit :: Maybe Int
$sel:snapshotRetentionLimit:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe Int
snapshotRetentionLimit} -> Maybe Int
snapshotRetentionLimit) (\s :: ModifyReplicationGroup
s@ModifyReplicationGroup' {} Maybe Int
a -> ModifyReplicationGroup
s {$sel:snapshotRetentionLimit:ModifyReplicationGroup' :: Maybe Int
snapshotRetentionLimit = Maybe Int
a} :: ModifyReplicationGroup)

-- | The daily time range (in UTC) during which ElastiCache begins taking a
-- daily snapshot of the node group (shard) specified by
-- @SnapshottingClusterId@.
--
-- Example: @05:00-09:00@
--
-- If you do not specify this parameter, ElastiCache automatically chooses
-- an appropriate time range.
modifyReplicationGroup_snapshotWindow :: Lens.Lens' ModifyReplicationGroup (Prelude.Maybe Prelude.Text)
modifyReplicationGroup_snapshotWindow :: Lens' ModifyReplicationGroup (Maybe Text)
modifyReplicationGroup_snapshotWindow = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyReplicationGroup' {Maybe Text
snapshotWindow :: Maybe Text
$sel:snapshotWindow:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe Text
snapshotWindow} -> Maybe Text
snapshotWindow) (\s :: ModifyReplicationGroup
s@ModifyReplicationGroup' {} Maybe Text
a -> ModifyReplicationGroup
s {$sel:snapshotWindow:ModifyReplicationGroup' :: Maybe Text
snapshotWindow = Maybe Text
a} :: ModifyReplicationGroup)

-- | The cluster ID that is used as the daily snapshot source for the
-- replication group. This parameter cannot be set for Redis (cluster mode
-- enabled) replication groups.
modifyReplicationGroup_snapshottingClusterId :: Lens.Lens' ModifyReplicationGroup (Prelude.Maybe Prelude.Text)
modifyReplicationGroup_snapshottingClusterId :: Lens' ModifyReplicationGroup (Maybe Text)
modifyReplicationGroup_snapshottingClusterId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyReplicationGroup' {Maybe Text
snapshottingClusterId :: Maybe Text
$sel:snapshottingClusterId:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe Text
snapshottingClusterId} -> Maybe Text
snapshottingClusterId) (\s :: ModifyReplicationGroup
s@ModifyReplicationGroup' {} Maybe Text
a -> ModifyReplicationGroup
s {$sel:snapshottingClusterId:ModifyReplicationGroup' :: Maybe Text
snapshottingClusterId = Maybe Text
a} :: ModifyReplicationGroup)

-- | A flag that enables in-transit encryption when set to true. If you are
-- enabling in-transit encryption for an existing cluster, you must also
-- set @TransitEncryptionMode@ to @preferred@.
modifyReplicationGroup_transitEncryptionEnabled :: Lens.Lens' ModifyReplicationGroup (Prelude.Maybe Prelude.Bool)
modifyReplicationGroup_transitEncryptionEnabled :: Lens' ModifyReplicationGroup (Maybe Bool)
modifyReplicationGroup_transitEncryptionEnabled = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyReplicationGroup' {Maybe Bool
transitEncryptionEnabled :: Maybe Bool
$sel:transitEncryptionEnabled:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe Bool
transitEncryptionEnabled} -> Maybe Bool
transitEncryptionEnabled) (\s :: ModifyReplicationGroup
s@ModifyReplicationGroup' {} Maybe Bool
a -> ModifyReplicationGroup
s {$sel:transitEncryptionEnabled:ModifyReplicationGroup' :: Maybe Bool
transitEncryptionEnabled = Maybe Bool
a} :: ModifyReplicationGroup)

-- | A setting that allows you to migrate your clients to use in-transit
-- encryption, with no downtime.
--
-- You must set @TransitEncryptionEnabled@ to @true@, for your existing
-- cluster, and set @TransitEncryptionMode@ to @preferred@ in the same
-- request to allow both encrypted and unencrypted connections at the same
-- time. Once you migrate all your Redis clients to use encrypted
-- connections you can set the value to @required@ to allow encrypted
-- connections only.
--
-- Setting @TransitEncryptionMode@ to @required@ is a two-step process that
-- requires you to first set the @TransitEncryptionMode@ to @preferred@
-- first, after that you can set @TransitEncryptionMode@ to @required@.
modifyReplicationGroup_transitEncryptionMode :: Lens.Lens' ModifyReplicationGroup (Prelude.Maybe TransitEncryptionMode)
modifyReplicationGroup_transitEncryptionMode :: Lens' ModifyReplicationGroup (Maybe TransitEncryptionMode)
modifyReplicationGroup_transitEncryptionMode = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyReplicationGroup' {Maybe TransitEncryptionMode
transitEncryptionMode :: Maybe TransitEncryptionMode
$sel:transitEncryptionMode:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe TransitEncryptionMode
transitEncryptionMode} -> Maybe TransitEncryptionMode
transitEncryptionMode) (\s :: ModifyReplicationGroup
s@ModifyReplicationGroup' {} Maybe TransitEncryptionMode
a -> ModifyReplicationGroup
s {$sel:transitEncryptionMode:ModifyReplicationGroup' :: Maybe TransitEncryptionMode
transitEncryptionMode = Maybe TransitEncryptionMode
a} :: ModifyReplicationGroup)

-- | The ID of the user group you are associating with the replication group.
modifyReplicationGroup_userGroupIdsToAdd :: Lens.Lens' ModifyReplicationGroup (Prelude.Maybe [Prelude.Text])
modifyReplicationGroup_userGroupIdsToAdd :: Lens' ModifyReplicationGroup (Maybe [Text])
modifyReplicationGroup_userGroupIdsToAdd = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyReplicationGroup' {Maybe [Text]
userGroupIdsToAdd :: Maybe [Text]
$sel:userGroupIdsToAdd:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe [Text]
userGroupIdsToAdd} -> Maybe [Text]
userGroupIdsToAdd) (\s :: ModifyReplicationGroup
s@ModifyReplicationGroup' {} Maybe [Text]
a -> ModifyReplicationGroup
s {$sel:userGroupIdsToAdd:ModifyReplicationGroup' :: Maybe [Text]
userGroupIdsToAdd = Maybe [Text]
a} :: ModifyReplicationGroup) 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

-- | The ID of the user group to disassociate from the replication group,
-- meaning the users in the group no longer can access the replication
-- group.
modifyReplicationGroup_userGroupIdsToRemove :: Lens.Lens' ModifyReplicationGroup (Prelude.Maybe [Prelude.Text])
modifyReplicationGroup_userGroupIdsToRemove :: Lens' ModifyReplicationGroup (Maybe [Text])
modifyReplicationGroup_userGroupIdsToRemove = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyReplicationGroup' {Maybe [Text]
userGroupIdsToRemove :: Maybe [Text]
$sel:userGroupIdsToRemove:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe [Text]
userGroupIdsToRemove} -> Maybe [Text]
userGroupIdsToRemove) (\s :: ModifyReplicationGroup
s@ModifyReplicationGroup' {} Maybe [Text]
a -> ModifyReplicationGroup
s {$sel:userGroupIdsToRemove:ModifyReplicationGroup' :: Maybe [Text]
userGroupIdsToRemove = Maybe [Text]
a} :: ModifyReplicationGroup) 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

-- | The identifier of the replication group to modify.
modifyReplicationGroup_replicationGroupId :: Lens.Lens' ModifyReplicationGroup Prelude.Text
modifyReplicationGroup_replicationGroupId :: Lens' ModifyReplicationGroup Text
modifyReplicationGroup_replicationGroupId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyReplicationGroup' {Text
replicationGroupId :: Text
$sel:replicationGroupId:ModifyReplicationGroup' :: ModifyReplicationGroup -> Text
replicationGroupId} -> Text
replicationGroupId) (\s :: ModifyReplicationGroup
s@ModifyReplicationGroup' {} Text
a -> ModifyReplicationGroup
s {$sel:replicationGroupId:ModifyReplicationGroup' :: Text
replicationGroupId = Text
a} :: ModifyReplicationGroup)

instance Core.AWSRequest ModifyReplicationGroup where
  type
    AWSResponse ModifyReplicationGroup =
      ModifyReplicationGroupResponse
  request :: (Service -> Service)
-> ModifyReplicationGroup -> Request ModifyReplicationGroup
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 ModifyReplicationGroup
-> ClientResponse ClientBody
-> m (Either
        Error (ClientResponse (AWSResponse ModifyReplicationGroup)))
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
"ModifyReplicationGroupResult"
      ( \Int
s ResponseHeaders
h [Node]
x ->
          Maybe ReplicationGroup -> Int -> ModifyReplicationGroupResponse
ModifyReplicationGroupResponse'
            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 ModifyReplicationGroup where
  hashWithSalt :: Int -> ModifyReplicationGroup -> Int
hashWithSalt Int
_salt ModifyReplicationGroup' {Maybe Bool
Maybe Int
Maybe [Text]
Maybe [LogDeliveryConfigurationRequest]
Maybe Text
Maybe AuthTokenUpdateStrategyType
Maybe IpDiscovery
Maybe TransitEncryptionMode
Text
replicationGroupId :: Text
userGroupIdsToRemove :: Maybe [Text]
userGroupIdsToAdd :: Maybe [Text]
transitEncryptionMode :: Maybe TransitEncryptionMode
transitEncryptionEnabled :: Maybe Bool
snapshottingClusterId :: Maybe Text
snapshotWindow :: Maybe Text
snapshotRetentionLimit :: Maybe Int
securityGroupIds :: Maybe [Text]
replicationGroupDescription :: Maybe Text
removeUserGroups :: Maybe Bool
primaryClusterId :: Maybe Text
preferredMaintenanceWindow :: Maybe Text
notificationTopicStatus :: Maybe Text
notificationTopicArn :: Maybe Text
nodeGroupId :: Maybe Text
multiAZEnabled :: Maybe Bool
logDeliveryConfigurations :: Maybe [LogDeliveryConfigurationRequest]
ipDiscovery :: Maybe IpDiscovery
engineVersion :: Maybe Text
cacheSecurityGroupNames :: Maybe [Text]
cacheParameterGroupName :: Maybe Text
cacheNodeType :: Maybe Text
automaticFailoverEnabled :: Maybe Bool
autoMinorVersionUpgrade :: Maybe Bool
authTokenUpdateStrategy :: Maybe AuthTokenUpdateStrategyType
authToken :: Maybe Text
applyImmediately :: Maybe Bool
$sel:replicationGroupId:ModifyReplicationGroup' :: ModifyReplicationGroup -> Text
$sel:userGroupIdsToRemove:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe [Text]
$sel:userGroupIdsToAdd:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe [Text]
$sel:transitEncryptionMode:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe TransitEncryptionMode
$sel:transitEncryptionEnabled:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe Bool
$sel:snapshottingClusterId:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe Text
$sel:snapshotWindow:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe Text
$sel:snapshotRetentionLimit:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe Int
$sel:securityGroupIds:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe [Text]
$sel:replicationGroupDescription:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe Text
$sel:removeUserGroups:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe Bool
$sel:primaryClusterId:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe Text
$sel:preferredMaintenanceWindow:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe Text
$sel:notificationTopicStatus:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe Text
$sel:notificationTopicArn:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe Text
$sel:nodeGroupId:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe Text
$sel:multiAZEnabled:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe Bool
$sel:logDeliveryConfigurations:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe [LogDeliveryConfigurationRequest]
$sel:ipDiscovery:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe IpDiscovery
$sel:engineVersion:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe Text
$sel:cacheSecurityGroupNames:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe [Text]
$sel:cacheParameterGroupName:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe Text
$sel:cacheNodeType:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe Text
$sel:automaticFailoverEnabled:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe Bool
$sel:autoMinorVersionUpgrade:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe Bool
$sel:authTokenUpdateStrategy:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe AuthTokenUpdateStrategyType
$sel:authToken:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe Text
$sel:applyImmediately:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe Bool
..} =
    Int
_salt
      forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Bool
applyImmediately
      forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
authToken
      forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe AuthTokenUpdateStrategyType
authTokenUpdateStrategy
      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
engineVersion
      forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe IpDiscovery
ipDiscovery
      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 Text
nodeGroupId
      forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
notificationTopicArn
      forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
notificationTopicStatus
      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 Bool
removeUserGroups
      forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
replicationGroupDescription
      forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe [Text]
securityGroupIds
      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 Text
snapshottingClusterId
      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 [Text]
userGroupIdsToAdd
      forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe [Text]
userGroupIdsToRemove
      forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
replicationGroupId

instance Prelude.NFData ModifyReplicationGroup where
  rnf :: ModifyReplicationGroup -> ()
rnf ModifyReplicationGroup' {Maybe Bool
Maybe Int
Maybe [Text]
Maybe [LogDeliveryConfigurationRequest]
Maybe Text
Maybe AuthTokenUpdateStrategyType
Maybe IpDiscovery
Maybe TransitEncryptionMode
Text
replicationGroupId :: Text
userGroupIdsToRemove :: Maybe [Text]
userGroupIdsToAdd :: Maybe [Text]
transitEncryptionMode :: Maybe TransitEncryptionMode
transitEncryptionEnabled :: Maybe Bool
snapshottingClusterId :: Maybe Text
snapshotWindow :: Maybe Text
snapshotRetentionLimit :: Maybe Int
securityGroupIds :: Maybe [Text]
replicationGroupDescription :: Maybe Text
removeUserGroups :: Maybe Bool
primaryClusterId :: Maybe Text
preferredMaintenanceWindow :: Maybe Text
notificationTopicStatus :: Maybe Text
notificationTopicArn :: Maybe Text
nodeGroupId :: Maybe Text
multiAZEnabled :: Maybe Bool
logDeliveryConfigurations :: Maybe [LogDeliveryConfigurationRequest]
ipDiscovery :: Maybe IpDiscovery
engineVersion :: Maybe Text
cacheSecurityGroupNames :: Maybe [Text]
cacheParameterGroupName :: Maybe Text
cacheNodeType :: Maybe Text
automaticFailoverEnabled :: Maybe Bool
autoMinorVersionUpgrade :: Maybe Bool
authTokenUpdateStrategy :: Maybe AuthTokenUpdateStrategyType
authToken :: Maybe Text
applyImmediately :: Maybe Bool
$sel:replicationGroupId:ModifyReplicationGroup' :: ModifyReplicationGroup -> Text
$sel:userGroupIdsToRemove:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe [Text]
$sel:userGroupIdsToAdd:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe [Text]
$sel:transitEncryptionMode:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe TransitEncryptionMode
$sel:transitEncryptionEnabled:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe Bool
$sel:snapshottingClusterId:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe Text
$sel:snapshotWindow:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe Text
$sel:snapshotRetentionLimit:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe Int
$sel:securityGroupIds:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe [Text]
$sel:replicationGroupDescription:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe Text
$sel:removeUserGroups:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe Bool
$sel:primaryClusterId:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe Text
$sel:preferredMaintenanceWindow:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe Text
$sel:notificationTopicStatus:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe Text
$sel:notificationTopicArn:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe Text
$sel:nodeGroupId:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe Text
$sel:multiAZEnabled:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe Bool
$sel:logDeliveryConfigurations:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe [LogDeliveryConfigurationRequest]
$sel:ipDiscovery:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe IpDiscovery
$sel:engineVersion:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe Text
$sel:cacheSecurityGroupNames:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe [Text]
$sel:cacheParameterGroupName:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe Text
$sel:cacheNodeType:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe Text
$sel:automaticFailoverEnabled:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe Bool
$sel:autoMinorVersionUpgrade:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe Bool
$sel:authTokenUpdateStrategy:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe AuthTokenUpdateStrategyType
$sel:authToken:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe Text
$sel:applyImmediately:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe Bool
..} =
    forall a. NFData a => a -> ()
Prelude.rnf Maybe Bool
applyImmediately
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
authToken
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe AuthTokenUpdateStrategyType
authTokenUpdateStrategy
      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
engineVersion
      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 [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 Text
nodeGroupId
      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 Text
notificationTopicStatus
      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 Bool
removeUserGroups
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf
        Maybe Text
replicationGroupDescription
      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 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 Text
snapshottingClusterId
      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 [Text]
userGroupIdsToAdd
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf
        Maybe [Text]
userGroupIdsToRemove
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf
        Text
replicationGroupId

instance Data.ToHeaders ModifyReplicationGroup where
  toHeaders :: ModifyReplicationGroup -> ResponseHeaders
toHeaders = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty

instance Data.ToPath ModifyReplicationGroup where
  toPath :: ModifyReplicationGroup -> ByteString
toPath = forall a b. a -> b -> a
Prelude.const ByteString
"/"

instance Data.ToQuery ModifyReplicationGroup where
  toQuery :: ModifyReplicationGroup -> QueryString
toQuery ModifyReplicationGroup' {Maybe Bool
Maybe Int
Maybe [Text]
Maybe [LogDeliveryConfigurationRequest]
Maybe Text
Maybe AuthTokenUpdateStrategyType
Maybe IpDiscovery
Maybe TransitEncryptionMode
Text
replicationGroupId :: Text
userGroupIdsToRemove :: Maybe [Text]
userGroupIdsToAdd :: Maybe [Text]
transitEncryptionMode :: Maybe TransitEncryptionMode
transitEncryptionEnabled :: Maybe Bool
snapshottingClusterId :: Maybe Text
snapshotWindow :: Maybe Text
snapshotRetentionLimit :: Maybe Int
securityGroupIds :: Maybe [Text]
replicationGroupDescription :: Maybe Text
removeUserGroups :: Maybe Bool
primaryClusterId :: Maybe Text
preferredMaintenanceWindow :: Maybe Text
notificationTopicStatus :: Maybe Text
notificationTopicArn :: Maybe Text
nodeGroupId :: Maybe Text
multiAZEnabled :: Maybe Bool
logDeliveryConfigurations :: Maybe [LogDeliveryConfigurationRequest]
ipDiscovery :: Maybe IpDiscovery
engineVersion :: Maybe Text
cacheSecurityGroupNames :: Maybe [Text]
cacheParameterGroupName :: Maybe Text
cacheNodeType :: Maybe Text
automaticFailoverEnabled :: Maybe Bool
autoMinorVersionUpgrade :: Maybe Bool
authTokenUpdateStrategy :: Maybe AuthTokenUpdateStrategyType
authToken :: Maybe Text
applyImmediately :: Maybe Bool
$sel:replicationGroupId:ModifyReplicationGroup' :: ModifyReplicationGroup -> Text
$sel:userGroupIdsToRemove:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe [Text]
$sel:userGroupIdsToAdd:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe [Text]
$sel:transitEncryptionMode:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe TransitEncryptionMode
$sel:transitEncryptionEnabled:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe Bool
$sel:snapshottingClusterId:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe Text
$sel:snapshotWindow:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe Text
$sel:snapshotRetentionLimit:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe Int
$sel:securityGroupIds:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe [Text]
$sel:replicationGroupDescription:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe Text
$sel:removeUserGroups:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe Bool
$sel:primaryClusterId:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe Text
$sel:preferredMaintenanceWindow:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe Text
$sel:notificationTopicStatus:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe Text
$sel:notificationTopicArn:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe Text
$sel:nodeGroupId:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe Text
$sel:multiAZEnabled:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe Bool
$sel:logDeliveryConfigurations:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe [LogDeliveryConfigurationRequest]
$sel:ipDiscovery:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe IpDiscovery
$sel:engineVersion:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe Text
$sel:cacheSecurityGroupNames:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe [Text]
$sel:cacheParameterGroupName:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe Text
$sel:cacheNodeType:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe Text
$sel:automaticFailoverEnabled:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe Bool
$sel:autoMinorVersionUpgrade:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe Bool
$sel:authTokenUpdateStrategy:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe AuthTokenUpdateStrategyType
$sel:authToken:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe Text
$sel:applyImmediately:ModifyReplicationGroup' :: ModifyReplicationGroup -> Maybe Bool
..} =
    forall a. Monoid a => [a] -> a
Prelude.mconcat
      [ ByteString
"Action"
          forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: (ByteString
"ModifyReplicationGroup" :: Prelude.ByteString),
        ByteString
"Version"
          forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: (ByteString
"2015-02-02" :: Prelude.ByteString),
        ByteString
"ApplyImmediately" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Bool
applyImmediately,
        ByteString
"AuthToken" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
authToken,
        ByteString
"AuthTokenUpdateStrategy"
          forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe AuthTokenUpdateStrategyType
authTokenUpdateStrategy,
        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
"EngineVersion" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
engineVersion,
        ByteString
"IpDiscovery" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe IpDiscovery
ipDiscovery,
        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
"NodeGroupId" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
nodeGroupId,
        ByteString
"NotificationTopicArn" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
notificationTopicArn,
        ByteString
"NotificationTopicStatus"
          forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
notificationTopicStatus,
        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
"RemoveUserGroups" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Bool
removeUserGroups,
        ByteString
"ReplicationGroupDescription"
          forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
replicationGroupDescription,
        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
"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
"SnapshottingClusterId"
          forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
snapshottingClusterId,
        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
"UserGroupIdsToAdd"
          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]
userGroupIdsToAdd
            ),
        ByteString
"UserGroupIdsToRemove"
          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]
userGroupIdsToRemove
            ),
        ByteString
"ReplicationGroupId" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Text
replicationGroupId
      ]

-- | /See:/ 'newModifyReplicationGroupResponse' smart constructor.
data ModifyReplicationGroupResponse = ModifyReplicationGroupResponse'
  { ModifyReplicationGroupResponse -> Maybe ReplicationGroup
replicationGroup :: Prelude.Maybe ReplicationGroup,
    -- | The response's http status code.
    ModifyReplicationGroupResponse -> Int
httpStatus :: Prelude.Int
  }
  deriving (ModifyReplicationGroupResponse
-> ModifyReplicationGroupResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ModifyReplicationGroupResponse
-> ModifyReplicationGroupResponse -> Bool
$c/= :: ModifyReplicationGroupResponse
-> ModifyReplicationGroupResponse -> Bool
== :: ModifyReplicationGroupResponse
-> ModifyReplicationGroupResponse -> Bool
$c== :: ModifyReplicationGroupResponse
-> ModifyReplicationGroupResponse -> Bool
Prelude.Eq, ReadPrec [ModifyReplicationGroupResponse]
ReadPrec ModifyReplicationGroupResponse
Int -> ReadS ModifyReplicationGroupResponse
ReadS [ModifyReplicationGroupResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [ModifyReplicationGroupResponse]
$creadListPrec :: ReadPrec [ModifyReplicationGroupResponse]
readPrec :: ReadPrec ModifyReplicationGroupResponse
$creadPrec :: ReadPrec ModifyReplicationGroupResponse
readList :: ReadS [ModifyReplicationGroupResponse]
$creadList :: ReadS [ModifyReplicationGroupResponse]
readsPrec :: Int -> ReadS ModifyReplicationGroupResponse
$creadsPrec :: Int -> ReadS ModifyReplicationGroupResponse
Prelude.Read, Int -> ModifyReplicationGroupResponse -> ShowS
[ModifyReplicationGroupResponse] -> ShowS
ModifyReplicationGroupResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ModifyReplicationGroupResponse] -> ShowS
$cshowList :: [ModifyReplicationGroupResponse] -> ShowS
show :: ModifyReplicationGroupResponse -> String
$cshow :: ModifyReplicationGroupResponse -> String
showsPrec :: Int -> ModifyReplicationGroupResponse -> ShowS
$cshowsPrec :: Int -> ModifyReplicationGroupResponse -> ShowS
Prelude.Show, forall x.
Rep ModifyReplicationGroupResponse x
-> ModifyReplicationGroupResponse
forall x.
ModifyReplicationGroupResponse
-> Rep ModifyReplicationGroupResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep ModifyReplicationGroupResponse x
-> ModifyReplicationGroupResponse
$cfrom :: forall x.
ModifyReplicationGroupResponse
-> Rep ModifyReplicationGroupResponse x
Prelude.Generic)

-- |
-- Create a value of 'ModifyReplicationGroupResponse' with all optional fields omitted.
--
-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.
--
-- The following record fields are available, with the corresponding lenses provided
-- for backwards compatibility:
--
-- 'replicationGroup', 'modifyReplicationGroupResponse_replicationGroup' - Undocumented member.
--
-- 'httpStatus', 'modifyReplicationGroupResponse_httpStatus' - The response's http status code.
newModifyReplicationGroupResponse ::
  -- | 'httpStatus'
  Prelude.Int ->
  ModifyReplicationGroupResponse
newModifyReplicationGroupResponse :: Int -> ModifyReplicationGroupResponse
newModifyReplicationGroupResponse Int
pHttpStatus_ =
  ModifyReplicationGroupResponse'
    { $sel:replicationGroup:ModifyReplicationGroupResponse' :: Maybe ReplicationGroup
replicationGroup =
        forall a. Maybe a
Prelude.Nothing,
      $sel:httpStatus:ModifyReplicationGroupResponse' :: Int
httpStatus = Int
pHttpStatus_
    }

-- | Undocumented member.
modifyReplicationGroupResponse_replicationGroup :: Lens.Lens' ModifyReplicationGroupResponse (Prelude.Maybe ReplicationGroup)
modifyReplicationGroupResponse_replicationGroup :: Lens' ModifyReplicationGroupResponse (Maybe ReplicationGroup)
modifyReplicationGroupResponse_replicationGroup = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyReplicationGroupResponse' {Maybe ReplicationGroup
replicationGroup :: Maybe ReplicationGroup
$sel:replicationGroup:ModifyReplicationGroupResponse' :: ModifyReplicationGroupResponse -> Maybe ReplicationGroup
replicationGroup} -> Maybe ReplicationGroup
replicationGroup) (\s :: ModifyReplicationGroupResponse
s@ModifyReplicationGroupResponse' {} Maybe ReplicationGroup
a -> ModifyReplicationGroupResponse
s {$sel:replicationGroup:ModifyReplicationGroupResponse' :: Maybe ReplicationGroup
replicationGroup = Maybe ReplicationGroup
a} :: ModifyReplicationGroupResponse)

-- | The response's http status code.
modifyReplicationGroupResponse_httpStatus :: Lens.Lens' ModifyReplicationGroupResponse Prelude.Int
modifyReplicationGroupResponse_httpStatus :: Lens' ModifyReplicationGroupResponse Int
modifyReplicationGroupResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyReplicationGroupResponse' {Int
httpStatus :: Int
$sel:httpStatus:ModifyReplicationGroupResponse' :: ModifyReplicationGroupResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: ModifyReplicationGroupResponse
s@ModifyReplicationGroupResponse' {} Int
a -> ModifyReplicationGroupResponse
s {$sel:httpStatus:ModifyReplicationGroupResponse' :: Int
httpStatus = Int
a} :: ModifyReplicationGroupResponse)

instance
  Prelude.NFData
    ModifyReplicationGroupResponse
  where
  rnf :: ModifyReplicationGroupResponse -> ()
rnf ModifyReplicationGroupResponse' {Int
Maybe ReplicationGroup
httpStatus :: Int
replicationGroup :: Maybe ReplicationGroup
$sel:httpStatus:ModifyReplicationGroupResponse' :: ModifyReplicationGroupResponse -> Int
$sel:replicationGroup:ModifyReplicationGroupResponse' :: ModifyReplicationGroupResponse -> 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