This program is free software; you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
- the Free Software Foundation; either version 2 of the License, or
+ the Free Software Foundation; either version 3 of the License, or
(at your option) any later version.
This program is distributed in the hope that it will be useful,
#include "includes.h"
#ifdef HAVE_DLOPEN
-NTSTATUS smb_load_module(const char *module_name)
+
+/* Load a dynamic module. Only log a level 0 error if we are not checking
+ for the existence of a module (probling). */
+
+static NTSTATUS do_smb_load_module(const char *module_name, BOOL is_probe)
{
void *handle;
init_module_function *init;
*/
handle = sys_dlopen(module_name, RTLD_LAZY);
+ /* This call should reset any possible non-fatal errors that
+ occured since last call to dl* functions */
+ error = sys_dlerror();
+
if(!handle) {
- DEBUG(0, ("Error loading module '%s': %s\n", module_name, sys_dlerror()));
+ int level = is_probe ? 3 : 0;
+ DEBUG(level, ("Error loading module '%s': %s\n", module_name, error ? error : ""));
return NT_STATUS_UNSUCCESSFUL;
}
- init = sys_dlsym(handle, "init_module");
+ init = (init_module_function *)sys_dlsym(handle, "init_module");
/* we must check sys_dlerror() to determine if it worked, because
sys_dlsym() can validly return NULL */
error = sys_dlerror();
if (error) {
- DEBUG(0, ("Error trying to resolve symbol 'init_module' in %s: %s\n", module_name, error));
+ DEBUG(0, ("Error trying to resolve symbol 'init_module' in %s: %s\n",
+ module_name, error));
return NT_STATUS_UNSUCCESSFUL;
}
- status = init();
-
DEBUG(2, ("Module '%s' loaded\n", module_name));
+ status = init();
+ if (!NT_STATUS_IS_OK(status)) {
+ DEBUG(0, ("Module '%s' initialization failed: %s\n",
+ module_name, get_friendly_nt_error_msg(status)));
+ }
+
return status;
}
+NTSTATUS smb_load_module(const char *module_name)
+{
+ return do_smb_load_module(module_name, False);
+}
+
/* Load all modules in list and return number of
* modules that has been successfully loaded */
int smb_load_modules(const char **modules)
/* if we make any 'samba multibyte string'
calls here, we break
for loading string modules */
+
+ DEBUG(5, ("Probing module '%s'\n", module));
+
if (module[0] == '/')
- return smb_load_module(module);
+ return do_smb_load_module(module, True);
pstrcpy(full_path, lib_path(subsystem));
pstrcat(full_path, "/");
pstrcat(full_path, ".");
pstrcat(full_path, shlib_ext());
- DEBUG(5, ("Probing module %s: Trying to load from %s\n", module, full_path));
+ DEBUG(5, ("Probing module '%s': Trying to load from %s\n", module, full_path));
- return smb_load_module(full_path);
+ return do_smb_load_module(full_path, True);
}
#else /* HAVE_DLOPEN */
if(lp_preload_modules())
smb_load_modules(lp_preload_modules());
}
-
-
-/*************************************************************************
- * This functions /path/to/foobar.so -> foobar
- ************************************************************************/
-void module_path_get_name(const char *path, pstring name)
-{
- char *s;
-
- /* First, make the path relative */
- s = strrchr(path, '/');
- if(s) pstrcpy(name, s+1);
- else pstrcpy(name, path);
-
- if (dyn_SHLIBEXT && *dyn_SHLIBEXT && strlen(dyn_SHLIBEXT) < strlen(name)) {
- int n = strlen(name) - strlen(dyn_SHLIBEXT);
-
- /* Remove extension if necessary */
- if (name[n-1] == '.' && !strcmp(name+n, dyn_SHLIBEXT)) {
- name[n-1] = '\0';
- }
- }
-}
-
-
-/***************************************************************************
- * This Function registers a idle event
- *
- * the registered funtions are run periodically
- * and maybe shutdown idle connections (e.g. to an LDAP server)
- ***************************************************************************/
-static smb_idle_event_struct *smb_idle_event_list = NULL;
-NTSTATUS smb_register_idle_event(smb_idle_event_struct *idle_event)
-{
- if (!idle_event) {
- return NT_STATUS_INVALID_PARAMETER;
- }
-
- idle_event->last_run = 0;
-
- DLIST_ADD(smb_idle_event_list,idle_event);
-
- return NT_STATUS_OK;
-}
-
-NTSTATUS smb_unregister_idle_event(smb_idle_event_struct *idle_event)
-{
- if (!idle_event) {
- return NT_STATUS_INVALID_PARAMETER;
- }
-
- DLIST_REMOVE(smb_idle_event_list,idle_event);
-
- return NT_STATUS_OK;
-}
-
-void smb_run_idle_events(time_t now)
-{
- smb_idle_event_struct *tmp_event = smb_idle_event_list;
-
- while (tmp_event) {
- time_t interval;
-
- if (tmp_event->fn) {
- if (tmp_event->interval >= SMB_IDLE_EVENT_MIN_INTERVAL) {
- interval = tmp_event->interval;
- } else {
- interval = SMB_IDLE_EVENT_DEFAULT_INTERVAL;
- }
- if (now >(tmp_event->last_run+interval)) {
- tmp_event->fn(&tmp_event,now);
- tmp_event->last_run = now;
- }
- }
-
- tmp_event = tmp_event->next;
- }
-
- return;
-}
-
-/***************************************************************************
- * This Function registers a exit event
- *
- * the registered funtions are run on exit()
- * and maybe shutdown idle connections (e.g. to an LDAP server)
- ***************************************************************************/
-static smb_exit_event_struct *smb_exit_event_list = NULL;
-NTSTATUS smb_register_exit_event(smb_exit_event_struct *exit_event)
-{
- if (!exit_event) {
- return NT_STATUS_INVALID_PARAMETER;
- }
-
- DLIST_ADD(smb_exit_event_list,exit_event);
-
- return NT_STATUS_OK;
-}
-
-NTSTATUS smb_unregister_exit_event(smb_exit_event_struct *exit_event)
-{
- if (!exit_event) {
- return NT_STATUS_INVALID_PARAMETER;
- }
-
- DLIST_REMOVE(smb_exit_event_list,exit_event);
-
- return NT_STATUS_OK;
-}
-
-void smb_run_exit_events(void)
-{
- smb_exit_event_struct *tmp_event = smb_exit_event_list;
-
- while (tmp_event) {
- if (tmp_event->fn) {
- tmp_event->fn(&tmp_event);
- }
- tmp_event = tmp_event->next;
- }
-
- /* run exit_events only once */
- smb_exit_event_list = NULL;
-
- return;
-}
-