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