The hs-server-starter package

[Tags:bsd3, library, test]

Provides a utility to write server program which can be called via Perl's https://github.com/kazuho/p5-Server-Starter program using Haskell. This module does not provide a Haskell implementation of start_server, so you need to use the original Perl version or use a version ported to golang.


[Skip to Readme]

Properties

Versions 0.1.0.0, 0.1.0.1
Dependencies base (>=4.7 && <5), directory (>=1.3.0.0 && <1.4), hs-server-starter, http-types, network (>=2.6.3.1 && <2.7), wai, warp [details]
License BSD3
Copyright Copyright 2017- hiratara
Author Masahiro Honma
Maintainer hiratara@cpan.org
Category value
Home page https://github.com/hiratara/hs-server-starter
Source repository head: git clone https://github.com/hiratara/hs-server-starter
Uploaded Sat Mar 18 09:58:03 UTC 2017 by hiratara
Distributions NixOS:0.1.0.1
Downloads 75 total (14 in the last 30 days)
Votes
0 []
Status Docs available [build log]
Last success reported on 2017-03-18 [all 1 reports]
Hackage Matrix CI

Modules

[Index]

Flags

NameDescriptionDefaultType
example

Build the example application

DisabledAutomatic

Use -f <flag> to enable a flag, or -f -<flag> to disable that flag. More info

Downloads

Maintainer's Corner

For package maintainers and hackage trustees

Readme for hs-server-starter

Readme for hs-server-starter-0.1.0.1

hs-server-starter

Description

Provides a utility to write server program which can be called via Perl's https://github.com/kazuho/p5-Server-Starter program using Haskell.

This module does not provide a Haskell implementation of start_server, so you need to use the original Perl version or use a version ported to golang.

SINOPSIS

Since the listenAll function returns a listened Network.Socket, please call accept on it.

import qualified Network.ServerStarter.Socket as Starter
import qualified Network.Socket               as Socket
import qualified Network.Wai                  as Wai
import qualified Network.Wai.Handler.Warp     as Warp

main :: IO ()
main = do
  (socket:_) <- Starter.listenAll
  Socket.SockAddrInet port _ <- Socket.getSocketName socket
  let setting = Warp.setPort (fromEnum port)
              $ Warp.defaultSettings
  Warp.runSettingsSocket setting socket app

app :: Wai.Application
app = ...

Then run start_server and access to http://localhost:12345 .

$ start_server --port 12345 -- stack exec server-starter-warp-example

Author

Masahiro Honma (hiratara@cpan.org)