1 /*
2 * Copyright (c) 2010, 2016, Oracle and/or its affiliates. All rights reserved.
3 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
4 *
5 * This code is free software; you can redistribute it and/or modify it
6 * under the terms of the GNU General Public License version 2 only, as
7 * published by the Free Software Foundation.
8 *
9 * This code is distributed in the hope that it will be useful, but WITHOUT
10 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
11 * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
12 * version 2 for more details (a copy is included in the LICENSE file that
13 * accompanied this code).
14 *
15 * You should have received a copy of the GNU General Public License version
16 * 2 along with this work; if not, write to the Free Software Foundation,
17 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
18 *
19 * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
20 * or visit www.oracle.com if you need additional information or have any
21 * questions.
22 *
23 */
24
25 #include "precompiled.hpp"
26 #include "compiler/compileBroker.hpp"
27 #include "memory/resourceArea.hpp"
28 #include "runtime/arguments.hpp"
29 #include "runtime/simpleThresholdPolicy.hpp"
30 #include "runtime/simpleThresholdPolicy.inline.hpp"
31 #include "code/scopeDesc.hpp"
32 #if INCLUDE_JVMCI
33 #include "jvmci/jvmciRuntime.hpp"
34 #endif
35
36
37 void SimpleThresholdPolicy::print_counters(const char* prefix, methodHandle mh) {
38 int invocation_count = mh->invocation_count();
39 int backedge_count = mh->backedge_count();
40 MethodData* mdh = mh->method_data();
41 int mdo_invocations = 0, mdo_backedges = 0;
42 int mdo_invocations_start = 0, mdo_backedges_start = 0;
43 if (mdh != NULL) {
44 mdo_invocations = mdh->invocation_count();
45 mdo_backedges = mdh->backedge_count();
46 mdo_invocations_start = mdh->invocation_count_start();
47 mdo_backedges_start = mdh->backedge_count_start();
48 }
49 tty->print(" %stotal=%d,%d %smdo=%d(%d),%d(%d)", prefix,
50 invocation_count, backedge_count, prefix,
51 mdo_invocations, mdo_invocations_start,
52 mdo_backedges, mdo_backedges_start);
53 tty->print(" %smax levels=%d,%d", prefix,
54 mh->highest_comp_level(), mh->highest_osr_comp_level());
55 }
56
57 // Print an event.
58 void SimpleThresholdPolicy::print_event(EventType type, methodHandle mh, methodHandle imh,
59 int bci, CompLevel level) {
60 bool inlinee_event = mh() != imh();
61
62 ttyLocker tty_lock;
63 tty->print("%lf: [", os::elapsedTime());
64
65 switch(type) {
66 case CALL:
67 tty->print("call");
68 break;
69 case LOOP:
70 tty->print("loop");
71 break;
72 case COMPILE:
73 tty->print("compile");
74 break;
75 case REMOVE_FROM_QUEUE:
76 tty->print("remove-from-queue");
77 break;
78 case UPDATE_IN_QUEUE:
79 tty->print("update-in-queue");
80 break;
81 case REPROFILE:
82 tty->print("reprofile");
83 break;
84 case MAKE_NOT_ENTRANT:
85 tty->print("make-not-entrant");
86 break;
87 default:
88 tty->print("unknown");
89 }
90
91 tty->print(" level=%d ", level);
92
93 ResourceMark rm;
94 char *method_name = mh->name_and_sig_as_C_string();
95 tty->print("[%s", method_name);
96 if (inlinee_event) {
97 char *inlinee_name = imh->name_and_sig_as_C_string();
98 tty->print(" [%s]] ", inlinee_name);
99 }
100 else tty->print("] ");
101 tty->print("@%d queues=%d,%d", bci, CompileBroker::queue_size(CompLevel_full_profile),
102 CompileBroker::queue_size(CompLevel_full_optimization));
103
104 print_specific(type, mh, imh, bci, level);
105
106 if (type != COMPILE) {
107 print_counters("", mh);
108 if (inlinee_event) {
109 print_counters("inlinee ", imh);
110 }
111 tty->print(" compilable=");
112 bool need_comma = false;
113 if (!mh->is_not_compilable(CompLevel_full_profile)) {
114 tty->print("c1");
115 need_comma = true;
116 }
117 if (!mh->is_not_osr_compilable(CompLevel_full_profile)) {
118 if (need_comma) tty->print(",");
119 tty->print("c1-osr");
120 need_comma = true;
121 }
122 if (!mh->is_not_compilable(CompLevel_full_optimization)) {
123 if (need_comma) tty->print(",");
124 tty->print("c2");
125 need_comma = true;
126 }
127 if (!mh->is_not_osr_compilable(CompLevel_full_optimization)) {
128 if (need_comma) tty->print(",");
129 tty->print("c2-osr");
130 }
131 tty->print(" status=");
132 if (mh->queued_for_compilation()) {
133 tty->print("in-queue");
134 } else tty->print("idle");
135 }
136 tty->print_cr("]");
137 }
138
139 void SimpleThresholdPolicy::initialize() {
140 if (FLAG_IS_DEFAULT(CICompilerCount)) {
141 FLAG_SET_DEFAULT(CICompilerCount, 3);
142 }
143 int count = CICompilerCount;
144 #ifdef _LP64
145 // On 64-bit systems, scale the number of compiler threads with
146 // the number of cores available on the system. Scaling is not
147 // performed on 32-bit systems because it can lead to exhaustion
148 // of the virtual memory address space available to the JVM.
149 if (CICompilerCountPerCPU) {
150 count = MAX2(log2_intptr(os::active_processor_count()), 1) * 3 / 2;
151 }
152 #endif
153 set_c1_count(MAX2(count / 3, 1));
154 set_c2_count(MAX2(count - c1_count(), 1));
155 FLAG_SET_ERGO(intx, CICompilerCount, c1_count() + c2_count());
156 }
157
158 void SimpleThresholdPolicy::set_carry_if_necessary(InvocationCounter *counter) {
159 if (!counter->carry() && counter->count() > InvocationCounter::count_limit / 2) {
160 counter->set_carry_flag();
161 }
162 }
163
164 // Set carry flags on the counters if necessary
165 void SimpleThresholdPolicy::handle_counter_overflow(Method* method) {
166 MethodCounters *mcs = method->method_counters();
167 if (mcs != NULL) {
168 set_carry_if_necessary(mcs->invocation_counter());
169 set_carry_if_necessary(mcs->backedge_counter());
170 }
171 MethodData* mdo = method->method_data();
172 if (mdo != NULL) {
173 set_carry_if_necessary(mdo->invocation_counter());
174 set_carry_if_necessary(mdo->backedge_counter());
175 }
176 }
177
178 // Called with the queue locked and with at least one element
179 CompileTask* SimpleThresholdPolicy::select_task(CompileQueue* compile_queue) {
180 return select_task_helper(compile_queue);
181 }
182
183 void SimpleThresholdPolicy::reprofile(ScopeDesc* trap_scope, bool is_osr) {
184 for (ScopeDesc* sd = trap_scope;; sd = sd->sender()) {
185 if (PrintTieredEvents) {
186 methodHandle mh(sd->method());
187 print_event(REPROFILE, mh, mh, InvocationEntryBci, CompLevel_none);
188 }
189 MethodData* mdo = sd->method()->method_data();
190 if (mdo != NULL) {
191 mdo->reset_start_counters();
192 }
193 if (sd->is_top()) break;
194 }
195 }
196
197 nmethod* SimpleThresholdPolicy::event(const methodHandle& method, const methodHandle& inlinee,
198 int branch_bci, int bci, CompLevel comp_level, CompiledMethod* nm, JavaThread* thread) {
199 if (comp_level == CompLevel_none &&
200 JvmtiExport::can_post_interpreter_events() &&
201 thread->is_interp_only_mode()) {
202 return NULL;
203 }
204 if (CompileTheWorld || ReplayCompiles) {
205 // Don't trigger other compiles in testing mode
206 return NULL;
207 }
208
209 handle_counter_overflow(method());
210 if (method() != inlinee()) {
211 handle_counter_overflow(inlinee());
212 }
213
214 if (PrintTieredEvents) {
215 print_event(bci == InvocationEntryBci ? CALL : LOOP, method, inlinee, bci, comp_level);
216 }
217
218 if (bci == InvocationEntryBci) {
219 method_invocation_event(method, inlinee, comp_level, nm, thread);
220 } else {
221 // method == inlinee if the event originated in the main method
222 method_back_branch_event(method, inlinee, bci, comp_level, nm, thread);
223 // Check if event led to a higher level OSR compilation
224 nmethod* osr_nm = inlinee->lookup_osr_nmethod_for(bci, comp_level, false);
225 if (osr_nm != NULL && osr_nm->comp_level() > comp_level) {
226 // Perform OSR with new nmethod
227 return osr_nm;
228 }
229 }
230 return NULL;
231 }
232
233 // Check if the method can be compiled, change level if necessary
234 void SimpleThresholdPolicy::compile(const methodHandle& mh, int bci, CompLevel level, JavaThread* thread) {
235 assert(level <= TieredStopAtLevel, "Invalid compilation level");
236 if (level == CompLevel_none) {
237 return;
238 }
239
240 #if INCLUDE_JVMCI
241 // We can't compile with a JVMCI compiler until the module system is initialized.
242 if (level == CompLevel_full_optimization && UseJVMCICompiler && !Universe::is_module_initialized()) {
243 return;
244 }
245 #endif
246
247 // Check if the method can be compiled. If it cannot be compiled with C1, continue profiling
248 // in the interpreter and then compile with C2 (the transition function will request that,
249 // see common() ). If the method cannot be compiled with C2 but still can with C1, compile it with
250 // pure C1.
251 if (!can_be_compiled(mh, level)) {
252 if (level == CompLevel_full_optimization && can_be_compiled(mh, CompLevel_simple)) {
253 compile(mh, bci, CompLevel_simple, thread);
254 }
255 return;
256 }
257 if (bci != InvocationEntryBci && mh->is_not_osr_compilable(level)) {
258 return;
259 }
260 if (!CompileBroker::compilation_is_in_queue(mh)) {
261 if (PrintTieredEvents) {
262 print_event(COMPILE, mh, mh, bci, level);
263 }
264 submit_compile(mh, bci, level, thread);
265 }
266 }
267
268 // Tell the broker to compile the method
269 void SimpleThresholdPolicy::submit_compile(const methodHandle& mh, int bci, CompLevel level, JavaThread* thread) {
270 int hot_count = (bci == InvocationEntryBci) ? mh->invocation_count() : mh->backedge_count();
271 CompileBroker::compile_method(mh, bci, level, mh, hot_count, CompileTask::Reason_Tiered, thread);
272 }
273
274 // Call and loop predicates determine whether a transition to a higher
275 // compilation level should be performed (pointers to predicate functions
276 // are passed to common() transition function).
277 bool SimpleThresholdPolicy::loop_predicate(int i, int b, CompLevel cur_level, Method* method) {
278 switch(cur_level) {
279 case CompLevel_none:
280 case CompLevel_limited_profile: {
281 return loop_predicate_helper<CompLevel_none>(i, b, 1.0, method);
282 }
283 case CompLevel_full_profile: {
284 return loop_predicate_helper<CompLevel_full_profile>(i, b, 1.0, method);
285 }
286 default:
287 return true;
288 }
289 }
290
291 bool SimpleThresholdPolicy::call_predicate(int i, int b, CompLevel cur_level, Method* method) {
292 switch(cur_level) {
293 case CompLevel_none:
294 case CompLevel_limited_profile: {
295 return call_predicate_helper<CompLevel_none>(i, b, 1.0, method);
296 }
297 case CompLevel_full_profile: {
298 return call_predicate_helper<CompLevel_full_profile>(i, b, 1.0, method);
299 }
300 default:
301 return true;
302 }
303 }
304
305 // Determine is a method is mature.
306 bool SimpleThresholdPolicy::is_mature(Method* method) {
307 if (is_trivial(method)) return true;
308 MethodData* mdo = method->method_data();
309 if (mdo != NULL) {
310 int i = mdo->invocation_count();
311 int b = mdo->backedge_count();
312 double k = ProfileMaturityPercentage / 100.0;
313 return call_predicate_helper<CompLevel_full_profile>(i, b, k, method) ||
314 loop_predicate_helper<CompLevel_full_profile>(i, b, k, method);
315 }
316 return false;
317 }
318
319 // Common transition function. Given a predicate determines if a method should transition to another level.
320 CompLevel SimpleThresholdPolicy::common(Predicate p, Method* method, CompLevel cur_level) {
321 CompLevel next_level = cur_level;
322 int i = method->invocation_count();
323 int b = method->backedge_count();
324
325 if (is_trivial(method)) {
326 next_level = CompLevel_simple;
327 } else {
328 switch(cur_level) {
329 case CompLevel_none:
330 // If we were at full profile level, would we switch to full opt?
331 if (common(p, method, CompLevel_full_profile) == CompLevel_full_optimization) {
332 next_level = CompLevel_full_optimization;
333 } else if ((this->*p)(i, b, cur_level, method)) {
334 next_level = CompLevel_full_profile;
335 }
336 break;
337 case CompLevel_limited_profile:
338 case CompLevel_full_profile:
339 {
340 MethodData* mdo = method->method_data();
341 if (mdo != NULL) {
342 if (mdo->would_profile()) {
343 int mdo_i = mdo->invocation_count_delta();
344 int mdo_b = mdo->backedge_count_delta();
345 if ((this->*p)(mdo_i, mdo_b, cur_level, method)) {
346 next_level = CompLevel_full_optimization;
347 }
348 } else {
349 next_level = CompLevel_full_optimization;
350 }
351 }
352 }
353 break;
354 }
355 }
356 return MIN2(next_level, (CompLevel)TieredStopAtLevel);
357 }
358
359 // Determine if a method should be compiled with a normal entry point at a different level.
360 CompLevel SimpleThresholdPolicy::call_event(Method* method, CompLevel cur_level, JavaThread* thread) {
361 CompLevel osr_level = MIN2((CompLevel) method->highest_osr_comp_level(),
362 common(&SimpleThresholdPolicy::loop_predicate, method, cur_level));
363 CompLevel next_level = common(&SimpleThresholdPolicy::call_predicate, method, cur_level);
364
365 // If OSR method level is greater than the regular method level, the levels should be
366 // equalized by raising the regular method level in order to avoid OSRs during each
367 // invocation of the method.
368 if (osr_level == CompLevel_full_optimization && cur_level == CompLevel_full_profile) {
369 MethodData* mdo = method->method_data();
370 guarantee(mdo != NULL, "MDO should not be NULL");
371 if (mdo->invocation_count() >= 1) {
372 next_level = CompLevel_full_optimization;
373 }
374 } else {
375 next_level = MAX2(osr_level, next_level);
376 }
377 #if INCLUDE_JVMCI
378 if (UseJVMCICompiler) {
379 next_level = JVMCIRuntime::adjust_comp_level(method, false, next_level, thread);
380 }
381 #endif
382 return next_level;
383 }
384
385 // Determine if we should do an OSR compilation of a given method.
386 CompLevel SimpleThresholdPolicy::loop_event(Method* method, CompLevel cur_level, JavaThread* thread) {
387 CompLevel next_level = common(&SimpleThresholdPolicy::loop_predicate, method, cur_level);
388 if (cur_level == CompLevel_none) {
389 // If there is a live OSR method that means that we deopted to the interpreter
390 // for the transition.
391 CompLevel osr_level = MIN2((CompLevel)method->highest_osr_comp_level(), next_level);
392 if (osr_level > CompLevel_none) {
393 return osr_level;
394 }
395 }
396 #if INCLUDE_JVMCI
397 if (UseJVMCICompiler) {
398 next_level = JVMCIRuntime::adjust_comp_level(method, true, next_level, thread);
399 }
400 #endif
401 return next_level;
402 }
403
404
405 // Handle the invocation event.
406 void SimpleThresholdPolicy::method_invocation_event(const methodHandle& mh, const methodHandle& imh,
407 CompLevel level, CompiledMethod* nm, JavaThread* thread) {
408 if (is_compilation_enabled() && !CompileBroker::compilation_is_in_queue(mh)) {
409 CompLevel next_level = call_event(mh(), level, thread);
410 if (next_level != level) {
411 compile(mh, InvocationEntryBci, next_level, thread);
412 }
413 }
414 }
415
416 // Handle the back branch event. Notice that we can compile the method
417 // with a regular entry from here.
418 void SimpleThresholdPolicy::method_back_branch_event(const methodHandle& mh, const methodHandle& imh,
419 int bci, CompLevel level, CompiledMethod* nm, JavaThread* thread) {
420 // If the method is already compiling, quickly bail out.
421 if (is_compilation_enabled() && !CompileBroker::compilation_is_in_queue(mh)) {
422 // Use loop event as an opportunity to also check there's been
423 // enough calls.
424 CompLevel cur_level = comp_level(mh());
425 CompLevel next_level = call_event(mh(), cur_level, thread);
426 CompLevel next_osr_level = loop_event(mh(), level, thread);
427
428 next_level = MAX2(next_level,
429 next_osr_level < CompLevel_full_optimization ? next_osr_level : cur_level);
430 bool is_compiling = false;
431 if (next_level != cur_level) {
432 compile(mh, InvocationEntryBci, next_level, thread);
433 is_compiling = true;
434 }
435
436 // Do the OSR version
437 if (!is_compiling && next_osr_level != level) {
438 compile(mh, bci, next_osr_level, thread);
439 }
440 }
441 }