1 /* src/threads/thread.hpp - machine independent thread functions
3 Copyright (C) 2007, 2008
4 CACAOVM - Verein zur Foerderung der freien virtuellen Maschine CACAO
6 This file is part of CACAO.
8 This program is free software; you can redistribute it and/or
9 modify it under the terms of the GNU General Public License as
10 published by the Free Software Foundation; either version 2, or (at
11 your option) any later version.
13 This program is distributed in the hope that it will be useful, but
14 WITHOUT ANY WARRANTY; without even the implied warranty of
15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
16 General Public License for more details.
18 You should have received a copy of the GNU General Public License
19 along with this program; if not, write to the Free Software
20 Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
33 // Include early to get threadobject.
34 #if defined(ENABLE_THREADS)
35 # include "threads/posix/thread-posix.hpp"
37 # include "threads/none/thread-none.h"
42 #include "native/llni.h"
44 #include "threads/mutex.hpp"
46 #include "vm/global.h"
50 /* only define the following stuff with thread enabled ************************/
52 #if defined(ENABLE_THREADS)
54 /* thread states **************************************************************/
56 #define THREAD_STATE_NEW 0
57 #define THREAD_STATE_RUNNABLE 1
58 #define THREAD_STATE_BLOCKED 2
59 #define THREAD_STATE_WAITING 3
60 #define THREAD_STATE_TIMED_WAITING 4
61 #define THREAD_STATE_TERMINATED 5
62 #define THREAD_STATE_PARKED 6
63 #define THREAD_STATE_TIMED_PARKED 7
66 /* thread priorities **********************************************************/
68 #define MIN_PRIORITY 1
69 #define NORM_PRIORITY 5
70 #define MAX_PRIORITY 10
73 /* debug **********************************************************************/
76 # define DEBUGTHREADS(message, thread) \
78 if (opt_DebugThreads) { \
79 printf("[Thread %-16s: ", message); \
80 thread_print_info(thread); \
85 # define DEBUGTHREADS(message, thread)
89 /* global variables ***********************************************************/
91 #if defined(__LINUX__)
92 /* XXX Remove for exact-GC. */
93 extern bool threads_pthreads_implementation_nptl;
101 /* inline functions ***********************************************************/
103 /* thread_get_object ***********************************************************
105 Return the Java for the given thread.
113 *******************************************************************************/
115 inline static java_handle_t *thread_get_object(threadobject *t)
117 return LLNI_WRAP(t->object);
121 /* threads_thread_set_object ***************************************************
123 Set the Java object for the given thread.
129 *******************************************************************************/
131 inline static void thread_set_object(threadobject *t, java_handle_t *o)
133 t->object = LLNI_DIRECT(o);
137 /* thread_get_current_object **************************************************
139 Return the Java object of the current thread.
144 *******************************************************************************/
146 inline static java_handle_t *thread_get_current_object(void)
152 o = thread_get_object(t);
158 /* cacaothread_get_state *******************************************************
160 Returns the current state of the given thread.
163 t ... the thread to check
168 *******************************************************************************/
170 inline static int cacaothread_get_state(threadobject *t)
176 /* thread_is_attached **********************************************************
178 Returns if the given thread is attached to the VM.
181 t ... the thread to check
184 true .... the thread is attached to the VM
185 false ... the thread is not
187 *******************************************************************************/
189 inline static bool thread_is_attached(threadobject *t)
193 o = thread_get_object(t);
202 /* thread_is_interrupted *******************************************************
204 Check if the given thread has been interrupted.
207 t ... the thread to check
210 true, if the given thread had been interrupted
212 *******************************************************************************/
214 inline static bool thread_is_interrupted(threadobject *t)
218 /* We need the mutex because classpath will call this function when
219 a blocking system call is interrupted. The mutex ensures that it will
220 see the correct value for the interrupted flag. */
223 t->waitmutex->lock();
224 interrupted = t->interrupted;
225 t->waitmutex->unlock();
227 Mutex_lock(t->waitmutex);
228 interrupted = t->interrupted;
229 Mutex_unlock(t->waitmutex);
236 /* thread_set_interrupted ******************************************************
238 Set the interrupted flag to the given value.
241 interrupted ... value to set
243 *******************************************************************************/
245 inline static void thread_set_interrupted(threadobject *t, bool interrupted)
248 t->waitmutex->lock();
249 t->interrupted = interrupted;
250 t->waitmutex->unlock();
252 Mutex_lock(t->waitmutex);
253 t->interrupted = interrupted;
254 Mutex_unlock(t->waitmutex);
259 /* thread_is_daemon ************************************************************
261 Returns if the given thread is a daemon thread.
264 t ... the thread to check
267 true .... the thread is a daemon thread
268 false ... the thread is not
270 *******************************************************************************/
272 inline static bool thread_is_daemon(threadobject *t)
274 if (t->flags & THREAD_FLAG_DAEMON)
281 /* thread_current_is_attached **************************************************
283 Returns if the current thread is attached to the VM.
286 true .... the thread is attached to the VM
287 false ... the thread is not
289 *******************************************************************************/
291 inline static bool thread_current_is_attached(void)
296 t = thread_get_current();
301 result = thread_is_attached(t);
307 /* function prototypes ********************************************************/
309 void threads_preinit(void);
310 void threads_init(void);
312 void thread_free(threadobject *t);
314 bool threads_thread_start_internal(utf *name, functionptr f);
315 void threads_thread_start(java_handle_t *object);
317 bool thread_attach_current_thread(JavaVMAttachArgs *vm_aargs, bool isdaemon);
318 bool thread_attach_current_external_thread(JavaVMAttachArgs *vm_aargs, bool isdaemon);
319 bool thread_detach_current_thread(void);
321 bool thread_detach_current_external_thread(void);
323 void thread_fprint_name(threadobject *t, FILE *stream);
324 void thread_print_info(threadobject *t);
326 intptr_t threads_get_current_tid(void);
328 void thread_set_state_runnable(threadobject *t);
329 void thread_set_state_waiting(threadobject *t);
330 void thread_set_state_timed_waiting(threadobject *t);
331 void thread_set_state_parked(threadobject *t);
332 void thread_set_state_timed_parked(threadobject *t);
333 void thread_set_state_terminated(threadobject *t);
335 threadobject *thread_get_thread(java_handle_t *h);
337 bool threads_thread_is_alive(threadobject *t);
340 /* implementation specific functions */
342 void threads_impl_preinit(void);
343 void threads_impl_init(void);
345 #if defined(ENABLE_GC_CACAO)
346 void threads_mutex_gc_lock(void);
347 void threads_mutex_gc_unlock(void);
350 void threads_mutex_join_lock(void);
351 void threads_mutex_join_unlock(void);
353 void threads_impl_thread_clear(threadobject *t);
354 void threads_impl_thread_reuse(threadobject *t);
355 void threads_impl_thread_free(threadobject *t);
356 void threads_impl_thread_start(threadobject *thread, functionptr f);
358 void threads_yield(void);
364 #endif /* ENABLE_THREADS */
366 #endif // _THREAD_HPP
370 * These are local overrides for various environment variables in Emacs.
371 * Please do not remove this and leave it at the end of the file, where
372 * Emacs will automagically detect them.
373 * ---------------------------------------------------------------------
376 * indent-tabs-mode: t
380 * vim:noexpandtab:sw=4:ts=4: