1(*
2 * Copyright (C) 2006-2007 XenSource Ltd.
3 * Copyright (C) 2008      Citrix Ltd.
4 * Author Vincent Hanquez <vincent.hanquez@eu.citrix.com>
5 *
6 * This program is free software; you can redistribute it and/or modify
7 * it under the terms of the GNU Lesser General Public License as published
8 * by the Free Software Foundation; version 2.1 only. with the special
9 * exception on linking described in file LICENSE.
10 *
11 * This program is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14 * GNU Lesser General Public License for more details.
15 *)
16
17let xenstored_major = 1
18let xenstored_minor = 0
19
20let xs_daemon_socket = Paths.xen_run_stored ^ "/socket"
21
22let default_config_dir = Paths.xen_config_dir
23
24let maxwatch = ref (100)
25let maxtransaction = ref (10)
26let maxrequests = ref (1024)   (* maximum requests per transaction *)
27let maxoutstanding = ref (1024) (* maximum outstanding requests, i.e. in-flight requests / domain *)
28let maxwatchevents = ref (1024)
29(*
30	maximum outstanding watch events per watch,
31	recommended >= maxoutstanding to avoid blocking backend transactions due to
32	malicious frontends
33 *)
34
35let gc_max_overhead = ref 120 (* 120% see comment in xenstored.ml *)
36let conflict_burst_limit = ref 5.0
37let conflict_max_history_seconds = ref 0.05
38let conflict_rate_limit_is_aggregate = ref true
39
40let domid_self = 0x7FF0
41
42let path_max = ref Xenbus.Partial.xenstore_rel_path_max
43
44exception Not_a_directory of string
45exception Not_a_value of string
46exception Already_exist
47exception Doesnt_exist
48exception Lookup_Doesnt_exist of string
49exception Invalid_path
50exception Permission_denied
51exception Unknown_operation
52