KyoungSoo's update to pl-ps
[vsys.git] / globals.ml
index 4323b3a..2dd7fe9 100644 (file)
@@ -1,6 +1,15 @@
+(** 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
+
+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