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()) * 3 / 2, 2);
151 FLAG_SET_ERGO(intx, CICompilerCount, count);
152 }
153 #endif
154 if (TieredStopAtLevel < CompLevel_full_optimization) {
155 // No C2 compiler thread required
156 set_c1_count(count);
157 } else {
158 set_c1_count(MAX2(count / 3, 1));
159 set_c2_count(MAX2(count - c1_count(), 1));
160 }
161 assert(count == c1_count() + c2_count(), "inconsistent compiler thread count");
162 }
163
164 void SimpleThresholdPolicy::set_carry_if_necessary(InvocationCounter *counter) {
165 if (!counter->carry() && counter->count() > InvocationCounter::count_limit / 2) {
166 counter->set_carry_flag();
167 }
168 }
169
170 // Set carry flags on the counters if necessary
171 void SimpleThresholdPolicy::handle_counter_overflow(Method* method) {
172 MethodCounters *mcs = method->method_counters();
173 if (mcs != NULL) {
174 set_carry_if_necessary(mcs->invocation_counter());
175 set_carry_if_necessary(mcs->backedge_counter());
176 }
177 MethodData* mdo = method->method_data();
178 if (mdo != NULL) {
179 set_carry_if_necessary(mdo->invocation_counter());
180 set_carry_if_necessary(mdo->backedge_counter());
181 }
182 }
183
184 // Called with the queue locked and with at least one element
185 CompileTask* SimpleThresholdPolicy::select_task(CompileQueue* compile_queue) {
186 return select_task_helper(compile_queue);
187 }
188
189 void SimpleThresholdPolicy::reprofile(ScopeDesc* trap_scope, bool is_osr) {
190 for (ScopeDesc* sd = trap_scope;; sd = sd->sender()) {
191 if (PrintTieredEvents) {
192 methodHandle mh(sd->method());
193 print_event(REPROFILE, mh, mh, InvocationEntryBci, CompLevel_none);
194 }
195 MethodData* mdo = sd->method()->method_data();
196 if (mdo != NULL) {
197 mdo->reset_start_counters();
198 }
199 if (sd->is_top()) break;
200 }
201 }
202
203 nmethod* SimpleThresholdPolicy::event(const methodHandle& method, const methodHandle& inlinee,
204 int branch_bci, int bci, CompLevel comp_level, CompiledMethod* nm, JavaThread* thread) {
205 if (comp_level == CompLevel_none &&
206 JvmtiExport::can_post_interpreter_events() &&
207 thread->is_interp_only_mode()) {
208 return NULL;
209 }
210 if (CompileTheWorld || ReplayCompiles) {
211 // Don't trigger other compiles in testing mode
212 return NULL;
213 }
214
215 handle_counter_overflow(method());
216 if (method() != inlinee()) {
217 handle_counter_overflow(inlinee());
218 }
219
220 if (PrintTieredEvents) {
221 print_event(bci == InvocationEntryBci ? CALL : LOOP, method, inlinee, bci, comp_level);
222 }
223
224 if (bci == InvocationEntryBci) {
225 method_invocation_event(method, inlinee, comp_level, nm, thread);
226 } else {
227 // method == inlinee if the event originated in the main method
228 method_back_branch_event(method, inlinee, bci, comp_level, nm, thread);
229 // Check if event led to a higher level OSR compilation
230 nmethod* osr_nm = inlinee->lookup_osr_nmethod_for(bci, comp_level, false);
231 if (osr_nm != NULL && osr_nm->comp_level() > comp_level) {
232 // Perform OSR with new nmethod
233 return osr_nm;
234 }
235 }
236 return NULL;
237 }
238
239 // Check if the method can be compiled, change level if necessary
240 void SimpleThresholdPolicy::compile(const methodHandle& mh, int bci, CompLevel level, JavaThread* thread) {
241 assert(level <= TieredStopAtLevel, "Invalid compilation level");
242 if (level == CompLevel_none) {
243 return;
244 }
245
246 // Check if the method can be compiled. If it cannot be compiled with C1, continue profiling
247 // in the interpreter and then compile with C2 (the transition function will request that,
248 // see common() ). If the method cannot be compiled with C2 but still can with C1, compile it with
249 // pure C1.
250 if (!can_be_compiled(mh, level)) {
251 if (level == CompLevel_full_optimization && can_be_compiled(mh, CompLevel_simple)) {
252 compile(mh, bci, CompLevel_simple, thread);
253 }
254 return;
255 }
256 if (bci != InvocationEntryBci && mh->is_not_osr_compilable(level)) {
257 return;
258 }
259 if (!CompileBroker::compilation_is_in_queue(mh)) {
260 if (PrintTieredEvents) {
261 print_event(COMPILE, mh, mh, bci, level);
262 }
263 submit_compile(mh, bci, level, thread);
264 }
265 }
266
267 // Tell the broker to compile the method
268 void SimpleThresholdPolicy::submit_compile(const methodHandle& mh, int bci, CompLevel level, JavaThread* thread) {
269 int hot_count = (bci == InvocationEntryBci) ? mh->invocation_count() : mh->backedge_count();
270 CompileBroker::compile_method(mh, bci, level, mh, hot_count, CompileTask::Reason_Tiered, thread);
271 }
272
273 // Call and loop predicates determine whether a transition to a higher
274 // compilation level should be performed (pointers to predicate functions
275 // are passed to common() transition function).
276 bool SimpleThresholdPolicy::loop_predicate(int i, int b, CompLevel cur_level, Method* method) {
277 switch(cur_level) {
278 case CompLevel_none:
279 case CompLevel_limited_profile: {
280 return loop_predicate_helper<CompLevel_none>(i, b, 1.0, method);
281 }
282 case CompLevel_full_profile: {
283 return loop_predicate_helper<CompLevel_full_profile>(i, b, 1.0, method);
284 }
285 default:
286 return true;
287 }
288 }
289
290 bool SimpleThresholdPolicy::call_predicate(int i, int b, CompLevel cur_level, Method* method) {
291 switch(cur_level) {
292 case CompLevel_none:
293 case CompLevel_limited_profile: {
294 return call_predicate_helper<CompLevel_none>(i, b, 1.0, method);
295 }
296 case CompLevel_full_profile: {
297 return call_predicate_helper<CompLevel_full_profile>(i, b, 1.0, method);
298 }
299 default:
300 return true;
301 }
302 }
303
304 // Determine is a method is mature.
305 bool SimpleThresholdPolicy::is_mature(Method* method) {
306 if (is_trivial(method)) return true;
307 MethodData* mdo = method->method_data();
308 if (mdo != NULL) {
309 int i = mdo->invocation_count();
310 int b = mdo->backedge_count();
311 double k = ProfileMaturityPercentage / 100.0;
312 return call_predicate_helper<CompLevel_full_profile>(i, b, k, method) ||
313 loop_predicate_helper<CompLevel_full_profile>(i, b, k, method);
314 }
315 return false;
316 }
317
318 // Common transition function. Given a predicate determines if a method should transition to another level.
319 CompLevel SimpleThresholdPolicy::common(Predicate p, Method* method, CompLevel cur_level) {
320 CompLevel next_level = cur_level;
321 int i = method->invocation_count();
322 int b = method->backedge_count();
323
324 if (is_trivial(method)) {
325 next_level = CompLevel_simple;
326 } else {
327 switch(cur_level) {
328 case CompLevel_none:
329 // If we were at full profile level, would we switch to full opt?
330 if (common(p, method, CompLevel_full_profile) == CompLevel_full_optimization) {
331 next_level = CompLevel_full_optimization;
332 } else if ((this->*p)(i, b, cur_level, method)) {
333 next_level = CompLevel_full_profile;
334 }
335 break;
336 case CompLevel_limited_profile:
337 case CompLevel_full_profile:
338 {
339 MethodData* mdo = method->method_data();
340 if (mdo != NULL) {
341 if (mdo->would_profile()) {
342 int mdo_i = mdo->invocation_count_delta();
343 int mdo_b = mdo->backedge_count_delta();
344 if ((this->*p)(mdo_i, mdo_b, cur_level, method)) {
345 next_level = CompLevel_full_optimization;
346 }
347 } else {
348 next_level = CompLevel_full_optimization;
349 }
350 }
351 }
352 break;
353 }
354 }
355 return MIN2(next_level, (CompLevel)TieredStopAtLevel);
356 }
357
358 // Determine if a method should be compiled with a normal entry point at a different level.
359 CompLevel SimpleThresholdPolicy::call_event(Method* method, CompLevel cur_level, JavaThread* thread) {
360 CompLevel osr_level = MIN2((CompLevel) method->highest_osr_comp_level(),
361 common(&SimpleThresholdPolicy::loop_predicate, method, cur_level));
362 CompLevel next_level = common(&SimpleThresholdPolicy::call_predicate, method, cur_level);
363
364 // If OSR method level is greater than the regular method level, the levels should be
365 // equalized by raising the regular method level in order to avoid OSRs during each
366 // invocation of the method.
367 if (osr_level == CompLevel_full_optimization && cur_level == CompLevel_full_profile) {
368 MethodData* mdo = method->method_data();
369 guarantee(mdo != NULL, "MDO should not be NULL");
370 if (mdo->invocation_count() >= 1) {
371 next_level = CompLevel_full_optimization;
372 }
373 } else {
374 next_level = MAX2(osr_level, next_level);
375 }
376 #if INCLUDE_JVMCI
377 if (UseJVMCICompiler) {
378 next_level = JVMCIRuntime::adjust_comp_level(method, false, next_level, thread);
379 }
380 #endif
381 return next_level;
382 }
383
384 // Determine if we should do an OSR compilation of a given method.
385 CompLevel SimpleThresholdPolicy::loop_event(Method* method, CompLevel cur_level, JavaThread* thread) {
386 CompLevel next_level = common(&SimpleThresholdPolicy::loop_predicate, method, cur_level);
387 if (cur_level == CompLevel_none) {
388 // If there is a live OSR method that means that we deopted to the interpreter
389 // for the transition.
390 CompLevel osr_level = MIN2((CompLevel)method->highest_osr_comp_level(), next_level);
391 if (osr_level > CompLevel_none) {
392 return osr_level;
393 }
394 }
395 #if INCLUDE_JVMCI
396 if (UseJVMCICompiler) {
397 next_level = JVMCIRuntime::adjust_comp_level(method, true, next_level, thread);
398 }
399 #endif
400 return next_level;
401 }
402
403
404 // Handle the invocation event.
405 void SimpleThresholdPolicy::method_invocation_event(const methodHandle& mh, const methodHandle& imh,
406 CompLevel level, CompiledMethod* nm, JavaThread* thread) {
407 if (is_compilation_enabled() && !CompileBroker::compilation_is_in_queue(mh)) {
408 CompLevel next_level = call_event(mh(), level, thread);
409 if (next_level != level) {
410 compile(mh, InvocationEntryBci, next_level, thread);
411 }
412 }
413 }
414
415 // Handle the back branch event. Notice that we can compile the method
416 // with a regular entry from here.
417 void SimpleThresholdPolicy::method_back_branch_event(const methodHandle& mh, const methodHandle& imh,
418 int bci, CompLevel level, CompiledMethod* nm, JavaThread* thread) {
419 // If the method is already compiling, quickly bail out.
420 if (is_compilation_enabled() && !CompileBroker::compilation_is_in_queue(mh)) {
421 // Use loop event as an opportunity to also check there's been
422 // enough calls.
423 CompLevel cur_level = comp_level(mh());
424 CompLevel next_level = call_event(mh(), cur_level, thread);
425 CompLevel next_osr_level = loop_event(mh(), level, thread);
426
427 next_level = MAX2(next_level,
428 next_osr_level < CompLevel_full_optimization ? next_osr_level : cur_level);
429 bool is_compiling = false;
430 if (next_level != cur_level) {
431 compile(mh, InvocationEntryBci, next_level, thread);
432 is_compiling = true;
433 }
434
435 // Do the OSR version
436 if (!is_compiling && next_osr_level != level) {
437 compile(mh, bci, next_osr_level, thread);
438 }
439 }
440 }