mirror of
https://sourceware.org/git/glibc.git
synced 2024-09-20 00:19:57 +00:00
fc7f617d30
* include/link.h: Include sysd-link.h. * sysdeps/generic/sysd-link.h: New file. * sysdeps/unix/sysv/linux/sysd-link.h: New file. * elf/Makefile (distribute): Add sysd-link.h. * elf/dl-load.c: Use definitions from sysd-link.h instead of stat types and functions directly. * elf/dl-misc.c: Likewise. * elf/dl-profile.c: Likewise. * elf/loadfail.c (main): Close all successfully loaded objects.
42 lines
933 B
C
42 lines
933 B
C
#include <dlfcn.h>
|
|
#include <error.h>
|
|
#include <mcheck.h>
|
|
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
|
|
int
|
|
main (void)
|
|
{
|
|
void *su[5];
|
|
void *h;
|
|
int n;
|
|
|
|
mtrace ();
|
|
|
|
if ((su[0] = dlopen ("testobj1.so", RTLD_GLOBAL | RTLD_NOW)) == NULL
|
|
|| (su[1] = dlopen ("testobj2.so", RTLD_GLOBAL | RTLD_NOW)) == NULL
|
|
|| (su[2] = dlopen ("testobj3.so", RTLD_GLOBAL | RTLD_NOW)) == NULL
|
|
|| (su[3] = dlopen ("testobj4.so", RTLD_GLOBAL | RTLD_NOW)) == NULL
|
|
|| (su[4] = dlopen ("testobj5.so", RTLD_GLOBAL | RTLD_NOW)) == NULL)
|
|
error (EXIT_FAILURE, 0, "failed to load shared object: %s", dlerror ());
|
|
|
|
h = dlopen ("failobj.so", RTLD_GLOBAL | RTLD_NOW);
|
|
|
|
printf ("h = %p, %s\n", h, h == NULL ? "ok" : "fail");
|
|
|
|
for (n = 0; n < 5; ++n)
|
|
if (dlclose (su[n]) != 0)
|
|
{
|
|
printf ("failed to unload su[%d]: %s\n", n, dlerror ());
|
|
exit (EXIT_FAILURE);
|
|
}
|
|
|
|
return h != NULL;
|
|
}
|
|
|
|
int
|
|
foo (int a)
|
|
{
|
|
return 10;
|
|
}
|