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