You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
 
 
 

108 lines
3.6 KiB

util.init_hosted()
local json = require "json"
local services = {}
local rotate_before = nil
local transform = nil
local c_hard = {}
c_hard[0] = resource.create_colored_texture(0, 0.666, 0, 1)
c_hard[1] = resource.create_colored_texture(0.8, 0.466, 0, 1)
c_hard[2] = resource.create_colored_texture(0.8, 0, 0, 1)
c_hard[3] = resource.create_colored_texture(0.8, 0, 0.8, 1)
local c_soft = {}
c_soft[0] = resource.create_colored_texture(0, 0.666, 0, 0.6)
c_soft[1] = resource.create_colored_texture(0.8, 0.466, 0, 0.75)
c_soft[2] = resource.create_colored_texture(0.8, 0, 0, 0.6)
c_soft[3] = resource.create_colored_texture(0.8, 0, 0.8, 0.6)
local c_text = {}
c_text[0] = {1, 1, 1}
c_text[1] = {0, 0, 0}
c_text[2] = {1, 1, 1}
c_text[3] = {1, 1, 1}
gl.setup(NATIVE_WIDTH, NATIVE_HEIGHT)
util.file_watch("services.json", function(content)
services = json.decode(content)
end)
local white = resource.create_colored_texture(1,1,1,1)
local base_time = N.base_time or 0
function node.render()
if rotate_before ~= CONFIG.rotate then
transform = util.screen_transform(CONFIG.rotate)
rotate_before = CONFIG.rotate
end
if rotate_before == 90 or rotate_before == 270 then
real_width = NATIVE_HEIGHT
real_height = NATIVE_WIDTH
else
real_width = NATIVE_WIDTH
real_height = NATIVE_HEIGHT
end
if CONFIG.instance_name ~= "" then
titlebar = CONFIG.instance_name .. " - " .. services.prettytime
else
titlebar = servics.prettytime
end
local title_width = CONFIG.header_font:width(titlebar, CONFIG.output_size)
local host_width = 0
transform()
CONFIG.background_color.clear()
CONFIG.header_font:write(real_width/2-title_width/2, CONFIG.output_size*0.5, titlebar, CONFIG.output_size, 1,1,1,1)
for idx, service in ipairs(services.services) do
host_width = math.max(host_width, CONFIG.header_font:width(service.host, CONFIG.header_size))
end
local y = CONFIG.output_size*2
for idx, serv in ipairs(services.services) do
host_size = CONFIG.header_size
svc_size = CONFIG.header_size
margin = math.min(CONFIG.output_size, 20)
while CONFIG.header_font:width(serv.host, host_size) > real_width/2-margin*1.5 do
host_size = host_size - 1
end
while CONFIG.header_font:width(serv.service, svc_size) > real_width/2-margin*1.5 do
svc_size = svc_size - 1
end
my_height = (#serv.output*CONFIG.output_size*1.5)+margin*2+CONFIG.header_size+CONFIG.output_size*0.5
indent = math.min(host_width, real_width/2-margin*1.5)+margin*2
if serv.type == 0 then
c_soft[serv.state]:draw(0, y, real_width, y+my_height)
else
c_hard[serv.state]:draw(0, y, real_width, y+my_height)
end
y = y+margin
CONFIG.header_font:write(10, y, serv.host, host_size, c_text[serv.state][1],c_text[serv.state][2],c_text[serv.state][2],1)
CONFIG.header_font:write(indent, y, serv.service, svc_size, c_text[serv.state][1],c_text[serv.state][2],c_text[serv.state][3],1)
y = y+CONFIG.header_size+CONFIG.output_size*0.5
CONFIG.output_font:write(10, y, serv.ack, CONFIG.output_size, c_text[serv.state][1],c_text[serv.state][2],c_text[serv.state][2],1)
for idx, line in ipairs(serv.output) do
CONFIG.output_font:write(indent, y, line, CONFIG.output_size, c_text[serv.state][1],c_text[serv.state][2],c_text[serv.state][3],1)
y = y+CONFIG.output_size*1.5
end
y = y+margin+2
if y > real_height then
break
end
end
end