73 lines
1.3 KiB
C
73 lines
1.3 KiB
C
|
// base symbols shared
|
||
|
|
|
||
|
|
#if defined(BASE_IMPLEMENTOR)
|
||
|
|
|
||
|
|
#include <stdio.h>
|
||
|
|
|
||
|
|
int x = 0;
|
||
|
|
|
||
|
|
void
|
||
|
|
base_func(void){
|
||
|
|
printf("x = %d\n", x);
|
||
|
|
x += 1;
|
||
|
|
}
|
||
|
|
|
||
|
|
#endif
|
||
|
|
|
||
|
|
|
||
|
|
// dynamic function linkage protocol
|
||
|
|
|
||
|
|
#if defined(BASE_IMPLEMENTOR)
|
||
|
|
|
||
|
|
EXPORT_SYMBOL BASE_Funcs*
|
||
|
|
base_export_functions(void){
|
||
|
|
static BASE_Funcs funcs = {0};
|
||
|
|
if (funcs.base_func == 0){
|
||
|
|
#define X(N,R,P) funcs.N = N;
|
||
|
|
#include "base.xlist.h"
|
||
|
|
#undef X
|
||
|
|
}
|
||
|
|
return(&funcs);
|
||
|
|
}
|
||
|
|
|
||
|
|
#endif
|
||
|
|
|
||
|
|
|
||
|
|
#if !defined(BASE_IMPLEMENTOR)
|
||
|
|
|
||
|
|
#if OS_WINDOWS
|
||
|
|
# include <Windows.h>
|
||
|
|
#elif OS_LINUX
|
||
|
|
# include <dlfcn.h>
|
||
|
|
#endif
|
||
|
|
|
||
|
|
BEFORE_MAIN(base_dynamic_user_init){
|
||
|
|
BASE_Funcs *funcs = 0;
|
||
|
|
|
||
|
|
#if OS_WINDOWS
|
||
|
|
HMODULE module = LoadLibraryA("base.dll");
|
||
|
|
if (module != 0){
|
||
|
|
BASE_ExportFuncs *base_export_functions = (BASE_ExportFuncs*)GetProcAddress(module, "base_export_functions");
|
||
|
|
if (base_export_functions != 0){
|
||
|
|
funcs = base_export_functions();
|
||
|
|
}
|
||
|
|
}
|
||
|
|
#elif OS_LINUX
|
||
|
|
void *module = dlopen("./base.so", RTLD_NOW);
|
||
|
|
if (module != 0){
|
||
|
|
BASE_ExportFuncs *base_export_functions = (BASE_ExportFuncs*)dlsym(module, "base_export_functions");
|
||
|
|
if (base_export_functions != 0){
|
||
|
|
funcs = base_export_functions();
|
||
|
|
}
|
||
|
|
}
|
||
|
|
#else
|
||
|
|
# error base_import_functions not completed for this OS
|
||
|
|
#endif
|
||
|
|
|
||
|
|
#define X(N,R,P) N = funcs->N;
|
||
|
|
#include "base.xlist.h"
|
||
|
|
#undef X
|
||
|
|
}
|
||
|
|
|
||
|
|
#endif
|