Mercurial > hg > truffle
annotate src/share/vm/prims/unsafe.cpp @ 113:ba764ed4b6f2
6420645: Create a vm that uses compressed oops for up to 32gb heapsizes
Summary: Compressed oops in instances, arrays, and headers. Code contributors are coleenp, phh, never, swamyv
Reviewed-by: jmasa, kamg, acorn, tbell, kvn, rasbold
| author | coleenp |
|---|---|
| date | Sun, 13 Apr 2008 17:43:42 -0400 |
| parents | a61af66fc99e |
| children | d1605aabd0a1 37f87013dfd8 |
| rev | line source |
|---|---|
| 0 | 1 /* |
| 2 * Copyright 2000-2007 Sun Microsystems, Inc. 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 Sun Microsystems, Inc., 4150 Network Circle, Santa Clara, | |
| 20 * CA 95054 USA or visit www.sun.com if you need additional information or | |
| 21 * have any questions. | |
| 22 * | |
| 23 */ | |
| 24 | |
| 25 /* | |
| 26 * Implementation of class sun.misc.Unsafe | |
| 27 */ | |
| 28 | |
| 29 #include "incls/_precompiled.incl" | |
| 30 #include "incls/_unsafe.cpp.incl" | |
| 31 | |
| 32 #define MAX_OBJECT_SIZE \ | |
| 33 ( arrayOopDesc::header_size(T_DOUBLE) * HeapWordSize \ | |
| 34 + ((julong)max_jint * sizeof(double)) ) | |
| 35 | |
| 36 | |
| 37 #define UNSAFE_ENTRY(result_type, header) \ | |
| 38 JVM_ENTRY(result_type, header) | |
| 39 | |
| 40 // Can't use UNSAFE_LEAF because it has the signature of a straight | |
| 41 // call into the runtime (just like JVM_LEAF, funny that) but it's | |
| 42 // called like a Java Native and thus the wrapper built for it passes | |
| 43 // arguments like a JNI call. It expects those arguments to be popped | |
| 44 // from the stack on Intel like all good JNI args are, and adjusts the | |
| 45 // stack according. Since the JVM_LEAF call expects no extra | |
| 46 // arguments the stack isn't popped in the C code, is pushed by the | |
| 47 // wrapper and we get sick. | |
| 48 //#define UNSAFE_LEAF(result_type, header) \ | |
| 49 // JVM_LEAF(result_type, header) | |
| 50 | |
| 51 #define UNSAFE_END JVM_END | |
| 52 | |
| 53 #define UnsafeWrapper(arg) /*nothing, for the present*/ | |
| 54 | |
| 55 | |
| 56 inline void* addr_from_java(jlong addr) { | |
| 57 // This assert fails in a variety of ways on 32-bit systems. | |
| 58 // It is impossible to predict whether native code that converts | |
| 59 // pointers to longs will sign-extend or zero-extend the addresses. | |
| 60 //assert(addr == (uintptr_t)addr, "must not be odd high bits"); | |
| 61 return (void*)(uintptr_t)addr; | |
| 62 } | |
| 63 | |
| 64 inline jlong addr_to_java(void* p) { | |
| 65 assert(p == (void*)(uintptr_t)p, "must not be odd high bits"); | |
| 66 return (uintptr_t)p; | |
| 67 } | |
| 68 | |
| 69 | |
| 70 // Note: The VM's obj_field and related accessors use byte-scaled | |
| 71 // ("unscaled") offsets, just as the unsafe methods do. | |
| 72 | |
| 73 // However, the method Unsafe.fieldOffset explicitly declines to | |
| 74 // guarantee this. The field offset values manipulated by the Java user | |
| 75 // through the Unsafe API are opaque cookies that just happen to be byte | |
| 76 // offsets. We represent this state of affairs by passing the cookies | |
| 77 // through conversion functions when going between the VM and the Unsafe API. | |
| 78 // The conversion functions just happen to be no-ops at present. | |
| 79 | |
| 80 inline jlong field_offset_to_byte_offset(jlong field_offset) { | |
| 81 return field_offset; | |
| 82 } | |
| 83 | |
| 84 inline jlong field_offset_from_byte_offset(jlong byte_offset) { | |
| 85 return byte_offset; | |
| 86 } | |
| 87 | |
| 88 inline jint invocation_key_from_method_slot(jint slot) { | |
| 89 return slot; | |
| 90 } | |
| 91 | |
| 92 inline jint invocation_key_to_method_slot(jint key) { | |
| 93 return key; | |
| 94 } | |
| 95 | |
| 96 inline void* index_oop_from_field_offset_long(oop p, jlong field_offset) { | |
| 97 jlong byte_offset = field_offset_to_byte_offset(field_offset); | |
| 98 #ifdef ASSERT | |
| 99 if (p != NULL) { | |
| 100 assert(byte_offset >= 0 && byte_offset <= (jlong)MAX_OBJECT_SIZE, "sane offset"); | |
| 101 if (byte_offset == (jint)byte_offset) { | |
| 102 void* ptr_plus_disp = (address)p + byte_offset; | |
|
113
ba764ed4b6f2
6420645: Create a vm that uses compressed oops for up to 32gb heapsizes
coleenp
parents:
0
diff
changeset
|
103 assert((void*)p->obj_field_addr<oop>((jint)byte_offset) == ptr_plus_disp, |
| 0 | 104 "raw [ptr+disp] must be consistent with oop::field_base"); |
| 105 } | |
| 106 } | |
| 107 #endif | |
| 108 if (sizeof(char*) == sizeof(jint)) // (this constant folds!) | |
| 109 return (address)p + (jint) byte_offset; | |
| 110 else | |
| 111 return (address)p + byte_offset; | |
| 112 } | |
| 113 | |
| 114 // Externally callable versions: | |
| 115 // (Use these in compiler intrinsics which emulate unsafe primitives.) | |
| 116 jlong Unsafe_field_offset_to_byte_offset(jlong field_offset) { | |
| 117 return field_offset; | |
| 118 } | |
| 119 jlong Unsafe_field_offset_from_byte_offset(jlong byte_offset) { | |
| 120 return byte_offset; | |
| 121 } | |
| 122 jint Unsafe_invocation_key_from_method_slot(jint slot) { | |
| 123 return invocation_key_from_method_slot(slot); | |
| 124 } | |
| 125 jint Unsafe_invocation_key_to_method_slot(jint key) { | |
| 126 return invocation_key_to_method_slot(key); | |
| 127 } | |
| 128 | |
| 129 | |
| 130 ///// Data in the Java heap. | |
| 131 | |
| 132 #define GET_FIELD(obj, offset, type_name, v) \ | |
| 133 oop p = JNIHandles::resolve(obj); \ | |
| 134 type_name v = *(type_name*)index_oop_from_field_offset_long(p, offset) | |
| 135 | |
| 136 #define SET_FIELD(obj, offset, type_name, x) \ | |
| 137 oop p = JNIHandles::resolve(obj); \ | |
| 138 *(type_name*)index_oop_from_field_offset_long(p, offset) = x | |
| 139 | |
| 140 #define GET_FIELD_VOLATILE(obj, offset, type_name, v) \ | |
| 141 oop p = JNIHandles::resolve(obj); \ | |
| 142 volatile type_name v = *(volatile type_name*)index_oop_from_field_offset_long(p, offset) | |
| 143 | |
| 144 #define SET_FIELD_VOLATILE(obj, offset, type_name, x) \ | |
| 145 oop p = JNIHandles::resolve(obj); \ | |
| 146 *(volatile type_name*)index_oop_from_field_offset_long(p, offset) = x; \ | |
| 147 OrderAccess::fence(); | |
| 148 | |
|
113
ba764ed4b6f2
6420645: Create a vm that uses compressed oops for up to 32gb heapsizes
coleenp
parents:
0
diff
changeset
|
149 // Macros for oops that check UseCompressedOops |
|
ba764ed4b6f2
6420645: Create a vm that uses compressed oops for up to 32gb heapsizes
coleenp
parents:
0
diff
changeset
|
150 |
|
ba764ed4b6f2
6420645: Create a vm that uses compressed oops for up to 32gb heapsizes
coleenp
parents:
0
diff
changeset
|
151 #define GET_OOP_FIELD(obj, offset, v) \ |
|
ba764ed4b6f2
6420645: Create a vm that uses compressed oops for up to 32gb heapsizes
coleenp
parents:
0
diff
changeset
|
152 oop p = JNIHandles::resolve(obj); \ |
|
ba764ed4b6f2
6420645: Create a vm that uses compressed oops for up to 32gb heapsizes
coleenp
parents:
0
diff
changeset
|
153 oop v; \ |
|
ba764ed4b6f2
6420645: Create a vm that uses compressed oops for up to 32gb heapsizes
coleenp
parents:
0
diff
changeset
|
154 if (UseCompressedOops) { \ |
|
ba764ed4b6f2
6420645: Create a vm that uses compressed oops for up to 32gb heapsizes
coleenp
parents:
0
diff
changeset
|
155 narrowOop n = *(narrowOop*)index_oop_from_field_offset_long(p, offset); \ |
|
ba764ed4b6f2
6420645: Create a vm that uses compressed oops for up to 32gb heapsizes
coleenp
parents:
0
diff
changeset
|
156 v = oopDesc::decode_heap_oop(n); \ |
|
ba764ed4b6f2
6420645: Create a vm that uses compressed oops for up to 32gb heapsizes
coleenp
parents:
0
diff
changeset
|
157 } else { \ |
|
ba764ed4b6f2
6420645: Create a vm that uses compressed oops for up to 32gb heapsizes
coleenp
parents:
0
diff
changeset
|
158 v = *(oop*)index_oop_from_field_offset_long(p, offset); \ |
|
ba764ed4b6f2
6420645: Create a vm that uses compressed oops for up to 32gb heapsizes
coleenp
parents:
0
diff
changeset
|
159 } |
|
ba764ed4b6f2
6420645: Create a vm that uses compressed oops for up to 32gb heapsizes
coleenp
parents:
0
diff
changeset
|
160 |
|
ba764ed4b6f2
6420645: Create a vm that uses compressed oops for up to 32gb heapsizes
coleenp
parents:
0
diff
changeset
|
161 #define GET_OOP_FIELD_VOLATILE(obj, offset, v) \ |
|
ba764ed4b6f2
6420645: Create a vm that uses compressed oops for up to 32gb heapsizes
coleenp
parents:
0
diff
changeset
|
162 oop p = JNIHandles::resolve(obj); \ |
|
ba764ed4b6f2
6420645: Create a vm that uses compressed oops for up to 32gb heapsizes
coleenp
parents:
0
diff
changeset
|
163 volatile oop v; \ |
|
ba764ed4b6f2
6420645: Create a vm that uses compressed oops for up to 32gb heapsizes
coleenp
parents:
0
diff
changeset
|
164 if (UseCompressedOops) { \ |
|
ba764ed4b6f2
6420645: Create a vm that uses compressed oops for up to 32gb heapsizes
coleenp
parents:
0
diff
changeset
|
165 volatile narrowOop n = *(volatile narrowOop*)index_oop_from_field_offset_long(p, offset); \ |
|
ba764ed4b6f2
6420645: Create a vm that uses compressed oops for up to 32gb heapsizes
coleenp
parents:
0
diff
changeset
|
166 v = oopDesc::decode_heap_oop(n); \ |
|
ba764ed4b6f2
6420645: Create a vm that uses compressed oops for up to 32gb heapsizes
coleenp
parents:
0
diff
changeset
|
167 } else { \ |
|
ba764ed4b6f2
6420645: Create a vm that uses compressed oops for up to 32gb heapsizes
coleenp
parents:
0
diff
changeset
|
168 v = *(volatile oop*)index_oop_from_field_offset_long(p, offset); \ |
|
ba764ed4b6f2
6420645: Create a vm that uses compressed oops for up to 32gb heapsizes
coleenp
parents:
0
diff
changeset
|
169 } |
|
ba764ed4b6f2
6420645: Create a vm that uses compressed oops for up to 32gb heapsizes
coleenp
parents:
0
diff
changeset
|
170 |
|
ba764ed4b6f2
6420645: Create a vm that uses compressed oops for up to 32gb heapsizes
coleenp
parents:
0
diff
changeset
|
171 |
| 0 | 172 // Get/SetObject must be special-cased, since it works with handles. |
| 173 | |
| 174 // The xxx140 variants for backward compatibility do not allow a full-width offset. | |
| 175 UNSAFE_ENTRY(jobject, Unsafe_GetObject140(JNIEnv *env, jobject unsafe, jobject obj, jint offset)) | |
| 176 UnsafeWrapper("Unsafe_GetObject"); | |
| 177 if (obj == NULL) THROW_0(vmSymbols::java_lang_NullPointerException()); | |
|
113
ba764ed4b6f2
6420645: Create a vm that uses compressed oops for up to 32gb heapsizes
coleenp
parents:
0
diff
changeset
|
178 GET_OOP_FIELD(obj, offset, v) |
| 0 | 179 return JNIHandles::make_local(env, v); |
| 180 UNSAFE_END | |
| 181 | |
| 182 UNSAFE_ENTRY(void, Unsafe_SetObject140(JNIEnv *env, jobject unsafe, jobject obj, jint offset, jobject x_h)) | |
| 183 UnsafeWrapper("Unsafe_SetObject"); | |
| 184 if (obj == NULL) THROW(vmSymbols::java_lang_NullPointerException()); | |
| 185 oop x = JNIHandles::resolve(x_h); | |
| 186 //SET_FIELD(obj, offset, oop, x); | |
| 187 oop p = JNIHandles::resolve(obj); | |
|
113
ba764ed4b6f2
6420645: Create a vm that uses compressed oops for up to 32gb heapsizes
coleenp
parents:
0
diff
changeset
|
188 if (UseCompressedOops) { |
|
ba764ed4b6f2
6420645: Create a vm that uses compressed oops for up to 32gb heapsizes
coleenp
parents:
0
diff
changeset
|
189 if (x != NULL) { |
|
ba764ed4b6f2
6420645: Create a vm that uses compressed oops for up to 32gb heapsizes
coleenp
parents:
0
diff
changeset
|
190 // If there is a heap base pointer, we are obliged to emit a store barrier. |
|
ba764ed4b6f2
6420645: Create a vm that uses compressed oops for up to 32gb heapsizes
coleenp
parents:
0
diff
changeset
|
191 oop_store((narrowOop*)index_oop_from_field_offset_long(p, offset), x); |
|
ba764ed4b6f2
6420645: Create a vm that uses compressed oops for up to 32gb heapsizes
coleenp
parents:
0
diff
changeset
|
192 } else { |
|
ba764ed4b6f2
6420645: Create a vm that uses compressed oops for up to 32gb heapsizes
coleenp
parents:
0
diff
changeset
|
193 narrowOop n = oopDesc::encode_heap_oop_not_null(x); |
|
ba764ed4b6f2
6420645: Create a vm that uses compressed oops for up to 32gb heapsizes
coleenp
parents:
0
diff
changeset
|
194 *(narrowOop*)index_oop_from_field_offset_long(p, offset) = n; |
|
ba764ed4b6f2
6420645: Create a vm that uses compressed oops for up to 32gb heapsizes
coleenp
parents:
0
diff
changeset
|
195 } |
| 0 | 196 } else { |
|
113
ba764ed4b6f2
6420645: Create a vm that uses compressed oops for up to 32gb heapsizes
coleenp
parents:
0
diff
changeset
|
197 if (x != NULL) { |
|
ba764ed4b6f2
6420645: Create a vm that uses compressed oops for up to 32gb heapsizes
coleenp
parents:
0
diff
changeset
|
198 // If there is a heap base pointer, we are obliged to emit a store barrier. |
|
ba764ed4b6f2
6420645: Create a vm that uses compressed oops for up to 32gb heapsizes
coleenp
parents:
0
diff
changeset
|
199 oop_store((oop*)index_oop_from_field_offset_long(p, offset), x); |
|
ba764ed4b6f2
6420645: Create a vm that uses compressed oops for up to 32gb heapsizes
coleenp
parents:
0
diff
changeset
|
200 } else { |
|
ba764ed4b6f2
6420645: Create a vm that uses compressed oops for up to 32gb heapsizes
coleenp
parents:
0
diff
changeset
|
201 *(oop*)index_oop_from_field_offset_long(p, offset) = x; |
|
ba764ed4b6f2
6420645: Create a vm that uses compressed oops for up to 32gb heapsizes
coleenp
parents:
0
diff
changeset
|
202 } |
| 0 | 203 } |
| 204 UNSAFE_END | |
| 205 | |
| 206 // The normal variants allow a null base pointer with an arbitrary address. | |
| 207 // But if the base pointer is non-null, the offset should make some sense. | |
| 208 // That is, it should be in the range [0, MAX_OBJECT_SIZE]. | |
| 209 UNSAFE_ENTRY(jobject, Unsafe_GetObject(JNIEnv *env, jobject unsafe, jobject obj, jlong offset)) | |
| 210 UnsafeWrapper("Unsafe_GetObject"); | |
|
113
ba764ed4b6f2
6420645: Create a vm that uses compressed oops for up to 32gb heapsizes
coleenp
parents:
0
diff
changeset
|
211 GET_OOP_FIELD(obj, offset, v) |
| 0 | 212 return JNIHandles::make_local(env, v); |
| 213 UNSAFE_END | |
| 214 | |
| 215 UNSAFE_ENTRY(void, Unsafe_SetObject(JNIEnv *env, jobject unsafe, jobject obj, jlong offset, jobject x_h)) | |
| 216 UnsafeWrapper("Unsafe_SetObject"); | |
| 217 oop x = JNIHandles::resolve(x_h); | |
| 218 oop p = JNIHandles::resolve(obj); | |
|
113
ba764ed4b6f2
6420645: Create a vm that uses compressed oops for up to 32gb heapsizes
coleenp
parents:
0
diff
changeset
|
219 if (UseCompressedOops) { |
|
ba764ed4b6f2
6420645: Create a vm that uses compressed oops for up to 32gb heapsizes
coleenp
parents:
0
diff
changeset
|
220 oop_store((narrowOop*)index_oop_from_field_offset_long(p, offset), x); |
|
ba764ed4b6f2
6420645: Create a vm that uses compressed oops for up to 32gb heapsizes
coleenp
parents:
0
diff
changeset
|
221 } else { |
|
ba764ed4b6f2
6420645: Create a vm that uses compressed oops for up to 32gb heapsizes
coleenp
parents:
0
diff
changeset
|
222 oop_store((oop*)index_oop_from_field_offset_long(p, offset), x); |
|
ba764ed4b6f2
6420645: Create a vm that uses compressed oops for up to 32gb heapsizes
coleenp
parents:
0
diff
changeset
|
223 } |
| 0 | 224 UNSAFE_END |
| 225 | |
| 226 UNSAFE_ENTRY(jobject, Unsafe_GetObjectVolatile(JNIEnv *env, jobject unsafe, jobject obj, jlong offset)) | |
| 227 UnsafeWrapper("Unsafe_GetObjectVolatile"); | |
|
113
ba764ed4b6f2
6420645: Create a vm that uses compressed oops for up to 32gb heapsizes
coleenp
parents:
0
diff
changeset
|
228 GET_OOP_FIELD_VOLATILE(obj, offset, v) |
| 0 | 229 return JNIHandles::make_local(env, v); |
| 230 UNSAFE_END | |
| 231 | |
| 232 UNSAFE_ENTRY(void, Unsafe_SetObjectVolatile(JNIEnv *env, jobject unsafe, jobject obj, jlong offset, jobject x_h)) | |
| 233 UnsafeWrapper("Unsafe_SetObjectVolatile"); | |
| 234 oop x = JNIHandles::resolve(x_h); | |
| 235 oop p = JNIHandles::resolve(obj); | |
|
113
ba764ed4b6f2
6420645: Create a vm that uses compressed oops for up to 32gb heapsizes
coleenp
parents:
0
diff
changeset
|
236 if (UseCompressedOops) { |
|
ba764ed4b6f2
6420645: Create a vm that uses compressed oops for up to 32gb heapsizes
coleenp
parents:
0
diff
changeset
|
237 oop_store((narrowOop*)index_oop_from_field_offset_long(p, offset), x); |
|
ba764ed4b6f2
6420645: Create a vm that uses compressed oops for up to 32gb heapsizes
coleenp
parents:
0
diff
changeset
|
238 } else { |
|
ba764ed4b6f2
6420645: Create a vm that uses compressed oops for up to 32gb heapsizes
coleenp
parents:
0
diff
changeset
|
239 oop_store((oop*)index_oop_from_field_offset_long(p, offset), x); |
|
ba764ed4b6f2
6420645: Create a vm that uses compressed oops for up to 32gb heapsizes
coleenp
parents:
0
diff
changeset
|
240 } |
| 0 | 241 OrderAccess::fence(); |
| 242 UNSAFE_END | |
| 243 | |
| 244 // Volatile long versions must use locks if !VM_Version::supports_cx8(). | |
| 245 // support_cx8 is a surrogate for 'supports atomic long memory ops'. | |
| 246 | |
| 247 UNSAFE_ENTRY(jlong, Unsafe_GetLongVolatile(JNIEnv *env, jobject unsafe, jobject obj, jlong offset)) | |
| 248 UnsafeWrapper("Unsafe_GetLongVolatile"); | |
| 249 { | |
| 250 if (VM_Version::supports_cx8()) { | |
| 251 GET_FIELD_VOLATILE(obj, offset, jlong, v); | |
| 252 return v; | |
| 253 } | |
| 254 else { | |
| 255 Handle p (THREAD, JNIHandles::resolve(obj)); | |
| 256 jlong* addr = (jlong*)(index_oop_from_field_offset_long(p(), offset)); | |
| 257 ObjectLocker ol(p, THREAD); | |
| 258 jlong value = *addr; | |
| 259 return value; | |
| 260 } | |
| 261 } | |
| 262 UNSAFE_END | |
| 263 | |
| 264 UNSAFE_ENTRY(void, Unsafe_SetLongVolatile(JNIEnv *env, jobject unsafe, jobject obj, jlong offset, jlong x)) | |
| 265 UnsafeWrapper("Unsafe_SetLongVolatile"); | |
| 266 { | |
| 267 if (VM_Version::supports_cx8()) { | |
| 268 SET_FIELD_VOLATILE(obj, offset, jlong, x); | |
| 269 } | |
| 270 else { | |
| 271 Handle p (THREAD, JNIHandles::resolve(obj)); | |
| 272 jlong* addr = (jlong*)(index_oop_from_field_offset_long(p(), offset)); | |
| 273 ObjectLocker ol(p, THREAD); | |
| 274 *addr = x; | |
| 275 } | |
| 276 } | |
| 277 UNSAFE_END | |
| 278 | |
| 279 | |
| 280 #define DEFINE_GETSETOOP(jboolean, Boolean) \ | |
| 281 \ | |
| 282 UNSAFE_ENTRY(jboolean, Unsafe_Get##Boolean##140(JNIEnv *env, jobject unsafe, jobject obj, jint offset)) \ | |
| 283 UnsafeWrapper("Unsafe_Get"#Boolean); \ | |
| 284 if (obj == NULL) THROW_0(vmSymbols::java_lang_NullPointerException()); \ | |
| 285 GET_FIELD(obj, offset, jboolean, v); \ | |
| 286 return v; \ | |
| 287 UNSAFE_END \ | |
| 288 \ | |
| 289 UNSAFE_ENTRY(void, Unsafe_Set##Boolean##140(JNIEnv *env, jobject unsafe, jobject obj, jint offset, jboolean x)) \ | |
| 290 UnsafeWrapper("Unsafe_Set"#Boolean); \ | |
| 291 if (obj == NULL) THROW(vmSymbols::java_lang_NullPointerException()); \ | |
| 292 SET_FIELD(obj, offset, jboolean, x); \ | |
| 293 UNSAFE_END \ | |
| 294 \ | |
| 295 UNSAFE_ENTRY(jboolean, Unsafe_Get##Boolean(JNIEnv *env, jobject unsafe, jobject obj, jlong offset)) \ | |
| 296 UnsafeWrapper("Unsafe_Get"#Boolean); \ | |
| 297 GET_FIELD(obj, offset, jboolean, v); \ | |
| 298 return v; \ | |
| 299 UNSAFE_END \ | |
| 300 \ | |
| 301 UNSAFE_ENTRY(void, Unsafe_Set##Boolean(JNIEnv *env, jobject unsafe, jobject obj, jlong offset, jboolean x)) \ | |
| 302 UnsafeWrapper("Unsafe_Set"#Boolean); \ | |
| 303 SET_FIELD(obj, offset, jboolean, x); \ | |
| 304 UNSAFE_END \ | |
| 305 \ | |
| 306 // END DEFINE_GETSETOOP. | |
| 307 | |
| 308 | |
| 309 #define DEFINE_GETSETOOP_VOLATILE(jboolean, Boolean) \ | |
| 310 \ | |
| 311 UNSAFE_ENTRY(jboolean, Unsafe_Get##Boolean##Volatile(JNIEnv *env, jobject unsafe, jobject obj, jlong offset)) \ | |
| 312 UnsafeWrapper("Unsafe_Get"#Boolean); \ | |
| 313 GET_FIELD_VOLATILE(obj, offset, jboolean, v); \ | |
| 314 return v; \ | |
| 315 UNSAFE_END \ | |
| 316 \ | |
| 317 UNSAFE_ENTRY(void, Unsafe_Set##Boolean##Volatile(JNIEnv *env, jobject unsafe, jobject obj, jlong offset, jboolean x)) \ | |
| 318 UnsafeWrapper("Unsafe_Set"#Boolean); \ | |
| 319 SET_FIELD_VOLATILE(obj, offset, jboolean, x); \ | |
| 320 UNSAFE_END \ | |
| 321 \ | |
| 322 // END DEFINE_GETSETOOP_VOLATILE. | |
| 323 | |
| 324 DEFINE_GETSETOOP(jboolean, Boolean) | |
| 325 DEFINE_GETSETOOP(jbyte, Byte) | |
| 326 DEFINE_GETSETOOP(jshort, Short); | |
| 327 DEFINE_GETSETOOP(jchar, Char); | |
| 328 DEFINE_GETSETOOP(jint, Int); | |
| 329 DEFINE_GETSETOOP(jlong, Long); | |
| 330 DEFINE_GETSETOOP(jfloat, Float); | |
| 331 DEFINE_GETSETOOP(jdouble, Double); | |
| 332 | |
| 333 DEFINE_GETSETOOP_VOLATILE(jboolean, Boolean) | |
| 334 DEFINE_GETSETOOP_VOLATILE(jbyte, Byte) | |
| 335 DEFINE_GETSETOOP_VOLATILE(jshort, Short); | |
| 336 DEFINE_GETSETOOP_VOLATILE(jchar, Char); | |
| 337 DEFINE_GETSETOOP_VOLATILE(jint, Int); | |
| 338 // no long -- handled specially | |
| 339 DEFINE_GETSETOOP_VOLATILE(jfloat, Float); | |
| 340 DEFINE_GETSETOOP_VOLATILE(jdouble, Double); | |
| 341 | |
| 342 #undef DEFINE_GETSETOOP | |
| 343 | |
| 344 // The non-intrinsified versions of setOrdered just use setVolatile | |
| 345 | |
| 346 UNSAFE_ENTRY(void, Unsafe_SetOrderedInt(JNIEnv *env, jobject unsafe, jobject obj, jlong offset, jint x)) \ | |
| 347 UnsafeWrapper("Unsafe_SetOrderedInt"); \ | |
| 348 SET_FIELD_VOLATILE(obj, offset, jint, x); \ | |
| 349 UNSAFE_END | |
| 350 | |
| 351 UNSAFE_ENTRY(void, Unsafe_SetOrderedObject(JNIEnv *env, jobject unsafe, jobject obj, jlong offset, jobject x_h)) | |
| 352 UnsafeWrapper("Unsafe_SetOrderedObject"); | |
| 353 oop x = JNIHandles::resolve(x_h); | |
| 354 oop p = JNIHandles::resolve(obj); | |
|
113
ba764ed4b6f2
6420645: Create a vm that uses compressed oops for up to 32gb heapsizes
coleenp
parents:
0
diff
changeset
|
355 if (UseCompressedOops) { |
|
ba764ed4b6f2
6420645: Create a vm that uses compressed oops for up to 32gb heapsizes
coleenp
parents:
0
diff
changeset
|
356 oop_store((narrowOop*)index_oop_from_field_offset_long(p, offset), x); |
|
ba764ed4b6f2
6420645: Create a vm that uses compressed oops for up to 32gb heapsizes
coleenp
parents:
0
diff
changeset
|
357 } else { |
|
ba764ed4b6f2
6420645: Create a vm that uses compressed oops for up to 32gb heapsizes
coleenp
parents:
0
diff
changeset
|
358 oop_store((oop*)index_oop_from_field_offset_long(p, offset), x); |
|
ba764ed4b6f2
6420645: Create a vm that uses compressed oops for up to 32gb heapsizes
coleenp
parents:
0
diff
changeset
|
359 } |
| 0 | 360 OrderAccess::fence(); |
| 361 UNSAFE_END | |
| 362 | |
| 363 UNSAFE_ENTRY(void, Unsafe_SetOrderedLong(JNIEnv *env, jobject unsafe, jobject obj, jlong offset, jlong x)) | |
| 364 UnsafeWrapper("Unsafe_SetOrderedLong"); | |
| 365 { | |
| 366 if (VM_Version::supports_cx8()) { | |
| 367 SET_FIELD_VOLATILE(obj, offset, jlong, x); | |
| 368 } | |
| 369 else { | |
| 370 Handle p (THREAD, JNIHandles::resolve(obj)); | |
| 371 jlong* addr = (jlong*)(index_oop_from_field_offset_long(p(), offset)); | |
| 372 ObjectLocker ol(p, THREAD); | |
| 373 *addr = x; | |
| 374 } | |
| 375 } | |
| 376 UNSAFE_END | |
| 377 | |
| 378 ////// Data in the C heap. | |
| 379 | |
| 380 // Note: These do not throw NullPointerException for bad pointers. | |
| 381 // They just crash. Only a oop base pointer can generate a NullPointerException. | |
| 382 // | |
| 383 #define DEFINE_GETSETNATIVE(java_type, Type, native_type) \ | |
| 384 \ | |
| 385 UNSAFE_ENTRY(java_type, Unsafe_GetNative##Type(JNIEnv *env, jobject unsafe, jlong addr)) \ | |
| 386 UnsafeWrapper("Unsafe_GetNative"#Type); \ | |
| 387 void* p = addr_from_java(addr); \ | |
| 388 JavaThread* t = JavaThread::current(); \ | |
| 389 t->set_doing_unsafe_access(true); \ | |
| 390 java_type x = *(volatile native_type*)p; \ | |
| 391 t->set_doing_unsafe_access(false); \ | |
| 392 return x; \ | |
| 393 UNSAFE_END \ | |
| 394 \ | |
| 395 UNSAFE_ENTRY(void, Unsafe_SetNative##Type(JNIEnv *env, jobject unsafe, jlong addr, java_type x)) \ | |
| 396 UnsafeWrapper("Unsafe_SetNative"#Type); \ | |
| 397 JavaThread* t = JavaThread::current(); \ | |
| 398 t->set_doing_unsafe_access(true); \ | |
| 399 void* p = addr_from_java(addr); \ | |
| 400 *(volatile native_type*)p = x; \ | |
| 401 t->set_doing_unsafe_access(false); \ | |
| 402 UNSAFE_END \ | |
| 403 \ | |
| 404 // END DEFINE_GETSETNATIVE. | |
| 405 | |
| 406 DEFINE_GETSETNATIVE(jbyte, Byte, signed char) | |
| 407 DEFINE_GETSETNATIVE(jshort, Short, signed short); | |
| 408 DEFINE_GETSETNATIVE(jchar, Char, unsigned short); | |
| 409 DEFINE_GETSETNATIVE(jint, Int, jint); | |
| 410 // no long -- handled specially | |
| 411 DEFINE_GETSETNATIVE(jfloat, Float, float); | |
| 412 DEFINE_GETSETNATIVE(jdouble, Double, double); | |
| 413 | |
| 414 #undef DEFINE_GETSETNATIVE | |
| 415 | |
| 416 UNSAFE_ENTRY(jlong, Unsafe_GetNativeLong(JNIEnv *env, jobject unsafe, jlong addr)) | |
| 417 UnsafeWrapper("Unsafe_GetNativeLong"); | |
| 418 JavaThread* t = JavaThread::current(); | |
| 419 // We do it this way to avoid problems with access to heap using 64 | |
| 420 // bit loads, as jlong in heap could be not 64-bit aligned, and on | |
| 421 // some CPUs (SPARC) it leads to SIGBUS. | |
| 422 t->set_doing_unsafe_access(true); | |
| 423 void* p = addr_from_java(addr); | |
| 424 jlong x; | |
| 425 if (((intptr_t)p & 7) == 0) { | |
| 426 // jlong is aligned, do a volatile access | |
| 427 x = *(volatile jlong*)p; | |
| 428 } else { | |
| 429 jlong_accessor acc; | |
| 430 acc.words[0] = ((volatile jint*)p)[0]; | |
| 431 acc.words[1] = ((volatile jint*)p)[1]; | |
| 432 x = acc.long_value; | |
| 433 } | |
| 434 t->set_doing_unsafe_access(false); | |
| 435 return x; | |
| 436 UNSAFE_END | |
| 437 | |
| 438 UNSAFE_ENTRY(void, Unsafe_SetNativeLong(JNIEnv *env, jobject unsafe, jlong addr, jlong x)) | |
| 439 UnsafeWrapper("Unsafe_SetNativeLong"); | |
| 440 JavaThread* t = JavaThread::current(); | |
| 441 // see comment for Unsafe_GetNativeLong | |
| 442 t->set_doing_unsafe_access(true); | |
| 443 void* p = addr_from_java(addr); | |
| 444 if (((intptr_t)p & 7) == 0) { | |
| 445 // jlong is aligned, do a volatile access | |
| 446 *(volatile jlong*)p = x; | |
| 447 } else { | |
| 448 jlong_accessor acc; | |
| 449 acc.long_value = x; | |
| 450 ((volatile jint*)p)[0] = acc.words[0]; | |
| 451 ((volatile jint*)p)[1] = acc.words[1]; | |
| 452 } | |
| 453 t->set_doing_unsafe_access(false); | |
| 454 UNSAFE_END | |
| 455 | |
| 456 | |
| 457 UNSAFE_ENTRY(jlong, Unsafe_GetNativeAddress(JNIEnv *env, jobject unsafe, jlong addr)) | |
| 458 UnsafeWrapper("Unsafe_GetNativeAddress"); | |
| 459 void* p = addr_from_java(addr); | |
| 460 return addr_to_java(*(void**)p); | |
| 461 UNSAFE_END | |
| 462 | |
| 463 UNSAFE_ENTRY(void, Unsafe_SetNativeAddress(JNIEnv *env, jobject unsafe, jlong addr, jlong x)) | |
| 464 UnsafeWrapper("Unsafe_SetNativeAddress"); | |
| 465 void* p = addr_from_java(addr); | |
| 466 *(void**)p = addr_from_java(x); | |
| 467 UNSAFE_END | |
| 468 | |
| 469 | |
| 470 ////// Allocation requests | |
| 471 | |
| 472 UNSAFE_ENTRY(jobject, Unsafe_AllocateInstance(JNIEnv *env, jobject unsafe, jclass cls)) | |
| 473 UnsafeWrapper("Unsafe_AllocateInstance"); | |
| 474 { | |
| 475 ThreadToNativeFromVM ttnfv(thread); | |
| 476 return env->AllocObject(cls); | |
| 477 } | |
| 478 UNSAFE_END | |
| 479 | |
| 480 UNSAFE_ENTRY(jlong, Unsafe_AllocateMemory(JNIEnv *env, jobject unsafe, jlong size)) | |
| 481 UnsafeWrapper("Unsafe_AllocateMemory"); | |
| 482 size_t sz = (size_t)size; | |
| 483 if (sz != (julong)size || size < 0) { | |
| 484 THROW_0(vmSymbols::java_lang_IllegalArgumentException()); | |
| 485 } | |
| 486 if (sz == 0) { | |
| 487 return 0; | |
| 488 } | |
| 489 sz = round_to(sz, HeapWordSize); | |
| 490 void* x = os::malloc(sz); | |
| 491 if (x == NULL) { | |
| 492 THROW_0(vmSymbols::java_lang_OutOfMemoryError()); | |
| 493 } | |
| 494 //Copy::fill_to_words((HeapWord*)x, sz / HeapWordSize); | |
| 495 return addr_to_java(x); | |
| 496 UNSAFE_END | |
| 497 | |
| 498 UNSAFE_ENTRY(jlong, Unsafe_ReallocateMemory(JNIEnv *env, jobject unsafe, jlong addr, jlong size)) | |
| 499 UnsafeWrapper("Unsafe_ReallocateMemory"); | |
| 500 void* p = addr_from_java(addr); | |
| 501 size_t sz = (size_t)size; | |
| 502 if (sz != (julong)size || size < 0) { | |
| 503 THROW_0(vmSymbols::java_lang_IllegalArgumentException()); | |
| 504 } | |
| 505 if (sz == 0) { | |
| 506 os::free(p); | |
| 507 return 0; | |
| 508 } | |
| 509 sz = round_to(sz, HeapWordSize); | |
| 510 void* x = (p == NULL) ? os::malloc(sz) : os::realloc(p, sz); | |
| 511 if (x == NULL) { | |
| 512 THROW_0(vmSymbols::java_lang_OutOfMemoryError()); | |
| 513 } | |
| 514 return addr_to_java(x); | |
| 515 UNSAFE_END | |
| 516 | |
| 517 UNSAFE_ENTRY(void, Unsafe_FreeMemory(JNIEnv *env, jobject unsafe, jlong addr)) | |
| 518 UnsafeWrapper("Unsafe_FreeMemory"); | |
| 519 void* p = addr_from_java(addr); | |
| 520 if (p == NULL) { | |
| 521 return; | |
| 522 } | |
| 523 os::free(p); | |
| 524 UNSAFE_END | |
| 525 | |
| 526 UNSAFE_ENTRY(void, Unsafe_SetMemory(JNIEnv *env, jobject unsafe, jlong addr, jlong size, jbyte value)) | |
| 527 UnsafeWrapper("Unsafe_SetMemory"); | |
| 528 size_t sz = (size_t)size; | |
| 529 if (sz != (julong)size || size < 0) { | |
| 530 THROW(vmSymbols::java_lang_IllegalArgumentException()); | |
| 531 } | |
| 532 char* p = (char*) addr_from_java(addr); | |
| 533 Copy::fill_to_memory_atomic(p, sz, value); | |
| 534 UNSAFE_END | |
| 535 | |
| 536 UNSAFE_ENTRY(void, Unsafe_SetMemory2(JNIEnv *env, jobject unsafe, jobject obj, jlong offset, jlong size, jbyte value)) | |
| 537 UnsafeWrapper("Unsafe_SetMemory"); | |
| 538 size_t sz = (size_t)size; | |
| 539 if (sz != (julong)size || size < 0) { | |
| 540 THROW(vmSymbols::java_lang_IllegalArgumentException()); | |
| 541 } | |
| 542 oop base = JNIHandles::resolve(obj); | |
| 543 void* p = index_oop_from_field_offset_long(base, offset); | |
| 544 Copy::fill_to_memory_atomic(p, sz, value); | |
| 545 UNSAFE_END | |
| 546 | |
| 547 UNSAFE_ENTRY(void, Unsafe_CopyMemory(JNIEnv *env, jobject unsafe, jlong srcAddr, jlong dstAddr, jlong size)) | |
| 548 UnsafeWrapper("Unsafe_CopyMemory"); | |
| 549 if (size == 0) { | |
| 550 return; | |
| 551 } | |
| 552 size_t sz = (size_t)size; | |
| 553 if (sz != (julong)size || size < 0) { | |
| 554 THROW(vmSymbols::java_lang_IllegalArgumentException()); | |
| 555 } | |
| 556 void* src = addr_from_java(srcAddr); | |
| 557 void* dst = addr_from_java(dstAddr); | |
| 558 Copy::conjoint_memory_atomic(src, dst, sz); | |
| 559 UNSAFE_END | |
| 560 | |
| 561 UNSAFE_ENTRY(void, Unsafe_CopyMemory2(JNIEnv *env, jobject unsafe, jobject srcObj, jlong srcOffset, jobject dstObj, jlong dstOffset, jlong size)) | |
| 562 UnsafeWrapper("Unsafe_CopyMemory"); | |
| 563 if (size == 0) { | |
| 564 return; | |
| 565 } | |
| 566 size_t sz = (size_t)size; | |
| 567 if (sz != (julong)size || size < 0) { | |
| 568 THROW(vmSymbols::java_lang_IllegalArgumentException()); | |
| 569 } | |
| 570 oop srcp = JNIHandles::resolve(srcObj); | |
| 571 oop dstp = JNIHandles::resolve(dstObj); | |
| 572 if (dstp != NULL && !dstp->is_typeArray()) { | |
| 573 // NYI: This works only for non-oop arrays at present. | |
| 574 // Generalizing it would be reasonable, but requires card marking. | |
| 575 // Also, autoboxing a Long from 0L in copyMemory(x,y, 0L,z, n) would be bad. | |
| 576 THROW(vmSymbols::java_lang_IllegalArgumentException()); | |
| 577 } | |
| 578 void* src = index_oop_from_field_offset_long(srcp, srcOffset); | |
| 579 void* dst = index_oop_from_field_offset_long(dstp, dstOffset); | |
| 580 Copy::conjoint_memory_atomic(src, dst, sz); | |
| 581 UNSAFE_END | |
| 582 | |
| 583 | |
| 584 ////// Random queries | |
| 585 | |
| 586 // See comment at file start about UNSAFE_LEAF | |
| 587 //UNSAFE_LEAF(jint, Unsafe_AddressSize()) | |
| 588 UNSAFE_ENTRY(jint, Unsafe_AddressSize(JNIEnv *env, jobject unsafe)) | |
| 589 UnsafeWrapper("Unsafe_AddressSize"); | |
| 590 return sizeof(void*); | |
| 591 UNSAFE_END | |
| 592 | |
| 593 // See comment at file start about UNSAFE_LEAF | |
| 594 //UNSAFE_LEAF(jint, Unsafe_PageSize()) | |
| 595 UNSAFE_ENTRY(jint, Unsafe_PageSize(JNIEnv *env, jobject unsafe)) | |
| 596 UnsafeWrapper("Unsafe_PageSize"); | |
| 597 return os::vm_page_size(); | |
| 598 UNSAFE_END | |
| 599 | |
| 600 jint find_field_offset(jobject field, int must_be_static, TRAPS) { | |
| 601 if (field == NULL) { | |
| 602 THROW_0(vmSymbols::java_lang_NullPointerException()); | |
| 603 } | |
| 604 | |
| 605 oop reflected = JNIHandles::resolve_non_null(field); | |
| 606 oop mirror = java_lang_reflect_Field::clazz(reflected); | |
| 607 klassOop k = java_lang_Class::as_klassOop(mirror); | |
| 608 int slot = java_lang_reflect_Field::slot(reflected); | |
| 609 int modifiers = java_lang_reflect_Field::modifiers(reflected); | |
| 610 | |
| 611 if (must_be_static >= 0) { | |
| 612 int really_is_static = ((modifiers & JVM_ACC_STATIC) != 0); | |
| 613 if (must_be_static != really_is_static) { | |
| 614 THROW_0(vmSymbols::java_lang_IllegalArgumentException()); | |
| 615 } | |
| 616 } | |
| 617 | |
| 618 int offset = instanceKlass::cast(k)->offset_from_fields(slot); | |
| 619 return field_offset_from_byte_offset(offset); | |
| 620 } | |
| 621 | |
| 622 UNSAFE_ENTRY(jlong, Unsafe_ObjectFieldOffset(JNIEnv *env, jobject unsafe, jobject field)) | |
| 623 UnsafeWrapper("Unsafe_ObjectFieldOffset"); | |
| 624 return find_field_offset(field, 0, THREAD); | |
| 625 UNSAFE_END | |
| 626 | |
| 627 UNSAFE_ENTRY(jlong, Unsafe_StaticFieldOffset(JNIEnv *env, jobject unsafe, jobject field)) | |
| 628 UnsafeWrapper("Unsafe_StaticFieldOffset"); | |
| 629 return find_field_offset(field, 1, THREAD); | |
| 630 UNSAFE_END | |
| 631 | |
| 632 UNSAFE_ENTRY(jobject, Unsafe_StaticFieldBaseFromField(JNIEnv *env, jobject unsafe, jobject field)) | |
| 633 UnsafeWrapper("Unsafe_StaticFieldBase"); | |
| 634 // Note: In this VM implementation, a field address is always a short | |
| 635 // offset from the base of a a klass metaobject. Thus, the full dynamic | |
| 636 // range of the return type is never used. However, some implementations | |
| 637 // might put the static field inside an array shared by many classes, | |
| 638 // or even at a fixed address, in which case the address could be quite | |
| 639 // large. In that last case, this function would return NULL, since | |
| 640 // the address would operate alone, without any base pointer. | |
| 641 | |
| 642 if (field == NULL) THROW_0(vmSymbols::java_lang_NullPointerException()); | |
| 643 | |
| 644 oop reflected = JNIHandles::resolve_non_null(field); | |
| 645 oop mirror = java_lang_reflect_Field::clazz(reflected); | |
| 646 int modifiers = java_lang_reflect_Field::modifiers(reflected); | |
| 647 | |
| 648 if ((modifiers & JVM_ACC_STATIC) == 0) { | |
| 649 THROW_0(vmSymbols::java_lang_IllegalArgumentException()); | |
| 650 } | |
| 651 | |
| 652 return JNIHandles::make_local(env, java_lang_Class::as_klassOop(mirror)); | |
| 653 UNSAFE_END | |
| 654 | |
| 655 //@deprecated | |
| 656 UNSAFE_ENTRY(jint, Unsafe_FieldOffset(JNIEnv *env, jobject unsafe, jobject field)) | |
| 657 UnsafeWrapper("Unsafe_FieldOffset"); | |
| 658 // tries (but fails) to be polymorphic between static and non-static: | |
| 659 jlong offset = find_field_offset(field, -1, THREAD); | |
| 660 guarantee(offset == (jint)offset, "offset fits in 32 bits"); | |
| 661 return (jint)offset; | |
| 662 UNSAFE_END | |
| 663 | |
| 664 //@deprecated | |
| 665 UNSAFE_ENTRY(jobject, Unsafe_StaticFieldBaseFromClass(JNIEnv *env, jobject unsafe, jobject clazz)) | |
| 666 UnsafeWrapper("Unsafe_StaticFieldBase"); | |
| 667 if (clazz == NULL) { | |
| 668 THROW_0(vmSymbols::java_lang_NullPointerException()); | |
| 669 } | |
| 670 return JNIHandles::make_local(env, java_lang_Class::as_klassOop(JNIHandles::resolve_non_null(clazz))); | |
| 671 UNSAFE_END | |
| 672 | |
| 673 UNSAFE_ENTRY(void, Unsafe_EnsureClassInitialized(JNIEnv *env, jobject unsafe, jobject clazz)) | |
| 674 UnsafeWrapper("Unsafe_EnsureClassInitialized"); | |
| 675 if (clazz == NULL) { | |
| 676 THROW(vmSymbols::java_lang_NullPointerException()); | |
| 677 } | |
| 678 oop mirror = JNIHandles::resolve_non_null(clazz); | |
| 679 instanceKlass* k = instanceKlass::cast(java_lang_Class::as_klassOop(mirror)); | |
| 680 if (k != NULL) { | |
| 681 k->initialize(CHECK); | |
| 682 } | |
| 683 UNSAFE_END | |
| 684 | |
| 685 static void getBaseAndScale(int& base, int& scale, jclass acls, TRAPS) { | |
| 686 if (acls == NULL) { | |
| 687 THROW(vmSymbols::java_lang_NullPointerException()); | |
| 688 } | |
| 689 oop mirror = JNIHandles::resolve_non_null(acls); | |
| 690 klassOop k = java_lang_Class::as_klassOop(mirror); | |
| 691 if (k == NULL || !k->klass_part()->oop_is_array()) { | |
| 692 THROW(vmSymbols::java_lang_InvalidClassException()); | |
| 693 } else if (k->klass_part()->oop_is_objArray()) { | |
| 694 base = arrayOopDesc::base_offset_in_bytes(T_OBJECT); | |
|
113
ba764ed4b6f2
6420645: Create a vm that uses compressed oops for up to 32gb heapsizes
coleenp
parents:
0
diff
changeset
|
695 scale = heapOopSize; |
| 0 | 696 } else if (k->klass_part()->oop_is_typeArray()) { |
| 697 typeArrayKlass* tak = typeArrayKlass::cast(k); | |
| 698 base = tak->array_header_in_bytes(); | |
| 699 assert(base == arrayOopDesc::base_offset_in_bytes(tak->element_type()), "array_header_size semantics ok"); | |
| 700 scale = (1 << tak->log2_element_size()); | |
| 701 } else { | |
| 702 ShouldNotReachHere(); | |
| 703 } | |
| 704 } | |
| 705 | |
| 706 UNSAFE_ENTRY(jint, Unsafe_ArrayBaseOffset(JNIEnv *env, jobject unsafe, jclass acls)) | |
| 707 UnsafeWrapper("Unsafe_ArrayBaseOffset"); | |
| 708 int base, scale; | |
| 709 getBaseAndScale(base, scale, acls, CHECK_0); | |
| 710 return field_offset_from_byte_offset(base); | |
| 711 UNSAFE_END | |
| 712 | |
| 713 | |
| 714 UNSAFE_ENTRY(jint, Unsafe_ArrayIndexScale(JNIEnv *env, jobject unsafe, jclass acls)) | |
| 715 UnsafeWrapper("Unsafe_ArrayIndexScale"); | |
| 716 int base, scale; | |
| 717 getBaseAndScale(base, scale, acls, CHECK_0); | |
| 718 // This VM packs both fields and array elements down to the byte. | |
| 719 // But watch out: If this changes, so that array references for | |
| 720 // a given primitive type (say, T_BOOLEAN) use different memory units | |
| 721 // than fields, this method MUST return zero for such arrays. | |
| 722 // For example, the VM used to store sub-word sized fields in full | |
| 723 // words in the object layout, so that accessors like getByte(Object,int) | |
| 724 // did not really do what one might expect for arrays. Therefore, | |
| 725 // this function used to report a zero scale factor, so that the user | |
| 726 // would know not to attempt to access sub-word array elements. | |
| 727 // // Code for unpacked fields: | |
| 728 // if (scale < wordSize) return 0; | |
| 729 | |
| 730 // The following allows for a pretty general fieldOffset cookie scheme, | |
| 731 // but requires it to be linear in byte offset. | |
| 732 return field_offset_from_byte_offset(scale) - field_offset_from_byte_offset(0); | |
| 733 UNSAFE_END | |
| 734 | |
| 735 | |
| 736 static inline void throw_new(JNIEnv *env, const char *ename) { | |
| 737 char buf[100]; | |
| 738 strcpy(buf, "java/lang/"); | |
| 739 strcat(buf, ename); | |
| 740 jclass cls = env->FindClass(buf); | |
| 741 char* msg = NULL; | |
| 742 env->ThrowNew(cls, msg); | |
| 743 } | |
| 744 | |
| 745 static jclass Unsafe_DefineClass(JNIEnv *env, jstring name, jbyteArray data, int offset, int length, jobject loader, jobject pd) { | |
| 746 { | |
| 747 // Code lifted from JDK 1.3 ClassLoader.c | |
| 748 | |
| 749 jbyte *body; | |
| 750 char *utfName; | |
| 751 jclass result = 0; | |
| 752 char buf[128]; | |
| 753 | |
| 754 if (UsePerfData) { | |
| 755 ClassLoader::unsafe_defineClassCallCounter()->inc(); | |
| 756 } | |
| 757 | |
| 758 if (data == NULL) { | |
| 759 throw_new(env, "NullPointerException"); | |
| 760 return 0; | |
| 761 } | |
| 762 | |
| 763 /* Work around 4153825. malloc crashes on Solaris when passed a | |
| 764 * negative size. | |
| 765 */ | |
| 766 if (length < 0) { | |
| 767 throw_new(env, "ArrayIndexOutOfBoundsException"); | |
| 768 return 0; | |
| 769 } | |
| 770 | |
| 771 body = NEW_C_HEAP_ARRAY(jbyte, length); | |
| 772 | |
| 773 if (body == 0) { | |
| 774 throw_new(env, "OutOfMemoryError"); | |
| 775 return 0; | |
| 776 } | |
| 777 | |
| 778 env->GetByteArrayRegion(data, offset, length, body); | |
| 779 | |
| 780 if (env->ExceptionOccurred()) | |
| 781 goto free_body; | |
| 782 | |
| 783 if (name != NULL) { | |
| 784 uint len = env->GetStringUTFLength(name); | |
| 785 int unicode_len = env->GetStringLength(name); | |
| 786 if (len >= sizeof(buf)) { | |
| 787 utfName = NEW_C_HEAP_ARRAY(char, len + 1); | |
| 788 if (utfName == NULL) { | |
| 789 throw_new(env, "OutOfMemoryError"); | |
| 790 goto free_body; | |
| 791 } | |
| 792 } else { | |
| 793 utfName = buf; | |
| 794 } | |
| 795 env->GetStringUTFRegion(name, 0, unicode_len, utfName); | |
| 796 //VerifyFixClassname(utfName); | |
| 797 for (uint i = 0; i < len; i++) { | |
| 798 if (utfName[i] == '.') utfName[i] = '/'; | |
| 799 } | |
| 800 } else { | |
| 801 utfName = NULL; | |
| 802 } | |
| 803 | |
| 804 result = JVM_DefineClass(env, utfName, loader, body, length, pd); | |
| 805 | |
| 806 if (utfName && utfName != buf) | |
| 807 FREE_C_HEAP_ARRAY(char, utfName); | |
| 808 | |
| 809 free_body: | |
| 810 FREE_C_HEAP_ARRAY(jbyte, body); | |
| 811 return result; | |
| 812 } | |
| 813 } | |
| 814 | |
| 815 | |
| 816 UNSAFE_ENTRY(jclass, Unsafe_DefineClass0(JNIEnv *env, jobject unsafe, jstring name, jbyteArray data, int offset, int length)) | |
| 817 UnsafeWrapper("Unsafe_DefineClass"); | |
| 818 { | |
| 819 ThreadToNativeFromVM ttnfv(thread); | |
| 820 | |
| 821 int depthFromDefineClass0 = 1; | |
| 822 jclass caller = JVM_GetCallerClass(env, depthFromDefineClass0); | |
| 823 jobject loader = (caller == NULL) ? NULL : JVM_GetClassLoader(env, caller); | |
| 824 jobject pd = (caller == NULL) ? NULL : JVM_GetProtectionDomain(env, caller); | |
| 825 | |
| 826 return Unsafe_DefineClass(env, name, data, offset, length, loader, pd); | |
| 827 } | |
| 828 UNSAFE_END | |
| 829 | |
| 830 | |
| 831 UNSAFE_ENTRY(jclass, Unsafe_DefineClass1(JNIEnv *env, jobject unsafe, jstring name, jbyteArray data, int offset, int length, jobject loader, jobject pd)) | |
| 832 UnsafeWrapper("Unsafe_DefineClass"); | |
| 833 { | |
| 834 ThreadToNativeFromVM ttnfv(thread); | |
| 835 | |
| 836 return Unsafe_DefineClass(env, name, data, offset, length, loader, pd); | |
| 837 } | |
| 838 UNSAFE_END | |
| 839 | |
| 840 | |
| 841 UNSAFE_ENTRY(void, Unsafe_MonitorEnter(JNIEnv *env, jobject unsafe, jobject jobj)) | |
| 842 UnsafeWrapper("Unsafe_MonitorEnter"); | |
| 843 { | |
| 844 if (jobj == NULL) { | |
| 845 THROW(vmSymbols::java_lang_NullPointerException()); | |
| 846 } | |
| 847 Handle obj(thread, JNIHandles::resolve_non_null(jobj)); | |
| 848 ObjectSynchronizer::jni_enter(obj, CHECK); | |
| 849 } | |
| 850 UNSAFE_END | |
| 851 | |
| 852 | |
| 853 UNSAFE_ENTRY(jboolean, Unsafe_TryMonitorEnter(JNIEnv *env, jobject unsafe, jobject jobj)) | |
| 854 UnsafeWrapper("Unsafe_TryMonitorEnter"); | |
| 855 { | |
| 856 if (jobj == NULL) { | |
| 857 THROW_(vmSymbols::java_lang_NullPointerException(), JNI_FALSE); | |
| 858 } | |
| 859 Handle obj(thread, JNIHandles::resolve_non_null(jobj)); | |
| 860 bool res = ObjectSynchronizer::jni_try_enter(obj, CHECK_0); | |
| 861 return (res ? JNI_TRUE : JNI_FALSE); | |
| 862 } | |
| 863 UNSAFE_END | |
| 864 | |
| 865 | |
| 866 UNSAFE_ENTRY(void, Unsafe_MonitorExit(JNIEnv *env, jobject unsafe, jobject jobj)) | |
| 867 UnsafeWrapper("Unsafe_MonitorExit"); | |
| 868 { | |
| 869 if (jobj == NULL) { | |
| 870 THROW(vmSymbols::java_lang_NullPointerException()); | |
| 871 } | |
| 872 Handle obj(THREAD, JNIHandles::resolve_non_null(jobj)); | |
| 873 ObjectSynchronizer::jni_exit(obj(), CHECK); | |
| 874 } | |
| 875 UNSAFE_END | |
| 876 | |
| 877 | |
| 878 UNSAFE_ENTRY(void, Unsafe_ThrowException(JNIEnv *env, jobject unsafe, jthrowable thr)) | |
| 879 UnsafeWrapper("Unsafe_ThrowException"); | |
| 880 { | |
| 881 ThreadToNativeFromVM ttnfv(thread); | |
| 882 env->Throw(thr); | |
| 883 } | |
| 884 UNSAFE_END | |
| 885 | |
| 886 // JSR166 ------------------------------------------------------------------ | |
| 887 | |
| 888 UNSAFE_ENTRY(jboolean, Unsafe_CompareAndSwapObject(JNIEnv *env, jobject unsafe, jobject obj, jlong offset, jobject e_h, jobject x_h)) | |
| 889 UnsafeWrapper("Unsafe_CompareAndSwapObject"); | |
| 890 oop x = JNIHandles::resolve(x_h); | |
| 891 oop e = JNIHandles::resolve(e_h); | |
| 892 oop p = JNIHandles::resolve(obj); | |
|
113
ba764ed4b6f2
6420645: Create a vm that uses compressed oops for up to 32gb heapsizes
coleenp
parents:
0
diff
changeset
|
893 HeapWord* addr = (HeapWord *)index_oop_from_field_offset_long(p, offset); |
|
ba764ed4b6f2
6420645: Create a vm that uses compressed oops for up to 32gb heapsizes
coleenp
parents:
0
diff
changeset
|
894 oop res = oopDesc::atomic_compare_exchange_oop(x, addr, e); |
|
ba764ed4b6f2
6420645: Create a vm that uses compressed oops for up to 32gb heapsizes
coleenp
parents:
0
diff
changeset
|
895 jboolean success = (res == e); |
| 0 | 896 if (success) |
|
113
ba764ed4b6f2
6420645: Create a vm that uses compressed oops for up to 32gb heapsizes
coleenp
parents:
0
diff
changeset
|
897 update_barrier_set((void*)addr, x); |
| 0 | 898 return success; |
| 899 UNSAFE_END | |
| 900 | |
| 901 UNSAFE_ENTRY(jboolean, Unsafe_CompareAndSwapInt(JNIEnv *env, jobject unsafe, jobject obj, jlong offset, jint e, jint x)) | |
| 902 UnsafeWrapper("Unsafe_CompareAndSwapInt"); | |
| 903 oop p = JNIHandles::resolve(obj); | |
| 904 jint* addr = (jint *) index_oop_from_field_offset_long(p, offset); | |
| 905 return (jint)(Atomic::cmpxchg(x, addr, e)) == e; | |
| 906 UNSAFE_END | |
| 907 | |
| 908 UNSAFE_ENTRY(jboolean, Unsafe_CompareAndSwapLong(JNIEnv *env, jobject unsafe, jobject obj, jlong offset, jlong e, jlong x)) | |
| 909 UnsafeWrapper("Unsafe_CompareAndSwapLong"); | |
| 910 Handle p (THREAD, JNIHandles::resolve(obj)); | |
| 911 jlong* addr = (jlong*)(index_oop_from_field_offset_long(p(), offset)); | |
| 912 if (VM_Version::supports_cx8()) | |
| 913 return (jlong)(Atomic::cmpxchg(x, addr, e)) == e; | |
| 914 else { | |
| 915 jboolean success = false; | |
| 916 ObjectLocker ol(p, THREAD); | |
| 917 if (*addr == e) { *addr = x; success = true; } | |
| 918 return success; | |
| 919 } | |
| 920 UNSAFE_END | |
| 921 | |
| 922 UNSAFE_ENTRY(void, Unsafe_Park(JNIEnv *env, jobject unsafe, jboolean isAbsolute, jlong time)) | |
| 923 UnsafeWrapper("Unsafe_Park"); | |
| 924 JavaThreadParkedState jtps(thread, time != 0); | |
| 925 thread->parker()->park(isAbsolute != 0, time); | |
| 926 UNSAFE_END | |
| 927 | |
| 928 UNSAFE_ENTRY(void, Unsafe_Unpark(JNIEnv *env, jobject unsafe, jobject jthread)) | |
| 929 UnsafeWrapper("Unsafe_Unpark"); | |
| 930 Parker* p = NULL; | |
| 931 if (jthread != NULL) { | |
| 932 oop java_thread = JNIHandles::resolve_non_null(jthread); | |
| 933 if (java_thread != NULL) { | |
| 934 jlong lp = java_lang_Thread::park_event(java_thread); | |
| 935 if (lp != 0) { | |
| 936 // This cast is OK even though the jlong might have been read | |
| 937 // non-atomically on 32bit systems, since there, one word will | |
| 938 // always be zero anyway and the value set is always the same | |
| 939 p = (Parker*)addr_from_java(lp); | |
| 940 } else { | |
| 941 // Grab lock if apparently null or using older version of library | |
| 942 MutexLocker mu(Threads_lock); | |
| 943 java_thread = JNIHandles::resolve_non_null(jthread); | |
| 944 if (java_thread != NULL) { | |
| 945 JavaThread* thr = java_lang_Thread::thread(java_thread); | |
| 946 if (thr != NULL) { | |
| 947 p = thr->parker(); | |
| 948 if (p != NULL) { // Bind to Java thread for next time. | |
| 949 java_lang_Thread::set_park_event(java_thread, addr_to_java(p)); | |
| 950 } | |
| 951 } | |
| 952 } | |
| 953 } | |
| 954 } | |
| 955 } | |
| 956 if (p != NULL) { | |
| 957 p->unpark(); | |
| 958 } | |
| 959 UNSAFE_END | |
| 960 | |
| 961 UNSAFE_ENTRY(jint, Unsafe_Loadavg(JNIEnv *env, jobject unsafe, jdoubleArray loadavg, jint nelem)) | |
| 962 UnsafeWrapper("Unsafe_Loadavg"); | |
| 963 const int max_nelem = 3; | |
| 964 double la[max_nelem]; | |
| 965 jint ret; | |
| 966 | |
| 967 typeArrayOop a = typeArrayOop(JNIHandles::resolve_non_null(loadavg)); | |
| 968 assert(a->is_typeArray(), "must be type array"); | |
| 969 | |
| 970 if (nelem < 0 || nelem > max_nelem || a->length() < nelem) { | |
| 971 ThreadToNativeFromVM ttnfv(thread); | |
| 972 throw_new(env, "ArrayIndexOutOfBoundsException"); | |
| 973 return -1; | |
| 974 } | |
| 975 | |
| 976 ret = os::loadavg(la, nelem); | |
| 977 if (ret == -1) return -1; | |
| 978 | |
| 979 // if successful, ret is the number of samples actually retrieved. | |
| 980 assert(ret >= 0 && ret <= max_nelem, "Unexpected loadavg return value"); | |
| 981 switch(ret) { | |
| 982 case 3: a->double_at_put(2, (jdouble)la[2]); // fall through | |
| 983 case 2: a->double_at_put(1, (jdouble)la[1]); // fall through | |
| 984 case 1: a->double_at_put(0, (jdouble)la[0]); break; | |
| 985 } | |
| 986 return ret; | |
| 987 UNSAFE_END | |
| 988 | |
| 989 UNSAFE_ENTRY(void, Unsafe_PrefetchRead(JNIEnv* env, jclass ignored, jobject obj, jlong offset)) | |
| 990 UnsafeWrapper("Unsafe_PrefetchRead"); | |
| 991 oop p = JNIHandles::resolve(obj); | |
| 992 void* addr = index_oop_from_field_offset_long(p, 0); | |
| 993 Prefetch::read(addr, (intx)offset); | |
| 994 UNSAFE_END | |
| 995 | |
| 996 UNSAFE_ENTRY(void, Unsafe_PrefetchWrite(JNIEnv* env, jclass ignored, jobject obj, jlong offset)) | |
| 997 UnsafeWrapper("Unsafe_PrefetchWrite"); | |
| 998 oop p = JNIHandles::resolve(obj); | |
| 999 void* addr = index_oop_from_field_offset_long(p, 0); | |
| 1000 Prefetch::write(addr, (intx)offset); | |
| 1001 UNSAFE_END | |
| 1002 | |
| 1003 | |
| 1004 /// JVM_RegisterUnsafeMethods | |
| 1005 | |
| 1006 #define ADR "J" | |
| 1007 | |
| 1008 #define LANG "Ljava/lang/" | |
| 1009 | |
| 1010 #define OBJ LANG"Object;" | |
| 1011 #define CLS LANG"Class;" | |
| 1012 #define CTR LANG"reflect/Constructor;" | |
| 1013 #define FLD LANG"reflect/Field;" | |
| 1014 #define MTH LANG"reflect/Method;" | |
| 1015 #define THR LANG"Throwable;" | |
| 1016 | |
| 1017 #define DC0_Args LANG"String;[BII" | |
| 1018 #define DC1_Args DC0_Args LANG"ClassLoader;" "Ljava/security/ProtectionDomain;" | |
| 1019 | |
| 1020 #define CC (char*) /*cast a literal from (const char*)*/ | |
| 1021 #define FN_PTR(f) CAST_FROM_FN_PTR(void*, &f) | |
| 1022 | |
| 1023 // define deprecated accessors for compabitility with 1.4.0 | |
| 1024 #define DECLARE_GETSETOOP_140(Boolean, Z) \ | |
| 1025 {CC"get"#Boolean, CC"("OBJ"I)"#Z, FN_PTR(Unsafe_Get##Boolean##140)}, \ | |
| 1026 {CC"put"#Boolean, CC"("OBJ"I"#Z")V", FN_PTR(Unsafe_Set##Boolean##140)} | |
| 1027 | |
| 1028 // Note: In 1.4.1, getObject and kin take both int and long offsets. | |
| 1029 #define DECLARE_GETSETOOP_141(Boolean, Z) \ | |
| 1030 {CC"get"#Boolean, CC"("OBJ"J)"#Z, FN_PTR(Unsafe_Get##Boolean)}, \ | |
| 1031 {CC"put"#Boolean, CC"("OBJ"J"#Z")V", FN_PTR(Unsafe_Set##Boolean)} | |
| 1032 | |
| 1033 // Note: In 1.5.0, there are volatile versions too | |
| 1034 #define DECLARE_GETSETOOP(Boolean, Z) \ | |
| 1035 {CC"get"#Boolean, CC"("OBJ"J)"#Z, FN_PTR(Unsafe_Get##Boolean)}, \ | |
| 1036 {CC"put"#Boolean, CC"("OBJ"J"#Z")V", FN_PTR(Unsafe_Set##Boolean)}, \ | |
| 1037 {CC"get"#Boolean"Volatile", CC"("OBJ"J)"#Z, FN_PTR(Unsafe_Get##Boolean##Volatile)}, \ | |
| 1038 {CC"put"#Boolean"Volatile", CC"("OBJ"J"#Z")V", FN_PTR(Unsafe_Set##Boolean##Volatile)} | |
| 1039 | |
| 1040 | |
| 1041 #define DECLARE_GETSETNATIVE(Byte, B) \ | |
| 1042 {CC"get"#Byte, CC"("ADR")"#B, FN_PTR(Unsafe_GetNative##Byte)}, \ | |
| 1043 {CC"put"#Byte, CC"("ADR#B")V", FN_PTR(Unsafe_SetNative##Byte)} | |
| 1044 | |
| 1045 | |
| 1046 | |
| 1047 // %%% These are temporarily supported until the SDK sources | |
| 1048 // contain the necessarily updated Unsafe.java. | |
| 1049 static JNINativeMethod methods_140[] = { | |
| 1050 | |
| 1051 {CC"getObject", CC"("OBJ"I)"OBJ"", FN_PTR(Unsafe_GetObject140)}, | |
| 1052 {CC"putObject", CC"("OBJ"I"OBJ")V", FN_PTR(Unsafe_SetObject140)}, | |
| 1053 | |
| 1054 DECLARE_GETSETOOP_140(Boolean, Z), | |
| 1055 DECLARE_GETSETOOP_140(Byte, B), | |
| 1056 DECLARE_GETSETOOP_140(Short, S), | |
| 1057 DECLARE_GETSETOOP_140(Char, C), | |
| 1058 DECLARE_GETSETOOP_140(Int, I), | |
| 1059 DECLARE_GETSETOOP_140(Long, J), | |
| 1060 DECLARE_GETSETOOP_140(Float, F), | |
| 1061 DECLARE_GETSETOOP_140(Double, D), | |
| 1062 | |
| 1063 DECLARE_GETSETNATIVE(Byte, B), | |
| 1064 DECLARE_GETSETNATIVE(Short, S), | |
| 1065 DECLARE_GETSETNATIVE(Char, C), | |
| 1066 DECLARE_GETSETNATIVE(Int, I), | |
| 1067 DECLARE_GETSETNATIVE(Long, J), | |
| 1068 DECLARE_GETSETNATIVE(Float, F), | |
| 1069 DECLARE_GETSETNATIVE(Double, D), | |
| 1070 | |
| 1071 {CC"getAddress", CC"("ADR")"ADR, FN_PTR(Unsafe_GetNativeAddress)}, | |
| 1072 {CC"putAddress", CC"("ADR""ADR")V", FN_PTR(Unsafe_SetNativeAddress)}, | |
| 1073 | |
| 1074 {CC"allocateMemory", CC"(J)"ADR, FN_PTR(Unsafe_AllocateMemory)}, | |
| 1075 {CC"reallocateMemory", CC"("ADR"J)"ADR, FN_PTR(Unsafe_ReallocateMemory)}, | |
| 1076 // {CC"setMemory", CC"("ADR"JB)V", FN_PTR(Unsafe_SetMemory)}, | |
| 1077 // {CC"copyMemory", CC"("ADR ADR"J)V", FN_PTR(Unsafe_CopyMemory)}, | |
| 1078 {CC"freeMemory", CC"("ADR")V", FN_PTR(Unsafe_FreeMemory)}, | |
| 1079 | |
| 1080 {CC"fieldOffset", CC"("FLD")I", FN_PTR(Unsafe_FieldOffset)}, //deprecated | |
| 1081 {CC"staticFieldBase", CC"("CLS")"OBJ, FN_PTR(Unsafe_StaticFieldBaseFromClass)}, //deprecated | |
| 1082 {CC"ensureClassInitialized",CC"("CLS")V", FN_PTR(Unsafe_EnsureClassInitialized)}, | |
| 1083 {CC"arrayBaseOffset", CC"("CLS")I", FN_PTR(Unsafe_ArrayBaseOffset)}, | |
| 1084 {CC"arrayIndexScale", CC"("CLS")I", FN_PTR(Unsafe_ArrayIndexScale)}, | |
| 1085 {CC"addressSize", CC"()I", FN_PTR(Unsafe_AddressSize)}, | |
| 1086 {CC"pageSize", CC"()I", FN_PTR(Unsafe_PageSize)}, | |
| 1087 | |
| 1088 {CC"defineClass", CC"("DC0_Args")"CLS, FN_PTR(Unsafe_DefineClass0)}, | |
| 1089 {CC"defineClass", CC"("DC1_Args")"CLS, FN_PTR(Unsafe_DefineClass1)}, | |
| 1090 {CC"allocateInstance", CC"("CLS")"OBJ, FN_PTR(Unsafe_AllocateInstance)}, | |
| 1091 {CC"monitorEnter", CC"("OBJ")V", FN_PTR(Unsafe_MonitorEnter)}, | |
| 1092 {CC"monitorExit", CC"("OBJ")V", FN_PTR(Unsafe_MonitorExit)}, | |
| 1093 {CC"throwException", CC"("THR")V", FN_PTR(Unsafe_ThrowException)} | |
| 1094 }; | |
| 1095 | |
| 1096 // These are the old methods prior to the JSR 166 changes in 1.5.0 | |
| 1097 static JNINativeMethod methods_141[] = { | |
| 1098 | |
| 1099 {CC"getObject", CC"("OBJ"J)"OBJ"", FN_PTR(Unsafe_GetObject)}, | |
| 1100 {CC"putObject", CC"("OBJ"J"OBJ")V", FN_PTR(Unsafe_SetObject)}, | |
| 1101 | |
| 1102 DECLARE_GETSETOOP_141(Boolean, Z), | |
| 1103 DECLARE_GETSETOOP_141(Byte, B), | |
| 1104 DECLARE_GETSETOOP_141(Short, S), | |
| 1105 DECLARE_GETSETOOP_141(Char, C), | |
| 1106 DECLARE_GETSETOOP_141(Int, I), | |
| 1107 DECLARE_GETSETOOP_141(Long, J), | |
| 1108 DECLARE_GETSETOOP_141(Float, F), | |
| 1109 DECLARE_GETSETOOP_141(Double, D), | |
| 1110 | |
| 1111 DECLARE_GETSETNATIVE(Byte, B), | |
| 1112 DECLARE_GETSETNATIVE(Short, S), | |
| 1113 DECLARE_GETSETNATIVE(Char, C), | |
| 1114 DECLARE_GETSETNATIVE(Int, I), | |
| 1115 DECLARE_GETSETNATIVE(Long, J), | |
| 1116 DECLARE_GETSETNATIVE(Float, F), | |
| 1117 DECLARE_GETSETNATIVE(Double, D), | |
| 1118 | |
| 1119 {CC"getAddress", CC"("ADR")"ADR, FN_PTR(Unsafe_GetNativeAddress)}, | |
| 1120 {CC"putAddress", CC"("ADR""ADR")V", FN_PTR(Unsafe_SetNativeAddress)}, | |
| 1121 | |
| 1122 {CC"allocateMemory", CC"(J)"ADR, FN_PTR(Unsafe_AllocateMemory)}, | |
| 1123 {CC"reallocateMemory", CC"("ADR"J)"ADR, FN_PTR(Unsafe_ReallocateMemory)}, | |
| 1124 // {CC"setMemory", CC"("ADR"JB)V", FN_PTR(Unsafe_SetMemory)}, | |
| 1125 // {CC"copyMemory", CC"("ADR ADR"J)V", FN_PTR(Unsafe_CopyMemory)}, | |
| 1126 {CC"freeMemory", CC"("ADR")V", FN_PTR(Unsafe_FreeMemory)}, | |
| 1127 | |
| 1128 {CC"objectFieldOffset", CC"("FLD")J", FN_PTR(Unsafe_ObjectFieldOffset)}, | |
| 1129 {CC"staticFieldOffset", CC"("FLD")J", FN_PTR(Unsafe_StaticFieldOffset)}, | |
| 1130 {CC"staticFieldBase", CC"("FLD")"OBJ, FN_PTR(Unsafe_StaticFieldBaseFromField)}, | |
| 1131 {CC"ensureClassInitialized",CC"("CLS")V", FN_PTR(Unsafe_EnsureClassInitialized)}, | |
| 1132 {CC"arrayBaseOffset", CC"("CLS")I", FN_PTR(Unsafe_ArrayBaseOffset)}, | |
| 1133 {CC"arrayIndexScale", CC"("CLS")I", FN_PTR(Unsafe_ArrayIndexScale)}, | |
| 1134 {CC"addressSize", CC"()I", FN_PTR(Unsafe_AddressSize)}, | |
| 1135 {CC"pageSize", CC"()I", FN_PTR(Unsafe_PageSize)}, | |
| 1136 | |
| 1137 {CC"defineClass", CC"("DC0_Args")"CLS, FN_PTR(Unsafe_DefineClass0)}, | |
| 1138 {CC"defineClass", CC"("DC1_Args")"CLS, FN_PTR(Unsafe_DefineClass1)}, | |
| 1139 {CC"allocateInstance", CC"("CLS")"OBJ, FN_PTR(Unsafe_AllocateInstance)}, | |
| 1140 {CC"monitorEnter", CC"("OBJ")V", FN_PTR(Unsafe_MonitorEnter)}, | |
| 1141 {CC"monitorExit", CC"("OBJ")V", FN_PTR(Unsafe_MonitorExit)}, | |
| 1142 {CC"throwException", CC"("THR")V", FN_PTR(Unsafe_ThrowException)} | |
| 1143 | |
| 1144 }; | |
| 1145 | |
| 1146 // These are the old methods prior to the JSR 166 changes in 1.6.0 | |
| 1147 static JNINativeMethod methods_15[] = { | |
| 1148 | |
| 1149 {CC"getObject", CC"("OBJ"J)"OBJ"", FN_PTR(Unsafe_GetObject)}, | |
| 1150 {CC"putObject", CC"("OBJ"J"OBJ")V", FN_PTR(Unsafe_SetObject)}, | |
| 1151 {CC"getObjectVolatile",CC"("OBJ"J)"OBJ"", FN_PTR(Unsafe_GetObjectVolatile)}, | |
| 1152 {CC"putObjectVolatile",CC"("OBJ"J"OBJ")V", FN_PTR(Unsafe_SetObjectVolatile)}, | |
| 1153 | |
| 1154 | |
| 1155 DECLARE_GETSETOOP(Boolean, Z), | |
| 1156 DECLARE_GETSETOOP(Byte, B), | |
| 1157 DECLARE_GETSETOOP(Short, S), | |
| 1158 DECLARE_GETSETOOP(Char, C), | |
| 1159 DECLARE_GETSETOOP(Int, I), | |
| 1160 DECLARE_GETSETOOP(Long, J), | |
| 1161 DECLARE_GETSETOOP(Float, F), | |
| 1162 DECLARE_GETSETOOP(Double, D), | |
| 1163 | |
| 1164 DECLARE_GETSETNATIVE(Byte, B), | |
| 1165 DECLARE_GETSETNATIVE(Short, S), | |
| 1166 DECLARE_GETSETNATIVE(Char, C), | |
| 1167 DECLARE_GETSETNATIVE(Int, I), | |
| 1168 DECLARE_GETSETNATIVE(Long, J), | |
| 1169 DECLARE_GETSETNATIVE(Float, F), | |
| 1170 DECLARE_GETSETNATIVE(Double, D), | |
| 1171 | |
| 1172 {CC"getAddress", CC"("ADR")"ADR, FN_PTR(Unsafe_GetNativeAddress)}, | |
| 1173 {CC"putAddress", CC"("ADR""ADR")V", FN_PTR(Unsafe_SetNativeAddress)}, | |
| 1174 | |
| 1175 {CC"allocateMemory", CC"(J)"ADR, FN_PTR(Unsafe_AllocateMemory)}, | |
| 1176 {CC"reallocateMemory", CC"("ADR"J)"ADR, FN_PTR(Unsafe_ReallocateMemory)}, | |
| 1177 // {CC"setMemory", CC"("ADR"JB)V", FN_PTR(Unsafe_SetMemory)}, | |
| 1178 // {CC"copyMemory", CC"("ADR ADR"J)V", FN_PTR(Unsafe_CopyMemory)}, | |
| 1179 {CC"freeMemory", CC"("ADR")V", FN_PTR(Unsafe_FreeMemory)}, | |
| 1180 | |
| 1181 {CC"objectFieldOffset", CC"("FLD")J", FN_PTR(Unsafe_ObjectFieldOffset)}, | |
| 1182 {CC"staticFieldOffset", CC"("FLD")J", FN_PTR(Unsafe_StaticFieldOffset)}, | |
| 1183 {CC"staticFieldBase", CC"("FLD")"OBJ, FN_PTR(Unsafe_StaticFieldBaseFromField)}, | |
| 1184 {CC"ensureClassInitialized",CC"("CLS")V", FN_PTR(Unsafe_EnsureClassInitialized)}, | |
| 1185 {CC"arrayBaseOffset", CC"("CLS")I", FN_PTR(Unsafe_ArrayBaseOffset)}, | |
| 1186 {CC"arrayIndexScale", CC"("CLS")I", FN_PTR(Unsafe_ArrayIndexScale)}, | |
| 1187 {CC"addressSize", CC"()I", FN_PTR(Unsafe_AddressSize)}, | |
| 1188 {CC"pageSize", CC"()I", FN_PTR(Unsafe_PageSize)}, | |
| 1189 | |
| 1190 {CC"defineClass", CC"("DC0_Args")"CLS, FN_PTR(Unsafe_DefineClass0)}, | |
| 1191 {CC"defineClass", CC"("DC1_Args")"CLS, FN_PTR(Unsafe_DefineClass1)}, | |
| 1192 {CC"allocateInstance", CC"("CLS")"OBJ, FN_PTR(Unsafe_AllocateInstance)}, | |
| 1193 {CC"monitorEnter", CC"("OBJ")V", FN_PTR(Unsafe_MonitorEnter)}, | |
| 1194 {CC"monitorExit", CC"("OBJ")V", FN_PTR(Unsafe_MonitorExit)}, | |
| 1195 {CC"throwException", CC"("THR")V", FN_PTR(Unsafe_ThrowException)}, | |
| 1196 {CC"compareAndSwapObject", CC"("OBJ"J"OBJ""OBJ")Z", FN_PTR(Unsafe_CompareAndSwapObject)}, | |
| 1197 {CC"compareAndSwapInt", CC"("OBJ"J""I""I"")Z", FN_PTR(Unsafe_CompareAndSwapInt)}, | |
| 1198 {CC"compareAndSwapLong", CC"("OBJ"J""J""J"")Z", FN_PTR(Unsafe_CompareAndSwapLong)}, | |
| 1199 {CC"park", CC"(ZJ)V", FN_PTR(Unsafe_Park)}, | |
| 1200 {CC"unpark", CC"("OBJ")V", FN_PTR(Unsafe_Unpark)} | |
| 1201 | |
| 1202 }; | |
| 1203 | |
| 1204 // These are the correct methods, moving forward: | |
| 1205 static JNINativeMethod methods[] = { | |
| 1206 | |
| 1207 {CC"getObject", CC"("OBJ"J)"OBJ"", FN_PTR(Unsafe_GetObject)}, | |
| 1208 {CC"putObject", CC"("OBJ"J"OBJ")V", FN_PTR(Unsafe_SetObject)}, | |
| 1209 {CC"getObjectVolatile",CC"("OBJ"J)"OBJ"", FN_PTR(Unsafe_GetObjectVolatile)}, | |
| 1210 {CC"putObjectVolatile",CC"("OBJ"J"OBJ")V", FN_PTR(Unsafe_SetObjectVolatile)}, | |
| 1211 | |
| 1212 | |
| 1213 DECLARE_GETSETOOP(Boolean, Z), | |
| 1214 DECLARE_GETSETOOP(Byte, B), | |
| 1215 DECLARE_GETSETOOP(Short, S), | |
| 1216 DECLARE_GETSETOOP(Char, C), | |
| 1217 DECLARE_GETSETOOP(Int, I), | |
| 1218 DECLARE_GETSETOOP(Long, J), | |
| 1219 DECLARE_GETSETOOP(Float, F), | |
| 1220 DECLARE_GETSETOOP(Double, D), | |
| 1221 | |
| 1222 DECLARE_GETSETNATIVE(Byte, B), | |
| 1223 DECLARE_GETSETNATIVE(Short, S), | |
| 1224 DECLARE_GETSETNATIVE(Char, C), | |
| 1225 DECLARE_GETSETNATIVE(Int, I), | |
| 1226 DECLARE_GETSETNATIVE(Long, J), | |
| 1227 DECLARE_GETSETNATIVE(Float, F), | |
| 1228 DECLARE_GETSETNATIVE(Double, D), | |
| 1229 | |
| 1230 {CC"getAddress", CC"("ADR")"ADR, FN_PTR(Unsafe_GetNativeAddress)}, | |
| 1231 {CC"putAddress", CC"("ADR""ADR")V", FN_PTR(Unsafe_SetNativeAddress)}, | |
| 1232 | |
| 1233 {CC"allocateMemory", CC"(J)"ADR, FN_PTR(Unsafe_AllocateMemory)}, | |
| 1234 {CC"reallocateMemory", CC"("ADR"J)"ADR, FN_PTR(Unsafe_ReallocateMemory)}, | |
| 1235 // {CC"setMemory", CC"("ADR"JB)V", FN_PTR(Unsafe_SetMemory)}, | |
| 1236 // {CC"copyMemory", CC"("ADR ADR"J)V", FN_PTR(Unsafe_CopyMemory)}, | |
| 1237 {CC"freeMemory", CC"("ADR")V", FN_PTR(Unsafe_FreeMemory)}, | |
| 1238 | |
| 1239 {CC"objectFieldOffset", CC"("FLD")J", FN_PTR(Unsafe_ObjectFieldOffset)}, | |
| 1240 {CC"staticFieldOffset", CC"("FLD")J", FN_PTR(Unsafe_StaticFieldOffset)}, | |
| 1241 {CC"staticFieldBase", CC"("FLD")"OBJ, FN_PTR(Unsafe_StaticFieldBaseFromField)}, | |
| 1242 {CC"ensureClassInitialized",CC"("CLS")V", FN_PTR(Unsafe_EnsureClassInitialized)}, | |
| 1243 {CC"arrayBaseOffset", CC"("CLS")I", FN_PTR(Unsafe_ArrayBaseOffset)}, | |
| 1244 {CC"arrayIndexScale", CC"("CLS")I", FN_PTR(Unsafe_ArrayIndexScale)}, | |
| 1245 {CC"addressSize", CC"()I", FN_PTR(Unsafe_AddressSize)}, | |
| 1246 {CC"pageSize", CC"()I", FN_PTR(Unsafe_PageSize)}, | |
| 1247 | |
| 1248 {CC"defineClass", CC"("DC0_Args")"CLS, FN_PTR(Unsafe_DefineClass0)}, | |
| 1249 {CC"defineClass", CC"("DC1_Args")"CLS, FN_PTR(Unsafe_DefineClass1)}, | |
| 1250 {CC"allocateInstance", CC"("CLS")"OBJ, FN_PTR(Unsafe_AllocateInstance)}, | |
| 1251 {CC"monitorEnter", CC"("OBJ")V", FN_PTR(Unsafe_MonitorEnter)}, | |
| 1252 {CC"monitorExit", CC"("OBJ")V", FN_PTR(Unsafe_MonitorExit)}, | |
| 1253 {CC"tryMonitorEnter", CC"("OBJ")Z", FN_PTR(Unsafe_TryMonitorEnter)}, | |
| 1254 {CC"throwException", CC"("THR")V", FN_PTR(Unsafe_ThrowException)}, | |
| 1255 {CC"compareAndSwapObject", CC"("OBJ"J"OBJ""OBJ")Z", FN_PTR(Unsafe_CompareAndSwapObject)}, | |
| 1256 {CC"compareAndSwapInt", CC"("OBJ"J""I""I"")Z", FN_PTR(Unsafe_CompareAndSwapInt)}, | |
| 1257 {CC"compareAndSwapLong", CC"("OBJ"J""J""J"")Z", FN_PTR(Unsafe_CompareAndSwapLong)}, | |
| 1258 {CC"putOrderedObject", CC"("OBJ"J"OBJ")V", FN_PTR(Unsafe_SetOrderedObject)}, | |
| 1259 {CC"putOrderedInt", CC"("OBJ"JI)V", FN_PTR(Unsafe_SetOrderedInt)}, | |
| 1260 {CC"putOrderedLong", CC"("OBJ"JJ)V", FN_PTR(Unsafe_SetOrderedLong)}, | |
| 1261 {CC"park", CC"(ZJ)V", FN_PTR(Unsafe_Park)}, | |
| 1262 {CC"unpark", CC"("OBJ")V", FN_PTR(Unsafe_Unpark)} | |
| 1263 | |
| 1264 // {CC"getLoadAverage", CC"([DI)I", FN_PTR(Unsafe_Loadavg)}, | |
| 1265 | |
| 1266 // {CC"prefetchRead", CC"("OBJ"J)V", FN_PTR(Unsafe_PrefetchRead)}, | |
| 1267 // {CC"prefetchWrite", CC"("OBJ"J)V", FN_PTR(Unsafe_PrefetchWrite)} | |
| 1268 // {CC"prefetchReadStatic", CC"("OBJ"J)V", FN_PTR(Unsafe_PrefetchRead)}, | |
| 1269 // {CC"prefetchWriteStatic",CC"("OBJ"J)V", FN_PTR(Unsafe_PrefetchWrite)} | |
| 1270 | |
| 1271 }; | |
| 1272 | |
| 1273 JNINativeMethod loadavg_method[] = { | |
| 1274 {CC"getLoadAverage", CC"([DI)I", FN_PTR(Unsafe_Loadavg)} | |
| 1275 }; | |
| 1276 | |
| 1277 JNINativeMethod prefetch_methods[] = { | |
| 1278 {CC"prefetchRead", CC"("OBJ"J)V", FN_PTR(Unsafe_PrefetchRead)}, | |
| 1279 {CC"prefetchWrite", CC"("OBJ"J)V", FN_PTR(Unsafe_PrefetchWrite)}, | |
| 1280 {CC"prefetchReadStatic", CC"("OBJ"J)V", FN_PTR(Unsafe_PrefetchRead)}, | |
| 1281 {CC"prefetchWriteStatic",CC"("OBJ"J)V", FN_PTR(Unsafe_PrefetchWrite)} | |
| 1282 }; | |
| 1283 | |
| 1284 JNINativeMethod memcopy_methods[] = { | |
| 1285 {CC"copyMemory", CC"("OBJ"J"OBJ"JJ)V", FN_PTR(Unsafe_CopyMemory2)}, | |
| 1286 {CC"setMemory", CC"("OBJ"JJB)V", FN_PTR(Unsafe_SetMemory2)} | |
| 1287 }; | |
| 1288 | |
| 1289 JNINativeMethod memcopy_methods_15[] = { | |
| 1290 {CC"setMemory", CC"("ADR"JB)V", FN_PTR(Unsafe_SetMemory)}, | |
| 1291 {CC"copyMemory", CC"("ADR ADR"J)V", FN_PTR(Unsafe_CopyMemory)} | |
| 1292 }; | |
| 1293 | |
| 1294 | |
| 1295 #undef CC | |
| 1296 #undef FN_PTR | |
| 1297 | |
| 1298 #undef ADR | |
| 1299 #undef LANG | |
| 1300 #undef OBJ | |
| 1301 #undef CLS | |
| 1302 #undef CTR | |
| 1303 #undef FLD | |
| 1304 #undef MTH | |
| 1305 #undef THR | |
| 1306 #undef DC0_Args | |
| 1307 #undef DC1_Args | |
| 1308 | |
| 1309 #undef DECLARE_GETSETOOP | |
| 1310 #undef DECLARE_GETSETNATIVE | |
| 1311 | |
| 1312 | |
| 1313 // This one function is exported, used by NativeLookup. | |
| 1314 // The Unsafe_xxx functions above are called only from the interpreter. | |
| 1315 // The optimizer looks at names and signatures to recognize | |
| 1316 // individual functions. | |
| 1317 | |
| 1318 JVM_ENTRY(void, JVM_RegisterUnsafeMethods(JNIEnv *env, jclass unsafecls)) | |
| 1319 UnsafeWrapper("JVM_RegisterUnsafeMethods"); | |
| 1320 { | |
| 1321 ThreadToNativeFromVM ttnfv(thread); | |
| 1322 { | |
| 1323 env->RegisterNatives(unsafecls, loadavg_method, sizeof(loadavg_method)/sizeof(JNINativeMethod)); | |
| 1324 if (env->ExceptionOccurred()) { | |
| 1325 if (PrintMiscellaneous && (Verbose || WizardMode)) { | |
| 1326 tty->print_cr("Warning: SDK 1.6 Unsafe.loadavg not found."); | |
| 1327 } | |
| 1328 env->ExceptionClear(); | |
| 1329 } | |
| 1330 } | |
| 1331 { | |
| 1332 env->RegisterNatives(unsafecls, prefetch_methods, sizeof(prefetch_methods)/sizeof(JNINativeMethod)); | |
| 1333 if (env->ExceptionOccurred()) { | |
| 1334 if (PrintMiscellaneous && (Verbose || WizardMode)) { | |
| 1335 tty->print_cr("Warning: SDK 1.6 Unsafe.prefetchRead/Write not found."); | |
| 1336 } | |
| 1337 env->ExceptionClear(); | |
| 1338 } | |
| 1339 } | |
| 1340 { | |
| 1341 env->RegisterNatives(unsafecls, memcopy_methods, sizeof(memcopy_methods)/sizeof(JNINativeMethod)); | |
| 1342 if (env->ExceptionOccurred()) { | |
| 1343 if (PrintMiscellaneous && (Verbose || WizardMode)) { | |
| 1344 tty->print_cr("Warning: SDK 1.7 Unsafe.copyMemory not found."); | |
| 1345 } | |
| 1346 env->ExceptionClear(); | |
| 1347 env->RegisterNatives(unsafecls, memcopy_methods_15, sizeof(memcopy_methods_15)/sizeof(JNINativeMethod)); | |
| 1348 if (env->ExceptionOccurred()) { | |
| 1349 if (PrintMiscellaneous && (Verbose || WizardMode)) { | |
| 1350 tty->print_cr("Warning: SDK 1.5 Unsafe.copyMemory not found."); | |
| 1351 } | |
| 1352 env->ExceptionClear(); | |
| 1353 } | |
| 1354 } | |
| 1355 } | |
| 1356 int status = env->RegisterNatives(unsafecls, methods, sizeof(methods)/sizeof(JNINativeMethod)); | |
| 1357 if (env->ExceptionOccurred()) { | |
| 1358 if (PrintMiscellaneous && (Verbose || WizardMode)) { | |
| 1359 tty->print_cr("Warning: SDK 1.6 version of Unsafe not found."); | |
| 1360 } | |
| 1361 env->ExceptionClear(); | |
| 1362 // %%% For now, be backward compatible with an older class: | |
| 1363 status = env->RegisterNatives(unsafecls, methods_15, sizeof(methods_15)/sizeof(JNINativeMethod)); | |
| 1364 } | |
| 1365 if (env->ExceptionOccurred()) { | |
| 1366 if (PrintMiscellaneous && (Verbose || WizardMode)) { | |
| 1367 tty->print_cr("Warning: SDK 1.5 version of Unsafe not found."); | |
| 1368 } | |
| 1369 env->ExceptionClear(); | |
| 1370 // %%% For now, be backward compatible with an older class: | |
| 1371 status = env->RegisterNatives(unsafecls, methods_141, sizeof(methods_141)/sizeof(JNINativeMethod)); | |
| 1372 } | |
| 1373 if (env->ExceptionOccurred()) { | |
| 1374 if (PrintMiscellaneous && (Verbose || WizardMode)) { | |
| 1375 tty->print_cr("Warning: SDK 1.4.1 version of Unsafe not found."); | |
| 1376 } | |
| 1377 env->ExceptionClear(); | |
| 1378 // %%% For now, be backward compatible with an older class: | |
| 1379 status = env->RegisterNatives(unsafecls, methods_140, sizeof(methods_140)/sizeof(JNINativeMethod)); | |
| 1380 } | |
| 1381 guarantee(status == 0, "register unsafe natives"); | |
| 1382 } | |
| 1383 JVM_END |