-/* Threads compatibily routines for libgcc2 for VxWorks. */
+/* Threads compatibility routines for libgcc2 and libobjc for VxWorks. */
/* Compile this one with gcc. */
-/* Copyright (C) 1997 Free Software Foundation, Inc.
+/* Copyright (C) 1997, 1999, 2000 Free Software Foundation, Inc.
Contributed by Mike Stump <mrs@wrs.com>.
-This file is part of GNU CC.
+This file is part of GCC.
-GNU CC is free software; you can redistribute it and/or modify
-it under the terms of the GNU General Public License as published by
-the Free Software Foundation; either version 2, or (at your option)
-any later version.
+GCC is free software; you can redistribute it and/or modify it under
+the terms of the GNU General Public License as published by the Free
+Software Foundation; either version 2, or (at your option) any later
+version.
-GNU CC 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 General Public License for more details.
+GCC 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 General Public License
+for more details.
You should have received a copy of the GNU General Public License
-along with GNU CC; see the file COPYING. If not, write to
-the Free Software Foundation, 59 Temple Place - Suite 330,
-Boston, MA 02111-1307, USA. */
+along with GCC; see the file COPYING. If not, write to the Free
+Software Foundation, 51 Franklin Street, Fifth Floor, Boston, MA
+02110-1301, USA. */
/* As a special exception, if you link this library with other files,
some of which are compiled with GCC, to produce an executable,
This exception does not however invalidate any other reasons why
the executable file might be covered by the GNU General Public License. */
-#ifndef __gthr_vxworks_h
-#define __gthr_vxworks_h
+#ifndef GCC_GTHR_VXWORKS_H
+#define GCC_GTHR_VXWORKS_H
-/* POSIX threads specific definitions.
- Easy, since the interface is just one-to-one mapping. */
+#ifdef _LIBOBJC
+
+/* libobjc requires the optional pthreads component. */
+#include "gthr-posix.h"
+
+#else
#define __GTHREADS 1
+#define __gthread_active_p() 1
+
+/* Mutexes are easy, except that they need to be initialized at runtime. */
-#include <vxWorks.h>
#include <semLib.h>
-/* typedef void *SEM_ID; */
-typedef int __gthread_key_t;
-typedef char __gthread_once_t;
typedef SEM_ID __gthread_mutex_t;
+/* All VxWorks mutexes are recursive. */
+typedef SEM_ID __gthread_recursive_mutex_t;
+#define __GTHREAD_MUTEX_INIT_FUNCTION __gthread_mutex_init_function
+#define __GTHREAD_RECURSIVE_MUTEX_INIT_FUNCTION __gthread_recursive_mutex_init_function
-#define __GTHREAD_MUTEX_INIT 0
-#define __GTHREAD_ONCE_INIT 0
+static inline void
+__gthread_mutex_init_function (__gthread_mutex_t *mutex)
+{
+ *mutex = semMCreate (SEM_Q_PRIORITY | SEM_INVERSION_SAFE | SEM_DELETE_SAFE);
+}
-#ifndef REG_SAVED_REG
static inline int
-__gthread_once (__gthread_once_t *once, void (*func) ())
+__gthread_mutex_lock (__gthread_mutex_t *mutex)
{
- (*func)();
- return 0;
+ return semTake (*mutex, WAIT_FOREVER);
}
-extern __gthread_key_t eh_context_key;
-
-/* This is not the right way to do it, but the semantic of pthreads
- don't map well enough onto VxWorks. */
-
-static void
-__ehdtor (void *pTcb)
+static inline int
+__gthread_mutex_trylock (__gthread_mutex_t *mutex)
{
- int tid = (int) pTcb;
- void *p = (void*)taskVarGet(tid, &eh_context_key);
- if (p != (void*)-1)
- {
- if (p)
- free (p);
- taskVarSet(tid, &eh_context_key, 0);
- }
+ return semTake (*mutex, NO_WAIT);
}
-/* This only works for the code in libgcc2.c. */
-
static inline int
-__gthread_key_create (__gthread_key_t *key, void (*dtor) (void *))
+__gthread_mutex_unlock (__gthread_mutex_t *mutex)
{
- *key = 0;
-
- /* Do this first so that the task variables are visible during the
- running of the delete hook. */
-
- taskVarInit();
-
- /* We don't have a way to track dtor here, so instead, we
- register a generic routine that can cleanup any task. */
-
- taskDeleteHookAdd (__ehdtor);
-
- return 0;
+ return semGive (*mutex);
}
-#define __gthread_setspecific(key, ptr) \
- (key = (int) ptr, 0)
+static inline void
+__gthread_recursive_mutex_init_function (__gthread_recursive_mutex_t *mutex)
+{
+ __gthread_mutex_init_function (mutex);
+}
static inline int
-__gthread_key_dtor (__gthread_key_t key, void *ptr)
+__gthread_recursive_mutex_lock (__gthread_recursive_mutex_t *mutex)
{
- /* Just reset the key value to zero. */
- if (ptr)
- return __gthread_setspecific (key, 0);
- else
- return 0;
+ return __gthread_mutex_lock (mutex);
}
-#define __gthread_key_delete(key) \
- taskVarDelete (taskIdSelf (), &key)
-
-#define __gthread_getspecific(key) \
- ((key == 0) \
- ? ((taskVarAdd (taskIdSelf (), &key) != OK) \
- ? (__terminate (), (void*)0) \
- : (void*)0) \
- : (void*)key)
-#endif
-
static inline int
-__gthread_mutex_lock (__gthread_mutex_t *mutex)
+__gthread_recursive_mutex_trylock (__gthread_recursive_mutex_t *mutex)
{
- if (*mutex == 0)
- *mutex = semMCreate (SEM_Q_PRIORITY | SEM_INVERSION_SAFE | SEM_DELETE_SAFE);
- return semTake (*mutex, WAIT_FOREVER);
+ return __gthread_mutex_trylock (mutex);
}
static inline int
-__gthread_mutex_trylock (__gthread_mutex_t *mutex)
+__gthread_recursive_mutex_unlock (__gthread_recursive_mutex_t *mutex)
{
- if (*mutex == 0)
- *mutex = semMCreate (SEM_Q_PRIORITY | SEM_INVERSION_SAFE | SEM_DELETE_SAFE);
- return semTake (*mutex, NO_WAIT);
+ return __gthread_mutex_unlock (mutex);
}
-static inline int
-__gthread_mutex_unlock (__gthread_mutex_t *mutex)
+/* pthread_once is complicated enough that it's implemented
+ out-of-line. See config/vxlib.c. */
+
+typedef struct
{
- /* We could return the */
- return semGive (*mutex);
+ volatile unsigned char busy;
+ volatile unsigned char done;
}
+__gthread_once_t;
+
+#define __GTHREAD_ONCE_INIT { 0, 0 }
+
+extern int __gthread_once (__gthread_once_t *once, void (*func)(void));
+
+/* Thread-specific data requires a great deal of effort, since VxWorks
+ is not really set up for it. See config/vxlib.c for the gory
+ details. All the TSD routines are sufficiently complex that they
+ need to be implemented out of line. */
+
+typedef unsigned int __gthread_key_t;
+
+extern int __gthread_key_create (__gthread_key_t *keyp, void (*dtor)(void *));
+extern int __gthread_key_delete (__gthread_key_t key);
+
+extern void *__gthread_getspecific (__gthread_key_t key);
+extern int __gthread_setspecific (__gthread_key_t key, void *ptr);
+
+#endif /* not _LIBOBJC */
-#endif /* not __gthr_vxworks_h */
+#endif /* gthr-vxworks.h */