1 -- Copyright 2008 Steven Barth <steven@midlink.org>
2 -- Licensed to the public under the Apache License 2.0.
4 local wa = require "luci.tools.webadmin"
5 local nw = require "luci.model.network"
6 local ut = require "luci.util"
7 local nt = require "luci.sys".net
8 local fs = require "nixio.fs"
12 m = Map("wireless", "",
13 translate("The <em>Device Configuration</em> section covers physical settings of the radio " ..
14 "hardware such as channel, transmit power or antenna selection which are shared among all " ..
15 "defined wireless networks (if the radio hardware is multi-SSID capable). Per network settings " ..
16 "like encryption or operation mode are grouped in the <em>Interface Configuration</em>."))
23 function m.on_commit(map)
24 local wnet = nw:get_wifinet(arg[1])
25 if ifsection and wnet then
26 ifsection.section = wnet.sid
27 m.title = luci.util.pcdata(wnet:get_i18n())
33 local wnet = nw:get_wifinet(arg[1])
34 local wdev = wnet and wnet:get_device()
36 -- redirect to overview page if network does not exist anymore (e.g. after a revert)
37 if not wnet or not wdev then
38 luci.http.redirect(luci.dispatcher.build_url("admin/network/wireless"))
42 -- wireless toggle was requested, commit and reload page
44 if m:formvalue("cbid.wireless.%s.__toggle" % wdev:name()) then
45 if wdev:get("disabled") == "1" or wnet:get("disabled") == "1" then
46 wnet:set("disabled", nil)
48 wnet:set("disabled", "1")
50 wdev:set("disabled", nil)
53 luci.sys.call("(env -i /bin/ubus call network reload) >/dev/null 2>/dev/null")
55 luci.http.redirect(luci.dispatcher.build_url("admin/network/wireless", arg[1]))
61 m.title = luci.util.pcdata(wnet:get_i18n())
64 local function txpower_list(iw)
65 local list = iw.txpwrlist or { }
66 local off = tonumber(iw.txpower_offset) or 0
70 for _, val in ipairs(list) do
71 local dbm = val.dbm + off
72 local mw = math.floor(10 ^ (dbm / 10))
86 local function txpower_current(pwr, list)
90 for _, item in ipairs(list) do
91 if item.driver_dbm >= pwr then
92 return item.driver_dbm
96 return (list[#list] and list[#list].driver_dbm) or pwr or 0
99 local iw = luci.sys.wifi.getiwinfo(arg[1])
100 local hw_modes = iw.hwmodelist or { }
101 local tx_power_list = txpower_list(iw)
102 local tx_power_cur = txpower_current(wdev:get("txpower"), tx_power_list)
104 s = m:section(NamedSection, wdev:name(), "wifi-device", translate("Device Configuration"))
107 s:tab("general", translate("General Setup"))
108 s:tab("macfilter", translate("MAC-Filter"))
109 s:tab("advanced", translate("Advanced Settings"))
112 back = s:option(DummyValue, "_overview", translate("Overview"))
114 back.titleref = luci.dispatcher.build_url("admin", "network", "wireless")
117 st = s:taboption("general", DummyValue, "__status", translate("Status"))
118 st.template = "admin_network/wifi_status"
121 en = s:taboption("general", Button, "__toggle")
123 if wdev:get("disabled") == "1" or wnet:get("disabled") == "1" then
124 en.title = translate("Wireless network is disabled")
125 en.inputtitle = translate("Enable")
126 en.inputstyle = "apply"
128 en.title = translate("Wireless network is enabled")
129 en.inputtitle = translate("Disable")
130 en.inputstyle = "reset"
134 local hwtype = wdev:get("type")
137 local nsantenna = wdev:get("antenna")
139 -- Check whether there are client interfaces on the same radio,
140 -- if yes, lock the channel choice as these stations will dicatate the freq
141 local found_sta = nil
143 if wnet:mode() ~= "sta" then
144 for _, net in ipairs(wdev:get_wifinets()) do
145 if net:mode() == "sta" then
146 if not found_sta then
148 found_sta.channel = net:channel()
151 found_sta.names[#found_sta.names+1] = net:shortname()
157 ch = s:taboption("general", DummyValue, "choice", translate("Channel"))
158 ch.value = translatef("Locked to channel %d used by: %s",
159 found_sta.channel, table.concat(found_sta.names, ", "))
161 ch = s:taboption("general", Value, "_mode_freq", '<br />'..translate("Operating frequency"))
162 ch.hwmodes = iw.hwmodelist
163 ch.freqlist = iw.freqlist
164 ch.template = "cbi/wireless_modefreq"
166 function ch.cfgvalue(self, section)
168 m:get(section, "hwmode") or "",
169 m:get(section, "channel") or "auto",
170 m:get(section, "htmode") or ""
174 function ch.formvalue(self, section)
176 m:formvalue(self:cbid(section) .. ".band") or (iw.hwmodelist.g and "11g" or "11a"),
177 m:formvalue(self:cbid(section) .. ".channel") or "auto",
178 m:formvalue(self:cbid(section) .. ".htmode") or ""
182 function ch.write(self, section, value)
183 m:set(section, "hwmode", value[1])
184 m:set(section, "channel", value[2])
185 m:set(section, "htmode", value[3])
189 ------------------- MAC80211 Device ------------------
191 if hwtype == "mac80211" then
192 if #tx_power_list > 1 then
193 tp = s:taboption("general", ListValue,
194 "txpower", translate("Transmit Power"), "dBm")
196 tp.default = tx_power_cur
197 function tp.cfgvalue(...)
198 return txpower_current(Value.cfgvalue(...), tx_power_list)
201 for _, p in ipairs(tx_power_list) do
202 tp:value(p.driver_dbm, "%i dBm (%i mW)"
203 %{ p.display_dbm, p.display_mw })
207 local cl = iw and iw.countrylist
208 if cl and #cl > 0 then
209 cc = s:taboption("advanced", ListValue, "country", translate("Country Code"), translate("Use ISO/IEC 3166 alpha2 country codes."))
210 cc.default = tostring(iw and iw.country or "00")
211 for _, c in ipairs(cl) do
212 cc:value(c.alpha2, "%s - %s" %{ c.alpha2, c.name })
215 s:taboption("advanced", Value, "country", translate("Country Code"), translate("Use ISO/IEC 3166 alpha2 country codes."))
218 s:taboption("advanced", Value, "distance", translate("Distance Optimization"),
219 translate("Distance to farthest network member in meters."))
221 -- external antenna profiles
222 local eal = iw and iw.extant
223 if eal and #eal > 0 then
224 ea = s:taboption("advanced", ListValue, "extant", translate("Antenna Configuration"))
225 for _, eap in ipairs(eal) do
226 ea:value(eap.id, "%s (%s)" %{ eap.name, eap.description })
233 s:taboption("advanced", Value, "frag", translate("Fragmentation Threshold"))
234 s:taboption("advanced", Value, "rts", translate("RTS/CTS Threshold"))
238 ------------------- Madwifi Device ------------------
240 if hwtype == "atheros" then
241 tp = s:taboption("general",
242 (#tx_power_list > 0) and ListValue or Value,
243 "txpower", translate("Transmit Power"), "dBm")
246 tp.default = tx_power_cur
248 function tp.cfgvalue(...)
249 return txpower_current(Value.cfgvalue(...), tx_power_list)
252 for _, p in ipairs(tx_power_list) do
253 tp:value(p.driver_dbm, "%i dBm (%i mW)"
254 %{ p.display_dbm, p.display_mw })
257 s:taboption("advanced", Flag, "diversity", translate("Diversity")).rmempty = false
259 if not nsantenna then
260 ant1 = s:taboption("advanced", ListValue, "txantenna", translate("Transmitter Antenna"))
261 ant1.widget = "radio"
262 ant1.orientation = "horizontal"
263 ant1:depends("diversity", "")
264 ant1:value("0", translate("auto"))
265 ant1:value("1", translate("Antenna 1"))
266 ant1:value("2", translate("Antenna 2"))
268 ant2 = s:taboption("advanced", ListValue, "rxantenna", translate("Receiver Antenna"))
269 ant2.widget = "radio"
270 ant2.orientation = "horizontal"
271 ant2:depends("diversity", "")
272 ant2:value("0", translate("auto"))
273 ant2:value("1", translate("Antenna 1"))
274 ant2:value("2", translate("Antenna 2"))
277 local ant = s:taboption("advanced", ListValue, "antenna", translate("Transmitter Antenna"))
279 ant:value("vertical")
280 ant:value("horizontal")
281 ant:value("external")
284 s:taboption("advanced", Value, "distance", translate("Distance Optimization"),
285 translate("Distance to farthest network member in meters."))
286 s:taboption("advanced", Value, "regdomain", translate("Regulatory Domain"))
287 s:taboption("advanced", Value, "country", translate("Country Code"))
288 s:taboption("advanced", Flag, "outdoor", translate("Outdoor Channels"))
290 --s:option(Flag, "nosbeacon", translate("Disable HW-Beacon timer"))
295 ------------------- Broadcom Device ------------------
297 if hwtype == "broadcom" then
298 tp = s:taboption("general",
299 (#tx_power_list > 0) and ListValue or Value,
300 "txpower", translate("Transmit Power"), "dBm")
303 tp.default = tx_power_cur
305 function tp.cfgvalue(...)
306 return txpower_current(Value.cfgvalue(...), tx_power_list)
309 for _, p in ipairs(tx_power_list) do
310 tp:value(p.driver_dbm, "%i dBm (%i mW)"
311 %{ p.display_dbm, p.display_mw })
314 ant1 = s:taboption("advanced", ListValue, "txantenna", translate("Transmitter Antenna"))
315 ant1.widget = "radio"
316 ant1:depends("diversity", "")
317 ant1:value("3", translate("auto"))
318 ant1:value("0", translate("Antenna 1"))
319 ant1:value("1", translate("Antenna 2"))
321 ant2 = s:taboption("advanced", ListValue, "rxantenna", translate("Receiver Antenna"))
322 ant2.widget = "radio"
323 ant2:depends("diversity", "")
324 ant2:value("3", translate("auto"))
325 ant2:value("0", translate("Antenna 1"))
326 ant2:value("1", translate("Antenna 2"))
328 s:taboption("advanced", Flag, "frameburst", translate("Frame Bursting"))
330 s:taboption("advanced", Value, "distance", translate("Distance Optimization"))
331 --s:option(Value, "slottime", translate("Slot time"))
333 s:taboption("advanced", Value, "country", translate("Country Code"))
334 s:taboption("advanced", Value, "maxassoc", translate("Connection Limit"))
338 --------------------- HostAP Device ---------------------
340 if hwtype == "prism2" then
341 s:taboption("advanced", Value, "txpower", translate("Transmit Power"), "att units").rmempty = true
343 s:taboption("advanced", Flag, "diversity", translate("Diversity")).rmempty = false
345 s:taboption("advanced", Value, "txantenna", translate("Transmitter Antenna"))
346 s:taboption("advanced", Value, "rxantenna", translate("Receiver Antenna"))
350 ----------------------- Interface -----------------------
352 s = m:section(NamedSection, wnet.sid, "wifi-iface", translate("Interface Configuration"))
356 s.defaults.device = wdev:name()
358 s:tab("general", translate("General Setup"))
359 s:tab("encryption", translate("Wireless Security"))
360 s:tab("macfilter", translate("MAC-Filter"))
361 s:tab("advanced", translate("Advanced Settings"))
363 s:taboption("general", Value, "ssid", translate("<abbr title=\"Extended Service Set Identifier\">ESSID</abbr>"))
365 mode = s:taboption("general", ListValue, "mode", translate("Mode"))
366 mode.override_values = true
367 mode:value("ap", translate("Access Point"))
368 mode:value("sta", translate("Client"))
369 mode:value("adhoc", translate("Ad-Hoc"))
371 bssid = s:taboption("general", Value, "bssid", translate("<abbr title=\"Basic Service Set Identifier\">BSSID</abbr>"))
373 network = s:taboption("general", Value, "network", translate("Network"),
374 translate("Choose the network(s) you want to attach to this wireless interface or " ..
375 "fill out the <em>create</em> field to define a new network."))
377 network.rmempty = true
378 network.template = "cbi/network_netlist"
379 network.widget = "checkbox"
380 network.novirtual = true
382 function network.write(self, section, value)
383 local i = nw:get_interface(section)
386 value = m:formvalue(self:cbid(section) .. ".newnet")
387 if value and #value > 0 then
388 local n = nw:add_network(value, {proto="none"})
389 if n then n:add_interface(i) end
391 local n = i:get_network()
392 if n then n:del_interface(i) end
396 for _, v in ipairs(i:get_networks()) do
399 for v in ut.imatch(value) do
400 local n = nw:get_network(v)
402 if not n:is_empty() then
403 n:set("type", "bridge")
412 -------------------- MAC80211 Interface ----------------------
414 if hwtype == "mac80211" then
415 if fs.access("/usr/sbin/iw") then
416 mode:value("mesh", "802.11s")
419 mode:value("ahdemo", translate("Pseudo Ad-Hoc (ahdemo)"))
420 mode:value("monitor", translate("Monitor"))
421 bssid:depends({mode="adhoc"})
422 bssid:depends({mode="sta"})
423 bssid:depends({mode="sta-wds"})
425 mp = s:taboption("macfilter", ListValue, "macfilter", translate("MAC-Address Filter"))
426 mp:depends({mode="ap"})
427 mp:depends({mode="ap-wds"})
428 mp:value("", translate("disable"))
429 mp:value("allow", translate("Allow listed only"))
430 mp:value("deny", translate("Allow all except listed"))
432 ml = s:taboption("macfilter", DynamicList, "maclist", translate("MAC-List"))
433 ml.datatype = "macaddr"
434 ml:depends({macfilter="allow"})
435 ml:depends({macfilter="deny"})
436 nt.mac_hints(function(mac, name) ml:value(mac, "%s (%s)" %{ mac, name }) end)
438 mode:value("ap-wds", "%s (%s)" % {translate("Access Point"), translate("WDS")})
439 mode:value("sta-wds", "%s (%s)" % {translate("Client"), translate("WDS")})
441 function mode.write(self, section, value)
442 if value == "ap-wds" then
443 ListValue.write(self, section, "ap")
444 m.uci:set("wireless", section, "wds", 1)
445 elseif value == "sta-wds" then
446 ListValue.write(self, section, "sta")
447 m.uci:set("wireless", section, "wds", 1)
449 ListValue.write(self, section, value)
450 m.uci:delete("wireless", section, "wds")
454 function mode.cfgvalue(self, section)
455 local mode = ListValue.cfgvalue(self, section)
456 local wds = m.uci:get("wireless", section, "wds") == "1"
458 if mode == "ap" and wds then
460 elseif mode == "sta" and wds then
467 hidden = s:taboption("general", Flag, "hidden", translate("Hide <abbr title=\"Extended Service Set Identifier\">ESSID</abbr>"))
468 hidden:depends({mode="ap"})
469 hidden:depends({mode="ap-wds"})
471 wmm = s:taboption("general", Flag, "wmm", translate("WMM Mode"))
472 wmm:depends({mode="ap"})
473 wmm:depends({mode="ap-wds"})
474 wmm.default = wmm.enabled
479 -------------------- Madwifi Interface ----------------------
481 if hwtype == "atheros" then
482 mode:value("ahdemo", translate("Pseudo Ad-Hoc (ahdemo)"))
483 mode:value("monitor", translate("Monitor"))
484 mode:value("ap-wds", "%s (%s)" % {translate("Access Point"), translate("WDS")})
485 mode:value("sta-wds", "%s (%s)" % {translate("Client"), translate("WDS")})
486 mode:value("wds", translate("Static WDS"))
488 function mode.write(self, section, value)
489 if value == "ap-wds" then
490 ListValue.write(self, section, "ap")
491 m.uci:set("wireless", section, "wds", 1)
492 elseif value == "sta-wds" then
493 ListValue.write(self, section, "sta")
494 m.uci:set("wireless", section, "wds", 1)
496 ListValue.write(self, section, value)
497 m.uci:delete("wireless", section, "wds")
501 function mode.cfgvalue(self, section)
502 local mode = ListValue.cfgvalue(self, section)
503 local wds = m.uci:get("wireless", section, "wds") == "1"
505 if mode == "ap" and wds then
507 elseif mode == "sta" and wds then
514 bssid:depends({mode="adhoc"})
515 bssid:depends({mode="ahdemo"})
516 bssid:depends({mode="wds"})
518 wdssep = s:taboption("advanced", Flag, "wdssep", translate("Separate WDS"))
519 wdssep:depends({mode="ap-wds"})
521 s:taboption("advanced", Flag, "doth", "802.11h")
522 hidden = s:taboption("general", Flag, "hidden", translate("Hide <abbr title=\"Extended Service Set Identifier\">ESSID</abbr>"))
523 hidden:depends({mode="ap"})
524 hidden:depends({mode="adhoc"})
525 hidden:depends({mode="ap-wds"})
526 hidden:depends({mode="sta-wds"})
527 isolate = s:taboption("advanced", Flag, "isolate", translate("Separate Clients"),
528 translate("Prevents client-to-client communication"))
529 isolate:depends({mode="ap"})
530 s:taboption("advanced", Flag, "bgscan", translate("Background Scan"))
532 mp = s:taboption("macfilter", ListValue, "macpolicy", translate("MAC-Address Filter"))
533 mp:value("", translate("disable"))
534 mp:value("allow", translate("Allow listed only"))
535 mp:value("deny", translate("Allow all except listed"))
537 ml = s:taboption("macfilter", DynamicList, "maclist", translate("MAC-List"))
538 ml.datatype = "macaddr"
539 ml:depends({macpolicy="allow"})
540 ml:depends({macpolicy="deny"})
541 nt.mac_hints(function(mac, name) ml:value(mac, "%s (%s)" %{ mac, name }) end)
543 s:taboption("advanced", Value, "rate", translate("Transmission Rate"))
544 s:taboption("advanced", Value, "mcast_rate", translate("Multicast Rate"))
545 s:taboption("advanced", Value, "frag", translate("Fragmentation Threshold"))
546 s:taboption("advanced", Value, "rts", translate("RTS/CTS Threshold"))
547 s:taboption("advanced", Value, "minrate", translate("Minimum Rate"))
548 s:taboption("advanced", Value, "maxrate", translate("Maximum Rate"))
549 s:taboption("advanced", Flag, "compression", translate("Compression"))
551 s:taboption("advanced", Flag, "bursting", translate("Frame Bursting"))
552 s:taboption("advanced", Flag, "turbo", translate("Turbo Mode"))
553 s:taboption("advanced", Flag, "ff", translate("Fast Frames"))
555 s:taboption("advanced", Flag, "wmm", translate("WMM Mode"))
556 s:taboption("advanced", Flag, "xr", translate("XR Support"))
557 s:taboption("advanced", Flag, "ar", translate("AR Support"))
559 local swm = s:taboption("advanced", Flag, "sw_merge", translate("Disable HW-Beacon timer"))
560 swm:depends({mode="adhoc"})
562 local nos = s:taboption("advanced", Flag, "nosbeacon", translate("Disable HW-Beacon timer"))
563 nos:depends({mode="sta"})
564 nos:depends({mode="sta-wds"})
566 local probereq = s:taboption("advanced", Flag, "probereq", translate("Do not send probe responses"))
567 probereq.enabled = "0"
568 probereq.disabled = "1"
572 -------------------- Broadcom Interface ----------------------
574 if hwtype == "broadcom" then
575 mode:value("wds", translate("WDS"))
576 mode:value("monitor", translate("Monitor"))
578 hidden = s:taboption("general", Flag, "hidden", translate("Hide <abbr title=\"Extended Service Set Identifier\">ESSID</abbr>"))
579 hidden:depends({mode="ap"})
580 hidden:depends({mode="adhoc"})
581 hidden:depends({mode="wds"})
583 isolate = s:taboption("advanced", Flag, "isolate", translate("Separate Clients"),
584 translate("Prevents client-to-client communication"))
585 isolate:depends({mode="ap"})
587 s:taboption("advanced", Flag, "doth", "802.11h")
588 s:taboption("advanced", Flag, "wmm", translate("WMM Mode"))
590 bssid:depends({mode="wds"})
591 bssid:depends({mode="adhoc"})
595 ----------------------- HostAP Interface ---------------------
597 if hwtype == "prism2" then
598 mode:value("wds", translate("WDS"))
599 mode:value("monitor", translate("Monitor"))
601 hidden = s:taboption("general", Flag, "hidden", translate("Hide <abbr title=\"Extended Service Set Identifier\">ESSID</abbr>"))
602 hidden:depends({mode="ap"})
603 hidden:depends({mode="adhoc"})
604 hidden:depends({mode="wds"})
606 bssid:depends({mode="sta"})
608 mp = s:taboption("macfilter", ListValue, "macpolicy", translate("MAC-Address Filter"))
609 mp:value("", translate("disable"))
610 mp:value("allow", translate("Allow listed only"))
611 mp:value("deny", translate("Allow all except listed"))
612 ml = s:taboption("macfilter", DynamicList, "maclist", translate("MAC-List"))
613 ml:depends({macpolicy="allow"})
614 ml:depends({macpolicy="deny"})
615 nt.mac_hints(function(mac, name) ml:value(mac, "%s (%s)" %{ mac, name }) end)
617 s:taboption("advanced", Value, "rate", translate("Transmission Rate"))
618 s:taboption("advanced", Value, "frag", translate("Fragmentation Threshold"))
619 s:taboption("advanced", Value, "rts", translate("RTS/CTS Threshold"))
623 ------------------- WiFI-Encryption -------------------
625 encr = s:taboption("encryption", ListValue, "encryption", translate("Encryption"))
626 encr.override_values = true
627 encr.override_depends = true
628 encr:depends({mode="ap"})
629 encr:depends({mode="sta"})
630 encr:depends({mode="adhoc"})
631 encr:depends({mode="ahdemo"})
632 encr:depends({mode="ap-wds"})
633 encr:depends({mode="sta-wds"})
634 encr:depends({mode="mesh"})
636 cipher = s:taboption("encryption", ListValue, "cipher", translate("Cipher"))
637 cipher:depends({encryption="wpa"})
638 cipher:depends({encryption="wpa2"})
639 cipher:depends({encryption="psk"})
640 cipher:depends({encryption="psk2"})
641 cipher:depends({encryption="wpa-mixed"})
642 cipher:depends({encryption="psk-mixed"})
643 cipher:value("auto", translate("auto"))
644 cipher:value("ccmp", translate("Force CCMP (AES)"))
645 cipher:value("tkip", translate("Force TKIP"))
646 cipher:value("tkip+ccmp", translate("Force TKIP and CCMP (AES)"))
648 function encr.cfgvalue(self, section)
649 local v = tostring(ListValue.cfgvalue(self, section))
652 elseif v and v:match("%+") then
653 return (v:gsub("%+.+$", ""))
658 function encr.write(self, section, value)
659 local e = tostring(encr:formvalue(section))
660 local c = tostring(cipher:formvalue(section))
661 if value == "wpa" or value == "wpa2" then
662 self.map.uci:delete("wireless", section, "key")
664 if e and (c == "tkip" or c == "ccmp" or c == "tkip+ccmp") then
667 self.map:set(section, "encryption", e)
670 function cipher.cfgvalue(self, section)
671 local v = tostring(ListValue.cfgvalue(encr, section))
672 if v and v:match("%+") then
673 v = v:gsub("^[^%+]+%+", "")
674 if v == "aes" then v = "ccmp"
675 elseif v == "tkip+aes" then v = "tkip+ccmp"
676 elseif v == "aes+tkip" then v = "tkip+ccmp"
677 elseif v == "ccmp+tkip" then v = "tkip+ccmp"
683 function cipher.write(self, section)
684 return encr:write(section)
688 encr:value("none", "No Encryption")
689 encr:value("wep-open", translate("WEP Open System"), {mode="ap"}, {mode="sta"}, {mode="ap-wds"}, {mode="sta-wds"}, {mode="adhoc"}, {mode="ahdemo"}, {mode="wds"})
690 encr:value("wep-shared", translate("WEP Shared Key"), {mode="ap"}, {mode="sta"}, {mode="ap-wds"}, {mode="sta-wds"}, {mode="adhoc"}, {mode="ahdemo"}, {mode="wds"})
692 if hwtype == "atheros" or hwtype == "mac80211" or hwtype == "prism2" then
693 local supplicant = fs.access("/usr/sbin/wpa_supplicant")
694 local hostapd = fs.access("/usr/sbin/hostapd")
697 local has_ap_eap = (os.execute("hostapd -veap >/dev/null 2>/dev/null") == 0)
698 local has_sta_eap = (os.execute("wpa_supplicant -veap >/dev/null 2>/dev/null") == 0)
700 if hostapd and supplicant then
701 encr:value("psk", "WPA-PSK", {mode="ap"}, {mode="sta"}, {mode="ap-wds"}, {mode="sta-wds"})
702 encr:value("psk2", "WPA2-PSK", {mode="ap"}, {mode="sta"}, {mode="ap-wds"}, {mode="sta-wds"})
703 encr:value("psk-mixed", "WPA-PSK/WPA2-PSK Mixed Mode", {mode="ap"}, {mode="sta"}, {mode="ap-wds"}, {mode="sta-wds"})
704 if has_ap_eap and has_sta_eap then
705 encr:value("wpa", "WPA-EAP", {mode="ap"}, {mode="sta"}, {mode="ap-wds"}, {mode="sta-wds"})
706 encr:value("wpa2", "WPA2-EAP", {mode="ap"}, {mode="sta"}, {mode="ap-wds"}, {mode="sta-wds"})
708 elseif hostapd and not supplicant then
709 encr:value("psk", "WPA-PSK", {mode="ap"}, {mode="ap-wds"})
710 encr:value("psk2", "WPA2-PSK", {mode="ap"}, {mode="ap-wds"})
711 encr:value("psk-mixed", "WPA-PSK/WPA2-PSK Mixed Mode", {mode="ap"}, {mode="ap-wds"})
713 encr:value("wpa", "WPA-EAP", {mode="ap"}, {mode="ap-wds"})
714 encr:value("wpa2", "WPA2-EAP", {mode="ap"}, {mode="ap-wds"})
716 encr.description = translate(
717 "WPA-Encryption requires wpa_supplicant (for client mode) or hostapd (for AP " ..
718 "and ad-hoc mode) to be installed."
720 elseif not hostapd and supplicant then
721 encr:value("psk", "WPA-PSK", {mode="sta"}, {mode="sta-wds"})
722 encr:value("psk2", "WPA2-PSK", {mode="sta"}, {mode="sta-wds"})
723 encr:value("psk-mixed", "WPA-PSK/WPA2-PSK Mixed Mode", {mode="sta"}, {mode="sta-wds"})
725 encr:value("wpa", "WPA-EAP", {mode="sta"}, {mode="sta-wds"})
726 encr:value("wpa2", "WPA2-EAP", {mode="sta"}, {mode="sta-wds"})
728 encr.description = translate(
729 "WPA-Encryption requires wpa_supplicant (for client mode) or hostapd (for AP " ..
730 "and ad-hoc mode) to be installed."
733 encr.description = translate(
734 "WPA-Encryption requires wpa_supplicant (for client mode) or hostapd (for AP " ..
735 "and ad-hoc mode) to be installed."
738 elseif hwtype == "broadcom" then
739 encr:value("psk", "WPA-PSK")
740 encr:value("psk2", "WPA2-PSK")
741 encr:value("psk+psk2", "WPA-PSK/WPA2-PSK Mixed Mode")
744 auth_server = s:taboption("encryption", Value, "auth_server", translate("Radius-Authentication-Server"))
745 auth_server:depends({mode="ap", encryption="wpa"})
746 auth_server:depends({mode="ap", encryption="wpa2"})
747 auth_server:depends({mode="ap-wds", encryption="wpa"})
748 auth_server:depends({mode="ap-wds", encryption="wpa2"})
749 auth_server.rmempty = true
750 auth_server.datatype = "host"
752 auth_port = s:taboption("encryption", Value, "auth_port", translate("Radius-Authentication-Port"), translatef("Default %d", 1812))
753 auth_port:depends({mode="ap", encryption="wpa"})
754 auth_port:depends({mode="ap", encryption="wpa2"})
755 auth_port:depends({mode="ap-wds", encryption="wpa"})
756 auth_port:depends({mode="ap-wds", encryption="wpa2"})
757 auth_port.rmempty = true
758 auth_port.datatype = "port"
760 auth_secret = s:taboption("encryption", Value, "auth_secret", translate("Radius-Authentication-Secret"))
761 auth_secret:depends({mode="ap", encryption="wpa"})
762 auth_secret:depends({mode="ap", encryption="wpa2"})
763 auth_secret:depends({mode="ap-wds", encryption="wpa"})
764 auth_secret:depends({mode="ap-wds", encryption="wpa2"})
765 auth_secret.rmempty = true
766 auth_secret.password = true
768 acct_server = s:taboption("encryption", Value, "acct_server", translate("Radius-Accounting-Server"))
769 acct_server:depends({mode="ap", encryption="wpa"})
770 acct_server:depends({mode="ap", encryption="wpa2"})
771 acct_server:depends({mode="ap-wds", encryption="wpa"})
772 acct_server:depends({mode="ap-wds", encryption="wpa2"})
773 acct_server.rmempty = true
774 acct_server.datatype = "host"
776 acct_port = s:taboption("encryption", Value, "acct_port", translate("Radius-Accounting-Port"), translatef("Default %d", 1813))
777 acct_port:depends({mode="ap", encryption="wpa"})
778 acct_port:depends({mode="ap", encryption="wpa2"})
779 acct_port:depends({mode="ap-wds", encryption="wpa"})
780 acct_port:depends({mode="ap-wds", encryption="wpa2"})
781 acct_port.rmempty = true
782 acct_port.datatype = "port"
784 acct_secret = s:taboption("encryption", Value, "acct_secret", translate("Radius-Accounting-Secret"))
785 acct_secret:depends({mode="ap", encryption="wpa"})
786 acct_secret:depends({mode="ap", encryption="wpa2"})
787 acct_secret:depends({mode="ap-wds", encryption="wpa"})
788 acct_secret:depends({mode="ap-wds", encryption="wpa2"})
789 acct_secret.rmempty = true
790 acct_secret.password = true
792 wpakey = s:taboption("encryption", Value, "_wpa_key", translate("Key"))
793 wpakey:depends("encryption", "psk")
794 wpakey:depends("encryption", "psk2")
795 wpakey:depends("encryption", "psk+psk2")
796 wpakey:depends("encryption", "psk-mixed")
797 wpakey.datatype = "wpakey"
798 wpakey.rmempty = true
799 wpakey.password = true
801 wpakey.cfgvalue = function(self, section, value)
802 local key = m.uci:get("wireless", section, "key")
803 if key == "1" or key == "2" or key == "3" or key == "4" then
809 wpakey.write = function(self, section, value)
810 self.map.uci:set("wireless", section, "key", value)
811 self.map.uci:delete("wireless", section, "key1")
815 wepslot = s:taboption("encryption", ListValue, "_wep_key", translate("Used Key Slot"))
816 wepslot:depends("encryption", "wep-open")
817 wepslot:depends("encryption", "wep-shared")
818 wepslot:value("1", translatef("Key #%d", 1))
819 wepslot:value("2", translatef("Key #%d", 2))
820 wepslot:value("3", translatef("Key #%d", 3))
821 wepslot:value("4", translatef("Key #%d", 4))
823 wepslot.cfgvalue = function(self, section)
824 local slot = tonumber(m.uci:get("wireless", section, "key"))
825 if not slot or slot < 1 or slot > 4 then
831 wepslot.write = function(self, section, value)
832 self.map.uci:set("wireless", section, "key", value)
837 wepkey = s:taboption("encryption", Value, "key" .. slot, translatef("Key #%d", slot))
838 wepkey:depends("encryption", "wep-open")
839 wepkey:depends("encryption", "wep-shared")
840 wepkey.datatype = "wepkey"
841 wepkey.rmempty = true
842 wepkey.password = true
844 function wepkey.write(self, section, value)
845 if value and (#value == 5 or #value == 13) then
846 value = "s:" .. value
848 return Value.write(self, section, value)
853 if hwtype == "atheros" or hwtype == "mac80211" or hwtype == "prism2" then
854 nasid = s:taboption("encryption", Value, "nasid", translate("NAS ID"))
855 nasid:depends({mode="ap", encryption="wpa"})
856 nasid:depends({mode="ap", encryption="wpa2"})
857 nasid:depends({mode="ap-wds", encryption="wpa"})
858 nasid:depends({mode="ap-wds", encryption="wpa2"})
861 eaptype = s:taboption("encryption", ListValue, "eap_type", translate("EAP-Method"))
862 eaptype:value("tls", "TLS")
863 eaptype:value("ttls", "TTLS")
864 eaptype:value("peap", "PEAP")
865 eaptype:depends({mode="sta", encryption="wpa"})
866 eaptype:depends({mode="sta", encryption="wpa2"})
867 eaptype:depends({mode="sta-wds", encryption="wpa"})
868 eaptype:depends({mode="sta-wds", encryption="wpa2"})
870 cacert = s:taboption("encryption", FileUpload, "ca_cert", translate("Path to CA-Certificate"))
871 cacert:depends({mode="sta", encryption="wpa"})
872 cacert:depends({mode="sta", encryption="wpa2"})
873 cacert:depends({mode="sta-wds", encryption="wpa"})
874 cacert:depends({mode="sta-wds", encryption="wpa2"})
876 clientcert = s:taboption("encryption", FileUpload, "client_cert", translate("Path to Client-Certificate"))
877 clientcert:depends({mode="sta", encryption="wpa"})
878 clientcert:depends({mode="sta", encryption="wpa2"})
879 clientcert:depends({mode="sta-wds", encryption="wpa"})
880 clientcert:depends({mode="sta-wds", encryption="wpa2"})
882 privkey = s:taboption("encryption", FileUpload, "priv_key", translate("Path to Private Key"))
883 privkey:depends({mode="sta", eap_type="tls", encryption="wpa2"})
884 privkey:depends({mode="sta", eap_type="tls", encryption="wpa"})
885 privkey:depends({mode="sta-wds", eap_type="tls", encryption="wpa2"})
886 privkey:depends({mode="sta-wds", eap_type="tls", encryption="wpa"})
888 privkeypwd = s:taboption("encryption", Value, "priv_key_pwd", translate("Password of Private Key"))
889 privkeypwd:depends({mode="sta", eap_type="tls", encryption="wpa2"})
890 privkeypwd:depends({mode="sta", eap_type="tls", encryption="wpa"})
891 privkeypwd:depends({mode="sta-wds", eap_type="tls", encryption="wpa2"})
892 privkeypwd:depends({mode="sta-wds", eap_type="tls", encryption="wpa"})
895 auth = s:taboption("encryption", Value, "auth", translate("Authentication"))
899 auth:value("MSCHAPV2")
900 auth:depends({mode="sta", eap_type="peap", encryption="wpa2"})
901 auth:depends({mode="sta", eap_type="peap", encryption="wpa"})
902 auth:depends({mode="sta", eap_type="ttls", encryption="wpa2"})
903 auth:depends({mode="sta", eap_type="ttls", encryption="wpa"})
904 auth:depends({mode="sta-wds", eap_type="peap", encryption="wpa2"})
905 auth:depends({mode="sta-wds", eap_type="peap", encryption="wpa"})
906 auth:depends({mode="sta-wds", eap_type="ttls", encryption="wpa2"})
907 auth:depends({mode="sta-wds", eap_type="ttls", encryption="wpa"})
910 identity = s:taboption("encryption", Value, "identity", translate("Identity"))
911 identity:depends({mode="sta", eap_type="peap", encryption="wpa2"})
912 identity:depends({mode="sta", eap_type="peap", encryption="wpa"})
913 identity:depends({mode="sta", eap_type="ttls", encryption="wpa2"})
914 identity:depends({mode="sta", eap_type="ttls", encryption="wpa"})
915 identity:depends({mode="sta-wds", eap_type="peap", encryption="wpa2"})
916 identity:depends({mode="sta-wds", eap_type="peap", encryption="wpa"})
917 identity:depends({mode="sta-wds", eap_type="ttls", encryption="wpa2"})
918 identity:depends({mode="sta-wds", eap_type="ttls", encryption="wpa"})
920 password = s:taboption("encryption", Value, "password", translate("Password"))
921 password:depends({mode="sta", eap_type="peap", encryption="wpa2"})
922 password:depends({mode="sta", eap_type="peap", encryption="wpa"})
923 password:depends({mode="sta", eap_type="ttls", encryption="wpa2"})
924 password:depends({mode="sta", eap_type="ttls", encryption="wpa"})
925 password:depends({mode="sta-wds", eap_type="peap", encryption="wpa2"})
926 password:depends({mode="sta-wds", eap_type="peap", encryption="wpa"})
927 password:depends({mode="sta-wds", eap_type="ttls", encryption="wpa2"})
928 password:depends({mode="sta-wds", eap_type="ttls", encryption="wpa"})
931 if hwtype == "atheros" or hwtype == "mac80211" or hwtype == "prism2" then
932 local wpasupplicant = fs.access("/usr/sbin/wpa_supplicant")
933 local hostcli = fs.access("/usr/sbin/hostapd_cli")
934 if hostcli and wpasupplicant then
935 wps = s:taboption("encryption", Flag, "wps_pushbutton", translate("Enable WPS pushbutton, requires WPA(2)-PSK"))
939 wps:depends("encryption", "psk")
940 wps:depends("encryption", "psk2")
941 wps:depends("encryption", "psk-mixed")