1 /* This testcase is part of GDB, the GNU debugger. 2 3 Copyright 2004-2015 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 34 int k = 0; 35 36 int 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