1 /* This testcase is part of GDB, the GNU debugger. 2 3 Copyright 2004 Free Software Foundation, Inc. 4 5 This program is free software; you can redistribute it and/or modify 6 it under the terms of the GNU General Public License as published by 7 the Free Software Foundation; either version 2 of the License, or 8 (at your option) any later version. 9 10 This program 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 13 GNU General Public License for more details. 14 15 You should have received a copy of the GNU General Public License 16 along with this program; if not, write to the Free Software 17 Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */ 18 19 #include <stdio.h> 20 #include <stdlib.h> 21 #include <dlfcn.h> 22 23 int k = 0; 24 25 #define SHLIB_NAME SHLIB_DIR "/unloadshr.sl" 26 27 int main() 28 { 29 void *handle; 30 int (*unloadshr) (int); 31 int y; 32 const char *msg; 33 34 handle = dlopen (SHLIB_NAME, RTLD_LAZY); 35 msg = dlerror (); 36 37 if (!handle) 38 { 39 fprintf (stderr, msg); 40 exit (1); 41 } 42 43 unloadshr = (int (*)(int))dlsym (handle, "shrfunc1"); 44 45 if (!unloadshr) 46 { 47 fprintf (stderr, dlerror ()); 48 exit (1); 49 } 50 51 y = (*unloadshr)(3); 52 53 printf ("y is %d\n", y); 54 55 dlclose (handle); 56 57 return 0; 58 } 59