|
1 /* |
|
2 SDL - Simple DirectMedia Layer |
|
3 Copyright (C) 1997-2006 Sam Lantinga |
|
4 |
|
5 This library is free software; you can redistribute it and/or |
|
6 modify it under the terms of the GNU Lesser General Public |
|
7 License as published by the Free Software Foundation; either |
|
8 version 2.1 of the License, or (at your option) any later version. |
|
9 |
|
10 This library 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 GNU |
|
13 Lesser General Public License for more details. |
|
14 |
|
15 You should have received a copy of the GNU Lesser General Public |
|
16 License along with this library; if not, write to the Free Software |
|
17 Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA |
|
18 |
|
19 Sam Lantinga |
|
20 slouken@libsdl.org |
|
21 */ |
|
22 #include "SDL_config.h" |
|
23 |
|
24 #ifdef SDL_LOADSO_WIN32 |
|
25 |
|
26 /* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */ |
|
27 /* System dependent library loading routines */ |
|
28 |
|
29 #define WIN32_LEAN_AND_MEAN |
|
30 #include <windows.h> |
|
31 |
|
32 #include "SDL_loadso.h" |
|
33 |
|
34 void *SDL_LoadObject(const char *sofile) |
|
35 { |
|
36 void *handle = NULL; |
|
37 const char *loaderror = "Unknown error"; |
|
38 |
|
39 #if defined(_WIN32_WCE) |
|
40 char errbuf[512]; |
|
41 |
|
42 wchar_t *errbuf_t = SDL_malloc(512 * sizeof(wchar_t)); |
|
43 wchar_t *sofile_t = SDL_malloc((MAX_PATH+1) * sizeof(wchar_t)); |
|
44 |
|
45 MultiByteToWideChar(CP_ACP, MB_PRECOMPOSED, sofile, -1, sofile_t, MAX_PATH); |
|
46 handle = (void *)LoadLibrary(sofile_t); |
|
47 |
|
48 /* Generate an error message if all loads failed */ |
|
49 if ( handle == NULL ) { |
|
50 FormatMessage((FORMAT_MESSAGE_IGNORE_INSERTS | |
|
51 FORMAT_MESSAGE_FROM_SYSTEM), |
|
52 NULL, GetLastError(), |
|
53 MAKELANGID(LANG_NEUTRAL, SUBLANG_DEFAULT), |
|
54 errbuf_t, SDL_arraysize(errbuf), NULL); |
|
55 WideCharToMultiByte(CP_ACP, 0, errbuf_t, -1, errbuf, 511, NULL, NULL); |
|
56 loaderror = errbuf; |
|
57 } |
|
58 |
|
59 SDL_free(sofile_t); |
|
60 SDL_free(errbuf_t); |
|
61 |
|
62 #else /*if defined(__WIN32__)*/ |
|
63 char errbuf[512]; |
|
64 |
|
65 handle = (void *)LoadLibrary(sofile); |
|
66 |
|
67 /* Generate an error message if all loads failed */ |
|
68 if ( handle == NULL ) { |
|
69 FormatMessage((FORMAT_MESSAGE_IGNORE_INSERTS | |
|
70 FORMAT_MESSAGE_FROM_SYSTEM), |
|
71 NULL, GetLastError(), |
|
72 MAKELANGID(LANG_NEUTRAL, SUBLANG_DEFAULT), |
|
73 errbuf, SDL_arraysize(errbuf), NULL); |
|
74 loaderror = errbuf; |
|
75 } |
|
76 #endif |
|
77 |
|
78 if ( handle == NULL ) { |
|
79 SDL_SetError("Failed loading %s: %s", sofile, loaderror); |
|
80 } |
|
81 return(handle); |
|
82 } |
|
83 |
|
84 void *SDL_LoadFunction(void *handle, const char *name) |
|
85 { |
|
86 void *symbol = NULL; |
|
87 const char *loaderror = "Unknown error"; |
|
88 |
|
89 #if defined(_WIN32_WCE) |
|
90 char errbuf[512]; |
|
91 int length = SDL_strlen(name); |
|
92 |
|
93 wchar_t *name_t = SDL_malloc((length + 1) * sizeof(wchar_t)); |
|
94 wchar_t *errbuf_t = SDL_malloc(512 * sizeof(wchar_t)); |
|
95 |
|
96 MultiByteToWideChar(CP_ACP, MB_PRECOMPOSED, name, -1, name_t, length); |
|
97 |
|
98 symbol = (void *)GetProcAddress((HMODULE)handle, name_t); |
|
99 if ( symbol == NULL ) { |
|
100 FormatMessage((FORMAT_MESSAGE_IGNORE_INSERTS | |
|
101 FORMAT_MESSAGE_FROM_SYSTEM), |
|
102 NULL, GetLastError(), |
|
103 MAKELANGID(LANG_NEUTRAL, SUBLANG_DEFAULT), |
|
104 errbuf_t, SDL_arraysize(errbuf), NULL); |
|
105 WideCharToMultiByte(CP_ACP, 0, errbuf_t, -1, errbuf, 511, NULL, NULL); |
|
106 loaderror = errbuf; |
|
107 } |
|
108 |
|
109 SDL_free(name_t); |
|
110 SDL_free(errbuf_t); |
|
111 |
|
112 #else /*if defined(WIN32)*/ |
|
113 char errbuf[512]; |
|
114 |
|
115 symbol = (void *)GetProcAddress((HMODULE)handle, name); |
|
116 if ( symbol == NULL ) { |
|
117 FormatMessage((FORMAT_MESSAGE_IGNORE_INSERTS | |
|
118 FORMAT_MESSAGE_FROM_SYSTEM), |
|
119 NULL, GetLastError(), |
|
120 MAKELANGID(LANG_NEUTRAL, SUBLANG_DEFAULT), |
|
121 errbuf, SDL_arraysize(errbuf), NULL); |
|
122 loaderror = errbuf; |
|
123 } |
|
124 #endif |
|
125 |
|
126 if ( symbol == NULL ) { |
|
127 SDL_SetError("Failed loading %s: %s", name, loaderror); |
|
128 } |
|
129 return(symbol); |
|
130 } |
|
131 |
|
132 void SDL_UnloadObject(void *handle) |
|
133 { |
|
134 if ( handle != NULL ) { |
|
135 FreeLibrary((HMODULE)handle); |
|
136 } |
|
137 } |
|
138 |
|
139 #endif /* SDL_LOADSO_WIN32 */ |