1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
|
#include <assert.h>
#include <dlfcn.h>
#include <errno.h>
#include <error.h>
#include <stdio.h>
#include <stdlib.h>
/* How many load/unload operations do we do. */
#define TEST_ROUNDS 100
static struct
{
/* Name of the module. */
const char *name;
/* The handle. */
void *handle;
} testobjs[] =
{
{ "testobj1.so", NULL },
{ "testobj2.so", NULL },
{ "testobj3.so", NULL },
};
#define NOBJS (sizeof (testobjs) / sizeof (testobjs[0]))
static const struct
{
/* Name of a function to call. */
const char *fname;
/* Index in status and handle array. */
int index;
/* Options while loading the module. */
int options;
} tests[] =
{
{ "obj1func2", 0, RTLD_LAZY },
{ "obj1func1", 0, RTLD_LAZY | RTLD_GLOBAL },
{ "obj1func1", 0, RTLD_NOW, },
{ "obj1func2", 0, RTLD_NOW | RTLD_GLOBAL },
{ "obj2func2", 1, RTLD_LAZY },
{ "obj2func1", 1, RTLD_LAZY | RTLD_GLOBAL, },
{ "obj2func1", 1, RTLD_NOW, },
{ "obj2func2", 1, RTLD_NOW | RTLD_GLOBAL },
{ "obj3func2", 2, RTLD_LAZY },
{ "obj3func1", 2, RTLD_LAZY | RTLD_GLOBAL },
{ "obj3func1", 2, RTLD_NOW },
{ "obj3func2", 2, RTLD_NOW | RTLD_GLOBAL },
};
#define NTESTS (sizeof (tests) / sizeof (tests[0]))
int
main (void)
{
int count = TEST_ROUNDS;
/* Just a seed. */
srandom (TEST_ROUNDS);
while (count--)
{
int nr = random () % NTESTS;
int index = tests[nr].index;
printf ("%4d: %4d: ", count + 1, nr);
fflush (stdout);
if (testobjs[index].handle == NULL)
{
int (*fct) (int);
/* Load the object. */
testobjs[index].handle = dlopen (testobjs[index].name,
tests[nr].options);
if (testobjs[index].handle == NULL)
error (EXIT_FAILURE, 0, "cannot load `%s': %s",
testobjs[index].name, dlerror ());
/* Test the function call. */
fct = dlsym (testobjs[index].handle, tests[nr].fname);
if (fct == NULL)
error (EXIT_FAILURE, 0,
"cannot get function `%s' from shared object `%s': %s",
tests[nr].fname, testobjs[index].name, dlerror ());
fct (10);
printf ("successfully loaded `%s'\n", testobjs[index].name);
}
else
{
dlclose (testobjs[index].handle);
testobjs[index].handle = NULL;
printf ("successfully unloaded `%s'\n", testobjs[index].name);
}
}
/* Unload all loaded modules. */
for (count = 0; count < NOBJS; ++count)
if (testobjs[count].handle != NULL)
dlclose (testobjs[count].handle);
return 0;
}
int
foo (int a)
{
return a - 1;
}
|
