1 /*
   2  * Copyright (c) 2003, 2014, 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_X86_VM_ORDERACCESS_SOLARIS_X86_INLINE_HPP
  26 #define OS_CPU_SOLARIS_X86_VM_ORDERACCESS_SOLARIS_X86_INLINE_HPP
  27 
  28 #include "runtime/atomic.inline.hpp"
  29 #include "runtime/orderAccess.hpp"
  30 #include "runtime/os.hpp"
  31 
  32 // Implementation of class OrderAccess.
  33 
  34 // For Sun Studio - implementation is in solaris_i486.il.
  35 // For gcc - implementation is just below.
  36 extern "C" void _OrderAccess_acquire();
  37 extern "C" void _OrderAccess_fence();
  38 
  39 inline void OrderAccess::loadload()   { acquire(); }
  40 inline void OrderAccess::storestore() { release(); }
  41 inline void OrderAccess::loadstore()  { acquire(); }
  42 inline void OrderAccess::storeload()  { fence(); }
  43 
  44 inline void OrderAccess::acquire() {
  45   _OrderAccess_acquire();
  46 
  47 }
  48 
  49 inline void OrderAccess::release() {
  50   // Avoid hitting the same cache-line from
  51   // different threads.
  52   volatile jint local_dummy = 0;
  53 }
  54 
  55 inline void OrderAccess::fence() {
  56   if (os::is_MP()) {
  57     _OrderAccess_fence();
  58   }
  59 }
  60 
  61 #ifdef _GNU_SOURCE
  62 
  63 extern "C" {
  64   inline void _OrderAccess_acquire() {
  65     volatile intptr_t local_dummy;
  66 #ifdef AMD64
  67     __asm__ volatile ("movq 0(%%rsp), %0" : "=r" (local_dummy) : : "memory");
  68 #else
  69     __asm__ volatile ("movl 0(%%esp),%0" : "=r" (local_dummy) : : "memory");
  70 #endif // AMD64
  71   }
  72   inline void _OrderAccess_fence() {
  73     // Always use locked addl since mfence is sometimes expensive
  74     __asm__ volatile ("lock; addl $0,0(%%esp)" : : : "cc", "memory");
  75   }
  76 
  77 }
  78 
  79 #endif // GNU_SOURCE
  80 
  81 inline jbyte    OrderAccess::load_acquire(volatile jbyte*   p) { return *p; }
  82 inline jshort   OrderAccess::load_acquire(volatile jshort*  p) { return *p; }
  83 inline jint     OrderAccess::load_acquire(volatile jint*    p) { return *p; }
  84 inline jlong    OrderAccess::load_acquire(volatile jlong*   p) { return Atomic::load(p); }
  85 inline jubyte   OrderAccess::load_acquire(volatile jubyte*  p) { return *p; }
  86 inline jushort  OrderAccess::load_acquire(volatile jushort* p) { return *p; }
  87 inline juint    OrderAccess::load_acquire(volatile juint*   p) { return *p; }
  88 inline julong   OrderAccess::load_acquire(volatile julong*  p) { return Atomic::load((volatile jlong*)p); }
  89 inline jfloat   OrderAccess::load_acquire(volatile jfloat*  p) { return *p; }
  90 inline jdouble  OrderAccess::load_acquire(volatile jdouble* p) { return jdouble_cast(Atomic::load((volatile jlong*)p)); }
  91 
  92 inline intptr_t OrderAccess::load_ptr_acquire(volatile intptr_t*   p) { return *p; }
  93 inline void*    OrderAccess::load_ptr_acquire(volatile void*       p) { return *(void* volatile *)p; }
  94 inline void*    OrderAccess::load_ptr_acquire(const volatile void* p) { return *(void* const volatile *)p; }
  95 
  96 inline void     OrderAccess::release_store(volatile jbyte*   p, jbyte   v) { *p = v; }
  97 inline void     OrderAccess::release_store(volatile jshort*  p, jshort  v) { *p = v; }
  98 inline void     OrderAccess::release_store(volatile jint*    p, jint    v) { *p = v; }
  99 inline void     OrderAccess::release_store(volatile jlong*   p, jlong   v) { Atomic::store(v, p); }
 100 inline void     OrderAccess::release_store(volatile jubyte*  p, jubyte  v) { *p = v; }
 101 inline void     OrderAccess::release_store(volatile jushort* p, jushort v) { *p = v; }
 102 inline void     OrderAccess::release_store(volatile juint*   p, juint   v) { *p = v; }
 103 inline void     OrderAccess::release_store(volatile julong*  p, julong  v) { Atomic::store((jlong)v, (volatile jlong*)p); }
 104 inline void     OrderAccess::release_store(volatile jfloat*  p, jfloat  v) { *p = v; }
 105 inline void     OrderAccess::release_store(volatile jdouble* p, jdouble v) { release_store((volatile jlong*)p, jlong_cast(v)); }
 106 
 107 inline void     OrderAccess::release_store_ptr(volatile intptr_t* p, intptr_t v) { *p = v; }
 108 inline void     OrderAccess::release_store_ptr(volatile void*     p, void*    v) { *(void* volatile *)p = v; }
 109 
 110 inline void     OrderAccess::store_fence(jbyte*   p, jbyte   v) { *p = v; fence(); }
 111 inline void     OrderAccess::store_fence(jshort*  p, jshort  v) { *p = v; fence(); }
 112 inline void     OrderAccess::store_fence(jint*    p, jint    v) { *p = v; fence(); }
 113 inline void     OrderAccess::store_fence(jlong*   p, jlong   v) { *p = v; fence(); }
 114 inline void     OrderAccess::store_fence(jubyte*  p, jubyte  v) { *p = v; fence(); }
 115 inline void     OrderAccess::store_fence(jushort* p, jushort v) { *p = v; fence(); }
 116 inline void     OrderAccess::store_fence(juint*   p, juint   v) { *p = v; fence(); }
 117 inline void     OrderAccess::store_fence(julong*  p, julong  v) { *p = v; fence(); }
 118 inline void     OrderAccess::store_fence(jfloat*  p, jfloat  v) { *p = v; fence(); }
 119 inline void     OrderAccess::store_fence(jdouble* p, jdouble v) { *p = v; fence(); }
 120 
 121 inline void     OrderAccess::store_ptr_fence(intptr_t* p, intptr_t v) { *p = v; fence(); }
 122 inline void     OrderAccess::store_ptr_fence(void**    p, void*    v) { *p = v; fence(); }
 123 
 124 inline void     OrderAccess::release_store_fence(volatile jbyte*   p, jbyte   v) { *p = v; fence(); }
 125 inline void     OrderAccess::release_store_fence(volatile jshort*  p, jshort  v) { *p = v; fence(); }
 126 inline void     OrderAccess::release_store_fence(volatile jint*    p, jint    v) { *p = v; fence(); }
 127 inline void     OrderAccess::release_store_fence(volatile jlong*   p, jlong   v) { release_store(p, v); fence(); }
 128 inline void     OrderAccess::release_store_fence(volatile jubyte*  p, jubyte  v) { *p = v; fence(); }
 129 inline void     OrderAccess::release_store_fence(volatile jushort* p, jushort v) { *p = v; fence(); }
 130 inline void     OrderAccess::release_store_fence(volatile juint*   p, juint   v) { *p = v; fence(); }
 131 inline void     OrderAccess::release_store_fence(volatile julong*  p, julong  v) { release_store((jlong *)p, (jlong)v); fence(); }
 132 inline void     OrderAccess::release_store_fence(volatile jfloat*  p, jfloat  v) { *p = v; fence(); }
 133 inline void     OrderAccess::release_store_fence(volatile jdouble* p, jdouble v) { release_store_fence((volatile jlong*)p, jlong_cast(v)); }
 134 
 135 inline void     OrderAccess::release_store_ptr_fence(volatile intptr_t* p, intptr_t v) { *p = v; fence(); }
 136 inline void     OrderAccess::release_store_ptr_fence(volatile void*     p, void*    v) { *(void* volatile *)p = v; fence(); }
 137 
 138 #endif // OS_CPU_SOLARIS_X86_VM_ORDERACCESS_SOLARIS_X86_INLINE_HPP