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 
34 int k = 0;
35 
main()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