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 extern "C" jint     _Atomic_add32(jint     inc,       volatile jint*     dest);
  66 extern "C" intptr_t _Atomic_add64(intptr_t add_value, volatile intptr_t* dest);
  67 
  68 
  69 inline jint     Atomic::add     (jint    add_value, volatile jint*     dest) {
  70   return _Atomic_add32(add_value, dest);
  71 }
  72 
  73 inline intptr_t Atomic::add_ptr(intptr_t add_value, volatile intptr_t* dest) {
  74   return _Atomic_add64(add_value, dest);
  75 }
  76 
  77 inline void*    Atomic::add_ptr(intptr_t add_value, volatile void*     dest) {
  78   return (void*)add_ptr((intptr_t)add_value, (volatile intptr_t*)dest);
  79 }
  80 
  81 
  82 inline jint     Atomic::xchg    (jint     exchange_value, volatile jint*     dest) {
  83   return _Atomic_swap32(exchange_value, dest);
  84 }
  85 
  86 inline intptr_t Atomic::xchg_ptr(intptr_t exchange_value, volatile intptr_t* dest) {
  87   return _Atomic_swap64(exchange_value, dest);
  88 }
  89 
  90 inline void*    Atomic::xchg_ptr(void*    exchange_value, volatile void*     dest) {
  91   return (void*)xchg_ptr((intptr_t)exchange_value, (volatile intptr_t*)dest);
  92 }
  93 
  94 // No direct support for cmpxchg of bytes; emulate using int.
  95 template<>
  96 struct Atomic::PlatformCmpxchg<1> : Atomic::CmpxchgByteUsingInt {};
  97 
  98 template<>
  99 template<typename T>
 100 inline T Atomic::PlatformCmpxchg<4>::operator()(T exchange_value,
 101                                                 T volatile* dest,
 102                                                 T compare_value,
 103                                                 cmpxchg_memory_order order) const {
 104   STATIC_ASSERT(4 == sizeof(T));
 105   T rv;
 106   __asm__ volatile(
 107     " cas    [%2], %3, %0"
 108     : "=r" (rv)
 109     : "0" (exchange_value), "r" (dest), "r" (compare_value)
 110     : "memory");
 111   return rv;
 112 }
 113 
 114 template<>
 115 template<typename T>
 116 inline T Atomic::PlatformCmpxchg<8>::operator()(T exchange_value,
 117                                                 T volatile* dest,
 118                                                 T compare_value,
 119                                                 cmpxchg_memory_order order) const {
 120   STATIC_ASSERT(8 == sizeof(T));
 121   T rv;
 122   __asm__ volatile(
 123     " casx   [%2], %3, %0"
 124     : "=r" (rv)
 125     : "0" (exchange_value), "r" (dest), "r" (compare_value)
 126     : "memory");
 127   return rv;
 128 }
 129 
 130 #endif // OS_CPU_SOLARIS_SPARC_VM_ATOMIC_SOLARIS_SPARC_HPP