Loading...
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 | /* Copyright (C) 2003 Free Software Foundation, Inc. This file is part of the GNU C Library. Contributed by Carlos O'Donell <carlos@baldric.uwo.ca>, 2005. The GNU C Library is free software; you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. The GNU C Library 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 Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with the GNU C Library; if not, see <http://www.gnu.org/licenses/>. */ #include <stdint.h> #include <errno.h> #include <bits/kernel-features.h> #define ABORT_INSTRUCTION __asm__(__UCLIBC_ABORT_INSTRUCTION__) /* We need EFAULT, ENOSYS */ #if !defined EFAULT && !defined ENOSYS #define EFAULT 14 #define ENOSYS 251 #endif #ifndef _BITS_ATOMIC_H #define _BITS_ATOMIC_H 1 typedef int8_t atomic8_t; typedef uint8_t uatomic8_t; typedef int_fast8_t atomic_fast8_t; typedef uint_fast8_t uatomic_fast8_t; typedef int32_t atomic32_t; typedef uint32_t uatomic32_t; typedef int_fast32_t atomic_fast32_t; typedef uint_fast32_t uatomic_fast32_t; typedef intptr_t atomicptr_t; typedef uintptr_t uatomicptr_t; typedef intmax_t atomic_max_t; typedef uintmax_t uatomic_max_t; /* prev = *addr; if (prev == old) *addr = new; return prev; */ /* Use the kernel atomic light weight syscalls on hppa */ #define LWS "0xb0" #define LWS_CAS "0" /* Note r31 is the link register */ #define LWS_CLOBBER "r1", "r26", "r25", "r24", "r23", "r22", "r21", "r20", "r28", "r31", "memory" #define ASM_EAGAIN "11" #if __ASSUME_LWS_CAS /* The only basic operation needed is compare and exchange. */ # define atomic_compare_and_exchange_val_acq(mem, newval, oldval) \ ({ \ volatile int lws_errno = EFAULT; \ volatile int lws_ret = 0xdeadbeef; \ __asm__ volatile( \ "0: \n\t" \ "copy %3, %%r26 \n\t" \ "copy %4, %%r25 \n\t" \ "copy %5, %%r24 \n\t" \ "ble " LWS "(%%sr2, %%r0) \n\t" \ "ldi " LWS_CAS ", %%r20 \n\t" \ "cmpib,=,n " ASM_EAGAIN ",%%r21,0b \n\t" \ "nop \n\t" \ "stw %%r28, %0 \n\t" \ "sub %%r0, %%r21, %%r21 \n\t" \ "stw %%r21, %1 \n\t" \ : "=m" (lws_ret), "=m" (lws_errno), "=m" (*mem) \ : "r" (mem), "r" (oldval), "r" (newval) \ : LWS_CLOBBER \ ); \ \ if(lws_errno == EFAULT || lws_errno == ENOSYS) \ ABORT_INSTRUCTION; \ \ lws_ret; \ }) # define atomic_compare_and_exchange_bool_acq(mem, newval, oldval) \ ({ \ int ret; \ ret = atomic_compare_and_exchange_val_acq(mem, newval, oldval); \ /* Return 1 if it was already acquired */ \ (ret != oldval); \ }) #else # error __ASSUME_LWS_CAS is required to build uClibc. #endif /* __ASSUME_LWS_CAS */ #endif /* _BITS_ATOMIC_H */ |