]> CyberLeo.Net >> Repos - FreeBSD/FreeBSD.git/blob - contrib/llvm/tools/clang/lib/AST/ParentMap.cpp
Copy the v4l2 header unchanged from the vendor branch.
[FreeBSD/FreeBSD.git] / contrib / llvm / tools / clang / lib / AST / ParentMap.cpp
1 //===--- ParentMap.cpp - Mappings from Stmts to their Parents ---*- C++ -*-===//
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 file defines the ParentMap class.
11 //
12 //===----------------------------------------------------------------------===//
13
14 #include "clang/AST/ParentMap.h"
15 #include "clang/AST/Decl.h"
16 #include "clang/AST/Expr.h"
17 #include "llvm/ADT/DenseMap.h"
18
19 using namespace clang;
20
21 typedef llvm::DenseMap<Stmt*, Stmt*> MapTy;
22
23 static void BuildParentMap(MapTy& M, Stmt* S) {
24   for (Stmt::child_range I = S->children(); I; ++I)
25     if (*I) {
26       M[*I] = S;
27       BuildParentMap(M, *I);
28     }
29 }
30
31 ParentMap::ParentMap(Stmt* S) : Impl(0) {
32   if (S) {
33     MapTy *M = new MapTy();
34     BuildParentMap(*M, S);
35     Impl = M;
36   }
37 }
38
39 ParentMap::~ParentMap() {
40   delete (MapTy*) Impl;
41 }
42
43 void ParentMap::addStmt(Stmt* S) {
44   if (S) {
45     BuildParentMap(*(MapTy*) Impl, S);
46   }
47 }
48
49 Stmt* ParentMap::getParent(Stmt* S) const {
50   MapTy* M = (MapTy*) Impl;
51   MapTy::iterator I = M->find(S);
52   return I == M->end() ? 0 : I->second;
53 }
54
55 Stmt *ParentMap::getParentIgnoreParens(Stmt *S) const {
56   do { S = getParent(S); } while (S && isa<ParenExpr>(S));
57   return S;
58 }
59
60 Stmt *ParentMap::getParentIgnoreParenCasts(Stmt *S) const {
61   do {
62     S = getParent(S);
63   }
64   while (S && (isa<ParenExpr>(S) || isa<CastExpr>(S)));
65
66   return S;  
67 }
68
69 bool ParentMap::isConsumedExpr(Expr* E) const {
70   Stmt *P = getParent(E);
71   Stmt *DirectChild = E;
72
73   // Ignore parents that are parentheses or casts.
74   while (P && (isa<ParenExpr>(P) || isa<CastExpr>(P))) {
75     DirectChild = P;
76     P = getParent(P);
77   }
78
79   if (!P)
80     return false;
81
82   switch (P->getStmtClass()) {
83     default:
84       return isa<Expr>(P);
85     case Stmt::DeclStmtClass:
86       return true;
87     case Stmt::BinaryOperatorClass: {
88       BinaryOperator *BE = cast<BinaryOperator>(P);
89       // If it is a comma, only the right side is consumed.
90       // If it isn't a comma, both sides are consumed.
91       return BE->getOpcode()!=BO_Comma ||DirectChild==BE->getRHS();
92     }
93     case Stmt::ForStmtClass:
94       return DirectChild == cast<ForStmt>(P)->getCond();
95     case Stmt::WhileStmtClass:
96       return DirectChild == cast<WhileStmt>(P)->getCond();
97     case Stmt::DoStmtClass:
98       return DirectChild == cast<DoStmt>(P)->getCond();
99     case Stmt::IfStmtClass:
100       return DirectChild == cast<IfStmt>(P)->getCond();
101     case Stmt::IndirectGotoStmtClass:
102       return DirectChild == cast<IndirectGotoStmt>(P)->getTarget();
103     case Stmt::SwitchStmtClass:
104       return DirectChild == cast<SwitchStmt>(P)->getCond();
105     case Stmt::ReturnStmtClass:
106       return true;
107   }
108 }
109