Add ahdemo mode to mac80211
[project/luci.git] / modules / admin-full / luasrc / model / cbi / admin_network / wifi.lua
index cbcc811..6d46a54 100644 (file)
@@ -17,7 +17,12 @@ arg[1] = arg[1] or ""
 m = Map("wireless", translate("networks"), translate("a_w_networks1"))
 
 s = m:section(NamedSection, arg[1], "wifi-device", translate("device") .. " " .. arg[1])
---s.addremove = true
+s.addremove = false
+
+back = s:option(DummyValue, "_overview", translate("overview"))
+back.value = ""
+back.titleref = luci.dispatcher.build_url("admin", "network", "wireless")
+
 
 en = s:option(Flag, "disabled", translate("enable"))
 en.enabled = "0"
@@ -29,6 +34,8 @@ end
 
 s:option(DummyValue, "type", translate("type"))
 local hwtype = m:get(arg[1], "type")
+-- NanoFoo
+local nsantenna = m:get(arg[1], "antenna")
 
 ch = s:option(Value, "channel", translate("a_w_channel"))
 for i=1, 14 do
@@ -64,13 +71,22 @@ if hwtype == "atheros" then
        mode:value("11gdt", "802.11adt")
        mode:value("11adt", "802.11adt")
        mode:value("fh", translate("wifi_fh"))
-       
+
        s:option(Flag, "diversity", translate("wifi_diversity"))
-       s:option(Value, "txantenna", translate("wifi_txantenna")).optional = true
-       s:option(Value, "rxantenna", translate("wifi_rxantenna")).optional = true
+
+       if not nsantenna then
+               s:option(Value, "txantenna", translate("wifi_txantenna")).optional = true
+               s:option(Value, "rxantenna", translate("wifi_rxantenna")).optional = true
+       else -- NanoFoo
+               local ant = s:option(ListValue, "antenna", translate("wifi_txantenna"))
+               ant:value("auto")
+               ant:value("vertical")
+               ant:value("horizontal")
+               ant:value("external")
+       end
        s:option(Value, "distance", translate("wifi_distance"),
                translate("wifi_distance_desc")).optional = true
-       
+
        --s:option(Flag, "nosbeacon", translate("wifi_nosbeacon")).optional = true
 end
 
@@ -79,23 +95,23 @@ end
 ------------------- Broadcom Device ------------------
 
 if hwtype == "broadcom" then
-       mp = s:option(ListValue, "macpolicy", translate("wifi_macpolicy"))
+       mp = s:option(ListValue, "macfilter", translate("wifi_macpolicy"))
        mp.optional = true
        mp:value("")
-       mp:value("deny", translate("wifi_whitelist"))
-       mp:value("allow", translate("wifi_blacklist"))
-       ml = s:option(Value, "maclist", translate("wifi_maclist"))
-       ml:depends({macpolicy="allow"})
-       ml:depends({macpolicy="deny"})
-       
-       s:option(Value, "txant", translate("wifi_txantenna")).optional = true
-       s:option(Value, "rxant", translate("wifi_rxantenna")).optional = true
-       
+       mp:value("allow", translate("wifi_whitelist"))
+       mp:value("deny", translate("wifi_blacklist"))
+       ml = s:option(DynamicList, "maclist", translate("wifi_maclist"))
+       ml:depends({macfilter="allow"})
+       ml:depends({macfilter="deny"})
+
+       s:option(Value, "txantenna", translate("wifi_txantenna")).optional = true
+       s:option(Value, "rxantenna", translate("wifi_rxantenna")).optional = true
+
        s:option(Flag, "frameburst", translate("wifi_bursting")).optional = true
-       
+
        s:option(Value, "distance", translate("wifi_distance")).optional = true
        --s:option(Value, "slottime", translate("wifi_slottime")).optional = true
-       
+
        s:option(Value, "country", translate("wifi_country")).optional = true
        s:option(Value, "maxassoc", translate("wifi_maxassoc")).optional = true
 end
@@ -117,8 +133,11 @@ network:value("")
 network.combobox_manual = translate("a_w_netmanual")
 luci.tools.webadmin.cbi_add_networks(network)
 
-function network.write(self, section, value)   
-       if not m.uci:get("network", value) then 
+function network.write(self, section, value)
+       if not m.uci:get("network", value) then
+               -- avoid "value not defined in enum" because network is not known yet
+               s.override_scheme = true
+
                m:chain("network")
                m.uci:set("network", value, "interface")
                Value.write(self, section, value)
@@ -131,6 +150,7 @@ end
 
 
 mode = s:option(ListValue, "mode", translate("mode"))
+mode.override_values = true
 mode:value("ap", translate("a_w_ap"))
 mode:value("adhoc", translate("a_w_adhoc"))
 mode:value("sta", translate("a_w_client"))
