From 65db7aa1bad0f73b6dfa3d40db1879fa11f7d7a7 Mon Sep 17 00:00:00 2001
From: Mikhail Glukhikh <mikhail.glukhikh@jetbrains.com>
Date: Tue, 6 Sep 2016 16:35:38 +0300
Subject: [PATCH] CFG renderer

---
 .../kotlin/ir2cfg/util/ControlFlowRenderer.kt | 79 +++++++++++++++++++
 1 file changed, 79 insertions(+)
 create mode 100644 compiler/ir/ir.ir2cfg/src/org/jetbrains/kotlin/ir2cfg/util/ControlFlowRenderer.kt

diff --git a/compiler/ir/ir.ir2cfg/src/org/jetbrains/kotlin/ir2cfg/util/ControlFlowRenderer.kt b/compiler/ir/ir.ir2cfg/src/org/jetbrains/kotlin/ir2cfg/util/ControlFlowRenderer.kt
new file mode 100644
index 00000000000..973b6381b11
--- /dev/null
+++ b/compiler/ir/ir.ir2cfg/src/org/jetbrains/kotlin/ir2cfg/util/ControlFlowRenderer.kt
@@ -0,0 +1,79 @@
+/*
+ * Copyright 2010-2016 JetBrains s.r.o.
+ *
+ * Licensed under the Apache License, Version 2.0 (the "License");
+ * you may not use this file except in compliance with the License.
+ * You may obtain a copy of the License at
+ *
+ * http://www.apache.org/licenses/LICENSE-2.0
+ *
+ * Unless required by applicable law or agreed to in writing, software
+ * distributed under the License is distributed on an "AS IS" BASIS,
+ * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+ * See the License for the specific language governing permissions and
+ * limitations under the License.
+ */
+
+package org.jetbrains.kotlin.ir2cfg.util
+
+import org.jetbrains.kotlin.ir.IrElement
+import org.jetbrains.kotlin.ir.util.dump
+import org.jetbrains.kotlin.ir2cfg.graph.BasicBlock
+import org.jetbrains.kotlin.ir2cfg.graph.BlockConnector
+import org.jetbrains.kotlin.ir2cfg.graph.ControlFlowGraph
+import org.jetbrains.kotlin.ir2cfg.nodes.MergeCfgElement
+
+private fun IrElement.cfgDump() = when (this) {
+    is MergeCfgElement -> "$this"
+    else -> dump()
+}
+
+fun BasicBlock.dump(builder: StringBuilder = StringBuilder(), indent: String = ""): String {
+    for ((index, element) in elements.withIndex()) {
+        builder.append(indent)
+        builder.append(String.format("%3d ", index + 1))
+        val dump = element.cfgDump()
+        builder.appendln(dump.lines().first())
+    }
+    return builder.toString()
+}
+
+fun BlockConnector.dump(builder: StringBuilder = StringBuilder(), indent: String = ""): String {
+    builder.append(indent)
+    val dump = element.cfgDump()
+    builder.appendln(dump.lines().first())
+    return builder.toString()
+}
+
+fun ControlFlowGraph.dump(): String {
+    val connectorIndex = hashMapOf<BlockConnector, Int>()
+    for ((index, connector) in connectors.withIndex()) {
+        connectorIndex[connector] = index
+    }
+    val blockIndex = hashMapOf<BasicBlock, Int>()
+    for ((index, block) in blocks.withIndex()) {
+        blockIndex[block] = index
+    }
+    val builder = StringBuilder()
+    for ((index, block) in blocks.withIndex()) {
+        builder.appendln("BB $index")
+        val incoming = block.incoming
+        if (incoming != null) {
+            builder.appendln(incoming.previousBlocks.joinToString(prefix = "INCOMING <- BB ") { blockIndex[it].toString() })
+            incoming.dump(builder, "    ")
+        }
+        builder.appendln("CONTENT")
+        block.dump(builder, "    ")
+        val outgoing = block.outgoing
+        if (outgoing != null) {
+            if (outgoing.nextBlocks.isEmpty()) {
+                builder.appendln("OUTGOING -> NONE")
+            }
+            else {
+                builder.appendln(outgoing.nextBlocks.joinToString(prefix = "OUTGOING -> BB ") { blockIndex[it].toString() })
+            }
+            outgoing.dump(builder, "    ")
+        }
+    }
+    return builder.toString()
+}
\ No newline at end of file