1 /* 2 * Copyright (c) 2011, 2018, Oracle and/or its affiliates. All rights reserved. 3 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER. 4 * 5 * This code is free software; you can redistribute it and/or modify it 6 * under the terms of the GNU General Public License version 2 only, as 7 * published by the Free Software Foundation. 8 * 9 * This code is distributed in the hope that it will be useful, but WITHOUT 10 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or 11 * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License 12 * version 2 for more details (a copy is included in the LICENSE file that 13 * accompanied this code). 14 * 15 * You should have received a copy of the GNU General Public License version 16 * 2 along with this work; if not, write to the Free Software Foundation, 17 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA. 18 * 19 * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA 20 * or visit www.oracle.com if you need additional information or have any 21 * questions. 22 */ 23 24 #include "precompiled.hpp" 25 #include "asm/register.hpp" 26 #include "classfile/vmSymbols.hpp" 27 #include "code/compiledIC.hpp" 28 #include "code/vmreg.inline.hpp" 29 #include "compiler/compileBroker.hpp" 30 #include "compiler/disassembler.hpp" 31 #include "jvmci/jvmciEnv.hpp" 32 #include "jvmci/jvmciCompiler.hpp" 33 #include "jvmci/jvmciCodeInstaller.hpp" 34 #include "jvmci/jvmciJavaClasses.hpp" 35 #include "jvmci/jvmciCompilerToVM.hpp" 36 #include "jvmci/jvmciRuntime.hpp" 37 #include "memory/allocation.inline.hpp" 38 #include "oops/arrayOop.inline.hpp" 39 #include "oops/oop.inline.hpp" 40 #include "oops/objArrayOop.inline.hpp" 41 #include "oops/typeArrayOop.inline.hpp" 42 #include "runtime/interfaceSupport.inline.hpp" 43 #include "runtime/javaCalls.hpp" 44 #include "runtime/jniHandles.inline.hpp" 45 #include "runtime/safepointMechanism.inline.hpp" 46 #include "runtime/sharedRuntime.hpp" 47 #include "utilities/align.hpp" 48 49 // frequently used constants 50 // Allocate them with new so they are never destroyed (otherwise, a 51 // forced exit could destroy these objects while they are still in 52 // use). 53 ConstantOopWriteValue* CodeInstaller::_oop_null_scope_value = new (ResourceObj::C_HEAP, mtCompiler) ConstantOopWriteValue(NULL); 54 ConstantIntValue* CodeInstaller::_int_m1_scope_value = new (ResourceObj::C_HEAP, mtCompiler) ConstantIntValue(-1); 55 ConstantIntValue* CodeInstaller::_int_0_scope_value = new (ResourceObj::C_HEAP, mtCompiler) ConstantIntValue((jint)0); 56 ConstantIntValue* CodeInstaller::_int_1_scope_value = new (ResourceObj::C_HEAP, mtCompiler) ConstantIntValue(1); 57 ConstantIntValue* CodeInstaller::_int_2_scope_value = new (ResourceObj::C_HEAP, mtCompiler) ConstantIntValue(2); 58 LocationValue* CodeInstaller::_illegal_value = new (ResourceObj::C_HEAP, mtCompiler) LocationValue(Location()); 59 60 Method* getMethodFromHotSpotMethod(oop hotspot_method) { 61 assert(hotspot_method != NULL && hotspot_method->is_a(HotSpotResolvedJavaMethodImpl::klass()), "sanity"); 62 return CompilerToVM::asMethod(hotspot_method); 63 } 64 65 VMReg getVMRegFromLocation(Handle location, int total_frame_size, TRAPS) { 66 if (location.is_null()) { 67 THROW_NULL(vmSymbols::java_lang_NullPointerException()); 68 } 69 70 Handle reg(THREAD, code_Location::reg(location)); 71 jint offset = code_Location::offset(location); 72 73 if (reg.not_null()) { 74 // register 75 jint number = code_Register::number(reg); 76 VMReg vmReg = CodeInstaller::get_hotspot_reg(number, CHECK_NULL); 77 if (offset % 4 == 0) { 78 return vmReg->next(offset / 4); 79 } else { 80 JVMCI_ERROR_NULL("unaligned subregister offset %d in oop map", offset); 81 } 82 } else { 83 // stack slot 84 if (offset % 4 == 0) { 85 VMReg vmReg = VMRegImpl::stack2reg(offset / 4); 86 if (!OopMapValue::legal_vm_reg_name(vmReg)) { 87 // This restriction only applies to VMRegs that are used in OopMap but 88 // since that's the only use of VMRegs it's simplest to put this test 89 // here. This test should also be equivalent legal_vm_reg_name but JVMCI 90 // clients can use max_oop_map_stack_stack_offset to detect this problem 91 // directly. The asserts just ensure that the tests are in agreement. 92 assert(offset > CompilerToVM::Data::max_oop_map_stack_offset(), "illegal VMReg"); 93 JVMCI_ERROR_NULL("stack offset %d is too large to be encoded in OopMap (max %d)", 94 offset, CompilerToVM::Data::max_oop_map_stack_offset()); 95 } 96 assert(OopMapValue::legal_vm_reg_name(vmReg), "illegal VMReg"); 97 return vmReg; 98 } else { 99 JVMCI_ERROR_NULL("unaligned stack offset %d in oop map", offset); 100 } 101 } 102 } 103 104 objArrayOop CodeInstaller::sites() { 105 return (objArrayOop) JNIHandles::resolve(_sites_handle); 106 } 107 108 arrayOop CodeInstaller::code() { 109 return (arrayOop) JNIHandles::resolve(_code_handle); 110 } 111 112 arrayOop CodeInstaller::data_section() { 113 return (arrayOop) JNIHandles::resolve(_data_section_handle); 114 } 115 116 objArrayOop CodeInstaller::data_section_patches() { 117 return (objArrayOop) JNIHandles::resolve(_data_section_patches_handle); 118 } 119 120 #ifndef PRODUCT 121 objArrayOop CodeInstaller::comments() { 122 return (objArrayOop) JNIHandles::resolve(_comments_handle); 123 } 124 #endif 125 126 oop CodeInstaller::word_kind() { 127 return JNIHandles::resolve(_word_kind_handle); 128 } 129 130 // creates a HotSpot oop map out of the byte arrays provided by DebugInfo 131 OopMap* CodeInstaller::create_oop_map(Handle debug_info, TRAPS) { 132 Handle reference_map(THREAD, DebugInfo::referenceMap(debug_info)); 133 if (reference_map.is_null()) { 134 THROW_NULL(vmSymbols::java_lang_NullPointerException()); 135 } 136 if (!reference_map->is_a(HotSpotReferenceMap::klass())) { 137 JVMCI_ERROR_NULL("unknown reference map: %s", reference_map->klass()->signature_name()); 138 } 139 if (!_has_wide_vector && SharedRuntime::is_wide_vector(HotSpotReferenceMap::maxRegisterSize(reference_map))) { 140 if (SharedRuntime::polling_page_vectors_safepoint_handler_blob() == NULL) { 141 JVMCI_ERROR_NULL("JVMCI is producing code using vectors larger than the runtime supports"); 142 } 143 _has_wide_vector = true; 144 } 145 OopMap* map = new OopMap(_total_frame_size, _parameter_count); 146 objArrayHandle objects(THREAD, HotSpotReferenceMap::objects(reference_map)); 147 objArrayHandle derivedBase(THREAD, HotSpotReferenceMap::derivedBase(reference_map)); 148 typeArrayHandle sizeInBytes(THREAD, HotSpotReferenceMap::sizeInBytes(reference_map)); 149 if (objects.is_null() || derivedBase.is_null() || sizeInBytes.is_null()) { 150 THROW_NULL(vmSymbols::java_lang_NullPointerException()); 151 } 152 if (objects->length() != derivedBase->length() || objects->length() != sizeInBytes->length()) { 153 JVMCI_ERROR_NULL("arrays in reference map have different sizes: %d %d %d", objects->length(), derivedBase->length(), sizeInBytes->length()); 154 } 155 for (int i = 0; i < objects->length(); i++) { 156 Handle location(THREAD, objects->obj_at(i)); 157 Handle baseLocation(THREAD, derivedBase->obj_at(i)); 158 int bytes = sizeInBytes->int_at(i); 159 160 VMReg vmReg = getVMRegFromLocation(location, _total_frame_size, CHECK_NULL); 161 if (baseLocation.not_null()) { 162 // derived oop 163 #ifdef _LP64 164 if (bytes == 8) { 165 #else 166 if (bytes == 4) { 167 #endif 168 VMReg baseReg = getVMRegFromLocation(baseLocation, _total_frame_size, CHECK_NULL); 169 map->set_derived_oop(vmReg, baseReg); 170 } else { 171 JVMCI_ERROR_NULL("invalid derived oop size in ReferenceMap: %d", bytes); 172 } 173 #ifdef _LP64 174 } else if (bytes == 8) { 175 // wide oop 176 map->set_oop(vmReg); 177 } else if (bytes == 4) { 178 // narrow oop 179 map->set_narrowoop(vmReg); 180 #else 181 } else if (bytes == 4) { 182 map->set_oop(vmReg); 183 #endif 184 } else { 185 JVMCI_ERROR_NULL("invalid oop size in ReferenceMap: %d", bytes); 186 } 187 } 188 189 Handle callee_save_info(THREAD, (oop) DebugInfo::calleeSaveInfo(debug_info)); 190 if (callee_save_info.not_null()) { 191 objArrayHandle registers(THREAD, RegisterSaveLayout::registers(callee_save_info)); 192 typeArrayHandle slots(THREAD, RegisterSaveLayout::slots(callee_save_info)); 193 for (jint i = 0; i < slots->length(); i++) { 194 Handle jvmci_reg (THREAD, registers->obj_at(i)); 195 jint jvmci_reg_number = code_Register::number(jvmci_reg); 196 VMReg hotspot_reg = CodeInstaller::get_hotspot_reg(jvmci_reg_number, CHECK_NULL); 197 // HotSpot stack slots are 4 bytes 198 jint jvmci_slot = slots->int_at(i); 199 jint hotspot_slot = jvmci_slot * VMRegImpl::slots_per_word; 200 VMReg hotspot_slot_as_reg = VMRegImpl::stack2reg(hotspot_slot); 201 map->set_callee_saved(hotspot_slot_as_reg, hotspot_reg); 202 #ifdef _LP64 203 // (copied from generate_oop_map() in c1_Runtime1_x86.cpp) 204 VMReg hotspot_slot_hi_as_reg = VMRegImpl::stack2reg(hotspot_slot + 1); 205 map->set_callee_saved(hotspot_slot_hi_as_reg, hotspot_reg->next()); 206 #endif 207 } 208 } 209 return map; 210 } 211 212 AOTOopRecorder::AOTOopRecorder(Arena* arena, bool deduplicate) : OopRecorder(arena, deduplicate) { 213 _meta_refs = new GrowableArray<jobject>(); 214 } 215 216 int AOTOopRecorder::nr_meta_refs() const { 217 return _meta_refs->length(); 218 } 219 220 jobject AOTOopRecorder::meta_element(int pos) const { 221 return _meta_refs->at(pos); 222 } 223 224 int AOTOopRecorder::find_index(Metadata* h) { 225 JavaThread* THREAD = JavaThread::current(); 226 int oldCount = metadata_count(); 227 int index = this->OopRecorder::find_index(h); 228 int newCount = metadata_count(); 229 230 if (oldCount == newCount) { 231 // found a match 232 return index; 233 } 234 235 vmassert(index + 1 == newCount, "must be last"); 236 237 Klass* klass = NULL; 238 oop result = NULL; 239 if (h->is_klass()) { 240 klass = (Klass*) h; 241 result = CompilerToVM::get_jvmci_type(klass, CATCH); 242 } else if (h->is_method()) { 243 Method* method = (Method*) h; 244 methodHandle mh(method); 245 result = CompilerToVM::get_jvmci_method(method, CATCH); 246 } 247 jobject ref = JNIHandles::make_local(THREAD, result); 248 record_meta_ref(ref, index); 249 250 return index; 251 } 252 253 int AOTOopRecorder::find_index(jobject h) { 254 if (h == NULL) { 255 return 0; 256 } 257 oop javaMirror = JNIHandles::resolve(h); 258 Klass* klass = java_lang_Class::as_Klass(javaMirror); 259 return find_index(klass); 260 } 261 262 void AOTOopRecorder::record_meta_ref(jobject o, int index) { 263 assert(index > 0, "must be 1..n"); 264 index -= 1; // reduce by one to convert to array index 265 266 assert(index == _meta_refs->length(), "must be last"); 267 _meta_refs->append(o); 268 } 269 270 void* CodeInstaller::record_metadata_reference(CodeSection* section, address dest, Handle constant, TRAPS) { 271 /* 272 * This method needs to return a raw (untyped) pointer, since the value of a pointer to the base 273 * class is in general not equal to the pointer of the subclass. When patching metaspace pointers, 274 * the compiler expects a direct pointer to the subclass (Klass* or Method*), not a pointer to the 275 * base class (Metadata* or MetaspaceObj*). 276 */ 277 oop obj = HotSpotMetaspaceConstantImpl::metaspaceObject(constant); 278 if (obj->is_a(HotSpotResolvedObjectTypeImpl::klass())) { 279 Klass* klass = java_lang_Class::as_Klass(HotSpotResolvedObjectTypeImpl::javaClass(obj)); 280 assert(!HotSpotMetaspaceConstantImpl::compressed(constant), "unexpected compressed klass pointer %s @ " INTPTR_FORMAT, klass->name()->as_C_string(), p2i(klass)); 281 int index = _oop_recorder->find_index(klass); 282 section->relocate(dest, metadata_Relocation::spec(index)); 283 TRACE_jvmci_3("metadata[%d of %d] = %s", index, _oop_recorder->metadata_count(), klass->name()->as_C_string()); 284 return klass; 285 } else if (obj->is_a(HotSpotResolvedJavaMethodImpl::klass())) { 286 Method* method = (Method*) (address) HotSpotResolvedJavaMethodImpl::metaspaceMethod(obj); 287 assert(!HotSpotMetaspaceConstantImpl::compressed(constant), "unexpected compressed method pointer %s @ " INTPTR_FORMAT, method->name()->as_C_string(), p2i(method)); 288 int index = _oop_recorder->find_index(method); 289 section->relocate(dest, metadata_Relocation::spec(index)); 290 TRACE_jvmci_3("metadata[%d of %d] = %s", index, _oop_recorder->metadata_count(), method->name()->as_C_string()); 291 return method; 292 } else { 293 JVMCI_ERROR_NULL("unexpected metadata reference for constant of type %s", obj->klass()->signature_name()); 294 } 295 } 296 297 #ifdef _LP64 298 narrowKlass CodeInstaller::record_narrow_metadata_reference(CodeSection* section, address dest, Handle constant, TRAPS) { 299 oop obj = HotSpotMetaspaceConstantImpl::metaspaceObject(constant); 300 assert(HotSpotMetaspaceConstantImpl::compressed(constant), "unexpected uncompressed pointer"); 301 302 if (!obj->is_a(HotSpotResolvedObjectTypeImpl::klass())) { 303 JVMCI_ERROR_0("unexpected compressed pointer of type %s", obj->klass()->signature_name()); 304 } 305 306 Klass* klass = java_lang_Class::as_Klass(HotSpotResolvedObjectTypeImpl::javaClass(obj)); 307 int index = _oop_recorder->find_index(klass); 308 section->relocate(dest, metadata_Relocation::spec(index)); 309 TRACE_jvmci_3("narrowKlass[%d of %d] = %s", index, _oop_recorder->metadata_count(), klass->name()->as_C_string()); 310 return Klass::encode_klass(klass); 311 } 312 #endif 313 314 Location::Type CodeInstaller::get_oop_type(Thread* thread, Handle value) { 315 Handle valueKind(thread, Value::valueKind(value)); 316 Handle platformKind(thread, ValueKind::platformKind(valueKind)); 317 318 if (platformKind == word_kind()) { 319 return Location::oop; 320 } else { 321 return Location::narrowoop; 322 } 323 } 324 325 ScopeValue* CodeInstaller::get_scope_value(Handle value, BasicType type, GrowableArray<ScopeValue*>* objects, ScopeValue* &second, TRAPS) { 326 second = NULL; 327 if (value.is_null()) { 328 THROW_NULL(vmSymbols::java_lang_NullPointerException()); 329 } else if (value == Value::ILLEGAL()) { 330 if (type != T_ILLEGAL) { 331 JVMCI_ERROR_NULL("unexpected illegal value, expected %s", basictype_to_str(type)); 332 } 333 return _illegal_value; 334 } else if (value->is_a(RegisterValue::klass())) { 335 Handle reg(THREAD, RegisterValue::reg(value)); 336 jint number = code_Register::number(reg); 337 VMReg hotspotRegister = get_hotspot_reg(number, CHECK_NULL); 338 if (is_general_purpose_reg(hotspotRegister)) { 339 Location::Type locationType; 340 if (type == T_OBJECT) { 341 locationType = get_oop_type(THREAD, value); 342 } else if (type == T_LONG) { 343 locationType = Location::lng; 344 } else if (type == T_INT || type == T_FLOAT || type == T_SHORT || type == T_CHAR || type == T_BYTE || type == T_BOOLEAN) { 345 locationType = Location::int_in_long; 346 } else { 347 JVMCI_ERROR_NULL("unexpected type %s in cpu register", basictype_to_str(type)); 348 } 349 ScopeValue* value = new LocationValue(Location::new_reg_loc(locationType, hotspotRegister)); 350 if (type == T_LONG) { 351 second = value; 352 } 353 return value; 354 } else { 355 Location::Type locationType; 356 if (type == T_FLOAT) { 357 // this seems weird, but the same value is used in c1_LinearScan 358 locationType = Location::normal; 359 } else if (type == T_DOUBLE) { 360 locationType = Location::dbl; 361 } else { 362 JVMCI_ERROR_NULL("unexpected type %s in floating point register", basictype_to_str(type)); 363 } 364 ScopeValue* value = new LocationValue(Location::new_reg_loc(locationType, hotspotRegister)); 365 if (type == T_DOUBLE) { 366 second = value; 367 } 368 return value; 369 } 370 } else if (value->is_a(StackSlot::klass())) { 371 jint offset = StackSlot::offset(value); 372 if (StackSlot::addFrameSize(value)) { 373 offset += _total_frame_size; 374 } 375 376 Location::Type locationType; 377 if (type == T_OBJECT) { 378 locationType = get_oop_type(THREAD, value); 379 } else if (type == T_LONG) { 380 locationType = Location::lng; 381 } else if (type == T_DOUBLE) { 382 locationType = Location::dbl; 383 } else if (type == T_INT || type == T_FLOAT || type == T_SHORT || type == T_CHAR || type == T_BYTE || type == T_BOOLEAN) { 384 locationType = Location::normal; 385 } else { 386 JVMCI_ERROR_NULL("unexpected type %s in stack slot", basictype_to_str(type)); 387 } 388 ScopeValue* value = new LocationValue(Location::new_stk_loc(locationType, offset)); 389 if (type == T_DOUBLE || type == T_LONG) { 390 second = value; 391 } 392 return value; 393 } else if (value->is_a(JavaConstant::klass())) { 394 if (value->is_a(PrimitiveConstant::klass())) { 395 if (value->is_a(RawConstant::klass())) { 396 jlong prim = PrimitiveConstant::primitive(value); 397 return new ConstantLongValue(prim); 398 } else { 399 Handle primitive_constant_kind(THREAD, PrimitiveConstant::kind(value)); 400 BasicType constantType = JVMCIRuntime::kindToBasicType(primitive_constant_kind, CHECK_NULL); 401 if (type != constantType) { 402 JVMCI_ERROR_NULL("primitive constant type doesn't match, expected %s but got %s", basictype_to_str(type), basictype_to_str(constantType)); 403 } 404 if (type == T_INT || type == T_FLOAT) { 405 jint prim = (jint)PrimitiveConstant::primitive(value); 406 switch (prim) { 407 case -1: return _int_m1_scope_value; 408 case 0: return _int_0_scope_value; 409 case 1: return _int_1_scope_value; 410 case 2: return _int_2_scope_value; 411 default: return new ConstantIntValue(prim); 412 } 413 } else if (type == T_LONG || type == T_DOUBLE) { 414 jlong prim = PrimitiveConstant::primitive(value); 415 second = _int_1_scope_value; 416 return new ConstantLongValue(prim); 417 } else { 418 JVMCI_ERROR_NULL("unexpected primitive constant type %s", basictype_to_str(type)); 419 } 420 } 421 } else if (value->is_a(NullConstant::klass()) || value->is_a(HotSpotCompressedNullConstant::klass())) { 422 if (type == T_OBJECT) { 423 return _oop_null_scope_value; 424 } else { 425 JVMCI_ERROR_NULL("unexpected null constant, expected %s", basictype_to_str(type)); 426 } 427 } else if (value->is_a(HotSpotObjectConstantImpl::klass())) { 428 if (type == T_OBJECT) { 429 oop obj = HotSpotObjectConstantImpl::object(value); 430 if (obj == NULL) { 431 JVMCI_ERROR_NULL("null value must be in NullConstant"); 432 } 433 return new ConstantOopWriteValue(JNIHandles::make_local(obj)); 434 } else { 435 JVMCI_ERROR_NULL("unexpected object constant, expected %s", basictype_to_str(type)); 436 } 437 } 438 } else if (value->is_a(VirtualObject::klass())) { 439 if (type == T_OBJECT) { 440 int id = VirtualObject::id(value); 441 if (0 <= id && id < objects->length()) { 442 ScopeValue* object = objects->at(id); 443 if (object != NULL) { 444 return object; 445 } 446 } 447 JVMCI_ERROR_NULL("unknown virtual object id %d", id); 448 } else { 449 JVMCI_ERROR_NULL("unexpected virtual object, expected %s", basictype_to_str(type)); 450 } 451 } 452 453 JVMCI_ERROR_NULL("unexpected value in scope: %s", value->klass()->signature_name()) 454 } 455 456 void CodeInstaller::record_object_value(ObjectValue* sv, Handle value, GrowableArray<ScopeValue*>* objects, TRAPS) { 457 // Might want a HandleMark here. 458 Handle type(THREAD, VirtualObject::type(value)); 459 int id = VirtualObject::id(value); 460 oop javaMirror = HotSpotResolvedObjectTypeImpl::javaClass(type); 461 Klass* klass = java_lang_Class::as_Klass(javaMirror); 462 bool isLongArray = klass == Universe::longArrayKlassObj(); 463 464 objArrayHandle values(THREAD, VirtualObject::values(value)); 465 objArrayHandle slotKinds(THREAD, VirtualObject::slotKinds(value)); 466 for (jint i = 0; i < values->length(); i++) { 467 HandleMark hm(THREAD); 468 ScopeValue* cur_second = NULL; 469 Handle object(THREAD, values->obj_at(i)); 470 Handle slot_kind (THREAD, slotKinds->obj_at(i)); 471 BasicType type = JVMCIRuntime::kindToBasicType(slot_kind, CHECK); 472 ScopeValue* value = get_scope_value(object, type, objects, cur_second, CHECK); 473 474 if (isLongArray && cur_second == NULL) { 475 // we're trying to put ints into a long array... this isn't really valid, but it's used for some optimizations. 476 // add an int 0 constant 477 cur_second = _int_0_scope_value; 478 } 479 480 if (cur_second != NULL) { 481 sv->field_values()->append(cur_second); 482 } 483 assert(value != NULL, "missing value"); 484 sv->field_values()->append(value); 485 } 486 } 487 488 MonitorValue* CodeInstaller::get_monitor_value(Handle value, GrowableArray<ScopeValue*>* objects, TRAPS) { 489 if (value.is_null()) { 490 THROW_NULL(vmSymbols::java_lang_NullPointerException()); 491 } 492 if (!value->is_a(StackLockValue::klass())) { 493 JVMCI_ERROR_NULL("Monitors must be of type StackLockValue, got %s", value->klass()->signature_name()); 494 } 495 496 ScopeValue* second = NULL; 497 Handle stack_lock_owner(THREAD, StackLockValue::owner(value)); 498 ScopeValue* owner_value = get_scope_value(stack_lock_owner, T_OBJECT, objects, second, CHECK_NULL); 499 assert(second == NULL, "monitor cannot occupy two stack slots"); 500 501 Handle stack_lock_slot(THREAD, StackLockValue::slot(value)); 502 ScopeValue* lock_data_value = get_scope_value(stack_lock_slot, T_LONG, objects, second, CHECK_NULL); 503 assert(second == lock_data_value, "monitor is LONG value that occupies two stack slots"); 504 assert(lock_data_value->is_location(), "invalid monitor location"); 505 Location lock_data_loc = ((LocationValue*)lock_data_value)->location(); 506 507 bool eliminated = false; 508 if (StackLockValue::eliminated(value)) { 509 eliminated = true; 510 } 511 512 return new MonitorValue(owner_value, lock_data_loc, eliminated); 513 } 514 515 void CodeInstaller::initialize_dependencies(oop compiled_code, OopRecorder* recorder, TRAPS) { 516 JavaThread* thread = JavaThread::current(); 517 assert(THREAD == thread, ""); 518 CompilerThread* compilerThread = thread->is_Compiler_thread() ? thread->as_CompilerThread() : NULL; 519 _oop_recorder = recorder; 520 _dependencies = new Dependencies(&_arena, _oop_recorder, compilerThread != NULL ? compilerThread->log() : NULL); 521 objArrayHandle assumptions(THREAD, HotSpotCompiledCode::assumptions(compiled_code)); 522 if (!assumptions.is_null()) { 523 int length = assumptions->length(); 524 for (int i = 0; i < length; ++i) { 525 Handle assumption(THREAD, assumptions->obj_at(i)); 526 if (!assumption.is_null()) { 527 if (assumption->klass() == Assumptions_NoFinalizableSubclass::klass()) { 528 assumption_NoFinalizableSubclass(THREAD, assumption); 529 } else if (assumption->klass() == Assumptions_ConcreteSubtype::klass()) { 530 assumption_ConcreteSubtype(THREAD, assumption); 531 } else if (assumption->klass() == Assumptions_LeafType::klass()) { 532 assumption_LeafType(THREAD, assumption); 533 } else if (assumption->klass() == Assumptions_ConcreteMethod::klass()) { 534 assumption_ConcreteMethod(THREAD, assumption); 535 } else if (assumption->klass() == Assumptions_CallSiteTargetValue::klass()) { 536 assumption_CallSiteTargetValue(THREAD, assumption); 537 } else { 538 JVMCI_ERROR("unexpected Assumption subclass %s", assumption->klass()->signature_name()); 539 } 540 } 541 } 542 } 543 if (JvmtiExport::can_hotswap_or_post_breakpoint()) { 544 objArrayHandle methods(THREAD, HotSpotCompiledCode::methods(compiled_code)); 545 if (!methods.is_null()) { 546 int length = methods->length(); 547 for (int i = 0; i < length; ++i) { 548 Handle method_handle(THREAD, methods->obj_at(i)); 549 methodHandle method = getMethodFromHotSpotMethod(method_handle()); 550 _dependencies->assert_evol_method(method()); 551 } 552 } 553 } 554 } 555 556 RelocBuffer::~RelocBuffer() { 557 if (_buffer != NULL) { 558 FREE_C_HEAP_ARRAY(char, _buffer); 559 } 560 } 561 562 address RelocBuffer::begin() const { 563 if (_buffer != NULL) { 564 return (address) _buffer; 565 } 566 return (address) _static_buffer; 567 } 568 569 void RelocBuffer::set_size(size_t bytes) { 570 assert(bytes <= _size, "can't grow in size!"); 571 _size = bytes; 572 } 573 574 void RelocBuffer::ensure_size(size_t bytes) { 575 assert(_buffer == NULL, "can only be used once"); 576 assert(_size == 0, "can only be used once"); 577 if (bytes >= RelocBuffer::stack_size) { 578 _buffer = NEW_C_HEAP_ARRAY(char, bytes, mtInternal); 579 } 580 _size = bytes; 581 } 582 583 JVMCIEnv::CodeInstallResult CodeInstaller::gather_metadata(Handle target, Handle compiled_code, CodeMetadata& metadata, TRAPS) { 584 CodeBuffer buffer("JVMCI Compiler CodeBuffer for Metadata"); 585 jobject compiled_code_obj = JNIHandles::make_local(compiled_code()); 586 AOTOopRecorder* recorder = new AOTOopRecorder(&_arena, true); 587 initialize_dependencies(JNIHandles::resolve(compiled_code_obj), recorder, CHECK_OK); 588 589 metadata.set_oop_recorder(recorder); 590 591 // Get instructions and constants CodeSections early because we need it. 592 _instructions = buffer.insts(); 593 _constants = buffer.consts(); 594 595 initialize_fields(target(), JNIHandles::resolve(compiled_code_obj), CHECK_OK); 596 JVMCIEnv::CodeInstallResult result = initialize_buffer(buffer, false, CHECK_OK); 597 if (result != JVMCIEnv::ok) { 598 return result; 599 } 600 601 _debug_recorder->pcs_size(); // create the sentinel record 602 603 assert(_debug_recorder->pcs_length() >= 2, "must be at least 2"); 604 605 metadata.set_pc_desc(_debug_recorder->pcs(), _debug_recorder->pcs_length()); 606 metadata.set_scopes(_debug_recorder->stream()->buffer(), _debug_recorder->data_size()); 607 metadata.set_exception_table(&_exception_handler_table); 608 609 RelocBuffer* reloc_buffer = metadata.get_reloc_buffer(); 610 611 reloc_buffer->ensure_size(buffer.total_relocation_size()); 612 size_t size = (size_t) buffer.copy_relocations_to(reloc_buffer->begin(), (CodeBuffer::csize_t) reloc_buffer->size(), true); 613 reloc_buffer->set_size(size); 614 return JVMCIEnv::ok; 615 } 616 617 // constructor used to create a method 618 JVMCIEnv::CodeInstallResult CodeInstaller::install(JVMCICompiler* compiler, Handle target, Handle compiled_code, CodeBlob*& cb, Handle installed_code, Handle speculation_log, TRAPS) { 619 CodeBuffer buffer("JVMCI Compiler CodeBuffer"); 620 jobject compiled_code_obj = JNIHandles::make_local(compiled_code()); 621 OopRecorder* recorder = new OopRecorder(&_arena, true); 622 initialize_dependencies(JNIHandles::resolve(compiled_code_obj), recorder, CHECK_OK); 623 624 // Get instructions and constants CodeSections early because we need it. 625 _instructions = buffer.insts(); 626 _constants = buffer.consts(); 627 628 initialize_fields(target(), JNIHandles::resolve(compiled_code_obj), CHECK_OK); 629 JVMCIEnv::CodeInstallResult result = initialize_buffer(buffer, true, CHECK_OK); 630 if (result != JVMCIEnv::ok) { 631 return result; 632 } 633 634 int stack_slots = _total_frame_size / HeapWordSize; // conversion to words 635 636 if (!compiled_code->is_a(HotSpotCompiledNmethod::klass())) { 637 oop stubName = HotSpotCompiledCode::name(compiled_code_obj); 638 if (stubName == NULL) { 639 JVMCI_ERROR_OK("stub should have a name"); 640 } 641 char* name = strdup(java_lang_String::as_utf8_string(stubName)); 642 cb = RuntimeStub::new_runtime_stub(name, 643 &buffer, 644 CodeOffsets::frame_never_safe, 645 stack_slots, 646 _debug_recorder->_oopmaps, 647 false); 648 result = JVMCIEnv::ok; 649 } else { 650 nmethod* nm = NULL; 651 methodHandle method = getMethodFromHotSpotMethod(HotSpotCompiledNmethod::method(compiled_code)); 652 jint entry_bci = HotSpotCompiledNmethod::entryBCI(compiled_code); 653 jint id = HotSpotCompiledNmethod::id(compiled_code); 654 bool has_unsafe_access = HotSpotCompiledNmethod::hasUnsafeAccess(compiled_code) == JNI_TRUE; 655 JVMCIEnv* env = (JVMCIEnv*) (address) HotSpotCompiledNmethod::jvmciEnv(compiled_code); 656 if (id == -1) { 657 // Make sure a valid compile_id is associated with every compile 658 id = CompileBroker::assign_compile_id_unlocked(Thread::current(), method, entry_bci); 659 } 660 result = JVMCIEnv::register_method(method, nm, entry_bci, &_offsets, _orig_pc_offset, &buffer, 661 stack_slots, _debug_recorder->_oopmaps, &_exception_handler_table, 662 compiler, _debug_recorder, _dependencies, env, id, 663 has_unsafe_access, _has_wide_vector, installed_code, compiled_code, speculation_log); 664 cb = nm->as_codeblob_or_null(); 665 if (nm != NULL && env == NULL) { 666 DirectiveSet* directive = DirectivesStack::getMatchingDirective(method, compiler); 667 bool printnmethods = directive->PrintAssemblyOption || directive->PrintNMethodsOption; 668 if (!printnmethods && (PrintDebugInfo || PrintRelocations || PrintDependencies || PrintExceptionHandlers)) { 669 nm->print_nmethod(printnmethods); 670 } 671 DirectivesStack::release(directive); 672 } 673 } 674 675 if (cb != NULL) { 676 // Make sure the pre-calculated constants section size was correct. 677 guarantee((cb->code_begin() - cb->content_begin()) >= _constants_size, "%d < %d", (int)(cb->code_begin() - cb->content_begin()), _constants_size); 678 } 679 return result; 680 } 681 682 void CodeInstaller::initialize_fields(oop target, oop compiled_code, TRAPS) { 683 if (compiled_code->is_a(HotSpotCompiledNmethod::klass())) { 684 Handle hotspotJavaMethod(THREAD, HotSpotCompiledNmethod::method(compiled_code)); 685 methodHandle method = getMethodFromHotSpotMethod(hotspotJavaMethod()); 686 _parameter_count = method->size_of_parameters(); 687 TRACE_jvmci_2("installing code for %s", method->name_and_sig_as_C_string()); 688 } else { 689 // Must be a HotSpotCompiledRuntimeStub. 690 // Only used in OopMap constructor for non-product builds 691 _parameter_count = 0; 692 } 693 _sites_handle = JNIHandles::make_local(HotSpotCompiledCode::sites(compiled_code)); 694 695 _code_handle = JNIHandles::make_local(HotSpotCompiledCode::targetCode(compiled_code)); 696 _code_size = HotSpotCompiledCode::targetCodeSize(compiled_code); 697 _total_frame_size = HotSpotCompiledCode::totalFrameSize(compiled_code); 698 699 oop deoptRescueSlot = HotSpotCompiledCode::deoptRescueSlot(compiled_code); 700 if (deoptRescueSlot == NULL) { 701 _orig_pc_offset = -1; 702 } else { 703 _orig_pc_offset = StackSlot::offset(deoptRescueSlot); 704 if (StackSlot::addFrameSize(deoptRescueSlot)) { 705 _orig_pc_offset += _total_frame_size; 706 } 707 if (_orig_pc_offset < 0) { 708 JVMCI_ERROR("invalid deopt rescue slot: %d", _orig_pc_offset); 709 } 710 } 711 712 // Pre-calculate the constants section size. This is required for PC-relative addressing. 713 _data_section_handle = JNIHandles::make_local(HotSpotCompiledCode::dataSection(compiled_code)); 714 if ((_constants->alignment() % HotSpotCompiledCode::dataSectionAlignment(compiled_code)) != 0) { 715 JVMCI_ERROR("invalid data section alignment: %d", HotSpotCompiledCode::dataSectionAlignment(compiled_code)); 716 } 717 _constants_size = data_section()->length(); 718 719 _data_section_patches_handle = JNIHandles::make_local(HotSpotCompiledCode::dataSectionPatches(compiled_code)); 720 721 #ifndef PRODUCT 722 _comments_handle = JNIHandles::make_local(HotSpotCompiledCode::comments(compiled_code)); 723 #endif 724 725 _next_call_type = INVOKE_INVALID; 726 727 _has_wide_vector = false; 728 729 oop arch = TargetDescription::arch(target); 730 _word_kind_handle = JNIHandles::make_local(Architecture::wordKind(arch)); 731 } 732 733 int CodeInstaller::estimate_stubs_size(TRAPS) { 734 // Estimate the number of static and aot call stubs that might be emitted. 735 int static_call_stubs = 0; 736 int aot_call_stubs = 0; 737 int trampoline_stubs = 0; 738 objArrayOop sites = this->sites(); 739 for (int i = 0; i < sites->length(); i++) { 740 oop site = sites->obj_at(i); 741 if (site != NULL) { 742 if (site->is_a(site_Mark::klass())) { 743 oop id_obj = site_Mark::id(site); 744 if (id_obj != NULL) { 745 if (!java_lang_boxing_object::is_instance(id_obj, T_INT)) { 746 JVMCI_ERROR_0("expected Integer id, got %s", id_obj->klass()->signature_name()); 747 } 748 jint id = id_obj->int_field(java_lang_boxing_object::value_offset_in_bytes(T_INT)); 749 switch (id) { 750 case INVOKEINTERFACE: 751 case INVOKEVIRTUAL: 752 trampoline_stubs++; 753 break; 754 case INVOKESTATIC: 755 case INVOKESPECIAL: 756 static_call_stubs++; 757 trampoline_stubs++; 758 break; 759 default: 760 break; 761 } 762 } 763 } 764 if (UseAOT && site->is_a(site_Call::klass())) { 765 oop target = site_Call::target(site); 766 InstanceKlass* target_klass = InstanceKlass::cast(target->klass()); 767 if (!target_klass->is_subclass_of(SystemDictionary::HotSpotForeignCallTarget_klass())) { 768 // Add far aot trampolines. 769 aot_call_stubs++; 770 } 771 } 772 } 773 } 774 int size = static_call_stubs * CompiledStaticCall::to_interp_stub_size(); 775 size += trampoline_stubs * CompiledStaticCall::to_trampoline_stub_size(); 776 #if INCLUDE_AOT 777 size += aot_call_stubs * CompiledStaticCall::to_aot_stub_size(); 778 #endif 779 return size; 780 } 781 782 // perform data and call relocation on the CodeBuffer 783 JVMCIEnv::CodeInstallResult CodeInstaller::initialize_buffer(CodeBuffer& buffer, bool check_size, TRAPS) { 784 HandleMark hm; 785 objArrayHandle sites(THREAD, this->sites()); 786 int locs_buffer_size = sites->length() * (relocInfo::length_limit + sizeof(relocInfo)); 787 788 // Allocate enough space in the stub section for the static call 789 // stubs. Stubs have extra relocs but they are managed by the stub 790 // section itself so they don't need to be accounted for in the 791 // locs_buffer above. 792 int stubs_size = estimate_stubs_size(CHECK_OK); 793 int total_size = align_up(_code_size, buffer.insts()->alignment()) + align_up(_constants_size, buffer.consts()->alignment()) + align_up(stubs_size, buffer.stubs()->alignment()); 794 795 if (check_size && total_size > JVMCINMethodSizeLimit) { 796 return JVMCIEnv::code_too_large; 797 } 798 799 buffer.initialize(total_size, locs_buffer_size); 800 if (buffer.blob() == NULL) { 801 return JVMCIEnv::cache_full; 802 } 803 buffer.initialize_stubs_size(stubs_size); 804 buffer.initialize_consts_size(_constants_size); 805 806 _debug_recorder = new DebugInformationRecorder(_oop_recorder); 807 _debug_recorder->set_oopmaps(new OopMapSet()); 808 809 buffer.initialize_oop_recorder(_oop_recorder); 810 811 // copy the constant data into the newly created CodeBuffer 812 address end_data = _constants->start() + _constants_size; 813 memcpy(_constants->start(), data_section()->base(T_BYTE), _constants_size); 814 _constants->set_end(end_data); 815 816 // copy the code into the newly created CodeBuffer 817 address end_pc = _instructions->start() + _code_size; 818 guarantee(_instructions->allocates2(end_pc), "initialize should have reserved enough space for all the code"); 819 memcpy(_instructions->start(), code()->base(T_BYTE), _code_size); 820 _instructions->set_end(end_pc); 821 822 for (int i = 0; i < data_section_patches()->length(); i++) { 823 HandleMark hm(THREAD); 824 Handle patch(THREAD, data_section_patches()->obj_at(i)); 825 if (patch.is_null()) { 826 THROW_(vmSymbols::java_lang_NullPointerException(), JVMCIEnv::ok); 827 } 828 Handle reference(THREAD, site_DataPatch::reference(patch)); 829 if (reference.is_null()) { 830 THROW_(vmSymbols::java_lang_NullPointerException(), JVMCIEnv::ok); 831 } 832 if (!reference->is_a(site_ConstantReference::klass())) { 833 JVMCI_ERROR_OK("invalid patch in data section: %s", reference->klass()->signature_name()); 834 } 835 Handle constant(THREAD, site_ConstantReference::constant(reference)); 836 if (constant.is_null()) { 837 THROW_(vmSymbols::java_lang_NullPointerException(), JVMCIEnv::ok); 838 } 839 address dest = _constants->start() + site_Site::pcOffset(patch); 840 if (constant->is_a(HotSpotMetaspaceConstantImpl::klass())) { 841 if (HotSpotMetaspaceConstantImpl::compressed(constant)) { 842 #ifdef _LP64 843 *((narrowKlass*) dest) = record_narrow_metadata_reference(_constants, dest, constant, CHECK_OK); 844 #else 845 JVMCI_ERROR_OK("unexpected compressed Klass* in 32-bit mode"); 846 #endif 847 } else { 848 *((void**) dest) = record_metadata_reference(_constants, dest, constant, CHECK_OK); 849 } 850 } else if (constant->is_a(HotSpotObjectConstantImpl::klass())) { 851 Handle obj(THREAD, HotSpotObjectConstantImpl::object(constant)); 852 jobject value = JNIHandles::make_local(obj()); 853 int oop_index = _oop_recorder->find_index(value); 854 855 if (HotSpotObjectConstantImpl::compressed(constant)) { 856 #ifdef _LP64 857 _constants->relocate(dest, oop_Relocation::spec(oop_index), relocInfo::narrow_oop_in_const); 858 #else 859 JVMCI_ERROR_OK("unexpected compressed oop in 32-bit mode"); 860 #endif 861 } else { 862 _constants->relocate(dest, oop_Relocation::spec(oop_index)); 863 } 864 } else { 865 JVMCI_ERROR_OK("invalid constant in data section: %s", constant->klass()->signature_name()); 866 } 867 } 868 jint last_pc_offset = -1; 869 for (int i = 0; i < sites->length(); i++) { 870 HandleMark hm(THREAD); 871 Handle site(THREAD, sites->obj_at(i)); 872 if (site.is_null()) { 873 THROW_(vmSymbols::java_lang_NullPointerException(), JVMCIEnv::ok); 874 } 875 876 jint pc_offset = site_Site::pcOffset(site); 877 878 if (site->is_a(site_Call::klass())) { 879 TRACE_jvmci_4("call at %i", pc_offset); 880 site_Call(buffer, pc_offset, site, CHECK_OK); 881 } else if (site->is_a(site_Infopoint::klass())) { 882 // three reasons for infopoints denote actual safepoints 883 oop reason = site_Infopoint::reason(site); 884 if (site_InfopointReason::SAFEPOINT() == reason || site_InfopointReason::CALL() == reason || site_InfopointReason::IMPLICIT_EXCEPTION() == reason) { 885 TRACE_jvmci_4("safepoint at %i", pc_offset); 886 site_Safepoint(buffer, pc_offset, site, CHECK_OK); 887 if (_orig_pc_offset < 0) { 888 JVMCI_ERROR_OK("method contains safepoint, but has no deopt rescue slot"); 889 } 890 } else { 891 TRACE_jvmci_4("infopoint at %i", pc_offset); 892 site_Infopoint(buffer, pc_offset, site, CHECK_OK); 893 } 894 } else if (site->is_a(site_DataPatch::klass())) { 895 TRACE_jvmci_4("datapatch at %i", pc_offset); 896 site_DataPatch(buffer, pc_offset, site, CHECK_OK); 897 } else if (site->is_a(site_Mark::klass())) { 898 TRACE_jvmci_4("mark at %i", pc_offset); 899 site_Mark(buffer, pc_offset, site, CHECK_OK); 900 } else if (site->is_a(site_ExceptionHandler::klass())) { 901 TRACE_jvmci_4("exceptionhandler at %i", pc_offset); 902 site_ExceptionHandler(pc_offset, site); 903 } else { 904 JVMCI_ERROR_OK("unexpected site subclass: %s", site->klass()->signature_name()); 905 } 906 last_pc_offset = pc_offset; 907 908 JavaThread* thread = JavaThread::current(); 909 if (SafepointMechanism::poll(thread)) { 910 // this is a hacky way to force a safepoint check but nothing else was jumping out at me. 911 ThreadToNativeFromVM ttnfv(thread); 912 } 913 } 914 915 #ifndef PRODUCT 916 if (comments() != NULL) { 917 for (int i = 0; i < comments()->length(); i++) { 918 oop comment = comments()->obj_at(i); 919 assert(comment->is_a(HotSpotCompiledCode_Comment::klass()), "cce"); 920 jint offset = HotSpotCompiledCode_Comment::pcOffset(comment); 921 char* text = java_lang_String::as_utf8_string(HotSpotCompiledCode_Comment::text(comment)); 922 buffer.block_comment(offset, text); 923 } 924 } 925 #endif 926 return JVMCIEnv::ok; 927 } 928 929 void CodeInstaller::assumption_NoFinalizableSubclass(Thread* thread, Handle assumption) { 930 Handle receiverType_handle (thread, Assumptions_NoFinalizableSubclass::receiverType(assumption())); 931 Klass* receiverType = java_lang_Class::as_Klass(HotSpotResolvedObjectTypeImpl::javaClass(receiverType_handle)); 932 _dependencies->assert_has_no_finalizable_subclasses(receiverType); 933 } 934 935 void CodeInstaller::assumption_ConcreteSubtype(Thread* thread, Handle assumption) { 936 Handle context_handle (thread, Assumptions_ConcreteSubtype::context(assumption())); 937 Handle subtype_handle (thread, Assumptions_ConcreteSubtype::subtype(assumption())); 938 Klass* context = java_lang_Class::as_Klass(HotSpotResolvedObjectTypeImpl::javaClass(context_handle)); 939 Klass* subtype = java_lang_Class::as_Klass(HotSpotResolvedObjectTypeImpl::javaClass(subtype_handle)); 940 941 assert(context->is_abstract(), ""); 942 _dependencies->assert_abstract_with_unique_concrete_subtype(context, subtype); 943 } 944 945 void CodeInstaller::assumption_LeafType(Thread* thread, Handle assumption) { 946 Handle context_handle (thread, Assumptions_LeafType::context(assumption())); 947 Klass* context = java_lang_Class::as_Klass(HotSpotResolvedObjectTypeImpl::javaClass(context_handle)); 948 949 _dependencies->assert_leaf_type(context); 950 } 951 952 void CodeInstaller::assumption_ConcreteMethod(Thread* thread, Handle assumption) { 953 Handle impl_handle (thread, Assumptions_ConcreteMethod::impl(assumption())); 954 Handle context_handle (thread, Assumptions_ConcreteMethod::context(assumption())); 955 956 methodHandle impl = getMethodFromHotSpotMethod(impl_handle()); 957 Klass* context = java_lang_Class::as_Klass(HotSpotResolvedObjectTypeImpl::javaClass(context_handle)); 958 959 _dependencies->assert_unique_concrete_method(context, impl()); 960 } 961 962 void CodeInstaller::assumption_CallSiteTargetValue(Thread* thread, Handle assumption) { 963 Handle callSite(thread, Assumptions_CallSiteTargetValue::callSite(assumption())); 964 Handle methodHandle(thread, Assumptions_CallSiteTargetValue::methodHandle(assumption())); 965 966 _dependencies->assert_call_site_target_value(callSite(), methodHandle()); 967 } 968 969 void CodeInstaller::site_ExceptionHandler(jint pc_offset, Handle exc) { 970 jint handler_offset = site_ExceptionHandler::handlerPos(exc); 971 972 // Subtable header 973 _exception_handler_table.add_entry(HandlerTableEntry(1, pc_offset, 0)); 974 975 // Subtable entry 976 _exception_handler_table.add_entry(HandlerTableEntry(-1, handler_offset, 0)); 977 } 978 979 // If deoptimization happens, the interpreter should reexecute these bytecodes. 980 // This function mainly helps the compilers to set up the reexecute bit. 981 static bool bytecode_should_reexecute(Bytecodes::Code code) { 982 switch (code) { 983 case Bytecodes::_invokedynamic: 984 case Bytecodes::_invokevirtual: 985 case Bytecodes::_invokeinterface: 986 case Bytecodes::_invokespecial: 987 case Bytecodes::_invokestatic: 988 return false; 989 default: 990 return true; 991 } 992 return true; 993 } 994 995 GrowableArray<ScopeValue*>* CodeInstaller::record_virtual_objects(Handle debug_info, TRAPS) { 996 objArrayHandle virtualObjects(THREAD, DebugInfo::virtualObjectMapping(debug_info)); 997 if (virtualObjects.is_null()) { 998 return NULL; 999 } 1000 GrowableArray<ScopeValue*>* objects = new GrowableArray<ScopeValue*>(virtualObjects->length(), virtualObjects->length(), NULL); 1001 // Create the unique ObjectValues 1002 for (int i = 0; i < virtualObjects->length(); i++) { 1003 HandleMark hm(THREAD); 1004 Handle value(THREAD, virtualObjects->obj_at(i)); 1005 int id = VirtualObject::id(value); 1006 Handle type(THREAD, VirtualObject::type(value)); 1007 oop javaMirror = HotSpotResolvedObjectTypeImpl::javaClass(type); 1008 ObjectValue* sv = new ObjectValue(id, new ConstantOopWriteValue(JNIHandles::make_local(Thread::current(), javaMirror))); 1009 if (id < 0 || id >= objects->length()) { 1010 JVMCI_ERROR_NULL("virtual object id %d out of bounds", id); 1011 } 1012 if (objects->at(id) != NULL) { 1013 JVMCI_ERROR_NULL("duplicate virtual object id %d", id); 1014 } 1015 objects->at_put(id, sv); 1016 } 1017 // All the values which could be referenced by the VirtualObjects 1018 // exist, so now describe all the VirtualObjects themselves. 1019 for (int i = 0; i < virtualObjects->length(); i++) { 1020 HandleMark hm(THREAD); 1021 Handle value(THREAD, virtualObjects->obj_at(i)); 1022 int id = VirtualObject::id(value); 1023 record_object_value(objects->at(id)->as_ObjectValue(), value, objects, CHECK_NULL); 1024 } 1025 _debug_recorder->dump_object_pool(objects); 1026 return objects; 1027 } 1028 1029 void CodeInstaller::record_scope(jint pc_offset, Handle debug_info, ScopeMode scope_mode, bool return_oop, TRAPS) { 1030 Handle position(THREAD, DebugInfo::bytecodePosition(debug_info)); 1031 if (position.is_null()) { 1032 // Stubs do not record scope info, just oop maps 1033 return; 1034 } 1035 1036 GrowableArray<ScopeValue*>* objectMapping; 1037 if (scope_mode == CodeInstaller::FullFrame) { 1038 objectMapping = record_virtual_objects(debug_info, CHECK); 1039 } else { 1040 objectMapping = NULL; 1041 } 1042 record_scope(pc_offset, position, scope_mode, objectMapping, return_oop, CHECK); 1043 } 1044 1045 void CodeInstaller::record_scope(jint pc_offset, Handle position, ScopeMode scope_mode, GrowableArray<ScopeValue*>* objects, bool return_oop, TRAPS) { 1046 Handle frame; 1047 if (scope_mode == CodeInstaller::FullFrame) { 1048 if (!position->is_a(BytecodeFrame::klass())) { 1049 JVMCI_ERROR("Full frame expected for debug info at %i", pc_offset); 1050 } 1051 frame = position; 1052 } 1053 Handle caller_frame (THREAD, BytecodePosition::caller(position)); 1054 if (caller_frame.not_null()) { 1055 record_scope(pc_offset, caller_frame, scope_mode, objects, return_oop, CHECK); 1056 } 1057 1058 Handle hotspot_method (THREAD, BytecodePosition::method(position)); 1059 Method* method = getMethodFromHotSpotMethod(hotspot_method()); 1060 jint bci = BytecodePosition::bci(position); 1061 if (bci == BytecodeFrame::BEFORE_BCI()) { 1062 bci = SynchronizationEntryBCI; 1063 } 1064 1065 TRACE_jvmci_2("Recording scope pc_offset=%d bci=%d method=%s", pc_offset, bci, method->name_and_sig_as_C_string()); 1066 1067 bool reexecute = false; 1068 if (frame.not_null()) { 1069 if (bci == SynchronizationEntryBCI){ 1070 reexecute = false; 1071 } else { 1072 Bytecodes::Code code = Bytecodes::java_code_at(method, method->bcp_from(bci)); 1073 reexecute = bytecode_should_reexecute(code); 1074 if (frame.not_null()) { 1075 reexecute = (BytecodeFrame::duringCall(frame) == JNI_FALSE); 1076 } 1077 } 1078 } 1079 1080 DebugToken* locals_token = NULL; 1081 DebugToken* expressions_token = NULL; 1082 DebugToken* monitors_token = NULL; 1083 bool throw_exception = false; 1084 1085 if (frame.not_null()) { 1086 jint local_count = BytecodeFrame::numLocals(frame); 1087 jint expression_count = BytecodeFrame::numStack(frame); 1088 jint monitor_count = BytecodeFrame::numLocks(frame); 1089 objArrayHandle values(THREAD, BytecodeFrame::values(frame)); 1090 objArrayHandle slotKinds(THREAD, BytecodeFrame::slotKinds(frame)); 1091 1092 if (values.is_null() || slotKinds.is_null()) { 1093 THROW(vmSymbols::java_lang_NullPointerException()); 1094 } 1095 if (local_count + expression_count + monitor_count != values->length()) { 1096 JVMCI_ERROR("unexpected values length %d in scope (%d locals, %d expressions, %d monitors)", values->length(), local_count, expression_count, monitor_count); 1097 } 1098 if (local_count + expression_count != slotKinds->length()) { 1099 JVMCI_ERROR("unexpected slotKinds length %d in scope (%d locals, %d expressions)", slotKinds->length(), local_count, expression_count); 1100 } 1101 1102 GrowableArray<ScopeValue*>* locals = local_count > 0 ? new GrowableArray<ScopeValue*> (local_count) : NULL; 1103 GrowableArray<ScopeValue*>* expressions = expression_count > 0 ? new GrowableArray<ScopeValue*> (expression_count) : NULL; 1104 GrowableArray<MonitorValue*>* monitors = monitor_count > 0 ? new GrowableArray<MonitorValue*> (monitor_count) : NULL; 1105 1106 TRACE_jvmci_2("Scope at bci %d with %d values", bci, values->length()); 1107 TRACE_jvmci_2("%d locals %d expressions, %d monitors", local_count, expression_count, monitor_count); 1108 1109 for (jint i = 0; i < values->length(); i++) { 1110 HandleMark hm(THREAD); 1111 ScopeValue* second = NULL; 1112 Handle value(THREAD, values->obj_at(i)); 1113 if (i < local_count) { 1114 BasicType type = JVMCIRuntime::kindToBasicType(Handle(THREAD, slotKinds->obj_at(i)), CHECK); 1115 ScopeValue* first = get_scope_value(value, type, objects, second, CHECK); 1116 if (second != NULL) { 1117 locals->append(second); 1118 } 1119 locals->append(first); 1120 } else if (i < local_count + expression_count) { 1121 BasicType type = JVMCIRuntime::kindToBasicType(Handle(THREAD, slotKinds->obj_at(i)), CHECK); 1122 ScopeValue* first = get_scope_value(value, type, objects, second, CHECK); 1123 if (second != NULL) { 1124 expressions->append(second); 1125 } 1126 expressions->append(first); 1127 } else { 1128 MonitorValue *monitor = get_monitor_value(value, objects, CHECK); 1129 monitors->append(monitor); 1130 } 1131 if (second != NULL) { 1132 i++; 1133 if (i >= values->length() || values->obj_at(i) != Value::ILLEGAL()) { 1134 JVMCI_ERROR("double-slot value not followed by Value.ILLEGAL"); 1135 } 1136 } 1137 } 1138 1139 locals_token = _debug_recorder->create_scope_values(locals); 1140 expressions_token = _debug_recorder->create_scope_values(expressions); 1141 monitors_token = _debug_recorder->create_monitor_values(monitors); 1142 1143 throw_exception = BytecodeFrame::rethrowException(frame) == JNI_TRUE; 1144 } 1145 1146 _debug_recorder->describe_scope(pc_offset, method, NULL, bci, reexecute, throw_exception, false, return_oop, 1147 locals_token, expressions_token, monitors_token); 1148 } 1149 1150 void CodeInstaller::site_Safepoint(CodeBuffer& buffer, jint pc_offset, Handle site, TRAPS) { 1151 Handle debug_info (THREAD, site_Infopoint::debugInfo(site)); 1152 if (debug_info.is_null()) { 1153 JVMCI_ERROR("debug info expected at safepoint at %i", pc_offset); 1154 } 1155 1156 // address instruction = _instructions->start() + pc_offset; 1157 // jint next_pc_offset = Assembler::locate_next_instruction(instruction) - _instructions->start(); 1158 OopMap *map = create_oop_map(debug_info, CHECK); 1159 _debug_recorder->add_safepoint(pc_offset, map); 1160 record_scope(pc_offset, debug_info, CodeInstaller::FullFrame, CHECK); 1161 _debug_recorder->end_safepoint(pc_offset); 1162 } 1163 1164 void CodeInstaller::site_Infopoint(CodeBuffer& buffer, jint pc_offset, Handle site, TRAPS) { 1165 Handle debug_info (THREAD, site_Infopoint::debugInfo(site)); 1166 if (debug_info.is_null()) { 1167 JVMCI_ERROR("debug info expected at infopoint at %i", pc_offset); 1168 } 1169 1170 // We'd like to check that pc_offset is greater than the 1171 // last pc recorded with _debug_recorder (raising an exception if not) 1172 // but DebugInformationRecorder doesn't have sufficient public API. 1173 1174 _debug_recorder->add_non_safepoint(pc_offset); 1175 record_scope(pc_offset, debug_info, CodeInstaller::BytecodePosition, CHECK); 1176 _debug_recorder->end_non_safepoint(pc_offset); 1177 } 1178 1179 void CodeInstaller::site_Call(CodeBuffer& buffer, jint pc_offset, Handle site, TRAPS) { 1180 Handle target(THREAD, site_Call::target(site)); 1181 InstanceKlass* target_klass = InstanceKlass::cast(target->klass()); 1182 1183 Handle hotspot_method; // JavaMethod 1184 Handle foreign_call; 1185 1186 if (target_klass->is_subclass_of(SystemDictionary::HotSpotForeignCallTarget_klass())) { 1187 foreign_call = target; 1188 } else { 1189 hotspot_method = target; 1190 } 1191 1192 Handle debug_info (THREAD, site_Call::debugInfo(site)); 1193 1194 assert(hotspot_method.not_null() ^ foreign_call.not_null(), "Call site needs exactly one type"); 1195 1196 NativeInstruction* inst = nativeInstruction_at(_instructions->start() + pc_offset); 1197 jint next_pc_offset = CodeInstaller::pd_next_offset(inst, pc_offset, hotspot_method, CHECK); 1198 1199 if (debug_info.not_null()) { 1200 OopMap *map = create_oop_map(debug_info, CHECK); 1201 _debug_recorder->add_safepoint(next_pc_offset, map); 1202 1203 bool return_oop = hotspot_method.not_null() && getMethodFromHotSpotMethod(hotspot_method())->is_returning_oop(); 1204 1205 record_scope(next_pc_offset, debug_info, CodeInstaller::FullFrame, return_oop, CHECK); 1206 } 1207 1208 if (foreign_call.not_null()) { 1209 jlong foreign_call_destination = HotSpotForeignCallTarget::address(foreign_call); 1210 if (_immutable_pic_compilation) { 1211 // Use fake short distance during PIC compilation. 1212 foreign_call_destination = (jlong)(_instructions->start() + pc_offset); 1213 } 1214 CodeInstaller::pd_relocate_ForeignCall(inst, foreign_call_destination, CHECK); 1215 } else { // method != NULL 1216 if (debug_info.is_null()) { 1217 JVMCI_ERROR("debug info expected at call at %i", pc_offset); 1218 } 1219 1220 TRACE_jvmci_3("method call"); 1221 CodeInstaller::pd_relocate_JavaMethod(buffer, hotspot_method, pc_offset, CHECK); 1222 if (_next_call_type == INVOKESTATIC || _next_call_type == INVOKESPECIAL) { 1223 // Need a static call stub for transitions from compiled to interpreted. 1224 CompiledStaticCall::emit_to_interp_stub(buffer, _instructions->start() + pc_offset); 1225 } 1226 #if INCLUDE_AOT 1227 // Trampoline to far aot code. 1228 CompiledStaticCall::emit_to_aot_stub(buffer, _instructions->start() + pc_offset); 1229 #endif 1230 } 1231 1232 _next_call_type = INVOKE_INVALID; 1233 1234 if (debug_info.not_null()) { 1235 _debug_recorder->end_safepoint(next_pc_offset); 1236 } 1237 } 1238 1239 void CodeInstaller::site_DataPatch(CodeBuffer& buffer, jint pc_offset, Handle site, TRAPS) { 1240 Handle reference(THREAD, site_DataPatch::reference(site)); 1241 if (reference.is_null()) { 1242 THROW(vmSymbols::java_lang_NullPointerException()); 1243 } else if (reference->is_a(site_ConstantReference::klass())) { 1244 Handle constant(THREAD, site_ConstantReference::constant(reference)); 1245 if (constant.is_null()) { 1246 THROW(vmSymbols::java_lang_NullPointerException()); 1247 } else if (constant->is_a(HotSpotObjectConstantImpl::klass())) { 1248 if (!_immutable_pic_compilation) { 1249 // Do not patch during PIC compilation. 1250 pd_patch_OopConstant(pc_offset, constant, CHECK); 1251 } 1252 } else if (constant->is_a(HotSpotMetaspaceConstantImpl::klass())) { 1253 if (!_immutable_pic_compilation) { 1254 pd_patch_MetaspaceConstant(pc_offset, constant, CHECK); 1255 } 1256 } else if (constant->is_a(HotSpotSentinelConstant::klass())) { 1257 if (!_immutable_pic_compilation) { 1258 JVMCI_ERROR("sentinel constant not supported for normal compiles: %s", constant->klass()->signature_name()); 1259 } 1260 } else { 1261 JVMCI_ERROR("unknown constant type in data patch: %s", constant->klass()->signature_name()); 1262 } 1263 } else if (reference->is_a(site_DataSectionReference::klass())) { 1264 int data_offset = site_DataSectionReference::offset(reference); 1265 if (0 <= data_offset && data_offset < _constants_size) { 1266 pd_patch_DataSectionReference(pc_offset, data_offset, CHECK); 1267 } else { 1268 JVMCI_ERROR("data offset 0x%X points outside data section (size 0x%X)", data_offset, _constants_size); 1269 } 1270 } else { 1271 JVMCI_ERROR("unknown data patch type: %s", reference->klass()->signature_name()); 1272 } 1273 } 1274 1275 void CodeInstaller::site_Mark(CodeBuffer& buffer, jint pc_offset, Handle site, TRAPS) { 1276 Handle id_obj (THREAD, site_Mark::id(site)); 1277 1278 if (id_obj.not_null()) { 1279 if (!java_lang_boxing_object::is_instance(id_obj(), T_INT)) { 1280 JVMCI_ERROR("expected Integer id, got %s", id_obj->klass()->signature_name()); 1281 } 1282 jint id = id_obj->int_field(java_lang_boxing_object::value_offset_in_bytes(T_INT)); 1283 1284 address pc = _instructions->start() + pc_offset; 1285 1286 switch (id) { 1287 case UNVERIFIED_ENTRY: 1288 _offsets.set_value(CodeOffsets::Entry, pc_offset); 1289 break; 1290 case VERIFIED_ENTRY: 1291 _offsets.set_value(CodeOffsets::Verified_Entry, pc_offset); 1292 break; 1293 case OSR_ENTRY: 1294 _offsets.set_value(CodeOffsets::OSR_Entry, pc_offset); 1295 break; 1296 case EXCEPTION_HANDLER_ENTRY: 1297 _offsets.set_value(CodeOffsets::Exceptions, pc_offset); 1298 break; 1299 case DEOPT_HANDLER_ENTRY: 1300 _offsets.set_value(CodeOffsets::Deopt, pc_offset); 1301 break; 1302 case INVOKEVIRTUAL: 1303 case INVOKEINTERFACE: 1304 case INLINE_INVOKE: 1305 case INVOKESTATIC: 1306 case INVOKESPECIAL: 1307 _next_call_type = (MarkId) id; 1308 _invoke_mark_pc = pc; 1309 break; 1310 case POLL_NEAR: 1311 case POLL_FAR: 1312 case POLL_RETURN_NEAR: 1313 case POLL_RETURN_FAR: 1314 pd_relocate_poll(pc, id, CHECK); 1315 break; 1316 case CARD_TABLE_SHIFT: 1317 case CARD_TABLE_ADDRESS: 1318 case HEAP_TOP_ADDRESS: 1319 case HEAP_END_ADDRESS: 1320 case NARROW_KLASS_BASE_ADDRESS: 1321 case NARROW_OOP_BASE_ADDRESS: 1322 case CRC_TABLE_ADDRESS: 1323 case LOG_OF_HEAP_REGION_GRAIN_BYTES: 1324 case INLINE_CONTIGUOUS_ALLOCATION_SUPPORTED: 1325 break; 1326 default: 1327 JVMCI_ERROR("invalid mark id: %d", id); 1328 break; 1329 } 1330 } 1331 }