{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE StrictData #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# OPTIONS_GHC -fno-warn-unused-matches #-}
module Amazonka.GameLift.Types
(
defaultService,
_OutOfCapacityException,
_InvalidFleetStatusException,
_InvalidRequestException,
_ConflictException,
_TaggingFailedException,
_TerminalRoutingStrategyException,
_NotFoundException,
_GameSessionFullException,
_UnsupportedRegionException,
_InvalidGameSessionStatusException,
_InternalServiceException,
_IdempotentParameterMismatchException,
_UnauthorizedException,
_FleetCapacityExceededException,
_LimitExceededException,
AcceptanceType (..),
BackfillMode (..),
BalancingStrategy (..),
BuildStatus (..),
CertificateType (..),
ComparisonOperatorType (..),
EC2InstanceType (..),
EventCode (..),
FleetAction (..),
FleetStatus (..),
FleetType (..),
FlexMatchMode (..),
GameServerClaimStatus (..),
GameServerGroupAction (..),
GameServerGroupDeleteOption (..),
GameServerGroupInstanceType (..),
GameServerGroupStatus (..),
GameServerHealthCheck (..),
GameServerInstanceStatus (..),
GameServerProtectionPolicy (..),
GameServerUtilizationStatus (..),
GameSessionPlacementState (..),
GameSessionStatus (..),
GameSessionStatusReason (..),
InstanceStatus (..),
IpProtocol (..),
LocationUpdateStatus (..),
MatchmakingConfigurationStatus (..),
MetricName (..),
OperatingSystem (..),
PlayerSessionCreationPolicy (..),
PlayerSessionStatus (..),
PolicyType (..),
PriorityType (..),
ProtectionPolicy (..),
RoutingStrategyType (..),
ScalingAdjustmentType (..),
ScalingStatusType (..),
SortOrder (..),
Alias (..),
newAlias,
alias_creationTime,
alias_lastUpdatedTime,
alias_aliasId,
alias_routingStrategy,
alias_name,
alias_aliasArn,
alias_description,
AttributeValue (..),
newAttributeValue,
attributeValue_sl,
attributeValue_sdm,
attributeValue_n,
attributeValue_s,
AwsCredentials (..),
newAwsCredentials,
awsCredentials_secretAccessKey,
awsCredentials_sessionToken,
awsCredentials_accessKeyId,
Build (..),
newBuild,
build_creationTime,
build_status,
build_operatingSystem,
build_buildId,
build_name,
build_version,
build_buildArn,
build_sizeOnDisk,
CertificateConfiguration (..),
newCertificateConfiguration,
certificateConfiguration_certificateType,
DesiredPlayerSession (..),
newDesiredPlayerSession,
desiredPlayerSession_playerData,
desiredPlayerSession_playerId,
EC2InstanceCounts (..),
newEC2InstanceCounts,
eC2InstanceCounts_idle,
eC2InstanceCounts_terminating,
eC2InstanceCounts_pending,
eC2InstanceCounts_maximum,
eC2InstanceCounts_desired,
eC2InstanceCounts_minimum,
eC2InstanceCounts_active,
EC2InstanceLimit (..),
newEC2InstanceLimit,
eC2InstanceLimit_location,
eC2InstanceLimit_eC2InstanceType,
eC2InstanceLimit_currentInstances,
eC2InstanceLimit_instanceLimit,
Event (..),
newEvent,
event_resourceId,
event_preSignedLogUrl,
event_eventTime,
event_message,
event_eventCode,
event_eventId,
FilterConfiguration (..),
newFilterConfiguration,
filterConfiguration_allowedLocations,
FleetAttributes (..),
newFleetAttributes,
fleetAttributes_creationTime,
fleetAttributes_status,
fleetAttributes_serverLaunchParameters,
fleetAttributes_logPaths,
fleetAttributes_operatingSystem,
fleetAttributes_buildId,
fleetAttributes_fleetArn,
fleetAttributes_fleetType,
fleetAttributes_terminationTime,
fleetAttributes_instanceType,
fleetAttributes_stoppedActions,
fleetAttributes_newGameSessionProtectionPolicy,
fleetAttributes_name,
fleetAttributes_scriptId,
fleetAttributes_scriptArn,
fleetAttributes_certificateConfiguration,
fleetAttributes_serverLaunchPath,
fleetAttributes_instanceRoleArn,
fleetAttributes_metricGroups,
fleetAttributes_buildArn,
fleetAttributes_fleetId,
fleetAttributes_description,
fleetAttributes_resourceCreationLimitPolicy,
FleetCapacity (..),
newFleetCapacity,
fleetCapacity_location,
fleetCapacity_fleetArn,
fleetCapacity_instanceType,
fleetCapacity_fleetId,
fleetCapacity_instanceCounts,
FleetUtilization (..),
newFleetUtilization,
fleetUtilization_activeGameSessionCount,
fleetUtilization_location,
fleetUtilization_fleetArn,
fleetUtilization_maximumPlayerSessionCount,
fleetUtilization_currentPlayerSessionCount,
fleetUtilization_fleetId,
fleetUtilization_activeServerProcessCount,
GameProperty (..),
newGameProperty,
gameProperty_key,
gameProperty_value,
GameServer (..),
newGameServer,
gameServer_instanceId,
gameServer_lastClaimTime,
gameServer_gameServerGroupName,
gameServer_gameServerData,
gameServer_claimStatus,
gameServer_gameServerId,
gameServer_utilizationStatus,
gameServer_registrationTime,
gameServer_lastHealthCheckTime,
gameServer_connectionInfo,
gameServer_gameServerGroupArn,
GameServerGroup (..),
newGameServerGroup,
gameServerGroup_creationTime,
gameServerGroup_status,
gameServerGroup_instanceDefinitions,
gameServerGroup_lastUpdatedTime,
gameServerGroup_balancingStrategy,
gameServerGroup_gameServerGroupName,
gameServerGroup_suspendedActions,
gameServerGroup_autoScalingGroupArn,
gameServerGroup_statusReason,
gameServerGroup_gameServerProtectionPolicy,
gameServerGroup_gameServerGroupArn,
gameServerGroup_roleArn,
GameServerGroupAutoScalingPolicy (..),
newGameServerGroupAutoScalingPolicy,
gameServerGroupAutoScalingPolicy_estimatedInstanceWarmup,
gameServerGroupAutoScalingPolicy_targetTrackingConfiguration,
GameServerInstance (..),
newGameServerInstance,
gameServerInstance_instanceId,
gameServerInstance_gameServerGroupName,
gameServerInstance_instanceStatus,
gameServerInstance_gameServerGroupArn,
GameSession (..),
newGameSession,
gameSession_creationTime,
gameSession_status,
gameSession_gameProperties,
gameSession_ipAddress,
gameSession_location,
gameSession_gameSessionId,
gameSession_matchmakerData,
gameSession_fleetArn,
gameSession_maximumPlayerSessionCount,
gameSession_terminationTime,
gameSession_playerSessionCreationPolicy,
gameSession_name,
gameSession_currentPlayerSessionCount,
gameSession_statusReason,
gameSession_gameSessionData,
gameSession_fleetId,
gameSession_dnsName,
gameSession_creatorId,
gameSession_port,
GameSessionConnectionInfo (..),
newGameSessionConnectionInfo,
gameSessionConnectionInfo_matchedPlayerSessions,
gameSessionConnectionInfo_ipAddress,
gameSessionConnectionInfo_gameSessionArn,
gameSessionConnectionInfo_dnsName,
gameSessionConnectionInfo_port,
GameSessionDetail (..),
newGameSessionDetail,
gameSessionDetail_gameSession,
gameSessionDetail_protectionPolicy,
GameSessionPlacement (..),
newGameSessionPlacement,
gameSessionPlacement_status,
gameSessionPlacement_placementId,
gameSessionPlacement_gameProperties,
gameSessionPlacement_ipAddress,
gameSessionPlacement_gameSessionName,
gameSessionPlacement_startTime,
gameSessionPlacement_gameSessionId,
gameSessionPlacement_gameSessionRegion,
gameSessionPlacement_matchmakerData,
gameSessionPlacement_maximumPlayerSessionCount,
gameSessionPlacement_endTime,
gameSessionPlacement_gameSessionArn,
gameSessionPlacement_playerLatencies,
gameSessionPlacement_gameSessionData,
gameSessionPlacement_dnsName,
gameSessionPlacement_gameSessionQueueName,
gameSessionPlacement_placedPlayerSessions,
gameSessionPlacement_port,
GameSessionQueue (..),
newGameSessionQueue,
gameSessionQueue_gameSessionQueueArn,
gameSessionQueue_playerLatencyPolicies,
gameSessionQueue_filterConfiguration,
gameSessionQueue_notificationTarget,
gameSessionQueue_timeoutInSeconds,
gameSessionQueue_destinations,
gameSessionQueue_name,
gameSessionQueue_customEventData,
gameSessionQueue_priorityConfiguration,
GameSessionQueueDestination (..),
newGameSessionQueueDestination,
gameSessionQueueDestination_destinationArn,
Instance (..),
newInstance,
instance_creationTime,
instance_instanceId,
instance_status,
instance_ipAddress,
instance_location,
instance_operatingSystem,
instance_fleetArn,
instance_type,
instance_fleetId,
instance_dnsName,
InstanceAccess (..),
newInstanceAccess,
instanceAccess_instanceId,
instanceAccess_ipAddress,
instanceAccess_operatingSystem,
instanceAccess_credentials,
instanceAccess_fleetId,
InstanceCredentials (..),
newInstanceCredentials,
instanceCredentials_userName,
instanceCredentials_secret,
InstanceDefinition (..),
newInstanceDefinition,
instanceDefinition_weightedCapacity,
instanceDefinition_instanceType,
IpPermission (..),
newIpPermission,
ipPermission_fromPort,
ipPermission_toPort,
ipPermission_ipRange,
ipPermission_protocol,
LaunchTemplateSpecification (..),
newLaunchTemplateSpecification,
launchTemplateSpecification_launchTemplateName,
launchTemplateSpecification_launchTemplateId,
launchTemplateSpecification_version,
LocationAttributes (..),
newLocationAttributes,
locationAttributes_stoppedActions,
locationAttributes_locationState,
locationAttributes_updateStatus,
LocationConfiguration (..),
newLocationConfiguration,
locationConfiguration_location,
LocationState (..),
newLocationState,
locationState_status,
locationState_location,
MatchedPlayerSession (..),
newMatchedPlayerSession,
matchedPlayerSession_playerSessionId,
matchedPlayerSession_playerId,
MatchmakingConfiguration (..),
newMatchmakingConfiguration,
matchmakingConfiguration_creationTime,
matchmakingConfiguration_backfillMode,
matchmakingConfiguration_gameProperties,
matchmakingConfiguration_ruleSetName,
matchmakingConfiguration_acceptanceTimeoutSeconds,
matchmakingConfiguration_requestTimeoutSeconds,
matchmakingConfiguration_notificationTarget,
matchmakingConfiguration_flexMatchMode,
matchmakingConfiguration_gameSessionQueueArns,
matchmakingConfiguration_name,
matchmakingConfiguration_customEventData,
matchmakingConfiguration_configurationArn,
matchmakingConfiguration_acceptanceRequired,
matchmakingConfiguration_gameSessionData,
matchmakingConfiguration_description,
matchmakingConfiguration_additionalPlayerCount,
matchmakingConfiguration_ruleSetArn,
MatchmakingRuleSet (..),
newMatchmakingRuleSet,
matchmakingRuleSet_creationTime,
matchmakingRuleSet_ruleSetName,
matchmakingRuleSet_ruleSetArn,
matchmakingRuleSet_ruleSetBody,
MatchmakingTicket (..),
newMatchmakingTicket,
matchmakingTicket_status,
matchmakingTicket_configurationName,
matchmakingTicket_startTime,
matchmakingTicket_gameSessionConnectionInfo,
matchmakingTicket_ticketId,
matchmakingTicket_estimatedWaitTime,
matchmakingTicket_statusMessage,
matchmakingTicket_endTime,
matchmakingTicket_configurationArn,
matchmakingTicket_statusReason,
matchmakingTicket_players,
PlacedPlayerSession (..),
newPlacedPlayerSession,
placedPlayerSession_playerSessionId,
placedPlayerSession_playerId,
Player (..),
newPlayer,
player_playerAttributes,
player_team,
player_playerId,
player_latencyInMs,
PlayerLatency (..),
newPlayerLatency,
playerLatency_latencyInMilliseconds,
playerLatency_regionIdentifier,
playerLatency_playerId,
PlayerLatencyPolicy (..),
newPlayerLatencyPolicy,
playerLatencyPolicy_policyDurationSeconds,
playerLatencyPolicy_maximumIndividualPlayerLatencyMilliseconds,
PlayerSession (..),
newPlayerSession,
playerSession_creationTime,
playerSession_status,
playerSession_ipAddress,
playerSession_gameSessionId,
playerSession_fleetArn,
playerSession_terminationTime,
playerSession_playerSessionId,
playerSession_fleetId,
playerSession_playerData,
playerSession_playerId,
playerSession_dnsName,
playerSession_port,
PriorityConfiguration (..),
newPriorityConfiguration,
priorityConfiguration_priorityOrder,
priorityConfiguration_locationOrder,
ResourceCreationLimitPolicy (..),
newResourceCreationLimitPolicy,
resourceCreationLimitPolicy_newGameSessionsPerCreator,
resourceCreationLimitPolicy_policyPeriodInMinutes,
RoutingStrategy (..),
newRoutingStrategy,
routingStrategy_type,
routingStrategy_message,
routingStrategy_fleetId,
RuntimeConfiguration (..),
newRuntimeConfiguration,
runtimeConfiguration_gameSessionActivationTimeoutSeconds,
runtimeConfiguration_serverProcesses,
runtimeConfiguration_maxConcurrentGameSessionActivations,
S3Location (..),
newS3Location,
s3Location_bucket,
s3Location_key,
s3Location_objectVersion,
s3Location_roleArn,
ScalingPolicy (..),
newScalingPolicy,
scalingPolicy_status,
scalingPolicy_scalingAdjustmentType,
scalingPolicy_location,
scalingPolicy_evaluationPeriods,
scalingPolicy_policyType,
scalingPolicy_metricName,
scalingPolicy_fleetArn,
scalingPolicy_comparisonOperator,
scalingPolicy_name,
scalingPolicy_threshold,
scalingPolicy_scalingAdjustment,
scalingPolicy_updateStatus,
scalingPolicy_fleetId,
scalingPolicy_targetConfiguration,
Script (..),
newScript,
script_creationTime,
script_storageLocation,
script_name,
script_scriptId,
script_version,
script_scriptArn,
script_sizeOnDisk,
ServerProcess (..),
newServerProcess,
serverProcess_parameters,
serverProcess_launchPath,
serverProcess_concurrentExecutions,
Tag (..),
newTag,
tag_key,
tag_value,
TargetConfiguration (..),
newTargetConfiguration,
targetConfiguration_targetValue,
TargetTrackingConfiguration (..),
newTargetTrackingConfiguration,
targetTrackingConfiguration_targetValue,
VpcPeeringAuthorization (..),
newVpcPeeringAuthorization,
vpcPeeringAuthorization_creationTime,
vpcPeeringAuthorization_peerVpcId,
vpcPeeringAuthorization_peerVpcAwsAccountId,
vpcPeeringAuthorization_gameLiftAwsAccountId,
vpcPeeringAuthorization_expirationTime,
VpcPeeringConnection (..),
newVpcPeeringConnection,
vpcPeeringConnection_vpcPeeringConnectionId,
vpcPeeringConnection_status,
vpcPeeringConnection_peerVpcId,
vpcPeeringConnection_fleetArn,
vpcPeeringConnection_ipV4CidrBlock,
vpcPeeringConnection_gameLiftVpcId,
vpcPeeringConnection_fleetId,
VpcPeeringConnectionStatus (..),
newVpcPeeringConnectionStatus,
vpcPeeringConnectionStatus_code,
vpcPeeringConnectionStatus_message,
)
where
import qualified Amazonka.Core as Core
import Amazonka.GameLift.Types.AcceptanceType
import Amazonka.GameLift.Types.Alias
import Amazonka.GameLift.Types.AttributeValue
import Amazonka.GameLift.Types.AwsCredentials
import Amazonka.GameLift.Types.BackfillMode
import Amazonka.GameLift.Types.BalancingStrategy
import Amazonka.GameLift.Types.Build
import Amazonka.GameLift.Types.BuildStatus
import Amazonka.GameLift.Types.CertificateConfiguration
import Amazonka.GameLift.Types.CertificateType
import Amazonka.GameLift.Types.ComparisonOperatorType
import Amazonka.GameLift.Types.DesiredPlayerSession
import Amazonka.GameLift.Types.EC2InstanceCounts
import Amazonka.GameLift.Types.EC2InstanceLimit
import Amazonka.GameLift.Types.EC2InstanceType
import Amazonka.GameLift.Types.Event
import Amazonka.GameLift.Types.EventCode
import Amazonka.GameLift.Types.FilterConfiguration
import Amazonka.GameLift.Types.FleetAction
import Amazonka.GameLift.Types.FleetAttributes
import Amazonka.GameLift.Types.FleetCapacity
import Amazonka.GameLift.Types.FleetStatus
import Amazonka.GameLift.Types.FleetType
import Amazonka.GameLift.Types.FleetUtilization
import Amazonka.GameLift.Types.FlexMatchMode
import Amazonka.GameLift.Types.GameProperty
import Amazonka.GameLift.Types.GameServer
import Amazonka.GameLift.Types.GameServerClaimStatus
import Amazonka.GameLift.Types.GameServerGroup
import Amazonka.GameLift.Types.GameServerGroupAction
import Amazonka.GameLift.Types.GameServerGroupAutoScalingPolicy
import Amazonka.GameLift.Types.GameServerGroupDeleteOption
import Amazonka.GameLift.Types.GameServerGroupInstanceType
import Amazonka.GameLift.Types.GameServerGroupStatus
import Amazonka.GameLift.Types.GameServerHealthCheck
import Amazonka.GameLift.Types.GameServerInstance
import Amazonka.GameLift.Types.GameServerInstanceStatus
import Amazonka.GameLift.Types.GameServerProtectionPolicy
import Amazonka.GameLift.Types.GameServerUtilizationStatus
import Amazonka.GameLift.Types.GameSession
import Amazonka.GameLift.Types.GameSessionConnectionInfo
import Amazonka.GameLift.Types.GameSessionDetail
import Amazonka.GameLift.Types.GameSessionPlacement
import Amazonka.GameLift.Types.GameSessionPlacementState
import Amazonka.GameLift.Types.GameSessionQueue
import Amazonka.GameLift.Types.GameSessionQueueDestination
import Amazonka.GameLift.Types.GameSessionStatus
import Amazonka.GameLift.Types.GameSessionStatusReason
import Amazonka.GameLift.Types.Instance
import Amazonka.GameLift.Types.InstanceAccess
import Amazonka.GameLift.Types.InstanceCredentials
import Amazonka.GameLift.Types.InstanceDefinition
import Amazonka.GameLift.Types.InstanceStatus
import Amazonka.GameLift.Types.IpPermission
import Amazonka.GameLift.Types.IpProtocol
import Amazonka.GameLift.Types.LaunchTemplateSpecification
import Amazonka.GameLift.Types.LocationAttributes
import Amazonka.GameLift.Types.LocationConfiguration
import Amazonka.GameLift.Types.LocationState
import Amazonka.GameLift.Types.LocationUpdateStatus
import Amazonka.GameLift.Types.MatchedPlayerSession
import Amazonka.GameLift.Types.MatchmakingConfiguration
import Amazonka.GameLift.Types.MatchmakingConfigurationStatus
import Amazonka.GameLift.Types.MatchmakingRuleSet
import Amazonka.GameLift.Types.MatchmakingTicket
import Amazonka.GameLift.Types.MetricName
import Amazonka.GameLift.Types.OperatingSystem
import Amazonka.GameLift.Types.PlacedPlayerSession
import Amazonka.GameLift.Types.Player
import Amazonka.GameLift.Types.PlayerLatency
import Amazonka.GameLift.Types.PlayerLatencyPolicy
import Amazonka.GameLift.Types.PlayerSession
import Amazonka.GameLift.Types.PlayerSessionCreationPolicy
import Amazonka.GameLift.Types.PlayerSessionStatus
import Amazonka.GameLift.Types.PolicyType
import Amazonka.GameLift.Types.PriorityConfiguration
import Amazonka.GameLift.Types.PriorityType
import Amazonka.GameLift.Types.ProtectionPolicy
import Amazonka.GameLift.Types.ResourceCreationLimitPolicy
import Amazonka.GameLift.Types.RoutingStrategy
import Amazonka.GameLift.Types.RoutingStrategyType
import Amazonka.GameLift.Types.RuntimeConfiguration
import Amazonka.GameLift.Types.S3Location
import Amazonka.GameLift.Types.ScalingAdjustmentType
import Amazonka.GameLift.Types.ScalingPolicy
import Amazonka.GameLift.Types.ScalingStatusType
import Amazonka.GameLift.Types.Script
import Amazonka.GameLift.Types.ServerProcess
import Amazonka.GameLift.Types.SortOrder
import Amazonka.GameLift.Types.Tag
import Amazonka.GameLift.Types.TargetConfiguration
import Amazonka.GameLift.Types.TargetTrackingConfiguration
import Amazonka.GameLift.Types.VpcPeeringAuthorization
import Amazonka.GameLift.Types.VpcPeeringConnection
import Amazonka.GameLift.Types.VpcPeeringConnectionStatus
import qualified Amazonka.Lens as Lens
import qualified Amazonka.Prelude as Prelude
import qualified Amazonka.Sign.V4 as Sign
defaultService :: Core.Service
defaultService :: Service
defaultService =
Service :: Abbrev
-> Signer
-> ByteString
-> ByteString
-> ByteString
-> (Region -> Endpoint)
-> Maybe Seconds
-> (Status -> Bool)
-> (Status -> [Header] -> ByteStringLazy -> Error)
-> Retry
-> Service
Core.Service
{ $sel:_serviceAbbrev:Service :: Abbrev
Core._serviceAbbrev = Abbrev
"GameLift",
$sel:_serviceSigner:Service :: Signer
Core._serviceSigner = Signer
Sign.v4,
$sel:_serviceEndpointPrefix:Service :: ByteString
Core._serviceEndpointPrefix = ByteString
"gamelift",
$sel:_serviceSigningName:Service :: ByteString
Core._serviceSigningName = ByteString
"gamelift",
$sel:_serviceVersion:Service :: ByteString
Core._serviceVersion = ByteString
"2015-10-01",
$sel:_serviceEndpoint:Service :: Region -> Endpoint
Core._serviceEndpoint =
Service -> Region -> Endpoint
Core.defaultEndpoint Service
defaultService,
$sel:_serviceTimeout:Service :: Maybe Seconds
Core._serviceTimeout = Seconds -> Maybe Seconds
forall a. a -> Maybe a
Prelude.Just Seconds
70,
$sel:_serviceCheck:Service :: Status -> Bool
Core._serviceCheck = Status -> Bool
Core.statusSuccess,
$sel:_serviceError:Service :: Status -> [Header] -> ByteStringLazy -> Error
Core._serviceError = Abbrev -> Status -> [Header] -> ByteStringLazy -> Error
Core.parseJSONError Abbrev
"GameLift",
$sel:_serviceRetry:Service :: Retry
Core._serviceRetry = Retry
retry
}
where
retry :: Retry
retry =
Exponential :: Double -> Int -> Int -> (ServiceError -> Maybe Text) -> Retry
Core.Exponential
{ $sel:_retryBase:Exponential :: Double
Core._retryBase = Double
5.0e-2,
$sel:_retryGrowth:Exponential :: Int
Core._retryGrowth = Int
2,
$sel:_retryAttempts:Exponential :: Int
Core._retryAttempts = Int
5,
$sel:_retryCheck:Exponential :: ServiceError -> Maybe Text
Core._retryCheck = ServiceError -> Maybe Text
forall a. IsString a => ServiceError -> Maybe a
check
}
check :: ServiceError -> Maybe a
check ServiceError
e
| Getting Any ServiceError ServiceError -> ServiceError -> Bool
forall s a. Getting Any s a -> s -> Bool
Lens.has
( ErrorCode -> Getting Any ServiceError ServiceError
forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
ErrorCode -> Optic' p f ServiceError ServiceError
Core.hasCode ErrorCode
"ThrottledException"
Getting Any ServiceError ServiceError
-> Getting Any ServiceError ServiceError
-> Getting Any ServiceError ServiceError
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. Int -> Getting Any ServiceError ServiceError
forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
400
)
ServiceError
e =
a -> Maybe a
forall a. a -> Maybe a
Prelude.Just a
"throttled_exception"
| Getting Any ServiceError ServiceError -> ServiceError -> Bool
forall s a. Getting Any s a -> s -> Bool
Lens.has (Int -> Getting Any ServiceError ServiceError
forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
429) ServiceError
e =
a -> Maybe a
forall a. a -> Maybe a
Prelude.Just a
"too_many_requests"
| Getting Any ServiceError ServiceError -> ServiceError -> Bool
forall s a. Getting Any s a -> s -> Bool
Lens.has
( ErrorCode -> Getting Any ServiceError ServiceError
forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
ErrorCode -> Optic' p f ServiceError ServiceError
Core.hasCode ErrorCode
"ThrottlingException"
Getting Any ServiceError ServiceError
-> Getting Any ServiceError ServiceError
-> Getting Any ServiceError ServiceError
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. Int -> Getting Any ServiceError ServiceError
forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
400
)
ServiceError
e =
a -> Maybe a
forall a. a -> Maybe a
Prelude.Just a
"throttling_exception"
| Getting Any ServiceError ServiceError -> ServiceError -> Bool
forall s a. Getting Any s a -> s -> Bool
Lens.has
( ErrorCode -> Getting Any ServiceError ServiceError
forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
ErrorCode -> Optic' p f ServiceError ServiceError
Core.hasCode ErrorCode
"Throttling"
Getting Any ServiceError ServiceError
-> Getting Any ServiceError ServiceError
-> Getting Any ServiceError ServiceError
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. Int -> Getting Any ServiceError ServiceError
forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
400
)
ServiceError
e =
a -> Maybe a
forall a. a -> Maybe a
Prelude.Just a
"throttling"
| Getting Any ServiceError ServiceError -> ServiceError -> Bool
forall s a. Getting Any s a -> s -> Bool
Lens.has
( ErrorCode -> Getting Any ServiceError ServiceError
forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
ErrorCode -> Optic' p f ServiceError ServiceError
Core.hasCode
ErrorCode
"ProvisionedThroughputExceededException"
Getting Any ServiceError ServiceError
-> Getting Any ServiceError ServiceError
-> Getting Any ServiceError ServiceError
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. Int -> Getting Any ServiceError ServiceError
forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
400
)
ServiceError
e =
a -> Maybe a
forall a. a -> Maybe a
Prelude.Just a
"throughput_exceeded"
| Getting Any ServiceError ServiceError -> ServiceError -> Bool
forall s a. Getting Any s a -> s -> Bool
Lens.has (Int -> Getting Any ServiceError ServiceError
forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
504) ServiceError
e =
a -> Maybe a
forall a. a -> Maybe a
Prelude.Just a
"gateway_timeout"
| Getting Any ServiceError ServiceError -> ServiceError -> Bool
forall s a. Getting Any s a -> s -> Bool
Lens.has
( ErrorCode -> Getting Any ServiceError ServiceError
forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
ErrorCode -> Optic' p f ServiceError ServiceError
Core.hasCode ErrorCode
"RequestThrottledException"
Getting Any ServiceError ServiceError
-> Getting Any ServiceError ServiceError
-> Getting Any ServiceError ServiceError
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. Int -> Getting Any ServiceError ServiceError
forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
400
)
ServiceError
e =
a -> Maybe a
forall a. a -> Maybe a
Prelude.Just a
"request_throttled_exception"
| Getting Any ServiceError ServiceError -> ServiceError -> Bool
forall s a. Getting Any s a -> s -> Bool
Lens.has (Int -> Getting Any ServiceError ServiceError
forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
502) ServiceError
e =
a -> Maybe a
forall a. a -> Maybe a
Prelude.Just a
"bad_gateway"
| Getting Any ServiceError ServiceError -> ServiceError -> Bool
forall s a. Getting Any s a -> s -> Bool
Lens.has (Int -> Getting Any ServiceError ServiceError
forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
503) ServiceError
e =
a -> Maybe a
forall a. a -> Maybe a
Prelude.Just a
"service_unavailable"
| Getting Any ServiceError ServiceError -> ServiceError -> Bool
forall s a. Getting Any s a -> s -> Bool
Lens.has (Int -> Getting Any ServiceError ServiceError
forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
500) ServiceError
e =
a -> Maybe a
forall a. a -> Maybe a
Prelude.Just a
"general_server_error"
| Getting Any ServiceError ServiceError -> ServiceError -> Bool
forall s a. Getting Any s a -> s -> Bool
Lens.has (Int -> Getting Any ServiceError ServiceError
forall (f :: * -> *) (p :: * -> * -> *).
(Applicative f, Choice p) =>
Int -> Optic' p f ServiceError ServiceError
Core.hasStatus Int
509) ServiceError
e =
a -> Maybe a
forall a. a -> Maybe a
Prelude.Just a
"limit_exceeded"
| Bool
Prelude.otherwise = Maybe a
forall a. Maybe a
Prelude.Nothing
_OutOfCapacityException :: Core.AsError a => Lens.Getting (Prelude.First Core.ServiceError) a Core.ServiceError
_OutOfCapacityException :: Getting (First ServiceError) a ServiceError
_OutOfCapacityException =
Service -> ErrorCode -> Getting (First ServiceError) a ServiceError
forall a.
AsError a =>
Service -> ErrorCode -> Getting (First ServiceError) a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"OutOfCapacityException"
_InvalidFleetStatusException :: Core.AsError a => Lens.Getting (Prelude.First Core.ServiceError) a Core.ServiceError
_InvalidFleetStatusException :: Getting (First ServiceError) a ServiceError
_InvalidFleetStatusException =
Service -> ErrorCode -> Getting (First ServiceError) a ServiceError
forall a.
AsError a =>
Service -> ErrorCode -> Getting (First ServiceError) a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"InvalidFleetStatusException"
_InvalidRequestException :: Core.AsError a => Lens.Getting (Prelude.First Core.ServiceError) a Core.ServiceError
_InvalidRequestException :: Getting (First ServiceError) a ServiceError
_InvalidRequestException =
Service -> ErrorCode -> Getting (First ServiceError) a ServiceError
forall a.
AsError a =>
Service -> ErrorCode -> Getting (First ServiceError) a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"InvalidRequestException"
_ConflictException :: Core.AsError a => Lens.Getting (Prelude.First Core.ServiceError) a Core.ServiceError
_ConflictException :: Getting (First ServiceError) a ServiceError
_ConflictException =
Service -> ErrorCode -> Getting (First ServiceError) a ServiceError
forall a.
AsError a =>
Service -> ErrorCode -> Getting (First ServiceError) a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"ConflictException"
_TaggingFailedException :: Core.AsError a => Lens.Getting (Prelude.First Core.ServiceError) a Core.ServiceError
_TaggingFailedException :: Getting (First ServiceError) a ServiceError
_TaggingFailedException =
Service -> ErrorCode -> Getting (First ServiceError) a ServiceError
forall a.
AsError a =>
Service -> ErrorCode -> Getting (First ServiceError) a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"TaggingFailedException"
_TerminalRoutingStrategyException :: Core.AsError a => Lens.Getting (Prelude.First Core.ServiceError) a Core.ServiceError
_TerminalRoutingStrategyException :: Getting (First ServiceError) a ServiceError
_TerminalRoutingStrategyException =
Service -> ErrorCode -> Getting (First ServiceError) a ServiceError
forall a.
AsError a =>
Service -> ErrorCode -> Getting (First ServiceError) a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"TerminalRoutingStrategyException"
_NotFoundException :: Core.AsError a => Lens.Getting (Prelude.First Core.ServiceError) a Core.ServiceError
_NotFoundException :: Getting (First ServiceError) a ServiceError
_NotFoundException =
Service -> ErrorCode -> Getting (First ServiceError) a ServiceError
forall a.
AsError a =>
Service -> ErrorCode -> Getting (First ServiceError) a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"NotFoundException"
_GameSessionFullException :: Core.AsError a => Lens.Getting (Prelude.First Core.ServiceError) a Core.ServiceError
_GameSessionFullException :: Getting (First ServiceError) a ServiceError
_GameSessionFullException =
Service -> ErrorCode -> Getting (First ServiceError) a ServiceError
forall a.
AsError a =>
Service -> ErrorCode -> Getting (First ServiceError) a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"GameSessionFullException"
_UnsupportedRegionException :: Core.AsError a => Lens.Getting (Prelude.First Core.ServiceError) a Core.ServiceError
_UnsupportedRegionException :: Getting (First ServiceError) a ServiceError
_UnsupportedRegionException =
Service -> ErrorCode -> Getting (First ServiceError) a ServiceError
forall a.
AsError a =>
Service -> ErrorCode -> Getting (First ServiceError) a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"UnsupportedRegionException"
_InvalidGameSessionStatusException :: Core.AsError a => Lens.Getting (Prelude.First Core.ServiceError) a Core.ServiceError
_InvalidGameSessionStatusException :: Getting (First ServiceError) a ServiceError
_InvalidGameSessionStatusException =
Service -> ErrorCode -> Getting (First ServiceError) a ServiceError
forall a.
AsError a =>
Service -> ErrorCode -> Getting (First ServiceError) a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"InvalidGameSessionStatusException"
_InternalServiceException :: Core.AsError a => Lens.Getting (Prelude.First Core.ServiceError) a Core.ServiceError
_InternalServiceException :: Getting (First ServiceError) a ServiceError
_InternalServiceException =
Service -> ErrorCode -> Getting (First ServiceError) a ServiceError
forall a.
AsError a =>
Service -> ErrorCode -> Getting (First ServiceError) a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"InternalServiceException"
_IdempotentParameterMismatchException :: Core.AsError a => Lens.Getting (Prelude.First Core.ServiceError) a Core.ServiceError
_IdempotentParameterMismatchException :: Getting (First ServiceError) a ServiceError
_IdempotentParameterMismatchException =
Service -> ErrorCode -> Getting (First ServiceError) a ServiceError
forall a.
AsError a =>
Service -> ErrorCode -> Getting (First ServiceError) a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"IdempotentParameterMismatchException"
_UnauthorizedException :: Core.AsError a => Lens.Getting (Prelude.First Core.ServiceError) a Core.ServiceError
_UnauthorizedException :: Getting (First ServiceError) a ServiceError
_UnauthorizedException =
Service -> ErrorCode -> Getting (First ServiceError) a ServiceError
forall a.
AsError a =>
Service -> ErrorCode -> Getting (First ServiceError) a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"UnauthorizedException"
_FleetCapacityExceededException :: Core.AsError a => Lens.Getting (Prelude.First Core.ServiceError) a Core.ServiceError
_FleetCapacityExceededException :: Getting (First ServiceError) a ServiceError
_FleetCapacityExceededException =
Service -> ErrorCode -> Getting (First ServiceError) a ServiceError
forall a.
AsError a =>
Service -> ErrorCode -> Getting (First ServiceError) a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"FleetCapacityExceededException"
_LimitExceededException :: Core.AsError a => Lens.Getting (Prelude.First Core.ServiceError) a Core.ServiceError
_LimitExceededException :: Getting (First ServiceError) a ServiceError
_LimitExceededException =
Service -> ErrorCode -> Getting (First ServiceError) a ServiceError
forall a.
AsError a =>
Service -> ErrorCode -> Getting (First ServiceError) a ServiceError
Core._MatchServiceError
Service
defaultService
ErrorCode
"LimitExceededException"