dlfcn/defaultmod1.c

   1 #include <dlfcn.h>
   2 #include <stdio.h>
   3
   4 extern int found_in_mod1 (void);
   5 int
   6 found_in_mod1 (void)
   7 {
   8   return 1;
   9 }
  10
  11
  12 extern int test_in_mod1 (int (*mainp)(int, char **));
  13 int
  14 test_in_mod1 (int (*mainp)(int, char **))
  15 {
  16   int (*ifp) (void);
  17   void *p;
  18   int result = 0;
  19
  20   /* Find function `main'.  */
  21   p = dlsym (RTLD_DEFAULT, "main");
  22   if (p == NULL)
  23     {
  24       printf ("%s: main not found\n", __FILE__);
  25       result = 1;
  26     }
  27   else if ((int (*)(int, char **))p != mainp)
  28     {
  29       printf ("%s: wrong address returned for main\n", __FILE__);
  30       result = 1;
  31     }
  32   else
  33     printf ("%s: main correctly found\n", __FILE__);
  34
  35   ifp = dlsym (RTLD_DEFAULT, "found_in_mod1");
  36   if ((void *) ifp == NULL)
  37     {
  38       printf ("%s: found_in_mod1 not found\n", __FILE__);
  39       result = 1;
  40     }
  41   else if (ifp () != 1)
  42     {
  43       printf ("%s: wrong address returned for found_in_mod1\n", __FILE__);
  44       result = 1;
  45     }
  46   else
  47     printf ("%s: found_in_mod1 correctly found\n", __FILE__);
  48
  49   ifp = dlsym (RTLD_DEFAULT, "found_in_mod2");
  50   if ((void *) ifp == NULL)
  51     {
  52       printf ("%s: found_in_mod2 not found\n", __FILE__);
  53       result = 1;
  54     }
  55   else if (ifp () != 2)
  56     {
  57       printf ("%s: wrong address returned for found_in_mod2\n", __FILE__);
  58       result = 1;
  59     }
  60   else
  61     printf ("%s: found_in_mod2 correctly found\n", __FILE__);
  62
  63   return result;
  64 }