Difuse/luci
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

applications/luci-wol: add static lease macs to suggestion list

Browse source
This commit is contained in:
Jo-Philipp Wich 2010-11-24 04:19:23 +00:00
parent cbe2cb545c
commit 168f025719
1 changed files with 13 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

17
applications/luci-wol/luasrc/model/cbi/wol.lua
View file

@ -10,6 +10,8 @@ You may obtain a copy of the License at
http://www.apache.org/licenses/LICENSE-2.0 http://www.apache.org/licenses/LICENSE-2.0
]]-- ]]--
local uci = require "luci.model.uci".cursor()
local utl = require "luci.util"
local sys = require "luci.sys" local sys = require "luci.sys"
local fs = require "nixio.fs" local fs = require "nixio.fs"
@ -54,23 +56,30 @@ end
for _, e in ipairs(sys.net.arptable()) do for _, e in ipairs(sys.net.arptable()) do
arp[e["HW address"]] = { e["IP address"] } arp[e["HW address"]:upper()] = { e["IP address"] }
end end
for e in io.lines("/etc/ethers") do for e in io.lines("/etc/ethers") do
mac, ip = e:match("^([a-f0-9]%S+) (%S+)") mac, ip = e:match("^([a-f0-9]%S+) (%S+)")
if mac and ip then arp[mac] = { ip } end if mac and ip then arp[mac:upper()] = { ip } end
end end
for e in io.lines("/var/dhcp.leases") do for e in io.lines("/var/dhcp.leases") do
mac, ip, name = e:match("^%d+ (%S+) (%S+) (%S+)") mac, ip, name = e:match("^%d+ (%S+) (%S+) (%S+)")
if mac and ip then arp[mac] = { ip, name ~= "*" and name } end if mac and ip then arp[mac:upper()] = { ip, name ~= "*" and name } end
end end
uci:foreach("dhcp", "host",
function(s)
if s.mac and s.ip then
arp[s.mac:upper()] = { s.ip, s.name }
end
end)
host = s:option(Value, "mac", translate("Host to wake up"), host = s:option(Value, "mac", translate("Host to wake up"),
translate("Choose the host to wake up or enter a custom MAC address to use")) translate("Choose the host to wake up or enter a custom MAC address to use"))
for mac, ip in pairs(arp) do for mac, ip in utl.kspairs(arp) do
host:value(mac, "%s (%s)" %{ mac, ip[2] or ip[1] }) host:value(mac, "%s (%s)" %{ mac, ip[2] or ip[1] })
end end