{-# LANGUAGE OverloadedStrings #-}
module Network.AWS.CodePipeline.Types
(
codePipeline
, _InvalidClientTokenException
, _ValidationException
, _InvalidNonceException
, _ActionNotFoundException
, _InvalidApprovalTokenException
, _InvalidBlockerDeclarationException
, _InvalidJobStateException
, _InvalidJobException
, _PipelineVersionNotFoundException
, _StageNotRetryableException
, _PipelineExecutionNotFoundException
, _ActionTypeNotFoundException
, _InvalidNextTokenException
, _InvalidStageDeclarationException
, _InvalidActionDeclarationException
, _StageNotFoundException
, _InvalidStructureException
, _JobNotFoundException
, _ApprovalAlreadyCompletedException
, _PipelineNameInUseException
, _PipelineNotFoundException
, _LimitExceededException
, _NotLatestPipelineExecutionException
, ActionCategory (..)
, ActionConfigurationPropertyType (..)
, ActionExecutionStatus (..)
, ActionOwner (..)
, ApprovalStatus (..)
, ArtifactLocationType (..)
, ArtifactStoreType (..)
, BlockerType (..)
, EncryptionKeyType (..)
, FailureType (..)
, JobStatus (..)
, PipelineExecutionStatus (..)
, StageExecutionStatus (..)
, StageRetryMode (..)
, StageTransitionType (..)
, AWSSessionCredentials
, awsSessionCredentials
, ascAccessKeyId
, ascSecretAccessKey
, ascSessionToken
, ActionConfiguration
, actionConfiguration
, acConfiguration
, ActionConfigurationProperty
, actionConfigurationProperty
, acpQueryable
, acpType
, acpDescription
, acpName
, acpRequired
, acpKey
, acpSecret
, ActionContext
, actionContext
, acName
, ActionDeclaration
, actionDeclaration
, adOutputArtifacts
, adRunOrder
, adConfiguration
, adInputArtifacts
, adRoleARN
, adName
, adActionTypeId
, ActionExecution
, actionExecution
, aeLastUpdatedBy
, aeSummary
, aeStatus
, aeLastStatusChange
, aeToken
, aeExternalExecutionURL
, aeExternalExecutionId
, aeErrorDetails
, aePercentComplete
, ActionRevision
, actionRevision
, aRevisionId
, aRevisionChangeId
, aCreated
, ActionState
, actionState
, asRevisionURL
, asEntityURL
, asActionName
, asCurrentRevision
, asLatestExecution
, ActionType
, actionType
, atSettings
, atActionConfigurationProperties
, atId
, atInputArtifactDetails
, atOutputArtifactDetails
, ActionTypeId
, actionTypeId
, atiCategory
, atiOwner
, atiProvider
, atiVersion
, ActionTypeSettings
, actionTypeSettings
, atsThirdPartyConfigurationURL
, atsExecutionURLTemplate
, atsRevisionURLTemplate
, atsEntityURLTemplate
, ApprovalResult
, approvalResult
, arSummary
, arStatus
, Artifact
, artifact
, aLocation
, aName
, aRevision
, ArtifactDetails
, artifactDetails
, adMinimumCount
, adMaximumCount
, ArtifactLocation
, artifactLocation
, alS3Location
, alType
, ArtifactRevision
, artifactRevision
, arRevisionSummary
, arRevisionURL
, arCreated
, arName
, arRevisionId
, arRevisionChangeIdentifier
, ArtifactStore
, artifactStore
, asEncryptionKey
, asType
, asLocation
, BlockerDeclaration
, blockerDeclaration
, bdName
, bdType
, CurrentRevision
, currentRevision
, crRevisionSummary
, crCreated
, crRevision
, crChangeIdentifier
, EncryptionKey
, encryptionKey
, ekId
, ekType
, ErrorDetails
, errorDetails
, edCode
, edMessage
, ExecutionDetails
, executionDetails
, edSummary
, edExternalExecutionId
, edPercentComplete
, FailureDetails
, failureDetails
, fdExternalExecutionId
, fdType
, fdMessage
, InputArtifact
, inputArtifact
, iaName
, Job
, job
, jData
, jAccountId
, jId
, jNonce
, JobData
, jobData
, jdContinuationToken
, jdOutputArtifacts
, jdArtifactCredentials
, jdPipelineContext
, jdEncryptionKey
, jdActionTypeId
, jdInputArtifacts
, jdActionConfiguration
, JobDetails
, jobDetails
, jdData
, jdAccountId
, jdId
, OutputArtifact
, outputArtifact
, oaName
, PipelineContext
, pipelineContext
, pcStage
, pcPipelineName
, pcAction
, PipelineDeclaration
, pipelineDeclaration
, pdVersion
, pdName
, pdRoleARN
, pdArtifactStore
, pdStages
, PipelineExecution
, pipelineExecution
, peStatus
, pePipelineName
, pePipelineVersion
, pePipelineExecutionId
, peArtifactRevisions
, PipelineSummary
, pipelineSummary
, psCreated
, psName
, psVersion
, psUpdated
, S3ArtifactLocation
, s3ArtifactLocation
, salBucketName
, salObjectKey
, StageContext
, stageContext
, scName
, StageDeclaration
, stageDeclaration
, sdBlockers
, sdName
, sdActions
, StageExecution
, stageExecution
, sePipelineExecutionId
, seStatus
, StageState
, stageState
, ssInboundTransitionState
, ssActionStates
, ssStageName
, ssLatestExecution
, ThirdPartyJob
, thirdPartyJob
, tpjClientId
, tpjJobId
, ThirdPartyJobData
, thirdPartyJobData
, tpjdContinuationToken
, tpjdOutputArtifacts
, tpjdArtifactCredentials
, tpjdPipelineContext
, tpjdEncryptionKey
, tpjdActionTypeId
, tpjdInputArtifacts
, tpjdActionConfiguration
, ThirdPartyJobDetails
, thirdPartyJobDetails
, tpjdData
, tpjdId
, tpjdNonce
, TransitionState
, transitionState
, tsEnabled
, tsDisabledReason
, tsLastChangedAt
, tsLastChangedBy
) where
import Network.AWS.CodePipeline.Types.Product
import Network.AWS.CodePipeline.Types.Sum
import Network.AWS.Lens
import Network.AWS.Prelude
import Network.AWS.Sign.V4
codePipeline :: Service
codePipeline =
Service
{ _svcAbbrev = "CodePipeline"
, _svcSigner = v4
, _svcPrefix = "codepipeline"
, _svcVersion = "2015-07-09"
, _svcEndpoint = defaultEndpoint codePipeline
, _svcTimeout = Just 70
, _svcCheck = statusSuccess
, _svcError = parseJSONError "CodePipeline"
, _svcRetry = retry
}
where
retry =
Exponential
{ _retryBase = 5.0e-2
, _retryGrowth = 2
, _retryAttempts = 5
, _retryCheck = check
}
check e
| 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
_InvalidClientTokenException :: AsError a => Getting (First ServiceError) a ServiceError
_InvalidClientTokenException =
_ServiceError . hasCode "InvalidClientTokenException"
_ValidationException :: AsError a => Getting (First ServiceError) a ServiceError
_ValidationException = _ServiceError . hasCode "ValidationException"
_InvalidNonceException :: AsError a => Getting (First ServiceError) a ServiceError
_InvalidNonceException = _ServiceError . hasCode "InvalidNonceException"
_ActionNotFoundException :: AsError a => Getting (First ServiceError) a ServiceError
_ActionNotFoundException = _ServiceError . hasCode "ActionNotFoundException"
_InvalidApprovalTokenException :: AsError a => Getting (First ServiceError) a ServiceError
_InvalidApprovalTokenException =
_ServiceError . hasCode "InvalidApprovalTokenException"
_InvalidBlockerDeclarationException :: AsError a => Getting (First ServiceError) a ServiceError
_InvalidBlockerDeclarationException =
_ServiceError . hasCode "InvalidBlockerDeclarationException"
_InvalidJobStateException :: AsError a => Getting (First ServiceError) a ServiceError
_InvalidJobStateException = _ServiceError . hasCode "InvalidJobStateException"
_InvalidJobException :: AsError a => Getting (First ServiceError) a ServiceError
_InvalidJobException = _ServiceError . hasCode "InvalidJobException"
_PipelineVersionNotFoundException :: AsError a => Getting (First ServiceError) a ServiceError
_PipelineVersionNotFoundException =
_ServiceError . hasCode "PipelineVersionNotFoundException"
_StageNotRetryableException :: AsError a => Getting (First ServiceError) a ServiceError
_StageNotRetryableException =
_ServiceError . hasCode "StageNotRetryableException"
_PipelineExecutionNotFoundException :: AsError a => Getting (First ServiceError) a ServiceError
_PipelineExecutionNotFoundException =
_ServiceError . hasCode "PipelineExecutionNotFoundException"
_ActionTypeNotFoundException :: AsError a => Getting (First ServiceError) a ServiceError
_ActionTypeNotFoundException =
_ServiceError . hasCode "ActionTypeNotFoundException"
_InvalidNextTokenException :: AsError a => Getting (First ServiceError) a ServiceError
_InvalidNextTokenException =
_ServiceError . hasCode "InvalidNextTokenException"
_InvalidStageDeclarationException :: AsError a => Getting (First ServiceError) a ServiceError
_InvalidStageDeclarationException =
_ServiceError . hasCode "InvalidStageDeclarationException"
_InvalidActionDeclarationException :: AsError a => Getting (First ServiceError) a ServiceError
_InvalidActionDeclarationException =
_ServiceError . hasCode "InvalidActionDeclarationException"
_StageNotFoundException :: AsError a => Getting (First ServiceError) a ServiceError
_StageNotFoundException = _ServiceError . hasCode "StageNotFoundException"
_InvalidStructureException :: AsError a => Getting (First ServiceError) a ServiceError
_InvalidStructureException =
_ServiceError . hasCode "InvalidStructureException"
_JobNotFoundException :: AsError a => Getting (First ServiceError) a ServiceError
_JobNotFoundException = _ServiceError . hasCode "JobNotFoundException"
_ApprovalAlreadyCompletedException :: AsError a => Getting (First ServiceError) a ServiceError
_ApprovalAlreadyCompletedException =
_ServiceError . hasCode "ApprovalAlreadyCompletedException"
_PipelineNameInUseException :: AsError a => Getting (First ServiceError) a ServiceError
_PipelineNameInUseException =
_ServiceError . hasCode "PipelineNameInUseException"
_PipelineNotFoundException :: AsError a => Getting (First ServiceError) a ServiceError
_PipelineNotFoundException =
_ServiceError . hasCode "PipelineNotFoundException"
_LimitExceededException :: AsError a => Getting (First ServiceError) a ServiceError
_LimitExceededException = _ServiceError . hasCode "LimitExceededException"
_NotLatestPipelineExecutionException :: AsError a => Getting (First ServiceError) a ServiceError
_NotLatestPipelineExecutionException =
_ServiceError . hasCode "NotLatestPipelineExecutionException"