glibc/dlfcn/failtest.c
Ulrich Drepper d743ba1e9b Update.
2000-06-09  H.J. Lu  <hjl@gnu.org>

	* dlfcn/dlerror.c (_dlerror_run): Set result->errstring to NULL
	after freeing it.

	* dlfcn/Makefile (distribute): Add failtestmod.c.
	(tests): Add failtest.
	Add rules to build and run failtest.
	* dlfcn/failtest.c: New file.
	* dlfcn/failtestmod.c: New file.
2000-06-10 04:31:24 +00:00

59 lines
1.0 KiB
C

#include <dlfcn.h>
#include <stdio.h>
/* Number of rounds we perform the test. */
#define TEST_ROUNDS 10
static const char unknown[] = "a-file-with-this-name-does-not-exist";
static const char exists[] = "failtestmod.so";
int
main (void)
{
int i;
setvbuf (stdout, NULL, _IONBF, 0);
for (i = 0; i < TEST_ROUNDS; ++i)
{
void *dsc;
printf ("Round %d: Try loading \"%s\"\n", i, unknown);
dsc = dlopen (unknown, RTLD_NOW);
if (dsc != NULL)
{
printf ("We found a file of name \"%s\": this should not happen\n",
unknown);
return 1;
}
printf ("Round %d: loading \"%s\" failed\n", i, unknown);
/* Don't use `dlerror', just load an existing file. */
dsc = dlopen (exists, RTLD_NOW);
if (dsc == NULL)
{
printf ("Could not load \"%s\": %s\n", exists, dlerror ());
return 1;
}
printf ("Round %d: Loaded \"%s\"\n", i, exists);
dlclose (dsc);
printf ("Round %d: Unloaded \"%s\"\n", i, exists);
}
return 0;
}
void
foo (void)
{
}