X-Git-Url: http://git.onelab.eu/?a=blobdiff_plain;f=globals.ml;h=4c040571b9994f71ad8fab010079a85e2355598c;hb=acbdd1601fcfb161089d326e7e32b74b76f441e3;hp=8b006c3b9fb897d9601208313998f48641daceec;hpb=a9f606051125de2acc9140074f91054755fa67b4;p=vsys.git diff --git a/globals.ml b/globals.ml index 8b006c3..4c04057 100644 --- a/globals.ml +++ b/globals.ml @@ -1,8 +1,16 @@ +(** Some things that didn't fit in elsewhere *) let backend = ref "" let debug = ref true let vsys_version = "0.5" +let nochroot = ref false +let conffile = ref "" +let pid_filepath = ref "/var/run/vsys.pid" +let log_filepath = ref "/var/log/vsys" +let failsafe = ref false -type fd_and_fname = string option * Unix.file_descr +let logfd = open_out_gen [Open_append;Open_creat] 0o644 !log_filepath +type result = Success | Failed +type fname_and_fd = string option * Unix.file_descr (* Relative path, never precededed by a '/' *) type relpath = Relpath of string