luci-0.10: merge r7229 and r7230
[oweals/luci.git] / modules / admin-full / luasrc / model / cbi / admin_network / ifaces.lua
index 7150f9ef819ec6c225fd83b9533746c8fb55616a..3debf58baffa184f3678231825cbf6474e7e0f15 100644 (file)
@@ -2,7 +2,7 @@
 LuCI - Lua Configuration Interface
 
 Copyright 2008 Steven Barth <steven@midlink.org>
-Copyright 2008 Jo-Philipp Wich <xm@subsignal.org>
+Copyright 2008-2011 Jo-Philipp Wich <xm@subsignal.org>
 
 Licensed under the Apache License, Version 2.0 (the "License");
 you may not use this file except in compliance with the License.
@@ -33,6 +33,7 @@ local has_ipv6   = fs.access("/proc/net/ipv6_route")
 local has_6in4   = fs.access("/lib/network/6in4.sh")
 local has_6to4   = fs.access("/lib/network/6to4.sh")
 local has_relay  = fs.access("/lib/network/relay.sh")
+local has_ahcp   = fs.access("/lib/network/ahcp.sh")
 
 m = Map("network", translate("Interfaces") .. " - " .. arg[1]:upper(), translate("On this page you can configure the network interfaces. You can bridge several interfaces by ticking the \"bridge interfaces\" field and enter the names of several network interfaces separated by spaces. You can also use <abbr title=\"Virtual Local Area Network\">VLAN</abbr> notation <samp>INTERFACE.VLANNR</samp> (<abbr title=\"for example\">e.g.</abbr>: <samp>eth0.1</samp>)."))
 m:chain("wireless")
@@ -68,6 +69,7 @@ if has_pppd  then s:tab("ppp", translate("PPP Settings")) end
 if has_pppoa then s:tab("atm", translate("ATM Settings")) end
 if has_6in4 or has_6to4 then s:tab("tunnel", translate("Tunnel Settings")) end
 if has_relay then s:tab("relay", translate("Relay Settings")) end
+if has_ahcp then s:tab("ahcp", translate("AHCP Settings")) end
 s:tab("physical", translate("Physical Settings"))
 if has_firewall then s:tab("firewall", translate("Firewall Settings")) end
 
@@ -94,6 +96,7 @@ if has_pptp  then p:value("pptp",  "PPTP")    end
 if has_6in4  then p:value("6in4",  "6in4")    end
 if has_6to4  then p:value("6to4",  "6to4")    end
 if has_relay then p:value("relay", "Relay")   end
+if has_ahcp  then p:value("ahcp",  "AHCP")    end
 p:value("none", translate("none"))
 
 if not ( has_pppd and has_pppoe and has_pppoa and has_3g and has_pptp ) then
@@ -122,6 +125,7 @@ ifname_single:depends({ type = "", proto = "static" })
 ifname_single:depends({ type = "", proto = "dhcp"   })
 ifname_single:depends({ type = "", proto = "pppoe"  })
 ifname_single:depends({ type = "", proto = "pppoa"  })
+ifname_single:depends({ type = "", proto = "ahcp"   })
 ifname_single:depends({ type = "", proto = "none"   })
 
 function ifname_single.cfgvalue(self, s)
@@ -501,31 +505,104 @@ end
 if has_relay then
        fb = s:taboption("relay", Flag, "forward_bcast", translate("Forward broadcasts"))
        fb.default = fb.enabled
+       fb:depends("proto", "relay")
 
        fd = s:taboption("relay", Flag, "forward_dhcp", translate("Forward DHCP"))
        fd.default = fd.enabled
+       fd:depends("proto", "relay")
 
-       gw = s:taboption("relay", Value, "gateway", translate("Override Gateway"))
+       gw = s:taboption("relay", Value, "relay_gateway", translate("Override Gateway"))
        gw.optional    = true
        gw.placeholder = "0.0.0.0"
        gw.datatype    = "ip4addr"
+       gw:depends("proto", "relay")
+       function gw.cfgvalue(self, section)
+               return m.uci:get("network", section, "gateway")
+       end
+       function gw.write(self, section, value)
+               return m.uci:set("network", section, "gateway", value)
+       end
+       function gw.delete(self, section)
+               return m.uci:delete("network", section, "gateway")
+       end
 
        expiry = s:taboption("relay", Value, "expiry", translate("Host expiry timeout"))
        expiry.optional    = true
        expiry.placeholder = 30
        expiry.datatype    = "uinteger"
+       expiry:depends("proto", "relay")
 
        retry = s:taboption("relay", Value, "retry", translate("ARP ping retries"))
        retry.optional     = true
        retry.placeholder  = 5
        retry.datatype     = "uinteger"
+       retry:depends("proto", "relay")
 
        table = s:taboption("relay", Value, "table", translate("Routing table ID"))
        table.optional     = true
        table.placeholder  = 16800
        table.datatype     = "uinteger"
+       table:depends("proto", "relay")
 end
 
