Listing vmail mailboxes

[hcoop/domtool2.git] / src / msgTypes.sml

diff --git a/src/msgTypes.sml b/src/msgTypes.sml
index 89ab255..cc792ff 100644 (file)
--- a/src/msgTypes.sml
+++ b/src/msgTypes.sml
@@ -46,10 +46,28 @@ datatype msg =
        (* These are the users! *)
        | MsgMultiConfig of string list
        (* Multiple Domtool sources in dependency order *)
-       | MsgRmdom of string
-       (* Remove all configuration associated with a domain and revoke rights
-       * to that domain from all users. *)
+       | MsgRmdom of string list
+       (* Remove all configuration associated with some domains and revoke
+       * rights to those domains from all users. *)
        | MsgRegenerate
        (* Make a clean slate of it and reprocess all configuration from scratch. *)
+       | 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 {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 string list
+       (* Reply to MsgListMailboxes *)
 
 end