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: extern void *__dso_handle __attribute__ ((__weak__));
   24: 
   25: int
   26: main (void)
   27: {
   28:   const char fname[] = "modcxaatexit.so";
   29:   void *h;
   30:   void (*fp) (void *);
   31:   int v = 0;
   32: 
   33:   if (&__dso_handle == NULL)
   34:     {
   35:       puts ("__dso_handle not available, cannot perform the test");
   36:       exit (0);
   37:     }
   38: 
   39:   h = dlopen (fname, RTLD_LAZY);
   40:   if (h == NULL)
   41:     {
   42:       printf ("cannot open \"%s\": %s\n", fname, dlerror ());
   43:       exit (1);
   44:     }
   45: 
   46:   fp = dlsym (h, "bar");
   47:   if (fp == NULL)
   48:     {
   49:       printf ("cannot find \"bar\": %s\n", dlerror ());
   50:       exit (1);
   51:     }
   52: 
   53:   fp (&v);
   54: 
   55:   if (dlclose (h) != 0)
   56:     {
   57:       printf ("cannot close \"%s\": %s\n", fname, dlerror ());
   58:       exit (1);
   59:     }
   60: 
   61:   if (v != 1)
   62:     {
   63:       puts ("module unload didn't change `v'");
   64:       exit (1);
   65:     }
   66: 
   67:   puts ("finishing now");
   68: 
   69:   return 0;
   70: }