1fa0734ecSArgyrios Kyrtzidis //===---- CheckerHelpers.cpp - Helper functions for checkers ----*- C++ -*-===//
2fa0734ecSArgyrios Kyrtzidis //
32946cd70SChandler Carruth // Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
42946cd70SChandler Carruth // See https://llvm.org/LICENSE.txt for license information.
52946cd70SChandler Carruth // SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
6fa0734ecSArgyrios Kyrtzidis //
7fa0734ecSArgyrios Kyrtzidis //===----------------------------------------------------------------------===//
8fa0734ecSArgyrios Kyrtzidis //
9fa0734ecSArgyrios Kyrtzidis //  This file defines several static functions for use in checkers.
10fa0734ecSArgyrios Kyrtzidis //
11fa0734ecSArgyrios Kyrtzidis //===----------------------------------------------------------------------===//
12fa0734ecSArgyrios Kyrtzidis 
13f8cbac4bSTed Kremenek #include "clang/StaticAnalyzer/Core/PathSensitive/CheckerHelpers.h"
1422b4164eSYury Gribov #include "clang/AST/Decl.h"
15fa0734ecSArgyrios Kyrtzidis #include "clang/AST/Expr.h"
16536456a7SGabor Marton #include "clang/Lex/Preprocessor.h"
17fa0734ecSArgyrios Kyrtzidis 
182301c5abSGeorge Karpenkov namespace clang {
192301c5abSGeorge Karpenkov 
202301c5abSGeorge Karpenkov namespace ento {
212301c5abSGeorge Karpenkov 
22fa0734ecSArgyrios Kyrtzidis // Recursively find any substatements containing macros
containsMacro(const Stmt * S)232301c5abSGeorge Karpenkov bool containsMacro(const Stmt *S) {
24f2ceec48SStephen Kelly   if (S->getBeginLoc().isMacroID())
25fa0734ecSArgyrios Kyrtzidis     return true;
26fa0734ecSArgyrios Kyrtzidis 
271c301dcbSStephen Kelly   if (S->getEndLoc().isMacroID())
28fa0734ecSArgyrios Kyrtzidis     return true;
29fa0734ecSArgyrios Kyrtzidis 
30973431b2SBenjamin Kramer   for (const Stmt *Child : S->children())
31973431b2SBenjamin Kramer     if (Child && containsMacro(Child))
32fa0734ecSArgyrios Kyrtzidis       return true;
33fa0734ecSArgyrios Kyrtzidis 
34fa0734ecSArgyrios Kyrtzidis   return false;
35fa0734ecSArgyrios Kyrtzidis }
36fa0734ecSArgyrios Kyrtzidis 
37fa0734ecSArgyrios Kyrtzidis // Recursively find any substatements containing enum constants
containsEnum(const Stmt * S)382301c5abSGeorge Karpenkov bool containsEnum(const Stmt *S) {
39fa0734ecSArgyrios Kyrtzidis   const DeclRefExpr *DR = dyn_cast<DeclRefExpr>(S);
40fa0734ecSArgyrios Kyrtzidis 
41fa0734ecSArgyrios Kyrtzidis   if (DR && isa<EnumConstantDecl>(DR->getDecl()))
42fa0734ecSArgyrios Kyrtzidis     return true;
43fa0734ecSArgyrios Kyrtzidis 
44973431b2SBenjamin Kramer   for (const Stmt *Child : S->children())
45973431b2SBenjamin Kramer     if (Child && containsEnum(Child))
46fa0734ecSArgyrios Kyrtzidis       return true;
47fa0734ecSArgyrios Kyrtzidis 
48fa0734ecSArgyrios Kyrtzidis   return false;
49fa0734ecSArgyrios Kyrtzidis }
50fa0734ecSArgyrios Kyrtzidis 
51fa0734ecSArgyrios Kyrtzidis // Recursively find any substatements containing static vars
containsStaticLocal(const Stmt * S)522301c5abSGeorge Karpenkov bool containsStaticLocal(const Stmt *S) {
53fa0734ecSArgyrios Kyrtzidis   const DeclRefExpr *DR = dyn_cast<DeclRefExpr>(S);
54fa0734ecSArgyrios Kyrtzidis 
55fa0734ecSArgyrios Kyrtzidis   if (DR)
56fa0734ecSArgyrios Kyrtzidis     if (const VarDecl *VD = dyn_cast<VarDecl>(DR->getDecl()))
57fa0734ecSArgyrios Kyrtzidis       if (VD->isStaticLocal())
58fa0734ecSArgyrios Kyrtzidis         return true;
59fa0734ecSArgyrios Kyrtzidis 
60973431b2SBenjamin Kramer   for (const Stmt *Child : S->children())
61973431b2SBenjamin Kramer     if (Child && containsStaticLocal(Child))
62fa0734ecSArgyrios Kyrtzidis       return true;
63fa0734ecSArgyrios Kyrtzidis 
64fa0734ecSArgyrios Kyrtzidis   return false;
65fa0734ecSArgyrios Kyrtzidis }
66fa0734ecSArgyrios Kyrtzidis 
67fa0734ecSArgyrios Kyrtzidis // Recursively find any substatements containing __builtin_offsetof
containsBuiltinOffsetOf(const Stmt * S)682301c5abSGeorge Karpenkov bool containsBuiltinOffsetOf(const Stmt *S) {
69fa0734ecSArgyrios Kyrtzidis   if (isa<OffsetOfExpr>(S))
70fa0734ecSArgyrios Kyrtzidis     return true;
71fa0734ecSArgyrios Kyrtzidis 
72973431b2SBenjamin Kramer   for (const Stmt *Child : S->children())
73973431b2SBenjamin Kramer     if (Child && containsBuiltinOffsetOf(Child))
74fa0734ecSArgyrios Kyrtzidis       return true;
75fa0734ecSArgyrios Kyrtzidis 
76fa0734ecSArgyrios Kyrtzidis   return false;
77fa0734ecSArgyrios Kyrtzidis }
7822b4164eSYury Gribov 
7922b4164eSYury Gribov // Extract lhs and rhs from assignment statement
8022b4164eSYury Gribov std::pair<const clang::VarDecl *, const clang::Expr *>
parseAssignment(const Stmt * S)812301c5abSGeorge Karpenkov parseAssignment(const Stmt *S) {
821660a5d2SEugene Zelenko   const VarDecl *VD = nullptr;
831660a5d2SEugene Zelenko   const Expr *RHS = nullptr;
8422b4164eSYury Gribov 
8522b4164eSYury Gribov   if (auto Assign = dyn_cast_or_null<BinaryOperator>(S)) {
8622b4164eSYury Gribov     if (Assign->isAssignmentOp()) {
8722b4164eSYury Gribov       // Ordinary assignment
8822b4164eSYury Gribov       RHS = Assign->getRHS();
8922b4164eSYury Gribov       if (auto DE = dyn_cast_or_null<DeclRefExpr>(Assign->getLHS()))
9022b4164eSYury Gribov         VD = dyn_cast_or_null<VarDecl>(DE->getDecl());
9122b4164eSYury Gribov     }
9222b4164eSYury Gribov   } else if (auto PD = dyn_cast_or_null<DeclStmt>(S)) {
9322b4164eSYury Gribov     // Initialization
9422b4164eSYury Gribov     assert(PD->isSingleDecl() && "We process decls one by one");
95630f7dafSArtem Dergachev     VD = cast<VarDecl>(PD->getSingleDecl());
9622b4164eSYury Gribov     RHS = VD->getAnyInitializer();
9722b4164eSYury Gribov   }
9822b4164eSYury Gribov 
9922b4164eSYury Gribov   return std::make_pair(VD, RHS);
10022b4164eSYury Gribov }
1012301c5abSGeorge Karpenkov 
getNullabilityAnnotation(QualType Type)1022301c5abSGeorge Karpenkov Nullability getNullabilityAnnotation(QualType Type) {
1032301c5abSGeorge Karpenkov   const auto *AttrType = Type->getAs<AttributedType>();
1042301c5abSGeorge Karpenkov   if (!AttrType)
1052301c5abSGeorge Karpenkov     return Nullability::Unspecified;
106e43e2b36SRichard Smith   if (AttrType->getAttrKind() == attr::TypeNullable)
1072301c5abSGeorge Karpenkov     return Nullability::Nullable;
108e43e2b36SRichard Smith   else if (AttrType->getAttrKind() == attr::TypeNonNull)
1092301c5abSGeorge Karpenkov     return Nullability::Nonnull;
1102301c5abSGeorge Karpenkov   return Nullability::Unspecified;
1112301c5abSGeorge Karpenkov }
1122301c5abSGeorge Karpenkov 
tryExpandAsInteger(StringRef Macro,const Preprocessor & PP)113536456a7SGabor Marton llvm::Optional<int> tryExpandAsInteger(StringRef Macro,
114536456a7SGabor Marton                                        const Preprocessor &PP) {
115536456a7SGabor Marton   const auto *MacroII = PP.getIdentifierInfo(Macro);
116536456a7SGabor Marton   if (!MacroII)
117536456a7SGabor Marton     return llvm::None;
118536456a7SGabor Marton   const MacroInfo *MI = PP.getMacroInfo(MacroII);
119536456a7SGabor Marton   if (!MI)
120536456a7SGabor Marton     return llvm::None;
1212301c5abSGeorge Karpenkov 
122536456a7SGabor Marton   // Filter out parens.
123536456a7SGabor Marton   std::vector<Token> FilteredTokens;
124536456a7SGabor Marton   FilteredTokens.reserve(MI->tokens().size());
125536456a7SGabor Marton   for (auto &T : MI->tokens())
126536456a7SGabor Marton     if (!T.isOneOf(tok::l_paren, tok::r_paren))
127536456a7SGabor Marton       FilteredTokens.push_back(T);
128536456a7SGabor Marton 
129536456a7SGabor Marton   // Parse an integer at the end of the macro definition.
130536456a7SGabor Marton   const Token &T = FilteredTokens.back();
13114b947f3SValeriy Savchenko   // FIXME: EOF macro token coming from a PCH file on macOS while marked as
13214b947f3SValeriy Savchenko   //        literal, doesn't contain any literal data
13314b947f3SValeriy Savchenko   if (!T.isLiteral() || !T.getLiteralData())
134536456a7SGabor Marton     return llvm::None;
135536456a7SGabor Marton   StringRef ValueStr = StringRef(T.getLiteralData(), T.getLength());
136536456a7SGabor Marton   llvm::APInt IntValue;
137536456a7SGabor Marton   constexpr unsigned AutoSenseRadix = 0;
138536456a7SGabor Marton   if (ValueStr.getAsInteger(AutoSenseRadix, IntValue))
139536456a7SGabor Marton     return llvm::None;
140536456a7SGabor Marton 
141536456a7SGabor Marton   // Parse an optional minus sign.
142dcc04e09SBalázs Kéri   size_t Size = FilteredTokens.size();
143dcc04e09SBalázs Kéri   if (Size >= 2) {
144dcc04e09SBalázs Kéri     if (FilteredTokens[Size - 2].is(tok::minus))
145536456a7SGabor Marton       IntValue = -IntValue;
146536456a7SGabor Marton   }
147536456a7SGabor Marton 
148536456a7SGabor Marton   return IntValue.getSExtValue();
149536456a7SGabor Marton }
150536456a7SGabor Marton 
operationKindFromOverloadedOperator(OverloadedOperatorKind OOK,bool IsBinary)151*48688257SDeep Majumder OperatorKind operationKindFromOverloadedOperator(OverloadedOperatorKind OOK,
152*48688257SDeep Majumder                                                  bool IsBinary) {
153*48688257SDeep Majumder   llvm::StringMap<BinaryOperatorKind> BinOps{
154*48688257SDeep Majumder #define BINARY_OPERATION(Name, Spelling) {Spelling, BO_##Name},
155*48688257SDeep Majumder #include "clang/AST/OperationKinds.def"
156*48688257SDeep Majumder   };
157*48688257SDeep Majumder   llvm::StringMap<UnaryOperatorKind> UnOps{
158*48688257SDeep Majumder #define UNARY_OPERATION(Name, Spelling) {Spelling, UO_##Name},
159*48688257SDeep Majumder #include "clang/AST/OperationKinds.def"
160*48688257SDeep Majumder   };
161*48688257SDeep Majumder 
162*48688257SDeep Majumder   switch (OOK) {
163*48688257SDeep Majumder #define OVERLOADED_OPERATOR(Name, Spelling, Token, Unary, Binary, MemberOnly)  \
164*48688257SDeep Majumder   case OO_##Name:                                                              \
165*48688257SDeep Majumder     if (IsBinary) {                                                            \
166*48688257SDeep Majumder       auto BinOpIt = BinOps.find(Spelling);                                    \
167*48688257SDeep Majumder       if (BinOpIt != BinOps.end())                                             \
168*48688257SDeep Majumder         return OperatorKind(BinOpIt->second);                                  \
169*48688257SDeep Majumder       else                                                                     \
170*48688257SDeep Majumder         llvm_unreachable("operator was expected to be binary but is not");     \
171*48688257SDeep Majumder     } else {                                                                   \
172*48688257SDeep Majumder       auto UnOpIt = UnOps.find(Spelling);                                      \
173*48688257SDeep Majumder       if (UnOpIt != UnOps.end())                                               \
174*48688257SDeep Majumder         return OperatorKind(UnOpIt->second);                                   \
175*48688257SDeep Majumder       else                                                                     \
176*48688257SDeep Majumder         llvm_unreachable("operator was expected to be unary but is not");      \
177*48688257SDeep Majumder     }                                                                          \
178*48688257SDeep Majumder     break;
179*48688257SDeep Majumder #include "clang/Basic/OperatorKinds.def"
180*48688257SDeep Majumder   default:
181*48688257SDeep Majumder     llvm_unreachable("unexpected operator kind");
182*48688257SDeep Majumder   }
183*48688257SDeep Majumder }
184*48688257SDeep Majumder 
185536456a7SGabor Marton } // namespace ento
186536456a7SGabor Marton } // namespace clang
187