HCoop
/
hcoop
/
domtool2.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Specifying encoding on database creation
[hcoop/domtool2.git]
/
src
/
main.sig
diff --git
a/src/main.sig
b/src/main.sig
index
cddbeba
..
231fafc
100644
(file)
--- a/
src/main.sig
+++ b/
src/main.sig
@@
-23,14
+23,14
@@
signature MAIN = sig
val init : unit -> unit
val setupUser : unit -> string
val init : unit -> unit
val setupUser : unit -> string
- val check : string -> Env.env * Ast.exp option
+ val check :
Env.env ->
string -> Env.env * Ast.exp option
val check' : Env.env -> string -> Env.env
val checkDir : string -> unit
val basis : unit -> Env.env
val check' : Env.env -> string -> Env.env
val checkDir : string -> unit
val basis : unit -> Env.env
- val reduce :
string ->
Ast.exp option
- val eval :
string -> unit
+ val reduce :
Env.env -> string -> Env.env *
Ast.exp option
+ val eval :
Env.env -> Env.env_vars -> string -> Env.env * Env.env_vars
val request : string -> unit
val requestDir : string -> unit
val request : string -> unit
val requestDir : string -> unit
@@
-45,6
+45,7
@@
signature MAIN = sig
val requestRegen : unit -> unit
val requestRegenTc : unit -> unit
val requestRmuser : string -> 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
val requestSlavePing : unit -> OS.Process.status
val requestSlaveShutdown : unit -> unit
@@
-57,7
+58,9
@@
signature MAIN = sig
val requestDbUser : {dbtype : string, passwd : string option} -> unit
val requestDbPasswd : {dbtype : string, passwd : 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 requestDbTable : {dbtype : string, dbname : string, encoding : string option} -> 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,
val requestListMailboxes : string -> Vmail.listing
val requestNewMailbox : {domain : string, user : string,
@@
-71,6
+74,8
@@
signature MAIN = sig
val requestSmtpLog : string -> unit
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 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