//===----------------------------------------------------------------------===//
#include "llvm/Analysis/DataStructure.h"
+#include "llvm/Analysis/DSGraph.h"
+#include "llvm/Analysis/DSGraphTraits.h"
#include "llvm/Module.h"
+#include "llvm/Constants.h"
#include "llvm/Assembly/Writer.h"
+#include "Support/CommandLine.h"
+#include "Support/GraphWriter.h"
+#include "Support/Statistic.h"
#include <fstream>
#include <sstream>
+// OnlyPrintMain - The DataStructure printer exposes this option to allow
+// printing of only the graph for "main".
+//
+namespace {
+ cl::opt<bool> OnlyPrintMain("only-print-main-ds", cl::ReallyHidden);
+ Statistic<> MaxGraphSize ("dsnode", "Maximum graph size");
+ Statistic<> NumFoldedNodes ("dsnode", "Number of folded nodes (in final graph)");
+}
+
+
void DSNode::dump() const { print(std::cerr, 0); }
-std::string DSNode::getCaption(Function *F) const {
+static std::string getCaption(const DSNode *N, const DSGraph *G) {
std::stringstream OS;
- WriteTypeSymbolic(OS, getType(), F ? F->getParent() : 0);
+ Module *M = 0;
+ // Get the module from ONE of the functions in the graph it is available.
+ if (G && !G->getReturnNodes().empty())
+ M = G->getReturnNodes().begin()->first->getParent();
- OS << " ";
- if (NodeType & ScalarNode) OS << "S";
- if (NodeType & AllocaNode) OS << "A";
- if (NodeType & NewNode ) OS << "N";
- if (NodeType & GlobalNode) OS << "G";
- if (NodeType & SubElement) OS << "E";
- if (NodeType & CastNode ) OS << "C";
+ if (N->isNodeCompletelyFolded())
+ OS << "COLLAPSED";
+ else {
+ WriteTypeSymbolic(OS, N->getType(), M);
+ if (N->isArray())
+ OS << " array";
+ }
+ if (unsigned NodeType = N->getNodeFlags()) {
+ OS << ": ";
+ if (NodeType & DSNode::AllocaNode ) OS << "S";
+ if (NodeType & DSNode::HeapNode ) OS << "H";
+ if (NodeType & DSNode::GlobalNode ) OS << "G";
+ if (NodeType & DSNode::UnknownNode) OS << "U";
+ if (NodeType & DSNode::Incomplete ) OS << "I";
+ if (NodeType & DSNode::Modified ) OS << "M";
+ if (NodeType & DSNode::Read ) OS << "R";
+#ifndef NDEBUG
+ if (NodeType & DSNode::DEAD ) OS << "<dead>";
+#endif
+ OS << "\n";
+ }
- return OS.str();
-}
+ for (unsigned i = 0, e = N->getGlobals().size(); i != e; ++i) {
+ WriteAsOperand(OS, N->getGlobals()[i], false, true, M);
+ OS << "\n";
+ }
-static std::string getValueName(Value *V, Function &F) {
- std::stringstream OS;
- WriteAsOperand(OS, V, true, true, F.getParent());
return OS.str();
}
+template<>
+struct DOTGraphTraits<const DSGraph*> : public DefaultDOTGraphTraits {
+ static std::string getGraphName(const DSGraph *G) {
+ switch (G->getReturnNodes().size()) {
+ case 0: return G->getFunctionNames();
+ case 1: return "Function " + G->getFunctionNames();
+ default: return "Functions: " + G->getFunctionNames();
+ }
+ }
+ static const char *getGraphProperties(const DSGraph *G) {
+ return "\tsize=\"10,7.5\";\n"
+ "\trotate=\"90\";\n";
+ }
-static void replaceIn(std::string &S, char From, const std::string &To) {
- for (unsigned i = 0; i < S.size(); )
- if (S[i] == From) {
- S.replace(S.begin()+i, S.begin()+i+1,
- To.begin(), To.end());
- i += To.size();
- } else {
- ++i;
- }
-}
+ static std::string getNodeLabel(const DSNode *Node, const DSGraph *Graph) {
+ return getCaption(Node, Graph);
+ }
-static string escapeLabel(const string &In) {
- string Label(In);
- replaceIn(Label, '\\', "\\\\"); // Escape caption...
- replaceIn(Label, ' ', "\\ ");
- replaceIn(Label, '{', "\\{");
- replaceIn(Label, '}', "\\}");
- return Label;
-}
+ static std::string getNodeAttributes(const DSNode *N) {
+ return "shape=Mrecord";//fontname=Courier";
+ }
+
+ /// addCustomGraphFeatures - Use this graph writing hook to emit call nodes
+ /// and the return node.
+ ///
+ static void addCustomGraphFeatures(const DSGraph *G,
+ GraphWriter<const DSGraph*> &GW) {
+ Module *CurMod = 0;
+ if (!G->getReturnNodes().empty())
+ CurMod = G->getReturnNodes().begin()->first->getParent();
-static void writeEdge(std::ostream &O, const void *SrcNode,
- const char *SrcNodePortName, int SrcNodeIdx,
- const DSNode *VS, const string &EdgeAttr = "") {
- O << "\tNode" << SrcNode << SrcNodePortName;
- if (SrcNodeIdx != -1) O << SrcNodeIdx;
- O << " -> Node" << (void*)VS;
+ // Add scalar nodes to the graph...
+ const DSGraph::ScalarMapTy &VM = G->getScalarMap();
+ for (DSGraph::ScalarMapTy::const_iterator I = VM.begin(); I != VM.end();++I)
+ if (!isa<GlobalValue>(I->first) && !isa<ConstantPointerRef>(I->first)) {
+ std::stringstream OS;
+ WriteAsOperand(OS, I->first, false, true, CurMod);
+ GW.emitSimpleNode(I->first, "", OS.str());
+
+ // Add edge from return node to real destination
+ int EdgeDest = I->second.getOffset() >> DS::PointerShift;
+ if (EdgeDest == 0) EdgeDest = -1;
+ GW.emitEdge(I->first, -1, I->second.getNode(),
+ EdgeDest, "arrowtail=tee,color=gray63");
+ }
- if (!EdgeAttr.empty())
- O << "[" << EdgeAttr << "]";
- O << ";\n";
-}
-void DSNode::print(std::ostream &O, Function *F) const {
- string Caption = escapeLabel(getCaption(F));
+ // Output the returned value pointer...
+ const DSGraph::ReturnNodesTy &RetNodes = G->getReturnNodes();
+ for (DSGraph::ReturnNodesTy::const_iterator I = RetNodes.begin(),
+ E = RetNodes.end(); I != E; ++I)
+ if (I->second.getNode()) {
+ std::string Label;
+ if (RetNodes.size() == 1)
+ Label = "returning";
+ else
+ Label = I->first->getName() + " ret node";
+ // Output the return node...
+ GW.emitSimpleNode((void*)1, "plaintext=circle", Label);
+
+ // Add edge from return node to real destination
+ int RetEdgeDest = I->second.getOffset() >> DS::PointerShift;;
+ if (RetEdgeDest == 0) RetEdgeDest = -1;
+ GW.emitEdge((void*)1, -1, I->second.getNode(),
+ RetEdgeDest, "arrowtail=tee,color=gray63");
+ }
+
+ // Output all of the call nodes...
+ const std::vector<DSCallSite> &FCs =
+ G->shouldPrintAuxCalls() ? G->getAuxFunctionCalls()
+ : G->getFunctionCalls();
+ for (unsigned i = 0, e = FCs.size(); i != e; ++i) {
+ const DSCallSite &Call = FCs[i];
+ std::vector<std::string> EdgeSourceCaptions(Call.getNumPtrArgs()+2);
+ EdgeSourceCaptions[0] = "r";
+ if (Call.isDirectCall())
+ EdgeSourceCaptions[1] = Call.getCalleeFunc()->getName();
+ else
+ EdgeSourceCaptions[1] = "f";
- O << "\tNode" << (void*)this << " [ label =\"{" << Caption;
+ GW.emitSimpleNode(&Call, "shape=record", "call", Call.getNumPtrArgs()+2,
+ &EdgeSourceCaptions);
- if (!Links.empty()) {
- O << "|{";
- for (unsigned i = 0; i < Links.size(); ++i) {
- if (i) O << "|";
- O << "<g" << i << ">";
+ if (DSNode *N = Call.getRetVal().getNode()) {
+ int EdgeDest = Call.getRetVal().getOffset() >> DS::PointerShift;
+ if (EdgeDest == 0) EdgeDest = -1;
+ GW.emitEdge(&Call, 0, N, EdgeDest, "color=gray63,tailclip=false");
+ }
+
+ // Print out the callee...
+ if (Call.isIndirectCall()) {
+ DSNode *N = Call.getCalleeNode();
+ assert(N && "Null call site callee node!");
+ GW.emitEdge(&Call, 1, N, -1, "color=gray63,tailclip=false");
+ }
+
+ for (unsigned j = 0, e = Call.getNumPtrArgs(); j != e; ++j)
+ if (DSNode *N = Call.getPtrArg(j).getNode()) {
+ int EdgeDest = Call.getPtrArg(j).getOffset() >> DS::PointerShift;
+ if (EdgeDest == 0) EdgeDest = -1;
+ GW.emitEdge(&Call, j+2, N, EdgeDest, "color=gray63,tailclip=false");
+ }
}
- O << "}";
}
- O << "}\"];\n";
+};
- for (unsigned i = 0; i < Links.size(); ++i)
- if (Links[i])
- writeEdge(O, this, ":g", i, Links[i]);
+void DSNode::print(std::ostream &O, const DSGraph *G) const {
+ GraphWriter<const DSGraph *> W(O, G);
+ W.writeNode(this);
}
void DSGraph::print(std::ostream &O) const {
- O << "digraph DataStructures {\n"
- << "\tnode [shape=Mrecord];\n"
- << "\tedge [arrowtail=\"dot\"];\n"
- << "\tsize=\"10,7.5\";\n"
- << "\trotate=\"90\";\n"
- << "\tlabel=\"Function\\ " << Func.getName() << "\";\n\n";
-
- // Output all of the nodes...
- for (unsigned i = 0, e = Nodes.size(); i != e; ++i)
- Nodes[i]->print(O, &Func);
-
- O << "\n";
- // Output all of the nodes edges for scalar labels
- for (std::map<Value*, DSNodeHandle>::const_iterator I = ValueMap.begin(),
- E = ValueMap.end(); I != E; ++I) {
- O << "\tNode" << (void*)I->first << "[ shape=circle, label =\""
- << escapeLabel(getValueName(I->first, Func)) << "\",style=dotted];\n";
- writeEdge(O, I->first, "",-1, I->second.get(),"arrowtail=tee,style=dotted");
+ WriteGraph(O, this, "DataStructures");
+}
+
+void DSGraph::writeGraphToFile(std::ostream &O,
+ const std::string &GraphName) const {
+ std::string Filename = GraphName + ".dot";
+ O << "Writing '" << Filename << "'...";
+ std::ofstream F(Filename.c_str());
+
+ if (F.good()) {
+ print(F);
+ unsigned NumCalls = shouldPrintAuxCalls() ?
+ getAuxFunctionCalls().size() : getFunctionCalls().size();
+ O << " [" << getGraphSize() << "+" << NumCalls << "]\n";
+ } else {
+ O << " error opening file for writing!\n";
}
+}
+
+/// viewGraph - Emit a dot graph, run 'dot', run gv on the postscript file,
+/// then cleanup. For use from the debugger.
+///
+void DSGraph::viewGraph() const {
+ std::ofstream F("/tmp/tempgraph.dot");
+ if (!F.good()) {
+ std::cerr << "Error opening '/tmp/tempgraph.dot' for temporary graph!\n";
+ return;
+ }
+ print(F);
+ F.close();
+ if (system("dot -Tps /tmp/tempgraph.dot > /tmp/tempgraph.ps"))
+ std::cerr << "Error running dot: 'dot' not in path?\n";
+ system("gv /tmp/tempgraph.ps");
+ system("rm /tmp/tempgraph.dot /tmp/tempgraph.ps");
+}
- // Output the returned value pointer...
- if (RetNode != 0) {
- O << "\tNode0x1" << "[ shape=circle, label =\""
- << escapeLabel("Return") << "\"];\n";
- writeEdge(O, (void*)1, "", -1, RetNode, "arrowtail=tee,style=dotted");
- }
-
- // Output all of the call nodes...
- for (unsigned i = 0, e = FunctionCalls.size(); i != e; ++i) {
- const std::vector<DSNodeHandle> &Call = FunctionCalls[i];
- O << "\tNode" << (void*)&Call << " [shape=record,label=\"{call|{";
- for (unsigned j = 0, e = Call.size(); j != e; ++j) {
- if (j) O << "|";
- O << "<g" << j << ">";
- }
- O << "}}\"];\n";
- for (unsigned j = 0, e = Call.size(); j != e; ++j)
- if (Call[j])
- writeEdge(O, &Call, ":g", j, Call[j]);
+template <typename Collection>
+static void printCollection(const Collection &C, std::ostream &O,
+ const Module *M, const std::string &Prefix) {
+ if (M == 0) {
+ O << "Null Module pointer, cannot continue!\n";
+ return;
}
+ unsigned TotalNumNodes = 0, TotalCallNodes = 0;
+ for (Module::const_iterator I = M->begin(), E = M->end(); I != E; ++I)
+ if (C.hasGraph(*I)) {
+ DSGraph &Gr = C.getDSGraph((Function&)*I);
+ TotalNumNodes += Gr.getGraphSize();
+ unsigned NumCalls = Gr.shouldPrintAuxCalls() ?
+ Gr.getAuxFunctionCalls().size() : Gr.getFunctionCalls().size();
- O << "}\n";
-}
+ TotalCallNodes += NumCalls;
+ if (I->getName() == "main" || !OnlyPrintMain)
+ Gr.writeGraphToFile(O, Prefix+I->getName());
+ else {
+ O << "Skipped Writing '" << Prefix+I->getName() << ".dot'... ["
+ << Gr.getGraphSize() << "+" << NumCalls << "]\n";
+ }
+
+ if (MaxGraphSize < Gr.getNodes().size())
+ MaxGraphSize = Gr.getNodes().size();
+ for (unsigned i = 0, e = Gr.getNodes().size(); i != e; ++i)
+ if (Gr.getNodes()[i]->isNodeCompletelyFolded())
+ ++NumFoldedNodes;
+ }
+ DSGraph &GG = C.getGlobalsGraph();
+ TotalNumNodes += GG.getGraphSize();
+ TotalCallNodes += GG.getFunctionCalls().size();
+ if (!OnlyPrintMain) {
+ GG.writeGraphToFile(O, Prefix+"GlobalsGraph");
+ } else {
+ O << "Skipped Writing '" << Prefix << "GlobalsGraph.dot'... ["
+ << GG.getGraphSize() << "+" << GG.getFunctionCalls().size() << "]\n";
+ }
+ O << "\nGraphs contain [" << TotalNumNodes << "+" << TotalCallNodes
+ << "] nodes total" << std::endl;
+}
// print - Print out the analysis results...
-void LocalDataStructures::print(std::ostream &O, Module *M) const {
- for (Module::iterator I = M->begin(), E = M->end(); I != E; ++I)
- if (!I->isExternal()) {
- std::string Filename = "ds." + I->getName() + ".dot";
- O << "Writing '" << Filename << "'...";
- std::ofstream F(Filename.c_str());
-
- if (F.good()) {
- DSGraph &Graph = getDSGraph(*I);
- Graph.print(F);
- O << " [" << Graph.getGraphSize() << "]\n";
- } else {
- O << " error opening file for writing!\n";
- }
- }
+void LocalDataStructures::print(std::ostream &O, const Module *M) const {
+ printCollection(*this, O, M, "ds.");
+}
+
+void BUDataStructures::print(std::ostream &O, const Module *M) const {
+ printCollection(*this, O, M, "bu.");
+}
+
+void TDDataStructures::print(std::ostream &O, const Module *M) const {
+ printCollection(*this, O, M, "td.");
}