src/share/vm/opto/idealGraphPrinter.cpp

changeset 0
f90c822e73f8
child 6876
710a3c8b516e
equal deleted inserted replaced
-1:000000000000 0:f90c822e73f8
1 /*
2 * Copyright (c) 2007, 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 "opto/chaitin.hpp"
27 #include "opto/idealGraphPrinter.hpp"
28 #include "opto/machnode.hpp"
29 #include "opto/parse.hpp"
30 #include "runtime/threadCritical.hpp"
31
32 #ifndef PRODUCT
33
34 // Constants
35 // Keep consistent with Java constants
36 const char *IdealGraphPrinter::INDENT = " ";
37 const char *IdealGraphPrinter::TOP_ELEMENT = "graphDocument";
38 const char *IdealGraphPrinter::GROUP_ELEMENT = "group";
39 const char *IdealGraphPrinter::GRAPH_ELEMENT = "graph";
40 const char *IdealGraphPrinter::PROPERTIES_ELEMENT = "properties";
41 const char *IdealGraphPrinter::EDGES_ELEMENT = "edges";
42 const char *IdealGraphPrinter::PROPERTY_ELEMENT = "p";
43 const char *IdealGraphPrinter::EDGE_ELEMENT = "edge";
44 const char *IdealGraphPrinter::NODE_ELEMENT = "node";
45 const char *IdealGraphPrinter::NODES_ELEMENT = "nodes";
46 const char *IdealGraphPrinter::REMOVE_EDGE_ELEMENT = "removeEdge";
47 const char *IdealGraphPrinter::REMOVE_NODE_ELEMENT = "removeNode";
48 const char *IdealGraphPrinter::METHOD_NAME_PROPERTY = "name";
49 const char *IdealGraphPrinter::METHOD_IS_PUBLIC_PROPERTY = "public";
50 const char *IdealGraphPrinter::METHOD_IS_STATIC_PROPERTY = "static";
51 const char *IdealGraphPrinter::TRUE_VALUE = "true";
52 const char *IdealGraphPrinter::NODE_NAME_PROPERTY = "name";
53 const char *IdealGraphPrinter::EDGE_NAME_PROPERTY = "name";
54 const char *IdealGraphPrinter::NODE_ID_PROPERTY = "id";
55 const char *IdealGraphPrinter::FROM_PROPERTY = "from";
56 const char *IdealGraphPrinter::TO_PROPERTY = "to";
57 const char *IdealGraphPrinter::PROPERTY_NAME_PROPERTY = "name";
58 const char *IdealGraphPrinter::GRAPH_NAME_PROPERTY = "name";
59 const char *IdealGraphPrinter::INDEX_PROPERTY = "index";
60 const char *IdealGraphPrinter::METHOD_ELEMENT = "method";
61 const char *IdealGraphPrinter::INLINE_ELEMENT = "inline";
62 const char *IdealGraphPrinter::BYTECODES_ELEMENT = "bytecodes";
63 const char *IdealGraphPrinter::METHOD_BCI_PROPERTY = "bci";
64 const char *IdealGraphPrinter::METHOD_SHORT_NAME_PROPERTY = "shortName";
65 const char *IdealGraphPrinter::CONTROL_FLOW_ELEMENT = "controlFlow";
66 const char *IdealGraphPrinter::BLOCK_NAME_PROPERTY = "name";
67 const char *IdealGraphPrinter::BLOCK_DOMINATOR_PROPERTY = "dom";
68 const char *IdealGraphPrinter::BLOCK_ELEMENT = "block";
69 const char *IdealGraphPrinter::SUCCESSORS_ELEMENT = "successors";
70 const char *IdealGraphPrinter::SUCCESSOR_ELEMENT = "successor";
71 const char *IdealGraphPrinter::ASSEMBLY_ELEMENT = "assembly";
72
73 int IdealGraphPrinter::_file_count = 0;
74
75 IdealGraphPrinter *IdealGraphPrinter::printer() {
76 if (PrintIdealGraphLevel == 0) return NULL;
77
78 JavaThread *thread = JavaThread::current();
79 if (!thread->is_Compiler_thread()) return NULL;
80
81 CompilerThread *compiler_thread = (CompilerThread *)thread;
82 if (compiler_thread->ideal_graph_printer() == NULL) {
83 IdealGraphPrinter *printer = new IdealGraphPrinter();
84 compiler_thread->set_ideal_graph_printer(printer);
85 }
86
87 return compiler_thread->ideal_graph_printer();
88 }
89
90 void IdealGraphPrinter::clean_up() {
91 JavaThread *p;
92 for (p = Threads::first(); p; p = p->next()) {
93 if (p->is_Compiler_thread()) {
94 CompilerThread *c = (CompilerThread *)p;
95 IdealGraphPrinter *printer = c->ideal_graph_printer();
96 if (printer) {
97 delete printer;
98 }
99 c->set_ideal_graph_printer(NULL);
100 }
101 }
102 }
103
104 // Constructor, either file or network output
105 IdealGraphPrinter::IdealGraphPrinter() {
106
107 // By default dump both ins and outs since dead or unreachable code
108 // needs to appear in the graph. There are also some special cases
109 // in the mach where kill projections have no users but should
110 // appear in the dump.
111 _traverse_outs = true;
112 _should_send_method = true;
113 _output = NULL;
114 buffer[0] = 0;
115 _depth = 0;
116 _current_method = NULL;
117 assert(!_current_method, "current method must be initialized to NULL");
118 _stream = NULL;
119
120 if (PrintIdealGraphFile != NULL) {
121 ThreadCritical tc;
122 // User wants all output to go to files
123 if (_file_count != 0) {
124 ResourceMark rm;
125 stringStream st;
126 const char* dot = strrchr(PrintIdealGraphFile, '.');
127 if (dot) {
128 st.write(PrintIdealGraphFile, dot - PrintIdealGraphFile);
129 st.print("%d%s", _file_count, dot);
130 } else {
131 st.print("%s%d", PrintIdealGraphFile, _file_count);
132 }
133 fileStream *stream = new (ResourceObj::C_HEAP, mtCompiler) fileStream(st.as_string());
134 _output = stream;
135 } else {
136 fileStream *stream = new (ResourceObj::C_HEAP, mtCompiler) fileStream(PrintIdealGraphFile);
137 _output = stream;
138 }
139 _file_count++;
140 } else {
141 _stream = new (ResourceObj::C_HEAP, mtCompiler) networkStream();
142
143 // Try to connect to visualizer
144 if (_stream->connect(PrintIdealGraphAddress, PrintIdealGraphPort)) {
145 char c = 0;
146 _stream->read(&c, 1);
147 if (c != 'y') {
148 tty->print_cr("Client available, but does not want to receive data!");
149 _stream->close();
150 delete _stream;
151 _stream = NULL;
152 return;
153 }
154 _output = _stream;
155 } else {
156 // It would be nice if we could shut down cleanly but it should
157 // be an error if we can't connect to the visualizer.
158 fatal(err_msg_res("Couldn't connect to visualizer at %s:" INTX_FORMAT,
159 PrintIdealGraphAddress, PrintIdealGraphPort));
160 }
161 }
162
163 _xml = new (ResourceObj::C_HEAP, mtCompiler) xmlStream(_output);
164
165 head(TOP_ELEMENT);
166 }
167
168 // Destructor, close file or network stream
169 IdealGraphPrinter::~IdealGraphPrinter() {
170
171 tail(TOP_ELEMENT);
172
173 // tty->print_cr("Walk time: %d", (int)_walk_time.milliseconds());
174 // tty->print_cr("Output time: %d", (int)_output_time.milliseconds());
175 // tty->print_cr("Build blocks time: %d", (int)_build_blocks_time.milliseconds());
176
177 if(_xml) {
178 delete _xml;
179 _xml = NULL;
180 }
181
182 if (_stream) {
183 delete _stream;
184 if (_stream == _output) {
185 _output = NULL;
186 }
187 _stream = NULL;
188 }
189
190 if (_output) {
191 delete _output;
192 _output = NULL;
193 }
194 }
195
196
197 void IdealGraphPrinter::begin_elem(const char *s) {
198 _xml->begin_elem("%s", s);
199 }
200
201 void IdealGraphPrinter::end_elem() {
202 _xml->end_elem();
203 }
204
205 void IdealGraphPrinter::begin_head(const char *s) {
206 _xml->begin_head("%s", s);
207 }
208
209 void IdealGraphPrinter::end_head() {
210 _xml->end_head();
211 }
212
213 void IdealGraphPrinter::print_attr(const char *name, intptr_t val) {
214 stringStream stream;
215 stream.print(INTX_FORMAT, val);
216 print_attr(name, stream.as_string());
217 }
218
219 void IdealGraphPrinter::print_attr(const char *name, const char *val) {
220 _xml->print(" %s='", name);
221 text(val);
222 _xml->print("'");
223 }
224
225 void IdealGraphPrinter::head(const char *name) {
226 _xml->head("%s", name);
227 }
228
229 void IdealGraphPrinter::tail(const char *name) {
230 _xml->tail(name);
231 }
232
233 void IdealGraphPrinter::text(const char *s) {
234 _xml->text("%s", s);
235 }
236
237 void IdealGraphPrinter::print_prop(const char *name, int val) {
238
239 stringStream stream;
240 stream.print("%d", val);
241 print_prop(name, stream.as_string());
242 }
243
244 void IdealGraphPrinter::print_prop(const char *name, const char *val) {
245 begin_head(PROPERTY_ELEMENT);
246 print_attr(PROPERTY_NAME_PROPERTY, name);
247 end_head();
248 text(val);
249 tail(PROPERTY_ELEMENT);
250 }
251
252 void IdealGraphPrinter::print_method(ciMethod *method, int bci, InlineTree *tree) {
253 begin_head(METHOD_ELEMENT);
254
255 stringStream str;
256 method->print_name(&str);
257
258 stringStream shortStr;
259 method->print_short_name(&shortStr);
260
261 print_attr(METHOD_NAME_PROPERTY, str.as_string());
262 print_attr(METHOD_SHORT_NAME_PROPERTY, shortStr.as_string());
263 print_attr(METHOD_BCI_PROPERTY, bci);
264
265 end_head();
266
267 head(BYTECODES_ELEMENT);
268 output()->print_cr("<![CDATA[");
269 method->print_codes_on(output());
270 output()->print_cr("]]>");
271 tail(BYTECODES_ELEMENT);
272
273 head(INLINE_ELEMENT);
274 if (tree != NULL) {
275 GrowableArray<InlineTree *> subtrees = tree->subtrees();
276 for (int i = 0; i < subtrees.length(); i++) {
277 print_inline_tree(subtrees.at(i));
278 }
279 }
280 tail(INLINE_ELEMENT);
281
282 tail(METHOD_ELEMENT);
283 output()->flush();
284 }
285
286 void IdealGraphPrinter::print_inline_tree(InlineTree *tree) {
287
288 if (tree == NULL) return;
289
290 ciMethod *method = tree->method();
291 print_method(tree->method(), tree->caller_bci(), tree);
292
293 }
294
295 void IdealGraphPrinter::print_inlining(Compile* compile) {
296
297 // Print inline tree
298 if (_should_send_method) {
299 InlineTree *inlineTree = compile->ilt();
300 if (inlineTree != NULL) {
301 print_inline_tree(inlineTree);
302 } else {
303 // print this method only
304 }
305 }
306 }
307
308 // Has to be called whenever a method is compiled
309 void IdealGraphPrinter::begin_method(Compile* compile) {
310
311 ciMethod *method = compile->method();
312 assert(_output, "output stream must exist!");
313 assert(method, "null methods are not allowed!");
314 assert(!_current_method, "current method must be null!");
315
316 head(GROUP_ELEMENT);
317
318 head(PROPERTIES_ELEMENT);
319
320 // Print properties
321 // Add method name
322 stringStream strStream;
323 method->print_name(&strStream);
324 print_prop(METHOD_NAME_PROPERTY, strStream.as_string());
325
326 if (method->flags().is_public()) {
327 print_prop(METHOD_IS_PUBLIC_PROPERTY, TRUE_VALUE);
328 }
329
330 if (method->flags().is_static()) {
331 print_prop(METHOD_IS_STATIC_PROPERTY, TRUE_VALUE);
332 }
333
334 tail(PROPERTIES_ELEMENT);
335
336 if (_stream) {
337 char answer = 0;
338 _xml->flush();
339 int result = _stream->read(&answer, 1);
340 _should_send_method = (answer == 'y');
341 }
342
343 this->_current_method = method;
344
345 _xml->flush();
346 }
347
348 // Has to be called whenever a method has finished compilation
349 void IdealGraphPrinter::end_method() {
350
351 nmethod* method = (nmethod*)this->_current_method->code();
352
353 tail(GROUP_ELEMENT);
354 _current_method = NULL;
355 _xml->flush();
356 }
357
358 // Print indent
359 void IdealGraphPrinter::print_indent() {
360 tty->print_cr("printing ident %d", _depth);
361 for (int i = 0; i < _depth; i++) {
362 _xml->print("%s", INDENT);
363 }
364 }
365
366 bool IdealGraphPrinter::traverse_outs() {
367 return _traverse_outs;
368 }
369
370 void IdealGraphPrinter::set_traverse_outs(bool b) {
371 _traverse_outs = b;
372 }
373
374 intptr_t IdealGraphPrinter::get_node_id(Node *n) {
375 return (intptr_t)(n);
376 }
377
378 void IdealGraphPrinter::visit_node(Node *n, bool edges, VectorSet* temp_set) {
379
380 if (edges) {
381
382 // Output edge
383 intptr_t dest_id = get_node_id(n);
384 for ( uint i = 0; i < n->len(); i++ ) {
385 if ( n->in(i) ) {
386 Node *source = n->in(i);
387 begin_elem(EDGE_ELEMENT);
388 intptr_t source_id = get_node_id(source);
389 print_attr(FROM_PROPERTY, source_id);
390 print_attr(TO_PROPERTY, dest_id);
391 print_attr(INDEX_PROPERTY, i);
392 end_elem();
393 }
394 }
395
396 } else {
397
398 // Output node
399 begin_head(NODE_ELEMENT);
400 print_attr(NODE_ID_PROPERTY, get_node_id(n));
401 end_head();
402
403 head(PROPERTIES_ELEMENT);
404
405 Node *node = n;
406 #ifndef PRODUCT
407 Compile::current()->_in_dump_cnt++;
408 print_prop(NODE_NAME_PROPERTY, (const char *)node->Name());
409 const Type *t = node->bottom_type();
410 print_prop("type", t->msg());
411 print_prop("idx", node->_idx);
412 #ifdef ASSERT
413 print_prop("debug_idx", node->_debug_idx);
414 #endif
415
416 if (C->cfg() != NULL) {
417 Block* block = C->cfg()->get_block_for_node(node);
418 if (block == NULL) {
419 print_prop("block", C->cfg()->get_block(0)->_pre_order);
420 } else {
421 print_prop("block", block->_pre_order);
422 }
423 }
424
425 const jushort flags = node->flags();
426 if (flags & Node::Flag_is_Copy) {
427 print_prop("is_copy", "true");
428 }
429 if (flags & Node::Flag_rematerialize) {
430 print_prop("rematerialize", "true");
431 }
432 if (flags & Node::Flag_needs_anti_dependence_check) {
433 print_prop("needs_anti_dependence_check", "true");
434 }
435 if (flags & Node::Flag_is_macro) {
436 print_prop("is_macro", "true");
437 }
438 if (flags & Node::Flag_is_Con) {
439 print_prop("is_con", "true");
440 }
441 if (flags & Node::Flag_is_cisc_alternate) {
442 print_prop("is_cisc_alternate", "true");
443 }
444 if (flags & Node::Flag_is_dead_loop_safe) {
445 print_prop("is_dead_loop_safe", "true");
446 }
447 if (flags & Node::Flag_may_be_short_branch) {
448 print_prop("may_be_short_branch", "true");
449 }
450 if (flags & Node::Flag_has_call) {
451 print_prop("has_call", "true");
452 }
453
454 if (C->matcher() != NULL) {
455 if (C->matcher()->is_shared(node)) {
456 print_prop("is_shared", "true");
457 } else {
458 print_prop("is_shared", "false");
459 }
460 if (C->matcher()->is_dontcare(node)) {
461 print_prop("is_dontcare", "true");
462 } else {
463 print_prop("is_dontcare", "false");
464 }
465
466 #ifdef ASSERT
467 Node* old = C->matcher()->find_old_node(node);
468 if (old != NULL) {
469 print_prop("old_node_idx", old->_idx);
470 }
471 #endif
472 }
473
474 if (node->is_Proj()) {
475 print_prop("con", (int)node->as_Proj()->_con);
476 }
477
478 if (node->is_Mach()) {
479 print_prop("idealOpcode", (const char *)NodeClassNames[node->as_Mach()->ideal_Opcode()]);
480 }
481
482 buffer[0] = 0;
483 stringStream s2(buffer, sizeof(buffer) - 1);
484
485 node->dump_spec(&s2);
486 if (t != NULL && (t->isa_instptr() || t->isa_klassptr())) {
487 const TypeInstPtr *toop = t->isa_instptr();
488 const TypeKlassPtr *tkls = t->isa_klassptr();
489 ciKlass* klass = toop ? toop->klass() : (tkls ? tkls->klass() : NULL );
490 if( klass && klass->is_loaded() && klass->is_interface() ) {
491 s2.print(" Interface:");
492 } else if( toop ) {
493 s2.print(" Oop:");
494 } else if( tkls ) {
495 s2.print(" Klass:");
496 }
497 t->dump_on(&s2);
498 } else if( t == Type::MEMORY ) {
499 s2.print(" Memory:");
500 MemNode::dump_adr_type(node, node->adr_type(), &s2);
501 }
502
503 assert(s2.size() < sizeof(buffer), "size in range");
504 print_prop("dump_spec", buffer);
505
506 if (node->is_block_proj()) {
507 print_prop("is_block_proj", "true");
508 }
509
510 if (node->is_block_start()) {
511 print_prop("is_block_start", "true");
512 }
513
514 const char *short_name = "short_name";
515 if (strcmp(node->Name(), "Parm") == 0 && node->as_Proj()->_con >= TypeFunc::Parms) {
516 int index = node->as_Proj()->_con - TypeFunc::Parms;
517 if (index >= 10) {
518 print_prop(short_name, "PA");
519 } else {
520 sprintf(buffer, "P%d", index);
521 print_prop(short_name, buffer);
522 }
523 } else if (strcmp(node->Name(), "IfTrue") == 0) {
524 print_prop(short_name, "T");
525 } else if (strcmp(node->Name(), "IfFalse") == 0) {
526 print_prop(short_name, "F");
527 } else if ((node->is_Con() && node->is_Type()) || node->is_Proj()) {
528
529 if (t->base() == Type::Int && t->is_int()->is_con()) {
530 const TypeInt *typeInt = t->is_int();
531 assert(typeInt->is_con(), "must be constant");
532 jint value = typeInt->get_con();
533
534 // max. 2 chars allowed
535 if (value >= -9 && value <= 99) {
536 sprintf(buffer, "%d", value);
537 print_prop(short_name, buffer);
538 } else {
539 print_prop(short_name, "I");
540 }
541 } else if (t == Type::TOP) {
542 print_prop(short_name, "^");
543 } else if (t->base() == Type::Long && t->is_long()->is_con()) {
544 const TypeLong *typeLong = t->is_long();
545 assert(typeLong->is_con(), "must be constant");
546 jlong value = typeLong->get_con();
547
548 // max. 2 chars allowed
549 if (value >= -9 && value <= 99) {
550 sprintf(buffer, JLONG_FORMAT, value);
551 print_prop(short_name, buffer);
552 } else {
553 print_prop(short_name, "L");
554 }
555 } else if (t->base() == Type::KlassPtr) {
556 const TypeKlassPtr *typeKlass = t->is_klassptr();
557 print_prop(short_name, "CP");
558 } else if (t->base() == Type::Control) {
559 print_prop(short_name, "C");
560 } else if (t->base() == Type::Memory) {
561 print_prop(short_name, "M");
562 } else if (t->base() == Type::Abio) {
563 print_prop(short_name, "IO");
564 } else if (t->base() == Type::Return_Address) {
565 print_prop(short_name, "RA");
566 } else if (t->base() == Type::AnyPtr) {
567 print_prop(short_name, "P");
568 } else if (t->base() == Type::RawPtr) {
569 print_prop(short_name, "RP");
570 } else if (t->base() == Type::AryPtr) {
571 print_prop(short_name, "AP");
572 }
573 }
574
575 JVMState* caller = NULL;
576 if (node->is_SafePoint()) {
577 caller = node->as_SafePoint()->jvms();
578 } else {
579 Node_Notes* notes = C->node_notes_at(node->_idx);
580 if (notes != NULL) {
581 caller = notes->jvms();
582 }
583 }
584
585 if (caller != NULL) {
586 stringStream bciStream;
587 ciMethod* last = NULL;
588 int last_bci;
589 while(caller) {
590 if (caller->has_method()) {
591 last = caller->method();
592 last_bci = caller->bci();
593 }
594 bciStream.print("%d ", caller->bci());
595 caller = caller->caller();
596 }
597 print_prop("bci", bciStream.as_string());
598 if (last != NULL && last->has_linenumber_table() && last_bci >= 0) {
599 print_prop("line", last->line_number_from_bci(last_bci));
600 }
601 }
602
603 #ifdef ASSERT
604 if (node->debug_orig() != NULL) {
605 temp_set->Clear();
606 stringStream dorigStream;
607 Node* dorig = node->debug_orig();
608 while (dorig && temp_set->test_set(dorig->_idx)) {
609 dorigStream.print("%d ", dorig->_idx);
610 }
611 print_prop("debug_orig", dorigStream.as_string());
612 }
613 #endif
614
615 if (_chaitin && _chaitin != (PhaseChaitin *)0xdeadbeef) {
616 buffer[0] = 0;
617 _chaitin->dump_register(node, buffer);
618 print_prop("reg", buffer);
619 uint lrg_id = 0;
620 if (node->_idx < _chaitin->_lrg_map.size()) {
621 lrg_id = _chaitin->_lrg_map.live_range_id(node);
622 }
623 print_prop("lrg", lrg_id);
624 }
625
626 Compile::current()->_in_dump_cnt--;
627 #endif
628
629 tail(PROPERTIES_ELEMENT);
630 tail(NODE_ELEMENT);
631 }
632 }
633
634 void IdealGraphPrinter::walk_nodes(Node *start, bool edges, VectorSet* temp_set) {
635
636
637 VectorSet visited(Thread::current()->resource_area());
638 GrowableArray<Node *> nodeStack(Thread::current()->resource_area(), 0, 0, NULL);
639 nodeStack.push(start);
640 visited.test_set(start->_idx);
641 if (C->cfg() != NULL) {
642 // once we have a CFG there are some nodes that aren't really
643 // reachable but are in the CFG so add them here.
644 for (uint i = 0; i < C->cfg()->number_of_blocks(); i++) {
645 Block* block = C->cfg()->get_block(i);
646 for (uint s = 0; s < block->number_of_nodes(); s++) {
647 nodeStack.push(block->get_node(s));
648 }
649 }
650 }
651
652 while(nodeStack.length() > 0) {
653
654 Node *n = nodeStack.pop();
655 visit_node(n, edges, temp_set);
656
657 if (_traverse_outs) {
658 for (DUIterator i = n->outs(); n->has_out(i); i++) {
659 Node* p = n->out(i);
660 if (!visited.test_set(p->_idx)) {
661 nodeStack.push(p);
662 }
663 }
664 }
665
666 for ( uint i = 0; i < n->len(); i++ ) {
667 if ( n->in(i) ) {
668 if (!visited.test_set(n->in(i)->_idx)) {
669 nodeStack.push(n->in(i));
670 }
671 }
672 }
673 }
674 }
675
676 void IdealGraphPrinter::print_method(Compile* compile, const char *name, int level, bool clear_nodes) {
677 print(compile, name, (Node *)compile->root(), level, clear_nodes);
678 }
679
680 // Print current ideal graph
681 void IdealGraphPrinter::print(Compile* compile, const char *name, Node *node, int level, bool clear_nodes) {
682
683 if (!_current_method || !_should_send_method || level > PrintIdealGraphLevel) return;
684
685 this->C = compile;
686
687 // Warning, unsafe cast?
688 _chaitin = (PhaseChaitin *)C->regalloc();
689
690 begin_head(GRAPH_ELEMENT);
691 print_attr(GRAPH_NAME_PROPERTY, (const char *)name);
692 end_head();
693
694 VectorSet temp_set(Thread::current()->resource_area());
695
696 head(NODES_ELEMENT);
697 walk_nodes(node, false, &temp_set);
698 tail(NODES_ELEMENT);
699
700 head(EDGES_ELEMENT);
701 walk_nodes(node, true, &temp_set);
702 tail(EDGES_ELEMENT);
703 if (C->cfg() != NULL) {
704 head(CONTROL_FLOW_ELEMENT);
705 for (uint i = 0; i < C->cfg()->number_of_blocks(); i++) {
706 Block* block = C->cfg()->get_block(i);
707 begin_head(BLOCK_ELEMENT);
708 print_attr(BLOCK_NAME_PROPERTY, block->_pre_order);
709 end_head();
710
711 head(SUCCESSORS_ELEMENT);
712 for (uint s = 0; s < block->_num_succs; s++) {
713 begin_elem(SUCCESSOR_ELEMENT);
714 print_attr(BLOCK_NAME_PROPERTY, block->_succs[s]->_pre_order);
715 end_elem();
716 }
717 tail(SUCCESSORS_ELEMENT);
718
719 head(NODES_ELEMENT);
720 for (uint s = 0; s < block->number_of_nodes(); s++) {
721 begin_elem(NODE_ELEMENT);
722 print_attr(NODE_ID_PROPERTY, get_node_id(block->get_node(s)));
723 end_elem();
724 }
725 tail(NODES_ELEMENT);
726
727 tail(BLOCK_ELEMENT);
728 }
729 tail(CONTROL_FLOW_ELEMENT);
730 }
731 tail(GRAPH_ELEMENT);
732 output()->flush();
733 }
734
735 extern const char *NodeClassNames[];
736
737 outputStream *IdealGraphPrinter::output() {
738 return _xml;
739 }
740
741 #endif

mercurial