smtplog
[hcoop/domtool2.git] / src / main.sig
index c086bd5..c4f9b19 100644 (file)
@@ -38,12 +38,28 @@ signature MAIN = sig
     val requestRevoke : Acl.acl -> unit
     val requestListPerms : string -> (string * string list) list option
     val requestWhoHas : {class : string, value : string} -> string list option
-    val requestRmdom : string -> unit
+    val requestRmdom : string list -> unit
     val requestRegen : unit -> unit
+    val requestRmuser : string -> unit
 
     val service : unit -> unit
     val slave : unit -> unit
 
+    val listBasis : unit -> string list
     val autodocBasis : string -> unit
 
+    val requestDbUser : {dbtype : string, passwd : string option} -> unit
+    val requestDbTable : {dbtype : string, dbname : string} -> unit
+
+    val requestListMailboxes : string -> Vmail.listing
+    val requestNewMailbox : {domain : string, user : string,
+                            passwd : string, mailbox : string} -> unit
+    val requestPasswdMailbox : {domain : string, user : string, passwd : string}
+                              -> unit
+    val requestRmMailbox : {domain : string, user : string} -> unit
+
+    val requestSaQuery : string -> unit
+    val requestSaSet : string * bool -> unit
+
+    val requestSmtpLog : string -> unit
 end