@@ -141,10 +161,11 @@ bssid = s:option(Value, "bssid", translate("wifi_bssid"))
 -------------------- MAC80211 Interface ----------------------
 
 if hwtype == "mac80211" then
+       mode:value("ahdemo", translate("a_w_ahdemo"))
        mode:value("monitor", translate("a_w_monitor"))
        bssid:depends({mode="adhoc"})
-       
-       s:option(Value, "txpower", translate("a_w_txpwr"), "dbm").rmempty = true
+
+       s:option(Value, "txpower", translate("a_w_txpwr"), "dBm").rmempty = true
        s:option(Value, "frag", translate("wifi_frag")).optional = true
        s:option(Value, "rts", translate("wifi_rts")).optional = true
 end
@@ -153,22 +174,23 @@ end
 
 -------------------- Madwifi Interface ----------------------
 
-if hwtype == "atheros" then    
+if hwtype == "atheros" then
        mode:value("ahdemo", translate("a_w_ahdemo"))
        mode:value("monitor", translate("a_w_monitor"))
-       
+
        bssid:depends({mode="adhoc"})
        bssid:depends({mode="ahdemo"})
-       
+
        wds = s:option(Flag, "wds", translate("a_w_wds"))
        wds:depends({mode="ap"})
        wds:depends({mode="sta"})
+       wds.rmempty = true
        wdssep = s:option(Flag, "wdssep", translate("wifi_wdssep"))
        wdssep:depends({mode="ap", wds="1"})
        wdssep.optional = true
-       
+
        s:option(Flag, "doth", "802.11h").optional = true
-       s:option(Value, "txpower", translate("a_w_txpwr"), "dbm").rmempty = true
+       s:option(Value, "txpower", translate("a_w_txpwr"), "dBm").rmempty = true
        hidden = s:option(Flag, "hidden", translate("wifi_hidden"))
        hidden:depends({mode="ap"})
        hidden:depends({mode="adhoc"})
@@ -179,16 +201,16 @@ if hwtype == "atheros" then
        isolate:depends({mode="ap"})
        isolate.optional = true
        s:option(Flag, "bgscan", translate("wifi_bgscan")).optional = true
-       
+
        mp = s:option(ListValue, "macpolicy", translate("wifi_macpolicy"))
        mp.optional = true
        mp:value("")
        mp:value("deny", translate("wifi_whitelist"))
        mp:value("allow", translate("wifi_blacklist"))
-       ml = s:option(Value, "maclist", translate("wifi_maclist"))
+       ml = s:option(DynamicList, "maclist", translate("wifi_maclist"))
        ml:depends({macpolicy="allow"})
        ml:depends({macpolicy="deny"})
-       
+
        s:option(Value, "rate", translate("wifi_rate")).optional = true
        s:option(Value, "mcast_rate", translate("wifi_mcast_rate")).optional = true
        s:option(Value, "frag", translate("wifi_frag")).optional = true
@@ -196,14 +218,22 @@ if hwtype == "atheros" then
        s:option(Value, "minrate", translate("wifi_minrate")).optional = true
        s:option(Value, "maxrate", translate("wifi_maxrate")).optional = true
        s:option(Flag, "compression", translate("wifi_compression")).optional = true
-       
+
        s:option(Flag, "bursting", translate("wifi_bursting")).optional = true
        s:option(Flag, "turbo", translate("wifi_turbo")).optional = true
        s:option(Value, "ff", translate("wifi_ff")).optional = true
-       
+
        s:option(Flag, "wmm", translate("wifi_wmm")).optional = true
        s:option(Flag, "xr", translate("wifi_xr")).optional = true
        s:option(Flag, "ar", translate("wifi_ar")).optional = true
+
+       local swm = s:option(Flag, "sw_merge", translate("wifi_nosbeacon"))
+       swm:depends({mode="adhoc"})
+       swm.optional = true
+
+       local nos = s:option(Flag, "nosbeacon", translate("wifi_nosbeacon"))
+       nos:depends({mode="sta"})
+       nos.optional = true
 end
 
 
@@ -212,18 +242,20 @@ end
 if hwtype == "broadcom" then
        mode:value("wds", translate("a_w_wds"))
        mode:value("monitor", translate("a_w_monitor"))
-       
+
+       s:option(Value, "txpower", translate("a_w_txpwr"), "dBm").rmempty = true
+
        hidden = s:option(Flag, "hidden", translate("wifi_hidden"))
        hidden:depends({mode="ap"})
        hidden:depends({mode="adhoc"})
        hidden:depends({mode="wds"})
        hidden.optional = true
-       
+
        isolate = s:option(Flag, "isolate", translate("wifi_isolate"),
         translate("wifi_isolate_desc"))
        isolate:depends({mode="ap"})
        isolate.optional = true
-       
+
        bssid:depends({mode="wds"})
 end
 
