/*

* mousegrabber.c - mouse pointer grabbing

*

* Copyright © 2008 Julien Danjou <julien@danjou.info>

*

* This program is free software; you can redistribute it and/or modify

* it under the terms of the GNU General Public License as published by

* the Free Software Foundation; either version 2 of the License, or

* (at your option) any later version.

*

* This program is distributed in the hope that it will be useful,

* but WITHOUT ANY WARRANTY; without even the implied warranty of

* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the

* GNU General Public License for more details.

*

* You should have received a copy of the GNU General Public License along

* with this program; if not, write to the Free Software Foundation, Inc.,

* 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.

*

*/

#include <unistd.h>

#include "mouse.h"

#include "mousegrabber.h"

#include "common/xcursor.h"

extern awesome_t globalconf;

/** Grab the mouse.

* \param cursor The cursor to use while grabbing.

* \return True if mouse was grabbed.

*/

static bool

mousegrabber_grab(xcb_cursor_t cursor)

{

xcb_window_t root;

for(int screen = 0;

screen < xcb_setup_roots_length(xcb_get_setup(globalconf.connection));

screen++)

{

int16_t x, y;

uint16_t mask;

root = xutil_screen_get(globalconf.connection, screen)->root;

if(mouse_query_pointer(root, &x, &y, NULL, &mask))

break;

}

for(int i = 1000; i; i--)

{

xcb_grab_pointer_reply_t *grab_ptr_r;

xcb_grab_pointer_cookie_t grab_ptr_c =

xcb_grab_pointer_unchecked(globalconf.connection, false, root,

XCB_EVENT_MASK_BUTTON_PRESS

| XCB_EVENT_MASK_BUTTON_RELEASE

| XCB_EVENT_MASK_POINTER_MOTION,

XCB_GRAB_MODE_ASYNC,

XCB_GRAB_MODE_ASYNC,

root, cursor, XCB_CURRENT_TIME);

if((grab_ptr_r = xcb_grab_pointer_reply(globalconf.connection, grab_ptr_c, NULL)))

{

p_delete(&grab_ptr_r);

return true;

}

usleep(1000);

}

return false;

}

/** Handle mouse motion events.

* \param L Lua stack to push the pointer motion.

* \param ev Received mouse motion event.

*/

void

mousegrabber_handleevent(lua_State *L, int x, int y, uint16_t mask)

{

luaA_mouse_pushstatus(L, x, y, mask);

}

/** Grab the mouse pointer and list motions, calling callback function at each

* motion. The callback function must return a boolean value: true to

* continue grabbing, false to stop.

* The function is called with one argument:

* a table containing modifiers pointer coordinates.

*

* \param L The Lua VM state.

* \return The number of elements pushed on stack.

*

* \luastack

*

* \lparam A callback function as described above.

*/

static int

luaA_mousegrabber_run(lua_State *L)

{

if(globalconf.mousegrabber != LUA_REFNIL)

luaL_error(L, "mousegrabber already running");

uint16_t cfont = xcursor_font_fromstr(luaL_checkstring(L, 2));

if(cfont)

{

xcb_cursor_t cursor = xcursor_new(globalconf.connection, cfont);

luaA_registerfct(L, 1, &globalconf.mousegrabber);

if(!mousegrabber_grab(cursor))

{

luaA_unregister(L, &globalconf.mousegrabber);

luaL_error(L, "unable to grab mouse pointer");

}

}

else

luaA_warn(L, "invalid cursor");

return 0;

}

/** Stop grabbing the mouse pointer.

* \param L The Lua VM state.

* \return The number of elements pushed on stack.

*/

int

luaA_mousegrabber_stop(lua_State *L)

{

xcb_ungrab_pointer(globalconf.connection, XCB_CURRENT_TIME);

luaA_unregister(L, &globalconf.mousegrabber);

return 0;

}

const struct luaL_reg awesome_mousegrabber_lib[] =

{

{ "run", luaA_mousegrabber_run },

{ "stop", luaA_mousegrabber_stop },

{ NULL, NULL }

};