Network.HTTP.Lucu.Response.StatusCode

Contents

• Type class
• Status codes
  • Informational
  • Successful
  • Redirection
  • Client Error
  • Server Error

Description

Synopsis

• class (Eq sc, Show sc) => StatusCode sc where
  • numericCode :: sc -> Int
  • textualStatus :: sc -> AsciiBuilder
  • fromStatusCode :: sc -> SomeStatusCode
• data SomeStatusCode
• statusCodes :: QuasiQuoter
• data Continue = Continue
• data SwitchingProtocols = SwitchingProtocols
• data Processing = Processing
• data OK = OK
• data Created = Created
• data Accepted = Accepted
• data NonAuthoritativeInformation = NonAuthoritativeInformation
• data NoContent = NoContent
• data ResetContent = ResetContent
• data PartialContent = PartialContent
• data MultiStatus = MultiStatus
• data AlreadyReported = AlreadyReported
• data IMUsed = IMUsed
• data MultipleChoices = MultipleChoices
• data MovedPermanently = MovedPermanently
• data Found = Found
• data SeeOther = SeeOther
• data NotModified = NotModified
• data UseProxy = UseProxy
• data TemporaryRedirect = TemporaryRedirect
• data BadRequest = BadRequest
• data Unauthorized = Unauthorized
• data PaymentRequired = PaymentRequired
• data Forbidden = Forbidden
• data NotFound = NotFound
• data MethodNotAllowed = MethodNotAllowed
• data NotAcceptable = NotAcceptable
• data ProxyAuthenticationRequired = ProxyAuthenticationRequired
• data RequestTimeout = RequestTimeout
• data Conflict = Conflict
• data Gone = Gone
• data LengthRequired = LengthRequired
• data PreconditionFailed = PreconditionFailed
• data RequestEntityTooLarge = RequestEntityTooLarge
• data RequestURITooLarge = RequestURITooLarge
• data UnsupportedMediaType = UnsupportedMediaType
• data RequestRangeNotSatisfiable = RequestRangeNotSatisfiable
• data ExpectationFailed = ExpectationFailed
• data UnprocessableEntity = UnprocessableEntity
• data Locked = Locked
• data FailedDependency = FailedDependency
• data UpgradeRequired = UpgradeRequired
• data InternalServerError = InternalServerError
• data NotImplemented = NotImplemented
• data BadGateway = BadGateway
• data ServiceUnavailable = ServiceUnavailable
• data GatewayTimeout = GatewayTimeout
• data HTTPVersionNotSupported = HTTPVersionNotSupported
• data VariantAlsoNegotiates = VariantAlsoNegotiates
• data InsufficientStorage = InsufficientStorage
• data LoopDetected = LoopDetected
• data NotExtended = NotExtended

Type class

   [statusCodes|
   200 OK
   400 Bad Request
   405 Method Not Allowed
   |]

   data OK = OK deriving (Eq, Show)
   instance StatusCode OK where
     numericCode   _ = 200
     textualStatus _ = cs ("200 OK"  Ascii)

data BadRequest = BadRequest deriving (Eq, Show)
   instance StatusCode BadRequest where
     numericCode   _ = 400
     textualStatus _ = cs ("400 Bad Request"  Ascii)

data MethodNotAllowed = MethodNotAllowed deriving (Eq, Show)
   instance StatusCode MethodNotAllowed where
     numericCode   _ = 405
     textualStatus _ = cs ("405 Method Not Allowed"  Ascii)

Status codes

Informational

Successful

Redirection

Client Error

Server Error