de38afc712b7b6a804c1b15e5b86cfbda49735ca
[project/luci.git] / applications / luci-upnp / luasrc / model / cbi / upnp / upnp.lua
1 --[[
2 LuCI - Lua Configuration Interface
3
4 Copyright 2008 Steven Barth <steven@midlink.org>
5 Copyright 2008-2011 Jo-Philipp Wich <xm@subsignal.org>
6
7 Licensed under the Apache License, Version 2.0 (the "License");
8 you may not use this file except in compliance with the License.
9 You may obtain a copy of the License at
10
11 http://www.apache.org/licenses/LICENSE-2.0
12
13 $Id$
14 ]]--
15
16 m = Map("upnpd", translate("Universal Plug & Play"),
17 translate("UPnP allows clients in the local network to automatically configure the router."))
18
19 m:section(SimpleSection).template = "upnp_status"
20
21 s = m:section(NamedSection, "config", "upnpd", translate("MiniUPnP settings"))
22 s.addremove = false
23 s:tab("general", translate("General Settings"))
24 s:tab("advanced", translate("Advanced Settings"))
25
26 e = s:taboption("general", Flag, "_init", translate("Start UPnP and NAT-PMP service"))
27 e.rmempty = false
28
29 function e.cfgvalue(self, section)
30 return luci.sys.init.enabled("miniupnpd") and self.enabled or self.disabled
31 end
32
33 function e.write(self, section, value)
34 if value == "1" then
35 luci.sys.call("/etc/init.d/miniupnpd enable >/dev/null")
36 luci.sys.call("/etc/init.d/miniupnpd start >/dev/null")
37 else
38 luci.sys.call("/etc/init.d/miniupnpd stop >/dev/null")
39 luci.sys.call("/etc/init.d/miniupnpd disable >/dev/null")
40 end
41 end
42
43 s:taboption("general", Flag, "enable_upnp", translate("Enable UPnP functionality")).default = "1"
44 s:taboption("general", Flag, "enable_natpmp", translate("Enable NAT-PMP functionality")).default = "1"
45
46 s:taboption("general", Flag, "secure_mode", translate("Enable secure mode"),
47 translate("Allow adding forwards only to requesting ip addresses")).default = "1"
48
49 s:taboption("general", Flag, "log_output", translate("Enable additional logging"),
50 translate("Puts extra debugging information into the system log"))
51
52 s:taboption("general", Value, "download", translate("Downlink"),
53 translate("Value in KByte/s, informational only")).rmempty = true
54
55 s:taboption("general", Value, "upload", translate("Uplink"),
56 translate("Value in KByte/s, informational only")).rmempty = true
57
58 port = s:taboption("general", Value, "port", translate("Port"))
59 port.datatype = "port"
60 port.default = 5000
61
62
63 s:taboption("advanced", Flag, "system_uptime", translate("Report system instead of daemon uptime")).default = "1"
64
65 s:taboption("advanced", Value, "uuid", translate("Device UUID"))
66 s:taboption("advanced", Value, "serial_number", translate("Announced serial number"))
67 s:taboption("advanced", Value, "model_number", translate("Announced model number"))
68
69 ni = s:taboption("advanced", Value, "notify_interval", translate("Notify interval"))
70 ni.datatype = "uinteger"
71 ni.placeholder = 30
72
73 ct = s:taboption("advanced", Value, "clean_ruleset_threshold", translate("Clean rules threshold"))
74 ct.datatype = "uinteger"
75 ct.placeholder = 20
76
77 ci = s:taboption("advanced", Value, "clean_ruleset_interval", translate("Clean rules interval"))
78 ci.datatype = "uinteger"
79 ci.placeholder = 600
80
81 pu = s:taboption("advanced", Value, "presentation_url", translate("Presentation URL"))
82 pu.placeholder = "http://192.168.1.1/"
83
84 lf = s:taboption("advanced", Value, "upnp_lease_file", translate("UPnP lease file"))
85 lf.placeholder = "/var/log/upnp.leases"
86
87
88 s2 = m:section(TypedSection, "perm_rule", translate("MiniUPnP ACLs"),
89 translate("ACLs specify which external ports may be redirected to which internal addresses and ports"))
90
91 s2.template = "cbi/tblsection"
92 s2.sortable = true
93 s2.anonymous = true
94 s2.addremove = true
95
96 s2:option(Value, "comment", translate("Comment"))
97
98 ep = s2:option(Value, "ext_ports", translate("External ports"))
99 ep.datatype = "portrange"
100 ep.placeholder = "0-65535"
101
102 ia = s2:option(Value, "int_addr", translate("Internal addresses"))
103 ia.datatype = "ip4addr"
104 ia.placeholder = "0.0.0.0/0"
105
106 ip = s2:option(Value, "int_ports", translate("Internal ports"))
107 ip.datatype = "portrange"
108 ip.placeholder = "0-65535"
109
110 ac = s2:option(ListValue, "action", translate("Action"))
111 ac:value("allow")
112 ac:value("deny")
113
114 return m