New application luci-upnp for luci-full and luci-mini

2 files changed, 63 insertions, 0 deletions

diff --git a/applications/luci-upnp/luasrc/model/cbi/upnp/upnp.lua b/applications/luci-upnp/luasrc/model/cbi/upnp/upnp.lua
new file mode 100644
index 0000000000..79a38f7c53
--- /dev/null
+++ b/applications/luci-upnp/luasrc/model/cbi/upnp/upnp.lua
@@ -0,0 +1,32 @@
+--[[
+LuCI - Lua Configuration Interface
+
+Copyright 2008 Steven Barth <steven@midlink.org>
+Copyright 2008 Jo-Philipp Wich <xm@leipzig.freifunk.net>
+
+Licensed under the Apache License, Version 2.0 (the "License");
+you may not use this file except in compliance with the License.
+You may obtain a copy of the License at
+
+	http://www.apache.org/licenses/LICENSE-2.0
+
+$Id$
+]]--
+m = Map("upnpd", translate("upnpd"), translate("upnpd_desc"))
+
+s = m:section(NamedSection, "config", "upnpd", "")
+e = s:option(Flag, "enabled", translate("enable"))
+function e.write(self, section, value)
+	local cmd = (value == "1") and "enable" or "disable"
+	os.execute("/etc/init.d/miniupnpd " .. cmd)
+end
+
+function e.cfgvalue(self, section)
+	return (os.execute("/etc/init.d/miniupnpd enabled") == 0) and "1" or "0"
+end
+
+s:option(Flag, "log_output").rmempty = true
+s:option(Value, "download").rmempty = true
+s:option(Value, "upload").rmempty = true
+
+return m
\ No newline at end of file
diff --git a/applications/luci-upnp/luasrc/model/cbi/upnp/upnpmini.lua b/applications/luci-upnp/luasrc/model/cbi/upnp/upnpmini.lua
new file mode 100644
index 0000000000..592388348c
--- /dev/null
+++ b/applications/luci-upnp/luasrc/model/cbi/upnp/upnpmini.lua
@@ -0,0 +1,31 @@
+--[[
+LuCI - Lua Configuration Interface
+
+Copyright 2008 Steven Barth <steven@midlink.org>
+Copyright 2008 Jo-Philipp Wich <xm@leipzig.freifunk.net>
+
+Licensed under the Apache License, Version 2.0 (the "License");
+you may not use this file except in compliance with the License.
+You may obtain a copy of the License at
+
+	http://www.apache.org/licenses/LICENSE-2.0
+
+$Id$
+]]--
+m = Map("upnpd", translate("upnpd"), translate("upnpd_desc"))
+
+s = m:section(NamedSection, "config", "upnpd", "")
+e = s:option(Flag, "enabled", translate("enable"))
+function e.write(self, section, value)
+	local cmd = (value == "1") and "enable" or "disable"
+	os.execute("/etc/init.d/miniupnpd " .. cmd)
+end
+
+function e.cfgvalue(self, section)
+	return (os.execute("/etc/init.d/miniupnpd enabled") == 0) and "1" or "0"
+end
+
+s:option(Value, "download").rmempty = true
+s:option(Value, "upload").rmempty = true
+
+return m
\ No newline at end of file