forked from KolibriOS/kolibrios
217 lines
6.0 KiB
C
217 lines
6.0 KiB
C
|
/* Threads compatibility routines for libgcc2 and libobjc. */
|
||
|
|
/* Compile this one with gcc. */
|
||
|
|
|
||
|
|
/* Copyright (C) 1999-2015 Free Software Foundation, Inc.
|
||
|
|
Contributed by Mumit Khan <khan@xraylith.wisc.edu>.
|
||
|
|
|
||
|
|
This file is part of GCC.
|
||
|
|
|
||
|
|
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 3, or (at your option) any later
|
||
|
|
version.
|
||
|
|
|
||
|
|
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.
|
||
|
|
|
||
|
|
Under Section 7 of GPL version 3, you are granted additional
|
||
|
|
permissions described in the GCC Runtime Library Exception, version
|
||
|
|
3.1, as published by the Free Software Foundation.
|
||
|
|
|
||
|
|
You should have received a copy of the GNU General Public License and
|
||
|
|
a copy of the GCC Runtime Library Exception along with this program;
|
||
|
|
see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
|
||
|
|
<http://www.gnu.org/licenses/>. */
|
||
|
|
|
||
|
|
#ifndef GCC_GTHR_KOS32_H
|
||
|
|
#define GCC_GTHR_KOS32_H
|
||
|
|
|
||
|
|
/* Make sure CONST_CAST2 (origin in system.h) is declared. */
|
||
|
|
#ifndef CONST_CAST2
|
||
|
|
#define CONST_CAST2(TOTYPE,FROMTYPE,X) ((__extension__(union {FROMTYPE _q; TOTYPE _nq;})(X))._nq)
|
||
|
|
#endif
|
||
|
|
|
||
|
|
|
||
|
|
#define __GTHREADS 1
|
||
|
|
|
||
|
|
#include <errno.h>
|
||
|
|
#include <stddef.h>
|
||
|
|
|
||
|
|
#ifndef __UNUSED_PARAM
|
||
|
|
#define __UNUSED_PARAM(x) x
|
||
|
|
#endif
|
||
|
|
|
||
|
|
|
||
|
|
#ifdef __cplusplus
|
||
|
|
extern "C" {
|
||
|
|
#endif
|
||
|
|
|
||
|
|
typedef unsigned long __gthread_key_t;
|
||
|
|
|
||
|
|
typedef struct
|
||
|
|
{
|
||
|
|
int done;
|
||
|
|
long started;
|
||
|
|
} __gthread_once_t;
|
||
|
|
|
||
|
|
typedef struct
|
||
|
|
{
|
||
|
|
volatile int lock;
|
||
|
|
int handle;
|
||
|
|
} __gthread_mutex_t;
|
||
|
|
|
||
|
|
typedef struct
|
||
|
|
{
|
||
|
|
volatile int lock;
|
||
|
|
int handle;
|
||
|
|
long depth;
|
||
|
|
unsigned long owner;
|
||
|
|
} __gthread_recursive_mutex_t;
|
||
|
|
|
||
|
|
#define __GTHREAD_ONCE_INIT {0, -1}
|
||
|
|
#define __GTHREAD_MUTEX_INIT_FUNCTION __gthread_mutex_init_function
|
||
|
|
|
||
|
|
#define __GTHREAD_RECURSIVE_MUTEX_INIT_FUNCTION \
|
||
|
|
__gthread_recursive_mutex_init_function
|
||
|
|
|
||
|
|
|
||
|
|
#if defined (_WIN32) && !defined(__CYGWIN__)
|
||
|
|
#define MINGW32_SUPPORTS_MT_EH 1
|
||
|
|
/* Mingw runtime >= v0.3 provides a magic variable that is set to nonzero
|
||
|
|
if -mthreads option was specified, or 0 otherwise. This is to get around
|
||
|
|
the lack of weak symbols in PE-COFF. */
|
||
|
|
extern int _CRT_MT;
|
||
|
|
extern int __mingwthr_key_dtor (unsigned long, void (*) (void *));
|
||
|
|
#endif /* _WIN32 && !__CYGWIN__ */
|
||
|
|
|
||
|
|
|
||
|
|
static inline int __gthread_active_p (void)
|
||
|
|
{
|
||
|
|
#ifdef MINGW32_SUPPORTS_MT_EH
|
||
|
|
return _CRT_MT;
|
||
|
|
#else
|
||
|
|
return 1;
|
||
|
|
#endif
|
||
|
|
}
|
||
|
|
|
||
|
|
extern int __gthr_kos32_once (__gthread_once_t *, void (*) (void));
|
||
|
|
extern int __gthr_kos32_key_create (__gthread_key_t *, void (*) (void*));
|
||
|
|
extern int __gthr_kos32_key_delete (__gthread_key_t);
|
||
|
|
extern void * __gthr_kos32_getspecific (__gthread_key_t);
|
||
|
|
extern int __gthr_kos32_setspecific (__gthread_key_t, const void *);
|
||
|
|
extern void __gthr_kos32_mutex_init_function (__gthread_mutex_t *);
|
||
|
|
extern int __gthr_kos32_mutex_lock (__gthread_mutex_t *);
|
||
|
|
extern int __gthr_kos32_mutex_trylock (__gthread_mutex_t *);
|
||
|
|
extern int __gthr_kos32_mutex_unlock (__gthread_mutex_t *);
|
||
|
|
extern void __gthr_kos32_recursive_mutex_init_function (__gthread_recursive_mutex_t *);
|
||
|
|
extern int __gthr_kos32_recursive_mutex_lock (__gthread_recursive_mutex_t *);
|
||
|
|
extern int __gthr_kos32_recursive_mutex_trylock (__gthread_recursive_mutex_t *);
|
||
|
|
extern int __gthr_kos32_recursive_mutex_unlock (__gthread_recursive_mutex_t *);
|
||
|
|
extern void __gthr_kos32_mutex_destroy (__gthread_mutex_t *);
|
||
|
|
extern int __gthr_kos32_recursive_mutex_destroy (__gthread_recursive_mutex_t *);
|
||
|
|
|
||
|
|
static inline int __gthread_once (__gthread_once_t *__once, void (*__func) (void))
|
||
|
|
{
|
||
|
|
if (__gthread_active_p ())
|
||
|
|
return __gthr_kos32_once (__once, __func);
|
||
|
|
else
|
||
|
|
return -1;
|
||
|
|
}
|
||
|
|
|
||
|
|
static inline int __gthread_key_create (__gthread_key_t *__key, void (*__dtor) (void *))
|
||
|
|
{
|
||
|
|
return __gthr_kos32_key_create (__key, __dtor);
|
||
|
|
}
|
||
|
|
|
||
|
|
static inline int __gthread_key_delete (__gthread_key_t __key)
|
||
|
|
{
|
||
|
|
return __gthr_kos32_key_delete (__key);
|
||
|
|
}
|
||
|
|
|
||
|
|
static inline void* __gthread_getspecific (__gthread_key_t __key)
|
||
|
|
{
|
||
|
|
return __gthr_kos32_getspecific (__key);
|
||
|
|
}
|
||
|
|
|
||
|
|
static inline int __gthread_setspecific (__gthread_key_t __key, const void *__ptr)
|
||
|
|
{
|
||
|
|
return __gthr_kos32_setspecific (__key, __ptr);
|
||
|
|
}
|
||
|
|
|
||
|
|
static inline void __gthread_mutex_init_function (__gthread_mutex_t *__mutex)
|
||
|
|
{
|
||
|
|
__gthr_kos32_mutex_init_function(__mutex);
|
||
|
|
}
|
||
|
|
|
||
|
|
static inline void __gthread_mutex_destroy (__gthread_mutex_t *__mutex)
|
||
|
|
{
|
||
|
|
__gthr_kos32_mutex_destroy (__mutex);
|
||
|
|
}
|
||
|
|
|
||
|
|
static inline int __gthread_mutex_lock (__gthread_mutex_t *__mutex)
|
||
|
|
{
|
||
|
|
if (__gthread_active_p ())
|
||
|
|
return __gthr_kos32_mutex_lock (__mutex);
|
||
|
|
else
|
||
|
|
return 0;
|
||
|
|
}
|
||
|
|
|
||
|
|
static inline int __gthread_mutex_trylock (__gthread_mutex_t *__mutex)
|
||
|
|
{
|
||
|
|
if (__gthread_active_p ())
|
||
|
|
return __gthr_kos32_mutex_trylock (__mutex);
|
||
|
|
else
|
||
|
|
return 0;
|
||
|
|
}
|
||
|
|
|
||
|
|
static inline int __gthread_mutex_unlock (__gthread_mutex_t *__mutex)
|
||
|
|
{
|
||
|
|
if (__gthread_active_p ())
|
||
|
|
return __gthr_kos32_mutex_unlock (__mutex);
|
||
|
|
else
|
||
|
|
return 0;
|
||
|
|
}
|
||
|
|
|
||
|
|
static inline void __gthread_recursive_mutex_init_function (__gthread_recursive_mutex_t *__mutex)
|
||
|
|
{
|
||
|
|
__gthr_kos32_recursive_mutex_init_function (__mutex);
|
||
|
|
}
|
||
|
|
|
||
|
|
static inline int __gthread_recursive_mutex_lock (__gthread_recursive_mutex_t *__mutex)
|
||
|
|
{
|
||
|
|
if (__gthread_active_p ())
|
||
|
|
return __gthr_kos32_recursive_mutex_lock (__mutex);
|
||
|
|
else
|
||
|
|
return 0;
|
||
|
|
}
|
||
|
|
|
||
|
|
static inline int __gthread_recursive_mutex_trylock (__gthread_recursive_mutex_t *__mutex)
|
||
|
|
{
|
||
|
|
if (__gthread_active_p ())
|
||
|
|
return __gthr_kos32_recursive_mutex_trylock (__mutex);
|
||
|
|
else
|
||
|
|
return 0;
|
||
|
|
}
|
||
|
|
|
||
|
|
static inline int __gthread_recursive_mutex_unlock (__gthread_recursive_mutex_t *__mutex)
|
||
|
|
{
|
||
|
|
if (__gthread_active_p ())
|
||
|
|
return __gthr_kos32_recursive_mutex_unlock (__mutex);
|
||
|
|
else
|
||
|
|
return 0;
|
||
|
|
}
|
||
|
|
|
||
|
|
static inline int __gthread_recursive_mutex_destroy (__gthread_recursive_mutex_t *__mutex)
|
||
|
|
{
|
||
|
|
return __gthr_kos32_recursive_mutex_destroy (__mutex);
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
#ifdef __cplusplus
|
||
|
|
}
|
||
|
|
#endif
|
||
|
|
|
||
|
|
#endif /* ! GCC_GTHR_WIN32_H */
|