X-Git-Url: https://git.hcoop.net/hcoop/domtool2.git/blobdiff_plain/90dd48df1de3ea116fe2f2c0ec0fe36c71e17e5c..cd04086681583dd3fcc95b6e12ba312054dc590e:/src/dbms.sig diff --git a/src/dbms.sig b/src/dbms.sig index b2a74c0..ab6772e 100644 --- a/src/dbms.sig +++ b/src/dbms.sig @@ -22,8 +22,12 @@ signature DBMS = sig val validDbname : string -> bool - type handler = {adduser : string -> string option, - createdb : {user : string, dbname : string} -> string option} + type handler = {getpass : (unit -> Client.passwd_result) option, + adduser : {user : string, passwd : string option} -> string option, + passwd : {user : string, passwd : string} -> string option, + createdb : {user : string, dbname : string} -> string option, + dropdb : {user : string, dbname : string} -> string option, + grant : {user : string, dbname : string} -> string option} val register : string * handler -> unit val lookup : string -> handler option