summaryrefslogtreecommitdiffhomepage
path: root/modules/luci-base/luasrc/model/network.lua
diff options
context:
space:
mode:
authorJo-Philipp Wich <jo@mein.io>2019-11-03 17:49:58 +0100
committerJo-Philipp Wich <jo@mein.io>2019-11-03 17:56:58 +0100
commit284918bfaf2f6d7e46fb11377bb9a537b35dd58a (patch)
tree3513e26d15b92f44dc78f607754f1807d1f64c97 /modules/luci-base/luasrc/model/network.lua
parent7a2fefc671ff7b5533620e809a4de07cb3b564a3 (diff)
treewide: move templates and libraries not used by the core to luci-compat
Signed-off-by: Jo-Philipp Wich <jo@mein.io>
Diffstat (limited to 'modules/luci-base/luasrc/model/network.lua')
-rw-r--r--modules/luci-base/luasrc/model/network.lua1912
1 files changed, 0 insertions, 1912 deletions
diff --git a/modules/luci-base/luasrc/model/network.lua b/modules/luci-base/luasrc/model/network.lua
deleted file mode 100644
index a36a23f321..0000000000
--- a/modules/luci-base/luasrc/model/network.lua
+++ /dev/null
@@ -1,1912 +0,0 @@
--- Copyright 2009-2015 Jo-Philipp Wich <jow@openwrt.org>
--- Licensed to the public under the Apache License 2.0.
-
-local type, next, pairs, ipairs, loadfile, table, select
- = type, next, pairs, ipairs, loadfile, table, select
-
-local tonumber, tostring, math = tonumber, tostring, math
-
-local pcall, require, setmetatable = pcall, require, setmetatable
-
-local nxo = require "nixio"
-local nfs = require "nixio.fs"
-local ipc = require "luci.ip"
-local utl = require "luci.util"
-local uci = require "luci.model.uci"
-local lng = require "luci.i18n"
-local jsc = require "luci.jsonc"
-
-module "luci.model.network"
-
-
-IFACE_PATTERNS_VIRTUAL = { }
-IFACE_PATTERNS_IGNORE = { "^wmaster%d", "^wifi%d", "^hwsim%d", "^imq%d", "^ifb%d", "^mon%.wlan%d", "^sit%d", "^gre%d", "^gretap%d", "^ip6gre%d", "^ip6tnl%d", "^tunl%d", "^lo$" }
-IFACE_PATTERNS_WIRELESS = { "^wlan%d", "^wl%d", "^ath%d", "^%w+%.network%d" }
-
-IFACE_ERRORS = {
- CONNECT_FAILED = lng.translate("Connection attempt failed"),
- INVALID_ADDRESS = lng.translate("IP address in invalid"),
- INVALID_GATEWAY = lng.translate("Gateway address is invalid"),
- INVALID_LOCAL_ADDRESS = lng.translate("Local IP address is invalid"),
- MISSING_ADDRESS = lng.translate("IP address is missing"),
- MISSING_PEER_ADDRESS = lng.translate("Peer address is missing"),
- NO_DEVICE = lng.translate("Network device is not present"),
- NO_IFACE = lng.translate("Unable to determine device name"),
- NO_IFNAME = lng.translate("Unable to determine device name"),
- NO_WAN_ADDRESS = lng.translate("Unable to determine external IP address"),
- NO_WAN_LINK = lng.translate("Unable to determine upstream interface"),
- PEER_RESOLVE_FAIL = lng.translate("Unable to resolve peer host name"),
- PIN_FAILED = lng.translate("PIN code rejected")
-}
-
-
-protocol = utl.class()
-
-local _protocols = { }
-
-local _interfaces, _bridge, _switch, _tunnel, _swtopo
-local _ubusnetcache, _ubusdevcache, _ubuswificache
-local _uci
-
-function _filter(c, s, o, r)
- local val = _uci: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:set(c, s, o, table.concat(l, " "))
- else
- _uci: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:set(c, s, o, l)
- else
- _uci:delete(c, s, o)
- end
- end
- end
-end
-
-function _append(c, s, o, a)
- local val = _uci: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: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:set(c, s, o, l)
- end
-end
-
-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: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:set(c, s, o, v)
- else
- return _uci:delete(c, s, o)
- end
-end
-
-local function _wifi_state()
- if not next(_ubuswificache) then
- _ubuswificache = utl.ubus("network.wireless", "status", {}) or {}
- end
- return _ubuswificache
-end
-
-local function _wifi_state_by_sid(sid)
- local t1, n1 = _uci:get("wireless", sid)
- if t1 == "wifi-iface" and n1 ~= nil then
- local radioname, radiostate
- for radioname, radiostate in pairs(_wifi_state()) do
- if type(radiostate) == "table" and
- type(radiostate.interfaces) == "table"
- then
- local netidx, netstate
- for netidx, netstate in ipairs(radiostate.interfaces) do
- if type(netstate) == "table" and
- type(netstate.section) == "string"
- then
- local t2, n2 = _uci:get("wireless", netstate.section)
- if t1 == t2 and n1 == n2 then
- return radioname, radiostate, netstate
- end
- end
- end
- end
- end
- end
-end
-
-local function _wifi_state_by_ifname(ifname)
- if type(ifname) == "string" then
- local radioname, radiostate
- for radioname, radiostate in pairs(_wifi_state()) do
- if type(radiostate) == "table" and
- type(radiostate.interfaces) == "table"
- then
- local netidx, netstate
- for netidx, netstate in ipairs(radiostate.interfaces) do
- if type(netstate) == "table" and
- type(netstate.ifname) == "string" and
- netstate.ifname == ifname
- then
- return radioname, radiostate, netstate
- end
- end
- end
- end
- 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 function _wifi_iwinfo_by_ifname(ifname, force_phy_only)
- local stat, iwinfo = pcall(require, "iwinfo")
- local iwtype = stat and type(ifname) == "string" and iwinfo.type(ifname)
- local is_nonphy_op = {
- bitrate = true,
- quality = true,
- quality_max = true,
- mode = true,
- ssid = true,
- bssid = true,
- assoclist = true,
- encryption = true
- }
-
- if iwtype then
- -- if we got a type but no real netdev, we're referring to a phy
- local phy_only = force_phy_only or (ipc.link(ifname).type ~= 1)
-
- return setmetatable({}, {
- __index = function(t, k)
- if k == "ifname" then
- return ifname
- elseif phy_only and is_nonphy_op[k] then
- return nil
- elseif iwinfo[iwtype][k] then
- return iwinfo[iwtype][k](ifname)
- end
- end
- })
- end
-end
-
-local function _wifi_sid_by_netid(netid)
- if type(netid) == "string" then
- local radioname, netidx = netid:match("^(%w+)%.network(%d+)$")
- if radioname and netidx then
- local i, n = 0, nil
-
- netidx = tonumber(netidx)
- _uci:foreach("wireless", "wifi-iface",
- function(s)
- if s.device == radioname then
- i = i + 1
- if i == netidx then
- n = s[".name"]
- return false
- end
- end
- end)
-
- return n
- end
- end
-end
-
-function _wifi_sid_by_ifname(ifn)
- local sid = _wifi_sid_by_netid(ifn)
- if sid then
- return sid
- end
-
- local _, _, netstate = _wifi_state_by_ifname(ifn)
- if netstate and type(netstate.section) == "string" then
- return netstate.section
- end
-end
-
-local function _wifi_netid_by_sid(sid)
- local t, n = _uci:get("wireless", sid)
- if t == "wifi-iface" and n ~= nil then
- local radioname = _uci:get("wireless", n, "device")
- if type(radioname) == "string" then
- local i, netid = 0, nil
-
- _uci:foreach("wireless", "wifi-iface",
- function(s)
- if s.device == radioname then
- i = i + 1
- if s[".name"] == n then
- netid = "%s.network%d" %{ radioname, i }
- return false
- end
- end
- end)
-
- return netid, radioname
- end
- end
-end
-
-local function _wifi_netid_by_netname(name)
- local netid = nil
-
- _uci:foreach("wireless", "wifi-iface",
- function(s)
- local net
- for net in utl.imatch(s.network) do
- if net == name then
- netid = _wifi_netid_by_sid(s[".name"])
- return false
- end
- end
- end)
-
- return netid
-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 false
-end
-
-function init(cursor)
- _uci = cursor or _uci or uci.cursor()
-
- _interfaces = { }
- _bridge = { }
- _switch = { }
- _tunnel = { }
- _swtopo = { }
-
- _ubusnetcache = { }
- _ubusdevcache = { }
- _ubuswificache = { }
-
- -- read interface information
- local n, i
- for n, i in ipairs(nxo.getifaddrs()) do
- local name = i.name:match("[^:]+")
-
- if _iface_virtual(name) then
- _tunnel[name] = true
- end
-
- if _tunnel[name] or not (_iface_ignore(name) or _iface_virtual(name)) then
- _interfaces[name] = _interfaces[name] or {
- idx = i.ifindex or n,
- name = name,
- rawname = i.name,
- flags = { },
- ipaddrs = { },
- ip6addrs = { }
- }
-
- if i.family == "packet" then
- _interfaces[name].flags = i.flags
- _interfaces[name].stats = i.data
- _interfaces[name].macaddr = ipc.checkmac(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 = { _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
-
- -- read switch topology
- local boardinfo = jsc.parse(nfs.readfile("/etc/board.json") or "")
- if type(boardinfo) == "table" and type(boardinfo.switch) == "table" then
- local switch, layout
- for switch, layout in pairs(boardinfo.switch) do
- if type(layout) == "table" and type(layout.ports) == "table" then
- local _, port
- local ports = { }
- local nports = { }
- local netdevs = { }
-
- for _, port in ipairs(layout.ports) do
- if type(port) == "table" and
- type(port.num) == "number" and
- (type(port.role) == "string" or
- type(port.device) == "string")
- then
- local spec = {
- num = port.num,
- role = port.role or "cpu",
- index = port.index or port.num
- }
-
- if port.device then
- spec.device = port.device
- spec.tagged = port.need_tag
- netdevs[tostring(port.num)] = port.device
- end
-
- ports[#ports+1] = spec
-
- if port.role then
- nports[port.role] = (nports[port.role] or 0) + 1
- end
- end
- end
-
- table.sort(ports, function(a, b)
- if a.role ~= b.role then
- return (a.role < b.role)
- end
-
- return (a.index < b.index)
- end)
-
- local pnum, role
- for _, port in ipairs(ports) do
- if port.role ~= role then
- role = port.role
- pnum = 1
- end
-
- if role == "cpu" then
- port.label = "CPU (%s)" % port.device
- elseif nports[role] > 1 then
- port.label = "%s %d" %{ role:upper(), pnum }
- pnum = pnum + 1
- else
- port.label = role:upper()
- end
-
- port.role = nil
- port.index = nil
- end
-
- _swtopo[switch] = {
- ports = ports,
- netdevs = netdevs
- }
- end
- end
- end
-
- return _M
-end
-
-function save(self, ...)
- _uci:save(...)
- _uci:load(...)
-end
-
-function commit(self, ...)
- _uci:commit(...)
- _uci: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 register_error_code(self, code, message)
- if type(code) == "string" and
- type(message) == "string" and
- not IFACE_ERRORS[code]
- then
- IFACE_ERRORS[code] = message
- return true
- end
-
- return false
-end
-
-function has_ipv6(self)
- return nfs.access("/proc/net/ipv6_route")
-end
-
-function add_network(self, n, options)
- local oldnet = self:get_network(n)
- if n and #n > 0 and n:match("^[a-zA-Z0-9_]+$") and not oldnet then
- if _uci: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 _uci:get("network", n) == "interface" then
- return network(n)
- elseif n then
- local stat = utl.ubus("network.interface", "status", { interface = n })
- if type(stat) == "table" and
- type(stat.proto) == "string"
- then
- return network(n, stat.proto)
- end
- end
-end
-
-function get_networks(self)
- local nets = { }
- local nls = { }
-
- _uci:foreach("network", "interface",
- function(s)
- nls[s['.name']] = network(s['.name'])
- end)
-
- local dump = utl.ubus("network.interface", "dump", { })
- if type(dump) == "table" and
- type(dump.interface) == "table"
- then
- local _, net
- for _, net in ipairs(dump.interface) do
- if type(net) == "table" and
- type(net.proto) == "string" and
- type(net.interface) == "string"
- then
- if not nls[net.interface] then
- nls[net.interface] = network(net.interface, net.proto)
- end
- end
- end
- 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 = _uci:delete("network", n)
- if r then
- _uci:delete_all("luci", "ifstate",
- function(s) return (s.interface == n) end)
-
- _uci:delete_all("network", "alias",
- function(s) return (s.interface == n) end)
-
- _uci:delete_all("network", "route",
- function(s) return (s.interface == n) end)
-
- _uci:delete_all("network", "route6",
- function(s) return (s.interface == n) end)
-
- _uci:foreach("wireless", "wifi-iface",
- function(s)
- local net
- local rest = { }
- for net in utl.imatch(s.network) do
- if net ~= n then
- rest[#rest+1] = net
- end
- end
- if #rest > 0 then
- _uci:set("wireless", s['.name'], "network",
- table.concat(rest, " "))
- else
- _uci:delete("wireless", s['.name'], "network")
- end
- end)
-
- local ok, fw = pcall(require, "luci.model.firewall")
- if ok then
- fw.init()
- fw: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 = _uci:section("network", "interface", new, _uci:get_all("network", old))
-
- if r then
- _uci:foreach("network", "alias",
- function(s)
- if s.interface == old then
- _uci:set("network", s['.name'], "interface", new)
- end
- end)
-
- _uci:foreach("network", "route",
- function(s)
- if s.interface == old then
- _uci:set("network", s['.name'], "interface", new)
- end
- end)
-
- _uci:foreach("network", "route6",
- function(s)
- if s.interface == old then
- _uci:set("network", s['.name'], "interface", new)
- end
- end)
-
- _uci: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:set("wireless", s['.name'], "network",
- table.concat(list, " "))
- end
- end)
-
- _uci:delete("network", old)
- end
- end
- return r or false
-end
-
-function get_interface(self, i)
- if _interfaces[i] or _wifi_iface(i) then
- return interface(i)
- else
- local netid = _wifi_netid_by_sid(i)
- return netid and interface(netid)
- end
-end
-
-function get_interfaces(self)
- local iface
- local ifaces = { }
- local nfs = { }
-
- -- find normal interfaces
- _uci:foreach("network", "interface",
- function(s)
- for iface in utl.imatch(s.ifname) do
- if not _iface_ignore(iface) and not _iface_virtual(iface) and not _wifi_iface(iface) then
- nfs[iface] = interface(iface)
- end
- end
- end)
-
- for iface in utl.kspairs(_interfaces) do
- if not (nfs[iface] or _iface_ignore(iface) or _iface_virtual(iface) or _wifi_iface(iface)) then
- nfs[iface] = interface(iface)
- end
- end
-
- -- find vlan interfaces
- _uci:foreach("network", "switch_vlan",
- function(s)
- if type(s.ports) ~= "string" or
- type(s.device) ~= "string" or
- type(_swtopo[s.device]) ~= "table"
- then
- return
- end
-
- local pnum, ptag
- for pnum, ptag in s.ports:gmatch("(%d+)([tu]?)") do
- local netdev = _swtopo[s.device].netdevs[pnum]
- if netdev then
- if not nfs[netdev] then
- nfs[netdev] = interface(netdev)
- end
- _switch[netdev] = true
-
- if ptag == "t" then
- local vid = tonumber(s.vid or s.vlan)
- if vid ~= nil and vid >= 0 and vid <= 4095 then
- local iface = "%s.%d" %{ netdev, vid }
- if not nfs[iface] then
- nfs[iface] = interface(iface)
- end
- _switch[iface] = true
- end
- end
- end
- end
- end)
-
- for iface in utl.kspairs(nfs) do
- ifaces[#ifaces+1] = nfs[iface]
- end
-
- -- find wifi interfaces
- local num = { }
- local wfs = { }
- _uci: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)
-
- for iface in utl.kspairs(wfs) do
- ifaces[#ifaces+1] = wfs[iface]
- end
-
- return ifaces
-end
-
-function ignore_interface(self, x)
- return _iface_ignore(x)
-end
-
-function get_wifidev(self, dev)
- if _uci:get("wireless", dev) == "wifi-device" then
- return wifidev(dev)
- end
-end
-
-function get_wifidevs(self)
- local devs = { }
- local wfd = { }
-
- _uci:foreach("wireless", "wifi-device",
- function(s) wfd[#wfd+1] = s['.name'] end)
-
- local dev
- for _, dev in utl.vspairs(wfd) do
- devs[#devs+1] = wifidev(dev)
- end
-
- return devs
-end
-
-function get_wifinet(self, net)
- local wnet = _wifi_sid_by_ifname(net)
- if wnet then
- return wifinet(wnet)
- end
-end
-
-function add_wifinet(self, net, options)
- if type(options) == "table" and options.device and
- _uci:get("wireless", options.device) == "wifi-device"
- then
- local wnet = _uci:section("wireless", "wifi-iface", nil, options)
- return wifinet(wnet)
- end
-end
-
-function del_wifinet(self, net)
- local wnet = _wifi_sid_by_ifname(net)
- if wnet then
- _uci:delete("wireless", wnet)
- return true
- end
- return false
-end
-
-function get_status_by_route(self, addr, mask)
- local route_statuses = { }
- local _, object
- for _, object in ipairs(utl.ubus()) do
- local net = object:match("^network%.interface%.(.+)")
- if net then
- local s = utl.ubus(object, "status", {})
- if s and s.route then
- local rt
- for _, rt in ipairs(s.route) do
- if not rt.table and rt.target == addr and rt.mask == mask then
- route_statuses[net] = s
- end
- end
- end
- end
- end
-
- return route_statuses
-end
-
-function get_status_by_address(self, addr)
- local _, object
- for _, object in ipairs(utl.ubus()) do
- local net = object:match("^network%.interface%.(.+)")
- if net then
- local s = utl.ubus(object, "status", {})
- if s and s['ipv4-address'] then
- local a
- for _, a in ipairs(s['ipv4-address']) do
- if a.address == addr then
- return net, s
- end
- end
- end
- if s and s['ipv6-address'] then
- local a
- for _, a in ipairs(s['ipv6-address']) do
- if a.address == addr then
- return net, s
- end
- end
- end
- if s and s['ipv6-prefix-assignment'] then
- local a
- for _, a in ipairs(s['ipv6-prefix-assignment']) do
- if a and a['local-address'] and a['local-address'].address == addr then
- return net, s
- end
- end
- end
- end
- end
-end
-
-function get_wan_networks(self)
- local k, v
- local wan_nets = { }
- local route_statuses = self:get_status_by_route("0.0.0.0", 0)
-
- for k, v in pairs(route_statuses) do
- wan_nets[#wan_nets+1] = network(k, v.proto)
- end
-
- return wan_nets
-end
-
-function get_wan6_networks(self)
- local k, v
- local wan6_nets = { }
- local route_statuses = self:get_status_by_route("::", 0)
-
- for k, v in pairs(route_statuses) do
- wan6_nets[#wan6_nets+1] = network(k, v.proto)
- end
-
- return wan6_nets
-end
-
-function get_switch_topologies(self)
- return _swtopo
-end
-
-
-function network(name, proto)
- if name then
- local p = proto or _uci:get("network", name, "proto")
- local c = p and _protocols[p] or protocol
- return c(name)
- end
-end
-
-function protocol.__init__(self, name)
- self.sid = name
-end
-
-function protocol._get(self, opt)
- local v = _uci:get("network", self.sid, opt)
- if type(v) == "table" then
- return table.concat(v, " ")
- end
- return v or ""
-end
-
-function protocol._ubus(self, field)
- if not _ubusnetcache[self.sid] then
- _ubusnetcache[self.sid] = utl.ubus("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 protocol.get(self, opt)
- return _get("network", self.sid, opt)
-end
-
-function protocol.set(self, opt, val)
- return _set("network", self.sid, opt, val)
-end
-
-function protocol.ifname(self)
- local ifname
- if self:is_floating() then
- ifname = self:_ubus("l3_device")
- else
- ifname = self:_ubus("device")
- end
- if not ifname then
- ifname = _wifi_netid_by_netname(self.sid)
- end
- return ifname
-end
-
-function protocol.proto(self)
- return "none"
-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
-
-function protocol.type(self)
- return self:_get("type")
-end
-
-function protocol.name(self)
- return self.sid
-end
-
-function protocol.uptime(self)
- return self:_ubus("uptime") or 0
-end
-
-function protocol.expires(self)
- local u = self:_ubus("uptime")
- local d = self:_ubus("data")
-
- if type(u) == "number" and type(d) == "table" and
- type(d.leasetime) == "number"
- then
- local r = (d.leasetime - (u % d.leasetime))
- return r > 0 and r or 0
- end
-
- return -1
-end
-
-function protocol.metric(self)
- return self:_ubus("metric") or 0
-end
-
-function protocol.zonename(self)
- local d = self:_ubus("data")
-
- if type(d) == "table" and type(d.zone) == "string" then
- return d.zone
- end
-
- return nil
-end
-
-function protocol.ipaddr(self)
- local addrs = self:_ubus("ipv4-address")
- return addrs and #addrs > 0 and addrs[1].address
-end
-
-function protocol.ipaddrs(self)
- local addrs = self:_ubus("ipv4-address")
- local rv = { }
-
- if type(addrs) == "table" then
- local n, addr
- for n, addr in ipairs(addrs) do
- rv[#rv+1] = "%s/%d" %{ addr.address, addr.mask }
- end
- end
-
- return rv
-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 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 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 protocol.ip6addr(self)
- local addrs = self:_ubus("ipv6-address")
- if addrs and #addrs > 0 then
- return "%s/%d" %{ addrs[1].address, addrs[1].mask }
- else
- addrs = self:_ubus("ipv6-prefix-assignment")
- if addrs and #addrs > 0 then
- return "%s/%d" %{ addrs[1].address, addrs[1].mask }
- end
- end
-end
-
-function protocol.ip6addrs(self)
- local addrs = self:_ubus("ipv6-address")
- local rv = { }
- local n, addr
-
- if type(addrs) == "table" then
- for n, addr in ipairs(addrs) do
- rv[#rv+1] = "%s/%d" %{ addr.address, addr.mask }
- end
- end
-
- addrs = self:_ubus("ipv6-prefix-assignment")
-
- if type(addrs) == "table" then
- for n, addr in ipairs(addrs) do
- if type(addr["local-address"]) == "table" and
- type(addr["local-address"].mask) == "number" and
- type(addr["local-address"].address) == "string"
- then
- rv[#rv+1] = "%s/%d" %{
- addr["local-address"].address,
- addr["local-address"].mask
- }
- end
- end
- end
-
- return rv
-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
-end
-
-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 dns
-end
-
-function protocol.ip6prefix(self)
- local prefix = self:_ubus("ipv6-prefix")
- if prefix and #prefix > 0 then
- return "%s/%d" %{ prefix[1].address, prefix[1].mask }
- end
-end
-
-function protocol.errors(self)
- local _, err, rv
- local errors = self:_ubus("errors")
- if type(errors) == "table" then
- for _, err in ipairs(errors) do
- if type(err) == "table" and
- type(err.code) == "string"
- then
- rv = rv or { }
- rv[#rv+1] = IFACE_ERRORS[err.code] or lng.translatef("Unknown error (%s)", err.code)
- end
- end
- end
- return rv
-end
-
-function protocol.is_bridge(self)
- return (not self:is_virtual() and self:type() == "bridge")
-end
-
-function protocol.opkg_package(self)
- return nil
-end
-
-function protocol.is_installed(self)
- return true
-end
-
-function protocol.is_virtual(self)
- return false
-end
-
-function protocol.is_floating(self)
- return false
-end
-
-function protocol.is_dynamic(self)
- return (self:_ubus("dynamic") == true)
-end
-
-function protocol.is_auto(self)
- return (self:_get("auto") ~= "0")
-end
-
-function protocol.is_alias(self)
- local ifn, parent = nil, nil
-
- for ifn in utl.imatch(_uci:get("network", self.sid, "ifname")) do
- if #ifn > 1 and ifn:byte(1) == 64 then
- parent = ifn:sub(2)
- elseif parent ~= nil then
- parent = nil
- end
- end
-
- return parent
-end
-
-function protocol.is_empty(self)
- if self:is_floating() then
- return false
- else
- local empty = true
-
- if (self:_get("ifname") or ""):match("%S+") then
- empty = false
- end
-
- if empty and _wifi_netid_by_netname(self.sid) then
- empty = false
- end
-
- return empty
- end
-end
-
-function protocol.is_up(self)
- return (self:_ubus("up") == true)
-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_sid_by_ifname(ifname)
- if wif then
- _append("wireless", wif, "network", self.sid)
-
- -- add iface to our iface list
- else
- _append("network", self.sid, "ifname", ifname)
- end
- end
-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_sid_by_ifname(ifname)
- if wif then _filter("wireless", wif, "network", self.sid) end
-
- -- remove the interface
- _filter("network", self.sid, "ifname", ifname)
- end
-end
-
-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 = self:_ubus("l3_device") or self:_ubus("device")
- if ifn then
- return interface(ifn, self)
- end
-
- for ifn in utl.imatch(_uci:get("network", self.sid, "ifname")) do
- ifn = ifn:match("^[^:/]+")
- return ifn and interface(ifn, self)
- end
-
- ifn = _wifi_netid_by_netname(self.sid)
- return ifn and interface(ifn, self)
- end
-end
-
-function protocol.get_interfaces(self)
- if self:is_bridge() or (self:is_virtual() and not self:is_floating()) then
- local ifaces = { }
-
- 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 wfs = { }
- _uci:foreach("wireless", "wifi-iface",
- function(s)
- if s.device then
- local net
- for net in utl.imatch(s.network) do
- if net == self.sid then
- ifn = _wifi_netid_by_sid(s[".name"])
- if ifn then
- wfs[ifn] = interface(ifn, self)
- end
- end
- end
- end
- end)
-
- for ifn in utl.kspairs(wfs) do
- ifaces[#ifaces+1] = wfs[ifn]
- end
-
- return ifaces
- end
-end
-
-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
-
- local wif = _wifi_sid_by_ifname(ifname)
- if wif then
- local n
- for n in utl.imatch(_uci:get("wireless", wif, "network")) do
- if n == self.sid then
- return true
- end
- end
- end
- end
-
- return false
-end
-
-function protocol.adminlink(self)
- local stat, dsp = pcall(require, "luci.dispatcher")
- return stat and dsp.build_url("admin", "network", "network", self.sid)
-end
-
-
-interface = utl.class()
-
-function interface.__init__(self, ifname, network)
- local wif = _wifi_sid_by_ifname(ifname)
- if wif then
- self.wif = wifinet(wif)
- self.ifname = self.wif:ifname()
- end
-
- self.ifname = self.ifname or ifname
- self.dev = _interfaces[self.ifname]
- self.network = network
-end
-
-function interface._ubus(self, field)
- if not _ubusdevcache[self.ifname] then
- _ubusdevcache[self.ifname] = utl.ubus("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 interface.name(self)
- return self.wif and self.wif:ifname() or self.ifname
-end
-
-function interface.mac(self)
- return ipc.checkmac(self:_ubus("macaddr"))
-end
-
-function interface.ipaddrs(self)
- return self.dev and self.dev.ipaddrs or { }
-end
-
-function interface.ip6addrs(self)
- return self.dev and self.dev.ip6addrs or { }
-end
-
-function interface.type(self)
- if self.ifname and self.ifname:byte(1) == 64 then
- return "alias"
- elseif 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
- return "ethernet"
- end
-end
-
-function interface.shortname(self)
- if self.wif then
- return self.wif:shortname()
- else
- return self.ifname
- end
-end
-
-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() or self.wif:id() or "?"
- }
- else
- return "%s: %q" %{ self:get_type_i18n(), self:name() }
- end
-end
-
-function interface.get_type_i18n(self)
- local x = self:type()
- if x == "alias" then
- return lng.translate("Alias Interface")
- elseif 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
- if _switch[self.ifname] then
- return lng.translate("Switch VLAN")
- else
- return lng.translate("Software VLAN")
- end
- elseif x == "tunnel" then
- return lng.translate("Tunnel Interface")
- else
- return lng.translate("Ethernet Adapter")
- end
-end
-
-function interface.adminlink(self)
- if self.wif then
- return self.wif:adminlink()
- end
-end
-
-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 interface.bridge_id(self)
- if self.br then
- return self.br.id
- else
- return nil
- end
-end
-
-function interface.bridge_stp(self)
- if self.br then
- return self.br.stp
- else
- return false
- end
-end
-
-function interface.is_up(self)
- local up = self:_ubus("up")
- if up == nil then
- up = (self:type() == "alias")
- end
- return up or false
-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)
- local stat = self:_ubus("statistics")
- return stat and stat.tx_bytes or 0
-end
-
-function interface.rx_bytes(self)
- local stat = self:_ubus("statistics")
- return stat and stat.rx_bytes or 0
-end
-
-function interface.tx_packets(self)
- local stat = self:_ubus("statistics")
- return stat and stat.tx_packets or 0
-end
-
-function interface.rx_packets(self)
- local stat = self:_ubus("statistics")
- return stat and stat.rx_packets or 0
-end
-
-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
-
-function interface.get_wifinet(self)
- return self.wif
-end
-
-
-wifidev = utl.class()
-
-function wifidev.__init__(self, name)
- local t, n = _uci:get("wireless", name)
- if t == "wifi-device" and n ~= nil then
- self.sid = n
- self.iwinfo = _wifi_iwinfo_by_ifname(self.sid, true)
- end
- self.sid = self.sid or name
- self.iwinfo = self.iwinfo or { ifname = self.sid }
-end
-
-function wifidev.get(self, opt)
- return _get("wireless", self.sid, opt)
-end
-
-function wifidev.set(self, opt, val)
- return _set("wireless", self.sid, opt, val)
-end
-
-function wifidev.name(self)
- return self.sid
-end
-
-function wifidev.hwmodes(self)
- local l = self.iwinfo.hwmodelist
- if l and next(l) then
- return l
- else
- return { b = true, g = true }
- end
-end
-
-function wifidev.get_i18n(self)
- local t = self.iwinfo.hardware_name or "Generic"
- if self.iwinfo.type == "wl" then
- t = "Broadcom"
- 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
- if l.ac then m = "ac" end
-
- return "%s 802.11%s Wireless Controller (%s)" %{ t, m, self:name() }
-end
-
-function wifidev.is_up(self)
- if _ubuswificache[self.sid] then
- return (_ubuswificache[self.sid].up == true)
- end
-
- return false
-end
-
-function wifidev.get_wifinet(self, net)
- if _uci:get("wireless", net) == "wifi-iface" then
- return wifinet(net)
- else
- local wnet = _wifi_sid_by_ifname(net)
- if wnet then
- return wifinet(wnet)
- end
- end
-end
-
-function wifidev.get_wifinets(self)
- local nets = { }
-
- _uci:foreach("wireless", "wifi-iface",
- function(s)
- if s.device == self.sid then
- nets[#nets+1] = wifinet(s['.name'])
- end
- end)
-
- return nets
-end
-
-function wifidev.add_wifinet(self, options)
- options = options or { }
- options.device = self.sid
-
- local wnet = _uci:section("wireless", "wifi-iface", nil, options)
- if wnet then
- return wifinet(wnet, options)
- end
-end
-
-function wifidev.del_wifinet(self, net)
- if utl.instanceof(net, wifinet) then
- net = net.sid
- elseif _uci:get("wireless", net) ~= "wifi-iface" then
- net = _wifi_sid_by_ifname(net)
- end
-
- if net and _uci:get("wireless", net, "device") == self.sid then
- _uci:delete("wireless", net)
- return true
- end
-
- return false
-end
-
-
-wifinet = utl.class()
-
-function wifinet.__init__(self, name, data)
- local sid, netid, radioname, radiostate, netstate
-
- -- lookup state by radio#.network# notation
- sid = _wifi_sid_by_netid(name)
- if sid then
- netid = name
- radioname, radiostate, netstate = _wifi_state_by_sid(sid)
- else
- -- lookup state by ifname (e.g. wlan0)
- radioname, radiostate, netstate = _wifi_state_by_ifname(name)
- if radioname and radiostate and netstate then
- sid = netstate.section
- netid = _wifi_netid_by_sid(sid)
- else
- -- lookup state by uci section id (e.g. cfg053579)
- radioname, radiostate, netstate = _wifi_state_by_sid(name)
- if radioname and radiostate and netstate then
- sid = name
- netid = _wifi_netid_by_sid(sid)
- else
- -- no state available, try to resolve from uci
- netid, radioname = _wifi_netid_by_sid(name)
- if netid and radioname then
- sid = name
- end
- end
- end
- end
-
- local iwinfo =
- (netstate and _wifi_iwinfo_by_ifname(netstate.ifname)) or
- (radioname and _wifi_iwinfo_by_ifname(radioname)) or
- { ifname = (netid or sid or name) }
-
- self.sid = sid or name
- self.wdev = iwinfo.ifname
- self.iwinfo = iwinfo
- self.netid = netid
- self._ubusdata = {
- radio = radioname,
- dev = radiostate,
- net = netstate
- }
-end
-
-function wifinet.ubus(self, ...)
- local n, v = self._ubusdata
- for n = 1, select('#', ...) do
- if type(v) == "table" then
- v = v[select(n, ...)]
- else
- return nil
- end
- end
- return v
-end
-
-function wifinet.get(self, opt)
- return _get("wireless", self.sid, opt)
-end
-
-function wifinet.set(self, opt, val)
- return _set("wireless", self.sid, opt, val)
-end
-
-function wifinet.mode(self)
- return self:ubus("net", "config", "mode") or self:get("mode") or "ap"
-end
-
-function wifinet.ssid(self)
- return self:ubus("net", "config", "ssid") or self:get("ssid")
-end
-
-function wifinet.bssid(self)
- return self:ubus("net", "config", "bssid") or self:get("bssid")
-end
-
-function wifinet.network(self)
- local net, networks = nil, { }
- for net in utl.imatch(self:ubus("net", "config", "network") or self:get("network")) do
- networks[#networks+1] = net
- end
- return networks
-end
-
-function wifinet.id(self)
- return self.netid
-end
-
-function wifinet.name(self)
- return self.sid
-end
-
-function wifinet.ifname(self)
- local ifname = self:ubus("net", "ifname") or self.iwinfo.ifname
- if not ifname or ifname:match("^wifi%d") or ifname:match("^radio%d") then
- ifname = self.netid
- end
- return ifname
-end
-
-function wifinet.get_device(self)
- local dev = self:ubus("radio") or self:get("device")
- return dev and wifidev(dev) or nil
-end
-
-function wifinet.is_up(self)
- local ifc = self:get_interface()
- return (ifc and ifc:is_up() or false)
-end
-
-function wifinet.active_mode(self)
- local m = self.iwinfo.mode or self:ubus("net", "config", "mode") or self:get("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
-
- return m
-end
-
-function wifinet.active_mode_i18n(self)
- return lng.translate(self:active_mode())
-end
-
-function wifinet.active_ssid(self)
- return self.iwinfo.ssid or self:ubus("net", "config", "ssid") or self:get("ssid")
-end
-
-function wifinet.active_bssid(self)
- return self.iwinfo.bssid or self:ubus("net", "config", "bssid") or self:get("bssid")
-end
-
-function wifinet.active_encryption(self)
- local enc = self.iwinfo and self.iwinfo.encryption
- return enc and enc.description or "-"
-end
-
-function wifinet.assoclist(self)
- return self.iwinfo.assoclist or { }
-end
-
-function wifinet.frequency(self)
- local freq = self.iwinfo.frequency
- if freq and freq > 0 then
- return "%.03f" % (freq / 1000)
- end
-end
-
-function wifinet.bitrate(self)
- local rate = self.iwinfo.bitrate
- if rate and rate > 0 then
- return (rate / 1000)
- end
-end
-
-function wifinet.channel(self)
- return self.iwinfo.channel or self:ubus("dev", "config", "channel") or
- tonumber(self:get("channel"))
-end
-
-function wifinet.signal(self)
- return self.iwinfo.signal or 0
-end
-
-function wifinet.noise(self)
- return self.iwinfo.noise or 0
-end
-
-function wifinet.country(self)
- return self.iwinfo.country or self:ubus("dev", "config", "country") or "00"
-end
-
-function wifinet.txpower(self)
- local pwr = (self.iwinfo.txpower or 0)
- return pwr + self:txpower_offset()
-end
-
-function wifinet.txpower_offset(self)
- return self.iwinfo.txpower_offset or 0
-end
-
-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 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 wifinet.shortname(self)
- return "%s %q" %{
- lng.translate(self:active_mode()),
- self:active_ssid() or self:active_bssid() or self:id()
- }
-end
-
-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() or self:id(),
- self:ifname()
- }
-end
-
-function wifinet.adminlink(self)
- local stat, dsp = pcall(require, "luci.dispatcher")
- return dsp and 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(self:ubus("net", "config", "network") or self:get("network")) do
- if _uci: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
-
-function wifinet.get_interface(self)
- return interface(self:ifname())
-end
-
-
--- 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