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