{-# LANGUAGE DisambiguateRecordFields #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE StrictData #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# OPTIONS_GHC -fno-warn-unused-matches #-}
module Amazonka.EKS.Types
(
defaultService,
_AccessDeniedException,
_BadRequestException,
_ClientException,
_InvalidParameterException,
_InvalidRequestException,
_NotFoundException,
_ResourceInUseException,
_ResourceLimitExceededException,
_ResourceNotFoundException,
_ResourcePropagationDelayException,
_ServerException,
_ServiceUnavailableException,
_UnsupportedAvailabilityZoneException,
AMITypes (..),
AddonIssueCode (..),
AddonStatus (..),
CapacityTypes (..),
ClusterIssueCode (..),
ClusterStatus (..),
ConfigStatus (..),
ConnectorConfigProvider (..),
EKSErrorCode (..),
FargateProfileStatus (..),
IpFamily (..),
LogType (..),
NodegroupIssueCode (..),
NodegroupStatus (..),
ResolveConflicts (..),
TaintEffect (..),
UpdateParamType (..),
UpdateStatus (..),
UpdateType (..),
Addon (..),
newAddon,
addon_addonArn,
addon_addonName,
addon_addonVersion,
addon_clusterName,
addon_configurationValues,
addon_createdAt,
addon_health,
addon_marketplaceInformation,
addon_modifiedAt,
addon_owner,
addon_publisher,
addon_serviceAccountRoleArn,
addon_status,
addon_tags,
AddonHealth (..),
newAddonHealth,
addonHealth_issues,
AddonInfo (..),
newAddonInfo,
addonInfo_addonName,
addonInfo_addonVersions,
addonInfo_marketplaceInformation,
addonInfo_owner,
addonInfo_publisher,
addonInfo_type,
AddonIssue (..),
newAddonIssue,
addonIssue_code,
addonIssue_message,
addonIssue_resourceIds,
AddonVersionInfo (..),
newAddonVersionInfo,
addonVersionInfo_addonVersion,
addonVersionInfo_architecture,
addonVersionInfo_compatibilities,
addonVersionInfo_requiresConfiguration,
AutoScalingGroup (..),
newAutoScalingGroup,
autoScalingGroup_name,
Certificate (..),
newCertificate,
certificate_data,
Cluster (..),
newCluster,
cluster_arn,
cluster_certificateAuthority,
cluster_clientRequestToken,
cluster_connectorConfig,
cluster_createdAt,
cluster_encryptionConfig,
cluster_endpoint,
cluster_health,
cluster_id,
cluster_identity,
cluster_kubernetesNetworkConfig,
cluster_logging,
cluster_name,
cluster_outpostConfig,
cluster_platformVersion,
cluster_resourcesVpcConfig,
cluster_roleArn,
cluster_status,
cluster_tags,
cluster_version,
ClusterHealth (..),
newClusterHealth,
clusterHealth_issues,
ClusterIssue (..),
newClusterIssue,
clusterIssue_code,
clusterIssue_message,
clusterIssue_resourceIds,
Compatibility (..),
newCompatibility,
compatibility_clusterVersion,
compatibility_defaultVersion,
compatibility_platformVersions,
ConnectorConfigRequest (..),
newConnectorConfigRequest,
connectorConfigRequest_roleArn,
connectorConfigRequest_provider,
ConnectorConfigResponse (..),
newConnectorConfigResponse,
connectorConfigResponse_activationCode,
connectorConfigResponse_activationExpiry,
connectorConfigResponse_activationId,
connectorConfigResponse_provider,
connectorConfigResponse_roleArn,
ControlPlanePlacementRequest (..),
newControlPlanePlacementRequest,
controlPlanePlacementRequest_groupName,
ControlPlanePlacementResponse (..),
newControlPlanePlacementResponse,
controlPlanePlacementResponse_groupName,
EncryptionConfig (..),
newEncryptionConfig,
encryptionConfig_provider,
encryptionConfig_resources,
ErrorDetail (..),
newErrorDetail,
errorDetail_errorCode,
errorDetail_errorMessage,
errorDetail_resourceIds,
FargateProfile (..),
newFargateProfile,
fargateProfile_clusterName,
fargateProfile_createdAt,
fargateProfile_fargateProfileArn,
fargateProfile_fargateProfileName,
fargateProfile_podExecutionRoleArn,
fargateProfile_selectors,
fargateProfile_status,
fargateProfile_subnets,
fargateProfile_tags,
FargateProfileSelector (..),
newFargateProfileSelector,
fargateProfileSelector_labels,
fargateProfileSelector_namespace,
Identity (..),
newIdentity,
identity_oidc,
IdentityProviderConfig (..),
newIdentityProviderConfig,
identityProviderConfig_type,
identityProviderConfig_name,
IdentityProviderConfigResponse (..),
newIdentityProviderConfigResponse,
identityProviderConfigResponse_oidc,
Issue (..),
newIssue,
issue_code,
issue_message,
issue_resourceIds,
KubernetesNetworkConfigRequest (..),
newKubernetesNetworkConfigRequest,
kubernetesNetworkConfigRequest_ipFamily,
kubernetesNetworkConfigRequest_serviceIpv4Cidr,
KubernetesNetworkConfigResponse (..),
newKubernetesNetworkConfigResponse,
kubernetesNetworkConfigResponse_ipFamily,
kubernetesNetworkConfigResponse_serviceIpv4Cidr,
kubernetesNetworkConfigResponse_serviceIpv6Cidr,
LaunchTemplateSpecification (..),
newLaunchTemplateSpecification,
launchTemplateSpecification_id,
launchTemplateSpecification_name,
launchTemplateSpecification_version,
LogSetup (..),
newLogSetup,
logSetup_enabled,
logSetup_types,
Logging (..),
newLogging,
logging_clusterLogging,
MarketplaceInformation (..),
newMarketplaceInformation,
marketplaceInformation_productId,
marketplaceInformation_productUrl,
Nodegroup (..),
newNodegroup,
nodegroup_amiType,
nodegroup_capacityType,
nodegroup_clusterName,
nodegroup_createdAt,
nodegroup_diskSize,
nodegroup_health,
nodegroup_instanceTypes,
nodegroup_labels,
nodegroup_launchTemplate,
nodegroup_modifiedAt,
nodegroup_nodeRole,
nodegroup_nodegroupArn,
nodegroup_nodegroupName,
nodegroup_releaseVersion,
nodegroup_remoteAccess,
nodegroup_resources,
nodegroup_scalingConfig,
nodegroup_status,
nodegroup_subnets,
nodegroup_tags,
nodegroup_taints,
nodegroup_updateConfig,
nodegroup_version,
NodegroupHealth (..),
newNodegroupHealth,
nodegroupHealth_issues,
NodegroupResources (..),
newNodegroupResources,
nodegroupResources_autoScalingGroups,
nodegroupResources_remoteAccessSecurityGroup,
NodegroupScalingConfig (..),
newNodegroupScalingConfig,
nodegroupScalingConfig_desiredSize,
nodegroupScalingConfig_maxSize,
nodegroupScalingConfig_minSize,
NodegroupUpdateConfig (..),
newNodegroupUpdateConfig,
nodegroupUpdateConfig_maxUnavailable,
nodegroupUpdateConfig_maxUnavailablePercentage,
OIDC (..),
newOIDC,
oidc_issuer,
OidcIdentityProviderConfig (..),
newOidcIdentityProviderConfig,
oidcIdentityProviderConfig_clientId,
oidcIdentityProviderConfig_clusterName,
oidcIdentityProviderConfig_groupsClaim,
oidcIdentityProviderConfig_groupsPrefix,
oidcIdentityProviderConfig_identityProviderConfigArn,
oidcIdentityProviderConfig_identityProviderConfigName,
oidcIdentityProviderConfig_issuerUrl,
oidcIdentityProviderConfig_requiredClaims,
oidcIdentityProviderConfig_status,
oidcIdentityProviderConfig_tags,
oidcIdentityProviderConfig_usernameClaim,
oidcIdentityProviderConfig_usernamePrefix,
OidcIdentityProviderConfigRequest (..),
newOidcIdentityProviderConfigRequest,
oidcIdentityProviderConfigRequest_groupsClaim,
oidcIdentityProviderConfigRequest_groupsPrefix,
oidcIdentityProviderConfigRequest_requiredClaims,
oidcIdentityProviderConfigRequest_usernameClaim,
oidcIdentityProviderConfigRequest_usernamePrefix,
oidcIdentityProviderConfigRequest_identityProviderConfigName,
oidcIdentityProviderConfigRequest_issuerUrl,
oidcIdentityProviderConfigRequest_clientId,
OutpostConfigRequest (..),
newOutpostConfigRequest,
outpostConfigRequest_controlPlanePlacement,
outpostConfigRequest_outpostArns,
outpostConfigRequest_controlPlaneInstanceType,
OutpostConfigResponse (..),
newOutpostConfigResponse,
outpostConfigResponse_controlPlanePlacement,
outpostConfigResponse_outpostArns,
outpostConfigResponse_controlPlaneInstanceType,
Provider (..),
newProvider,
provider_keyArn,
RemoteAccessConfig (..),
newRemoteAccessConfig,
remoteAccessConfig_ec2SshKey,
remoteAccessConfig_sourceSecurityGroups,
Taint (..),
newTaint,
taint_effect,
taint_key,
taint_value,
Update (..),
newUpdate,
update_createdAt,
update_errors,
update_id,
update_params,
update_status,
update_type,
UpdateLabelsPayload (..),
newUpdateLabelsPayload,
updateLabelsPayload_addOrUpdateLabels,
updateLabelsPayload_removeLabels,
UpdateParam (..),
newUpdateParam,
updateParam_type,
updateParam_value,
UpdateTaintsPayload (..),
newUpdateTaintsPayload,
updateTaintsPayload_addOrUpdateTaints,
updateTaintsPayload_removeTaints,
VpcConfigRequest (..),
newVpcConfigRequest,
vpcConfigRequest_endpointPrivateAccess,
vpcConfigRequest_endpointPublicAccess,
vpcConfigRequest_publicAccessCidrs,
vpcConfigRequest_securityGroupIds,
vpcConfigRequest_subnetIds,
VpcConfigResponse (..),
newVpcConfigResponse,
vpcConfigResponse_clusterSecurityGroupId,
vpcConfigResponse_endpointPrivateAccess,
vpcConfigResponse_endpointPublicAccess,
vpcConfigResponse_publicAccessCidrs,
vpcConfigResponse_securityGroupIds,
vpcConfigResponse_subnetIds,
vpcConfigResponse_vpcId,
)
where
import qualified Amazonka.Core as Core
import qualified Amazonka.Core.Lens.Internal as Lens
import Amazonka.EKS.Types.AMITypes
import Amazonka.EKS.Types.Addon
import Amazonka.EKS.Types.AddonHealth
import Amazonka.EKS.Types.AddonInfo
import Amazonka.EKS.Types.AddonIssue
import Amazonka.EKS.Types.AddonIssueCode
import Amazonka.EKS.Types.AddonStatus
import Amazonka.EKS.Types.AddonVersionInfo
import Amazonka.EKS.Types.AutoScalingGroup
import Amazonka.EKS.Types.CapacityTypes
import Amazonka.EKS.Types.Certificate
import Amazonka.EKS.Types.Cluster
import Amazonka.EKS.Types.ClusterHealth
import Amazonka.EKS.Types.ClusterIssue
import Amazonka.EKS.Types.ClusterIssueCode
import Amazonka.EKS.Types.ClusterStatus
import Amazonka.EKS.Types.Compatibility
import Amazonka.EKS.Types.ConfigStatus
import Amazonka.EKS.Types.ConnectorConfigProvider
import Amazonka.EKS.Types.ConnectorConfigRequest
import Amazonka.EKS.Types.ConnectorConfigResponse
import Amazonka.EKS.Types.ControlPlanePlacementRequest
import Amazonka.EKS.Types.ControlPlanePlacementResponse
import Amazonka.EKS.Types.EKSErrorCode
import Amazonka.EKS.Types.EncryptionConfig
import Amazonka.EKS.Types.ErrorDetail
import Amazonka.EKS.Types.FargateProfile
import Amazonka.EKS.Types.FargateProfileSelector
import Amazonka.EKS.Types.FargateProfileStatus
import Amazonka.EKS.Types.Identity
import Amazonka.EKS.Types.IdentityProviderConfig
import Amazonka.EKS.Types.IdentityProviderConfigResponse
import Amazonka.EKS.Types.IpFamily
import Amazonka.EKS.Types.Issue
import Amazonka.EKS.Types.KubernetesNetworkConfigRequest
import Amazonka.EKS.Types.KubernetesNetworkConfigResponse
import Amazonka.EKS.Types.LaunchTemplateSpecification
import Amazonka.EKS.Types.LogSetup
import Amazonka.EKS.Types.LogType
import Amazonka.EKS.Types.Logging
import Amazonka.EKS.Types.MarketplaceInformation
import Amazonka.EKS.Types.Nodegroup
import Amazonka.EKS.Types.NodegroupHealth
import Amazonka.EKS.Types.NodegroupIssueCode
import Amazonka.EKS.Types.NodegroupResources
import Amazonka.EKS.Types.NodegroupScalingConfig
import Amazonka.EKS.Types.NodegroupStatus
import Amazonka.EKS.Types.NodegroupUpdateConfig
import Amazonka.EKS.Types.OIDC
import Amazonka.EKS.Types.OidcIdentityProviderConfig
import Amazonka.EKS.Types.OidcIdentityProviderConfigRequest
import Amazonka.EKS.Types.OutpostConfigRequest
import Amazonka.EKS.Types.OutpostConfigResponse
import Amazonka.EKS.Types.Provider
import Amazonka.EKS.Types.RemoteAccessConfig
import Amazonka.EKS.Types.ResolveConflicts
import Amazonka.EKS.Types.Taint
import Amazonka.EKS.Types.TaintEffect
import Amazonka.EKS.Types.Update
import Amazonka.EKS.Types.UpdateLabelsPayload
import Amazonka.EKS.Types.UpdateParam
import Amazonka.EKS.Types.UpdateParamType
import Amazonka.EKS.Types.UpdateStatus
import Amazonka.EKS.Types.UpdateTaintsPayload
import Amazonka.EKS.Types.UpdateType
import Amazonka.EKS.Types.VpcConfigRequest
import Amazonka.EKS.Types.VpcConfigResponse
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
"EKS",
$sel:signer:Service :: Signer
Core.signer = Signer
Sign.v4,
$sel:endpointPrefix:Service :: ByteString
Core.endpointPrefix = ByteString
"eks",
$sel:signingName:Service :: ByteString
Core.signingName = ByteString
"eks",
$sel:version:Service :: ByteString
Core.version = ByteString
"2017-11-01",
$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.parseJSONError Abbrev
"EKS",
$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
_AccessDeniedException :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_AccessDeniedException :: forall a. AsError a => Fold a ServiceError
_AccessDeniedException =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"AccessDeniedException"
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
403
_BadRequestException :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_BadRequestException :: forall a. AsError a => Fold a ServiceError
_BadRequestException =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"BadRequestException"
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
_ClientException :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_ClientException :: forall a. AsError a => Fold a ServiceError
_ClientException =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"ClientException"
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
_InvalidParameterException :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_InvalidParameterException :: forall a. AsError a => Fold a ServiceError
_InvalidParameterException =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"InvalidParameterException"
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
_InvalidRequestException :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_InvalidRequestException :: forall a. AsError a => Fold a ServiceError
_InvalidRequestException =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"InvalidRequestException"
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
_NotFoundException :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_NotFoundException :: forall a. AsError a => Fold a ServiceError
_NotFoundException =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"NotFoundException"
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
_ResourceInUseException :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_ResourceInUseException :: forall a. AsError a => Fold a ServiceError
_ResourceInUseException =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"ResourceInUseException"
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
409
_ResourceLimitExceededException :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_ResourceLimitExceededException :: forall a. AsError a => Fold a ServiceError
_ResourceLimitExceededException =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"ResourceLimitExceededException"
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
_ResourceNotFoundException :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_ResourceNotFoundException :: forall a. AsError a => Fold a ServiceError
_ResourceNotFoundException =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"ResourceNotFoundException"
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
_ResourcePropagationDelayException :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_ResourcePropagationDelayException :: forall a. AsError a => Fold a ServiceError
_ResourcePropagationDelayException =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"ResourcePropagationDelayException"
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
428
_ServerException :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_ServerException :: forall a. AsError a => Fold a ServiceError
_ServerException =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"ServerException"
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
500
_ServiceUnavailableException :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_ServiceUnavailableException :: forall a. AsError a => Fold a ServiceError
_ServiceUnavailableException =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"ServiceUnavailableException"
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
503
_UnsupportedAvailabilityZoneException :: (Core.AsError a) => Lens.Fold a Core.ServiceError
_UnsupportedAvailabilityZoneException :: forall a. AsError a => Fold a ServiceError
_UnsupportedAvailabilityZoneException =
forall a. AsError a => Service -> ErrorCode -> Fold a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"UnsupportedAvailabilityZoneException"
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