Home | History | Annotate | Download | only in os2
      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 (at) libsdl.org
     21 */
     22 #include "SDL_config.h"
     23 
     24 /* OS/2 thread management routines for SDL */
     25 
     26 #include <process.h>
     27 #define INCL_DOSERRORS
     28 #define INCL_DOSPROCESS
     29 #include <os2.h>
     30 
     31 #include "SDL_thread.h"
     32 #include "../SDL_systhread.h"
     33 #include "../SDL_thread_c.h"
     34 
     35 typedef struct ThreadStartParms
     36 {
     37   void *args;
     38   pfnSDL_CurrentEndThread pfnCurrentEndThread;
     39 } tThreadStartParms, *pThreadStartParms;
     40 
     41 static void threadfunc(void *pparm)
     42 {
     43   pThreadStartParms pThreadParms = pparm;
     44   pfnSDL_CurrentEndThread pfnCurrentEndThread = NULL;
     45 
     46   // Call the thread function!
     47   SDL_RunThread(pThreadParms->args);
     48 
     49   // Get the current endthread we have to use!
     50   if (pThreadParms)
     51   {
     52     pfnCurrentEndThread = pThreadParms->pfnCurrentEndThread;
     53     SDL_free(pThreadParms);
     54   }
     55   // Call endthread!
     56   if (pfnCurrentEndThread)
     57     (*pfnCurrentEndThread)();
     58 }
     59 
     60 int SDL_SYS_CreateThread(SDL_Thread *thread, void *args, pfnSDL_CurrentBeginThread pfnBeginThread, pfnSDL_CurrentEndThread pfnEndThread)
     61 {
     62   pThreadStartParms pThreadParms = SDL_malloc(sizeof(tThreadStartParms));
     63   if (!pThreadParms)
     64   {
     65     SDL_SetError("Not enough memory to create thread");
     66     return(-1);
     67   }
     68 
     69   // Save the function which we will have to call to clear the RTL of calling app!
     70   pThreadParms->pfnCurrentEndThread = pfnEndThread;
     71   // Also save the real parameters we have to pass to thread function
     72   pThreadParms->args = args;
     73   // Start the thread using the runtime library of calling app!
     74   thread->threadid = thread->handle = (*pfnBeginThread)(threadfunc, NULL, 512*1024, pThreadParms);
     75   if ((int)thread->threadid <= 0)
     76   {
     77     SDL_SetError("Not enough resources to create thread");
     78     return(-1);
     79   }
     80   return(0);
     81 }
     82 
     83 void SDL_SYS_SetupThread(void)
     84 {
     85   return;
     86 }
     87 
     88 DECLSPEC Uint32 SDLCALL SDL_ThreadID(void)
     89 {
     90   PTIB tib;
     91   DosGetInfoBlocks(&tib, NULL);
     92   return((Uint32) (tib->tib_ptib2->tib2_ultid));
     93 }
     94 
     95 void SDL_SYS_WaitThread(SDL_Thread *thread)
     96 {
     97   TID tid = thread->handle;
     98   DosWaitThread(&tid, DCWW_WAIT);
     99 }
    100 
    101 /* WARNING: This function is really a last resort.
    102  * Threads should be signaled and then exit by themselves.
    103  * TerminateThread() doesn't perform stack and DLL cleanup.
    104  */
    105 void SDL_SYS_KillThread(SDL_Thread *thread)
    106 {
    107   DosKillThread(thread->handle);
    108 }
    109