+++ /dev/null
---[[
-LuCI - Lua Configuration Interface
-
-Copyright 2011 Jo-Philipp Wich <xm@subsignal.org>
-
-Licensed under the Apache License, Version 2.0 (the "License");
-you may not use this file except in compliance with the License.
-You may obtain a copy of the License at
-
- http://www.apache.org/licenses/LICENSE-2.0
-
-]]--
-
-module("luci.tools.status", package.seeall)
-
-local uci = require "luci.model.uci".cursor()
-
-local function dhcp_leases_common(family)
- local rv = { }
- local nfs = require "nixio.fs"
- local leasefile = "/var/dhcp.leases"
-
- uci:foreach("dhcp", "dnsmasq",
- function(s)
- if s.leasefile and nfs.access(s.leasefile) then
- leasefile = s.leasefile
- return false
- end
- end)
-
- local fd = io.open(leasefile, "r")
- if fd then
- while true do
- local ln = fd:read("*l")
- if not ln then
- break
- else
- local ts, mac, ip, name, duid = ln:match("^(%d+) (%S+) (%S+) (%S+) (%S+)")
- if ts and mac and ip and name and duid then
- if family == 4 and not ip:match(":") then
- rv[#rv+1] = {
- expires = os.difftime(tonumber(ts) or 0, os.time()),
- macaddr = mac,
- ipaddr = ip,
- hostname = (name ~= "*") and name
- }
- elseif family == 6 and ip:match(":") then
- rv[#rv+1] = {
- expires = os.difftime(tonumber(ts) or 0, os.time()),
- ip6addr = ip,
- duid = (duid ~= "*") and duid,
- hostname = (name ~= "*") and name
- }
- end
- end
- end
- end
- fd:close()
- end
-
- local fd = io.open("/tmp/hosts/odhcpd", "r")
- if fd then
- while true do
- local ln = fd:read("*l")
- if not ln then
- break
- else
- local iface, duid, iaid, name, ts, id, length, ip = ln:match("^# (%S+) (%S+) (%S+) (%S+) (%d+) (%S+) (%S+) (.*)")
- if ip and iaid ~= "ipv4" and family == 6 then
- rv[#rv+1] = {
- expires = os.difftime(tonumber(ts) or 0, os.time()),
- duid = duid,
- ip6addr = ip,
- hostname = (name ~= "-") and name
- }
- elseif ip and iaid == "ipv4" and family == 4 then
- rv[#rv+1] = {
- expires = os.difftime(tonumber(ts) or 0, os.time()),
- macaddr = duid,
- ipaddr = ip,
- hostname = (name ~= "-") and name
- }
- end
- end
- end
- fd:close()
- end
-
- return rv
-end
-
-function dhcp_leases()
- return dhcp_leases_common(4)
-end
-
-function dhcp6_leases()
- return dhcp_leases_common(6)
-end
-
-function wifi_networks()
- local rv = { }
- local ntm = require "luci.model.network".init()
-
- local dev
- for _, dev in ipairs(ntm:get_wifidevs()) do
- local rd = {
- up = dev:is_up(),
- device = dev:name(),
- name = dev:get_i18n(),
- networks = { }
- }
-
- local net
- for _, net in ipairs(dev:get_wifinets()) do
- rd.networks[#rd.networks+1] = {
- name = net:shortname(),
- link = net:adminlink(),
- up = net:is_up(),
- mode = net:active_mode(),
- ssid = net:active_ssid(),
- bssid = net:active_bssid(),
- encryption = net:active_encryption(),
- frequency = net:frequency(),
- channel = net:channel(),
- signal = net:signal(),
- quality = net:signal_percent(),
- noise = net:noise(),
- bitrate = net:bitrate(),
- ifname = net:ifname(),
- assoclist = net:assoclist(),
- country = net:country(),
- txpower = net:txpower(),
- txpoweroff = net:txpower_offset()
- }
- end
-
- rv[#rv+1] = rd
- end
-
- return rv
-end
-
-function wifi_network(id)
- local ntm = require "luci.model.network".init()
- local net = ntm:get_wifinet(id)
- if net then
- local dev = net:get_device()
- if dev then
- return {
- id = id,
- name = net:shortname(),
- link = net:adminlink(),
- up = net:is_up(),
- mode = net:active_mode(),
- ssid = net:active_ssid(),
- bssid = net:active_bssid(),
- encryption = net:active_encryption(),
- frequency = net:frequency(),
- channel = net:channel(),
- signal = net:signal(),
- quality = net:signal_percent(),
- noise = net:noise(),
- bitrate = net:bitrate(),
- ifname = net:ifname(),
- assoclist = net:assoclist(),
- country = net:country(),
- txpower = net:txpower(),
- txpoweroff = net:txpower_offset(),
- device = {
- up = dev:is_up(),
- device = dev:name(),
- name = dev:get_i18n()
- }
- }
- end
- end
- return { }
-end
-
-function switch_status(devs)
- local dev
- local switches = { }
- for dev in devs:gmatch("[^%s,]+") do
- local ports = { }
- local swc = io.popen("swconfig dev %q show" % dev, "r")
- if swc then
- local l
- repeat
- l = swc:read("*l")
- if l then
- local port, up = l:match("port:(%d+) link:(%w+)")
- if port then
- local speed = l:match(" speed:(%d+)")
- local duplex = l:match(" (%w+)-duplex")
- local txflow = l:match(" (txflow)")
- local rxflow = l:match(" (rxflow)")
- local auto = l:match(" (auto)")
-
- ports[#ports+1] = {
- port = tonumber(port) or 0,
- speed = tonumber(speed) or 0,
- link = (up == "up"),
- duplex = (duplex == "full"),
- rxflow = (not not rxflow),
- txflow = (not not txflow),
- auto = (not not auto)
- }
- end
- end
- until not l
- swc:close()
- end
- switches[dev] = ports
- end
- return switches
-end
projects / project / luci.git / blobdiff