lib/CodeGen/SelectionDAG/SelectionDAGPrinter.cpp

   1 //===-- SelectionDAGPrinter.cpp - Implement SelectionDAG::viewGraph() -----===//
   2 //
   3 //                     The LLVM Compiler Infrastructure
   4 //
   5 // This file is distributed under the University of Illinois Open Source
   6 // License. See LICENSE.TXT for details.
   7 //
   8 //===----------------------------------------------------------------------===//
   9 //
  10 // This implements the SelectionDAG::viewGraph method.
  11 //
  12 //===----------------------------------------------------------------------===//
  13
  14 #include "llvm/Constants.h"
  15 #include "llvm/Function.h"
  16 #include "llvm/Assembly/Writer.h"
  17 #include "llvm/CodeGen/SelectionDAG.h"
  18 #include "llvm/CodeGen/ScheduleDAG.h"
  19 #include "llvm/CodeGen/MachineConstantPool.h"
  20 #include "llvm/CodeGen/MachineFunction.h"
  21 #include "llvm/Target/MRegisterInfo.h"
  22 #include "llvm/Target/TargetMachine.h"
  23 #include "llvm/Support/GraphWriter.h"
  24 #include "llvm/ADT/StringExtras.h"
  25 #include "llvm/Config/config.h"
  26 #include <fstream>
  27 #include <sstream>
  28 using namespace llvm;
  29
  30 namespace llvm {
  31   template<>
  32   struct DOTGraphTraits<SelectionDAG*> : public DefaultDOTGraphTraits {
  33     static std::string getGraphName(const SelectionDAG *G) {
  34       return G->getMachineFunction().getFunction()->getName();
  35     }
  36
  37     static bool renderGraphFromBottomUp() {
  38       return true;
  39     }
  40
  41     static bool hasNodeAddressLabel(const SDNode *Node,
  42                                     const SelectionDAG *Graph) {
  43       return true;
  44     }
  45
  46     /// If you want to override the dot attributes printed for a particular
  47     /// edge, override this method.
  48     template<typename EdgeIter>
  49     static std::string getEdgeAttributes(const void *Node, EdgeIter EI) {
  50       SDOperand Op = EI.getNode()->getOperand(EI.getOperand());
  51       MVT::ValueType VT = Op.getValueType();
  52       if (VT == MVT::Flag)
  53         return "color=red,style=bold";
  54       else if (VT == MVT::Other)
  55         return "color=blue,style=dashed";
  56       return "";
  57     }
  58
  59
  60     static std::string getNodeLabel(const SDNode *Node,
  61                                     const SelectionDAG *Graph);
  62     static std::string getNodeAttributes(const SDNode *N,
  63                                          const SelectionDAG *Graph) {
  64 #ifndef NDEBUG
  65       const std::string &Attrs = Graph->getGraphAttrs(N);
  66       if (!Attrs.empty()) {
  67         if (Attrs.find("shape=") == std::string::npos)
  68           return std::string("shape=Mrecord,") + Attrs;
  69         else
  70           return Attrs;
  71       }
  72 #endif
  73       return "shape=Mrecord";
  74     }
  75
  76     static void addCustomGraphFeatures(SelectionDAG *G,
  77                                        GraphWriter<SelectionDAG*> &GW) {
  78       GW.emitSimpleNode(0, "plaintext=circle", "GraphRoot");
  79       if (G->getRoot().Val)
  80         GW.emitEdge(0, -1, G->getRoot().Val, -1, "");
  81     }
  82   };
  83 }
  84
  85 std::string DOTGraphTraits<SelectionDAG*>::getNodeLabel(const SDNode *Node,
  86                                                         const SelectionDAG *G) {
  87   std::string Op = Node->getOperationName(G);
  88
  89   for (unsigned i = 0, e = Node->getNumValues(); i != e; ++i)
  90     if (Node->getValueType(i) == MVT::Other)
  91       Op += ":ch";
  92     else
  93       Op = Op + ":" + MVT::getValueTypeString(Node->getValueType(i));
  94
  95   if (const ConstantSDNode *CSDN = dyn_cast<ConstantSDNode>(Node)) {
  96     Op += ": " + utostr(CSDN->getValue());
  97   } else if (const ConstantFPSDNode *CSDN = dyn_cast<ConstantFPSDNode>(Node)) {
  98     Op += ": " + ftostr(CSDN->getValueAPF());
  99   } else if (const GlobalAddressSDNode *GADN =
 100              dyn_cast<GlobalAddressSDNode>(Node)) {
 101     int offset = GADN->getOffset();
 102     Op += ": " + GADN->getGlobal()->getName();
 103     if (offset > 0)
 104       Op += "+" + itostr(offset);
 105     else
 106       Op += itostr(offset);
 107   } else if (const FrameIndexSDNode *FIDN = dyn_cast<FrameIndexSDNode>(Node)) {
 108     Op += " " + itostr(FIDN->getIndex());
 109   } else if (const JumpTableSDNode *JTDN = dyn_cast<JumpTableSDNode>(Node)) {
 110     Op += " " + itostr(JTDN->getIndex());
 111   } else if (const ConstantPoolSDNode *CP = dyn_cast<ConstantPoolSDNode>(Node)){
 112     if (CP->isMachineConstantPoolEntry()) {
 113       std::ostringstream SS;
 114       CP->getMachineCPVal()->print(SS);
 115       Op += "<" + SS.str() + ">";
 116     } else {
 117       if (ConstantFP *CFP = dyn_cast<ConstantFP>(CP->getConstVal()))
 118         Op += "<" + ftostr(CFP->getValueAPF()) + ">";
 119       else if (ConstantInt *CI = dyn_cast<ConstantInt>(CP->getConstVal()))
 120         Op += "<" + utostr(CI->getZExtValue()) + ">";
 121       else {
 122         std::ostringstream SS;
 123         WriteAsOperand(SS, CP->getConstVal(), false);
 124         Op += "<" + SS.str() + ">";
 125       }
 126     }
 127   } else if (const BasicBlockSDNode *BBDN = dyn_cast<BasicBlockSDNode>(Node)) {
 128     Op = "BB: ";
 129     const Value *LBB = (const Value*)BBDN->getBasicBlock()->getBasicBlock();
 130     if (LBB)
 131       Op += LBB->getName();
 132     //Op += " " + (const void*)BBDN->getBasicBlock();
 133   } else if (const RegisterSDNode *R = dyn_cast<RegisterSDNode>(Node)) {
 134     if (G && R->getReg() != 0 &&
 135         MRegisterInfo::isPhysicalRegister(R->getReg())) {
 136       Op = Op + " " + G->getTarget().getRegisterInfo()->getName(R->getReg());
 137     } else {
 138       Op += " #" + utostr(R->getReg());
 139     }
 140   } else if (const ExternalSymbolSDNode *ES =
 141              dyn_cast<ExternalSymbolSDNode>(Node)) {
 142     Op += "'" + std::string(ES->getSymbol()) + "'";
 143   } else if (const SrcValueSDNode *M = dyn_cast<SrcValueSDNode>(Node)) {
 144     if (M->getValue())
 145       Op += "<" + M->getValue()->getName() + ">";
 146     else
 147       Op += "<null>";
 148   } else if (const MemOperandSDNode *M = dyn_cast<MemOperandSDNode>(Node)) {
 149     if (M->MO.getValue())
 150       Op += "<" + M->MO.getValue()->getName() + ":" + itostr(M->MO.getOffset()) + ">";
 151     else
 152       Op += "<null:" + itostr(M->MO.getOffset()) + ">";
 153   } else if (const VTSDNode *N = dyn_cast<VTSDNode>(Node)) {
 154     Op = Op + " VT=" + MVT::getValueTypeString(N->getVT());
 155   } else if (const StringSDNode *N = dyn_cast<StringSDNode>(Node)) {
 156     Op = Op + "\"" + N->getValue() + "\"";
 157   } else if (const LoadSDNode *LD = dyn_cast<LoadSDNode>(Node)) {
 158     bool doExt = true;
 159     switch (LD->getExtensionType()) {
 160     default: doExt = false; break;
 161     case ISD::EXTLOAD:
 162       Op = Op + "<anyext ";
 163       break;
 164     case ISD::SEXTLOAD:
 165       Op = Op + " <sext ";
 166       break;
 167     case ISD::ZEXTLOAD:
 168       Op = Op + " <zext ";
 169       break;
 170     }
 171     if (doExt)
 172       Op += MVT::getValueTypeString(LD->getMemoryVT()) + ">";
 173     if (LD->isVolatile())
 174       Op += "<V>";
 175     Op += LD->getIndexedModeName(LD->getAddressingMode());
 176     if (LD->getAlignment() > 1)
 177       Op += " A=" + utostr(LD->getAlignment());
 178   } else if (const StoreSDNode *ST = dyn_cast<StoreSDNode>(Node)) {
 179     if (ST->isTruncatingStore())
 180       Op += "<trunc " + MVT::getValueTypeString(ST->getMemoryVT()) + ">";
 181     if (ST->isVolatile())
 182       Op += "<V>";
 183     Op += ST->getIndexedModeName(ST->getAddressingMode());
 184     if (ST->getAlignment() > 1)
 185       Op += " A=" + utostr(ST->getAlignment());
 186   }
 187
 188 #if 0
 189   Op += " Id=" + itostr(Node->getNodeId());
 190 #endif
 191
 192   return Op;
 193 }
 194
 195
 196 /// viewGraph - Pop up a ghostview window with the reachable parts of the DAG
 197 /// rendered using 'dot'.
 198 ///
 199 void SelectionDAG::viewGraph() {
 200 // This code is only for debugging!
 201 #ifndef NDEBUG
 202   ViewGraph(this, "dag." + getMachineFunction().getFunction()->getName());
 203 #else
 204   cerr << "SelectionDAG::viewGraph is only available in debug builds on "
 205        << "systems with Graphviz or gv!\n";
 206 #endif  // NDEBUG
 207 }
 208
 209
 210 /// clearGraphAttrs - Clear all previously defined node graph attributes.
 211 /// Intended to be used from a debugging tool (eg. gdb).
 212 void SelectionDAG::clearGraphAttrs() {
 213 #ifndef NDEBUG
 214   NodeGraphAttrs.clear();
 215 #else
 216   cerr << "SelectionDAG::clearGraphAttrs is only available in debug builds"
 217        << " on systems with Graphviz or gv!\n";
 218 #endif
 219 }
 220
 221
 222 /// setGraphAttrs - Set graph attributes for a node. (eg. "color=red".)
 223 ///
 224 void SelectionDAG::setGraphAttrs(const SDNode *N, const char *Attrs) {
 225 #ifndef NDEBUG
 226   NodeGraphAttrs[N] = Attrs;
 227 #else
 228   cerr << "SelectionDAG::setGraphAttrs is only available in debug builds"
 229        << " on systems with Graphviz or gv!\n";
 230 #endif
 231 }
 232
 233
 234 /// getGraphAttrs - Get graph attributes for a node. (eg. "color=red".)
 235 /// Used from getNodeAttributes.
 236 const std::string SelectionDAG::getGraphAttrs(const SDNode *N) const {
 237 #ifndef NDEBUG
 238   std::map<const SDNode *, std::string>::const_iterator I =
 239     NodeGraphAttrs.find(N);
 240
 241   if (I != NodeGraphAttrs.end())
 242     return I->second;
 243   else
 244     return "";
 245 #else
 246   cerr << "SelectionDAG::getGraphAttrs is only available in debug builds"
 247        << " on systems with Graphviz or gv!\n";
 248   return std::string("");
 249 #endif
 250 }
 251
 252 /// setGraphColor - Convenience for setting node color attribute.
 253 ///
 254 void SelectionDAG::setGraphColor(const SDNode *N, const char *Color) {
 255 #ifndef NDEBUG
 256   NodeGraphAttrs[N] = std::string("color=") + Color;
 257 #else
 258   cerr << "SelectionDAG::setGraphColor is only available in debug builds"
 259        << " on systems with Graphviz or gv!\n";
 260 #endif
 261 }
 262
 263 namespace llvm {
 264   template<>
 265   struct DOTGraphTraits<ScheduleDAG*> : public DefaultDOTGraphTraits {
 266     static std::string getGraphName(const ScheduleDAG *G) {
 267       return DOTGraphTraits<SelectionDAG*>::getGraphName(&G->DAG);
 268     }
 269
 270     static bool renderGraphFromBottomUp() {
 271       return true;
 272     }
 273
 274     static bool hasNodeAddressLabel(const SUnit *Node,
 275                                     const ScheduleDAG *Graph) {
 276       return true;
 277     }
 278
 279     /// If you want to override the dot attributes printed for a particular
 280     /// edge, override this method.
 281     template<typename EdgeIter>
 282     static std::string getEdgeAttributes(const void *Node, EdgeIter EI) {
 283       if (EI.isCtrlDep())
 284         return "color=blue,style=dashed";
 285       return "";
 286     }
 287
 288
 289     static std::string getNodeLabel(const SUnit *Node,
 290                                     const ScheduleDAG *Graph);
 291     static std::string getNodeAttributes(const SUnit *N,
 292                                          const ScheduleDAG *Graph) {
 293       return "shape=Mrecord";
 294     }
 295
 296     static void addCustomGraphFeatures(ScheduleDAG *G,
 297                                        GraphWriter<ScheduleDAG*> &GW) {
 298       GW.emitSimpleNode(0, "plaintext=circle", "GraphRoot");
 299       if (G->DAG.getRoot().Val)
 300         GW.emitEdge(0, -1, G->SUnitMap[G->DAG.getRoot().Val].front(), -1, "");
 301     }
 302   };
 303 }
 304
 305 std::string DOTGraphTraits<ScheduleDAG*>::getNodeLabel(const SUnit *SU,
 306                                                        const ScheduleDAG *G) {
 307   std::string Op;
 308
 309   for (unsigned i = 0; i < SU->FlaggedNodes.size(); ++i) {
 310     Op += DOTGraphTraits<SelectionDAG*>::getNodeLabel(SU->FlaggedNodes[i],
 311                                                       &G->DAG) + "\n";
 312   }
 313
 314   Op += DOTGraphTraits<SelectionDAG*>::getNodeLabel(SU->Node, &G->DAG);
 315
 316   return Op;
 317 }
 318
 319
 320 /// viewGraph - Pop up a ghostview window with the reachable parts of the DAG
 321 /// rendered using 'dot'.
 322 ///
 323 void ScheduleDAG::viewGraph() {
 324 // This code is only for debugging!
 325 #ifndef NDEBUG
 326   ViewGraph(this, "dag." + DAG.getMachineFunction().getFunction()->getName());
 327 #else
 328   cerr << "ScheduleDAG::viewGraph is only available in debug builds on "
 329        << "systems with Graphviz or gv!\n";
 330 #endif  // NDEBUG
 331 }