OSDN Git Service

Port to hosts whose 'sort' and 'tail' implementations
[pf3gnuchains/gcc-fork.git] / gcc / gthr-vxworks.h
index 1474853..5ff5234 100644 (file)
@@ -17,8 +17,8 @@ for more details.
 
 You should have received a copy of the GNU General Public License
 along with GCC; see the file COPYING.  If not, write to the Free
-Software Foundation, 59 Temple Place - Suite 330, Boston, MA
-02111-1307, USA.  */
+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,
@@ -32,279 +32,99 @@ Software Foundation, 59 Temple Place - Suite 330, Boston, MA
 
 #ifdef _LIBOBJC
 
-/* Thread local storage for a single thread */
-static void *thread_local_storage = NULL;
+/* libobjc requires the optional pthreads component.  */
+#include "gthr-posix.h"
 
-/* Backend initialization functions */
+#else
 
-/* Initialize the threads subsystem.  */
-int
-__gthread_objc_init_thread_system(void)
-{
-  /* No thread support available */
-  return -1;
-}
-
-/* Close the threads subsystem.  */
-int
-__gthread_objc_close_thread_system(void)
-{
-  /* No thread support available */
-  return -1;
-}
-
-/* Backend thread functions */
-
-/* Create a new thread of execution.  */
-objc_thread_t
-__gthread_objc_thread_detach(void (*func)(void *arg), void *arg)
-{
-  /* No thread support available */
-  return NULL;
-}
-
-/* Set the current thread's priority.  */
-int
-__gthread_objc_thread_set_priority(int priority)
-{
-  /* No thread support available */
-  return -1;
-}
-
-/* Return the current thread's priority.  */
-int
-__gthread_objc_thread_get_priority(void)
-{
-  return OBJC_THREAD_INTERACTIVE_PRIORITY;
-}
-
-/* Yield our process time to another thread.  */
-void
-__gthread_objc_thread_yield(void)
-{
-  return;
-}
-
-/* Terminate the current thread.  */
-int
-__gthread_objc_thread_exit(void)
-{
-  /* No thread support available */
-  /* Should we really exit the program */
-  /* exit(&__objc_thread_exit_status); */
-  return -1;
-}
-
-/* Returns an integer value which uniquely describes a thread.  */
-objc_thread_t
-__gthread_objc_thread_id(void)
-{
-  /* No thread support, use 1.  */
-  return (objc_thread_t)1;
-}
-
-/* Sets the thread's local storage pointer.  */
-int
-__gthread_objc_thread_set_data(void *value)
-{
-  thread_local_storage = value;
-  return 0;
-}
-
-/* Returns the thread's local storage pointer.  */
-void *
-__gthread_objc_thread_get_data(void)
-{
-  return thread_local_storage;
-}
-
-/* Backend mutex functions */
-
-/* Allocate a mutex.  */
-int
-__gthread_objc_mutex_allocate(objc_mutex_t mutex)
-{
-  return 0;
-}
-
-/* Deallocate a mutex.  */
-int
-__gthread_objc_mutex_deallocate(objc_mutex_t mutex)
-{
-  return 0;
-}
+#define __GTHREADS 1
+#define __gthread_active_p() 1
 
-/* Grab a lock on a mutex.  */
-int
-__gthread_objc_mutex_lock(objc_mutex_t mutex)
-{
-  /* There can only be one thread, so we always get the lock */
-  return 0;
-}
+/* Mutexes are easy, except that they need to be initialized at runtime.  */
 
-/* Try to grab a lock on a mutex.  */
-int
-__gthread_objc_mutex_trylock(objc_mutex_t mutex)
-{
-  /* There can only be one thread, so we always get the lock */
-  return 0;
-}
-
-/* Unlock the mutex */
-int
-__gthread_objc_mutex_unlock(objc_mutex_t mutex)
-{
-  return 0;
-}
+#include <semLib.h>
 
-/* Backend condition mutex functions */
+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
 
-/* Allocate a condition.  */
-int
-__gthread_objc_condition_allocate(objc_condition_t condition)
+static inline void
+__gthread_mutex_init_function (__gthread_mutex_t *mutex)
 {
-  return 0;
+  *mutex = semMCreate (SEM_Q_PRIORITY | SEM_INVERSION_SAFE | SEM_DELETE_SAFE);
 }
 
