2009-03-16 10:40:18 +00:00
|
|
|
/**
|
|
|
|
* Many similar implementations exist. See for example libwsbm
|
|
|
|
* or the linux kernel include/atomic.h
|
|
|
|
*
|
|
|
|
* No copyright claimed on this file.
|
|
|
|
*
|
|
|
|
*/
|
|
|
|
|
|
|
|
#ifndef P_ATOMIC_H
|
|
|
|
#define P_ATOMIC_H
|
|
|
|
|
2009-03-16 11:27:47 +00:00
|
|
|
#include "p_compiler.h"
|
2009-03-16 10:40:18 +00:00
|
|
|
#include "p_defines.h"
|
|
|
|
|
|
|
|
#ifdef __cplusplus
|
|
|
|
extern "C" {
|
|
|
|
#endif
|
|
|
|
|
2009-03-18 11:29:01 +00:00
|
|
|
|
|
|
|
/* Favor OS-provided implementations.
|
2009-04-17 11:01:22 +01:00
|
|
|
*
|
|
|
|
* Where no OS-provided implementation is available, fall back to
|
|
|
|
* locally coded assembly, compiler intrinsic or ultimately a
|
|
|
|
* mutex-based implementation.
|
2009-03-18 11:29:01 +00:00
|
|
|
*/
|
2009-04-17 11:01:22 +01:00
|
|
|
#if (defined(PIPE_SUBSYSTEM_WINDOWS_DISPLAY) || \
|
|
|
|
defined(PIPE_SUBSYSTEM_WINDOWS_MINIPORT))
|
|
|
|
#define PIPE_ATOMIC_OS_UNLOCKED
|
2010-02-01 16:12:44 +00:00
|
|
|
#elif defined(PIPE_CC_MSVC)
|
|
|
|
#define PIPE_ATOMIC_MSVC_INTRINSIC
|
2009-04-17 11:01:22 +01:00
|
|
|
#elif (defined(PIPE_CC_MSVC) && defined(PIPE_ARCH_X86))
|
|
|
|
#define PIPE_ATOMIC_ASM_MSVC_X86
|
|
|
|
#elif (defined(PIPE_CC_GCC) && defined(PIPE_ARCH_X86))
|
|
|
|
#define PIPE_ATOMIC_ASM_GCC_X86
|
|
|
|
#elif defined(PIPE_CC_GCC)
|
2009-04-17 16:02:34 +01:00
|
|
|
#define PIPE_ATOMIC_GCC_INTRINSIC
|
2009-04-17 11:01:22 +01:00
|
|
|
#else
|
2010-02-01 14:23:36 +00:00
|
|
|
#error "Unsupported platform"
|
2009-04-17 11:01:22 +01:00
|
|
|
#endif
|
2009-03-18 11:29:01 +00:00
|
|
|
|
|
|
|
|
|
|
|
|
2009-04-17 11:01:22 +01:00
|
|
|
#if defined(PIPE_ATOMIC_ASM_GCC_X86)
|
2009-03-18 11:29:01 +00:00
|
|
|
|
|
|
|
#define PIPE_ATOMIC "GCC x86 assembly"
|
|
|
|
|
2010-02-02 14:43:48 +00:00
|
|
|
#define p_atomic_set(_v, _i) (*(_v) = (_i))
|
|
|
|
#define p_atomic_read(_v) (*(_v))
|
2009-03-16 10:40:18 +00:00
|
|
|
|
|
|
|
|
|
|
|
static INLINE boolean
|
2010-02-02 14:43:48 +00:00
|
|
|
p_atomic_dec_zero(int32_t *v)
|
2009-03-16 10:40:18 +00:00
|
|
|
{
|
|
|
|
unsigned char c;
|
|
|
|
|
2010-02-02 14:43:48 +00:00
|
|
|
__asm__ __volatile__("lock; decl %0; sete %1":"+m"(*v), "=qm"(c)
|
2009-03-16 10:40:18 +00:00
|
|
|
::"memory");
|
|
|
|
|
|
|
|
return c != 0;
|
|
|
|
}
|
|
|
|
|
|
|
|
static INLINE void
|
2010-02-02 14:43:48 +00:00
|
|
|
p_atomic_inc(int32_t *v)
|
2009-03-16 10:40:18 +00:00
|
|
|
{
|
2010-02-02 14:43:48 +00:00
|
|
|
__asm__ __volatile__("lock; incl %0":"+m"(*v));
|
2009-03-16 10:40:18 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
static INLINE void
|
2010-02-02 14:43:48 +00:00
|
|
|
p_atomic_dec(int32_t *v)
|
2009-03-16 10:40:18 +00:00
|
|
|
{
|
2010-02-02 14:43:48 +00:00
|
|
|
__asm__ __volatile__("lock; decl %0":"+m"(*v));
|
2009-03-18 11:29:01 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
static INLINE int32_t
|
2010-02-02 14:43:48 +00:00
|
|
|
p_atomic_cmpxchg(int32_t *v, int32_t old, int32_t _new)
|
2009-03-18 11:29:01 +00:00
|
|
|
{
|
2010-02-02 14:43:48 +00:00
|
|
|
return __sync_val_compare_and_swap(v, old, _new);
|
2009-03-18 11:29:01 +00:00
|
|
|
}
|
|
|
|
#endif
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
/* Implementation using GCC-provided synchronization intrinsics
|
|
|
|
*/
|
2009-04-17 16:02:34 +01:00
|
|
|
#if defined(PIPE_ATOMIC_GCC_INTRINSIC)
|
2009-03-18 11:29:01 +00:00
|
|
|
|
|
|
|
#define PIPE_ATOMIC "GCC Sync Intrinsics"
|
|
|
|
|
2010-02-02 14:43:48 +00:00
|
|
|
#define p_atomic_set(_v, _i) (*(_v) = (_i))
|
|
|
|
#define p_atomic_read(_v) (*(_v))
|
2009-03-18 11:29:01 +00:00
|
|
|
|
|
|
|
|
|
|
|
static INLINE boolean
|
2010-02-02 14:43:48 +00:00
|
|
|
p_atomic_dec_zero(int32_t *v)
|
2009-03-18 11:29:01 +00:00
|
|
|
{
|
2010-02-02 14:43:48 +00:00
|
|
|
return (__sync_sub_and_fetch(v, 1) == 0);
|
2009-03-18 11:29:01 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
static INLINE void
|
2010-02-02 14:43:48 +00:00
|
|
|
p_atomic_inc(int32_t *v)
|
2009-03-18 11:29:01 +00:00
|
|
|
{
|
2010-02-02 14:43:48 +00:00
|
|
|
(void) __sync_add_and_fetch(v, 1);
|
2009-03-18 11:29:01 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
static INLINE void
|
2010-02-02 14:43:48 +00:00
|
|
|
p_atomic_dec(int32_t *v)
|
2009-03-18 11:29:01 +00:00
|
|
|
{
|
2010-02-02 14:43:48 +00:00
|
|
|
(void) __sync_sub_and_fetch(v, 1);
|
2009-03-16 10:40:18 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
static INLINE int32_t
|
2010-02-02 14:43:48 +00:00
|
|
|
p_atomic_cmpxchg(int32_t *v, int32_t old, int32_t _new)
|
2009-03-16 10:40:18 +00:00
|
|
|
{
|
2010-02-02 14:43:48 +00:00
|
|
|
return __sync_val_compare_and_swap(v, old, _new);
|
2009-03-16 10:40:18 +00:00
|
|
|
}
|
2009-03-18 11:29:01 +00:00
|
|
|
#endif
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
/* Unlocked version for single threaded environments, such as some
|
|
|
|
* windows kernel modules.
|
|
|
|
*/
|
2009-04-17 11:01:22 +01:00
|
|
|
#if defined(PIPE_ATOMIC_OS_UNLOCKED)
|
2009-03-16 10:40:18 +00:00
|
|
|
|
2009-03-18 11:29:01 +00:00
|
|
|
#define PIPE_ATOMIC "Unlocked"
|
2009-03-17 09:54:08 +00:00
|
|
|
|
2010-02-02 14:43:48 +00:00
|
|
|
#define p_atomic_set(_v, _i) (*(_v) = (_i))
|
|
|
|
#define p_atomic_read(_v) (*(_v))
|
|
|
|
#define p_atomic_dec_zero(_v) ((boolean) --(*(_v)))
|
|
|
|
#define p_atomic_inc(_v) ((void) (*(_v))++)
|
|
|
|
#define p_atomic_dec(_v) ((void) (*(_v))--)
|
|
|
|
#define p_atomic_cmpxchg(_v, old, _new) (*(_v) == old ? *(_v) = (_new) : *(_v))
|
2009-03-17 09:54:08 +00:00
|
|
|
|
2009-03-18 11:29:01 +00:00
|
|
|
#endif
|
|
|
|
|
|
|
|
|
|
|
|
/* Locally coded assembly for MSVC on x86:
|
|
|
|
*/
|
2009-04-17 11:01:22 +01:00
|
|
|
#if defined(PIPE_ATOMIC_ASM_MSVC_X86)
|
2009-03-18 11:29:01 +00:00
|
|
|
|
|
|
|
#define PIPE_ATOMIC "MSVC x86 assembly"
|
2009-03-16 12:42:22 +00:00
|
|
|
|
2010-02-02 14:43:48 +00:00
|
|
|
#define p_atomic_set(_v, _i) (*(_v) = (_i))
|
|
|
|
#define p_atomic_read(_v) (*(_v))
|
2009-03-16 12:42:22 +00:00
|
|
|
|
|
|
|
static INLINE boolean
|
2010-02-02 14:43:48 +00:00
|
|
|
p_atomic_dec_zero(int32_t *v)
|
2009-03-16 12:42:22 +00:00
|
|
|
{
|
|
|
|
unsigned char c;
|
|
|
|
|
|
|
|
__asm {
|
2010-02-02 14:43:48 +00:00
|
|
|
mov eax, [v]
|
2009-03-16 12:42:22 +00:00
|
|
|
lock dec dword ptr [eax]
|
|
|
|
sete byte ptr [c]
|
|
|
|
}
|
|
|
|
|
|
|
|
return c != 0;
|
|
|
|
}
|
|
|
|
|
|
|
|
static INLINE void
|
2010-02-02 14:43:48 +00:00
|
|
|
p_atomic_inc(int32_t *v)
|
2009-03-16 12:42:22 +00:00
|
|
|
{
|
|
|
|
__asm {
|
2010-02-02 14:43:48 +00:00
|
|
|
mov eax, [v]
|
2009-03-16 12:42:22 +00:00
|
|
|
lock inc dword ptr [eax]
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
static INLINE void
|
2010-02-02 14:43:48 +00:00
|
|
|
p_atomic_dec(int32_t *v)
|
2009-03-16 12:42:22 +00:00
|
|
|
{
|
|
|
|
__asm {
|
2010-02-02 14:43:48 +00:00
|
|
|
mov eax, [v]
|
2009-03-16 12:42:22 +00:00
|
|
|
lock dec dword ptr [eax]
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
static INLINE int32_t
|
2010-02-02 14:43:48 +00:00
|
|
|
p_atomic_cmpxchg(int32_t *v, int32_t old, int32_t _new)
|
2009-03-16 12:42:22 +00:00
|
|
|
{
|
|
|
|
int32_t orig;
|
|
|
|
|
|
|
|
__asm {
|
2010-02-02 14:43:48 +00:00
|
|
|
mov ecx, [v]
|
2009-03-16 12:42:22 +00:00
|
|
|
mov eax, [old]
|
2009-03-17 09:56:00 +00:00
|
|
|
mov edx, [_new]
|
2009-03-16 12:42:22 +00:00
|
|
|
lock cmpxchg [ecx], edx
|
|
|
|
mov [orig], eax
|
|
|
|
}
|
|
|
|
|
|
|
|
return orig;
|
|
|
|
}
|
2009-03-18 11:29:01 +00:00
|
|
|
#endif
|
|
|
|
|
|
|
|
|
2010-02-01 16:12:44 +00:00
|
|
|
#if defined(PIPE_ATOMIC_MSVC_INTRINSIC)
|
2009-03-18 11:29:01 +00:00
|
|
|
|
2010-02-01 16:12:44 +00:00
|
|
|
#define PIPE_ATOMIC "MSVC Intrinsics"
|
2009-03-16 12:07:22 +00:00
|
|
|
|
2010-02-01 16:12:44 +00:00
|
|
|
#include <intrin.h>
|
|
|
|
|
|
|
|
#pragma intrinsic(_InterlockedIncrement)
|
|
|
|
#pragma intrinsic(_InterlockedDecrement)
|
|
|
|
#pragma intrinsic(_InterlockedCompareExchange)
|
|
|
|
|
2010-02-02 14:43:48 +00:00
|
|
|
#define p_atomic_set(_v, _i) (*(_v) = (_i))
|
|
|
|
#define p_atomic_read(_v) (*(_v))
|
2009-03-16 12:07:22 +00:00
|
|
|
|
|
|
|
static INLINE boolean
|
2010-02-02 14:43:48 +00:00
|
|
|
p_atomic_dec_zero(int32_t *v)
|
2009-03-16 12:07:22 +00:00
|
|
|
{
|
2010-02-02 14:43:48 +00:00
|
|
|
return _InterlockedDecrement(v) == 0;
|
2009-03-16 12:07:22 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
static INLINE void
|
2010-02-02 14:43:48 +00:00
|
|
|
p_atomic_inc(int32_t *v)
|
2009-03-16 12:07:22 +00:00
|
|
|
{
|
2010-02-02 14:43:48 +00:00
|
|
|
_InterlockedIncrement(v);
|
2009-03-16 12:07:22 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
static INLINE void
|
2010-02-02 14:43:48 +00:00
|
|
|
p_atomic_dec(int32_t *v)
|
2009-03-16 12:07:22 +00:00
|
|
|
{
|
2010-02-02 14:43:48 +00:00
|
|
|
_InterlockedDecrement(v);
|
2009-03-16 12:07:22 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
static INLINE int32_t
|
2010-02-02 14:43:48 +00:00
|
|
|
p_atomic_cmpxchg(int32_t *v, int32_t old, int32_t _new)
|
2009-03-16 12:07:22 +00:00
|
|
|
{
|
2010-02-02 14:43:48 +00:00
|
|
|
return _InterlockedCompareExchange(v, _new, old);
|
2009-03-16 12:07:22 +00:00
|
|
|
}
|
|
|
|
|
2009-03-18 11:29:01 +00:00
|
|
|
#endif
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
#ifndef PIPE_ATOMIC
|
|
|
|
#error "No pipe_atomic implementation selected"
|
|
|
|
#endif
|
|
|
|
|
|
|
|
|
2009-03-16 10:40:18 +00:00
|
|
|
|
|
|
|
#ifdef __cplusplus
|
|
|
|
}
|
|
|
|
#endif
|
|
|
|
|
|
|
|
#endif /* P_ATOMIC_H */
|