module Network.AWS.Rekognition.Types
(
rekognition
, _AccessDeniedException
, _InvalidParameterException
, _InvalidImageFormatException
, _ResourceAlreadyExistsException
, _InvalidS3ObjectException
, _ProvisionedThroughputExceededException
, _ImageTooLargeException
, _ThrottlingException
, _InternalServerError
, _ResourceNotFoundException
, _InvalidPaginationTokenException
, Attribute (..)
, EmotionName (..)
, GenderType (..)
, LandmarkType (..)
, OrientationCorrection (..)
, AgeRange
, ageRange
, arLow
, arHigh
, Beard
, beard
, bValue
, bConfidence
, BoundingBox
, boundingBox
, bbHeight
, bbLeft
, bbWidth
, bbTop
, Celebrity
, celebrity
, cMatchConfidence
, cURLs
, cName
, cId
, cFace
, CompareFacesMatch
, compareFacesMatch
, cfmSimilarity
, cfmFace
, ComparedFace
, comparedFace
, cfBoundingBox
, cfPose
, cfConfidence
, cfQuality
, cfLandmarks
, ComparedSourceImageFace
, comparedSourceImageFace
, csifBoundingBox
, csifConfidence
, Emotion
, emotion
, eConfidence
, eType
, EyeOpen
, eyeOpen
, eoValue
, eoConfidence
, Eyeglasses
, eyeglasses
, eyeValue
, eyeConfidence
, Face
, face
, fFaceId
, fBoundingBox
, fExternalImageId
, fConfidence
, fImageId
, FaceDetail
, faceDetail
, fdAgeRange
, fdSunglasses
, fdMouthOpen
, fdBoundingBox
, fdEmotions
, fdEyesOpen
, fdPose
, fdConfidence
, fdGender
, fdQuality
, fdEyeglasses
, fdBeard
, fdMustache
, fdSmile
, fdLandmarks
, FaceMatch
, faceMatch
, fmSimilarity
, fmFace
, FaceRecord
, faceRecord
, frFaceDetail
, frFace
, Gender
, gender
, gValue
, gConfidence
, Image
, image
, iS3Object
, iBytes
, ImageQuality
, imageQuality
, iqSharpness
, iqBrightness
, Label
, label
, lConfidence
, lName
, Landmark
, landmark
, lType
, lX
, lY
, ModerationLabel
, moderationLabel
, mlConfidence
, mlName
, mlParentName
, MouthOpen
, mouthOpen
, moValue
, moConfidence
, Mustache
, mustache
, mValue
, mConfidence
, Pose
, pose
, pYaw
, pRoll
, pPitch
, S3Object
, s3Object
, soBucket
, soName
, soVersion
, Smile
, smile
, smiValue
, smiConfidence
, Sunglasses
, sunglasses
, sValue
, sConfidence
) where
import Network.AWS.Lens
import Network.AWS.Prelude
import Network.AWS.Rekognition.Types.Product
import Network.AWS.Rekognition.Types.Sum
import Network.AWS.Sign.V4
rekognition :: Service
rekognition =
Service
{ _svcAbbrev = "Rekognition"
, _svcSigner = v4
, _svcPrefix = "rekognition"
, _svcVersion = "2016-06-27"
, _svcEndpoint = defaultEndpoint rekognition
, _svcTimeout = Just 70
, _svcCheck = statusSuccess
, _svcError = parseJSONError "Rekognition"
, _svcRetry = retry
}
where
retry =
Exponential
{ _retryBase = 5.0e-2
, _retryGrowth = 2
, _retryAttempts = 5
, _retryCheck = check
}
check e
| has (hasCode "ThrottledException" . hasStatus 400) e =
Just "throttled_exception"
| has (hasStatus 429) e = Just "too_many_requests"
| has (hasCode "ThrottlingException" . hasStatus 400) e =
Just "throttling_exception"
| has (hasCode "Throttling" . hasStatus 400) e = Just "throttling"
| has (hasStatus 504) e = Just "gateway_timeout"
| has (hasStatus 502) e = Just "bad_gateway"
| has (hasStatus 503) e = Just "service_unavailable"
| has (hasStatus 500) e = Just "general_server_error"
| has (hasStatus 509) e = Just "limit_exceeded"
| otherwise = Nothing
_AccessDeniedException :: AsError a => Getting (First ServiceError) a ServiceError
_AccessDeniedException = _MatchServiceError rekognition "AccessDeniedException"
_InvalidParameterException :: AsError a => Getting (First ServiceError) a ServiceError
_InvalidParameterException =
_MatchServiceError rekognition "InvalidParameterException"
_InvalidImageFormatException :: AsError a => Getting (First ServiceError) a ServiceError
_InvalidImageFormatException =
_MatchServiceError rekognition "InvalidImageFormatException"
_ResourceAlreadyExistsException :: AsError a => Getting (First ServiceError) a ServiceError
_ResourceAlreadyExistsException =
_MatchServiceError rekognition "ResourceAlreadyExistsException"
_InvalidS3ObjectException :: AsError a => Getting (First ServiceError) a ServiceError
_InvalidS3ObjectException =
_MatchServiceError rekognition "InvalidS3ObjectException"
_ProvisionedThroughputExceededException :: AsError a => Getting (First ServiceError) a ServiceError
_ProvisionedThroughputExceededException =
_MatchServiceError rekognition "ProvisionedThroughputExceededException"
_ImageTooLargeException :: AsError a => Getting (First ServiceError) a ServiceError
_ImageTooLargeException =
_MatchServiceError rekognition "ImageTooLargeException"
_ThrottlingException :: AsError a => Getting (First ServiceError) a ServiceError
_ThrottlingException = _MatchServiceError rekognition "ThrottlingException"
_InternalServerError :: AsError a => Getting (First ServiceError) a ServiceError
_InternalServerError = _MatchServiceError rekognition "InternalServerError"
_ResourceNotFoundException :: AsError a => Getting (First ServiceError) a ServiceError
_ResourceNotFoundException =
_MatchServiceError rekognition "ResourceNotFoundException"
_InvalidPaginationTokenException :: AsError a => Getting (First ServiceError) a ServiceError
_InvalidPaginationTokenException =
_MatchServiceError rekognition "InvalidPaginationTokenException"