module Graphics:sig
..end
typephase =
[ `Connect | `Disconnect | `Initialize | `Unknown of int ]
type
t = {
|
phase : |
(* | the phase of the connection | *) |
|
local : |
(* | the local server address | *) |
|
remote : |
(* | the remote client address | *) |
|
auth_scheme : |
(* | the authentication scheme activated | *) |
|
subject : |
(* | the authenticated subject (user) | *) |
}
val to_string : t -> string