1 /*
2 * Copyright (c) 1997, 2013, Oracle and/or its affiliates. All rights reserved.
3 * Copyright 2012, 2013 SAP AG. All rights reserved.
4 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
5 *
6 * This code is free software; you can redistribute it and/or modify it
7 * under the terms of the GNU General Public License version 2 only, as
8 * published by the Free Software Foundation.
9 *
10 * This code is distributed in the hope that it will be useful, but WITHOUT
11 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
12 * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
13 * version 2 for more details (a copy is included in the LICENSE file that
14 * accompanied this code).
15 *
16 * You should have received a copy of the GNU General Public License version
17 * 2 along with this work; if not, write to the Free Software Foundation,
18 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
19 *
20 * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
21 * or visit www.oracle.com if you need additional information or have any
22 * questions.
23 *
24 */
25
26 #ifndef OS_CPU_BSD_PPC_VM_ORDERACCESS_BSD_PPC_INLINE_HPP
27 #define OS_CPU_BSD_PPC_VM_ORDERACCESS_BSD_PPC_INLINE_HPP
28
29 #include "runtime/orderAccess.hpp"
30 #include "vm_version_ppc.hpp"
31
32 #ifndef PPC64
33 #error "OrderAccess currently only implemented for PPC64"
34 #endif
35
36 // Implementation of class OrderAccess.
37
38 //
39 // Machine barrier instructions:
40 //
41 // - sync Two-way memory barrier, aka fence.
42 // - lwsync orders Store|Store,
43 // Load|Store,
44 // Load|Load,
45 // but not Store|Load
46 // - eieio orders Store|Store
47 // - isync Invalidates speculatively executed instructions,
48 // but isync may complete before storage accesses
49 // associated with instructions preceding isync have
50 // been performed.
51 //
52 // Semantic barrier instructions:
53 // (as defined in orderAccess.hpp)
54 //
55 // - release orders Store|Store, (maps to lwsync)
56 // Load|Store
57 // - acquire orders Load|Store, (maps to lwsync)
58 // Load|Load
59 // - fence orders Store|Store, (maps to sync)
60 // Load|Store,
61 // Load|Load,
62 // Store|Load
63 //
64
65 #define inlasm_sync() __asm__ __volatile__ ("sync" : : : "memory");
66 #define inlasm_lwsync() __asm__ __volatile__ ("lwsync" : : : "memory");
67 #define inlasm_eieio() __asm__ __volatile__ ("eieio" : : : "memory");
68 #define inlasm_isync() __asm__ __volatile__ ("isync" : : : "memory");
69 #define inlasm_release() inlasm_lwsync();
70 #define inlasm_acquire() inlasm_lwsync();
71 // Use twi-isync for load_acquire (faster than lwsync).
72 #define inlasm_acquire_reg(X) __asm__ __volatile__ ("twi 0,%0,0\n isync\n" : : "r" (X) : "memory");
73 #define inlasm_fence() inlasm_sync();
74
loadload()75 inline void OrderAccess::loadload() { inlasm_lwsync(); }
storestore()76 inline void OrderAccess::storestore() { inlasm_lwsync(); }
loadstore()77 inline void OrderAccess::loadstore() { inlasm_lwsync(); }
storeload()78 inline void OrderAccess::storeload() { inlasm_fence(); }
79
acquire()80 inline void OrderAccess::acquire() { inlasm_acquire(); }
release()81 inline void OrderAccess::release() { inlasm_release(); }
fence()82 inline void OrderAccess::fence() { inlasm_fence(); }
83
load_acquire(volatile jbyte * p)84 inline jbyte OrderAccess::load_acquire(volatile jbyte* p) { register jbyte t = *p; inlasm_acquire_reg(t); return t; }
load_acquire(volatile jshort * p)85 inline jshort OrderAccess::load_acquire(volatile jshort* p) { register jshort t = *p; inlasm_acquire_reg(t); return t; }
load_acquire(volatile jint * p)86 inline jint OrderAccess::load_acquire(volatile jint* p) { register jint t = *p; inlasm_acquire_reg(t); return t; }
load_acquire(volatile jlong * p)87 inline jlong OrderAccess::load_acquire(volatile jlong* p) { register jlong t = *p; inlasm_acquire_reg(t); return t; }
load_acquire(volatile jubyte * p)88 inline jubyte OrderAccess::load_acquire(volatile jubyte* p) { register jubyte t = *p; inlasm_acquire_reg(t); return t; }
load_acquire(volatile jushort * p)89 inline jushort OrderAccess::load_acquire(volatile jushort* p) { register jushort t = *p; inlasm_acquire_reg(t); return t; }
load_acquire(volatile juint * p)90 inline juint OrderAccess::load_acquire(volatile juint* p) { register juint t = *p; inlasm_acquire_reg(t); return t; }
load_acquire(volatile julong * p)91 inline julong OrderAccess::load_acquire(volatile julong* p) { return (julong)load_acquire((volatile jlong*)p); }
load_acquire(volatile jfloat * p)92 inline jfloat OrderAccess::load_acquire(volatile jfloat* p) { register jfloat t = *p; inlasm_acquire(); return t; }
load_acquire(volatile jdouble * p)93 inline jdouble OrderAccess::load_acquire(volatile jdouble* p) { register jdouble t = *p; inlasm_acquire(); return t; }
94
load_ptr_acquire(volatile intptr_t * p)95 inline intptr_t OrderAccess::load_ptr_acquire(volatile intptr_t* p) { return (intptr_t)load_acquire((volatile jlong*)p); }
load_ptr_acquire(volatile void * p)96 inline void* OrderAccess::load_ptr_acquire(volatile void* p) { return (void*) load_acquire((volatile jlong*)p); }
load_ptr_acquire(const volatile void * p)97 inline void* OrderAccess::load_ptr_acquire(const volatile void* p) { return (void*) load_acquire((volatile jlong*)p); }
98
release_store(volatile jbyte * p,jbyte v)99 inline void OrderAccess::release_store(volatile jbyte* p, jbyte v) { inlasm_release(); *p = v; }
release_store(volatile jshort * p,jshort v)100 inline void OrderAccess::release_store(volatile jshort* p, jshort v) { inlasm_release(); *p = v; }
release_store(volatile jint * p,jint v)101 inline void OrderAccess::release_store(volatile jint* p, jint v) { inlasm_release(); *p = v; }
release_store(volatile jlong * p,jlong v)102 inline void OrderAccess::release_store(volatile jlong* p, jlong v) { inlasm_release(); *p = v; }
release_store(volatile jubyte * p,jubyte v)103 inline void OrderAccess::release_store(volatile jubyte* p, jubyte v) { inlasm_release(); *p = v; }
release_store(volatile jushort * p,jushort v)104 inline void OrderAccess::release_store(volatile jushort* p, jushort v) { inlasm_release(); *p = v; }
release_store(volatile juint * p,juint v)105 inline void OrderAccess::release_store(volatile juint* p, juint v) { inlasm_release(); *p = v; }
release_store(volatile julong * p,julong v)106 inline void OrderAccess::release_store(volatile julong* p, julong v) { inlasm_release(); *p = v; }
release_store(volatile jfloat * p,jfloat v)107 inline void OrderAccess::release_store(volatile jfloat* p, jfloat v) { inlasm_release(); *p = v; }
release_store(volatile jdouble * p,jdouble v)108 inline void OrderAccess::release_store(volatile jdouble* p, jdouble v) { inlasm_release(); *p = v; }
109
release_store_ptr(volatile intptr_t * p,intptr_t v)110 inline void OrderAccess::release_store_ptr(volatile intptr_t* p, intptr_t v) { inlasm_release(); *p = v; }
release_store_ptr(volatile void * p,void * v)111 inline void OrderAccess::release_store_ptr(volatile void* p, void* v) { inlasm_release(); *(void* volatile *)p = v; }
112
store_fence(jbyte * p,jbyte v)113 inline void OrderAccess::store_fence(jbyte* p, jbyte v) { *p = v; inlasm_fence(); }
store_fence(jshort * p,jshort v)114 inline void OrderAccess::store_fence(jshort* p, jshort v) { *p = v; inlasm_fence(); }
store_fence(jint * p,jint v)115 inline void OrderAccess::store_fence(jint* p, jint v) { *p = v; inlasm_fence(); }
store_fence(jlong * p,jlong v)116 inline void OrderAccess::store_fence(jlong* p, jlong v) { *p = v; inlasm_fence(); }
store_fence(jubyte * p,jubyte v)117 inline void OrderAccess::store_fence(jubyte* p, jubyte v) { *p = v; inlasm_fence(); }
store_fence(jushort * p,jushort v)118 inline void OrderAccess::store_fence(jushort* p, jushort v) { *p = v; inlasm_fence(); }
store_fence(juint * p,juint v)119 inline void OrderAccess::store_fence(juint* p, juint v) { *p = v; inlasm_fence(); }
store_fence(julong * p,julong v)120 inline void OrderAccess::store_fence(julong* p, julong v) { *p = v; inlasm_fence(); }
store_fence(jfloat * p,jfloat v)121 inline void OrderAccess::store_fence(jfloat* p, jfloat v) { *p = v; inlasm_fence(); }
store_fence(jdouble * p,jdouble v)122 inline void OrderAccess::store_fence(jdouble* p, jdouble v) { *p = v; inlasm_fence(); }
123
store_ptr_fence(intptr_t * p,intptr_t v)124 inline void OrderAccess::store_ptr_fence(intptr_t* p, intptr_t v) { *p = v; inlasm_fence(); }
store_ptr_fence(void ** p,void * v)125 inline void OrderAccess::store_ptr_fence(void** p, void* v) { *p = v; inlasm_fence(); }
126
release_store_fence(volatile jbyte * p,jbyte v)127 inline void OrderAccess::release_store_fence(volatile jbyte* p, jbyte v) { inlasm_release(); *p = v; inlasm_fence(); }
release_store_fence(volatile jshort * p,jshort v)128 inline void OrderAccess::release_store_fence(volatile jshort* p, jshort v) { inlasm_release(); *p = v; inlasm_fence(); }
release_store_fence(volatile jint * p,jint v)129 inline void OrderAccess::release_store_fence(volatile jint* p, jint v) { inlasm_release(); *p = v; inlasm_fence(); }
release_store_fence(volatile jlong * p,jlong v)130 inline void OrderAccess::release_store_fence(volatile jlong* p, jlong v) { inlasm_release(); *p = v; inlasm_fence(); }
release_store_fence(volatile jubyte * p,jubyte v)131 inline void OrderAccess::release_store_fence(volatile jubyte* p, jubyte v) { inlasm_release(); *p = v; inlasm_fence(); }
release_store_fence(volatile jushort * p,jushort v)132 inline void OrderAccess::release_store_fence(volatile jushort* p, jushort v) { inlasm_release(); *p = v; inlasm_fence(); }
release_store_fence(volatile juint * p,juint v)133 inline void OrderAccess::release_store_fence(volatile juint* p, juint v) { inlasm_release(); *p = v; inlasm_fence(); }
release_store_fence(volatile julong * p,julong v)134 inline void OrderAccess::release_store_fence(volatile julong* p, julong v) { inlasm_release(); *p = v; inlasm_fence(); }
release_store_fence(volatile jfloat * p,jfloat v)135 inline void OrderAccess::release_store_fence(volatile jfloat* p, jfloat v) { inlasm_release(); *p = v; inlasm_fence(); }
release_store_fence(volatile jdouble * p,jdouble v)136 inline void OrderAccess::release_store_fence(volatile jdouble* p, jdouble v) { inlasm_release(); *p = v; inlasm_fence(); }
137
release_store_ptr_fence(volatile intptr_t * p,intptr_t v)138 inline void OrderAccess::release_store_ptr_fence(volatile intptr_t* p, intptr_t v) { inlasm_release(); *p = v; inlasm_fence(); }
release_store_ptr_fence(volatile void * p,void * v)139 inline void OrderAccess::release_store_ptr_fence(volatile void* p, void* v) { inlasm_release(); *(void* volatile *)p = v; inlasm_fence(); }
140
141 #undef inlasm_sync
142 #undef inlasm_lwsync
143 #undef inlasm_eieio
144 #undef inlasm_isync
145 #undef inlasm_release
146 #undef inlasm_acquire
147 #undef inlasm_fence
148
149 #endif // OS_CPU_BSD_PPC_VM_ORDERACCESS_BSD_PPC_INLINE_HPP
150