Bochs/bochs-testing/plugin-test/test6-ltdlopen/main.cc
Bryce Denney dad1e7b3e9 - build the module symbol name myself instead of letting ltdl do it. On win32
I'm using ltdl even it considers my DLLs to NOT be a libtool archive, and
this is making the symbol name transformation mess up.  If I do it myself,
I can avoid this.
2002-10-17 06:49:44 +00:00

76 lines
1.8 KiB
C++

#include <stdio.h>
#include <stdlib.h>
// set LT_SCOPE so that ltdl.h does not export anything in win32 DLLs
#define LT_SCOPE extern
#include <ltdl.h>
// setting MAIN_DLL_EXPORT causes main.h to export main's functions
// (for win32 DLLs)
#define MAIN_DLL_EXPORT
#include "main.h"
const char *version_string = "uselib-test6-1.0";
int register_module (const char *name)
{
printf ("register_module was called by module '%s'\n", name);
return 0;
}
int load_module (const char *fmt, const char *modname)
{
char buf[512];
sprintf (buf, fmt, modname);
printf ("loading module from VARIES{%s}\n", buf);
lt_dlhandle handle = lt_dlopenext (buf);
printf ("handle is VARIES{%p}\n", handle);
if (!handle) {
printf ("lt_dlopen error: %s\n", lt_dlerror ());
return -1;
}
char sym[1024];
sprintf (sym, "%s_LTX_%s", modname, "module_init");
modload_func func = (modload_func) lt_dlsym (handle, sym);
printf ("module_init function is at VARIES{%p}\n", func);
if (func != NULL) {
printf ("Calling module_init\n");
(*func)();
} else {
printf ("lt_dlsym error: %s\n", lt_dlerror ());
return -1;
}
return 0;
}
int main (int argc, char **argv)
{
printf ("start\n");
if (lt_dlinit () != 0) {
printf ("lt_dlinit error: %s\n", lt_dlerror ());
return -1;
}
#ifdef WIN32
const char *module_name_format = "%s";
#else
const char *module_name_format = "lib%s.la";
#endif
printf ("loading module1\n");
// try to load module1
if (load_module (module_name_format, "module1") < 0) {
printf ("load module1 failed\n");
}
if (load_module (module_name_format, "module2") < 0) {
printf ("load module2 failed\n");
}
int arg;
for (int arg=1; arg < argc; arg++) {
if (load_module (module_name_format, argv[arg]) < 0) {
printf ("load %s failed\n", argv[arg]);
}
}
printf ("stop\n");
exit (77);
}