applications/luci-upnp: enable/disable service, live status, allow removing single...
[project/luci.git] / applications / luci-upnp / luasrc / controller / upnp.lua
index c88abdd..fe9d3d8 100644 (file)
@@ -15,16 +15,68 @@ $Id$
 module("luci.controller.upnp", package.seeall)
 
 function index()
-       if not luci.fs.access("/etc/config/upnpd") then
+       if not nixio.fs.access("/etc/config/upnpd") then
                return
        end
-       
-       local page = entry({"admin", "services", "upnp"}, cbi("upnp/upnp"), "UPNP")
+
+       local page
+
+       page = entry({"admin", "services", "upnp"}, cbi("upnp/upnp"), "UPNP")
        page.i18n = "upnp"
        page.dependent = true
-       
-       
-       local page = entry({"mini", "network", "upnp"}, cbi("upnp/upnpmini", {autoapply=true}), "UPNP")
+
+       page = entry({"mini", "network", "upnp"}, cbi("upnp/upnpmini", {autoapply=true}), "UPNP")
        page.i18n = "upnp"
        page.dependent = true
-end
\ No newline at end of file
+
+       entry({"admin", "services", "upnp", "status"}, call("act_status")).leaf = true
+       entry({"admin", "services", "upnp", "delete"}, call("act_delete")).leaf = true
+end
+
+function act_status()
+       local ipt = io.popen("iptables --line-numbers -t nat -xnvL MINIUPNPD")
+       if ipt then
+               local fwd = { }
+               while true do
+                       local ln = ipt:read("*l")
+                       if not ln then
+                               break
+                       elseif ln:match("^%d+") then
+                               local num, proto, extport, intaddr, intport =
+                                       ln:match("^(%d+).-([a-z]+).-dpt:(%d+) to:(%S-):(%d+)")
+
+                               if num and proto and extport and intaddr and intport then
+                                       num     = tonumber(num)
+                                       extport = tonumber(extport)
+                                       intport = tonumber(intport)
+
+                                       fwd[#fwd+1] = {
+                                               num     = num,
+                                               proto   = proto:upper(),
+                                               extport = extport,
+                                               intaddr = intaddr,
+                                               intport = intport
+                                       }
+                               end
+                       end
+               end
+
+               ipt:close()
+
+               luci.http.prepare_content("application/json")
+               luci.http.write_json(fwd)
+       end
+end
+
+function act_delete()
+       local path = luci.dispatcher.context.requestpath
+       local idx = tonumber(path[#path])
+
+       if idx and idx > 0 then
+               luci.sys.call("iptables -t filter -D MINIUPNPD %d 2>/dev/null" % idx)
+               luci.sys.call("iptables -t nat -D MINIUPNPD %d 2>/dev/null" % idx)
+               return
+       end
+
+       luci.http.status(400, "Bad request")
+end