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 /* 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 }