The tighttp package

[Tags:bsd3, library]

Example programs

examples/get.hs

This is simple client. This send GET request and show page source. Run as following.

 runhaskell get.hs hackage.haskell.org /packages/

extensions

 import "monads-tf" Control.Monad.Trans
 import Data.Pipe
 import System.Environment
 import Network
 import Network.TigHTTP.Client
 import Network.TigHTTP.Types

 import qualified Data.ByteString as BS

 main :: IO ()
 main = do
 	addr : pth : _ <- getArgs
 	h <- connectTo addr $ PortNumber 80
 	r <- request h $ get addr 80 pth
 	_ <- runPipe $ responseBody r =$= finally printP (putStrLn "")
 	return ()

 printP :: MonadIO m => Pipe BS.ByteString () m ()
 printP = await >>= maybe (return ()) (\s -> liftIO (BS.putStr s) >> printP)

examples/server.hs

This is simple server. This recieve client's request. And send command line arguments as response. Run as following.

 runhaskell server.hs Hello World I Am TigHTTP
 import Control.Monad
 import Control.Concurrent
 import Data.Pipe
 import System.IO
 import System.Environment
 import Network
 import Network.TigHTTP.Server
 import Network.TigHTTP.Types

 import qualified Data.ByteString.Char8 as BSC
 import qualified Data.ByteString.Lazy as LBS

 main :: IO ()
 main = do
 	as <- getArgs
 	soc <- listenOn $ PortNumber 80
 	forever $ do
 		(h, _, _) <- accept soc
 		void . forkIO $ do
 			req <- getRequest h
 			print $ requestPath req
 			putResponse h
				. (response :: LBS.ByteString -> Response Pipe Handle)
				. LBS.fromChunks $ map BSC.pack as

If you want more examples. Please see examples directory.

Properties

Versions 0.0.0.0, 0.0.0.1, 0.0.0.2, 0.0.0.3, 0.0.0.4, 0.0.0.5, 0.0.0.6, 0.0.0.7, 0.0.0.8, 0.0.0.9 (info)
Dependencies base (==4.*), bytestring (==0.10.*), handle-like (==0.1.*), monads-tf (==0.1.*), old-locale (==1.0.*), papillon (==0.1.*), simple-pipe (==0.0.0.*), time (==1.4.*) [details]
License BSD3
Author Yoshikuni Jujo <PAF01143@nifty.ne.jp>
Maintainer Yoshikuni Jujo <PAF01143@nifty.ne.jp>
Stability Experimental
Category Network
Home page https://github.com/YoshikuniJujo/tighttp/wiki
Source repository head: git clone git://github.com/YoshikuniJujo/tighttp.git
this: git clone git://github.com/YoshikuniJujo/tighttp.git(tag tighttp-0.0.0.8)
Uploaded Wed Sep 23 10:11:44 UTC 2015 by YoshikuniJujo
Distributions NixOS:0.0.0.9
Downloads 1386 total (31 in the last 30 days)
Votes
0 []
Status Docs uploaded by user [build log]
All reported builds failed as of 2015-09-30 [all 2 reports]

Modules

[Index]

Downloads

Maintainer's Corner

For package maintainers and hackage trustees