1 (* 'top'-like tool for libvirt domains.
2 (C) Copyright 2007-2017 Richard W.M. Jones, Red Hat Inc.
5 This program is free software; you can redistribute it and/or modify
6 it under the terms of the GNU General Public License as published by
7 the Free Software Foundation; either version 2 of the License, or
8 (at your option) any later version.
10 This program is distributed in the hope that it will be useful,
11 but WITHOUT ANY WARRANTY; without even the implied warranty of
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 GNU General Public License for more details.
15 You should have received a copy of the GNU General Public License
16 along with this program; if not, write to the Free Software
17 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
20 (** The virt-top screen layout. *)
24 val summary_lineno : int (** this takes 2 lines *)
25 val message_lineno : int
26 val header_lineno : int
27 val domains_lineno : int
29 (* Easier to use versions of curses functions addstr, mvaddstr, etc. *)
30 val move : int -> int -> unit
31 val refresh : unit -> unit
32 val addch : char -> unit
33 val addstr : string -> unit
34 val mvaddstr : int -> int -> string -> unit
36 (* Print in the "message area". *)
37 val clear_msg : unit -> unit
38 val print_msg : string -> unit
40 (* Show a libvirt domain state (the 'S' column). *)
41 val show_state : Libvirt.Domain.state -> char