(* HCoop Domtool (http://hcoop.sourceforge.net/)
* Copyright (c) 2006-2007, Adam Chlipala
+ * Copyright (c) 2011, Clinton Ebadi <clinton@unknownlamer.org>
*
* This program is free software; you can redistribute it and/or
* modify it under the terms of the GNU General Public License
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
*)
-(* Firewall rule querying *)
+(* Firewall rule querying/generation *)
signature FIREWALL = sig
+ type firewall_rules = { server_rules : (string list DataStructures.StringMap.map),
+ client_rules : (string list DataStructures.StringMap.map)}
+
val query : string -> string list
(* List a user's local firewall rules. *)
- val generateFirewallConfig : unit -> unit
+ val parseRules : unit -> firewall_rules
+ val generateFirewallConfig : firewall_rules -> bool
+
+ val publishConfig : unit -> bool
end