Firewall rule look-up

[hcoop/domtool2.git] / src / main.sig

diff --git a/src/main.sig b/src/main.sig
index c4f9b19..3b0c791 100644 (file)
--- a/src/main.sig
+++ b/src/main.sig
@@ -34,6 +34,8 @@ signature MAIN = sig
     val request : string -> unit
     val requestDir : string -> unit
 
+    val requestPing : unit -> OS.Process.status
+    val requestShutdown : unit -> unit
     val requestGrant : Acl.acl -> unit
     val requestRevoke : Acl.acl -> unit
     val requestListPerms : string -> (string * string list) list option
@@ -42,6 +44,9 @@ signature MAIN = sig
     val requestRegen : unit -> unit
     val requestRmuser : string -> unit
 
+    val requestSlavePing : unit -> OS.Process.status
+    val requestSlaveShutdown : unit -> unit
+
     val service : unit -> unit
     val slave : unit -> unit
 
@@ -49,6 +54,7 @@ signature MAIN = sig
     val autodocBasis : string -> unit
 
     val requestDbUser : {dbtype : string, passwd : string option} -> unit
+    val requestDbPasswd : {dbtype : string, passwd : string} -> unit
     val requestDbTable : {dbtype : string, dbname : string} -> unit
 
     val requestListMailboxes : string -> Vmail.listing
@@ -62,4 +68,11 @@ signature MAIN = sig
     val requestSaSet : string * bool -> unit
 
     val requestSmtpLog : string -> unit
+
+    val requestApt : {node : string, pkg : string} -> OS.Process.status
+    val requestCron : {node : string, uname : string} -> OS.Process.status
+    val requestFtp : {node : string, uname : string} -> OS.Process.status
+    val requestTrustedPath : {node : string, uname : string} -> OS.Process.status
+    val requestSocketPerm : {node : string, uname : string} -> OS.Process.status
+    val requestFirewall : {node : string, uname : string} -> OS.Process.status
 end