1 /* 2 * Copyright (c) 2011, 2025, 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 #ifdef COMPILER1 25 #include "c1/c1_Compiler.hpp" 26 #endif 27 #include "ci/ciUtilities.hpp" 28 #include "compiler/compiler_globals.hpp" 29 #include "compiler/oopMap.hpp" 30 #include "gc/shared/barrierSet.hpp" 31 #include "gc/shared/barrierSetAssembler.hpp" 32 #include "gc/shared/barrierSetNMethod.hpp" 33 #include "gc/shared/cardTable.hpp" 34 #include "gc/shared/collectedHeap.hpp" 35 #include "gc/shared/gc_globals.hpp" 36 #include "gc/shared/tlab_globals.hpp" 37 #if INCLUDE_ZGC 38 #include "gc/z/zBarrierSetRuntime.hpp" 39 #include "gc/z/zThreadLocalData.hpp" 40 #endif 41 #include "jvmci/jvmciCompilerToVM.hpp" 42 #include "jvmci/jvmciEnv.hpp" 43 #include "jvmci/vmStructs_jvmci.hpp" 44 #include "memory/universe.hpp" 45 #include "oops/compressedOops.hpp" 46 #include "oops/klass.inline.hpp" 47 #include "prims/jvmtiExport.hpp" 48 #ifdef COMPILER2 49 #include "opto/c2compiler.hpp" 50 #endif 51 #include "runtime/flags/jvmFlag.hpp" 52 #include "runtime/sharedRuntime.hpp" 53 #include "runtime/stubRoutines.hpp" 54 #include "utilities/resourceHash.hpp" 55 #if INCLUDE_SHENANDOAHGC 56 #include "gc/shenandoah/shenandoahHeap.hpp" 57 #include "gc/shenandoah/shenandoahHeapRegion.hpp" 58 #endif 59 60 int CompilerToVM::Data::oopDesc_klass_offset_in_bytes; 61 int CompilerToVM::Data::arrayOopDesc_length_offset_in_bytes; 62 63 int CompilerToVM::Data::Klass_vtable_start_offset; 64 int CompilerToVM::Data::Klass_vtable_length_offset; 65 66 int CompilerToVM::Data::Method_extra_stack_entries; 67 68 address CompilerToVM::Data::SharedRuntime_ic_miss_stub; 69 address CompilerToVM::Data::SharedRuntime_handle_wrong_method_stub; 70 address CompilerToVM::Data::SharedRuntime_deopt_blob_unpack; 71 address CompilerToVM::Data::SharedRuntime_deopt_blob_unpack_with_exception_in_tls; 72 address CompilerToVM::Data::SharedRuntime_deopt_blob_uncommon_trap; 73 address CompilerToVM::Data::SharedRuntime_polling_page_return_handler; 74 address CompilerToVM::Data::SharedRuntime_throw_delayed_StackOverflowError_entry; 75 76 address CompilerToVM::Data::nmethod_entry_barrier; 77 int CompilerToVM::Data::thread_disarmed_guard_value_offset; 78 int CompilerToVM::Data::thread_address_bad_mask_offset; 79 80 address CompilerToVM::Data::ZBarrierSetRuntime_load_barrier_on_oop_field_preloaded; 81 address CompilerToVM::Data::ZBarrierSetRuntime_load_barrier_on_weak_oop_field_preloaded; 82 address CompilerToVM::Data::ZBarrierSetRuntime_load_barrier_on_phantom_oop_field_preloaded; 83 address CompilerToVM::Data::ZBarrierSetRuntime_weak_load_barrier_on_oop_field_preloaded; 84 address CompilerToVM::Data::ZBarrierSetRuntime_weak_load_barrier_on_weak_oop_field_preloaded; 85 address CompilerToVM::Data::ZBarrierSetRuntime_weak_load_barrier_on_phantom_oop_field_preloaded; 86 address CompilerToVM::Data::ZBarrierSetRuntime_load_barrier_on_oop_array; 87 address CompilerToVM::Data::ZBarrierSetRuntime_clone; 88 89 address CompilerToVM::Data::ZPointerVectorLoadBadMask_address; 90 address CompilerToVM::Data::ZPointerVectorStoreBadMask_address; 91 address CompilerToVM::Data::ZPointerVectorStoreGoodMask_address; 92 93 #if INCLUDE_SHENANDOAHGC 94 address CompilerToVM::Data::shenandoah_in_cset_fast_test_addr; 95 int CompilerToVM::Data::shenandoah_region_size_bytes_shift; 96 #endif 97 98 bool CompilerToVM::Data::continuations_enabled; 99 100 #ifdef AARCH64 101 int CompilerToVM::Data::BarrierSetAssembler_nmethod_patching_type; 102 address CompilerToVM::Data::BarrierSetAssembler_patching_epoch_addr; 103 #endif 104 105 size_t CompilerToVM::Data::ThreadLocalAllocBuffer_alignment_reserve; 106 107 CollectedHeap* CompilerToVM::Data::Universe_collectedHeap; 108 int CompilerToVM::Data::Universe_base_vtable_size; 109 address CompilerToVM::Data::Universe_narrow_oop_base; 110 int CompilerToVM::Data::Universe_narrow_oop_shift; 111 address CompilerToVM::Data::Universe_narrow_klass_base; 112 int CompilerToVM::Data::Universe_narrow_klass_shift; 113 void* CompilerToVM::Data::Universe_non_oop_bits; 114 uintptr_t CompilerToVM::Data::Universe_verify_oop_mask; 115 uintptr_t CompilerToVM::Data::Universe_verify_oop_bits; 116 117 bool CompilerToVM::Data::_supports_inline_contig_alloc; 118 HeapWord** CompilerToVM::Data::_heap_end_addr; 119 HeapWord* volatile* CompilerToVM::Data::_heap_top_addr; 120 int CompilerToVM::Data::_max_oop_map_stack_offset; 121 int CompilerToVM::Data::_fields_annotations_base_offset; 122 123 CardTable::CardValue* CompilerToVM::Data::cardtable_start_address; 124 int CompilerToVM::Data::cardtable_shift; 125 126 #ifdef X86 127 int CompilerToVM::Data::L1_line_size; 128 bool CompilerToVM::Data::supports_avx512_simd_sort; 129 #endif 130 131 size_t CompilerToVM::Data::vm_page_size; 132 133 int CompilerToVM::Data::sizeof_vtableEntry = sizeof(vtableEntry); 134 int CompilerToVM::Data::sizeof_ExceptionTableElement = sizeof(ExceptionTableElement); 135 int CompilerToVM::Data::sizeof_LocalVariableTableElement = sizeof(LocalVariableTableElement); 136 int CompilerToVM::Data::sizeof_ConstantPool = sizeof(ConstantPool); 137 int CompilerToVM::Data::sizeof_narrowKlass = sizeof(narrowKlass); 138 int CompilerToVM::Data::sizeof_arrayOopDesc = sizeof(arrayOopDesc); 139 int CompilerToVM::Data::sizeof_BasicLock = sizeof(BasicLock); 140 #if INCLUDE_ZGC 141 int CompilerToVM::Data::sizeof_ZStoreBarrierEntry = sizeof(ZStoreBarrierEntry); 142 #endif 143 144 address CompilerToVM::Data::dsin; 145 address CompilerToVM::Data::dcos; 146 address CompilerToVM::Data::dtan; 147 address CompilerToVM::Data::dtanh; 148 address CompilerToVM::Data::dcbrt; 149 address CompilerToVM::Data::dexp; 150 address CompilerToVM::Data::dlog; 151 address CompilerToVM::Data::dlog10; 152 address CompilerToVM::Data::dpow; 153 154 address CompilerToVM::Data::symbol_init; 155 address CompilerToVM::Data::symbol_clinit; 156 157 int CompilerToVM::Data::data_section_item_alignment; 158 159 JVMTI_ONLY( int* CompilerToVM::Data::_should_notify_object_alloc; ) 160 161 void CompilerToVM::Data::initialize(JVMCI_TRAPS) { 162 oopDesc_klass_offset_in_bytes = oopDesc::klass_offset_in_bytes(); 163 arrayOopDesc_length_offset_in_bytes = arrayOopDesc::length_offset_in_bytes(); 164 165 Klass_vtable_start_offset = in_bytes(Klass::vtable_start_offset()); 166 Klass_vtable_length_offset = in_bytes(Klass::vtable_length_offset()); 167 168 Method_extra_stack_entries = Method::extra_stack_entries(); 169 170 SharedRuntime_ic_miss_stub = SharedRuntime::get_ic_miss_stub(); 171 SharedRuntime_handle_wrong_method_stub = SharedRuntime::get_handle_wrong_method_stub(); 172 SharedRuntime_deopt_blob_unpack = SharedRuntime::deopt_blob()->unpack(); 173 SharedRuntime_deopt_blob_unpack_with_exception_in_tls = SharedRuntime::deopt_blob()->unpack_with_exception_in_tls(); 174 SharedRuntime_deopt_blob_uncommon_trap = SharedRuntime::deopt_blob()->uncommon_trap(); 175 SharedRuntime_polling_page_return_handler = SharedRuntime::polling_page_return_handler_blob()->entry_point(); 176 SharedRuntime_throw_delayed_StackOverflowError_entry = SharedRuntime::throw_delayed_StackOverflowError_entry(); 177 178 BarrierSetNMethod* bs_nm = BarrierSet::barrier_set()->barrier_set_nmethod(); 179 thread_disarmed_guard_value_offset = in_bytes(bs_nm->thread_disarmed_guard_value_offset()); 180 nmethod_entry_barrier = StubRoutines::method_entry_barrier(); 181 BarrierSetAssembler* bs_asm = BarrierSet::barrier_set()->barrier_set_assembler(); 182 AARCH64_ONLY(BarrierSetAssembler_nmethod_patching_type = (int) bs_asm->nmethod_patching_type()); 183 AARCH64_ONLY(BarrierSetAssembler_patching_epoch_addr = bs_asm->patching_epoch_addr()); 184 185 #if INCLUDE_ZGC 186 if (UseZGC) { 187 ZPointerVectorLoadBadMask_address = (address) &ZPointerVectorLoadBadMask; 188 ZPointerVectorStoreBadMask_address = (address) &ZPointerVectorStoreBadMask; 189 ZPointerVectorStoreGoodMask_address = (address) &ZPointerVectorStoreGoodMask; 190 } 191 #endif 192 193 continuations_enabled = Continuations::enabled(); 194 195 ThreadLocalAllocBuffer_alignment_reserve = ThreadLocalAllocBuffer::alignment_reserve(); 196 197 Universe_collectedHeap = Universe::heap(); 198 Universe_base_vtable_size = Universe::base_vtable_size(); 199 if (UseCompressedOops) { 200 Universe_narrow_oop_base = CompressedOops::base(); 201 Universe_narrow_oop_shift = CompressedOops::shift(); 202 } else { 203 Universe_narrow_oop_base = nullptr; 204 Universe_narrow_oop_shift = 0; 205 } 206 if (UseCompressedClassPointers) { 207 Universe_narrow_klass_base = CompressedKlassPointers::base(); 208 Universe_narrow_klass_shift = CompressedKlassPointers::shift(); 209 } else { 210 Universe_narrow_klass_base = nullptr; 211 Universe_narrow_klass_shift = 0; 212 } 213 Universe_non_oop_bits = Universe::non_oop_word(); 214 Universe_verify_oop_mask = Universe::verify_oop_mask(); 215 Universe_verify_oop_bits = Universe::verify_oop_bits(); 216 217 _supports_inline_contig_alloc = false; 218 _heap_end_addr = (HeapWord**) -1; 219 _heap_top_addr = (HeapWord* volatile*) -1; 220 221 _max_oop_map_stack_offset = (OopMapValue::register_mask - VMRegImpl::stack2reg(0)->value()) * VMRegImpl::stack_slot_size; 222 int max_oop_map_stack_index = _max_oop_map_stack_offset / VMRegImpl::stack_slot_size; 223 assert(OopMapValue::legal_vm_reg_name(VMRegImpl::stack2reg(max_oop_map_stack_index)), "should be valid"); 224 assert(!OopMapValue::legal_vm_reg_name(VMRegImpl::stack2reg(max_oop_map_stack_index + 1)), "should be invalid"); 225 226 symbol_init = (address) vmSymbols::object_initializer_name(); 227 symbol_clinit = (address) vmSymbols::class_initializer_name(); 228 229 _fields_annotations_base_offset = Array<AnnotationArray*>::base_offset_in_bytes(); 230 231 data_section_item_alignment = relocInfo::addr_unit(); 232 233 JVMTI_ONLY( _should_notify_object_alloc = &JvmtiExport::_should_notify_object_alloc; ) 234 235 BarrierSet* bs = BarrierSet::barrier_set(); 236 if (bs->is_a(BarrierSet::CardTableBarrierSet)) { 237 CardTable::CardValue* base = ci_card_table_address(); 238 assert(base != nullptr, "unexpected byte_map_base"); 239 cardtable_start_address = base; 240 cardtable_shift = CardTable::card_shift(); 241 #if INCLUDE_SHENANDOAHGC 242 } else if (bs->is_a(BarrierSet::ShenandoahBarrierSet)) { 243 cardtable_start_address = nullptr; 244 cardtable_shift = CardTable::card_shift(); 245 #endif 246 } else { 247 // No card mark barriers 248 cardtable_start_address = nullptr; 249 cardtable_shift = 0; 250 } 251 252 #if INCLUDE_SHENANDOAHGC 253 if (UseShenandoahGC) { 254 shenandoah_in_cset_fast_test_addr = ShenandoahHeap::in_cset_fast_test_addr(); 255 shenandoah_region_size_bytes_shift = ShenandoahHeapRegion::region_size_bytes_shift_jint(); 256 } 257 #endif 258 259 #ifdef X86 260 L1_line_size = VM_Version::L1_line_size(); 261 supports_avx512_simd_sort = VM_Version::supports_avx512_simd_sort(); 262 #endif 263 264 vm_page_size = os::vm_page_size(); 265 266 #define SET_TRIGFUNC(name) \ 267 if (StubRoutines::name() != nullptr) { \ 268 name = StubRoutines::name(); \ 269 } else { \ 270 name = CAST_FROM_FN_PTR(address, SharedRuntime::name); \ 271 } 272 273 SET_TRIGFUNC(dsin); 274 SET_TRIGFUNC(dcos); 275 SET_TRIGFUNC(dtan); 276 SET_TRIGFUNC(dexp); 277 SET_TRIGFUNC(dlog10); 278 SET_TRIGFUNC(dlog); 279 SET_TRIGFUNC(dpow); 280 281 #undef SET_TRIGFUNC 282 283 #define SET_TRIGFUNC_OR_NULL(name) \ 284 if (StubRoutines::name() != nullptr) { \ 285 name = StubRoutines::name(); \ 286 } else { \ 287 name = nullptr; \ 288 } 289 290 SET_TRIGFUNC_OR_NULL(dtanh); 291 SET_TRIGFUNC_OR_NULL(dcbrt); 292 293 #undef SET_TRIGFUNC_OR_NULL 294 295 296 } 297 298 static jboolean is_c1_supported(vmIntrinsics::ID id){ 299 jboolean supported = false; 300 #ifdef COMPILER1 301 supported = (jboolean) Compiler::is_intrinsic_supported(id); 302 #endif 303 return supported; 304 } 305 306 static jboolean is_c2_supported(vmIntrinsics::ID id){ 307 jboolean supported = false; 308 #ifdef COMPILER2 309 supported = (jboolean) C2Compiler::is_intrinsic_supported(id); 310 #endif 311 return supported; 312 } 313 314 JVMCIObjectArray CompilerToVM::initialize_intrinsics(JVMCI_TRAPS) { 315 int len = vmIntrinsics::number_of_intrinsics() - 1; // Exclude vmIntrinsics::_none, which is 0 316 JVMCIObjectArray vmIntrinsics = JVMCIENV->new_VMIntrinsicMethod_array(len, JVMCI_CHECK_NULL); 317 int index = 0; 318 vmSymbolID kls_sid = vmSymbolID::NO_SID; 319 JVMCIObject kls_str; 320 #define VM_SYMBOL_TO_STRING(s) \ 321 JVMCIENV->create_string(vmSymbols::symbol_at(VM_SYMBOL_ENUM_NAME(s)), JVMCI_CHECK_NULL) 322 #define VM_INTRINSIC_INFO(id, kls, name, sig, ignore_fcode) { \ 323 vmSymbolID sid = VM_SYMBOL_ENUM_NAME(kls); \ 324 if (kls_sid != sid) { \ 325 kls_str = VM_SYMBOL_TO_STRING(kls); \ 326 kls_sid = sid; \ 327 } \ 328 JVMCIObject name_str = VM_SYMBOL_TO_STRING(name); \ 329 JVMCIObject sig_str = VM_SYMBOL_TO_STRING(sig); \ 330 JVMCIObject vmIntrinsicMethod = JVMCIENV->new_VMIntrinsicMethod(kls_str, name_str, sig_str, (jint) vmIntrinsics::id, \ 331 (jboolean) vmIntrinsics::is_intrinsic_available(vmIntrinsics::id), \ 332 is_c1_supported(vmIntrinsics::id), \ 333 is_c2_supported(vmIntrinsics::id), JVMCI_CHECK_NULL); \ 334 JVMCIENV->put_object_at(vmIntrinsics, index++, vmIntrinsicMethod); \ 335 } 336 337 // VM_INTRINSICS_DO does *not* iterate over vmIntrinsics::_none 338 VM_INTRINSICS_DO(VM_INTRINSIC_INFO, VM_SYMBOL_IGNORE, VM_SYMBOL_IGNORE, VM_SYMBOL_IGNORE, VM_ALIAS_IGNORE) 339 #undef VM_SYMBOL_TO_STRING 340 #undef VM_INTRINSIC_INFO 341 342 assert(index == len, "must be"); 343 return vmIntrinsics; 344 } 345 346 #define PREDEFINED_CONFIG_FLAGS(do_bool_flag, do_int_flag, do_size_t_flag, do_intx_flag, do_uintx_flag) \ 347 do_int_flag(AllocateInstancePrefetchLines) \ 348 do_int_flag(AllocatePrefetchDistance) \ 349 do_intx_flag(AllocatePrefetchInstr) \ 350 do_int_flag(AllocatePrefetchLines) \ 351 do_int_flag(AllocatePrefetchStepSize) \ 352 do_int_flag(AllocatePrefetchStyle) \ 353 do_intx_flag(BciProfileWidth) \ 354 do_bool_flag(BootstrapJVMCI) \ 355 do_bool_flag(CITime) \ 356 do_bool_flag(CITimeEach) \ 357 do_size_t_flag(CodeCacheSegmentSize) \ 358 do_intx_flag(CodeEntryAlignment) \ 359 do_int_flag(ContendedPaddingWidth) \ 360 do_bool_flag(DontCompileHugeMethods) \ 361 do_bool_flag(EagerJVMCI) \ 362 do_bool_flag(EnableContended) \ 363 do_bool_flag(FoldStableValues) \ 364 do_bool_flag(ForceUnreachable) \ 365 do_intx_flag(HugeMethodLimit) \ 366 do_bool_flag(Inline) \ 367 do_intx_flag(JVMCICounterSize) \ 368 do_bool_flag(JVMCIPrintProperties) \ 369 do_int_flag(ObjectAlignmentInBytes) \ 370 do_bool_flag(PrintInlining) \ 371 do_bool_flag(ReduceInitialCardMarks) \ 372 do_bool_flag(RestrictContended) \ 373 do_intx_flag(StackReservedPages) \ 374 do_intx_flag(StackShadowPages) \ 375 do_uintx_flag(TLABWasteIncrement) \ 376 do_intx_flag(TypeProfileWidth) \ 377 do_bool_flag(UseAESIntrinsics) \ 378 X86_ONLY(do_int_flag(UseAVX)) \ 379 do_bool_flag(UseCRC32Intrinsics) \ 380 do_bool_flag(UseAdler32Intrinsics) \ 381 do_bool_flag(UseCompressedClassPointers) \ 382 do_bool_flag(UseCompressedOops) \ 383 X86_ONLY(do_bool_flag(UseCountLeadingZerosInstruction)) \ 384 X86_ONLY(do_bool_flag(UseCountTrailingZerosInstruction)) \ 385 do_bool_flag(UseG1GC) \ 386 do_bool_flag(UseParallelGC) \ 387 do_bool_flag(UseSerialGC) \ 388 do_bool_flag(UseZGC) \ 389 do_bool_flag(UseEpsilonGC) \ 390 COMPILER2_PRESENT(do_bool_flag(UseMontgomeryMultiplyIntrinsic)) \ 391 COMPILER2_PRESENT(do_bool_flag(UseMontgomerySquareIntrinsic)) \ 392 COMPILER2_PRESENT(do_bool_flag(UseMulAddIntrinsic)) \ 393 COMPILER2_PRESENT(do_bool_flag(UseMultiplyToLenIntrinsic)) \ 394 do_bool_flag(UsePopCountInstruction) \ 395 do_bool_flag(UseSHA1Intrinsics) \ 396 do_bool_flag(UseSHA256Intrinsics) \ 397 do_bool_flag(UseSHA512Intrinsics) \ 398 X86_ONLY(do_int_flag(UseSSE)) \ 399 COMPILER2_PRESENT(do_bool_flag(UseSquareToLenIntrinsic)) \ 400 do_bool_flag(UseTLAB) \ 401 do_bool_flag(VerifyOops) \ 402 403 #define BOXED_BOOLEAN(name, value) name = ((jboolean)(value) ? boxedTrue : boxedFalse) 404 #define BOXED_DOUBLE(name, value) do { jvalue p; p.d = (jdouble) (value); name = JVMCIENV->create_box(T_DOUBLE, &p, JVMCI_CHECK_NULL);} while(0) 405 #define BOXED_LONG(name, value) \ 406 do { \ 407 jvalue p; p.j = (jlong) (value); \ 408 JVMCIObject* e = longs.get(p.j); \ 409 if (e == nullptr) { \ 410 JVMCIObject h = JVMCIENV->create_box(T_LONG, &p, JVMCI_CHECK_NULL); \ 411 longs.put(p.j, h); \ 412 name = h; \ 413 } else { \ 414 name = (*e); \ 415 } \ 416 } while (0) 417 418 #define CSTRING_TO_JSTRING(name, value) \ 419 JVMCIObject name; \ 420 do { \ 421 if (value != nullptr) { \ 422 JVMCIObject* e = strings.get(value); \ 423 if (e == nullptr) { \ 424 JVMCIObject h = JVMCIENV->create_string(value, JVMCI_CHECK_NULL); \ 425 strings.put(value, h); \ 426 name = h; \ 427 } else { \ 428 name = (*e); \ 429 } \ 430 } \ 431 } while (0) 432 433 jobjectArray readConfiguration0(JNIEnv *env, JVMCI_TRAPS) { 434 JavaThread* THREAD = JavaThread::current(); // For exception macros. 435 ResourceHashtable<jlong, JVMCIObject> longs; 436 ResourceHashtable<const char*, JVMCIObject, 437 256, AnyObj::RESOURCE_AREA, mtInternal, 438 &CompilerToVM::cstring_hash, &CompilerToVM::cstring_equals> strings; 439 440 jvalue prim; 441 prim.z = true; JVMCIObject boxedTrue = JVMCIENV->create_box(T_BOOLEAN, &prim, JVMCI_CHECK_NULL); 442 prim.z = false; JVMCIObject boxedFalse = JVMCIENV->create_box(T_BOOLEAN, &prim, JVMCI_CHECK_NULL); 443 444 CompilerToVM::Data::initialize(JVMCI_CHECK_NULL); 445 446 JVMCIENV->VMField_initialize(JVMCI_CHECK_NULL); 447 JVMCIENV->VMFlag_initialize(JVMCI_CHECK_NULL); 448 JVMCIENV->VMIntrinsicMethod_initialize(JVMCI_CHECK_NULL); 449 450 int len = JVMCIVMStructs::localHotSpotVMStructs_count(); 451 JVMCIObjectArray vmFields = JVMCIENV->new_VMField_array(len, JVMCI_CHECK_NULL); 452 for (int i = 0; i < len ; i++) { 453 VMStructEntry vmField = JVMCIVMStructs::localHotSpotVMStructs[i]; 454 const size_t name_buf_size = strlen(vmField.typeName) + strlen(vmField.fieldName) + 2 + 1 /* "::" */; 455 char* name_buf = NEW_RESOURCE_ARRAY_IN_THREAD(THREAD, char, name_buf_size); 456 os::snprintf_checked(name_buf, name_buf_size, "%s::%s", vmField.typeName, vmField.fieldName); 457 CSTRING_TO_JSTRING(name, name_buf); 458 CSTRING_TO_JSTRING(type, vmField.typeString); 459 JVMCIObject box; 460 if (vmField.isStatic && vmField.typeString != nullptr) { 461 if (strcmp(vmField.typeString, "bool") == 0) { 462 BOXED_BOOLEAN(box, *(jbyte*) vmField.address); 463 assert(box.is_non_null(), "must have a box"); 464 } else if (strcmp(vmField.typeString, "int") == 0 || 465 strcmp(vmField.typeString, "jint") == 0 || 466 strcmp(vmField.typeString, "uint") == 0 || 467 strcmp(vmField.typeString, "uint32_t") == 0) { 468 BOXED_LONG(box, *(jint*) vmField.address); 469 assert(box.is_non_null(), "must have a box"); 470 } else if (strcmp(vmField.typeString, "uint64_t") == 0) { 471 BOXED_LONG(box, *(uint64_t*) vmField.address); 472 assert(box.is_non_null(), "must have a box"); 473 } else if (strcmp(vmField.typeString, "address") == 0 || 474 strcmp(vmField.typeString, "intptr_t") == 0 || 475 strcmp(vmField.typeString, "uintptr_t") == 0 || 476 strcmp(vmField.typeString, "OopHandle") == 0 || 477 strcmp(vmField.typeString, "VM_Version::VM_Features") == 0 || 478 strcmp(vmField.typeString, "size_t") == 0 || 479 // All foo* types are addresses. 480 vmField.typeString[strlen(vmField.typeString) - 1] == '*') { 481 BOXED_LONG(box, *((address*) vmField.address)); 482 assert(box.is_non_null(), "must have a box"); 483 } else { 484 JVMCI_ERROR_NULL("VM field %s has unsupported type %s", name_buf, vmField.typeString); 485 } 486 } 487 JVMCIObject vmFieldObj = JVMCIENV->new_VMField(name, type, vmField.offset, (jlong) vmField.address, box, JVMCI_CHECK_NULL); 488 JVMCIENV->put_object_at(vmFields, i, vmFieldObj); 489 } 490 491 int ints_len = JVMCIVMStructs::localHotSpotVMIntConstants_count(); 492 int longs_len = JVMCIVMStructs::localHotSpotVMLongConstants_count(); 493 len = ints_len + longs_len; 494 JVMCIObjectArray vmConstants = JVMCIENV->new_Object_array(len * 2, JVMCI_CHECK_NULL); 495 int insert = 0; 496 for (int i = 0; i < ints_len ; i++) { 497 VMIntConstantEntry c = JVMCIVMStructs::localHotSpotVMIntConstants[i]; 498 CSTRING_TO_JSTRING(name, c.name); 499 JVMCIObject value; 500 BOXED_LONG(value, c.value); 501 JVMCIENV->put_object_at(vmConstants, insert++, name); 502 JVMCIENV->put_object_at(vmConstants, insert++, value); 503 } 504 for (int i = 0; i < longs_len ; i++) { 505 VMLongConstantEntry c = JVMCIVMStructs::localHotSpotVMLongConstants[i]; 506 CSTRING_TO_JSTRING(name, c.name); 507 JVMCIObject value; 508 BOXED_LONG(value, c.value); 509 JVMCIENV->put_object_at(vmConstants, insert++, name); 510 JVMCIENV->put_object_at(vmConstants, insert++, value); 511 } 512 assert(insert == len * 2, "must be"); 513 514 len = JVMCIVMStructs::localHotSpotVMAddresses_count(); 515 JVMCIObjectArray vmAddresses = JVMCIENV->new_Object_array(len * 2, JVMCI_CHECK_NULL); 516 for (int i = 0; i < len ; i++) { 517 VMAddressEntry a = JVMCIVMStructs::localHotSpotVMAddresses[i]; 518 CSTRING_TO_JSTRING(name, a.name); 519 JVMCIObject value; 520 BOXED_LONG(value, a.value); 521 JVMCIENV->put_object_at(vmAddresses, i * 2, name); 522 JVMCIENV->put_object_at(vmAddresses, i * 2 + 1, value); 523 } 524 525 #define COUNT_FLAG(ignore) +1 526 #ifdef ASSERT 527 #define CHECK_FLAG(type, name) { \ 528 const JVMFlag* flag = JVMFlag::find_declared_flag(#name); \ 529 assert(flag != nullptr, "No such flag named " #name); \ 530 assert(flag->is_##type(), "JVMFlag " #name " is not of type " #type); \ 531 } 532 #else 533 #define CHECK_FLAG(type, name) 534 #endif 535 536 #define ADD_FLAG(type, name, convert) { \ 537 CHECK_FLAG(type, name) \ 538 CSTRING_TO_JSTRING(fname, #name); \ 539 CSTRING_TO_JSTRING(ftype, #type); \ 540 convert(value, name); \ 541 JVMCIObject vmFlagObj = JVMCIENV->new_VMFlag(fname, ftype, value, JVMCI_CHECK_NULL); \ 542 JVMCIENV->put_object_at(vmFlags, i++, vmFlagObj); \ 543 } 544 #define ADD_BOOL_FLAG(name) ADD_FLAG(bool, name, BOXED_BOOLEAN) 545 #define ADD_INT_FLAG(name) ADD_FLAG(int, name, BOXED_LONG) 546 #define ADD_SIZE_T_FLAG(name) ADD_FLAG(size_t, name, BOXED_LONG) 547 #define ADD_INTX_FLAG(name) ADD_FLAG(intx, name, BOXED_LONG) 548 #define ADD_UINTX_FLAG(name) ADD_FLAG(uintx, name, BOXED_LONG) 549 550 len = 0 + PREDEFINED_CONFIG_FLAGS(COUNT_FLAG, COUNT_FLAG, COUNT_FLAG, COUNT_FLAG, COUNT_FLAG); 551 JVMCIObjectArray vmFlags = JVMCIENV->new_VMFlag_array(len, JVMCI_CHECK_NULL); 552 int i = 0; 553 JVMCIObject value; 554 PREDEFINED_CONFIG_FLAGS(ADD_BOOL_FLAG, ADD_INT_FLAG, ADD_SIZE_T_FLAG, ADD_INTX_FLAG, ADD_UINTX_FLAG) 555 556 JVMCIObjectArray vmIntrinsics = CompilerToVM::initialize_intrinsics(JVMCI_CHECK_NULL); 557 558 JVMCIObjectArray data = JVMCIENV->new_Object_array(5, JVMCI_CHECK_NULL); 559 JVMCIENV->put_object_at(data, 0, vmFields); 560 JVMCIENV->put_object_at(data, 1, vmConstants); 561 JVMCIENV->put_object_at(data, 2, vmAddresses); 562 JVMCIENV->put_object_at(data, 3, vmFlags); 563 JVMCIENV->put_object_at(data, 4, vmIntrinsics); 564 565 return JVMCIENV->get_jobjectArray(data); 566 }