X-Git-Url: https://git.hcoop.net/hcoop/domtool2.git/blobdiff_plain/0868840155aca9662f97318b114a07ae4c8319d6..c9731b9b3ee43c4c8d82c31009a5870a01d3acfa:/src/main.sig diff --git a/src/main.sig b/src/main.sig index e9a8d2d..6c00df4 100644 --- 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,11 +54,18 @@ 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 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