mono/utils/mono-mutex.h

   1 /* -*- Mode: C; tab-width: 8; indent-tabs-mode: t; c-basic-offset: 8 -*- */
   2 /*
   3  * mono-mutex.h: Portability wrappers around POSIX Mutexes
   4  *
   5  * Authors: Jeffrey Stedfast <fejj@ximian.com>
   6  *
   7  * Copyright 2002 Ximian, Inc. (www.ximian.com)
   8  */
   9
  10
  11 #ifndef __MONO_MUTEX_H__
  12 #define __MONO_MUTEX_H__
  13
  14 #include <config.h>
  15
  16 #include <glib.h>
  17 #ifdef HAVE_PTHREAD_H
  18 #include <pthread.h>
  19 #endif
  20 #include <time.h>
  21
  22 #ifdef HOST_WIN32
  23 #include <winsock2.h>
  24 #include <windows.h>
  25 #endif
  26
  27 G_BEGIN_DECLS
  28
  29 #ifndef HOST_WIN32
  30
  31 typedef struct {
  32         pthread_mutex_t mutex;
  33         gboolean complete;
  34 } mono_once_t;
  35
  36 #define MONO_ONCE_INIT { PTHREAD_MUTEX_INITIALIZER, FALSE }
  37
  38 int mono_once (mono_once_t *once, void (*once_init) (void));
  39
  40 typedef pthread_mutex_t mono_mutex_t;
  41 typedef pthread_cond_t mono_cond_t;
  42
  43 #define mono_mutex_init(mutex) pthread_mutex_init (mutex, NULL)
  44 #define mono_mutex_lock(mutex) pthread_mutex_lock (mutex)
  45 #define mono_mutex_trylock(mutex) pthread_mutex_trylock (mutex)
  46 #define mono_mutex_timedlock(mutex,timeout) pthread_mutex_timedlock (mutex, timeout)
  47 #define mono_mutex_unlock(mutex) pthread_mutex_unlock (mutex)
  48 #define mono_mutex_destroy(mutex) pthread_mutex_destroy (mutex)
  49
  50 #define mono_cond_init(cond,attr) pthread_cond_init (cond,attr)
  51 #define mono_cond_wait(cond,mutex) pthread_cond_wait (cond, mutex)
  52 #define mono_cond_timedwait(cond,mutex,timeout) pthread_cond_timedwait (cond, mutex, timeout)
  53 #define mono_cond_signal(cond) pthread_cond_signal (cond)
  54 #define mono_cond_broadcast(cond) pthread_cond_broadcast (cond)
  55 #define mono_cond_destroy(cond)
  56
  57 /* This is a function so it can be passed to pthread_cleanup_push -
  58  * that is a macro and giving it a macro as a parameter breaks.
  59  */
  60 G_GNUC_UNUSED
  61 static inline int mono_mutex_unlock_in_cleanup (mono_mutex_t *mutex)
  62 {
  63         return(mono_mutex_unlock (mutex));
  64 }
  65
  66 /* Returns zero on success. */
  67 static inline int
  68 mono_mutex_init_recursive (mono_mutex_t *mutex)
  69 {
  70         int res;
  71         pthread_mutexattr_t attr;
  72
  73         pthread_mutexattr_init (&attr);
  74         pthread_mutexattr_settype (&attr, PTHREAD_MUTEX_RECURSIVE);
  75         res = pthread_mutex_init (mutex, &attr);
  76         pthread_mutexattr_destroy (&attr);
  77
  78         return res;
  79 }
  80
  81 #else
  82
  83 typedef CRITICAL_SECTION mono_mutex_t;
  84 typedef HANDLE mono_cond_t;
  85
  86 #define mono_mutex_init(mutex) (InitializeCriticalSection((mutex)), 0)
  87 #define mono_mutex_init_recursive(mutex) (InitializeCriticalSection((mutex)), 0)
  88 #define mono_mutex_lock(mutex) EnterCriticalSection((mutex))
  89 #define mono_mutex_trylock(mutex) TryEnterCriticalSection((mutex))
  90 #define mono_mutex_unlock(mutex)  LeaveCriticalSection((mutex))
  91 #define mono_mutex_destroy(mutex) DeleteCriticalSection((mutex))
  92
  93
  94 #define mono_cond_init(cond,attr) do{*(cond) = CreateEvent(NULL,FALSE,FALSE,NULL); } while (0)
  95 #define mono_cond_wait(cond,mutex) WaitForSingleObject(*(cond),INFINITE)
  96 #define mono_cond_timedwait(cond,mutex,timeout) WaitForSingleObject(*(cond),timeout)
  97 #define mono_cond_signal(cond) SetEvent(*(cond))
  98 #define mono_cond_broadcast(cond) (!SetEvent(*(cond)))
  99 #define mono_cond_destroy(cond) CloseHandle(*(cond))
 100
 101 #endif
 102
 103 int mono_mutex_init_suspend_safe (mono_mutex_t *mutex);
 104
 105 G_END_DECLS
 106
 107 #endif /* __MONO_MUTEX_H__ */