c154e87ac707aaf3a0bee9ee2c9ee3b2eefa44b9
[project/luci.git] / libs / core / luasrc / model / network.lua
1 --[[
2 LuCI - Network model
3
4 Copyright 2009-2010 Jo-Philipp Wich <xm@subsignal.org>
5
6 Licensed under the Apache License, Version 2.0 (the "License");
7 you may not use this file except in compliance with the License.
8 You may obtain a copy of the License at
9
10 http://www.apache.org/licenses/LICENSE-2.0
11
12 Unless required by applicable law or agreed to in writing, software
13 distributed under the License is distributed on an "AS IS" BASIS,
14 WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
15 See the License for the specific language governing permissions and
16 limitations under the License.
17
18 ]]--
19
20 local type, next, pairs, ipairs, loadfile, table, tonumber, math, i18n
21 = type, next, pairs, ipairs, loadfile, table, tonumber, math, luci.i18n
22
23 local nxo = require "nixio"
24 local ipc = require "luci.ip"
25 local sys = require "luci.sys"
26 local utl = require "luci.util"
27 local dsp = require "luci.dispatcher"
28 local uci = require "luci.model.uci"
29
30 module "luci.model.network"
31
32
33 local ifs, brs, sws, uci_r, uci_s
34
35 function _list_del(c, s, o, r)
36 local val = uci_r:get(c, s, o)
37 if val then
38 local l = { }
39 if type(val) == "string" then
40 for val in val:gmatch("%S+") do
41 if val ~= r then
42 l[#l+1] = val
43 end
44 end
45 if #l > 0 then
46 uci_r:set(c, s, o, table.concat(l, " "))
47 else
48 uci_r:delete(c, s, o)
49 end
50 elseif type(val) == "table" then
51 for _, val in ipairs(val) do
52 if val ~= r then
53 l[#l+1] = val
54 end
55 end
56 if #l > 0 then
57 uci_r:set(c, s, o, l)
58 else
59 uci_r:delete(c, s, o)
60 end
61 end
62 end
63 end
64
65 function _list_add(c, s, o, a)
66 local val = uci_r:get(c, s, o) or ""
67 if type(val) == "string" then
68 local l = { }
69 for val in val:gmatch("%S+") do
70 if val ~= a then
71 l[#l+1] = val
72 end
73 end
74 l[#l+1] = a
75 uci_r:set(c, s, o, table.concat(l, " "))
76 elseif type(val) == "table" then
77 local l = { }
78 for _, val in ipairs(val) do
79 if val ~= a then
80 l[#l+1] = val
81 end
82 end
83 l[#l+1] = a
84 uci_r:set(c, s, o, l)
85 end
86 end
87
88 function _stror(s1, s2)
89 if not s1 or #s1 == 0 then
90 return s2 and #s2 > 0 and s2
91 else
92 return s1
93 end
94 end
95
96 function _get(c, s, o)
97 return uci_r:get(c, s, o)
98 end
99
100 function _set(c, s, o, v)
101 if v ~= nil then
102 if type(v) == "boolean" then v = v and "1" or "0" end
103 return uci_r:set(c, s, o, v)
104 else
105 return uci_r:delete(c, s, o)
106 end
107 end
108
109 function _wifi_iface(x)
110 return (
111 x:match("^wlan%d") or x:match("^wl%d") or x:match("^ath%d") or
112 x:match("^%w+%.network%d")
113 )
114 end
115
116 function _wifi_lookup(ifn)
117 -- got a radio#.network# pseudo iface, locate the corresponding section
118 local radio, ifnidx = ifn:match("^(%w+)%.network(%d+)$")
119 if radio and ifnidx then
120 local sid = nil
121 local num = 0
122
123 ifnidx = tonumber(ifnidx)
124 uci_r:foreach("wireless", "wifi-iface",
125 function(s)
126 if s.device == radio then
127 num = num + 1
128 if num == ifnidx then
129 sid = s['.name']
130 return false
131 end
132 end
133 end)
134
135 return sid
136
137 -- looks like wifi, try to locate the section via state vars
138 elseif _wifi_iface(ifn) then
139 local sid = nil
140
141 uci_s:foreach("wireless", "wifi-iface",
142 function(s)
143 if s.ifname == ifn then
144 sid = s['.name']
145 return false
146 end
147 end)
148
149 return sid
150 end
151 end
152
153 function _iface_virtual(x)
154 return (
155 x:match("^6in4-%w") or x:match("^6to4-%w") or x:match("^3g-%w") or
156 x:match("^ppp-%w") or x:match("^pppoe-%w") or x:match("^pppoa-%w") or
157 x:match("^relay-%w")
158 )
159 end
160
161 function _iface_ignore(x)
162 return (
163 x:match("^wmaster%d") or x:match("^wifi%d") or x:match("^hwsim%d") or
164 x:match("^imq%d") or x:match("^mon.wlan%d") or
165 x == "sit0" or x == "lo" or _iface_virtual(x)
166 )
167 end
168
169
170 function init(cursor)
171 uci_r = cursor or uci_r or uci.cursor()
172 uci_s = uci_r:substate()
173
174 ifs = { }
175 brs = { }
176 sws = { }
177
178 -- read interface information
179 local n, i
180 for n, i in ipairs(nxo.getifaddrs()) do
181 local name = i.name:match("[^:]+")
182 local prnt = name:match("^([^%.]+)%.")
183
184 if _iface_virtual(name) or not _iface_ignore(name) then
185 ifs[name] = ifs[name] or {
186 idx = i.ifindex or n,
187 name = name,
188 rawname = i.name,
189 flags = { },
190 ipaddrs = { },
191 ip6addrs = { }
192 }
193
194 if prnt then
195 sws[name] = true
196 sws[prnt] = true
197 end
198
199 if i.family == "packet" then
200 ifs[name].flags = i.flags
201 ifs[name].stats = i.data
202 ifs[name].macaddr = i.addr
203 elseif i.family == "inet" then
204 ifs[name].ipaddrs[#ifs[name].ipaddrs+1] = ipc.IPv4(i.addr, i.netmask)
205 elseif i.family == "inet6" then
206 ifs[name].ip6addrs[#ifs[name].ip6addrs+1] = ipc.IPv6(i.addr, i.netmask)
207 end
208 end
209 end
210
211 -- read bridge informaton
212 local b, l
213 for l in utl.execi("brctl show") do
214 if not l:match("STP") then
215 local r = utl.split(l, "%s+", nil, true)
216 if #r == 4 then
217 b = {
218 name = r[1],
219 id = r[2],
220 stp = r[3] == "yes",
221 ifnames = { ifs[r[4]] }
222 }
223 if b.ifnames[1] then
224 b.ifnames[1].bridge = b
225 end
226 brs[r[1]] = b
227 elseif b then
228 b.ifnames[#b.ifnames+1] = ifs[r[2]]
229 b.ifnames[#b.ifnames].bridge = b
230 end
231 end
232 end
233
234 return _M
235 end
236
237 function save(self, ...)
238 uci_r:save(...)
239 uci_r:load(...)
240 end
241
242 function commit(self, ...)
243 uci_r:commit(...)
244 uci_r:load(...)
245 end
246
247 function has_ipv6(self)
248 return nfs.access("/proc/net/ipv6_route")
249 end
250
251 function add_network(self, n, options)
252 local oldnet = self:get_network(n)
253 if n and #n > 0 and n:match("^[a-zA-Z0-9_]+$") and not oldnet then
254 if uci_r:section("network", "interface", n, options) then
255 return network(n)
256 end
257 elseif oldnet and oldnet:is_empty() then
258 if options then
259 local k, v
260 for k, v in pairs(options) do
261 oldnet:set(k, v)
262 end
263 end
264 return oldnet
265 end
266 end
267
268 function get_network(self, n)
269 if n and uci_r:get("network", n) == "interface" then
270 return network(n)
271 end
272 end
273
274 function get_networks(self)
275 local nets = { }
276 local nls = { }
277
278 uci_r:foreach("network", "interface",
279 function(s)
280 nls[s['.name']] = network(s['.name'])
281 end)
282
283 local n
284 for n in utl.kspairs(nls) do
285 nets[#nets+1] = nls[n]
286 end
287
288 return nets
289 end
290
291 function del_network(self, n)
292 local r = uci_r:delete("network", n)
293 if r then
294 uci_r:delete_all("network", "alias",
295 function(s) return (s.interface == n) end)
296
297 uci_r:delete_all("network", "route",
298 function(s) return (s.interface == n) end)
299
300 uci_r:delete_all("network", "route6",
301 function(s) return (s.interface == n) end)
302
303 uci_r:foreach("wireless", "wifi-iface",
304 function(s)
305 if s.network == n then
306 uci_r:delete("wireless", s['.name'], "network")
307 end
308 end)
309 end
310 return r
311 end
312
313 function rename_network(self, old, new)
314 local r
315 if new and #new > 0 and new:match("^[a-zA-Z0-9_]+$") and not self:get_network(new) then
316 r = uci_r:section("network", "interface", new, uci_r:get_all("network", old))
317
318 if r then
319 uci_r:foreach("network", "alias",
320 function(s)
321 if s.interface == old then
322 uci_r:set("network", s['.name'], "interface", new)
323 end
324 end)
325
326 uci_r:foreach("network", "route",
327 function(s)
328 if s.interface == old then
329 uci_r:set("network", s['.name'], "interface", new)
330 end
331 end)
332
333 uci_r:foreach("network", "route6",
334 function(s)
335 if s.interface == old then
336 uci_r:set("network", s['.name'], "interface", new)
337 end
338 end)
339
340 uci_r:foreach("wireless", "wifi-iface",
341 function(s)
342 if s.network == old then
343 uci_r:set("wireless", s['.name'], "network", new)
344 end
345 end)
346
347 uci_r:delete("network", old)
348 end
349 end
350 return r or false
351 end
352
353 function get_interface(self, i)
354 if ifs[i] or _wifi_iface(i) then
355 return interface(i)
356 else
357 local ifc
358 local num = { }
359 uci_r:foreach("wireless", "wifi-iface",
360 function(s)
361 if s.device then
362 num[s.device] = num[s.device] and num[s.device] + 1 or 1
363 if s['.name'] == i then
364 ifc = interface(
365 "%s.network%d" %{s.device, num[s.device] })
366 return false
367 end
368 end
369 end)
370 return ifc
371 end
372 end
373
374 function get_interfaces(self)
375 local iface
376 local ifaces = { }
377 local seen = { }
378 local nfs = { }
379
380 -- find normal interfaces
381 uci_r:foreach("network", "interface",
382 function(s)
383 for iface in utl.imatch(s.ifname) do
384 if not _iface_ignore(iface) and not _wifi_iface(iface) then
385 seen[iface] = true
386 nfs[iface] = interface(iface)
387 end
388 end
389 end)
390
391 for iface in utl.kspairs(ifs) do
392 if not (seen[iface] or _iface_ignore(iface) or _wifi_iface(iface)) then
393 nfs[iface] = interface(iface)
394 end
395 end
396
397 -- find vlan interfaces
398 uci_r:foreach("network", "switch_vlan",
399 function(s)
400 local base = s.device or "-"
401 if not base:match("^eth%d") then
402 base = "eth0"
403 end
404
405 local vid = tonumber(s.vid or s.vlan)
406 if vid ~= nil and vid >= 0 and vid <= 4095 then
407 local iface = "%s.%d" %{ base, vid }
408 if not seen[iface] then
409 seen[iface] = true
410 nfs[iface] = interface(iface)
411 end
412 end
413 end)
414
415 for iface in utl.kspairs(nfs) do
416 ifaces[#ifaces+1] = nfs[iface]
417 end
418
419 -- find wifi interfaces
420 local num = { }
421 local wfs = { }
422 uci_r:foreach("wireless", "wifi-iface",
423 function(s)
424 if s.device then
425 num[s.device] = num[s.device] and num[s.device] + 1 or 1
426 local i = "%s.network%d" %{ s.device, num[s.device] }
427 wfs[i] = interface(i)
428 end
429 end)
430
431 for iface in utl.kspairs(wfs) do
432 ifaces[#ifaces+1] = wfs[iface]
433 end
434
435 return ifaces
436 end
437
438 function ignore_interface(self, x)
439 return _iface_ignore(x)
440 end
441
442 function get_wifidev(self, dev)
443 if uci_r:get("wireless", dev) == "wifi-device" then
444 return wifidev(dev)
445 end
446 end
447
448 function get_wifidevs(self)
449 local devs = { }
450 local wfd = { }
451
452 uci_r:foreach("wireless", "wifi-device",
453 function(s) wfd[#wfd+1] = s['.name'] end)
454
455 local dev
456 for _, dev in utl.vspairs(wfd) do
457 devs[#devs+1] = wifidev(dev)
458 end
459
460 return devs
461 end
462
463 function get_wifinet(self, net)
464 local wnet = _wifi_lookup(net)
465 if wnet then
466 return wifinet(wnet)
467 end
468 end
469
470 function add_wifinet(self, net, options)
471 if type(options) == "table" and options.device and
472 uci_r:get("wireless", options.device) == "wifi-device"
473 then
474 local wnet = uci_r:section("wireless", "wifi-iface", nil, options)
475 return wifinet(wnet)
476 end
477 end
478
479 function del_wifinet(self, net)
480 local wnet = _wifi_lookup(net)
481 if wnet then
482 uci_r:delete("wireless", wnet)
483 return true
484 end
485 return false
486 end
487
488
489 network = utl.class()
490
491 function network.__init__(self, name)
492 self.sid = name
493 end
494
495 function network._get(self, opt)
496 local v = uci_r:get("network", self.sid, opt)
497 if type(v) == "table" then
498 return table.concat(v, " ")
499 end
500 return v or ""
501 end
502
503 function network._ip(self, opt, family, list)
504 local ip = uci_s:get("network", self.sid, opt)
505 local fc = (family == 6) and ipc.IPv6 or ipc.IPv4
506 if ip or list then
507 if list then
508 local l = { }
509 for ip in utl.imatch(ip) do
510 ip = fc(ip)
511 if ip then l[#l+1] = ip:string() end
512 end
513 return l
514 else
515 ip = fc(ip)
516 return ip and ip:string()
517 end
518 end
519 end
520
521 function network.get(self, opt)
522 return _get("network", self.sid, opt)
523 end
524
525 function network.set(self, opt, val)
526 return _set("network", self.sid, opt, val)
527 end
528
529 function network.ifname(self)
530 local p = self:proto()
531 if self:is_bridge() then
532 return "br-" .. self.sid
533 elseif self:proto() == "relay" then
534 return uci_s:get("network", self.sid, "up") == "1" and "lo" or nil
535 elseif self:is_virtual() then
536 return p .. "-" .. self.sid
537 else
538 local num = { }
539 local dev = uci_r:get("network", self.sid, "ifname") or
540 uci_s:get("network", self.sid, "ifname")
541
542 dev = (type(dev) == "table") and dev[1] or dev
543 dev = (dev ~= nil) and dev:match("%S+")
544
545 if not dev then
546 uci_r:foreach("wireless", "wifi-iface",
547 function(s)
548 if s.device then
549 num[s.device] = num[s.device]
550 and num[s.device] + 1 or 1
551
552 if s.network == self.sid then
553 dev = "%s.network%d" %{ s.device, num[s.device] }
554 return false
555 end
556 end
557 end)
558 end
559
560 return dev
561 end
562 end
563
564 function network.device(self)
565 local dev = uci_r:get("network", self.sid, "device") or
566 uci_s:get("network", self.sid, "device")
567
568 dev = (type(dev) == "table") and dev[1] or dev
569
570 if not dev or dev:match("[^%w%-%.%s]") then
571 dev = uci_r:get("network", self.sid, "ifname") or
572 uci_s:get("network", self.sid, "ifname")
573
574 dev = (type(dev) == "table") and dev[1] or dev
575 end
576
577 for dev in utl.imatch(dev) do
578 return dev
579 end
580 end
581
582 function network.proto(self)
583 return self:_get("proto") or "none"
584 end
585
586 function network.type(self)
587 return self:_get("type")
588 end
589
590 function network.name(self)
591 return self.sid
592 end
593
594 function network.uptime(self)
595 local cnt = tonumber(uci_s:get("network", self.sid, "connect_time"))
596 if cnt ~= nil then
597 return nxo.sysinfo().uptime - cnt
598 else
599 return 0
600 end
601 end
602
603 function network.expires(self)
604 local a = tonumber(uci_s:get("network", self.sid, "lease_acquired"))
605 local l = tonumber(uci_s:get("network", self.sid, "lease_lifetime"))
606 if a and l then
607 l = l - (nxo.sysinfo().uptime - a)
608 return l > 0 and l or 0
609 end
610 return -1
611 end
612
613 function network.metric(self)
614 return tonumber(uci_s:get("network", self.sid, "metric")) or 0
615 end
616
617 function network.ipaddr(self)
618 return self:_ip("ipaddr", 4)
619 end
620
621 function network.netmask(self)
622 return self:_ip("netmask", 4)
623 end
624
625 function network.gwaddr(self)
626 return self:_ip("gateway", 4)
627 end
628
629 function network.dnsaddrs(self)
630 return self:_ip("dns", 4, true)
631 end
632
633 function network.ip6addr(self)
634 local ip6 = self:_ip("ip6addr", 6)
635 if not ip6 then
636 local ifc = ifs[self:ifname()]
637 if ifc and ifc.ip6addrs then
638 local a
639 for _, a in ipairs(ifc.ip6addrs) do
640 if not a:is6linklocal() then
641 ip6 = a:string()
642 break
643 end
644 end
645 end
646 end
647 return ip6
648 end
649
650 function network.gw6addr(self)
651 local ip6 = self:_ip("ip6gw", 6)
652 if not ip6 then
653 local dr6 = sys.net.defaultroute6()
654 if dr6 and dr6.device == self:ifname() then
655 return dr6.nexthop:string()
656 end
657 end
658 return ip6
659 end
660
661 function network.dns6addrs(self)
662 return self:_ip("dns", 6, true)
663 end
664
665 function network.is_bridge(self)
666 return (self:type() == "bridge")
667 end
668
669 function network.is_virtual(self)
670 local p = self:proto()
671 return (
672 p == "3g" or p == "6in4" or p == "6to4" or p == "ppp" or
673 p == "pppoe" or p == "pppoa" or p == "relay"
674 )
675 end
676
677 function network.is_floating(self)
678 return (self:is_virtual() and self:proto() ~= "pppoe")
679 end
680
681 function network.is_empty(self)
682 if self:is_virtual() then
683 return false
684 else
685 local rv = true
686
687 if (self:_get("ifname") or ""):match("%S+") then
688 rv = false
689 end
690
691 uci_r:foreach("wireless", "wifi-iface",
692 function(s)
693 if s.network == self.sid then
694 rv = false
695 return false
696 end
697 end)
698
699 return rv
700 end
701 end
702
703 function network.add_interface(self, ifname)
704 if not self:is_floating() then
705 if type(ifname) ~= "string" then
706 ifname = ifname:name()
707 else
708 ifname = ifname:match("[^%s:]+")
709 end
710
711 -- remove the interface from all ifaces
712 uci_r:foreach("network", "interface",
713 function(s)
714 _list_del("network", s['.name'], "ifname", ifname)
715 end)
716
717 -- if its a wifi interface, change its network option
718 local wif = _wifi_lookup(ifname)
719 if wif then
720 uci_r:set("wireless", wif, "network", self.sid)
721
722 -- add iface to our iface list
723 else
724 _list_add("network", self.sid, "ifname", ifname)
725 end
726 end
727 end
728
729 function network.del_interface(self, ifname)
730 if not self:is_floating() then
731 if utl.instanceof(ifname, interface) then
732 ifname = ifname:name()
733 else
734 ifname = ifname:match("[^%s:]+")
735 end
736
737 -- if its a wireless interface, clear its network option
738 local wif = _wifi_lookup(ifname)
739 if wif then uci_r:delete("wireless", wif, "network") end
740
741 -- remove the interface
742 _list_del("network", self.sid, "ifname", ifname)
743 end
744 end
745
746 function network.get_interface(self)
747 if self:is_virtual() then
748 return interface(self:proto() .. "-" .. self.sid)
749 elseif self:is_bridge() then
750 return interface("br-" .. self.sid)
751 else
752 local ifn = nil
753 local num = { }
754 for ifn in utl.imatch(uci_s:get("network", self.sid, "ifname")) do
755 ifn = ifn:match("^[^:/]+")
756 return ifn and interface(ifn)
757 end
758 ifn = nil
759 uci_s:foreach("wireless", "wifi-iface",
760 function(s)
761 if s.device then
762 num[s.device] = num[s.device] and num[s.device] + 1 or 1
763 if s.network == self.sid then
764 ifn = s.ifname or "%s.network%d" %{ s.device, num[s.device] }
765 return false
766 end
767 end
768 end)
769 return ifn and interface(ifn)
770 end
771 end
772
773 function network.get_interfaces(self)
774 local ifaces = { }
775
776 local ifn
777 local nfs = { }
778 for ifn in utl.imatch(self:get("ifname")) do
779 ifn = ifn:match("^[^:/]+")
780 nfs[ifn] = interface(ifn)
781 end
782
783 for ifn in utl.kspairs(nfs) do
784 ifaces[#ifaces+1] = nfs[ifn]
785 end
786
787 local num = { }
788 local wfs = { }
789 uci_r:foreach("wireless", "wifi-iface",
790 function(s)
791 if s.device then
792 num[s.device] = num[s.device] and num[s.device] + 1 or 1
793 if s.network == self.sid then
794 ifn = "%s.network%d" %{ s.device, num[s.device] }
795 wfs[ifn] = interface(ifn)
796 end
797 end
798 end)
799
800 for ifn in utl.kspairs(wfs) do
801 ifaces[#ifaces+1] = wfs[ifn]
802
803 -- only bridges may cover more than one interface
804 --if not self:is_bridge() then
805 -- break
806 --end
807 end
808
809 return ifaces
810 end
811
812 function network.contains_interface(self, ifname)
813 if type(ifname) ~= "string" then
814 ifname = ifname:name()
815 else
816 ifname = ifname:match("[^%s:]+")
817 end
818
819 if self:is_virtual() and self:proto() .. "-" .. self.sid == ifname then
820 return true
821 elseif self:is_bridge() and "br-" .. self.sid == ifname then
822 return true
823 else
824 local ifn
825 for ifn in utl.imatch(self:get("ifname")) do
826 ifn = ifn:match("[^:]+")
827 if ifn == ifname then
828 return true
829 end
830 end
831
832 local wif = _wifi_lookup(ifname)
833 if wif then
834 return (uci_r:get("wireless", wif, "network") == self.sid)
835 end
836 end
837
838 return false
839 end
840
841 function network.adminlink(self)
842 return dsp.build_url("admin", "network", "network", self.sid)
843 end
844
845
846 interface = utl.class()
847 function interface.__init__(self, ifname)
848 local wif = _wifi_lookup(ifname)
849 if wif then self.wif = wifinet(wif) end
850
851 self.ifname = self.ifname or ifname
852 self.dev = ifs[self.ifname]
853 end
854
855 function interface.name(self)
856 return self.wif and self.wif:ifname() or self.ifname
857 end
858
859 function interface.mac(self)
860 return self.dev and self.dev.macaddr or "00:00:00:00:00:00"
861 end
862
863 function interface.ipaddrs(self)
864 return self.dev and self.dev.ipaddrs or { }
865 end
866
867 function interface.ip6addrs(self)
868 return self.dev and self.dev.ip6addrs or { }
869 end
870
871 function interface.type(self)
872 if self.wif or _wifi_iface(self.ifname) then
873 return "wifi"
874 elseif brs[self.ifname] then
875 return "bridge"
876 elseif self.ifname:match("%.") then
877 return "vlan"
878 elseif sws[self.ifname] then
879 return "switch"
880 else
881 return "ethernet"
882 end
883 end
884
885 function interface.shortname(self)
886 if self.wif then
887 return "%s %q" %{
888 self.wif:active_mode(),
889 self.wif:active_ssid() or self.wif:active_bssid()
890 }
891 else
892 return self.ifname
893 end
894 end
895
896 function interface.get_i18n(self)
897 if self.wif then
898 return "%s: %s %q" %{
899 i18n.translate("Wireless Network"),
900 self.wif:active_mode(),
901 self.wif:active_ssid() or self.wif:active_bssid()
902 }
903 else
904 return "%s: %q" %{ self:get_type_i18n(), self:name() }
905 end
906 end
907
908 function interface.get_type_i18n(self)
909 local x = self:type()
910 if x == "wifi" then
911 return i18n.translate("Wireless Adapter")
912 elseif x == "bridge" then
913 return i18n.translate("Bridge")
914 elseif x == "switch" then
915 return i18n.translate("Ethernet Switch")
916 elseif x == "vlan" then
917 return i18n.translate("VLAN Interface")
918 else
919 return i18n.translate("Ethernet Adapter")
920 end
921 end
922
923 function interface.adminlink(self)
924 if self.wif then
925 return self.wif:adminlink()
926 end
927 end
928
929 function interface.ports(self)
930 if self.br then
931 local iface
932 local ifaces = { }
933 for _, iface in ipairs(self.br.ifnames) do
934 ifaces[#ifaces+1] = interface(iface.name)
935 end
936 return ifaces
937 end
938 end
939
940 function interface.bridge_id(self)
941 if self.br then
942 return self.br.id
943 else
944 return nil
945 end
946 end
947
948 function interface.bridge_stp(self)
949 if self.br then
950 return self.br.stp
951 else
952 return false
953 end
954 end
955
956 function interface.is_up(self)
957 if self.wif then
958 return self.wif:is_up()
959 else
960 return self.dev and self.dev.flags and self.dev.flags.up or false
961 end
962 end
963
964 function interface.is_bridge(self)
965 return (self:type() == "bridge")
966 end
967
968 function interface.is_bridgeport(self)
969 return self.dev and self.dev.bridge and true or false
970 end
971
972 function interface.tx_bytes(self)
973 return self.dev and self.dev.stats
974 and self.dev.stats.tx_bytes or 0
975 end
976
977 function interface.rx_bytes(self)
978 return self.dev and self.dev.stats
979 and self.dev.stats.rx_bytes or 0
980 end
981
982 function interface.tx_packets(self)
983 return self.dev and self.dev.stats
984 and self.dev.stats.tx_packets or 0
985 end
986
987 function interface.rx_packets(self)
988 return self.dev and self.dev.stats
989 and self.dev.stats.rx_packets or 0
990 end
991
992 function interface.get_network(self)
993 if self.dev and self.dev.network then
994 self.network = _M:get_network(self.dev.network)
995 end
996
997 if not self.network then
998 local net
999 for _, net in ipairs(_M:get_networks()) do
1000 if net:contains_interface(self.ifname) or
1001 net:ifname() == self.ifname
1002 then
1003 self.network = net
1004 return net
1005 end
1006 end
1007 else
1008 return self.network
1009 end
1010 end
1011
1012 function interface.get_wifinet(self)
1013 return self.wif
1014 end
1015
1016
1017 wifidev = utl.class()
1018 function wifidev.__init__(self, dev)
1019 self.sid = dev
1020 self.iwinfo = dev and sys.wifi.getiwinfo(dev) or { }
1021 end
1022
1023 function wifidev.get(self, opt)
1024 return _get("wireless", self.sid, opt)
1025 end
1026
1027 function wifidev.set(self, opt, val)
1028 return _set("wireless", self.sid, opt, val)
1029 end
1030
1031 function wifidev.name(self)
1032 return self.sid
1033 end
1034
1035 function wifidev.hwmodes(self)
1036 local l = self.iwinfo.hwmodelist
1037 if l and next(l) then
1038 return l
1039 else
1040 return { b = true, g = true }
1041 end
1042 end
1043
1044 function wifidev.get_i18n(self)
1045 local t = "Generic"
1046 if self.iwinfo.type == "wl" then
1047 t = "Broadcom"
1048 elseif self.iwinfo.type == "madwifi" then
1049 t = "Atheros"
1050 end
1051
1052 local m = ""
1053 local l = self:hwmodes()
1054 if l.a then m = m .. "a" end
1055 if l.b then m = m .. "b" end
1056 if l.g then m = m .. "g" end
1057 if l.n then m = m .. "n" end
1058
1059 return "%s 802.11%s Wireless Controller (%s)" %{ t, m, self:name() }
1060 end
1061
1062 function wifidev.is_up(self)
1063 local up = false
1064
1065 uci_s:foreach("wireless", "wifi-iface",
1066 function(s)
1067 if s.device == self.sid then
1068 if s.up == "1" then
1069 up = true
1070 return false
1071 end
1072 end
1073 end)
1074
1075 return up
1076 end
1077
1078 function wifidev.get_wifinet(self, net)
1079 if uci_r:get("wireless", net) == "wifi-iface" then
1080 return wifinet(net)
1081 else
1082 local wnet = _wifi_lookup(net)
1083 if wnet then
1084 return wifinet(wnet)
1085 end
1086 end
1087 end
1088
1089 function wifidev.get_wifinets(self)
1090 local nets = { }
1091
1092 uci_r:foreach("wireless", "wifi-iface",
1093 function(s)
1094 if s.device == self.sid then
1095 nets[#nets+1] = wifinet(s['.name'])
1096 end
1097 end)
1098
1099 return nets
1100 end
1101
1102 function wifidev.add_wifinet(self, options)
1103 options = options or { }
1104 options.device = self.sid
1105
1106 local wnet = uci_r:section("wireless", "wifi-iface", nil, options)
1107 if wnet then
1108 return wifinet(wnet, options)
1109 end
1110 end
1111
1112 function wifidev.del_wifinet(self, net)
1113 if utl.instanceof(net, wifinet) then
1114 net = net.sid
1115 elseif uci_r:get("wireless", net) ~= "wifi-iface" then
1116 net = _wifi_lookup(net)
1117 end
1118
1119 if net and uci_r:get("wireless", net, "device") == self.sid then
1120 uci_r:delete("wireless", net)
1121 return true
1122 end
1123
1124 return false
1125 end
1126
1127
1128 wifinet = utl.class()
1129 function wifinet.__init__(self, net, data)
1130 self.sid = net
1131
1132 local num = { }
1133 local netid
1134 uci_r:foreach("wireless", "wifi-iface",
1135 function(s)
1136 if s.device then
1137 num[s.device] = num[s.device] and num[s.device] + 1 or 1
1138 if s['.name'] == self.sid then
1139 netid = "%s.network%d" %{ s.device, num[s.device] }
1140 return false
1141 end
1142 end
1143 end)
1144
1145 local dev = uci_s:get("wireless", self.sid, "ifname") or netid
1146
1147 self.netid = netid
1148 self.wdev = dev
1149 self.iwinfo = dev and sys.wifi.getiwinfo(dev) or { }
1150 self.iwdata = data or uci_s:get_all("wireless", self.sid) or
1151 uci_r:get_all("wireless", self.sid) or { }
1152 end
1153
1154 function wifinet.get(self, opt)
1155 return _get("wireless", self.sid, opt)
1156 end
1157
1158 function wifinet.set(self, opt, val)
1159 return _set("wireless", self.sid, opt, val)
1160 end
1161
1162 function wifinet.mode(self)
1163 return uci_s:get("wireless", self.sid, "mode") or "ap"
1164 end
1165
1166 function wifinet.ssid(self)
1167 return uci_s:get("wireless", self.sid, "ssid")
1168 end
1169
1170 function wifinet.bssid(self)
1171 return uci_s:get("wireless", self.sid, "bssid")
1172 end
1173
1174 function wifinet.network(self)
1175 return uci_s:get("wifinet", self.sid, "network")
1176 end
1177
1178 function wifinet.id(self)
1179 return self.netid
1180 end
1181
1182 function wifinet.name(self)
1183 return self.sid
1184 end
1185
1186 function wifinet.ifname(self)
1187 local ifname = self.iwinfo.ifname
1188 if not ifname or ifname:match("^wifi%d") or ifname:match("^radio%d") then
1189 ifname = self.wdev
1190 end
1191 return ifname
1192 end
1193
1194 function wifinet.get_device(self)
1195 if self.iwdata.device then
1196 return wifidev(self.iwdata.device)
1197 end
1198 end
1199
1200 function wifinet.is_up(self)
1201 return (self.iwdata.up == "1")
1202 end
1203
1204 function wifinet.active_mode(self)
1205 local m = _stror(self.iwinfo.mode, self.iwdata.mode) or "ap"
1206
1207 if m == "ap" then m = "Master"
1208 elseif m == "sta" then m = "Client"
1209 elseif m == "adhoc" then m = "Ad-Hoc"
1210 elseif m == "mesh" then m = "Mesh"
1211 elseif m == "monitor" then m = "Monitor"
1212 end
1213
1214 return m
1215 end
1216
1217 function wifinet.active_mode_i18n(self)
1218 return i18n.translate(self:active_mode())
1219 end
1220
1221 function wifinet.active_ssid(self)
1222 return _stror(self.iwinfo.ssid, self.iwdata.ssid)
1223 end
1224
1225 function wifinet.active_bssid(self)
1226 return _stror(self.iwinfo.bssid, self.iwdata.bssid) or "00:00:00:00:00:00"
1227 end
1228
1229 function wifinet.active_encryption(self)
1230 local enc = self.iwinfo and self.iwinfo.encryption
1231 return enc and enc.description or "-"
1232 end
1233
1234 function wifinet.assoclist(self)
1235 return self.iwinfo.assoclist or { }
1236 end
1237
1238 function wifinet.frequency(self)
1239 local freq = self.iwinfo.frequency
1240 if freq and freq > 0 then
1241 return "%.03f" % (freq / 1000)
1242 end
1243 end
1244
1245 function wifinet.bitrate(self)
1246 local rate = self.iwinfo.bitrate
1247 if rate and rate > 0 then
1248 return (rate / 1000)
1249 end
1250 end
1251
1252 function wifinet.channel(self)
1253 return self.iwinfo.channel or
1254 tonumber(uci_s:get("wireless", self.iwdata.device, "channel"))
1255 end
1256
1257 function wifinet.signal(self)
1258 return self.iwinfo.signal or 0
1259 end
1260
1261 function wifinet.noise(self)
1262 return self.iwinfo.noise or 0
1263 end
1264
1265 function wifinet.country(self)
1266 return self.iwinfo.country or "00"
1267 end
1268
1269 function wifinet.txpower(self)
1270 return self.iwinfo.txpower or 0
1271 end
1272
1273 function wifinet.signal_level(self, s, n)
1274 if self:active_bssid() ~= "00:00:00:00:00:00" then
1275 local signal = s or self:signal()
1276 local noise = n or self:noise()
1277
1278 if signal < 0 and noise < 0 then
1279 local snr = -1 * (noise - signal)
1280 return math.floor(snr / 5)
1281 else
1282 return 0
1283 end
1284 else
1285 return -1
1286 end
1287 end
1288
1289 function wifinet.signal_percent(self)
1290 local qc = self.iwinfo.quality or 0
1291 local qm = self.iwinfo.quality_max or 0
1292
1293 if qc > 0 and qm > 0 then
1294 return math.floor((100 / qm) * qc)
1295 else
1296 return 0
1297 end
1298 end
1299
1300 function wifinet.shortname(self)
1301 return "%s %q" %{
1302 i18n.translate(self:active_mode()),
1303 self:active_ssid() or self:active_bssid()
1304 }
1305 end
1306
1307 function wifinet.get_i18n(self)
1308 return "%s: %s %q (%s)" %{
1309 i18n.translate("Wireless Network"),
1310 i18n.translate(self:active_mode()),
1311 self:active_ssid() or self:active_bssid(),
1312 self:ifname()
1313 }
1314 end
1315
1316 function wifinet.adminlink(self)
1317 return dsp.build_url("admin", "network", "wireless", self.netid)
1318 end
1319
1320 function wifinet.get_network(self)
1321 if uci_r:get("network", self.iwdata.network) == "interface" then
1322 return network(self.iwdata.network)
1323 end
1324 end
1325
1326 function wifinet.get_interface(self)
1327 return interface(self:ifname())
1328 end