1*0a6a1f1dSLionel Sambuc
2*0a6a1f1dSLionel Sambuc #include <stdio.h>
3*0a6a1f1dSLionel Sambuc #include <stdlib.h>
4*0a6a1f1dSLionel Sambuc
5*0a6a1f1dSLionel Sambuc #ifdef DLOPEN_FUNC_DIR
6*0a6a1f1dSLionel Sambuc #include <dlfcn.h>
7*0a6a1f1dSLionel Sambuc #else
8*0a6a1f1dSLionel Sambuc void func(int K);
9*0a6a1f1dSLionel Sambuc void func2(int K);
10*0a6a1f1dSLionel Sambuc #endif
11*0a6a1f1dSLionel Sambuc
main(int argc,char * argv[])12*0a6a1f1dSLionel Sambuc int main(int argc, char *argv[]) {
13*0a6a1f1dSLionel Sambuc #ifdef DLOPEN_FUNC_DIR
14*0a6a1f1dSLionel Sambuc dlerror();
15*0a6a1f1dSLionel Sambuc void *f1_handle = dlopen(DLOPEN_FUNC_DIR"/func.shared", DLOPEN_FLAGS);
16*0a6a1f1dSLionel Sambuc if (f1_handle == NULL) {
17*0a6a1f1dSLionel Sambuc fprintf(stderr, "unable to open '" DLOPEN_FUNC_DIR "/func.shared': %s\n",
18*0a6a1f1dSLionel Sambuc dlerror());
19*0a6a1f1dSLionel Sambuc return EXIT_FAILURE;
20*0a6a1f1dSLionel Sambuc }
21*0a6a1f1dSLionel Sambuc
22*0a6a1f1dSLionel Sambuc void (*func)(int) = (void (*)(int))dlsym(f1_handle, "func");
23*0a6a1f1dSLionel Sambuc if (func == NULL) {
24*0a6a1f1dSLionel Sambuc fprintf(stderr, "unable to lookup symbol 'func': %s\n", dlerror());
25*0a6a1f1dSLionel Sambuc return EXIT_FAILURE;
26*0a6a1f1dSLionel Sambuc }
27*0a6a1f1dSLionel Sambuc
28*0a6a1f1dSLionel Sambuc void *f2_handle = dlopen(DLOPEN_FUNC_DIR"/func2.shared", DLOPEN_FLAGS);
29*0a6a1f1dSLionel Sambuc if (f2_handle == NULL) {
30*0a6a1f1dSLionel Sambuc fprintf(stderr, "unable to open '" DLOPEN_FUNC_DIR "/func2.shared': %s\n",
31*0a6a1f1dSLionel Sambuc dlerror());
32*0a6a1f1dSLionel Sambuc return EXIT_FAILURE;
33*0a6a1f1dSLionel Sambuc }
34*0a6a1f1dSLionel Sambuc
35*0a6a1f1dSLionel Sambuc void (*func2)(int) = (void (*)(int))dlsym(f2_handle, "func2");
36*0a6a1f1dSLionel Sambuc if (func2 == NULL) {
37*0a6a1f1dSLionel Sambuc fprintf(stderr, "unable to lookup symbol 'func2': %s\n", dlerror());
38*0a6a1f1dSLionel Sambuc return EXIT_FAILURE;
39*0a6a1f1dSLionel Sambuc }
40*0a6a1f1dSLionel Sambuc #endif
41*0a6a1f1dSLionel Sambuc
42*0a6a1f1dSLionel Sambuc func(1);
43*0a6a1f1dSLionel Sambuc func2(0);
44*0a6a1f1dSLionel Sambuc
45*0a6a1f1dSLionel Sambuc return EXIT_SUCCESS;
46*0a6a1f1dSLionel Sambuc }
47*0a6a1f1dSLionel Sambuc
48