package mehari-eio

  1. Overview
  2. Docs
On This Page
  1. Net
  2. Entry point
Legend:
Library
Module
Module type
Parameter
Class
Class type

An IO module Mehari implementation based on Eio library.

module Addr : sig ... end
module Direct : sig ... end
module type S = Mehari.NET with module IO := Direct and type addr = Addr.t

Net

include S
type addr = Addr.t

Type for IP address.

Handlers are asynchronous functions from Mehari.request to Mehari.response.

type route

Routes tell router which handler to select for each request. See Routing.

type rate_limiter

Rate limiter. See Rate limit.

type middleware = handler -> handler

Middlewares take a handler, and run some code before or after — producing a “bigger” handler. See Middleware.

Middleware

val no_middleware : middleware

Does nothing but call its inner handler. Useful for disabling middleware conditionally during application startup:

if development then
  my_middleware
else
  Mehari.no_middleware
val pipeline : middleware list -> middleware

Combines a list of middlewares into one, such that these two lines are equivalent: Mehari.pipeline [ mw1 ; mw2 ] @@ handler mw1 @@ mw2 @@ handler.

Routing

val router : route list -> handler

Creates a router. If none of the routes match the Mehari.request, the router returns Mehari.not_found.

val route : ?rate_limit:rate_limiter -> ?mw:middleware -> ?typ:[ `Raw | `Regex ] -> string -> handler -> route

route ~rate_limit ~mw ~typ path handler forwards requests for path to handler. path can be a string literal or a regex in Perl style depending of typ. If rate limit is in effect, handler is not executed and a respond with Mehari.status Mehari.slow_down is sended.

val scope : ?rate_limit:rate_limiter -> ?mw:middleware -> string -> route list -> route

scope ~rate_limit ~mw prefix routes groups routes under the path prefix, rate_limit and mw.

val no_route : route

A dummy value of type route that is completely ignored by the router. Useful for disabling routes conditionally during application start.

Rate limit

val make_rate_limit : ?period:int -> int -> [ `Second | `Minute | `Hour | `Day ] -> rate_limiter

make_rate_limit ~period n unit creates a rate_limiter which limits client to n request per period * unit. For example,

make_rate_limit ~period:2 5 `Hour

limits client to 5 requests every 2 hours.

Virtual hosting

val virtual_hosts : ?meth:[ `ByURL | `SNI ] -> (string * handler) list -> handler

virtual_hosts ?meth [(domain, handler); ...] produces a handler which enables virtual hosting at the TLS-layer using SNI.

  • meth can be used to choose which source to match the hostnames against. Defaults to `SNI.

Logging

val set_log_lvl : Logs.level -> unit

Set Mehari's logger to the given log level.

val logger : handler -> handler

Logs and times requests. Time spent logging is included.

val debug : 'a Logs.log
val info : 'a Logs.log
val warning : 'a Logs.log
val error : 'a Logs.log

Entry point

val run : ?port:int -> ?backlog:int -> ?timeout:(float * Eio.Time.clock) -> ?addr:addr -> ?verify_url_host:bool -> ?config:Tls.Config.server -> certchains:(Eio.Fs.dir Eio.Path.t * Eio.Fs.dir Eio.Path.t) list -> Eio.Net.t -> handler -> unit

run ?port ?backlog ?addr ?verify_url_host ?config ~certchains net handler runs the server using handler.

  • port is the port to listen on. Defaults to 1965.
  • backlog is the the number of pending connections that can be queued up. Defaults to 4096.
  • timeout is a couple of form (duration, eio_clock). duration is the maximum waiting time in seconds for the client to write a request after TLS handshake. Unset by default.
  • addr is the socket addresses. Defaults to Eio.Net.Ipaddr.V4.loopback.
  • verify_url_host, if true (by default), will verify if the URL hostname corresponds to the server's certificate (chosen according to ocaml-tls sni.md).
  • config is the TLS server configuration. Defaults to

    Tls.Config.server ~certificates
        ~authenticator:(fun ?ip:_ ~host:_ _ -> Ok None)
        ()

    To support client certificates, specify the authenticator.

  • certchains is the list of form [(cert_path, private_key_path); ...], the last one is considered default.
OCaml

Innovation. Community. Security.