X-Git-Url: http://git.onelab.eu/?a=blobdiff_plain;f=globals.ml;h=e8dca75b4f78628eea9a5ecaae58959d5a294037;hb=refs%2Fheads%2Ftrellis;hp=8b006c3b9fb897d9601208313998f48641daceec;hpb=a9f606051125de2acc9140074f91054755fa67b4;p=vsys.git diff --git a/globals.ml b/globals.ml index 8b006c3..e8dca75 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" -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