Network.Wai.Util

Documentation

handleAcceptTypes :: Monad m => [(String, m Response)] -> Request -> m Response

Build an Application that supports multiple Accept types (Content Negotiation)

noStoreFileUploads :: BackEnd ()

BackeEnd for parseRequestBody that throws out any file uploads

bodyBytestring :: Request -> ResourceT IO ByteString

Slurp in the entire request body as a ByteString

mapHeaders :: (ResponseHeaders -> ResponseHeaders) -> Response -> Response

Run a function over the headers in a Response

defHeader :: Header -> Response -> Response

Set a default value for a header in a Response

defHeader' :: Header -> ResponseHeaders -> ResponseHeaders

Set a default value for a header in ResponseHeaders

replaceHeader :: Header -> Response -> Response

Set the matching header name to this in a Response

replaceHeader' :: Header -> ResponseHeaders -> ResponseHeaders

Set the matching header name to this in ResponseHeaders

string :: Monad m => Status -> ResponseHeaders -> String -> m Response

Smart constructor to build a Response from a String

text :: Monad m => Status -> ResponseHeaders -> Text -> m Response

Smart constructor to build a Response from a Text

textBuilder :: Monad m => Status -> ResponseHeaders -> Builder -> m Response

Smart constructor to build a Response from a Builder

json :: (Monad m, ToJSON a) => Status -> ResponseHeaders -> a -> m Response

Smart constructor to build a JSON Response using Aeson

redirect :: Status -> ResponseHeaders -> URI -> Maybe Response

Smart constructor to build a redirect

Checks if the Status is a redirection and the URI is absolute

redirect' :: Monad m => Status -> ResponseHeaders -> URI -> m Response

Smart constructor to build a redirect

Asserts redirect conditions with an irrefutable pattern match, only use on hard-coded values.

stringAscii :: IsString s => String -> Maybe s

Safely convert a String to types that can only encode ASCII

stringHeader :: (IsString s1, IsString s2) => (String, String) -> Maybe (s1, s2)

Safely convert a pair of String to a pair suitable for use as a Header, ensuring only ASCII characters are present.

stringHeaders :: (IsString s1, IsString s2) => [(String, String)] -> Maybe [(s1, s2)]

Safely convert a list of pairs of String to a pair suitable for use as a Header, ensuring only ASCII characters are present.

stringHeaders' :: (IsString s1, IsString s2) => [(String, String)] -> [(s1, s2)]

Unsafely convert a list of pairs of String to a pair suitable for use as a Header, ensuring only ASCII characters are present.

Asserts success with an irrefutable pattern match, only use on hard-coded values.

responseToMailPart :: MonadIO m => Bool -> Response -> m Part

Convert a WAI Response to an email Part

Useful for re-using Application code/smart constructors to send emails