{-# LANGUAGE DisambiguateRecordFields #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE StrictData #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# OPTIONS_GHC -fno-warn-unused-matches #-}
module Amazonka.ElastiCache.Types
(
defaultService,
_APICallRateForCustomerExceededFault,
_AuthorizationAlreadyExistsFault,
_AuthorizationNotFoundFault,
_CacheClusterAlreadyExistsFault,
_CacheClusterNotFoundFault,
_CacheParameterGroupAlreadyExistsFault,
_CacheParameterGroupNotFoundFault,
_CacheParameterGroupQuotaExceededFault,
_CacheSecurityGroupAlreadyExistsFault,
_CacheSecurityGroupNotFoundFault,
_CacheSecurityGroupQuotaExceededFault,
_CacheSubnetGroupAlreadyExistsFault,
_CacheSubnetGroupInUse,
_CacheSubnetGroupNotFoundFault,
_CacheSubnetGroupQuotaExceededFault,
_CacheSubnetQuotaExceededFault,
_ClusterQuotaForCustomerExceededFault,
_DefaultUserAssociatedToUserGroupFault,
_DefaultUserRequired,
_DuplicateUserNameFault,
_GlobalReplicationGroupAlreadyExistsFault,
_GlobalReplicationGroupNotFoundFault,
_InsufficientCacheClusterCapacityFault,
_InvalidARNFault,
_InvalidCacheClusterStateFault,
_InvalidCacheParameterGroupStateFault,
_InvalidCacheSecurityGroupStateFault,
_InvalidGlobalReplicationGroupStateFault,
_InvalidKMSKeyFault,
_InvalidParameterCombinationException,
_InvalidParameterValueException,
_InvalidReplicationGroupStateFault,
_InvalidSnapshotStateFault,
_InvalidSubnet,
_InvalidUserGroupStateFault,
_InvalidUserStateFault,
_InvalidVPCNetworkStateFault,
_NoOperationFault,
_NodeGroupNotFoundFault,
_NodeGroupsPerReplicationGroupQuotaExceededFault,
_NodeQuotaForClusterExceededFault,
_NodeQuotaForCustomerExceededFault,
_ReplicationGroupAlreadyExistsFault,
_ReplicationGroupAlreadyUnderMigrationFault,
_ReplicationGroupNotFoundFault,
_ReplicationGroupNotUnderMigrationFault,
_ReservedCacheNodeAlreadyExistsFault,
_ReservedCacheNodeNotFoundFault,
_ReservedCacheNodeQuotaExceededFault,
_ReservedCacheNodesOfferingNotFoundFault,
_ServiceLinkedRoleNotFoundFault,
_ServiceUpdateNotFoundFault,
_SnapshotAlreadyExistsFault,
_SnapshotFeatureNotSupportedFault,
_SnapshotNotFoundFault,
_SnapshotQuotaExceededFault,
_SubnetInUse,
_SubnetNotAllowedFault,
_TagNotFoundFault,
_TagQuotaPerResourceExceeded,
_TestFailoverNotAvailableFault,
_UserAlreadyExistsFault,
_UserGroupAlreadyExistsFault,
_UserGroupNotFoundFault,
_UserGroupQuotaExceededFault,
_UserNotFoundFault,
_UserQuotaExceededFault,
AZMode (..),
AuthTokenUpdateStatus (..),
AuthTokenUpdateStrategyType (..),
AuthenticationType (..),
AutomaticFailoverStatus (..),
ChangeType (..),
DataTieringStatus (..),
DestinationType (..),
InputAuthenticationType (..),
IpDiscovery (..),
LogDeliveryConfigurationStatus (..),
LogFormat (..),
LogType (..),
MultiAZStatus (..),
NetworkType (..),
NodeUpdateInitiatedBy (..),
NodeUpdateStatus (..),
OutpostMode (..),
PendingAutomaticFailoverStatus (..),
ServiceUpdateSeverity (..),
ServiceUpdateStatus (..),
ServiceUpdateType (..),
SlaMet (..),
SourceType (..),
TransitEncryptionMode (..),
UpdateActionStatus (..),
Authentication (..),
newAuthentication,
authentication_passwordCount,
authentication_type,
AuthenticationMode (..),
newAuthenticationMode,
authenticationMode_passwords,
authenticationMode_type,
AvailabilityZone (..),
newAvailabilityZone,
availabilityZone_name,
CacheCluster (..),
newCacheCluster,
cacheCluster_arn,
cacheCluster_atRestEncryptionEnabled,
cacheCluster_authTokenEnabled,
cacheCluster_authTokenLastModifiedDate,
cacheCluster_autoMinorVersionUpgrade,
cacheCluster_cacheClusterCreateTime,
cacheCluster_cacheClusterId,
cacheCluster_cacheClusterStatus,
cacheCluster_cacheNodeType,
cacheCluster_cacheNodes,
cacheCluster_cacheParameterGroup,
cacheCluster_cacheSecurityGroups,
cacheCluster_cacheSubnetGroupName,
cacheCluster_clientDownloadLandingPage,
cacheCluster_configurationEndpoint,
cacheCluster_engine,
cacheCluster_engineVersion,
cacheCluster_ipDiscovery,
cacheCluster_logDeliveryConfigurations,
cacheCluster_networkType,
cacheCluster_notificationConfiguration,
cacheCluster_numCacheNodes,
cacheCluster_pendingModifiedValues,
cacheCluster_preferredAvailabilityZone,
cacheCluster_preferredMaintenanceWindow,
cacheCluster_preferredOutpostArn,
cacheCluster_replicationGroupId,
cacheCluster_replicationGroupLogDeliveryEnabled,
cacheCluster_securityGroups,
cacheCluster_snapshotRetentionLimit,
cacheCluster_snapshotWindow,
cacheCluster_transitEncryptionEnabled,
cacheCluster_transitEncryptionMode,
CacheEngineVersion (..),
newCacheEngineVersion,
cacheEngineVersion_cacheEngineDescription,
cacheEngineVersion_cacheEngineVersionDescription,
cacheEngineVersion_cacheParameterGroupFamily,
cacheEngineVersion_engine,
cacheEngineVersion_engineVersion,
CacheNode (..),
newCacheNode,
cacheNode_cacheNodeCreateTime,
cacheNode_cacheNodeId,
cacheNode_cacheNodeStatus,
cacheNode_customerAvailabilityZone,
cacheNode_customerOutpostArn,
cacheNode_endpoint,
cacheNode_parameterGroupStatus,
cacheNode_sourceCacheNodeId,
CacheNodeTypeSpecificParameter (..),
newCacheNodeTypeSpecificParameter,
cacheNodeTypeSpecificParameter_allowedValues,
cacheNodeTypeSpecificParameter_cacheNodeTypeSpecificValues,
cacheNodeTypeSpecificParameter_changeType,
cacheNodeTypeSpecificParameter_dataType,
cacheNodeTypeSpecificParameter_description,
cacheNodeTypeSpecificParameter_isModifiable,
cacheNodeTypeSpecificParameter_minimumEngineVersion,
cacheNodeTypeSpecificParameter_parameterName,
cacheNodeTypeSpecificParameter_source,
CacheNodeTypeSpecificValue (..),
newCacheNodeTypeSpecificValue,
cacheNodeTypeSpecificValue_cacheNodeType,
cacheNodeTypeSpecificValue_value,
CacheNodeUpdateStatus (..),
newCacheNodeUpdateStatus,
cacheNodeUpdateStatus_cacheNodeId,
cacheNodeUpdateStatus_nodeDeletionDate,
cacheNodeUpdateStatus_nodeUpdateEndDate,
cacheNodeUpdateStatus_nodeUpdateInitiatedBy,
cacheNodeUpdateStatus_nodeUpdateInitiatedDate,
cacheNodeUpdateStatus_nodeUpdateStartDate,
cacheNodeUpdateStatus_nodeUpdateStatus,
cacheNodeUpdateStatus_nodeUpdateStatusModifiedDate,
CacheParameterGroup (..),
newCacheParameterGroup,
cacheParameterGroup_arn,
cacheParameterGroup_cacheParameterGroupFamily,
cacheParameterGroup_cacheParameterGroupName,
cacheParameterGroup_description,
cacheParameterGroup_isGlobal,
CacheParameterGroupNameMessage (..),
newCacheParameterGroupNameMessage,
cacheParameterGroupNameMessage_cacheParameterGroupName,
CacheParameterGroupStatus (..),
newCacheParameterGroupStatus,
cacheParameterGroupStatus_cacheNodeIdsToReboot,
cacheParameterGroupStatus_cacheParameterGroupName,
cacheParameterGroupStatus_parameterApplyStatus,
CacheSecurityGroup (..),
newCacheSecurityGroup,
cacheSecurityGroup_arn,
cacheSecurityGroup_cacheSecurityGroupName,
cacheSecurityGroup_description,
cacheSecurityGroup_eC2SecurityGroups,
cacheSecurityGroup_ownerId,
CacheSecurityGroupMembership (..),
newCacheSecurityGroupMembership,
cacheSecurityGroupMembership_cacheSecurityGroupName,
cacheSecurityGroupMembership_status,
CacheSubnetGroup (..),
newCacheSubnetGroup,
cacheSubnetGroup_arn,
cacheSubnetGroup_cacheSubnetGroupDescription,
cacheSubnetGroup_cacheSubnetGroupName,
cacheSubnetGroup_subnets,
cacheSubnetGroup_supportedNetworkTypes,
cacheSubnetGroup_vpcId,
CloudWatchLogsDestinationDetails (..),
newCloudWatchLogsDestinationDetails,
cloudWatchLogsDestinationDetails_logGroup,
ConfigureShard (..),
newConfigureShard,
configureShard_preferredAvailabilityZones,
configureShard_preferredOutpostArns,
configureShard_nodeGroupId,
configureShard_newReplicaCount,
CustomerNodeEndpoint (..),
newCustomerNodeEndpoint,
customerNodeEndpoint_address,
customerNodeEndpoint_port,
DestinationDetails (..),
newDestinationDetails,
destinationDetails_cloudWatchLogsDetails,
destinationDetails_kinesisFirehoseDetails,
EC2SecurityGroup (..),
newEC2SecurityGroup,
eC2SecurityGroup_eC2SecurityGroupName,
eC2SecurityGroup_eC2SecurityGroupOwnerId,
eC2SecurityGroup_status,
Endpoint (..),
newEndpoint,
endpoint_address,
endpoint_port,
EngineDefaults (..),
newEngineDefaults,
engineDefaults_cacheNodeTypeSpecificParameters,
engineDefaults_cacheParameterGroupFamily,
engineDefaults_marker,
engineDefaults_parameters,
Event (..),
newEvent,
event_date,
event_message,
event_sourceIdentifier,
event_sourceType,
Filter (..),
newFilter,
filter_name,
filter_values,
GlobalNodeGroup (..),
newGlobalNodeGroup,
globalNodeGroup_globalNodeGroupId,
globalNodeGroup_slots,
GlobalReplicationGroup (..),
newGlobalReplicationGroup,
globalReplicationGroup_arn,
globalReplicationGroup_atRestEncryptionEnabled,
globalReplicationGroup_authTokenEnabled,
globalReplicationGroup_cacheNodeType,
globalReplicationGroup_clusterEnabled,
globalReplicationGroup_engine,
globalReplicationGroup_engineVersion,
globalReplicationGroup_globalNodeGroups,
globalReplicationGroup_globalReplicationGroupDescription,
globalReplicationGroup_globalReplicationGroupId,
globalReplicationGroup_members,
globalReplicationGroup_status,
globalReplicationGroup_transitEncryptionEnabled,
GlobalReplicationGroupInfo (..),
newGlobalReplicationGroupInfo,
globalReplicationGroupInfo_globalReplicationGroupId,
globalReplicationGroupInfo_globalReplicationGroupMemberRole,
GlobalReplicationGroupMember (..),
newGlobalReplicationGroupMember,
globalReplicationGroupMember_automaticFailover,
globalReplicationGroupMember_replicationGroupId,
globalReplicationGroupMember_replicationGroupRegion,
globalReplicationGroupMember_role,
globalReplicationGroupMember_status,
KinesisFirehoseDestinationDetails (..),
newKinesisFirehoseDestinationDetails,
kinesisFirehoseDestinationDetails_deliveryStream,
LogDeliveryConfiguration (..),
newLogDeliveryConfiguration,
logDeliveryConfiguration_destinationDetails,
logDeliveryConfiguration_destinationType,
logDeliveryConfiguration_logFormat,
logDeliveryConfiguration_logType,
logDeliveryConfiguration_message,
logDeliveryConfiguration_status,
LogDeliveryConfigurationRequest (..),
newLogDeliveryConfigurationRequest,
logDeliveryConfigurationRequest_destinationDetails,
logDeliveryConfigurationRequest_destinationType,
logDeliveryConfigurationRequest_enabled,
logDeliveryConfigurationRequest_logFormat,
logDeliveryConfigurationRequest_logType,
NodeGroup (..),
newNodeGroup,
nodeGroup_nodeGroupId,
nodeGroup_nodeGroupMembers,
nodeGroup_primaryEndpoint,
nodeGroup_readerEndpoint,
nodeGroup_slots,
nodeGroup_status,
NodeGroupConfiguration (..),
newNodeGroupConfiguration,
nodeGroupConfiguration_nodeGroupId,
nodeGroupConfiguration_primaryAvailabilityZone,
nodeGroupConfiguration_primaryOutpostArn,
nodeGroupConfiguration_replicaAvailabilityZones,
nodeGroupConfiguration_replicaCount,
nodeGroupConfiguration_replicaOutpostArns,
nodeGroupConfiguration_slots,
NodeGroupMember (..),
newNodeGroupMember,
nodeGroupMember_cacheClusterId,
nodeGroupMember_cacheNodeId,
nodeGroupMember_currentRole,
nodeGroupMember_preferredAvailabilityZone,
nodeGroupMember_preferredOutpostArn,
nodeGroupMember_readEndpoint,
NodeGroupMemberUpdateStatus (..),
newNodeGroupMemberUpdateStatus,
nodeGroupMemberUpdateStatus_cacheClusterId,
nodeGroupMemberUpdateStatus_cacheNodeId,
nodeGroupMemberUpdateStatus_nodeDeletionDate,
nodeGroupMemberUpdateStatus_nodeUpdateEndDate,
nodeGroupMemberUpdateStatus_nodeUpdateInitiatedBy,
nodeGroupMemberUpdateStatus_nodeUpdateInitiatedDate,
nodeGroupMemberUpdateStatus_nodeUpdateStartDate,
nodeGroupMemberUpdateStatus_nodeUpdateStatus,
nodeGroupMemberUpdateStatus_nodeUpdateStatusModifiedDate,
NodeGroupUpdateStatus (..),
newNodeGroupUpdateStatus,
nodeGroupUpdateStatus_nodeGroupId,
nodeGroupUpdateStatus_nodeGroupMemberUpdateStatus,
NodeSnapshot (..),
newNodeSnapshot,
nodeSnapshot_cacheClusterId,
nodeSnapshot_cacheNodeCreateTime,
nodeSnapshot_cacheNodeId,
nodeSnapshot_cacheSize,
nodeSnapshot_nodeGroupConfiguration,
nodeSnapshot_nodeGroupId,
nodeSnapshot_snapshotCreateTime,
NotificationConfiguration (..),
newNotificationConfiguration,
notificationConfiguration_topicArn,
notificationConfiguration_topicStatus,
Parameter (..),
newParameter,
parameter_allowedValues,
parameter_changeType,
parameter_dataType,
parameter_description,
parameter_isModifiable,
parameter_minimumEngineVersion,
parameter_parameterName,
parameter_parameterValue,
parameter_source,
ParameterNameValue (..),
newParameterNameValue,
parameterNameValue_parameterName,
parameterNameValue_parameterValue,
PendingLogDeliveryConfiguration (..),
newPendingLogDeliveryConfiguration,
pendingLogDeliveryConfiguration_destinationDetails,
pendingLogDeliveryConfiguration_destinationType,
pendingLogDeliveryConfiguration_logFormat,
pendingLogDeliveryConfiguration_logType,
PendingModifiedValues (..),
newPendingModifiedValues,
pendingModifiedValues_authTokenStatus,
pendingModifiedValues_cacheNodeIdsToRemove,
pendingModifiedValues_cacheNodeType,
pendingModifiedValues_engineVersion,
pendingModifiedValues_logDeliveryConfigurations,
pendingModifiedValues_numCacheNodes,
pendingModifiedValues_transitEncryptionEnabled,
pendingModifiedValues_transitEncryptionMode,
ProcessedUpdateAction (..),
newProcessedUpdateAction,
processedUpdateAction_cacheClusterId,
processedUpdateAction_replicationGroupId,
processedUpdateAction_serviceUpdateName,
processedUpdateAction_updateActionStatus,
RecurringCharge (..),
newRecurringCharge,
recurringCharge_recurringChargeAmount,
recurringCharge_recurringChargeFrequency,
RegionalConfiguration (..),
newRegionalConfiguration,
regionalConfiguration_replicationGroupId,
regionalConfiguration_replicationGroupRegion,
regionalConfiguration_reshardingConfiguration,
ReplicationGroup (..),
newReplicationGroup,
replicationGroup_arn,
replicationGroup_atRestEncryptionEnabled,
replicationGroup_authTokenEnabled,
replicationGroup_authTokenLastModifiedDate,
replicationGroup_autoMinorVersionUpgrade,
replicationGroup_automaticFailover,
replicationGroup_cacheNodeType,
replicationGroup_clusterEnabled,
replicationGroup_configurationEndpoint,
replicationGroup_dataTiering,
replicationGroup_description,
replicationGroup_globalReplicationGroupInfo,
replicationGroup_ipDiscovery,
replicationGroup_kmsKeyId,
replicationGroup_logDeliveryConfigurations,
replicationGroup_memberClusters,
replicationGroup_memberClustersOutpostArns,
replicationGroup_multiAZ,
replicationGroup_networkType,
replicationGroup_nodeGroups,
replicationGroup_pendingModifiedValues,
replicationGroup_replicationGroupCreateTime,
replicationGroup_replicationGroupId,
replicationGroup_snapshotRetentionLimit,
replicationGroup_snapshotWindow,
replicationGroup_snapshottingClusterId,
replicationGroup_status,
replicationGroup_transitEncryptionEnabled,
replicationGroup_transitEncryptionMode,
replicationGroup_userGroupIds,
ReplicationGroupPendingModifiedValues (..),
newReplicationGroupPendingModifiedValues,
replicationGroupPendingModifiedValues_authTokenStatus,
replicationGroupPendingModifiedValues_automaticFailoverStatus,
replicationGroupPendingModifiedValues_logDeliveryConfigurations,
replicationGroupPendingModifiedValues_primaryClusterId,
replicationGroupPendingModifiedValues_resharding,
replicationGroupPendingModifiedValues_transitEncryptionEnabled,
replicationGroupPendingModifiedValues_transitEncryptionMode,
replicationGroupPendingModifiedValues_userGroups,
ReservedCacheNode (..),
newReservedCacheNode,
reservedCacheNode_cacheNodeCount,
reservedCacheNode_cacheNodeType,
reservedCacheNode_duration,
reservedCacheNode_fixedPrice,
reservedCacheNode_offeringType,
reservedCacheNode_productDescription,
reservedCacheNode_recurringCharges,
reservedCacheNode_reservationARN,
reservedCacheNode_reservedCacheNodeId,
reservedCacheNode_reservedCacheNodesOfferingId,
reservedCacheNode_startTime,
reservedCacheNode_state,
reservedCacheNode_usagePrice,
ReservedCacheNodesOffering (..),
newReservedCacheNodesOffering,
reservedCacheNodesOffering_cacheNodeType,
reservedCacheNodesOffering_duration,
reservedCacheNodesOffering_fixedPrice,
reservedCacheNodesOffering_offeringType,
reservedCacheNodesOffering_productDescription,
reservedCacheNodesOffering_recurringCharges,
reservedCacheNodesOffering_reservedCacheNodesOfferingId,
reservedCacheNodesOffering_usagePrice,
ReshardingConfiguration (..),
newReshardingConfiguration,
reshardingConfiguration_nodeGroupId,
reshardingConfiguration_preferredAvailabilityZones,
ReshardingStatus (..),
newReshardingStatus,
reshardingStatus_slotMigration,
SecurityGroupMembership (..),
newSecurityGroupMembership,
securityGroupMembership_securityGroupId,
securityGroupMembership_status,
ServiceUpdate (..),
newServiceUpdate,
serviceUpdate_autoUpdateAfterRecommendedApplyByDate,
serviceUpdate_engine,
serviceUpdate_engineVersion,
serviceUpdate_estimatedUpdateTime,
serviceUpdate_serviceUpdateDescription,
serviceUpdate_serviceUpdateEndDate,
serviceUpdate_serviceUpdateName,
serviceUpdate_serviceUpdateRecommendedApplyByDate,
serviceUpdate_serviceUpdateReleaseDate,
serviceUpdate_serviceUpdateSeverity,
serviceUpdate_serviceUpdateStatus,
serviceUpdate_serviceUpdateType,
SlotMigration (..),
newSlotMigration,
slotMigration_progressPercentage,
Snapshot (..),
newSnapshot,
snapshot_arn,
snapshot_autoMinorVersionUpgrade,
snapshot_automaticFailover,
snapshot_cacheClusterCreateTime,
snapshot_cacheClusterId,
snapshot_cacheNodeType,
snapshot_cacheParameterGroupName,
snapshot_cacheSubnetGroupName,
snapshot_dataTiering,
snapshot_engine,
snapshot_engineVersion,
snapshot_kmsKeyId,
snapshot_nodeSnapshots,
snapshot_numCacheNodes,
snapshot_numNodeGroups,
snapshot_port,
snapshot_preferredAvailabilityZone,
snapshot_preferredMaintenanceWindow,
snapshot_preferredOutpostArn,
snapshot_replicationGroupDescription,
snapshot_replicationGroupId,
snapshot_snapshotName,
snapshot_snapshotRetentionLimit,
snapshot_snapshotSource,
snapshot_snapshotStatus,
snapshot_snapshotWindow,
snapshot_topicArn,
snapshot_vpcId,
Subnet (..),
newSubnet,
subnet_subnetAvailabilityZone,
subnet_subnetIdentifier,
subnet_subnetOutpost,
subnet_supportedNetworkTypes,
SubnetOutpost (..),
newSubnetOutpost,
subnetOutpost_subnetOutpostArn,
Tag (..),
newTag,
tag_key,
tag_value,
TagListMessage (..),
newTagListMessage,
tagListMessage_tagList,
TimeRangeFilter (..),
newTimeRangeFilter,
timeRangeFilter_endTime,
timeRangeFilter_startTime,
UnprocessedUpdateAction (..),
newUnprocessedUpdateAction,
unprocessedUpdateAction_cacheClusterId,
unprocessedUpdateAction_errorMessage,
unprocessedUpdateAction_errorType,
unprocessedUpdateAction_replicationGroupId,
unprocessedUpdateAction_serviceUpdateName,
UpdateAction (..),
newUpdateAction,
updateAction_cacheClusterId,
updateAction_cacheNodeUpdateStatus,
updateAction_engine,
updateAction_estimatedUpdateTime,
updateAction_nodeGroupUpdateStatus,
updateAction_nodesUpdated,
updateAction_replicationGroupId,
updateAction_serviceUpdateName,
updateAction_serviceUpdateRecommendedApplyByDate,
updateAction_serviceUpdateReleaseDate,
updateAction_serviceUpdateSeverity,
updateAction_serviceUpdateStatus,
updateAction_serviceUpdateType,
updateAction_slaMet,
updateAction_updateActionAvailableDate,
updateAction_updateActionStatus,
updateAction_updateActionStatusModifiedDate,
UpdateActionResultsMessage (..),
newUpdateActionResultsMessage,
updateActionResultsMessage_processedUpdateActions,
updateActionResultsMessage_unprocessedUpdateActions,
User (..),
newUser,
user_arn,
user_accessString,
user_authentication,
user_engine,
user_minimumEngineVersion,
user_status,
user_userGroupIds,
user_userId,
user_userName,
UserGroup (..),
newUserGroup,
userGroup_arn,
userGroup_engine,
userGroup_minimumEngineVersion,
userGroup_pendingChanges,
userGroup_replicationGroups,
userGroup_status,
userGroup_userGroupId,
userGroup_userIds,
UserGroupPendingChanges (..),
newUserGroupPendingChanges,
userGroupPendingChanges_userIdsToAdd,
userGroupPendingChanges_userIdsToRemove,
UserGroupsUpdateStatus (..),
newUserGroupsUpdateStatus,
userGroupsUpdateStatus_userGroupIdsToAdd,
userGroupsUpdateStatus_userGroupIdsToRemove,
)
where
import qualified Amazonka.Core as Core
import qualified Amazonka.Core.Lens.Internal as Lens
import Amazonka.ElastiCache.Types.AZMode
import Amazonka.ElastiCache.Types.AuthTokenUpdateStatus
import Amazonka.ElastiCache.Types.AuthTokenUpdateStrategyType
import Amazonka.ElastiCache.Types.Authentication
import Amazonka.ElastiCache.Types.AuthenticationMode
import Amazonka.ElastiCache.Types.AuthenticationType
import Amazonka.ElastiCache.Types.AutomaticFailoverStatus
import Amazonka.ElastiCache.Types.AvailabilityZone
import Amazonka.ElastiCache.Types.CacheCluster
import Amazonka.ElastiCache.Types.CacheEngineVersion
import Amazonka.ElastiCache.Types.CacheNode
import Amazonka.ElastiCache.Types.CacheNodeTypeSpecificParameter
import Amazonka.ElastiCache.Types.CacheNodeTypeSpecificValue
import Amazonka.ElastiCache.Types.CacheNodeUpdateStatus
import Amazonka.ElastiCache.Types.CacheParameterGroup
import Amazonka.ElastiCache.Types.CacheParameterGroupNameMessage
import Amazonka.ElastiCache.Types.CacheParameterGroupStatus
import Amazonka.ElastiCache.Types.CacheSecurityGroup
import Amazonka.ElastiCache.Types.CacheSecurityGroupMembership
import Amazonka.ElastiCache.Types.CacheSubnetGroup
import Amazonka.ElastiCache.Types.ChangeType
import Amazonka.ElastiCache.Types.CloudWatchLogsDestinationDetails
import Amazonka.ElastiCache.Types.ConfigureShard
import Amazonka.ElastiCache.Types.CustomerNodeEndpoint
import Amazonka.ElastiCache.Types.DataTieringStatus
import Amazonka.ElastiCache.Types.DestinationDetails
import Amazonka.ElastiCache.Types.DestinationType
import Amazonka.ElastiCache.Types.EC2SecurityGroup
import Amazonka.ElastiCache.Types.Endpoint
import Amazonka.ElastiCache.Types.EngineDefaults
import Amazonka.ElastiCache.Types.Event
import Amazonka.ElastiCache.Types.Filter
import Amazonka.ElastiCache.Types.GlobalNodeGroup
import Amazonka.ElastiCache.Types.GlobalReplicationGroup
import Amazonka.ElastiCache.Types.GlobalReplicationGroupInfo
import Amazonka.ElastiCache.Types.GlobalReplicationGroupMember
import Amazonka.ElastiCache.Types.InputAuthenticationType
import Amazonka.ElastiCache.Types.IpDiscovery
import Amazonka.ElastiCache.Types.KinesisFirehoseDestinationDetails
import Amazonka.ElastiCache.Types.LogDeliveryConfiguration
import Amazonka.ElastiCache.Types.LogDeliveryConfigurationRequest
import Amazonka.ElastiCache.Types.LogDeliveryConfigurationStatus
import Amazonka.ElastiCache.Types.LogFormat
import Amazonka.ElastiCache.Types.LogType
import Amazonka.ElastiCache.Types.MultiAZStatus
import Amazonka.ElastiCache.Types.NetworkType
import Amazonka.ElastiCache.Types.NodeGroup
import Amazonka.ElastiCache.Types.NodeGroupConfiguration
import Amazonka.ElastiCache.Types.NodeGroupMember
import Amazonka.ElastiCache.Types.NodeGroupMemberUpdateStatus
import Amazonka.ElastiCache.Types.NodeGroupUpdateStatus
import Amazonka.ElastiCache.Types.NodeSnapshot
import Amazonka.ElastiCache.Types.NodeUpdateInitiatedBy
import Amazonka.ElastiCache.Types.NodeUpdateStatus
import Amazonka.ElastiCache.Types.NotificationConfiguration
import Amazonka.ElastiCache.Types.OutpostMode
import Amazonka.ElastiCache.Types.Parameter
import Amazonka.ElastiCache.Types.ParameterNameValue
import Amazonka.ElastiCache.Types.PendingAutomaticFailoverStatus
import Amazonka.ElastiCache.Types.PendingLogDeliveryConfiguration
import Amazonka.ElastiCache.Types.PendingModifiedValues
import Amazonka.ElastiCache.Types.ProcessedUpdateAction
import Amazonka.ElastiCache.Types.RecurringCharge
import Amazonka.ElastiCache.Types.RegionalConfiguration
import Amazonka.ElastiCache.Types.ReplicationGroup
import Amazonka.ElastiCache.Types.ReplicationGroupPendingModifiedValues
import Amazonka.ElastiCache.Types.ReservedCacheNode
import Amazonka.ElastiCache.Types.ReservedCacheNodesOffering
import Amazonka.ElastiCache.Types.ReshardingConfiguration
import Amazonka.ElastiCache.Types.ReshardingStatus
import Amazonka.ElastiCache.Types.SecurityGroupMembership
import Amazonka.ElastiCache.Types.ServiceUpdate
import Amazonka.ElastiCache.Types.ServiceUpdateSeverity
import Amazonka.ElastiCache.Types.ServiceUpdateStatus
import Amazonka.ElastiCache.Types.ServiceUpdateType
import Amazonka.ElastiCache.Types.SlaMet
import Amazonka.ElastiCache.Types.SlotMigration
import Amazonka.ElastiCache.Types.Snapshot
import Amazonka.ElastiCache.Types.SourceType
import Amazonka.ElastiCache.Types.Subnet
import Amazonka.ElastiCache.Types.SubnetOutpost
import Amazonka.ElastiCache.Types.Tag
import Amazonka.ElastiCache.Types.TagListMessage
import Amazonka.ElastiCache.Types.TimeRangeFilter
import Amazonka.ElastiCache.Types.TransitEncryptionMode
import Amazonka.ElastiCache.Types.UnprocessedUpdateAction
import Amazonka.ElastiCache.Types.UpdateAction
import Amazonka.ElastiCache.Types.UpdateActionResultsMessage
import Amazonka.ElastiCache.Types.UpdateActionStatus
import Amazonka.ElastiCache.Types.User
import Amazonka.ElastiCache.Types.UserGroup
import Amazonka.ElastiCache.Types.UserGroupPendingChanges
import Amazonka.ElastiCache.Types.UserGroupsUpdateStatus
import qualified Amazonka.Prelude as Prelude
import qualified Amazonka.Sign.V4 as Sign
defaultService :: Core.Service
defaultService :: Service
defaultService =
Core.Service
{ $sel:abbrev:Service :: Abbrev
Core.abbrev = Abbrev
"ElastiCache",
$sel:signer:Service :: Signer
Core.signer = Signer
Sign.v4,
$sel:endpointPrefix:Service :: ByteString
Core.endpointPrefix = ByteString
"elasticache",
$sel:signingName:Service :: ByteString
Core.signingName = ByteString
"elasticache",
$sel:version:Service :: ByteString
Core.version = ByteString
"2015-02-02",
$sel:s3AddressingStyle:Service :: S3AddressingStyle
Core.s3AddressingStyle = S3AddressingStyle
Core.S3AddressingStyleAuto,
$sel:endpoint:Service :: Region -> Endpoint
Core.endpoint = Service -> Region -> Endpoint
Core.defaultEndpoint Service
defaultService,
$sel:timeout:Service :: Maybe Seconds
Core.timeout = forall a. a -> Maybe a
Prelude.Just Seconds
70,
$sel:check:Service :: Status -> Bool
Core.check = Status -> Bool
Core.statusSuccess,
$sel:error:Service :: Status -> [Header] -> ByteStringLazy -> Error
Core.error = Abbrev -> Status -> [Header] -> ByteStringLazy -> Error
Core.parseXMLError Abbrev
"ElastiCache",
$sel:retry:Service :: Retry
Core.retry = Retry
retry
}
where
retry :: Retry
retry =
Core.Exponential
{ $sel:base:Exponential :: Double
Core.base = Double
5.0e-2,
$sel:growth:Exponential :: Int
Core.growth = Int
2,
$sel:attempts:Exponential :: Int
Core.attempts = Int
5,
$sel:check:Exponential :: ServiceError -> Maybe Text
Core.check = forall {a}. IsString a => ServiceError -> Maybe a
check
}
check :: ServiceError -> Maybe a
check ServiceError
e
| forall s a. Getting Any s a -> s -> Bool
Lens.has (forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
502) ServiceError
e =
forall a. a -> Maybe a
Prelude.Just a
"bad_gateway"
| forall s a. Getting Any s a -> s -> Bool
Lens.has (forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
504) ServiceError
e =
forall a. a -> Maybe a
Prelude.Just a
"gateway_timeout"
| forall s a. Getting Any s a -> s -> Bool
Lens.has (forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
500) ServiceError
e =
forall a. a -> Maybe a
Prelude.Just a
"general_server_error"
| forall s a. Getting Any s a -> s -> Bool
Lens.has (forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
509) ServiceError
e =
forall a. a -> Maybe a
Prelude.Just a
"limit_exceeded"
| forall s a. Getting Any s a -> s -> Bool
Lens.has
( forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
ErrorCode -> Optic' p f ServiceError ServiceError
Core.hasCode ErrorCode
"RequestThrottledException"
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
400
)
ServiceError
e =
forall a. a -> Maybe a
Prelude.Just a
"request_throttled_exception"
| forall s a. Getting Any s a -> s -> Bool
Lens.has (forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
503) ServiceError
e =
forall a. a -> Maybe a
Prelude.Just a
"service_unavailable"
| forall s a. Getting Any s a -> s -> Bool
Lens.has
( forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
ErrorCode -> Optic' p f ServiceError ServiceError
Core.hasCode ErrorCode
"ThrottledException"
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
400
)
ServiceError
e =
forall a. a -> Maybe a
Prelude.Just a
"throttled_exception"
| forall s a. Getting Any s a -> s -> Bool
Lens.has
( forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
ErrorCode -> Optic' p f ServiceError ServiceError
Core.hasCode ErrorCode
"Throttling"
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
400
)
ServiceError
e =
forall a. a -> Maybe a
Prelude.Just a
"throttling"
| forall s a. Getting Any s a -> s -> Bool
Lens.has
( forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
ErrorCode -> Optic' p f ServiceError ServiceError
Core.hasCode ErrorCode
"ThrottlingException"
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
400
)
ServiceError
e =
forall a. a -> Maybe a
Prelude.Just a
"throttling_exception"
| forall s a. Getting Any s a -> s -> Bool
Lens.has
( forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
ErrorCode -> Optic' p f ServiceError ServiceError
Core.hasCode
ErrorCode
"ProvisionedThroughputExceededException"
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
400
)
ServiceError
e =
forall a. a -> Maybe a
Prelude.Just a
"throughput_exceeded"
| forall s a. Getting Any s a -> s -> Bool
Lens.has (forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
429) ServiceError
e =
forall a. a -> Maybe a
Prelude.Just a
"too_many_requests"
| Bool
Prelude.otherwise = forall a. Maybe a
Prelude.Nothing
_APICallRateForCustomerExceededFault :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_APICallRateForCustomerExceededFault :: forall a. AsError a => Fold a ServiceError
_APICallRateForCustomerExceededFault =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"APICallRateForCustomerExceeded"
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
400
_AuthorizationAlreadyExistsFault :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_AuthorizationAlreadyExistsFault :: forall a. AsError a => Fold a ServiceError
_AuthorizationAlreadyExistsFault =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"AuthorizationAlreadyExists"
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
400
_AuthorizationNotFoundFault :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_AuthorizationNotFoundFault :: forall a. AsError a => Fold a ServiceError
_AuthorizationNotFoundFault =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"AuthorizationNotFound"
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
404
_CacheClusterAlreadyExistsFault :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_CacheClusterAlreadyExistsFault :: forall a. AsError a => Fold a ServiceError
_CacheClusterAlreadyExistsFault =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"CacheClusterAlreadyExists"
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
400
_CacheClusterNotFoundFault :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_CacheClusterNotFoundFault :: forall a. AsError a => Fold a ServiceError
_CacheClusterNotFoundFault =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"CacheClusterNotFound"
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
404
_CacheParameterGroupAlreadyExistsFault :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_CacheParameterGroupAlreadyExistsFault :: forall a. AsError a => Fold a ServiceError
_CacheParameterGroupAlreadyExistsFault =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"CacheParameterGroupAlreadyExists"
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
400
_CacheParameterGroupNotFoundFault :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_CacheParameterGroupNotFoundFault :: forall a. AsError a => Fold a ServiceError
_CacheParameterGroupNotFoundFault =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"CacheParameterGroupNotFound"
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
404
_CacheParameterGroupQuotaExceededFault :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_CacheParameterGroupQuotaExceededFault :: forall a. AsError a => Fold a ServiceError
_CacheParameterGroupQuotaExceededFault =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"CacheParameterGroupQuotaExceeded"
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
400
_CacheSecurityGroupAlreadyExistsFault :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_CacheSecurityGroupAlreadyExistsFault :: forall a. AsError a => Fold a ServiceError
_CacheSecurityGroupAlreadyExistsFault =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"CacheSecurityGroupAlreadyExists"
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
400
_CacheSecurityGroupNotFoundFault :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_CacheSecurityGroupNotFoundFault :: forall a. AsError a => Fold a ServiceError
_CacheSecurityGroupNotFoundFault =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"CacheSecurityGroupNotFound"
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
404
_CacheSecurityGroupQuotaExceededFault :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_CacheSecurityGroupQuotaExceededFault :: forall a. AsError a => Fold a ServiceError
_CacheSecurityGroupQuotaExceededFault =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"QuotaExceeded.CacheSecurityGroup"
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
400
_CacheSubnetGroupAlreadyExistsFault :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_CacheSubnetGroupAlreadyExistsFault :: forall a. AsError a => Fold a ServiceError
_CacheSubnetGroupAlreadyExistsFault =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"CacheSubnetGroupAlreadyExists"
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
400
_CacheSubnetGroupInUse :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_CacheSubnetGroupInUse :: forall a. AsError a => Fold a ServiceError
_CacheSubnetGroupInUse =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"CacheSubnetGroupInUse"
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
400
_CacheSubnetGroupNotFoundFault :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_CacheSubnetGroupNotFoundFault :: forall a. AsError a => Fold a ServiceError
_CacheSubnetGroupNotFoundFault =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"CacheSubnetGroupNotFoundFault"
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
400
_CacheSubnetGroupQuotaExceededFault :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_CacheSubnetGroupQuotaExceededFault :: forall a. AsError a => Fold a ServiceError
_CacheSubnetGroupQuotaExceededFault =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"CacheSubnetGroupQuotaExceeded"
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
400
_CacheSubnetQuotaExceededFault :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_CacheSubnetQuotaExceededFault :: forall a. AsError a => Fold a ServiceError
_CacheSubnetQuotaExceededFault =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"CacheSubnetQuotaExceededFault"
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
400
_ClusterQuotaForCustomerExceededFault :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_ClusterQuotaForCustomerExceededFault :: forall a. AsError a => Fold a ServiceError
_ClusterQuotaForCustomerExceededFault =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"ClusterQuotaForCustomerExceeded"
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
400
_DefaultUserAssociatedToUserGroupFault :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_DefaultUserAssociatedToUserGroupFault :: forall a. AsError a => Fold a ServiceError
_DefaultUserAssociatedToUserGroupFault =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"DefaultUserAssociatedToUserGroup"
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
400
_DefaultUserRequired :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_DefaultUserRequired :: forall a. AsError a => Fold a ServiceError
_DefaultUserRequired =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"DefaultUserRequired"
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
400
_DuplicateUserNameFault :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_DuplicateUserNameFault :: forall a. AsError a => Fold a ServiceError
_DuplicateUserNameFault =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"DuplicateUserName"
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
400
_GlobalReplicationGroupAlreadyExistsFault :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_GlobalReplicationGroupAlreadyExistsFault :: forall a. AsError a => Fold a ServiceError
_GlobalReplicationGroupAlreadyExistsFault =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"GlobalReplicationGroupAlreadyExistsFault"
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
400
_GlobalReplicationGroupNotFoundFault :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_GlobalReplicationGroupNotFoundFault :: forall a. AsError a => Fold a ServiceError
_GlobalReplicationGroupNotFoundFault =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"GlobalReplicationGroupNotFoundFault"
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
404
_InsufficientCacheClusterCapacityFault :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_InsufficientCacheClusterCapacityFault :: forall a. AsError a => Fold a ServiceError
_InsufficientCacheClusterCapacityFault =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"InsufficientCacheClusterCapacity"
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
400
_InvalidARNFault :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_InvalidARNFault :: forall a. AsError a => Fold a ServiceError
_InvalidARNFault =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError Service
defaultService ErrorCode
"InvalidARN"
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
400
_InvalidCacheClusterStateFault :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_InvalidCacheClusterStateFault :: forall a. AsError a => Fold a ServiceError
_InvalidCacheClusterStateFault =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"InvalidCacheClusterState"
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
400
_InvalidCacheParameterGroupStateFault :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_InvalidCacheParameterGroupStateFault :: forall a. AsError a => Fold a ServiceError
_InvalidCacheParameterGroupStateFault =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"InvalidCacheParameterGroupState"
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
400
_InvalidCacheSecurityGroupStateFault :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_InvalidCacheSecurityGroupStateFault :: forall a. AsError a => Fold a ServiceError
_InvalidCacheSecurityGroupStateFault =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"InvalidCacheSecurityGroupState"
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
400
_InvalidGlobalReplicationGroupStateFault :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_InvalidGlobalReplicationGroupStateFault :: forall a. AsError a => Fold a ServiceError
_InvalidGlobalReplicationGroupStateFault =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"InvalidGlobalReplicationGroupState"
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
400
_InvalidKMSKeyFault :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_InvalidKMSKeyFault :: forall a. AsError a => Fold a ServiceError
_InvalidKMSKeyFault =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"InvalidKMSKeyFault"
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
400
_InvalidParameterCombinationException :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_InvalidParameterCombinationException :: forall a. AsError a => Fold a ServiceError
_InvalidParameterCombinationException =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"InvalidParameterCombination"
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
400
_InvalidParameterValueException :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_InvalidParameterValueException :: forall a. AsError a => Fold a ServiceError
_InvalidParameterValueException =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"InvalidParameterValue"
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
400
_InvalidReplicationGroupStateFault :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_InvalidReplicationGroupStateFault :: forall a. AsError a => Fold a ServiceError
_InvalidReplicationGroupStateFault =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"InvalidReplicationGroupState"
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
400
_InvalidSnapshotStateFault :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_InvalidSnapshotStateFault :: forall a. AsError a => Fold a ServiceError
_InvalidSnapshotStateFault =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"InvalidSnapshotState"
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
400
_InvalidSubnet :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_InvalidSubnet :: forall a. AsError a => Fold a ServiceError
_InvalidSubnet =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"InvalidSubnet"
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
400
_InvalidUserGroupStateFault :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_InvalidUserGroupStateFault :: forall a. AsError a => Fold a ServiceError
_InvalidUserGroupStateFault =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"InvalidUserGroupState"
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
400
_InvalidUserStateFault :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_InvalidUserStateFault :: forall a. AsError a => Fold a ServiceError
_InvalidUserStateFault =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"InvalidUserState"
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
400
_InvalidVPCNetworkStateFault :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_InvalidVPCNetworkStateFault :: forall a. AsError a => Fold a ServiceError
_InvalidVPCNetworkStateFault =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"InvalidVPCNetworkStateFault"
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
400
_NoOperationFault :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_NoOperationFault :: forall a. AsError a => Fold a ServiceError
_NoOperationFault =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"NoOperationFault"
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
400
_NodeGroupNotFoundFault :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_NodeGroupNotFoundFault :: forall a. AsError a => Fold a ServiceError
_NodeGroupNotFoundFault =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"NodeGroupNotFoundFault"
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
404
_NodeGroupsPerReplicationGroupQuotaExceededFault :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_NodeGroupsPerReplicationGroupQuotaExceededFault :: forall a. AsError a => Fold a ServiceError
_NodeGroupsPerReplicationGroupQuotaExceededFault =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"NodeGroupsPerReplicationGroupQuotaExceeded"
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
400
_NodeQuotaForClusterExceededFault :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_NodeQuotaForClusterExceededFault :: forall a. AsError a => Fold a ServiceError
_NodeQuotaForClusterExceededFault =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"NodeQuotaForClusterExceeded"
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
400
_NodeQuotaForCustomerExceededFault :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_NodeQuotaForCustomerExceededFault :: forall a. AsError a => Fold a ServiceError
_NodeQuotaForCustomerExceededFault =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"NodeQuotaForCustomerExceeded"
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
400
_ReplicationGroupAlreadyExistsFault :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_ReplicationGroupAlreadyExistsFault :: forall a. AsError a => Fold a ServiceError
_ReplicationGroupAlreadyExistsFault =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"ReplicationGroupAlreadyExists"
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
400
_ReplicationGroupAlreadyUnderMigrationFault :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_ReplicationGroupAlreadyUnderMigrationFault :: forall a. AsError a => Fold a ServiceError
_ReplicationGroupAlreadyUnderMigrationFault =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"ReplicationGroupAlreadyUnderMigrationFault"
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
400
_ReplicationGroupNotFoundFault :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_ReplicationGroupNotFoundFault :: forall a. AsError a => Fold a ServiceError
_ReplicationGroupNotFoundFault =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"ReplicationGroupNotFoundFault"
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
404
_ReplicationGroupNotUnderMigrationFault :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_ReplicationGroupNotUnderMigrationFault :: forall a. AsError a => Fold a ServiceError
_ReplicationGroupNotUnderMigrationFault =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"ReplicationGroupNotUnderMigrationFault"
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
400
_ReservedCacheNodeAlreadyExistsFault :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_ReservedCacheNodeAlreadyExistsFault :: forall a. AsError a => Fold a ServiceError
_ReservedCacheNodeAlreadyExistsFault =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"ReservedCacheNodeAlreadyExists"
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
404
_ReservedCacheNodeNotFoundFault :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_ReservedCacheNodeNotFoundFault :: forall a. AsError a => Fold a ServiceError
_ReservedCacheNodeNotFoundFault =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"ReservedCacheNodeNotFound"
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
404
_ReservedCacheNodeQuotaExceededFault :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_ReservedCacheNodeQuotaExceededFault :: forall a. AsError a => Fold a ServiceError
_ReservedCacheNodeQuotaExceededFault =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"ReservedCacheNodeQuotaExceeded"
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
400
_ReservedCacheNodesOfferingNotFoundFault :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_ReservedCacheNodesOfferingNotFoundFault :: forall a. AsError a => Fold a ServiceError
_ReservedCacheNodesOfferingNotFoundFault =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"ReservedCacheNodesOfferingNotFound"
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
404
_ServiceLinkedRoleNotFoundFault :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_ServiceLinkedRoleNotFoundFault :: forall a. AsError a => Fold a ServiceError
_ServiceLinkedRoleNotFoundFault =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"ServiceLinkedRoleNotFoundFault"
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
400
_ServiceUpdateNotFoundFault :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_ServiceUpdateNotFoundFault :: forall a. AsError a => Fold a ServiceError
_ServiceUpdateNotFoundFault =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"ServiceUpdateNotFoundFault"
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
404
_SnapshotAlreadyExistsFault :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_SnapshotAlreadyExistsFault :: forall a. AsError a => Fold a ServiceError
_SnapshotAlreadyExistsFault =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"SnapshotAlreadyExistsFault"
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
400
_SnapshotFeatureNotSupportedFault :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_SnapshotFeatureNotSupportedFault :: forall a. AsError a => Fold a ServiceError
_SnapshotFeatureNotSupportedFault =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"SnapshotFeatureNotSupportedFault"
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
400
_SnapshotNotFoundFault :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_SnapshotNotFoundFault :: forall a. AsError a => Fold a ServiceError
_SnapshotNotFoundFault =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"SnapshotNotFoundFault"
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
404
_SnapshotQuotaExceededFault :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_SnapshotQuotaExceededFault :: forall a. AsError a => Fold a ServiceError
_SnapshotQuotaExceededFault =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"SnapshotQuotaExceededFault"
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
400
_SubnetInUse :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_SubnetInUse :: forall a. AsError a => Fold a ServiceError
_SubnetInUse =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"SubnetInUse"
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
400
_SubnetNotAllowedFault :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_SubnetNotAllowedFault :: forall a. AsError a => Fold a ServiceError
_SubnetNotAllowedFault =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"SubnetNotAllowedFault"
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
400
_TagNotFoundFault :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_TagNotFoundFault :: forall a. AsError a => Fold a ServiceError
_TagNotFoundFault =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"TagNotFound"
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
404
_TagQuotaPerResourceExceeded :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_TagQuotaPerResourceExceeded :: forall a. AsError a => Fold a ServiceError
_TagQuotaPerResourceExceeded =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"TagQuotaPerResourceExceeded"
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
400
_TestFailoverNotAvailableFault :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_TestFailoverNotAvailableFault :: forall a. AsError a => Fold a ServiceError
_TestFailoverNotAvailableFault =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"TestFailoverNotAvailableFault"
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
400
_UserAlreadyExistsFault :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_UserAlreadyExistsFault :: forall a. AsError a => Fold a ServiceError
_UserAlreadyExistsFault =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"UserAlreadyExists"
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
400
_UserGroupAlreadyExistsFault :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_UserGroupAlreadyExistsFault :: forall a. AsError a => Fold a ServiceError
_UserGroupAlreadyExistsFault =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"UserGroupAlreadyExists"
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
400
_UserGroupNotFoundFault :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_UserGroupNotFoundFault :: forall a. AsError a => Fold a ServiceError
_UserGroupNotFoundFault =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"UserGroupNotFound"
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
404
_UserGroupQuotaExceededFault :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_UserGroupQuotaExceededFault :: forall a. AsError a => Fold a ServiceError
_UserGroupQuotaExceededFault =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"UserGroupQuotaExceeded"
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
400
_UserNotFoundFault :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_UserNotFoundFault :: forall a. AsError a => Fold a ServiceError
_UserNotFoundFault =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"UserNotFound"
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
404
_UserQuotaExceededFault :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_UserQuotaExceededFault :: forall a. AsError a => Fold a ServiceError
_UserQuotaExceededFault =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"UserQuotaExceeded"
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
400