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: extern int found_in_mod2 (void);
   12: int
   13: found_in_mod2 (void)
   14: {
   15:   return 2;
   16: }
   17: 
   18: 
   19: extern int test_in_mod2 (int (*mainp)(int, char **));
   20: int
   21: test_in_mod2 (int (*mainp)(int, char **))
   22: {
   23:   int (*ifp) (void);
   24:   void *p;
   25:   int result = 0;
   26: 
   27:   /* Find function `main'.  */
   28:   p = dlsym (RTLD_DEFAULT, "main");
   29:   if (p == NULL)
   30:     {
   31:       printf ("%s: main not found\n", __FILE__);
   32:       result = 1;
   33:     }
   34:   else if ((int (*)(int, char **))p != mainp)
   35:     {
   36:       printf ("%s: wrong address returned for main\n", __FILE__);
   37:       result = 1;
   38:     }
   39:   else
   40:     printf ("%s: main correctly found\n", __FILE__);
   41: 
   42:   ifp = dlsym (RTLD_DEFAULT, "found_in_mod1");
   43:   if ((void *) ifp == NULL)
   44:     {
   45:       printf ("%s: found_in_mod1 not found\n", __FILE__);
   46:       result = 1;
   47:     }
   48:   else if (ifp () != 1)
   49:     {
   50:       printf ("%s: wrong address returned for found_in_mod1\n", __FILE__);
   51:       result = 1;
   52:     }
   53:   else
   54:     printf ("%s: found_in_mod1 correctly found\n", __FILE__);
   55: 
   56:   ifp = dlsym (RTLD_DEFAULT, "found_in_mod2");
   57:   if ((void *) ifp == NULL)
   58:     {
   59:       printf ("%s: found_in_mod2 not found\n", __FILE__);
   60:       result = 1;
   61:     }
   62:   else if (ifp () != 2)
   63:     {
   64:       printf ("%s: wrong address returned for found_in_mod2\n", __FILE__);
   65:       result = 1;
   66:     }
   67:   else
   68:     printf ("%s: found_in_mod2 correctly found\n", __FILE__);
   69: 
   70:   return result;
   71: }