mirror of
https://git.gfz-potsdam.de/naaice/iphreeqc.git
synced 2025-12-16 08:38:23 +01:00
7c603854bd
git-svn-id: svn://136.177.114.72/svn_GW/IPhreeqc/trunk@7648 1feff8c3-07ed-0310-ac33-dd36852eb9cd
65 lines
1.7 KiB
C
65 lines
1.7 KiB
C
#if defined(WIN32)
|
|
|
|
#include <windows.h>
|
|
|
|
/* This is CriticalSection version */
|
|
|
|
/*
|
|
typedef CRITICAL_SECTION mutex_t;
|
|
|
|
#define mutex_init(m) InitializeCriticalSection(m)
|
|
#define mutex_delete(m) DeleteCriticalSection(m)
|
|
#define mutex_lock(m) EnterCriticalSection(m)
|
|
#define mutex_trylock(m) TryEnterCriticalSection(m)
|
|
#define mutex_unlock(m) LeaveCriticalSection(m)
|
|
#define atomic_xchg_1(m) InterlockedExchange(m, 1)
|
|
mutex_t map_lock;
|
|
|
|
#define MUTEX_INITILIZER(m) \
|
|
static unsigned int volatile m_init = 0; \
|
|
static bool volatile m_wait = true; \
|
|
if (!InterlockedExchange(&m_init, 1)) \
|
|
{ mutex_init(&m); m_wait = false; } \
|
|
while(m_wait);
|
|
*/
|
|
|
|
/* This is simplified spinlock version */
|
|
|
|
typedef volatile unsigned int mutex_t;
|
|
|
|
#define mutex_init(m) InterlockedExchange(m, 0)
|
|
#define mutex_delete(m)
|
|
#define mutex_lock(m) while(InterlockedExchange(m, 1)) Sleep(0)
|
|
#define mutex_trylock(m) InterlockedExchange(m, 1)
|
|
#define mutex_unlock(m) InterlockedExchange(m, 0)
|
|
#define MUTEX_INITIALIZER 0
|
|
|
|
#else
|
|
|
|
#include <pthread.h>
|
|
|
|
typedef pthread_mutex_t mutex_t;
|
|
|
|
#define mutex_init(m) pthread_mutex_init(m, NULL)
|
|
#define mutex_delete(m) pthread_mutex_destroy(m)
|
|
#define mutex_lock(m) pthread_mutex_lock(m)
|
|
#define mutex_trylock(m) pthread_mutex_trylock(m)
|
|
#define mutex_unlock(m) pthread_mutex_unlock(m)
|
|
#define MUTEX_INITIALIZER PTHREAD_MUTEX_INITIALIZER
|
|
|
|
#endif
|
|
|
|
#ifndef _INC_PHREEQC_H
|
|
mutex_t map_lock = MUTEX_INITIALIZER;
|
|
mutex_t qsort_lock = MUTEX_INITIALIZER;
|
|
#else
|
|
extern mutex_t map_lock;
|
|
extern mutex_t qsort_lock;
|
|
#endif
|
|
|
|
#ifndef WIN32
|
|
#define qsort(a, b, c, d) mutex_lock(&qsort_lock); \
|
|
qsort(a, b, c, d); \
|
|
mutex_unlock(&qsort_lock)
|
|
#endif
|