Previous  Up  Next

Module Myadmin

module Myadmin: sig .. end
An HTTP server for monitoring/editing the virtual network.
val debug : bool
val serie_size : int
type serie = {
   mutable used : int;
   past : int64 array;
   color : int32;
} 
val series : (string, serie) Batteries.Hashtbl.t
val serie_current_idx : int Batteries.ref
val report_thread : float -> 'a
val basename : string -> string
val print_tree : (string, 'a) Batteries.Hashtbl.t ->
       'b BatInnerIO.output -> Metric.tree -> unit
val page_head : ?selected:string -> 'a BatInnerIO.output -> unit
val page_foot : 'a BatInnerIO.output -> unit
val home : 'a -> 'b -> 'c -> 'd -> 'e BatInnerIO.output -> (string * string) list
val net : 'a -> 'b -> 'c -> 'd -> 'e BatInnerIO.output -> (string * string) list
val netpart_csv : 'a ->
       string list -> 'b -> 'c -> 'd BatInnerIO.output -> (string * string) list
val net_csv : string ->
       string list -> 'a -> string -> 'b BatInnerIO.output -> (string * string) list
val scenarii : 'a -> 'b -> 'c -> 'd -> 'e BatInnerIO.output -> (string * string) list
val engine : 'a -> 'b -> 'c -> 'd -> 'e BatInnerIO.output -> (string * string) list
val metrics : 'a ->
       'b ->
       (string, string) Batteries.Hashtbl.t ->
       'c -> 'd BatInnerIO.output -> (string * string) list
val logs : 'a ->
       'b ->
       (string, string) Batteries.Hashtbl.t ->
       'c -> 'd BatInnerIO.output -> (string * string) list
val make : Host.host_trx -> Tcp.Port.t -> unit