#include "numeric.h"
#include "parse.h"
#include "ircd_defs.h"
-#include "irc_string.h"
-#include "sprintf_irc.h"
+#include "match.h"
/* -TimeMr14C:
* I have moved the dl* function definitions and
* the two functions (load_a_module / unload_a_module) to the
- * file dynlink.c
+ * file dynlink.c
* And also made the necessary changes to those functions
* to comply with shl_load and friends.
- * In this file, to keep consistency with the makefile,
+ * In this file, to keep consistency with the makefile,
* I added the ability to load *.sl files, too.
* 27/02/2002
*/
struct module **modlist = NULL;
static const char *core_module_table[] = {
+ "m_ban",
"m_die",
"m_error",
"m_join",
{mg_unreg, mg_not_oper, mg_ignore, mg_ignore, mg_ignore, {mo_modrestart, 0}}
};
-extern struct Message error_msgtab;
-
void
modules_init(void)
{
* output - none
* side effects - returns a module path from path
*/
-static struct module_path *
+static char *
mod_find_path(const char *path)
{
rb_dlink_node *ptr;
- struct module_path *mpath;
+ char *mpath;
RB_DLINK_FOREACH(ptr, mod_paths.head)
{
mpath = ptr->data;
- if(!strcmp(path, mpath->path))
+ if(!strcmp(path, mpath))
return mpath;
}
/* mod_add_path
*
* input - path
- * ouput -
+ * ouput -
* side effects - adds path to list
*/
void
mod_add_path(const char *path)
{
- struct module_path *pathst;
+ char *pathst;
if(mod_find_path(path))
return;
- pathst = rb_malloc(sizeof(struct module_path));
-
- strcpy(pathst->path, path);
+ pathst = rb_strdup(path);
rb_dlinkAddAlloc(pathst, &mod_paths);
}
mod_paths.length = 0;
}
-/* irc_basename
- *
- * input -
- * output -
- * side effects -
- */
-char *
-irc_basename(const char *path)
-{
- char *mod_basename = rb_malloc(strlen(path) + 1);
- const char *s;
-
- if(!(s = strrchr(path, '/')))
- s = path;
- else
- s++;
-
- (void) strcpy(mod_basename, s);
- return mod_basename;
-}
-
/* findmodule_byname
*
* input -
modules_init();
- modlist = (struct module **) rb_malloc(sizeof(struct module) * (MODS_INCREMENT));
+ modlist = (struct module **) rb_malloc(sizeof(struct module *) * (MODS_INCREMENT));
max_mods = MODS_INCREMENT;
void
load_core_modules(int warn)
{
- char module_name[MAXPATHLEN];
+ char module_name[PATH_MAX];
int i;
int
load_one_module(const char *path, int coremodule)
{
- char modpath[MAXPATHLEN];
+ char modpath[PATH_MAX];
rb_dlink_node *pathst;
- struct module_path *mpath;
+ const char *mpath;
struct stat statbuf;
if (server_state_foreground == 1)
- inotice("loading module %s ...", path);
+ inotice("loading module %s ...", path);
RB_DLINK_FOREACH(pathst, mod_paths.head)
{
mpath = pathst->data;
- rb_snprintf(modpath, sizeof(modpath), "%s/%s", mpath->path, path);
+ rb_snprintf(modpath, sizeof(modpath), "%s/%s", mpath, path);
if((strstr(modpath, "../") == NULL) && (strstr(modpath, "/..") == NULL))
{
if(stat(modpath, &statbuf) == 0)
return 0;
}
- m_bn = irc_basename(parv[1]);
+ m_bn = rb_basename(parv[1]);
if(findmodule_byname(m_bn) != -1)
{
return 0;
}
- m_bn = irc_basename(parv[1]);
+ m_bn = rb_basename(parv[1]);
if((modindex = findmodule_byname(m_bn)) == -1)
{
return 0;
}
- m_bn = irc_basename(parv[1]);
+ m_bn = rb_basename(parv[1]);
if((modindex = findmodule_byname(m_bn)) == -1)
{
return 0;
}
- if((load_one_module(parv[1], check_core) == -1) && check_core)
+ if((load_one_module(m_bn, check_core) == -1) && check_core)
{
sendto_realops_snomask(SNO_GENERAL, L_ALL,
- "Error reloading core module: %s: terminating ircd", parv[1]);
- ilog(L_MAIN, "Error loading core module %s: terminating ircd", parv[1]);
+ "Error reloading core module: %s: terminating ircd", m_bn);
+ ilog(L_MAIN, "Error loading core module %s: terminating ircd", m_bn);
exit(0);
}
sendto_one(source_p, form_str(RPL_MODLIST),
me.name, source_p->name,
modlist[i]->name,
- modlist[i]->address,
+ (unsigned long)(uintptr_t)modlist[i]->address,
modlist[i]->version, modlist[i]->core ? "(core)" : "");
}
}
{
sendto_one(source_p, form_str(RPL_MODLIST),
me.name, source_p->name, modlist[i]->name,
- modlist[i]->address, modlist[i]->version,
+ (unsigned long)(uintptr_t)modlist[i]->address,
+ modlist[i]->version,
modlist[i]->core ? "(core)" : "");
}
}
#define RTLD_NOW RTLD_LAZY /* openbsd deficiency */
#endif
+#ifndef RTLD_LOCAL
+#define RTLD_LOCAL 0
+#endif
+
#ifdef CHARYBDIS_PROFILE
# ifndef RTLD_PROFILE
# warning libdl may not support profiling, sucks. :(
/*
** XXX - The type system in C does not allow direct conversion between
** data and function pointers, but as it happens, most C compilers will
- ** safely do this, however it is a theoretical overlow to cast as we
- ** must do here. I have library functions to take care of this, but
- ** despite being more "correct" for the C language, this is more
+ ** safely do this, however it is a theoretical overlow to cast as we
+ ** must do here. I have library functions to take care of this, but
+ ** despite being more "correct" for the C language, this is more
** practical. Removing the abuse of the ability to cast ANY pointer
** to and from an integer value here will break some compilers.
** -jmallett
dlclose(modlist[modindex]->address);
rb_free(modlist[modindex]->name);
- memcpy(&modlist[modindex], &modlist[modindex + 1],
- sizeof(struct module) * ((num_mods - 1) - modindex));
+ memmove(&modlist[modindex], &modlist[modindex + 1],
+ sizeof(struct module *) * ((num_mods - 1) - modindex));
if(num_mods != 0)
num_mods--;
int *mapi_version;
- mod_basename = irc_basename(path);
+ mod_basename = rb_basename(path);
#ifdef CHARYBDIS_PROFILE
- tmpptr = dlopen(path, RTLD_NOW | RTLD_PROFILE);
+ tmpptr = dlopen(path, RTLD_NOW | RTLD_LOCAL | RTLD_PROFILE);
#else
- tmpptr = dlopen(path, RTLD_NOW);
+ tmpptr = dlopen(path, RTLD_NOW | RTLD_LOCAL);
#endif
if(tmpptr == NULL)
if((num_mods + 1) < max_mods)
return;
- new_modlist = (struct module **) rb_malloc(sizeof(struct module) *
+ new_modlist = (struct module **) rb_malloc(sizeof(struct module *) *
(max_mods + MODS_INCREMENT));
- memcpy((void *) new_modlist, (void *) modlist, sizeof(struct module) * num_mods);
+ memcpy((void *) new_modlist, (void *) modlist, sizeof(struct module *) * num_mods);
rb_free(modlist);
modlist = new_modlist;