X-Git-Url: https://git.hcoop.net/hcoop/domtool2.git/blobdiff_plain/90dd48df1de3ea116fe2f2c0ec0fe36c71e17e5c..86aa5de7d9f2754d50489432ffaa43cba3fa170f:/src/msgTypes.sml

diff --git a/src/msgTypes.sml b/src/msgTypes.sml
index adf1bba..445f8af 100644
--- a/src/msgTypes.sml
+++ b/src/msgTypes.sml
@@ -54,9 +54,32 @@ datatype msg =
        | MsgRmuser of string
        (* Remove all ACL entries for a user, and remove all domains to which
 	* that user and no one else has rights. *)
-       | MsgCreateDbUser of string
+       | MsgCreateDbUser of {dbtype : string, passwd : string option}
        (* Request creation of a user for the named DBMS type *)
        | MsgCreateDbTable of {dbtype : string, dbname : string}
        (* Request creation of a DBMS table *)
+       | MsgNewMailbox of {domain : string, user : string,
+			   passwd : string, mailbox : string}
+       (* Request creation of a new vmail mapping *)
+       | MsgPasswdMailbox of {domain : string, user : string, passwd : string}
+       (* Change a vmail account's password *)
+       | MsgRmMailbox of {domain : string, user : string}
+       (* Remove a vmail mapping *)
+       | MsgListMailboxes of string
+       (* List all mailboxes for a domain *)
+       | MsgMailboxes of {user : string, mailbox : string} list
+       (* Reply to MsgListMailboxes *)
+       | MsgSaQuery of string
+       (* Check on the SpamAsssassin filtering status of a user or e-mail address *)
+       | MsgSaStatus of bool
+       (* Response to MsgSaQuery *)
+       | MsgSaSet of string * bool
+       (* Set the filtering status of a user or e-mail address *)
+       | MsgSmtpLogReq of string
+       (* Request all current SMTP log lines about a domain *)
+       | MsgSmtpLogRes of string
+       (* One line of a response to MsgSmtpLogReq *)
+       | MsgDbPasswd of {dbtype : string, passwd : string}
+       (* Change a DBMS user's password *)
 
 end