Module Make.PafSource

Sourcetype stack = Stack.TCP.t
Sourcemodule TCP : sig ... end
Sourcemodule TLS : sig ... end
Sourceval tcp_protocol : (stack * ipaddr * int, TCP.flow) Mimic.protocol
Sourceval tcp_edn : (stack * ipaddr * int) Mimic.value
Sourceval tls_edn : ([ `host ] Domain_name.t option * Tls.Config.client * stack * ipaddr * int) Mimic.value
Sourceval tls_protocol : ([ `host ] Domain_name.t option * Tls.Config.client * stack * ipaddr * int, TLS.flow) Mimic.protocol
Sourcetype dst = ipaddr * int
Sourceval init : port:int -> stack -> t Lwt.t
Sourceval accept : t -> (TCP.flow, [> `Closed ]) result Lwt.t
Sourceval close : t -> unit Lwt.t
Sourceval http_service : ?config:??? -> error_handler:(dst -> H1.Server_connection.error_handler) -> (TCP.flow -> dst -> H1.Server_connection.request_handler) -> t Paf.service
Sourceval https_service : tls:Tls.Config.server -> ?config:??? -> error_handler:(dst -> H1.Server_connection.error_handler) -> (TLS.flow -> dst -> H1.Server_connection.request_handler) -> t Paf.service
Sourceval alpn_service : tls:Tls.Config.server -> ?config:??? -> (TLS.flow, dst) Alpn.server_handler -> t Paf.service
Sourceval serve : ?stop:??? -> 't Paf.service -> 't -> [ `Initialized of unit Lwt.t ]