dlfcn/glrefmain.c

   1 /* Test for dependency tracking  added by relocations.
   2    Copyright (C) 2000 Free Software Foundation, Inc.
   3    This file is part of the GNU C Library.
   4
   5    The GNU C Library is free software; you can redistribute it and/or
   6    modify it under the terms of the GNU Library General Public License as
   7    published by the Free Software Foundation; either version 2 of the
   8    License, or (at your option) any later version.
   9
  10    The GNU C Library is distributed in the hope that it will be useful,
  11    but WITHOUT ANY WARRANTY; without even the implied warranty of
  12    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  13    Library General Public License for more details.
  14
  15    You should have received a copy of the GNU Library General Public
  16    License along with the GNU C Library; see the file COPYING.LIB.  If not,
  17    write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
  18    Boston, MA 02111-1307, USA.  */
  19
  20 #include <dlfcn.h>
  21 #include <error.h>
  22 #include <errno.h>
  23 #include <stdio.h>
  24 #include <stdlib.h>
  25
  26
  27 static void *
  28 load (const char *name)
  29 {
  30   void *d = dlopen (name, RTLD_LAZY | RTLD_GLOBAL);
  31   if (d == NULL)
  32     error (EXIT_FAILURE, errno, "cannot load `%s'", name);
  33   return d;
  34 }
  35
  36
  37 #define TEST_FUNCTION do_test ()
  38 int
  39 do_test (void)
  40 {
  41   void *d1;
  42   void *d2;
  43   int (*f) (void);
  44
  45   d1 = load ("glreflib1.so");
  46   d2 = load ("glreflib2.so");
  47
  48   f = dlsym (d2, "ref2");
  49   if (f == NULL)
  50     error (EXIT_FAILURE, errno, "cannot get pointer to `%s'", "ref2");
  51
  52   if (f () != 42)
  53     error (EXIT_FAILURE, 0, "wrong result from `%s'", "ref2");
  54
  55   puts ("Correct result in first call");
  56   fflush (stdout);
  57
  58   /* Now unload the first file.  */
  59   dlclose (d1);
  60
  61   puts ("About to call the second time");
  62   fflush (stdout);
  63
  64   /* Try calling the function again.  */
  65   if (f () != 42)
  66     error (EXIT_FAILURE, 0, "wrong result from `%s' (second call)", "ref2");
  67
  68   puts ("Second call succeeded!");
  69   fflush (stdout);
  70
  71   dlclose (d2);
  72
  73   puts ("glreflib2 also closed");
  74   fflush (stdout);
  75
  76   return 0;
  77 }
  78
  79 #include "../test-skeleton.c"