1bb4822dca
* Rename subdirectories to their repective OpenWrt package names * Make each LuCI module its own standalone package * Deploy a shared luci.mk which is used by each module Makefile Signed-off-by: Jo-Philipp Wich <jow@openwrt.org>
82 lines
2 KiB
Lua
82 lines
2 KiB
Lua
--[[
|
|
LuCI - Lua Configuration Interface
|
|
|
|
Copyright 2008 Steven Barth <steven@midlink.org>
|
|
Copyright 2011 Jo-Philipp Wich <xm@subsignal.org>
|
|
Copyright 2013 Manuel Munz <freifunk@somakoma.de>
|
|
|
|
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.controller.freifunk.diag", package.seeall)
|
|
|
|
function index()
|
|
local uci = require("luci.model.uci").cursor()
|
|
local page
|
|
page = node("freifunk", "status", "diagnostics")
|
|
page.target = template("freifunk/diagnostics")
|
|
page.title = _("Diagnostics")
|
|
page.order = 60
|
|
|
|
page = entry({"freifunk", "status", "diag_ping"}, call("diag_ping"), nil)
|
|
page.leaf = true
|
|
|
|
page = entry({"freifunk", "status", "diag_nslookup"}, call("diag_nslookup"), nil)
|
|
page.leaf = true
|
|
|
|
page = entry({"freifunk", "status", "diag_traceroute"}, call("diag_traceroute"), nil)
|
|
page.leaf = true
|
|
|
|
page = entry({"freifunk", "status", "diag_ping6"}, call("diag_ping6"), nil)
|
|
page.leaf = true
|
|
|
|
page = entry({"freifunk", "status", "diag_traceroute6"}, call("diag_traceroute6"), nil)
|
|
page.leaf = true
|
|
end
|
|
|
|
function diag_command(cmd, addr)
|
|
if addr and addr:match("^[a-zA-Z0-9%-%.:_]+$") then
|
|
luci.http.prepare_content("text/plain")
|
|
|
|
local util = io.popen(cmd % addr)
|
|
if util then
|
|
while true do
|
|
local ln = util:read("*l")
|
|
if not ln then break end
|
|
luci.http.write(ln)
|
|
luci.http.write("\n")
|
|
end
|
|
|
|
util:close()
|
|
end
|
|
|
|
return
|
|
end
|
|
|
|
luci.http.status(500, "Bad address")
|
|
end
|
|
|
|
function diag_ping(addr)
|
|
diag_command("ping -c 5 -W 1 %q 2>&1", addr)
|
|
end
|
|
|
|
function diag_traceroute(addr)
|
|
diag_command("traceroute -q 1 -w 1 -n %q 2>&1", addr)
|
|
end
|
|
|
|
function diag_nslookup(addr)
|
|
diag_command("nslookup %q 2>&1", addr)
|
|
end
|
|
|
|
function diag_ping6(addr)
|
|
diag_command("ping6 -c 5 %q 2>&1", addr)
|
|
end
|
|
|
|
function diag_traceroute6(addr)
|
|
diag_command("traceroute6 -q 1 -w 2 -n %q 2>&1", addr)
|
|
end
|