diff options
Diffstat (limited to 'Source/3rdParty/SDL2/src/atomic')
| -rw-r--r-- | Source/3rdParty/SDL2/src/atomic/SDL_atomic.c | 304 | ||||
| -rw-r--r-- | Source/3rdParty/SDL2/src/atomic/SDL_spinlock.c | 176 |
2 files changed, 0 insertions, 480 deletions
diff --git a/Source/3rdParty/SDL2/src/atomic/SDL_atomic.c b/Source/3rdParty/SDL2/src/atomic/SDL_atomic.c deleted file mode 100644 index d0022cd..0000000 --- a/Source/3rdParty/SDL2/src/atomic/SDL_atomic.c +++ /dev/null @@ -1,304 +0,0 @@ -/* - Simple DirectMedia Layer - Copyright (C) 1997-2018 Sam Lantinga <slouken@libsdl.org> - - This software is provided 'as-is', without any express or implied - warranty. In no event will the authors be held liable for any damages - arising from the use of this software. - - Permission is granted to anyone to use this software for any purpose, - including commercial applications, and to alter it and redistribute it - freely, subject to the following restrictions: - - 1. The origin of this software must not be misrepresented; you must not - claim that you wrote the original software. If you use this software - in a product, an acknowledgment in the product documentation would be - appreciated but is not required. - 2. Altered source versions must be plainly marked as such, and must not be - misrepresented as being the original software. - 3. This notice may not be removed or altered from any source distribution. -*/ -#include "../SDL_internal.h" - -#include "SDL_atomic.h" - -#if defined(_MSC_VER) && (_MSC_VER >= 1500) -#include <intrin.h> -#define HAVE_MSC_ATOMICS 1 -#endif - -#if defined(__MACOSX__) /* !!! FIXME: should we favor gcc atomics? */ -#include <libkern/OSAtomic.h> -#endif - -#if !defined(HAVE_GCC_ATOMICS) && defined(__SOLARIS__) -#include <atomic.h> -#endif - -/* The __atomic_load_n() intrinsic showed up in different times for different compilers. */ -#if defined(HAVE_GCC_ATOMICS) -# if defined(__clang__) -# if __has_builtin(__atomic_load_n) - /* !!! FIXME: this advertises as available in the NDK but uses an external symbol we don't have. - It might be in a later NDK or we might need an extra library? --ryan. */ -# if !defined(__ANDROID__) -# define HAVE_ATOMIC_LOAD_N 1 -# endif -# endif -# elif defined(__GNUC__) -# if (__GNUC__ >= 5) -# define HAVE_ATOMIC_LOAD_N 1 -# endif -# endif -#endif - -#if defined(__WATCOMC__) && defined(__386__) -SDL_COMPILE_TIME_ASSERT(intsize, 4==sizeof(int)); -#define HAVE_WATCOM_ATOMICS -extern _inline int _SDL_xchg_watcom(volatile int *a, int v); -#pragma aux _SDL_xchg_watcom = \ - "lock xchg [ecx], eax" \ - parm [ecx] [eax] \ - value [eax] \ - modify exact [eax]; - -extern _inline unsigned char _SDL_cmpxchg_watcom(volatile int *a, int newval, int oldval); -#pragma aux _SDL_cmpxchg_watcom = \ - "lock cmpxchg [edx], ecx" \ - "setz al" \ - parm [edx] [ecx] [eax] \ - value [al] \ - modify exact [eax]; - -extern _inline int _SDL_xadd_watcom(volatile int *a, int v); -#pragma aux _SDL_xadd_watcom = \ - "lock xadd [ecx], eax" \ - parm [ecx] [eax] \ - value [eax] \ - modify exact [eax]; -#endif /* __WATCOMC__ && __386__ */ - -/* - If any of the operations are not provided then we must emulate some - of them. That means we need a nice implementation of spin locks - that avoids the "one big lock" problem. We use a vector of spin - locks and pick which one to use based on the address of the operand - of the function. - - To generate the index of the lock we first shift by 3 bits to get - rid on the zero bits that result from 32 and 64 bit allignment of - data. We then mask off all but 5 bits and use those 5 bits as an - index into the table. - - Picking the lock this way insures that accesses to the same data at - the same time will go to the same lock. OTOH, accesses to different - data have only a 1/32 chance of hitting the same lock. That should - pretty much eliminate the chances of several atomic operations on - different data from waiting on the same "big lock". If it isn't - then the table of locks can be expanded to a new size so long as - the new size is a power of two. - - Contributed by Bob Pendleton, bob@pendleton.com -*/ - -#if !defined(HAVE_MSC_ATOMICS) && !defined(HAVE_GCC_ATOMICS) && !defined(__MACOSX__) && !defined(__SOLARIS__) && !defined(HAVE_WATCOM_ATOMICS) -#define EMULATE_CAS 1 -#endif - -#if EMULATE_CAS -static SDL_SpinLock locks[32]; - -static SDL_INLINE void -enterLock(void *a) -{ - uintptr_t index = ((((uintptr_t)a) >> 3) & 0x1f); - - SDL_AtomicLock(&locks[index]); -} - -static SDL_INLINE void -leaveLock(void *a) -{ - uintptr_t index = ((((uintptr_t)a) >> 3) & 0x1f); - - SDL_AtomicUnlock(&locks[index]); -} -#endif - - -SDL_bool -SDL_AtomicCAS(SDL_atomic_t *a, int oldval, int newval) -{ -#ifdef HAVE_MSC_ATOMICS - return (_InterlockedCompareExchange((long*)&a->value, (long)newval, (long)oldval) == (long)oldval); -#elif defined(HAVE_WATCOM_ATOMICS) - return (SDL_bool) _SDL_cmpxchg_watcom(&a->value, newval, oldval); -#elif defined(HAVE_GCC_ATOMICS) - return (SDL_bool) __sync_bool_compare_and_swap(&a->value, oldval, newval); -#elif defined(__MACOSX__) /* this is deprecated in 10.12 sdk; favor gcc atomics. */ - return (SDL_bool) OSAtomicCompareAndSwap32Barrier(oldval, newval, &a->value); -#elif defined(__SOLARIS__) && defined(_LP64) - return (SDL_bool) ((int) atomic_cas_64((volatile uint64_t*)&a->value, (uint64_t)oldval, (uint64_t)newval) == oldval); -#elif defined(__SOLARIS__) && !defined(_LP64) - return (SDL_bool) ((int) atomic_cas_32((volatile uint32_t*)&a->value, (uint32_t)oldval, (uint32_t)newval) == oldval); -#elif EMULATE_CAS - SDL_bool retval = SDL_FALSE; - - enterLock(a); - if (a->value == oldval) { - a->value = newval; - retval = SDL_TRUE; - } - leaveLock(a); - - return retval; -#else - #error Please define your platform. -#endif -} - -SDL_bool -SDL_AtomicCASPtr(void **a, void *oldval, void *newval) -{ -#if defined(HAVE_MSC_ATOMICS) && (_M_IX86) - return (_InterlockedCompareExchange((long*)a, (long)newval, (long)oldval) == (long)oldval); -#elif defined(HAVE_MSC_ATOMICS) && (!_M_IX86) - return (_InterlockedCompareExchangePointer(a, newval, oldval) == oldval); -#elif defined(HAVE_WATCOM_ATOMICS) - return (SDL_bool) _SDL_cmpxchg_watcom((int *)a, (long)newval, (long)oldval); -#elif defined(HAVE_GCC_ATOMICS) - return __sync_bool_compare_and_swap(a, oldval, newval); -#elif defined(__MACOSX__) && defined(__LP64__) /* this is deprecated in 10.12 sdk; favor gcc atomics. */ - return (SDL_bool) OSAtomicCompareAndSwap64Barrier((int64_t)oldval, (int64_t)newval, (int64_t*) a); -#elif defined(__MACOSX__) && !defined(__LP64__) /* this is deprecated in 10.12 sdk; favor gcc atomics. */ - return (SDL_bool) OSAtomicCompareAndSwap32Barrier((int32_t)oldval, (int32_t)newval, (int32_t*) a); -#elif defined(__SOLARIS__) - return (SDL_bool) (atomic_cas_ptr(a, oldval, newval) == oldval); -#elif EMULATE_CAS - SDL_bool retval = SDL_FALSE; - - enterLock(a); - if (*a == oldval) { - *a = newval; - retval = SDL_TRUE; - } - leaveLock(a); - - return retval; -#else - #error Please define your platform. -#endif -} - -int -SDL_AtomicSet(SDL_atomic_t *a, int v) -{ -#ifdef HAVE_MSC_ATOMICS - return _InterlockedExchange((long*)&a->value, v); -#elif defined(HAVE_WATCOM_ATOMICS) - return _SDL_xchg_watcom(&a->value, v); -#elif defined(HAVE_GCC_ATOMICS) - return __sync_lock_test_and_set(&a->value, v); -#elif defined(__SOLARIS__) && defined(_LP64) - return (int) atomic_swap_64((volatile uint64_t*)&a->value, (uint64_t)v); -#elif defined(__SOLARIS__) && !defined(_LP64) - return (int) atomic_swap_32((volatile uint32_t*)&a->value, (uint32_t)v); -#else - int value; - do { - value = a->value; - } while (!SDL_AtomicCAS(a, value, v)); - return value; -#endif -} - -void* -SDL_AtomicSetPtr(void **a, void *v) -{ -#if defined(HAVE_MSC_ATOMICS) && (_M_IX86) - return (void *) _InterlockedExchange((long *)a, (long) v); -#elif defined(HAVE_MSC_ATOMICS) && (!_M_IX86) - return _InterlockedExchangePointer(a, v); -#elif defined(HAVE_WATCOM_ATOMICS) - return (void *) _SDL_xchg_watcom((int *)a, (long)v); -#elif defined(HAVE_GCC_ATOMICS) - return __sync_lock_test_and_set(a, v); -#elif defined(__SOLARIS__) - return atomic_swap_ptr(a, v); -#else - void *value; - do { - value = *a; - } while (!SDL_AtomicCASPtr(a, value, v)); - return value; -#endif -} - -int -SDL_AtomicAdd(SDL_atomic_t *a, int v) -{ -#ifdef HAVE_MSC_ATOMICS - return _InterlockedExchangeAdd((long*)&a->value, v); -#elif defined(HAVE_WATCOM_ATOMICS) - return _SDL_xadd_watcom(&a->value, v); -#elif defined(HAVE_GCC_ATOMICS) - return __sync_fetch_and_add(&a->value, v); -#elif defined(__SOLARIS__) - int pv = a->value; - membar_consumer(); -#if defined(_LP64) - atomic_add_64((volatile uint64_t*)&a->value, v); -#elif !defined(_LP64) - atomic_add_32((volatile uint32_t*)&a->value, v); -#endif - return pv; -#else - int value; - do { - value = a->value; - } while (!SDL_AtomicCAS(a, value, (value + v))); - return value; -#endif -} - -int -SDL_AtomicGet(SDL_atomic_t *a) -{ -#ifdef HAVE_ATOMIC_LOAD_N - return __atomic_load_n(&a->value, __ATOMIC_SEQ_CST); -#else - int value; - do { - value = a->value; - } while (!SDL_AtomicCAS(a, value, value)); - return value; -#endif -} - -void * -SDL_AtomicGetPtr(void **a) -{ -#ifdef HAVE_ATOMIC_LOAD_N - return __atomic_load_n(a, __ATOMIC_SEQ_CST); -#else - void *value; - do { - value = *a; - } while (!SDL_AtomicCASPtr(a, value, value)); - return value; -#endif -} - -void -SDL_MemoryBarrierReleaseFunction(void) -{ - SDL_MemoryBarrierRelease(); -} - -void -SDL_MemoryBarrierAcquireFunction(void) -{ - SDL_MemoryBarrierAcquire(); -} - -/* vi: set ts=4 sw=4 expandtab: */ diff --git a/Source/3rdParty/SDL2/src/atomic/SDL_spinlock.c b/Source/3rdParty/SDL2/src/atomic/SDL_spinlock.c deleted file mode 100644 index 6a7b14a..0000000 --- a/Source/3rdParty/SDL2/src/atomic/SDL_spinlock.c +++ /dev/null @@ -1,176 +0,0 @@ -/* - Simple DirectMedia Layer - Copyright (C) 1997-2018 Sam Lantinga <slouken@libsdl.org> - - This software is provided 'as-is', without any express or implied - warranty. In no event will the authors be held liable for any damages - arising from the use of this software. - - Permission is granted to anyone to use this software for any purpose, - including commercial applications, and to alter it and redistribute it - freely, subject to the following restrictions: - - 1. The origin of this software must not be misrepresented; you must not - claim that you wrote the original software. If you use this software - in a product, an acknowledgment in the product documentation would be - appreciated but is not required. - 2. Altered source versions must be plainly marked as such, and must not be - misrepresented as being the original software. - 3. This notice may not be removed or altered from any source distribution. -*/ -#include "../SDL_internal.h" - -#if defined(__WIN32__) || defined(__WINRT__) -#include "../core/windows/SDL_windows.h" -#endif - -#include "SDL_atomic.h" -#include "SDL_mutex.h" -#include "SDL_timer.h" - -#if !defined(HAVE_GCC_ATOMICS) && defined(__SOLARIS__) -#include <atomic.h> -#endif - -#if defined(_MSC_VER) && (defined(_M_IX86) || defined(_M_X64)) -#include <xmmintrin.h> -#endif - -#if defined(__WATCOMC__) && defined(__386__) -SDL_COMPILE_TIME_ASSERT(locksize, 4==sizeof(SDL_SpinLock)); -extern _inline int _SDL_xchg_watcom(volatile int *a, int v); -#pragma aux _SDL_xchg_watcom = \ - "lock xchg [ecx], eax" \ - parm [ecx] [eax] \ - value [eax] \ - modify exact [eax]; -#endif /* __WATCOMC__ && __386__ */ - -/* This function is where all the magic happens... */ -SDL_bool -SDL_AtomicTryLock(SDL_SpinLock *lock) -{ -#if SDL_ATOMIC_DISABLED - /* Terrible terrible damage */ - static SDL_mutex *_spinlock_mutex; - - if (!_spinlock_mutex) { - /* Race condition on first lock... */ - _spinlock_mutex = SDL_CreateMutex(); - } - SDL_LockMutex(_spinlock_mutex); - if (*lock == 0) { - *lock = 1; - SDL_UnlockMutex(_spinlock_mutex); - return SDL_TRUE; - } else { - SDL_UnlockMutex(_spinlock_mutex); - return SDL_FALSE; - } - -#elif defined(_MSC_VER) - SDL_COMPILE_TIME_ASSERT(locksize, sizeof(*lock) == sizeof(long)); - return (InterlockedExchange((long*)lock, 1) == 0); - -#elif defined(__WATCOMC__) && defined(__386__) - return _SDL_xchg_watcom(lock, 1) == 0; - -#elif HAVE_GCC_ATOMICS || HAVE_GCC_SYNC_LOCK_TEST_AND_SET - return (__sync_lock_test_and_set(lock, 1) == 0); - -#elif defined(__GNUC__) && defined(__arm__) && \ - (defined(__ARM_ARCH_4__) || defined(__ARM_ARCH_4T__) || \ - defined(__ARM_ARCH_5__) || defined(__ARM_ARCH_5TE__) || \ - defined(__ARM_ARCH_5TEJ__)) - int result; - __asm__ __volatile__ ( - "swp %0, %1, [%2]\n" - : "=&r,&r" (result) : "r,0" (1), "r,r" (lock) : "memory"); - return (result == 0); - -#elif defined(__GNUC__) && defined(__arm__) - int result; - __asm__ __volatile__ ( - "ldrex %0, [%2]\nteq %0, #0\nstrexeq %0, %1, [%2]" - : "=&r" (result) : "r" (1), "r" (lock) : "cc", "memory"); - return (result == 0); - -#elif defined(__GNUC__) && (defined(__i386__) || defined(__x86_64__)) - int result; - __asm__ __volatile__( - "lock ; xchgl %0, (%1)\n" - : "=r" (result) : "r" (lock), "0" (1) : "cc", "memory"); - return (result == 0); - -#elif defined(__MACOSX__) || defined(__IPHONEOS__) - /* Maybe used for PowerPC, but the Intel asm or gcc atomics are favored. */ - return OSAtomicCompareAndSwap32Barrier(0, 1, lock); - -#elif defined(__SOLARIS__) && defined(_LP64) - /* Used for Solaris with non-gcc compilers. */ - return (SDL_bool) ((int) atomic_cas_64((volatile uint64_t*)lock, 0, 1) == 0); - -#elif defined(__SOLARIS__) && !defined(_LP64) - /* Used for Solaris with non-gcc compilers. */ - return (SDL_bool) ((int) atomic_cas_32((volatile uint32_t*)lock, 0, 1) == 0); - -#else -#error Please implement for your platform. - return SDL_FALSE; -#endif -} - -/* "REP NOP" is PAUSE, coded for tools that don't know it by that name. */ -#if (defined(__GNUC__) || defined(__clang__)) && (defined(__i386__) || defined(__x86_64__)) - #define PAUSE_INSTRUCTION() __asm__ __volatile__("pause\n") /* Some assemblers can't do REP NOP, so go with PAUSE. */ -#elif defined(_MSC_VER) && (defined(_M_IX86) || defined(_M_X64)) - #define PAUSE_INSTRUCTION() _mm_pause() /* this is actually "rep nop" and not a SIMD instruction. No inline asm in MSVC x86-64! */ -#elif defined(__WATCOMC__) && defined(__386__) - /* watcom assembler rejects PAUSE if CPU < i686, and it refuses REP NOP as an invalid combination. Hardcode the bytes. */ - extern _inline void PAUSE_INSTRUCTION(void); - #pragma aux PAUSE_INSTRUCTION = "db 0f3h,90h" -#else - #define PAUSE_INSTRUCTION() -#endif - -void -SDL_AtomicLock(SDL_SpinLock *lock) -{ - int iterations = 0; - /* FIXME: Should we have an eventual timeout? */ - while (!SDL_AtomicTryLock(lock)) { - if (iterations < 32) { - iterations++; - PAUSE_INSTRUCTION(); - } else { - /* !!! FIXME: this doesn't definitely give up the current timeslice, it does different things on various platforms. */ - SDL_Delay(0); - } - } -} - -void -SDL_AtomicUnlock(SDL_SpinLock *lock) -{ -#if defined(_MSC_VER) - _ReadWriteBarrier(); - *lock = 0; - -#elif defined(__WATCOMC__) && defined(__386__) - SDL_CompilerBarrier (); - *lock = 0; - -#elif HAVE_GCC_ATOMICS || HAVE_GCC_SYNC_LOCK_TEST_AND_SET - __sync_lock_release(lock); - -#elif defined(__SOLARIS__) - /* Used for Solaris when not using gcc. */ - *lock = 0; - membar_producer(); - -#else - *lock = 0; -#endif -} - -/* vi: set ts=4 sw=4 expandtab: */ |