Server (p.shuttle_http.0.9.4.doc.shuttle_http.Shuttle

Source

type error_handler =
  ?exn:exn ->
  ?request:Request.t ->
  Status.t ->
  Response.t Async.Deferred.t

error_handler can be used to customize how the server deals with any unhandled exceptions. A default implementation is provided that will respond with a status code and an empty response body.

Sourcemodule Ssl : sig ... end

Sourcemodule Config : sig ... end

Sourcetype service = Request.t -> Response.t Async.Deferred.t

A user provided service that is invoked for every request/response cycle for a HTTP connection.

Source

val run_inet : 
  ?config:Config.t ->
  Async.Tcp.Where_to_listen.inet ->
  (Async.Socket.Address.Inet.t -> service) ->
  Async.Tcp.Server.inet

run_inet ?config addr service runs a http server where each request will be forwarded to the user provided service.

Source

val run : 
  ?config:Config.t ->
  ('address, 'listening_on) Async.Tcp.Where_to_listen.t ->
  ('address -> service) ->
  ('address, 'listening_on) Async.Tcp.Server.t Async.Deferred.t

run ?config addr service runs a http server where each request will be forwarded to the user provided service.