1/* This testcase is part of GDB, the GNU debugger. 2 3 Copyright 2004, 2007, 2008, 2009, 2010, 2011 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 3 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, see <http://www.gnu.org/licenses/>. */ 17 18#include <stdio.h> 19#include <stdlib.h> 20 21#ifdef __WIN32__ 22#include <windows.h> 23#define dlopen(name, mode) LoadLibrary (TEXT (name)) 24#ifdef _WIN32_WCE 25# define dlsym(handle, func) GetProcAddress (handle, TEXT (func)) 26#else 27# define dlsym(handle, func) GetProcAddress (handle, func) 28#endif 29#define dlclose(handle) FreeLibrary (handle) 30#else 31#include <dlfcn.h> 32#endif 33 34int k = 0; 35 36int main() 37{ 38 void *handle; 39 int (*unloadshr) (int); 40 int y; 41 const char *msg; 42 43 handle = dlopen (SHLIB_NAME, RTLD_LAZY); 44 45 if (!handle) 46 { 47 fprintf (stderr, "%s\n", dlerror ()); 48 exit (1); 49 } 50 51 unloadshr = (int (*) (int)) dlsym (handle, "shrfunc1"); 52 53 if (!unloadshr) 54 { 55#ifdef __WIN32__ 56 fprintf (stderr, "error %d occurred\n", GetLastError ()); 57#else 58 fprintf (stderr, "%s\n", dlerror ()); 59#endif 60 exit (1); 61 } 62 63 y = (*unloadshr) (1); 64 65 dlclose (handle); 66 handle = NULL; /* y-set-1 */ 67 68 /* The second library should share the same memory address. */ 69 70 handle = dlopen (SHLIB_NAME2, RTLD_LAZY); 71 72 if (!handle) 73 { 74 fprintf (stderr, "%s\n", dlerror ()); 75 exit (1); 76 } 77 78 unloadshr = (int (*)(int)) dlsym (handle, "shrfunc2"); 79 80 if (!unloadshr) 81 { 82#ifdef __WIN32__ 83 fprintf (stderr, "error %d occurred\n", GetLastError ()); 84#else 85 fprintf (stderr, "%s\n", dlerror ()); 86#endif 87 exit (1); 88 } 89 90 y = (*unloadshr) (2); 91 92 dlclose (handle); 93 handle = NULL; /* y-set-2 */ 94 95 return 0; 96} 97