1999-01-19 23:47:25 +00:00
|
|
|
#include <dlfcn.h>
|
|
|
|
#include <error.h>
|
2000-08-19 07:17:09 +00:00
|
|
|
#include <mcheck.h>
|
1999-01-19 23:47:25 +00:00
|
|
|
#include <stdio.h>
|
|
|
|
#include <stdlib.h>
|
|
|
|
|
|
|
|
int
|
|
|
|
main (void)
|
|
|
|
{
|
|
|
|
void *h1;
|
|
|
|
int (*fp1) (int);
|
|
|
|
void *h2;
|
|
|
|
int (*fp2) (int);
|
|
|
|
int res1;
|
|
|
|
int res2;
|
|
|
|
|
2000-08-19 07:17:09 +00:00
|
|
|
mtrace ();
|
|
|
|
|
1999-01-19 23:47:25 +00:00
|
|
|
h1 = dlopen ("testobj1.so", RTLD_LAZY);
|
|
|
|
if (h1 == NULL)
|
|
|
|
error (EXIT_FAILURE, 0, "while loading `%s': %s", "testobj1.so",
|
|
|
|
dlerror ());
|
|
|
|
|
|
|
|
h2 = dlopen ("testobj1_1.so", RTLD_LAZY);
|
|
|
|
if (h1 == NULL)
|
|
|
|
error (EXIT_FAILURE, 0, "while loading `%s': %s", "testobj1_1.so",
|
|
|
|
dlerror ());
|
|
|
|
|
|
|
|
fp1 = dlsym (h1, "obj1func1");
|
|
|
|
if (fp1 == NULL)
|
|
|
|
error (EXIT_FAILURE, 0, "getting `obj1func1' in `%s': %s",
|
|
|
|
"testobj1.so", dlerror ());
|
|
|
|
|
|
|
|
fp2 = dlsym (h2, "obj1func1");
|
|
|
|
if (fp2 == NULL)
|
|
|
|
error (EXIT_FAILURE, 0, "getting `obj1func1' in `%s': %s",
|
|
|
|
"testobj1_1.so", dlerror ());
|
|
|
|
|
|
|
|
res1 = fp1 (10);
|
|
|
|
res2 = fp2 (10);
|
|
|
|
printf ("fp1(10) = %d\nfp2(10) = %d\n", res1, res2);
|
|
|
|
|
2000-08-19 07:17:09 +00:00
|
|
|
if (dlclose (h1) != 0)
|
|
|
|
error (EXIT_FAILURE, 0, "cannot close testobj1.so: %s\n", dlerror ());
|
|
|
|
if (dlclose (h2) != 0)
|
|
|
|
error (EXIT_FAILURE, 0, "cannot close testobj1_1.so: %s\n", dlerror ());
|
|
|
|
|
1999-01-19 23:47:25 +00:00
|
|
|
return res1 != 42 || res2 != 72;
|
|
|
|
}
|
|
|
|
|
|
|
|
|
2000-11-26 06:18:02 +00:00
|
|
|
extern int foo (int a);
|
1999-01-19 23:47:25 +00:00
|
|
|
int
|
|
|
|
foo (int a)
|
|
|
|
{
|
|
|
|
return a + 10;
|
|
|
|
}
|