(* What socket permissions does this user have? *)
| QFirewall of string
(* What firewall rules does this user have? *)
+ | QAptExists of string
+ (* Does this apt package exist *)
datatype msg =
MsgOk
(* Server tells slave that vmail user information has changed *)
| MsgFirewallRegen
(* Regenerate firewall on user machines *)
+ | MsgAptQuery of {section : string, description : string}
+ (* Answer to QAptExists query *)
end