-/* Deallocate a condition.  */
-int
-__gthread_objc_condition_deallocate(objc_condition_t condition)
+static inline int
+__gthread_mutex_lock (__gthread_mutex_t *mutex)
 {
-  return 0;
+  return semTake (*mutex, WAIT_FOREVER);
 }
 
-/* Wait on the condition */
-int
-__gthread_objc_condition_wait(objc_condition_t condition, objc_mutex_t mutex)
+static inline int
+__gthread_mutex_trylock (__gthread_mutex_t *mutex)
 {
-  return 0;
+  return semTake (*mutex, NO_WAIT);
 }
 
-/* Wake up all threads waiting on this condition.  */
-int
-__gthread_objc_condition_broadcast(objc_condition_t condition)
+static inline int
+__gthread_mutex_unlock (__gthread_mutex_t *mutex)
 {
-  return 0;
+  return semGive (*mutex);
 }
 
-/* Wake up one thread waiting on this condition.  */
-int
-__gthread_objc_condition_signal(objc_condition_t condition)
+static inline void
+__gthread_recursive_mutex_init_function (__gthread_recursive_mutex_t *mutex)
 {
-  return 0;
+  __gthread_mutex_init_function (mutex);
 }
 
-#else /* _LIBOBJC */
-
-/* POSIX threads specific definitions.
-   Easy, since the interface is just one-to-one mapping.  */
-
-#define __GTHREADS 1
-
-#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;
-
-#define __GTHREAD_MUTEX_INIT 0
-#define __GTHREAD_ONCE_INIT 0
-
-#ifndef REG_SAVED_REG
 static inline int
-__gthread_once (__gthread_once_t *once, void (*func) (void))
+__gthread_recursive_mutex_lock (__gthread_recursive_mutex_t *mutex)
 {
-  (*func)();
-  return 0;
+  return __gthread_mutex_lock (mutex);
 }
 
-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_recursive_mutex_trylock (__gthread_recursive_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 __gthread_mutex_trylock (mutex);
 }
 
-/* This only works for the code in libgcc2.c.  */
-
 static inline int
-__gthread_key_create (__gthread_key_t *key, void (*dtor) (void *))
+__gthread_recursive_mutex_unlock (__gthread_recursive_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 __gthread_mutex_unlock (mutex);
 }
 
-#define __gthread_setspecific(key, ptr) \
-  (key = (int) ptr, 0)
+/* pthread_once is complicated enough that it's implemented
+   out-of-line.  See config/vxlib.c.  */
 
-static inline int
-__gthread_key_dtor (__gthread_key_t key, void *ptr)
+typedef struct
 {
-  /* Just reset the key value to zero.  */
-  if (ptr)
-    return __gthread_setspecific (key, 0);
-  else
-    return 0;
+  volatile unsigned char busy;
+  volatile unsigned char done;
 }
+__gthread_once_t;
 
-#define __gthread_key_delete(key) \
-  taskVarDelete (taskIdSelf (), &key)
+#define __GTHREAD_ONCE_INIT { 0, 0 }
 
-#define __gthread_getspecific(key)                     \
-     ((key == 0)                                       \
-      ? ((taskVarAdd (taskIdSelf (), &key) != OK)      \
-        ? (__terminate (), (void*)0)                   \
-        : (void*)0)                                    \
-      : (void*)key)
-#endif
+extern int __gthread_once (__gthread_once_t *once, void (*func)(void));
 
-static inline int
-__gthread_mutex_lock (__gthread_mutex_t *mutex)
-{
-  if (*mutex == 0)
-    *mutex = semMCreate (SEM_Q_PRIORITY | SEM_INVERSION_SAFE | SEM_DELETE_SAFE);
-  return semTake (*mutex, WAIT_FOREVER);
-}
+/* 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.  */
 
-static inline int
-__gthread_mutex_trylock (__gthread_mutex_t *mutex)
-{
-  if (*mutex == 0)
-    *mutex = semMCreate (SEM_Q_PRIORITY | SEM_INVERSION_SAFE | SEM_DELETE_SAFE);
-  return semTake (*mutex, NO_WAIT);
-}
+typedef unsigned int __gthread_key_t;
 
-static inline int
-__gthread_mutex_unlock (__gthread_mutex_t *mutex)
-{
-  /* We could return the */
-  return semGive (*mutex);
-}
+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 /* _LIBOBJC */
+#endif /* not _LIBOBJC */
 
-#endif /* ! GCC_GTHR_VXWORKS_H */
+#endif /* gthr-vxworks.h */