Mon, 12 Aug 2019 18:30:40 +0300
8223147: JFR Backport
8199712: Flight Recorder
8203346: JFR: Inconsistent signature of jfr_add_string_constant
8195817: JFR.stop should require name of recording
8195818: JFR.start should increase autogenerated name by one
8195819: Remove recording=x from jcmd JFR.check output
8203921: JFR thread sampling is missing fixes from JDK-8194552
8203929: Limit amount of data for JFR.dump
8203664: JFR start failure after AppCDS archive created with JFR StartFlightRecording
8003209: JFR events for network utilization
8207392: [PPC64] Implement JFR profiling
8202835: jfr/event/os/TestSystemProcess.java fails on missing events
Summary: Backport JFR from JDK11. Initial integration
Reviewed-by: neugens
duke@435 | 1 | /* |
dholmes@9532 | 2 | * Copyright (c) 1998, 2018, Oracle and/or its affiliates. All rights reserved. |
duke@435 | 3 | * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER. |
duke@435 | 4 | * |
duke@435 | 5 | * This code is free software; you can redistribute it and/or modify it |
duke@435 | 6 | * under the terms of the GNU General Public License version 2 only, as |
duke@435 | 7 | * published by the Free Software Foundation. |
duke@435 | 8 | * |
duke@435 | 9 | * This code is distributed in the hope that it will be useful, but WITHOUT |
duke@435 | 10 | * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or |
duke@435 | 11 | * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License |
duke@435 | 12 | * version 2 for more details (a copy is included in the LICENSE file that |
duke@435 | 13 | * accompanied this code). |
duke@435 | 14 | * |
duke@435 | 15 | * You should have received a copy of the GNU General Public License version |
duke@435 | 16 | * 2 along with this work; if not, write to the Free Software Foundation, |
duke@435 | 17 | * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA. |
duke@435 | 18 | * |
trims@1907 | 19 | * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA |
trims@1907 | 20 | * or visit www.oracle.com if you need additional information or have any |
trims@1907 | 21 | * questions. |
duke@435 | 22 | * |
duke@435 | 23 | */ |
duke@435 | 24 | |
stefank@2314 | 25 | #include "precompiled.hpp" |
stefank@2314 | 26 | #include "gc_implementation/shared/markSweep.inline.hpp" |
stefank@2314 | 27 | #include "interpreter/interpreter.hpp" |
stefank@2314 | 28 | #include "interpreter/rewriter.hpp" |
stefank@2314 | 29 | #include "memory/universe.inline.hpp" |
coleenp@4037 | 30 | #include "oops/cpCache.hpp" |
stefank@2314 | 31 | #include "oops/objArrayOop.hpp" |
stefank@2314 | 32 | #include "oops/oop.inline.hpp" |
stefank@2314 | 33 | #include "prims/jvmtiRedefineClassesTrace.hpp" |
twisti@3969 | 34 | #include "prims/methodHandles.hpp" |
stefank@2314 | 35 | #include "runtime/handles.inline.hpp" |
goetz@6911 | 36 | #include "runtime/orderAccess.inline.hpp" |
jprovino@4542 | 37 | #include "utilities/macros.hpp" |
jprovino@4542 | 38 | #if INCLUDE_ALL_GCS |
coleenp@4037 | 39 | # include "gc_implementation/parallelScavenge/psPromotionManager.hpp" |
jprovino@4542 | 40 | #endif // INCLUDE_ALL_GCS |
duke@435 | 41 | |
drchase@6680 | 42 | PRAGMA_FORMAT_MUTE_WARNINGS_FOR_GCC |
duke@435 | 43 | |
drchase@6680 | 44 | // Implementation of ConstantPoolCacheEntry |
duke@435 | 45 | |
jrose@1494 | 46 | void ConstantPoolCacheEntry::initialize_entry(int index) { |
jrose@1161 | 47 | assert(0 < index && index < 0x10000, "sanity check"); |
duke@435 | 48 | _indices = index; |
coleenp@4712 | 49 | _f1 = NULL; |
coleenp@4712 | 50 | _f2 = _flags = 0; |
jrose@1161 | 51 | assert(constant_pool_index() == index, ""); |
duke@435 | 52 | } |
duke@435 | 53 | |
twisti@3969 | 54 | int ConstantPoolCacheEntry::make_flags(TosState state, |
twisti@3969 | 55 | int option_bits, |
twisti@3969 | 56 | int field_index_or_method_params) { |
twisti@3969 | 57 | assert(state < number_of_states, "Invalid state in make_flags"); |
twisti@3969 | 58 | int f = ((int)state << tos_state_shift) | option_bits | field_index_or_method_params; |
duke@435 | 59 | // Preserve existing flag bit values |
twisti@3969 | 60 | // The low bits are a field offset, or else the method parameter size. |
duke@435 | 61 | #ifdef ASSERT |
twisti@3969 | 62 | TosState old_state = flag_state(); |
twisti@3969 | 63 | assert(old_state == (TosState)0 || old_state == state, |
duke@435 | 64 | "inconsistent cpCache flags state"); |
duke@435 | 65 | #endif |
duke@435 | 66 | return (_flags | f) ; |
duke@435 | 67 | } |
duke@435 | 68 | |
duke@435 | 69 | void ConstantPoolCacheEntry::set_bytecode_1(Bytecodes::Code code) { |
duke@435 | 70 | #ifdef ASSERT |
duke@435 | 71 | // Read once. |
duke@435 | 72 | volatile Bytecodes::Code c = bytecode_1(); |
duke@435 | 73 | assert(c == 0 || c == code || code == 0, "update must be consistent"); |
duke@435 | 74 | #endif |
duke@435 | 75 | // Need to flush pending stores here before bytecode is written. |
twisti@3969 | 76 | OrderAccess::release_store_ptr(&_indices, _indices | ((u_char)code << bytecode_1_shift)); |
duke@435 | 77 | } |
duke@435 | 78 | |
duke@435 | 79 | void ConstantPoolCacheEntry::set_bytecode_2(Bytecodes::Code code) { |
duke@435 | 80 | #ifdef ASSERT |
duke@435 | 81 | // Read once. |
duke@435 | 82 | volatile Bytecodes::Code c = bytecode_2(); |
duke@435 | 83 | assert(c == 0 || c == code || code == 0, "update must be consistent"); |
duke@435 | 84 | #endif |
duke@435 | 85 | // Need to flush pending stores here before bytecode is written. |
twisti@3969 | 86 | OrderAccess::release_store_ptr(&_indices, _indices | ((u_char)code << bytecode_2_shift)); |
duke@435 | 87 | } |
duke@435 | 88 | |
twisti@3969 | 89 | // Sets f1, ordering with previous writes. |
coleenp@4037 | 90 | void ConstantPoolCacheEntry::release_set_f1(Metadata* f1) { |
twisti@3969 | 91 | assert(f1 != NULL, ""); |
coleenp@4037 | 92 | OrderAccess::release_store_ptr((HeapWord*) &_f1, f1); |
twisti@3969 | 93 | } |
twisti@3969 | 94 | |
twisti@3969 | 95 | // Sets flags, but only if the value was previously zero. |
twisti@3969 | 96 | bool ConstantPoolCacheEntry::init_flags_atomic(intptr_t flags) { |
twisti@3969 | 97 | intptr_t result = Atomic::cmpxchg_ptr(flags, &_flags, 0); |
twisti@3969 | 98 | return (result == 0); |
twisti@2553 | 99 | } |
twisti@2258 | 100 | |
duke@435 | 101 | // Note that concurrent update of both bytecodes can leave one of them |
duke@435 | 102 | // reset to zero. This is harmless; the interpreter will simply re-resolve |
duke@435 | 103 | // the damaged entry. More seriously, the memory synchronization is needed |
duke@435 | 104 | // to flush other fields (f1, f2) completely to memory before the bytecodes |
duke@435 | 105 | // are updated, lest other processors see a non-zero bytecode but zero f1/f2. |
duke@435 | 106 | void ConstantPoolCacheEntry::set_field(Bytecodes::Code get_code, |
duke@435 | 107 | Bytecodes::Code put_code, |
duke@435 | 108 | KlassHandle field_holder, |
never@3137 | 109 | int field_index, |
duke@435 | 110 | int field_offset, |
duke@435 | 111 | TosState field_type, |
duke@435 | 112 | bool is_final, |
coleenp@4037 | 113 | bool is_volatile, |
coleenp@4037 | 114 | Klass* root_klass) { |
coleenp@4037 | 115 | set_f1(field_holder()); |
duke@435 | 116 | set_f2(field_offset); |
twisti@3969 | 117 | assert((field_index & field_index_mask) == field_index, |
duke@435 | 118 | "field index does not fit in low flag bits"); |
twisti@3969 | 119 | set_field_flags(field_type, |
twisti@3969 | 120 | ((is_volatile ? 1 : 0) << is_volatile_shift) | |
twisti@3969 | 121 | ((is_final ? 1 : 0) << is_final_shift), |
twisti@3969 | 122 | field_index); |
duke@435 | 123 | set_bytecode_1(get_code); |
duke@435 | 124 | set_bytecode_2(put_code); |
duke@435 | 125 | NOT_PRODUCT(verify(tty)); |
duke@435 | 126 | } |
duke@435 | 127 | |
twisti@3969 | 128 | void ConstantPoolCacheEntry::set_parameter_size(int value) { |
twisti@3969 | 129 | // This routine is called only in corner cases where the CPCE is not yet initialized. |
twisti@3969 | 130 | // See AbstractInterpreter::deopt_continue_after_entry. |
twisti@3969 | 131 | assert(_flags == 0 || parameter_size() == 0 || parameter_size() == value, |
twisti@3969 | 132 | err_msg("size must not change: parameter_size=%d, value=%d", parameter_size(), value)); |
twisti@3969 | 133 | // Setting the parameter size by itself is only safe if the |
twisti@3969 | 134 | // current value of _flags is 0, otherwise another thread may have |
twisti@3969 | 135 | // updated it and we don't want to overwrite that value. Don't |
twisti@3969 | 136 | // bother trying to update it once it's nonzero but always make |
twisti@3969 | 137 | // sure that the final parameter size agrees with what was passed. |
twisti@3969 | 138 | if (_flags == 0) { |
twisti@3969 | 139 | Atomic::cmpxchg_ptr((value & parameter_size_mask), &_flags, 0); |
twisti@3969 | 140 | } |
twisti@3969 | 141 | guarantee(parameter_size() == value, |
twisti@3969 | 142 | err_msg("size must not change: parameter_size=%d, value=%d", parameter_size(), value)); |
duke@435 | 143 | } |
duke@435 | 144 | |
drchase@5732 | 145 | void ConstantPoolCacheEntry::set_direct_or_vtable_call(Bytecodes::Code invoke_code, |
drchase@5732 | 146 | methodHandle method, |
coleenp@8739 | 147 | int vtable_index, |
coleenp@8739 | 148 | bool sender_is_interface) { |
drchase@5732 | 149 | bool is_vtable_call = (vtable_index >= 0); // FIXME: split this method on this boolean |
duke@435 | 150 | assert(method->interpreter_entry() != NULL, "should have been set at this point"); |
duke@435 | 151 | assert(!method->is_obsolete(), "attempt to write obsolete method to cpCache"); |
duke@435 | 152 | |
duke@435 | 153 | int byte_no = -1; |
twisti@3969 | 154 | bool change_to_virtual = false; |
twisti@3969 | 155 | |
duke@435 | 156 | switch (invoke_code) { |
twisti@3969 | 157 | case Bytecodes::_invokeinterface: |
twisti@3969 | 158 | // We get here from InterpreterRuntime::resolve_invoke when an invokeinterface |
twisti@3969 | 159 | // instruction somehow links to a non-interface method (in Object). |
twisti@3969 | 160 | // In that case, the method has no itable index and must be invoked as a virtual. |
twisti@3969 | 161 | // Set a flag to keep track of this corner case. |
twisti@3969 | 162 | change_to_virtual = true; |
twisti@3969 | 163 | |
twisti@3969 | 164 | // ...and fall through as if we were handling invokevirtual: |
duke@435 | 165 | case Bytecodes::_invokevirtual: |
twisti@3969 | 166 | { |
drchase@5732 | 167 | if (!is_vtable_call) { |
drchase@5732 | 168 | assert(method->can_be_statically_bound(), ""); |
twisti@3969 | 169 | // set_f2_as_vfinal_method checks if is_vfinal flag is true. |
twisti@3969 | 170 | set_method_flags(as_TosState(method->result_type()), |
twisti@3969 | 171 | ( 1 << is_vfinal_shift) | |
twisti@3969 | 172 | ((method->is_final_method() ? 1 : 0) << is_final_shift) | |
twisti@3969 | 173 | ((change_to_virtual ? 1 : 0) << is_forced_virtual_shift), |
twisti@3969 | 174 | method()->size_of_parameters()); |
twisti@3969 | 175 | set_f2_as_vfinal_method(method()); |
duke@435 | 176 | } else { |
drchase@5732 | 177 | assert(!method->can_be_statically_bound(), ""); |
duke@435 | 178 | assert(vtable_index >= 0, "valid index"); |
twisti@3969 | 179 | assert(!method->is_final_method(), "sanity"); |
twisti@3969 | 180 | set_method_flags(as_TosState(method->result_type()), |
twisti@3969 | 181 | ((change_to_virtual ? 1 : 0) << is_forced_virtual_shift), |
twisti@3969 | 182 | method()->size_of_parameters()); |
duke@435 | 183 | set_f2(vtable_index); |
duke@435 | 184 | } |
duke@435 | 185 | byte_no = 2; |
duke@435 | 186 | break; |
jrose@2015 | 187 | } |
jrose@2015 | 188 | |
duke@435 | 189 | case Bytecodes::_invokespecial: |
duke@435 | 190 | case Bytecodes::_invokestatic: |
drchase@5732 | 191 | assert(!is_vtable_call, ""); |
twisti@3969 | 192 | // Note: Read and preserve the value of the is_vfinal flag on any |
twisti@3969 | 193 | // invokevirtual bytecode shared with this constant pool cache entry. |
twisti@3969 | 194 | // It is cheap and safe to consult is_vfinal() at all times. |
twisti@3969 | 195 | // Once is_vfinal is set, it must stay that way, lest we get a dangling oop. |
twisti@3969 | 196 | set_method_flags(as_TosState(method->result_type()), |
twisti@3969 | 197 | ((is_vfinal() ? 1 : 0) << is_vfinal_shift) | |
twisti@3969 | 198 | ((method->is_final_method() ? 1 : 0) << is_final_shift), |
twisti@3969 | 199 | method()->size_of_parameters()); |
duke@435 | 200 | set_f1(method()); |
duke@435 | 201 | byte_no = 1; |
duke@435 | 202 | break; |
duke@435 | 203 | default: |
duke@435 | 204 | ShouldNotReachHere(); |
duke@435 | 205 | break; |
duke@435 | 206 | } |
duke@435 | 207 | |
duke@435 | 208 | // Note: byte_no also appears in TemplateTable::resolve. |
duke@435 | 209 | if (byte_no == 1) { |
twisti@3969 | 210 | assert(invoke_code != Bytecodes::_invokevirtual && |
twisti@3969 | 211 | invoke_code != Bytecodes::_invokeinterface, ""); |
dholmes@9532 | 212 | bool do_resolve = true; |
coleenp@8739 | 213 | // Don't mark invokespecial to method as resolved if sender is an interface. The receiver |
coleenp@8739 | 214 | // has to be checked that it is a subclass of the current class every time this bytecode |
coleenp@8739 | 215 | // is executed. |
dholmes@9532 | 216 | if (invoke_code == Bytecodes::_invokespecial && sender_is_interface && |
dholmes@9532 | 217 | method->name() != vmSymbols::object_initializer_name()) { |
dholmes@9532 | 218 | do_resolve = false; |
dholmes@9532 | 219 | } |
dholmes@9532 | 220 | // Don't mark invokestatic to method as resolved if the holder class has not yet completed |
dholmes@9532 | 221 | // initialization. An invokestatic must only proceed if the class is initialized, but if |
dholmes@9532 | 222 | // we resolve it before then that class initialization check is skipped. |
dholmes@9532 | 223 | if (invoke_code == Bytecodes::_invokestatic && !method->method_holder()->is_initialized()) { |
dholmes@9532 | 224 | do_resolve = false; |
dholmes@9532 | 225 | } |
dholmes@9532 | 226 | if (do_resolve) { |
dholmes@9532 | 227 | set_bytecode_1(invoke_code); |
coleenp@8739 | 228 | } |
duke@435 | 229 | } else if (byte_no == 2) { |
duke@435 | 230 | if (change_to_virtual) { |
twisti@3969 | 231 | assert(invoke_code == Bytecodes::_invokeinterface, ""); |
duke@435 | 232 | // NOTE: THIS IS A HACK - BE VERY CAREFUL!!! |
duke@435 | 233 | // |
duke@435 | 234 | // Workaround for the case where we encounter an invokeinterface, but we |
duke@435 | 235 | // should really have an _invokevirtual since the resolved method is a |
duke@435 | 236 | // virtual method in java.lang.Object. This is a corner case in the spec |
duke@435 | 237 | // but is presumably legal. javac does not generate this code. |
duke@435 | 238 | // |
hseigel@9076 | 239 | // We do not set bytecode_1() to _invokeinterface, because that is the |
hseigel@9076 | 240 | // bytecode # used by the interpreter to see if it is resolved. In this |
hseigel@9076 | 241 | // case, the method gets reresolved with caller for each interface call |
hseigel@9076 | 242 | // because the actual selected method may not be public. |
hseigel@9076 | 243 | // |
duke@435 | 244 | // We set bytecode_2() to _invokevirtual. |
duke@435 | 245 | // See also interpreterRuntime.cpp. (8/25/2000) |
duke@435 | 246 | } else { |
twisti@3969 | 247 | assert(invoke_code == Bytecodes::_invokevirtual, ""); |
duke@435 | 248 | } |
twisti@3969 | 249 | // set up for invokevirtual, even if linking for invokeinterface also: |
twisti@3969 | 250 | set_bytecode_2(Bytecodes::_invokevirtual); |
duke@435 | 251 | } else { |
duke@435 | 252 | ShouldNotReachHere(); |
duke@435 | 253 | } |
duke@435 | 254 | NOT_PRODUCT(verify(tty)); |
duke@435 | 255 | } |
duke@435 | 256 | |
coleenp@8739 | 257 | void ConstantPoolCacheEntry::set_direct_call(Bytecodes::Code invoke_code, methodHandle method, |
coleenp@8739 | 258 | bool sender_is_interface) { |
drchase@5732 | 259 | int index = Method::nonvirtual_vtable_index; |
drchase@5732 | 260 | // index < 0; FIXME: inline and customize set_direct_or_vtable_call |
coleenp@8739 | 261 | set_direct_or_vtable_call(invoke_code, method, index, sender_is_interface); |
drchase@5732 | 262 | } |
duke@435 | 263 | |
drchase@5732 | 264 | void ConstantPoolCacheEntry::set_vtable_call(Bytecodes::Code invoke_code, methodHandle method, int index) { |
drchase@5732 | 265 | // either the method is a miranda or its holder should accept the given index |
drchase@5732 | 266 | assert(method->method_holder()->is_interface() || method->method_holder()->verify_vtable_index(index), ""); |
drchase@5732 | 267 | // index >= 0; FIXME: inline and customize set_direct_or_vtable_call |
coleenp@8739 | 268 | set_direct_or_vtable_call(invoke_code, method, index, false); |
drchase@5732 | 269 | } |
drchase@5732 | 270 | |
dbuck@8997 | 271 | void ConstantPoolCacheEntry::set_itable_call(Bytecodes::Code invoke_code, |
dbuck@8997 | 272 | KlassHandle referenced_klass, |
dbuck@8997 | 273 | methodHandle method, int index) { |
drchase@5732 | 274 | assert(method->method_holder()->verify_itable_index(index), ""); |
drchase@5732 | 275 | assert(invoke_code == Bytecodes::_invokeinterface, ""); |
coleenp@4251 | 276 | InstanceKlass* interf = method->method_holder(); |
coleenp@4251 | 277 | assert(interf->is_interface(), "must be an interface"); |
twisti@3969 | 278 | assert(!method->is_final_method(), "interfaces do not have final methods; cannot link to one here"); |
dbuck@8997 | 279 | set_f1(referenced_klass()); |
dbuck@8997 | 280 | set_f2((intx)method()); |
twisti@3969 | 281 | set_method_flags(as_TosState(method->result_type()), |
twisti@3969 | 282 | 0, // no option bits |
twisti@3969 | 283 | method()->size_of_parameters()); |
duke@435 | 284 | set_bytecode_1(Bytecodes::_invokeinterface); |
duke@435 | 285 | } |
duke@435 | 286 | |
duke@435 | 287 | |
twisti@4253 | 288 | void ConstantPoolCacheEntry::set_method_handle(constantPoolHandle cpool, const CallInfo &call_info) { |
twisti@4253 | 289 | set_method_handle_common(cpool, Bytecodes::_invokehandle, call_info); |
jrose@2015 | 290 | } |
jrose@2015 | 291 | |
twisti@4253 | 292 | void ConstantPoolCacheEntry::set_dynamic_call(constantPoolHandle cpool, const CallInfo &call_info) { |
twisti@4253 | 293 | set_method_handle_common(cpool, Bytecodes::_invokedynamic, call_info); |
jrose@2015 | 294 | } |
jrose@2015 | 295 | |
twisti@4049 | 296 | void ConstantPoolCacheEntry::set_method_handle_common(constantPoolHandle cpool, |
twisti@4049 | 297 | Bytecodes::Code invoke_code, |
twisti@4253 | 298 | const CallInfo &call_info) { |
twisti@3969 | 299 | // NOTE: This CPCE can be the subject of data races. |
coleenp@4037 | 300 | // There are three words to update: flags, refs[f2], f1 (in that order). |
twisti@3969 | 301 | // Writers must store all other values before f1. |
twisti@3969 | 302 | // Readers must test f1 first for non-null before reading other fields. |
twisti@4049 | 303 | // Competing writers must acquire exclusive access via a lock. |
twisti@4049 | 304 | // A losing writer waits on the lock until the winner writes f1 and leaves |
twisti@4049 | 305 | // the lock, so that when the losing writer returns, he can use the linked |
twisti@4049 | 306 | // cache entry. |
twisti@4049 | 307 | |
iklam@5971 | 308 | MonitorLockerEx ml(cpool->lock()); |
twisti@4049 | 309 | if (!is_f1_null()) { |
twisti@4049 | 310 | return; |
twisti@4049 | 311 | } |
twisti@3969 | 312 | |
twisti@4253 | 313 | const methodHandle adapter = call_info.resolved_method(); |
twisti@4253 | 314 | const Handle appendix = call_info.resolved_appendix(); |
twisti@4253 | 315 | const Handle method_type = call_info.resolved_method_type(); |
twisti@4133 | 316 | const bool has_appendix = appendix.not_null(); |
twisti@4133 | 317 | const bool has_method_type = method_type.not_null(); |
twisti@3969 | 318 | |
coleenp@4037 | 319 | // Write the flags. |
twisti@4049 | 320 | set_method_flags(as_TosState(adapter->result_type()), |
twisti@4133 | 321 | ((has_appendix ? 1 : 0) << has_appendix_shift ) | |
twisti@4133 | 322 | ((has_method_type ? 1 : 0) << has_method_type_shift) | |
twisti@4133 | 323 | ( 1 << is_final_shift ), |
twisti@3969 | 324 | adapter->size_of_parameters()); |
twisti@3969 | 325 | |
twisti@3969 | 326 | if (TraceInvokeDynamic) { |
kevinw@9327 | 327 | tty->print_cr("set_method_handle bc=%d appendix=" PTR_FORMAT "%s method_type=" PTR_FORMAT "%s method=" PTR_FORMAT " ", |
twisti@3969 | 328 | invoke_code, |
hseigel@5784 | 329 | (void *)appendix(), (has_appendix ? "" : " (unused)"), |
hseigel@5784 | 330 | (void *)method_type(), (has_method_type ? "" : " (unused)"), |
twisti@3969 | 331 | (intptr_t)adapter()); |
twisti@3969 | 332 | adapter->print(); |
twisti@3969 | 333 | if (has_appendix) appendix()->print(); |
twisti@3969 | 334 | } |
twisti@3969 | 335 | |
twisti@3969 | 336 | // Method handle invokes and invokedynamic sites use both cp cache words. |
coleenp@4037 | 337 | // refs[f2], if not null, contains a value passed as a trailing argument to the adapter. |
twisti@3969 | 338 | // In the general case, this could be the call site's MethodType, |
twisti@3969 | 339 | // for use with java.lang.Invokers.checkExactType, or else a CallSite object. |
coleenp@4037 | 340 | // f1 contains the adapter method which manages the actual call. |
twisti@3969 | 341 | // In the general case, this is a compiled LambdaForm. |
twisti@3969 | 342 | // (The Java code is free to optimize these calls by binding other |
twisti@3969 | 343 | // sorts of methods and appendices to call sites.) |
coleenp@4037 | 344 | // JVM-level linking is via f1, as if for invokespecial, and signatures are erased. |
twisti@3969 | 345 | // The appendix argument (if any) is added to the signature, and is counted in the parameter_size bits. |
coleenp@4037 | 346 | // Even with the appendix, the method will never take more than 255 parameter slots. |
twisti@3969 | 347 | // |
twisti@3969 | 348 | // This means that given a call site like (List)mh.invoke("foo"), |
coleenp@4037 | 349 | // the f1 method has signature '(Ljl/Object;Ljl/invoke/MethodType;)Ljl/Object;', |
twisti@3969 | 350 | // not '(Ljava/lang/String;)Ljava/util/List;'. |
coleenp@4037 | 351 | // The fact that String and List are involved is encoded in the MethodType in refs[f2]. |
twisti@3969 | 352 | // This allows us to create fewer method oops, while keeping type safety. |
twisti@3969 | 353 | // |
coleenp@4037 | 354 | |
twisti@4253 | 355 | objArrayHandle resolved_references = cpool->resolved_references(); |
twisti@4133 | 356 | // Store appendix, if any. |
coleenp@4037 | 357 | if (has_appendix) { |
twisti@4133 | 358 | const int appendix_index = f2_as_index() + _indy_resolved_references_appendix_offset; |
twisti@4133 | 359 | assert(appendix_index >= 0 && appendix_index < resolved_references->length(), "oob"); |
twisti@4133 | 360 | assert(resolved_references->obj_at(appendix_index) == NULL, "init just once"); |
twisti@4133 | 361 | resolved_references->obj_at_put(appendix_index, appendix()); |
twisti@4133 | 362 | } |
twisti@4133 | 363 | |
twisti@4133 | 364 | // Store MethodType, if any. |
twisti@4133 | 365 | if (has_method_type) { |
twisti@4133 | 366 | const int method_type_index = f2_as_index() + _indy_resolved_references_method_type_offset; |
twisti@4133 | 367 | assert(method_type_index >= 0 && method_type_index < resolved_references->length(), "oob"); |
twisti@4133 | 368 | assert(resolved_references->obj_at(method_type_index) == NULL, "init just once"); |
twisti@4133 | 369 | resolved_references->obj_at_put(method_type_index, method_type()); |
coleenp@4037 | 370 | } |
coleenp@4037 | 371 | |
coleenp@4037 | 372 | release_set_f1(adapter()); // This must be the last one to set (see NOTE above)! |
coleenp@4037 | 373 | |
twisti@4133 | 374 | // The interpreter assembly code does not check byte_2, |
twisti@4133 | 375 | // but it is used by is_resolved, method_if_resolved, etc. |
coleenp@4037 | 376 | set_bytecode_1(invoke_code); |
twisti@3969 | 377 | NOT_PRODUCT(verify(tty)); |
twisti@3969 | 378 | if (TraceInvokeDynamic) { |
twisti@3969 | 379 | this->print(tty, 0); |
twisti@3969 | 380 | } |
jrose@1161 | 381 | } |
jrose@1161 | 382 | |
coleenp@4037 | 383 | Method* ConstantPoolCacheEntry::method_if_resolved(constantPoolHandle cpool) { |
jrose@2982 | 384 | // Decode the action of set_method and set_interface_call |
twisti@3969 | 385 | Bytecodes::Code invoke_code = bytecode_1(); |
twisti@3969 | 386 | if (invoke_code != (Bytecodes::Code)0) { |
goetz@6493 | 387 | Metadata* f1 = f1_ord(); |
jrose@2982 | 388 | if (f1 != NULL) { |
jrose@2982 | 389 | switch (invoke_code) { |
jrose@2982 | 390 | case Bytecodes::_invokeinterface: |
jrose@2982 | 391 | assert(f1->is_klass(), ""); |
coleenp@4037 | 392 | return klassItable::method_for_itable_index((Klass*)f1, f2_as_index()); |
jrose@2982 | 393 | case Bytecodes::_invokestatic: |
jrose@2982 | 394 | case Bytecodes::_invokespecial: |
twisti@3969 | 395 | assert(!has_appendix(), ""); |
coleenp@4037 | 396 | case Bytecodes::_invokehandle: |
coleenp@4037 | 397 | case Bytecodes::_invokedynamic: |
jrose@2982 | 398 | assert(f1->is_method(), ""); |
coleenp@4037 | 399 | return (Method*)f1; |
jrose@2982 | 400 | } |
jrose@2982 | 401 | } |
jrose@2982 | 402 | } |
twisti@3969 | 403 | invoke_code = bytecode_2(); |
twisti@3969 | 404 | if (invoke_code != (Bytecodes::Code)0) { |
jrose@2982 | 405 | switch (invoke_code) { |
jrose@2982 | 406 | case Bytecodes::_invokevirtual: |
jrose@2982 | 407 | if (is_vfinal()) { |
jrose@2982 | 408 | // invokevirtual |
coleenp@4037 | 409 | Method* m = f2_as_vfinal_method(); |
jrose@2982 | 410 | assert(m->is_method(), ""); |
jrose@2982 | 411 | return m; |
jrose@2982 | 412 | } else { |
jrose@2982 | 413 | int holder_index = cpool->uncached_klass_ref_index_at(constant_pool_index()); |
jrose@2982 | 414 | if (cpool->tag_at(holder_index).is_klass()) { |
coleenp@4037 | 415 | Klass* klass = cpool->resolved_klass_at(holder_index); |
hseigel@4278 | 416 | if (!klass->oop_is_instance()) |
jrose@2982 | 417 | klass = SystemDictionary::Object_klass(); |
coleenp@4037 | 418 | return InstanceKlass::cast(klass)->method_at_vtable(f2_as_index()); |
jrose@2982 | 419 | } |
jrose@2982 | 420 | } |
twisti@3969 | 421 | break; |
jrose@2982 | 422 | } |
jrose@2982 | 423 | } |
jrose@2982 | 424 | return NULL; |
jrose@2982 | 425 | } |
jrose@2982 | 426 | |
jrose@2982 | 427 | |
coleenp@4037 | 428 | oop ConstantPoolCacheEntry::appendix_if_resolved(constantPoolHandle cpool) { |
drchase@6720 | 429 | if (!has_appendix()) |
coleenp@4037 | 430 | return NULL; |
twisti@4133 | 431 | const int ref_index = f2_as_index() + _indy_resolved_references_appendix_offset; |
twisti@4133 | 432 | objArrayOop resolved_references = cpool->resolved_references(); |
twisti@4133 | 433 | return resolved_references->obj_at(ref_index); |
twisti@4133 | 434 | } |
twisti@4133 | 435 | |
twisti@4133 | 436 | |
twisti@4133 | 437 | oop ConstantPoolCacheEntry::method_type_if_resolved(constantPoolHandle cpool) { |
drchase@6720 | 438 | if (!has_method_type()) |
twisti@4133 | 439 | return NULL; |
twisti@4133 | 440 | const int ref_index = f2_as_index() + _indy_resolved_references_method_type_offset; |
coleenp@4037 | 441 | objArrayOop resolved_references = cpool->resolved_references(); |
coleenp@4037 | 442 | return resolved_references->obj_at(ref_index); |
duke@435 | 443 | } |
duke@435 | 444 | |
duke@435 | 445 | |
dcubed@4562 | 446 | #if INCLUDE_JVMTI |
dbuck@8997 | 447 | |
dbuck@8997 | 448 | void log_adjust(const char* entry_type, Method* old_method, Method* new_method, bool* trace_name_printed) { |
dbuck@8997 | 449 | if (RC_TRACE_IN_RANGE(0x00100000, 0x00400000)) { |
dbuck@8997 | 450 | if (!(*trace_name_printed)) { |
dbuck@8997 | 451 | // RC_TRACE_MESG macro has an embedded ResourceMark |
dbuck@8997 | 452 | RC_TRACE_MESG(("adjust: name=%s", |
dbuck@8997 | 453 | old_method->method_holder()->external_name())); |
dbuck@8997 | 454 | *trace_name_printed = true; |
dbuck@8997 | 455 | } |
dbuck@8997 | 456 | // RC_TRACE macro has an embedded ResourceMark |
dbuck@8997 | 457 | RC_TRACE(0x00400000, ("cpc %s entry update: %s(%s)", |
dbuck@8997 | 458 | entry_type, |
dbuck@8997 | 459 | new_method->name()->as_C_string(), |
dbuck@8997 | 460 | new_method->signature()->as_C_string())); |
dbuck@8997 | 461 | } |
dbuck@8997 | 462 | } |
dbuck@8997 | 463 | |
duke@435 | 464 | // RedefineClasses() API support: |
dcubed@4562 | 465 | // If this ConstantPoolCacheEntry refers to old_method then update it |
duke@435 | 466 | // to refer to new_method. |
dbuck@8997 | 467 | void ConstantPoolCacheEntry::adjust_method_entry(Method* old_method, |
coleenp@4037 | 468 | Method* new_method, bool * trace_name_printed) { |
duke@435 | 469 | |
duke@435 | 470 | if (is_vfinal()) { |
twisti@3969 | 471 | // virtual and final so _f2 contains method ptr instead of vtable index |
twisti@3969 | 472 | if (f2_as_vfinal_method() == old_method) { |
duke@435 | 473 | // match old_method so need an update |
twisti@3969 | 474 | // NOTE: can't use set_f2_as_vfinal_method as it asserts on different values |
duke@435 | 475 | _f2 = (intptr_t)new_method; |
duke@435 | 476 | } |
dbuck@8997 | 477 | return; |
duke@435 | 478 | } |
duke@435 | 479 | |
dbuck@8997 | 480 | assert (_f1 != NULL, "should not call with uninteresting entry"); |
dbuck@8997 | 481 | |
dbuck@8997 | 482 | if (!(_f1->is_method())) { |
dbuck@8997 | 483 | // _f1 is a Klass* for an interface, _f2 is the method |
dbuck@8997 | 484 | if (f2_as_interface_method() == old_method) { |
dbuck@8997 | 485 | _f2 = (intptr_t)new_method; |
dbuck@8997 | 486 | log_adjust("interface", old_method, new_method, trace_name_printed); |
dbuck@8997 | 487 | } |
dbuck@8997 | 488 | } else if (_f1 == old_method) { |
dbuck@8997 | 489 | _f1 = new_method; |
dbuck@8997 | 490 | log_adjust("special, static or dynamic", old_method, new_method, trace_name_printed); |
duke@435 | 491 | } |
duke@435 | 492 | } |
duke@435 | 493 | |
dcubed@4562 | 494 | // a constant pool cache entry should never contain old or obsolete methods |
dcubed@4562 | 495 | bool ConstantPoolCacheEntry::check_no_old_or_obsolete_entries() { |
dbuck@8997 | 496 | Method* m = get_interesting_method_entry(NULL); |
dbuck@8997 | 497 | // return false if m refers to a non-deleted old or obsolete method |
dbuck@8997 | 498 | if (m != NULL) { |
dbuck@8997 | 499 | assert(m->is_valid() && m->is_method(), "m is a valid method"); |
dbuck@8997 | 500 | return !m->is_old() && !m->is_obsolete(); // old is always set for old and obsolete |
dbuck@8997 | 501 | } else { |
dcubed@4562 | 502 | return true; |
coleenp@4037 | 503 | } |
coleenp@4037 | 504 | } |
coleenp@4037 | 505 | |
sspitsyn@7636 | 506 | Method* ConstantPoolCacheEntry::get_interesting_method_entry(Klass* k) { |
duke@435 | 507 | if (!is_method_entry()) { |
duke@435 | 508 | // not a method entry so not interesting by default |
sspitsyn@7636 | 509 | return NULL; |
duke@435 | 510 | } |
coleenp@4037 | 511 | Method* m = NULL; |
duke@435 | 512 | if (is_vfinal()) { |
duke@435 | 513 | // virtual and final so _f2 contains method ptr instead of vtable index |
twisti@3969 | 514 | m = f2_as_vfinal_method(); |
twisti@3969 | 515 | } else if (is_f1_null()) { |
duke@435 | 516 | // NULL _f1 means this is a virtual entry so also not interesting |
sspitsyn@7636 | 517 | return NULL; |
duke@435 | 518 | } else { |
coleenp@4037 | 519 | if (!(_f1->is_method())) { |
dbuck@8997 | 520 | // _f1 is a Klass* for an interface |
dbuck@8997 | 521 | m = f2_as_interface_method(); |
dbuck@8997 | 522 | } else { |
dbuck@8997 | 523 | m = f1_as_method(); |
duke@435 | 524 | } |
duke@435 | 525 | } |
duke@435 | 526 | assert(m != NULL && m->is_method(), "sanity check"); |
coleenp@4037 | 527 | if (m == NULL || !m->is_method() || (k != NULL && m->method_holder() != k)) { |
duke@435 | 528 | // robustness for above sanity checks or method is not in |
duke@435 | 529 | // the interesting class |
sspitsyn@7636 | 530 | return NULL; |
duke@435 | 531 | } |
duke@435 | 532 | // the method is in the interesting class so the entry is interesting |
sspitsyn@7636 | 533 | return m; |
duke@435 | 534 | } |
dcubed@4562 | 535 | #endif // INCLUDE_JVMTI |
duke@435 | 536 | |
duke@435 | 537 | void ConstantPoolCacheEntry::print(outputStream* st, int index) const { |
duke@435 | 538 | // print separator |
dholmes@3601 | 539 | if (index == 0) st->print_cr(" -------------"); |
duke@435 | 540 | // print entry |
kevinw@9327 | 541 | st->print("%3d (" PTR_FORMAT ") ", index, (intptr_t)this); |
dcubed@4562 | 542 | st->print_cr("[%02x|%02x|%5d]", bytecode_2(), bytecode_1(), |
dcubed@4562 | 543 | constant_pool_index()); |
kevinw@9327 | 544 | st->print_cr(" [ " PTR_FORMAT "]", (intptr_t)_f1); |
kevinw@9327 | 545 | st->print_cr(" [ " PTR_FORMAT "]", (intptr_t)_f2); |
kevinw@9327 | 546 | st->print_cr(" [ " PTR_FORMAT "]", (intptr_t)_flags); |
dholmes@3601 | 547 | st->print_cr(" -------------"); |
duke@435 | 548 | } |
duke@435 | 549 | |
duke@435 | 550 | void ConstantPoolCacheEntry::verify(outputStream* st) const { |
duke@435 | 551 | // not implemented yet |
duke@435 | 552 | } |
duke@435 | 553 | |
duke@435 | 554 | // Implementation of ConstantPoolCache |
duke@435 | 555 | |
coleenp@4712 | 556 | ConstantPoolCache* ConstantPoolCache::allocate(ClassLoaderData* loader_data, |
coleenp@4712 | 557 | const intStack& index_map, |
coleenp@6081 | 558 | const intStack& invokedynamic_index_map, |
coleenp@4712 | 559 | const intStack& invokedynamic_map, TRAPS) { |
coleenp@6081 | 560 | |
coleenp@6081 | 561 | const int length = index_map.length() + invokedynamic_index_map.length(); |
coleenp@4037 | 562 | int size = ConstantPoolCache::size(length); |
coleenp@4037 | 563 | |
iklam@5208 | 564 | return new (loader_data, size, false, MetaspaceObj::ConstantPoolCacheType, THREAD) |
coleenp@6081 | 565 | ConstantPoolCache(length, index_map, invokedynamic_index_map, invokedynamic_map); |
coleenp@4037 | 566 | } |
coleenp@4037 | 567 | |
coleenp@4712 | 568 | void ConstantPoolCache::initialize(const intArray& inverse_index_map, |
coleenp@6081 | 569 | const intArray& invokedynamic_inverse_index_map, |
coleenp@4712 | 570 | const intArray& invokedynamic_references_map) { |
coleenp@6081 | 571 | for (int i = 0; i < inverse_index_map.length(); i++) { |
jrose@1494 | 572 | ConstantPoolCacheEntry* e = entry_at(i); |
jrose@1494 | 573 | int original_index = inverse_index_map[i]; |
twisti@4133 | 574 | e->initialize_entry(original_index); |
coleenp@4037 | 575 | assert(entry_at(i) == e, "sanity"); |
twisti@4133 | 576 | } |
coleenp@6081 | 577 | |
coleenp@6081 | 578 | // Append invokedynamic entries at the end |
coleenp@6081 | 579 | int invokedynamic_offset = inverse_index_map.length(); |
coleenp@6081 | 580 | for (int i = 0; i < invokedynamic_inverse_index_map.length(); i++) { |
coleenp@6081 | 581 | int offset = i + invokedynamic_offset; |
coleenp@6081 | 582 | ConstantPoolCacheEntry* e = entry_at(offset); |
coleenp@6081 | 583 | int original_index = invokedynamic_inverse_index_map[i]; |
coleenp@6081 | 584 | e->initialize_entry(original_index); |
coleenp@6081 | 585 | assert(entry_at(offset) == e, "sanity"); |
coleenp@6081 | 586 | } |
coleenp@6081 | 587 | |
twisti@4133 | 588 | for (int ref = 0; ref < invokedynamic_references_map.length(); ref++) { |
twisti@4133 | 589 | const int cpci = invokedynamic_references_map[ref]; |
twisti@4133 | 590 | if (cpci >= 0) { |
twisti@4133 | 591 | #ifdef ASSERT |
twisti@4133 | 592 | // invokedynamic and invokehandle have more entries; check if they |
twisti@4133 | 593 | // all point to the same constant pool cache entry. |
twisti@4133 | 594 | for (int entry = 1; entry < ConstantPoolCacheEntry::_indy_resolved_references_entries; entry++) { |
twisti@4133 | 595 | const int cpci_next = invokedynamic_references_map[ref + entry]; |
twisti@4133 | 596 | assert(cpci == cpci_next, err_msg_res("%d == %d", cpci, cpci_next)); |
twisti@4133 | 597 | } |
twisti@4133 | 598 | #endif |
twisti@4133 | 599 | entry_at(cpci)->initialize_resolved_reference_index(ref); |
twisti@4133 | 600 | ref += ConstantPoolCacheEntry::_indy_resolved_references_entries - 1; // skip extra entries |
jrose@1494 | 601 | } |
jrose@1494 | 602 | } |
duke@435 | 603 | } |
duke@435 | 604 | |
dcubed@4562 | 605 | #if INCLUDE_JVMTI |
duke@435 | 606 | // RedefineClasses() API support: |
dcubed@4562 | 607 | // If any entry of this ConstantPoolCache points to any of |
duke@435 | 608 | // old_methods, replace it with the corresponding new_method. |
sspitsyn@7636 | 609 | void ConstantPoolCache::adjust_method_entries(InstanceKlass* holder, bool * trace_name_printed) { |
sspitsyn@7636 | 610 | for (int i = 0; i < length(); i++) { |
sspitsyn@7636 | 611 | ConstantPoolCacheEntry* entry = entry_at(i); |
sspitsyn@7636 | 612 | Method* old_method = entry->get_interesting_method_entry(holder); |
sspitsyn@7636 | 613 | if (old_method == NULL || !old_method->is_old()) { |
sspitsyn@7636 | 614 | continue; // skip uninteresting entries |
sspitsyn@7636 | 615 | } |
sspitsyn@7636 | 616 | if (old_method->is_deleted()) { |
sspitsyn@7636 | 617 | // clean up entries with deleted methods |
sspitsyn@7636 | 618 | entry->initialize_entry(entry->constant_pool_index()); |
sspitsyn@7636 | 619 | continue; |
sspitsyn@7636 | 620 | } |
sspitsyn@7636 | 621 | Method* new_method = holder->method_with_idnum(old_method->orig_method_idnum()); |
sspitsyn@7636 | 622 | |
sspitsyn@7636 | 623 | assert(new_method != NULL, "method_with_idnum() should not be NULL"); |
sspitsyn@7636 | 624 | assert(old_method != new_method, "sanity check"); |
sspitsyn@7636 | 625 | |
sspitsyn@7636 | 626 | entry_at(i)->adjust_method_entry(old_method, new_method, trace_name_printed); |
sspitsyn@7636 | 627 | } |
sspitsyn@7636 | 628 | } |
sspitsyn@7636 | 629 | |
dcubed@4562 | 630 | // the constant pool cache should never contain old or obsolete methods |
dcubed@4562 | 631 | bool ConstantPoolCache::check_no_old_or_obsolete_entries() { |
coleenp@4037 | 632 | for (int i = 1; i < length(); i++) { |
sspitsyn@7636 | 633 | if (entry_at(i)->get_interesting_method_entry(NULL) != NULL && |
dcubed@4562 | 634 | !entry_at(i)->check_no_old_or_obsolete_entries()) { |
coleenp@4037 | 635 | return false; |
coleenp@4037 | 636 | } |
coleenp@4037 | 637 | } |
coleenp@4037 | 638 | return true; |
coleenp@4037 | 639 | } |
dcubed@4562 | 640 | |
dcubed@4562 | 641 | void ConstantPoolCache::dump_cache() { |
dcubed@4562 | 642 | for (int i = 1; i < length(); i++) { |
sspitsyn@7636 | 643 | if (entry_at(i)->get_interesting_method_entry(NULL) != NULL) { |
dcubed@4562 | 644 | entry_at(i)->print(tty, i); |
dcubed@4562 | 645 | } |
dcubed@4562 | 646 | } |
dcubed@4562 | 647 | } |
dcubed@4562 | 648 | #endif // INCLUDE_JVMTI |
coleenp@4037 | 649 | |
coleenp@4037 | 650 | |
coleenp@4037 | 651 | // Printing |
coleenp@4037 | 652 | |
coleenp@4037 | 653 | void ConstantPoolCache::print_on(outputStream* st) const { |
coleenp@4037 | 654 | assert(is_constantPoolCache(), "obj must be constant pool cache"); |
drchase@6680 | 655 | st->print_cr("%s", internal_name()); |
coleenp@4037 | 656 | // print constant pool cache entries |
coleenp@4037 | 657 | for (int i = 0; i < length(); i++) entry_at(i)->print(st, i); |
coleenp@4037 | 658 | } |
coleenp@4037 | 659 | |
coleenp@4037 | 660 | void ConstantPoolCache::print_value_on(outputStream* st) const { |
coleenp@4037 | 661 | assert(is_constantPoolCache(), "obj must be constant pool cache"); |
coleenp@4037 | 662 | st->print("cache [%d]", length()); |
coleenp@4037 | 663 | print_address_on(st); |
coleenp@4037 | 664 | st->print(" for "); |
coleenp@4037 | 665 | constant_pool()->print_value_on(st); |
coleenp@4037 | 666 | } |
coleenp@4037 | 667 | |
coleenp@4037 | 668 | |
coleenp@4037 | 669 | // Verification |
coleenp@4037 | 670 | |
coleenp@4037 | 671 | void ConstantPoolCache::verify_on(outputStream* st) { |
coleenp@4037 | 672 | guarantee(is_constantPoolCache(), "obj must be constant pool cache"); |
coleenp@4037 | 673 | // print constant pool cache entries |
coleenp@4037 | 674 | for (int i = 0; i < length(); i++) entry_at(i)->verify(st); |
coleenp@4037 | 675 | } |