Fix bug of GC in fd and timeout objects for lua binding.
[project/libubox.git] / lua / uloop.c
index df57b8a..4abc4c3 100644 (file)
@@ -77,10 +77,17 @@ static int ul_timer_set(lua_State *L)
 static int ul_timer_free(lua_State *L)
 {
        struct lua_uloop_timeout *tout = lua_touserdata(L, 1);
-
+       
        uloop_timeout_cancel(&tout->t);
+       
+       /* obj.__index.__gc = nil , make sure executing only once*/
+       lua_getfield(L, -1, "__index");
+       lua_pushstring(L, "__gc");
+       lua_pushnil(L);
+       lua_settable(L, -3);
+
        lua_getglobal(state, "__uloop_cb");
-       luaL_unref(L, -1, tout->r);
+       luaL_unref(state, -1, tout->r);
 
        return 1;
 }
@@ -150,7 +157,6 @@ static void ul_ufd_cb(struct uloop_fd *fd, unsigned int events)
 
        /* push events */
        lua_pushinteger(state, events);
-
        lua_call(state, 2, 0);
 }
 
@@ -175,12 +181,22 @@ static int get_sock_fd(lua_State* L, int idx) {
 static int ul_ufd_delete(lua_State *L)
 {
        struct lua_uloop_fd *ufd = lua_touserdata(L, 1);
-
+       
        uloop_fd_delete(&ufd->fd);
+
+       /* obj.__index.__gc = nil , make sure executing only once*/
+       lua_getfield(L, -1, "__index");
+       lua_pushstring(L, "__gc");
+       lua_pushnil(L);
+       lua_settable(L, -3);
+
        lua_getglobal(state, "__uloop_cb");
-       luaL_unref(L, -1, ufd->r);
+       luaL_unref(state, -1, ufd->r);
+       lua_remove(state, -1);
+
        lua_getglobal(state, "__uloop_fds");
-       luaL_unref(L, -1, ufd->fd_r);
+       luaL_unref(state, -1, ufd->fd_r);
+       lua_remove(state, -1);
 
        return 1;
 }
@@ -341,12 +357,19 @@ static int ul_run(lua_State *L)
        return 1;
 }
 
+static int ul_end(lua_State *L)
+{
+       uloop_end();
+       return 1;
+}
+
 static luaL_reg uloop_func[] = {
        {"init", ul_init},
        {"run", ul_run},
        {"timer", ul_timer},
        {"process", ul_process},
        {"fd_add", ul_ufd_add},
+       {"end", ul_end},
        {NULL, NULL},
 };