DBMS database creation
[hcoop/domtool2.git] / src / acl.sig
index d815cad..846b331 100644 (file)
@@ -27,6 +27,15 @@ signature ACL = sig
     val query : acl -> bool
     (* Is this permission granted? *)
 
+    val queryAll : string -> (string * string list) list
+    (* What are all of a user's permissions, by class? *)
+
+    val users : unit -> string list
+    (* Which users have been granted privileges? *)
+
+    val whoHas : {class : string, value : string} -> string list
+    (* Which users have a permission? *)
+
     val class : {user : string, class : string} -> DataStructures.StringSet.set
     (* For what objects does the user have the permission? *)
 
@@ -34,6 +43,11 @@ signature ACL = sig
     val revoke : acl -> unit
     (* Grant/ungrant the user the permission. *)
 
+    val revokeFromAll : {class : string, value : string} -> unit
+
+    val rmuser : string -> unit
+    (* Remove all of a user's privileges. *)
+
     val read : string -> unit
     val write : string -> unit
     (* Read/write saved ACL state from/to a file *)