+if has_ahcp then
+       mca = s:taboption("ahcp", Value, "multicast_address", translate("Multicast address"))
+       mca.optional    = true
+       mca.placeholder = "ff02::cca6:c0f9:e182:5359"
+       mca.datatype    = "ip6addr"
+       mca:depends("proto", "ahcp")
+
+       port = s:taboption("ahcp", Value, "port", translate("Port"))
+       port.optional    = true
+       port.placeholder = 5359
+       port.datatype    = "port"
+       port:depends("proto", "ahcp")
+
+       fam = s:taboption("ahcp", ListValue, "_family", translate("Protocol family"))
+       fam:value("", translate("IPv4 and IPv6"))
+       fam:value("ipv4", translate("IPv4 only"))
+       fam:value("ipv6", translate("IPv6 only"))
+       fam:depends("proto", "ahcp")
+
+       function fam.cfgvalue(self, section)
+               local v4 = m.uci:get_bool("network", section, "ipv4_only")
+               local v6 = m.uci:get_bool("network", section, "ipv6_only")
+               if v4 then
+                       return "ipv4"
+               elseif v6 then
+                       return "ipv6"
+               end
+               return ""
+       end
+
+       function fam.write(self, section, value)
+               if value == "ipv4" then
+                       m.uci:set("network", section, "ipv4_only", "true")
+                       m.uci:delete("network", section, "ipv6_only")
+               elseif value == "ipv6" then
+                       m.uci:set("network", section, "ipv6_only", "true")
+                       m.uci:delete("network", section, "ipv4_only")
+               end
+       end
+
+       function fam.remove(self, section)
+               m.uci:delete("network", section, "ipv4_only")
+               m.uci:delete("network", section, "ipv6_only")
+       end
+
+       nodns = s:taboption("ahcp", Flag, "no_dns", translate("Disable DNS setup"))
+       nodns.optional = true
+       nodns.enabled  = "true"
+       nodns.disabled = "false"
+       nodns.default  = nodns.disabled
+       nodns:depends("proto", "ahcp")
+
+       ltime = s:taboption("ahcp", Value, "lease_time", translate("Lease validity time"))
+       ltime.optional    = true
+       ltime.placeholder = 3666
+       ltime.datatype    = "uinteger"
+       ltime:depends("proto", "ahcp")
+end
 
 if net:proto() ~= "relay" then
        s2 = m:section(TypedSection, "alias", translate("IP-Aliases"))
@@ -582,20 +659,16 @@ end
 
 if has_dnsmasq and net:proto() == "static" then
        m2 = Map("dhcp", "", "")
-       function m2.on_parse()
-               local has_section = false
+       
+       local section_id = "-"
 
+       function m2.on_parse()
                m2.uci:foreach("dhcp", "dhcp", function(s)
                        if s.interface == arg[1] then
-                               has_section = true
+                               section_id = s['.name']
                                return false
                        end
                end)
-
-               if not has_section then
-                       m2.uci:section("dhcp", "dhcp", nil, { interface = arg[1], ignore = "1" })
-                       m2.uci:save("dhcp")
-               end
        end
 
        s = m2:section(TypedSection, "dhcp", translate("DHCP Server"))
@@ -604,8 +677,8 @@ if has_dnsmasq and net:proto() == "static" then
        s:tab("general",  translate("General Setup"))
        s:tab("advanced", translate("Advanced Settings"))
 
-       function s.filter(self, section)
-               return m2.uci:get("dhcp", section, "interface") == arg[1]
+       function s.cfgsections(self)
+               return { section_id }
        end
 
        local ignore = s:taboption("general", Flag, "ignore",
@@ -615,6 +688,18 @@ if has_dnsmasq and net:proto() == "static" then
 
        ignore.rmempty = false
 
+       function ignore.cfgvalue(self, section)
+               return (section == "-") and self.enabled or Flag.cfgvalue(self, section)
+       end
+
+       function ignore.write(self, section, value)
+               section_id = m2.uci:section("dhcp", "dhcp", nil, {
+                       ignore    = value,
+                       interface = arg[1]
+               })
+       end 
+
+
        local start = s:taboption("general", Value, "start", translate("Start"),
                translate("Lowest leased address as offset from the network address."))
        start.optional = true
@@ -657,9 +742,20 @@ if has_dnsmasq and net:proto() == "static" then
                translate("Define additional DHCP options, for example \"<code>6,192.168.2.1," ..
                        "192.168.2.2</code>\" which advertises different DNS servers to clients."))
 
+
+       local function write_opt(self, section, value)
+               return getmetatable(self).__index.write(self, section_id, value)
+       end
+
+       local function remove_opt(self, section, value)
+               return getmetatable(self).__index.remove(self, section_id, value)
+       end
+
        for i, n in ipairs(s.children) do
                if n ~= ignore then
                        n:depends("ignore", "")
+                       n.write  = write_opt
+                       n.remove = remove_opt
                end
        end
 end