X-Git-Url: https://git.hcoop.net/hcoop/domtool2.git/blobdiff_plain/737c68d4f3a11a344c7469085615e7a335c9a1b3..1ffc47a68def0e10e393ad4d8e62b7d6f7300c01:/src/main.sig diff --git a/src/main.sig b/src/main.sig index ce81c60..53f019d 100644 --- a/src/main.sig +++ b/src/main.sig @@ -21,6 +21,7 @@ signature MAIN = sig val init : unit -> unit + val setupUser : unit -> string val check : string -> Env.env * Ast.exp option val check' : Env.env -> string -> Env.env @@ -42,7 +43,9 @@ signature MAIN = sig val requestWhoHas : {class : string, value : string} -> string list option val requestRmdom : string list -> unit val requestRegen : unit -> unit + val requestRegenTc : unit -> unit val requestRmuser : string -> unit + val requestDescribe : string -> unit val requestSlavePing : unit -> OS.Process.status val requestSlaveShutdown : unit -> unit @@ -56,6 +59,8 @@ signature MAIN = sig val requestDbUser : {dbtype : string, passwd : string option} -> unit val requestDbPasswd : {dbtype : string, passwd : string} -> unit val requestDbTable : {dbtype : string, dbname : string} -> unit + val requestDbDrop : {dbtype : string, dbname : string} -> unit + val requestDbGrant : {dbtype : string, dbname : string} -> unit val requestListMailboxes : string -> Vmail.listing val requestNewMailbox : {domain : string, user : string, @@ -69,9 +74,12 @@ signature MAIN = sig val requestSmtpLog : string -> unit + val requestMysqlFixperms : unit -> 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