package github-hooks

You can search for identifiers within the package.

in-package search v0.2.0

github-hooks
- CHANGES
- LICENSE
- README
- Library github-hooks
  - Github_hooks
    
    Repo
    
    Set
    
    CONFIGURATION
    
    Log
    
    TIME
    
    SERVER
    
    IO
    
    HOOKS
    
    Make
- Sources
  - github-hooks
    
    github_hooks.ml

Legend:
Page
Library
Module
Module type
Parameter
Class
Class type
Source

Module type `Github_hooks.SERVER`Source

include Cohttp_lwt.S.Server

Sourcemodule IO : sig ... end

Sourcetype body = Cohttp_lwt__.Body.t

Sourcetype conn = IO.conn * Cohttp.Connection.t

Sourcetype response = Http.Response.t * Cohttp_lwt__.Body.t

Sourcetype response_action = [

| `Expert of Http.Response.t * (IO.ic -> IO.oc -> unit IO.t)
| `Response of response

]

Sourcetype t

Source

val make_response_action : 
  ?conn_closed:(conn -> unit) ->
  callback:(conn -> Http.Request.t -> body -> response_action IO.t) ->
  unit ->
  t

Source

val make_expert : 
  ?conn_closed:(conn -> unit) ->
  callback:
    (conn ->
      Http.Request.t ->
      body ->
      (Http.Response.t * (IO.ic -> IO.oc -> unit IO.t)) IO.t) ->
  unit ->
  t

Source

val make : 
  ?conn_closed:(conn -> unit) ->
  callback:(conn -> Http.Request.t -> body -> response IO.t) ->
  unit ->
  t

Source

val respond : 
  ?headers:Http.Header.t ->
  status:Http.Status.t ->
  body:body ->
  unit ->
  response IO.t

Source

val respond_string : 
  ?headers:Http.Header.t ->
  status:Http.Status.t ->
  body:string ->
  unit ->
  response IO.t

Sourceval callback : t -> IO.conn -> IO.ic -> IO.oc -> unit IO.t

Sourceval resolve_local_file : docroot:string -> uri:Uri.t -> string

deprecated Please use Cohttp.Path.resolve_local_file.

Source

val respond_error : 
  ?headers:Http.Header.t ->
  ?status:Http.Status.t ->
  body:string ->
  unit ->
  (Http.Response.t * body) IO.t

Source

val respond_redirect : 
  ?headers:Http.Header.t ->
  uri:Uri.t ->
  unit ->
  (Http.Response.t * body) IO.t

Source

val respond_need_auth : 
  ?headers:Http.Header.t ->
  auth:Cohttp.Auth.challenge ->
  unit ->
  (Http.Response.t * body) IO.t

Sourceval respond_not_found : ?uri:Uri.t -> unit -> (Http.Response.t * body) IO.t

Sourcetype tcp_config = private [>

| `Port of int

]

Sourcetype mode = private [>

| `TCP of tcp_config
| `TLS of server_tls_config

]

Sourceval create : mode -> t -> unit Lwt.t

package github-hooks

Module type Github_hooks.SERVERSource

Module type `Github_hooks.SERVER`Source