1 | |
2 | |
3 | |
4 | |
5 | |
6 | |
7 | |
8 | |
9 | |
10 | |
11 | |
12 | |
13 | #include "clang/Analysis/CallGraph.h" |
14 | #include "clang/AST/Decl.h" |
15 | #include "clang/AST/DeclBase.h" |
16 | #include "clang/AST/DeclObjC.h" |
17 | #include "clang/AST/Expr.h" |
18 | #include "clang/AST/ExprObjC.h" |
19 | #include "clang/AST/Stmt.h" |
20 | #include "clang/AST/StmtVisitor.h" |
21 | #include "clang/Basic/IdentifierTable.h" |
22 | #include "clang/Basic/LLVM.h" |
23 | #include "llvm/ADT/PostOrderIterator.h" |
24 | #include "llvm/ADT/STLExtras.h" |
25 | #include "llvm/ADT/Statistic.h" |
26 | #include "llvm/Support/Casting.h" |
27 | #include "llvm/Support/Compiler.h" |
28 | #include "llvm/Support/DOTGraphTraits.h" |
29 | #include "llvm/Support/GraphWriter.h" |
30 | #include "llvm/Support/raw_ostream.h" |
31 | #include <cassert> |
32 | #include <memory> |
33 | #include <string> |
34 | |
35 | using namespace clang; |
36 | |
37 | #define DEBUG_TYPE "CallGraph" |
38 | |
39 | STATISTIC(NumObjCCallEdges, "Number of Objective-C method call edges"); |
40 | STATISTIC(NumBlockCallEdges, "Number of block call edges"); |
41 | |
42 | namespace { |
43 | |
44 | |
45 | |
46 | class CGBuilder : public StmtVisitor<CGBuilder> { |
47 | CallGraph *G; |
48 | CallGraphNode *CallerNode; |
49 | |
50 | public: |
51 | CGBuilder(CallGraph *g, CallGraphNode *N) : G(g), CallerNode(N) {} |
52 | |
53 | void VisitStmt(Stmt *S) { VisitChildren(S); } |
54 | |
55 | Decl *getDeclFromCall(CallExpr *CE) { |
56 | if (FunctionDecl *CalleeDecl = CE->getDirectCallee()) |
57 | return CalleeDecl; |
58 | |
59 | |
60 | Expr *CEE = CE->getCallee()->IgnoreParenImpCasts(); |
61 | if (BlockExpr *Block = dyn_cast<BlockExpr>(CEE)) { |
62 | NumBlockCallEdges++; |
63 | return Block->getBlockDecl(); |
64 | } |
65 | |
66 | return nullptr; |
67 | } |
68 | |
69 | void addCalledDecl(Decl *D) { |
70 | if (G->includeInGraph(D)) { |
71 | CallGraphNode *CalleeNode = G->getOrInsertNode(D); |
72 | CallerNode->addCallee(CalleeNode); |
73 | } |
74 | } |
75 | |
76 | void VisitCallExpr(CallExpr *CE) { |
77 | if (Decl *D = getDeclFromCall(CE)) |
78 | addCalledDecl(D); |
79 | VisitChildren(CE); |
80 | } |
81 | |
82 | |
83 | void VisitObjCMessageExpr(ObjCMessageExpr *ME) { |
84 | if (ObjCInterfaceDecl *IDecl = ME->getReceiverInterface()) { |
85 | Selector Sel = ME->getSelector(); |
86 | |
87 | |
88 | Decl *D = nullptr; |
89 | if (ME->isInstanceMessage()) |
90 | D = IDecl->lookupPrivateMethod(Sel); |
91 | else |
92 | D = IDecl->lookupPrivateClassMethod(Sel); |
93 | if (D) { |
94 | addCalledDecl(D); |
95 | NumObjCCallEdges++; |
96 | } |
97 | } |
98 | } |
99 | |
100 | void VisitChildren(Stmt *S) { |
101 | for (Stmt *SubStmt : S->children()) |
102 | if (SubStmt) |
103 | this->Visit(SubStmt); |
104 | } |
105 | }; |
106 | |
107 | } |
108 | |
109 | void CallGraph::addNodesForBlocks(DeclContext *D) { |
110 | if (BlockDecl *BD = dyn_cast<BlockDecl>(D)) |
111 | addNodeForDecl(BD, true); |
112 | |
113 | for (auto *I : D->decls()) |
114 | if (auto *DC = dyn_cast<DeclContext>(I)) |
115 | addNodesForBlocks(DC); |
116 | } |
117 | |
118 | CallGraph::CallGraph() { |
119 | Root = getOrInsertNode(nullptr); |
120 | } |
121 | |
122 | CallGraph::~CallGraph() = default; |
123 | |
124 | bool CallGraph::includeInGraph(const Decl *D) { |
125 | assert(D); |
126 | if (!D->hasBody()) |
127 | return false; |
128 | |
129 | if (const FunctionDecl *FD = dyn_cast<FunctionDecl>(D)) { |
130 | |
131 | |
132 | if (FD->isDependentContext()) |
133 | return false; |
134 | |
135 | IdentifierInfo *II = FD->getIdentifier(); |
136 | if (II && II->getName().startswith("__inline")) |
137 | return false; |
138 | } |
139 | |
140 | return true; |
141 | } |
142 | |
143 | void CallGraph::addNodeForDecl(Decl* D, bool IsGlobal) { |
144 | assert(D); |
145 | |
146 | |
147 | CallGraphNode *Node = getOrInsertNode(D); |
148 | |
149 | |
150 | CGBuilder builder(this, Node); |
151 | if (Stmt *Body = D->getBody()) |
152 | builder.Visit(Body); |
153 | } |
154 | |
155 | CallGraphNode *CallGraph::getNode(const Decl *F) const { |
156 | FunctionMapTy::const_iterator I = FunctionMap.find(F); |
157 | if (I == FunctionMap.end()) return nullptr; |
158 | return I->second.get(); |
159 | } |
160 | |
161 | CallGraphNode *CallGraph::getOrInsertNode(Decl *F) { |
162 | if (F && !isa<ObjCMethodDecl>(F)) |
163 | F = F->getCanonicalDecl(); |
164 | |
165 | std::unique_ptr<CallGraphNode> &Node = FunctionMap[F]; |
166 | if (Node) |
167 | return Node.get(); |
168 | |
169 | Node = llvm::make_unique<CallGraphNode>(F); |
170 | |
171 | if (F) |
172 | Root->addCallee(Node.get()); |
173 | return Node.get(); |
174 | } |
175 | |
176 | void CallGraph::print(raw_ostream &OS) const { |
177 | OS << " --- Call graph Dump --- \n"; |
178 | |
179 | |
180 | |
181 | llvm::ReversePostOrderTraversal<const CallGraph *> RPOT(this); |
182 | for (llvm::ReversePostOrderTraversal<const CallGraph *>::rpo_iterator |
183 | I = RPOT.begin(), E = RPOT.end(); I != E; ++I) { |
184 | const CallGraphNode *N = *I; |
185 | |
186 | OS << " Function: "; |
187 | if (N == Root) |
188 | OS << "< root >"; |
189 | else |
190 | N->print(OS); |
191 | |
192 | OS << " calls: "; |
193 | for (CallGraphNode::const_iterator CI = N->begin(), |
194 | CE = N->end(); CI != CE; ++CI) { |
195 | (0) . __assert_fail ("*CI != Root && \"No one can call the root node.\"", "/home/seafit/code_projects/clang_source/clang/lib/Analysis/CallGraph.cpp", 195, __PRETTY_FUNCTION__))" file_link="../../../include/assert.h.html#88" macro="true">assert(*CI != Root && "No one can call the root node."); |
196 | (*CI)->print(OS); |
197 | OS << " "; |
198 | } |
199 | OS << '\n'; |
200 | } |
201 | OS.flush(); |
202 | } |
203 | |
204 | LLVM_DUMP_METHOD void CallGraph::dump() const { |
205 | print(llvm::errs()); |
206 | } |
207 | |
208 | void CallGraph::viewGraph() const { |
209 | llvm::ViewGraph(this, "CallGraph"); |
210 | } |
211 | |
212 | void CallGraphNode::print(raw_ostream &os) const { |
213 | if (const NamedDecl *ND = dyn_cast_or_null<NamedDecl>(FD)) |
214 | return ND->printQualifiedName(os); |
215 | os << "< >"; |
216 | } |
217 | |
218 | LLVM_DUMP_METHOD void CallGraphNode::dump() const { |
219 | print(llvm::errs()); |
220 | } |
221 | |
222 | namespace llvm { |
223 | |
224 | template <> |
225 | struct DOTGraphTraits<const CallGraph*> : public DefaultDOTGraphTraits { |
226 | DOTGraphTraits (bool isSimple = false) : DefaultDOTGraphTraits(isSimple) {} |
227 | |
228 | static std::string getNodeLabel(const CallGraphNode *Node, |
229 | const CallGraph *CG) { |
230 | if (CG->getRoot() == Node) { |
231 | return "< root >"; |
232 | } |
233 | if (const NamedDecl *ND = dyn_cast_or_null<NamedDecl>(Node->getDecl())) |
234 | return ND->getNameAsString(); |
235 | else |
236 | return "< >"; |
237 | } |
238 | }; |
239 | |
240 | } |
241 | |