124 lines
4.6 KiB
Lua
124 lines
4.6 KiB
Lua
local math = math
|
|
local rawget,rawset=rawget,rawset
|
|
local beautiful = require( "beautiful" )
|
|
|
|
local module = {
|
|
colors_by_id = {}
|
|
}
|
|
|
|
-- Do some magic to cache the highest state
|
|
local function return_data(tab, key)
|
|
return tab._real_table[key]
|
|
end
|
|
|
|
local function change_data(tab, key,value)
|
|
if not value and key == rawget(tab,"_current_key") then
|
|
-- Loop the array to find a new current_key
|
|
local win = math.huge
|
|
for k,v in pairs(tab._real_table) do
|
|
if k < win and k ~= key then
|
|
win = k
|
|
end
|
|
end
|
|
rawset(tab,"_current_key",win ~= math.huge and win or nil)
|
|
if tab._item._internal.text_w and tab._item._internal.text_w.cache then
|
|
tab._item._internal.text_w.cache = {}
|
|
end
|
|
tab._item:emit_signal("state::changed",win)
|
|
elseif value and (rawget(tab,"_current_key") or math.huge) > key then
|
|
rawset(tab,"_current_key",key)
|
|
if tab._item._internal.text_w and tab._item._internal.text_w.cache then
|
|
tab._item._internal.text_w.cache = {}
|
|
end
|
|
tab._item:emit_signal("state::changed",key)
|
|
end
|
|
tab._real_table[key] = value
|
|
end
|
|
|
|
function module.init_state(item)
|
|
local mt = {__newindex = change_data,__index=return_data}
|
|
return setmetatable({_real_table={},_item=item},mt)
|
|
end
|
|
|
|
-- Util to help match colors to states
|
|
local theme_colors = {}
|
|
|
|
local function load_section(data,priv,section,args)
|
|
local bg,fg,args = section.."_bg_", section.."_fg_",args or {}
|
|
for k,v in pairs(theme_colors) do
|
|
priv[bg..k] = args[bg..v.beautiful_name] or beautiful["menu_"..bg..v.beautiful_name] or beautiful[bg..v.beautiful_name]
|
|
priv[fg..k] = args[fg..v.beautiful_name] or beautiful["menu_"..fg..v.beautiful_name] or beautiful[fg..v.beautiful_name]
|
|
end
|
|
end
|
|
|
|
function module.register_color(state_id,name,beautiful_name,allow_fallback)
|
|
theme_colors[name] = {id=state_id,beautiful_name=beautiful_name,fallback=allow_fallback}
|
|
module.colors_by_id[state_id] = name
|
|
end
|
|
function module.setup_colors(data,args)
|
|
local priv = data._internal.private_data
|
|
for k,v in pairs(theme_colors) do
|
|
priv["fg_"..k] = args["fg_"..k] or beautiful["menu_fg_"..v.beautiful_name] or beautiful["fg_"..v.beautiful_name] or (v.fallback and beautiful.fg_normal)
|
|
priv["bg_"..k] = args["bg_"..k] or beautiful["menu_bg_"..v.beautiful_name] or beautiful["bg_"..v.beautiful_name] or (v.fallback and beautiful.bg_normal)
|
|
--priv["underlay_bg_"..k] = args["underlay_bg_"..k] or beautiful["menu_underlay_bg_"..v.beautiful_name] or beautiful["underlay_bg_"..v.beautiful_name]
|
|
end
|
|
|
|
-- Handle custom sections
|
|
for _,section in ipairs(priv.section or {}) do
|
|
load_section(data,priv,section,args)
|
|
end
|
|
end
|
|
|
|
function module.setup_item_colors(data,item,args)
|
|
local priv = item._private_data
|
|
for k,v in pairs(theme_colors) do
|
|
if args["fg_"..k] then
|
|
priv["fg_"..k] = args["fg_"..k]
|
|
else
|
|
rawset(item,"get_fg_"..k,function()
|
|
return priv["fg_"..k] or data["fg_"..k]
|
|
end)
|
|
end
|
|
if args["bg_"..k] then
|
|
priv["bg_"..k] = args["bg_"..k]
|
|
else
|
|
rawset(item,"get_bg_"..k, function()
|
|
return priv["bg_"..k] or data["bg_"..k]
|
|
end)
|
|
end
|
|
end
|
|
end
|
|
|
|
--- Apply a set of background and foreground colors from beautiful to `data`
|
|
-- @arg data The menu
|
|
-- @arg namespace The beautiful prefix used for that set of values
|
|
function module.add_colors_from_namespace(data,namespace)
|
|
local priv = data._internal.private_data
|
|
for k,v in pairs(theme_colors) do
|
|
priv["fg_"..k] = beautiful[namespace.."_fg_"..v.beautiful_name] or priv["fg_"..k]
|
|
priv["bg_"..k] = beautiful[namespace.."_bg_"..v.beautiful_name] or priv["bg_"..k]
|
|
end
|
|
priv["fg"] = beautiful[namespace.."_fg"] or priv["fg"]
|
|
priv["bg"] = beautiful[namespace.."_bg"] or priv["bg"]
|
|
priv["border_color"] = beautiful[namespace.."_border_color"] or priv["border_color"]
|
|
print("ICI",namespace,namespace.."_item_border_color",beautiful[namespace.."_item_border_color"])
|
|
priv["item_border_color"] = beautiful[namespace.."_item_border_color"] or priv["item_border_color"]
|
|
priv.namespace = priv.namespace or {}
|
|
priv.namespace[#priv.namespace+1] = namespace
|
|
end
|
|
|
|
-- Utils to add new color-able elements of an item
|
|
-- this can be used either for extentions, such as {pre,suf}fixes
|
|
-- or "special" [item_]styles
|
|
|
|
function module.add_section(data,section,args)
|
|
local priv = data._internal.private_data
|
|
|
|
load_section(data,priv,section,args)
|
|
|
|
priv.section = priv.section or {}
|
|
priv.section[#priv.section+1] = section
|
|
end
|
|
|
|
return setmetatable(module, { __call = function(_, ...) return new(...) end })
|
|
-- kate: space-indent on; indent-width 2; replace-tabs on; |