Fri, 07 Jan 2011 10:16:57 -0800
7009756: volatile variables could be broken throw reflection API
Summary: Use Atomic::load() and Atomic::store() to access a volatile long.
Reviewed-by: iveresov, jrose, dholmes, never
duke@435 | 1 | /* |
kvn@2434 | 2 | * Copyright (c) 2000, 2011, Oracle and/or its affiliates. All rights reserved. |
duke@435 | 3 | * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER. |
duke@435 | 4 | * |
duke@435 | 5 | * This code is free software; you can redistribute it and/or modify it |
duke@435 | 6 | * under the terms of the GNU General Public License version 2 only, as |
duke@435 | 7 | * published by the Free Software Foundation. |
duke@435 | 8 | * |
duke@435 | 9 | * This code is distributed in the hope that it will be useful, but WITHOUT |
duke@435 | 10 | * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or |
duke@435 | 11 | * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License |
duke@435 | 12 | * version 2 for more details (a copy is included in the LICENSE file that |
duke@435 | 13 | * accompanied this code). |
duke@435 | 14 | * |
duke@435 | 15 | * You should have received a copy of the GNU General Public License version |
duke@435 | 16 | * 2 along with this work; if not, write to the Free Software Foundation, |
duke@435 | 17 | * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA. |
duke@435 | 18 | * |
trims@1907 | 19 | * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA |
trims@1907 | 20 | * or visit www.oracle.com if you need additional information or have any |
trims@1907 | 21 | * questions. |
duke@435 | 22 | * |
duke@435 | 23 | */ |
duke@435 | 24 | |
stefank@2314 | 25 | #include "precompiled.hpp" |
stefank@2314 | 26 | #include "classfile/vmSymbols.hpp" |
stefank@2314 | 27 | #include "memory/allocation.inline.hpp" |
stefank@2314 | 28 | #include "prims/jni.h" |
stefank@2314 | 29 | #include "prims/jvm.h" |
stefank@2314 | 30 | #include "runtime/globals.hpp" |
stefank@2314 | 31 | #include "runtime/interfaceSupport.hpp" |
stefank@2314 | 32 | #include "runtime/reflection.hpp" |
stefank@2314 | 33 | #include "runtime/reflectionCompat.hpp" |
stefank@2314 | 34 | #include "runtime/synchronizer.hpp" |
stefank@2314 | 35 | #include "services/threadService.hpp" |
stefank@2314 | 36 | #include "utilities/copy.hpp" |
stefank@2314 | 37 | #include "utilities/dtrace.hpp" |
stefank@2314 | 38 | |
duke@435 | 39 | /* |
duke@435 | 40 | * Implementation of class sun.misc.Unsafe |
duke@435 | 41 | */ |
duke@435 | 42 | |
fparain@1759 | 43 | HS_DTRACE_PROBE_DECL3(hotspot, thread__park__begin, uintptr_t, int, long long); |
fparain@1759 | 44 | HS_DTRACE_PROBE_DECL1(hotspot, thread__park__end, uintptr_t); |
fparain@1759 | 45 | HS_DTRACE_PROBE_DECL1(hotspot, thread__unpark, uintptr_t); |
fparain@1759 | 46 | |
duke@435 | 47 | #define MAX_OBJECT_SIZE \ |
duke@435 | 48 | ( arrayOopDesc::header_size(T_DOUBLE) * HeapWordSize \ |
duke@435 | 49 | + ((julong)max_jint * sizeof(double)) ) |
duke@435 | 50 | |
duke@435 | 51 | |
duke@435 | 52 | #define UNSAFE_ENTRY(result_type, header) \ |
duke@435 | 53 | JVM_ENTRY(result_type, header) |
duke@435 | 54 | |
duke@435 | 55 | // Can't use UNSAFE_LEAF because it has the signature of a straight |
duke@435 | 56 | // call into the runtime (just like JVM_LEAF, funny that) but it's |
duke@435 | 57 | // called like a Java Native and thus the wrapper built for it passes |
duke@435 | 58 | // arguments like a JNI call. It expects those arguments to be popped |
duke@435 | 59 | // from the stack on Intel like all good JNI args are, and adjusts the |
duke@435 | 60 | // stack according. Since the JVM_LEAF call expects no extra |
duke@435 | 61 | // arguments the stack isn't popped in the C code, is pushed by the |
duke@435 | 62 | // wrapper and we get sick. |
duke@435 | 63 | //#define UNSAFE_LEAF(result_type, header) \ |
duke@435 | 64 | // JVM_LEAF(result_type, header) |
duke@435 | 65 | |
duke@435 | 66 | #define UNSAFE_END JVM_END |
duke@435 | 67 | |
duke@435 | 68 | #define UnsafeWrapper(arg) /*nothing, for the present*/ |
duke@435 | 69 | |
duke@435 | 70 | |
duke@435 | 71 | inline void* addr_from_java(jlong addr) { |
duke@435 | 72 | // This assert fails in a variety of ways on 32-bit systems. |
duke@435 | 73 | // It is impossible to predict whether native code that converts |
duke@435 | 74 | // pointers to longs will sign-extend or zero-extend the addresses. |
duke@435 | 75 | //assert(addr == (uintptr_t)addr, "must not be odd high bits"); |
duke@435 | 76 | return (void*)(uintptr_t)addr; |
duke@435 | 77 | } |
duke@435 | 78 | |
duke@435 | 79 | inline jlong addr_to_java(void* p) { |
duke@435 | 80 | assert(p == (void*)(uintptr_t)p, "must not be odd high bits"); |
duke@435 | 81 | return (uintptr_t)p; |
duke@435 | 82 | } |
duke@435 | 83 | |
duke@435 | 84 | |
duke@435 | 85 | // Note: The VM's obj_field and related accessors use byte-scaled |
duke@435 | 86 | // ("unscaled") offsets, just as the unsafe methods do. |
duke@435 | 87 | |
duke@435 | 88 | // However, the method Unsafe.fieldOffset explicitly declines to |
duke@435 | 89 | // guarantee this. The field offset values manipulated by the Java user |
duke@435 | 90 | // through the Unsafe API are opaque cookies that just happen to be byte |
duke@435 | 91 | // offsets. We represent this state of affairs by passing the cookies |
duke@435 | 92 | // through conversion functions when going between the VM and the Unsafe API. |
duke@435 | 93 | // The conversion functions just happen to be no-ops at present. |
duke@435 | 94 | |
duke@435 | 95 | inline jlong field_offset_to_byte_offset(jlong field_offset) { |
duke@435 | 96 | return field_offset; |
duke@435 | 97 | } |
duke@435 | 98 | |
duke@435 | 99 | inline jlong field_offset_from_byte_offset(jlong byte_offset) { |
duke@435 | 100 | return byte_offset; |
duke@435 | 101 | } |
duke@435 | 102 | |
duke@435 | 103 | inline jint invocation_key_from_method_slot(jint slot) { |
duke@435 | 104 | return slot; |
duke@435 | 105 | } |
duke@435 | 106 | |
duke@435 | 107 | inline jint invocation_key_to_method_slot(jint key) { |
duke@435 | 108 | return key; |
duke@435 | 109 | } |
duke@435 | 110 | |
duke@435 | 111 | inline void* index_oop_from_field_offset_long(oop p, jlong field_offset) { |
duke@435 | 112 | jlong byte_offset = field_offset_to_byte_offset(field_offset); |
duke@435 | 113 | #ifdef ASSERT |
duke@435 | 114 | if (p != NULL) { |
duke@435 | 115 | assert(byte_offset >= 0 && byte_offset <= (jlong)MAX_OBJECT_SIZE, "sane offset"); |
duke@435 | 116 | if (byte_offset == (jint)byte_offset) { |
duke@435 | 117 | void* ptr_plus_disp = (address)p + byte_offset; |
coleenp@548 | 118 | assert((void*)p->obj_field_addr<oop>((jint)byte_offset) == ptr_plus_disp, |
duke@435 | 119 | "raw [ptr+disp] must be consistent with oop::field_base"); |
duke@435 | 120 | } |
duke@435 | 121 | } |
duke@435 | 122 | #endif |
duke@435 | 123 | if (sizeof(char*) == sizeof(jint)) // (this constant folds!) |
duke@435 | 124 | return (address)p + (jint) byte_offset; |
duke@435 | 125 | else |
duke@435 | 126 | return (address)p + byte_offset; |
duke@435 | 127 | } |
duke@435 | 128 | |
duke@435 | 129 | // Externally callable versions: |
duke@435 | 130 | // (Use these in compiler intrinsics which emulate unsafe primitives.) |
duke@435 | 131 | jlong Unsafe_field_offset_to_byte_offset(jlong field_offset) { |
duke@435 | 132 | return field_offset; |
duke@435 | 133 | } |
duke@435 | 134 | jlong Unsafe_field_offset_from_byte_offset(jlong byte_offset) { |
duke@435 | 135 | return byte_offset; |
duke@435 | 136 | } |
duke@435 | 137 | jint Unsafe_invocation_key_from_method_slot(jint slot) { |
duke@435 | 138 | return invocation_key_from_method_slot(slot); |
duke@435 | 139 | } |
duke@435 | 140 | jint Unsafe_invocation_key_to_method_slot(jint key) { |
duke@435 | 141 | return invocation_key_to_method_slot(key); |
duke@435 | 142 | } |
duke@435 | 143 | |
duke@435 | 144 | |
duke@435 | 145 | ///// Data in the Java heap. |
duke@435 | 146 | |
duke@435 | 147 | #define GET_FIELD(obj, offset, type_name, v) \ |
duke@435 | 148 | oop p = JNIHandles::resolve(obj); \ |
duke@435 | 149 | type_name v = *(type_name*)index_oop_from_field_offset_long(p, offset) |
duke@435 | 150 | |
duke@435 | 151 | #define SET_FIELD(obj, offset, type_name, x) \ |
duke@435 | 152 | oop p = JNIHandles::resolve(obj); \ |
duke@435 | 153 | *(type_name*)index_oop_from_field_offset_long(p, offset) = x |
duke@435 | 154 | |
duke@435 | 155 | #define GET_FIELD_VOLATILE(obj, offset, type_name, v) \ |
duke@435 | 156 | oop p = JNIHandles::resolve(obj); \ |
kvn@2434 | 157 | volatile type_name v = OrderAccess::load_acquire((volatile type_name*)index_oop_from_field_offset_long(p, offset)); |
duke@435 | 158 | |
duke@435 | 159 | #define SET_FIELD_VOLATILE(obj, offset, type_name, x) \ |
duke@435 | 160 | oop p = JNIHandles::resolve(obj); \ |
kvn@2434 | 161 | OrderAccess::release_store_fence((volatile type_name*)index_oop_from_field_offset_long(p, offset), x); |
duke@435 | 162 | |
coleenp@548 | 163 | // Macros for oops that check UseCompressedOops |
coleenp@548 | 164 | |
coleenp@548 | 165 | #define GET_OOP_FIELD(obj, offset, v) \ |
coleenp@548 | 166 | oop p = JNIHandles::resolve(obj); \ |
coleenp@548 | 167 | oop v; \ |
coleenp@548 | 168 | if (UseCompressedOops) { \ |
coleenp@548 | 169 | narrowOop n = *(narrowOop*)index_oop_from_field_offset_long(p, offset); \ |
coleenp@548 | 170 | v = oopDesc::decode_heap_oop(n); \ |
coleenp@548 | 171 | } else { \ |
coleenp@548 | 172 | v = *(oop*)index_oop_from_field_offset_long(p, offset); \ |
coleenp@548 | 173 | } |
coleenp@548 | 174 | |
coleenp@548 | 175 | #define GET_OOP_FIELD_VOLATILE(obj, offset, v) \ |
coleenp@548 | 176 | oop p = JNIHandles::resolve(obj); \ |
coleenp@548 | 177 | volatile oop v; \ |
coleenp@548 | 178 | if (UseCompressedOops) { \ |
coleenp@548 | 179 | volatile narrowOop n = *(volatile narrowOop*)index_oop_from_field_offset_long(p, offset); \ |
coleenp@548 | 180 | v = oopDesc::decode_heap_oop(n); \ |
coleenp@548 | 181 | } else { \ |
coleenp@548 | 182 | v = *(volatile oop*)index_oop_from_field_offset_long(p, offset); \ |
kvn@2434 | 183 | } \ |
kvn@2434 | 184 | OrderAccess::acquire(); |
coleenp@548 | 185 | |
coleenp@548 | 186 | |
duke@435 | 187 | // Get/SetObject must be special-cased, since it works with handles. |
duke@435 | 188 | |
duke@435 | 189 | // The xxx140 variants for backward compatibility do not allow a full-width offset. |
duke@435 | 190 | UNSAFE_ENTRY(jobject, Unsafe_GetObject140(JNIEnv *env, jobject unsafe, jobject obj, jint offset)) |
duke@435 | 191 | UnsafeWrapper("Unsafe_GetObject"); |
duke@435 | 192 | if (obj == NULL) THROW_0(vmSymbols::java_lang_NullPointerException()); |
coleenp@548 | 193 | GET_OOP_FIELD(obj, offset, v) |
duke@435 | 194 | return JNIHandles::make_local(env, v); |
duke@435 | 195 | UNSAFE_END |
duke@435 | 196 | |
duke@435 | 197 | UNSAFE_ENTRY(void, Unsafe_SetObject140(JNIEnv *env, jobject unsafe, jobject obj, jint offset, jobject x_h)) |
duke@435 | 198 | UnsafeWrapper("Unsafe_SetObject"); |
duke@435 | 199 | if (obj == NULL) THROW(vmSymbols::java_lang_NullPointerException()); |
duke@435 | 200 | oop x = JNIHandles::resolve(x_h); |
duke@435 | 201 | //SET_FIELD(obj, offset, oop, x); |
duke@435 | 202 | oop p = JNIHandles::resolve(obj); |
coleenp@548 | 203 | if (UseCompressedOops) { |
coleenp@548 | 204 | if (x != NULL) { |
coleenp@548 | 205 | // If there is a heap base pointer, we are obliged to emit a store barrier. |
coleenp@548 | 206 | oop_store((narrowOop*)index_oop_from_field_offset_long(p, offset), x); |
coleenp@548 | 207 | } else { |
coleenp@548 | 208 | narrowOop n = oopDesc::encode_heap_oop_not_null(x); |
coleenp@548 | 209 | *(narrowOop*)index_oop_from_field_offset_long(p, offset) = n; |
coleenp@548 | 210 | } |
duke@435 | 211 | } else { |
coleenp@548 | 212 | if (x != NULL) { |
coleenp@548 | 213 | // If there is a heap base pointer, we are obliged to emit a store barrier. |
coleenp@548 | 214 | oop_store((oop*)index_oop_from_field_offset_long(p, offset), x); |
coleenp@548 | 215 | } else { |
coleenp@548 | 216 | *(oop*)index_oop_from_field_offset_long(p, offset) = x; |
coleenp@548 | 217 | } |
duke@435 | 218 | } |
duke@435 | 219 | UNSAFE_END |
duke@435 | 220 | |
duke@435 | 221 | // The normal variants allow a null base pointer with an arbitrary address. |
duke@435 | 222 | // But if the base pointer is non-null, the offset should make some sense. |
duke@435 | 223 | // That is, it should be in the range [0, MAX_OBJECT_SIZE]. |
duke@435 | 224 | UNSAFE_ENTRY(jobject, Unsafe_GetObject(JNIEnv *env, jobject unsafe, jobject obj, jlong offset)) |
duke@435 | 225 | UnsafeWrapper("Unsafe_GetObject"); |
coleenp@548 | 226 | GET_OOP_FIELD(obj, offset, v) |
duke@435 | 227 | return JNIHandles::make_local(env, v); |
duke@435 | 228 | UNSAFE_END |
duke@435 | 229 | |
duke@435 | 230 | UNSAFE_ENTRY(void, Unsafe_SetObject(JNIEnv *env, jobject unsafe, jobject obj, jlong offset, jobject x_h)) |
duke@435 | 231 | UnsafeWrapper("Unsafe_SetObject"); |
duke@435 | 232 | oop x = JNIHandles::resolve(x_h); |
duke@435 | 233 | oop p = JNIHandles::resolve(obj); |
coleenp@548 | 234 | if (UseCompressedOops) { |
coleenp@548 | 235 | oop_store((narrowOop*)index_oop_from_field_offset_long(p, offset), x); |
coleenp@548 | 236 | } else { |
coleenp@548 | 237 | oop_store((oop*)index_oop_from_field_offset_long(p, offset), x); |
coleenp@548 | 238 | } |
duke@435 | 239 | UNSAFE_END |
duke@435 | 240 | |
duke@435 | 241 | UNSAFE_ENTRY(jobject, Unsafe_GetObjectVolatile(JNIEnv *env, jobject unsafe, jobject obj, jlong offset)) |
duke@435 | 242 | UnsafeWrapper("Unsafe_GetObjectVolatile"); |
coleenp@548 | 243 | GET_OOP_FIELD_VOLATILE(obj, offset, v) |
duke@435 | 244 | return JNIHandles::make_local(env, v); |
duke@435 | 245 | UNSAFE_END |
duke@435 | 246 | |
duke@435 | 247 | UNSAFE_ENTRY(void, Unsafe_SetObjectVolatile(JNIEnv *env, jobject unsafe, jobject obj, jlong offset, jobject x_h)) |
duke@435 | 248 | UnsafeWrapper("Unsafe_SetObjectVolatile"); |
duke@435 | 249 | oop x = JNIHandles::resolve(x_h); |
duke@435 | 250 | oop p = JNIHandles::resolve(obj); |
kvn@2434 | 251 | void* addr = index_oop_from_field_offset_long(p, offset); |
kvn@2434 | 252 | OrderAccess::release(); |
coleenp@548 | 253 | if (UseCompressedOops) { |
kvn@2434 | 254 | oop_store((narrowOop*)addr, x); |
coleenp@548 | 255 | } else { |
kvn@2434 | 256 | oop_store((oop*)addr, x); |
coleenp@548 | 257 | } |
duke@435 | 258 | OrderAccess::fence(); |
duke@435 | 259 | UNSAFE_END |
duke@435 | 260 | |
kvn@2434 | 261 | #if defined(SPARC) || defined(X86) |
kvn@2434 | 262 | // Sparc and X86 have atomic jlong (8 bytes) instructions |
kvn@2434 | 263 | |
kvn@2434 | 264 | #else |
kvn@2434 | 265 | // Keep old code for platforms which may not have atomic jlong (8 bytes) instructions |
kvn@2434 | 266 | |
duke@435 | 267 | // Volatile long versions must use locks if !VM_Version::supports_cx8(). |
duke@435 | 268 | // support_cx8 is a surrogate for 'supports atomic long memory ops'. |
duke@435 | 269 | |
duke@435 | 270 | UNSAFE_ENTRY(jlong, Unsafe_GetLongVolatile(JNIEnv *env, jobject unsafe, jobject obj, jlong offset)) |
duke@435 | 271 | UnsafeWrapper("Unsafe_GetLongVolatile"); |
duke@435 | 272 | { |
duke@435 | 273 | if (VM_Version::supports_cx8()) { |
duke@435 | 274 | GET_FIELD_VOLATILE(obj, offset, jlong, v); |
duke@435 | 275 | return v; |
duke@435 | 276 | } |
duke@435 | 277 | else { |
duke@435 | 278 | Handle p (THREAD, JNIHandles::resolve(obj)); |
duke@435 | 279 | jlong* addr = (jlong*)(index_oop_from_field_offset_long(p(), offset)); |
duke@435 | 280 | ObjectLocker ol(p, THREAD); |
duke@435 | 281 | jlong value = *addr; |
duke@435 | 282 | return value; |
duke@435 | 283 | } |
duke@435 | 284 | } |
duke@435 | 285 | UNSAFE_END |
duke@435 | 286 | |
duke@435 | 287 | UNSAFE_ENTRY(void, Unsafe_SetLongVolatile(JNIEnv *env, jobject unsafe, jobject obj, jlong offset, jlong x)) |
duke@435 | 288 | UnsafeWrapper("Unsafe_SetLongVolatile"); |
duke@435 | 289 | { |
duke@435 | 290 | if (VM_Version::supports_cx8()) { |
duke@435 | 291 | SET_FIELD_VOLATILE(obj, offset, jlong, x); |
duke@435 | 292 | } |
duke@435 | 293 | else { |
duke@435 | 294 | Handle p (THREAD, JNIHandles::resolve(obj)); |
duke@435 | 295 | jlong* addr = (jlong*)(index_oop_from_field_offset_long(p(), offset)); |
duke@435 | 296 | ObjectLocker ol(p, THREAD); |
duke@435 | 297 | *addr = x; |
duke@435 | 298 | } |
duke@435 | 299 | } |
duke@435 | 300 | UNSAFE_END |
duke@435 | 301 | |
kvn@2434 | 302 | #endif // not SPARC and not X86 |
duke@435 | 303 | |
duke@435 | 304 | #define DEFINE_GETSETOOP(jboolean, Boolean) \ |
duke@435 | 305 | \ |
duke@435 | 306 | UNSAFE_ENTRY(jboolean, Unsafe_Get##Boolean##140(JNIEnv *env, jobject unsafe, jobject obj, jint offset)) \ |
duke@435 | 307 | UnsafeWrapper("Unsafe_Get"#Boolean); \ |
duke@435 | 308 | if (obj == NULL) THROW_0(vmSymbols::java_lang_NullPointerException()); \ |
duke@435 | 309 | GET_FIELD(obj, offset, jboolean, v); \ |
duke@435 | 310 | return v; \ |
duke@435 | 311 | UNSAFE_END \ |
duke@435 | 312 | \ |
duke@435 | 313 | UNSAFE_ENTRY(void, Unsafe_Set##Boolean##140(JNIEnv *env, jobject unsafe, jobject obj, jint offset, jboolean x)) \ |
duke@435 | 314 | UnsafeWrapper("Unsafe_Set"#Boolean); \ |
duke@435 | 315 | if (obj == NULL) THROW(vmSymbols::java_lang_NullPointerException()); \ |
duke@435 | 316 | SET_FIELD(obj, offset, jboolean, x); \ |
duke@435 | 317 | UNSAFE_END \ |
duke@435 | 318 | \ |
duke@435 | 319 | UNSAFE_ENTRY(jboolean, Unsafe_Get##Boolean(JNIEnv *env, jobject unsafe, jobject obj, jlong offset)) \ |
duke@435 | 320 | UnsafeWrapper("Unsafe_Get"#Boolean); \ |
duke@435 | 321 | GET_FIELD(obj, offset, jboolean, v); \ |
duke@435 | 322 | return v; \ |
duke@435 | 323 | UNSAFE_END \ |
duke@435 | 324 | \ |
duke@435 | 325 | UNSAFE_ENTRY(void, Unsafe_Set##Boolean(JNIEnv *env, jobject unsafe, jobject obj, jlong offset, jboolean x)) \ |
duke@435 | 326 | UnsafeWrapper("Unsafe_Set"#Boolean); \ |
duke@435 | 327 | SET_FIELD(obj, offset, jboolean, x); \ |
duke@435 | 328 | UNSAFE_END \ |
duke@435 | 329 | \ |
duke@435 | 330 | // END DEFINE_GETSETOOP. |
duke@435 | 331 | |
kvn@2434 | 332 | DEFINE_GETSETOOP(jboolean, Boolean) |
kvn@2434 | 333 | DEFINE_GETSETOOP(jbyte, Byte) |
kvn@2434 | 334 | DEFINE_GETSETOOP(jshort, Short); |
kvn@2434 | 335 | DEFINE_GETSETOOP(jchar, Char); |
kvn@2434 | 336 | DEFINE_GETSETOOP(jint, Int); |
kvn@2434 | 337 | DEFINE_GETSETOOP(jlong, Long); |
kvn@2434 | 338 | DEFINE_GETSETOOP(jfloat, Float); |
kvn@2434 | 339 | DEFINE_GETSETOOP(jdouble, Double); |
kvn@2434 | 340 | |
kvn@2434 | 341 | #undef DEFINE_GETSETOOP |
duke@435 | 342 | |
duke@435 | 343 | #define DEFINE_GETSETOOP_VOLATILE(jboolean, Boolean) \ |
duke@435 | 344 | \ |
duke@435 | 345 | UNSAFE_ENTRY(jboolean, Unsafe_Get##Boolean##Volatile(JNIEnv *env, jobject unsafe, jobject obj, jlong offset)) \ |
duke@435 | 346 | UnsafeWrapper("Unsafe_Get"#Boolean); \ |
duke@435 | 347 | GET_FIELD_VOLATILE(obj, offset, jboolean, v); \ |
duke@435 | 348 | return v; \ |
duke@435 | 349 | UNSAFE_END \ |
duke@435 | 350 | \ |
duke@435 | 351 | UNSAFE_ENTRY(void, Unsafe_Set##Boolean##Volatile(JNIEnv *env, jobject unsafe, jobject obj, jlong offset, jboolean x)) \ |
duke@435 | 352 | UnsafeWrapper("Unsafe_Set"#Boolean); \ |
duke@435 | 353 | SET_FIELD_VOLATILE(obj, offset, jboolean, x); \ |
duke@435 | 354 | UNSAFE_END \ |
duke@435 | 355 | \ |
duke@435 | 356 | // END DEFINE_GETSETOOP_VOLATILE. |
duke@435 | 357 | |
duke@435 | 358 | DEFINE_GETSETOOP_VOLATILE(jboolean, Boolean) |
duke@435 | 359 | DEFINE_GETSETOOP_VOLATILE(jbyte, Byte) |
duke@435 | 360 | DEFINE_GETSETOOP_VOLATILE(jshort, Short); |
duke@435 | 361 | DEFINE_GETSETOOP_VOLATILE(jchar, Char); |
duke@435 | 362 | DEFINE_GETSETOOP_VOLATILE(jint, Int); |
duke@435 | 363 | DEFINE_GETSETOOP_VOLATILE(jfloat, Float); |
duke@435 | 364 | DEFINE_GETSETOOP_VOLATILE(jdouble, Double); |
duke@435 | 365 | |
kvn@2434 | 366 | #if defined(SPARC) || defined(X86) |
kvn@2434 | 367 | // Sparc and X86 have atomic jlong (8 bytes) instructions |
kvn@2434 | 368 | DEFINE_GETSETOOP_VOLATILE(jlong, Long); |
kvn@2434 | 369 | #endif |
kvn@2434 | 370 | |
kvn@2434 | 371 | #undef DEFINE_GETSETOOP_VOLATILE |
duke@435 | 372 | |
duke@435 | 373 | // The non-intrinsified versions of setOrdered just use setVolatile |
duke@435 | 374 | |
kvn@2434 | 375 | UNSAFE_ENTRY(void, Unsafe_SetOrderedInt(JNIEnv *env, jobject unsafe, jobject obj, jlong offset, jint x)) |
kvn@2434 | 376 | UnsafeWrapper("Unsafe_SetOrderedInt"); |
kvn@2434 | 377 | SET_FIELD_VOLATILE(obj, offset, jint, x); |
duke@435 | 378 | UNSAFE_END |
duke@435 | 379 | |
duke@435 | 380 | UNSAFE_ENTRY(void, Unsafe_SetOrderedObject(JNIEnv *env, jobject unsafe, jobject obj, jlong offset, jobject x_h)) |
duke@435 | 381 | UnsafeWrapper("Unsafe_SetOrderedObject"); |
duke@435 | 382 | oop x = JNIHandles::resolve(x_h); |
duke@435 | 383 | oop p = JNIHandles::resolve(obj); |
kvn@2434 | 384 | void* addr = index_oop_from_field_offset_long(p, offset); |
kvn@2434 | 385 | OrderAccess::release(); |
coleenp@548 | 386 | if (UseCompressedOops) { |
kvn@2434 | 387 | oop_store((narrowOop*)addr, x); |
coleenp@548 | 388 | } else { |
kvn@2434 | 389 | oop_store((oop*)addr, x); |
coleenp@548 | 390 | } |
duke@435 | 391 | OrderAccess::fence(); |
duke@435 | 392 | UNSAFE_END |
duke@435 | 393 | |
duke@435 | 394 | UNSAFE_ENTRY(void, Unsafe_SetOrderedLong(JNIEnv *env, jobject unsafe, jobject obj, jlong offset, jlong x)) |
duke@435 | 395 | UnsafeWrapper("Unsafe_SetOrderedLong"); |
kvn@2434 | 396 | #if defined(SPARC) || defined(X86) |
kvn@2434 | 397 | // Sparc and X86 have atomic jlong (8 bytes) instructions |
kvn@2434 | 398 | SET_FIELD_VOLATILE(obj, offset, jlong, x); |
kvn@2434 | 399 | #else |
kvn@2434 | 400 | // Keep old code for platforms which may not have atomic long (8 bytes) instructions |
duke@435 | 401 | { |
duke@435 | 402 | if (VM_Version::supports_cx8()) { |
duke@435 | 403 | SET_FIELD_VOLATILE(obj, offset, jlong, x); |
duke@435 | 404 | } |
duke@435 | 405 | else { |
duke@435 | 406 | Handle p (THREAD, JNIHandles::resolve(obj)); |
duke@435 | 407 | jlong* addr = (jlong*)(index_oop_from_field_offset_long(p(), offset)); |
duke@435 | 408 | ObjectLocker ol(p, THREAD); |
duke@435 | 409 | *addr = x; |
duke@435 | 410 | } |
duke@435 | 411 | } |
kvn@2434 | 412 | #endif |
duke@435 | 413 | UNSAFE_END |
duke@435 | 414 | |
duke@435 | 415 | ////// Data in the C heap. |
duke@435 | 416 | |
duke@435 | 417 | // Note: These do not throw NullPointerException for bad pointers. |
duke@435 | 418 | // They just crash. Only a oop base pointer can generate a NullPointerException. |
duke@435 | 419 | // |
duke@435 | 420 | #define DEFINE_GETSETNATIVE(java_type, Type, native_type) \ |
duke@435 | 421 | \ |
duke@435 | 422 | UNSAFE_ENTRY(java_type, Unsafe_GetNative##Type(JNIEnv *env, jobject unsafe, jlong addr)) \ |
duke@435 | 423 | UnsafeWrapper("Unsafe_GetNative"#Type); \ |
duke@435 | 424 | void* p = addr_from_java(addr); \ |
duke@435 | 425 | JavaThread* t = JavaThread::current(); \ |
duke@435 | 426 | t->set_doing_unsafe_access(true); \ |
duke@435 | 427 | java_type x = *(volatile native_type*)p; \ |
duke@435 | 428 | t->set_doing_unsafe_access(false); \ |
duke@435 | 429 | return x; \ |
duke@435 | 430 | UNSAFE_END \ |
duke@435 | 431 | \ |
duke@435 | 432 | UNSAFE_ENTRY(void, Unsafe_SetNative##Type(JNIEnv *env, jobject unsafe, jlong addr, java_type x)) \ |
duke@435 | 433 | UnsafeWrapper("Unsafe_SetNative"#Type); \ |
duke@435 | 434 | JavaThread* t = JavaThread::current(); \ |
duke@435 | 435 | t->set_doing_unsafe_access(true); \ |
duke@435 | 436 | void* p = addr_from_java(addr); \ |
duke@435 | 437 | *(volatile native_type*)p = x; \ |
duke@435 | 438 | t->set_doing_unsafe_access(false); \ |
duke@435 | 439 | UNSAFE_END \ |
duke@435 | 440 | \ |
duke@435 | 441 | // END DEFINE_GETSETNATIVE. |
duke@435 | 442 | |
duke@435 | 443 | DEFINE_GETSETNATIVE(jbyte, Byte, signed char) |
duke@435 | 444 | DEFINE_GETSETNATIVE(jshort, Short, signed short); |
duke@435 | 445 | DEFINE_GETSETNATIVE(jchar, Char, unsigned short); |
duke@435 | 446 | DEFINE_GETSETNATIVE(jint, Int, jint); |
duke@435 | 447 | // no long -- handled specially |
duke@435 | 448 | DEFINE_GETSETNATIVE(jfloat, Float, float); |
duke@435 | 449 | DEFINE_GETSETNATIVE(jdouble, Double, double); |
duke@435 | 450 | |
duke@435 | 451 | #undef DEFINE_GETSETNATIVE |
duke@435 | 452 | |
duke@435 | 453 | UNSAFE_ENTRY(jlong, Unsafe_GetNativeLong(JNIEnv *env, jobject unsafe, jlong addr)) |
duke@435 | 454 | UnsafeWrapper("Unsafe_GetNativeLong"); |
duke@435 | 455 | JavaThread* t = JavaThread::current(); |
duke@435 | 456 | // We do it this way to avoid problems with access to heap using 64 |
duke@435 | 457 | // bit loads, as jlong in heap could be not 64-bit aligned, and on |
duke@435 | 458 | // some CPUs (SPARC) it leads to SIGBUS. |
duke@435 | 459 | t->set_doing_unsafe_access(true); |
duke@435 | 460 | void* p = addr_from_java(addr); |
duke@435 | 461 | jlong x; |
duke@435 | 462 | if (((intptr_t)p & 7) == 0) { |
duke@435 | 463 | // jlong is aligned, do a volatile access |
duke@435 | 464 | x = *(volatile jlong*)p; |
duke@435 | 465 | } else { |
duke@435 | 466 | jlong_accessor acc; |
duke@435 | 467 | acc.words[0] = ((volatile jint*)p)[0]; |
duke@435 | 468 | acc.words[1] = ((volatile jint*)p)[1]; |
duke@435 | 469 | x = acc.long_value; |
duke@435 | 470 | } |
duke@435 | 471 | t->set_doing_unsafe_access(false); |
duke@435 | 472 | return x; |
duke@435 | 473 | UNSAFE_END |
duke@435 | 474 | |
duke@435 | 475 | UNSAFE_ENTRY(void, Unsafe_SetNativeLong(JNIEnv *env, jobject unsafe, jlong addr, jlong x)) |
duke@435 | 476 | UnsafeWrapper("Unsafe_SetNativeLong"); |
duke@435 | 477 | JavaThread* t = JavaThread::current(); |
duke@435 | 478 | // see comment for Unsafe_GetNativeLong |
duke@435 | 479 | t->set_doing_unsafe_access(true); |
duke@435 | 480 | void* p = addr_from_java(addr); |
duke@435 | 481 | if (((intptr_t)p & 7) == 0) { |
duke@435 | 482 | // jlong is aligned, do a volatile access |
duke@435 | 483 | *(volatile jlong*)p = x; |
duke@435 | 484 | } else { |
duke@435 | 485 | jlong_accessor acc; |
duke@435 | 486 | acc.long_value = x; |
duke@435 | 487 | ((volatile jint*)p)[0] = acc.words[0]; |
duke@435 | 488 | ((volatile jint*)p)[1] = acc.words[1]; |
duke@435 | 489 | } |
duke@435 | 490 | t->set_doing_unsafe_access(false); |
duke@435 | 491 | UNSAFE_END |
duke@435 | 492 | |
duke@435 | 493 | |
duke@435 | 494 | UNSAFE_ENTRY(jlong, Unsafe_GetNativeAddress(JNIEnv *env, jobject unsafe, jlong addr)) |
duke@435 | 495 | UnsafeWrapper("Unsafe_GetNativeAddress"); |
duke@435 | 496 | void* p = addr_from_java(addr); |
duke@435 | 497 | return addr_to_java(*(void**)p); |
duke@435 | 498 | UNSAFE_END |
duke@435 | 499 | |
duke@435 | 500 | UNSAFE_ENTRY(void, Unsafe_SetNativeAddress(JNIEnv *env, jobject unsafe, jlong addr, jlong x)) |
duke@435 | 501 | UnsafeWrapper("Unsafe_SetNativeAddress"); |
duke@435 | 502 | void* p = addr_from_java(addr); |
duke@435 | 503 | *(void**)p = addr_from_java(x); |
duke@435 | 504 | UNSAFE_END |
duke@435 | 505 | |
duke@435 | 506 | |
duke@435 | 507 | ////// Allocation requests |
duke@435 | 508 | |
duke@435 | 509 | UNSAFE_ENTRY(jobject, Unsafe_AllocateInstance(JNIEnv *env, jobject unsafe, jclass cls)) |
duke@435 | 510 | UnsafeWrapper("Unsafe_AllocateInstance"); |
duke@435 | 511 | { |
duke@435 | 512 | ThreadToNativeFromVM ttnfv(thread); |
duke@435 | 513 | return env->AllocObject(cls); |
duke@435 | 514 | } |
duke@435 | 515 | UNSAFE_END |
duke@435 | 516 | |
duke@435 | 517 | UNSAFE_ENTRY(jlong, Unsafe_AllocateMemory(JNIEnv *env, jobject unsafe, jlong size)) |
duke@435 | 518 | UnsafeWrapper("Unsafe_AllocateMemory"); |
duke@435 | 519 | size_t sz = (size_t)size; |
duke@435 | 520 | if (sz != (julong)size || size < 0) { |
duke@435 | 521 | THROW_0(vmSymbols::java_lang_IllegalArgumentException()); |
duke@435 | 522 | } |
duke@435 | 523 | if (sz == 0) { |
duke@435 | 524 | return 0; |
duke@435 | 525 | } |
duke@435 | 526 | sz = round_to(sz, HeapWordSize); |
duke@435 | 527 | void* x = os::malloc(sz); |
duke@435 | 528 | if (x == NULL) { |
duke@435 | 529 | THROW_0(vmSymbols::java_lang_OutOfMemoryError()); |
duke@435 | 530 | } |
duke@435 | 531 | //Copy::fill_to_words((HeapWord*)x, sz / HeapWordSize); |
duke@435 | 532 | return addr_to_java(x); |
duke@435 | 533 | UNSAFE_END |
duke@435 | 534 | |
duke@435 | 535 | UNSAFE_ENTRY(jlong, Unsafe_ReallocateMemory(JNIEnv *env, jobject unsafe, jlong addr, jlong size)) |
duke@435 | 536 | UnsafeWrapper("Unsafe_ReallocateMemory"); |
duke@435 | 537 | void* p = addr_from_java(addr); |
duke@435 | 538 | size_t sz = (size_t)size; |
duke@435 | 539 | if (sz != (julong)size || size < 0) { |
duke@435 | 540 | THROW_0(vmSymbols::java_lang_IllegalArgumentException()); |
duke@435 | 541 | } |
duke@435 | 542 | if (sz == 0) { |
duke@435 | 543 | os::free(p); |
duke@435 | 544 | return 0; |
duke@435 | 545 | } |
duke@435 | 546 | sz = round_to(sz, HeapWordSize); |
duke@435 | 547 | void* x = (p == NULL) ? os::malloc(sz) : os::realloc(p, sz); |
duke@435 | 548 | if (x == NULL) { |
duke@435 | 549 | THROW_0(vmSymbols::java_lang_OutOfMemoryError()); |
duke@435 | 550 | } |
duke@435 | 551 | return addr_to_java(x); |
duke@435 | 552 | UNSAFE_END |
duke@435 | 553 | |
duke@435 | 554 | UNSAFE_ENTRY(void, Unsafe_FreeMemory(JNIEnv *env, jobject unsafe, jlong addr)) |
duke@435 | 555 | UnsafeWrapper("Unsafe_FreeMemory"); |
duke@435 | 556 | void* p = addr_from_java(addr); |
duke@435 | 557 | if (p == NULL) { |
duke@435 | 558 | return; |
duke@435 | 559 | } |
duke@435 | 560 | os::free(p); |
duke@435 | 561 | UNSAFE_END |
duke@435 | 562 | |
duke@435 | 563 | UNSAFE_ENTRY(void, Unsafe_SetMemory(JNIEnv *env, jobject unsafe, jlong addr, jlong size, jbyte value)) |
duke@435 | 564 | UnsafeWrapper("Unsafe_SetMemory"); |
duke@435 | 565 | size_t sz = (size_t)size; |
duke@435 | 566 | if (sz != (julong)size || size < 0) { |
duke@435 | 567 | THROW(vmSymbols::java_lang_IllegalArgumentException()); |
duke@435 | 568 | } |
duke@435 | 569 | char* p = (char*) addr_from_java(addr); |
duke@435 | 570 | Copy::fill_to_memory_atomic(p, sz, value); |
duke@435 | 571 | UNSAFE_END |
duke@435 | 572 | |
duke@435 | 573 | UNSAFE_ENTRY(void, Unsafe_SetMemory2(JNIEnv *env, jobject unsafe, jobject obj, jlong offset, jlong size, jbyte value)) |
duke@435 | 574 | UnsafeWrapper("Unsafe_SetMemory"); |
duke@435 | 575 | size_t sz = (size_t)size; |
duke@435 | 576 | if (sz != (julong)size || size < 0) { |
duke@435 | 577 | THROW(vmSymbols::java_lang_IllegalArgumentException()); |
duke@435 | 578 | } |
duke@435 | 579 | oop base = JNIHandles::resolve(obj); |
duke@435 | 580 | void* p = index_oop_from_field_offset_long(base, offset); |
duke@435 | 581 | Copy::fill_to_memory_atomic(p, sz, value); |
duke@435 | 582 | UNSAFE_END |
duke@435 | 583 | |
duke@435 | 584 | UNSAFE_ENTRY(void, Unsafe_CopyMemory(JNIEnv *env, jobject unsafe, jlong srcAddr, jlong dstAddr, jlong size)) |
duke@435 | 585 | UnsafeWrapper("Unsafe_CopyMemory"); |
duke@435 | 586 | if (size == 0) { |
duke@435 | 587 | return; |
duke@435 | 588 | } |
duke@435 | 589 | size_t sz = (size_t)size; |
duke@435 | 590 | if (sz != (julong)size || size < 0) { |
duke@435 | 591 | THROW(vmSymbols::java_lang_IllegalArgumentException()); |
duke@435 | 592 | } |
duke@435 | 593 | void* src = addr_from_java(srcAddr); |
duke@435 | 594 | void* dst = addr_from_java(dstAddr); |
duke@435 | 595 | Copy::conjoint_memory_atomic(src, dst, sz); |
duke@435 | 596 | UNSAFE_END |
duke@435 | 597 | |
duke@435 | 598 | UNSAFE_ENTRY(void, Unsafe_CopyMemory2(JNIEnv *env, jobject unsafe, jobject srcObj, jlong srcOffset, jobject dstObj, jlong dstOffset, jlong size)) |
duke@435 | 599 | UnsafeWrapper("Unsafe_CopyMemory"); |
duke@435 | 600 | if (size == 0) { |
duke@435 | 601 | return; |
duke@435 | 602 | } |
duke@435 | 603 | size_t sz = (size_t)size; |
duke@435 | 604 | if (sz != (julong)size || size < 0) { |
duke@435 | 605 | THROW(vmSymbols::java_lang_IllegalArgumentException()); |
duke@435 | 606 | } |
duke@435 | 607 | oop srcp = JNIHandles::resolve(srcObj); |
duke@435 | 608 | oop dstp = JNIHandles::resolve(dstObj); |
duke@435 | 609 | if (dstp != NULL && !dstp->is_typeArray()) { |
duke@435 | 610 | // NYI: This works only for non-oop arrays at present. |
duke@435 | 611 | // Generalizing it would be reasonable, but requires card marking. |
duke@435 | 612 | // Also, autoboxing a Long from 0L in copyMemory(x,y, 0L,z, n) would be bad. |
duke@435 | 613 | THROW(vmSymbols::java_lang_IllegalArgumentException()); |
duke@435 | 614 | } |
duke@435 | 615 | void* src = index_oop_from_field_offset_long(srcp, srcOffset); |
duke@435 | 616 | void* dst = index_oop_from_field_offset_long(dstp, dstOffset); |
duke@435 | 617 | Copy::conjoint_memory_atomic(src, dst, sz); |
duke@435 | 618 | UNSAFE_END |
duke@435 | 619 | |
duke@435 | 620 | |
duke@435 | 621 | ////// Random queries |
duke@435 | 622 | |
duke@435 | 623 | // See comment at file start about UNSAFE_LEAF |
duke@435 | 624 | //UNSAFE_LEAF(jint, Unsafe_AddressSize()) |
duke@435 | 625 | UNSAFE_ENTRY(jint, Unsafe_AddressSize(JNIEnv *env, jobject unsafe)) |
duke@435 | 626 | UnsafeWrapper("Unsafe_AddressSize"); |
duke@435 | 627 | return sizeof(void*); |
duke@435 | 628 | UNSAFE_END |
duke@435 | 629 | |
duke@435 | 630 | // See comment at file start about UNSAFE_LEAF |
duke@435 | 631 | //UNSAFE_LEAF(jint, Unsafe_PageSize()) |
duke@435 | 632 | UNSAFE_ENTRY(jint, Unsafe_PageSize(JNIEnv *env, jobject unsafe)) |
duke@435 | 633 | UnsafeWrapper("Unsafe_PageSize"); |
duke@435 | 634 | return os::vm_page_size(); |
duke@435 | 635 | UNSAFE_END |
duke@435 | 636 | |
duke@435 | 637 | jint find_field_offset(jobject field, int must_be_static, TRAPS) { |
duke@435 | 638 | if (field == NULL) { |
duke@435 | 639 | THROW_0(vmSymbols::java_lang_NullPointerException()); |
duke@435 | 640 | } |
duke@435 | 641 | |
duke@435 | 642 | oop reflected = JNIHandles::resolve_non_null(field); |
duke@435 | 643 | oop mirror = java_lang_reflect_Field::clazz(reflected); |
duke@435 | 644 | klassOop k = java_lang_Class::as_klassOop(mirror); |
duke@435 | 645 | int slot = java_lang_reflect_Field::slot(reflected); |
duke@435 | 646 | int modifiers = java_lang_reflect_Field::modifiers(reflected); |
duke@435 | 647 | |
duke@435 | 648 | if (must_be_static >= 0) { |
duke@435 | 649 | int really_is_static = ((modifiers & JVM_ACC_STATIC) != 0); |
duke@435 | 650 | if (must_be_static != really_is_static) { |
duke@435 | 651 | THROW_0(vmSymbols::java_lang_IllegalArgumentException()); |
duke@435 | 652 | } |
duke@435 | 653 | } |
duke@435 | 654 | |
duke@435 | 655 | int offset = instanceKlass::cast(k)->offset_from_fields(slot); |
duke@435 | 656 | return field_offset_from_byte_offset(offset); |
duke@435 | 657 | } |
duke@435 | 658 | |
duke@435 | 659 | UNSAFE_ENTRY(jlong, Unsafe_ObjectFieldOffset(JNIEnv *env, jobject unsafe, jobject field)) |
duke@435 | 660 | UnsafeWrapper("Unsafe_ObjectFieldOffset"); |
duke@435 | 661 | return find_field_offset(field, 0, THREAD); |
duke@435 | 662 | UNSAFE_END |
duke@435 | 663 | |
duke@435 | 664 | UNSAFE_ENTRY(jlong, Unsafe_StaticFieldOffset(JNIEnv *env, jobject unsafe, jobject field)) |
duke@435 | 665 | UnsafeWrapper("Unsafe_StaticFieldOffset"); |
duke@435 | 666 | return find_field_offset(field, 1, THREAD); |
duke@435 | 667 | UNSAFE_END |
duke@435 | 668 | |
duke@435 | 669 | UNSAFE_ENTRY(jobject, Unsafe_StaticFieldBaseFromField(JNIEnv *env, jobject unsafe, jobject field)) |
duke@435 | 670 | UnsafeWrapper("Unsafe_StaticFieldBase"); |
duke@435 | 671 | // Note: In this VM implementation, a field address is always a short |
duke@435 | 672 | // offset from the base of a a klass metaobject. Thus, the full dynamic |
duke@435 | 673 | // range of the return type is never used. However, some implementations |
duke@435 | 674 | // might put the static field inside an array shared by many classes, |
duke@435 | 675 | // or even at a fixed address, in which case the address could be quite |
duke@435 | 676 | // large. In that last case, this function would return NULL, since |
duke@435 | 677 | // the address would operate alone, without any base pointer. |
duke@435 | 678 | |
duke@435 | 679 | if (field == NULL) THROW_0(vmSymbols::java_lang_NullPointerException()); |
duke@435 | 680 | |
duke@435 | 681 | oop reflected = JNIHandles::resolve_non_null(field); |
duke@435 | 682 | oop mirror = java_lang_reflect_Field::clazz(reflected); |
duke@435 | 683 | int modifiers = java_lang_reflect_Field::modifiers(reflected); |
duke@435 | 684 | |
duke@435 | 685 | if ((modifiers & JVM_ACC_STATIC) == 0) { |
duke@435 | 686 | THROW_0(vmSymbols::java_lang_IllegalArgumentException()); |
duke@435 | 687 | } |
duke@435 | 688 | |
duke@435 | 689 | return JNIHandles::make_local(env, java_lang_Class::as_klassOop(mirror)); |
duke@435 | 690 | UNSAFE_END |
duke@435 | 691 | |
duke@435 | 692 | //@deprecated |
duke@435 | 693 | UNSAFE_ENTRY(jint, Unsafe_FieldOffset(JNIEnv *env, jobject unsafe, jobject field)) |
duke@435 | 694 | UnsafeWrapper("Unsafe_FieldOffset"); |
duke@435 | 695 | // tries (but fails) to be polymorphic between static and non-static: |
duke@435 | 696 | jlong offset = find_field_offset(field, -1, THREAD); |
duke@435 | 697 | guarantee(offset == (jint)offset, "offset fits in 32 bits"); |
duke@435 | 698 | return (jint)offset; |
duke@435 | 699 | UNSAFE_END |
duke@435 | 700 | |
duke@435 | 701 | //@deprecated |
duke@435 | 702 | UNSAFE_ENTRY(jobject, Unsafe_StaticFieldBaseFromClass(JNIEnv *env, jobject unsafe, jobject clazz)) |
duke@435 | 703 | UnsafeWrapper("Unsafe_StaticFieldBase"); |
duke@435 | 704 | if (clazz == NULL) { |
duke@435 | 705 | THROW_0(vmSymbols::java_lang_NullPointerException()); |
duke@435 | 706 | } |
duke@435 | 707 | return JNIHandles::make_local(env, java_lang_Class::as_klassOop(JNIHandles::resolve_non_null(clazz))); |
duke@435 | 708 | UNSAFE_END |
duke@435 | 709 | |
duke@435 | 710 | UNSAFE_ENTRY(void, Unsafe_EnsureClassInitialized(JNIEnv *env, jobject unsafe, jobject clazz)) |
duke@435 | 711 | UnsafeWrapper("Unsafe_EnsureClassInitialized"); |
duke@435 | 712 | if (clazz == NULL) { |
duke@435 | 713 | THROW(vmSymbols::java_lang_NullPointerException()); |
duke@435 | 714 | } |
duke@435 | 715 | oop mirror = JNIHandles::resolve_non_null(clazz); |
duke@435 | 716 | instanceKlass* k = instanceKlass::cast(java_lang_Class::as_klassOop(mirror)); |
duke@435 | 717 | if (k != NULL) { |
duke@435 | 718 | k->initialize(CHECK); |
duke@435 | 719 | } |
duke@435 | 720 | UNSAFE_END |
duke@435 | 721 | |
duke@435 | 722 | static void getBaseAndScale(int& base, int& scale, jclass acls, TRAPS) { |
duke@435 | 723 | if (acls == NULL) { |
duke@435 | 724 | THROW(vmSymbols::java_lang_NullPointerException()); |
duke@435 | 725 | } |
duke@435 | 726 | oop mirror = JNIHandles::resolve_non_null(acls); |
duke@435 | 727 | klassOop k = java_lang_Class::as_klassOop(mirror); |
duke@435 | 728 | if (k == NULL || !k->klass_part()->oop_is_array()) { |
duke@435 | 729 | THROW(vmSymbols::java_lang_InvalidClassException()); |
duke@435 | 730 | } else if (k->klass_part()->oop_is_objArray()) { |
duke@435 | 731 | base = arrayOopDesc::base_offset_in_bytes(T_OBJECT); |
coleenp@548 | 732 | scale = heapOopSize; |
duke@435 | 733 | } else if (k->klass_part()->oop_is_typeArray()) { |
duke@435 | 734 | typeArrayKlass* tak = typeArrayKlass::cast(k); |
duke@435 | 735 | base = tak->array_header_in_bytes(); |
duke@435 | 736 | assert(base == arrayOopDesc::base_offset_in_bytes(tak->element_type()), "array_header_size semantics ok"); |
duke@435 | 737 | scale = (1 << tak->log2_element_size()); |
duke@435 | 738 | } else { |
duke@435 | 739 | ShouldNotReachHere(); |
duke@435 | 740 | } |
duke@435 | 741 | } |
duke@435 | 742 | |
duke@435 | 743 | UNSAFE_ENTRY(jint, Unsafe_ArrayBaseOffset(JNIEnv *env, jobject unsafe, jclass acls)) |
duke@435 | 744 | UnsafeWrapper("Unsafe_ArrayBaseOffset"); |
duke@435 | 745 | int base, scale; |
duke@435 | 746 | getBaseAndScale(base, scale, acls, CHECK_0); |
duke@435 | 747 | return field_offset_from_byte_offset(base); |
duke@435 | 748 | UNSAFE_END |
duke@435 | 749 | |
duke@435 | 750 | |
duke@435 | 751 | UNSAFE_ENTRY(jint, Unsafe_ArrayIndexScale(JNIEnv *env, jobject unsafe, jclass acls)) |
duke@435 | 752 | UnsafeWrapper("Unsafe_ArrayIndexScale"); |
duke@435 | 753 | int base, scale; |
duke@435 | 754 | getBaseAndScale(base, scale, acls, CHECK_0); |
duke@435 | 755 | // This VM packs both fields and array elements down to the byte. |
duke@435 | 756 | // But watch out: If this changes, so that array references for |
duke@435 | 757 | // a given primitive type (say, T_BOOLEAN) use different memory units |
duke@435 | 758 | // than fields, this method MUST return zero for such arrays. |
duke@435 | 759 | // For example, the VM used to store sub-word sized fields in full |
duke@435 | 760 | // words in the object layout, so that accessors like getByte(Object,int) |
duke@435 | 761 | // did not really do what one might expect for arrays. Therefore, |
duke@435 | 762 | // this function used to report a zero scale factor, so that the user |
duke@435 | 763 | // would know not to attempt to access sub-word array elements. |
duke@435 | 764 | // // Code for unpacked fields: |
duke@435 | 765 | // if (scale < wordSize) return 0; |
duke@435 | 766 | |
duke@435 | 767 | // The following allows for a pretty general fieldOffset cookie scheme, |
duke@435 | 768 | // but requires it to be linear in byte offset. |
duke@435 | 769 | return field_offset_from_byte_offset(scale) - field_offset_from_byte_offset(0); |
duke@435 | 770 | UNSAFE_END |
duke@435 | 771 | |
duke@435 | 772 | |
duke@435 | 773 | static inline void throw_new(JNIEnv *env, const char *ename) { |
duke@435 | 774 | char buf[100]; |
duke@435 | 775 | strcpy(buf, "java/lang/"); |
duke@435 | 776 | strcat(buf, ename); |
duke@435 | 777 | jclass cls = env->FindClass(buf); |
duke@435 | 778 | char* msg = NULL; |
duke@435 | 779 | env->ThrowNew(cls, msg); |
duke@435 | 780 | } |
duke@435 | 781 | |
duke@435 | 782 | static jclass Unsafe_DefineClass(JNIEnv *env, jstring name, jbyteArray data, int offset, int length, jobject loader, jobject pd) { |
duke@435 | 783 | { |
duke@435 | 784 | // Code lifted from JDK 1.3 ClassLoader.c |
duke@435 | 785 | |
duke@435 | 786 | jbyte *body; |
duke@435 | 787 | char *utfName; |
duke@435 | 788 | jclass result = 0; |
duke@435 | 789 | char buf[128]; |
duke@435 | 790 | |
duke@435 | 791 | if (UsePerfData) { |
duke@435 | 792 | ClassLoader::unsafe_defineClassCallCounter()->inc(); |
duke@435 | 793 | } |
duke@435 | 794 | |
duke@435 | 795 | if (data == NULL) { |
duke@435 | 796 | throw_new(env, "NullPointerException"); |
duke@435 | 797 | return 0; |
duke@435 | 798 | } |
duke@435 | 799 | |
duke@435 | 800 | /* Work around 4153825. malloc crashes on Solaris when passed a |
duke@435 | 801 | * negative size. |
duke@435 | 802 | */ |
duke@435 | 803 | if (length < 0) { |
duke@435 | 804 | throw_new(env, "ArrayIndexOutOfBoundsException"); |
duke@435 | 805 | return 0; |
duke@435 | 806 | } |
duke@435 | 807 | |
duke@435 | 808 | body = NEW_C_HEAP_ARRAY(jbyte, length); |
duke@435 | 809 | |
duke@435 | 810 | if (body == 0) { |
duke@435 | 811 | throw_new(env, "OutOfMemoryError"); |
duke@435 | 812 | return 0; |
duke@435 | 813 | } |
duke@435 | 814 | |
duke@435 | 815 | env->GetByteArrayRegion(data, offset, length, body); |
duke@435 | 816 | |
duke@435 | 817 | if (env->ExceptionOccurred()) |
duke@435 | 818 | goto free_body; |
duke@435 | 819 | |
duke@435 | 820 | if (name != NULL) { |
duke@435 | 821 | uint len = env->GetStringUTFLength(name); |
duke@435 | 822 | int unicode_len = env->GetStringLength(name); |
duke@435 | 823 | if (len >= sizeof(buf)) { |
duke@435 | 824 | utfName = NEW_C_HEAP_ARRAY(char, len + 1); |
duke@435 | 825 | if (utfName == NULL) { |
duke@435 | 826 | throw_new(env, "OutOfMemoryError"); |
duke@435 | 827 | goto free_body; |
duke@435 | 828 | } |
duke@435 | 829 | } else { |
duke@435 | 830 | utfName = buf; |
duke@435 | 831 | } |
duke@435 | 832 | env->GetStringUTFRegion(name, 0, unicode_len, utfName); |
duke@435 | 833 | //VerifyFixClassname(utfName); |
duke@435 | 834 | for (uint i = 0; i < len; i++) { |
duke@435 | 835 | if (utfName[i] == '.') utfName[i] = '/'; |
duke@435 | 836 | } |
duke@435 | 837 | } else { |
duke@435 | 838 | utfName = NULL; |
duke@435 | 839 | } |
duke@435 | 840 | |
duke@435 | 841 | result = JVM_DefineClass(env, utfName, loader, body, length, pd); |
duke@435 | 842 | |
duke@435 | 843 | if (utfName && utfName != buf) |
duke@435 | 844 | FREE_C_HEAP_ARRAY(char, utfName); |
duke@435 | 845 | |
duke@435 | 846 | free_body: |
duke@435 | 847 | FREE_C_HEAP_ARRAY(jbyte, body); |
duke@435 | 848 | return result; |
duke@435 | 849 | } |
duke@435 | 850 | } |
duke@435 | 851 | |
duke@435 | 852 | |
duke@435 | 853 | UNSAFE_ENTRY(jclass, Unsafe_DefineClass0(JNIEnv *env, jobject unsafe, jstring name, jbyteArray data, int offset, int length)) |
duke@435 | 854 | UnsafeWrapper("Unsafe_DefineClass"); |
duke@435 | 855 | { |
duke@435 | 856 | ThreadToNativeFromVM ttnfv(thread); |
duke@435 | 857 | |
duke@435 | 858 | int depthFromDefineClass0 = 1; |
duke@435 | 859 | jclass caller = JVM_GetCallerClass(env, depthFromDefineClass0); |
duke@435 | 860 | jobject loader = (caller == NULL) ? NULL : JVM_GetClassLoader(env, caller); |
duke@435 | 861 | jobject pd = (caller == NULL) ? NULL : JVM_GetProtectionDomain(env, caller); |
duke@435 | 862 | |
duke@435 | 863 | return Unsafe_DefineClass(env, name, data, offset, length, loader, pd); |
duke@435 | 864 | } |
duke@435 | 865 | UNSAFE_END |
duke@435 | 866 | |
duke@435 | 867 | |
duke@435 | 868 | UNSAFE_ENTRY(jclass, Unsafe_DefineClass1(JNIEnv *env, jobject unsafe, jstring name, jbyteArray data, int offset, int length, jobject loader, jobject pd)) |
duke@435 | 869 | UnsafeWrapper("Unsafe_DefineClass"); |
duke@435 | 870 | { |
duke@435 | 871 | ThreadToNativeFromVM ttnfv(thread); |
duke@435 | 872 | |
duke@435 | 873 | return Unsafe_DefineClass(env, name, data, offset, length, loader, pd); |
duke@435 | 874 | } |
duke@435 | 875 | UNSAFE_END |
duke@435 | 876 | |
jrose@866 | 877 | #define DAC_Args CLS"[B["OBJ |
jrose@866 | 878 | // define a class but do not make it known to the class loader or system dictionary |
jrose@866 | 879 | // - host_class: supplies context for linkage, access control, protection domain, and class loader |
jrose@866 | 880 | // - data: bytes of a class file, a raw memory address (length gives the number of bytes) |
jrose@866 | 881 | // - cp_patches: where non-null entries exist, they replace corresponding CP entries in data |
jrose@866 | 882 | |
jrose@866 | 883 | // When you load an anonymous class U, it works as if you changed its name just before loading, |
jrose@866 | 884 | // to a name that you will never use again. Since the name is lost, no other class can directly |
jrose@866 | 885 | // link to any member of U. Just after U is loaded, the only way to use it is reflectively, |
jrose@866 | 886 | // through java.lang.Class methods like Class.newInstance. |
jrose@866 | 887 | |
jrose@866 | 888 | // Access checks for linkage sites within U continue to follow the same rules as for named classes. |
jrose@866 | 889 | // The package of an anonymous class is given by the package qualifier on the name under which it was loaded. |
jrose@866 | 890 | // An anonymous class also has special privileges to access any member of its host class. |
jrose@866 | 891 | // This is the main reason why this loading operation is unsafe. The purpose of this is to |
jrose@866 | 892 | // allow language implementations to simulate "open classes"; a host class in effect gets |
jrose@866 | 893 | // new code when an anonymous class is loaded alongside it. A less convenient but more |
jrose@866 | 894 | // standard way to do this is with reflection, which can also be set to ignore access |
jrose@866 | 895 | // restrictions. |
jrose@866 | 896 | |
jrose@866 | 897 | // Access into an anonymous class is possible only through reflection. Therefore, there |
jrose@866 | 898 | // are no special access rules for calling into an anonymous class. The relaxed access |
jrose@866 | 899 | // rule for the host class is applied in the opposite direction: A host class reflectively |
jrose@866 | 900 | // access one of its anonymous classes. |
jrose@866 | 901 | |
jrose@866 | 902 | // If you load the same bytecodes twice, you get two different classes. You can reload |
jrose@866 | 903 | // the same bytecodes with or without varying CP patches. |
jrose@866 | 904 | |
jrose@866 | 905 | // By using the CP patching array, you can have a new anonymous class U2 refer to an older one U1. |
jrose@866 | 906 | // The bytecodes for U2 should refer to U1 by a symbolic name (doesn't matter what the name is). |
jrose@866 | 907 | // The CONSTANT_Class entry for that name can be patched to refer directly to U1. |
jrose@866 | 908 | |
jrose@866 | 909 | // This allows, for example, U2 to use U1 as a superclass or super-interface, or as |
jrose@866 | 910 | // an outer class (so that U2 is an anonymous inner class of anonymous U1). |
jrose@866 | 911 | // It is not possible for a named class, or an older anonymous class, to refer by |
jrose@866 | 912 | // name (via its CP) to a newer anonymous class. |
jrose@866 | 913 | |
jrose@866 | 914 | // CP patching may also be used to modify (i.e., hack) the names of methods, classes, |
jrose@866 | 915 | // or type descriptors used in the loaded anonymous class. |
jrose@866 | 916 | |
jrose@866 | 917 | // Finally, CP patching may be used to introduce "live" objects into the constant pool, |
jrose@866 | 918 | // instead of "dead" strings. A compiled statement like println((Object)"hello") can |
jrose@866 | 919 | // be changed to println(greeting), where greeting is an arbitrary object created before |
jrose@866 | 920 | // the anonymous class is loaded. This is useful in dynamic languages, in which |
jrose@866 | 921 | // various kinds of metaobjects must be introduced as constants into bytecode. |
jrose@866 | 922 | // Note the cast (Object), which tells the verifier to expect an arbitrary object, |
jrose@866 | 923 | // not just a literal string. For such ldc instructions, the verifier uses the |
jrose@866 | 924 | // type Object instead of String, if the loaded constant is not in fact a String. |
jrose@866 | 925 | |
jrose@866 | 926 | static oop |
jrose@866 | 927 | Unsafe_DefineAnonymousClass_impl(JNIEnv *env, |
jrose@866 | 928 | jclass host_class, jbyteArray data, jobjectArray cp_patches_jh, |
jrose@866 | 929 | HeapWord* *temp_alloc, |
jrose@866 | 930 | TRAPS) { |
jrose@866 | 931 | |
jrose@866 | 932 | if (UsePerfData) { |
jrose@866 | 933 | ClassLoader::unsafe_defineClassCallCounter()->inc(); |
jrose@866 | 934 | } |
jrose@866 | 935 | |
jrose@866 | 936 | if (data == NULL) { |
jrose@866 | 937 | THROW_0(vmSymbols::java_lang_NullPointerException()); |
jrose@866 | 938 | } |
jrose@866 | 939 | |
jrose@866 | 940 | jint length = typeArrayOop(JNIHandles::resolve_non_null(data))->length(); |
jrose@866 | 941 | jint word_length = (length + sizeof(HeapWord)-1) / sizeof(HeapWord); |
jrose@866 | 942 | HeapWord* body = NEW_C_HEAP_ARRAY(HeapWord, word_length); |
jrose@866 | 943 | if (body == NULL) { |
jrose@866 | 944 | THROW_0(vmSymbols::java_lang_OutOfMemoryError()); |
jrose@866 | 945 | } |
jrose@866 | 946 | |
jrose@866 | 947 | // caller responsible to free it: |
jrose@866 | 948 | (*temp_alloc) = body; |
jrose@866 | 949 | |
jrose@866 | 950 | { |
jrose@866 | 951 | jbyte* array_base = typeArrayOop(JNIHandles::resolve_non_null(data))->byte_at_addr(0); |
jrose@866 | 952 | Copy::conjoint_words((HeapWord*) array_base, body, word_length); |
jrose@866 | 953 | } |
jrose@866 | 954 | |
jrose@866 | 955 | u1* class_bytes = (u1*) body; |
jrose@866 | 956 | int class_bytes_length = (int) length; |
jrose@866 | 957 | if (class_bytes_length < 0) class_bytes_length = 0; |
jrose@866 | 958 | if (class_bytes == NULL |
jrose@866 | 959 | || host_class == NULL |
jrose@866 | 960 | || length != class_bytes_length) |
jrose@866 | 961 | THROW_0(vmSymbols::java_lang_IllegalArgumentException()); |
jrose@866 | 962 | |
jrose@866 | 963 | objArrayHandle cp_patches_h; |
jrose@866 | 964 | if (cp_patches_jh != NULL) { |
jrose@866 | 965 | oop p = JNIHandles::resolve_non_null(cp_patches_jh); |
jrose@866 | 966 | if (!p->is_objArray()) |
jrose@866 | 967 | THROW_0(vmSymbols::java_lang_IllegalArgumentException()); |
jrose@866 | 968 | cp_patches_h = objArrayHandle(THREAD, (objArrayOop)p); |
jrose@866 | 969 | } |
jrose@866 | 970 | |
jrose@866 | 971 | KlassHandle host_klass(THREAD, java_lang_Class::as_klassOop(JNIHandles::resolve_non_null(host_class))); |
jrose@866 | 972 | const char* host_source = host_klass->external_name(); |
jrose@866 | 973 | Handle host_loader(THREAD, host_klass->class_loader()); |
jrose@866 | 974 | Handle host_domain(THREAD, host_klass->protection_domain()); |
jrose@866 | 975 | |
jrose@866 | 976 | GrowableArray<Handle>* cp_patches = NULL; |
jrose@866 | 977 | if (cp_patches_h.not_null()) { |
jrose@866 | 978 | int alen = cp_patches_h->length(); |
jrose@866 | 979 | for (int i = alen-1; i >= 0; i--) { |
jrose@866 | 980 | oop p = cp_patches_h->obj_at(i); |
jrose@866 | 981 | if (p != NULL) { |
jrose@866 | 982 | Handle patch(THREAD, p); |
jrose@866 | 983 | if (cp_patches == NULL) |
jrose@866 | 984 | cp_patches = new GrowableArray<Handle>(i+1, i+1, Handle()); |
jrose@866 | 985 | cp_patches->at_put(i, patch); |
jrose@866 | 986 | } |
jrose@866 | 987 | } |
jrose@866 | 988 | } |
jrose@866 | 989 | |
jrose@866 | 990 | ClassFileStream st(class_bytes, class_bytes_length, (char*) host_source); |
jrose@866 | 991 | |
jrose@866 | 992 | instanceKlassHandle anon_klass; |
jrose@866 | 993 | { |
jrose@866 | 994 | symbolHandle no_class_name; |
jrose@866 | 995 | klassOop anonk = SystemDictionary::parse_stream(no_class_name, |
jrose@866 | 996 | host_loader, host_domain, |
jrose@866 | 997 | &st, host_klass, cp_patches, |
jrose@866 | 998 | CHECK_NULL); |
jrose@866 | 999 | if (anonk == NULL) return NULL; |
jrose@866 | 1000 | anon_klass = instanceKlassHandle(THREAD, anonk); |
jrose@866 | 1001 | } |
jrose@866 | 1002 | |
jrose@866 | 1003 | // let caller initialize it as needed... |
jrose@866 | 1004 | |
jrose@866 | 1005 | return anon_klass->java_mirror(); |
jrose@866 | 1006 | } |
jrose@866 | 1007 | |
jrose@866 | 1008 | UNSAFE_ENTRY(jclass, Unsafe_DefineAnonymousClass(JNIEnv *env, jobject unsafe, jclass host_class, jbyteArray data, jobjectArray cp_patches_jh)) |
jrose@866 | 1009 | { |
jrose@866 | 1010 | UnsafeWrapper("Unsafe_DefineAnonymousClass"); |
jrose@866 | 1011 | ResourceMark rm(THREAD); |
jrose@866 | 1012 | |
jrose@866 | 1013 | HeapWord* temp_alloc = NULL; |
jrose@866 | 1014 | |
jrose@866 | 1015 | jobject res_jh = NULL; |
jrose@866 | 1016 | |
jrose@866 | 1017 | { oop res_oop = Unsafe_DefineAnonymousClass_impl(env, |
jrose@866 | 1018 | host_class, data, cp_patches_jh, |
jrose@866 | 1019 | &temp_alloc, THREAD); |
jrose@866 | 1020 | if (res_oop != NULL) |
jrose@866 | 1021 | res_jh = JNIHandles::make_local(env, res_oop); |
jrose@866 | 1022 | } |
jrose@866 | 1023 | |
jrose@866 | 1024 | // try/finally clause: |
jrose@866 | 1025 | if (temp_alloc != NULL) { |
jrose@866 | 1026 | FREE_C_HEAP_ARRAY(HeapWord, temp_alloc); |
jrose@866 | 1027 | } |
jrose@866 | 1028 | |
jrose@866 | 1029 | return (jclass) res_jh; |
jrose@866 | 1030 | } |
jrose@866 | 1031 | UNSAFE_END |
jrose@866 | 1032 | |
jrose@866 | 1033 | |
duke@435 | 1034 | |
duke@435 | 1035 | UNSAFE_ENTRY(void, Unsafe_MonitorEnter(JNIEnv *env, jobject unsafe, jobject jobj)) |
duke@435 | 1036 | UnsafeWrapper("Unsafe_MonitorEnter"); |
duke@435 | 1037 | { |
duke@435 | 1038 | if (jobj == NULL) { |
duke@435 | 1039 | THROW(vmSymbols::java_lang_NullPointerException()); |
duke@435 | 1040 | } |
duke@435 | 1041 | Handle obj(thread, JNIHandles::resolve_non_null(jobj)); |
duke@435 | 1042 | ObjectSynchronizer::jni_enter(obj, CHECK); |
duke@435 | 1043 | } |
duke@435 | 1044 | UNSAFE_END |
duke@435 | 1045 | |
duke@435 | 1046 | |
duke@435 | 1047 | UNSAFE_ENTRY(jboolean, Unsafe_TryMonitorEnter(JNIEnv *env, jobject unsafe, jobject jobj)) |
duke@435 | 1048 | UnsafeWrapper("Unsafe_TryMonitorEnter"); |
duke@435 | 1049 | { |
duke@435 | 1050 | if (jobj == NULL) { |
duke@435 | 1051 | THROW_(vmSymbols::java_lang_NullPointerException(), JNI_FALSE); |
duke@435 | 1052 | } |
duke@435 | 1053 | Handle obj(thread, JNIHandles::resolve_non_null(jobj)); |
duke@435 | 1054 | bool res = ObjectSynchronizer::jni_try_enter(obj, CHECK_0); |
duke@435 | 1055 | return (res ? JNI_TRUE : JNI_FALSE); |
duke@435 | 1056 | } |
duke@435 | 1057 | UNSAFE_END |
duke@435 | 1058 | |
duke@435 | 1059 | |
duke@435 | 1060 | UNSAFE_ENTRY(void, Unsafe_MonitorExit(JNIEnv *env, jobject unsafe, jobject jobj)) |
duke@435 | 1061 | UnsafeWrapper("Unsafe_MonitorExit"); |
duke@435 | 1062 | { |
duke@435 | 1063 | if (jobj == NULL) { |
duke@435 | 1064 | THROW(vmSymbols::java_lang_NullPointerException()); |
duke@435 | 1065 | } |
duke@435 | 1066 | Handle obj(THREAD, JNIHandles::resolve_non_null(jobj)); |
duke@435 | 1067 | ObjectSynchronizer::jni_exit(obj(), CHECK); |
duke@435 | 1068 | } |
duke@435 | 1069 | UNSAFE_END |
duke@435 | 1070 | |
duke@435 | 1071 | |
duke@435 | 1072 | UNSAFE_ENTRY(void, Unsafe_ThrowException(JNIEnv *env, jobject unsafe, jthrowable thr)) |
duke@435 | 1073 | UnsafeWrapper("Unsafe_ThrowException"); |
duke@435 | 1074 | { |
duke@435 | 1075 | ThreadToNativeFromVM ttnfv(thread); |
duke@435 | 1076 | env->Throw(thr); |
duke@435 | 1077 | } |
duke@435 | 1078 | UNSAFE_END |
duke@435 | 1079 | |
duke@435 | 1080 | // JSR166 ------------------------------------------------------------------ |
duke@435 | 1081 | |
duke@435 | 1082 | UNSAFE_ENTRY(jboolean, Unsafe_CompareAndSwapObject(JNIEnv *env, jobject unsafe, jobject obj, jlong offset, jobject e_h, jobject x_h)) |
duke@435 | 1083 | UnsafeWrapper("Unsafe_CompareAndSwapObject"); |
duke@435 | 1084 | oop x = JNIHandles::resolve(x_h); |
duke@435 | 1085 | oop e = JNIHandles::resolve(e_h); |
duke@435 | 1086 | oop p = JNIHandles::resolve(obj); |
coleenp@548 | 1087 | HeapWord* addr = (HeapWord *)index_oop_from_field_offset_long(p, offset); |
ysr@1280 | 1088 | if (UseCompressedOops) { |
ysr@1280 | 1089 | update_barrier_set_pre((narrowOop*)addr, e); |
ysr@1280 | 1090 | } else { |
ysr@1280 | 1091 | update_barrier_set_pre((oop*)addr, e); |
ysr@1280 | 1092 | } |
coleenp@548 | 1093 | oop res = oopDesc::atomic_compare_exchange_oop(x, addr, e); |
coleenp@548 | 1094 | jboolean success = (res == e); |
duke@435 | 1095 | if (success) |
coleenp@548 | 1096 | update_barrier_set((void*)addr, x); |
duke@435 | 1097 | return success; |
duke@435 | 1098 | UNSAFE_END |
duke@435 | 1099 | |
duke@435 | 1100 | UNSAFE_ENTRY(jboolean, Unsafe_CompareAndSwapInt(JNIEnv *env, jobject unsafe, jobject obj, jlong offset, jint e, jint x)) |
duke@435 | 1101 | UnsafeWrapper("Unsafe_CompareAndSwapInt"); |
duke@435 | 1102 | oop p = JNIHandles::resolve(obj); |
duke@435 | 1103 | jint* addr = (jint *) index_oop_from_field_offset_long(p, offset); |
duke@435 | 1104 | return (jint)(Atomic::cmpxchg(x, addr, e)) == e; |
duke@435 | 1105 | UNSAFE_END |
duke@435 | 1106 | |
duke@435 | 1107 | UNSAFE_ENTRY(jboolean, Unsafe_CompareAndSwapLong(JNIEnv *env, jobject unsafe, jobject obj, jlong offset, jlong e, jlong x)) |
duke@435 | 1108 | UnsafeWrapper("Unsafe_CompareAndSwapLong"); |
duke@435 | 1109 | Handle p (THREAD, JNIHandles::resolve(obj)); |
duke@435 | 1110 | jlong* addr = (jlong*)(index_oop_from_field_offset_long(p(), offset)); |
duke@435 | 1111 | if (VM_Version::supports_cx8()) |
duke@435 | 1112 | return (jlong)(Atomic::cmpxchg(x, addr, e)) == e; |
duke@435 | 1113 | else { |
duke@435 | 1114 | jboolean success = false; |
duke@435 | 1115 | ObjectLocker ol(p, THREAD); |
duke@435 | 1116 | if (*addr == e) { *addr = x; success = true; } |
duke@435 | 1117 | return success; |
duke@435 | 1118 | } |
duke@435 | 1119 | UNSAFE_END |
duke@435 | 1120 | |
duke@435 | 1121 | UNSAFE_ENTRY(void, Unsafe_Park(JNIEnv *env, jobject unsafe, jboolean isAbsolute, jlong time)) |
duke@435 | 1122 | UnsafeWrapper("Unsafe_Park"); |
fparain@1759 | 1123 | HS_DTRACE_PROBE3(hotspot, thread__park__begin, thread->parker(), (int) isAbsolute, time); |
duke@435 | 1124 | JavaThreadParkedState jtps(thread, time != 0); |
duke@435 | 1125 | thread->parker()->park(isAbsolute != 0, time); |
fparain@1759 | 1126 | HS_DTRACE_PROBE1(hotspot, thread__park__end, thread->parker()); |
duke@435 | 1127 | UNSAFE_END |
duke@435 | 1128 | |
duke@435 | 1129 | UNSAFE_ENTRY(void, Unsafe_Unpark(JNIEnv *env, jobject unsafe, jobject jthread)) |
duke@435 | 1130 | UnsafeWrapper("Unsafe_Unpark"); |
duke@435 | 1131 | Parker* p = NULL; |
duke@435 | 1132 | if (jthread != NULL) { |
duke@435 | 1133 | oop java_thread = JNIHandles::resolve_non_null(jthread); |
duke@435 | 1134 | if (java_thread != NULL) { |
duke@435 | 1135 | jlong lp = java_lang_Thread::park_event(java_thread); |
duke@435 | 1136 | if (lp != 0) { |
duke@435 | 1137 | // This cast is OK even though the jlong might have been read |
duke@435 | 1138 | // non-atomically on 32bit systems, since there, one word will |
duke@435 | 1139 | // always be zero anyway and the value set is always the same |
duke@435 | 1140 | p = (Parker*)addr_from_java(lp); |
duke@435 | 1141 | } else { |
duke@435 | 1142 | // Grab lock if apparently null or using older version of library |
duke@435 | 1143 | MutexLocker mu(Threads_lock); |
duke@435 | 1144 | java_thread = JNIHandles::resolve_non_null(jthread); |
duke@435 | 1145 | if (java_thread != NULL) { |
duke@435 | 1146 | JavaThread* thr = java_lang_Thread::thread(java_thread); |
duke@435 | 1147 | if (thr != NULL) { |
duke@435 | 1148 | p = thr->parker(); |
duke@435 | 1149 | if (p != NULL) { // Bind to Java thread for next time. |
duke@435 | 1150 | java_lang_Thread::set_park_event(java_thread, addr_to_java(p)); |
duke@435 | 1151 | } |
duke@435 | 1152 | } |
duke@435 | 1153 | } |
duke@435 | 1154 | } |
duke@435 | 1155 | } |
duke@435 | 1156 | } |
duke@435 | 1157 | if (p != NULL) { |
fparain@1759 | 1158 | HS_DTRACE_PROBE1(hotspot, thread__unpark, p); |
duke@435 | 1159 | p->unpark(); |
duke@435 | 1160 | } |
duke@435 | 1161 | UNSAFE_END |
duke@435 | 1162 | |
duke@435 | 1163 | UNSAFE_ENTRY(jint, Unsafe_Loadavg(JNIEnv *env, jobject unsafe, jdoubleArray loadavg, jint nelem)) |
duke@435 | 1164 | UnsafeWrapper("Unsafe_Loadavg"); |
duke@435 | 1165 | const int max_nelem = 3; |
duke@435 | 1166 | double la[max_nelem]; |
duke@435 | 1167 | jint ret; |
duke@435 | 1168 | |
duke@435 | 1169 | typeArrayOop a = typeArrayOop(JNIHandles::resolve_non_null(loadavg)); |
duke@435 | 1170 | assert(a->is_typeArray(), "must be type array"); |
duke@435 | 1171 | |
duke@435 | 1172 | if (nelem < 0 || nelem > max_nelem || a->length() < nelem) { |
duke@435 | 1173 | ThreadToNativeFromVM ttnfv(thread); |
duke@435 | 1174 | throw_new(env, "ArrayIndexOutOfBoundsException"); |
duke@435 | 1175 | return -1; |
duke@435 | 1176 | } |
duke@435 | 1177 | |
duke@435 | 1178 | ret = os::loadavg(la, nelem); |
duke@435 | 1179 | if (ret == -1) return -1; |
duke@435 | 1180 | |
duke@435 | 1181 | // if successful, ret is the number of samples actually retrieved. |
duke@435 | 1182 | assert(ret >= 0 && ret <= max_nelem, "Unexpected loadavg return value"); |
duke@435 | 1183 | switch(ret) { |
duke@435 | 1184 | case 3: a->double_at_put(2, (jdouble)la[2]); // fall through |
duke@435 | 1185 | case 2: a->double_at_put(1, (jdouble)la[1]); // fall through |
duke@435 | 1186 | case 1: a->double_at_put(0, (jdouble)la[0]); break; |
duke@435 | 1187 | } |
duke@435 | 1188 | return ret; |
duke@435 | 1189 | UNSAFE_END |
duke@435 | 1190 | |
duke@435 | 1191 | UNSAFE_ENTRY(void, Unsafe_PrefetchRead(JNIEnv* env, jclass ignored, jobject obj, jlong offset)) |
duke@435 | 1192 | UnsafeWrapper("Unsafe_PrefetchRead"); |
duke@435 | 1193 | oop p = JNIHandles::resolve(obj); |
duke@435 | 1194 | void* addr = index_oop_from_field_offset_long(p, 0); |
duke@435 | 1195 | Prefetch::read(addr, (intx)offset); |
duke@435 | 1196 | UNSAFE_END |
duke@435 | 1197 | |
duke@435 | 1198 | UNSAFE_ENTRY(void, Unsafe_PrefetchWrite(JNIEnv* env, jclass ignored, jobject obj, jlong offset)) |
duke@435 | 1199 | UnsafeWrapper("Unsafe_PrefetchWrite"); |
duke@435 | 1200 | oop p = JNIHandles::resolve(obj); |
duke@435 | 1201 | void* addr = index_oop_from_field_offset_long(p, 0); |
duke@435 | 1202 | Prefetch::write(addr, (intx)offset); |
duke@435 | 1203 | UNSAFE_END |
duke@435 | 1204 | |
duke@435 | 1205 | |
duke@435 | 1206 | /// JVM_RegisterUnsafeMethods |
duke@435 | 1207 | |
duke@435 | 1208 | #define ADR "J" |
duke@435 | 1209 | |
duke@435 | 1210 | #define LANG "Ljava/lang/" |
duke@435 | 1211 | |
duke@435 | 1212 | #define OBJ LANG"Object;" |
duke@435 | 1213 | #define CLS LANG"Class;" |
duke@435 | 1214 | #define CTR LANG"reflect/Constructor;" |
duke@435 | 1215 | #define FLD LANG"reflect/Field;" |
duke@435 | 1216 | #define MTH LANG"reflect/Method;" |
duke@435 | 1217 | #define THR LANG"Throwable;" |
duke@435 | 1218 | |
duke@435 | 1219 | #define DC0_Args LANG"String;[BII" |
duke@435 | 1220 | #define DC1_Args DC0_Args LANG"ClassLoader;" "Ljava/security/ProtectionDomain;" |
duke@435 | 1221 | |
duke@435 | 1222 | #define CC (char*) /*cast a literal from (const char*)*/ |
duke@435 | 1223 | #define FN_PTR(f) CAST_FROM_FN_PTR(void*, &f) |
duke@435 | 1224 | |
duke@435 | 1225 | // define deprecated accessors for compabitility with 1.4.0 |
duke@435 | 1226 | #define DECLARE_GETSETOOP_140(Boolean, Z) \ |
duke@435 | 1227 | {CC"get"#Boolean, CC"("OBJ"I)"#Z, FN_PTR(Unsafe_Get##Boolean##140)}, \ |
duke@435 | 1228 | {CC"put"#Boolean, CC"("OBJ"I"#Z")V", FN_PTR(Unsafe_Set##Boolean##140)} |
duke@435 | 1229 | |
duke@435 | 1230 | // Note: In 1.4.1, getObject and kin take both int and long offsets. |
duke@435 | 1231 | #define DECLARE_GETSETOOP_141(Boolean, Z) \ |
duke@435 | 1232 | {CC"get"#Boolean, CC"("OBJ"J)"#Z, FN_PTR(Unsafe_Get##Boolean)}, \ |
duke@435 | 1233 | {CC"put"#Boolean, CC"("OBJ"J"#Z")V", FN_PTR(Unsafe_Set##Boolean)} |
duke@435 | 1234 | |
duke@435 | 1235 | // Note: In 1.5.0, there are volatile versions too |
duke@435 | 1236 | #define DECLARE_GETSETOOP(Boolean, Z) \ |
duke@435 | 1237 | {CC"get"#Boolean, CC"("OBJ"J)"#Z, FN_PTR(Unsafe_Get##Boolean)}, \ |
duke@435 | 1238 | {CC"put"#Boolean, CC"("OBJ"J"#Z")V", FN_PTR(Unsafe_Set##Boolean)}, \ |
duke@435 | 1239 | {CC"get"#Boolean"Volatile", CC"("OBJ"J)"#Z, FN_PTR(Unsafe_Get##Boolean##Volatile)}, \ |
duke@435 | 1240 | {CC"put"#Boolean"Volatile", CC"("OBJ"J"#Z")V", FN_PTR(Unsafe_Set##Boolean##Volatile)} |
duke@435 | 1241 | |
duke@435 | 1242 | |
duke@435 | 1243 | #define DECLARE_GETSETNATIVE(Byte, B) \ |
duke@435 | 1244 | {CC"get"#Byte, CC"("ADR")"#B, FN_PTR(Unsafe_GetNative##Byte)}, \ |
duke@435 | 1245 | {CC"put"#Byte, CC"("ADR#B")V", FN_PTR(Unsafe_SetNative##Byte)} |
duke@435 | 1246 | |
duke@435 | 1247 | |
duke@435 | 1248 | |
duke@435 | 1249 | // %%% These are temporarily supported until the SDK sources |
duke@435 | 1250 | // contain the necessarily updated Unsafe.java. |
duke@435 | 1251 | static JNINativeMethod methods_140[] = { |
duke@435 | 1252 | |
duke@435 | 1253 | {CC"getObject", CC"("OBJ"I)"OBJ"", FN_PTR(Unsafe_GetObject140)}, |
duke@435 | 1254 | {CC"putObject", CC"("OBJ"I"OBJ")V", FN_PTR(Unsafe_SetObject140)}, |
duke@435 | 1255 | |
duke@435 | 1256 | DECLARE_GETSETOOP_140(Boolean, Z), |
duke@435 | 1257 | DECLARE_GETSETOOP_140(Byte, B), |
duke@435 | 1258 | DECLARE_GETSETOOP_140(Short, S), |
duke@435 | 1259 | DECLARE_GETSETOOP_140(Char, C), |
duke@435 | 1260 | DECLARE_GETSETOOP_140(Int, I), |
duke@435 | 1261 | DECLARE_GETSETOOP_140(Long, J), |
duke@435 | 1262 | DECLARE_GETSETOOP_140(Float, F), |
duke@435 | 1263 | DECLARE_GETSETOOP_140(Double, D), |
duke@435 | 1264 | |
duke@435 | 1265 | DECLARE_GETSETNATIVE(Byte, B), |
duke@435 | 1266 | DECLARE_GETSETNATIVE(Short, S), |
duke@435 | 1267 | DECLARE_GETSETNATIVE(Char, C), |
duke@435 | 1268 | DECLARE_GETSETNATIVE(Int, I), |
duke@435 | 1269 | DECLARE_GETSETNATIVE(Long, J), |
duke@435 | 1270 | DECLARE_GETSETNATIVE(Float, F), |
duke@435 | 1271 | DECLARE_GETSETNATIVE(Double, D), |
duke@435 | 1272 | |
duke@435 | 1273 | {CC"getAddress", CC"("ADR")"ADR, FN_PTR(Unsafe_GetNativeAddress)}, |
duke@435 | 1274 | {CC"putAddress", CC"("ADR""ADR")V", FN_PTR(Unsafe_SetNativeAddress)}, |
duke@435 | 1275 | |
duke@435 | 1276 | {CC"allocateMemory", CC"(J)"ADR, FN_PTR(Unsafe_AllocateMemory)}, |
duke@435 | 1277 | {CC"reallocateMemory", CC"("ADR"J)"ADR, FN_PTR(Unsafe_ReallocateMemory)}, |
duke@435 | 1278 | // {CC"setMemory", CC"("ADR"JB)V", FN_PTR(Unsafe_SetMemory)}, |
duke@435 | 1279 | // {CC"copyMemory", CC"("ADR ADR"J)V", FN_PTR(Unsafe_CopyMemory)}, |
duke@435 | 1280 | {CC"freeMemory", CC"("ADR")V", FN_PTR(Unsafe_FreeMemory)}, |
duke@435 | 1281 | |
duke@435 | 1282 | {CC"fieldOffset", CC"("FLD")I", FN_PTR(Unsafe_FieldOffset)}, //deprecated |
duke@435 | 1283 | {CC"staticFieldBase", CC"("CLS")"OBJ, FN_PTR(Unsafe_StaticFieldBaseFromClass)}, //deprecated |
duke@435 | 1284 | {CC"ensureClassInitialized",CC"("CLS")V", FN_PTR(Unsafe_EnsureClassInitialized)}, |
duke@435 | 1285 | {CC"arrayBaseOffset", CC"("CLS")I", FN_PTR(Unsafe_ArrayBaseOffset)}, |
duke@435 | 1286 | {CC"arrayIndexScale", CC"("CLS")I", FN_PTR(Unsafe_ArrayIndexScale)}, |
duke@435 | 1287 | {CC"addressSize", CC"()I", FN_PTR(Unsafe_AddressSize)}, |
duke@435 | 1288 | {CC"pageSize", CC"()I", FN_PTR(Unsafe_PageSize)}, |
duke@435 | 1289 | |
duke@435 | 1290 | {CC"defineClass", CC"("DC0_Args")"CLS, FN_PTR(Unsafe_DefineClass0)}, |
duke@435 | 1291 | {CC"defineClass", CC"("DC1_Args")"CLS, FN_PTR(Unsafe_DefineClass1)}, |
duke@435 | 1292 | {CC"allocateInstance", CC"("CLS")"OBJ, FN_PTR(Unsafe_AllocateInstance)}, |
duke@435 | 1293 | {CC"monitorEnter", CC"("OBJ")V", FN_PTR(Unsafe_MonitorEnter)}, |
duke@435 | 1294 | {CC"monitorExit", CC"("OBJ")V", FN_PTR(Unsafe_MonitorExit)}, |
duke@435 | 1295 | {CC"throwException", CC"("THR")V", FN_PTR(Unsafe_ThrowException)} |
duke@435 | 1296 | }; |
duke@435 | 1297 | |
duke@435 | 1298 | // These are the old methods prior to the JSR 166 changes in 1.5.0 |
duke@435 | 1299 | static JNINativeMethod methods_141[] = { |
duke@435 | 1300 | |
duke@435 | 1301 | {CC"getObject", CC"("OBJ"J)"OBJ"", FN_PTR(Unsafe_GetObject)}, |
duke@435 | 1302 | {CC"putObject", CC"("OBJ"J"OBJ")V", FN_PTR(Unsafe_SetObject)}, |
duke@435 | 1303 | |
duke@435 | 1304 | DECLARE_GETSETOOP_141(Boolean, Z), |
duke@435 | 1305 | DECLARE_GETSETOOP_141(Byte, B), |
duke@435 | 1306 | DECLARE_GETSETOOP_141(Short, S), |
duke@435 | 1307 | DECLARE_GETSETOOP_141(Char, C), |
duke@435 | 1308 | DECLARE_GETSETOOP_141(Int, I), |
duke@435 | 1309 | DECLARE_GETSETOOP_141(Long, J), |
duke@435 | 1310 | DECLARE_GETSETOOP_141(Float, F), |
duke@435 | 1311 | DECLARE_GETSETOOP_141(Double, D), |
duke@435 | 1312 | |
duke@435 | 1313 | DECLARE_GETSETNATIVE(Byte, B), |
duke@435 | 1314 | DECLARE_GETSETNATIVE(Short, S), |
duke@435 | 1315 | DECLARE_GETSETNATIVE(Char, C), |
duke@435 | 1316 | DECLARE_GETSETNATIVE(Int, I), |
duke@435 | 1317 | DECLARE_GETSETNATIVE(Long, J), |
duke@435 | 1318 | DECLARE_GETSETNATIVE(Float, F), |
duke@435 | 1319 | DECLARE_GETSETNATIVE(Double, D), |
duke@435 | 1320 | |
duke@435 | 1321 | {CC"getAddress", CC"("ADR")"ADR, FN_PTR(Unsafe_GetNativeAddress)}, |
duke@435 | 1322 | {CC"putAddress", CC"("ADR""ADR")V", FN_PTR(Unsafe_SetNativeAddress)}, |
duke@435 | 1323 | |
duke@435 | 1324 | {CC"allocateMemory", CC"(J)"ADR, FN_PTR(Unsafe_AllocateMemory)}, |
duke@435 | 1325 | {CC"reallocateMemory", CC"("ADR"J)"ADR, FN_PTR(Unsafe_ReallocateMemory)}, |
duke@435 | 1326 | // {CC"setMemory", CC"("ADR"JB)V", FN_PTR(Unsafe_SetMemory)}, |
duke@435 | 1327 | // {CC"copyMemory", CC"("ADR ADR"J)V", FN_PTR(Unsafe_CopyMemory)}, |
duke@435 | 1328 | {CC"freeMemory", CC"("ADR")V", FN_PTR(Unsafe_FreeMemory)}, |
duke@435 | 1329 | |
duke@435 | 1330 | {CC"objectFieldOffset", CC"("FLD")J", FN_PTR(Unsafe_ObjectFieldOffset)}, |
duke@435 | 1331 | {CC"staticFieldOffset", CC"("FLD")J", FN_PTR(Unsafe_StaticFieldOffset)}, |
duke@435 | 1332 | {CC"staticFieldBase", CC"("FLD")"OBJ, FN_PTR(Unsafe_StaticFieldBaseFromField)}, |
duke@435 | 1333 | {CC"ensureClassInitialized",CC"("CLS")V", FN_PTR(Unsafe_EnsureClassInitialized)}, |
duke@435 | 1334 | {CC"arrayBaseOffset", CC"("CLS")I", FN_PTR(Unsafe_ArrayBaseOffset)}, |
duke@435 | 1335 | {CC"arrayIndexScale", CC"("CLS")I", FN_PTR(Unsafe_ArrayIndexScale)}, |
duke@435 | 1336 | {CC"addressSize", CC"()I", FN_PTR(Unsafe_AddressSize)}, |
duke@435 | 1337 | {CC"pageSize", CC"()I", FN_PTR(Unsafe_PageSize)}, |
duke@435 | 1338 | |
duke@435 | 1339 | {CC"defineClass", CC"("DC0_Args")"CLS, FN_PTR(Unsafe_DefineClass0)}, |
duke@435 | 1340 | {CC"defineClass", CC"("DC1_Args")"CLS, FN_PTR(Unsafe_DefineClass1)}, |
duke@435 | 1341 | {CC"allocateInstance", CC"("CLS")"OBJ, FN_PTR(Unsafe_AllocateInstance)}, |
duke@435 | 1342 | {CC"monitorEnter", CC"("OBJ")V", FN_PTR(Unsafe_MonitorEnter)}, |
duke@435 | 1343 | {CC"monitorExit", CC"("OBJ")V", FN_PTR(Unsafe_MonitorExit)}, |
duke@435 | 1344 | {CC"throwException", CC"("THR")V", FN_PTR(Unsafe_ThrowException)} |
duke@435 | 1345 | |
duke@435 | 1346 | }; |
duke@435 | 1347 | |
duke@435 | 1348 | // These are the old methods prior to the JSR 166 changes in 1.6.0 |
duke@435 | 1349 | static JNINativeMethod methods_15[] = { |
duke@435 | 1350 | |
duke@435 | 1351 | {CC"getObject", CC"("OBJ"J)"OBJ"", FN_PTR(Unsafe_GetObject)}, |
duke@435 | 1352 | {CC"putObject", CC"("OBJ"J"OBJ")V", FN_PTR(Unsafe_SetObject)}, |
duke@435 | 1353 | {CC"getObjectVolatile",CC"("OBJ"J)"OBJ"", FN_PTR(Unsafe_GetObjectVolatile)}, |
duke@435 | 1354 | {CC"putObjectVolatile",CC"("OBJ"J"OBJ")V", FN_PTR(Unsafe_SetObjectVolatile)}, |
duke@435 | 1355 | |
duke@435 | 1356 | |
duke@435 | 1357 | DECLARE_GETSETOOP(Boolean, Z), |
duke@435 | 1358 | DECLARE_GETSETOOP(Byte, B), |
duke@435 | 1359 | DECLARE_GETSETOOP(Short, S), |
duke@435 | 1360 | DECLARE_GETSETOOP(Char, C), |
duke@435 | 1361 | DECLARE_GETSETOOP(Int, I), |
duke@435 | 1362 | DECLARE_GETSETOOP(Long, J), |
duke@435 | 1363 | DECLARE_GETSETOOP(Float, F), |
duke@435 | 1364 | DECLARE_GETSETOOP(Double, D), |
duke@435 | 1365 | |
duke@435 | 1366 | DECLARE_GETSETNATIVE(Byte, B), |
duke@435 | 1367 | DECLARE_GETSETNATIVE(Short, S), |
duke@435 | 1368 | DECLARE_GETSETNATIVE(Char, C), |
duke@435 | 1369 | DECLARE_GETSETNATIVE(Int, I), |
duke@435 | 1370 | DECLARE_GETSETNATIVE(Long, J), |
duke@435 | 1371 | DECLARE_GETSETNATIVE(Float, F), |
duke@435 | 1372 | DECLARE_GETSETNATIVE(Double, D), |
duke@435 | 1373 | |
duke@435 | 1374 | {CC"getAddress", CC"("ADR")"ADR, FN_PTR(Unsafe_GetNativeAddress)}, |
duke@435 | 1375 | {CC"putAddress", CC"("ADR""ADR")V", FN_PTR(Unsafe_SetNativeAddress)}, |
duke@435 | 1376 | |
duke@435 | 1377 | {CC"allocateMemory", CC"(J)"ADR, FN_PTR(Unsafe_AllocateMemory)}, |
duke@435 | 1378 | {CC"reallocateMemory", CC"("ADR"J)"ADR, FN_PTR(Unsafe_ReallocateMemory)}, |
duke@435 | 1379 | // {CC"setMemory", CC"("ADR"JB)V", FN_PTR(Unsafe_SetMemory)}, |
duke@435 | 1380 | // {CC"copyMemory", CC"("ADR ADR"J)V", FN_PTR(Unsafe_CopyMemory)}, |
duke@435 | 1381 | {CC"freeMemory", CC"("ADR")V", FN_PTR(Unsafe_FreeMemory)}, |
duke@435 | 1382 | |
duke@435 | 1383 | {CC"objectFieldOffset", CC"("FLD")J", FN_PTR(Unsafe_ObjectFieldOffset)}, |
duke@435 | 1384 | {CC"staticFieldOffset", CC"("FLD")J", FN_PTR(Unsafe_StaticFieldOffset)}, |
duke@435 | 1385 | {CC"staticFieldBase", CC"("FLD")"OBJ, FN_PTR(Unsafe_StaticFieldBaseFromField)}, |
duke@435 | 1386 | {CC"ensureClassInitialized",CC"("CLS")V", FN_PTR(Unsafe_EnsureClassInitialized)}, |
duke@435 | 1387 | {CC"arrayBaseOffset", CC"("CLS")I", FN_PTR(Unsafe_ArrayBaseOffset)}, |
duke@435 | 1388 | {CC"arrayIndexScale", CC"("CLS")I", FN_PTR(Unsafe_ArrayIndexScale)}, |
duke@435 | 1389 | {CC"addressSize", CC"()I", FN_PTR(Unsafe_AddressSize)}, |
duke@435 | 1390 | {CC"pageSize", CC"()I", FN_PTR(Unsafe_PageSize)}, |
duke@435 | 1391 | |
duke@435 | 1392 | {CC"defineClass", CC"("DC0_Args")"CLS, FN_PTR(Unsafe_DefineClass0)}, |
duke@435 | 1393 | {CC"defineClass", CC"("DC1_Args")"CLS, FN_PTR(Unsafe_DefineClass1)}, |
duke@435 | 1394 | {CC"allocateInstance", CC"("CLS")"OBJ, FN_PTR(Unsafe_AllocateInstance)}, |
duke@435 | 1395 | {CC"monitorEnter", CC"("OBJ")V", FN_PTR(Unsafe_MonitorEnter)}, |
duke@435 | 1396 | {CC"monitorExit", CC"("OBJ")V", FN_PTR(Unsafe_MonitorExit)}, |
duke@435 | 1397 | {CC"throwException", CC"("THR")V", FN_PTR(Unsafe_ThrowException)}, |
duke@435 | 1398 | {CC"compareAndSwapObject", CC"("OBJ"J"OBJ""OBJ")Z", FN_PTR(Unsafe_CompareAndSwapObject)}, |
duke@435 | 1399 | {CC"compareAndSwapInt", CC"("OBJ"J""I""I"")Z", FN_PTR(Unsafe_CompareAndSwapInt)}, |
duke@435 | 1400 | {CC"compareAndSwapLong", CC"("OBJ"J""J""J"")Z", FN_PTR(Unsafe_CompareAndSwapLong)}, |
duke@435 | 1401 | {CC"park", CC"(ZJ)V", FN_PTR(Unsafe_Park)}, |
duke@435 | 1402 | {CC"unpark", CC"("OBJ")V", FN_PTR(Unsafe_Unpark)} |
duke@435 | 1403 | |
duke@435 | 1404 | }; |
duke@435 | 1405 | |
duke@435 | 1406 | // These are the correct methods, moving forward: |
duke@435 | 1407 | static JNINativeMethod methods[] = { |
duke@435 | 1408 | |
duke@435 | 1409 | {CC"getObject", CC"("OBJ"J)"OBJ"", FN_PTR(Unsafe_GetObject)}, |
duke@435 | 1410 | {CC"putObject", CC"("OBJ"J"OBJ")V", FN_PTR(Unsafe_SetObject)}, |
duke@435 | 1411 | {CC"getObjectVolatile",CC"("OBJ"J)"OBJ"", FN_PTR(Unsafe_GetObjectVolatile)}, |
duke@435 | 1412 | {CC"putObjectVolatile",CC"("OBJ"J"OBJ")V", FN_PTR(Unsafe_SetObjectVolatile)}, |
duke@435 | 1413 | |
duke@435 | 1414 | |
duke@435 | 1415 | DECLARE_GETSETOOP(Boolean, Z), |
duke@435 | 1416 | DECLARE_GETSETOOP(Byte, B), |
duke@435 | 1417 | DECLARE_GETSETOOP(Short, S), |
duke@435 | 1418 | DECLARE_GETSETOOP(Char, C), |
duke@435 | 1419 | DECLARE_GETSETOOP(Int, I), |
duke@435 | 1420 | DECLARE_GETSETOOP(Long, J), |
duke@435 | 1421 | DECLARE_GETSETOOP(Float, F), |
duke@435 | 1422 | DECLARE_GETSETOOP(Double, D), |
duke@435 | 1423 | |
duke@435 | 1424 | DECLARE_GETSETNATIVE(Byte, B), |
duke@435 | 1425 | DECLARE_GETSETNATIVE(Short, S), |
duke@435 | 1426 | DECLARE_GETSETNATIVE(Char, C), |
duke@435 | 1427 | DECLARE_GETSETNATIVE(Int, I), |
duke@435 | 1428 | DECLARE_GETSETNATIVE(Long, J), |
duke@435 | 1429 | DECLARE_GETSETNATIVE(Float, F), |
duke@435 | 1430 | DECLARE_GETSETNATIVE(Double, D), |
duke@435 | 1431 | |
duke@435 | 1432 | {CC"getAddress", CC"("ADR")"ADR, FN_PTR(Unsafe_GetNativeAddress)}, |
duke@435 | 1433 | {CC"putAddress", CC"("ADR""ADR")V", FN_PTR(Unsafe_SetNativeAddress)}, |
duke@435 | 1434 | |
duke@435 | 1435 | {CC"allocateMemory", CC"(J)"ADR, FN_PTR(Unsafe_AllocateMemory)}, |
duke@435 | 1436 | {CC"reallocateMemory", CC"("ADR"J)"ADR, FN_PTR(Unsafe_ReallocateMemory)}, |
duke@435 | 1437 | // {CC"setMemory", CC"("ADR"JB)V", FN_PTR(Unsafe_SetMemory)}, |
duke@435 | 1438 | // {CC"copyMemory", CC"("ADR ADR"J)V", FN_PTR(Unsafe_CopyMemory)}, |
duke@435 | 1439 | {CC"freeMemory", CC"("ADR")V", FN_PTR(Unsafe_FreeMemory)}, |
duke@435 | 1440 | |
duke@435 | 1441 | {CC"objectFieldOffset", CC"("FLD")J", FN_PTR(Unsafe_ObjectFieldOffset)}, |
duke@435 | 1442 | {CC"staticFieldOffset", CC"("FLD")J", FN_PTR(Unsafe_StaticFieldOffset)}, |
duke@435 | 1443 | {CC"staticFieldBase", CC"("FLD")"OBJ, FN_PTR(Unsafe_StaticFieldBaseFromField)}, |
duke@435 | 1444 | {CC"ensureClassInitialized",CC"("CLS")V", FN_PTR(Unsafe_EnsureClassInitialized)}, |
duke@435 | 1445 | {CC"arrayBaseOffset", CC"("CLS")I", FN_PTR(Unsafe_ArrayBaseOffset)}, |
duke@435 | 1446 | {CC"arrayIndexScale", CC"("CLS")I", FN_PTR(Unsafe_ArrayIndexScale)}, |
duke@435 | 1447 | {CC"addressSize", CC"()I", FN_PTR(Unsafe_AddressSize)}, |
duke@435 | 1448 | {CC"pageSize", CC"()I", FN_PTR(Unsafe_PageSize)}, |
duke@435 | 1449 | |
duke@435 | 1450 | {CC"defineClass", CC"("DC0_Args")"CLS, FN_PTR(Unsafe_DefineClass0)}, |
duke@435 | 1451 | {CC"defineClass", CC"("DC1_Args")"CLS, FN_PTR(Unsafe_DefineClass1)}, |
duke@435 | 1452 | {CC"allocateInstance", CC"("CLS")"OBJ, FN_PTR(Unsafe_AllocateInstance)}, |
duke@435 | 1453 | {CC"monitorEnter", CC"("OBJ")V", FN_PTR(Unsafe_MonitorEnter)}, |
duke@435 | 1454 | {CC"monitorExit", CC"("OBJ")V", FN_PTR(Unsafe_MonitorExit)}, |
duke@435 | 1455 | {CC"tryMonitorEnter", CC"("OBJ")Z", FN_PTR(Unsafe_TryMonitorEnter)}, |
duke@435 | 1456 | {CC"throwException", CC"("THR")V", FN_PTR(Unsafe_ThrowException)}, |
duke@435 | 1457 | {CC"compareAndSwapObject", CC"("OBJ"J"OBJ""OBJ")Z", FN_PTR(Unsafe_CompareAndSwapObject)}, |
duke@435 | 1458 | {CC"compareAndSwapInt", CC"("OBJ"J""I""I"")Z", FN_PTR(Unsafe_CompareAndSwapInt)}, |
duke@435 | 1459 | {CC"compareAndSwapLong", CC"("OBJ"J""J""J"")Z", FN_PTR(Unsafe_CompareAndSwapLong)}, |
duke@435 | 1460 | {CC"putOrderedObject", CC"("OBJ"J"OBJ")V", FN_PTR(Unsafe_SetOrderedObject)}, |
duke@435 | 1461 | {CC"putOrderedInt", CC"("OBJ"JI)V", FN_PTR(Unsafe_SetOrderedInt)}, |
duke@435 | 1462 | {CC"putOrderedLong", CC"("OBJ"JJ)V", FN_PTR(Unsafe_SetOrderedLong)}, |
duke@435 | 1463 | {CC"park", CC"(ZJ)V", FN_PTR(Unsafe_Park)}, |
duke@435 | 1464 | {CC"unpark", CC"("OBJ")V", FN_PTR(Unsafe_Unpark)} |
duke@435 | 1465 | |
duke@435 | 1466 | // {CC"getLoadAverage", CC"([DI)I", FN_PTR(Unsafe_Loadavg)}, |
duke@435 | 1467 | |
duke@435 | 1468 | // {CC"prefetchRead", CC"("OBJ"J)V", FN_PTR(Unsafe_PrefetchRead)}, |
duke@435 | 1469 | // {CC"prefetchWrite", CC"("OBJ"J)V", FN_PTR(Unsafe_PrefetchWrite)} |
duke@435 | 1470 | // {CC"prefetchReadStatic", CC"("OBJ"J)V", FN_PTR(Unsafe_PrefetchRead)}, |
duke@435 | 1471 | // {CC"prefetchWriteStatic",CC"("OBJ"J)V", FN_PTR(Unsafe_PrefetchWrite)} |
duke@435 | 1472 | |
duke@435 | 1473 | }; |
duke@435 | 1474 | |
duke@435 | 1475 | JNINativeMethod loadavg_method[] = { |
duke@435 | 1476 | {CC"getLoadAverage", CC"([DI)I", FN_PTR(Unsafe_Loadavg)} |
duke@435 | 1477 | }; |
duke@435 | 1478 | |
duke@435 | 1479 | JNINativeMethod prefetch_methods[] = { |
duke@435 | 1480 | {CC"prefetchRead", CC"("OBJ"J)V", FN_PTR(Unsafe_PrefetchRead)}, |
duke@435 | 1481 | {CC"prefetchWrite", CC"("OBJ"J)V", FN_PTR(Unsafe_PrefetchWrite)}, |
duke@435 | 1482 | {CC"prefetchReadStatic", CC"("OBJ"J)V", FN_PTR(Unsafe_PrefetchRead)}, |
duke@435 | 1483 | {CC"prefetchWriteStatic",CC"("OBJ"J)V", FN_PTR(Unsafe_PrefetchWrite)} |
duke@435 | 1484 | }; |
duke@435 | 1485 | |
duke@435 | 1486 | JNINativeMethod memcopy_methods[] = { |
duke@435 | 1487 | {CC"copyMemory", CC"("OBJ"J"OBJ"JJ)V", FN_PTR(Unsafe_CopyMemory2)}, |
duke@435 | 1488 | {CC"setMemory", CC"("OBJ"JJB)V", FN_PTR(Unsafe_SetMemory2)} |
duke@435 | 1489 | }; |
duke@435 | 1490 | |
duke@435 | 1491 | JNINativeMethod memcopy_methods_15[] = { |
duke@435 | 1492 | {CC"setMemory", CC"("ADR"JB)V", FN_PTR(Unsafe_SetMemory)}, |
duke@435 | 1493 | {CC"copyMemory", CC"("ADR ADR"J)V", FN_PTR(Unsafe_CopyMemory)} |
duke@435 | 1494 | }; |
duke@435 | 1495 | |
jrose@866 | 1496 | JNINativeMethod anonk_methods[] = { |
jrose@866 | 1497 | {CC"defineAnonymousClass", CC"("DAC_Args")"CLS, FN_PTR(Unsafe_DefineAnonymousClass)}, |
jrose@866 | 1498 | }; |
duke@435 | 1499 | |
duke@435 | 1500 | #undef CC |
duke@435 | 1501 | #undef FN_PTR |
duke@435 | 1502 | |
duke@435 | 1503 | #undef ADR |
duke@435 | 1504 | #undef LANG |
duke@435 | 1505 | #undef OBJ |
duke@435 | 1506 | #undef CLS |
duke@435 | 1507 | #undef CTR |
duke@435 | 1508 | #undef FLD |
duke@435 | 1509 | #undef MTH |
duke@435 | 1510 | #undef THR |
duke@435 | 1511 | #undef DC0_Args |
duke@435 | 1512 | #undef DC1_Args |
duke@435 | 1513 | |
duke@435 | 1514 | #undef DECLARE_GETSETOOP |
duke@435 | 1515 | #undef DECLARE_GETSETNATIVE |
duke@435 | 1516 | |
duke@435 | 1517 | |
duke@435 | 1518 | // This one function is exported, used by NativeLookup. |
duke@435 | 1519 | // The Unsafe_xxx functions above are called only from the interpreter. |
duke@435 | 1520 | // The optimizer looks at names and signatures to recognize |
duke@435 | 1521 | // individual functions. |
duke@435 | 1522 | |
duke@435 | 1523 | JVM_ENTRY(void, JVM_RegisterUnsafeMethods(JNIEnv *env, jclass unsafecls)) |
duke@435 | 1524 | UnsafeWrapper("JVM_RegisterUnsafeMethods"); |
duke@435 | 1525 | { |
duke@435 | 1526 | ThreadToNativeFromVM ttnfv(thread); |
duke@435 | 1527 | { |
duke@435 | 1528 | env->RegisterNatives(unsafecls, loadavg_method, sizeof(loadavg_method)/sizeof(JNINativeMethod)); |
duke@435 | 1529 | if (env->ExceptionOccurred()) { |
duke@435 | 1530 | if (PrintMiscellaneous && (Verbose || WizardMode)) { |
duke@435 | 1531 | tty->print_cr("Warning: SDK 1.6 Unsafe.loadavg not found."); |
duke@435 | 1532 | } |
duke@435 | 1533 | env->ExceptionClear(); |
duke@435 | 1534 | } |
duke@435 | 1535 | } |
duke@435 | 1536 | { |
duke@435 | 1537 | env->RegisterNatives(unsafecls, prefetch_methods, sizeof(prefetch_methods)/sizeof(JNINativeMethod)); |
duke@435 | 1538 | if (env->ExceptionOccurred()) { |
duke@435 | 1539 | if (PrintMiscellaneous && (Verbose || WizardMode)) { |
duke@435 | 1540 | tty->print_cr("Warning: SDK 1.6 Unsafe.prefetchRead/Write not found."); |
duke@435 | 1541 | } |
duke@435 | 1542 | env->ExceptionClear(); |
duke@435 | 1543 | } |
duke@435 | 1544 | } |
duke@435 | 1545 | { |
duke@435 | 1546 | env->RegisterNatives(unsafecls, memcopy_methods, sizeof(memcopy_methods)/sizeof(JNINativeMethod)); |
duke@435 | 1547 | if (env->ExceptionOccurred()) { |
duke@435 | 1548 | if (PrintMiscellaneous && (Verbose || WizardMode)) { |
duke@435 | 1549 | tty->print_cr("Warning: SDK 1.7 Unsafe.copyMemory not found."); |
duke@435 | 1550 | } |
duke@435 | 1551 | env->ExceptionClear(); |
duke@435 | 1552 | env->RegisterNatives(unsafecls, memcopy_methods_15, sizeof(memcopy_methods_15)/sizeof(JNINativeMethod)); |
duke@435 | 1553 | if (env->ExceptionOccurred()) { |
duke@435 | 1554 | if (PrintMiscellaneous && (Verbose || WizardMode)) { |
duke@435 | 1555 | tty->print_cr("Warning: SDK 1.5 Unsafe.copyMemory not found."); |
duke@435 | 1556 | } |
duke@435 | 1557 | env->ExceptionClear(); |
duke@435 | 1558 | } |
duke@435 | 1559 | } |
duke@435 | 1560 | } |
jrose@866 | 1561 | if (AnonymousClasses) { |
jrose@866 | 1562 | env->RegisterNatives(unsafecls, anonk_methods, sizeof(anonk_methods)/sizeof(JNINativeMethod)); |
jrose@866 | 1563 | if (env->ExceptionOccurred()) { |
jrose@866 | 1564 | if (PrintMiscellaneous && (Verbose || WizardMode)) { |
jrose@866 | 1565 | tty->print_cr("Warning: SDK 1.7 Unsafe.defineClass (anonymous version) not found."); |
jrose@866 | 1566 | } |
jrose@866 | 1567 | env->ExceptionClear(); |
jrose@866 | 1568 | } |
jrose@866 | 1569 | } |
duke@435 | 1570 | int status = env->RegisterNatives(unsafecls, methods, sizeof(methods)/sizeof(JNINativeMethod)); |
duke@435 | 1571 | if (env->ExceptionOccurred()) { |
duke@435 | 1572 | if (PrintMiscellaneous && (Verbose || WizardMode)) { |
duke@435 | 1573 | tty->print_cr("Warning: SDK 1.6 version of Unsafe not found."); |
duke@435 | 1574 | } |
duke@435 | 1575 | env->ExceptionClear(); |
duke@435 | 1576 | // %%% For now, be backward compatible with an older class: |
duke@435 | 1577 | status = env->RegisterNatives(unsafecls, methods_15, sizeof(methods_15)/sizeof(JNINativeMethod)); |
duke@435 | 1578 | } |
duke@435 | 1579 | if (env->ExceptionOccurred()) { |
duke@435 | 1580 | if (PrintMiscellaneous && (Verbose || WizardMode)) { |
duke@435 | 1581 | tty->print_cr("Warning: SDK 1.5 version of Unsafe not found."); |
duke@435 | 1582 | } |
duke@435 | 1583 | env->ExceptionClear(); |
duke@435 | 1584 | // %%% For now, be backward compatible with an older class: |
duke@435 | 1585 | status = env->RegisterNatives(unsafecls, methods_141, sizeof(methods_141)/sizeof(JNINativeMethod)); |
duke@435 | 1586 | } |
duke@435 | 1587 | if (env->ExceptionOccurred()) { |
duke@435 | 1588 | if (PrintMiscellaneous && (Verbose || WizardMode)) { |
duke@435 | 1589 | tty->print_cr("Warning: SDK 1.4.1 version of Unsafe not found."); |
duke@435 | 1590 | } |
duke@435 | 1591 | env->ExceptionClear(); |
duke@435 | 1592 | // %%% For now, be backward compatible with an older class: |
duke@435 | 1593 | status = env->RegisterNatives(unsafecls, methods_140, sizeof(methods_140)/sizeof(JNINativeMethod)); |
duke@435 | 1594 | } |
duke@435 | 1595 | guarantee(status == 0, "register unsafe natives"); |
duke@435 | 1596 | } |
duke@435 | 1597 | JVM_END |