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 // no precompiled headers 25 #include "ci/ciUtilities.hpp" 26 #include "memory/oopFactory.hpp" 27 #include "oops/objArrayOop.inline.hpp" 28 #include "jvmci/jvmciRuntime.hpp" 29 #include "jvmci/jvmciCompilerToVM.hpp" 30 #include "jvmci/vmStructs_jvmci.hpp" 31 #include "runtime/handles.inline.hpp" 32 #include "runtime/sharedRuntime.hpp" 33 #include "utilities/resourceHash.hpp" 34 35 36 int CompilerToVM::Data::Klass_vtable_start_offset; 37 int CompilerToVM::Data::Klass_vtable_length_offset; 38 39 int CompilerToVM::Data::Method_extra_stack_entries; 40 41 address CompilerToVM::Data::SharedRuntime_ic_miss_stub; 42 address CompilerToVM::Data::SharedRuntime_handle_wrong_method_stub; 43 address CompilerToVM::Data::SharedRuntime_deopt_blob_unpack; 44 address CompilerToVM::Data::SharedRuntime_deopt_blob_uncommon_trap; 45 46 size_t CompilerToVM::Data::ThreadLocalAllocBuffer_alignment_reserve; 47 48 CollectedHeap* CompilerToVM::Data::Universe_collectedHeap; 49 int CompilerToVM::Data::Universe_base_vtable_size; 50 address CompilerToVM::Data::Universe_narrow_oop_base; 51 int CompilerToVM::Data::Universe_narrow_oop_shift; 52 address CompilerToVM::Data::Universe_narrow_klass_base; 53 int CompilerToVM::Data::Universe_narrow_klass_shift; 54 void* CompilerToVM::Data::Universe_non_oop_bits; 55 uintptr_t CompilerToVM::Data::Universe_verify_oop_mask; 56 uintptr_t CompilerToVM::Data::Universe_verify_oop_bits; 57 58 bool CompilerToVM::Data::_supports_inline_contig_alloc; 59 HeapWord** CompilerToVM::Data::_heap_end_addr; 60 HeapWord* volatile* CompilerToVM::Data::_heap_top_addr; 61 int CompilerToVM::Data::_max_oop_map_stack_offset; 62 63 jbyte* CompilerToVM::Data::cardtable_start_address; 64 int CompilerToVM::Data::cardtable_shift; 65 66 int CompilerToVM::Data::vm_page_size; 67 68 int CompilerToVM::Data::sizeof_vtableEntry = sizeof(vtableEntry); 69 int CompilerToVM::Data::sizeof_ExceptionTableElement = sizeof(ExceptionTableElement); 70 int CompilerToVM::Data::sizeof_LocalVariableTableElement = sizeof(LocalVariableTableElement); 71 int CompilerToVM::Data::sizeof_ConstantPool = sizeof(ConstantPool); 72 int CompilerToVM::Data::sizeof_SymbolPointer = sizeof(Symbol*); 73 int CompilerToVM::Data::sizeof_narrowKlass = sizeof(narrowKlass); 74 int CompilerToVM::Data::sizeof_arrayOopDesc = sizeof(arrayOopDesc); 75 int CompilerToVM::Data::sizeof_BasicLock = sizeof(BasicLock); 76 77 address CompilerToVM::Data::dsin; 78 address CompilerToVM::Data::dcos; 79 address CompilerToVM::Data::dtan; 80 address CompilerToVM::Data::dexp; 81 address CompilerToVM::Data::dlog; 82 address CompilerToVM::Data::dlog10; 83 address CompilerToVM::Data::dpow; 84 85 address CompilerToVM::Data::symbol_init; 86 address CompilerToVM::Data::symbol_clinit; 87 88 void CompilerToVM::Data::initialize(TRAPS) { 89 Klass_vtable_start_offset = in_bytes(Klass::vtable_start_offset()); 90 Klass_vtable_length_offset = in_bytes(Klass::vtable_length_offset()); 91 92 Method_extra_stack_entries = Method::extra_stack_entries(); 93 94 SharedRuntime_ic_miss_stub = SharedRuntime::get_ic_miss_stub(); 95 SharedRuntime_handle_wrong_method_stub = SharedRuntime::get_handle_wrong_method_stub(); 96 SharedRuntime_deopt_blob_unpack = SharedRuntime::deopt_blob()->unpack(); 97 SharedRuntime_deopt_blob_uncommon_trap = SharedRuntime::deopt_blob()->uncommon_trap(); 98 99 ThreadLocalAllocBuffer_alignment_reserve = ThreadLocalAllocBuffer::alignment_reserve(); 100 101 Universe_collectedHeap = Universe::heap(); 102 Universe_base_vtable_size = Universe::base_vtable_size(); 103 Universe_narrow_oop_base = Universe::narrow_oop_base(); 104 Universe_narrow_oop_shift = Universe::narrow_oop_shift(); 105 Universe_narrow_klass_base = Universe::narrow_klass_base(); 106 Universe_narrow_klass_shift = Universe::narrow_klass_shift(); 107 Universe_non_oop_bits = Universe::non_oop_word(); 108 Universe_verify_oop_mask = Universe::verify_oop_mask(); 109 Universe_verify_oop_bits = Universe::verify_oop_bits(); 110 111 _supports_inline_contig_alloc = Universe::heap()->supports_inline_contig_alloc(); 112 _heap_end_addr = _supports_inline_contig_alloc ? Universe::heap()->end_addr() : (HeapWord**) -1; 113 _heap_top_addr = _supports_inline_contig_alloc ? Universe::heap()->top_addr() : (HeapWord* volatile*) -1; 114 115 _max_oop_map_stack_offset = (OopMapValue::register_mask - VMRegImpl::stack2reg(0)->value()) * VMRegImpl::stack_slot_size; 116 int max_oop_map_stack_index = _max_oop_map_stack_offset / VMRegImpl::stack_slot_size; 117 assert(OopMapValue::legal_vm_reg_name(VMRegImpl::stack2reg(max_oop_map_stack_index)), "should be valid"); 118 assert(!OopMapValue::legal_vm_reg_name(VMRegImpl::stack2reg(max_oop_map_stack_index + 1)), "should be invalid"); 119 120 symbol_init = (address) vmSymbols::object_initializer_name(); 121 symbol_clinit = (address) vmSymbols::class_initializer_name(); 122 123 BarrierSet* bs = Universe::heap()->barrier_set(); 124 if (bs->is_a(BarrierSet::CardTableBarrierSet)) { 125 jbyte* base = ci_card_table_address(); 126 assert(base != NULL, "unexpected byte_map_base"); 127 cardtable_start_address = base; 128 cardtable_shift = CardTable::card_shift; 129 } else { 130 // No card mark barriers 131 cardtable_start_address = 0; 132 cardtable_shift = 0; 133 } 134 135 vm_page_size = os::vm_page_size(); 136 137 #define SET_TRIGFUNC(name) \ 138 if (StubRoutines::name() != NULL) { \ 139 name = StubRoutines::name(); \ 140 } else { \ 141 name = CAST_FROM_FN_PTR(address, SharedRuntime::name); \ 142 } 143 144 SET_TRIGFUNC(dsin); 145 SET_TRIGFUNC(dcos); 146 SET_TRIGFUNC(dtan); 147 SET_TRIGFUNC(dexp); 148 SET_TRIGFUNC(dlog10); 149 SET_TRIGFUNC(dlog); 150 SET_TRIGFUNC(dpow); 151 152 #undef SET_TRIGFUNC 153 } 154 155 objArrayHandle CompilerToVM::initialize_intrinsics(TRAPS) { 156 objArrayHandle vmIntrinsics = oopFactory::new_objArray_handle(VMIntrinsicMethod::klass(), (vmIntrinsics::ID_LIMIT - 1), CHECK_(objArrayHandle())); 157 int index = 0; 158 // The intrinsics for a class are usually adjacent to each other. 159 // When they are, the string for the class name can be reused. 160 vmSymbols::SID kls_sid = vmSymbols::NO_SID; 161 Handle kls_str; 162 #define VM_SYMBOL_TO_STRING(s) \ 163 java_lang_String::create_from_symbol(vmSymbols::symbol_at(vmSymbols::VM_SYMBOL_ENUM_NAME(s)), CHECK_(objArrayHandle())) 164 #define VM_INTRINSIC_INFO(id, kls, name, sig, ignore_fcode) { \ 165 instanceHandle vmIntrinsicMethod = InstanceKlass::cast(VMIntrinsicMethod::klass())->allocate_instance_handle(CHECK_(objArrayHandle())); \ 166 vmSymbols::SID sid = vmSymbols::VM_SYMBOL_ENUM_NAME(kls); \ 167 if (kls_sid != sid) { \ 168 kls_str = VM_SYMBOL_TO_STRING(kls); \ 169 kls_sid = sid; \ 170 } \ 171 Handle name_str = VM_SYMBOL_TO_STRING(name); \ 172 Handle sig_str = VM_SYMBOL_TO_STRING(sig); \ 173 VMIntrinsicMethod::set_declaringClass(vmIntrinsicMethod, kls_str()); \ 174 VMIntrinsicMethod::set_name(vmIntrinsicMethod, name_str()); \ 175 VMIntrinsicMethod::set_descriptor(vmIntrinsicMethod, sig_str()); \ 176 VMIntrinsicMethod::set_id(vmIntrinsicMethod, vmIntrinsics::id); \ 177 vmIntrinsics->obj_at_put(index++, vmIntrinsicMethod()); \ 178 } 179 180 VM_INTRINSICS_DO(VM_INTRINSIC_INFO, VM_SYMBOL_IGNORE, VM_SYMBOL_IGNORE, VM_SYMBOL_IGNORE, VM_ALIAS_IGNORE) 181 #undef VM_SYMBOL_TO_STRING 182 #undef VM_INTRINSIC_INFO 183 assert(index == vmIntrinsics::ID_LIMIT - 1, "must be"); 184 185 return vmIntrinsics; 186 } 187 188 /** 189 * The set of VM flags known to be used. 190 */ 191 #define PREDEFINED_CONFIG_FLAGS(do_bool_flag, do_intx_flag, do_uintx_flag) \ 192 do_intx_flag(AllocateInstancePrefetchLines) \ 193 do_intx_flag(AllocatePrefetchDistance) \ 194 do_intx_flag(AllocatePrefetchInstr) \ 195 do_intx_flag(AllocatePrefetchLines) \ 196 do_intx_flag(AllocatePrefetchStepSize) \ 197 do_intx_flag(AllocatePrefetchStyle) \ 198 do_intx_flag(BciProfileWidth) \ 199 do_bool_flag(BootstrapJVMCI) \ 200 do_bool_flag(CITime) \ 201 do_bool_flag(CITimeEach) \ 202 do_uintx_flag(CodeCacheSegmentSize) \ 203 do_intx_flag(CodeEntryAlignment) \ 204 do_bool_flag(CompactFields) \ 205 NOT_PRODUCT(do_intx_flag(CompileTheWorldStartAt)) \ 206 NOT_PRODUCT(do_intx_flag(CompileTheWorldStopAt)) \ 207 do_intx_flag(ContendedPaddingWidth) \ 208 do_bool_flag(DontCompileHugeMethods) \ 209 do_bool_flag(EagerJVMCI) \ 210 do_bool_flag(EnableContended) \ 211 do_intx_flag(FieldsAllocationStyle) \ 212 do_bool_flag(FoldStableValues) \ 213 do_bool_flag(ForceUnreachable) \ 214 do_intx_flag(HugeMethodLimit) \ 215 do_bool_flag(Inline) \ 216 do_intx_flag(JVMCICounterSize) \ 217 do_bool_flag(JVMCIPrintProperties) \ 218 do_bool_flag(JVMCIUseFastLocking) \ 219 do_intx_flag(MethodProfileWidth) \ 220 do_intx_flag(ObjectAlignmentInBytes) \ 221 do_bool_flag(PrintInlining) \ 222 do_bool_flag(ReduceInitialCardMarks) \ 223 do_bool_flag(RestrictContended) \ 224 do_intx_flag(StackReservedPages) \ 225 do_intx_flag(StackShadowPages) \ 226 do_bool_flag(TLABStats) \ 227 do_uintx_flag(TLABWasteIncrement) \ 228 do_intx_flag(TypeProfileWidth) \ 229 do_bool_flag(UseAESIntrinsics) \ 230 X86_ONLY(do_intx_flag(UseAVX)) \ 231 do_bool_flag(UseBiasedLocking) \ 232 do_bool_flag(UseCRC32Intrinsics) \ 233 do_bool_flag(UseCompressedClassPointers) \ 234 do_bool_flag(UseCompressedOops) \ 235 do_bool_flag(UseConcMarkSweepGC) \ 236 X86_ONLY(do_bool_flag(UseCountLeadingZerosInstruction)) \ 237 X86_ONLY(do_bool_flag(UseCountTrailingZerosInstruction)) \ 238 do_bool_flag(UseG1GC) \ 239 COMPILER2_PRESENT(do_bool_flag(UseMontgomeryMultiplyIntrinsic)) \ 240 COMPILER2_PRESENT(do_bool_flag(UseMontgomerySquareIntrinsic)) \ 241 COMPILER2_PRESENT(do_bool_flag(UseMulAddIntrinsic)) \ 242 COMPILER2_PRESENT(do_bool_flag(UseMultiplyToLenIntrinsic)) \ 243 do_bool_flag(UsePopCountInstruction) \ 244 do_bool_flag(UseSHA1Intrinsics) \ 245 do_bool_flag(UseSHA256Intrinsics) \ 246 do_bool_flag(UseSHA512Intrinsics) \ 247 do_intx_flag(UseSSE) \ 248 COMPILER2_PRESENT(do_bool_flag(UseSquareToLenIntrinsic)) \ 249 do_bool_flag(UseStackBanging) \ 250 do_bool_flag(UseTLAB) \ 251 do_bool_flag(VerifyOops) \ 252 253 #define BOXED_BOOLEAN(name, value) oop name = ((jboolean)(value) ? boxedTrue() : boxedFalse()) 254 #define BOXED_DOUBLE(name, value) oop name; do { jvalue p; p.d = (jdouble) (value); name = java_lang_boxing_object::create(T_DOUBLE, &p, CHECK_NULL);} while(0) 255 #define BOXED_LONG(name, value) \ 256 oop name; \ 257 do { \ 258 jvalue p; p.j = (jlong) (value); \ 259 Handle* e = longs.get(p.j); \ 260 if (e == NULL) { \ 261 oop o = java_lang_boxing_object::create(T_LONG, &p, CHECK_NULL); \ 262 Handle h(THREAD, o); \ 263 longs.put(p.j, h); \ 264 name = h(); \ 265 } else { \ 266 name = (*e)(); \ 267 } \ 268 } while (0) 269 270 #define CSTRING_TO_JSTRING(name, value) \ 271 Handle name; \ 272 do { \ 273 if (value != NULL) { \ 274 Handle* e = strings.get(value); \ 275 if (e == NULL) { \ 276 Handle h = java_lang_String::create_from_str(value, CHECK_NULL); \ 277 strings.put(value, h); \ 278 name = h; \ 279 } else { \ 280 name = (*e); \ 281 } \ 282 } \ 283 } while (0) 284 285 jobjectArray readConfiguration0(JNIEnv *env, TRAPS) { 286 ResourceMark rm; 287 HandleMark hm; 288 289 // Used to canonicalize Long and String values. 290 ResourceHashtable<jlong, Handle> longs; 291 ResourceHashtable<const char*, Handle, &CompilerToVM::cstring_hash, &CompilerToVM::cstring_equals> strings; 292 293 jvalue prim; 294 prim.z = true; oop boxedTrueOop = java_lang_boxing_object::create(T_BOOLEAN, &prim, CHECK_NULL); 295 Handle boxedTrue(THREAD, boxedTrueOop); 296 prim.z = false; oop boxedFalseOop = java_lang_boxing_object::create(T_BOOLEAN, &prim, CHECK_NULL); 297 Handle boxedFalse(THREAD, boxedFalseOop); 298 299 CompilerToVM::Data::initialize(CHECK_NULL); 300 301 VMField::klass()->initialize(CHECK_NULL); 302 VMFlag::klass()->initialize(CHECK_NULL); 303 VMIntrinsicMethod::klass()->initialize(CHECK_NULL); 304 305 int len = JVMCIVMStructs::localHotSpotVMStructs_count(); 306 objArrayHandle vmFields = oopFactory::new_objArray_handle(VMField::klass(), len, CHECK_NULL); 307 for (int i = 0; i < len ; i++) { 308 VMStructEntry vmField = JVMCIVMStructs::localHotSpotVMStructs[i]; 309 instanceHandle vmFieldObj = InstanceKlass::cast(VMField::klass())->allocate_instance_handle(CHECK_NULL); 310 size_t name_buf_len = strlen(vmField.typeName) + strlen(vmField.fieldName) + 2 /* "::" */; 311 char* name_buf = NEW_RESOURCE_ARRAY_IN_THREAD(THREAD, char, name_buf_len + 1); 312 sprintf(name_buf, "%s::%s", vmField.typeName, vmField.fieldName); 313 CSTRING_TO_JSTRING(name, name_buf); 314 CSTRING_TO_JSTRING(type, vmField.typeString); 315 VMField::set_name(vmFieldObj, name()); 316 VMField::set_type(vmFieldObj, type()); 317 VMField::set_offset(vmFieldObj, vmField.offset); 318 VMField::set_address(vmFieldObj, (jlong) vmField.address); 319 if (vmField.isStatic && vmField.typeString != NULL) { 320 if (strcmp(vmField.typeString, "bool") == 0) { 321 BOXED_BOOLEAN(box, *(jbyte*) vmField.address); 322 VMField::set_value(vmFieldObj, box); 323 } else if (strcmp(vmField.typeString, "int") == 0 || 324 strcmp(vmField.typeString, "jint") == 0) { 325 BOXED_LONG(box, *(jint*) vmField.address); 326 VMField::set_value(vmFieldObj, box); 327 } else if (strcmp(vmField.typeString, "uint64_t") == 0) { 328 BOXED_LONG(box, *(uint64_t*) vmField.address); 329 VMField::set_value(vmFieldObj, box); 330 } else if (strcmp(vmField.typeString, "address") == 0 || 331 strcmp(vmField.typeString, "intptr_t") == 0 || 332 strcmp(vmField.typeString, "uintptr_t") == 0 || 333 strcmp(vmField.typeString, "OopHandle") == 0 || 334 strcmp(vmField.typeString, "size_t") == 0 || 335 // All foo* types are addresses. 336 vmField.typeString[strlen(vmField.typeString) - 1] == '*') { 337 BOXED_LONG(box, *((address*) vmField.address)); 338 VMField::set_value(vmFieldObj, box); 339 } else { 340 JVMCI_ERROR_NULL("VM field %s has unsupported type %s", name_buf, vmField.typeString); 341 } 342 } 343 vmFields->obj_at_put(i, vmFieldObj()); 344 } 345 346 int ints_len = JVMCIVMStructs::localHotSpotVMIntConstants_count(); 347 int longs_len = JVMCIVMStructs::localHotSpotVMLongConstants_count(); 348 len = ints_len + longs_len; 349 objArrayHandle vmConstants = oopFactory::new_objArray_handle(SystemDictionary::Object_klass(), len * 2, CHECK_NULL); 350 int insert = 0; 351 for (int i = 0; i < ints_len ; i++) { 352 VMIntConstantEntry c = JVMCIVMStructs::localHotSpotVMIntConstants[i]; 353 CSTRING_TO_JSTRING(name, c.name); 354 BOXED_LONG(value, c.value); 355 vmConstants->obj_at_put(insert++, name()); 356 vmConstants->obj_at_put(insert++, value); 357 } 358 for (int i = 0; i < longs_len ; i++) { 359 VMLongConstantEntry c = JVMCIVMStructs::localHotSpotVMLongConstants[i]; 360 CSTRING_TO_JSTRING(name, c.name); 361 BOXED_LONG(value, c.value); 362 vmConstants->obj_at_put(insert++, name()); 363 vmConstants->obj_at_put(insert++, value); 364 } 365 assert(insert == len * 2, "must be"); 366 367 len = JVMCIVMStructs::localHotSpotVMAddresses_count(); 368 objArrayHandle vmAddresses = oopFactory::new_objArray_handle(SystemDictionary::Object_klass(), len * 2, CHECK_NULL); 369 for (int i = 0; i < len ; i++) { 370 VMAddressEntry a = JVMCIVMStructs::localHotSpotVMAddresses[i]; 371 CSTRING_TO_JSTRING(name, a.name); 372 BOXED_LONG(value, a.value); 373 vmAddresses->obj_at_put(i * 2, name()); 374 vmAddresses->obj_at_put(i * 2 + 1, value); 375 } 376 377 #define COUNT_FLAG(ignore) +1 378 #ifdef ASSERT 379 #define CHECK_FLAG(type, name) { \ 380 Flag* flag = Flag::find_flag(#name, strlen(#name), /*allow_locked*/ true, /* return_flag */ true); \ 381 assert(flag != NULL, "No such flag named " #name); \ 382 assert(flag->is_##type(), "Flag " #name " is not of type " #type); \ 383 } 384 #else 385 #define CHECK_FLAG(type, name) 386 #endif 387 388 #define ADD_FLAG(type, name, convert) { \ 389 CHECK_FLAG(type, name) \ 390 instanceHandle vmFlagObj = InstanceKlass::cast(VMFlag::klass())->allocate_instance_handle(CHECK_NULL); \ 391 CSTRING_TO_JSTRING(fname, #name); \ 392 CSTRING_TO_JSTRING(ftype, #type); \ 393 VMFlag::set_name(vmFlagObj, fname()); \ 394 VMFlag::set_type(vmFlagObj, ftype()); \ 395 convert(value, name); \ 396 VMFlag::set_value(vmFlagObj, value); \ 397 vmFlags->obj_at_put(i++, vmFlagObj()); \ 398 } 399 #define ADD_BOOL_FLAG(name) ADD_FLAG(bool, name, BOXED_BOOLEAN) 400 #define ADD_INTX_FLAG(name) ADD_FLAG(intx, name, BOXED_LONG) 401 #define ADD_UINTX_FLAG(name) ADD_FLAG(uintx, name, BOXED_LONG) 402 403 len = 0 + PREDEFINED_CONFIG_FLAGS(COUNT_FLAG, COUNT_FLAG, COUNT_FLAG); 404 objArrayHandle vmFlags = oopFactory::new_objArray_handle(VMFlag::klass(), len, CHECK_NULL); 405 int i = 0; 406 PREDEFINED_CONFIG_FLAGS(ADD_BOOL_FLAG, ADD_INTX_FLAG, ADD_UINTX_FLAG) 407 408 objArrayHandle vmIntrinsics = CompilerToVM::initialize_intrinsics(CHECK_NULL); 409 410 objArrayOop data = oopFactory::new_objArray(SystemDictionary::Object_klass(), 5, CHECK_NULL); 411 data->obj_at_put(0, vmFields()); 412 data->obj_at_put(1, vmConstants()); 413 data->obj_at_put(2, vmAddresses()); 414 data->obj_at_put(3, vmFlags()); 415 data->obj_at_put(4, vmIntrinsics()); 416 417 return (jobjectArray) JNIHandles::make_local(THREAD, data); 418 #undef COUNT_FLAG 419 #undef ADD_FLAG 420 #undef ADD_BOOL_FLAG 421 #undef ADD_INTX_FLAG 422 #undef ADD_UINTX_FLAG 423 #undef CHECK_FLAG 424 }