summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorRichard W.M. Jones <rjones@redhat.com>2012-11-20 17:34:23 +0000
committerRichard W.M. Jones <rjones@redhat.com>2012-11-20 17:34:23 +0000
commit0ff561f3324df2841c90e65fb994294d2ddcfca0 (patch)
tree1f462d1d71c01952124b32ab2707541f9ed3d4ff
parent1f984509952865632f434b4349f679a2e4a42935 (diff)
downloadlibguestfs-0ff561f3324df2841c90e65fb994294d2ddcfca0.tar.gz
libguestfs-0ff561f3324df2841c90e65fb994294d2ddcfca0.tar.xz
libguestfs-0ff561f3324df2841c90e65fb994294d2ddcfca0.zip
lua: Replace internal lua_guestfs_* functions with guestfs_lua_*.
This is just code motion. It just ensures there is no possible conflict with lua_* symbols.
-rw-r--r--generator/lua.ml38
1 files changed, 19 insertions, 19 deletions
diff --git a/generator/lua.ml b/generator/lua.ml
index c7ee925a..88748ae1 100644
--- a/generator/lua.ml
+++ b/generator/lua.ml
@@ -50,11 +50,11 @@ let generate_lua_c () =
#include <guestfs.h>
-#define LUA_GUESTFS_HANDLE \"guestfs handle\"
+#define GUESTFS_LUA_HANDLE \"guestfs handle\"
/* This struct is managed on the Lua heap. If the GC collects it,
* the Lua '__gc' function is called which ends up calling
- * lua_guestfs_finalizer.
+ * guestfs_lua_finalizer.
*
* There is also an entry in the Lua registry, indexed by 'g'
* (allocated on demand) which stores per-handle Lua data. See
@@ -121,7 +121,7 @@ static void push_event (lua_State *L, uint64_t event);
/* Create a new connection. */
static int
-lua_guestfs_create (lua_State *L)
+guestfs_lua_create (lua_State *L)
{
guestfs_h *g;
struct userdata *u;
@@ -148,7 +148,7 @@ lua_guestfs_create (lua_State *L)
guestfs_set_error_handler (g, NULL, NULL);
u = lua_newuserdata (L, sizeof (struct userdata));
- luaL_getmetatable (L, LUA_GUESTFS_HANDLE);
+ luaL_getmetatable (L, GUESTFS_LUA_HANDLE);
assert (lua_type (L, -1) == LUA_TTABLE);
lua_setmetatable (L, -2);
@@ -167,7 +167,7 @@ close_handle (lua_State *L, guestfs_h *g)
/* Finalizer. */
static int
-lua_guestfs_finalizer (lua_State *L)
+guestfs_lua_finalizer (lua_State *L)
{
struct userdata *u = get_handle (L, 1);
struct event_state *es, *es_next;
@@ -187,7 +187,7 @@ lua_guestfs_finalizer (lua_State *L)
/* Explicit close. */
static int
-lua_guestfs_close (lua_State *L)
+guestfs_lua_close (lua_State *L)
{
struct userdata *u = get_handle (L, 1);
@@ -284,7 +284,7 @@ free_per_handle_table (lua_State *L, guestfs_h *g)
/* User cancel. */
static int
-lua_guestfs_user_cancel (lua_State *L)
+guestfs_lua_user_cancel (lua_State *L)
{
struct userdata *u = get_handle (L, 1);
@@ -296,7 +296,7 @@ lua_guestfs_user_cancel (lua_State *L)
/* Set an event callback. */
static int
-lua_guestfs_set_event_callback (lua_State *L)
+guestfs_lua_set_event_callback (lua_State *L)
{
struct userdata *u = get_handle (L, 1);
guestfs_h *g = u->g;
@@ -401,7 +401,7 @@ event_callback_wrapper (guestfs_h *g,
/* Delete an event callback. */
static int
-lua_guestfs_delete_event_callback (lua_State *L)
+guestfs_lua_delete_event_callback (lua_State *L)
{
struct userdata *u = get_handle (L, 1);
guestfs_h *g = u->g;
@@ -425,7 +425,7 @@ lua_guestfs_delete_event_callback (lua_State *L)
fun { name = name; style = (ret, args, optargs as style);
c_function = c_function; c_optarg_prefix = c_optarg_prefix } ->
pr "static int\n";
- pr "lua_guestfs_%s (lua_State *L)\n" name;
+ pr "guestfs_lua_%s (lua_State *L)\n" name;
pr "{\n";
(match ret with
@@ -616,7 +616,7 @@ get_handle (lua_State *L, int index)
{
struct userdata *u;
- u = luaL_checkudata (L, index, LUA_GUESTFS_HANDLE);
+ u = luaL_checkudata (L, index, GUESTFS_LUA_HANDLE);
return u;
}
@@ -852,27 +852,27 @@ push_event (lua_State *L, uint64_t event)
* See: http://article.gmane.org/gmane.comp.lang.lua.general/95065
*/
static luaL_Reg metamethods[] = {
- { \"__gc\", lua_guestfs_finalizer },
+ { \"__gc\", guestfs_lua_finalizer },
{ NULL, NULL }
};
/* Module functions. */
static luaL_Reg functions[] = {
- { \"create\", lua_guestfs_create },
+ { \"create\", guestfs_lua_create },
{ NULL, NULL }
};
/* Methods. */
static luaL_Reg methods[] = {
- { \"close\", lua_guestfs_close },
- { \"user_cancel\", lua_guestfs_user_cancel },
- { \"set_event_callback\", lua_guestfs_set_event_callback },
- { \"delete_event_callback\", lua_guestfs_delete_event_callback },
+ { \"close\", guestfs_lua_close },
+ { \"user_cancel\", guestfs_lua_user_cancel },
+ { \"set_event_callback\", guestfs_lua_set_event_callback },
+ { \"delete_event_callback\", guestfs_lua_delete_event_callback },
";
List.iter (
- fun { name = name } -> pr " { \"%s\", lua_guestfs_%s },\n" name name
+ fun { name = name } -> pr " { \"%s\", guestfs_lua_%s },\n" name name
) all_functions_sorted;
pr "\
@@ -903,7 +903,7 @@ luaopen_guestfs (lua_State *L)
char v[256];
/* Create metatable. */
- luaL_newmetatable (L, LUA_GUESTFS_HANDLE);
+ luaL_newmetatable (L, GUESTFS_LUA_HANDLE);
luaL_register (L, NULL, metamethods);
/* Create methods table. */