--[[
LuCI - Network model
-Copyright 2009 Jo-Philipp Wich <xm@subsignal.org>
+Copyright 2009-2010 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.
]]--
-local type, pairs, ipairs, loadfile, table, i18n
- = type, pairs, ipairs, loadfile, table, luci.i18n
+local type, next, pairs, ipairs, loadfile, table
+ = type, next, pairs, ipairs, loadfile, table
-local lmo = require "lmo"
+local tonumber, tostring, math = tonumber, tostring, math
+
+local require = require
+
+local bus = require "ubus"
local nxo = require "nixio"
local nfs = require "nixio.fs"
-local iwi = require "iwinfo"
local ipc = require "luci.ip"
+local sys = require "luci.sys"
local utl = require "luci.util"
-local uct = require "luci.model.uci.bind"
+local dsp = require "luci.dispatcher"
+local uci = require "luci.model.uci"
+local lng = require "luci.i18n"
module "luci.model.network"
--- load extensions
-local ext
-local handler = { }
-for ext in nfs.glob(utl.libpath() .. "/model/network/*.lua") do
- if nfs.access(ext) then
- local m = loadfile(ext)
- if m then
- handler[#handler+1] = m()
+IFACE_PATTERNS_VIRTUAL = { }
+IFACE_PATTERNS_IGNORE = { "^wmaster%d", "^wifi%d", "^hwsim%d", "^imq%d", "^ifb%d", "^mon%.wlan%d", "^sit%d", "^gre%d", "^lo$" }
+IFACE_PATTERNS_WIRELESS = { "^wlan%d", "^wl%d", "^ath%d", "^%w+%.network%d" }
+
+
+protocol = utl.class()
+
+local _protocols = { }
+
+local _interfaces, _bridge, _switch, _tunnel
+local _ubus, _ubusnetcache, _ubusdevcache
+local _uci_real, _uci_state
+
+function _filter(c, s, o, r)
+ local val = _uci_real:get(c, s, o)
+ if val then
+ local l = { }
+ if type(val) == "string" then
+ for val in val:gmatch("%S+") do
+ if val ~= r then
+ l[#l+1] = val
+ end
+ end
+ if #l > 0 then
+ _uci_real:set(c, s, o, table.concat(l, " "))
+ else
+ _uci_real:delete(c, s, o)
+ end
+ elseif type(val) == "table" then
+ for _, val in ipairs(val) do
+ if val ~= r then
+ l[#l+1] = val
+ end
+ end
+ if #l > 0 then
+ _uci_real:set(c, s, o, l)
+ else
+ _uci_real:delete(c, s, o)
+ end
+ end
+ end
+end
+
+function _append(c, s, o, a)
+ local val = _uci_real:get(c, s, o) or ""
+ if type(val) == "string" then
+ local l = { }
+ for val in val:gmatch("%S+") do
+ if val ~= a then
+ l[#l+1] = val
+ end
+ end
+ l[#l+1] = a
+ _uci_real:set(c, s, o, table.concat(l, " "))
+ elseif type(val) == "table" then
+ local l = { }
+ for _, val in ipairs(val) do
+ if val ~= a then
+ l[#l+1] = val
+ end
end
+ l[#l+1] = a
+ _uci_real:set(c, s, o, l)
end
end
-function foreach_handler(code, ...)
- local h
- for _, h in ipairs(handler) do
- if code(h, ...) then
+function _stror(s1, s2)
+ if not s1 or #s1 == 0 then
+ return s2 and #s2 > 0 and s2
+ else
+ return s1
+ end
+end
+
+function _get(c, s, o)
+ return _uci_real:get(c, s, o)
+end
+
+function _set(c, s, o, v)
+ if v ~= nil then
+ if type(v) == "boolean" then v = v and "1" or "0" end
+ return _uci_real:set(c, s, o, v)
+ else
+ return _uci_real:delete(c, s, o)
+ end
+end
+
+function _wifi_iface(x)
+ local _, p
+ for _, p in ipairs(IFACE_PATTERNS_WIRELESS) do
+ if x:match(p) then
return true
end
end
return false
end
-local ub = uct.bind("network")
-local ifs, brs, sws
+function _wifi_lookup(ifn)
+ -- got a radio#.network# pseudo iface, locate the corresponding section
+ local radio, ifnidx = ifn:match("^(%w+)%.network(%d+)$")
+ if radio and ifnidx then
+ local sid = nil
+ local num = 0
-function init(cursor)
- if cursor then
- cursor:unload("network")
- cursor:load("network")
- ub:init(cursor)
-
- ifs = { }
- brs = { }
- sws = { }
-
- -- init handler
- foreach_handler(function(h)
- h:init(cursor)
- h:find_interfaces(ifs, brs)
- end)
+ ifnidx = tonumber(ifnidx)
+ _uci_real:foreach("wireless", "wifi-iface",
+ function(s)
+ if s.device == radio then
+ num = num + 1
+ if num == ifnidx then
+ sid = s['.name']
+ return false
+ end
+ end
+ end)
- -- read interface information
- local n, i
- for n, i in ipairs(nxo.getifaddrs()) do
- local name = i.name:match("[^:]+")
- local prnt = name:match("^([^%.]+)%.")
-
- if not _M:ignore_interface(name) then
- ifs[name] = ifs[name] or {
- idx = i.ifindex or n,
- name = name,
- rawname = i.name,
- flags = { },
- ipaddrs = { },
- ip6addrs = { }
- }
+ return sid
- if prnt then
- sws[name] = true
- sws[prnt] = true
- end
+ -- looks like wifi, try to locate the section via state vars
+ elseif _wifi_iface(ifn) then
+ local sid = nil
- if i.family == "packet" then
- ifs[name].flags = i.flags
- ifs[name].stats = i.data
- ifs[name].macaddr = i.addr
- elseif i.family == "inet" then
- ifs[name].ipaddrs[#ifs[name].ipaddrs+1] = ipc.IPv4(i.addr, i.netmask)
- elseif i.family == "inet6" then
- ifs[name].ip6addrs[#ifs[name].ip6addrs+1] = ipc.IPv6(i.addr, i.netmask)
+ _uci_state:foreach("wireless", "wifi-iface",
+ function(s)
+ if s.ifname == ifn then
+ sid = s['.name']
+ return false
end
+ end)
+
+ return sid
+ end
+end
+
+function _iface_virtual(x)
+ local _, p
+ for _, p in ipairs(IFACE_PATTERNS_VIRTUAL) do
+ if x:match(p) then
+ return true
+ end
+ end
+ return false
+end
+
+function _iface_ignore(x)
+ local _, p
+ for _, p in ipairs(IFACE_PATTERNS_IGNORE) do
+ if x:match(p) then
+ return true
+ end
+ end
+ return _iface_virtual(x)
+end
+
+
+function init(cursor)
+ _uci_real = cursor or _uci_real or uci.cursor()
+ _uci_state = _uci_real:substate()
+
+ _interfaces = { }
+ _bridge = { }
+ _switch = { }
+ _tunnel = { }
+
+ _ubus = bus.connect()
+ _ubusnetcache = { }
+ _ubusdevcache = { }
+
+ -- read interface information
+ local n, i
+ for n, i in ipairs(nxo.getifaddrs()) do
+ local name = i.name:match("[^:]+")
+ local prnt = name:match("^([^%.]+)%.")
+
+ if _iface_virtual(name) then
+ _tunnel[name] = true
+ end
+
+ if _tunnel[name] or not _iface_ignore(name) then
+ _interfaces[name] = _interfaces[name] or {
+ idx = i.ifindex or n,
+ name = name,
+ rawname = i.name,
+ flags = { },
+ ipaddrs = { },
+ ip6addrs = { }
+ }
+
+ if prnt then
+ _switch[name] = true
+ _switch[prnt] = true
+ end
+
+ if i.family == "packet" then
+ _interfaces[name].flags = i.flags
+ _interfaces[name].stats = i.data
+ _interfaces[name].macaddr = i.addr
+ elseif i.family == "inet" then
+ _interfaces[name].ipaddrs[#_interfaces[name].ipaddrs+1] = ipc.IPv4(i.addr, i.netmask)
+ elseif i.family == "inet6" then
+ _interfaces[name].ip6addrs[#_interfaces[name].ip6addrs+1] = ipc.IPv6(i.addr, i.netmask)
end
end
+ end
- -- read bridge informaton
- local b, l
- for l in utl.execi("brctl show") do
- if not l:match("STP") then
- local r = utl.split(l, "%s+", nil, true)
- if #r == 4 then
- b = {
- name = r[1],
- id = r[2],
- stp = r[3] == "yes",
- ifnames = { ifs[r[4]] }
- }
- if b.ifnames[1] then
- b.ifnames[1].bridge = b
- end
- brs[r[1]] = b
- elseif b then
- b.ifnames[#b.ifnames+1] = ifs[r[2]]
- b.ifnames[#b.ifnames].bridge = b
+ -- read bridge informaton
+ local b, l
+ for l in utl.execi("brctl show") do
+ if not l:match("STP") then
+ local r = utl.split(l, "%s+", nil, true)
+ if #r == 4 then
+ b = {
+ name = r[1],
+ id = r[2],
+ stp = r[3] == "yes",
+ ifnames = { _interfaces[r[4]] }
+ }
+ if b.ifnames[1] then
+ b.ifnames[1].bridge = b
end
+ _bridge[r[1]] = b
+ elseif b then
+ b.ifnames[#b.ifnames+1] = _interfaces[r[2]]
+ b.ifnames[#b.ifnames].bridge = b
end
end
end
+
+ return _M
+end
+
+function save(self, ...)
+ _uci_real:save(...)
+ _uci_real:load(...)
+end
+
+function commit(self, ...)
+ _uci_real:commit(...)
+ _uci_real:load(...)
+end
+
+function ifnameof(self, x)
+ if utl.instanceof(x, interface) then
+ return x:name()
+ elseif utl.instanceof(x, protocol) then
+ return x:ifname()
+ elseif type(x) == "string" then
+ return x:match("^[^:]+")
+ end
+end
+
+function get_protocol(self, protoname, netname)
+ local v = _protocols[protoname]
+ if v then
+ return v(netname or "__dummy__")
+ end
+end
+
+function get_protocols(self)
+ local p = { }
+ local _, v
+ for _, v in ipairs(_protocols) do
+ p[#p+1] = v("__dummy__")
+ end
+ return p
+end
+
+function register_protocol(self, protoname)
+ local proto = utl.class(protocol)
+
+ function proto.__init__(self, name)
+ self.sid = name
+ end
+
+ function proto.proto(self)
+ return protoname
+ end
+
+ _protocols[#_protocols+1] = proto
+ _protocols[protoname] = proto
+
+ return proto
+end
+
+function register_pattern_virtual(self, pat)
+ IFACE_PATTERNS_VIRTUAL[#IFACE_PATTERNS_VIRTUAL+1] = pat
end
+
function has_ipv6(self)
return nfs.access("/proc/net/ipv6_route")
end
function add_network(self, n, options)
- if n and #n > 0 and n:match("^[a-zA-Z0-9_]+$") and not self:get_network(n) then
- if ub.uci:section("network", "interface", n, options) then
+ local oldnet = self:get_network(n)
+ if n and #n > 0 and n:match("^[a-zA-Z0-9_]+$") and not oldnet then
+ if _uci_real:section("network", "interface", n, options) then
return network(n)
end
+ elseif oldnet and oldnet:is_empty() then
+ if options then
+ local k, v
+ for k, v in pairs(options) do
+ oldnet:set(k, v)
+ end
+ end
+ return oldnet
end
end
function get_network(self, n)
- if n and ub.uci:get("network", n) == "interface" then
+ if n and _uci_real:get("network", n) == "interface" then
return network(n)
end
end
function get_networks(self)
local nets = { }
- ub.uci:foreach("network", "interface",
+ local nls = { }
+
+ _uci_real:foreach("network", "interface",
function(s)
- nets[#nets+1] = network(s['.name'])
+ nls[s['.name']] = network(s['.name'])
end)
+
+ local n
+ for n in utl.kspairs(nls) do
+ nets[#nets+1] = nls[n]
+ end
+
return nets
end
function del_network(self, n)
- local r = ub.uci:delete("network", n)
+ local r = _uci_real:delete("network", n)
if r then
- ub.uci:foreach("network", "alias",
- function(s)
- if s.interface == n then
- ub.uci:delete("network", s['.name'])
- end
- end)
- ub.uci:foreach("network", "route",
+ _uci_real:delete_all("network", "alias",
+ function(s) return (s.interface == n) end)
+
+ _uci_real:delete_all("network", "route",
+ function(s) return (s.interface == n) end)
+
+ _uci_real:delete_all("network", "route6",
+ function(s) return (s.interface == n) end)
+
+ _uci_real:foreach("wireless", "wifi-iface",
function(s)
- if s.interface == n then
- ub.uci:delete("network", s['.name'])
+ local net
+ local rest = { }
+ for net in utl.imatch(s.network) do
+ if net ~= n then
+ rest[#rest+1] = net
+ end
end
- end)
- ub.uci:foreach("network", "route6",
- function(s)
- if s.interface == n then
- ub.uci:delete("network", s['.name'])
+ if #rest > 0 then
+ _uci_real:set("wireless", s['.name'], "network",
+ table.concat(rest, " "))
+ else
+ _uci_real:delete("wireless", s['.name'], "network")
end
end)
-
- foreach_handler(function(h) h:del_network(n) end)
end
return r
end
function rename_network(self, old, new)
local r
if new and #new > 0 and new:match("^[a-zA-Z0-9_]+$") and not self:get_network(new) then
- r = ub.uci:section("network", "interface", new,
- ub.uci:get_all("network", old))
+ r = _uci_real:section("network", "interface", new, _uci_real:get_all("network", old))
if r then
- ub.uci:foreach("network", "alias",
+ _uci_real:foreach("network", "alias",
function(s)
if s.interface == old then
- ub.uci:set("network", s['.name'], "interface", new)
+ _uci_real:set("network", s['.name'], "interface", new)
end
end)
- ub.uci:foreach("network", "route",
+
+ _uci_real:foreach("network", "route",
function(s)
if s.interface == old then
- ub.uci:set("network", s['.name'], "interface", new)
+ _uci_real:set("network", s['.name'], "interface", new)
end
end)
- ub.uci:foreach("network", "route6",
+
+ _uci_real:foreach("network", "route6",
function(s)
if s.interface == old then
- ub.uci:set("network", s['.name'], "interface", new)
+ _uci_real:set("network", s['.name'], "interface", new)
end
end)
- foreach_handler(function(h) h:rename_network(old, new) end)
+ _uci_real:foreach("wireless", "wifi-iface",
+ function(s)
+ local net
+ local list = { }
+ for net in utl.imatch(s.network) do
+ if net == old then
+ list[#list+1] = new
+ else
+ list[#list+1] = net
+ end
+ end
+ if #list > 0 then
+ _uci_real:set("wireless", s['.name'], "network",
+ table.concat(list, " "))
+ end
+ end)
+
+ _uci_real:delete("network", old)
end
end
return r or false
end
function get_interface(self, i)
- if ifs[i] then
+ if _interfaces[i] or _wifi_iface(i) then
return interface(i)
else
- local j
- for j, _ in pairs(ifs) do
- if ifs[j].sid == i then
- return interface(j)
- end
- end
+ local ifc
+ local num = { }
+ _uci_real:foreach("wireless", "wifi-iface",
+ function(s)
+ if s.device then
+ num[s.device] = num[s.device] and num[s.device] + 1 or 1
+ if s['.name'] == i then
+ ifc = interface(
+ "%s.network%d" %{s.device, num[s.device] })
+ return false
+ end
+ end
+ end)
+ return ifc
end
end
function get_interfaces(self)
- local ifaces = { }
local iface
- for iface, _ in pairs(ifs) do
- ifaces[#ifaces+1] = interface(iface)
- end
- return ifaces
-end
-
-function ignore_interface(self, x)
- if foreach_handler(function(h) return h:ignore_interface(x) end) then
- return true
- else
- return (x:match("^wmaster%d") or x:match("^wifi%d")
- or x:match("^hwsim%d") or x:match("^imq%d") or x == "lo")
- end
-end
-
-
-network = ub:section("interface")
-network:property("device")
-network:property("ifname")
-network:property("proto")
-network:property("type")
-
-function network.name(self)
- return self.sid
-end
-
-function network.is_bridge(self)
- return (self:type() == "bridge")
-end
-
-function network.add_interface(self, ifname)
- local ifaces, iface
-
- if type(ifname) ~= "string" then
- ifaces = { ifname:name() }
- else
- ifaces = ub:list(ifname)
- end
-
- for _, iface in ipairs(ifaces) do
- if ifs[iface] then
- -- make sure the interface is removed from all networks
- local i = interface(iface)
- local n = i:get_network()
- if n then n:del_interface(iface) end
+ local ifaces = { }
+ local seen = { }
+ local nfs = { }
+ local baseof = { }
- if ifs[iface].handler then
- ifs[iface].handler:add_interface(self, iface, ifs[iface])
- else
- self:ifname(ub:list((self:ifname() or ''), iface))
+ -- find normal interfaces
+ _uci_real:foreach("network", "interface",
+ function(s)
+ for iface in utl.imatch(s.ifname) do
+ if not _iface_ignore(iface) and not _wifi_iface(iface) then
+ seen[iface] = true
+ nfs[iface] = interface(iface)
+ end
end
- end
- end
-end
-
-function network.del_interface(self, ifname)
- if type(ifname) ~= "string" then
- ifname = ifname:name()
- end
-
- if ifs[ifname] and ifs[ifname].handler then
- ifs[ifname].handler:del_interface(self, ifname, ifs[ifname])
- else
- self:ifname(ub:list((self:ifname() or ''), nil, ifname))
- end
-end
+ end)
-function network.get_interfaces(self)
- local ifaces = { }
- local iface
- for _, iface in ipairs(ub:list(self:ifname())) do
- iface = iface:match("[^:]+")
- if ifs[iface] then
- ifaces[#ifaces+1] = interface(iface)
+ for iface in utl.kspairs(_interfaces) do
+ if not (seen[iface] or _iface_ignore(iface) or _wifi_iface(iface)) then
+ nfs[iface] = interface(iface)
end
end
- for iface, _ in pairs(ifs) do
- if ifs[iface].network == self:name() then
- ifaces[#ifaces+1] = interface(iface)
- end
- end
- return ifaces
-end
-function network.contains_interface(self, iface)
- local i
- local ifaces = ub:list(self:ifname())
+ -- find vlan interfaces
+ _uci_real:foreach("network", "switch_vlan",
+ function(s)
+ if not s.device then
+ return
+ end
- if type(iface) ~= "string" then
- iface = iface:name()
- end
+ local base = baseof[s.device]
+ if not base then
+ if not s.device:match("^eth%d") then
+ local l
+ for l in utl.execi("swconfig dev %q help 2>/dev/null" % s.device) do
+ if not base then
+ base = l:match("^%w+: (%w+)")
+ end
+ end
+ if not base or not base:match("^eth%d") then
+ base = "eth0"
+ end
+ else
+ base = s.device
+ end
+ baseof[s.device] = base
+ end
- for _, i in ipairs(ifaces) do
- if i == iface then
- return true
- end
- end
+ local vid = tonumber(s.vid or s.vlan)
+ if vid ~= nil and vid >= 0 and vid <= 4095 then
+ local iface = "%s.%d" %{ base, vid }
+ if not seen[iface] then
+ seen[iface] = true
+ nfs[iface] = interface(iface)
+ end
+ end
+ end)
- for i, _ in pairs(ifs) do
- if ifs[i].dev and ifs[i].dev.network == self:name() then
- return true
- end
+ for iface in utl.kspairs(nfs) do
+ ifaces[#ifaces+1] = nfs[iface]
end
- return false
-end
-
+ -- find wifi interfaces
+ local num = { }
+ local wfs = { }
+ _uci_real:foreach("wireless", "wifi-iface",
+ function(s)
+ if s.device then
+ num[s.device] = num[s.device] and num[s.device] + 1 or 1
+ local i = "%s.network%d" %{ s.device, num[s.device] }
+ wfs[i] = interface(i)
+ end
+ end)
-interface = utl.class()
-function interface.__init__(self, ifname)
- if ifs[ifname] then
- self.ifname = ifname
- self.dev = ifs[ifname]
- self.br = brs[ifname]
+ for iface in utl.kspairs(wfs) do
+ ifaces[#ifaces+1] = wfs[iface]
end
-end
-
-function interface.name(self)
- return self.ifname
-end
-function interface.mac(self)
- return self.dev.macaddr or "00:00:00:00:00:00"
-end
-
-function interface.ipaddrs(self)
- return self.dev.ipaddrs or { }
+ return ifaces
end
-function interface.ip6addrs(self)
- return self.dev.ip6addrs or { }
+function ignore_interface(self, x)
+ return _iface_ignore(x)
end
-function interface.type(self)
- if self.dev and self.dev.type then
- return self.dev.type
- elseif brs[self.ifname] then
- return "bridge"
- elseif sws[self.ifname] or self.ifname:match("%.") then
- return "switch"
- else
- return "ethernet"
+function get_wifidev(self, dev)
+ if _uci_real:get("wireless", dev) == "wifi-device" then
+ return wifidev(dev)
end
end
-function interface.shortname(self)
- if self.dev and self.dev.handler then
- return self.dev.handler:shortname(self)
- else
- return self.ifname
- end
-end
+function get_wifidevs(self)
+ local devs = { }
+ local wfd = { }
-function interface.get_i18n(self)
- if self.dev and self.dev.handler then
- return self.dev.handler:get_i18n(self)
- else
- return "%s: %q" %{ self:get_type_i18n(), self:name() }
- end
-end
+ _uci_real:foreach("wireless", "wifi-device",
+ function(s) wfd[#wfd+1] = s['.name'] end)
-function interface.get_type_i18n(self)
- local x = self:type()
- if x == "wifi" then
- return i18n.translate("Wireless Adapter")
- elseif x == "bridge" then
- return i18n.translate("Bridge")
- elseif x == "switch" then
- return i18n.translate("Ethernet Switch")
- else
- return i18n.translate("Ethernet Adapter")
+ local dev
+ for _, dev in utl.vspairs(wfd) do
+ devs[#devs+1] = wifidev(dev)
end
-end
-function interface.ports(self)
- if self.br then
- local iface
- local ifaces = { }
- for _, iface in ipairs(self.br.ifnames) do
- ifaces[#ifaces+1] = interface(iface.name)
- end
- return ifaces
- end
+ return devs
end
-function interface.bridge_id(self)
- if self.br then
- return self.br.id
- else
- return nil
+function get_wifinet(self, net)
+ local wnet = _wifi_lookup(net)
+ if wnet then
+ return wifinet(wnet)
end
end
-function interface.bridge_stp(self)
- if self.br then
- return self.br.stp
- else
- return false
+function add_wifinet(self, net, options)
+ if type(options) == "table" and options.device and
+ _uci_real:get("wireless", options.device) == "wifi-device"
+ then
+ local wnet = _uci_real:section("wireless", "wifi-iface", nil, options)
+ return wifinet(wnet)
end
end
-function interface.is_up(self)
- return self.dev.flags and self.dev.flags.up
-end
-
-function interface.is_bridge(self)
- return (self:type() == "bridge")
-end
-
-function interface.is_bridgeport(self)
- return self.dev and self.dev.bridge and true or false
-end
-
-function interface.tx_bytes(self)
- return self.dev and self.dev.stats
- and self.dev.stats.tx_bytes or 0
-end
-
-function interface.rx_bytes(self)
- return self.dev and self.dev.stats
- and self.dev.stats.rx_bytes or 0
-end
-
-function interface.tx_packets(self)
- return self.dev and self.dev.stats
- and self.dev.stats.tx_packets or 0
-end
-
-function interface.rx_packets(self)
- return self.dev and self.dev.stats
- and self.dev.stats.rx_packets or 0
-end
-
-function interface.get_network(self)
- if self.dev and self.dev.network then
- self.network = _M:get_network(self.dev.network)
- end
-
- if not self.network then
- local net
- for _, net in ipairs(_M:get_networks()) do
- if net:contains_interface(self.ifname) then
- self.network = net
- return net
- end
- end
- else
- return self.network
+function del_wifinet(self, net)
+ local wnet = _wifi_lookup(net)
+ if wnet then
+ _uci_real:delete("wireless", wnet)
+ return true
end
+ return false
end
---[==[
-#!/usr/bin/lua
-
-local uci = require "luci.model.uci".cursor_state()
-local utl = require "luci.util"
-local sys = require "luci.sys"
-local lip = require "luci.ip"
-local nxo = require "nixio"
-local nfs = require "nixio.fs"
-
--- patch uci
-local x = getmetatable(uci)
-
-function x:list(...)
- local val = self:get(...)
- local lst = { }
-
- if type(val) == "list" then
- local _, v
- for _, v in ipairs(val) do
- local i
- for i in v:gmatch("%S+") do
- lst[#lst+1] = i
+function get_status_by_route(self, addr, mask)
+ local _, object
+ for _, object in ipairs(_ubus:objects()) do
+ local net = object:match("^network%.interface%.(.+)")
+ if net then
+ local s = _ubus:call(object, "status", {})
+ if s and s.route then
+ local rt
+ for _, rt in ipairs(s.route) do
+ if rt.target == addr and rt.mask == mask then
+ return net, s
+ end
+ end
end
end
- elseif type(val) == "string" then
- local i
- for i in val:gmatch("%S+") do
- lst[#lst+1] = i
- end
end
-
- return lst
end
+function get_wannet(self)
+ local net = self:get_status_by_route("0.0.0.0", 0)
+ return net and network(net)
+end
-system = utl.class()
-
-system._switches = { }
-system._vlans = { }
-
-function system:__init__()
- self._networks = { }
-
- uci:foreach("network2", "interface",
- function(s)
- self._networks[#self._networks+1] = system.network(s, self)
- end)
+function get_wandev(self)
+ local _, stat = self:get_status_by_route("0.0.0.0", 0)
+ return stat and interface(stat.l3_device or stat.device)
end
-function system:networks()
- local index = 0
- return function()
- if index <= #self._networks then
- index = index + 1
- return self._networks[index]
- else
- return nil
- end
- end
+function get_wan6net(self)
+ local net = self:get_status_by_route("::", 0)
+ return net and network(net)
end
-function system:find_network(name)
- local v
- for _, v in ipairs(self._networks) do
- if v:name() == name then
- return v
- end
- end
+function get_wan6dev(self)
+ local _, stat = self:get_status_by_route("::", 0)
+ return stat and interface(stat.l3_device or stat.device)
end
-function system:find_interface(name)
- local v
- for _, v in ipairs(self._networks) do
- local i
- for i in v:interfaces() do
- if i:is_bridge() then
- local p
- for p in i:interfaces() do
- if p:name() == name then
- return p
- end
- end
- end
- if i:name() == name then
- return i
- end
- end
+function network(name, proto)
+ if name then
+ local p = proto or _uci_real:get("network", name, "proto")
+ local c = p and _protocols[p] or protocol
+ return c(name)
end
end
-function system:delete_network(name)
- local i
- for i = 1, #self._networks do
- if self._networks[i]:name() == name then
- local x
-
- for x in self._networks[i]:aliases() do
- uci:delete("network2", x:name())
- end
-
- for x in self._networks[i]:routes() do
- uci:delete("network2", x:name())
- end
-
- uci:delete("network2", self._networks[i])
- table.remove(self._networks, i)
+function protocol.__init__(self, name)
+ self.sid = name
+end
- return true
- end
+function protocol._get(self, opt)
+ local v = _uci_real:get("network", self.sid, opt)
+ if type(v) == "table" then
+ return table.concat(v, " ")
end
- return false
+ return v or ""
end
-function system:print()
- local v
- for v in self:networks() do
- print(v:name())
- v:print()
- print("--")
+function protocol._ubus(self, field)
+ if not _ubusnetcache[self.sid] then
+ _ubusnetcache[self.sid] = _ubus:call("network.interface.%s" % self.sid,
+ "status", { })
end
+ if _ubusnetcache[self.sid] and field then
+ return _ubusnetcache[self.sid][field]
+ end
+ return _ubusnetcache[self.sid]
end
-function system.ignore_iface(ifn)
- return (nil ~= (
- ifn:match("^wlan%d") or
- ifn:match("^ath%d") or
- ifn:match("^wl%d") or
- ifn:match("^imq%d") or
- ifn:match("^br%-") or
- ifn:match("^/dev/")
- ))
+function protocol.get(self, opt)
+ return _get("network", self.sid, opt)
end
-function system.find_wifi_networks(net)
- local lst = { }
- local cnt = 0
-
- uci:foreach("wireless", "wifi-iface",
- function(s)
- if s.device and s.network == net then
- lst[#lst+1] = { s.device, s['.name'], cnt }
- end
- cnt = cnt + 1
- end)
-
- return lst
+function protocol.set(self, opt, val)
+ return _set("network", self.sid, opt, val)
end
-function system.find_iface_names(net)
- local lst = { }
-
- local val = uci:list("network2", net, "device")
- if #val == 0 or val[1]:match("^/dev/") then
- val = uci:list("network2", net, "ifname")
- end
-
- local ifn
- for _, ifn in ipairs(val) do
- if not system.ignore_iface(ifn) then
- lst[#lst+1] = ifn
- end
+function protocol.ifname(self)
+ local ifname
+ if self:is_floating() then
+ ifname = self:_ubus("l3_device")
+ else
+ ifname = self:_ubus("device")
end
-
- return lst
-end
-
-function system.find_switch(name)
- local swname, swdev, swvlan
-
- -- find switch
- uci:foreach("network2", "switch",
- function(s)
- swname = s.name or s['.name']
-
- -- special: rtl8366s is eth0 (wan is eth1)
- if swname == "rtl8366s" then
- swdev = "eth0"
-
- -- special: rtl8366rb is eth0 (wan + lan)
- elseif swname == "rtl8366rb" then
- swdev = "eth0"
-
- -- treat swname as swdev
- else
- swdev = swname
- end
-
- return false
- end)
-
- -- find first vlan
- if swdev then
- uci:foreach("network2", "switch_vlan",
+ if not ifname then
+ local num = { }
+ _uci_real:foreach("wireless", "wifi-iface",
function(s)
- if s.device == swname then
- local vlan = tonumber(s.vlan)
- if vlan and (not swvlan or vlan < swvlan) then
- swvlan = vlan
+ if s.device then
+ num[s.device] = num[s.device]
+ and num[s.device] + 1 or 1
+
+ local net
+ for net in utl.imatch(s.network) do
+ if net == self.sid then
+ ifname = "%s.network%d" %{ s.device, num[s.device] }
+ return false
+ end
end
end
end)
end
-
-
- local veth, vlan = name:match("^(%S+)%.(%d+)$")
-
- -- have vlan id and matching switch
- if vlan and veth == swdev then
- return swname, swdev, vlan
-
- -- have no vlan id but matching switch, assume first switch vlan
- elseif not vlan and name == swdev then
- return swname, swdev, swvlan
-
- -- have vlan and no matching switch, assume software vlan
- elseif vlan then
- return nil, veth, vlan
- end
+ return ifname
end
+function protocol.proto(self)
+ return "none"
+end
-system.network = utl.class()
-
-function system.network:__init__(s, sys)
- self._name = s['.name']
- self._sys = sys
- self._routes = { }
- self._aliases = { }
-
- if s.type == "bridge" then
- self._interfaces = { system.network.bridge(s['.name'], self) }
- else
- self._interfaces = { }
-
- local ifn
-
- -- find wired ifaces
- for _, ifn in ipairs(system.find_iface_names(self._name)) do
- self._interfaces[#self._interfaces+1] = system.network.iface(ifn, self)
- end
-
- -- find wifi networks
- for _, ifn in ipairs(system.find_wifi_networks(self._name)) do
- self._interfaces[#self._interfaces+1] = system.network.iface(ifn, self)
- end
- end
-
- -- find ipv4 routes
- uci:foreach("network2", "route",
- function(s)
- if s.interface == self._name and s.target then
- self._routes[#self._routes+1] = system.network.route(s, self)
- end
- end)
-
- -- find ipv6 routes
- uci:foreach("network2", "route6",
- function(s)
- if s.interface == self._name and s.target then
- self._routes[#self._routes+1] = system.network.route(s, self)
- end
- end)
+function protocol.get_i18n(self)
+ local p = self:proto()
+ if p == "none" then
+ return lng.translate("Unmanaged")
+ elseif p == "static" then
+ return lng.translate("Static address")
+ elseif p == "dhcp" then
+ return lng.translate("DHCP client")
+ else
+ return lng.translate("Unknown")
+ end
+end
- -- find aliases
- uci:foreach("network2", "alias",
- function(s)
- if s.interface == self._name and s.proto then
- self._aliases[#self._aliases+1] = system.network.alias(s, self)
- end
- end)
+function protocol.type(self)
+ return self:_get("type")
end
-function system.network:name()
- return self._name
+function protocol.name(self)
+ return self.sid
end
-function system.network:system()
- return self._sys
+function protocol.uptime(self)
+ return self:_ubus("uptime") or 0
end
-function system.network:interfaces()
- local index = 0
- return function()
- if index <= #self._interfaces then
- index = index + 1
- return self._interfaces[index]
- else
- return nil
- end
+function protocol.expires(self)
+ local a = tonumber(_uci_state:get("network", self.sid, "lease_acquired"))
+ local l = tonumber(_uci_state:get("network", self.sid, "lease_lifetime"))
+ if a and l then
+ l = l - (nxo.sysinfo().uptime - a)
+ return l > 0 and l or 0
end
+ return -1
end
-function system.network:interface()
- return self._interfaces[1]
+function protocol.metric(self)
+ return tonumber(_uci_state:get("network", self.sid, "metric")) or 0
end
-function system.network:num_routes()
- return #self._routes
+function protocol.ipaddr(self)
+ local addrs = self:_ubus("ipv4-address")
+ return addrs and #addrs > 0 and addrs[1].address
end
-function system.network:routes()
- local index = 0
- return function()
- if index <= #self._routes then
- index = index + 1
- return self._routes[index]
- else
- return nil
- end
- end
+function protocol.netmask(self)
+ local addrs = self:_ubus("ipv4-address")
+ return addrs and #addrs > 0 and
+ ipc.IPv4("0.0.0.0/%d" % addrs[1].mask):mask():string()
end
-function system.network:num_aliases()
- return #self._aliases
+function protocol.gwaddr(self)
+ local _, route
+ for _, route in ipairs(self:_ubus("route") or { }) do
+ if route.target == "0.0.0.0" and route.mask == 0 then
+ return route.nexthop
+ end
+ end
end
-function system.network:aliases()
- local index = 0
- return function()
- if index <= #self._aliases then
- index = index + 1
- return self._aliases[index]
- else
- return nil
+function protocol.dnsaddrs(self)
+ local dns = { }
+ local _, addr
+ for _, addr in ipairs(self:_ubus("dns-server") or { }) do
+ if not addr:match(":") then
+ dns[#dns+1] = addr
end
end
+ return dns
end
-function system.network:delete_route(rt)
- local i
- for i = 1, #self._routes do
- if self._routes[i]:name() == rt:name() then
- uci:delete("network2", rt:name())
- table.remove(self._routes, i)
- return true
+function protocol.ip6addr(self)
+ local addrs = self:_ubus("ipv6-address")
+ return addrs and #addrs > 0
+ and "%s/%d" %{ addrs[1].address, addrs[1].mask }
+end
+
+function protocol.gw6addr(self)
+ local _, route
+ for _, route in ipairs(self:_ubus("route") or { }) do
+ if route.target == "::" and route.mask == 0 then
+ return ipc.IPv6(route.nexthop):string()
end
end
- return false
end
-function system.network:delete_alias(al)
- local i
- for i = 1, #self._aliases do
- if self._aliases[i]:name() == al:name() then
- uci:delete("network2", al:name())
- table.remove(self._aliases, i)
- return true
+function protocol.dns6addrs(self)
+ local dns = { }
+ local _, addr
+ for _, addr in ipairs(self:_ubus("dns-server") or { }) do
+ if addr:match(":") then
+ dns[#dns+1] = addr
end
end
- return false
+ return dns
end
-function system.network:print()
- self:interface():print()
+function protocol.is_bridge(self)
+ return (not self:is_virtual() and self:type() == "bridge")
end
+function protocol.opkg_package(self)
+ return nil
+end
-system.network.iface = utl.class()
-
-function system.network.iface:__init__(ifn, net, parent)
- self._net = net
- self._parent = parent
+function protocol.is_installed(self)
+ return true
+end
- -- is a wifi iface
- if type(ifn) == "table" then
- local wifidev, network, index = unpack(ifn)
+function protocol.is_virtual(self)
+ return false
+end
- self._name = "%s.%d" %{ wifidev, index }
- self._wifidev = wifidev
- self._wifinet = index
- self._ifname = uci:get("wireless", network, "ifname") or self._name
+function protocol.is_floating(self)
+ return false
+end
- -- is a wired iface
+function protocol.is_empty(self)
+ if self:is_floating() then
+ return false
else
- self._name = ifn
- self._ifname = ifn
+ local rv = true
- local switch, swdev, vlan = system.find_switch(self._ifname)
-
- if switch then
- self._switch = system.switch(switch, swdev, self)
+ if (self:_get("ifname") or ""):match("%S+") then
+ rv = false
end
- if vlan then
- self._vlan = system.vlan(vlan, self._switch, self)
- end
+ _uci_real:foreach("wireless", "wifi-iface",
+ function(s)
+ local n
+ for n in utl.imatch(s.network) do
+ if n == self.sid then
+ rv = false
+ return false
+ end
+ end
+ end)
+
+ return rv
end
end
-function system.network.iface:name()
- return self._name
-end
+function protocol.add_interface(self, ifname)
+ ifname = _M:ifnameof(ifname)
+ if ifname and not self:is_floating() then
+ -- if its a wifi interface, change its network option
+ local wif = _wifi_lookup(ifname)
+ if wif then
+ _append("wireless", wif, "network", self.sid)
-function system.network.iface:parent()
- return self._parent
+ -- add iface to our iface list
+ else
+ _append("network", self.sid, "ifname", ifname)
+ end
+ end
end
-function system.network.iface:network()
- return self._net
-end
+function protocol.del_interface(self, ifname)
+ ifname = _M:ifnameof(ifname)
+ if ifname and not self:is_floating() then
+ -- if its a wireless interface, clear its network option
+ local wif = _wifi_lookup(ifname)
+ if wif then _filter("wireless", wif, "network", self.sid) end
-function system.network.iface:is_managed()
- return (self._net ~= nil)
+ -- remove the interface
+ _filter("network", self.sid, "ifname", ifname)
+ end
end
-function system.network.iface:is_vlan()
- return (self._vlan ~= nil)
+function protocol.get_interface(self)
+ if self:is_virtual() then
+ _tunnel[self:proto() .. "-" .. self.sid] = true
+ return interface(self:proto() .. "-" .. self.sid, self)
+ elseif self:is_bridge() then
+ _bridge["br-" .. self.sid] = true
+ return interface("br-" .. self.sid, self)
+ else
+ local ifn = nil
+ local num = { }
+ for ifn in utl.imatch(_uci_real:get("network", self.sid, "ifname")) do
+ ifn = ifn:match("^[^:/]+")
+ return ifn and interface(ifn, self)
+ end
+ ifn = nil
+ _uci_real:foreach("wireless", "wifi-iface",
+ function(s)
+ if s.device then
+ num[s.device] = num[s.device] and num[s.device] + 1 or 1
+
+ local net
+ for net in utl.imatch(s.network) do
+ if net == self.sid then
+ ifn = "%s.network%d" %{ s.device, num[s.device] }
+ return false
+ end
+ end
+ end
+ end)
+ return ifn and interface(ifn, self)
+ end
end
-function system.network.iface:is_software_vlan()
- return (not self._switch and self._vlan ~= nil)
-end
+function protocol.get_interfaces(self)
+ if self:is_bridge() or (self:is_virtual() and not self:is_floating()) then
+ local ifaces = { }
-function system.network.iface:is_hardware_vlan()
- return (self._switch ~= nil and self._vlan ~= nil)
-end
+ local ifn
+ local nfs = { }
+ for ifn in utl.imatch(self:get("ifname")) do
+ ifn = ifn:match("^[^:/]+")
+ nfs[ifn] = interface(ifn, self)
+ end
+
+ for ifn in utl.kspairs(nfs) do
+ ifaces[#ifaces+1] = nfs[ifn]
+ end
+
+ local num = { }
+ local wfs = { }
+ _uci_real:foreach("wireless", "wifi-iface",
+ function(s)
+ if s.device then
+ num[s.device] = num[s.device] and num[s.device] + 1 or 1
+
+ local net
+ for net in utl.imatch(s.network) do
+ if net == self.sid then
+ ifn = "%s.network%d" %{ s.device, num[s.device] }
+ wfs[ifn] = interface(ifn, self)
+ end
+ end
+ end
+ end)
+
+ for ifn in utl.kspairs(wfs) do
+ ifaces[#ifaces+1] = wfs[ifn]
+ end
-function system.network.iface:_sysfs(path, default)
- path = "/sys/class/net/%s/%s" %{ self._ifname, path }
+ return ifaces
+ end
+end
- local data = nfs.readfile(path)
+function protocol.contains_interface(self, ifname)
+ ifname = _M:ifnameof(ifname)
+ if not ifname then
+ return false
+ elseif self:is_virtual() and self:proto() .. "-" .. self.sid == ifname then
+ return true
+ elseif self:is_bridge() and "br-" .. self.sid == ifname then
+ return true
+ else
+ local ifn
+ for ifn in utl.imatch(self:get("ifname")) do
+ ifn = ifn:match("[^:]+")
+ if ifn == ifname then
+ return true
+ end
+ end
- if type(default) == "number" then
- return tonumber(data) or default
- elseif data and #data > 0 then
- return data and data:gsub("%s+$", "") or default
+ local wif = _wifi_lookup(ifname)
+ if wif then
+ local n
+ for n in utl.imatch(_uci_real:get("wireless", wif, "network")) do
+ if n == self.sid then
+ return true
+ end
+ end
+ end
end
- return default
+ return false
end
-function system.network.iface:rx_bytes()
- return self:_sysfs("statistics/rx_bytes", 0)
+function protocol.adminlink(self)
+ return dsp.build_url("admin", "network", "network", self.sid)
end
-function system.network.iface:tx_bytes()
- return self:_sysfs("statistics/tx_bytes", 0)
-end
-function system.network.iface:rx_packets()
- return self:_sysfs("statistics/rx_packets", 0)
-end
+interface = utl.class()
+
+function interface.__init__(self, ifname, network)
+ local wif = _wifi_lookup(ifname)
+ if wif then
+ self.wif = wifinet(wif)
+ self.ifname = _uci_state:get("wireless", wif, "ifname")
+ end
-function system.network.iface:tx_packets()
- return self:_sysfs("statistics/tx_packets", 0)
+ self.ifname = self.ifname or ifname
+ self.dev = _interfaces[self.ifname]
+ self.network = network
end
-function system.network.iface:macaddr()
- return self:_sysfs("address")
+function interface._ubus(self, field)
+ if not _ubusdevcache[self.ifname] then
+ _ubusdevcache[self.ifname] = _ubus:call("network.device", "status",
+ { name = self.ifname })
+ end
+ if _ubusdevcache[self.ifname] and field then
+ return _ubusdevcache[self.ifname][field]
+ end
+ return _ubusdevcache[self.ifname]
end
-function system.network.iface:mtu()
- return self:_sysfs("mtu", 1500)
+function interface.name(self)
+ return self.wif and self.wif:ifname() or self.ifname
end
-function system.network.iface:is_bridge()
- return (self:_sysfs("bridge/max_age", 0) > 0)
+function interface.mac(self)
+ return (self:_ubus("macaddr") or "00:00:00:00:00:00"):upper()
end
-function system.network.iface:is_bridge_port()
- return (self:_sysfs("brport/port_no", 0) > 0)
+function interface.ipaddrs(self)
+ return self.dev and self.dev.ipaddrs or { }
end
-function system.network.iface:delete()
- if self._wifidev then
- local cnt = 0
- uci:foreach("wireless", "wifi-iface",
- function(s)
- cnt = cnt + 1
- if s.device == self._wifidev and cnt == self._wifinet then
- uci:delete("wireless", s['.name'])
- return false
- end
- end)
- end
+function interface.ip6addrs(self)
+ return self.dev and self.dev.ip6addrs or { }
end
-function system.network.iface:print()
- if self._wifidev then
- print(" wifi: ", self._wifidev, "net: ", self._wifinet)
+function interface.type(self)
+ if self.wif or _wifi_iface(self.ifname) then
+ return "wifi"
+ elseif _bridge[self.ifname] then
+ return "bridge"
+ elseif _tunnel[self.ifname] then
+ return "tunnel"
+ elseif self.ifname:match("%.") then
+ return "vlan"
+ elseif _switch[self.ifname] then
+ return "switch"
else
- print(" iface: ", self._name)
+ return "ethernet"
end
+end
- print(" rx: ", self:rx_bytes(), self:rx_packets())
- print(" tx: ", self:tx_bytes(), self:tx_packets())
- print(" mtu: ", self:mtu())
- print(" mac: ", self:macaddr())
- print(" bridge? ", self:is_bridge())
- print(" port? ", self:is_bridge_port())
- print(" swvlan? ", self:is_software_vlan())
- print(" hwvlan? ", self:is_hardware_vlan())
-
- if self._switch then
- self._switch:print()
+function interface.shortname(self)
+ if self.wif then
+ return "%s %q" %{
+ self.wif:active_mode(),
+ self.wif:active_ssid() or self.wif:active_bssid()
+ }
+ else
+ return self.ifname
end
+end
- if self._vlan then
- self._vlan:print()
+function interface.get_i18n(self)
+ if self.wif then
+ return "%s: %s %q" %{
+ lng.translate("Wireless Network"),
+ self.wif:active_mode(),
+ self.wif:active_ssid() or self.wif:active_bssid()
+ }
+ else
+ return "%s: %q" %{ self:get_type_i18n(), self:name() }
end
end
-
-system.network.bridge = utl.class(system.network.iface)
-
-function system.network.bridge:__init__(brn, net)
- self._net = net
- self._name = "br-" .. brn
- self._ifname = self._name
- self._interfaces = { }
-
- local ifn
-
- -- find wired ifaces
- for _, ifn in ipairs(system.find_iface_names(brn)) do
- self._interfaces[#self._interfaces+1] = system.network.iface(ifn, net, self)
+function interface.get_type_i18n(self)
+ local x = self:type()
+ if x == "wifi" then
+ return lng.translate("Wireless Adapter")
+ elseif x == "bridge" then
+ return lng.translate("Bridge")
+ elseif x == "switch" then
+ return lng.translate("Ethernet Switch")
+ elseif x == "vlan" then
+ return lng.translate("VLAN Interface")
+ elseif x == "tunnel" then
+ return lng.translate("Tunnel Interface")
+ else
+ return lng.translate("Ethernet Adapter")
end
+end
- -- find wifi networks
- for _, ifn in ipairs(system.find_wifi_networks(brn)) do
- self._interfaces[#self._interfaces+1] = system.network.iface(ifn, net, self)
+function interface.adminlink(self)
+ if self.wif then
+ return self.wif:adminlink()
end
end
-function system.network.bridge:interfaces()
- local index = 0
- return function()
- if index <= #self._interfaces then
- index = index + 1
- return self._interfaces[index]
- else
- return nil
+function interface.ports(self)
+ local members = self:_ubus("bridge-members")
+ if members then
+ local _, iface
+ local ifaces = { }
+ for _, iface in ipairs(members) do
+ ifaces[#ifaces+1] = interface(iface)
end
end
end
-function system.network.bridge:print()
- local v
- for v in self:interfaces() do
- io.write(" port: ")
- v:print()
+function interface.bridge_id(self)
+ if self.br then
+ return self.br.id
+ else
+ return nil
end
- print(" rx: ", self:rx_bytes(), self:rx_packets())
- print(" tx: ", self:tx_bytes(), self:tx_packets())
- print(" mtu: ", self:mtu())
- print(" mac: ", self:macaddr())
- print(" bridge? ", self:is_bridge())
- print(" port? ", self:is_bridge_port())
end
-
-system.network.route = utl.class()
-
-function system.network.route:__init__(rt, net)
- self._net = net
- self._name = rt['.name']
- self._ipv6 = (rt['.type'] == "route6")
- self._mtu = tonumber(rt.mtu) or (net and net:interface():mtu() or 1500)
- self._metric = tonumber(rt.metric) or 0
-
- if self._ipv6 then
- self._gateway = lip.IPv6(rt.gateway or "::")
- self._target = lip.IPv6(rt.target or "::")
+function interface.bridge_stp(self)
+ if self.br then
+ return self.br.stp
else
- self._gateway = lip.IPv4(rt.gateway or "0.0.0.0")
- self._target = lip.IPv4(rt.target or "0.0.0.0", rt.netmask or "0.0.0.0")
+ return false
end
end
-function system.network.route:name()
- return self._name
+function interface.is_up(self)
+ if self.wif then
+ return self.wif:is_up()
+ else
+ return self:_ubus("up") or false
+ end
end
-function system.network.route:network()
- return self._net
+function interface.is_bridge(self)
+ return (self:type() == "bridge")
end
-function system.network.route:mtu()
- return self._mtu
+function interface.is_bridgeport(self)
+ return self.dev and self.dev.bridge and true or false
end
-function system.network.route:metric()
- return self._metric
+local function uint(x)
+ if x then
+ return (x < 0) and ((2^32) + x) or x
+ end
+ return 0
end
-function system.network.route:is_ipv4()
- return not self._ipv6
+function interface.tx_bytes(self)
+ local stat = self:_ubus("statistics")
+ return stat and uint(stat.tx_bytes) or 0
end
-function system.network.route:is_ipv6()
- return self._ipv6
+function interface.rx_bytes(self)
+ local stat = self:_ubus("statistics")
+ return stat and uint(stat.rx_bytes) or 0
end
-function system.network.route:target()
- return self._target
+function interface.tx_packets(self)
+ local stat = self:_ubus("statistics")
+ return stat and uint(stat.tx_packets) or 0
end
-function system.network.route:gateway()
- return self._gateway
+function interface.rx_packets(self)
+ local stat = self:_ubus("statistics")
+ return stat and uint(stat.rx_packets) or 0
end
-
-system.network.alias = utl.class()
-
-function system.network.alias:__init__(a, net)
- self._net = net
- self._name = a['.name']
+function interface.get_network(self)
+ return self:get_networks()[1]
end
+function interface.get_networks(self)
+ if not self.networks then
+ local nets = { }
+ local _, net
+ for _, net in ipairs(_M:get_networks()) do
+ if net:contains_interface(self.ifname) or
+ net:ifname() == self.ifname
+ then
+ nets[#nets+1] = net
+ end
+ end
+ table.sort(nets, function(a, b) return a.sid < b.sid end)
+ self.networks = nets
+ return nets
+ else
+ return self.networks
+ end
+end
-system.switch = utl.class()
-
-function system.switch:__init__(switch, swdev, net)
- self._name = switch
- self._ifname = swdev
- self._net = net
-
- if not system._switches[switch] then
- local x = io.popen("swconfig dev %q help 2>/dev/null" % switch)
- if x then
- local desc = x:read("*l")
+function interface.get_wifinet(self)
+ return self.wif
+end
- if desc then
- local name, num_ports, num_cpu, num_vlans =
- desc:match("Switch %d: %S+%((.-)%), ports: (%d+) %(cpu @ (%d+)%), vlans: (%d+)")
- self._model = name
- self._ports = tonumber(num_ports)
- self._cpuport = tonumber(num_cpu)
- self._vlans = tonumber(num_vlans)
- end
+wifidev = utl.class()
- x:close()
+function wifidev.__init__(self, dev)
+ self.sid = dev
+ self.iwinfo = dev and sys.wifi.getiwinfo(dev) or { }
+end
- elseif nfs.access("/proc/switch/%s" % switch) then
- self._model = self:_proc("driver", switch)
- self._ports = self:_proc_count("port", 6)
- self._vlans = self:_proc_count("vlan", 16)
- end
+function wifidev.get(self, opt)
+ return _get("wireless", self.sid, opt)
+end
- -- defaults
- self._model = self._model or switch
- self._ports = self._ports or 6
- self._vlans = self._vlans or 16
- self._cpuport = self._cpuport or 5
+function wifidev.set(self, opt, val)
+ return _set("wireless", self.sid, opt, val)
+end
- system._switches[switch] = self
- else
- self._model = system._switches[switch]._model
- self._ports = system._switches[switch]._ports
- self._vlans = system._switches[switch]._vlans
- self._cpuport = system._switches[switch]._cpuport
- end
+function wifidev.name(self)
+ return self.sid
end
-function system.switch:_proc(path, default)
- local data = nfs.readfile("/proc/switch/%s/%s" %{ self._name, path })
- if data then
- return data:gsub("%s+$", "")
+function wifidev.hwmodes(self)
+ local l = self.iwinfo.hwmodelist
+ if l and next(l) then
+ return l
+ else
+ return { b = true, g = true }
end
- return default
end
-function system.switch:_proc_count(path, default)
- local cnt = 0
- for _ in nfs.dir("/proc/switch/%s/%s" %{ self._name, path }) do
- cnt = cnt + 1
+function wifidev.get_i18n(self)
+ local t = "Generic"
+ if self.iwinfo.type == "wl" then
+ t = "Broadcom"
+ elseif self.iwinfo.type == "madwifi" then
+ t = "Atheros"
end
- return cnt > 0 and cnt or default
-end
-function system.switch:name()
- return self._name
-end
+ local m = ""
+ local l = self:hwmodes()
+ if l.a then m = m .. "a" end
+ if l.b then m = m .. "b" end
+ if l.g then m = m .. "g" end
+ if l.n then m = m .. "n" end
-function system.switch:model()
- return self._model
+ return "%s 802.11%s Wireless Controller (%s)" %{ t, m, self:name() }
end
-function system.switch:num_possible_vlans()
- return self._vlans
-end
+function wifidev.is_up(self)
+ local up = false
-function system.switch:num_active_vlans()
- local cnt = 0
- uci:foreach("network2", "switch_vlan",
+ _uci_state:foreach("wireless", "wifi-iface",
function(s)
- if s.device == self._name then cnt = cnt + 1 end
+ if s.device == self.sid then
+ if s.up == "1" then
+ up = true
+ return false
+ end
+ end
end)
- return cnt
+
+ return up
+end
+
+function wifidev.get_wifinet(self, net)
+ if _uci_real:get("wireless", net) == "wifi-iface" then
+ return wifinet(net)
+ else
+ local wnet = _wifi_lookup(net)
+ if wnet then
+ return wifinet(wnet)
+ end
+ end
end
-function system.switch:vlans()
- local index = 0
- local vlans = { }
+function wifidev.get_wifinets(self)
+ local nets = { }
- uci:foreach("network2", "switch_vlan",
+ _uci_real:foreach("wireless", "wifi-iface",
function(s)
- if s.device == self._name and tonumber(s.vlan) then
- vlans[#vlans+1] = tonumber(s.vlan)
+ if s.device == self.sid then
+ nets[#nets+1] = wifinet(s['.name'])
end
end)
- return function()
- if index <= #vlans then
- index = index + 1
- return system.vlan(vlans[index], self)
- else
- return nil
- end
+ return nets
+end
+
+function wifidev.add_wifinet(self, options)
+ options = options or { }
+ options.device = self.sid
+
+ local wnet = _uci_real:section("wireless", "wifi-iface", nil, options)
+ if wnet then
+ return wifinet(wnet, options)
end
end
-function system.switch:num_ports()
- return self._ports
+function wifidev.del_wifinet(self, net)
+ if utl.instanceof(net, wifinet) then
+ net = net.sid
+ elseif _uci_real:get("wireless", net) ~= "wifi-iface" then
+ net = _wifi_lookup(net)
+ end
+
+ if net and _uci_real:get("wireless", net, "device") == self.sid then
+ _uci_real:delete("wireless", net)
+ return true
+ end
+
+ return false
end
-function system.switch:delete_vlan(vlan)
- local rv = false
- uci:foreach("network2", "switch_vlan",
- function(s)
- if s.device == self._name and tonumber(s.vlan) == vlan then
- rv = true
- uci:delete("network2", s['.name'])
+wifinet = utl.class()
- if system._vlans[s.device] and system._vlans[s.device][vlan] then
- table.remove(system._vlans[s.device], vlan)
- end
+function wifinet.__init__(self, net, data)
+ self.sid = net
- return false
+ local num = { }
+ local netid
+ _uci_real:foreach("wireless", "wifi-iface",
+ function(s)
+ if s.device then
+ num[s.device] = num[s.device] and num[s.device] + 1 or 1
+ if s['.name'] == self.sid then
+ netid = "%s.network%d" %{ s.device, num[s.device] }
+ return false
+ end
end
end)
- return rv
+ local dev = _uci_state:get("wireless", self.sid, "ifname") or netid
+
+ self.netid = netid
+ self.wdev = dev
+ self.iwinfo = dev and sys.wifi.getiwinfo(dev) or { }
+ self.iwdata = data or _uci_state:get_all("wireless", self.sid) or
+ _uci_real:get_all("wireless", self.sid) or { }
+end
+
+function wifinet.get(self, opt)
+ return _get("wireless", self.sid, opt)
end
-function system.switch:print()
- print("Switch:", self._model)
- print(" Ports:", self._ports, "Cpu:", self._cpuport)
- print(" Vlans:", self._vlans)
+function wifinet.set(self, opt, val)
+ return _set("wireless", self.sid, opt, val)
end
+function wifinet.mode(self)
+ return _uci_state:get("wireless", self.sid, "mode") or "ap"
+end
-system.vlan = utl.class()
+function wifinet.ssid(self)
+ return _uci_state:get("wireless", self.sid, "ssid")
+end
-function system.vlan:__init__(vlan, switch, iface)
- self._vlan = vlan
- self._switch = switch
- self._iface = iface
+function wifinet.bssid(self)
+ return _uci_state:get("wireless", self.sid, "bssid")
+end
- local swid = (switch and switch:name()) or (iface and iface:name()) or ""
+function wifinet.network(self)
+ return _uci_state:get("wifinet", self.sid, "network")
+end
- if not system._vlans[swid] or not system._vlans[swid][vlan] then
- self._ports = { }
+function wifinet.id(self)
+ return self.netid
+end
- if switch then
- uci:foreach("network2", "switch_vlan",
- function(s)
- if s.device == switch:name() and tonumber(s.vlan) == vlan then
- local p
- for _, p in ipairs(uci:list("network2", s['.name'], "ports")) do
- self._ports[#self._ports+1] = system.vlan.port(p, self)
- end
- self._name = s['.name']
- end
- end)
- else
- self._ports[#self._ports+1] = system.vlan.port("0t", self)
- end
+function wifinet.name(self)
+ return self.sid
+end
- system._vlans[swid] = system._vlans[swid] or { }
- system._vlans[swid][vlan] = self
- else
- self._ports = system._vlans[swid][vlan]._ports
+function wifinet.ifname(self)
+ local ifname = self.iwinfo.ifname
+ if not ifname or ifname:match("^wifi%d") or ifname:match("^radio%d") then
+ ifname = self.wdev
end
+ return ifname
end
-function system.vlan:name()
- return self._name
+function wifinet.get_device(self)
+ if self.iwdata.device then
+ return wifidev(self.iwdata.device)
+ end
end
-function system.vlan:number()
- return self._vlan
+function wifinet.is_up(self)
+ return (self.iwdata.up == "1")
end
-function system.vlan:switch()
- return self._switch
-end
+function wifinet.active_mode(self)
+ local m = _stror(self.iwinfo.mode, self.iwdata.mode) or "ap"
+
+ if m == "ap" then m = "Master"
+ elseif m == "sta" then m = "Client"
+ elseif m == "adhoc" then m = "Ad-Hoc"
+ elseif m == "mesh" then m = "Mesh"
+ elseif m == "monitor" then m = "Monitor"
+ end
-function system.vlan:interface()
- return self._iface
+ return m
end
-function system.vlan:is_software()
- return (self._switch == nil)
+function wifinet.active_mode_i18n(self)
+ return lng.translate(self:active_mode())
end
-function system.vlan:is_hardware()
- return not self:is_software()
+function wifinet.active_ssid(self)
+ return _stror(self.iwinfo.ssid, self.iwdata.ssid)
end
-function system.vlan:num_ports()
- return #self._ports
+function wifinet.active_bssid(self)
+ return _stror(self.iwinfo.bssid, self.iwdata.bssid) or "00:00:00:00:00:00"
end
-function system.vlan:ports()
- local index = 0
- return function()
- if index <= #self._ports then
- index = index + 1
- return self._ports[index]
- else
- return nil
- end
- end
+function wifinet.active_encryption(self)
+ local enc = self.iwinfo and self.iwinfo.encryption
+ return enc and enc.description or "-"
end
-function system.vlan:_update()
- local i
- local ports = { }
+function wifinet.assoclist(self)
+ return self.iwinfo.assoclist or { }
+end
- for i = 1, #self._ports do
- ports[#ports+1] = self._ports[i]:string()
+function wifinet.frequency(self)
+ local freq = self.iwinfo.frequency
+ if freq and freq > 0 then
+ return "%.03f" % (freq / 1000)
end
-
- uci:set("network2", self._name, "ports", table.concat(ports, " "))
end
-function system.vlan:delete_port(port)
- if self._switch then
- local i
- for i = 1, #self._ports do
- if self._ports[i]:number() == port then
- table.remove(self._ports, i)
- self:_update()
- return true
- end
- end
+function wifinet.bitrate(self)
+ local rate = self.iwinfo.bitrate
+ if rate and rate > 0 then
+ return (rate / 1000)
end
- return false
end
-function system.vlan:print()
- print(" Vlan:", self._vlan, "Software?", self:is_software())
- local p
- for p in self:ports() do
- p:print()
- end
+function wifinet.channel(self)
+ return self.iwinfo.channel or
+ tonumber(_uci_state:get("wireless", self.iwdata.device, "channel"))
+end
+
+function wifinet.signal(self)
+ return self.iwinfo.signal or 0
end
+function wifinet.noise(self)
+ return self.iwinfo.noise or 0
+end
-system.vlan.port = utl.class()
+function wifinet.country(self)
+ return self.iwinfo.country or "00"
+end
-function system.vlan.port:__init__(port, vlan)
- local num, tag = port:match("^(%d+)([tu]?)")
+function wifinet.txpower(self)
+ local pwr = (self.iwinfo.txpower or 0)
+ return pwr + self:txpower_offset()
+end
- self._vlan = vlan
- self._port = tonumber(num)
- self._tagged = (tag == "t")
+function wifinet.txpower_offset(self)
+ return self.iwinfo.txpower_offset or 0
end
-function system.vlan.port:number()
- return self._port
+function wifinet.signal_level(self, s, n)
+ if self:active_bssid() ~= "00:00:00:00:00:00" then
+ local signal = s or self:signal()
+ local noise = n or self:noise()
+
+ if signal < 0 and noise < 0 then
+ local snr = -1 * (noise - signal)
+ return math.floor(snr / 5)
+ else
+ return 0
+ end
+ else
+ return -1
+ end
end
-function system.vlan.port:vlan()
- return self._vlan
+function wifinet.signal_percent(self)
+ local qc = self.iwinfo.quality or 0
+ local qm = self.iwinfo.quality_max or 0
+
+ if qc > 0 and qm > 0 then
+ return math.floor((100 / qm) * qc)
+ else
+ return 0
+ end
end
-function system.vlan.port:string()
- return "%i%s" %{ self._port, self._tagged ? "t" : "" }
+function wifinet.shortname(self)
+ return "%s %q" %{
+ lng.translate(self:active_mode()),
+ self:active_ssid() or self:active_bssid()
+ }
end
-function system.vlan.port:is_tagged()
- return self._tagged
+function wifinet.get_i18n(self)
+ return "%s: %s %q (%s)" %{
+ lng.translate("Wireless Network"),
+ lng.translate(self:active_mode()),
+ self:active_ssid() or self:active_bssid(),
+ self:ifname()
+ }
end
-function system.vlan.port:print()
- print(" Port:", self._port, "Tagged:", self._tagged)
+function wifinet.adminlink(self)
+ return dsp.build_url("admin", "network", "wireless", self.netid)
end
+function wifinet.get_network(self)
+ return self:get_networks()[1]
+end
--- ------------------------------
+function wifinet.get_networks(self)
+ local nets = { }
+ local net
+ for net in utl.imatch(tostring(self.iwdata.network)) do
+ if _uci_real:get("network", net) == "interface" then
+ nets[#nets+1] = network(net)
+ end
+ end
+ table.sort(nets, function(a, b) return a.sid < b.sid end)
+ return nets
+end
-local s = system()
+function wifinet.get_interface(self)
+ return interface(self:ifname())
+end
-s:print()
-s:find_network("wan"):print()
-s:find_interface("eth0"):parent():print()
+-- setup base protocols
+_M:register_protocol("static")
+_M:register_protocol("dhcp")
+_M:register_protocol("none")
-]==]
+-- load protocol extensions
+local exts = nfs.dir(utl.libpath() .. "/model/network")
+if exts then
+ local ext
+ for ext in exts do
+ if ext:match("%.lua$") then
+ require("luci.model.network." .. ext:gsub("%.lua$", ""))
+ end
+ end
+end