1: /* Copyright (C) 2001 Free Software Foundation, Inc.
    2:    This file is part of the GNU C Library.
    3: 
    4:    The GNU C Library is free software; you can redistribute it and/or
    5:    modify it under the terms of the GNU Lesser General Public
    6:    License as published by the Free Software Foundation; either
    7:    version 2.1 of the License, or (at your option) any later version.
    8: 
    9:    The GNU C Library is distributed in the hope that it will be useful,
   10:    but WITHOUT ANY WARRANTY; without even the implied warranty of
   11:    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
   12:    Lesser General Public License for more details.
   13: 
   14:    You should have received a copy of the GNU Lesser General Public
   15:    License along with the GNU C Library; if not, write to the Free
   16:    Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
   17:    02111-1307 USA.  */
   18: 
   19: #include <dlfcn.h>
   20: #include <stdio.h>
   21: #include <stdlib.h>
   22: 
   23: 
   24: extern void *__dso_handle __attribute__ ((__weak__));
   25: 
   26: int
   27: main (void)
   28: {
   29:   const char fname[] = "modatexit.so";
   30:   void *h;
   31:   void (*fp) (void *);
   32:   int v = 0;
   33: 
   34:   if (&__dso_handle == NULL)
   35:     {
   36:       puts ("__dso_handle not available, cannot perform the test");
   37:       exit (0);
   38:     }
   39: 
   40:   h = dlopen (fname, RTLD_NOW);
   41:   if (h == NULL)
   42:     {
   43:       printf ("cannot open \"%s\": %s\n", fname, dlerror ());
   44:       exit (1);
   45:     }
   46: 
   47:   fp = dlsym (h, "foo");
   48:   if (fp == NULL)
   49:     {
   50:       printf ("cannot find \"foo\": %s\n", dlerror ());
   51:       exit (1);
   52:     }
   53: 
   54:   fp (&v);
   55: 
   56:   if (dlclose (h) != 0)
   57:     {
   58:       printf ("cannot close \"%s\": %s\n", fname, dlerror ());
   59:       exit (1);
   60:     }
   61: 
   62:   if (v != 1)
   63:     {
   64:       puts ("module unload didn't change `v'");
   65:       exit (1);
   66:     }
   67: 
   68:   puts ("finishing now");
   69: 
   70:   return 0;
   71: }