source: trunk/src/kernel32/thread.cpp@ 811

Last change on this file since 811 was 705, checked in by sandervl, 26 years ago

Cleanup
File size: 7.5 KB
Line 
1/* $Id: thread.cpp,v 1.12 1999-08-26 12:55:37 sandervl Exp $ */
2
3/*
4 * Win32 Thread API functions
5 *
6 * Copyright 1998 Sander van Leeuwen (sandervl@xs4all.nl)
7 *
8 *
9 * Project Odin Software License can be found in LICENSE.TXT
10 *
11 */
12#include <os2win.h>
13#include <stdarg.h>
14#include "thread.h"
15#include "exceptutil.h"
16#include <misc.h>
17#include <wprocess.h>
18#include <windll.h>
19#include <winexe.h>
20#include <except.h>
21
22static DWORD OPEN32API Win32ThreadProc(LPVOID lpData);
23
24
25//******************************************************************************
26//******************************************************************************
27HANDLE WIN32API CreateThread(LPSECURITY_ATTRIBUTES lpsa, DWORD cbStack,
28 LPTHREAD_START_ROUTINE lpStartAddr,
29 LPVOID lpvThreadParm, DWORD fdwCreate,
30 LPDWORD lpIDThread)
31{
32 Win32Thread *winthread;
33
34 winthread = new Win32Thread(lpStartAddr, lpvThreadParm, fdwCreate);
35
36 if(winthread == 0)
37 return(0);
38
39 dprintf(("CreateThread (%08xh,%08xh,%08xh,%08xh,%08xh,%08xh)\n",
40 lpsa,
41 cbStack,
42 lpStartAddr,
43 lpvThreadParm,
44 fdwCreate,
45 lpIDThread));
46
47 return(O32_CreateThread(lpsa, cbStack, winthread->GetOS2Callback(), (LPVOID)winthread, fdwCreate, lpIDThread));
48}
49//******************************************************************************
50//******************************************************************************
51DWORD WIN32API GetCurrentThreadId()
52{
53//// dprintf(("GetCurrentThreadId\n"));
54 return(O32_GetCurrentThreadId());
55}
56//******************************************************************************
57//******************************************************************************
58HANDLE WIN32API GetCurrentThread()
59{
60//// dprintf(("GetCurrentThread\n"));
61 return(O32_GetCurrentThread());
62}
63//******************************************************************************
64//******************************************************************************
65BOOL WIN32API GetExitCodeThread(HANDLE hThread, LPDWORD arg2)
66{
67 dprintf(("GetExitCodeThread (%08xh,%08xh)\n",
68 hThread,
69 arg2));
70
71 return O32_GetExitCodeThread(hThread, arg2);
72}
73//******************************************************************************
74//******************************************************************************
75BOOL WIN32API TerminateThread(HANDLE hThread, DWORD arg2)
76{
77 dprintf(("TerminateThread (%08xh,%08xh)\n",
78 hThread,
79 arg2));
80
81 return O32_TerminateThread(hThread, arg2);
82}
83//******************************************************************************
84//******************************************************************************
85DWORD WIN32API ResumeThread(HANDLE hThread)
86{
87 dprintf(("ResumeThread (%08xh)\n",
88 hThread));
89
90 return O32_ResumeThread(hThread);
91}
92//******************************************************************************
93//******************************************************************************
94INT WIN32API GetThreadPriority(HANDLE hThread)
95{
96 dprintf(("OS2GetThreadPriority(%08xh)\n",
97 hThread));
98
99 return O32_GetThreadPriority(hThread);
100}
101//******************************************************************************
102//******************************************************************************
103DWORD WIN32API SuspendThread(HANDLE hThread)
104{
105 dprintf(("OS2SuspendThread %08xh)\n",
106 hThread));
107
108 return O32_SuspendThread(hThread);
109}
110//******************************************************************************
111//******************************************************************************
112BOOL WIN32API SetThreadPriority(HANDLE hThread, int priority)
113{
114 dprintf(("OS2SetThreadPriority (%08xh,%08xh)\n",
115 hThread,
116 priority));
117
118 return O32_SetThreadPriority(hThread, priority);
119}
120//******************************************************************************
121//TODO: Implement this??
122//******************************************************************************
123BOOL WIN32API GetThreadContext(HANDLE hThread, PCONTEXT lpContext)
124{
125 dprintf(("GetThreadContext NOT IMPLEMENTED!! (TRUE)\n"));
126 memset(lpContext, 0, sizeof(CONTEXT));
127 return TRUE;
128}
129//******************************************************************************
130//TODO: Implement this??
131//******************************************************************************
132BOOL WIN32API SetThreadContext(HANDLE hThread, const CONTEXT *lpContext)
133{
134 dprintf(("SetThreadContext NOT IMPLEMENTED!!\n"));
135
136 return FALSE;
137}
138//******************************************************************************
139//******************************************************************************
140VOID WIN32API ExitThread(DWORD exitcode)
141{
142 dprintf(("ExitThread (%08xu)\n",
143 exitcode));
144
145 Win32Dll::detachThreadFromAllDlls(); //send DLL_THREAD_DETACH message to all dlls
146 Win32Dll::tlsDetachThreadFromAllDlls(); //destroy TLS structures of all dlls
147 WinExe->tlsDetachThread(); //destroy TLS structure of main exe
148 DestroyTIB();
149 O32_ExitThread(exitcode);
150}
151//******************************************************************************
152//******************************************************************************
153Win32Thread::Win32Thread(LPTHREAD_START_ROUTINE pUserCallback, LPVOID lpData, DWORD dwFlags)
154{
155 lpUserData = lpData;
156 pCallback = pUserCallback;
157 this->dwFlags = dwFlags;
158}
159//******************************************************************************
160//******************************************************************************
161Win32Thread::~Win32Thread()
162{
163
164}
165//******************************************************************************
166//******************************************************************************
167PTHREAD_START_ROUTINE_O32 Win32Thread::GetOS2Callback()
168{
169 return Win32ThreadProc;
170}
171//******************************************************************************
172//******************************************************************************
173static DWORD OPEN32API Win32ThreadProc(LPVOID lpData)
174{
175 EXCEPTION_FRAME exceptFrame;
176 Win32Thread *me = (Win32Thread *)lpData;
177 WIN32THREADPROC winthread = me->pCallback;
178 LPVOID userdata = me->lpUserData;
179 DWORD rc;
180
181 delete(me); //only called once
182 dprintf(("Win32ThreadProc %d\n", GetCurrentThreadId()));
183
184 TEB *winteb = (TEB *)InitializeTIB();
185 if(winteb == NULL) {
186 dprintf(("Win32ThreadProc: InitializeTIB failed!!"));
187 DebugInt3();
188 return 0;
189 }
190 winteb->flags = me->dwFlags;
191
192 THDB *thdb = (THDB *)(winteb+1);
193 thdb->entry_point = (void *)winthread;
194 thdb->entry_arg = (void *)userdata;
195
196 SetWin32TIB();
197 WinExe->tlsAttachThread(); //setup TLS structure of main exe
198 Win32Dll::tlsAttachThreadToAllDlls(); //setup TLS structures of all dlls
199 Win32Dll::attachThreadToAllDlls(); //send DLL_THREAD_ATTACH message to all dlls
200
201 //Note: The Win32 exception structure references by FS:[0] is the same
202 // in OS/2
203 OS2SetExceptionHandler((void *)&exceptFrame);
204 rc = winthread(userdata);
205 OS2UnsetExceptionHandler((void *)&exceptFrame);
206
207 Win32Dll::detachThreadFromAllDlls(); //send DLL_THREAD_DETACH message to all dlls
208 Win32Dll::tlsDetachThreadFromAllDlls(); //destroy TLS structures of all dlls
209 WinExe->tlsDetachThread(); //destroy TLS structure of main exe
210 DestroyTIB();
211 return rc;
212}
213//******************************************************************************
214//******************************************************************************
Note: See TracBrowser for help on using the repository browser.