4 * $Id: plugins.c,v 1.42 2001/11/26 05:41:13 hagbard Exp $
6 * Ethereal - Network traffic analyzer
7 * By Gerald Combs <gerald@ethereal.com>
8 * Copyright 1999 Gerald Combs
10 * This program is free software; you can redistribute it and/or
11 * modify it under the terms of the GNU General Public License
12 * as published by the Free Software Foundation; either version 2
13 * of the License, or (at your option) any later version.
15 * This program is distributed in the hope that it will be useful,
16 * but WITHOUT ANY WARRANTY; without even the implied warranty of
17 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
18 * GNU General Public License for more details.
20 * You should have received a copy of the GNU General Public License
21 * along with this program; if not, write to the Free Software
22 * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
47 #ifdef HAVE_SYS_STAT_H
51 #ifdef HAVE_SYS_TYPES_H
52 #include <sys/types.h>
59 #include "filesystem.h"
63 #ifdef PLUGINS_NEED_ADDRESS_TABLE
64 #include "conversation.h"
65 #include "packet-giop.h"
66 #include "plugins/plugin_table.h"
67 static plugin_address_table_t patable;
70 /* linked list of all plugins */
74 static gchar std_plug_dir[] = "/usr/lib/ethereal/plugins/" VERSION;
75 static gchar local_plug_dir[] = "/usr/local/lib/ethereal/plugins/" VERSION;
77 static gchar *user_plug_dir = NULL;
79 #define PLUGINS_DIR_NAME "plugins"
82 * add a new plugin to the list
85 * - ENOMEM : memory allocation problem
86 * - EEXIST : the same plugin (i.e. name/version) was already registered.
89 add_plugin(void *handle, gchar *name, gchar *version,
90 void (*reg_handoff)(void))
92 plugin *new_plug, *pt_plug;
94 pt_plug = plugin_list;
95 if (!pt_plug) /* the list is empty */
97 new_plug = (plugin *)g_malloc(sizeof(plugin));
98 if (new_plug == NULL) return ENOMEM;
99 plugin_list = new_plug;
105 /* check if the same name/version is already registered */
106 if (!strcmp(pt_plug->name, name) &&
107 !strcmp(pt_plug->version, version))
112 /* we found the last plugin in the list */
113 if (pt_plug->next == NULL) break;
115 pt_plug = pt_plug->next;
117 new_plug = (plugin *)g_malloc(sizeof(plugin));
118 if (new_plug == NULL) return ENOMEM;
119 pt_plug->next = new_plug;
122 new_plug->handle = handle;
123 new_plug->name = name;
124 new_plug->version = version;
125 new_plug->reg_handoff = reg_handoff;
126 new_plug->next = NULL;
131 * XXX - when we remove support for old-style plugins (which we should
132 * probably do eventually, as all plugins should be written as new-style
133 * ones), we may want to have "init_plugins()" merely save a pointer
134 * to the plugin's "init" routine, just as we save a pointer to its
135 * "reg_handoff" routine, and have a "register_all_plugins()" routine
136 * to go through the list of plugins and call all of them.
138 * Then we'd have "epan_init()", or perhaps even something higher up
139 * in the call tree, call "init_plugins()", and have "proto_init()"
140 * call "register_all_plugins()" right after calling "register_all_protocols()";
141 * this might be a bit cleaner.
144 plugins_scan_dir(const char *dirname)
146 #define FILENAME_LEN 1024
147 gchar *hack_path; /* pathname used to construct lt_lib_ext */
148 gchar *lt_lib_ext; /* extension for loadable modules */
149 DIR *dir; /* scanned directory */
150 struct dirent *file; /* current file */
151 gchar filename[FILENAME_LEN]; /* current file name */
152 GModule *handle; /* handle returned by dlopen */
155 void (*init)(void *);
156 void (*reg_handoff)(void);
161 * We find the extension used on this platform for loadable modules
162 * by the sneaky hack of calling "g_module_build_path" to build
163 * the pathname for a module with an empty directory name and
164 * empty module name, and then search for the last "." and use
165 * everything from the last "." on.
167 * GLib 2.0 will probably define G_MODULE_SUFFIX as the extension
168 * to use, but that's not checked into the GLib CVS tree yet,
169 * and we can't use it on systems that don't have GLib 2.0.
171 hack_path = g_module_build_path("", "");
172 lt_lib_ext = strrchr(hack_path, '.');
173 if (lt_lib_ext == NULL)
176 * Does this mean there *is* no extension? Assume so.
178 * XXX - the code below assumes that all loadable modules have
184 if ((dir = opendir(dirname)) != NULL)
186 while ((file = readdir(dir)) != NULL)
188 /* don't try to open "." and ".." */
189 if (!(strcmp(file->d_name, "..") &&
190 strcmp(file->d_name, "."))) continue;
192 /* skip anything but files with lt_lib_ext */
193 dot = strrchr(file->d_name, '.');
194 if (dot == NULL || strcmp(dot, lt_lib_ext) != 0) continue;
196 snprintf(filename, FILENAME_LEN, "%s" G_DIR_SEPARATOR_S "%s",
197 dirname, file->d_name);
198 if ((handle = g_module_open(filename, 0)) == NULL) continue;
199 name = (gchar *)file->d_name;
200 if (g_module_symbol(handle, "version", (gpointer*)&version) == FALSE)
202 g_warning("The plugin %s has no version symbol", name);
203 g_module_close(handle);
208 * Old-style dissectors don't have a "plugin_reg_handoff()"
209 * routine; we no longer support them.
211 * New-style dissectors have one, because, otherwise, there's
212 * no way for them to arrange that they ever be called.
214 if (g_module_symbol(handle, "plugin_reg_handoff",
215 (gpointer*)®_handoff))
218 * We require it to have a "plugin_init()" routine.
220 if (!g_module_symbol(handle, "plugin_init", (gpointer*)&init))
222 g_warning("The plugin %s has a plugin_reg_handoff symbol but no plugin_init routine", name);
223 g_module_close(handle);
228 * We have a "plugin_reg_handoff()" routine, so we don't
229 * need the protocol, filter string, or dissector pointer.
231 if ((cr = add_plugin(handle, g_strdup(file->d_name), version,
235 fprintf(stderr, "The plugin %s, version %s\n"
236 "was found in multiple directories\n", name, version);
238 fprintf(stderr, "Memory allocation problem\n"
239 "when processing plugin %s, version %s\n",
241 g_module_close(handle);
246 * Call its init routine.
248 #ifdef PLUGINS_NEED_ADDRESS_TABLE
257 * This is an old-style dissector; warn that it won't
258 * be used, as those aren't supported.
261 "The plugin %s, version %s is an old-style plugin;\n"
262 "Those are no longer supported.\n", name, version);
274 init_plugins(const char *plugin_dir)
277 const char *datafile_dir;
278 char *install_plugin_dir;
280 struct stat std_dir_stat, local_dir_stat, plugin_dir_stat;
283 if (plugin_list == NULL) /* ensure init_plugins is only run once */
285 #ifdef PLUGINS_NEED_ADDRESS_TABLE
286 /* Intialize address table */
287 patable.p_check_col = check_col;
288 patable.p_col_clear = col_clear;
289 patable.p_col_add_fstr = col_add_fstr;
290 patable.p_col_append_fstr = col_append_fstr;
291 patable.p_col_add_str = col_add_str;
292 patable.p_col_append_str = col_append_str;
293 patable.p_col_set_str = col_set_str;
295 patable.p_register_init_routine = register_init_routine;
296 patable.p_conv_dissector_add = conv_dissector_add;
297 patable.p_conversation_new = conversation_new;
298 patable.p_find_conversation = find_conversation;
299 patable.p_match_strval = match_strval;
300 patable.p_val_to_str = val_to_str;
302 patable.p_proto_register_protocol = proto_register_protocol;
303 patable.p_proto_register_field_array = proto_register_field_array;
304 patable.p_proto_register_subtree_array = proto_register_subtree_array;
306 patable.p_dissector_add = dissector_add;
307 patable.p_dissector_delete = dissector_delete;
309 patable.p_heur_dissector_add = heur_dissector_add;
311 patable.p_register_dissector = register_dissector;
312 patable.p_find_dissector = find_dissector;
313 patable.p_call_dissector = call_dissector;
315 patable.p_proto_is_protocol_enabled = proto_is_protocol_enabled;
317 patable.p_proto_item_get_len = proto_item_get_len;
318 patable.p_proto_item_set_len = proto_item_set_len;
319 patable.p_proto_item_set_text = proto_item_set_text;
320 patable.p_proto_item_append_text = proto_item_append_text;
321 patable.p_proto_item_add_subtree = proto_item_add_subtree;
322 patable.p_proto_tree_add_item = proto_tree_add_item;
323 patable.p_proto_tree_add_item_hidden = proto_tree_add_item_hidden;
324 patable.p_proto_tree_add_protocol_format = proto_tree_add_protocol_format;
325 patable.p_proto_tree_add_bytes = proto_tree_add_bytes;
326 patable.p_proto_tree_add_bytes_hidden = proto_tree_add_bytes_hidden;
327 patable.p_proto_tree_add_bytes_format = proto_tree_add_bytes_format;
328 patable.p_proto_tree_add_time = proto_tree_add_time;
329 patable.p_proto_tree_add_time_hidden = proto_tree_add_time_hidden;
330 patable.p_proto_tree_add_time_format = proto_tree_add_time_format;
331 patable.p_proto_tree_add_ipxnet = proto_tree_add_ipxnet;
332 patable.p_proto_tree_add_ipxnet_hidden = proto_tree_add_ipxnet_hidden;
333 patable.p_proto_tree_add_ipxnet_format = proto_tree_add_ipxnet_format;
334 patable.p_proto_tree_add_ipv4 = proto_tree_add_ipv4;
335 patable.p_proto_tree_add_ipv4_hidden = proto_tree_add_ipv4_hidden;
336 patable.p_proto_tree_add_ipv4_format = proto_tree_add_ipv4_format;
337 patable.p_proto_tree_add_ipv6 = proto_tree_add_ipv6;
338 patable.p_proto_tree_add_ipv6_hidden = proto_tree_add_ipv6_hidden;
339 patable.p_proto_tree_add_ipv6_format = proto_tree_add_ipv6_format;
340 patable.p_proto_tree_add_ether = proto_tree_add_ether;
341 patable.p_proto_tree_add_ether_hidden = proto_tree_add_ether_hidden;
342 patable.p_proto_tree_add_ether_format = proto_tree_add_ether_format;
343 patable.p_proto_tree_add_string = proto_tree_add_string;
344 patable.p_proto_tree_add_string_hidden = proto_tree_add_string_hidden;
345 patable.p_proto_tree_add_string_format = proto_tree_add_string_format;
346 patable.p_proto_tree_add_boolean = proto_tree_add_boolean;
347 patable.p_proto_tree_add_boolean_hidden = proto_tree_add_boolean_hidden;
348 patable.p_proto_tree_add_boolean_format = proto_tree_add_boolean_format;
349 patable.p_proto_tree_add_double = proto_tree_add_double;
350 patable.p_proto_tree_add_double_hidden = proto_tree_add_double_hidden;
351 patable.p_proto_tree_add_double_format = proto_tree_add_double_format;
352 patable.p_proto_tree_add_uint = proto_tree_add_uint;
353 patable.p_proto_tree_add_uint_hidden = proto_tree_add_uint_hidden;
354 patable.p_proto_tree_add_uint_format = proto_tree_add_uint_format;
355 patable.p_proto_tree_add_int = proto_tree_add_int;
356 patable.p_proto_tree_add_int_hidden = proto_tree_add_int_hidden;
357 patable.p_proto_tree_add_int_format = proto_tree_add_int_format;
358 patable.p_proto_tree_add_text = proto_tree_add_text;
360 patable.p_tvb_new_subset = tvb_new_subset;
362 patable.p_tvb_length = tvb_length;
363 patable.p_tvb_length_remaining = tvb_length_remaining;
364 patable.p_tvb_bytes_exist = tvb_bytes_exist;
365 patable.p_tvb_offset_exists = tvb_offset_exists;
366 patable.p_tvb_reported_length = tvb_reported_length;
367 patable.p_tvb_reported_length_remaining = tvb_reported_length_remaining;
369 patable.p_tvb_get_guint8 = tvb_get_guint8;
371 patable.p_tvb_get_ntohs = tvb_get_ntohs;
372 patable.p_tvb_get_ntoh24 = tvb_get_ntoh24;
373 patable.p_tvb_get_ntohl = tvb_get_ntohl;
375 patable.p_tvb_get_letohs = tvb_get_letohs;
376 patable.p_tvb_get_letoh24 = tvb_get_letoh24;
377 patable.p_tvb_get_letohl = tvb_get_letohl;
379 patable.p_tvb_memcpy = tvb_memcpy;
380 patable.p_tvb_memdup = tvb_memdup;
382 patable.p_tvb_get_ptr = tvb_get_ptr;
384 patable.p_tvb_find_guint8 = tvb_find_guint8;
385 patable.p_tvb_pbrk_guint8 = tvb_pbrk_guint8;
387 patable.p_tvb_strnlen = tvb_strnlen;
389 patable.p_tvb_format_text = tvb_format_text;
391 patable.p_tvb_get_nstringz = tvb_get_nstringz;
392 patable.p_tvb_get_nstringz0 = tvb_get_nstringz0;
394 patable.p_tvb_find_line_end = tvb_find_line_end;
395 patable.p_tvb_find_line_end_unquoted = tvb_find_line_end_unquoted;
397 patable.p_tvb_strneql = tvb_strneql;
398 patable.p_tvb_strncaseeql = tvb_strncaseeql;
400 patable.p_tvb_bytes_to_str = tvb_bytes_to_str;
402 patable.p_prefs_register_protocol = prefs_register_protocol;
403 patable.p_prefs_register_uint_preference = prefs_register_uint_preference;
404 patable.p_prefs_register_bool_preference = prefs_register_bool_preference;
405 patable.p_prefs_register_enum_preference = prefs_register_enum_preference;
406 patable.p_prefs_register_string_preference = prefs_register_string_preference;
408 patable.p_register_giop_user = register_giop_user;
409 patable.p_is_big_endian = is_big_endian;
410 patable.p_get_CDR_string = get_CDR_string;
411 patable.p_get_CDR_ulong = get_CDR_ulong;
412 patable.p_get_CDR_enum = get_CDR_enum;
413 patable.p_get_CDR_object = get_CDR_object;
414 patable.p_get_CDR_boolean = get_CDR_boolean;
419 * On Windows, the data file directory is the installation
420 * directory; the plugins are stored under it.
422 * Assume we're running the installed version of Ethereal;
423 * on Windows, the data file directory is the directory
424 * in which the Ethereal binary resides.
426 datafile_dir = get_datafile_dir();
427 install_plugin_dir = g_malloc(strlen(datafile_dir) + strlen("plugins") +
428 strlen(VERSION) + 3);
429 sprintf(install_plugin_dir, "%s\\plugins\\%s", datafile_dir, VERSION);
432 * Make sure that pathname refers to a directory.
434 if (test_for_directory(install_plugin_dir) != EISDIR) {
436 * Either it doesn't refer to a directory or it
437 * refers to something that doesn't exist.
439 * Assume that means we're running, for example,
440 * a version of Ethereal we've built in a source
441 * directory, and fall back on the default
442 * installation directory, so you can put the plugins
443 * somewhere so they can be used with this version
446 * XXX - should we, instead, have the Windows build
447 * procedure create a subdirectory of the "plugins"
448 * source directory, and copy the plugin DLLs there,
449 * so that you use the plugins from the build tree?
452 g_strdup("C:\\Program Files\\Ethereal\\plugins\\" VERSION);
456 * Scan that directory.
458 plugins_scan_dir(install_plugin_dir);
459 g_free(install_plugin_dir);
462 * XXX - why not just scan "plugin_dir"? That's where we
463 * installed the plugins; if Ethereal isn't installed under
464 * "/usr" or "/usr/local", why should we search for its plugins
467 plugins_scan_dir(std_plug_dir);
468 plugins_scan_dir(local_plug_dir);
469 if ((strcmp(std_plug_dir, plugin_dir) != 0) &&
470 (strcmp(local_plug_dir, plugin_dir) != 0))
472 if (stat(plugin_dir, &plugin_dir_stat) == 0)
474 /* check if plugin_dir is really different from std_dir and
475 * local_dir if they exist ! */
476 if (stat(std_plug_dir, &std_dir_stat) == 0)
478 if (stat(local_plug_dir, &local_dir_stat) == 0)
480 if ((plugin_dir_stat.st_dev != std_dir_stat.st_dev ||
481 plugin_dir_stat.st_ino != std_dir_stat.st_ino) &&
482 (plugin_dir_stat.st_dev != local_dir_stat.st_dev ||
483 plugin_dir_stat.st_ino != local_dir_stat.st_ino))
484 plugins_scan_dir(plugin_dir);
488 if ((plugin_dir_stat.st_dev != std_dir_stat.st_dev ||
489 plugin_dir_stat.st_ino != std_dir_stat.st_ino))
490 plugins_scan_dir(plugin_dir);
493 else if (stat(local_plug_dir, &local_dir_stat) == 0)
495 if ((plugin_dir_stat.st_dev != local_dir_stat.st_dev ||
496 plugin_dir_stat.st_ino != local_dir_stat.st_ino))
497 plugins_scan_dir(plugin_dir);
499 else plugins_scan_dir(plugin_dir);
504 user_plug_dir = get_persconffile_path(PLUGINS_DIR_NAME, FALSE);
505 plugins_scan_dir(user_plug_dir);
510 register_all_plugin_handoffs(void)
515 * For all new-style plugins, call the register-handoff routine.
516 * This is called from "proto_init()"; it must be called after
517 * "register_all_protocols()" and "init_plugins()" are called,
518 * in case one plugin registers itself either with a built-in
519 * dissector or with another plugin; we must first register all
520 * dissectors, whether built-in or plugin, so their dissector tables
521 * are initialized, and only then register all handoffs.
523 * We treat those protocols as always being enabled; they should
524 * use the standard mechanism for enabling/disabling protocols, not
525 * the plugin-specific mechanism.
527 for (pt_plug = plugin_list; pt_plug != NULL; pt_plug = pt_plug->next)
528 (pt_plug->reg_handoff)();