You cannot select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
46 lines
1.0 KiB
C
46 lines
1.0 KiB
C
|
|
#include <lighttpd/actions_lua.h>
|
|
|
|
#include <lualib.h>
|
|
#include <lauxlib.h>
|
|
|
|
#define LUA_ACTION "action*"
|
|
|
|
liAction* lua_get_action(lua_State *L, int ndx) {
|
|
if (!lua_isuserdata(L, ndx)) return NULL;
|
|
if (!lua_getmetatable(L, ndx)) return NULL;
|
|
luaL_getmetatable(L, LUA_ACTION);
|
|
if (lua_isnil(L, -1) || lua_isnil(L, -2) || !lua_equal(L, -1, -2)) {
|
|
lua_pop(L, 2);
|
|
return NULL;
|
|
}
|
|
lua_pop(L, 2);
|
|
return *(liAction**) lua_touserdata(L, ndx);
|
|
}
|
|
|
|
static int lua_action_gc(lua_State *L) {
|
|
liServer *srv;
|
|
liAction **a = (liAction**) luaL_checkudata(L, 1, LUA_ACTION);
|
|
if (!a || !*a) return 0;
|
|
|
|
srv = (liServer*) lua_touserdata(L, lua_upvalueindex(1));
|
|
li_action_release(srv, *a);
|
|
return 0;
|
|
}
|
|
|
|
int lua_push_action(liServer *srv, lua_State *L, liAction *a) {
|
|
liAction **pa;
|
|
|
|
pa = (liAction**) lua_newuserdata(L, sizeof(liAction*));
|
|
*pa = a;
|
|
|
|
if (luaL_newmetatable(L, LUA_ACTION)) {
|
|
lua_pushlightuserdata(L, srv);
|
|
lua_pushcclosure(L, lua_action_gc, 1);
|
|
lua_setfield(L, -2, "__gc");
|
|
}
|
|
|
|
lua_setmetatable(L, -2);
|
|
return 1;
|
|
}
|