This is the entry point of Lucu httpd. It listens to a socket and waits for clients. runHttpd never stops by itself so the only way to stop it is to raise an exception in the thread running it.

Example:

{-# LANGUAGE OverloadedStrings #-} {-# LANGUAGE QuasiQuotes #-} module Main where import qualified Data.Collections as C import Network import Network.HTTP.Lucu main :: IO () main = let config = defaultConfig tree :: ResourceTree tree = C.fromList [ ([], nonGreedy helloWorld) ] in Network.withSocketsDo . runHttpd config $ resourceMap tree helloWorld :: Network.HTTP.Lucu.Resource helloWorld = C.fromList [ ( Network.HTTP.Lucu.GET , do Network.HTTP.Lucu.setContentType [Network.HTTP.Lucu.mimeType| text/plain |] Network.HTTP.Lucu.putChunk "Hello, world!" } FIXME: use monad-parallel's MonadFork instead of IO.

Host represents an IP address or a host name in an URI authority.

Path is a list of URI path segments.

Definition of HTTP request methods.

An entity tag consists of a weakness flag and an opaque string.

This is equivalent to ETag False. If you want to generate an ETag from a file, try using Network.HTTP.Lucu.StaticFile.generateETagFromFile.

This is equivalent to ETag True.

A media type, subtype, and parameters.

A Map from MIME parameter attributes to values. Attributes are always case-insensitive according to RFC 2045 (http://tools.ietf.org/html/rfc2045#section-5.1).

QuasiQuoter for MIMEType literals.

   textPlain :: MIMEType
   textPlain = [mimeType| text/plain; charset="UTF-8" |]

Authentication challenge to be sent to clients with "WWW-Authenticate" header field. See Network.HTTP.Lucu.setWWWAuthenticate.

Authorization credential to be sent by client with "Authorization" header. See Network.HTTP.Lucu.getAuthorization.