139 lines
4.8 KiB
Lua
139 lines
4.8 KiB
Lua
---------------------------------------------------------------------------
|
|
-- @author Julien Danjou <julien@danjou.info>
|
|
-- @copyright 2008 Julien Danjou
|
|
-- @release @AWESOME_VERSION@
|
|
---------------------------------------------------------------------------
|
|
|
|
-- Grab environment we need
|
|
local layout = require("awful.layout")
|
|
local hooks = require("awful.hooks")
|
|
local aclient = require("awful.client")
|
|
local math = math
|
|
local ipairs = ipairs
|
|
local capi =
|
|
{
|
|
mouse = mouse,
|
|
screen = screen,
|
|
client = client,
|
|
mousegrabber = mousegrabber,
|
|
}
|
|
|
|
--- Mouse module for awful
|
|
module("awful.mouse")
|
|
|
|
client = {}
|
|
|
|
local function snap_outside(g, sg, snap)
|
|
if g.x < snap + sg.x + sg.width and g.x > sg.x + sg.width then
|
|
g.x = sg.x + sg.width
|
|
elseif g.x + g.width < sg.x and g.x + g.width > sg.x - snap then
|
|
g.x = sg.x - g.width
|
|
end
|
|
if g.y < snap + sg.y + sg.height and g.y > sg.y + sg.height then
|
|
g.y = sg.y + sg.height
|
|
elseif g.y + g.height < sg.y and g.y + g.height > sg.y - snap then
|
|
g.y = sg.y - g.height
|
|
end
|
|
return g
|
|
end
|
|
|
|
local function snap_inside(g, sg, snap)
|
|
if math.abs(g.x) < snap + sg.x and g.x > sg.x then
|
|
g.x = sg.x
|
|
elseif math.abs((sg.x + sg.width) - (g.x + g.width)) < snap then
|
|
g.x = sg.x + sg.width - g.width
|
|
end
|
|
if math.abs(g.y) < snap + sg.y and g.y > sg.y then
|
|
g.y = sg.y
|
|
elseif math.abs((sg.y + sg.height) - (g.y + g.height)) < snap then
|
|
g.y = sg.y + sg.height - g.height
|
|
end
|
|
return g
|
|
end
|
|
|
|
--- Snap a client to the closest client or screen edge.
|
|
-- @param c The client to snap.
|
|
-- @param snap The pixel to snap clients.
|
|
-- @param x The client x coordinate.
|
|
-- @param y The client y coordinate.
|
|
function client.snap(c, snap, x, y)
|
|
local snap = snap or 8
|
|
local c = c or client.focus
|
|
local geom = c:fullgeometry()
|
|
geom.x = x or geom.x
|
|
geom.y = y or geom.y
|
|
|
|
geom = snap_inside(geom, capi.screen[c.screen].geometry, snap)
|
|
geom = snap_inside(geom, capi.screen[c.screen].workarea, snap)
|
|
|
|
for k, snapper in ipairs(aclient.visible(c.screen)) do
|
|
if snapper ~= c then
|
|
geom = snap_outside(geom, snapper:fullgeometry(), snap)
|
|
end
|
|
end
|
|
return geom
|
|
end
|
|
|
|
--- Move a client.
|
|
-- @param c The client to move, or the focused one if nil.
|
|
-- @param snap The pixel to snap clients.
|
|
function client.move(c, snap)
|
|
local c = c or capi.client.focus
|
|
|
|
if not c then return end
|
|
|
|
if c.fullscreen
|
|
or c.type == "desktop"
|
|
or c.type == "splash"
|
|
or c.type == "dock" then
|
|
return
|
|
end
|
|
|
|
c:raise()
|
|
|
|
local orig = c:fullgeometry()
|
|
local m_c = capi.mouse.coords()
|
|
local dist_x = m_c.x - orig.x
|
|
local dist_y = m_c.y - orig.y
|
|
|
|
local function ug(c, prop)
|
|
if prop == "geometry" then
|
|
local g = c:fullgeometry()
|
|
capi.mouse.coords({ x = g.x + dist_x, y = g.y + dist_y })
|
|
end
|
|
end
|
|
|
|
capi.mousegrabber.run(function (mouse)
|
|
hooks.property.unregister(ug)
|
|
for k, v in ipairs(mouse.buttons) do
|
|
if v then
|
|
local lay = layout.get(c.screen)
|
|
if lay == "floating" or c.floating then
|
|
local x = mouse.x - dist_x
|
|
local y = mouse.y - dist_y
|
|
c:fullgeometry(client.snap(c, snap, x, y))
|
|
if layout.get(c.screen) ~= "floating" and not c.floating then
|
|
hooks.property.register(ug)
|
|
end
|
|
elseif lay ~= "magnifier" then
|
|
c.screen = capi.mouse.screen
|
|
if layout.get(c.screen) ~= "floating" then
|
|
local c_u_m = capi.mouse.client_under_pointer()
|
|
if c_u_m and not c_u_m.floating then
|
|
if c_u_m ~= c then
|
|
c:swap(c_u_m)
|
|
end
|
|
end
|
|
else
|
|
hooks.property.register(ug)
|
|
end
|
|
end
|
|
return true
|
|
end
|
|
end
|
|
return false
|
|
end, "fleur")
|
|
end
|
|
|
|
-- vim: filetype=lua:expandtab:shiftwidth=4:tabstop=8:softtabstop=4:encoding=utf-8:textwidth=80
|