package awa
Legend:
Library
Module
Module type
Parameter
Class
Class type
Library
Module
Module type
Parameter
Class
Class type
val src : Logs.src
type event =
| Channel_exec of int32 * string
| Channel_subsystem of int32 * string
| Channel_data of int32 * Cstruct.t
| Channel_eof of int32
| Disconnected of string
| Pty of string * int32 * int32 * int32 * int32 * string
| Pty_set of int32 * int32 * int32 * int32
| Set_env of string * string
| Start_shell of int32
val pp_event : Format.formatter -> event -> unit
type t = {
client_version : string option;
server_version : string;
client_kexinit : Ssh.kexinit option;
server_kexinit : Ssh.kexinit;
neg_kex : Kex.negotiation option;
ext_info : bool;
host_key : Hostkey.priv;
session_id : Cstruct.t option;
keys_ctos : Kex.keys;
keys_stoc : Kex.keys;
new_keys_ctos : Kex.keys option;
new_keys_stoc : Kex.keys option;
keying : bool;
key_eol : Mtime.t option;
expect : Ssh.message_id option;
auth_state : Auth.state;
user_db : Auth.db;
channels : Channel.db;
ignore_next_packet : bool;
dh_group : (Mirage_crypto_pk.Dh.group * int32 * int32 * int32) option;
}
val guard_msg : t -> Ssh.message -> (unit, string) result
val host_key_algs : Hostkey.priv -> Hostkey.alg list
val make : Hostkey.priv -> Auth.db -> t * Ssh.message list
val rekey : t -> (t * Ssh.message) option
val maybe_rekey : t -> Mtime.t -> (t * Ssh.message) option
val make_noreply : 'a -> ('a * 'b list * 'c option, 'd) result
val make_reply : 'a -> 'b -> ('a * 'b list * 'c option, 'd) result
val make_replies : 'a -> 'b -> ('a * 'b * 'c option, 'd) result
val make_event : 'a -> 'b -> ('a * 'c list * 'b option, 'd) result
val make_reply_with_event :
'a ->
'b ->
'c ->
('a * 'b list * 'c option, 'd) result
val make_disconnect :
'a ->
Ssh.disconnect_code ->
string ->
('a * Ssh.message list * event option, 'b) result
val input_userauth_request :
t ->
string ->
string ->
Ssh.auth_method ->
(t * Ssh.message list * event option, string) result
val input_channel_open :
t ->
int32 ->
int32 ->
int32 ->
Ssh.channel_open ->
(t * Ssh.message list * 'a option, 'b) result
val input_channel_request :
t ->
Channel.Channel_map.key ->
bool ->
Ssh.channel_request ->
(t * Ssh.message list * event option, 'a) result
val input_msg :
t ->
Ssh.message ->
Mtime.t ->
(t * Ssh.message list * event option, string) result
val output_msg : t -> Ssh.message -> (t * Cstruct.t, string) result
val output_channel_data :
t ->
Channel.Channel_map.key ->
Cstruct.t ->
(t * Ssh.message list, string) result
sectionYPositions = computeSectionYPositions($el), 10)"
x-init="setTimeout(() => sectionYPositions = computeSectionYPositions($el), 10)"
>