* luci/modules/admin-full: fix reversed macfilter logic
[project/luci.git] / modules / admin-full / luasrc / model / cbi / admin_network / wifi.lua
1 --[[
2 LuCI - Lua Configuration Interface
3
4 Copyright 2008 Steven Barth <steven@midlink.org>
5
6 Licensed under the Apache License, Version 2.0 (the "License");
7 you may not use this file except in compliance with the License.
8 You may obtain a copy of the License at
9
10 http://www.apache.org/licenses/LICENSE-2.0
11
12 $Id$
13 ]]--
14 require("luci.tools.webadmin")
15 arg[1] = arg[1] or ""
16
17 m = Map("wireless", translate("networks"), translate("a_w_networks1"))
18
19 s = m:section(NamedSection, arg[1], "wifi-device", translate("device") .. " " .. arg[1])
20 s.addremove = false
21
22 back = s:option(DummyValue, "_overview", translate("overview"))
23 back.value = ""
24 back.titleref = luci.dispatcher.build_url("admin", "network", "wireless")
25
26
27 en = s:option(Flag, "disabled", translate("enable"))
28 en.enabled = "0"
29 en.disabled = "1"
30
31 function en.cfgvalue(self, section)
32 return Flag.cfgvalue(self, section) or "0"
33 end
34
35 s:option(DummyValue, "type", translate("type"))
36 local hwtype = m:get(arg[1], "type")
37 -- NanoFoo
38 local nsantenna = m:get(arg[1], "antenna")
39
40 ch = s:option(Value, "channel", translate("a_w_channel"))
41 for i=1, 14 do
42 ch:value(i, i .. " (2.4 GHz)")
43 end
44 for i=36, 64, 4 do
45 ch:value(i, i .. " (5 GHz)")
46 end
47 for i=100, 140, 4 do
48 ch:value(i, i .. " (5 GHz)")
49 end
50 ch:value(147, 147 .. " (5 GHz)")
51 ch:value(151, 151 .. " (5 GHz)")
52 ch:value(155, 155 .. " (5 GHz)")
53 ch:value(167, 167 .. " (5 GHz)")
54
55 ------------------- MAC80211 Device ------------------
56
57 if hwtype == "mac80211" then
58
59 end
60
61
62 ------------------- Madwifi Device ------------------
63
64 if hwtype == "atheros" then
65 mode = s:option(ListValue, "mode", translate("mode"))
66 mode:value("", translate("wifi_auto"))
67 mode:value("11b", "802.11b")
68 mode:value("11g", "802.11g")
69 mode:value("11a", "802.11a")
70 mode:value("11bg", "802.11b+g")
71 mode:value("11gdt", "802.11adt")
72 mode:value("11adt", "802.11adt")
73 mode:value("fh", translate("wifi_fh"))
74
75 s:option(Flag, "diversity", translate("wifi_diversity"))
76
77 if not nsantenna then
78 s:option(Value, "txantenna", translate("wifi_txantenna")).optional = true
79 s:option(Value, "rxantenna", translate("wifi_rxantenna")).optional = true
80 else -- NanoFoo
81 local ant = s:option(ListValue, "antenna", translate("wifi_txantenna"))
82 ant:value("auto")
83 ant:value("vertical")
84 ant:value("horizontal")
85 ant:value("external")
86 end
87 s:option(Value, "distance", translate("wifi_distance"),
88 translate("wifi_distance_desc")).optional = true
89
90 --s:option(Flag, "nosbeacon", translate("wifi_nosbeacon")).optional = true
91 end
92
93
94
95 ------------------- Broadcom Device ------------------
96
97 if hwtype == "broadcom" then
98 mp = s:option(ListValue, "macfilter", translate("wifi_macpolicy"))
99 mp.optional = true
100 mp:value("")
101 mp:value("allow", translate("wifi_whitelist"))
102 mp:value("deny", translate("wifi_blacklist"))
103 ml = s:option(DynamicList, "maclist", translate("wifi_maclist"))
104 ml:depends({macfilter="allow"})
105 ml:depends({macfilter="deny"})
106
107 s:option(Value, "txantenna", translate("wifi_txantenna")).optional = true
108 s:option(Value, "rxantenna", translate("wifi_rxantenna")).optional = true
109
110 s:option(Flag, "frameburst", translate("wifi_bursting")).optional = true
111
112 s:option(Value, "distance", translate("wifi_distance")).optional = true
113 --s:option(Value, "slottime", translate("wifi_slottime")).optional = true
114
115 s:option(Value, "country", translate("wifi_country")).optional = true
116 s:option(Value, "maxassoc", translate("wifi_maxassoc")).optional = true
117 end
118
119
120 ----------------------- Interface -----------------------
121
122 s = m:section(TypedSection, "wifi-iface", translate("interfaces"))
123 s.addremove = true
124 s.anonymous = true
125 s:depends("device", arg[1])
126 s.defaults.device = arg[1]
127
128 s:option(Value, "ssid", translate("wifi_essid"))
129
130 network = s:option(Value, "network", translate("network"), translate("a_w_network1"))
131 network.rmempty = true
132 network:value("")
133 network.combobox_manual = translate("a_w_netmanual")
134 luci.tools.webadmin.cbi_add_networks(network)
135
136 function network.write(self, section, value)
137 if not m.uci:get("network", value) then
138 -- avoid "value not defined in enum" because network is not known yet
139 s.override_scheme = true
140
141 m:chain("network")
142 m.uci:set("network", value, "interface")
143 Value.write(self, section, value)
144 else
145 if m.uci:get("network", value) == "interface" then
146 Value.write(self, section, value)
147 end
148 end
149 end
150
151
152 mode = s:option(ListValue, "mode", translate("mode"))
153 mode.override_values = true
154 mode:value("ap", translate("a_w_ap"))
155 mode:value("adhoc", translate("a_w_adhoc"))
156 mode:value("sta", translate("a_w_client"))
157
158 bssid = s:option(Value, "bssid", translate("wifi_bssid"))
159
160
161 -------------------- MAC80211 Interface ----------------------
162
163 if hwtype == "mac80211" then
164 mode:value("monitor", translate("a_w_monitor"))
165 bssid:depends({mode="adhoc"})
166
167 s:option(Value, "txpower", translate("a_w_txpwr"), "dBm").rmempty = true
168 s:option(Value, "frag", translate("wifi_frag")).optional = true
169 s:option(Value, "rts", translate("wifi_rts")).optional = true
170 end
171
172
173
174 -------------------- Madwifi Interface ----------------------
175
176 if hwtype == "atheros" then
177 mode:value("ahdemo", translate("a_w_ahdemo"))
178 mode:value("monitor", translate("a_w_monitor"))
179
180 bssid:depends({mode="adhoc"})
181 bssid:depends({mode="ahdemo"})
182
183 wds = s:option(Flag, "wds", translate("a_w_wds"))
184 wds:depends({mode="ap"})
185 wds:depends({mode="sta"})
186 wds.rmempty = true
187 wdssep = s:option(Flag, "wdssep", translate("wifi_wdssep"))
188 wdssep:depends({mode="ap", wds="1"})
189 wdssep.optional = true
190
191 s:option(Flag, "doth", "802.11h").optional = true
192 s:option(Value, "txpower", translate("a_w_txpwr"), "dBm").rmempty = true
193 hidden = s:option(Flag, "hidden", translate("wifi_hidden"))
194 hidden:depends({mode="ap"})
195 hidden:depends({mode="adhoc"})
196 hidden:depends({mode="wds"})
197 hidden.optional = true
198 isolate = s:option(Flag, "isolate", translate("wifi_isolate"),
199 translate("wifi_isolate_desc"))
200 isolate:depends({mode="ap"})
201 isolate.optional = true
202 s:option(Flag, "bgscan", translate("wifi_bgscan")).optional = true
203
204 mp = s:option(ListValue, "macpolicy", translate("wifi_macpolicy"))
205 mp.optional = true
206 mp:value("")
207 mp:value("deny", translate("wifi_whitelist"))
208 mp:value("allow", translate("wifi_blacklist"))
209 ml = s:option(DynamicList, "maclist", translate("wifi_maclist"))
210 ml:depends({macpolicy="allow"})
211 ml:depends({macpolicy="deny"})
212
213 s:option(Value, "rate", translate("wifi_rate")).optional = true
214 s:option(Value, "mcast_rate", translate("wifi_mcast_rate")).optional = true
215 s:option(Value, "frag", translate("wifi_frag")).optional = true
216 s:option(Value, "rts", translate("wifi_rts")).optional = true
217 s:option(Value, "minrate", translate("wifi_minrate")).optional = true
218 s:option(Value, "maxrate", translate("wifi_maxrate")).optional = true
219 s:option(Flag, "compression", translate("wifi_compression")).optional = true
220
221 s:option(Flag, "bursting", translate("wifi_bursting")).optional = true
222 s:option(Flag, "turbo", translate("wifi_turbo")).optional = true
223 s:option(Value, "ff", translate("wifi_ff")).optional = true
224
225 s:option(Flag, "wmm", translate("wifi_wmm")).optional = true
226 s:option(Flag, "xr", translate("wifi_xr")).optional = true
227 s:option(Flag, "ar", translate("wifi_ar")).optional = true
228
229 local swm = s:option(Flag, "sw_merge", translate("wifi_nosbeacon"))
230 swm:depends({mode="adhoc"})
231 swm.optional = true
232
233 local nos = s:option(Flag, "nosbeacon", translate("wifi_nosbeacon"))
234 nos:depends({mode="sta"})
235 nos.optional = true
236 end
237
238
239 -------------------- Broadcom Interface ----------------------
240
241 if hwtype == "broadcom" then
242 mode:value("wds", translate("a_w_wds"))
243 mode:value("monitor", translate("a_w_monitor"))
244
245 s:option(Value, "txpower", translate("a_w_txpwr"), "dBm").rmempty = true
246
247 hidden = s:option(Flag, "hidden", translate("wifi_hidden"))
248 hidden:depends({mode="ap"})
249 hidden:depends({mode="adhoc"})
250 hidden:depends({mode="wds"})
251 hidden.optional = true
252
253 isolate = s:option(Flag, "isolate", translate("wifi_isolate"),
254 translate("wifi_isolate_desc"))
255 isolate:depends({mode="ap"})
256 isolate.optional = true
257
258 bssid:depends({mode="wds"})
259 end
260
261
262
263 ------------------- WiFI-Encryption -------------------
264
265 encr = s:option(ListValue, "encryption", translate("encryption"))
266 encr.override_values = true
267 encr:depends({mode="ap"})
268 encr:depends({mode="sta"})
269 encr:depends({mode="adhoc"})
270 encr:depends({mode="ahdemo"})
271 encr:depends({mode="wds"})
272
273 encr:value("none", "No Encryption")
274 encr:value("wep", "WEP")
275
276 if hwtype == "atheros" or hwtype == "mac80211" then
277 local supplicant = luci.fs.mtime("/usr/sbin/wpa_supplicant")
278 local hostapd = luci.fs.mtime("/usr/sbin/hostapd")
279
280 if hostapd and supplicant then
281 encr:value("psk", "WPA-PSK")
282 encr:value("psk2", "WPA2-PSK")
283 encr:value("wpa", "WPA-EAP", {mode="ap"}, {mode="sta"})
284 encr:value("wpa2i", "WPA2-EAP", {mode="ap"}, {mode="sta"})
285 elseif hostapd and not supplicant then
286 encr:value("psk", "WPA-PSK", {mode="ap"}, {mode="adhoc"}, {mode="ahdemo"})
287 encr:value("psk2", "WPA2-PSK", {mode="ap"}, {mode="adhoc"}, {mode="ahdemo"})
288 encr:value("wpa", "WPA-EAP", {mode="ap"})
289 encr:value("wpa2i", "WPA2-EAP", {mode="ap"})
290 encr.description = translate("wifi_wpareq")
291 elseif not hostapd and supplicant then
292 encr:value("psk", "WPA-PSK", {mode="sta"})
293 encr:value("psk2", "WPA2-PSK", {mode="sta"})
294 encr:value("wpa", "WPA-EAP", {mode="sta"})
295 encr:value("wpa2i", "WPA2-EAP", {mode="sta"})
296 encr.description = translate("wifi_wpareq")
297 else
298 encr.description = translate("wifi_wpareq")
299 end
300 elseif hwtype == "broadcom" then
301 encr:value("psk", "WPA-PSK")
302 encr:value("psk2", "WPA2-PSK")
303 end
304
305 encr:depends("mode", "ap")
306 encr:depends("mode", "sta")
307 encr:depends("mode", "wds")
308
309 server = s:option(Value, "server", translate("a_w_radiussrv"))
310 server:depends({mode="ap", encryption="wpa"})
311 server:depends({mode="ap", encryption="wpa2i"})
312 server.rmempty = true
313
314 port = s:option(Value, "port", translate("a_w_radiusport"))
315 port:depends({mode="ap", encryption="wpa"})
316 port:depends({mode="ap", encryption="wpa2i"})
317 port.rmempty = true
318
319 key = s:option(Value, "key", translate("key"))
320 key:depends("encryption", "wep")
321 key:depends("encryption", "psk")
322 key:depends({mode="ap", encryption="wpa"})
323 key:depends("encryption", "psk2")
324 key:depends({mode="ap", encryption="wpa2i"})
325 key.rmempty = true
326
327 if hwtype == "atheros" or hwtype == "mac80211" then
328 nasid = s:option(Value, "nasid", translate("a_w_nasid"))
329 nasid:depends({mode="ap", encryption="wpa"})
330 nasid:depends({mode="ap", encryption="wpa2i"})
331 nasid.rmempty = true
332
333 eaptype = s:option(ListValue, "eap_type", translate("a_w_eaptype"))
334 eaptype:value("TLS")
335 eaptype:value("PEAP")
336 eaptype:depends({mode="sta", encryption="wpa"})
337 eaptype:depends({mode="sta", encryption="wpa2i"})
338
339 cacert = s:option(FileUpload, "ca_cert", translate("a_w_cacert"))
340 cacert:depends({mode="sta", encryption="wpa"})
341 cacert:depends({mode="sta", encryption="wpa2i"})
342
343 privkey = s:option(FileUpload, "priv_key", translate("a_w_tlsprivkey"))
344 privkey:depends({mode="sta", eap_type="TLS", encryption="wpa2i"})
345 privkey:depends({mode="sta", eap_type="TLS", encryption="wpa"})
346
347 privkeypwd = s:option(Value, "priv_key_pwd", translate("a_w_tlsprivkeypwd"))
348 privkeypwd:depends({mode="sta", eap_type="TLS", encryption="wpa2i"})
349 privkeypwd:depends({mode="sta", eap_type="TLS", encryption="wpa"})
350
351
352 auth = s:option(Value, "auth", translate("a_w_peapauth"))
353 auth:depends({mode="sta", eap_type="PEAP", encryption="wpa2i"})
354 auth:depends({mode="sta", eap_type="PEAP", encryption="wpa"})
355
356 identity = s:option(Value, "identity", translate("a_w_peapidentity"))
357 identity:depends({mode="sta", eap_type="PEAP", encryption="wpa2i"})
358 identity:depends({mode="sta", eap_type="PEAP", encryption="wpa"})
359
360 password = s:option(Value, "password", translate("a_w_peappassword"))
361 password:depends({mode="sta", eap_type="PEAP", encryption="wpa2i"})
362 password:depends({mode="sta", eap_type="PEAP", encryption="wpa"})
363 end
364
365
366 return m