conky-config/drawing/static.lua

120 lines
3.6 KiB
Lua
Raw Normal View History

2022-07-10 16:25:12 -04:00
local common = require 'common'
local pure = require 'pure'
local geometry = require 'geometry'
local geom = require 'geom'
local fill_rect = require 'fill_rect'
2022-07-16 00:00:06 -04:00
local reduce_modules_y = function(init_x, acc, new)
if type(new) == "number" then
acc.next_y = acc.next_y + new
else
local r = new(geom.make_point(init_x, acc.next_y))
table.insert(acc.fgroups, {update = r.update, static = r.static, dynamic = r.dynamic})
acc.next_x = math.max(acc.next_x, r.next_x)
acc.next_y = r.next_y
end
return acc
end
2022-07-16 00:00:06 -04:00
local reduce_modules_x = function(init_y, acc, x_mods)
if type(x_mods) == "number" then
acc.next_x = acc.next_x + x_mods
else
local r = pure.reduce(
pure.partial(reduce_modules_y, acc.next_x),
{next_x = acc.next_x, next_y = init_y, fgroups = acc.fgroups},
x_mods
)
acc.fgroups = r.fgroups
acc.next_x = r.next_x
acc.next_y = math.max(acc.next_y, r.next_y)
end
return acc
end
2022-07-16 00:00:06 -04:00
local arrange_panel_modules = function(point, mods)
local r = pure.reduce(
pure.partial(reduce_modules_x, point.y),
{next_x = point.x, next_y = point.y, fgroups = {}},
mods
)
return {
point_ul = point,
width = r.next_x - point.x,
height = r.next_y - point.y,
update = pure.map_keys('update', r.fgroups),
static = pure.map_keys('static', r.fgroups),
dynamic = pure.map_keys('dynamic', r.fgroups),
}
end
2022-07-16 00:00:06 -04:00
local build_surface = function(box, fs)
local panel_line_thickness = 1
-- move over by half a pixel so the lines don't need to be antialiased
local _x = box.corner.x + 0.5
local _y = box.corner.y + 0.5
local panel = common.make_panel(_x, _y, box.width, box.height, panel_line_thickness)
local cs_x = _x - panel_line_thickness * 0.5
local cs_y = _y - panel_line_thickness * 0.5
local cs_w = box.width + panel_line_thickness
local cs_h = box.height + panel_line_thickness
2022-07-16 00:00:06 -04:00
local cs = cairo_image_surface_create(CAIRO_FORMAT_ARGB32, cs_w, cs_h)
local cr = cairo_create(cs)
2022-07-16 00:00:06 -04:00
cairo_translate(cr, -cs_x, -cs_y)
2022-07-16 00:00:06 -04:00
fill_rect.draw(panel, cr)
for i = 1, #fs do
fs[i](cr)
end
2022-07-16 00:00:06 -04:00
cairo_destroy(cr)
return {x = cs_x, y = cs_y, s = cs}
end
local reduce_static = function(y, margins, acc, panel_mods)
2022-07-16 00:00:06 -04:00
if type(panel_mods) == "number" then
acc.next_x = acc.next_x + panel_mods
else
local mpoint = geom.make_point(acc.next_x + margins.x, y + margins.y)
local r = arrange_panel_modules(mpoint, panel_mods)
local w = r.width + margins.x * 2
local h = r.height + margins.y * 2
local pbox = geom.make_box(acc.next_x, y, w, h)
acc.next_x = acc.next_x + w
acc.static = pure.flatten({acc.static, {build_surface(pbox, r.static)}})
acc.update = pure.flatten({acc.update, r.update})
acc.dynamic = pure.flatten({acc.dynamic, r.dynamic})
end
return acc
end
2022-07-16 00:00:06 -04:00
return function(point, module_sets)
local __cairo_set_source_surface = cairo_set_source_surface
local __cairo_paint = cairo_paint
2022-07-16 00:00:06 -04:00
local r = pure.reduce(
pure.partial(
reduce_static,
point.y,
{x = geometry.PANEL_MARGIN_X, y = geometry.PANEL_MARGIN_Y}
2022-07-16 00:00:06 -04:00
),
{next_x = point.x, static = {}, update = {}, dynamic = {}},
module_sets
)
2022-07-16 00:00:06 -04:00
local cs = r.static
return {
static = function(cr)
for i = 1, #cs do
local c = cs[i]
__cairo_set_source_surface(cr, c.s, c.x, c.y)
__cairo_paint(cr)
end
end,
update = pure.sequence(table.unpack(r.update)),
dynamic = pure.sequence(table.unpack(r.dynamic)),
}
end