| lh | 9ed821d | 2023-04-07 01:36:19 -0700 | [diff] [blame] | 1 | #include <dlfcn.h> | 
|  | 2 | #include <error.h> | 
|  | 3 | #include <mcheck.h> | 
|  | 4 | #include <stdio.h> | 
|  | 5 | #include <stdlib.h> | 
|  | 6 |  | 
|  | 7 | int | 
|  | 8 | main (void) | 
|  | 9 | { | 
|  | 10 | void *h1; | 
|  | 11 | int (*fp1) (int); | 
|  | 12 | void *h2; | 
|  | 13 | int (*fp2) (int); | 
|  | 14 | int res1; | 
|  | 15 | int res2; | 
|  | 16 |  | 
|  | 17 | mtrace (); | 
|  | 18 |  | 
|  | 19 | h1 = dlopen ("testobj1.so", RTLD_LAZY); | 
|  | 20 | if (h1 == NULL) | 
|  | 21 | error (EXIT_FAILURE, 0, "while loading `%s': %s", "testobj1.so", | 
|  | 22 | dlerror ()); | 
|  | 23 |  | 
|  | 24 | h2 = dlopen ("testobj1_1.so", RTLD_LAZY); | 
|  | 25 | if (h1 == NULL) | 
|  | 26 | error (EXIT_FAILURE, 0, "while loading `%s': %s", "testobj1_1.so", | 
|  | 27 | dlerror ()); | 
|  | 28 |  | 
|  | 29 | fp1 = dlsym (h1, "obj1func1"); | 
|  | 30 | if (fp1 == NULL) | 
|  | 31 | error (EXIT_FAILURE, 0, "getting `obj1func1' in `%s': %s", | 
|  | 32 | "testobj1.so", dlerror ()); | 
|  | 33 |  | 
|  | 34 | fp2 = dlsym (h2, "obj1func1"); | 
|  | 35 | if (fp2 == NULL) | 
|  | 36 | error (EXIT_FAILURE, 0, "getting `obj1func1' in `%s': %s", | 
|  | 37 | "testobj1_1.so", dlerror ()); | 
|  | 38 |  | 
|  | 39 | res1 = fp1 (10); | 
|  | 40 | res2 = fp2 (10); | 
|  | 41 | printf ("fp1(10) = %d\nfp2(10) = %d\n", res1, res2); | 
|  | 42 |  | 
|  | 43 | if (dlclose (h1) != 0) | 
|  | 44 | error (EXIT_FAILURE, 0, "cannot close testobj1.so: %s\n", dlerror ()); | 
|  | 45 | if (dlclose (h2) != 0) | 
|  | 46 | error (EXIT_FAILURE, 0, "cannot close testobj1_1.so: %s\n", dlerror ()); | 
|  | 47 |  | 
|  | 48 | return res1 != 42 || res2 != 72; | 
|  | 49 | } | 
|  | 50 |  | 
|  | 51 |  | 
|  | 52 | extern int foo (int a); | 
|  | 53 | int | 
|  | 54 | foo (int a) | 
|  | 55 | { | 
|  | 56 | return a + 10; | 
|  | 57 | } |