hooks: split out of luaa

Signed-off-by: Julien Danjou <julien@danjou.info>
This commit is contained in:
Julien Danjou 2008-10-26 18:54:22 +01:00
parent fa090010a0
commit c8a461686a
3 changed files with 208 additions and 181 deletions

View File

@ -48,6 +48,7 @@ set(AWE_SRCS
${SOURCE_DIR}/keygrabber.c
${SOURCE_DIR}/layout.c
${SOURCE_DIR}/luaa.c
${SOURCE_DIR}/hooks.c
${SOURCE_DIR}/mouse.c
${SOURCE_DIR}/screen.c
${SOURCE_DIR}/stack.c

206
hooks.c Normal file
View File

@ -0,0 +1,206 @@
/*
* hooks.c - Lua hooks management
*
* 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 "structs.h"
extern awesome_t globalconf;
/** Set the function called each time a client gets focus. This function is
* called with the client object as argument.
* \param L The Lua VM state.
* \return The number of elements pushed on stack.
* \luastack
* \lparam A function to call each time a client gets focus.
*/
static int
luaA_hooks_focus(lua_State *L)
{
return luaA_registerfct(L, 1, &globalconf.hooks.focus);
}
/** Set the function called each time a client loses focus. This function is
* called with the client object as argument.
* \param L The Lua VM state.
* \return The number of elements pushed on stack.
* \luastack
* \lparam A function to call each time a client loses focus.
*/
static int
luaA_hooks_unfocus(lua_State *L)
{
return luaA_registerfct(L, 1, &globalconf.hooks.unfocus);
}
/** Set the function called each time a new client appears. This function is
* called with the client object as argument.
* \param L The Lua VM state.
* \return The number of elements pushed on stack.
* \luastack
* \lparam A function to call on each new client.
*/
static int
luaA_hooks_manage(lua_State *L)
{
return luaA_registerfct(L, 1, &globalconf.hooks.manage);
}
/** Set the function called each time a client goes away. This function is
* called with the client object as argument.
* \param L The Lua VM state.
* \return The number of elements pushed on stack.
* \luastack
* \lparam A function to call when a client goes away.
*/
static int
luaA_hooks_unmanage(lua_State *L)
{
return luaA_registerfct(L, 1, &globalconf.hooks.unmanage);
}
/** Set the function called each time the mouse enter a new window. This
* function is called with the client object as argument.
* \param L The Lua VM state.
* \return The number of elements pushed on stack.
* \luastack
* \lparam A function to call each time a client gets mouse over it.
*/
static int
luaA_hooks_mouse_enter(lua_State *L)
{
return luaA_registerfct(L, 1, &globalconf.hooks.mouse_enter);
}
/** Set the function called each time the mouse enter a new window. This
* function is called with the client object as argument. (DEPRECATED)
* \param L The Lua VM state.
* \return The number of elements pushed on stack.
* \luastack
* \lparam A function to call each time a client gets mouse over it.
*/
static int
luaA_hooks_mouse_over(lua_State *L)
{
deprecate();
return luaA_hooks_mouse_enter(L);
}
/** Set the function called on each client list change.
* This function is called without any argument.
* \param L The Lua VM state.
* \return The number of elements pushed on stack.
* \luastack
* \lparam A function to call on each client list change.
*/
static int
luaA_hooks_clients(lua_State *L)
{
return luaA_registerfct(L, 1, &globalconf.hooks.clients);
}
/** Set the function called on each screen tag list change.
* This function is called with a screen number as argument.
* \param L The Lua VM state.
* \return The number of elements pushed on stack.
* \luastack
* \lparam A function to call on each tag list change.
*/
static int
luaA_hooks_tags(lua_State *L)
{
return luaA_registerfct(L, 1, &globalconf.hooks.tags);
}
/** Set the function called on each client's tags change.
* This function is called with the client and the tag as argument.
* \param L The Lua VM state.
* \return The number of elements pushed on stack.
* \luastack
* \lparam A function to call on each client's tags change.
*/
static int
luaA_hooks_tagged(lua_State *L)
{
return luaA_registerfct(L, 1, &globalconf.hooks.tagged);
}
/** Set the function called on each screen arrange. This function is called
* with the screen number as argument.
* \param L The Lua VM state.
* \return The number of elements pushed on stack.
* \luastack
* \lparam A function to call on each screen arrange.
*/
static int
luaA_hooks_arrange(lua_State *L)
{
return luaA_registerfct(L, 1, &globalconf.hooks.arrange);
}
/** Set the function called on each client's property change.
* This function is called with the client object as argument and the
* property name.
* \param L The Lua VM state.
* \return The number of elements pushed on stack.
* \luastack
* \lparam A function to call on each client property update.
*/
static int
luaA_hooks_property(lua_State *L)
{
return luaA_registerfct(L, 1, &globalconf.hooks.property);
}
/** Set the function to be called every N seconds.
* \param L The Lua VM state.
* \return The number of elements pushed on stack.
* \luastack
* \lparam The number of seconds to run function every. Set 0 to disable.
* \lparam A function to call every N seconds (optional).
*/
static int
luaA_hooks_timer(lua_State *L)
{
globalconf.timer.repeat = luaL_checknumber(L, 1);
if(lua_gettop(L) == 2 && !lua_isnil(L, 2))
luaA_registerfct(L, 2, &globalconf.hooks.timer);
ev_timer_again(globalconf.loop, &globalconf.timer);
return 0;
}
const struct luaL_reg awesome_hooks_lib[] =
{
{ "focus", luaA_hooks_focus },
{ "unfocus", luaA_hooks_unfocus },
{ "manage", luaA_hooks_manage },
{ "unmanage", luaA_hooks_unmanage },
{ "mouse_enter", luaA_hooks_mouse_enter },
{ "property", luaA_hooks_property },
{ "arrange", luaA_hooks_arrange },
{ "clients", luaA_hooks_clients },
{ "tags", luaA_hooks_tags },
{ "tagged", luaA_hooks_tagged },
{ "timer", luaA_hooks_timer },
/* deprecated */
{ "mouse_over", luaA_hooks_mouse_over },
{ NULL, NULL }
};

182
luaa.c
View File

@ -54,6 +54,7 @@
extern awesome_t globalconf;
extern const struct luaL_reg awesome_hooks_lib[];
extern const struct luaL_reg awesome_keygrabber_lib[];
extern const struct luaL_reg awesome_button_methods[];
extern const struct luaL_reg awesome_button_meta[];
@ -139,170 +140,6 @@ luaA_restart(lua_State *L __attribute__ ((unused)))
return 0;
}
/** Set the function called each time a client gets focus. This function is
* called with the client object as argument.
* \param L The Lua VM state.
* \return The number of elements pushed on stack.
* \luastack
* \lparam A function to call each time a client gets focus.
*/
static int
luaA_hooks_focus(lua_State *L)
{
return luaA_registerfct(L, 1, &globalconf.hooks.focus);
}
/** Set the function called each time a client loses focus. This function is
* called with the client object as argument.
* \param L The Lua VM state.
* \return The number of elements pushed on stack.
* \luastack
* \lparam A function to call each time a client loses focus.
*/
static int
luaA_hooks_unfocus(lua_State *L)
{
return luaA_registerfct(L, 1, &globalconf.hooks.unfocus);
}
/** Set the function called each time a new client appears. This function is
* called with the client object as argument.
* \param L The Lua VM state.
* \return The number of elements pushed on stack.
* \luastack
* \lparam A function to call on each new client.
*/
static int
luaA_hooks_manage(lua_State *L)
{
return luaA_registerfct(L, 1, &globalconf.hooks.manage);
}
/** Set the function called each time a client goes away. This function is
* called with the client object as argument.
* \param L The Lua VM state.
* \return The number of elements pushed on stack.
* \luastack
* \lparam A function to call when a client goes away.
*/
static int
luaA_hooks_unmanage(lua_State *L)
{
return luaA_registerfct(L, 1, &globalconf.hooks.unmanage);
}
/** Set the function called each time the mouse enter a new window. This
* function is called with the client object as argument.
* \param L The Lua VM state.
* \return The number of elements pushed on stack.
* \luastack
* \lparam A function to call each time a client gets mouse over it.
*/
static int
luaA_hooks_mouse_enter(lua_State *L)
{
return luaA_registerfct(L, 1, &globalconf.hooks.mouse_enter);
}
/** Set the function called each time the mouse enter a new window. This
* function is called with the client object as argument. (DEPRECATED)
* \param L The Lua VM state.
* \return The number of elements pushed on stack.
* \luastack
* \lparam A function to call each time a client gets mouse over it.
*/
static int
luaA_hooks_mouse_over(lua_State *L)
{
deprecate();
return luaA_hooks_mouse_enter(L);
}
/** Set the function called on each client list change.
* This function is called without any argument.
* \param L The Lua VM state.
* \return The number of elements pushed on stack.
* \luastack
* \lparam A function to call on each client list change.
*/
static int
luaA_hooks_clients(lua_State *L)
{
return luaA_registerfct(L, 1, &globalconf.hooks.clients);
}
/** Set the function called on each screen tag list change.
* This function is called with a screen number as argument.
* \param L The Lua VM state.
* \return The number of elements pushed on stack.
* \luastack
* \lparam A function to call on each tag list change.
*/
static int
luaA_hooks_tags(lua_State *L)
{
return luaA_registerfct(L, 1, &globalconf.hooks.tags);
}
/** Set the function called on each client's tags change.
* This function is called with the client and the tag as argument.
* \param L The Lua VM state.
* \return The number of elements pushed on stack.
* \luastack
* \lparam A function to call on each client's tags change.
*/
static int
luaA_hooks_tagged(lua_State *L)
{
return luaA_registerfct(L, 1, &globalconf.hooks.tagged);
}
/** Set the function called on each screen arrange. This function is called
* with the screen number as argument.
* \param L The Lua VM state.
* \return The number of elements pushed on stack.
* \luastack
* \lparam A function to call on each screen arrange.
*/
static int
luaA_hooks_arrange(lua_State *L)
{
return luaA_registerfct(L, 1, &globalconf.hooks.arrange);
}
/** Set the function called on each client's property change.
* This function is called with the client object as argument and the
* property name.
* \param L The Lua VM state.
* \return The number of elements pushed on stack.
* \luastack
* \lparam A function to call on each client property update.
*/
static int
luaA_hooks_property(lua_State *L)
{
return luaA_registerfct(L, 1, &globalconf.hooks.property);
}
/** Set the function to be called every N seconds.
* \param L The Lua VM state.
* \return The number of elements pushed on stack.
* \luastack
* \lparam The number of seconds to run function every. Set 0 to disable.
* \lparam A function to call every N seconds (optional).
*/
static int
luaA_hooks_timer(lua_State *L)
{
globalconf.timer.repeat = luaL_checknumber(L, 1);
if(lua_gettop(L) == 2 && !lua_isnil(L, 2))
luaA_registerfct(L, 2, &globalconf.hooks.timer);
ev_timer_again(globalconf.loop, &globalconf.timer);
return 0;
}
/** Set or get default font. (DEPRECATED)
* \param L The Lua VM state.
* \return The number of elements pushed on stack.
@ -853,23 +690,6 @@ luaA_init(void)
{ "conffile", luaA_conffile },
{ NULL, NULL }
};
static const struct luaL_reg awesome_hooks_lib[] =
{
{ "focus", luaA_hooks_focus },
{ "unfocus", luaA_hooks_unfocus },
{ "manage", luaA_hooks_manage },
{ "unmanage", luaA_hooks_unmanage },
{ "mouse_enter", luaA_hooks_mouse_enter },
{ "property", luaA_hooks_property },
{ "arrange", luaA_hooks_arrange },
{ "clients", luaA_hooks_clients },
{ "tags", luaA_hooks_tags },
{ "tagged", luaA_hooks_tagged },
{ "timer", luaA_hooks_timer },
/* deprecated */
{ "mouse_over", luaA_hooks_mouse_over },
{ NULL, NULL }
};
L = globalconf.L = luaL_newstate();