www/index.lua

   1 function td(content)
   2    return "<td>" .. content .. "</td>"
   3 end
   4
   5
   6 function tr(...)
   7    local ret = ""
   8
   9    for i,s in ipairs(arg) do
  10       ret = ret .. s
  11    end
  12
  13    return "<tr>" .. ret .. "</tr>\n"
  14 end
  15
  16 function sensor_to_tr(id,sensor)
  17    return tr(td(sensor["name"]),
  18              td(sensor["measure_last"]),
  19              td(sensor["measure_min"]),
  20              td(sensor["measure_max"]))
  21 end
  22
  23 str = "<html><head><link rel='stylesheet' type='text/css' href='/style.css' /></head><body><h1>Psensor Monitoring Server</h1>"
  24
  25 if cpu and cpu["load"] then
  26    str = str .. "<h2>System</h2>"
  27       .. "<table>"
  28       .. "<tr class='title'><th>Name</th><th>Value</th></tr>"
  29       .. "<tr><td>CPU Usage</td><td>" .. math.ceil(100*cpu["load"]) .. "%</td></tr>"
  30    .. "</table>"
  31
  32 end
  33
  34 str = str .. "<h2>Sensors</h2>"
  35    .. "<table>"
  36    .. "<tr class='title'><th>Name</th><th>Value</th><th>Min</th><th>Max</th></tr>"
  37
  38 for i,sensor in ipairs(sensors) do
  39    str = str .. sensor_to_tr(i,sensor)
  40 end
  41
  42 str = str .. "</table><hr /><a href='http://wpitchoune.net/psensor'>psensor-server</a></body></html>"
  43
  44 return str
  45