PathDiagnostic.cpp revision dc84cd5efdd3430efb22546b4ac656aa0540b210 
1//===--- PathDiagnostic.cpp - Path-Specific Diagnostic Handling -*- 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 PathDiagnostic-related interfaces.
11//
12//===----------------------------------------------------------------------===//
13
14#include "clang/StaticAnalyzer/Core/BugReporter/PathDiagnostic.h"
15#include "clang/AST/Decl.h"
16#include "clang/AST/DeclCXX.h"
17#include "clang/AST/DeclObjC.h"
18#include "clang/AST/Expr.h"
19#include "clang/AST/ParentMap.h"
20#include "clang/AST/StmtCXX.h"
21#include "clang/Basic/SourceManager.h"
22#include "clang/StaticAnalyzer/Core/PathSensitive/ExplodedGraph.h"
23#include "llvm/ADT/SmallString.h"
24#include "llvm/ADT/StringExtras.h"
25#include "llvm/Support/raw_ostream.h"
26
27using namespace clang;
28using namespace ento;
29
30bool PathDiagnosticMacroPiece::containsEvent() const {
31  for (PathPieces::const_iterator I = subPieces.begin(), E = subPieces.end();
32       I!=E; ++I) {
33    if (isa<PathDiagnosticEventPiece>(*I))
34      return true;
35    if (PathDiagnosticMacroPiece *MP = dyn_cast<PathDiagnosticMacroPiece>(*I))
36      if (MP->containsEvent())
37        return true;
38  }
39  return false;
40}
41
42static StringRef StripTrailingDots(StringRef s) {
43  for (StringRef::size_type i = s.size(); i != 0; --i)
44    if (s[i - 1] != '.')
45      return s.substr(0, i);
46  return "";
47}
48
49PathDiagnosticPiece::PathDiagnosticPiece(StringRef s,
50                                         Kind k, DisplayHint hint)
51  : str(StripTrailingDots(s)), kind(k), Hint(hint) {}
52
53PathDiagnosticPiece::PathDiagnosticPiece(Kind k, DisplayHint hint)
54  : kind(k), Hint(hint) {}
55
56PathDiagnosticPiece::~PathDiagnosticPiece() {}
57PathDiagnosticEventPiece::~PathDiagnosticEventPiece() {}
58PathDiagnosticCallPiece::~PathDiagnosticCallPiece() {}
59PathDiagnosticControlFlowPiece::~PathDiagnosticControlFlowPiece() {}
60PathDiagnosticMacroPiece::~PathDiagnosticMacroPiece() {}
61
62
63PathPieces::~PathPieces() {}
64
65void PathPieces::flattenTo(PathPieces &Primary, PathPieces &Current,
66                           bool ShouldFlattenMacros) const {
67  for (PathPieces::const_iterator I = begin(), E = end(); I != E; ++I) {
68    PathDiagnosticPiece *Piece = I->getPtr();
69
70    switch (Piece->getKind()) {
71    case PathDiagnosticPiece::Call: {
72      PathDiagnosticCallPiece *Call = cast<PathDiagnosticCallPiece>(Piece);
73      IntrusiveRefCntPtr<PathDiagnosticEventPiece> CallEnter =
74        Call->getCallEnterEvent();
75      if (CallEnter)
76        Current.push_back(CallEnter);
77      Call->path.flattenTo(Primary, Primary, ShouldFlattenMacros);
78      IntrusiveRefCntPtr<PathDiagnosticEventPiece> callExit =
79        Call->getCallExitEvent();
80      if (callExit)
81        Current.push_back(callExit);
82      break;
83    }
84    case PathDiagnosticPiece::Macro: {
85      PathDiagnosticMacroPiece *Macro = cast<PathDiagnosticMacroPiece>(Piece);
86      if (ShouldFlattenMacros) {
87        Macro->subPieces.flattenTo(Primary, Primary, ShouldFlattenMacros);
88      } else {
89        Current.push_back(Piece);
90        PathPieces NewPath;
91        Macro->subPieces.flattenTo(Primary, NewPath, ShouldFlattenMacros);
92        // FIXME: This probably shouldn't mutate the original path piece.
93        Macro->subPieces = NewPath;
94      }
95      break;
96    }
97    case PathDiagnosticPiece::Event:
98    case PathDiagnosticPiece::ControlFlow:
99      Current.push_back(Piece);
100      break;
101    }
102  }
103}
104
105
106PathDiagnostic::~PathDiagnostic() {}
107
108PathDiagnostic::PathDiagnostic(const Decl *declWithIssue,
109                               StringRef bugtype, StringRef verboseDesc,
110                               StringRef shortDesc, StringRef category,
111                               PathDiagnosticLocation LocationToUnique,
112                               const Decl *DeclToUnique)
113  : DeclWithIssue(declWithIssue),
114    BugType(StripTrailingDots(bugtype)),
115    VerboseDesc(StripTrailingDots(verboseDesc)),
116    ShortDesc(StripTrailingDots(shortDesc)),
117    Category(StripTrailingDots(category)),
118    UniqueingLoc(LocationToUnique),
119    UniqueingDecl(DeclToUnique),
120    path(pathImpl) {}
121
122void PathDiagnosticConsumer::anchor() { }
123
124PathDiagnosticConsumer::~PathDiagnosticConsumer() {
125  // Delete the contents of the FoldingSet if it isn't empty already.
126  for (llvm::FoldingSet<PathDiagnostic>::iterator it =
127       Diags.begin(), et = Diags.end() ; it != et ; ++it) {
128    delete &*it;
129  }
130}
131
132void PathDiagnosticConsumer::HandlePathDiagnostic(PathDiagnostic *D) {
133  OwningPtr<PathDiagnostic> OwningD(D);
134
135  if (!D || D->path.empty())
136    return;
137
138  // We need to flatten the locations (convert Stmt* to locations) because
139  // the referenced statements may be freed by the time the diagnostics
140  // are emitted.
141  D->flattenLocations();
142
143  // If the PathDiagnosticConsumer does not support diagnostics that
144  // cross file boundaries, prune out such diagnostics now.
145  if (!supportsCrossFileDiagnostics()) {
146    // Verify that the entire path is from the same FileID.
147    FileID FID;
148    const SourceManager &SMgr = (*D->path.begin())->getLocation().getManager();
149    SmallVector<const PathPieces *, 5> WorkList;
150    WorkList.push_back(&D->path);
151
152    while (!WorkList.empty()) {
153      const PathPieces &path = *WorkList.back();
154      WorkList.pop_back();
155
156      for (PathPieces::const_iterator I = path.begin(), E = path.end();
157           I != E; ++I) {
158        const PathDiagnosticPiece *piece = I->getPtr();
159        FullSourceLoc L = piece->getLocation().asLocation().getExpansionLoc();
160
161        if (FID.isInvalid()) {
162          FID = SMgr.getFileID(L);
163        } else if (SMgr.getFileID(L) != FID)
164          return; // FIXME: Emit a warning?
165
166        // Check the source ranges.
167        ArrayRef<SourceRange> Ranges = piece->getRanges();
168        for (ArrayRef<SourceRange>::iterator I = Ranges.begin(),
169                                             E = Ranges.end(); I != E; ++I) {
170          SourceLocation L = SMgr.getExpansionLoc(I->getBegin());
171          if (!L.isFileID() || SMgr.getFileID(L) != FID)
172            return; // FIXME: Emit a warning?
173          L = SMgr.getExpansionLoc(I->getEnd());
174          if (!L.isFileID() || SMgr.getFileID(L) != FID)
175            return; // FIXME: Emit a warning?
176        }
177
178        if (const PathDiagnosticCallPiece *call =
179            dyn_cast<PathDiagnosticCallPiece>(piece)) {
180          WorkList.push_back(&call->path);
181        }
182        else if (const PathDiagnosticMacroPiece *macro =
183                 dyn_cast<PathDiagnosticMacroPiece>(piece)) {
184          WorkList.push_back(&macro->subPieces);
185        }
186      }
187    }
188
189    if (FID.isInvalid())
190      return; // FIXME: Emit a warning?
191  }
192
193  // Profile the node to see if we already have something matching it
194  llvm::FoldingSetNodeID profile;
195  D->Profile(profile);
196  void *InsertPos = 0;
197
198  if (PathDiagnostic *orig = Diags.FindNodeOrInsertPos(profile, InsertPos)) {
199    // Keep the PathDiagnostic with the shorter path.
200    // Note, the enclosing routine is called in deterministic order, so the
201    // results will be consistent between runs (no reason to break ties if the
202    // size is the same).
203    const unsigned orig_size = orig->full_size();
204    const unsigned new_size = D->full_size();
205    if (orig_size <= new_size)
206      return;
207
208    assert(orig != D);
209    Diags.RemoveNode(orig);
210    delete orig;
211  }
212
213  Diags.InsertNode(OwningD.take());
214}
215
216static Optional<bool> comparePath(const PathPieces &X, const PathPieces &Y);
217static Optional<bool>
218compareControlFlow(const PathDiagnosticControlFlowPiece &X,
219                   const PathDiagnosticControlFlowPiece &Y) {
220  FullSourceLoc XSL = X.getStartLocation().asLocation();
221  FullSourceLoc YSL = Y.getStartLocation().asLocation();
222  if (XSL != YSL)
223    return XSL.isBeforeInTranslationUnitThan(YSL);
224  FullSourceLoc XEL = X.getEndLocation().asLocation();
225  FullSourceLoc YEL = Y.getEndLocation().asLocation();
226  if (XEL != YEL)
227    return XEL.isBeforeInTranslationUnitThan(YEL);
228  return Optional<bool>();
229}
230
231static Optional<bool> compareMacro(const PathDiagnosticMacroPiece &X,
232                                   const PathDiagnosticMacroPiece &Y) {
233  return comparePath(X.subPieces, Y.subPieces);
234}
235
236static Optional<bool> compareCall(const PathDiagnosticCallPiece &X,
237                                  const PathDiagnosticCallPiece &Y) {
238  FullSourceLoc X_CEL = X.callEnter.asLocation();
239  FullSourceLoc Y_CEL = Y.callEnter.asLocation();
240  if (X_CEL != Y_CEL)
241    return X_CEL.isBeforeInTranslationUnitThan(Y_CEL);
242  FullSourceLoc X_CEWL = X.callEnterWithin.asLocation();
243  FullSourceLoc Y_CEWL = Y.callEnterWithin.asLocation();
244  if (X_CEWL != Y_CEWL)
245    return X_CEWL.isBeforeInTranslationUnitThan(Y_CEWL);
246  FullSourceLoc X_CRL = X.callReturn.asLocation();
247  FullSourceLoc Y_CRL = Y.callReturn.asLocation();
248  if (X_CRL != Y_CRL)
249    return X_CRL.isBeforeInTranslationUnitThan(Y_CRL);
250  return comparePath(X.path, Y.path);
251}
252
253static Optional<bool> comparePiece(const PathDiagnosticPiece &X,
254                                   const PathDiagnosticPiece &Y) {
255  if (X.getKind() != Y.getKind())
256    return X.getKind() < Y.getKind();
257
258  FullSourceLoc XL = X.getLocation().asLocation();
259  FullSourceLoc YL = Y.getLocation().asLocation();
260  if (XL != YL)
261    return XL.isBeforeInTranslationUnitThan(YL);
262
263  if (X.getString() != Y.getString())
264    return X.getString() < Y.getString();
265
266  if (X.getRanges().size() != Y.getRanges().size())
267    return X.getRanges().size() < Y.getRanges().size();
268
269  const SourceManager &SM = XL.getManager();
270
271  for (unsigned i = 0, n = X.getRanges().size(); i < n; ++i) {
272    SourceRange XR = X.getRanges()[i];
273    SourceRange YR = Y.getRanges()[i];
274    if (XR != YR) {
275      if (XR.getBegin() != YR.getBegin())
276        return SM.isBeforeInTranslationUnit(XR.getBegin(), YR.getBegin());
277      return SM.isBeforeInTranslationUnit(XR.getEnd(), YR.getEnd());
278    }
279  }
280
281  switch (X.getKind()) {
282    case clang::ento::PathDiagnosticPiece::ControlFlow:
283      return compareControlFlow(cast<PathDiagnosticControlFlowPiece>(X),
284                                cast<PathDiagnosticControlFlowPiece>(Y));
285    case clang::ento::PathDiagnosticPiece::Event:
286      return Optional<bool>();
287    case clang::ento::PathDiagnosticPiece::Macro:
288      return compareMacro(cast<PathDiagnosticMacroPiece>(X),
289                          cast<PathDiagnosticMacroPiece>(Y));
290    case clang::ento::PathDiagnosticPiece::Call:
291      return compareCall(cast<PathDiagnosticCallPiece>(X),
292                         cast<PathDiagnosticCallPiece>(Y));
293  }
294  llvm_unreachable("all cases handled");
295}
296
297static Optional<bool> comparePath(const PathPieces &X, const PathPieces &Y) {
298  if (X.size() != Y.size())
299    return X.size() < Y.size();
300  for (unsigned i = 0, n = X.size(); i != n; ++i) {
301    Optional<bool> b = comparePiece(*X[i], *Y[i]);
302    if (b.hasValue())
303      return b.getValue();
304  }
305  return Optional<bool>();
306}
307
308static bool compare(const PathDiagnostic &X, const PathDiagnostic &Y) {
309  FullSourceLoc XL = X.getLocation().asLocation();
310  FullSourceLoc YL = Y.getLocation().asLocation();
311  if (XL != YL)
312    return XL.isBeforeInTranslationUnitThan(YL);
313  if (X.getBugType() != Y.getBugType())
314    return X.getBugType() < Y.getBugType();
315  if (X.getCategory() != Y.getCategory())
316    return X.getCategory() < Y.getCategory();
317  if (X.getVerboseDescription() != Y.getVerboseDescription())
318    return X.getVerboseDescription() < Y.getVerboseDescription();
319  if (X.getShortDescription() != Y.getShortDescription())
320    return X.getShortDescription() < Y.getShortDescription();
321  if (X.getDeclWithIssue() != Y.getDeclWithIssue()) {
322    const Decl *XD = X.getDeclWithIssue();
323    if (!XD)
324      return true;
325    const Decl *YD = Y.getDeclWithIssue();
326    if (!YD)
327      return false;
328    SourceLocation XDL = XD->getLocation();
329    SourceLocation YDL = YD->getLocation();
330    if (XDL != YDL) {
331      const SourceManager &SM = XL.getManager();
332      return SM.isBeforeInTranslationUnit(XDL, YDL);
333    }
334  }
335  PathDiagnostic::meta_iterator XI = X.meta_begin(), XE = X.meta_end();
336  PathDiagnostic::meta_iterator YI = Y.meta_begin(), YE = Y.meta_end();
337  if (XE - XI != YE - YI)
338    return (XE - XI) < (YE - YI);
339  for ( ; XI != XE ; ++XI, ++YI) {
340    if (*XI != *YI)
341      return (*XI) < (*YI);
342  }
343  Optional<bool> b = comparePath(X.path, Y.path);
344  assert(b.hasValue());
345  return b.getValue();
346}
347
348namespace {
349struct CompareDiagnostics {
350  // Compare if 'X' is "<" than 'Y'.
351  bool operator()(const PathDiagnostic *X, const PathDiagnostic *Y) const {
352    if (X == Y)
353      return false;
354    return compare(*X, *Y);
355  }
356};
357}
358
359void PathDiagnosticConsumer::FlushDiagnostics(
360                                     PathDiagnosticConsumer::FilesMade *Files) {
361  if (flushed)
362    return;
363
364  flushed = true;
365
366  std::vector<const PathDiagnostic *> BatchDiags;
367  for (llvm::FoldingSet<PathDiagnostic>::iterator it = Diags.begin(),
368       et = Diags.end(); it != et; ++it) {
369    const PathDiagnostic *D = &*it;
370    BatchDiags.push_back(D);
371  }
372
373  // Sort the diagnostics so that they are always emitted in a deterministic
374  // order.
375  if (!BatchDiags.empty())
376    std::sort(BatchDiags.begin(), BatchDiags.end(), CompareDiagnostics());
377
378  FlushDiagnosticsImpl(BatchDiags, Files);
379
380  // Delete the flushed diagnostics.
381  for (std::vector<const PathDiagnostic *>::iterator it = BatchDiags.begin(),
382       et = BatchDiags.end(); it != et; ++it) {
383    const PathDiagnostic *D = *it;
384    delete D;
385  }
386
387  // Clear out the FoldingSet.
388  Diags.clear();
389}
390
391void PathDiagnosticConsumer::FilesMade::addDiagnostic(const PathDiagnostic &PD,
392                                                      StringRef ConsumerName,
393                                                      StringRef FileName) {
394  llvm::FoldingSetNodeID NodeID;
395  NodeID.Add(PD);
396  void *InsertPos;
397  PDFileEntry *Entry = FindNodeOrInsertPos(NodeID, InsertPos);
398  if (!Entry) {
399    Entry = Alloc.Allocate<PDFileEntry>();
400    Entry = new (Entry) PDFileEntry(NodeID);
401    InsertNode(Entry, InsertPos);
402  }
403
404  // Allocate persistent storage for the file name.
405  char *FileName_cstr = (char*) Alloc.Allocate(FileName.size(), 1);
406  memcpy(FileName_cstr, FileName.data(), FileName.size());
407
408  Entry->files.push_back(std::make_pair(ConsumerName,
409                                        StringRef(FileName_cstr,
410                                                  FileName.size())));
411}
412
413PathDiagnosticConsumer::PDFileEntry::ConsumerFiles *
414PathDiagnosticConsumer::FilesMade::getFiles(const PathDiagnostic &PD) {
415  llvm::FoldingSetNodeID NodeID;
416  NodeID.Add(PD);
417  void *InsertPos;
418  PDFileEntry *Entry = FindNodeOrInsertPos(NodeID, InsertPos);
419  if (!Entry)
420    return 0;
421  return &Entry->files;
422}
423
424//===----------------------------------------------------------------------===//
425// PathDiagnosticLocation methods.
426//===----------------------------------------------------------------------===//
427
428static SourceLocation getValidSourceLocation(const Stmt* S,
429                                             LocationOrAnalysisDeclContext LAC,
430                                             bool UseEnd = false) {
431  SourceLocation L = UseEnd ? S->getLocEnd() : S->getLocStart();
432  assert(!LAC.isNull() && "A valid LocationContext or AnalysisDeclContext should "
433                          "be passed to PathDiagnosticLocation upon creation.");
434
435  // S might be a temporary statement that does not have a location in the
436  // source code, so find an enclosing statement and use its location.
437  if (!L.isValid()) {
438
439    AnalysisDeclContext *ADC;
440    if (LAC.is<const LocationContext*>())
441      ADC = LAC.get<const LocationContext*>()->getAnalysisDeclContext();
442    else
443      ADC = LAC.get<AnalysisDeclContext*>();
444
445    ParentMap &PM = ADC->getParentMap();
446
447    const Stmt *Parent = S;
448    do {
449      Parent = PM.getParent(Parent);
450
451      // In rare cases, we have implicit top-level expressions,
452      // such as arguments for implicit member initializers.
453      // In this case, fall back to the start of the body (even if we were
454      // asked for the statement end location).
455      if (!Parent) {
456        const Stmt *Body = ADC->getBody();
457        if (Body)
458          L = Body->getLocStart();
459        else
460          L = ADC->getDecl()->getLocEnd();
461        break;
462      }
463
464      L = UseEnd ? Parent->getLocEnd() : Parent->getLocStart();
465    } while (!L.isValid());
466  }
467
468  return L;
469}
470
471static PathDiagnosticLocation
472getLocationForCaller(const StackFrameContext *SFC,
473                     const LocationContext *CallerCtx,
474                     const SourceManager &SM) {
475  const CFGBlock &Block = *SFC->getCallSiteBlock();
476  CFGElement Source = Block[SFC->getIndex()];
477
478  switch (Source.getKind()) {
479  case CFGElement::Invalid:
480    llvm_unreachable("Invalid CFGElement");
481  case CFGElement::Statement:
482    return PathDiagnosticLocation(cast<CFGStmt>(Source).getStmt(),
483                                  SM, CallerCtx);
484  case CFGElement::Initializer: {
485    const CFGInitializer &Init = cast<CFGInitializer>(Source);
486    return PathDiagnosticLocation(Init.getInitializer()->getInit(),
487                                  SM, CallerCtx);
488  }
489  case CFGElement::AutomaticObjectDtor: {
490    const CFGAutomaticObjDtor &Dtor = cast<CFGAutomaticObjDtor>(Source);
491    return PathDiagnosticLocation::createEnd(Dtor.getTriggerStmt(),
492                                             SM, CallerCtx);
493  }
494  case CFGElement::BaseDtor:
495  case CFGElement::MemberDtor: {
496    const AnalysisDeclContext *CallerInfo = CallerCtx->getAnalysisDeclContext();
497    if (const Stmt *CallerBody = CallerInfo->getBody())
498      return PathDiagnosticLocation::createEnd(CallerBody, SM, CallerCtx);
499    return PathDiagnosticLocation::create(CallerInfo->getDecl(), SM);
500  }
501  case CFGElement::TemporaryDtor:
502    llvm_unreachable("not yet implemented!");
503  }
504
505  llvm_unreachable("Unknown CFGElement kind");
506}
507
508
509PathDiagnosticLocation
510  PathDiagnosticLocation::createBegin(const Decl *D,
511                                      const SourceManager &SM) {
512  return PathDiagnosticLocation(D->getLocStart(), SM, SingleLocK);
513}
514
515PathDiagnosticLocation
516  PathDiagnosticLocation::createBegin(const Stmt *S,
517                                      const SourceManager &SM,
518                                      LocationOrAnalysisDeclContext LAC) {
519  return PathDiagnosticLocation(getValidSourceLocation(S, LAC),
520                                SM, SingleLocK);
521}
522
523
524PathDiagnosticLocation
525PathDiagnosticLocation::createEnd(const Stmt *S,
526                                  const SourceManager &SM,
527                                  LocationOrAnalysisDeclContext LAC) {
528  if (const CompoundStmt *CS = dyn_cast<CompoundStmt>(S))
529    return createEndBrace(CS, SM);
530  return PathDiagnosticLocation(getValidSourceLocation(S, LAC, /*End=*/true),
531                                SM, SingleLocK);
532}
533
534PathDiagnosticLocation
535  PathDiagnosticLocation::createOperatorLoc(const BinaryOperator *BO,
536                                            const SourceManager &SM) {
537  return PathDiagnosticLocation(BO->getOperatorLoc(), SM, SingleLocK);
538}
539
540PathDiagnosticLocation
541  PathDiagnosticLocation::createMemberLoc(const MemberExpr *ME,
542                                          const SourceManager &SM) {
543  return PathDiagnosticLocation(ME->getMemberLoc(), SM, SingleLocK);
544}
545
546PathDiagnosticLocation
547  PathDiagnosticLocation::createBeginBrace(const CompoundStmt *CS,
548                                           const SourceManager &SM) {
549  SourceLocation L = CS->getLBracLoc();
550  return PathDiagnosticLocation(L, SM, SingleLocK);
551}
552
553PathDiagnosticLocation
554  PathDiagnosticLocation::createEndBrace(const CompoundStmt *CS,
555                                         const SourceManager &SM) {
556  SourceLocation L = CS->getRBracLoc();
557  return PathDiagnosticLocation(L, SM, SingleLocK);
558}
559
560PathDiagnosticLocation
561  PathDiagnosticLocation::createDeclBegin(const LocationContext *LC,
562                                          const SourceManager &SM) {
563  // FIXME: Should handle CXXTryStmt if analyser starts supporting C++.
564  if (const CompoundStmt *CS =
565        dyn_cast_or_null<CompoundStmt>(LC->getDecl()->getBody()))
566    if (!CS->body_empty()) {
567      SourceLocation Loc = (*CS->body_begin())->getLocStart();
568      return PathDiagnosticLocation(Loc, SM, SingleLocK);
569    }
570
571  return PathDiagnosticLocation();
572}
573
574PathDiagnosticLocation
575  PathDiagnosticLocation::createDeclEnd(const LocationContext *LC,
576                                        const SourceManager &SM) {
577  SourceLocation L = LC->getDecl()->getBodyRBrace();
578  return PathDiagnosticLocation(L, SM, SingleLocK);
579}
580
581PathDiagnosticLocation
582  PathDiagnosticLocation::create(const ProgramPoint& P,
583                                 const SourceManager &SMng) {
584
585  const Stmt* S = 0;
586  if (const BlockEdge *BE = dyn_cast<BlockEdge>(&P)) {
587    const CFGBlock *BSrc = BE->getSrc();
588    S = BSrc->getTerminatorCondition();
589  }
590  else if (const StmtPoint *SP = dyn_cast<StmtPoint>(&P)) {
591    S = SP->getStmt();
592    if (isa<PostStmtPurgeDeadSymbols>(P))
593      return PathDiagnosticLocation::createEnd(S, SMng, P.getLocationContext());
594  }
595  else if (const PostImplicitCall *PIE = dyn_cast<PostImplicitCall>(&P)) {
596    return PathDiagnosticLocation(PIE->getLocation(), SMng);
597  }
598  else if (const CallEnter *CE = dyn_cast<CallEnter>(&P)) {
599    return getLocationForCaller(CE->getCalleeContext(),
600                                CE->getLocationContext(),
601                                SMng);
602  }
603  else if (const CallExitEnd *CEE = dyn_cast<CallExitEnd>(&P)) {
604    return getLocationForCaller(CEE->getCalleeContext(),
605                                CEE->getLocationContext(),
606                                SMng);
607  }
608  else {
609    llvm_unreachable("Unexpected ProgramPoint");
610  }
611
612  return PathDiagnosticLocation(S, SMng, P.getLocationContext());
613}
614
615PathDiagnosticLocation
616  PathDiagnosticLocation::createEndOfPath(const ExplodedNode* N,
617                                          const SourceManager &SM) {
618  assert(N && "Cannot create a location with a null node.");
619
620  const ExplodedNode *NI = N;
621  const Stmt *S = 0;
622
623  while (NI) {
624    ProgramPoint P = NI->getLocation();
625    if (const StmtPoint *PS = dyn_cast<StmtPoint>(&P)) {
626      S = PS->getStmt();
627      if (isa<PostStmtPurgeDeadSymbols>(P))
628        return PathDiagnosticLocation::createEnd(S, SM,
629                                                 NI->getLocationContext());
630      break;
631    } else if (const BlockEdge *BE = dyn_cast<BlockEdge>(&P)) {
632      S = BE->getSrc()->getTerminator();
633      break;
634    }
635    NI = NI->succ_empty() ? 0 : *(NI->succ_begin());
636  }
637
638  if (S) {
639    const LocationContext *LC = NI->getLocationContext();
640    if (S->getLocStart().isValid())
641      return PathDiagnosticLocation(S, SM, LC);
642    return PathDiagnosticLocation(getValidSourceLocation(S, LC), SM);
643  }
644
645  return createDeclEnd(N->getLocationContext(), SM);
646}
647
648PathDiagnosticLocation PathDiagnosticLocation::createSingleLocation(
649                                           const PathDiagnosticLocation &PDL) {
650  FullSourceLoc L = PDL.asLocation();
651  return PathDiagnosticLocation(L, L.getManager(), SingleLocK);
652}
653
654FullSourceLoc
655  PathDiagnosticLocation::genLocation(SourceLocation L,
656                                      LocationOrAnalysisDeclContext LAC) const {
657  assert(isValid());
658  // Note that we want a 'switch' here so that the compiler can warn us in
659  // case we add more cases.
660  switch (K) {
661    case SingleLocK:
662    case RangeK:
663      break;
664    case StmtK:
665      // Defensive checking.
666      if (!S)
667        break;
668      return FullSourceLoc(getValidSourceLocation(S, LAC),
669                           const_cast<SourceManager&>(*SM));
670    case DeclK:
671      // Defensive checking.
672      if (!D)
673        break;
674      return FullSourceLoc(D->getLocation(), const_cast<SourceManager&>(*SM));
675  }
676
677  return FullSourceLoc(L, const_cast<SourceManager&>(*SM));
678}
679
680PathDiagnosticRange
681  PathDiagnosticLocation::genRange(LocationOrAnalysisDeclContext LAC) const {
682  assert(isValid());
683  // Note that we want a 'switch' here so that the compiler can warn us in
684  // case we add more cases.
685  switch (K) {
686    case SingleLocK:
687      return PathDiagnosticRange(SourceRange(Loc,Loc), true);
688    case RangeK:
689      break;
690    case StmtK: {
691      const Stmt *S = asStmt();
692      switch (S->getStmtClass()) {
693        default:
694          break;
695        case Stmt::DeclStmtClass: {
696          const DeclStmt *DS = cast<DeclStmt>(S);
697          if (DS->isSingleDecl()) {
698            // Should always be the case, but we'll be defensive.
699            return SourceRange(DS->getLocStart(),
700                               DS->getSingleDecl()->getLocation());
701          }
702          break;
703        }
704          // FIXME: Provide better range information for different
705          //  terminators.
706        case Stmt::IfStmtClass:
707        case Stmt::WhileStmtClass:
708        case Stmt::DoStmtClass:
709        case Stmt::ForStmtClass:
710        case Stmt::ChooseExprClass:
711        case Stmt::IndirectGotoStmtClass:
712        case Stmt::SwitchStmtClass:
713        case Stmt::BinaryConditionalOperatorClass:
714        case Stmt::ConditionalOperatorClass:
715        case Stmt::ObjCForCollectionStmtClass: {
716          SourceLocation L = getValidSourceLocation(S, LAC);
717          return SourceRange(L, L);
718        }
719      }
720      SourceRange R = S->getSourceRange();
721      if (R.isValid())
722        return R;
723      break;
724    }
725    case DeclK:
726      if (const ObjCMethodDecl *MD = dyn_cast<ObjCMethodDecl>(D))
727        return MD->getSourceRange();
728      if (const FunctionDecl *FD = dyn_cast<FunctionDecl>(D)) {
729        if (Stmt *Body = FD->getBody())
730          return Body->getSourceRange();
731      }
732      else {
733        SourceLocation L = D->getLocation();
734        return PathDiagnosticRange(SourceRange(L, L), true);
735      }
736  }
737
738  return SourceRange(Loc,Loc);
739}
740
741void PathDiagnosticLocation::flatten() {
742  if (K == StmtK) {
743    K = RangeK;
744    S = 0;
745    D = 0;
746  }
747  else if (K == DeclK) {
748    K = SingleLocK;
749    S = 0;
750    D = 0;
751  }
752}
753
754//===----------------------------------------------------------------------===//
755// Manipulation of PathDiagnosticCallPieces.
756//===----------------------------------------------------------------------===//
757
758PathDiagnosticCallPiece *
759PathDiagnosticCallPiece::construct(const ExplodedNode *N,
760                                   const CallExitEnd &CE,
761                                   const SourceManager &SM) {
762  const Decl *caller = CE.getLocationContext()->getDecl();
763  PathDiagnosticLocation pos = getLocationForCaller(CE.getCalleeContext(),
764                                                    CE.getLocationContext(),
765                                                    SM);
766  return new PathDiagnosticCallPiece(caller, pos);
767}
768
769PathDiagnosticCallPiece *
770PathDiagnosticCallPiece::construct(PathPieces &path,
771                                   const Decl *caller) {
772  PathDiagnosticCallPiece *C = new PathDiagnosticCallPiece(path, caller);
773  path.clear();
774  path.push_front(C);
775  return C;
776}
777
778void PathDiagnosticCallPiece::setCallee(const CallEnter &CE,
779                                        const SourceManager &SM) {
780  const StackFrameContext *CalleeCtx = CE.getCalleeContext();
781  Callee = CalleeCtx->getDecl();
782
783  callEnterWithin = PathDiagnosticLocation::createBegin(Callee, SM);
784  callEnter = getLocationForCaller(CalleeCtx, CE.getLocationContext(), SM);
785}
786
787static inline void describeClass(raw_ostream &Out, const CXXRecordDecl *D,
788                                 StringRef Prefix = StringRef()) {
789  if (!D->getIdentifier())
790    return;
791  Out << Prefix << '\'' << *D << '\'';
792}
793
794static bool describeCodeDecl(raw_ostream &Out, const Decl *D,
795                             bool ExtendedDescription,
796                             StringRef Prefix = StringRef()) {
797  if (!D)
798    return false;
799
800  if (isa<BlockDecl>(D)) {
801    if (ExtendedDescription)
802      Out << Prefix << "anonymous block";
803    return ExtendedDescription;
804  }
805
806  if (const CXXMethodDecl *MD = dyn_cast<CXXMethodDecl>(D)) {
807    Out << Prefix;
808    if (ExtendedDescription && !MD->isUserProvided()) {
809      if (MD->isExplicitlyDefaulted())
810        Out << "defaulted ";
811      else
812        Out << "implicit ";
813    }
814
815    if (const CXXConstructorDecl *CD = dyn_cast<CXXConstructorDecl>(MD)) {
816      if (CD->isDefaultConstructor())
817        Out << "default ";
818      else if (CD->isCopyConstructor())
819        Out << "copy ";
820      else if (CD->isMoveConstructor())
821        Out << "move ";
822
823      Out << "constructor";
824      describeClass(Out, MD->getParent(), " for ");
825
826    } else if (isa<CXXDestructorDecl>(MD)) {
827      if (!MD->isUserProvided()) {
828        Out << "destructor";
829        describeClass(Out, MD->getParent(), " for ");
830      } else {
831        // Use ~Foo for explicitly-written destructors.
832        Out << "'" << *MD << "'";
833      }
834
835    } else if (MD->isCopyAssignmentOperator()) {
836        Out << "copy assignment operator";
837        describeClass(Out, MD->getParent(), " for ");
838
839    } else if (MD->isMoveAssignmentOperator()) {
840        Out << "move assignment operator";
841        describeClass(Out, MD->getParent(), " for ");
842
843    } else {
844      if (MD->getParent()->getIdentifier())
845        Out << "'" << *MD->getParent() << "::" << *MD << "'";
846      else
847        Out << "'" << *MD << "'";
848    }
849
850    return true;
851  }
852
853  Out << Prefix << '\'' << cast<NamedDecl>(*D) << '\'';
854  return true;
855}
856
857IntrusiveRefCntPtr<PathDiagnosticEventPiece>
858PathDiagnosticCallPiece::getCallEnterEvent() const {
859  if (!Callee)
860    return 0;
861
862  SmallString<256> buf;
863  llvm::raw_svector_ostream Out(buf);
864
865  Out << "Calling ";
866  describeCodeDecl(Out, Callee, /*ExtendedDescription=*/true);
867
868  assert(callEnter.asLocation().isValid());
869  return new PathDiagnosticEventPiece(callEnter, Out.str());
870}
871
872IntrusiveRefCntPtr<PathDiagnosticEventPiece>
873PathDiagnosticCallPiece::getCallEnterWithinCallerEvent() const {
874  if (!callEnterWithin.asLocation().isValid())
875    return 0;
876  if (Callee->isImplicit())
877    return 0;
878  if (const CXXMethodDecl *MD = dyn_cast<CXXMethodDecl>(Callee))
879    if (MD->isDefaulted())
880      return 0;
881
882  SmallString<256> buf;
883  llvm::raw_svector_ostream Out(buf);
884
885  Out << "Entered call";
886  describeCodeDecl(Out, Caller, /*ExtendedDescription=*/false, " from ");
887
888  return new PathDiagnosticEventPiece(callEnterWithin, Out.str());
889}
890
891IntrusiveRefCntPtr<PathDiagnosticEventPiece>
892PathDiagnosticCallPiece::getCallExitEvent() const {
893  if (NoExit)
894    return 0;
895
896  SmallString<256> buf;
897  llvm::raw_svector_ostream Out(buf);
898
899  if (!CallStackMessage.empty()) {
900    Out << CallStackMessage;
901  } else {
902    bool DidDescribe = describeCodeDecl(Out, Callee,
903                                        /*ExtendedDescription=*/false,
904                                        "Returning from ");
905    if (!DidDescribe)
906      Out << "Returning to caller";
907  }
908
909  assert(callReturn.asLocation().isValid());
910  return new PathDiagnosticEventPiece(callReturn, Out.str());
911}
912
913static void compute_path_size(const PathPieces &pieces, unsigned &size) {
914  for (PathPieces::const_iterator it = pieces.begin(),
915                                  et = pieces.end(); it != et; ++it) {
916    const PathDiagnosticPiece *piece = it->getPtr();
917    if (const PathDiagnosticCallPiece *cp =
918        dyn_cast<PathDiagnosticCallPiece>(piece)) {
919      compute_path_size(cp->path, size);
920    }
921    else
922      ++size;
923  }
924}
925
926unsigned PathDiagnostic::full_size() {
927  unsigned size = 0;
928  compute_path_size(path, size);
929  return size;
930}
931
932//===----------------------------------------------------------------------===//
933// FoldingSet profiling methods.
934//===----------------------------------------------------------------------===//
935
936void PathDiagnosticLocation::Profile(llvm::FoldingSetNodeID &ID) const {
937  ID.AddInteger(Range.getBegin().getRawEncoding());
938  ID.AddInteger(Range.getEnd().getRawEncoding());
939  ID.AddInteger(Loc.getRawEncoding());
940  return;
941}
942
943void PathDiagnosticPiece::Profile(llvm::FoldingSetNodeID &ID) const {
944  ID.AddInteger((unsigned) getKind());
945  ID.AddString(str);
946  // FIXME: Add profiling support for code hints.
947  ID.AddInteger((unsigned) getDisplayHint());
948  ArrayRef<SourceRange> Ranges = getRanges();
949  for (ArrayRef<SourceRange>::iterator I = Ranges.begin(), E = Ranges.end();
950                                        I != E; ++I) {
951    ID.AddInteger(I->getBegin().getRawEncoding());
952    ID.AddInteger(I->getEnd().getRawEncoding());
953  }
954}
955
956void PathDiagnosticCallPiece::Profile(llvm::FoldingSetNodeID &ID) const {
957  PathDiagnosticPiece::Profile(ID);
958  for (PathPieces::const_iterator it = path.begin(),
959       et = path.end(); it != et; ++it) {
960    ID.Add(**it);
961  }
962}
963
964void PathDiagnosticSpotPiece::Profile(llvm::FoldingSetNodeID &ID) const {
965  PathDiagnosticPiece::Profile(ID);
966  ID.Add(Pos);
967}
968
969void PathDiagnosticControlFlowPiece::Profile(llvm::FoldingSetNodeID &ID) const {
970  PathDiagnosticPiece::Profile(ID);
971  for (const_iterator I = begin(), E = end(); I != E; ++I)
972    ID.Add(*I);
973}
974
975void PathDiagnosticMacroPiece::Profile(llvm::FoldingSetNodeID &ID) const {
976  PathDiagnosticSpotPiece::Profile(ID);
977  for (PathPieces::const_iterator I = subPieces.begin(), E = subPieces.end();
978       I != E; ++I)
979    ID.Add(**I);
980}
981
982void PathDiagnostic::Profile(llvm::FoldingSetNodeID &ID) const {
983  ID.Add(getLocation());
984  ID.AddString(BugType);
985  ID.AddString(VerboseDesc);
986  ID.AddString(Category);
987}
988
989void PathDiagnostic::FullProfile(llvm::FoldingSetNodeID &ID) const {
990  Profile(ID);
991  for (PathPieces::const_iterator I = path.begin(), E = path.end(); I != E; ++I)
992    ID.Add(**I);
993  for (meta_iterator I = meta_begin(), E = meta_end(); I != E; ++I)
994    ID.AddString(*I);
995}
996
997StackHintGenerator::~StackHintGenerator() {}
998
999std::string StackHintGeneratorForSymbol::getMessage(const ExplodedNode *N){
1000  ProgramPoint P = N->getLocation();
1001  const CallExitEnd *CExit = dyn_cast<CallExitEnd>(&P);
1002  assert(CExit && "Stack Hints should be constructed at CallExitEnd points.");
1003
1004  // FIXME: Use CallEvent to abstract this over all calls.
1005  const Stmt *CallSite = CExit->getCalleeContext()->getCallSite();
1006  const CallExpr *CE = dyn_cast_or_null<CallExpr>(CallSite);
1007  if (!CE)
1008    return "";
1009
1010  if (!N)
1011    return getMessageForSymbolNotFound();
1012
1013  // Check if one of the parameters are set to the interesting symbol.
1014  ProgramStateRef State = N->getState();
1015  const LocationContext *LCtx = N->getLocationContext();
1016  unsigned ArgIndex = 0;
1017  for (CallExpr::const_arg_iterator I = CE->arg_begin(),
1018                                    E = CE->arg_end(); I != E; ++I, ++ArgIndex){
1019    SVal SV = State->getSVal(*I, LCtx);
1020
1021    // Check if the variable corresponding to the symbol is passed by value.
1022    SymbolRef AS = SV.getAsLocSymbol();
1023    if (AS == Sym) {
1024      return getMessageForArg(*I, ArgIndex);
1025    }
1026
1027    // Check if the parameter is a pointer to the symbol.
1028    if (Optional<loc::MemRegionVal> Reg = SV.getAs<loc::MemRegionVal>()) {
1029      SVal PSV = State->getSVal(Reg->getRegion());
1030      SymbolRef AS = PSV.getAsLocSymbol();
1031      if (AS == Sym) {
1032        return getMessageForArg(*I, ArgIndex);
1033      }
1034    }
1035  }
1036
1037  // Check if we are returning the interesting symbol.
1038  SVal SV = State->getSVal(CE, LCtx);
1039  SymbolRef RetSym = SV.getAsLocSymbol();
1040  if (RetSym == Sym) {
1041    return getMessageForReturn(CE);
1042  }
1043
1044  return getMessageForSymbolNotFound();
1045}
1046
1047std::string StackHintGeneratorForSymbol::getMessageForArg(const Expr *ArgE,
1048                                                          unsigned ArgIndex) {
1049  // Printed parameters start at 1, not 0.
1050  ++ArgIndex;
1051
1052  SmallString<200> buf;
1053  llvm::raw_svector_ostream os(buf);
1054
1055  os << Msg << " via " << ArgIndex << llvm::getOrdinalSuffix(ArgIndex)
1056     << " parameter";
1057
1058  return os.str();
1059}
1060