75 lines
2.0 KiB
Lua
75 lines
2.0 KiB
Lua
local screen = require("screen")
|
|
|
|
local coords = {x=100,y=100}
|
|
|
|
local mouse = {
|
|
old_histories = {},
|
|
history = {},
|
|
}
|
|
|
|
-- Avoid gears when possible
|
|
local function contains(rect, point)
|
|
return point.x >= rect.x and point.x < rect.x+rect.width and
|
|
point.y >= rect.y and point.y < rect.y+rect.height
|
|
end
|
|
|
|
function mouse.coords(args)
|
|
if args then
|
|
local old = {x = coords.x, y = coords.y}
|
|
coords.x, coords.y = args.x, args.y
|
|
table.insert(mouse.history, {x=coords.x, y=coords.y})
|
|
|
|
for _, d in ipairs(drawin.get()) do
|
|
local geo = d.geometry()
|
|
local was_in, is_in = contains(geo, old), contains(geo, coords)
|
|
local sig = {(is_in and not was_in) and "mouse::enter" or
|
|
(was_in and not is_in) and "mouse::leave" or "mouse::move"}
|
|
|
|
-- Enter is also a move, otherwise drawable.handle_motion isn't called
|
|
if sig[1] == "mouse::enter" then
|
|
table.insert(sig, "mouse::move")
|
|
end
|
|
|
|
for _, s in ipairs(sig) do
|
|
d:emit_signal(s, coords.x - geo.x, coords.y - geo.y)
|
|
d.drawable:emit_signal(s, coords.x - geo.x, coords.y - geo.y)
|
|
end
|
|
end
|
|
end
|
|
|
|
return coords
|
|
end
|
|
|
|
function mouse.set_newindex_miss_handler(h)
|
|
rawset(mouse, "_ni_handler", h)
|
|
end
|
|
|
|
function mouse.set_index_miss_handler(h)
|
|
rawset(mouse, "_i_handler", h)
|
|
end
|
|
|
|
function mouse.push_history()
|
|
table.insert(mouse.old_histories, mouse.history)
|
|
mouse.history = {}
|
|
end
|
|
|
|
return setmetatable(mouse, {
|
|
__index = function(self, key)
|
|
if key == "screen" then
|
|
return screen[1]
|
|
end
|
|
local h = rawget(mouse,"_i_handler")
|
|
if h then
|
|
return h(self, key)
|
|
end
|
|
end,
|
|
__newindex = function(...)
|
|
local h = rawget(mouse,"_ni_handler")
|
|
if h then
|
|
h(...)
|
|
end
|
|
end,
|
|
})
|
|
|
|
-- vim: filetype=lua:expandtab:shiftwidth=4:tabstop=8:softtabstop=4:textwidth=80
|