Module

Payload.Response

Package: purescript-payload
Repository: hoodunit/purescript-payload

#EncodeResponse Source

class EncodeResponse r  where

Members

encodeResponse :: Response r -> Result RawResponse

Instances

EncodeResponse ResponseBody
(WriteForeign (Record r)) => EncodeResponse (Record r)
(WriteForeign (Array r)) => EncodeResponse (Array r)
(WriteForeign r) => EncodeResponse (Json r)
EncodeResponse String
(TypeEquals (Stream r) (Stream (read :: Read | r'))) => EncodeResponse (Stream r)
(EncodeResponse a) => EncodeResponse (Maybe a)
EncodeResponse Empty

#ToSpecResponse Source

class ToSpecResponse (route :: Symbol) a b  where

This type class is for converting types which are compatible with the spec into the spec type. If the spec says one type is returned from an endpoint, a handler can either return that type directly or return another type from which that type can be produced (e.g. a full response with different headers or a different status code).

Members

toSpecResponse :: SProxy route -> a -> Result (Response b)

Instances

(EncodeResponse a) => ToSpecResponse route (Either Failure a) a
(EncodeResponse a) => ToSpecResponse route (Either Failure (Response a)) a
(EncodeResponse err) => ToSpecResponse route (Either (Response err) a) a
(EncodeResponse err) => ToSpecResponse route (Either (Response err) (Response a)) a
(EncodeResponse a, EncodeResponse err) => ToSpecResponse route (Either err a) a
(EncodeResponse a, EncodeResponse err) => ToSpecResponse route (Either err (Response a)) a
(EncodeResponse a) => ToSpecResponse route (Response a) a
(EncodeResponse a) => ToSpecResponse route a a
(Fail (Above (Text "Could not match or convert handler response type to spec response type.") (Above (Text "") (Above (Beside (Text " Route: ") (Text docRoute)) (Above (Beside (Text "Handler response: ") (Quote a)) (Above (Beside (Text " Spec response: ") (Quote b)) (Above (Text "") (Above (Text "Specifically, no type class instance was found for") (Above (Text "") (Above (Text "ToSpecResponse docRoute") (Above (Beside (Text " ") (Quote a)) (Above (Beside (Text " ") (Quote b)) (Text ""))))))))))))) => ToSpecResponse docRoute a b

#Json Source

newtype Json a

Constructors

Json a

Instances

(WriteForeign r) => EncodeResponse (Json r)

#Empty Source

data Empty

Constructors

Empty

Instances

EncodeResponse Empty

#RawResponse Source

type RawResponse = Response ResponseBody

#Response Source

newtype Response r

Constructors

Response { body :: r, headers :: Headers, status :: HttpStatus }

Instances

Newtype (Response a) _
(Eq a) => Eq (Response a)
(Show a) => Show (Response a)
(EncodeResponse a) => ToSpecResponse route (Either Failure (Response a)) a
(EncodeResponse err) => ToSpecResponse route (Either (Response err) a) a
(EncodeResponse err) => ToSpecResponse route (Either (Response err) (Response a)) a
(EncodeResponse a, EncodeResponse err) => ToSpecResponse route (Either err (Response a)) a
(EncodeResponse a) => ToSpecResponse route (Response a) a

#ResponseBody Source

data ResponseBody

Constructors

Instances

#Result Source

type Result a = ExceptT Failure Aff a

#Failure Source

data Failure

Constructors

Forward String
Error RawResponse

Instances

Show Failure
(EncodeResponse a) => ToSpecResponse route (Either Failure a) a
(EncodeResponse a) => ToSpecResponse route (Either Failure (Response a)) a

#UnsafeStream Source

data UnsafeStream

#status Source

status :: forall a. HttpStatus -> a -> Response a

#setStatus Source

setStatus :: forall a. HttpStatus -> Response a -> Response a

#updateStatus Source

updateStatus :: forall a. (HttpStatus -> HttpStatus) -> Response a -> Response a

#setBody Source

setBody :: forall b a. b -> Response a -> Response b

#updateBody Source

updateBody :: forall b a. (a -> b) -> Response a -> Response b

#setHeaders Source

setHeaders :: forall a. Headers -> Response a -> Response a

#updateHeaders Source

updateHeaders :: forall a. (Headers -> Headers) -> Response a -> Response a

#continue Source

continue :: forall a. a -> Response a

#switchingProtocols Source

switchingProtocols :: forall a. a -> Response a

#processing Source

processing :: forall a. a -> Response a

#ok Source

ok :: forall a. a -> Response a

#created Source

created :: forall a. a -> Response a

#accepted Source

accepted :: forall a. a -> Response a

#nonAuthoritativeInformation Source

nonAuthoritativeInformation :: forall a. a -> Response a

#noContent Source

noContent :: forall a. a -> Response a

#resetContent Source

resetContent :: forall a. a -> Response a

#partialContent Source

partialContent :: forall a. a -> Response a

#multiStatus Source

multiStatus :: forall a. a -> Response a

#alreadyReported Source

alreadyReported :: forall a. a -> Response a

#imUsed Source

imUsed :: forall a. a -> Response a

#multipleChoices Source

multipleChoices :: forall a. a -> Response a

#movedPermanently Source

movedPermanently :: forall a. a -> Response a

#found Source

found :: forall a. a -> Response a

#seeOther Source

seeOther :: forall a. a -> Response a

#notModified Source

notModified :: forall a. a -> Response a

#useProxy Source

useProxy :: forall a. a -> Response a

#temporaryRedirect Source

temporaryRedirect :: forall a. a -> Response a

#permanentRedirect Source

permanentRedirect :: forall a. a -> Response a

#badRequest Source

badRequest :: forall a. a -> Response a

#unauthorized Source

unauthorized :: forall a. a -> Response a

#paymentRequired Source

paymentRequired :: forall a. a -> Response a

#forbidden Source

forbidden :: forall a. a -> Response a

#notFound Source

notFound :: forall a. a -> Response a

#methodNotAllowed Source

methodNotAllowed :: forall a. a -> Response a

#notAcceptable Source

notAcceptable :: forall a. a -> Response a

#proxyAuthenticationRequired Source

proxyAuthenticationRequired :: forall a. a -> Response a

#requestTimeout Source

requestTimeout :: forall a. a -> Response a

#conflict Source

conflict :: forall a. a -> Response a

#gone Source

gone :: forall a. a -> Response a

#lengthRequired Source

lengthRequired :: forall a. a -> Response a

#preconditionFailed Source

preconditionFailed :: forall a. a -> Response a

#payloadTooLarge Source

payloadTooLarge :: forall a. a -> Response a

#uriTooLong Source

uriTooLong :: forall a. a -> Response a

#unsupportedMediaType Source

unsupportedMediaType :: forall a. a -> Response a

#rangeNotSatisfiable Source

rangeNotSatisfiable :: forall a. a -> Response a

#expectationFailed Source

expectationFailed :: forall a. a -> Response a

#imATeapot Source

imATeapot :: forall a. a -> Response a

#misdirectedRequest Source

misdirectedRequest :: forall a. a -> Response a

#unprocessableEntity Source

unprocessableEntity :: forall a. a -> Response a

#locked Source

locked :: forall a. a -> Response a

#failedDependency Source

failedDependency :: forall a. a -> Response a

#upgradeRequired Source

upgradeRequired :: forall a. a -> Response a

#preconditionRequired Source

preconditionRequired :: forall a. a -> Response a

#tooManyRequests Source

tooManyRequests :: forall a. a -> Response a

#requestHeaderFieldsTooLarge Source

requestHeaderFieldsTooLarge :: forall a. a -> Response a

#unavailableForLegalReasons Source

unavailableForLegalReasons :: forall a. a -> Response a

#internalError Source

internalError :: forall a. a -> Response a

#notImplemented Source

notImplemented :: forall a. a -> Response a

#badGateway Source

badGateway :: forall a. a -> Response a

#serviceUnavailable Source

serviceUnavailable :: forall a. a -> Response a

#gatewayTimeout Source

gatewayTimeout :: forall a. a -> Response a

#httpVersionNotSupported Source

httpVersionNotSupported :: forall a. a -> Response a

#variantAlsoNegotiates Source

variantAlsoNegotiates :: forall a. a -> Response a

#insufficientStorage Source

insufficientStorage :: forall a. a -> Response a

#loopDetected Source

loopDetected :: forall a. a -> Response a

#notExtended Source

notExtended :: forall a. a -> Response a

#networkAuthenticationRequired Source

networkAuthenticationRequired :: forall a. a -> Response a