2 LuCI - Lua Configuration Interface
4 Copyright 2008 Steven Barth <steven@midlink.org>
5 Copyright 2008 Jo-Philipp Wich <xm@leipzig.freifunk.net>
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
11 http://www.apache.org/licenses/LICENSE-2.0
16 require("luci.tools.webadmin")
19 local has_3g = luci.fs.mtime("/usr/bin/gcom")
20 local has_pptp = luci.fs.mtime("/usr/sbin/pptp")
21 local has_pppd = luci.fs.mtime("/usr/sbin/pppd")
22 local has_pppoe = luci.fs.glob("/usr/lib/pppd/*/rp-pppoe.so")
23 local has_pppoa = luci.fs.glob("/usr/lib/pppd/*/pppoatm.so")
25 m = Map("network", translate("interfaces"), translate("a_n_ifaces1"))
27 s = m:section(NamedSection, arg[1], "interface")
30 back = s:option(DummyValue, "_overview", translate("overview"))
32 back.titleref = luci.dispatcher.build_url("admin", "network", "network")
34 p = s:option(ListValue, "proto", translate("protocol"))
35 p.override_scheme = true
37 p:value("static", translate("static"))
38 p:value("dhcp", "DHCP")
39 if has_pppd then p:value("ppp", "PPP") end
40 if has_pppoe then p:value("pppoe", "PPPoE") end
41 if has_pppoa then p:value("pppoa", "PPPoA") end
42 if has_3g then p:value("3g", "UMTS/3G") end
43 if has_pptp then p:value("pptp", "PPTP") end
45 if not ( has_pppd and has_pppoe and has_pppoa and has_3g and has_pptp ) then
46 p.description = translate("network_interface_prereq")
49 br = s:option(Flag, "type", translate("a_n_i_bridge"), translate("a_n_i_bridge1"))
53 ifname = s:option(Value, "ifname", translate("interface"))
55 for i,d in ipairs(luci.sys.net.devices()) do
61 local zones = luci.tools.webadmin.network_get_zones(arg[1])
66 fwzone = s:option(Value, "_fwzone",
67 translate("network_interface_fwzone"),
68 translate("network_interface_fwzone_desc"))
70 fwzone:value("", "- " .. translate("none") .. " -")
72 m.uci:load("firewall")
73 m.uci:foreach("firewall", "zone",
75 fwzone:value(section.name)
79 function fwzone.write(self, section, value)
80 local zone = luci.tools.webadmin.firewall_find_zone(value)
84 stat = m.uci:section("firewall", "zone", nil, {
89 local net = m.uci:get("firewall", zone, "network")
90 net = (net or value) .. " " .. section
91 stat = m.uci:set("firewall", zone, "network", net)
95 self.render = function() end
99 fwzone = s:option(DummyValue, "_fwzone", translate("zone"))
100 fwzone.value = table.concat(zones, ", ")
102 fwzone.titleref = luci.dispatcher.build_url("admin", "network", "firewall", "zones")
103 m.uci:unload("firewall")
106 ipaddr = s:option(Value, "ipaddr", translate("ipaddress"))
107 ipaddr.rmempty = true
108 ipaddr:depends("proto", "static")
110 nm = s:option(Value, "netmask", translate("netmask"))
112 nm:depends("proto", "static")
113 nm:value("255.255.255.0")
114 nm:value("255.255.0.0")
115 nm:value("255.0.0.0")
117 gw = s:option(Value, "gateway", translate("gateway"))
118 gw:depends("proto", "static")
121 bcast = s:option(Value, "bcast", translate("broadcast"))
122 bcast:depends("proto", "static")
123 bcast.optional = true
125 ip6addr = s:option(Value, "ip6addr", translate("ip6address"), translate("cidr6"))
126 ip6addr.optional = true
127 ip6addr:depends("proto", "static")
129 ip6gw = s:option(Value, "ip6gw", translate("gateway6"))
130 ip6gw:depends("proto", "static")
131 ip6gw.optional = true
133 dns = s:option(Value, "dns", translate("dnsserver"))
134 dns:depends("proto", "static")
137 mtu = s:option(Value, "mtu", "MTU")
141 mac = s:option(Value, "macaddr", translate("macaddress"))
145 srv = s:option(Value, "server", translate("network_interface_server"))
146 srv:depends("proto", "pptp")
149 service = s:option(ListValue, "service", translate("network_interface_service"))
150 service:value("umts", "UMTS/GPRS")
151 service:value("cdma", "CDMA")
152 service:value("evdo", "EV-DO")
153 service:depends("proto", "3g")
155 apn = s:option(Value, "apn", translate("network_interface_apn"))
156 apn:depends("proto", "3g")
158 pincode = s:option(Value, "pincode",
159 translate("network_interface_pincode"),
160 translate("network_interface_pincode_desc")
162 pincode:depends("proto", "3g")
164 user = s:option(Value, "username", translate("username"))
166 user:depends("proto", "pptp")
167 user:depends("proto", "pppoe")
168 user:depends("proto", "ppp")
169 user:depends("proto", "3g")
171 pass = s:option(Value, "password", translate("password"))
174 pass:depends("proto", "pptp")
175 pass:depends("proto", "pppoe")
176 pass:depends("proto", "ppp")
177 pass:depends("proto", "3g")
179 ka = s:option(Value, "keepalive",
180 translate("network_interface_keepalive"),
181 translate("network_interface_keepalive_desc")
184 ka:depends("proto", "pptp")
185 ka:depends("proto", "pppoe")
186 ka:depends("proto", "ppp")
187 ka:depends("proto", "3g")
189 demand = s:option(Value, "demand",
190 translate("network_interface_demand"),
191 translate("network_interface_demand_desc")
193 demand.optional = true
194 demand:depends("proto", "pptp")
195 demand:depends("proto", "pppoe")
196 demand:depends("proto", "ppp")
197 demand:depends("proto", "3g")
199 device = s:option(Value, "device",
200 translate("network_interface_device"),
201 translate("network_interface_device_desc")
203 device:depends("proto", "ppp")
204 device:depends("proto", "3g")
206 defaultroute = s:option(Flag, "defaultroute",
207 translate("network_interface_defaultroute"),
208 translate("network_interface_defaultroute_desc")
210 defaultroute:depends("proto", "ppp")
211 defaultroute:depends("proto", "3g")
213 peerdns = s:option(Flag, "peerdns",
214 translate("network_interface_peerdns"),
215 translate("network_interface_peerdns_desc")
217 peerdns:depends("proto", "ppp")
219 ipv6 = s:option(Flag, "ipv6", translate("network_interface_ipv6") )
220 ipv6:depends("proto", "ppp")
221 --ipv6:depends("proto", "3g")
223 connect = s:option(Value, "connect",
224 translate("network_interface_connect"),
225 translate("network_interface_connect_desc")
227 connect.optional = true
228 connect:depends("proto", "ppp")
229 connect:depends("proto", "3g")
231 disconnect = s:option(Value, "disconnect",
232 translate("network_interface_disconnect"),
233 translate("network_interface_disconnect_desc")
235 disconnect.optional = true
236 disconnect:depends("proto", "ppp")
237 disconnect:depends("proto", "3g")
239 pppd_options = s:option(Value, "pppd_options",
240 translate("network_interface_pppd_options"),
241 translate("network_interface_pppd_options_desc")
243 pppd_options.optional = true
244 pppd_options:depends("proto", "ppp")
245 pppd_options:depends("proto", "3g")
247 maxwait = s:option(Value, "maxwait",
248 translate("network_interface_maxwait"),
249 translate("network_interface_maxwait_desc")
251 maxwait.optional = true
252 maxwait:depends("proto", "3g")
255 s2 = m:section(TypedSection, "alias", translate("aliases"))
258 s2:depends("interface", arg[1])
259 s2.defaults.interface = arg[1]
262 s2.defaults.proto = "static"
264 ipaddr = s2:option(Value, "ipaddr", translate("ipaddress"))
265 ipaddr.rmempty = true
267 nm = s2:option(Value, "netmask", translate("netmask"))
269 nm:value("255.255.255.0")
270 nm:value("255.255.0.0")
271 nm:value("255.0.0.0")
273 gw = s2:option(Value, "gateway", translate("gateway"))
276 bcast = s2:option(Value, "bcast", translate("broadcast"))
277 bcast.optional = true
279 ip6addr = s2:option(Value, "ip6addr", translate("ip6address"), translate("cidr6"))
280 ip6addr.optional = true
282 ip6gw = s2:option(Value, "ip6gw", translate("gateway6"))
283 ip6gw.optional = true
285 dns = s2:option(Value, "dns", translate("dnsserver"))