diff options
| -rw-r--r-- | app/cfgfile/firewall.cfg | 44 | ||||
| -rw-r--r-- | app/shorewall/shorewall-controller.lua | 98 | ||||
| -rw-r--r-- | app/shorewall/shorewall-html.lsp | 41 | ||||
| -rw-r--r-- | app/shorewall/shorewall-read-html.lsp | 18 | ||||
| -rw-r--r-- | app/shorewall/shorewall.menu | 2 |
5 files changed, 0 insertions, 203 deletions
diff --git a/app/cfgfile/firewall.cfg b/app/cfgfile/firewall.cfg deleted file mode 100644 index 0a143d4..0000000 --- a/app/cfgfile/firewall.cfg +++ /dev/null @@ -1,44 +0,0 @@ --- /* vim: set filetype=lua : */ -{ app="firewall", section="general", - name="params", filename="/etc/shorewall/params", - descr="Define variables used in the other configuration files." }, -{ app="firewall", section="general", - name="shorewall", filename="/etc/shorewall/shorewall.conf", - descr="Modify global configuration settings." }, -{ app="firewall", section="firewalling", - name="zones", filename="/etc/shorewall/zones", - descr="Name network partitions. Firewall rules are applied to defined zones." }, -{ app="firewall", section="firewalling", - name="interfaces", filename="/etc/shorewall/interfaces", - descr="Map physical interfaces to named zones." }, -{ app="firewall", section="firewalling", - name="hosts", filename="/etc/shorewall/hosts", - descr="Name specific hosts within zones." }, -{ app="firewall", section="firewalling", - name="policy", filename="/etc/shorewall/policy", - descr="Set default rules (policies) for zones." }, -{ app="firewall", section="firewalling", - name="rules", filename="/etc/shorewall/rules", - descr="Define exceptions to policies." }, -{ app="firewall", section="firewalling", - name="routestopped", filename="/etc/shorewall/routestopped", - descr="Define hosts that can access this host when the firewall is \"stopped\"" }, -{ app="firewall", section="firewalling", - name="tunnels", filename="/etc/shorewall/tunnels", - descr="Specify ipsec tunnel endpoints" }, -{ app="firewall", section="firewalling", - name="blacklist", filename="/etc/shorewall/blacklist", - descr="List ip addresses or names that should be denied all access to the firewall." }, -{ app="firewall", section="nat", - name="masq", filename="/etc/shorewall/masq", - descr="Define dynamic Masquerading or DNAT tables" }, -{ app="firewall", section="nat", - name="nat", filename="/etc/shorewall/nat", - descr="Define static Network Address Translation table" }, -{ app="firewall", section="qos", - name="tos", filename="/etc/shorewall/tos", - descr="Specify type of service markers for packets traversing the firewall." }, -{ app="firewall", section="qos", - name="tcrules", filename="/etc/shorewall/tcrules", - descr="Define traffic control rules." }, - diff --git a/app/shorewall/shorewall-controller.lua b/app/shorewall/shorewall-controller.lua deleted file mode 100644 index 78219b7..0000000 --- a/app/shorewall/shorewall-controller.lua +++ /dev/null @@ -1,98 +0,0 @@ -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 - diff --git a/app/shorewall/shorewall-html.lsp b/app/shorewall/shorewall-html.lsp deleted file mode 100644 index efb1c38..0000000 --- a/app/shorewall/shorewall-html.lsp +++ /dev/null @@ -1,41 +0,0 @@ -<? -local form = ... -?><h1>Edit <?= form.value.name.value -?></h1><?= html.form.start{ - method="POST", - action= form.option.script .. "/" .. form.option.prefix - .. form.option.controller .. "/" .. form.option.action .. - form.option.extra -} -?><table><? -local myform = form.value -local tags = { - { "content", "longtext" }, - { "cmd", "action" }, - { "id", "hidden" }, -} - -for i,v in pairs(tags) do - local name = v[1] - local val = myform[name] - val.type = v[2] - ?><tr><td><? ---[[ - if val.label then - io.write(val.label) - elseif val.type ~= "hidden" then - io.write(name) - end ---]] - ?></td><td><? - if val.name == "" then val.name = name end - if val.type == "longtext" then - val.cols = 80 - val.rows = 24 - end - ?><?= html.form[val.type](val) - ?></td></tr><? -end -?></table><?= html.form.stop() -?> - diff --git a/app/shorewall/shorewall-read-html.lsp b/app/shorewall/shorewall-read-html.lsp deleted file mode 100644 index cf73662..0000000 --- a/app/shorewall/shorewall-read-html.lsp +++ /dev/null @@ -1,18 +0,0 @@ -<? -local view = ... -?><h1>Edit</h1><table border=0><? -local sct="" -for i,item in ipairs(view.list) do - if item.section ~= sct then - ?><tr><td colspan='2'><h2><?= item.section ?></td></tr><? - sct = item.section - end - ?><tr><td><?= html.link{ - value = view.script .. view.prefix .. view.controller .. "/" - .. view.action .. "?id=" .. tostring(item.id), - label=item.name - } - ?></td><td><?= item.descr - ?></td></tr><? -end -?></table> diff --git a/app/shorewall/shorewall.menu b/app/shorewall/shorewall.menu deleted file mode 100644 index 21066d5..0000000 --- a/app/shorewall/shorewall.menu +++ /dev/null @@ -1,2 +0,0 @@ -Networking Shorewall Define read - |