1
0
mirror of git://projects.qi-hardware.com/openwrt-packages.git synced 2024-12-25 12:15:33 +02:00
openwrt-packages/cgminer/root-files/usr/lib/lua/luci/controller/cgminer.lua
2013-03-06 17:23:40 +08:00

144 lines
4.5 KiB
Lua

--[[
LuCI - Lua Configuration Interface
Copyright 2013 Xiangfu
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
$Id$
]]--
module("luci.controller.cgminer", package.seeall)
function index()
entry({"admin", "status", "cgminer"}, cbi("cgminer/cgminer"), _("Cgminer Configuration"))
entry({"admin", "status", "cgminerstatus"}, cbi("cgminer/cgminerstatus"), _("Cgminer Status"))
entry({"admin", "status", "cgminerapi"}, call("action_cgminerapi"), _("Cgminer API Log"))
end
function action_cgminerapi()
local pp = io.popen("/usr/bin/cgminer-api summary; /usr/bin/cgminer-api devs; /usr/bin/cgminer-api pools; /usr/bin/cgminer-api stats")
local data = pp:read("*a")
pp:close()
luci.template.render("cgminerapi", {api=data})
end
function summary()
local data = {}
local summary = luci.util.execi("/usr/bin/cgminer-api -o summary | sed \"s/|/\\n/g\" ")
if not summary then
return
end
for line in summary do
local elapsed, mhsav, foundblocks, getworks, accepted, rejected, hw, utility, discarded, stale, getfailures, localwork, remotefailures, networkblocks, totalmh, wu, diffaccepted, diffrejected, diffstale, bestshare = line:match("Elapsed=(%d+),MHS av=([%d%.]+),Found Blocks=(%d+),Getworks=(%d+),Accepted=(%d+),Rejected=(%d+),Hardware Errors=(%d+),Utility=([%d%.]+),Discarded=(%d+),Stale=(%d+),Get Failures=(%d+),Local Work=(%d+),Remote Failures=(%d+),Network Blocks=(%d+),Total MH=([%d%.]+),Work Utility=([%d%.]+),Difficulty Accepted=([%d]+)%.%d+,Difficulty Rejected=([%d]+)%.%d+,Difficulty Stale=([%d]+)%.%d+,Best Share=(%d+)")
if elapsed then
local str
local days
local h
local m
local s = elapsed % 60;
elapsed = elapsed - s
elapsed = elapsed / 60
if elapsed == 0 then
str = string.format("%ds", s)
else
m = elapsed % 60;
elapsed = elapsed - m
elapsed = elapsed / 60
if elapsed == 0 then
str = string.format("%dm %ds", m, s);
else
h = elapsed % 24;
elapsed = elapsed - h
elapsed = elapsed / 24
if elapsed == 0 then
str = string.format("%dh %dm %ds", h, m, s)
else
str = string.format("%dd %dh %dm %ds", elapsed, h, m, s);
end
end
end
data[#data+1] = {
['elapsed'] = str,
['mhsav'] = mhsav,
['foundblocks'] = foundblocks,
['getworks'] = getworks,
['accepted'] = accepted,
['rejected'] = rejected,
['hw'] = hw,
['utility'] = utility,
['discarded'] = discarded,
['stale'] = stale,
['getfailures'] = getfailures,
['localwork'] = localwork,
['remotefailures'] = remotefailures,
['networkblocks'] = networkblocks,
['totalmh'] = string.format("%e",totalmh),
['wu'] = wu,
['diffaccepted'] = diffaccepted,
['diffrejected'] = diffrejected,
['diffstale'] = diffstale,
['bestshare'] = bestshare
}
end
end
return data
end
function pools()
local data = {}
local pools = luci.util.execi("/usr/bin/cgminer-api -o pools | sed \"s/|/\\n/g\" ")
if not pools then
return
end
for line in pools do
local pi, url, st, pri, lp, gw, a, r, dc, sta, gf, rf, user, lst, ds, da, dr, dsta, lsd, hs, sa, su, hg = line:match(
"POOL=(%d+),URL=(.*),Status=(%a+),Priority=(%d+),Long Poll=(%a+),Getworks=(%d+),Accepted=(%d+),Rejected=(%d+),Discarded=(%d+),Stale=(%d+),Get Failures=(%d+),Remote Failures=(%d+),User=(.*),Last Share Time=(%d+),Diff1 Shares=(%d+),Proxy Type=.*,Proxy=.*,Difficulty Accepted=(%d+)[%.%d]+,Difficulty Rejected=(%d+)[%.%d]+,Difficulty Stale=(%d+)[%.%d]+,Last Share Difficulty=(%d+)[%.%d]+,Has Stratum=(%a+),Stratum Active=(%a+),Stratum URL=.*,Has GBT=(%a+)")
if pi then
if lst == "0" then
lst_date = "Never"
else
lst_date = os.date("%c", lst)
end
data[#data+1] = {
['pool'] = pi,
['url'] = url,
['status'] = st,
['priority'] = pri,
['longpoll'] = lp,
['getworks'] = gw,
['accepted'] = a,
['rejected'] = r,
['discarded'] = dc,
['stale'] = sta,
['getfailures'] = gf,
['remotefailures'] = rf,
['user'] = user,
['lastsharetime'] = lst_date,
['diff1shares'] = ds,
['diffaccepted'] = da,
['diffrejected'] = dr,
['diffstale'] = dsta,
['lastsharedifficulty'] = lsd,
['hasstratum'] = hs,
['stratumactive'] = sa,
['stratumurl'] = su,
['hasgbt'] = hg
}
end
end
return data
end