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