Blame elf/tst-pathopt.c

Packit 6c4009
#include <dlfcn.h>
Packit 6c4009
#include <mcheck.h>
Packit 6c4009
#include <stdio.h>
Packit 6c4009
#include <stdlib.h>
Packit 6c4009
Packit 6c4009
Packit 6c4009
static int
Packit 6c4009
do_test (void)
Packit 6c4009
{
Packit 6c4009
  void *h;
Packit 6c4009
  int (*fp) (int);
Packit 6c4009
  int result;
Packit 6c4009
Packit 6c4009
  mtrace ();
Packit 6c4009
Packit 6c4009
  h = dlopen ("renamed.so", RTLD_LAZY);
Packit 6c4009
  if (h == NULL)
Packit 6c4009
    {
Packit 6c4009
      printf ("failed to load \"%s\": %s\n", "renamed.so", dlerror ());
Packit 6c4009
      exit (1);
Packit 6c4009
    }
Packit 6c4009
Packit 6c4009
  fp = dlsym (h, "in_renamed");
Packit 6c4009
  if (fp == NULL)
Packit 6c4009
    {
Packit 6c4009
      printf ("lookup of \"%s\" failed: %s\n", "in_renamed", dlerror ());
Packit 6c4009
      exit (1);
Packit 6c4009
    }
Packit 6c4009
Packit 6c4009
  result = fp (10);
Packit 6c4009
Packit 6c4009
  if (dlclose (h) != 0)
Packit 6c4009
    {
Packit 6c4009
      printf ("failed to close \"%s\": %s\n", "renamed.so", dlerror ());
Packit 6c4009
      exit (1);
Packit 6c4009
    }
Packit 6c4009
Packit 6c4009
  return result;
Packit 6c4009
}
Packit 6c4009
Packit 6c4009
#include <support/test-driver.c>