SDL.c
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
11
12
This library is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
13
Lesser General Public License for more details.
15
16
17
You should have received a copy of the GNU Lesser General Public
License along with this library; if not, write to the Free Software
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
25
26
27
/* Initialization code for SDL */
#include "SDL.h"
#include "SDL_fatal.h"
28
29
30
31
32
33
#if !SDL_VIDEO_DISABLED
#include "video/SDL_leaks.h"
#endif
#if SDL_THREAD_PTH
#include <pth.h>
34
35
36
#endif
/* Initialization/Cleanup routines */
37
#if !SDL_JOYSTICK_DISABLED
38
39
40
extern int SDL_JoystickInit(void);
extern void SDL_JoystickQuit(void);
#endif
41
#if !SDL_CDROM_DISABLED
42
43
44
extern int SDL_CDROMInit(void);
extern void SDL_CDROMQuit(void);
#endif
45
#if !SDL_TIMERS_DISABLED
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
extern void SDL_StartTicks(void);
extern int SDL_TimerInit(void);
extern void SDL_TimerQuit(void);
#endif
/* The current SDL version */
static SDL_version version =
{ SDL_MAJOR_VERSION, SDL_MINOR_VERSION, SDL_PATCHLEVEL };
/* The initialized subsystems */
static Uint32 SDL_initialized = 0;
static Uint32 ticks_started = 0;
#ifdef CHECK_LEAKS
int surfaces_allocated = 0;
#endif
int SDL_InitSubSystem(Uint32 flags)
{
65
#if !SDL_VIDEO_DISABLED
66
67
/* Initialize the video/event subsystem */
if ( (flags & SDL_INIT_VIDEO) && !(SDL_initialized & SDL_INIT_VIDEO) ) {
68
if ( SDL_VideoInit(SDL_getenv("SDL_VIDEODRIVER"),
69
70
71
72
73
74
75
76
77
78
79
80
(flags&SDL_INIT_EVENTTHREAD)) < 0 ) {
return(-1);
}
SDL_initialized |= SDL_INIT_VIDEO;
}
#else
if ( flags & SDL_INIT_VIDEO ) {
SDL_SetError("SDL not built with video support");
return(-1);
}
#endif
81
#if !SDL_AUDIO_DISABLED
82
83
/* Initialize the audio subsystem */
if ( (flags & SDL_INIT_AUDIO) && !(SDL_initialized & SDL_INIT_AUDIO) ) {
84
if ( SDL_AudioInit(SDL_getenv("SDL_AUDIODRIVER")) < 0 ) {
85
86
87
88
89
90
91
92
93
94
95
return(-1);
}
SDL_initialized |= SDL_INIT_AUDIO;
}
#else
if ( flags & SDL_INIT_AUDIO ) {
SDL_SetError("SDL not built with audio support");
return(-1);
}
#endif
96
#if !SDL_TIMERS_DISABLED
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
/* Initialize the timer subsystem */
if ( ! ticks_started ) {
SDL_StartTicks();
ticks_started = 1;
}
if ( (flags & SDL_INIT_TIMER) && !(SDL_initialized & SDL_INIT_TIMER) ) {
if ( SDL_TimerInit() < 0 ) {
return(-1);
}
SDL_initialized |= SDL_INIT_TIMER;
}
#else
if ( flags & SDL_INIT_TIMER ) {
SDL_SetError("SDL not built with timer support");
return(-1);
}
#endif
115
#if !SDL_JOYSTICK_DISABLED
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
/* Initialize the joystick subsystem */
if ( (flags & SDL_INIT_JOYSTICK) &&
!(SDL_initialized & SDL_INIT_JOYSTICK) ) {
if ( SDL_JoystickInit() < 0 ) {
return(-1);
}
SDL_initialized |= SDL_INIT_JOYSTICK;
}
#else
if ( flags & SDL_INIT_JOYSTICK ) {
SDL_SetError("SDL not built with joystick support");
return(-1);
}
#endif
131
#if !SDL_CDROM_DISABLED
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
/* Initialize the CD-ROM subsystem */
if ( (flags & SDL_INIT_CDROM) && !(SDL_initialized & SDL_INIT_CDROM) ) {
if ( SDL_CDROMInit() < 0 ) {
return(-1);
}
SDL_initialized |= SDL_INIT_CDROM;
}
#else
if ( flags & SDL_INIT_CDROM ) {
SDL_SetError("SDL not built with cdrom support");
return(-1);
}
#endif
return(0);
}
int SDL_Init(Uint32 flags)
{
150
#if !SDL_THREADS_DISABLED && SDL_THREAD_PTH
151
152
153
154
155
if (!pth_init()) {
return -1;
}
#endif
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
/* Clear the error message */
SDL_ClearError();
/* Initialize the desired subsystems */
if ( SDL_InitSubSystem(flags) < 0 ) {
return(-1);
}
/* Everything is initialized */
if ( !(flags & SDL_INIT_NOPARACHUTE) ) {
SDL_InstallParachute();
}
return(0);
}
void SDL_QuitSubSystem(Uint32 flags)
{
/* Shut down requested initialized subsystems */
174
#if !SDL_CDROM_DISABLED
175
176
177
178
179
if ( (flags & SDL_initialized & SDL_INIT_CDROM) ) {
SDL_CDROMQuit();
SDL_initialized &= ~SDL_INIT_CDROM;
}
#endif
180
#if !SDL_JOYSTICK_DISABLED
181
182
183
184
185
if ( (flags & SDL_initialized & SDL_INIT_JOYSTICK) ) {
SDL_JoystickQuit();
SDL_initialized &= ~SDL_INIT_JOYSTICK;
}
#endif
186
#if !SDL_TIMERS_DISABLED
187
188
189
190
191
if ( (flags & SDL_initialized & SDL_INIT_TIMER) ) {
SDL_TimerQuit();
SDL_initialized &= ~SDL_INIT_TIMER;
}
#endif
192
#if !SDL_AUDIO_DISABLED
193
194
195
196
197
if ( (flags & SDL_initialized & SDL_INIT_AUDIO) ) {
SDL_AudioQuit();
SDL_initialized &= ~SDL_INIT_AUDIO;
}
#endif
198
#if !SDL_VIDEO_DISABLED
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
if ( (flags & SDL_initialized & SDL_INIT_VIDEO) ) {
SDL_VideoQuit();
SDL_initialized &= ~SDL_INIT_VIDEO;
}
#endif
}
Uint32 SDL_WasInit(Uint32 flags)
{
if ( ! flags ) {
flags = SDL_INIT_EVERYTHING;
}
return (SDL_initialized&flags);
}
void SDL_Quit(void)
{
/* Quit all subsystems */
217
218
219
#ifdef DEBUG_BUILD
printf("[SDL_Quit] : Enter! Calling QuitSubSystem()\n"); fflush(stdout);
#endif
220
221
222
SDL_QuitSubSystem(SDL_INIT_EVERYTHING);
#ifdef CHECK_LEAKS
223
224
225
226
#ifdef DEBUG_BUILD
printf("[SDL_Quit] : CHECK_LEAKS\n"); fflush(stdout);
#endif
227
228
229
230
231
232
/* Print the number of surfaces not freed */
if ( surfaces_allocated != 0 ) {
fprintf(stderr, "SDL Warning: %d SDL surfaces extant\n",
surfaces_allocated);
}
#endif
233
234
235
#ifdef DEBUG_BUILD
printf("[SDL_Quit] : SDL_UninstallParachute()\n"); fflush(stdout);
#endif
236
237
238
/* Uninstall any parachute signal handlers */
SDL_UninstallParachute();
240
#if !SDL_THREADS_DISABLED && SDL_THREAD_PTH
241
242
pth_kill();
#endif
243
244
245
246
#ifdef DEBUG_BUILD
printf("[SDL_Quit] : Returning!\n"); fflush(stdout);
#endif
247
248
249
250
251
252
253
254
}
/* Return the library version number */
const SDL_version * SDL_Linked_Version(void)
{
return(&version);
}
255
#if defined(__OS2__)
256
/* Building for OS/2 */
257
258
259
260
261
262
#ifdef __WATCOMC__
#define INCL_DOSERRORS
#define INCL_DOSEXCEPTIONS
#include <os2.h>
263
/* Exception handler to prevent the Audio thread hanging, making a zombie process! */
264
265
266
267
268
269
270
271
272
273
274
275
ULONG _System SDL_Main_ExceptionHandler(PEXCEPTIONREPORTRECORD pERepRec,
PEXCEPTIONREGISTRATIONRECORD pERegRec,
PCONTEXTRECORD pCtxRec,
PVOID p)
{
if (pERepRec->fHandlerFlags & EH_EXIT_UNWIND)
return XCPT_CONTINUE_SEARCH;
if (pERepRec->fHandlerFlags & EH_UNWINDING)
return XCPT_CONTINUE_SEARCH;
if (pERepRec->fHandlerFlags & EH_NESTED_CALL)
return XCPT_CONTINUE_SEARCH;
276
/* Do cleanup at every fatal exception! */
277
278
279
280
281
282
283
if (((pERepRec->ExceptionNum & XCPT_SEVERITY_CODE) == XCPT_FATAL_EXCEPTION) &&
(pERepRec->ExceptionNum != XCPT_BREAKPOINT) &&
(pERepRec->ExceptionNum != XCPT_SINGLE_STEP)
)
{
if (SDL_initialized & SDL_INIT_AUDIO)
{
284
/* This removes the zombie audio thread in case of emergency. */
285
286
287
288
289
290
291
292
293
294
295
296
#ifdef DEBUG_BUILD
printf("[SDL_Main_ExceptionHandler] : Calling SDL_CloseAudio()!\n");
#endif
SDL_CloseAudio();
}
}
return (XCPT_CONTINUE_SEARCH);
}
EXCEPTIONREGISTRATIONRECORD SDL_Main_xcpthand = {0, SDL_Main_ExceptionHandler};
297
/* The main DLL entry for DLL Initialization and Uninitialization: */
298
299
300
301
302
unsigned _System LibMain(unsigned hmod, unsigned termination)
{
if (termination)
{
#ifdef DEBUG_BUILD
303
/* printf("[SDL DLL Unintialization] : Removing exception handler\n"); */
304
305
306
307
308
309
#endif
DosUnsetExceptionHandler(&SDL_Main_xcpthand);
return 1;
} else
{
#ifdef DEBUG_BUILD
310
/* Make stdout and stderr unbuffered! */
311
312
313
setbuf(stdout, NULL);
setbuf(stderr, NULL);
#endif
314
/* Fire up exception handler */
315
#ifdef DEBUG_BUILD
316
/* printf("[SDL DLL Initialization] : Setting exception handler\n"); */
317
#endif
318
/* Set exception handler */
319
320
321
322
323
DosSetExceptionHandler(&SDL_Main_xcpthand);
return 1;
}
}
324
#endif /* __WATCOMC__ */
325
326
#elif defined(__WIN32__)
328
329
#if !defined(HAVE_LIBC) || (defined(__WATCOMC__) && defined(BUILD_DLL))
/* Need to include DllMain() on Watcom C for some reason.. */
330
331
#define WIN32_LEAN_AND_MEAN
#include <windows.h>
332
333
334
335
336
337
338
339
340
341
342
343
344
345
BOOL APIENTRY _DllMainCRTStartup( HANDLE hModule,
DWORD ul_reason_for_call,
LPVOID lpReserved )
{
switch (ul_reason_for_call) {
case DLL_PROCESS_ATTACH:
case DLL_THREAD_ATTACH:
case DLL_THREAD_DETACH:
case DLL_PROCESS_DETACH:
break;
}
return TRUE;
}
346
#endif /* building DLL with Watcom C */
348
#endif /* OS/2 elif __WIN32__ */