228 lines
9.5 KiB
C++
228 lines
9.5 KiB
C++
//===--- StmtVisitor.h - Visitor for Stmt subclasses ------------*- C++ -*-===//
|
|
//
|
|
// The LLVM Compiler Infrastructure
|
|
//
|
|
// This file is distributed under the University of Illinois Open Source
|
|
// License. See LICENSE.TXT for details.
|
|
//
|
|
//===----------------------------------------------------------------------===//
|
|
//
|
|
// This file defines the StmtVisitor and ConstStmtVisitor interfaces.
|
|
//
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
#ifndef LLVM_CLANG_AST_STMTVISITOR_H
|
|
#define LLVM_CLANG_AST_STMTVISITOR_H
|
|
|
|
#include "clang/AST/ExprCXX.h"
|
|
#include "clang/AST/ExprObjC.h"
|
|
#include "clang/AST/ExprOpenMP.h"
|
|
#include "clang/AST/StmtCXX.h"
|
|
#include "clang/AST/StmtObjC.h"
|
|
#include "clang/AST/StmtOpenMP.h"
|
|
|
|
namespace clang {
|
|
|
|
template <typename T> struct make_ptr { typedef T *type; };
|
|
template <typename T> struct make_const_ptr { typedef const T *type; };
|
|
|
|
/// StmtVisitorBase - This class implements a simple visitor for Stmt
|
|
/// subclasses. Since Expr derives from Stmt, this also includes support for
|
|
/// visiting Exprs.
|
|
template<template <typename> class Ptr, typename ImplClass, typename RetTy=void>
|
|
class StmtVisitorBase {
|
|
public:
|
|
|
|
#define PTR(CLASS) typename Ptr<CLASS>::type
|
|
#define DISPATCH(NAME, CLASS) \
|
|
return static_cast<ImplClass*>(this)->Visit ## NAME(static_cast<PTR(CLASS)>(S))
|
|
|
|
RetTy Visit(PTR(Stmt) S) {
|
|
|
|
// If we have a binary expr, dispatch to the subcode of the binop. A smart
|
|
// optimizer (e.g. LLVM) will fold this comparison into the switch stmt
|
|
// below.
|
|
if (PTR(BinaryOperator) BinOp = dyn_cast<BinaryOperator>(S)) {
|
|
switch (BinOp->getOpcode()) {
|
|
case BO_PtrMemD: DISPATCH(BinPtrMemD, BinaryOperator);
|
|
case BO_PtrMemI: DISPATCH(BinPtrMemI, BinaryOperator);
|
|
case BO_Mul: DISPATCH(BinMul, BinaryOperator);
|
|
case BO_Div: DISPATCH(BinDiv, BinaryOperator);
|
|
case BO_Rem: DISPATCH(BinRem, BinaryOperator);
|
|
case BO_Add: DISPATCH(BinAdd, BinaryOperator);
|
|
case BO_Sub: DISPATCH(BinSub, BinaryOperator);
|
|
case BO_Shl: DISPATCH(BinShl, BinaryOperator);
|
|
case BO_Shr: DISPATCH(BinShr, BinaryOperator);
|
|
|
|
case BO_LT: DISPATCH(BinLT, BinaryOperator);
|
|
case BO_GT: DISPATCH(BinGT, BinaryOperator);
|
|
case BO_LE: DISPATCH(BinLE, BinaryOperator);
|
|
case BO_GE: DISPATCH(BinGE, BinaryOperator);
|
|
case BO_EQ: DISPATCH(BinEQ, BinaryOperator);
|
|
case BO_NE: DISPATCH(BinNE, BinaryOperator);
|
|
|
|
case BO_And: DISPATCH(BinAnd, BinaryOperator);
|
|
case BO_Xor: DISPATCH(BinXor, BinaryOperator);
|
|
case BO_Or : DISPATCH(BinOr, BinaryOperator);
|
|
case BO_LAnd: DISPATCH(BinLAnd, BinaryOperator);
|
|
case BO_LOr : DISPATCH(BinLOr, BinaryOperator);
|
|
case BO_Assign: DISPATCH(BinAssign, BinaryOperator);
|
|
case BO_MulAssign: DISPATCH(BinMulAssign, CompoundAssignOperator);
|
|
case BO_DivAssign: DISPATCH(BinDivAssign, CompoundAssignOperator);
|
|
case BO_RemAssign: DISPATCH(BinRemAssign, CompoundAssignOperator);
|
|
case BO_AddAssign: DISPATCH(BinAddAssign, CompoundAssignOperator);
|
|
case BO_SubAssign: DISPATCH(BinSubAssign, CompoundAssignOperator);
|
|
case BO_ShlAssign: DISPATCH(BinShlAssign, CompoundAssignOperator);
|
|
case BO_ShrAssign: DISPATCH(BinShrAssign, CompoundAssignOperator);
|
|
case BO_AndAssign: DISPATCH(BinAndAssign, CompoundAssignOperator);
|
|
case BO_OrAssign: DISPATCH(BinOrAssign, CompoundAssignOperator);
|
|
case BO_XorAssign: DISPATCH(BinXorAssign, CompoundAssignOperator);
|
|
case BO_Comma: DISPATCH(BinComma, BinaryOperator);
|
|
}
|
|
} else if (PTR(UnaryOperator) UnOp = dyn_cast<UnaryOperator>(S)) {
|
|
switch (UnOp->getOpcode()) {
|
|
case UO_PostInc: DISPATCH(UnaryPostInc, UnaryOperator);
|
|
case UO_PostDec: DISPATCH(UnaryPostDec, UnaryOperator);
|
|
case UO_PreInc: DISPATCH(UnaryPreInc, UnaryOperator);
|
|
case UO_PreDec: DISPATCH(UnaryPreDec, UnaryOperator);
|
|
case UO_AddrOf: DISPATCH(UnaryAddrOf, UnaryOperator);
|
|
case UO_Deref: DISPATCH(UnaryDeref, UnaryOperator);
|
|
case UO_Plus: DISPATCH(UnaryPlus, UnaryOperator);
|
|
case UO_Minus: DISPATCH(UnaryMinus, UnaryOperator);
|
|
case UO_Not: DISPATCH(UnaryNot, UnaryOperator);
|
|
case UO_LNot: DISPATCH(UnaryLNot, UnaryOperator);
|
|
case UO_Real: DISPATCH(UnaryReal, UnaryOperator);
|
|
case UO_Imag: DISPATCH(UnaryImag, UnaryOperator);
|
|
case UO_Extension: DISPATCH(UnaryExtension, UnaryOperator);
|
|
case UO_Coawait: DISPATCH(UnaryCoawait, UnaryOperator);
|
|
}
|
|
}
|
|
|
|
// Top switch stmt: dispatch to VisitFooStmt for each FooStmt.
|
|
switch (S->getStmtClass()) {
|
|
default: llvm_unreachable("Unknown stmt kind!");
|
|
#define ABSTRACT_STMT(STMT)
|
|
#define STMT(CLASS, PARENT) \
|
|
case Stmt::CLASS ## Class: DISPATCH(CLASS, CLASS);
|
|
#include "clang/AST/StmtNodes.inc"
|
|
}
|
|
}
|
|
|
|
// If the implementation chooses not to implement a certain visit method, fall
|
|
// back on VisitExpr or whatever else is the superclass.
|
|
#define STMT(CLASS, PARENT) \
|
|
RetTy Visit ## CLASS(PTR(CLASS) S) { DISPATCH(PARENT, PARENT); }
|
|
#include "clang/AST/StmtNodes.inc"
|
|
|
|
// If the implementation doesn't implement binary operator methods, fall back
|
|
// on VisitBinaryOperator.
|
|
#define BINOP_FALLBACK(NAME) \
|
|
RetTy VisitBin ## NAME(PTR(BinaryOperator) S) { \
|
|
DISPATCH(BinaryOperator, BinaryOperator); \
|
|
}
|
|
BINOP_FALLBACK(PtrMemD) BINOP_FALLBACK(PtrMemI)
|
|
BINOP_FALLBACK(Mul) BINOP_FALLBACK(Div) BINOP_FALLBACK(Rem)
|
|
BINOP_FALLBACK(Add) BINOP_FALLBACK(Sub) BINOP_FALLBACK(Shl)
|
|
BINOP_FALLBACK(Shr)
|
|
|
|
BINOP_FALLBACK(LT) BINOP_FALLBACK(GT) BINOP_FALLBACK(LE)
|
|
BINOP_FALLBACK(GE) BINOP_FALLBACK(EQ) BINOP_FALLBACK(NE)
|
|
BINOP_FALLBACK(And) BINOP_FALLBACK(Xor) BINOP_FALLBACK(Or)
|
|
BINOP_FALLBACK(LAnd) BINOP_FALLBACK(LOr)
|
|
|
|
BINOP_FALLBACK(Assign)
|
|
BINOP_FALLBACK(Comma)
|
|
#undef BINOP_FALLBACK
|
|
|
|
// If the implementation doesn't implement compound assignment operator
|
|
// methods, fall back on VisitCompoundAssignOperator.
|
|
#define CAO_FALLBACK(NAME) \
|
|
RetTy VisitBin ## NAME(PTR(CompoundAssignOperator) S) { \
|
|
DISPATCH(CompoundAssignOperator, CompoundAssignOperator); \
|
|
}
|
|
CAO_FALLBACK(MulAssign) CAO_FALLBACK(DivAssign) CAO_FALLBACK(RemAssign)
|
|
CAO_FALLBACK(AddAssign) CAO_FALLBACK(SubAssign) CAO_FALLBACK(ShlAssign)
|
|
CAO_FALLBACK(ShrAssign) CAO_FALLBACK(AndAssign) CAO_FALLBACK(OrAssign)
|
|
CAO_FALLBACK(XorAssign)
|
|
#undef CAO_FALLBACK
|
|
|
|
// If the implementation doesn't implement unary operator methods, fall back
|
|
// on VisitUnaryOperator.
|
|
#define UNARYOP_FALLBACK(NAME) \
|
|
RetTy VisitUnary ## NAME(PTR(UnaryOperator) S) { \
|
|
DISPATCH(UnaryOperator, UnaryOperator); \
|
|
}
|
|
UNARYOP_FALLBACK(PostInc) UNARYOP_FALLBACK(PostDec)
|
|
UNARYOP_FALLBACK(PreInc) UNARYOP_FALLBACK(PreDec)
|
|
UNARYOP_FALLBACK(AddrOf) UNARYOP_FALLBACK(Deref)
|
|
|
|
UNARYOP_FALLBACK(Plus) UNARYOP_FALLBACK(Minus)
|
|
UNARYOP_FALLBACK(Not) UNARYOP_FALLBACK(LNot)
|
|
UNARYOP_FALLBACK(Real) UNARYOP_FALLBACK(Imag)
|
|
UNARYOP_FALLBACK(Extension) UNARYOP_FALLBACK(Coawait)
|
|
#undef UNARYOP_FALLBACK
|
|
|
|
// Base case, ignore it. :)
|
|
RetTy VisitStmt(PTR(Stmt) Node) { return RetTy(); }
|
|
|
|
#undef PTR
|
|
#undef DISPATCH
|
|
};
|
|
|
|
/// StmtVisitor - This class implements a simple visitor for Stmt subclasses.
|
|
/// Since Expr derives from Stmt, this also includes support for visiting Exprs.
|
|
///
|
|
/// This class does not preserve constness of Stmt pointers (see also
|
|
/// ConstStmtVisitor).
|
|
template<typename ImplClass, typename RetTy=void>
|
|
class StmtVisitor
|
|
: public StmtVisitorBase<make_ptr, ImplClass, RetTy> {};
|
|
|
|
/// ConstStmtVisitor - This class implements a simple visitor for Stmt
|
|
/// subclasses. Since Expr derives from Stmt, this also includes support for
|
|
/// visiting Exprs.
|
|
///
|
|
/// This class preserves constness of Stmt pointers (see also StmtVisitor).
|
|
template<typename ImplClass, typename RetTy=void>
|
|
class ConstStmtVisitor
|
|
: public StmtVisitorBase<make_const_ptr, ImplClass, RetTy> {};
|
|
|
|
/// \brief This class implements a simple visitor for OMPClause
|
|
/// subclasses.
|
|
template<class ImplClass, template <typename> class Ptr, typename RetTy>
|
|
class OMPClauseVisitorBase {
|
|
public:
|
|
#define PTR(CLASS) typename Ptr<CLASS>::type
|
|
#define DISPATCH(CLASS) \
|
|
return static_cast<ImplClass*>(this)->Visit##CLASS(static_cast<PTR(CLASS)>(S))
|
|
|
|
#define OPENMP_CLAUSE(Name, Class) \
|
|
RetTy Visit ## Class (PTR(Class) S) { DISPATCH(Class); }
|
|
#include "clang/Basic/OpenMPKinds.def"
|
|
|
|
RetTy Visit(PTR(OMPClause) S) {
|
|
// Top switch clause: visit each OMPClause.
|
|
switch (S->getClauseKind()) {
|
|
default: llvm_unreachable("Unknown clause kind!");
|
|
#define OPENMP_CLAUSE(Name, Class) \
|
|
case OMPC_ ## Name : return Visit ## Class(static_cast<PTR(Class)>(S));
|
|
#include "clang/Basic/OpenMPKinds.def"
|
|
}
|
|
}
|
|
// Base case, ignore it. :)
|
|
RetTy VisitOMPClause(PTR(OMPClause) Node) { return RetTy(); }
|
|
#undef PTR
|
|
#undef DISPATCH
|
|
};
|
|
|
|
template<class ImplClass, typename RetTy = void>
|
|
class OMPClauseVisitor :
|
|
public OMPClauseVisitorBase <ImplClass, make_ptr, RetTy> {};
|
|
template<class ImplClass, typename RetTy = void>
|
|
class ConstOMPClauseVisitor :
|
|
public OMPClauseVisitorBase <ImplClass, make_const_ptr, RetTy> {};
|
|
|
|
} // end namespace clang
|
|
|
|
#endif
|