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