(* * Copyright (C) 2006-2007 XenSource Ltd. * Copyright (C) 2008 Citrix Ltd. * Author Vincent Hanquez * * This program is free software; you can redistribute it and/or modify * it under the terms of the GNU Lesser General Public License as published * by the Free Software Foundation; version 2.1 only. with the special * exception on linking described in file LICENSE. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU Lesser General Public License for more details. *) let xenstored_major = 1 let xenstored_minor = 0 let xenstored_proc_kva = "/proc/xen/xsd_kva" let xenstored_proc_port = "/proc/xen/xsd_port" let xs_daemon_socket = "/var/run/xenstored/socket" let xs_daemon_socket_ro = "/var/run/xenstored/socket_ro" let default_config_dir = "/etc/xen" let maxwatch = ref (50) let maxtransaction = ref (20) let domid_self = 0x7FF0 exception Not_a_directory of string exception Not_a_value of string exception Already_exist exception Doesnt_exist exception Lookup_Doesnt_exist of string exception Invalid_path exception Permission_denied exception Unknown_operation