1 /* Copyright (C) 2003-2021 Free Software Foundation, Inc. 2 This file is part of the GNU C Library. 3 4 The GNU C Library is free software; you can redistribute it and/or 5 modify it under the terms of the GNU Lesser General Public 6 License as published by the Free Software Foundation; either 7 version 2.1 of the License, or (at your option) any later version. 8 9 The GNU C Library is distributed in the hope that it will be useful, 10 but WITHOUT ANY WARRANTY; without even the implied warranty of 11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU 12 Lesser General Public License for more details. 13 14 You should have received a copy of the GNU Lesser General Public 15 License along with the GNU C Library; if not, see 16 <https://www.gnu.org/licenses/>. */ 17 18 #include <ia64intrin.h> 19 20 #define __HAVE_64B_ATOMICS 1 21 #define USE_ATOMIC_COMPILER_BUILTINS 0 22 23 /* XXX Is this actually correct? */ 24 #define ATOMIC_EXCHANGE_USES_CAS 0 25 26 27 #define __arch_compare_and_exchange_bool_8_acq(mem, newval, oldval) \ 28 (abort (), 0) 29 30 #define __arch_compare_and_exchange_bool_16_acq(mem, newval, oldval) \ 31 (abort (), 0) 32 33 #define __arch_compare_and_exchange_bool_32_acq(mem, newval, oldval) \ 34 (!__sync_bool_compare_and_swap ((mem), (int) (long) (oldval), \ 35 (int) (long) (newval))) 36 37 #define __arch_compare_and_exchange_bool_64_acq(mem, newval, oldval) \ 38 (!__sync_bool_compare_and_swap ((mem), (long) (oldval), \ 39 (long) (newval))) 40 41 #define __arch_compare_and_exchange_val_8_acq(mem, newval, oldval) \ 42 (abort (), (__typeof (*mem)) 0) 43 44 #define __arch_compare_and_exchange_val_16_acq(mem, newval, oldval) \ 45 (abort (), (__typeof (*mem)) 0) 46 47 #define __arch_compare_and_exchange_val_32_acq(mem, newval, oldval) \ 48 __sync_val_compare_and_swap ((mem), (int) (long) (oldval), \ 49 (int) (long) (newval)) 50 51 #define __arch_compare_and_exchange_val_64_acq(mem, newval, oldval) \ 52 __sync_val_compare_and_swap ((mem), (long) (oldval), (long) (newval)) 53 54 /* Atomically store newval and return the old value. */ 55 #define atomic_exchange_acq(mem, value) \ 56 __sync_lock_test_and_set (mem, value) 57 58 #define atomic_exchange_rel(mem, value) \ 59 (__sync_synchronize (), __sync_lock_test_and_set (mem, value)) 60 61 #define atomic_exchange_and_add(mem, value) \ 62 __sync_fetch_and_add ((mem), (value)) 63 64 #define atomic_decrement_if_positive(mem) \ 65 ({ __typeof (*mem) __oldval, __val; \ 66 __typeof (mem) __memp = (mem); \ 67 \ 68 __val = (*__memp); \ 69 do \ 70 { \ 71 __oldval = __val; \ 72 if (__builtin_expect (__val <= 0, 0)) \ 73 break; \ 74 __val = atomic_compare_and_exchange_val_acq (__memp, __oldval - 1, \ 75 __oldval); \ 76 } \ 77 while (__builtin_expect (__val != __oldval, 0)); \ 78 __oldval; }) 79 80 #define atomic_bit_test_set(mem, bit) \ 81 ({ __typeof (*mem) __oldval, __val; \ 82 __typeof (mem) __memp = (mem); \ 83 __typeof (*mem) __mask = ((__typeof (*mem)) 1 << (bit)); \ 84 \ 85 __val = (*__memp); \ 86 do \ 87 { \ 88 __oldval = __val; \ 89 __val = atomic_compare_and_exchange_val_acq (__memp, \ 90 __oldval | __mask, \ 91 __oldval); \ 92 } \ 93 while (__builtin_expect (__val != __oldval, 0)); \ 94 __oldval & __mask; }) 95 96 #define atomic_full_barrier() __sync_synchronize () 97