Mercurial > hg > graal-jvmci-8

comparison src/os_cpu/linux_ppc/vm/orderAccess_linux_ppc.inline.hpp @ 14408:ec28f9c041ff

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
8019972: PPC64 (part 9): platform files for interpreter only VM. Summary: With this change the HotSpot core build works on Linux/PPC64. The VM succesfully executes simple test programs. Reviewed-by: kvn
author goetz
date Fri, 02 Aug 2013 16:46:45 +0200
parents
children 67fa91961822
comparison
equal deleted inserted replaced
14407:94c202aa2646 14408:ec28f9c041ff
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_LINUX_PPC_VM_ORDERACCESS_LINUX_PPC_INLINE_HPP
27 #define OS_CPU_LINUX_PPC_VM_ORDERACCESS_LINUX_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
75 inline void OrderAccess::loadload() { inlasm_lwsync(); }
76 inline void OrderAccess::storestore() { inlasm_lwsync(); }
77 inline void OrderAccess::loadstore() { inlasm_lwsync(); }
78 inline void OrderAccess::storeload() { inlasm_fence(); }
79
80 inline void OrderAccess::acquire() { inlasm_acquire(); }
81 inline void OrderAccess::release() { inlasm_release(); }
82 inline void OrderAccess::fence() { inlasm_fence(); }
83
84 inline jbyte OrderAccess::load_acquire(volatile jbyte* p) { register jbyte t = *p; inlasm_acquire_reg(t); return t; }
85 inline jshort OrderAccess::load_acquire(volatile jshort* p) { register jshort t = *p; inlasm_acquire_reg(t); return t; }
86 inline jint OrderAccess::load_acquire(volatile jint* p) { register jint t = *p; inlasm_acquire_reg(t); return t; }
87 inline jlong OrderAccess::load_acquire(volatile jlong* p) { register jlong t = *p; inlasm_acquire_reg(t); return t; }
88 inline jubyte OrderAccess::load_acquire(volatile jubyte* p) { register jubyte t = *p; inlasm_acquire_reg(t); return t; }
89 inline jushort OrderAccess::load_acquire(volatile jushort* p) { register jushort t = *p; inlasm_acquire_reg(t); return t; }
90 inline juint OrderAccess::load_acquire(volatile juint* p) { register juint t = *p; inlasm_acquire_reg(t); return t; }
91 inline julong OrderAccess::load_acquire(volatile julong* p) { return (julong)load_acquire((volatile jlong*)p); }
92 inline jfloat OrderAccess::load_acquire(volatile jfloat* p) { register jfloat t = *p; inlasm_acquire(); return t; }
93 inline jdouble OrderAccess::load_acquire(volatile jdouble* p) { register jdouble t = *p; inlasm_acquire(); return t; }
94
95 inline intptr_t OrderAccess::load_ptr_acquire(volatile intptr_t* p) { return (intptr_t)load_acquire((volatile jlong*)p); }
96 inline void* OrderAccess::load_ptr_acquire(volatile void* p) { return (void*) load_acquire((volatile jlong*)p); }
97 inline void* OrderAccess::load_ptr_acquire(const volatile void* p) { return (void*) load_acquire((volatile jlong*)p); }
98
99 inline void OrderAccess::release_store(volatile jbyte* p, jbyte v) { inlasm_release(); *p = v; }
100 inline void OrderAccess::release_store(volatile jshort* p, jshort v) { inlasm_release(); *p = v; }
101 inline void OrderAccess::release_store(volatile jint* p, jint v) { inlasm_release(); *p = v; }
102 inline void OrderAccess::release_store(volatile jlong* p, jlong v) { inlasm_release(); *p = v; }
103 inline void OrderAccess::release_store(volatile jubyte* p, jubyte v) { inlasm_release(); *p = v; }
104 inline void OrderAccess::release_store(volatile jushort* p, jushort v) { inlasm_release(); *p = v; }
105 inline void OrderAccess::release_store(volatile juint* p, juint v) { inlasm_release(); *p = v; }
106 inline void OrderAccess::release_store(volatile julong* p, julong v) { inlasm_release(); *p = v; }
107 inline void OrderAccess::release_store(volatile jfloat* p, jfloat v) { inlasm_release(); *p = v; }
108 inline void OrderAccess::release_store(volatile jdouble* p, jdouble v) { inlasm_release(); *p = v; }
109
110 inline void OrderAccess::release_store_ptr(volatile intptr_t* p, intptr_t v) { inlasm_release(); *p = v; }
111 inline void OrderAccess::release_store_ptr(volatile void* p, void* v) { inlasm_release(); *(void* volatile *)p = v; }
112
113 inline void OrderAccess::store_fence(jbyte* p, jbyte v) { *p = v; inlasm_fence(); }
114 inline void OrderAccess::store_fence(jshort* p, jshort v) { *p = v; inlasm_fence(); }
115 inline void OrderAccess::store_fence(jint* p, jint v) { *p = v; inlasm_fence(); }
116 inline void OrderAccess::store_fence(jlong* p, jlong v) { *p = v; inlasm_fence(); }
117 inline void OrderAccess::store_fence(jubyte* p, jubyte v) { *p = v; inlasm_fence(); }
118 inline void OrderAccess::store_fence(jushort* p, jushort v) { *p = v; inlasm_fence(); }
119 inline void OrderAccess::store_fence(juint* p, juint v) { *p = v; inlasm_fence(); }
120 inline void OrderAccess::store_fence(julong* p, julong v) { *p = v; inlasm_fence(); }
121 inline void OrderAccess::store_fence(jfloat* p, jfloat v) { *p = v; inlasm_fence(); }
122 inline void OrderAccess::store_fence(jdouble* p, jdouble v) { *p = v; inlasm_fence(); }
123
124 inline void OrderAccess::store_ptr_fence(intptr_t* p, intptr_t v) { *p = v; inlasm_fence(); }
125 inline void OrderAccess::store_ptr_fence(void** p, void* v) { *p = v; inlasm_fence(); }
126
127 inline void OrderAccess::release_store_fence(volatile jbyte* p, jbyte v) { inlasm_release(); *p = v; inlasm_fence(); }
128 inline void OrderAccess::release_store_fence(volatile jshort* p, jshort v) { inlasm_release(); *p = v; inlasm_fence(); }
129 inline void OrderAccess::release_store_fence(volatile jint* p, jint v) { inlasm_release(); *p = v; inlasm_fence(); }
130 inline void OrderAccess::release_store_fence(volatile jlong* p, jlong v) { inlasm_release(); *p = v; inlasm_fence(); }
131 inline void OrderAccess::release_store_fence(volatile jubyte* p, jubyte v) { inlasm_release(); *p = v; inlasm_fence(); }
132 inline void OrderAccess::release_store_fence(volatile jushort* p, jushort v) { inlasm_release(); *p = v; inlasm_fence(); }
133 inline void OrderAccess::release_store_fence(volatile juint* p, juint v) { inlasm_release(); *p = v; inlasm_fence(); }
134 inline void OrderAccess::release_store_fence(volatile julong* p, julong v) { inlasm_release(); *p = v; inlasm_fence(); }
135 inline void OrderAccess::release_store_fence(volatile jfloat* p, jfloat v) { inlasm_release(); *p = v; inlasm_fence(); }
136 inline void OrderAccess::release_store_fence(volatile jdouble* p, jdouble v) { inlasm_release(); *p = v; inlasm_fence(); }
137
138 inline void OrderAccess::release_store_ptr_fence(volatile intptr_t* p, intptr_t v) { inlasm_release(); *p = v; inlasm_fence(); }
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_LINUX_PPC_VM_ORDERACCESS_LINUX_PPC_INLINE_HPP