Module Mnet_sshSource

Sourcemodule Stop : sig ... end
Sourcemodule type AUTH = sig ... end
Sourcetype t
Sourcetype db =
  1. | Database : 'db * (module AUTH with type t = 'db) -> db
Sourcetype callback = string -> request -> unit
Sourceand request =
  1. | Pty_req of {
    1. width : int32;
    2. height : int32;
    3. max_width : int32;
    4. max_height : int32;
    5. term : string;
    }
  2. | Pty_set of {
    1. width : int32;
    2. height : int32;
    3. max_width : int32;
    4. max_height : int32;
    }
  3. | Set_env of {
    1. key : string;
    2. value : string;
    }
  4. | Channel of {
    1. cmd : string;
    2. ic : unit -> string option;
    3. oc : string -> unit;
    4. ec : string -> unit;
    }
  5. | Shell of {
    1. ic : unit -> string option;
    2. oc : string -> unit;
    3. ec : string -> unit;
    }
Sourceand channel = {
  1. cmd : string option;
  2. id : int32;
  3. q : string Flux.Bqueue.c;
  4. prm : unit Miou.t;
}
Sourceval server : ?stop:Stop.t -> db -> Awa.Hostkey.priv -> Mnet.TCP.flow -> callback -> t