module Network.AWS.Redshift.Types
(
redshift
, _ClusterSecurityGroupQuotaExceededFault
, _InvalidS3KeyPrefixFault
, _SourceNotFoundFault
, _AuthorizationQuotaExceededFault
, _CopyToRegionDisabledFault
, _LimitExceededFault
, _InvalidClusterSecurityGroupStateFault
, _ClusterSecurityGroupAlreadyExistsFault
, _ClusterSnapshotNotFoundFault
, _InvalidElasticIPFault
, _TableRestoreNotFoundFault
, _HSMConfigurationNotFoundFault
, _AuthorizationAlreadyExistsFault
, _SubscriptionCategoryNotFoundFault
, _HSMConfigurationAlreadyExistsFault
, _SubscriptionNotFoundFault
, _InvalidS3BucketNameFault
, _ClusterSnapshotAlreadyExistsFault
, _InvalidSubnet
, _InvalidHSMConfigurationStateFault
, _SnapshotCopyAlreadyDisabledFault
, _ClusterQuotaExceededFault
, _HSMClientCertificateQuotaExceededFault
, _ClusterParameterGroupNotFoundFault
, _SnapshotCopyGrantQuotaExceededFault
, _NumberOfNodesPerClusterLimitExceededFault
, _SnapshotCopyAlreadyEnabledFault
, _ClusterParameterGroupAlreadyExistsFault
, _SnapshotCopyDisabledFault
, _ResizeNotFoundFault
, _HSMClientCertificateNotFoundFault
, _SNSTopicARNNotFoundFault
, _ClusterNotFoundFault
, _ClusterParameterGroupQuotaExceededFault
, _SnapshotCopyGrantAlreadyExistsFault
, _SNSNoAuthorizationFault
, _InvalidClusterStateFault
, _InvalidTableRestoreArgumentFault
, _SnapshotCopyGrantNotFoundFault
, _HSMConfigurationQuotaExceededFault
, _ClusterSnapshotQuotaExceededFault
, _InsufficientClusterCapacityFault
, _SNSInvalidTopicFault
, _DependentServiceUnavailableFault
, _UnsupportedOptionFault
, _SubscriptionAlreadyExistFault
, _InvalidVPCNetworkStateFault
, _ClusterSubnetGroupNotFoundFault
, _BucketNotFoundFault
, _InvalidSubscriptionStateFault
, _DependentServiceRequestThrottlingFault
, _AuthorizationNotFoundFault
, _InvalidClusterSubnetGroupStateFault
, _UnsupportedOperationFault
, _ClusterSubnetGroupAlreadyExistsFault
, _InvalidClusterSnapshotStateFault
, _ClusterSecurityGroupNotFoundFault
, _ReservedNodeNotFoundFault
, _ReservedNodeOfferingNotFoundFault
, _InvalidClusterSubnetStateFault
, _IncompatibleOrderableOptions
, _EventSubscriptionQuotaExceededFault
, _InvalidClusterParameterGroupStateFault
, _ReservedNodeAlreadyExistsFault
, _InProgressTableRestoreQuotaExceededFault
, _InvalidRestoreFault
, _ResourceNotFoundFault
, _SubscriptionEventIdNotFoundFault
, _InvalidSnapshotCopyGrantStateFault
, _UnknownSnapshotCopyRegionFault
, _ReservedNodeQuotaExceededFault
, _ClusterSubnetQuotaExceededFault
, _ClusterAlreadyExistsFault
, _AccessToSnapshotDeniedFault
, _TagLimitExceededFault
, _NumberOfNodesQuotaExceededFault
, _HSMClientCertificateAlreadyExistsFault
, _InvalidHSMClientCertificateStateFault
, _SubnetAlreadyInUse
, _SubscriptionSeverityNotFoundFault
, _UnauthorizedOperation
, _InvalidTagFault
, _InsufficientS3BucketPolicyFault
, _ClusterSubnetGroupQuotaExceededFault
, module Network.AWS.Redshift.Internal
, ParameterApplyType (..)
, SourceType (..)
, TableRestoreStatusType (..)
, AccountWithRestoreAccess
, accountWithRestoreAccess
, awraAccountAlias
, awraAccountId
, AvailabilityZone
, availabilityZone
, azName
, Cluster
, cluster
, cRestoreStatus
, cEnhancedVPCRouting
, cClusterSnapshotCopyStatus
, cClusterRevisionNumber
, cPubliclyAccessible
, cMasterUsername
, cVPCId
, cClusterSecurityGroups
, cAutomatedSnapshotRetentionPeriod
, cEncrypted
, cClusterSubnetGroupName
, cClusterIdentifier
, cNumberOfNodes
, cClusterPublicKey
, cPreferredMaintenanceWindow
, cModifyStatus
, cKMSKeyId
, cClusterParameterGroups
, cAvailabilityZone
, cVPCSecurityGroups
, cHSMStatus
, cIAMRoles
, cElasticIPStatus
, cClusterVersion
, cNodeType
, cClusterCreateTime
, cEndpoint
, cAllowVersionUpgrade
, cClusterStatus
, cPendingModifiedValues
, cTags
, cClusterNodes
, cDBName
, ClusterIAMRole
, clusterIAMRole
, cirIAMRoleARN
, cirApplyStatus
, ClusterNode
, clusterNode
, cnNodeRole
, cnPrivateIPAddress
, cnPublicIPAddress
, ClusterParameterGroup
, clusterParameterGroup
, cpgParameterGroupFamily
, cpgDescription
, cpgTags
, cpgParameterGroupName
, ClusterParameterGroupNameMessage
, clusterParameterGroupNameMessage
, cpgnmParameterGroupStatus
, cpgnmParameterGroupName
, ClusterParameterGroupStatus
, clusterParameterGroupStatus
, cpgsClusterParameterStatusList
, cpgsParameterApplyStatus
, cpgsParameterGroupName
, ClusterParameterStatus
, clusterParameterStatus
, cpsParameterApplyErrorDescription
, cpsParameterName
, cpsParameterApplyStatus
, ClusterSecurityGroup
, clusterSecurityGroup
, cluClusterSecurityGroupName
, cluIPRanges
, cluEC2SecurityGroups
, cluDescription
, cluTags
, ClusterSecurityGroupMembership
, clusterSecurityGroupMembership
, csgmStatus
, csgmClusterSecurityGroupName
, ClusterSnapshotCopyStatus
, clusterSnapshotCopyStatus
, cscsRetentionPeriod
, cscsDestinationRegion
, cscsSnapshotCopyGrantName
, ClusterSubnetGroup
, clusterSubnetGroup
, csgVPCId
, csgSubnets
, csgClusterSubnetGroupName
, csgSubnetGroupStatus
, csgDescription
, csgTags
, ClusterVersion
, clusterVersion
, cvClusterParameterGroupFamily
, cvClusterVersion
, cvDescription
, DefaultClusterParameters
, defaultClusterParameters
, dcpMarker
, dcpParameters
, dcpParameterGroupFamily
, EC2SecurityGroup
, ec2SecurityGroup
, esgStatus
, esgEC2SecurityGroupOwnerId
, esgEC2SecurityGroupName
, esgTags
, ElasticIPStatus
, elasticIPStatus
, eisStatus
, eisElasticIP
, Endpoint
, endpoint
, eAddress
, ePort
, Event
, event
, eSourceType
, eSeverity
, eSourceIdentifier
, eDate
, eEventCategories
, eMessage
, eEventId
, EventCategoriesMap
, eventCategoriesMap
, ecmSourceType
, ecmEvents
, EventInfoMap
, eventInfoMap
, eimEventDescription
, eimSeverity
, eimEventCategories
, eimEventId
, EventSubscription
, eventSubscription
, esStatus
, esCustomerAWSId
, esCustSubscriptionId
, esSNSTopicARN
, esEnabled
, esSourceType
, esSeverity
, esSubscriptionCreationTime
, esEventCategoriesList
, esTags
, esSourceIdsList
, HSMClientCertificate
, hsmClientCertificate
, hccHSMClientCertificateIdentifier
, hccHSMClientCertificatePublicKey
, hccTags
, HSMConfiguration
, hsmConfiguration
, hcHSMConfigurationIdentifier
, hcHSMPartitionName
, hcDescription
, hcTags
, hcHSMIPAddress
, HSMStatus
, hsmStatus
, hsStatus
, hsHSMConfigurationIdentifier
, hsHSMClientCertificateIdentifier
, IPRange
, ipRange
, irStatus
, irCIdRIP
, irTags
, LoggingStatus
, loggingStatus
, lsLastFailureTime
, lsLastSuccessfulDeliveryTime
, lsS3KeyPrefix
, lsBucketName
, lsLoggingEnabled
, lsLastFailureMessage
, OrderableClusterOption
, orderableClusterOption
, ocoAvailabilityZones
, ocoClusterType
, ocoClusterVersion
, ocoNodeType
, Parameter
, parameter
, pApplyType
, pParameterValue
, pMinimumEngineVersion
, pSource
, pIsModifiable
, pDataType
, pAllowedValues
, pParameterName
, pDescription
, PendingModifiedValues
, pendingModifiedValues
, pmvEnhancedVPCRouting
, pmvMasterUserPassword
, pmvPubliclyAccessible
, pmvAutomatedSnapshotRetentionPeriod
, pmvClusterIdentifier
, pmvNumberOfNodes
, pmvClusterType
, pmvClusterVersion
, pmvNodeType
, RecurringCharge
, recurringCharge
, rcRecurringChargeFrequency
, rcRecurringChargeAmount
, ReservedNode
, reservedNode
, rnState
, rnCurrencyCode
, rnStartTime
, rnNodeCount
, rnReservedNodeId
, rnReservedNodeOfferingId
, rnRecurringCharges
, rnOfferingType
, rnUsagePrice
, rnNodeType
, rnFixedPrice
, rnDuration
, ReservedNodeOffering
, reservedNodeOffering
, rnoCurrencyCode
, rnoReservedNodeOfferingId
, rnoRecurringCharges
, rnoOfferingType
, rnoUsagePrice
, rnoNodeType
, rnoFixedPrice
, rnoDuration
, RestoreStatus
, restoreStatus
, rsStatus
, rsEstimatedTimeToCompletionInSeconds
, rsCurrentRestoreRateInMegaBytesPerSecond
, rsProgressInMegaBytes
, rsElapsedTimeInSeconds
, rsSnapshotSizeInMegaBytes
, Snapshot
, snapshot
, sStatus
, sRestorableNodeTypes
, sAccountsWithRestoreAccess
, sEnhancedVPCRouting
, sSnapshotIdentifier
, sEncryptedWithHSM
, sMasterUsername
, sSourceRegion
, sVPCId
, sBackupProgressInMegaBytes
, sEncrypted
, sClusterIdentifier
, sNumberOfNodes
, sSnapshotType
, sKMSKeyId
, sAvailabilityZone
, sCurrentBackupRateInMegaBytesPerSecond
, sSnapshotCreateTime
, sClusterVersion
, sOwnerAccount
, sNodeType
, sElapsedTimeInSeconds
, sClusterCreateTime
, sEstimatedSecondsToCompletion
, sActualIncrementalBackupSizeInMegaBytes
, sTags
, sPort
, sTotalBackupSizeInMegaBytes
, sDBName
, SnapshotCopyGrant
, snapshotCopyGrant
, scgKMSKeyId
, scgSnapshotCopyGrantName
, scgTags
, Subnet
, subnet
, sSubnetStatus
, sSubnetIdentifier
, sSubnetAvailabilityZone
, TableRestoreStatus
, tableRestoreStatus
, trsStatus
, trsTargetSchemaName
, trsSnapshotIdentifier
, trsSourceDatabaseName
, trsTableRestoreRequestId
, trsNewTableName
, trsTargetDatabaseName
, trsSourceSchemaName
, trsClusterIdentifier
, trsRequestTime
, trsSourceTableName
, trsTotalDataInMegaBytes
, trsProgressInMegaBytes
, trsMessage
, Tag
, tag
, tagValue
, tagKey
, TaggedResource
, taggedResource
, trTag
, trResourceType
, trResourceName
, VPCSecurityGroupMembership
, vpcSecurityGroupMembership
, vsgmStatus
, vsgmVPCSecurityGroupId
) where
import Network.AWS.Lens
import Network.AWS.Prelude
import Network.AWS.Redshift.Internal
import Network.AWS.Redshift.Types.Product
import Network.AWS.Redshift.Types.Sum
import Network.AWS.Sign.V4
redshift :: Service
redshift =
Service
{ _svcAbbrev = "Redshift"
, _svcSigner = v4
, _svcPrefix = "redshift"
, _svcVersion = "2012-12-01"
, _svcEndpoint = defaultEndpoint redshift
, _svcTimeout = Just 70
, _svcCheck = statusSuccess
, _svcError = parseXMLError "Redshift"
, _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
_ClusterSecurityGroupQuotaExceededFault :: AsError a => Getting (First ServiceError) a ServiceError
_ClusterSecurityGroupQuotaExceededFault =
_MatchServiceError redshift "QuotaExceeded.ClusterSecurityGroup" .
hasStatus 400
_InvalidS3KeyPrefixFault :: AsError a => Getting (First ServiceError) a ServiceError
_InvalidS3KeyPrefixFault =
_MatchServiceError redshift "InvalidS3KeyPrefixFault" . hasStatus 400
_SourceNotFoundFault :: AsError a => Getting (First ServiceError) a ServiceError
_SourceNotFoundFault =
_MatchServiceError redshift "SourceNotFound" . hasStatus 404
_AuthorizationQuotaExceededFault :: AsError a => Getting (First ServiceError) a ServiceError
_AuthorizationQuotaExceededFault =
_MatchServiceError redshift "AuthorizationQuotaExceeded" . hasStatus 400
_CopyToRegionDisabledFault :: AsError a => Getting (First ServiceError) a ServiceError
_CopyToRegionDisabledFault =
_MatchServiceError redshift "CopyToRegionDisabledFault" . hasStatus 400
_LimitExceededFault :: AsError a => Getting (First ServiceError) a ServiceError
_LimitExceededFault =
_MatchServiceError redshift "LimitExceededFault" . hasStatus 400
_InvalidClusterSecurityGroupStateFault :: AsError a => Getting (First ServiceError) a ServiceError
_InvalidClusterSecurityGroupStateFault =
_MatchServiceError redshift "InvalidClusterSecurityGroupState" . hasStatus 400
_ClusterSecurityGroupAlreadyExistsFault :: AsError a => Getting (First ServiceError) a ServiceError
_ClusterSecurityGroupAlreadyExistsFault =
_MatchServiceError redshift "ClusterSecurityGroupAlreadyExists" .
hasStatus 400
_ClusterSnapshotNotFoundFault :: AsError a => Getting (First ServiceError) a ServiceError
_ClusterSnapshotNotFoundFault =
_MatchServiceError redshift "ClusterSnapshotNotFound" . hasStatus 404
_InvalidElasticIPFault :: AsError a => Getting (First ServiceError) a ServiceError
_InvalidElasticIPFault =
_MatchServiceError redshift "InvalidElasticIpFault" . hasStatus 400
_TableRestoreNotFoundFault :: AsError a => Getting (First ServiceError) a ServiceError
_TableRestoreNotFoundFault =
_MatchServiceError redshift "TableRestoreNotFoundFault" . hasStatus 400
_HSMConfigurationNotFoundFault :: AsError a => Getting (First ServiceError) a ServiceError
_HSMConfigurationNotFoundFault =
_MatchServiceError redshift "HsmConfigurationNotFoundFault" . hasStatus 400
_AuthorizationAlreadyExistsFault :: AsError a => Getting (First ServiceError) a ServiceError
_AuthorizationAlreadyExistsFault =
_MatchServiceError redshift "AuthorizationAlreadyExists" . hasStatus 400
_SubscriptionCategoryNotFoundFault :: AsError a => Getting (First ServiceError) a ServiceError
_SubscriptionCategoryNotFoundFault =
_MatchServiceError redshift "SubscriptionCategoryNotFound" . hasStatus 404
_HSMConfigurationAlreadyExistsFault :: AsError a => Getting (First ServiceError) a ServiceError
_HSMConfigurationAlreadyExistsFault =
_MatchServiceError redshift "HsmConfigurationAlreadyExistsFault" .
hasStatus 400
_SubscriptionNotFoundFault :: AsError a => Getting (First ServiceError) a ServiceError
_SubscriptionNotFoundFault =
_MatchServiceError redshift "SubscriptionNotFound" . hasStatus 404
_InvalidS3BucketNameFault :: AsError a => Getting (First ServiceError) a ServiceError
_InvalidS3BucketNameFault =
_MatchServiceError redshift "InvalidS3BucketNameFault" . hasStatus 400
_ClusterSnapshotAlreadyExistsFault :: AsError a => Getting (First ServiceError) a ServiceError
_ClusterSnapshotAlreadyExistsFault =
_MatchServiceError redshift "ClusterSnapshotAlreadyExists" . hasStatus 400
_InvalidSubnet :: AsError a => Getting (First ServiceError) a ServiceError
_InvalidSubnet = _MatchServiceError redshift "InvalidSubnet" . hasStatus 400
_InvalidHSMConfigurationStateFault :: AsError a => Getting (First ServiceError) a ServiceError
_InvalidHSMConfigurationStateFault =
_MatchServiceError redshift "InvalidHsmConfigurationStateFault" .
hasStatus 400
_SnapshotCopyAlreadyDisabledFault :: AsError a => Getting (First ServiceError) a ServiceError
_SnapshotCopyAlreadyDisabledFault =
_MatchServiceError redshift "SnapshotCopyAlreadyDisabledFault" . hasStatus 400
_ClusterQuotaExceededFault :: AsError a => Getting (First ServiceError) a ServiceError
_ClusterQuotaExceededFault =
_MatchServiceError redshift "ClusterQuotaExceeded" . hasStatus 400
_HSMClientCertificateQuotaExceededFault :: AsError a => Getting (First ServiceError) a ServiceError
_HSMClientCertificateQuotaExceededFault =
_MatchServiceError redshift "HsmClientCertificateQuotaExceededFault" .
hasStatus 400
_ClusterParameterGroupNotFoundFault :: AsError a => Getting (First ServiceError) a ServiceError
_ClusterParameterGroupNotFoundFault =
_MatchServiceError redshift "ClusterParameterGroupNotFound" . hasStatus 404
_SnapshotCopyGrantQuotaExceededFault :: AsError a => Getting (First ServiceError) a ServiceError
_SnapshotCopyGrantQuotaExceededFault =
_MatchServiceError redshift "SnapshotCopyGrantQuotaExceededFault" .
hasStatus 400
_NumberOfNodesPerClusterLimitExceededFault :: AsError a => Getting (First ServiceError) a ServiceError
_NumberOfNodesPerClusterLimitExceededFault =
_MatchServiceError redshift "NumberOfNodesPerClusterLimitExceeded" .
hasStatus 400
_SnapshotCopyAlreadyEnabledFault :: AsError a => Getting (First ServiceError) a ServiceError
_SnapshotCopyAlreadyEnabledFault =
_MatchServiceError redshift "SnapshotCopyAlreadyEnabledFault" . hasStatus 400
_ClusterParameterGroupAlreadyExistsFault :: AsError a => Getting (First ServiceError) a ServiceError
_ClusterParameterGroupAlreadyExistsFault =
_MatchServiceError redshift "ClusterParameterGroupAlreadyExists" .
hasStatus 400
_SnapshotCopyDisabledFault :: AsError a => Getting (First ServiceError) a ServiceError
_SnapshotCopyDisabledFault =
_MatchServiceError redshift "SnapshotCopyDisabledFault" . hasStatus 400
_ResizeNotFoundFault :: AsError a => Getting (First ServiceError) a ServiceError
_ResizeNotFoundFault =
_MatchServiceError redshift "ResizeNotFound" . hasStatus 404
_HSMClientCertificateNotFoundFault :: AsError a => Getting (First ServiceError) a ServiceError
_HSMClientCertificateNotFoundFault =
_MatchServiceError redshift "HsmClientCertificateNotFoundFault" .
hasStatus 400
_SNSTopicARNNotFoundFault :: AsError a => Getting (First ServiceError) a ServiceError
_SNSTopicARNNotFoundFault =
_MatchServiceError redshift "SNSTopicArnNotFound" . hasStatus 404
_ClusterNotFoundFault :: AsError a => Getting (First ServiceError) a ServiceError
_ClusterNotFoundFault =
_MatchServiceError redshift "ClusterNotFound" . hasStatus 404
_ClusterParameterGroupQuotaExceededFault :: AsError a => Getting (First ServiceError) a ServiceError
_ClusterParameterGroupQuotaExceededFault =
_MatchServiceError redshift "ClusterParameterGroupQuotaExceeded" .
hasStatus 400
_SnapshotCopyGrantAlreadyExistsFault :: AsError a => Getting (First ServiceError) a ServiceError
_SnapshotCopyGrantAlreadyExistsFault =
_MatchServiceError redshift "SnapshotCopyGrantAlreadyExistsFault" .
hasStatus 400
_SNSNoAuthorizationFault :: AsError a => Getting (First ServiceError) a ServiceError
_SNSNoAuthorizationFault =
_MatchServiceError redshift "SNSNoAuthorization" . hasStatus 400
_InvalidClusterStateFault :: AsError a => Getting (First ServiceError) a ServiceError
_InvalidClusterStateFault =
_MatchServiceError redshift "InvalidClusterState" . hasStatus 400
_InvalidTableRestoreArgumentFault :: AsError a => Getting (First ServiceError) a ServiceError
_InvalidTableRestoreArgumentFault =
_MatchServiceError redshift "InvalidTableRestoreArgument" . hasStatus 400
_SnapshotCopyGrantNotFoundFault :: AsError a => Getting (First ServiceError) a ServiceError
_SnapshotCopyGrantNotFoundFault =
_MatchServiceError redshift "SnapshotCopyGrantNotFoundFault" . hasStatus 400
_HSMConfigurationQuotaExceededFault :: AsError a => Getting (First ServiceError) a ServiceError
_HSMConfigurationQuotaExceededFault =
_MatchServiceError redshift "HsmConfigurationQuotaExceededFault" .
hasStatus 400
_ClusterSnapshotQuotaExceededFault :: AsError a => Getting (First ServiceError) a ServiceError
_ClusterSnapshotQuotaExceededFault =
_MatchServiceError redshift "ClusterSnapshotQuotaExceeded" . hasStatus 400
_InsufficientClusterCapacityFault :: AsError a => Getting (First ServiceError) a ServiceError
_InsufficientClusterCapacityFault =
_MatchServiceError redshift "InsufficientClusterCapacity" . hasStatus 400
_SNSInvalidTopicFault :: AsError a => Getting (First ServiceError) a ServiceError
_SNSInvalidTopicFault =
_MatchServiceError redshift "SNSInvalidTopic" . hasStatus 400
_DependentServiceUnavailableFault :: AsError a => Getting (First ServiceError) a ServiceError
_DependentServiceUnavailableFault =
_MatchServiceError redshift "DependentServiceUnavailableFault" . hasStatus 400
_UnsupportedOptionFault :: AsError a => Getting (First ServiceError) a ServiceError
_UnsupportedOptionFault =
_MatchServiceError redshift "UnsupportedOptionFault" . hasStatus 400
_SubscriptionAlreadyExistFault :: AsError a => Getting (First ServiceError) a ServiceError
_SubscriptionAlreadyExistFault =
_MatchServiceError redshift "SubscriptionAlreadyExist" . hasStatus 400
_InvalidVPCNetworkStateFault :: AsError a => Getting (First ServiceError) a ServiceError
_InvalidVPCNetworkStateFault =
_MatchServiceError redshift "InvalidVPCNetworkStateFault" . hasStatus 400
_ClusterSubnetGroupNotFoundFault :: AsError a => Getting (First ServiceError) a ServiceError
_ClusterSubnetGroupNotFoundFault =
_MatchServiceError redshift "ClusterSubnetGroupNotFoundFault" . hasStatus 400
_BucketNotFoundFault :: AsError a => Getting (First ServiceError) a ServiceError
_BucketNotFoundFault =
_MatchServiceError redshift "BucketNotFoundFault" . hasStatus 400
_InvalidSubscriptionStateFault :: AsError a => Getting (First ServiceError) a ServiceError
_InvalidSubscriptionStateFault =
_MatchServiceError redshift "InvalidSubscriptionStateFault" . hasStatus 400
_DependentServiceRequestThrottlingFault :: AsError a => Getting (First ServiceError) a ServiceError
_DependentServiceRequestThrottlingFault =
_MatchServiceError redshift "DependentServiceRequestThrottlingFault" .
hasStatus 400
_AuthorizationNotFoundFault :: AsError a => Getting (First ServiceError) a ServiceError
_AuthorizationNotFoundFault =
_MatchServiceError redshift "AuthorizationNotFound" . hasStatus 404
_InvalidClusterSubnetGroupStateFault :: AsError a => Getting (First ServiceError) a ServiceError
_InvalidClusterSubnetGroupStateFault =
_MatchServiceError redshift "InvalidClusterSubnetGroupStateFault" .
hasStatus 400
_UnsupportedOperationFault :: AsError a => Getting (First ServiceError) a ServiceError
_UnsupportedOperationFault =
_MatchServiceError redshift "UnsupportedOperation" . hasStatus 400
_ClusterSubnetGroupAlreadyExistsFault :: AsError a => Getting (First ServiceError) a ServiceError
_ClusterSubnetGroupAlreadyExistsFault =
_MatchServiceError redshift "ClusterSubnetGroupAlreadyExists" . hasStatus 400
_InvalidClusterSnapshotStateFault :: AsError a => Getting (First ServiceError) a ServiceError
_InvalidClusterSnapshotStateFault =
_MatchServiceError redshift "InvalidClusterSnapshotState" . hasStatus 400
_ClusterSecurityGroupNotFoundFault :: AsError a => Getting (First ServiceError) a ServiceError
_ClusterSecurityGroupNotFoundFault =
_MatchServiceError redshift "ClusterSecurityGroupNotFound" . hasStatus 404
_ReservedNodeNotFoundFault :: AsError a => Getting (First ServiceError) a ServiceError
_ReservedNodeNotFoundFault =
_MatchServiceError redshift "ReservedNodeNotFound" . hasStatus 404
_ReservedNodeOfferingNotFoundFault :: AsError a => Getting (First ServiceError) a ServiceError
_ReservedNodeOfferingNotFoundFault =
_MatchServiceError redshift "ReservedNodeOfferingNotFound" . hasStatus 404
_InvalidClusterSubnetStateFault :: AsError a => Getting (First ServiceError) a ServiceError
_InvalidClusterSubnetStateFault =
_MatchServiceError redshift "InvalidClusterSubnetStateFault" . hasStatus 400
_IncompatibleOrderableOptions :: AsError a => Getting (First ServiceError) a ServiceError
_IncompatibleOrderableOptions =
_MatchServiceError redshift "IncompatibleOrderableOptions" . hasStatus 400
_EventSubscriptionQuotaExceededFault :: AsError a => Getting (First ServiceError) a ServiceError
_EventSubscriptionQuotaExceededFault =
_MatchServiceError redshift "EventSubscriptionQuotaExceeded" . hasStatus 400
_InvalidClusterParameterGroupStateFault :: AsError a => Getting (First ServiceError) a ServiceError
_InvalidClusterParameterGroupStateFault =
_MatchServiceError redshift "InvalidClusterParameterGroupState" .
hasStatus 400
_ReservedNodeAlreadyExistsFault :: AsError a => Getting (First ServiceError) a ServiceError
_ReservedNodeAlreadyExistsFault =
_MatchServiceError redshift "ReservedNodeAlreadyExists" . hasStatus 404
_InProgressTableRestoreQuotaExceededFault :: AsError a => Getting (First ServiceError) a ServiceError
_InProgressTableRestoreQuotaExceededFault =
_MatchServiceError redshift "InProgressTableRestoreQuotaExceededFault" .
hasStatus 400
_InvalidRestoreFault :: AsError a => Getting (First ServiceError) a ServiceError
_InvalidRestoreFault =
_MatchServiceError redshift "InvalidRestore" . hasStatus 406
_ResourceNotFoundFault :: AsError a => Getting (First ServiceError) a ServiceError
_ResourceNotFoundFault =
_MatchServiceError redshift "ResourceNotFoundFault" . hasStatus 404
_SubscriptionEventIdNotFoundFault :: AsError a => Getting (First ServiceError) a ServiceError
_SubscriptionEventIdNotFoundFault =
_MatchServiceError redshift "SubscriptionEventIdNotFound" . hasStatus 404
_InvalidSnapshotCopyGrantStateFault :: AsError a => Getting (First ServiceError) a ServiceError
_InvalidSnapshotCopyGrantStateFault =
_MatchServiceError redshift "InvalidSnapshotCopyGrantStateFault" .
hasStatus 400
_UnknownSnapshotCopyRegionFault :: AsError a => Getting (First ServiceError) a ServiceError
_UnknownSnapshotCopyRegionFault =
_MatchServiceError redshift "UnknownSnapshotCopyRegionFault" . hasStatus 404
_ReservedNodeQuotaExceededFault :: AsError a => Getting (First ServiceError) a ServiceError
_ReservedNodeQuotaExceededFault =
_MatchServiceError redshift "ReservedNodeQuotaExceeded" . hasStatus 400
_ClusterSubnetQuotaExceededFault :: AsError a => Getting (First ServiceError) a ServiceError
_ClusterSubnetQuotaExceededFault =
_MatchServiceError redshift "ClusterSubnetQuotaExceededFault" . hasStatus 400
_ClusterAlreadyExistsFault :: AsError a => Getting (First ServiceError) a ServiceError
_ClusterAlreadyExistsFault =
_MatchServiceError redshift "ClusterAlreadyExists" . hasStatus 400
_AccessToSnapshotDeniedFault :: AsError a => Getting (First ServiceError) a ServiceError
_AccessToSnapshotDeniedFault =
_MatchServiceError redshift "AccessToSnapshotDenied" . hasStatus 400
_TagLimitExceededFault :: AsError a => Getting (First ServiceError) a ServiceError
_TagLimitExceededFault =
_MatchServiceError redshift "TagLimitExceededFault" . hasStatus 400
_NumberOfNodesQuotaExceededFault :: AsError a => Getting (First ServiceError) a ServiceError
_NumberOfNodesQuotaExceededFault =
_MatchServiceError redshift "NumberOfNodesQuotaExceeded" . hasStatus 400
_HSMClientCertificateAlreadyExistsFault :: AsError a => Getting (First ServiceError) a ServiceError
_HSMClientCertificateAlreadyExistsFault =
_MatchServiceError redshift "HsmClientCertificateAlreadyExistsFault" .
hasStatus 400
_InvalidHSMClientCertificateStateFault :: AsError a => Getting (First ServiceError) a ServiceError
_InvalidHSMClientCertificateStateFault =
_MatchServiceError redshift "InvalidHsmClientCertificateStateFault" .
hasStatus 400
_SubnetAlreadyInUse :: AsError a => Getting (First ServiceError) a ServiceError
_SubnetAlreadyInUse =
_MatchServiceError redshift "SubnetAlreadyInUse" . hasStatus 400
_SubscriptionSeverityNotFoundFault :: AsError a => Getting (First ServiceError) a ServiceError
_SubscriptionSeverityNotFoundFault =
_MatchServiceError redshift "SubscriptionSeverityNotFound" . hasStatus 404
_UnauthorizedOperation :: AsError a => Getting (First ServiceError) a ServiceError
_UnauthorizedOperation =
_MatchServiceError redshift "UnauthorizedOperation" . hasStatus 400
_InvalidTagFault :: AsError a => Getting (First ServiceError) a ServiceError
_InvalidTagFault = _MatchServiceError redshift "InvalidTagFault" . hasStatus 400
_InsufficientS3BucketPolicyFault :: AsError a => Getting (First ServiceError) a ServiceError
_InsufficientS3BucketPolicyFault =
_MatchServiceError redshift "InsufficientS3BucketPolicyFault" . hasStatus 400
_ClusterSubnetGroupQuotaExceededFault :: AsError a => Getting (First ServiceError) a ServiceError
_ClusterSubnetGroupQuotaExceededFault =
_MatchServiceError redshift "ClusterSubnetGroupQuotaExceeded" . hasStatus 400