Wireshark-dev: [Wireshark-dev] [patch] Lua plugin fixes
From: Bálint Réczey (IJ/ETH) <balint.reczey@xxxxxxxxxxxx>
Date: Tue, 27 Jun 2006 18:24:31 +0200
Hi, I made some improvements to the Lua plugin: - Makefile.am fix: elua_register.h generation + checking serialized - ProtoField.new(..) parameter parsing fix and changes - enabling gui_enabled() function in Lua (typo fix, thanks to Tamas Regos) Regards, Balint
Index: plugins/lua/elua_proto.c
===================================================================
--- plugins/lua/elua_proto.c (revision 18583)
+++ plugins/lua/elua_proto.c (working copy)
@@ -287,7 +287,6 @@
{NULL,FT_NONE}
};
-#if 0
static enum ftenum get_ftenum(const gchar* type) {
const eth_ft_types_t* ts;
for (ts = ftenums; ts->str; ts++) {
@@ -298,7 +297,6 @@
return FT_NONE;
}
-#endif
static const gchar* ftenum_to_string(enum ftenum ft) {
const eth_ft_types_t* ts;
@@ -335,7 +333,6 @@
return NULL;
}
-#if 0
static base_display_e string_to_base(const gchar* str) {
const struct base_display_string_t* b;
for (b=base_displays;b->str;b++) {
@@ -344,7 +341,6 @@
}
return BASE_NONE;
}
-#endif
static value_string* value_string_from_table(lua_State* L, int idx) {
GArray* vs = g_array_new(TRUE,TRUE,sizeof(value_string));
@@ -397,10 +393,10 @@
#define ELUA_ARG_ProtoField_new_NAME 1 /* Actual name of the field (the string that appears in the tree). */
#define ELUA_ARG_ProtoField_new_ABBR 2 /* Filter name of the field (the string that is used in filters). */
#define ELUA_ARG_ProtoField_new_TYPE 3 /* Field Type (FT_*). */
-#define ELUA_OPTARG_ProtoField_new_VALUESTRING 3 /* a ValueString object. */
-#define ELUA_OPTARG_ProtoField_new_BASE 4 /* The representation BASE_*. */
-#define ELUA_OPTARG_ProtoField_new_MASK 5 /* the bitmask to be used. */
-#define ELUA_OPTARG_ProtoField_new_DESCR 6 /* The description of the field. */
+#define ELUA_OPTARG_ProtoField_new_VALUESTRING 4 /* a ValueString object. */
+#define ELUA_OPTARG_ProtoField_new_BASE 5 /* The representation BASE_*. */
+#define ELUA_OPTARG_ProtoField_new_MASK 6 /* the bitmask to be used. */
+#define ELUA_OPTARG_ProtoField_new_DESCR 7 /* The description of the field. */
ProtoField f = g_malloc(sizeof(eth_field_t));
value_string* vs;
@@ -410,7 +406,7 @@
f->ett = -1;
f->name = g_strdup(luaL_checkstring(L,ELUA_ARG_ProtoField_new_NAME));
f->abbr = g_strdup(luaL_checkstring(L,ELUA_ARG_ProtoField_new_ABBR));
- f->type = luaL_checkint(L,ELUA_ARG_ProtoField_new_TYPE);
+ f->type = get_ftenum(luaL_checkstring(L,ELUA_ARG_ProtoField_new_TYPE));
/*XXX do it better*/
if (f->type == FT_NONE) {
@@ -418,8 +414,8 @@
return 0;
}
- if (! lua_isnil(L,4) ) {
- vs = value_string_from_table(L,4);
+ if (! lua_isnil(L,ELUA_OPTARG_ProtoField_new_VALUESTRING) ) {
+ vs = value_string_from_table(L,ELUA_OPTARG_ProtoField_new_VALUESTRING);
if (vs) {
f->vs = vs;
@@ -434,7 +430,7 @@
}
/* XXX: need BASE_ERROR */
- f->base = luaL_optint(L, ELUA_OPTARG_ProtoField_new_BASE, BASE_NONE);
+ f->base = string_to_base(luaL_optstring(L, ELUA_OPTARG_ProtoField_new_BASE, "BASE_NONE"));
f->mask = luaL_optint(L, ELUA_OPTARG_ProtoField_new_MASK, 0x0);
f->blob = g_strdup(luaL_optstring(L,ELUA_OPTARG_ProtoField_new_DESCR,""));
Index: plugins/lua/Makefile.am
===================================================================
--- plugins/lua/Makefile.am (revision 18583)
+++ plugins/lua/Makefile.am (working copy)
@@ -78,7 +78,7 @@
# do not do not unnecessarilly modify the old file in order avoid recompiling every module every time
elua_register.h: elua_makereg.pl $(lua_modules)
- $(PERL) elua_makereg.pl $(lua_modules) > elua_register.h.new
+ $(PERL) elua_makereg.pl $(lua_modules) > elua_register.h.new ;\
if diff elua_register.h.new elua_register.h >/dev/null; then rm elua_register.h.new; else mv elua_register.h.new elua_register.h; fi
doc: $(lua_modules)
Index: plugins/lua/elua_gui.c
===================================================================
--- plugins/lua/elua_gui.c (revision 18583)
+++ plugins/lua/elua_gui.c (working copy)
@@ -40,7 +40,7 @@
return 0;
}
-ELUA_FUNCTION lua_gui_enabled(lua_State* L) { /* Checks whether the GUI facility is enabled. */
+ELUA_FUNCTION elua_gui_enabled(lua_State* L) { /* Checks whether the GUI facility is enabled. */
lua_pushboolean(L,GPOINTER_TO_INT(ops));
ELUA_RETURN(1); /* A boolean: true if it is enabled, false if it isn't. */
}
- Follow-Ups:
- Re: [Wireshark-dev] [patch] Lua plugin fixes
- From: IJ/ETH
- Re: [Wireshark-dev] [patch] Lua plugin fixes
- From: LEGO
- Re: [Wireshark-dev] [patch] Lua plugin fixes
- Prev by Date: Re: [Wireshark-dev] SSL + DTLS
- Next by Date: Re: [Wireshark-dev] GSM A interface bug fix
- Previous by thread: [Wireshark-dev] Bug 976
- Next by thread: Re: [Wireshark-dev] [patch] Lua plugin fixes
- Index(es):