Happstack.Server.Internal.Multipart

Documentation

spanS :: (ByteString -> Bool) -> ByteString -> (ByteString, ByteString)

similar to the normal span function, except the predicate gets the whole rest of the lazy bytestring, not just one character.

TODO: this function has not been profiled.

takeWhileS :: (ByteString -> Bool) -> ByteString -> ByteString

crlf :: ByteString

crlfcrlf :: ByteString

blankLine :: ByteString

dropWhileS :: (ByteString -> Bool) -> ByteString -> ByteString

data BodyPart

Constructors

BodyPart ByteString ByteString

headers body

Instances

Eq BodyPart

Ord BodyPart

Read BodyPart

Show BodyPart

data Work

Constructors

BodyWork ContentType [(String, String)] ByteString

HeaderWork ByteString

type InputWorker = Work -> IO InputIter

data InputIter

Constructors

Failed (Maybe (String, Input)) String

BodyResult (String, Input) InputWorker

HeaderResult [Header] InputWorker

type FileSaver

Arguments

 = FilePath

tempdir

-> Int64

quota

-> FilePath

filename of field

-> ByteString

content to save

-> IO (Bool, Int64, FilePath)

truncated?, saved bytes, saved filename

defaultFileSaver :: FilePath -> Int64 -> FilePath -> ByteString -> IO (Bool, Int64, FilePath)

defaultInputIter :: FileSaver -> FilePath -> Int64 -> Int64 -> Int64 -> Int64 -> Int64 -> Int64 -> Work -> IO InputIter

hPutLimit :: Int64 -> Handle -> ByteString -> IO (Bool, Int64)

hPutLimit' :: Int64 -> Handle -> Int64 -> ByteString -> IO (Bool, Int64)

bodyPartToInput :: InputWorker -> BodyPart -> IO InputIter

bodyPartsToInputs :: InputWorker -> [BodyPart] -> IO ([(String, Input)], Maybe String)

multipartBody :: InputWorker -> ByteString -> ByteString -> IO ([(String, Input)], Maybe String)

simpleInput :: String -> Input

Packs a string into an Input of type text/plain

defaultInputType :: ContentType

The default content-type for variables.

parseMultipartBody :: ByteString -> ByteString -> ([BodyPart], Maybe String)

dropPreamble :: ByteString -> ByteString -> (ByteString, Maybe String)

dropLine :: ByteString -> ByteString

isBoundary

Arguments

:: ByteString

The boundary, without the initial dashes

-> ByteString

-> Bool

Check whether a string starts with two dashes followed by the given boundary string.

startsWithDashes :: ByteString -> Bool

Checks whether a string starts with two dashes.

splitParts :: ByteString -> ByteString -> ([BodyPart], Maybe String)

splitPart :: ByteString -> ByteString -> (BodyPart, ByteString)

splitBlank :: ByteString -> (ByteString, ByteString)

splitBoundary :: ByteString -> ByteString -> (ByteString, ByteString)

splitAtEmptyLine :: ByteString -> Maybe (ByteString, ByteString)

splitAtCRLF

Arguments

:: ByteString

String to split.

-> Maybe (ByteString, ByteString)

Returns Nothing if there is no CRLF.

Split a string at the first CRLF. The CRLF is not included in any of the returned strings.