|
1 /* |
|
2 * Copyright (c) 1999, 2014, 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 "c1/c1_InstructionPrinter.hpp" |
|
27 #include "c1/c1_ValueStack.hpp" |
|
28 #include "ci/ciArray.hpp" |
|
29 #include "ci/ciInstance.hpp" |
|
30 #include "ci/ciObject.hpp" |
|
31 |
|
32 |
|
33 #ifndef PRODUCT |
|
34 |
|
35 const char* InstructionPrinter::basic_type_name(BasicType type) { |
|
36 switch (type) { |
|
37 case T_BOOLEAN: return "boolean"; |
|
38 case T_BYTE : return "byte"; |
|
39 case T_CHAR : return "char"; |
|
40 case T_SHORT : return "short"; |
|
41 case T_INT : return "int"; |
|
42 case T_LONG : return "long"; |
|
43 case T_FLOAT : return "float"; |
|
44 case T_DOUBLE : return "double"; |
|
45 case T_ARRAY : return "array"; |
|
46 case T_OBJECT : return "object"; |
|
47 default : return "???"; |
|
48 } |
|
49 } |
|
50 |
|
51 |
|
52 const char* InstructionPrinter::cond_name(If::Condition cond) { |
|
53 switch (cond) { |
|
54 case If::eql: return "=="; |
|
55 case If::neq: return "!="; |
|
56 case If::lss: return "<"; |
|
57 case If::leq: return "<="; |
|
58 case If::gtr: return ">"; |
|
59 case If::geq: return ">="; |
|
60 case If::aeq: return "|>=|"; |
|
61 case If::beq: return "|<=|"; |
|
62 } |
|
63 ShouldNotReachHere(); |
|
64 return NULL; |
|
65 } |
|
66 |
|
67 |
|
68 const char* InstructionPrinter::op_name(Bytecodes::Code op) { |
|
69 switch (op) { |
|
70 // arithmetic ops |
|
71 case Bytecodes::_iadd : // fall through |
|
72 case Bytecodes::_ladd : // fall through |
|
73 case Bytecodes::_fadd : // fall through |
|
74 case Bytecodes::_dadd : return "+"; |
|
75 case Bytecodes::_isub : // fall through |
|
76 case Bytecodes::_lsub : // fall through |
|
77 case Bytecodes::_fsub : // fall through |
|
78 case Bytecodes::_dsub : return "-"; |
|
79 case Bytecodes::_imul : // fall through |
|
80 case Bytecodes::_lmul : // fall through |
|
81 case Bytecodes::_fmul : // fall through |
|
82 case Bytecodes::_dmul : return "*"; |
|
83 case Bytecodes::_idiv : // fall through |
|
84 case Bytecodes::_ldiv : // fall through |
|
85 case Bytecodes::_fdiv : // fall through |
|
86 case Bytecodes::_ddiv : return "/"; |
|
87 case Bytecodes::_irem : // fall through |
|
88 case Bytecodes::_lrem : // fall through |
|
89 case Bytecodes::_frem : // fall through |
|
90 case Bytecodes::_drem : return "%"; |
|
91 // shift ops |
|
92 case Bytecodes::_ishl : // fall through |
|
93 case Bytecodes::_lshl : return "<<"; |
|
94 case Bytecodes::_ishr : // fall through |
|
95 case Bytecodes::_lshr : return ">>"; |
|
96 case Bytecodes::_iushr: // fall through |
|
97 case Bytecodes::_lushr: return ">>>"; |
|
98 // logic ops |
|
99 case Bytecodes::_iand : // fall through |
|
100 case Bytecodes::_land : return "&"; |
|
101 case Bytecodes::_ior : // fall through |
|
102 case Bytecodes::_lor : return "|"; |
|
103 case Bytecodes::_ixor : // fall through |
|
104 case Bytecodes::_lxor : return "^"; |
|
105 } |
|
106 return Bytecodes::name(op); |
|
107 } |
|
108 |
|
109 |
|
110 bool InstructionPrinter::is_illegal_phi(Value v) { |
|
111 Phi* phi = v ? v->as_Phi() : NULL; |
|
112 if (phi && phi->is_illegal()) { |
|
113 return true; |
|
114 } |
|
115 return false; |
|
116 } |
|
117 |
|
118 |
|
119 bool InstructionPrinter::is_phi_of_block(Value v, BlockBegin* b) { |
|
120 Phi* phi = v ? v->as_Phi() : NULL; |
|
121 return phi && phi->block() == b; |
|
122 } |
|
123 |
|
124 |
|
125 void InstructionPrinter::print_klass(ciKlass* klass) { |
|
126 klass->name()->print_symbol_on(output()); |
|
127 } |
|
128 |
|
129 |
|
130 void InstructionPrinter::print_object(Value obj) { |
|
131 ValueType* type = obj->type(); |
|
132 if (type->as_ObjectConstant() != NULL) { |
|
133 ciObject* value = type->as_ObjectConstant()->value(); |
|
134 if (value->is_null_object()) { |
|
135 output()->print("null"); |
|
136 } else if (!value->is_loaded()) { |
|
137 output()->print("<unloaded object " INTPTR_FORMAT ">", p2i(value)); |
|
138 } else { |
|
139 output()->print("<object " INTPTR_FORMAT " klass=", p2i(value->constant_encoding())); |
|
140 print_klass(value->klass()); |
|
141 output()->print(">"); |
|
142 } |
|
143 } else if (type->as_InstanceConstant() != NULL) { |
|
144 ciInstance* value = type->as_InstanceConstant()->value(); |
|
145 if (value->is_loaded()) { |
|
146 output()->print("<instance " INTPTR_FORMAT " klass=", p2i(value->constant_encoding())); |
|
147 print_klass(value->klass()); |
|
148 output()->print(">"); |
|
149 } else { |
|
150 output()->print("<unloaded instance " INTPTR_FORMAT ">", p2i(value)); |
|
151 } |
|
152 } else if (type->as_ArrayConstant() != NULL) { |
|
153 output()->print("<array " INTPTR_FORMAT ">", p2i(type->as_ArrayConstant()->value()->constant_encoding())); |
|
154 } else if (type->as_ClassConstant() != NULL) { |
|
155 ciInstanceKlass* klass = type->as_ClassConstant()->value(); |
|
156 if (!klass->is_loaded()) { |
|
157 output()->print("<unloaded> "); |
|
158 } |
|
159 output()->print("class "); |
|
160 print_klass(klass); |
|
161 } else if (type->as_MethodConstant() != NULL) { |
|
162 ciMethod* m = type->as_MethodConstant()->value(); |
|
163 output()->print("<method %s.%s>", m->holder()->name()->as_utf8(), m->name()->as_utf8()); |
|
164 } else { |
|
165 output()->print("???"); |
|
166 } |
|
167 } |
|
168 |
|
169 |
|
170 void InstructionPrinter::print_temp(Value value) { |
|
171 output()->print("%c%d", value->type()->tchar(), value->id()); |
|
172 } |
|
173 |
|
174 |
|
175 void InstructionPrinter::print_field(AccessField* field) { |
|
176 print_value(field->obj()); |
|
177 output()->print("._%d", field->offset()); |
|
178 } |
|
179 |
|
180 |
|
181 void InstructionPrinter::print_indexed(AccessIndexed* indexed) { |
|
182 print_value(indexed->array()); |
|
183 output()->put('['); |
|
184 print_value(indexed->index()); |
|
185 output()->put(']'); |
|
186 if (indexed->length() != NULL) { |
|
187 output()->put('('); |
|
188 print_value(indexed->length()); |
|
189 output()->put(')'); |
|
190 } |
|
191 } |
|
192 |
|
193 |
|
194 void InstructionPrinter::print_monitor(AccessMonitor* monitor) { |
|
195 output()->print("monitor[%d](", monitor->monitor_no()); |
|
196 print_value(monitor->obj()); |
|
197 output()->put(')'); |
|
198 } |
|
199 |
|
200 |
|
201 void InstructionPrinter::print_op2(Op2* instr) { |
|
202 print_value(instr->x()); |
|
203 output()->print(" %s ", op_name(instr->op())); |
|
204 print_value(instr->y()); |
|
205 } |
|
206 |
|
207 |
|
208 void InstructionPrinter::print_value(Value value) { |
|
209 if (value == NULL) { |
|
210 output()->print("NULL"); |
|
211 } else { |
|
212 print_temp(value); |
|
213 } |
|
214 } |
|
215 |
|
216 |
|
217 void InstructionPrinter::print_instr(Instruction* instr) { |
|
218 instr->visit(this); |
|
219 } |
|
220 |
|
221 |
|
222 void InstructionPrinter::print_stack(ValueStack* stack) { |
|
223 int start_position = output()->position(); |
|
224 if (stack->stack_is_empty()) { |
|
225 output()->print("empty stack"); |
|
226 } else { |
|
227 output()->print("stack ["); |
|
228 for (int i = 0; i < stack->stack_size();) { |
|
229 if (i > 0) output()->print(", "); |
|
230 output()->print("%d:", i); |
|
231 Value value = stack->stack_at_inc(i); |
|
232 print_value(value); |
|
233 Phi* phi = value->as_Phi(); |
|
234 if (phi != NULL) { |
|
235 if (phi->operand()->is_valid()) { |
|
236 output()->print(" "); |
|
237 phi->operand()->print(output()); |
|
238 } |
|
239 } |
|
240 } |
|
241 output()->put(']'); |
|
242 } |
|
243 if (!stack->no_active_locks()) { |
|
244 // print out the lines on the line below this |
|
245 // one at the same indentation level. |
|
246 output()->cr(); |
|
247 fill_to(start_position, ' '); |
|
248 output()->print("locks ["); |
|
249 for (int i = i = 0; i < stack->locks_size(); i++) { |
|
250 Value t = stack->lock_at(i); |
|
251 if (i > 0) output()->print(", "); |
|
252 output()->print("%d:", i); |
|
253 if (t == NULL) { |
|
254 // synchronized methods push null on the lock stack |
|
255 output()->print("this"); |
|
256 } else { |
|
257 print_value(t); |
|
258 } |
|
259 } |
|
260 output()->print("]"); |
|
261 } |
|
262 } |
|
263 |
|
264 |
|
265 void InstructionPrinter::print_inline_level(BlockBegin* block) { |
|
266 output()->print_cr("inlining depth %d", block->scope()->level()); |
|
267 } |
|
268 |
|
269 |
|
270 void InstructionPrinter::print_unsafe_op(UnsafeOp* op, const char* name) { |
|
271 output()->print("%s", name); |
|
272 output()->print(".("); |
|
273 } |
|
274 |
|
275 void InstructionPrinter::print_unsafe_raw_op(UnsafeRawOp* op, const char* name) { |
|
276 print_unsafe_op(op, name); |
|
277 output()->print("base "); |
|
278 print_value(op->base()); |
|
279 if (op->has_index()) { |
|
280 output()->print(", index "); print_value(op->index()); |
|
281 output()->print(", log2_scale %d", op->log2_scale()); |
|
282 } |
|
283 } |
|
284 |
|
285 |
|
286 void InstructionPrinter::print_unsafe_object_op(UnsafeObjectOp* op, const char* name) { |
|
287 print_unsafe_op(op, name); |
|
288 print_value(op->object()); |
|
289 output()->print(", "); |
|
290 print_value(op->offset()); |
|
291 } |
|
292 |
|
293 |
|
294 void InstructionPrinter::print_phi(int i, Value v, BlockBegin* b) { |
|
295 Phi* phi = v->as_Phi(); |
|
296 output()->print("%2d ", i); |
|
297 print_value(v); |
|
298 // print phi operands |
|
299 if (phi && phi->block() == b) { |
|
300 output()->print(" ["); |
|
301 for (int j = 0; j < phi->operand_count(); j ++) { |
|
302 output()->print(" "); |
|
303 Value opd = phi->operand_at(j); |
|
304 if (opd) print_value(opd); |
|
305 else output()->print("NULL"); |
|
306 } |
|
307 output()->print("] "); |
|
308 } |
|
309 print_alias(v); |
|
310 } |
|
311 |
|
312 |
|
313 void InstructionPrinter::print_alias(Value v) { |
|
314 if (v != v->subst()) { |
|
315 output()->print("alias "); print_value(v->subst()); |
|
316 } |
|
317 } |
|
318 |
|
319 |
|
320 void InstructionPrinter::fill_to(int pos, char filler) { |
|
321 while (output()->position() < pos) output()->put(filler); |
|
322 } |
|
323 |
|
324 |
|
325 void InstructionPrinter::print_head() { |
|
326 const char filler = '_'; |
|
327 fill_to(bci_pos , filler); output()->print("bci" ); |
|
328 fill_to(use_pos , filler); output()->print("use" ); |
|
329 fill_to(temp_pos , filler); output()->print("tid" ); |
|
330 fill_to(instr_pos, filler); output()->print("instr"); |
|
331 fill_to(end_pos , filler); |
|
332 output()->cr(); |
|
333 } |
|
334 |
|
335 |
|
336 void InstructionPrinter::print_line(Instruction* instr) { |
|
337 // print instruction data on one line |
|
338 if (instr->is_pinned()) output()->put('.'); |
|
339 fill_to(bci_pos ); output()->print("%d", instr->printable_bci()); |
|
340 fill_to(use_pos ); output()->print("%d", instr->use_count()); |
|
341 fill_to(temp_pos ); print_temp(instr); |
|
342 fill_to(instr_pos); print_instr(instr); |
|
343 output()->cr(); |
|
344 // add a line for StateSplit instructions w/ non-empty stacks |
|
345 // (make it robust so we can print incomplete instructions) |
|
346 StateSplit* split = instr->as_StateSplit(); |
|
347 if (split != NULL && split->state() != NULL && !split->state()->stack_is_empty()) { |
|
348 fill_to(instr_pos); print_stack(split->state()); |
|
349 output()->cr(); |
|
350 } |
|
351 } |
|
352 |
|
353 |
|
354 void InstructionPrinter::do_Phi(Phi* x) { |
|
355 output()->print("phi function"); // make that more detailed later |
|
356 if (x->is_illegal()) |
|
357 output()->print(" (illegal)"); |
|
358 } |
|
359 |
|
360 |
|
361 void InstructionPrinter::do_Local(Local* x) { |
|
362 output()->print("local[index %d]", x->java_index()); |
|
363 } |
|
364 |
|
365 |
|
366 void InstructionPrinter::do_Constant(Constant* x) { |
|
367 ValueType* t = x->type(); |
|
368 switch (t->tag()) { |
|
369 case intTag : output()->print("%d" , t->as_IntConstant ()->value()); break; |
|
370 case longTag : output()->print(JLONG_FORMAT, t->as_LongConstant()->value()); output()->print("L"); break; |
|
371 case floatTag : output()->print("%g" , t->as_FloatConstant ()->value()); break; |
|
372 case doubleTag : output()->print("%gD" , t->as_DoubleConstant()->value()); break; |
|
373 case objectTag : print_object(x); break; |
|
374 case addressTag: output()->print("bci:%d", t->as_AddressConstant()->value()); break; |
|
375 default : output()->print("???"); break; |
|
376 } |
|
377 } |
|
378 |
|
379 |
|
380 void InstructionPrinter::do_LoadField(LoadField* x) { |
|
381 print_field(x); |
|
382 output()->print(" (%c)", type2char(x->field()->type()->basic_type())); |
|
383 output()->print(" %s", x->field()->name()->as_utf8()); |
|
384 } |
|
385 |
|
386 |
|
387 void InstructionPrinter::do_StoreField(StoreField* x) { |
|
388 print_field(x); |
|
389 output()->print(" := "); |
|
390 print_value(x->value()); |
|
391 output()->print(" (%c)", type2char(x->field()->type()->basic_type())); |
|
392 output()->print(" %s", x->field()->name()->as_utf8()); |
|
393 } |
|
394 |
|
395 |
|
396 void InstructionPrinter::do_ArrayLength(ArrayLength* x) { |
|
397 print_value(x->array()); |
|
398 output()->print(".length"); |
|
399 } |
|
400 |
|
401 |
|
402 void InstructionPrinter::do_LoadIndexed(LoadIndexed* x) { |
|
403 print_indexed(x); |
|
404 output()->print(" (%c)", type2char(x->elt_type())); |
|
405 if (x->check_flag(Instruction::NeedsRangeCheckFlag)) { |
|
406 output()->print(" [rc]"); |
|
407 } |
|
408 } |
|
409 |
|
410 |
|
411 void InstructionPrinter::do_StoreIndexed(StoreIndexed* x) { |
|
412 print_indexed(x); |
|
413 output()->print(" := "); |
|
414 print_value(x->value()); |
|
415 output()->print(" (%c)", type2char(x->elt_type())); |
|
416 if (x->check_flag(Instruction::NeedsRangeCheckFlag)) { |
|
417 output()->print(" [rc]"); |
|
418 } |
|
419 } |
|
420 |
|
421 void InstructionPrinter::do_NegateOp(NegateOp* x) { |
|
422 output()->put('-'); |
|
423 print_value(x->x()); |
|
424 } |
|
425 |
|
426 |
|
427 void InstructionPrinter::do_ArithmeticOp(ArithmeticOp* x) { |
|
428 print_op2(x); |
|
429 } |
|
430 |
|
431 |
|
432 void InstructionPrinter::do_ShiftOp(ShiftOp* x) { |
|
433 print_op2(x); |
|
434 } |
|
435 |
|
436 |
|
437 void InstructionPrinter::do_LogicOp(LogicOp* x) { |
|
438 print_op2(x); |
|
439 } |
|
440 |
|
441 |
|
442 void InstructionPrinter::do_CompareOp(CompareOp* x) { |
|
443 print_op2(x); |
|
444 } |
|
445 |
|
446 |
|
447 void InstructionPrinter::do_IfOp(IfOp* x) { |
|
448 print_value(x->x()); |
|
449 output()->print(" %s ", cond_name(x->cond())); |
|
450 print_value(x->y()); |
|
451 output()->print(" ? "); |
|
452 print_value(x->tval()); |
|
453 output()->print(" : "); |
|
454 print_value(x->fval()); |
|
455 } |
|
456 |
|
457 |
|
458 void InstructionPrinter::do_Convert(Convert* x) { |
|
459 output()->print("%s(", Bytecodes::name(x->op())); |
|
460 print_value(x->value()); |
|
461 output()->put(')'); |
|
462 } |
|
463 |
|
464 |
|
465 void InstructionPrinter::do_NullCheck(NullCheck* x) { |
|
466 output()->print("null_check("); |
|
467 print_value(x->obj()); |
|
468 output()->put(')'); |
|
469 if (!x->can_trap()) { |
|
470 output()->print(" (eliminated)"); |
|
471 } |
|
472 } |
|
473 |
|
474 |
|
475 void InstructionPrinter::do_TypeCast(TypeCast* x) { |
|
476 output()->print("type_cast("); |
|
477 print_value(x->obj()); |
|
478 output()->print(") "); |
|
479 if (x->declared_type()->is_klass()) |
|
480 print_klass(x->declared_type()->as_klass()); |
|
481 else |
|
482 output()->print("%s", type2name(x->declared_type()->basic_type())); |
|
483 } |
|
484 |
|
485 |
|
486 void InstructionPrinter::do_Invoke(Invoke* x) { |
|
487 if (x->receiver() != NULL) { |
|
488 print_value(x->receiver()); |
|
489 output()->print("."); |
|
490 } |
|
491 |
|
492 output()->print("%s(", Bytecodes::name(x->code())); |
|
493 for (int i = 0; i < x->number_of_arguments(); i++) { |
|
494 if (i > 0) output()->print(", "); |
|
495 print_value(x->argument_at(i)); |
|
496 } |
|
497 output()->print_cr(")"); |
|
498 fill_to(instr_pos); |
|
499 output()->print("%s.%s%s", |
|
500 x->target()->holder()->name()->as_utf8(), |
|
501 x->target()->name()->as_utf8(), |
|
502 x->target()->signature()->as_symbol()->as_utf8()); |
|
503 } |
|
504 |
|
505 |
|
506 void InstructionPrinter::do_NewInstance(NewInstance* x) { |
|
507 output()->print("new instance "); |
|
508 print_klass(x->klass()); |
|
509 } |
|
510 |
|
511 |
|
512 void InstructionPrinter::do_NewTypeArray(NewTypeArray* x) { |
|
513 output()->print("new %s array [", basic_type_name(x->elt_type())); |
|
514 print_value(x->length()); |
|
515 output()->put(']'); |
|
516 } |
|
517 |
|
518 |
|
519 void InstructionPrinter::do_NewObjectArray(NewObjectArray* x) { |
|
520 output()->print("new object array ["); |
|
521 print_value(x->length()); |
|
522 output()->print("] "); |
|
523 print_klass(x->klass()); |
|
524 } |
|
525 |
|
526 |
|
527 void InstructionPrinter::do_NewMultiArray(NewMultiArray* x) { |
|
528 output()->print("new multi array ["); |
|
529 Values* dims = x->dims(); |
|
530 for (int i = 0; i < dims->length(); i++) { |
|
531 if (i > 0) output()->print(", "); |
|
532 print_value(dims->at(i)); |
|
533 } |
|
534 output()->print("] "); |
|
535 print_klass(x->klass()); |
|
536 } |
|
537 |
|
538 |
|
539 void InstructionPrinter::do_MonitorEnter(MonitorEnter* x) { |
|
540 output()->print("enter "); |
|
541 print_monitor(x); |
|
542 } |
|
543 |
|
544 |
|
545 void InstructionPrinter::do_MonitorExit(MonitorExit* x) { |
|
546 output()->print("exit "); |
|
547 print_monitor(x); |
|
548 } |
|
549 |
|
550 |
|
551 void InstructionPrinter::do_Intrinsic(Intrinsic* x) { |
|
552 const char* name = vmIntrinsics::name_at(x->id()); |
|
553 if (name[0] == '_') name++; // strip leading bug from _hashCode, etc. |
|
554 const char* kname = vmSymbols::name_for(vmIntrinsics::class_for(x->id())); |
|
555 if (strchr(name, '_') == NULL) { |
|
556 kname = NULL; |
|
557 } else { |
|
558 const char* kptr = strrchr(kname, '/'); |
|
559 if (kptr != NULL) kname = kptr + 1; |
|
560 } |
|
561 if (kname == NULL) |
|
562 output()->print("%s(", name); |
|
563 else |
|
564 output()->print("%s.%s(", kname, name); |
|
565 for (int i = 0; i < x->number_of_arguments(); i++) { |
|
566 if (i > 0) output()->print(", "); |
|
567 print_value(x->argument_at(i)); |
|
568 } |
|
569 output()->put(')'); |
|
570 } |
|
571 |
|
572 |
|
573 void InstructionPrinter::do_BlockBegin(BlockBegin* x) { |
|
574 // print block id |
|
575 BlockEnd* end = x->end(); |
|
576 output()->print("B%d ", x->block_id()); |
|
577 |
|
578 // print flags |
|
579 bool printed_flag = false; |
|
580 if (x->is_set(BlockBegin::std_entry_flag)) { |
|
581 if (!printed_flag) output()->print("("); |
|
582 output()->print("S"); printed_flag = true; |
|
583 } |
|
584 if (x->is_set(BlockBegin::osr_entry_flag)) { |
|
585 if (!printed_flag) output()->print("("); |
|
586 output()->print("O"); printed_flag = true; |
|
587 } |
|
588 if (x->is_set(BlockBegin::exception_entry_flag)) { |
|
589 if (!printed_flag) output()->print("("); |
|
590 output()->print("E"); printed_flag = true; |
|
591 } |
|
592 if (x->is_set(BlockBegin::subroutine_entry_flag)) { |
|
593 if (!printed_flag) output()->print("("); |
|
594 output()->print("s"); printed_flag = true; |
|
595 } |
|
596 if (x->is_set(BlockBegin::parser_loop_header_flag)) { |
|
597 if (!printed_flag) output()->print("("); |
|
598 output()->print("LH"); printed_flag = true; |
|
599 } |
|
600 if (x->is_set(BlockBegin::backward_branch_target_flag)) { |
|
601 if (!printed_flag) output()->print("("); |
|
602 output()->print("b"); printed_flag = true; |
|
603 } |
|
604 if (x->is_set(BlockBegin::was_visited_flag)) { |
|
605 if (!printed_flag) output()->print("("); |
|
606 output()->print("V"); printed_flag = true; |
|
607 } |
|
608 if (printed_flag) output()->print(") "); |
|
609 |
|
610 // print block bci range |
|
611 output()->print("[%d, %d]", x->bci(), (end == NULL ? -1 : end->printable_bci())); |
|
612 |
|
613 // print block successors |
|
614 if (end != NULL && end->number_of_sux() > 0) { |
|
615 output()->print(" ->"); |
|
616 for (int i = 0; i < end->number_of_sux(); i++) { |
|
617 output()->print(" B%d", end->sux_at(i)->block_id()); |
|
618 } |
|
619 } |
|
620 // print exception handlers |
|
621 if (x->number_of_exception_handlers() > 0) { |
|
622 output()->print(" (xhandlers "); |
|
623 for (int i = 0; i < x->number_of_exception_handlers(); i++) { |
|
624 if (i > 0) output()->print(" "); |
|
625 output()->print("B%d", x->exception_handler_at(i)->block_id()); |
|
626 } |
|
627 output()->put(')'); |
|
628 } |
|
629 |
|
630 // print dominator block |
|
631 if (x->dominator() != NULL) { |
|
632 output()->print(" dom B%d", x->dominator()->block_id()); |
|
633 } |
|
634 |
|
635 // print predecessors and successors |
|
636 if (x->successors()->length() > 0) { |
|
637 output()->print(" sux:"); |
|
638 for (int i = 0; i < x->successors()->length(); i ++) { |
|
639 output()->print(" B%d", x->successors()->at(i)->block_id()); |
|
640 } |
|
641 } |
|
642 |
|
643 if (x->number_of_preds() > 0) { |
|
644 output()->print(" pred:"); |
|
645 for (int i = 0; i < x->number_of_preds(); i ++) { |
|
646 output()->print(" B%d", x->pred_at(i)->block_id()); |
|
647 } |
|
648 } |
|
649 |
|
650 if (!_print_phis) { |
|
651 return; |
|
652 } |
|
653 |
|
654 // print phi functions |
|
655 bool has_phis_in_locals = false; |
|
656 bool has_phis_on_stack = false; |
|
657 |
|
658 if (x->end() && x->end()->state()) { |
|
659 ValueStack* state = x->state(); |
|
660 |
|
661 int i = 0; |
|
662 while (!has_phis_on_stack && i < state->stack_size()) { |
|
663 Value v = state->stack_at_inc(i); |
|
664 has_phis_on_stack = is_phi_of_block(v, x); |
|
665 } |
|
666 |
|
667 do { |
|
668 for (i = 0; !has_phis_in_locals && i < state->locals_size();) { |
|
669 Value v = state->local_at(i); |
|
670 has_phis_in_locals = is_phi_of_block(v, x); |
|
671 // also ignore illegal HiWords |
|
672 if (v && !v->type()->is_illegal()) i += v->type()->size(); else i ++; |
|
673 } |
|
674 state = state->caller_state(); |
|
675 } while (state != NULL); |
|
676 |
|
677 } |
|
678 |
|
679 // print values in locals |
|
680 if (has_phis_in_locals) { |
|
681 output()->cr(); output()->print_cr("Locals:"); |
|
682 |
|
683 ValueStack* state = x->state(); |
|
684 do { |
|
685 for (int i = 0; i < state->locals_size();) { |
|
686 Value v = state->local_at(i); |
|
687 if (v) { |
|
688 print_phi(i, v, x); output()->cr(); |
|
689 // also ignore illegal HiWords |
|
690 i += (v->type()->is_illegal() ? 1 : v->type()->size()); |
|
691 } else { |
|
692 i ++; |
|
693 } |
|
694 } |
|
695 output()->cr(); |
|
696 state = state->caller_state(); |
|
697 } while (state != NULL); |
|
698 } |
|
699 |
|
700 // print values on stack |
|
701 if (has_phis_on_stack) { |
|
702 output()->print_cr("Stack:"); |
|
703 int i = 0; |
|
704 while (i < x->state()->stack_size()) { |
|
705 int o = i; |
|
706 Value v = x->state()->stack_at_inc(i); |
|
707 if (v) { |
|
708 print_phi(o, v, x); output()->cr(); |
|
709 } |
|
710 } |
|
711 } |
|
712 } |
|
713 |
|
714 |
|
715 void InstructionPrinter::do_CheckCast(CheckCast* x) { |
|
716 output()->print("checkcast("); |
|
717 print_value(x->obj()); |
|
718 output()->print(") "); |
|
719 print_klass(x->klass()); |
|
720 } |
|
721 |
|
722 |
|
723 void InstructionPrinter::do_InstanceOf(InstanceOf* x) { |
|
724 output()->print("instanceof("); |
|
725 print_value(x->obj()); |
|
726 output()->print(") "); |
|
727 print_klass(x->klass()); |
|
728 } |
|
729 |
|
730 |
|
731 void InstructionPrinter::do_Goto(Goto* x) { |
|
732 output()->print("goto B%d", x->default_sux()->block_id()); |
|
733 if (x->is_safepoint()) output()->print(" (safepoint)"); |
|
734 } |
|
735 |
|
736 |
|
737 void InstructionPrinter::do_If(If* x) { |
|
738 output()->print("if "); |
|
739 print_value(x->x()); |
|
740 output()->print(" %s ", cond_name(x->cond())); |
|
741 print_value(x->y()); |
|
742 output()->print(" then B%d else B%d", x->sux_at(0)->block_id(), x->sux_at(1)->block_id()); |
|
743 if (x->is_safepoint()) output()->print(" (safepoint)"); |
|
744 } |
|
745 |
|
746 |
|
747 void InstructionPrinter::do_IfInstanceOf(IfInstanceOf* x) { |
|
748 output()->print("<IfInstanceOf>"); |
|
749 } |
|
750 |
|
751 |
|
752 void InstructionPrinter::do_TableSwitch(TableSwitch* x) { |
|
753 output()->print("tableswitch "); |
|
754 if (x->is_safepoint()) output()->print("(safepoint) "); |
|
755 print_value(x->tag()); |
|
756 output()->cr(); |
|
757 int l = x->length(); |
|
758 for (int i = 0; i < l; i++) { |
|
759 fill_to(instr_pos); |
|
760 output()->print_cr("case %5d: B%d", x->lo_key() + i, x->sux_at(i)->block_id()); |
|
761 } |
|
762 fill_to(instr_pos); |
|
763 output()->print("default : B%d", x->default_sux()->block_id()); |
|
764 } |
|
765 |
|
766 |
|
767 void InstructionPrinter::do_LookupSwitch(LookupSwitch* x) { |
|
768 output()->print("lookupswitch "); |
|
769 if (x->is_safepoint()) output()->print("(safepoint) "); |
|
770 print_value(x->tag()); |
|
771 output()->cr(); |
|
772 int l = x->length(); |
|
773 for (int i = 0; i < l; i++) { |
|
774 fill_to(instr_pos); |
|
775 output()->print_cr("case %5d: B%d", x->key_at(i), x->sux_at(i)->block_id()); |
|
776 } |
|
777 fill_to(instr_pos); |
|
778 output()->print("default : B%d", x->default_sux()->block_id()); |
|
779 } |
|
780 |
|
781 |
|
782 void InstructionPrinter::do_Return(Return* x) { |
|
783 if (x->result() == NULL) { |
|
784 output()->print("return"); |
|
785 } else { |
|
786 output()->print("%creturn ", x->type()->tchar()); |
|
787 print_value(x->result()); |
|
788 } |
|
789 } |
|
790 |
|
791 |
|
792 void InstructionPrinter::do_Throw(Throw* x) { |
|
793 output()->print("throw "); |
|
794 print_value(x->exception()); |
|
795 } |
|
796 |
|
797 |
|
798 void InstructionPrinter::do_Base(Base* x) { |
|
799 output()->print("std entry B%d", x->std_entry()->block_id()); |
|
800 if (x->number_of_sux() > 1) { |
|
801 output()->print(" osr entry B%d", x->osr_entry()->block_id()); |
|
802 } |
|
803 } |
|
804 |
|
805 |
|
806 void InstructionPrinter::do_OsrEntry(OsrEntry* x) { |
|
807 output()->print("osr entry"); |
|
808 } |
|
809 |
|
810 |
|
811 void InstructionPrinter::do_ExceptionObject(ExceptionObject* x) { |
|
812 output()->print("incoming exception"); |
|
813 } |
|
814 |
|
815 |
|
816 void InstructionPrinter::do_RoundFP(RoundFP* x) { |
|
817 output()->print("round_fp "); |
|
818 print_value(x->input()); |
|
819 } |
|
820 |
|
821 |
|
822 void InstructionPrinter::do_UnsafeGetRaw(UnsafeGetRaw* x) { |
|
823 print_unsafe_raw_op(x, "UnsafeGetRaw"); |
|
824 output()->put(')'); |
|
825 } |
|
826 |
|
827 |
|
828 void InstructionPrinter::do_UnsafePutRaw(UnsafePutRaw* x) { |
|
829 print_unsafe_raw_op(x, "UnsafePutRaw"); |
|
830 output()->print(", value "); |
|
831 print_value(x->value()); |
|
832 output()->put(')'); |
|
833 } |
|
834 |
|
835 |
|
836 void InstructionPrinter::do_UnsafeGetObject(UnsafeGetObject* x) { |
|
837 print_unsafe_object_op(x, "UnsafeGetObject"); |
|
838 output()->put(')'); |
|
839 } |
|
840 |
|
841 |
|
842 void InstructionPrinter::do_UnsafePutObject(UnsafePutObject* x) { |
|
843 print_unsafe_object_op(x, "UnsafePutObject"); |
|
844 output()->print(", value "); |
|
845 print_value(x->value()); |
|
846 output()->put(')'); |
|
847 } |
|
848 |
|
849 void InstructionPrinter::do_UnsafeGetAndSetObject(UnsafeGetAndSetObject* x) { |
|
850 print_unsafe_object_op(x, x->is_add()?"UnsafeGetAndSetObject (add)":"UnsafeGetAndSetObject"); |
|
851 output()->print(", value "); |
|
852 print_value(x->value()); |
|
853 output()->put(')'); |
|
854 } |
|
855 |
|
856 void InstructionPrinter::do_UnsafePrefetchRead(UnsafePrefetchRead* x) { |
|
857 print_unsafe_object_op(x, "UnsafePrefetchRead"); |
|
858 output()->put(')'); |
|
859 } |
|
860 |
|
861 void InstructionPrinter::do_RangeCheckPredicate(RangeCheckPredicate* x) { |
|
862 |
|
863 if (x->x() != NULL && x->y() != NULL) { |
|
864 output()->print("if "); |
|
865 print_value(x->x()); |
|
866 output()->print(" %s ", cond_name(x->cond())); |
|
867 print_value(x->y()); |
|
868 output()->print(" then deoptimize!"); |
|
869 } else { |
|
870 output()->print("always deoptimize!"); |
|
871 } |
|
872 } |
|
873 |
|
874 #ifdef ASSERT |
|
875 void InstructionPrinter::do_Assert(Assert* x) { |
|
876 output()->print("assert "); |
|
877 print_value(x->x()); |
|
878 output()->print(" %s ", cond_name(x->cond())); |
|
879 print_value(x->y()); |
|
880 } |
|
881 #endif |
|
882 |
|
883 void InstructionPrinter::do_UnsafePrefetchWrite(UnsafePrefetchWrite* x) { |
|
884 print_unsafe_object_op(x, "UnsafePrefetchWrite"); |
|
885 output()->put(')'); |
|
886 } |
|
887 |
|
888 void InstructionPrinter::do_ProfileCall(ProfileCall* x) { |
|
889 output()->print("profile "); |
|
890 print_value(x->recv()); |
|
891 output()->print(" %s.%s", x->method()->holder()->name()->as_utf8(), x->method()->name()->as_utf8()); |
|
892 if (x->known_holder() != NULL) { |
|
893 output()->print(", "); |
|
894 print_klass(x->known_holder()); |
|
895 output()->print(" "); |
|
896 } |
|
897 for (int i = 0; i < x->nb_profiled_args(); i++) { |
|
898 if (i > 0) output()->print(", "); |
|
899 print_value(x->profiled_arg_at(i)); |
|
900 if (x->arg_needs_null_check(i)) { |
|
901 output()->print(" [NC]"); |
|
902 } |
|
903 } |
|
904 output()->put(')'); |
|
905 } |
|
906 |
|
907 void InstructionPrinter::do_ProfileReturnType(ProfileReturnType* x) { |
|
908 output()->print("profile ret type "); |
|
909 print_value(x->ret()); |
|
910 output()->print(" %s.%s", x->method()->holder()->name()->as_utf8(), x->method()->name()->as_utf8()); |
|
911 output()->put(')'); |
|
912 } |
|
913 void InstructionPrinter::do_ProfileInvoke(ProfileInvoke* x) { |
|
914 output()->print("profile_invoke "); |
|
915 output()->print(" %s.%s", x->inlinee()->holder()->name()->as_utf8(), x->inlinee()->name()->as_utf8()); |
|
916 output()->put(')'); |
|
917 |
|
918 } |
|
919 |
|
920 void InstructionPrinter::do_RuntimeCall(RuntimeCall* x) { |
|
921 output()->print("call_rt %s(", x->entry_name()); |
|
922 for (int i = 0; i < x->number_of_arguments(); i++) { |
|
923 if (i > 0) output()->print(", "); |
|
924 print_value(x->argument_at(i)); |
|
925 } |
|
926 output()->put(')'); |
|
927 } |
|
928 |
|
929 void InstructionPrinter::do_MemBar(MemBar* x) { |
|
930 if (os::is_MP()) { |
|
931 LIR_Code code = x->code(); |
|
932 switch (code) { |
|
933 case lir_membar_acquire : output()->print("membar_acquire"); break; |
|
934 case lir_membar_release : output()->print("membar_release"); break; |
|
935 case lir_membar : output()->print("membar"); break; |
|
936 case lir_membar_loadload : output()->print("membar_loadload"); break; |
|
937 case lir_membar_storestore: output()->print("membar_storestore"); break; |
|
938 case lir_membar_loadstore : output()->print("membar_loadstore"); break; |
|
939 case lir_membar_storeload : output()->print("membar_storeload"); break; |
|
940 default : ShouldNotReachHere(); break; |
|
941 } |
|
942 } |
|
943 } |
|
944 |
|
945 #endif // PRODUCT |