diff -r 000000000000 -r e4d67989cc36 glib/libgthread/src/gthread-impl.c --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/glib/libgthread/src/gthread-impl.c Tue Feb 02 02:01:42 2010 +0200 @@ -0,0 +1,405 @@ +/* GLIB - Library of useful routines for C programming + * Copyright (C) 1995-1997 Peter Mattis, Spencer Kimball and Josh MacDonald + * + * gthread.c: thread related functions + * Copyright 1998 Sebastian Wilhelmi; University of Karlsruhe + * Portions copyright (c) 2006 Nokia Corporation. All rights reserved. + * + * This library is free software; you can redistribute it and/or + * modify it under the terms of the GNU Lesser General Public + * License as published by the Free Software Foundation; either + * version 2 of the License, or (at your option) any later version. + * + * This library is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU + * Lesser General Public License for more details. + * + * You should have received a copy of the GNU Lesser General Public + * License along with this library; if not, write to the + * Free Software Foundation, Inc., 59 Temple Place - Suite 330, + * Boston, MA 02111-1307, USA. + */ + +/* + * Modified by the GLib Team and others 1997-2000. See the AUTHORS + * file for a list of people on the GLib Team. See the ChangeLog + * files for a list of changes. These files are distributed with + * GLib at ftp://ftp.gtk.org/pub/gtk/. + */ + +/* + * MT safe + */ + +#ifdef HAVE_CONFIG_H +#include +#endif + +#include +#include + +#ifdef __SYMBIAN32__ +#include +#include +#endif /* __SYMBIAN32__ */ +#ifdef G_THREADS_ENABLED + +#if EMULATOR + +PLS(thread_system_already_initialized,gthread_impl,gboolean) +PLS_ARRAY(g_thread_priority_map,gthread_impl,gint) + +#define thread_system_already_initialized (*FUNCTION_NAME(thread_system_already_initialized,gthread_impl)()) +#define g_thread_priority_map (FUNCTION_NAME(g_thread_priority_map,gthread_impl)()) + +#else + +static gboolean thread_system_already_initialized = FALSE; +static gint g_thread_priority_map [G_THREAD_PRIORITY_URGENT + 1]; + +#endif /* EMULATOR */ + +#include G_THREAD_SOURCE + +#ifndef PRIORITY_LOW_VALUE +# define PRIORITY_LOW_VALUE 0 +#endif + +#ifndef PRIORITY_URGENT_VALUE +# define PRIORITY_URGENT_VALUE 0 +#endif + +#ifndef PRIORITY_NORMAL_VALUE +# define PRIORITY_NORMAL_VALUE \ + ((PRIORITY_LOW_VALUE * 6 + PRIORITY_URGENT_VALUE * 4) / 10) +#endif /* PRIORITY_NORMAL_VALUE */ + +#ifndef PRIORITY_HIGH_VALUE +# define PRIORITY_HIGH_VALUE \ + ((PRIORITY_NORMAL_VALUE + PRIORITY_URGENT_VALUE * 2) / 3) +#endif /* PRIORITY_HIGH_VALUE */ + +void g_mutex_init (void); +void g_mem_init (void); +void g_messages_init (void); +void g_convert_init (void); +void g_rand_init (void); +void g_main_thread_init (void); + +#define G_MUTEX_DEBUG_INFO(mutex) (*((gpointer*)(((char*)mutex)+G_MUTEX_SIZE))) + +typedef struct _ErrorCheckInfo ErrorCheckInfo; +struct _ErrorCheckInfo +{ + gchar *location; + GThread *owner; +}; + +static GMutex * +g_mutex_new_errorcheck_impl (void) +{ + GMutex *retval = g_thread_functions_for_glib_use_default.mutex_new (); + retval = g_realloc (retval, G_MUTEX_SIZE + sizeof (gpointer)); + G_MUTEX_DEBUG_INFO (retval) = NULL; + return retval; +} + +static void +g_mutex_lock_errorcheck_impl (GMutex *mutex, + gulong magic, + gchar *location) +{ + ErrorCheckInfo *info; + GThread *self = g_thread_self (); + + if (magic != G_MUTEX_DEBUG_MAGIC) + location = "unknown"; + + if (G_MUTEX_DEBUG_INFO (mutex) == NULL) + { + /* if the debug info is NULL, we have not yet locked that mutex, + * so we do it now */ + g_thread_functions_for_glib_use_default.mutex_lock (mutex); + /* Now we have to check again, because another thread might have + * tried to lock the mutex at the same time we did. This + * technique is not 100% save on systems without decent cache + * coherence, but we have no choice */ + if (G_MUTEX_DEBUG_INFO (mutex) == NULL) + { + info = G_MUTEX_DEBUG_INFO (mutex) = g_new0 (ErrorCheckInfo, 1); + } + g_thread_functions_for_glib_use_default.mutex_unlock (mutex); + } + + info = G_MUTEX_DEBUG_INFO (mutex); + if (info->owner == self) + g_error ("Trying to recursivly lock a mutex at '%s', " + "previously locked at '%s'", + location, info->location); + + g_thread_functions_for_glib_use_default.mutex_lock (mutex); + + info->owner = self; + info->location = location; +} + +static gboolean +g_mutex_trylock_errorcheck_impl (GMutex *mutex, + gulong magic, + gchar *location) +{ + ErrorCheckInfo *info = G_MUTEX_DEBUG_INFO (mutex); + GThread *self = g_thread_self (); + + if (magic != G_MUTEX_DEBUG_MAGIC) + location = "unknown"; + + if (!info) + { + /* This mutex has not yet been used, so simply lock and return TRUE */ + g_mutex_lock_errorcheck_impl (mutex, magic, location); + return TRUE; + } + + if (info->owner == self) + g_error ("Trying to recursivly lock a mutex at '%s', " + "previously locked at '%s'", + location, info->location); + + if (!g_thread_functions_for_glib_use_default.mutex_trylock (mutex)) + return FALSE; + + info->owner = self; + info->location = location; + + return TRUE; +} + +static void +g_mutex_unlock_errorcheck_impl (GMutex *mutex, + gulong magic, + gchar *location) +{ + ErrorCheckInfo *info = G_MUTEX_DEBUG_INFO (mutex); + GThread *self = g_thread_self (); + + if (magic != G_MUTEX_DEBUG_MAGIC) + location = "unknown"; + + if (!info || info->owner == NULL) + g_error ("Trying to unlock an unlocked mutex at '%s'", location); + + if (info->owner != self) + g_warning ("Trying to unlock a mutex at '%s', " + "previously locked by a different thread at '%s'", + location, info->location); + + info->owner = NULL; + info->location = NULL; + + g_thread_functions_for_glib_use_default.mutex_unlock (mutex); +} + +static void +g_mutex_free_errorcheck_impl (GMutex *mutex, + gulong magic, + gchar *location) +{ + ErrorCheckInfo *info = G_MUTEX_DEBUG_INFO (mutex); + + if (magic != G_MUTEX_DEBUG_MAGIC) + location = "unknown"; + + if (info && info->owner != NULL) + g_error ("Trying to free a locked mutex at '%s', " + "which was previously locked at '%s'", + location, info->location); + + g_free (G_MUTEX_DEBUG_INFO (mutex)); + g_thread_functions_for_glib_use_default.mutex_free (mutex); +} + +static void +g_cond_wait_errorcheck_impl (GCond *cond, + GMutex *mutex, + gulong magic, + gchar *location) +{ + + ErrorCheckInfo *info = G_MUTEX_DEBUG_INFO (mutex); + GThread *self = g_thread_self (); + + if (magic != G_MUTEX_DEBUG_MAGIC) + location = "unknown"; + + if (!info || info->owner == NULL) + g_error ("Trying to use an unlocked mutex in g_cond_wait() at '%s'", + location); + + if (info->owner != self) + g_error ("Trying to use a mutex locked by another thread in " + "g_cond_wait() at '%s'", location); + + info->owner = NULL; + location = info->location; + + g_thread_functions_for_glib_use_default.cond_wait (cond, mutex); + + info->owner = self; + info->location = location; +} + + +static gboolean +g_cond_timed_wait_errorcheck_impl (GCond *cond, + GMutex *mutex, + GTimeVal *end_time, + gulong magic, + gchar *location) +{ + ErrorCheckInfo *info = G_MUTEX_DEBUG_INFO (mutex); + GThread *self = g_thread_self (); + gboolean retval; + + if (magic != G_MUTEX_DEBUG_MAGIC) + location = "unknown"; + + if (!info || info->owner == NULL) + g_error ("Trying to use an unlocked mutex in g_cond_timed_wait() at '%s'", + location); + + if (info->owner != self) + g_error ("Trying to use a mutex locked by another thread in " + "g_cond_timed_wait() at '%s'", location); + + info->owner = NULL; + location = info->location; + + retval = g_thread_functions_for_glib_use_default.cond_timed_wait (cond, + mutex, + end_time); + + info->owner = self; + info->location = location; + + return retval; +} + + +/* unshadow function declaration. See gthread.h */ +#undef g_thread_init + +EXPORT_C void +g_thread_init_with_errorcheck_mutexes (GThreadFunctions* init) +{ + GThreadFunctions errorcheck_functions; + if (init) + g_error ("Errorcheck mutexes can only be used for native " + "thread implementations. Sorry." ); + +#ifdef HAVE_G_THREAD_IMPL_INIT + /* This isn't called in g_thread_init, as it doesn't think to get + * the default implementation, so we have to call it on our own. + * + * We must call this before copying + * g_thread_functions_for_glib_use_default as the + * implementation-specific init function might modify the contents + * of g_thread_functions_for_glib_use_default based on operating + * system version, C library version, or whatever. */ + g_thread_impl_init(); +#endif /* HAVE_G_THREAD_IMPL_INIT */ + + errorcheck_functions = g_thread_functions_for_glib_use_default; + errorcheck_functions.mutex_new = g_mutex_new_errorcheck_impl; + errorcheck_functions.mutex_lock = + (void (*)(GMutex *)) g_mutex_lock_errorcheck_impl; + errorcheck_functions.mutex_trylock = + (gboolean (*)(GMutex *)) g_mutex_trylock_errorcheck_impl; + errorcheck_functions.mutex_unlock = + (void (*)(GMutex *)) g_mutex_unlock_errorcheck_impl; + errorcheck_functions.mutex_free = + (void (*)(GMutex *)) g_mutex_free_errorcheck_impl; + errorcheck_functions.cond_wait = + (void (*)(GCond *, GMutex *)) g_cond_wait_errorcheck_impl; + errorcheck_functions.cond_timed_wait = + (gboolean (*)(GCond *, GMutex *, GTimeVal *)) + g_cond_timed_wait_errorcheck_impl; + + g_thread_init (&errorcheck_functions); +} + +EXPORT_C void +g_thread_init (GThreadFunctions* init) +{ + gboolean supported; + + if (thread_system_already_initialized) + g_error ("GThread system may only be initialized once."); + + thread_system_already_initialized = TRUE; + + if (init == NULL) + { +#ifdef HAVE_G_THREAD_IMPL_INIT + /* now do any initialization stuff required by the + * implementation, but only if called with a NULL argument, of + * course. Otherwise it's up to the user to do so. */ + g_thread_impl_init(); +#endif /* HAVE_G_THREAD_IMPL_INIT */ + init = (GThreadFunctions*)&g_thread_functions_for_glib_use_default; + } + else + g_thread_use_default_impl = FALSE; + + g_thread_functions_for_glib_use = *init; + + supported = (init->mutex_new && + init->mutex_lock && + init->mutex_trylock && + init->mutex_unlock && + init->mutex_free && + init->cond_new && + init->cond_signal && + init->cond_broadcast && + init->cond_wait && + init->cond_timed_wait && + init->cond_free && + init->private_new && + init->private_get && + init->private_set && + init->thread_create && + init->thread_yield && + init->thread_join && + init->thread_exit && + init->thread_set_priority && + init->thread_self); + + /* if somebody is calling g_thread_init (), it means that he wants to + * have thread support, so check this + */ + if (!supported) + { + if (g_thread_use_default_impl) + g_error ("Threads are not supported on this platform."); + else + g_error ("The supplied thread function vector is invalid."); + } + + g_thread_priority_map [G_THREAD_PRIORITY_LOW] = PRIORITY_LOW_VALUE; + g_thread_priority_map [G_THREAD_PRIORITY_NORMAL] = PRIORITY_NORMAL_VALUE; + g_thread_priority_map [G_THREAD_PRIORITY_HIGH] = PRIORITY_HIGH_VALUE; + g_thread_priority_map [G_THREAD_PRIORITY_URGENT] = PRIORITY_URGENT_VALUE; + + g_thread_init_glib (); +} + +#else /* !G_THREADS_ENABLED */ + +void +EXPORT_C g_thread_init (GThreadFunctions* init) +{ + g_error ("GLib thread support is disabled."); +} + +#endif /* !G_THREADS_ENABLED */