LUA: store p_intf->p_sys separately

diff --git a/modules/misc/lua/intf.c b/modules/misc/lua/intf.c
index 2687e54516e4386bb71c6915bd0749c86f240cbc..1ceca46551fe0b26f09401a491ec5dca279b9c3f 100644 (file)
--- a/modules/misc/lua/intf.c
+++ b/modules/misc/lua/intf.c
@@ -171,6 +171,7 @@ int Open_LuaIntf( vlc_object_t *p_this )
     }
 
     vlclua_set_this( L, p_intf );
+    vlclua_set_intf( L, p_sys );
 
     luaL_openlibs( L );
 

diff --git a/modules/misc/lua/libs/misc.c b/modules/misc/lua/libs/misc.c
index 3b1fbae65aa95697750d40189319385f05f37635..54bac3d2cec4902e06eebbf108ae1647a2b59896 100644 (file)
--- a/modules/misc/lua/libs/misc.c
+++ b/modules/misc/lua/libs/misc.c
@@ -47,24 +47,44 @@
 #include "../vlc.h"
 #include "../libs.h"
 
-#undef vlclua_set_this
 /*****************************************************************************
  * Internal lua<->vlc utils
  *****************************************************************************/
-void vlclua_set_this( lua_State *L, vlc_object_t *p_this )
+static void vlclua_set_object( lua_State *L, void *id, void *value )
 {
-    lua_pushlightuserdata( L, vlclua_set_this );
-    lua_pushlightuserdata( L, p_this );
+    lua_pushlightuserdata( L, id );
+    lua_pushlightuserdata( L, value );
     lua_rawset( L, LUA_REGISTRYINDEX );
 }
 
-vlc_object_t * vlclua_get_this( lua_State *L )
+static void *vlclua_get_object( lua_State *L, void *id )
 {
-    lua_pushlightuserdata( L, vlclua_set_this );
+    lua_pushlightuserdata( L, id );
     lua_rawget( L, LUA_REGISTRYINDEX );
-    vlc_object_t *p_this = (vlc_object_t*)lua_topointer( L, -1 );
+    const void *p = lua_topointer( L, -1 );
     lua_pop( L, 1 );
-    return p_this;
+    return (void *)p;
+}
+
+#undef vlclua_set_this
+void vlclua_set_this( lua_State *L, vlc_object_t *p_this )
+{
+    vlclua_set_object( L, vlclua_set_this, p_this );
+}
+
+vlc_object_t * vlclua_get_this( lua_State *L )
+{
+    return vlclua_get_object( L, vlclua_set_this );
+}
+
+void vlclua_set_intf( lua_State *L, intf_sys_t *p_intf )
+{
+    vlclua_set_object( L, vlclua_set_intf, p_intf );
+}
+
+static intf_sys_t * vlclua_get_intf( lua_State *L )
+{
+    return vlclua_get_object( L, vlclua_set_intf );
 }
 
 /*****************************************************************************

diff --git a/modules/misc/lua/vlc.h b/modules/misc/lua/vlc.h
index 0669c2db0dc52bc31fb1820b850e9abd4ba1c33e..71dfcc78114fb0d9f7d188f61b83def3c6e45e31 100644 (file)
--- a/modules/misc/lua/vlc.h
+++ b/modules/misc/lua/vlc.h
@@ -95,6 +95,9 @@ void vlclua_set_this( lua_State *, vlc_object_t * );
 #define vlclua_set_this(a, b) vlclua_set_this(a, VLC_OBJECT(b))
 vlc_object_t * vlclua_get_this( lua_State * );
 
+struct intf_sys_t;
+void vlclua_set_intf( lua_State *, struct intf_sys_t * );
+
 /*****************************************************************************
  * Lua function bridge
  *****************************************************************************/