void pg_dlclose(void *handle) { #ifndef HAVE_DLD_H #else dld_unlink_by_file(handle, 1); free(handle); #endif }
/* A function called through the vtable when a particular module should be unloaded. */ static int vm_close (lt_user_data loader_data LT__UNUSED, lt_module module) { int errors = 0; if (dld_unlink_by_file ((char*)(module), 1) != 0) { LT__SETERROR (CANNOT_CLOSE); ++errors; } else { FREE (module); } return errors; }
void * pg_dlopen(char *filename) { static int dl_initialized = 0; /* * initializes the dynamic loader with the executable's pathname. (only * needs to do this the first time pg_dlopen is called.) */ if (!dl_initialized) { if (dld_init(dld_find_executable(my_exec_path))) return NULL; /* * if there are undefined symbols, we want dl to search from the * following libraries also. */ dl_initialized = 1; } /* * link the file, then check for undefined symbols! */ if (dld_link(filename)) return NULL; /* * If undefined symbols: try to link with the C and math libraries! This * could be smarter, if the dynamic linker was able to handle shared libs! */ if (dld_undefined_sym_count > 0) { if (dld_link("/usr/lib/libc.a")) { elog(WARNING, "could not link C library"); return NULL; } if (dld_undefined_sym_count > 0) { if (dld_link("/usr/lib/libm.a")) { elog(WARNING, "could not link math library"); return NULL; } if (dld_undefined_sym_count > 0) { int count = dld_undefined_sym_count; char **list = dld_list_undefined_sym(); /* list the undefined symbols, if any */ do { elog(WARNING, "\"%s\" is undefined", *list); list++; count--; } while (count > 0); dld_unlink_by_file(filename, 1); return NULL; } } } return (void *) strdup(filename); }
static void *dlclose(void *module) { if(!module) return; dld_unlink_by_file((char *)module); free(module); }