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: }