elf/loadtest.c

   1 #include <assert.h>
   2 #include <dlfcn.h>
   3 #include <errno.h>
   4 #include <error.h>
   5 #include <stdio.h>
   6 #include <stdlib.h>
   7
   8
   9 /* How many load/unload operations do we do.  */
  10 #define TEST_ROUNDS     1000
  11
  12
  13 static struct
  14 {
  15   /* Name of the module.  */
  16   const char *name;
  17   /* The handle.  */
  18   void *handle;
  19 } testobjs[] =
  20 {
  21   { "testobj1.so", NULL },
  22   { "testobj2.so", NULL },
  23   { "testobj3.so", NULL },
  24   { "testobj4.so", NULL },
  25   { "testobj5.so", NULL },
  26   { "testobj6.so", NULL },
  27 };
  28 #define NOBJS   (sizeof (testobjs) / sizeof (testobjs[0]))
  29
  30
  31 static const struct
  32 {
  33   /* Name of a function to call.  */
  34   const char *fname;
  35   /* Index in status and handle array.  */
  36   int index;
  37   /* Options while loading the module.  */
  38   int options;
  39 } tests[] =
  40 {
  41   { "obj1func2", 0, RTLD_LAZY },
  42   { "obj1func1", 0, RTLD_LAZY | RTLD_GLOBAL },
  43   { "obj1func1", 0, RTLD_NOW, },
  44   { "obj1func2", 0, RTLD_NOW | RTLD_GLOBAL },
  45   { "obj2func2", 1, RTLD_LAZY },
  46   { "obj2func1", 1, RTLD_LAZY | RTLD_GLOBAL, },
  47   { "obj2func1", 1, RTLD_NOW, },
  48   { "obj2func2", 1, RTLD_NOW | RTLD_GLOBAL },
  49   { "obj3func2", 2, RTLD_LAZY },
  50   { "obj3func1", 2, RTLD_LAZY | RTLD_GLOBAL },
  51   { "obj3func1", 2, RTLD_NOW },
  52   { "obj3func2", 2, RTLD_NOW | RTLD_GLOBAL },
  53   { "obj4func2", 3, RTLD_LAZY },
  54   { "obj4func1", 3, RTLD_LAZY | RTLD_GLOBAL },
  55   { "obj4func1", 3, RTLD_NOW },
  56   { "obj4func2", 3, RTLD_NOW | RTLD_GLOBAL },
  57   { "obj5func2", 4, RTLD_LAZY },
  58   { "obj5func1", 4, RTLD_LAZY | RTLD_GLOBAL },
  59   { "obj5func1", 4, RTLD_NOW },
  60   { "obj5func2", 4, RTLD_NOW | RTLD_GLOBAL },
  61   { "obj6func2", 5, RTLD_LAZY },
  62   { "obj6func1", 5, RTLD_LAZY | RTLD_GLOBAL },
  63   { "obj6func1", 5, RTLD_NOW },
  64   { "obj6func2", 5, RTLD_NOW | RTLD_GLOBAL },
  65 };
  66 #define NTESTS  (sizeof (tests) / sizeof (tests[0]))
  67
  68
  69 int
  70 main (void)
  71 {
  72   int count = TEST_ROUNDS;
  73
  74   /* Just a seed.  */
  75   srandom (TEST_ROUNDS);
  76
  77   while (count--)
  78     {
  79       int nr = random () % NTESTS;
  80       int index = tests[nr].index;
  81
  82       printf ("%4d: %4d: ", count + 1, nr);
  83       fflush (stdout);
  84
  85       if (testobjs[index].handle == NULL)
  86         {
  87           int (*fct) (int);
  88
  89           /* Load the object.  */
  90           testobjs[index].handle = dlopen (testobjs[index].name,
  91                                            tests[nr].options);
  92           if (testobjs[index].handle == NULL)
  93             error (EXIT_FAILURE, 0, "cannot load `%s': %s",
  94                    testobjs[index].name, dlerror ());
  95
  96           /* Test the function call.  */
  97           fct = dlsym (testobjs[index].handle, tests[nr].fname);
  98           if (fct == NULL)
  99             error (EXIT_FAILURE, 0,
 100                    "cannot get function `%s' from shared object `%s': %s",
 101                    tests[nr].fname, testobjs[index].name, dlerror ());
 102
 103           fct (10);
 104
 105           printf ("successfully loaded `%s'\n", testobjs[index].name);
 106         }
 107       else
 108         {
 109           dlclose (testobjs[index].handle);
 110           testobjs[index].handle = NULL;
 111
 112           printf ("successfully unloaded `%s'\n", testobjs[index].name);
 113         }
 114     }
 115
 116   /* Unload all loaded modules.  */
 117   for (count = 0; count < NOBJS; ++count)
 118     if (testobjs[count].handle != NULL)
 119       dlclose (testobjs[count].handle);
 120
 121   return 0;
 122 }
 123
 124
 125 int
 126 foo (int a)
 127 {
 128   return a - 1;
 129 }