1 /* 2 * Copyright (c) 1999, 2017, Oracle and/or its affiliates. All rights reserved. 3 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER. 4 * 5 * This code is free software; you can redistribute it and/or modify it 6 * under the terms of the GNU General Public License version 2 only, as 7 * published by the Free Software Foundation. 8 * 9 * This code is distributed in the hope that it will be useful, but WITHOUT 10 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or 11 * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License 12 * version 2 for more details (a copy is included in the LICENSE file that 13 * accompanied this code). 14 * 15 * You should have received a copy of the GNU General Public License version 16 * 2 along with this work; if not, write to the Free Software Foundation, 17 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA. 18 * 19 * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA 20 * or visit www.oracle.com if you need additional information or have any 21 * questions. 22 * 23 */ 24 25 #ifndef OS_CPU_SOLARIS_SPARC_VM_ATOMIC_SOLARIS_SPARC_HPP 26 #define OS_CPU_SOLARIS_SPARC_VM_ATOMIC_SOLARIS_SPARC_HPP 27 28 // Implementation of class atomic 29 30 inline void Atomic::store (jbyte store_value, jbyte* dest) { *dest = store_value; } 31 inline void Atomic::store (jshort store_value, jshort* dest) { *dest = store_value; } 32 inline void Atomic::store (jint store_value, jint* dest) { *dest = store_value; } 33 inline void Atomic::store_ptr(intptr_t store_value, intptr_t* dest) { *dest = store_value; } 34 inline void Atomic::store_ptr(void* store_value, void* dest) { *(void**)dest = store_value; } 35 36 inline void Atomic::store (jbyte store_value, volatile jbyte* dest) { *dest = store_value; } 37 inline void Atomic::store (jshort store_value, volatile jshort* dest) { *dest = store_value; } 38 inline void Atomic::store (jint store_value, volatile jint* dest) { *dest = store_value; } 39 inline void Atomic::store_ptr(intptr_t store_value, volatile intptr_t* dest) { *dest = store_value; } 40 inline void Atomic::store_ptr(void* store_value, volatile void* dest) { *(void* volatile *)dest = store_value; } 41 42 inline void Atomic::inc (volatile jint* dest) { (void)add (1, dest); } 43 inline void Atomic::inc_ptr(volatile intptr_t* dest) { (void)add_ptr(1, dest); } 44 inline void Atomic::inc_ptr(volatile void* dest) { (void)add_ptr(1, dest); } 45 46 inline void Atomic::dec (volatile jint* dest) { (void)add (-1, dest); } 47 inline void Atomic::dec_ptr(volatile intptr_t* dest) { (void)add_ptr(-1, dest); } 48 inline void Atomic::dec_ptr(volatile void* dest) { (void)add_ptr(-1, dest); } 49 50 51 inline void Atomic::store(jlong store_value, jlong* dest) { *dest = store_value; } 52 inline void Atomic::store(jlong store_value, volatile jlong* dest) { *dest = store_value; } 53 inline jlong Atomic::load(const volatile jlong* src) { return *src; } 54 55 56 // This is the interface to the atomic instructions in solaris_sparc.il. 57 // It's very messy because we need to support v8 and these instructions 58 // are illegal there. When sparc v8 is dropped, we can drop out lots of 59 // this code. Also compiler2 does not support v8 so the conditional code 60 // omits the instruction set check. 61 62 extern "C" jint _Atomic_swap32(jint exchange_value, volatile jint* dest); 63 extern "C" intptr_t _Atomic_swap64(intptr_t exchange_value, volatile intptr_t* dest); 64 65 // Implement ADD using a CAS loop. 66 template<size_t byte_size> 67 struct Atomic::PlatformAdd VALUE_OBJ_CLASS_SPEC { 68 template<typename I, typename D> 69 inline D operator()(I add_value, D volatile* dest) const { 70 D old_value = *dest; 71 while (true) { 72 D new_value = old_value + add_value; 73 D result = cmpxchg(new_value, dest, old_value); 74 if (result == old_value) break; 75 old_value = result; 76 } 77 return old_value + add_value; 78 } 79 }; 80 81 inline jint Atomic::xchg (jint exchange_value, volatile jint* dest) { 82 return _Atomic_swap32(exchange_value, dest); 83 } 84 85 inline intptr_t Atomic::xchg_ptr(intptr_t exchange_value, volatile intptr_t* dest) { 86 return _Atomic_swap64(exchange_value, dest); 87 } 88 89 inline void* Atomic::xchg_ptr(void* exchange_value, volatile void* dest) { 90 return (void*)xchg_ptr((intptr_t)exchange_value, (volatile intptr_t*)dest); 91 } 92 93 // No direct support for cmpxchg of bytes; emulate using int. 94 template<> 95 struct Atomic::PlatformCmpxchg<1> : Atomic::CmpxchgByteUsingInt {}; 96 97 template<> 98 template<typename T> 99 inline T Atomic::PlatformCmpxchg<4>::operator()(T exchange_value, 100 T volatile* dest, 101 T compare_value, 102 cmpxchg_memory_order order) const { 103 STATIC_ASSERT(4 == sizeof(T)); 104 T rv; 105 __asm__ volatile( 106 " cas [%2], %3, %0" 107 : "=r" (rv) 108 : "0" (exchange_value), "r" (dest), "r" (compare_value) 109 : "memory"); 110 return rv; 111 } 112 113 template<> 114 template<typename T> 115 inline T Atomic::PlatformCmpxchg<8>::operator()(T exchange_value, 116 T volatile* dest, 117 T compare_value, 118 cmpxchg_memory_order order) const { 119 STATIC_ASSERT(8 == sizeof(T)); 120 T rv; 121 __asm__ volatile( 122 " casx [%2], %3, %0" 123 : "=r" (rv) 124 : "0" (exchange_value), "r" (dest), "r" (compare_value) 125 : "memory"); 126 return rv; 127 } 128 129 #endif // OS_CPU_SOLARIS_SPARC_VM_ATOMIC_SOLARIS_SPARC_HPP