1 files changed, 98 insertions, 0 deletions
diff --git a/app/shorewall/shorewall-controller.lua b/app/shorewall/shorewall-controller.lua
new file mode 100644
index 0000000..78219b7
--- /dev/null
+++ b/app/shorewall/shorewall-controller.lua
@@ -0,0 +1,98 @@
+module(..., package.seeall)
+
+local list_redir = function(self)
+    self.conf.action = "read"
+    self.conf.type = "redir"
+    error(self.conf)
+end
+
+mvc={}
+mvc.on_load = function(self, parent)
+    --TODO: This needs to be looked at 
+    self.cfgfile = self:soft_require("cfgfile-model")
+    setmetatable(self.cfgfile, self.cfgfile)
+    self.cfgfile.__index = self.worker
+    if (self.worker[self.conf.action] == nil) or (self.conf.action == "init") then
+        self.worker[self.conf.action] = list_redir(self)
+    end
+end
+
+-- Public methods
+-- <prefix>/hostname/get
+
+read = function(self)
+    return {
+        list=self.cfgfile:list("firewall"),
+        script=ENV["SCRIPT_NAME"],
+        prefix=self.conf.prefix,
+        controller=self.conf.controller,
+        action="update",
+   }
+end
+
+update = function(self)
+    local id = tonumber(self.clientdata.id) or -1
+    local result
+    local data
+
+    result, data = self.cfgfile:get(id)
+    if not result then return list_redir(self) end
+
+    if self.clientdata.cmd then
+        for k,v in pairs (data) do
+            if self.clientdata[k] then 
+                data[k].value = self.clientdata[k]
+            end
+        end
+        result, data = self.cfgfile:set(id, data)
+	if result then return list_redir(self) end
+    end
+                
+    data.cmd = cfe { type="action", value="save", label="action" }
+    return cfe{ type="form", 
+        option={ script=ENV["SCRIPT_NAME"],
+            prefix=self.conf.prefix,
+            controller = self.conf.controller,
+            action = "update",
+            extra = ""},
+        value = data}
+end
+
+--This is a work in progress, do not review
+local function mkCtlRet(self)
+    return {
+        script=ENV["SCRIPT_NAME"],
+        prefix=self.conf.prefix,
+        controller = self.conf.controller,
+        action={
+          { name="restart", label="Restart" },
+          { name="start", label="Start" },
+          { name="stop", label="Stop" },
+          { name="reload", label="Reload", disabled=true },
+	},
+	title="Shorewall",
+	text={}
+    }
+end
+
+restart = function(self)
+    ret = mkCtlRet(self)
+    if self.clientdata.restart then
+        ret.active = "restart"
+	local f = io.popen("/etc/init.d/shorewall restart", "r")
+	if f then
+            local out = f:read("*a")
+	    f:close()
+	    ret.text[#ret.text + 1] = { label="Restarting", content=out }
+	else
+	    ret.text[#ret.text + 1] = {
+	        label="Error", content="Cannot run /etc/init.d/shorewall"
+	    }
+	end
+    end
+    return ret
+end
+
+--create = update
+--delete = update
+