Wed, 18 Sep 2013 14:34:56 -0700
8024342: PPC64 (part 111): Support for C calling conventions that require 64-bit ints.
Summary: Some platforms, as ppc and s390x/zArch require that 32-bit ints are passed as 64-bit values to C functions. This change adds support to adapt the signature and to issue proper casts to c2-compiled stubs. The functions are used in generate_native_wrapper(). Adapt signature used by the compiler as in PhaseIdealLoop::intrinsify_fill().
Reviewed-by: kvn
duke@435 | 1 | /* |
coleenp@4037 | 2 | * Copyright (c) 1998, 2012, 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 "ci/ciCallSite.hpp" |
stefank@2314 | 27 | #include "ci/ciMethodHandle.hpp" |
stefank@2314 | 28 | #include "classfile/vmSymbols.hpp" |
twisti@2687 | 29 | #include "compiler/compileBroker.hpp" |
stefank@2314 | 30 | #include "compiler/compileLog.hpp" |
stefank@2314 | 31 | #include "interpreter/linkResolver.hpp" |
stefank@2314 | 32 | #include "opto/addnode.hpp" |
stefank@2314 | 33 | #include "opto/callGenerator.hpp" |
stefank@2314 | 34 | #include "opto/cfgnode.hpp" |
stefank@2314 | 35 | #include "opto/mulnode.hpp" |
stefank@2314 | 36 | #include "opto/parse.hpp" |
stefank@2314 | 37 | #include "opto/rootnode.hpp" |
stefank@2314 | 38 | #include "opto/runtime.hpp" |
stefank@2314 | 39 | #include "opto/subnode.hpp" |
stefank@2314 | 40 | #include "prims/nativeLookup.hpp" |
stefank@2314 | 41 | #include "runtime/sharedRuntime.hpp" |
duke@435 | 42 | |
roland@4357 | 43 | void trace_type_profile(Compile* C, ciMethod *method, int depth, int bci, ciMethod *prof_method, ciKlass *prof_klass, int site_count, int receiver_count) { |
twisti@4104 | 44 | if (TraceTypeProfile || PrintInlining NOT_PRODUCT(|| PrintOptoInlining)) { |
roland@4357 | 45 | outputStream* out = tty; |
twisti@2687 | 46 | if (!PrintInlining) { |
twisti@4104 | 47 | if (NOT_PRODUCT(!PrintOpto &&) !PrintCompilation) { |
twisti@2687 | 48 | method->print_short_name(); |
twisti@2687 | 49 | tty->cr(); |
twisti@2687 | 50 | } |
twisti@2687 | 51 | CompileTask::print_inlining(prof_method, depth, bci); |
roland@4357 | 52 | } else { |
roland@4357 | 53 | out = C->print_inlining_stream(); |
duke@435 | 54 | } |
roland@4357 | 55 | CompileTask::print_inline_indent(depth, out); |
roland@4357 | 56 | out->print(" \\-> TypeProfile (%d/%d counts) = ", receiver_count, site_count); |
roland@4357 | 57 | stringStream ss; |
roland@4357 | 58 | prof_klass->name()->print_symbol_on(&ss); |
roland@4357 | 59 | out->print(ss.as_string()); |
roland@4357 | 60 | out->cr(); |
duke@435 | 61 | } |
duke@435 | 62 | } |
duke@435 | 63 | |
twisti@4414 | 64 | CallGenerator* Compile::call_generator(ciMethod* callee, int vtable_index, bool call_does_dispatch, |
jrose@1592 | 65 | JVMState* jvms, bool allow_inline, |
roland@4409 | 66 | float prof_factor, bool allow_intrinsics, bool delayed_forbidden) { |
twisti@2903 | 67 | ciMethod* caller = jvms->method(); |
twisti@2903 | 68 | int bci = jvms->bci(); |
twisti@2903 | 69 | Bytecodes::Code bytecode = caller->java_code_at_bci(bci); |
twisti@3969 | 70 | guarantee(callee != NULL, "failed method resolution"); |
duke@435 | 71 | |
duke@435 | 72 | // Dtrace currently doesn't work unless all calls are vanilla |
kvn@1215 | 73 | if (env()->dtrace_method_probes()) { |
duke@435 | 74 | allow_inline = false; |
duke@435 | 75 | } |
duke@435 | 76 | |
duke@435 | 77 | // Note: When we get profiling during stage-1 compiles, we want to pull |
duke@435 | 78 | // from more specific profile data which pertains to this inlining. |
duke@435 | 79 | // Right now, ignore the information in jvms->caller(), and do method[bci]. |
twisti@2903 | 80 | ciCallProfile profile = caller->call_profile_at_bci(bci); |
duke@435 | 81 | |
duke@435 | 82 | // See how many times this site has been invoked. |
duke@435 | 83 | int site_count = profile.count(); |
duke@435 | 84 | int receiver_count = -1; |
twisti@4414 | 85 | if (call_does_dispatch && UseTypeProfile && profile.has_receiver(0)) { |
duke@435 | 86 | // Receivers in the profile structure are ordered by call counts |
duke@435 | 87 | // so that the most called (major) receiver is profile.receiver(0). |
duke@435 | 88 | receiver_count = profile.receiver_count(0); |
duke@435 | 89 | } |
duke@435 | 90 | |
duke@435 | 91 | CompileLog* log = this->log(); |
duke@435 | 92 | if (log != NULL) { |
duke@435 | 93 | int rid = (receiver_count >= 0)? log->identify(profile.receiver(0)): -1; |
kvn@1686 | 94 | int r2id = (rid != -1 && profile.has_receiver(1))? log->identify(profile.receiver(1)):-1; |
duke@435 | 95 | log->begin_elem("call method='%d' count='%d' prof_factor='%g'", |
twisti@3969 | 96 | log->identify(callee), site_count, prof_factor); |
twisti@4414 | 97 | if (call_does_dispatch) log->print(" virtual='1'"); |
duke@435 | 98 | if (allow_inline) log->print(" inline='1'"); |
duke@435 | 99 | if (receiver_count >= 0) { |
duke@435 | 100 | log->print(" receiver='%d' receiver_count='%d'", rid, receiver_count); |
duke@435 | 101 | if (profile.has_receiver(1)) { |
duke@435 | 102 | log->print(" receiver2='%d' receiver2_count='%d'", r2id, profile.receiver_count(1)); |
duke@435 | 103 | } |
duke@435 | 104 | } |
duke@435 | 105 | log->end_elem(); |
duke@435 | 106 | } |
duke@435 | 107 | |
duke@435 | 108 | // Special case the handling of certain common, profitable library |
duke@435 | 109 | // methods. If these methods are replaced with specialized code, |
duke@435 | 110 | // then we return it as the inlined version of the call. |
duke@435 | 111 | // We do this before the strict f.p. check below because the |
duke@435 | 112 | // intrinsics handle strict f.p. correctly. |
never@3631 | 113 | if (allow_inline && allow_intrinsics) { |
twisti@4414 | 114 | CallGenerator* cg = find_intrinsic(callee, call_does_dispatch); |
kvn@4205 | 115 | if (cg != NULL) { |
kvn@4205 | 116 | if (cg->is_predicted()) { |
kvn@4205 | 117 | // Code without intrinsic but, hopefully, inlined. |
kvn@4205 | 118 | CallGenerator* inline_cg = this->call_generator(callee, |
twisti@4414 | 119 | vtable_index, call_does_dispatch, jvms, allow_inline, prof_factor, false); |
kvn@4205 | 120 | if (inline_cg != NULL) { |
kvn@4205 | 121 | cg = CallGenerator::for_predicted_intrinsic(cg, inline_cg); |
kvn@4205 | 122 | } |
kvn@4205 | 123 | } |
kvn@4205 | 124 | return cg; |
kvn@4205 | 125 | } |
duke@435 | 126 | } |
duke@435 | 127 | |
twisti@3050 | 128 | // Do method handle calls. |
twisti@2178 | 129 | // NOTE: This must happen before normal inlining logic below since |
twisti@2178 | 130 | // MethodHandle.invoke* are native methods which obviously don't |
twisti@2178 | 131 | // have bytecodes and so normal inlining fails. |
twisti@3969 | 132 | if (callee->is_method_handle_intrinsic()) { |
roland@4409 | 133 | CallGenerator* cg = CallGenerator::for_method_handle_call(jvms, caller, callee, delayed_forbidden); |
twisti@4414 | 134 | assert(cg == NULL || !delayed_forbidden || !cg->is_late_inline() || cg->is_mh_late_inline(), "unexpected CallGenerator"); |
roland@4409 | 135 | return cg; |
twisti@2178 | 136 | } |
twisti@2178 | 137 | |
duke@435 | 138 | // Do not inline strict fp into non-strict code, or the reverse |
twisti@3969 | 139 | if (caller->is_strict() ^ callee->is_strict()) { |
duke@435 | 140 | allow_inline = false; |
duke@435 | 141 | } |
duke@435 | 142 | |
duke@435 | 143 | // Attempt to inline... |
duke@435 | 144 | if (allow_inline) { |
duke@435 | 145 | // The profile data is only partly attributable to this caller, |
duke@435 | 146 | // scale back the call site information. |
duke@435 | 147 | float past_uses = jvms->method()->scale_count(site_count, prof_factor); |
duke@435 | 148 | // This is the number of times we expect the call code to be used. |
duke@435 | 149 | float expected_uses = past_uses; |
duke@435 | 150 | |
duke@435 | 151 | // Try inlining a bytecoded method: |
twisti@4414 | 152 | if (!call_does_dispatch) { |
duke@435 | 153 | InlineTree* ilt; |
duke@435 | 154 | if (UseOldInlining) { |
duke@435 | 155 | ilt = InlineTree::find_subtree_from_root(this->ilt(), jvms->caller(), jvms->method()); |
duke@435 | 156 | } else { |
duke@435 | 157 | // Make a disembodied, stateless ILT. |
duke@435 | 158 | // TO DO: When UseOldInlining is removed, copy the ILT code elsewhere. |
duke@435 | 159 | float site_invoke_ratio = prof_factor; |
duke@435 | 160 | // Note: ilt is for the root of this parse, not the present call site. |
never@2981 | 161 | ilt = new InlineTree(this, jvms->method(), jvms->caller(), site_invoke_ratio, MaxInlineLevel); |
duke@435 | 162 | } |
duke@435 | 163 | WarmCallInfo scratch_ci; |
duke@435 | 164 | if (!UseOldInlining) |
twisti@3969 | 165 | scratch_ci.init(jvms, callee, profile, prof_factor); |
roland@4409 | 166 | bool should_delay = false; |
roland@4409 | 167 | WarmCallInfo* ci = ilt->ok_to_inline(callee, jvms, profile, &scratch_ci, should_delay); |
duke@435 | 168 | assert(ci != &scratch_ci, "do not let this pointer escape"); |
duke@435 | 169 | bool allow_inline = (ci != NULL && !ci->is_cold()); |
duke@435 | 170 | bool require_inline = (allow_inline && ci->is_hot()); |
duke@435 | 171 | |
duke@435 | 172 | if (allow_inline) { |
twisti@3969 | 173 | CallGenerator* cg = CallGenerator::for_inline(callee, expected_uses); |
roland@4409 | 174 | |
roland@4409 | 175 | if (require_inline && cg != NULL) { |
never@1515 | 176 | // Delay the inlining of this method to give us the |
never@1515 | 177 | // opportunity to perform some high level optimizations |
never@1515 | 178 | // first. |
kvn@5110 | 179 | if (should_delay_string_inlining(callee, jvms)) { |
roland@4409 | 180 | assert(!delayed_forbidden, "strange"); |
roland@4409 | 181 | return CallGenerator::for_string_late_inline(callee, cg); |
kvn@5110 | 182 | } else if (should_delay_boxing_inlining(callee, jvms)) { |
kvn@5110 | 183 | assert(!delayed_forbidden, "strange"); |
kvn@5110 | 184 | return CallGenerator::for_boxing_late_inline(callee, cg); |
roland@4409 | 185 | } else if ((should_delay || AlwaysIncrementalInline) && !delayed_forbidden) { |
roland@4409 | 186 | return CallGenerator::for_late_inline(callee, cg); |
roland@4409 | 187 | } |
never@1515 | 188 | } |
roland@4409 | 189 | if (cg == NULL || should_delay) { |
duke@435 | 190 | // Fall through. |
duke@435 | 191 | } else if (require_inline || !InlineWarmCalls) { |
duke@435 | 192 | return cg; |
duke@435 | 193 | } else { |
twisti@4414 | 194 | CallGenerator* cold_cg = call_generator(callee, vtable_index, call_does_dispatch, jvms, false, prof_factor); |
duke@435 | 195 | return CallGenerator::for_warm_call(ci, cold_cg, cg); |
duke@435 | 196 | } |
duke@435 | 197 | } |
duke@435 | 198 | } |
duke@435 | 199 | |
duke@435 | 200 | // Try using the type profile. |
twisti@4414 | 201 | if (call_does_dispatch && site_count > 0 && receiver_count > 0) { |
duke@435 | 202 | // The major receiver's count >= TypeProfileMajorReceiverPercent of site_count. |
duke@435 | 203 | bool have_major_receiver = (100.*profile.receiver_prob(0) >= (float)TypeProfileMajorReceiverPercent); |
duke@435 | 204 | ciMethod* receiver_method = NULL; |
duke@435 | 205 | if (have_major_receiver || profile.morphism() == 1 || |
duke@435 | 206 | (profile.morphism() == 2 && UseBimorphicInlining)) { |
duke@435 | 207 | // receiver_method = profile.method(); |
duke@435 | 208 | // Profiles do not suggest methods now. Look it up in the major receiver. |
twisti@3969 | 209 | receiver_method = callee->resolve_invoke(jvms->method()->holder(), |
duke@435 | 210 | profile.receiver(0)); |
duke@435 | 211 | } |
duke@435 | 212 | if (receiver_method != NULL) { |
duke@435 | 213 | // The single majority receiver sufficiently outweighs the minority. |
duke@435 | 214 | CallGenerator* hit_cg = this->call_generator(receiver_method, |
twisti@4414 | 215 | vtable_index, !call_does_dispatch, jvms, allow_inline, prof_factor); |
duke@435 | 216 | if (hit_cg != NULL) { |
duke@435 | 217 | // Look up second receiver. |
duke@435 | 218 | CallGenerator* next_hit_cg = NULL; |
duke@435 | 219 | ciMethod* next_receiver_method = NULL; |
duke@435 | 220 | if (profile.morphism() == 2 && UseBimorphicInlining) { |
twisti@3969 | 221 | next_receiver_method = callee->resolve_invoke(jvms->method()->holder(), |
duke@435 | 222 | profile.receiver(1)); |
duke@435 | 223 | if (next_receiver_method != NULL) { |
duke@435 | 224 | next_hit_cg = this->call_generator(next_receiver_method, |
twisti@4414 | 225 | vtable_index, !call_does_dispatch, jvms, |
duke@435 | 226 | allow_inline, prof_factor); |
duke@435 | 227 | if (next_hit_cg != NULL && !next_hit_cg->is_inline() && |
duke@435 | 228 | have_major_receiver && UseOnlyInlinedBimorphic) { |
duke@435 | 229 | // Skip if we can't inline second receiver's method |
duke@435 | 230 | next_hit_cg = NULL; |
duke@435 | 231 | } |
duke@435 | 232 | } |
duke@435 | 233 | } |
duke@435 | 234 | CallGenerator* miss_cg; |
kvn@1641 | 235 | Deoptimization::DeoptReason reason = (profile.morphism() == 2) ? |
kvn@1641 | 236 | Deoptimization::Reason_bimorphic : |
kvn@1641 | 237 | Deoptimization::Reason_class_check; |
duke@435 | 238 | if (( profile.morphism() == 1 || |
duke@435 | 239 | (profile.morphism() == 2 && next_hit_cg != NULL) ) && |
kvn@1641 | 240 | !too_many_traps(jvms->method(), jvms->bci(), reason) |
duke@435 | 241 | ) { |
duke@435 | 242 | // Generate uncommon trap for class check failure path |
duke@435 | 243 | // in case of monomorphic or bimorphic virtual call site. |
twisti@3969 | 244 | miss_cg = CallGenerator::for_uncommon_trap(callee, reason, |
duke@435 | 245 | Deoptimization::Action_maybe_recompile); |
duke@435 | 246 | } else { |
duke@435 | 247 | // Generate virtual call for class check failure path |
duke@435 | 248 | // in case of polymorphic virtual call site. |
twisti@3969 | 249 | miss_cg = CallGenerator::for_virtual_call(callee, vtable_index); |
duke@435 | 250 | } |
duke@435 | 251 | if (miss_cg != NULL) { |
duke@435 | 252 | if (next_hit_cg != NULL) { |
roland@4357 | 253 | trace_type_profile(C, jvms->method(), jvms->depth() - 1, jvms->bci(), next_receiver_method, profile.receiver(1), site_count, profile.receiver_count(1)); |
duke@435 | 254 | // We don't need to record dependency on a receiver here and below. |
duke@435 | 255 | // Whenever we inline, the dependency is added by Parse::Parse(). |
duke@435 | 256 | miss_cg = CallGenerator::for_predicted_call(profile.receiver(1), miss_cg, next_hit_cg, PROB_MAX); |
duke@435 | 257 | } |
duke@435 | 258 | if (miss_cg != NULL) { |
roland@4357 | 259 | trace_type_profile(C, jvms->method(), jvms->depth() - 1, jvms->bci(), receiver_method, profile.receiver(0), site_count, receiver_count); |
twisti@3313 | 260 | CallGenerator* cg = CallGenerator::for_predicted_call(profile.receiver(0), miss_cg, hit_cg, profile.receiver_prob(0)); |
duke@435 | 261 | if (cg != NULL) return cg; |
duke@435 | 262 | } |
duke@435 | 263 | } |
duke@435 | 264 | } |
duke@435 | 265 | } |
duke@435 | 266 | } |
duke@435 | 267 | } |
duke@435 | 268 | |
duke@435 | 269 | // There was no special inlining tactic, or it bailed out. |
duke@435 | 270 | // Use a more generic tactic, like a simple call. |
twisti@4414 | 271 | if (call_does_dispatch) { |
twisti@3969 | 272 | return CallGenerator::for_virtual_call(callee, vtable_index); |
duke@435 | 273 | } else { |
duke@435 | 274 | // Class Hierarchy Analysis or Type Profile reveals a unique target, |
duke@435 | 275 | // or it is a static or special call. |
twisti@3969 | 276 | return CallGenerator::for_direct_call(callee, should_delay_inlining(callee, jvms)); |
duke@435 | 277 | } |
duke@435 | 278 | } |
duke@435 | 279 | |
never@1515 | 280 | // Return true for methods that shouldn't be inlined early so that |
never@1515 | 281 | // they are easier to analyze and optimize as intrinsics. |
kvn@5110 | 282 | bool Compile::should_delay_string_inlining(ciMethod* call_method, JVMState* jvms) { |
never@1515 | 283 | if (has_stringbuilder()) { |
never@1515 | 284 | |
never@1515 | 285 | if ((call_method->holder() == C->env()->StringBuilder_klass() || |
never@1515 | 286 | call_method->holder() == C->env()->StringBuffer_klass()) && |
never@1515 | 287 | (jvms->method()->holder() == C->env()->StringBuilder_klass() || |
never@1515 | 288 | jvms->method()->holder() == C->env()->StringBuffer_klass())) { |
never@1515 | 289 | // Delay SB calls only when called from non-SB code |
never@1515 | 290 | return false; |
never@1515 | 291 | } |
never@1515 | 292 | |
never@1515 | 293 | switch (call_method->intrinsic_id()) { |
never@1515 | 294 | case vmIntrinsics::_StringBuilder_void: |
never@1515 | 295 | case vmIntrinsics::_StringBuilder_int: |
never@1515 | 296 | case vmIntrinsics::_StringBuilder_String: |
never@1515 | 297 | case vmIntrinsics::_StringBuilder_append_char: |
never@1515 | 298 | case vmIntrinsics::_StringBuilder_append_int: |
never@1515 | 299 | case vmIntrinsics::_StringBuilder_append_String: |
never@1515 | 300 | case vmIntrinsics::_StringBuilder_toString: |
never@1515 | 301 | case vmIntrinsics::_StringBuffer_void: |
never@1515 | 302 | case vmIntrinsics::_StringBuffer_int: |
never@1515 | 303 | case vmIntrinsics::_StringBuffer_String: |
never@1515 | 304 | case vmIntrinsics::_StringBuffer_append_char: |
never@1515 | 305 | case vmIntrinsics::_StringBuffer_append_int: |
never@1515 | 306 | case vmIntrinsics::_StringBuffer_append_String: |
never@1515 | 307 | case vmIntrinsics::_StringBuffer_toString: |
never@1515 | 308 | case vmIntrinsics::_Integer_toString: |
never@1515 | 309 | return true; |
never@1515 | 310 | |
never@1515 | 311 | case vmIntrinsics::_String_String: |
never@1515 | 312 | { |
never@1515 | 313 | Node* receiver = jvms->map()->in(jvms->argoff() + 1); |
never@1515 | 314 | if (receiver->is_Proj() && receiver->in(0)->is_CallStaticJava()) { |
never@1515 | 315 | CallStaticJavaNode* csj = receiver->in(0)->as_CallStaticJava(); |
never@1515 | 316 | ciMethod* m = csj->method(); |
never@1515 | 317 | if (m != NULL && |
never@1515 | 318 | (m->intrinsic_id() == vmIntrinsics::_StringBuffer_toString || |
never@1515 | 319 | m->intrinsic_id() == vmIntrinsics::_StringBuilder_toString)) |
never@1515 | 320 | // Delay String.<init>(new SB()) |
never@1515 | 321 | return true; |
never@1515 | 322 | } |
never@1515 | 323 | return false; |
never@1515 | 324 | } |
never@1515 | 325 | |
never@1515 | 326 | default: |
never@1515 | 327 | return false; |
never@1515 | 328 | } |
never@1515 | 329 | } |
never@1515 | 330 | return false; |
never@1515 | 331 | } |
never@1515 | 332 | |
kvn@5110 | 333 | bool Compile::should_delay_boxing_inlining(ciMethod* call_method, JVMState* jvms) { |
kvn@5110 | 334 | if (eliminate_boxing() && call_method->is_boxing_method()) { |
kvn@5110 | 335 | set_has_boxed_value(true); |
kvn@5110 | 336 | return true; |
kvn@5110 | 337 | } |
kvn@5110 | 338 | return false; |
kvn@5110 | 339 | } |
duke@435 | 340 | |
duke@435 | 341 | // uncommon-trap call-sites where callee is unloaded, uninitialized or will not link |
duke@435 | 342 | bool Parse::can_not_compile_call_site(ciMethod *dest_method, ciInstanceKlass* klass) { |
duke@435 | 343 | // Additional inputs to consider... |
duke@435 | 344 | // bc = bc() |
duke@435 | 345 | // caller = method() |
duke@435 | 346 | // iter().get_method_holder_index() |
duke@435 | 347 | assert( dest_method->is_loaded(), "ciTypeFlow should not let us get here" ); |
duke@435 | 348 | // Interface classes can be loaded & linked and never get around to |
duke@435 | 349 | // being initialized. Uncommon-trap for not-initialized static or |
duke@435 | 350 | // v-calls. Let interface calls happen. |
twisti@1572 | 351 | ciInstanceKlass* holder_klass = dest_method->holder(); |
never@2000 | 352 | if (!holder_klass->is_being_initialized() && |
never@2000 | 353 | !holder_klass->is_initialized() && |
duke@435 | 354 | !holder_klass->is_interface()) { |
duke@435 | 355 | uncommon_trap(Deoptimization::Reason_uninitialized, |
duke@435 | 356 | Deoptimization::Action_reinterpret, |
duke@435 | 357 | holder_klass); |
duke@435 | 358 | return true; |
duke@435 | 359 | } |
duke@435 | 360 | |
bharadwaj@4268 | 361 | assert(dest_method->is_loaded(), "dest_method: typeflow responsibility"); |
duke@435 | 362 | return false; |
duke@435 | 363 | } |
duke@435 | 364 | |
duke@435 | 365 | |
duke@435 | 366 | //------------------------------do_call---------------------------------------- |
duke@435 | 367 | // Handle your basic call. Inline if we can & want to, else just setup call. |
duke@435 | 368 | void Parse::do_call() { |
duke@435 | 369 | // It's likely we are going to add debug info soon. |
duke@435 | 370 | // Also, if we inline a guy who eventually needs debug info for this JVMS, |
duke@435 | 371 | // our contribution to it is cleaned up right here. |
duke@435 | 372 | kill_dead_locals(); |
duke@435 | 373 | |
duke@435 | 374 | // Set frequently used booleans |
twisti@4021 | 375 | const bool is_virtual = bc() == Bytecodes::_invokevirtual; |
twisti@4021 | 376 | const bool is_virtual_or_interface = is_virtual || bc() == Bytecodes::_invokeinterface; |
twisti@4313 | 377 | const bool has_receiver = Bytecodes::has_receiver(bc()); |
duke@435 | 378 | |
duke@435 | 379 | // Find target being called |
duke@435 | 380 | bool will_link; |
twisti@4021 | 381 | ciSignature* declared_signature = NULL; |
twisti@4021 | 382 | ciMethod* orig_callee = iter().get_method(will_link, &declared_signature); // callee in the bytecode |
twisti@4021 | 383 | ciInstanceKlass* holder_klass = orig_callee->holder(); |
twisti@4021 | 384 | ciKlass* holder = iter().get_declared_method_holder(); |
duke@435 | 385 | ciInstanceKlass* klass = ciEnv::get_instance_klass_for_declared_method_holder(holder); |
twisti@4021 | 386 | assert(declared_signature != NULL, "cannot be null"); |
duke@435 | 387 | |
duke@435 | 388 | // uncommon-trap when callee is unloaded, uninitialized or will not link |
duke@435 | 389 | // bailout when too many arguments for register representation |
twisti@4021 | 390 | if (!will_link || can_not_compile_call_site(orig_callee, klass)) { |
duke@435 | 391 | #ifndef PRODUCT |
duke@435 | 392 | if (PrintOpto && (Verbose || WizardMode)) { |
duke@435 | 393 | method()->print_name(); tty->print_cr(" can not compile call at bci %d to:", bci()); |
twisti@4021 | 394 | orig_callee->print_name(); tty->cr(); |
duke@435 | 395 | } |
duke@435 | 396 | #endif |
duke@435 | 397 | return; |
duke@435 | 398 | } |
duke@435 | 399 | assert(holder_klass->is_loaded(), ""); |
twisti@3969 | 400 | //assert((bc_callee->is_static() || is_invokedynamic) == !has_receiver , "must match bc"); // XXX invokehandle (cur_bc_raw) |
duke@435 | 401 | // Note: this takes into account invokeinterface of methods declared in java/lang/Object, |
duke@435 | 402 | // which should be invokevirtuals but according to the VM spec may be invokeinterfaces |
duke@435 | 403 | assert(holder_klass->is_interface() || holder_klass->super() == NULL || (bc() != Bytecodes::_invokeinterface), "must match bc"); |
duke@435 | 404 | // Note: In the absence of miranda methods, an abstract class K can perform |
duke@435 | 405 | // an invokevirtual directly on an interface method I.m if K implements I. |
duke@435 | 406 | |
twisti@4313 | 407 | // orig_callee is the resolved callee which's signature includes the |
twisti@4313 | 408 | // appendix argument. |
twisti@4021 | 409 | const int nargs = orig_callee->arg_size(); |
twisti@4414 | 410 | const bool is_signature_polymorphic = MethodHandles::is_signature_polymorphic(orig_callee->intrinsic_id()); |
twisti@3969 | 411 | |
twisti@3969 | 412 | // Push appendix argument (MethodType, CallSite, etc.), if one. |
twisti@3969 | 413 | if (iter().has_appendix()) { |
twisti@3969 | 414 | ciObject* appendix_arg = iter().get_appendix(); |
twisti@3969 | 415 | const TypeOopPtr* appendix_arg_type = TypeOopPtr::make_from_constant(appendix_arg); |
twisti@3969 | 416 | Node* appendix_arg_node = _gvn.makecon(appendix_arg_type); |
twisti@3969 | 417 | push(appendix_arg_node); |
twisti@3969 | 418 | } |
twisti@3969 | 419 | |
duke@435 | 420 | // --------------------- |
duke@435 | 421 | // Does Class Hierarchy Analysis reveal only a single target of a v-call? |
duke@435 | 422 | // Then we may inline or make a static call, but become dependent on there being only 1 target. |
duke@435 | 423 | // Does the call-site type profile reveal only one receiver? |
duke@435 | 424 | // Then we may introduce a run-time check and inline on the path where it succeeds. |
duke@435 | 425 | // The other path may uncommon_trap, check for another receiver, or do a v-call. |
duke@435 | 426 | |
twisti@4414 | 427 | // Try to get the most accurate receiver type |
twisti@4414 | 428 | ciMethod* callee = orig_callee; |
twisti@4414 | 429 | int vtable_index = Method::invalid_vtable_index; |
twisti@4414 | 430 | bool call_does_dispatch = false; |
duke@435 | 431 | |
duke@435 | 432 | if (is_virtual_or_interface) { |
duke@435 | 433 | Node* receiver_node = stack(sp() - nargs); |
duke@435 | 434 | const TypeOopPtr* receiver_type = _gvn.type(receiver_node)->isa_oopptr(); |
twisti@4414 | 435 | // call_does_dispatch and vtable_index are out-parameters. They might be changed. |
twisti@4414 | 436 | callee = C->optimize_virtual_call(method(), bci(), klass, orig_callee, receiver_type, |
twisti@4414 | 437 | is_virtual, |
twisti@4414 | 438 | call_does_dispatch, vtable_index); // out-parameters |
duke@435 | 439 | } |
duke@435 | 440 | |
duke@435 | 441 | // Note: It's OK to try to inline a virtual call. |
duke@435 | 442 | // The call generator will not attempt to inline a polymorphic call |
duke@435 | 443 | // unless it knows how to optimize the receiver dispatch. |
duke@435 | 444 | bool try_inline = (C->do_inlining() || InlineAccessors); |
duke@435 | 445 | |
duke@435 | 446 | // --------------------- |
twisti@3969 | 447 | dec_sp(nargs); // Temporarily pop args for JVM state of call |
duke@435 | 448 | JVMState* jvms = sync_jvms(); |
duke@435 | 449 | |
duke@435 | 450 | // --------------------- |
duke@435 | 451 | // Decide call tactic. |
duke@435 | 452 | // This call checks with CHA, the interpreter profile, intrinsics table, etc. |
duke@435 | 453 | // It decides whether inlining is desirable or not. |
twisti@4414 | 454 | CallGenerator* cg = C->call_generator(callee, vtable_index, call_does_dispatch, jvms, try_inline, prof_factor()); |
twisti@3969 | 455 | |
twisti@4021 | 456 | // NOTE: Don't use orig_callee and callee after this point! Use cg->method() instead. |
twisti@4021 | 457 | orig_callee = callee = NULL; |
duke@435 | 458 | |
duke@435 | 459 | // --------------------- |
duke@435 | 460 | // Round double arguments before call |
twisti@3969 | 461 | round_double_arguments(cg->method()); |
duke@435 | 462 | |
duke@435 | 463 | #ifndef PRODUCT |
duke@435 | 464 | // bump global counters for calls |
twisti@3969 | 465 | count_compiled_calls(/*at_method_entry*/ false, cg->is_inline()); |
duke@435 | 466 | |
duke@435 | 467 | // Record first part of parsing work for this call |
duke@435 | 468 | parse_histogram()->record_change(); |
duke@435 | 469 | #endif // not PRODUCT |
duke@435 | 470 | |
duke@435 | 471 | assert(jvms == this->jvms(), "still operating on the right JVMS"); |
duke@435 | 472 | assert(jvms_in_sync(), "jvms must carry full info into CG"); |
duke@435 | 473 | |
duke@435 | 474 | // save across call, for a subsequent cast_not_null. |
duke@435 | 475 | Node* receiver = has_receiver ? argument(0) : NULL; |
duke@435 | 476 | |
duke@435 | 477 | // Bump method data counters (We profile *before* the call is made |
duke@435 | 478 | // because exceptions don't return to the call site.) |
duke@435 | 479 | profile_call(receiver); |
duke@435 | 480 | |
twisti@3969 | 481 | JVMState* new_jvms = cg->generate(jvms); |
twisti@3969 | 482 | if (new_jvms == NULL) { |
duke@435 | 483 | // When inlining attempt fails (e.g., too many arguments), |
duke@435 | 484 | // it may contaminate the current compile state, making it |
duke@435 | 485 | // impossible to pull back and try again. Once we call |
duke@435 | 486 | // cg->generate(), we are committed. If it fails, the whole |
duke@435 | 487 | // compilation task is compromised. |
duke@435 | 488 | if (failing()) return; |
never@3631 | 489 | |
duke@435 | 490 | // This can happen if a library intrinsic is available, but refuses |
duke@435 | 491 | // the call site, perhaps because it did not match a pattern the |
never@3631 | 492 | // intrinsic was expecting to optimize. Should always be possible to |
never@3631 | 493 | // get a normal java call that may inline in that case |
twisti@4414 | 494 | cg = C->call_generator(cg->method(), vtable_index, call_does_dispatch, jvms, try_inline, prof_factor(), /* allow_intrinsics= */ false); |
duke@435 | 495 | if ((new_jvms = cg->generate(jvms)) == NULL) { |
duke@435 | 496 | guarantee(failing(), "call failed to generate: calls should work"); |
duke@435 | 497 | return; |
duke@435 | 498 | } |
duke@435 | 499 | } |
duke@435 | 500 | |
duke@435 | 501 | if (cg->is_inline()) { |
never@502 | 502 | // Accumulate has_loops estimate |
twisti@3969 | 503 | C->set_has_loops(C->has_loops() || cg->method()->has_loops()); |
twisti@3969 | 504 | C->env()->notice_inlined_method(cg->method()); |
duke@435 | 505 | } |
duke@435 | 506 | |
duke@435 | 507 | // Reset parser state from [new_]jvms, which now carries results of the call. |
duke@435 | 508 | // Return value (if any) is already pushed on the stack by the cg. |
duke@435 | 509 | add_exception_states_from(new_jvms); |
duke@435 | 510 | if (new_jvms->map()->control() == top()) { |
duke@435 | 511 | stop_and_kill_map(); |
duke@435 | 512 | } else { |
duke@435 | 513 | assert(new_jvms->same_calls_as(jvms), "method/bci left unchanged"); |
duke@435 | 514 | set_jvms(new_jvms); |
duke@435 | 515 | } |
duke@435 | 516 | |
duke@435 | 517 | if (!stopped()) { |
duke@435 | 518 | // This was some sort of virtual call, which did a null check for us. |
duke@435 | 519 | // Now we can assert receiver-not-null, on the normal return path. |
duke@435 | 520 | if (receiver != NULL && cg->is_virtual()) { |
duke@435 | 521 | Node* cast = cast_not_null(receiver); |
duke@435 | 522 | // %%% assert(receiver == cast, "should already have cast the receiver"); |
duke@435 | 523 | } |
duke@435 | 524 | |
duke@435 | 525 | // Round double result after a call from strict to non-strict code |
twisti@3969 | 526 | round_double_result(cg->method()); |
twisti@3969 | 527 | |
twisti@3969 | 528 | ciType* rtype = cg->method()->return_type(); |
twisti@4414 | 529 | ciType* ctype = declared_signature->return_type(); |
twisti@4414 | 530 | |
twisti@4414 | 531 | if (Bytecodes::has_optional_appendix(iter().cur_bc_raw()) || is_signature_polymorphic) { |
twisti@3969 | 532 | // Be careful here with return types. |
twisti@3969 | 533 | if (ctype != rtype) { |
twisti@3969 | 534 | BasicType rt = rtype->basic_type(); |
twisti@3969 | 535 | BasicType ct = ctype->basic_type(); |
twisti@3969 | 536 | if (ct == T_VOID) { |
twisti@3969 | 537 | // It's OK for a method to return a value that is discarded. |
twisti@3969 | 538 | // The discarding does not require any special action from the caller. |
twisti@3969 | 539 | // The Java code knows this, at VerifyType.isNullConversion. |
twisti@3969 | 540 | pop_node(rt); // whatever it was, pop it |
twisti@3969 | 541 | } else if (rt == T_INT || is_subword_type(rt)) { |
twisti@4414 | 542 | // Nothing. These cases are handled in lambda form bytecode. |
twisti@4414 | 543 | assert(ct == T_INT || is_subword_type(ct), err_msg_res("must match: rt=%s, ct=%s", type2name(rt), type2name(ct))); |
twisti@3973 | 544 | } else if (rt == T_OBJECT || rt == T_ARRAY) { |
twisti@3973 | 545 | assert(ct == T_OBJECT || ct == T_ARRAY, err_msg_res("rt=%s, ct=%s", type2name(rt), type2name(ct))); |
twisti@3969 | 546 | if (ctype->is_loaded()) { |
twisti@4021 | 547 | const TypeOopPtr* arg_type = TypeOopPtr::make_from_klass(rtype->as_klass()); |
twisti@4021 | 548 | const Type* sig_type = TypeOopPtr::make_from_klass(ctype->as_klass()); |
twisti@4021 | 549 | if (arg_type != NULL && !arg_type->higher_equal(sig_type)) { |
twisti@4414 | 550 | Node* retnode = pop(); |
kvn@4115 | 551 | Node* cast_obj = _gvn.transform(new (C) CheckCastPPNode(control(), retnode, sig_type)); |
twisti@4021 | 552 | push(cast_obj); |
twisti@3969 | 553 | } |
twisti@3969 | 554 | } |
twisti@3969 | 555 | } else { |
twisti@4414 | 556 | assert(rt == ct, err_msg_res("unexpected mismatch: rt=%s, ct=%s", type2name(rt), type2name(ct))); |
twisti@3969 | 557 | // push a zero; it's better than getting an oop/int mismatch |
twisti@4414 | 558 | pop_node(rt); |
twisti@4414 | 559 | Node* retnode = zerocon(ct); |
twisti@3969 | 560 | push_node(ct, retnode); |
twisti@3969 | 561 | } |
twisti@3969 | 562 | // Now that the value is well-behaved, continue with the call-site type. |
twisti@3969 | 563 | rtype = ctype; |
twisti@3969 | 564 | } |
twisti@4414 | 565 | } else { |
twisti@4447 | 566 | // Symbolic resolution enforces the types to be the same. |
twisti@4447 | 567 | // NOTE: We must relax the assert for unloaded types because two |
twisti@4447 | 568 | // different ciType instances of the same unloaded class type |
twisti@4447 | 569 | // can appear to be "loaded" by different loaders (depending on |
twisti@4447 | 570 | // the accessing class). |
twisti@4447 | 571 | assert(!rtype->is_loaded() || !ctype->is_loaded() || rtype == ctype, |
twisti@4447 | 572 | err_msg_res("mismatched return types: rtype=%s, ctype=%s", rtype->name(), ctype->name())); |
twisti@3969 | 573 | } |
duke@435 | 574 | |
duke@435 | 575 | // If the return type of the method is not loaded, assert that the |
duke@435 | 576 | // value we got is a null. Otherwise, we need to recompile. |
twisti@3969 | 577 | if (!rtype->is_loaded()) { |
duke@435 | 578 | #ifndef PRODUCT |
duke@435 | 579 | if (PrintOpto && (Verbose || WizardMode)) { |
duke@435 | 580 | method()->print_name(); tty->print_cr(" asserting nullness of result at bci: %d", bci()); |
twisti@3969 | 581 | cg->method()->print_name(); tty->cr(); |
duke@435 | 582 | } |
duke@435 | 583 | #endif |
duke@435 | 584 | if (C->log() != NULL) { |
duke@435 | 585 | C->log()->elem("assert_null reason='return' klass='%d'", |
twisti@3969 | 586 | C->log()->identify(rtype)); |
duke@435 | 587 | } |
duke@435 | 588 | // If there is going to be a trap, put it at the next bytecode: |
duke@435 | 589 | set_bci(iter().next_bci()); |
twisti@4313 | 590 | null_assert(peek()); |
duke@435 | 591 | set_bci(iter().cur_bci()); // put it back |
duke@435 | 592 | } |
duke@435 | 593 | } |
duke@435 | 594 | |
duke@435 | 595 | // Restart record of parsing work after possible inlining of call |
duke@435 | 596 | #ifndef PRODUCT |
duke@435 | 597 | parse_histogram()->set_initial_state(bc()); |
duke@435 | 598 | #endif |
duke@435 | 599 | } |
duke@435 | 600 | |
duke@435 | 601 | //---------------------------catch_call_exceptions----------------------------- |
duke@435 | 602 | // Put a Catch and CatchProj nodes behind a just-created call. |
duke@435 | 603 | // Send their caught exceptions to the proper handler. |
duke@435 | 604 | // This may be used after a call to the rethrow VM stub, |
duke@435 | 605 | // when it is needed to process unloaded exception classes. |
duke@435 | 606 | void Parse::catch_call_exceptions(ciExceptionHandlerStream& handlers) { |
duke@435 | 607 | // Exceptions are delivered through this channel: |
duke@435 | 608 | Node* i_o = this->i_o(); |
duke@435 | 609 | |
duke@435 | 610 | // Add a CatchNode. |
duke@435 | 611 | GrowableArray<int>* bcis = new (C->node_arena()) GrowableArray<int>(C->node_arena(), 8, 0, -1); |
duke@435 | 612 | GrowableArray<const Type*>* extypes = new (C->node_arena()) GrowableArray<const Type*>(C->node_arena(), 8, 0, NULL); |
duke@435 | 613 | GrowableArray<int>* saw_unloaded = new (C->node_arena()) GrowableArray<int>(C->node_arena(), 8, 0, 0); |
duke@435 | 614 | |
duke@435 | 615 | for (; !handlers.is_done(); handlers.next()) { |
duke@435 | 616 | ciExceptionHandler* h = handlers.handler(); |
duke@435 | 617 | int h_bci = h->handler_bci(); |
duke@435 | 618 | ciInstanceKlass* h_klass = h->is_catch_all() ? env()->Throwable_klass() : h->catch_klass(); |
duke@435 | 619 | // Do not introduce unloaded exception types into the graph: |
duke@435 | 620 | if (!h_klass->is_loaded()) { |
duke@435 | 621 | if (saw_unloaded->contains(h_bci)) { |
duke@435 | 622 | /* We've already seen an unloaded exception with h_bci, |
duke@435 | 623 | so don't duplicate. Duplication will cause the CatchNode to be |
duke@435 | 624 | unnecessarily large. See 4713716. */ |
duke@435 | 625 | continue; |
duke@435 | 626 | } else { |
duke@435 | 627 | saw_unloaded->append(h_bci); |
duke@435 | 628 | } |
duke@435 | 629 | } |
duke@435 | 630 | const Type* h_extype = TypeOopPtr::make_from_klass(h_klass); |
duke@435 | 631 | // (We use make_from_klass because it respects UseUniqueSubclasses.) |
duke@435 | 632 | h_extype = h_extype->join(TypeInstPtr::NOTNULL); |
duke@435 | 633 | assert(!h_extype->empty(), "sanity"); |
duke@435 | 634 | // Note: It's OK if the BCIs repeat themselves. |
duke@435 | 635 | bcis->append(h_bci); |
duke@435 | 636 | extypes->append(h_extype); |
duke@435 | 637 | } |
duke@435 | 638 | |
duke@435 | 639 | int len = bcis->length(); |
kvn@4115 | 640 | CatchNode *cn = new (C) CatchNode(control(), i_o, len+1); |
duke@435 | 641 | Node *catch_ = _gvn.transform(cn); |
duke@435 | 642 | |
duke@435 | 643 | // now branch with the exception state to each of the (potential) |
duke@435 | 644 | // handlers |
duke@435 | 645 | for(int i=0; i < len; i++) { |
duke@435 | 646 | // Setup JVM state to enter the handler. |
duke@435 | 647 | PreserveJVMState pjvms(this); |
duke@435 | 648 | // Locals are just copied from before the call. |
duke@435 | 649 | // Get control from the CatchNode. |
duke@435 | 650 | int handler_bci = bcis->at(i); |
kvn@4115 | 651 | Node* ctrl = _gvn.transform( new (C) CatchProjNode(catch_, i+1,handler_bci)); |
duke@435 | 652 | // This handler cannot happen? |
duke@435 | 653 | if (ctrl == top()) continue; |
duke@435 | 654 | set_control(ctrl); |
duke@435 | 655 | |
duke@435 | 656 | // Create exception oop |
duke@435 | 657 | const TypeInstPtr* extype = extypes->at(i)->is_instptr(); |
kvn@4115 | 658 | Node *ex_oop = _gvn.transform(new (C) CreateExNode(extypes->at(i), ctrl, i_o)); |
duke@435 | 659 | |
duke@435 | 660 | // Handle unloaded exception classes. |
duke@435 | 661 | if (saw_unloaded->contains(handler_bci)) { |
duke@435 | 662 | // An unloaded exception type is coming here. Do an uncommon trap. |
duke@435 | 663 | #ifndef PRODUCT |
duke@435 | 664 | // We do not expect the same handler bci to take both cold unloaded |
duke@435 | 665 | // and hot loaded exceptions. But, watch for it. |
twisti@3970 | 666 | if ((Verbose || WizardMode) && extype->is_loaded()) { |
twisti@3970 | 667 | tty->print("Warning: Handler @%d takes mixed loaded/unloaded exceptions in ", bci()); |
duke@435 | 668 | method()->print_name(); tty->cr(); |
duke@435 | 669 | } else if (PrintOpto && (Verbose || WizardMode)) { |
duke@435 | 670 | tty->print("Bailing out on unloaded exception type "); |
duke@435 | 671 | extype->klass()->print_name(); |
duke@435 | 672 | tty->print(" at bci:%d in ", bci()); |
duke@435 | 673 | method()->print_name(); tty->cr(); |
duke@435 | 674 | } |
duke@435 | 675 | #endif |
duke@435 | 676 | // Emit an uncommon trap instead of processing the block. |
duke@435 | 677 | set_bci(handler_bci); |
duke@435 | 678 | push_ex_oop(ex_oop); |
duke@435 | 679 | uncommon_trap(Deoptimization::Reason_unloaded, |
duke@435 | 680 | Deoptimization::Action_reinterpret, |
duke@435 | 681 | extype->klass(), "!loaded exception"); |
duke@435 | 682 | set_bci(iter().cur_bci()); // put it back |
duke@435 | 683 | continue; |
duke@435 | 684 | } |
duke@435 | 685 | |
duke@435 | 686 | // go to the exception handler |
duke@435 | 687 | if (handler_bci < 0) { // merge with corresponding rethrow node |
duke@435 | 688 | throw_to_exit(make_exception_state(ex_oop)); |
duke@435 | 689 | } else { // Else jump to corresponding handle |
duke@435 | 690 | push_ex_oop(ex_oop); // Clear stack and push just the oop. |
duke@435 | 691 | merge_exception(handler_bci); |
duke@435 | 692 | } |
duke@435 | 693 | } |
duke@435 | 694 | |
duke@435 | 695 | // The first CatchProj is for the normal return. |
duke@435 | 696 | // (Note: If this is a call to rethrow_Java, this node goes dead.) |
kvn@4115 | 697 | set_control(_gvn.transform( new (C) CatchProjNode(catch_, CatchProjNode::fall_through_index, CatchProjNode::no_handler_bci))); |
duke@435 | 698 | } |
duke@435 | 699 | |
duke@435 | 700 | |
duke@435 | 701 | //----------------------------catch_inline_exceptions-------------------------- |
duke@435 | 702 | // Handle all exceptions thrown by an inlined method or individual bytecode. |
duke@435 | 703 | // Common case 1: we have no handler, so all exceptions merge right into |
duke@435 | 704 | // the rethrow case. |
duke@435 | 705 | // Case 2: we have some handlers, with loaded exception klasses that have |
duke@435 | 706 | // no subklasses. We do a Deutsch-Shiffman style type-check on the incoming |
duke@435 | 707 | // exception oop and branch to the handler directly. |
duke@435 | 708 | // Case 3: We have some handlers with subklasses or are not loaded at |
duke@435 | 709 | // compile-time. We have to call the runtime to resolve the exception. |
duke@435 | 710 | // So we insert a RethrowCall and all the logic that goes with it. |
duke@435 | 711 | void Parse::catch_inline_exceptions(SafePointNode* ex_map) { |
duke@435 | 712 | // Caller is responsible for saving away the map for normal control flow! |
duke@435 | 713 | assert(stopped(), "call set_map(NULL) first"); |
duke@435 | 714 | assert(method()->has_exception_handlers(), "don't come here w/o work to do"); |
duke@435 | 715 | |
duke@435 | 716 | Node* ex_node = saved_ex_oop(ex_map); |
duke@435 | 717 | if (ex_node == top()) { |
duke@435 | 718 | // No action needed. |
duke@435 | 719 | return; |
duke@435 | 720 | } |
duke@435 | 721 | const TypeInstPtr* ex_type = _gvn.type(ex_node)->isa_instptr(); |
duke@435 | 722 | NOT_PRODUCT(if (ex_type==NULL) tty->print_cr("*** Exception not InstPtr")); |
duke@435 | 723 | if (ex_type == NULL) |
duke@435 | 724 | ex_type = TypeOopPtr::make_from_klass(env()->Throwable_klass())->is_instptr(); |
duke@435 | 725 | |
duke@435 | 726 | // determine potential exception handlers |
duke@435 | 727 | ciExceptionHandlerStream handlers(method(), bci(), |
duke@435 | 728 | ex_type->klass()->as_instance_klass(), |
duke@435 | 729 | ex_type->klass_is_exact()); |
duke@435 | 730 | |
duke@435 | 731 | // Start executing from the given throw state. (Keep its stack, for now.) |
duke@435 | 732 | // Get the exception oop as known at compile time. |
duke@435 | 733 | ex_node = use_exception_state(ex_map); |
duke@435 | 734 | |
duke@435 | 735 | // Get the exception oop klass from its header |
duke@435 | 736 | Node* ex_klass_node = NULL; |
duke@435 | 737 | if (has_ex_handler() && !ex_type->klass_is_exact()) { |
duke@435 | 738 | Node* p = basic_plus_adr( ex_node, ex_node, oopDesc::klass_offset_in_bytes()); |
kvn@599 | 739 | ex_klass_node = _gvn.transform( LoadKlassNode::make(_gvn, immutable_memory(), p, TypeInstPtr::KLASS, TypeKlassPtr::OBJECT) ); |
duke@435 | 740 | |
duke@435 | 741 | // Compute the exception klass a little more cleverly. |
duke@435 | 742 | // Obvious solution is to simple do a LoadKlass from the 'ex_node'. |
duke@435 | 743 | // However, if the ex_node is a PhiNode, I'm going to do a LoadKlass for |
duke@435 | 744 | // each arm of the Phi. If I know something clever about the exceptions |
duke@435 | 745 | // I'm loading the class from, I can replace the LoadKlass with the |
duke@435 | 746 | // klass constant for the exception oop. |
duke@435 | 747 | if( ex_node->is_Phi() ) { |
kvn@4115 | 748 | ex_klass_node = new (C) PhiNode( ex_node->in(0), TypeKlassPtr::OBJECT ); |
duke@435 | 749 | for( uint i = 1; i < ex_node->req(); i++ ) { |
duke@435 | 750 | Node* p = basic_plus_adr( ex_node->in(i), ex_node->in(i), oopDesc::klass_offset_in_bytes() ); |
kvn@599 | 751 | Node* k = _gvn.transform( LoadKlassNode::make(_gvn, immutable_memory(), p, TypeInstPtr::KLASS, TypeKlassPtr::OBJECT) ); |
duke@435 | 752 | ex_klass_node->init_req( i, k ); |
duke@435 | 753 | } |
duke@435 | 754 | _gvn.set_type(ex_klass_node, TypeKlassPtr::OBJECT); |
duke@435 | 755 | |
duke@435 | 756 | } |
duke@435 | 757 | } |
duke@435 | 758 | |
duke@435 | 759 | // Scan the exception table for applicable handlers. |
duke@435 | 760 | // If none, we can call rethrow() and be done! |
duke@435 | 761 | // If precise (loaded with no subklasses), insert a D.S. style |
duke@435 | 762 | // pointer compare to the correct handler and loop back. |
duke@435 | 763 | // If imprecise, switch to the Rethrow VM-call style handling. |
duke@435 | 764 | |
duke@435 | 765 | int remaining = handlers.count_remaining(); |
duke@435 | 766 | |
duke@435 | 767 | // iterate through all entries sequentially |
duke@435 | 768 | for (;!handlers.is_done(); handlers.next()) { |
duke@435 | 769 | ciExceptionHandler* handler = handlers.handler(); |
duke@435 | 770 | |
duke@435 | 771 | if (handler->is_rethrow()) { |
duke@435 | 772 | // If we fell off the end of the table without finding an imprecise |
duke@435 | 773 | // exception klass (and without finding a generic handler) then we |
duke@435 | 774 | // know this exception is not handled in this method. We just rethrow |
duke@435 | 775 | // the exception into the caller. |
duke@435 | 776 | throw_to_exit(make_exception_state(ex_node)); |
duke@435 | 777 | return; |
duke@435 | 778 | } |
duke@435 | 779 | |
duke@435 | 780 | // exception handler bci range covers throw_bci => investigate further |
duke@435 | 781 | int handler_bci = handler->handler_bci(); |
duke@435 | 782 | |
duke@435 | 783 | if (remaining == 1) { |
duke@435 | 784 | push_ex_oop(ex_node); // Push exception oop for handler |
duke@435 | 785 | #ifndef PRODUCT |
duke@435 | 786 | if (PrintOpto && WizardMode) { |
duke@435 | 787 | tty->print_cr(" Catching every inline exception bci:%d -> handler_bci:%d", bci(), handler_bci); |
duke@435 | 788 | } |
duke@435 | 789 | #endif |
duke@435 | 790 | merge_exception(handler_bci); // jump to handler |
duke@435 | 791 | return; // No more handling to be done here! |
duke@435 | 792 | } |
duke@435 | 793 | |
never@1779 | 794 | // Get the handler's klass |
never@1779 | 795 | ciInstanceKlass* klass = handler->catch_klass(); |
duke@435 | 796 | |
never@1779 | 797 | if (!klass->is_loaded()) { // klass is not loaded? |
never@1779 | 798 | // fall through into catch_call_exceptions which will emit a |
never@1779 | 799 | // handler with an uncommon trap. |
never@1779 | 800 | break; |
duke@435 | 801 | } |
duke@435 | 802 | |
duke@435 | 803 | if (klass->is_interface()) // should not happen, but... |
duke@435 | 804 | break; // bail out |
duke@435 | 805 | |
never@1779 | 806 | // Check the type of the exception against the catch type |
duke@435 | 807 | const TypeKlassPtr *tk = TypeKlassPtr::make(klass); |
duke@435 | 808 | Node* con = _gvn.makecon(tk); |
never@1779 | 809 | Node* not_subtype_ctrl = gen_subtype_check(ex_klass_node, con); |
never@1779 | 810 | if (!stopped()) { |
never@1779 | 811 | PreserveJVMState pjvms(this); |
never@1779 | 812 | const TypeInstPtr* tinst = TypeOopPtr::make_from_klass_unique(klass)->cast_to_ptr_type(TypePtr::NotNull)->is_instptr(); |
never@1779 | 813 | assert(klass->has_subklass() || tinst->klass_is_exact(), "lost exactness"); |
kvn@4115 | 814 | Node* ex_oop = _gvn.transform(new (C) CheckCastPPNode(control(), ex_node, tinst)); |
duke@435 | 815 | push_ex_oop(ex_oop); // Push exception oop for handler |
duke@435 | 816 | #ifndef PRODUCT |
duke@435 | 817 | if (PrintOpto && WizardMode) { |
duke@435 | 818 | tty->print(" Catching inline exception bci:%d -> handler_bci:%d -- ", bci(), handler_bci); |
duke@435 | 819 | klass->print_name(); |
duke@435 | 820 | tty->cr(); |
duke@435 | 821 | } |
duke@435 | 822 | #endif |
duke@435 | 823 | merge_exception(handler_bci); |
duke@435 | 824 | } |
never@1779 | 825 | set_control(not_subtype_ctrl); |
duke@435 | 826 | |
duke@435 | 827 | // Come here if exception does not match handler. |
duke@435 | 828 | // Carry on with more handler checks. |
duke@435 | 829 | --remaining; |
duke@435 | 830 | } |
duke@435 | 831 | |
duke@435 | 832 | assert(!stopped(), "you should return if you finish the chain"); |
duke@435 | 833 | |
duke@435 | 834 | // Oops, need to call into the VM to resolve the klasses at runtime. |
duke@435 | 835 | // Note: This call must not deoptimize, since it is not a real at this bci! |
duke@435 | 836 | kill_dead_locals(); |
duke@435 | 837 | |
duke@435 | 838 | make_runtime_call(RC_NO_LEAF | RC_MUST_THROW, |
duke@435 | 839 | OptoRuntime::rethrow_Type(), |
duke@435 | 840 | OptoRuntime::rethrow_stub(), |
duke@435 | 841 | NULL, NULL, |
duke@435 | 842 | ex_node); |
duke@435 | 843 | |
duke@435 | 844 | // Rethrow is a pure call, no side effects, only a result. |
duke@435 | 845 | // The result cannot be allocated, so we use I_O |
duke@435 | 846 | |
duke@435 | 847 | // Catch exceptions from the rethrow |
duke@435 | 848 | catch_call_exceptions(handlers); |
duke@435 | 849 | } |
duke@435 | 850 | |
duke@435 | 851 | |
duke@435 | 852 | // (Note: Moved add_debug_info into GraphKit::add_safepoint_edges.) |
duke@435 | 853 | |
duke@435 | 854 | |
duke@435 | 855 | #ifndef PRODUCT |
duke@435 | 856 | void Parse::count_compiled_calls(bool at_method_entry, bool is_inline) { |
duke@435 | 857 | if( CountCompiledCalls ) { |
duke@435 | 858 | if( at_method_entry ) { |
duke@435 | 859 | // bump invocation counter if top method (for statistics) |
duke@435 | 860 | if (CountCompiledCalls && depth() == 1) { |
coleenp@4037 | 861 | const TypePtr* addr_type = TypeMetadataPtr::make(method()); |
duke@435 | 862 | Node* adr1 = makecon(addr_type); |
coleenp@4037 | 863 | Node* adr2 = basic_plus_adr(adr1, adr1, in_bytes(Method::compiled_invocation_counter_offset())); |
duke@435 | 864 | increment_counter(adr2); |
duke@435 | 865 | } |
duke@435 | 866 | } else if (is_inline) { |
duke@435 | 867 | switch (bc()) { |
duke@435 | 868 | case Bytecodes::_invokevirtual: increment_counter(SharedRuntime::nof_inlined_calls_addr()); break; |
duke@435 | 869 | case Bytecodes::_invokeinterface: increment_counter(SharedRuntime::nof_inlined_interface_calls_addr()); break; |
duke@435 | 870 | case Bytecodes::_invokestatic: |
jrose@1161 | 871 | case Bytecodes::_invokedynamic: |
duke@435 | 872 | case Bytecodes::_invokespecial: increment_counter(SharedRuntime::nof_inlined_static_calls_addr()); break; |
duke@435 | 873 | default: fatal("unexpected call bytecode"); |
duke@435 | 874 | } |
duke@435 | 875 | } else { |
duke@435 | 876 | switch (bc()) { |
duke@435 | 877 | case Bytecodes::_invokevirtual: increment_counter(SharedRuntime::nof_normal_calls_addr()); break; |
duke@435 | 878 | case Bytecodes::_invokeinterface: increment_counter(SharedRuntime::nof_interface_calls_addr()); break; |
duke@435 | 879 | case Bytecodes::_invokestatic: |
jrose@1161 | 880 | case Bytecodes::_invokedynamic: |
duke@435 | 881 | case Bytecodes::_invokespecial: increment_counter(SharedRuntime::nof_static_calls_addr()); break; |
duke@435 | 882 | default: fatal("unexpected call bytecode"); |
duke@435 | 883 | } |
duke@435 | 884 | } |
duke@435 | 885 | } |
duke@435 | 886 | } |
duke@435 | 887 | #endif //PRODUCT |
duke@435 | 888 | |
duke@435 | 889 | |
twisti@4414 | 890 | ciMethod* Compile::optimize_virtual_call(ciMethod* caller, int bci, ciInstanceKlass* klass, |
twisti@4414 | 891 | ciMethod* callee, const TypeOopPtr* receiver_type, |
twisti@4414 | 892 | bool is_virtual, |
twisti@4414 | 893 | bool& call_does_dispatch, int& vtable_index) { |
twisti@4414 | 894 | // Set default values for out-parameters. |
twisti@4414 | 895 | call_does_dispatch = true; |
twisti@4414 | 896 | vtable_index = Method::invalid_vtable_index; |
twisti@4414 | 897 | |
twisti@4414 | 898 | // Choose call strategy. |
twisti@4414 | 899 | ciMethod* optimized_virtual_method = optimize_inlining(caller, bci, klass, callee, receiver_type); |
twisti@4414 | 900 | |
twisti@4414 | 901 | // Have the call been sufficiently improved such that it is no longer a virtual? |
twisti@4414 | 902 | if (optimized_virtual_method != NULL) { |
twisti@4414 | 903 | callee = optimized_virtual_method; |
twisti@4414 | 904 | call_does_dispatch = false; |
twisti@4414 | 905 | } else if (!UseInlineCaches && is_virtual && callee->is_loaded()) { |
twisti@4414 | 906 | // We can make a vtable call at this site |
twisti@4414 | 907 | vtable_index = callee->resolve_vtable_index(caller->holder(), klass); |
twisti@4414 | 908 | } |
twisti@4414 | 909 | return callee; |
twisti@4414 | 910 | } |
twisti@4414 | 911 | |
duke@435 | 912 | // Identify possible target method and inlining style |
twisti@4414 | 913 | ciMethod* Compile::optimize_inlining(ciMethod* caller, int bci, ciInstanceKlass* klass, |
twisti@4414 | 914 | ciMethod* callee, const TypeOopPtr* receiver_type) { |
duke@435 | 915 | // only use for virtual or interface calls |
duke@435 | 916 | |
duke@435 | 917 | // If it is obviously final, do not bother to call find_monomorphic_target, |
duke@435 | 918 | // because the class hierarchy checks are not needed, and may fail due to |
duke@435 | 919 | // incompletely loaded classes. Since we do our own class loading checks |
duke@435 | 920 | // in this module, we may confidently bind to any method. |
twisti@4414 | 921 | if (callee->can_be_statically_bound()) { |
twisti@4414 | 922 | return callee; |
duke@435 | 923 | } |
duke@435 | 924 | |
duke@435 | 925 | // Attempt to improve the receiver |
duke@435 | 926 | bool actual_receiver_is_exact = false; |
duke@435 | 927 | ciInstanceKlass* actual_receiver = klass; |
duke@435 | 928 | if (receiver_type != NULL) { |
duke@435 | 929 | // Array methods are all inherited from Object, and are monomorphic. |
duke@435 | 930 | if (receiver_type->isa_aryptr() && |
twisti@4414 | 931 | callee->holder() == env()->Object_klass()) { |
twisti@4414 | 932 | return callee; |
duke@435 | 933 | } |
duke@435 | 934 | |
duke@435 | 935 | // All other interesting cases are instance klasses. |
duke@435 | 936 | if (!receiver_type->isa_instptr()) { |
duke@435 | 937 | return NULL; |
duke@435 | 938 | } |
duke@435 | 939 | |
duke@435 | 940 | ciInstanceKlass *ikl = receiver_type->klass()->as_instance_klass(); |
duke@435 | 941 | if (ikl->is_loaded() && ikl->is_initialized() && !ikl->is_interface() && |
never@802 | 942 | (ikl == actual_receiver || ikl->is_subtype_of(actual_receiver))) { |
duke@435 | 943 | // ikl is a same or better type than the original actual_receiver, |
duke@435 | 944 | // e.g. static receiver from bytecodes. |
duke@435 | 945 | actual_receiver = ikl; |
duke@435 | 946 | // Is the actual_receiver exact? |
duke@435 | 947 | actual_receiver_is_exact = receiver_type->klass_is_exact(); |
duke@435 | 948 | } |
duke@435 | 949 | } |
duke@435 | 950 | |
duke@435 | 951 | ciInstanceKlass* calling_klass = caller->holder(); |
twisti@4414 | 952 | ciMethod* cha_monomorphic_target = callee->find_monomorphic_target(calling_klass, klass, actual_receiver); |
duke@435 | 953 | if (cha_monomorphic_target != NULL) { |
duke@435 | 954 | assert(!cha_monomorphic_target->is_abstract(), ""); |
duke@435 | 955 | // Look at the method-receiver type. Does it add "too much information"? |
duke@435 | 956 | ciKlass* mr_klass = cha_monomorphic_target->holder(); |
duke@435 | 957 | const Type* mr_type = TypeInstPtr::make(TypePtr::BotPTR, mr_klass); |
duke@435 | 958 | if (receiver_type == NULL || !receiver_type->higher_equal(mr_type)) { |
duke@435 | 959 | // Calling this method would include an implicit cast to its holder. |
duke@435 | 960 | // %%% Not yet implemented. Would throw minor asserts at present. |
duke@435 | 961 | // %%% The most common wins are already gained by +UseUniqueSubclasses. |
duke@435 | 962 | // To fix, put the higher_equal check at the call of this routine, |
duke@435 | 963 | // and add a CheckCastPP to the receiver. |
duke@435 | 964 | if (TraceDependencies) { |
duke@435 | 965 | tty->print_cr("found unique CHA method, but could not cast up"); |
duke@435 | 966 | tty->print(" method = "); |
duke@435 | 967 | cha_monomorphic_target->print(); |
duke@435 | 968 | tty->cr(); |
duke@435 | 969 | } |
twisti@4414 | 970 | if (log() != NULL) { |
twisti@4414 | 971 | log()->elem("missed_CHA_opportunity klass='%d' method='%d'", |
twisti@4414 | 972 | log()->identify(klass), |
twisti@4414 | 973 | log()->identify(cha_monomorphic_target)); |
duke@435 | 974 | } |
duke@435 | 975 | cha_monomorphic_target = NULL; |
duke@435 | 976 | } |
duke@435 | 977 | } |
duke@435 | 978 | if (cha_monomorphic_target != NULL) { |
duke@435 | 979 | // Hardwiring a virtual. |
duke@435 | 980 | // If we inlined because CHA revealed only a single target method, |
duke@435 | 981 | // then we are dependent on that target method not getting overridden |
duke@435 | 982 | // by dynamic class loading. Be sure to test the "static" receiver |
duke@435 | 983 | // dest_method here, as opposed to the actual receiver, which may |
duke@435 | 984 | // falsely lead us to believe that the receiver is final or private. |
twisti@4414 | 985 | dependencies()->assert_unique_concrete_method(actual_receiver, cha_monomorphic_target); |
duke@435 | 986 | return cha_monomorphic_target; |
duke@435 | 987 | } |
duke@435 | 988 | |
duke@435 | 989 | // If the type is exact, we can still bind the method w/o a vcall. |
duke@435 | 990 | // (This case comes after CHA so we can see how much extra work it does.) |
duke@435 | 991 | if (actual_receiver_is_exact) { |
duke@435 | 992 | // In case of evolution, there is a dependence on every inlined method, since each |
duke@435 | 993 | // such method can be changed when its class is redefined. |
twisti@4414 | 994 | ciMethod* exact_method = callee->resolve_invoke(calling_klass, actual_receiver); |
duke@435 | 995 | if (exact_method != NULL) { |
duke@435 | 996 | #ifndef PRODUCT |
duke@435 | 997 | if (PrintOpto) { |
duke@435 | 998 | tty->print(" Calling method via exact type @%d --- ", bci); |
duke@435 | 999 | exact_method->print_name(); |
duke@435 | 1000 | tty->cr(); |
duke@435 | 1001 | } |
duke@435 | 1002 | #endif |
duke@435 | 1003 | return exact_method; |
duke@435 | 1004 | } |
duke@435 | 1005 | } |
duke@435 | 1006 | |
duke@435 | 1007 | return NULL; |
duke@435 | 1008 | } |