1/*
2    SDL - Simple DirectMedia Layer
3    Copyright (C) 1997-2012 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
35typedef struct ThreadStartParms
36{
37  void *args;
38  pfnSDL_CurrentEndThread pfnCurrentEndThread;
39} tThreadStartParms, *pThreadStartParms;
40
41static 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
60int 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
83void SDL_SYS_SetupThread(void)
84{
85  return;
86}
87
88DECLSPEC Uint32 SDLCALL SDL_ThreadID(void)
89{
90  PTIB tib;
91  DosGetInfoBlocks(&tib, NULL);
92  return((Uint32) (tib->tib_ptib2->tib2_ultid));
93}
94
95void 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 */
105void SDL_SYS_KillThread(SDL_Thread *thread)
106{
107  DosKillThread(thread->handle);
108}
109