@@ -232,14 +264,43 @@ end
 ------------------- WiFI-Encryption -------------------
 
 encr = s:option(ListValue, "encryption", translate("encryption"))
+encr.override_values = true
+encr:depends({mode="ap"})
+encr:depends({mode="sta"})
+encr:depends({mode="adhoc"})
+encr:depends({mode="ahdemo"})
+encr:depends({mode="wds"})
+
 encr:value("none", "No Encryption")
 encr:value("wep", "WEP")
-encr:value("psk", "WPA-PSK")
-encr:value("psk2", "WPA2-PSK")
 
 if hwtype == "atheros" or hwtype == "mac80211" then
-       encr:value("wpa", "WPA-EAP", {mode="ap"}, {mode="sta"})
-       encr:value("wpa2i", "WPA2-EAP", {mode="ap"}, {mode="sta"})
+       local supplicant = luci.fs.mtime("/usr/sbin/wpa_supplicant")
+       local hostapd = luci.fs.mtime("/usr/sbin/hostapd")
+
+       if hostapd and supplicant then
+               encr:value("psk", "WPA-PSK")
+               encr:value("psk2", "WPA2-PSK")
+               encr:value("wpa", "WPA-EAP", {mode="ap"}, {mode="sta"})
+               encr:value("wpa2i", "WPA2-EAP", {mode="ap"}, {mode="sta"})
+       elseif hostapd and not supplicant then
+               encr:value("psk", "WPA-PSK", {mode="ap"}, {mode="adhoc"}, {mode="ahdemo"})
+               encr:value("psk2", "WPA2-PSK", {mode="ap"}, {mode="adhoc"}, {mode="ahdemo"})
+               encr:value("wpa", "WPA-EAP", {mode="ap"})
+               encr:value("wpa2i", "WPA2-EAP", {mode="ap"})
+               encr.description = translate("wifi_wpareq")
+       elseif not hostapd and supplicant then
+               encr:value("psk", "WPA-PSK", {mode="sta"})
+               encr:value("psk2", "WPA2-PSK", {mode="sta"})
+               encr:value("wpa", "WPA-EAP", {mode="sta"})
+               encr:value("wpa2i", "WPA2-EAP", {mode="sta"})
+               encr.description = translate("wifi_wpareq")
+       else
+               encr.description = translate("wifi_wpareq")
+       end
+elseif hwtype == "broadcom" then
+       encr:value("psk", "WPA-PSK")
+       encr:value("psk2", "WPA2-PSK")
 end
 
 encr:depends("mode", "ap")
@@ -269,34 +330,34 @@ if hwtype == "atheros" or hwtype == "mac80211" then
        nasid:depends({mode="ap", encryption="wpa"})
        nasid:depends({mode="ap", encryption="wpa2i"})
        nasid.rmempty = true
-       
+
        eaptype = s:option(ListValue, "eap_type", translate("a_w_eaptype"))
        eaptype:value("TLS")
        eaptype:value("PEAP")
        eaptype:depends({mode="sta", encryption="wpa"})
        eaptype:depends({mode="sta", encryption="wpa2i"})
-       
-       cacert = s:option(Value, "ca_cert", translate("a_w_cacert"))
+
+       cacert = s:option(FileUpload, "ca_cert", translate("a_w_cacert"))
        cacert:depends({mode="sta", encryption="wpa"})
        cacert:depends({mode="sta", encryption="wpa2i"})
-       
-       privkey = s:option(Value, "priv_key", translate("a_w_tlsprivkey"))
+
+       privkey = s:option(FileUpload, "priv_key", translate("a_w_tlsprivkey"))
        privkey:depends({mode="sta", eap_type="TLS", encryption="wpa2i"})
        privkey:depends({mode="sta", eap_type="TLS", encryption="wpa"})
-       
+
        privkeypwd = s:option(Value, "priv_key_pwd", translate("a_w_tlsprivkeypwd"))
        privkeypwd:depends({mode="sta", eap_type="TLS", encryption="wpa2i"})
        privkeypwd:depends({mode="sta", eap_type="TLS", encryption="wpa"})
-       
-       
+
+
        auth = s:option(Value, "auth", translate("a_w_peapauth"))
        auth:depends({mode="sta", eap_type="PEAP", encryption="wpa2i"})
        auth:depends({mode="sta", eap_type="PEAP", encryption="wpa"})
-       
+
        identity = s:option(Value, "identity", translate("a_w_peapidentity"))
        identity:depends({mode="sta", eap_type="PEAP", encryption="wpa2i"})
        identity:depends({mode="sta", eap_type="PEAP", encryption="wpa"})
-       
+
        password = s:option(Value, "password", translate("a_w_peappassword"))
        password:depends({mode="sta", eap_type="PEAP", encryption="wpa2i"})
        password:depends({mode="sta", eap_type="PEAP", encryption="wpa"})