radical/item/style/classic.lua

80 lines
2.2 KiB
Lua

local setmetatable = setmetatable
local base = require( "radical.base" )
local color = require( "gears.color" )
local cairo = require( "lgi" ).cairo
local beautiful = require( "beautiful" )
local print = print
local module = {
margins = {
TOP = 2,
BOTTOM = 2,
RIGHT = 0,
LEFT = 4
}
}
local focussed,default,alt = nil, nil,{}
local function gen(item_height,bg_color,border_color)
local img = cairo.ImageSurface(cairo.Format.ARGB32, 800,item_height)
local cr = cairo.Context(img)
cr:set_source( color(bg_color) )
cr:paint()
cr:set_source( color(border_color) )
cr:rectangle(0,item_height-1,800,1)
cr:fill()
return cairo.Pattern.create_for_surface(img)
end
local function widget_draw(self, w, cr, width, height)
self:_draw2(w, cr, width, height)
local overlay = self._item and self._item.overlay
if overlay then
overlay(self._item._menu,self._item,cr,width,height)
end
end
local function draw(item,args)
local args = args or {}
local col = args.color
if not item.widget._overlay_init then
item.widget._draw2 = item.widget.draw
item.widget.draw = widget_draw
item.widget._overlay_init = true
end
local ih = item.height or 1
if not focussed or not focussed[ih] then
if not focussed then
focussed,default,alt={},{},{}
end
local bc = item.item_border_color or item.border_color
focussed[ih] = gen(ih,item.bg_focus,bc)
default [ih] = gen(ih,item.bg,bc)
end
if col and (not alt[col] or not alt[col][ih]) then
alt[col] = alt[col] or {}
alt[col][ih] = gen(ih,color(col),bc)
end
local state = item.state or {}
local current_state = state._current_key or nil
local state_name = current_state and base.colors_by_id[current_state] or "normal"
if current_state == base.item_flags.SELECTED or (item._tmp_menu) then
item.widget:set_bg(focussed[ih])
item.widget:set_fg(item["fg_focus"])
elseif col then
item.widget:set_bg(alt[col][ih])
item.widget:set_fg(item["fg_"..state_name])
else
item.widget:set_bg(default[ih])
item.widget:set_fg(item["fg"])
end
end
return setmetatable(module, { __call = function(_, ...) return draw(...) end })
-- kate: space-indent on; indent-width 2; replace-tabs on;