{-# LANGUAGE OverloadedStrings #-}
module Network.AWS.CloudFront.Types
(
cloudFront
, _TooManyOriginCustomHeaders
, _InvalidTagging
, _InvalidErrorCode
, _NoSuchFieldLevelEncryptionProfile
, _FieldLevelEncryptionProfileInUse
, _InvalidOriginReadTimeout
, _TooManyFieldLevelEncryptionProfiles
, _TooManyCacheBehaviors
, _TooManyCloudFrontOriginAccessIdentities
, _InvalidOriginAccessIdentity
, _DistributionNotDisabled
, _NoSuchStreamingDistribution
, _InconsistentQuantities
, _InvalidArgument
, _InvalidOriginKeepaliveTimeout
, _TooManyInvalidationsInProgress
, _InvalidWebACLId
, _TooManyQueryStringParameters
, _TooManyFieldLevelEncryptionQueryArgProfiles
, _TooManyDistributionCNAMEs
, _NoSuchCloudFrontOriginAccessIdentity
, _CloudFrontOriginAccessIdentityInUse
, _TooManyStreamingDistributions
, _CannotChangeImmutablePublicKeyFields
, _BatchTooLarge
, _TooManyCookieNamesInWhiteList
, _InvalidLambdaFunctionAssociation
, _InvalidForwardCookies
, _FieldLevelEncryptionConfigInUse
, _TooManyTrustedSigners
, _InvalidOrigin
, _NoSuchInvalidation
, _PublicKeyAlreadyExists
, _NoSuchOrigin
, _InvalidTTLOrder
, _StreamingDistributionNotDisabled
, _TooManyHeadersInForwardedValues
, _NoSuchResource
, _TooManyFieldLevelEncryptionEncryptionEntities
, _TooManyStreamingDistributionCNAMEs
, _FieldLevelEncryptionProfileAlreadyExists
, _ResourceInUse
, _InvalidRequiredProtocol
, _TooManyDistributions
, _TooManyCertificates
, _DistributionAlreadyExists
, _TooManyDistributionsAssociatedToFieldLevelEncryptionConfig
, _InvalidQueryStringParameters
, _MissingBody
, _IllegalFieldLevelEncryptionConfigAssociationWithCacheBehavior
, _IllegalUpdate
, _InvalidIfMatchVersion
, _FieldLevelEncryptionConfigAlreadyExists
, _PreconditionFailed
, _InvalidResponseCode
, _InvalidHeadersForS3Origin
, _CNAMEAlreadyExists
, _NoSuchPublicKey
, _PublicKeyInUse
, _TrustedSignerDoesNotExist
, _InvalidProtocolSettings
, _TooManyPublicKeys
, _NoSuchFieldLevelEncryptionConfig
, _TooManyFieldLevelEncryptionContentTypeProfiles
, _TooManyFieldLevelEncryptionFieldPatterns
, _TooManyFieldLevelEncryptionConfigs
, _TooManyLambdaFunctionAssociations
, _CloudFrontOriginAccessIdentityAlreadyExists
, _TooManyOrigins
, _InvalidRelativePath
, _StreamingDistributionAlreadyExists
, _QueryArgProfileEmpty
, _InvalidMinimumProtocolVersion
, _AccessDenied
, _InvalidViewerCertificate
, _NoSuchDistribution
, _FieldLevelEncryptionProfileSizeExceeded
, _InvalidDefaultRootObject
, _TooManyDistributionsWithLambdaAssociations
, _InvalidGeoRestrictionParameter
, _InvalidLocationCode
, CertificateSource (..)
, EventType (..)
, Format (..)
, GeoRestrictionType (..)
, HTTPVersion (..)
, ItemSelection (..)
, Method (..)
, MinimumProtocolVersion (..)
, OriginProtocolPolicy (..)
, PriceClass (..)
, SSLProtocol (..)
, SSLSupportMethod (..)
, ViewerProtocolPolicy (..)
, ActiveTrustedSigners
, activeTrustedSigners
, atsItems
, atsEnabled
, atsQuantity
, Aliases
, aliases
, aItems
, aQuantity
, AllowedMethods
, allowedMethods
, amCachedMethods
, amQuantity
, amItems
, CacheBehavior
, cacheBehavior
, cbAllowedMethods
, cbLambdaFunctionAssociations
, cbMaxTTL
, cbCompress
, cbSmoothStreaming
, cbDefaultTTL
, cbFieldLevelEncryptionId
, cbPathPattern
, cbTargetOriginId
, cbForwardedValues
, cbTrustedSigners
, cbViewerProtocolPolicy
, cbMinTTL
, CacheBehaviors
, cacheBehaviors
, cbItems
, cbQuantity
, CachedMethods
, cachedMethods
, cmQuantity
, cmItems
, CloudFrontOriginAccessIdentity
, cloudFrontOriginAccessIdentity
, cfoaiCloudFrontOriginAccessIdentityConfig
, cfoaiId
, cfoaiS3CanonicalUserId
, CloudFrontOriginAccessIdentityConfig
, cloudFrontOriginAccessIdentityConfig
, cfoaicCallerReference
, cfoaicComment
, CloudFrontOriginAccessIdentityList
, cloudFrontOriginAccessIdentityList
, cfoailItems
, cfoailNextMarker
, cfoailMarker
, cfoailMaxItems
, cfoailIsTruncated
, cfoailQuantity
, CloudFrontOriginAccessIdentitySummary
, cloudFrontOriginAccessIdentitySummary
, cfoaisId
, cfoaisS3CanonicalUserId
, cfoaisComment
, ContentTypeProfile
, contentTypeProfile
, ctpProfileId
, ctpFormat
, ctpContentType
, ContentTypeProfileConfig
, contentTypeProfileConfig
, ctpcContentTypeProfiles
, ctpcForwardWhenContentTypeIsUnknown
, ContentTypeProfiles
, contentTypeProfiles
, ctpItems
, ctpQuantity
, CookieNames
, cookieNames
, cnItems
, cnQuantity
, CookiePreference
, cookiePreference
, cpWhitelistedNames
, cpForward
, CustomErrorResponse
, customErrorResponse
, ceResponsePagePath
, ceResponseCode
, ceErrorCachingMinTTL
, ceErrorCode
, CustomErrorResponses
, customErrorResponses
, cerItems
, cerQuantity
, CustomHeaders
, customHeaders
, chItems
, chQuantity
, CustomOriginConfig
, customOriginConfig
, cocOriginKeepaliveTimeout
, cocOriginReadTimeout
, cocOriginSSLProtocols
, cocHTTPPort
, cocHTTPSPort
, cocOriginProtocolPolicy
, DefaultCacheBehavior
, defaultCacheBehavior
, dcbAllowedMethods
, dcbLambdaFunctionAssociations
, dcbMaxTTL
, dcbCompress
, dcbSmoothStreaming
, dcbDefaultTTL
, dcbFieldLevelEncryptionId
, dcbTargetOriginId
, dcbForwardedValues
, dcbTrustedSigners
, dcbViewerProtocolPolicy
, dcbMinTTL
, Distribution
, distribution
, dId
, dARN
, dStatus
, dLastModifiedTime
, dInProgressInvalidationBatches
, dDomainName
, dActiveTrustedSigners
, dDistributionConfig
, DistributionConfig
, distributionConfig
, dcHTTPVersion
, dcAliases
, dcDefaultRootObject
, dcPriceClass
, dcCustomErrorResponses
, dcWebACLId
, dcViewerCertificate
, dcRestrictions
, dcLogging
, dcCacheBehaviors
, dcIsIPV6Enabled
, dcCallerReference
, dcOrigins
, dcDefaultCacheBehavior
, dcComment
, dcEnabled
, DistributionConfigWithTags
, distributionConfigWithTags
, dcwtDistributionConfig
, dcwtTags
, DistributionList
, distributionList
, dlItems
, dlNextMarker
, dlMarker
, dlMaxItems
, dlIsTruncated
, dlQuantity
, DistributionSummary
, distributionSummary
, dsId
, dsARN
, dsStatus
, dsLastModifiedTime
, dsDomainName
, dsAliases
, dsOrigins
, dsDefaultCacheBehavior
, dsCacheBehaviors
, dsCustomErrorResponses
, dsComment
, dsPriceClass
, dsEnabled
, dsViewerCertificate
, dsRestrictions
, dsWebACLId
, dsHTTPVersion
, dsIsIPV6Enabled
, EncryptionEntities
, encryptionEntities
, eeItems
, eeQuantity
, EncryptionEntity
, encryptionEntity
, eePublicKeyId
, eeProviderId
, eeFieldPatterns
, FieldLevelEncryption
, fieldLevelEncryption
, fleId
, fleLastModifiedTime
, fleFieldLevelEncryptionConfig
, FieldLevelEncryptionConfig
, fieldLevelEncryptionConfig
, flecQueryArgProfileConfig
, flecContentTypeProfileConfig
, flecComment
, flecCallerReference
, FieldLevelEncryptionList
, fieldLevelEncryptionList
, flelItems
, flelNextMarker
, flelMaxItems
, flelQuantity
, FieldLevelEncryptionProfile
, fieldLevelEncryptionProfile
, flepId
, flepLastModifiedTime
, flepFieldLevelEncryptionProfileConfig
, FieldLevelEncryptionProfileConfig
, fieldLevelEncryptionProfileConfig
, flepcComment
, flepcName
, flepcCallerReference
, flepcEncryptionEntities
, FieldLevelEncryptionProfileList
, fieldLevelEncryptionProfileList
, fleplItems
, fleplNextMarker
, fleplMaxItems
, fleplQuantity
, FieldLevelEncryptionProfileSummary
, fieldLevelEncryptionProfileSummary
, flepsComment
, flepsId
, flepsLastModifiedTime
, flepsName
, flepsEncryptionEntities
, FieldLevelEncryptionSummary
, fieldLevelEncryptionSummary
, flesQueryArgProfileConfig
, flesContentTypeProfileConfig
, flesComment
, flesId
, flesLastModifiedTime
, FieldPatterns
, fieldPatterns
, fpItems
, fpQuantity
, ForwardedValues
, forwardedValues
, fvQueryStringCacheKeys
, fvHeaders
, fvQueryString
, fvCookies
, GeoRestriction
, geoRestriction
, grItems
, grRestrictionType
, grQuantity
, Headers
, headers
, hItems
, hQuantity
, Invalidation
, invalidation
, iId
, iStatus
, iCreateTime
, iInvalidationBatch
, InvalidationBatch
, invalidationBatch
, ibPaths
, ibCallerReference
, InvalidationList
, invalidationList
, ilItems
, ilNextMarker
, ilMarker
, ilMaxItems
, ilIsTruncated
, ilQuantity
, InvalidationSummary
, invalidationSummary
, isId
, isCreateTime
, isStatus
, KeyPairIds
, keyPairIds
, kpiItems
, kpiQuantity
, LambdaFunctionAssociation
, lambdaFunctionAssociation
, lfaLambdaFunctionARN
, lfaEventType
, LambdaFunctionAssociations
, lambdaFunctionAssociations
, lfaItems
, lfaQuantity
, LoggingConfig
, loggingConfig
, lcEnabled
, lcIncludeCookies
, lcBucket
, lcPrefix
, Origin
, origin
, oCustomHeaders
, oCustomOriginConfig
, oS3OriginConfig
, oOriginPath
, oId
, oDomainName
, OriginCustomHeader
, originCustomHeader
, ochHeaderName
, ochHeaderValue
, OriginSSLProtocols
, originSSLProtocols
, ospQuantity
, ospItems
, Origins
, origins
, oItems
, oQuantity
, Paths
, paths
, pItems
, pQuantity
, PublicKey
, publicKey
, pkId
, pkCreatedTime
, pkPublicKeyConfig
, PublicKeyConfig
, publicKeyConfig
, pkcComment
, pkcCallerReference
, pkcName
, pkcEncodedKey
, PublicKeyList
, publicKeyList
, pklItems
, pklNextMarker
, pklMaxItems
, pklQuantity
, PublicKeySummary
, publicKeySummary
, pksComment
, pksId
, pksName
, pksCreatedTime
, pksEncodedKey
, QueryArgProfile
, queryArgProfile
, qapQueryArg
, qapProfileId
, QueryArgProfileConfig
, queryArgProfileConfig
, qapcQueryArgProfiles
, qapcForwardWhenQueryArgProfileIsUnknown
, QueryArgProfiles
, queryArgProfiles
, qapItems
, qapQuantity
, QueryStringCacheKeys
, queryStringCacheKeys
, qsckItems
, qsckQuantity
, Restrictions
, restrictions
, rGeoRestriction
, S3Origin
, s3Origin
, soDomainName
, soOriginAccessIdentity
, S3OriginConfig
, s3OriginConfig
, socOriginAccessIdentity
, Signer
, signer
, sAWSAccountNumber
, sKeyPairIds
, StreamingDistribution
, streamingDistribution
, sdLastModifiedTime
, sdId
, sdARN
, sdStatus
, sdDomainName
, sdActiveTrustedSigners
, sdStreamingDistributionConfig
, StreamingDistributionConfig
, streamingDistributionConfig
, sdcAliases
, sdcPriceClass
, sdcLogging
, sdcCallerReference
, sdcS3Origin
, sdcComment
, sdcTrustedSigners
, sdcEnabled
, StreamingDistributionConfigWithTags
, streamingDistributionConfigWithTags
, sdcwtStreamingDistributionConfig
, sdcwtTags
, StreamingDistributionList
, streamingDistributionList
, sdlItems
, sdlNextMarker
, sdlMarker
, sdlMaxItems
, sdlIsTruncated
, sdlQuantity
, StreamingDistributionSummary
, streamingDistributionSummary
, sdsId
, sdsARN
, sdsStatus
, sdsLastModifiedTime
, sdsDomainName
, sdsS3Origin
, sdsAliases
, sdsTrustedSigners
, sdsComment
, sdsPriceClass
, sdsEnabled
, StreamingLoggingConfig
, streamingLoggingConfig
, slcEnabled
, slcBucket
, slcPrefix
, Tag
, tag
, tagValue
, tagKey
, TagKeys
, tagKeys
, tkItems
, Tags
, tags
, tItems
, TrustedSigners
, trustedSigners
, tsItems
, tsEnabled
, tsQuantity
, ViewerCertificate
, viewerCertificate
, vcSSLSupportMethod
, vcACMCertificateARN
, vcCertificateSource
, vcMinimumProtocolVersion
, vcCertificate
, vcIAMCertificateId
, vcCloudFrontDefaultCertificate
) where
import Network.AWS.CloudFront.Types.Product
import Network.AWS.CloudFront.Types.Sum
import Network.AWS.Lens
import Network.AWS.Prelude
import Network.AWS.Sign.V4
cloudFront :: Service
cloudFront =
Service
{ _svcAbbrev = "CloudFront"
, _svcSigner = v4
, _svcPrefix = "cloudfront"
, _svcVersion = "2017-10-30"
, _svcEndpoint = defaultEndpoint cloudFront
, _svcTimeout = Just 70
, _svcCheck = statusSuccess
, _svcError = parseXMLError "CloudFront"
, _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 (hasCode "RequestThrottledException" . hasStatus 400) e =
Just "request_throttled_exception"
| 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
_TooManyOriginCustomHeaders :: AsError a => Getting (First ServiceError) a ServiceError
_TooManyOriginCustomHeaders =
_MatchServiceError cloudFront "TooManyOriginCustomHeaders" . hasStatus 400
_InvalidTagging :: AsError a => Getting (First ServiceError) a ServiceError
_InvalidTagging = _MatchServiceError cloudFront "InvalidTagging" . hasStatus 400
_InvalidErrorCode :: AsError a => Getting (First ServiceError) a ServiceError
_InvalidErrorCode =
_MatchServiceError cloudFront "InvalidErrorCode" . hasStatus 400
_NoSuchFieldLevelEncryptionProfile :: AsError a => Getting (First ServiceError) a ServiceError
_NoSuchFieldLevelEncryptionProfile =
_MatchServiceError cloudFront "NoSuchFieldLevelEncryptionProfile" .
hasStatus 404
_FieldLevelEncryptionProfileInUse :: AsError a => Getting (First ServiceError) a ServiceError
_FieldLevelEncryptionProfileInUse =
_MatchServiceError cloudFront "FieldLevelEncryptionProfileInUse" .
hasStatus 409
_InvalidOriginReadTimeout :: AsError a => Getting (First ServiceError) a ServiceError
_InvalidOriginReadTimeout =
_MatchServiceError cloudFront "InvalidOriginReadTimeout" . hasStatus 400
_TooManyFieldLevelEncryptionProfiles :: AsError a => Getting (First ServiceError) a ServiceError
_TooManyFieldLevelEncryptionProfiles =
_MatchServiceError cloudFront "TooManyFieldLevelEncryptionProfiles" .
hasStatus 400
_TooManyCacheBehaviors :: AsError a => Getting (First ServiceError) a ServiceError
_TooManyCacheBehaviors =
_MatchServiceError cloudFront "TooManyCacheBehaviors" . hasStatus 400
_TooManyCloudFrontOriginAccessIdentities :: AsError a => Getting (First ServiceError) a ServiceError
_TooManyCloudFrontOriginAccessIdentities =
_MatchServiceError cloudFront "TooManyCloudFrontOriginAccessIdentities" .
hasStatus 400
_InvalidOriginAccessIdentity :: AsError a => Getting (First ServiceError) a ServiceError
_InvalidOriginAccessIdentity =
_MatchServiceError cloudFront "InvalidOriginAccessIdentity" . hasStatus 400
_DistributionNotDisabled :: AsError a => Getting (First ServiceError) a ServiceError
_DistributionNotDisabled =
_MatchServiceError cloudFront "DistributionNotDisabled" . hasStatus 409
_NoSuchStreamingDistribution :: AsError a => Getting (First ServiceError) a ServiceError
_NoSuchStreamingDistribution =
_MatchServiceError cloudFront "NoSuchStreamingDistribution" . hasStatus 404
_InconsistentQuantities :: AsError a => Getting (First ServiceError) a ServiceError
_InconsistentQuantities =
_MatchServiceError cloudFront "InconsistentQuantities" . hasStatus 400
_InvalidArgument :: AsError a => Getting (First ServiceError) a ServiceError
_InvalidArgument =
_MatchServiceError cloudFront "InvalidArgument" . hasStatus 400
_InvalidOriginKeepaliveTimeout :: AsError a => Getting (First ServiceError) a ServiceError
_InvalidOriginKeepaliveTimeout =
_MatchServiceError cloudFront "InvalidOriginKeepaliveTimeout" . hasStatus 400
_TooManyInvalidationsInProgress :: AsError a => Getting (First ServiceError) a ServiceError
_TooManyInvalidationsInProgress =
_MatchServiceError cloudFront "TooManyInvalidationsInProgress" . hasStatus 400
_InvalidWebACLId :: AsError a => Getting (First ServiceError) a ServiceError
_InvalidWebACLId =
_MatchServiceError cloudFront "InvalidWebACLId" . hasStatus 400
_TooManyQueryStringParameters :: AsError a => Getting (First ServiceError) a ServiceError
_TooManyQueryStringParameters =
_MatchServiceError cloudFront "TooManyQueryStringParameters" . hasStatus 400
_TooManyFieldLevelEncryptionQueryArgProfiles :: AsError a => Getting (First ServiceError) a ServiceError
_TooManyFieldLevelEncryptionQueryArgProfiles =
_MatchServiceError cloudFront "TooManyFieldLevelEncryptionQueryArgProfiles" .
hasStatus 400
_TooManyDistributionCNAMEs :: AsError a => Getting (First ServiceError) a ServiceError
_TooManyDistributionCNAMEs =
_MatchServiceError cloudFront "TooManyDistributionCNAMEs" . hasStatus 400
_NoSuchCloudFrontOriginAccessIdentity :: AsError a => Getting (First ServiceError) a ServiceError
_NoSuchCloudFrontOriginAccessIdentity =
_MatchServiceError cloudFront "NoSuchCloudFrontOriginAccessIdentity" .
hasStatus 404
_CloudFrontOriginAccessIdentityInUse :: AsError a => Getting (First ServiceError) a ServiceError
_CloudFrontOriginAccessIdentityInUse =
_MatchServiceError cloudFront "CloudFrontOriginAccessIdentityInUse" .
hasStatus 409
_TooManyStreamingDistributions :: AsError a => Getting (First ServiceError) a ServiceError
_TooManyStreamingDistributions =
_MatchServiceError cloudFront "TooManyStreamingDistributions" . hasStatus 400
_CannotChangeImmutablePublicKeyFields :: AsError a => Getting (First ServiceError) a ServiceError
_CannotChangeImmutablePublicKeyFields =
_MatchServiceError cloudFront "CannotChangeImmutablePublicKeyFields" .
hasStatus 400
_BatchTooLarge :: AsError a => Getting (First ServiceError) a ServiceError
_BatchTooLarge = _MatchServiceError cloudFront "BatchTooLarge" . hasStatus 413
_TooManyCookieNamesInWhiteList :: AsError a => Getting (First ServiceError) a ServiceError
_TooManyCookieNamesInWhiteList =
_MatchServiceError cloudFront "TooManyCookieNamesInWhiteList" . hasStatus 400
_InvalidLambdaFunctionAssociation :: AsError a => Getting (First ServiceError) a ServiceError
_InvalidLambdaFunctionAssociation =
_MatchServiceError cloudFront "InvalidLambdaFunctionAssociation" .
hasStatus 400
_InvalidForwardCookies :: AsError a => Getting (First ServiceError) a ServiceError
_InvalidForwardCookies =
_MatchServiceError cloudFront "InvalidForwardCookies" . hasStatus 400
_FieldLevelEncryptionConfigInUse :: AsError a => Getting (First ServiceError) a ServiceError
_FieldLevelEncryptionConfigInUse =
_MatchServiceError cloudFront "FieldLevelEncryptionConfigInUse" .
hasStatus 409
_TooManyTrustedSigners :: AsError a => Getting (First ServiceError) a ServiceError
_TooManyTrustedSigners =
_MatchServiceError cloudFront "TooManyTrustedSigners" . hasStatus 400
_InvalidOrigin :: AsError a => Getting (First ServiceError) a ServiceError
_InvalidOrigin = _MatchServiceError cloudFront "InvalidOrigin" . hasStatus 400
_NoSuchInvalidation :: AsError a => Getting (First ServiceError) a ServiceError
_NoSuchInvalidation =
_MatchServiceError cloudFront "NoSuchInvalidation" . hasStatus 404
_PublicKeyAlreadyExists :: AsError a => Getting (First ServiceError) a ServiceError
_PublicKeyAlreadyExists =
_MatchServiceError cloudFront "PublicKeyAlreadyExists" . hasStatus 409
_NoSuchOrigin :: AsError a => Getting (First ServiceError) a ServiceError
_NoSuchOrigin = _MatchServiceError cloudFront "NoSuchOrigin" . hasStatus 404
_InvalidTTLOrder :: AsError a => Getting (First ServiceError) a ServiceError
_InvalidTTLOrder =
_MatchServiceError cloudFront "InvalidTTLOrder" . hasStatus 400
_StreamingDistributionNotDisabled :: AsError a => Getting (First ServiceError) a ServiceError
_StreamingDistributionNotDisabled =
_MatchServiceError cloudFront "StreamingDistributionNotDisabled" .
hasStatus 409
_TooManyHeadersInForwardedValues :: AsError a => Getting (First ServiceError) a ServiceError
_TooManyHeadersInForwardedValues =
_MatchServiceError cloudFront "TooManyHeadersInForwardedValues" .
hasStatus 400
_NoSuchResource :: AsError a => Getting (First ServiceError) a ServiceError
_NoSuchResource = _MatchServiceError cloudFront "NoSuchResource" . hasStatus 404
_TooManyFieldLevelEncryptionEncryptionEntities :: AsError a => Getting (First ServiceError) a ServiceError
_TooManyFieldLevelEncryptionEncryptionEntities =
_MatchServiceError cloudFront "TooManyFieldLevelEncryptionEncryptionEntities" .
hasStatus 400
_TooManyStreamingDistributionCNAMEs :: AsError a => Getting (First ServiceError) a ServiceError
_TooManyStreamingDistributionCNAMEs =
_MatchServiceError cloudFront "TooManyStreamingDistributionCNAMEs" .
hasStatus 400
_FieldLevelEncryptionProfileAlreadyExists :: AsError a => Getting (First ServiceError) a ServiceError
_FieldLevelEncryptionProfileAlreadyExists =
_MatchServiceError cloudFront "FieldLevelEncryptionProfileAlreadyExists" .
hasStatus 409
_ResourceInUse :: AsError a => Getting (First ServiceError) a ServiceError
_ResourceInUse = _MatchServiceError cloudFront "ResourceInUse" . hasStatus 409
_InvalidRequiredProtocol :: AsError a => Getting (First ServiceError) a ServiceError
_InvalidRequiredProtocol =
_MatchServiceError cloudFront "InvalidRequiredProtocol" . hasStatus 400
_TooManyDistributions :: AsError a => Getting (First ServiceError) a ServiceError
_TooManyDistributions =
_MatchServiceError cloudFront "TooManyDistributions" . hasStatus 400
_TooManyCertificates :: AsError a => Getting (First ServiceError) a ServiceError
_TooManyCertificates =
_MatchServiceError cloudFront "TooManyCertificates" . hasStatus 400
_DistributionAlreadyExists :: AsError a => Getting (First ServiceError) a ServiceError
_DistributionAlreadyExists =
_MatchServiceError cloudFront "DistributionAlreadyExists" . hasStatus 409
_TooManyDistributionsAssociatedToFieldLevelEncryptionConfig :: AsError a => Getting (First ServiceError) a ServiceError
_TooManyDistributionsAssociatedToFieldLevelEncryptionConfig =
_MatchServiceError
cloudFront
"TooManyDistributionsAssociatedToFieldLevelEncryptionConfig" .
hasStatus 400
_InvalidQueryStringParameters :: AsError a => Getting (First ServiceError) a ServiceError
_InvalidQueryStringParameters =
_MatchServiceError cloudFront "InvalidQueryStringParameters" . hasStatus 400
_MissingBody :: AsError a => Getting (First ServiceError) a ServiceError
_MissingBody = _MatchServiceError cloudFront "MissingBody" . hasStatus 400
_IllegalFieldLevelEncryptionConfigAssociationWithCacheBehavior :: AsError a => Getting (First ServiceError) a ServiceError
_IllegalFieldLevelEncryptionConfigAssociationWithCacheBehavior =
_MatchServiceError
cloudFront
"IllegalFieldLevelEncryptionConfigAssociationWithCacheBehavior" .
hasStatus 400
_IllegalUpdate :: AsError a => Getting (First ServiceError) a ServiceError
_IllegalUpdate = _MatchServiceError cloudFront "IllegalUpdate" . hasStatus 400
_InvalidIfMatchVersion :: AsError a => Getting (First ServiceError) a ServiceError
_InvalidIfMatchVersion =
_MatchServiceError cloudFront "InvalidIfMatchVersion" . hasStatus 400
_FieldLevelEncryptionConfigAlreadyExists :: AsError a => Getting (First ServiceError) a ServiceError
_FieldLevelEncryptionConfigAlreadyExists =
_MatchServiceError cloudFront "FieldLevelEncryptionConfigAlreadyExists" .
hasStatus 409
_PreconditionFailed :: AsError a => Getting (First ServiceError) a ServiceError
_PreconditionFailed =
_MatchServiceError cloudFront "PreconditionFailed" . hasStatus 412
_InvalidResponseCode :: AsError a => Getting (First ServiceError) a ServiceError
_InvalidResponseCode =
_MatchServiceError cloudFront "InvalidResponseCode" . hasStatus 400
_InvalidHeadersForS3Origin :: AsError a => Getting (First ServiceError) a ServiceError
_InvalidHeadersForS3Origin =
_MatchServiceError cloudFront "InvalidHeadersForS3Origin" . hasStatus 400
_CNAMEAlreadyExists :: AsError a => Getting (First ServiceError) a ServiceError
_CNAMEAlreadyExists =
_MatchServiceError cloudFront "CNAMEAlreadyExists" . hasStatus 409
_NoSuchPublicKey :: AsError a => Getting (First ServiceError) a ServiceError
_NoSuchPublicKey =
_MatchServiceError cloudFront "NoSuchPublicKey" . hasStatus 404
_PublicKeyInUse :: AsError a => Getting (First ServiceError) a ServiceError
_PublicKeyInUse = _MatchServiceError cloudFront "PublicKeyInUse" . hasStatus 409
_TrustedSignerDoesNotExist :: AsError a => Getting (First ServiceError) a ServiceError
_TrustedSignerDoesNotExist =
_MatchServiceError cloudFront "TrustedSignerDoesNotExist" . hasStatus 400
_InvalidProtocolSettings :: AsError a => Getting (First ServiceError) a ServiceError
_InvalidProtocolSettings =
_MatchServiceError cloudFront "InvalidProtocolSettings" . hasStatus 400
_TooManyPublicKeys :: AsError a => Getting (First ServiceError) a ServiceError
_TooManyPublicKeys =
_MatchServiceError cloudFront "TooManyPublicKeys" . hasStatus 400
_NoSuchFieldLevelEncryptionConfig :: AsError a => Getting (First ServiceError) a ServiceError
_NoSuchFieldLevelEncryptionConfig =
_MatchServiceError cloudFront "NoSuchFieldLevelEncryptionConfig" .
hasStatus 404
_TooManyFieldLevelEncryptionContentTypeProfiles :: AsError a => Getting (First ServiceError) a ServiceError
_TooManyFieldLevelEncryptionContentTypeProfiles =
_MatchServiceError cloudFront "TooManyFieldLevelEncryptionContentTypeProfiles" .
hasStatus 400
_TooManyFieldLevelEncryptionFieldPatterns :: AsError a => Getting (First ServiceError) a ServiceError
_TooManyFieldLevelEncryptionFieldPatterns =
_MatchServiceError cloudFront "TooManyFieldLevelEncryptionFieldPatterns" .
hasStatus 400
_TooManyFieldLevelEncryptionConfigs :: AsError a => Getting (First ServiceError) a ServiceError
_TooManyFieldLevelEncryptionConfigs =
_MatchServiceError cloudFront "TooManyFieldLevelEncryptionConfigs" .
hasStatus 400
_TooManyLambdaFunctionAssociations :: AsError a => Getting (First ServiceError) a ServiceError
_TooManyLambdaFunctionAssociations =
_MatchServiceError cloudFront "TooManyLambdaFunctionAssociations" .
hasStatus 400
_CloudFrontOriginAccessIdentityAlreadyExists :: AsError a => Getting (First ServiceError) a ServiceError
_CloudFrontOriginAccessIdentityAlreadyExists =
_MatchServiceError cloudFront "CloudFrontOriginAccessIdentityAlreadyExists" .
hasStatus 409
_TooManyOrigins :: AsError a => Getting (First ServiceError) a ServiceError
_TooManyOrigins = _MatchServiceError cloudFront "TooManyOrigins" . hasStatus 400
_InvalidRelativePath :: AsError a => Getting (First ServiceError) a ServiceError
_InvalidRelativePath =
_MatchServiceError cloudFront "InvalidRelativePath" . hasStatus 400
_StreamingDistributionAlreadyExists :: AsError a => Getting (First ServiceError) a ServiceError
_StreamingDistributionAlreadyExists =
_MatchServiceError cloudFront "StreamingDistributionAlreadyExists" .
hasStatus 409
_QueryArgProfileEmpty :: AsError a => Getting (First ServiceError) a ServiceError
_QueryArgProfileEmpty =
_MatchServiceError cloudFront "QueryArgProfileEmpty" . hasStatus 400
_InvalidMinimumProtocolVersion :: AsError a => Getting (First ServiceError) a ServiceError
_InvalidMinimumProtocolVersion =
_MatchServiceError cloudFront "InvalidMinimumProtocolVersion" . hasStatus 400
_AccessDenied :: AsError a => Getting (First ServiceError) a ServiceError
_AccessDenied = _MatchServiceError cloudFront "AccessDenied" . hasStatus 403
_InvalidViewerCertificate :: AsError a => Getting (First ServiceError) a ServiceError
_InvalidViewerCertificate =
_MatchServiceError cloudFront "InvalidViewerCertificate" . hasStatus 400
_NoSuchDistribution :: AsError a => Getting (First ServiceError) a ServiceError
_NoSuchDistribution =
_MatchServiceError cloudFront "NoSuchDistribution" . hasStatus 404
_FieldLevelEncryptionProfileSizeExceeded :: AsError a => Getting (First ServiceError) a ServiceError
_FieldLevelEncryptionProfileSizeExceeded =
_MatchServiceError cloudFront "FieldLevelEncryptionProfileSizeExceeded" .
hasStatus 400
_InvalidDefaultRootObject :: AsError a => Getting (First ServiceError) a ServiceError
_InvalidDefaultRootObject =
_MatchServiceError cloudFront "InvalidDefaultRootObject" . hasStatus 400
_TooManyDistributionsWithLambdaAssociations :: AsError a => Getting (First ServiceError) a ServiceError
_TooManyDistributionsWithLambdaAssociations =
_MatchServiceError cloudFront "TooManyDistributionsWithLambdaAssociations" .
hasStatus 400
_InvalidGeoRestrictionParameter :: AsError a => Getting (First ServiceError) a ServiceError
_InvalidGeoRestrictionParameter =
_MatchServiceError cloudFront "InvalidGeoRestrictionParameter" . hasStatus 400
_InvalidLocationCode :: AsError a => Getting (First ServiceError) a ServiceError
_InvalidLocationCode =
_MatchServiceError cloudFront "InvalidLocationCode" . hasStatus 400