CIndex.cpp revision d98114647e16796a976b04af79975b4f0eacf22b
1//===- CIndex.cpp - Clang-C Source Indexing Library -----------------------===// 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 implements the main API hooks in the Clang-C Source Indexing 11// library. 12// 13//===----------------------------------------------------------------------===// 14 15#include "CIndexer.h" 16#include "CXCursor.h" 17#include "CXTranslationUnit.h" 18#include "CXString.h" 19#include "CXType.h" 20#include "CXSourceLocation.h" 21#include "CIndexDiagnostic.h" 22 23#include "clang/Basic/Version.h" 24 25#include "clang/AST/DeclVisitor.h" 26#include "clang/AST/StmtVisitor.h" 27#include "clang/AST/TypeLocVisitor.h" 28#include "clang/Basic/Diagnostic.h" 29#include "clang/Frontend/ASTUnit.h" 30#include "clang/Frontend/CompilerInstance.h" 31#include "clang/Frontend/FrontendDiagnostic.h" 32#include "clang/Lex/Lexer.h" 33#include "clang/Lex/PreprocessingRecord.h" 34#include "clang/Lex/Preprocessor.h" 35#include "llvm/ADT/STLExtras.h" 36#include "llvm/ADT/Optional.h" 37#include "clang/Analysis/Support/SaveAndRestore.h" 38#include "llvm/Support/CrashRecoveryContext.h" 39#include "llvm/Support/PrettyStackTrace.h" 40#include "llvm/Support/MemoryBuffer.h" 41#include "llvm/Support/raw_ostream.h" 42#include "llvm/Support/Timer.h" 43#include "llvm/System/Mutex.h" 44#include "llvm/System/Program.h" 45#include "llvm/System/Signals.h" 46#include "llvm/System/Threading.h" 47#include "llvm/Support/Compiler.h" 48 49using namespace clang; 50using namespace clang::cxcursor; 51using namespace clang::cxstring; 52 53static CXTranslationUnit MakeCXTranslationUnit(ASTUnit *TU) { 54 if (!TU) 55 return 0; 56 CXTranslationUnit D = new CXTranslationUnitImpl(); 57 D->TUData = TU; 58 D->StringPool = createCXStringPool(); 59 return D; 60} 61 62/// \brief The result of comparing two source ranges. 63enum RangeComparisonResult { 64 /// \brief Either the ranges overlap or one of the ranges is invalid. 65 RangeOverlap, 66 67 /// \brief The first range ends before the second range starts. 68 RangeBefore, 69 70 /// \brief The first range starts after the second range ends. 71 RangeAfter 72}; 73 74/// \brief Compare two source ranges to determine their relative position in 75/// the translation unit. 76static RangeComparisonResult RangeCompare(SourceManager &SM, 77 SourceRange R1, 78 SourceRange R2) { 79 assert(R1.isValid() && "First range is invalid?"); 80 assert(R2.isValid() && "Second range is invalid?"); 81 if (R1.getEnd() != R2.getBegin() && 82 SM.isBeforeInTranslationUnit(R1.getEnd(), R2.getBegin())) 83 return RangeBefore; 84 if (R2.getEnd() != R1.getBegin() && 85 SM.isBeforeInTranslationUnit(R2.getEnd(), R1.getBegin())) 86 return RangeAfter; 87 return RangeOverlap; 88} 89 90/// \brief Determine if a source location falls within, before, or after a 91/// a given source range. 92static RangeComparisonResult LocationCompare(SourceManager &SM, 93 SourceLocation L, SourceRange R) { 94 assert(R.isValid() && "First range is invalid?"); 95 assert(L.isValid() && "Second range is invalid?"); 96 if (L == R.getBegin() || L == R.getEnd()) 97 return RangeOverlap; 98 if (SM.isBeforeInTranslationUnit(L, R.getBegin())) 99 return RangeBefore; 100 if (SM.isBeforeInTranslationUnit(R.getEnd(), L)) 101 return RangeAfter; 102 return RangeOverlap; 103} 104 105/// \brief Translate a Clang source range into a CIndex source range. 106/// 107/// Clang internally represents ranges where the end location points to the 108/// start of the token at the end. However, for external clients it is more 109/// useful to have a CXSourceRange be a proper half-open interval. This routine 110/// does the appropriate translation. 111CXSourceRange cxloc::translateSourceRange(const SourceManager &SM, 112 const LangOptions &LangOpts, 113 const CharSourceRange &R) { 114 // We want the last character in this location, so we will adjust the 115 // location accordingly. 116 SourceLocation EndLoc = R.getEnd(); 117 if (EndLoc.isValid() && EndLoc.isMacroID()) 118 EndLoc = SM.getSpellingLoc(EndLoc); 119 if (R.isTokenRange() && !EndLoc.isInvalid() && EndLoc.isFileID()) { 120 unsigned Length = Lexer::MeasureTokenLength(EndLoc, SM, LangOpts); 121 EndLoc = EndLoc.getFileLocWithOffset(Length); 122 } 123 124 CXSourceRange Result = { { (void *)&SM, (void *)&LangOpts }, 125 R.getBegin().getRawEncoding(), 126 EndLoc.getRawEncoding() }; 127 return Result; 128} 129 130//===----------------------------------------------------------------------===// 131// Cursor visitor. 132//===----------------------------------------------------------------------===// 133 134namespace { 135 136class VisitorJob { 137public: 138 enum Kind { DeclVisitKind, StmtVisitKind, MemberExprPartsKind, 139 TypeLocVisitKind, OverloadExprPartsKind, 140 DeclRefExprPartsKind, LabelRefVisitKind, 141 ExplicitTemplateArgsVisitKind, 142 NestedNameSpecifierVisitKind, 143 DeclarationNameInfoVisitKind, 144 MemberRefVisitKind }; 145protected: 146 void *data[3]; 147 CXCursor parent; 148 Kind K; 149 VisitorJob(CXCursor C, Kind k, void *d1, void *d2 = 0, void *d3 = 0) 150 : parent(C), K(k) { 151 data[0] = d1; 152 data[1] = d2; 153 data[2] = d3; 154 } 155public: 156 Kind getKind() const { return K; } 157 const CXCursor &getParent() const { return parent; } 158 static bool classof(VisitorJob *VJ) { return true; } 159}; 160 161typedef llvm::SmallVector<VisitorJob, 10> VisitorWorkList; 162 163// Cursor visitor. 164class CursorVisitor : public DeclVisitor<CursorVisitor, bool>, 165 public TypeLocVisitor<CursorVisitor, bool> 166{ 167 /// \brief The translation unit we are traversing. 168 CXTranslationUnit TU; 169 ASTUnit *AU; 170 171 /// \brief The parent cursor whose children we are traversing. 172 CXCursor Parent; 173 174 /// \brief The declaration that serves at the parent of any statement or 175 /// expression nodes. 176 Decl *StmtParent; 177 178 /// \brief The visitor function. 179 CXCursorVisitor Visitor; 180 181 /// \brief The opaque client data, to be passed along to the visitor. 182 CXClientData ClientData; 183 184 // MaxPCHLevel - the maximum PCH level of declarations that we will pass on 185 // to the visitor. Declarations with a PCH level greater than this value will 186 // be suppressed. 187 unsigned MaxPCHLevel; 188 189 /// \brief When valid, a source range to which the cursor should restrict 190 /// its search. 191 SourceRange RegionOfInterest; 192 193 // FIXME: Eventually remove. This part of a hack to support proper 194 // iteration over all Decls contained lexically within an ObjC container. 195 DeclContext::decl_iterator *DI_current; 196 DeclContext::decl_iterator DE_current; 197 198 // Cache of pre-allocated worklists for data-recursion walk of Stmts. 199 llvm::SmallVector<VisitorWorkList*, 5> WorkListFreeList; 200 llvm::SmallVector<VisitorWorkList*, 5> WorkListCache; 201 202 using DeclVisitor<CursorVisitor, bool>::Visit; 203 using TypeLocVisitor<CursorVisitor, bool>::Visit; 204 205 /// \brief Determine whether this particular source range comes before, comes 206 /// after, or overlaps the region of interest. 207 /// 208 /// \param R a half-open source range retrieved from the abstract syntax tree. 209 RangeComparisonResult CompareRegionOfInterest(SourceRange R); 210 211 class SetParentRAII { 212 CXCursor &Parent; 213 Decl *&StmtParent; 214 CXCursor OldParent; 215 216 public: 217 SetParentRAII(CXCursor &Parent, Decl *&StmtParent, CXCursor NewParent) 218 : Parent(Parent), StmtParent(StmtParent), OldParent(Parent) 219 { 220 Parent = NewParent; 221 if (clang_isDeclaration(Parent.kind)) 222 StmtParent = getCursorDecl(Parent); 223 } 224 225 ~SetParentRAII() { 226 Parent = OldParent; 227 if (clang_isDeclaration(Parent.kind)) 228 StmtParent = getCursorDecl(Parent); 229 } 230 }; 231 232public: 233 CursorVisitor(CXTranslationUnit TU, CXCursorVisitor Visitor, 234 CXClientData ClientData, 235 unsigned MaxPCHLevel, 236 SourceRange RegionOfInterest = SourceRange()) 237 : TU(TU), AU(static_cast<ASTUnit*>(TU->TUData)), 238 Visitor(Visitor), ClientData(ClientData), 239 MaxPCHLevel(MaxPCHLevel), RegionOfInterest(RegionOfInterest), 240 DI_current(0) 241 { 242 Parent.kind = CXCursor_NoDeclFound; 243 Parent.data[0] = 0; 244 Parent.data[1] = 0; 245 Parent.data[2] = 0; 246 StmtParent = 0; 247 } 248 249 ~CursorVisitor() { 250 // Free the pre-allocated worklists for data-recursion. 251 for (llvm::SmallVectorImpl<VisitorWorkList*>::iterator 252 I = WorkListCache.begin(), E = WorkListCache.end(); I != E; ++I) { 253 delete *I; 254 } 255 } 256 257 ASTUnit *getASTUnit() const { return static_cast<ASTUnit*>(TU->TUData); } 258 CXTranslationUnit getTU() const { return TU; } 259 260 bool Visit(CXCursor Cursor, bool CheckedRegionOfInterest = false); 261 262 std::pair<PreprocessingRecord::iterator, PreprocessingRecord::iterator> 263 getPreprocessedEntities(); 264 265 bool VisitChildren(CXCursor Parent); 266 267 // Declaration visitors 268 bool VisitAttributes(Decl *D); 269 bool VisitBlockDecl(BlockDecl *B); 270 bool VisitCXXRecordDecl(CXXRecordDecl *D); 271 llvm::Optional<bool> shouldVisitCursor(CXCursor C); 272 bool VisitDeclContext(DeclContext *DC); 273 bool VisitTranslationUnitDecl(TranslationUnitDecl *D); 274 bool VisitTypedefDecl(TypedefDecl *D); 275 bool VisitTagDecl(TagDecl *D); 276 bool VisitClassTemplateSpecializationDecl(ClassTemplateSpecializationDecl *D); 277 bool VisitClassTemplatePartialSpecializationDecl( 278 ClassTemplatePartialSpecializationDecl *D); 279 bool VisitTemplateTypeParmDecl(TemplateTypeParmDecl *D); 280 bool VisitEnumConstantDecl(EnumConstantDecl *D); 281 bool VisitDeclaratorDecl(DeclaratorDecl *DD); 282 bool VisitFunctionDecl(FunctionDecl *ND); 283 bool VisitFieldDecl(FieldDecl *D); 284 bool VisitVarDecl(VarDecl *); 285 bool VisitNonTypeTemplateParmDecl(NonTypeTemplateParmDecl *D); 286 bool VisitFunctionTemplateDecl(FunctionTemplateDecl *D); 287 bool VisitClassTemplateDecl(ClassTemplateDecl *D); 288 bool VisitTemplateTemplateParmDecl(TemplateTemplateParmDecl *D); 289 bool VisitObjCMethodDecl(ObjCMethodDecl *ND); 290 bool VisitObjCContainerDecl(ObjCContainerDecl *D); 291 bool VisitObjCCategoryDecl(ObjCCategoryDecl *ND); 292 bool VisitObjCProtocolDecl(ObjCProtocolDecl *PID); 293 bool VisitObjCPropertyDecl(ObjCPropertyDecl *PD); 294 bool VisitObjCInterfaceDecl(ObjCInterfaceDecl *D); 295 bool VisitObjCImplDecl(ObjCImplDecl *D); 296 bool VisitObjCCategoryImplDecl(ObjCCategoryImplDecl *D); 297 bool VisitObjCImplementationDecl(ObjCImplementationDecl *D); 298 // FIXME: ObjCCompatibleAliasDecl requires aliased-class locations. 299 bool VisitObjCForwardProtocolDecl(ObjCForwardProtocolDecl *D); 300 bool VisitObjCClassDecl(ObjCClassDecl *D); 301 bool VisitObjCPropertyImplDecl(ObjCPropertyImplDecl *PD); 302 bool VisitLinkageSpecDecl(LinkageSpecDecl *D); 303 bool VisitNamespaceDecl(NamespaceDecl *D); 304 bool VisitNamespaceAliasDecl(NamespaceAliasDecl *D); 305 bool VisitUsingDirectiveDecl(UsingDirectiveDecl *D); 306 bool VisitUsingDecl(UsingDecl *D); 307 bool VisitUnresolvedUsingValueDecl(UnresolvedUsingValueDecl *D); 308 bool VisitUnresolvedUsingTypenameDecl(UnresolvedUsingTypenameDecl *D); 309 310 // Name visitor 311 bool VisitDeclarationNameInfo(DeclarationNameInfo Name); 312 bool VisitNestedNameSpecifier(NestedNameSpecifier *NNS, SourceRange Range); 313 314 // Template visitors 315 bool VisitTemplateParameters(const TemplateParameterList *Params); 316 bool VisitTemplateName(TemplateName Name, SourceLocation Loc); 317 bool VisitTemplateArgumentLoc(const TemplateArgumentLoc &TAL); 318 319 // Type visitors 320 bool VisitQualifiedTypeLoc(QualifiedTypeLoc TL); 321 bool VisitBuiltinTypeLoc(BuiltinTypeLoc TL); 322 bool VisitTypedefTypeLoc(TypedefTypeLoc TL); 323 bool VisitUnresolvedUsingTypeLoc(UnresolvedUsingTypeLoc TL); 324 bool VisitTagTypeLoc(TagTypeLoc TL); 325 bool VisitTemplateTypeParmTypeLoc(TemplateTypeParmTypeLoc TL); 326 bool VisitObjCInterfaceTypeLoc(ObjCInterfaceTypeLoc TL); 327 bool VisitObjCObjectTypeLoc(ObjCObjectTypeLoc TL); 328 bool VisitObjCObjectPointerTypeLoc(ObjCObjectPointerTypeLoc TL); 329 bool VisitPointerTypeLoc(PointerTypeLoc TL); 330 bool VisitBlockPointerTypeLoc(BlockPointerTypeLoc TL); 331 bool VisitMemberPointerTypeLoc(MemberPointerTypeLoc TL); 332 bool VisitLValueReferenceTypeLoc(LValueReferenceTypeLoc TL); 333 bool VisitRValueReferenceTypeLoc(RValueReferenceTypeLoc TL); 334 bool VisitFunctionTypeLoc(FunctionTypeLoc TL, bool SkipResultType = false); 335 bool VisitArrayTypeLoc(ArrayTypeLoc TL); 336 bool VisitTemplateSpecializationTypeLoc(TemplateSpecializationTypeLoc TL); 337 // FIXME: Implement visitors here when the unimplemented TypeLocs get 338 // implemented 339 bool VisitTypeOfExprTypeLoc(TypeOfExprTypeLoc TL); 340 bool VisitTypeOfTypeLoc(TypeOfTypeLoc TL); 341 342 // Data-recursive visitor functions. 343 bool IsInRegionOfInterest(CXCursor C); 344 bool RunVisitorWorkList(VisitorWorkList &WL); 345 void EnqueueWorkList(VisitorWorkList &WL, Stmt *S); 346 LLVM_ATTRIBUTE_NOINLINE bool Visit(Stmt *S); 347}; 348 349} // end anonymous namespace 350 351static SourceRange getRawCursorExtent(CXCursor C); 352static SourceRange getFullCursorExtent(CXCursor C, SourceManager &SrcMgr); 353 354 355RangeComparisonResult CursorVisitor::CompareRegionOfInterest(SourceRange R) { 356 return RangeCompare(AU->getSourceManager(), R, RegionOfInterest); 357} 358 359/// \brief Visit the given cursor and, if requested by the visitor, 360/// its children. 361/// 362/// \param Cursor the cursor to visit. 363/// 364/// \param CheckRegionOfInterest if true, then the caller already checked that 365/// this cursor is within the region of interest. 366/// 367/// \returns true if the visitation should be aborted, false if it 368/// should continue. 369bool CursorVisitor::Visit(CXCursor Cursor, bool CheckedRegionOfInterest) { 370 if (clang_isInvalid(Cursor.kind)) 371 return false; 372 373 if (clang_isDeclaration(Cursor.kind)) { 374 Decl *D = getCursorDecl(Cursor); 375 assert(D && "Invalid declaration cursor"); 376 if (D->getPCHLevel() > MaxPCHLevel) 377 return false; 378 379 if (D->isImplicit()) 380 return false; 381 } 382 383 // If we have a range of interest, and this cursor doesn't intersect with it, 384 // we're done. 385 if (RegionOfInterest.isValid() && !CheckedRegionOfInterest) { 386 SourceRange Range = getRawCursorExtent(Cursor); 387 if (Range.isInvalid() || CompareRegionOfInterest(Range)) 388 return false; 389 } 390 391 switch (Visitor(Cursor, Parent, ClientData)) { 392 case CXChildVisit_Break: 393 return true; 394 395 case CXChildVisit_Continue: 396 return false; 397 398 case CXChildVisit_Recurse: 399 return VisitChildren(Cursor); 400 } 401 402 return false; 403} 404 405std::pair<PreprocessingRecord::iterator, PreprocessingRecord::iterator> 406CursorVisitor::getPreprocessedEntities() { 407 PreprocessingRecord &PPRec 408 = *AU->getPreprocessor().getPreprocessingRecord(); 409 410 bool OnlyLocalDecls 411 = !AU->isMainFileAST() && AU->getOnlyLocalDecls(); 412 413 // There is no region of interest; we have to walk everything. 414 if (RegionOfInterest.isInvalid()) 415 return std::make_pair(PPRec.begin(OnlyLocalDecls), 416 PPRec.end(OnlyLocalDecls)); 417 418 // Find the file in which the region of interest lands. 419 SourceManager &SM = AU->getSourceManager(); 420 std::pair<FileID, unsigned> Begin 421 = SM.getDecomposedInstantiationLoc(RegionOfInterest.getBegin()); 422 std::pair<FileID, unsigned> End 423 = SM.getDecomposedInstantiationLoc(RegionOfInterest.getEnd()); 424 425 // The region of interest spans files; we have to walk everything. 426 if (Begin.first != End.first) 427 return std::make_pair(PPRec.begin(OnlyLocalDecls), 428 PPRec.end(OnlyLocalDecls)); 429 430 ASTUnit::PreprocessedEntitiesByFileMap &ByFileMap 431 = AU->getPreprocessedEntitiesByFile(); 432 if (ByFileMap.empty()) { 433 // Build the mapping from files to sets of preprocessed entities. 434 for (PreprocessingRecord::iterator E = PPRec.begin(OnlyLocalDecls), 435 EEnd = PPRec.end(OnlyLocalDecls); 436 E != EEnd; ++E) { 437 std::pair<FileID, unsigned> P 438 = SM.getDecomposedInstantiationLoc((*E)->getSourceRange().getBegin()); 439 ByFileMap[P.first].push_back(*E); 440 } 441 } 442 443 return std::make_pair(ByFileMap[Begin.first].begin(), 444 ByFileMap[Begin.first].end()); 445} 446 447/// \brief Visit the children of the given cursor. 448/// 449/// \returns true if the visitation should be aborted, false if it 450/// should continue. 451bool CursorVisitor::VisitChildren(CXCursor Cursor) { 452 if (clang_isReference(Cursor.kind)) { 453 // By definition, references have no children. 454 return false; 455 } 456 457 // Set the Parent field to Cursor, then back to its old value once we're 458 // done. 459 SetParentRAII SetParent(Parent, StmtParent, Cursor); 460 461 if (clang_isDeclaration(Cursor.kind)) { 462 Decl *D = getCursorDecl(Cursor); 463 assert(D && "Invalid declaration cursor"); 464 return VisitAttributes(D) || Visit(D); 465 } 466 467 if (clang_isStatement(Cursor.kind)) 468 return Visit(getCursorStmt(Cursor)); 469 if (clang_isExpression(Cursor.kind)) 470 return Visit(getCursorExpr(Cursor)); 471 472 if (clang_isTranslationUnit(Cursor.kind)) { 473 CXTranslationUnit tu = getCursorTU(Cursor); 474 ASTUnit *CXXUnit = static_cast<ASTUnit*>(tu->TUData); 475 if (!CXXUnit->isMainFileAST() && CXXUnit->getOnlyLocalDecls() && 476 RegionOfInterest.isInvalid()) { 477 for (ASTUnit::top_level_iterator TL = CXXUnit->top_level_begin(), 478 TLEnd = CXXUnit->top_level_end(); 479 TL != TLEnd; ++TL) { 480 if (Visit(MakeCXCursor(*TL, tu), true)) 481 return true; 482 } 483 } else if (VisitDeclContext( 484 CXXUnit->getASTContext().getTranslationUnitDecl())) 485 return true; 486 487 // Walk the preprocessing record. 488 if (CXXUnit->getPreprocessor().getPreprocessingRecord()) { 489 // FIXME: Once we have the ability to deserialize a preprocessing record, 490 // do so. 491 PreprocessingRecord::iterator E, EEnd; 492 for (llvm::tie(E, EEnd) = getPreprocessedEntities(); E != EEnd; ++E) { 493 if (MacroInstantiation *MI = dyn_cast<MacroInstantiation>(*E)) { 494 if (Visit(MakeMacroInstantiationCursor(MI, tu))) 495 return true; 496 497 continue; 498 } 499 500 if (MacroDefinition *MD = dyn_cast<MacroDefinition>(*E)) { 501 if (Visit(MakeMacroDefinitionCursor(MD, tu))) 502 return true; 503 504 continue; 505 } 506 507 if (InclusionDirective *ID = dyn_cast<InclusionDirective>(*E)) { 508 if (Visit(MakeInclusionDirectiveCursor(ID, tu))) 509 return true; 510 511 continue; 512 } 513 } 514 } 515 return false; 516 } 517 518 // Nothing to visit at the moment. 519 return false; 520} 521 522bool CursorVisitor::VisitBlockDecl(BlockDecl *B) { 523 if (Visit(B->getSignatureAsWritten()->getTypeLoc())) 524 return true; 525 526 if (Stmt *Body = B->getBody()) 527 return Visit(MakeCXCursor(Body, StmtParent, TU)); 528 529 return false; 530} 531 532llvm::Optional<bool> CursorVisitor::shouldVisitCursor(CXCursor Cursor) { 533 if (RegionOfInterest.isValid()) { 534 SourceRange Range = getFullCursorExtent(Cursor, AU->getSourceManager()); 535 if (Range.isInvalid()) 536 return llvm::Optional<bool>(); 537 538 switch (CompareRegionOfInterest(Range)) { 539 case RangeBefore: 540 // This declaration comes before the region of interest; skip it. 541 return llvm::Optional<bool>(); 542 543 case RangeAfter: 544 // This declaration comes after the region of interest; we're done. 545 return false; 546 547 case RangeOverlap: 548 // This declaration overlaps the region of interest; visit it. 549 break; 550 } 551 } 552 return true; 553} 554 555bool CursorVisitor::VisitDeclContext(DeclContext *DC) { 556 DeclContext::decl_iterator I = DC->decls_begin(), E = DC->decls_end(); 557 558 // FIXME: Eventually remove. This part of a hack to support proper 559 // iteration over all Decls contained lexically within an ObjC container. 560 SaveAndRestore<DeclContext::decl_iterator*> DI_saved(DI_current, &I); 561 SaveAndRestore<DeclContext::decl_iterator> DE_saved(DE_current, E); 562 563 for ( ; I != E; ++I) { 564 Decl *D = *I; 565 if (D->getLexicalDeclContext() != DC) 566 continue; 567 CXCursor Cursor = MakeCXCursor(D, TU); 568 const llvm::Optional<bool> &V = shouldVisitCursor(Cursor); 569 if (!V.hasValue()) 570 continue; 571 if (!V.getValue()) 572 return false; 573 if (Visit(Cursor, true)) 574 return true; 575 } 576 return false; 577} 578 579bool CursorVisitor::VisitTranslationUnitDecl(TranslationUnitDecl *D) { 580 llvm_unreachable("Translation units are visited directly by Visit()"); 581 return false; 582} 583 584bool CursorVisitor::VisitTypedefDecl(TypedefDecl *D) { 585 if (TypeSourceInfo *TSInfo = D->getTypeSourceInfo()) 586 return Visit(TSInfo->getTypeLoc()); 587 588 return false; 589} 590 591bool CursorVisitor::VisitTagDecl(TagDecl *D) { 592 return VisitDeclContext(D); 593} 594 595bool CursorVisitor::VisitClassTemplateSpecializationDecl( 596 ClassTemplateSpecializationDecl *D) { 597 bool ShouldVisitBody = false; 598 switch (D->getSpecializationKind()) { 599 case TSK_Undeclared: 600 case TSK_ImplicitInstantiation: 601 // Nothing to visit 602 return false; 603 604 case TSK_ExplicitInstantiationDeclaration: 605 case TSK_ExplicitInstantiationDefinition: 606 break; 607 608 case TSK_ExplicitSpecialization: 609 ShouldVisitBody = true; 610 break; 611 } 612 613 // Visit the template arguments used in the specialization. 614 if (TypeSourceInfo *SpecType = D->getTypeAsWritten()) { 615 TypeLoc TL = SpecType->getTypeLoc(); 616 if (TemplateSpecializationTypeLoc *TSTLoc 617 = dyn_cast<TemplateSpecializationTypeLoc>(&TL)) { 618 for (unsigned I = 0, N = TSTLoc->getNumArgs(); I != N; ++I) 619 if (VisitTemplateArgumentLoc(TSTLoc->getArgLoc(I))) 620 return true; 621 } 622 } 623 624 if (ShouldVisitBody && VisitCXXRecordDecl(D)) 625 return true; 626 627 return false; 628} 629 630bool CursorVisitor::VisitClassTemplatePartialSpecializationDecl( 631 ClassTemplatePartialSpecializationDecl *D) { 632 // FIXME: Visit the "outer" template parameter lists on the TagDecl 633 // before visiting these template parameters. 634 if (VisitTemplateParameters(D->getTemplateParameters())) 635 return true; 636 637 // Visit the partial specialization arguments. 638 const TemplateArgumentLoc *TemplateArgs = D->getTemplateArgsAsWritten(); 639 for (unsigned I = 0, N = D->getNumTemplateArgsAsWritten(); I != N; ++I) 640 if (VisitTemplateArgumentLoc(TemplateArgs[I])) 641 return true; 642 643 return VisitCXXRecordDecl(D); 644} 645 646bool CursorVisitor::VisitTemplateTypeParmDecl(TemplateTypeParmDecl *D) { 647 // Visit the default argument. 648 if (D->hasDefaultArgument() && !D->defaultArgumentWasInherited()) 649 if (TypeSourceInfo *DefArg = D->getDefaultArgumentInfo()) 650 if (Visit(DefArg->getTypeLoc())) 651 return true; 652 653 return false; 654} 655 656bool CursorVisitor::VisitEnumConstantDecl(EnumConstantDecl *D) { 657 if (Expr *Init = D->getInitExpr()) 658 return Visit(MakeCXCursor(Init, StmtParent, TU)); 659 return false; 660} 661 662bool CursorVisitor::VisitDeclaratorDecl(DeclaratorDecl *DD) { 663 if (TypeSourceInfo *TSInfo = DD->getTypeSourceInfo()) 664 if (Visit(TSInfo->getTypeLoc())) 665 return true; 666 667 return false; 668} 669 670/// \brief Compare two base or member initializers based on their source order. 671static int CompareCXXBaseOrMemberInitializers(const void* Xp, const void *Yp) { 672 CXXBaseOrMemberInitializer const * const *X 673 = static_cast<CXXBaseOrMemberInitializer const * const *>(Xp); 674 CXXBaseOrMemberInitializer const * const *Y 675 = static_cast<CXXBaseOrMemberInitializer const * const *>(Yp); 676 677 if ((*X)->getSourceOrder() < (*Y)->getSourceOrder()) 678 return -1; 679 else if ((*X)->getSourceOrder() > (*Y)->getSourceOrder()) 680 return 1; 681 else 682 return 0; 683} 684 685bool CursorVisitor::VisitFunctionDecl(FunctionDecl *ND) { 686 if (TypeSourceInfo *TSInfo = ND->getTypeSourceInfo()) { 687 // Visit the function declaration's syntactic components in the order 688 // written. This requires a bit of work. 689 TypeLoc TL = TSInfo->getTypeLoc(); 690 FunctionTypeLoc *FTL = dyn_cast<FunctionTypeLoc>(&TL); 691 692 // If we have a function declared directly (without the use of a typedef), 693 // visit just the return type. Otherwise, just visit the function's type 694 // now. 695 if ((FTL && !isa<CXXConversionDecl>(ND) && Visit(FTL->getResultLoc())) || 696 (!FTL && Visit(TL))) 697 return true; 698 699 // Visit the nested-name-specifier, if present. 700 if (NestedNameSpecifier *Qualifier = ND->getQualifier()) 701 if (VisitNestedNameSpecifier(Qualifier, ND->getQualifierRange())) 702 return true; 703 704 // Visit the declaration name. 705 if (VisitDeclarationNameInfo(ND->getNameInfo())) 706 return true; 707 708 // FIXME: Visit explicitly-specified template arguments! 709 710 // Visit the function parameters, if we have a function type. 711 if (FTL && VisitFunctionTypeLoc(*FTL, true)) 712 return true; 713 714 // FIXME: Attributes? 715 } 716 717 if (ND->isThisDeclarationADefinition()) { 718 if (CXXConstructorDecl *Constructor = dyn_cast<CXXConstructorDecl>(ND)) { 719 // Find the initializers that were written in the source. 720 llvm::SmallVector<CXXBaseOrMemberInitializer *, 4> WrittenInits; 721 for (CXXConstructorDecl::init_iterator I = Constructor->init_begin(), 722 IEnd = Constructor->init_end(); 723 I != IEnd; ++I) { 724 if (!(*I)->isWritten()) 725 continue; 726 727 WrittenInits.push_back(*I); 728 } 729 730 // Sort the initializers in source order 731 llvm::array_pod_sort(WrittenInits.begin(), WrittenInits.end(), 732 &CompareCXXBaseOrMemberInitializers); 733 734 // Visit the initializers in source order 735 for (unsigned I = 0, N = WrittenInits.size(); I != N; ++I) { 736 CXXBaseOrMemberInitializer *Init = WrittenInits[I]; 737 if (Init->isMemberInitializer()) { 738 if (Visit(MakeCursorMemberRef(Init->getMember(), 739 Init->getMemberLocation(), TU))) 740 return true; 741 } else if (TypeSourceInfo *BaseInfo = Init->getBaseClassInfo()) { 742 if (Visit(BaseInfo->getTypeLoc())) 743 return true; 744 } 745 746 // Visit the initializer value. 747 if (Expr *Initializer = Init->getInit()) 748 if (Visit(MakeCXCursor(Initializer, ND, TU))) 749 return true; 750 } 751 } 752 753 if (Visit(MakeCXCursor(ND->getBody(), StmtParent, TU))) 754 return true; 755 } 756 757 return false; 758} 759 760bool CursorVisitor::VisitFieldDecl(FieldDecl *D) { 761 if (VisitDeclaratorDecl(D)) 762 return true; 763 764 if (Expr *BitWidth = D->getBitWidth()) 765 return Visit(MakeCXCursor(BitWidth, StmtParent, TU)); 766 767 return false; 768} 769 770bool CursorVisitor::VisitVarDecl(VarDecl *D) { 771 if (VisitDeclaratorDecl(D)) 772 return true; 773 774 if (Expr *Init = D->getInit()) 775 return Visit(MakeCXCursor(Init, StmtParent, TU)); 776 777 return false; 778} 779 780bool CursorVisitor::VisitNonTypeTemplateParmDecl(NonTypeTemplateParmDecl *D) { 781 if (VisitDeclaratorDecl(D)) 782 return true; 783 784 if (D->hasDefaultArgument() && !D->defaultArgumentWasInherited()) 785 if (Expr *DefArg = D->getDefaultArgument()) 786 return Visit(MakeCXCursor(DefArg, StmtParent, TU)); 787 788 return false; 789} 790 791bool CursorVisitor::VisitFunctionTemplateDecl(FunctionTemplateDecl *D) { 792 // FIXME: Visit the "outer" template parameter lists on the FunctionDecl 793 // before visiting these template parameters. 794 if (VisitTemplateParameters(D->getTemplateParameters())) 795 return true; 796 797 return VisitFunctionDecl(D->getTemplatedDecl()); 798} 799 800bool CursorVisitor::VisitClassTemplateDecl(ClassTemplateDecl *D) { 801 // FIXME: Visit the "outer" template parameter lists on the TagDecl 802 // before visiting these template parameters. 803 if (VisitTemplateParameters(D->getTemplateParameters())) 804 return true; 805 806 return VisitCXXRecordDecl(D->getTemplatedDecl()); 807} 808 809bool CursorVisitor::VisitTemplateTemplateParmDecl(TemplateTemplateParmDecl *D) { 810 if (VisitTemplateParameters(D->getTemplateParameters())) 811 return true; 812 813 if (D->hasDefaultArgument() && !D->defaultArgumentWasInherited() && 814 VisitTemplateArgumentLoc(D->getDefaultArgument())) 815 return true; 816 817 return false; 818} 819 820bool CursorVisitor::VisitObjCMethodDecl(ObjCMethodDecl *ND) { 821 if (TypeSourceInfo *TSInfo = ND->getResultTypeSourceInfo()) 822 if (Visit(TSInfo->getTypeLoc())) 823 return true; 824 825 for (ObjCMethodDecl::param_iterator P = ND->param_begin(), 826 PEnd = ND->param_end(); 827 P != PEnd; ++P) { 828 if (Visit(MakeCXCursor(*P, TU))) 829 return true; 830 } 831 832 if (ND->isThisDeclarationADefinition() && 833 Visit(MakeCXCursor(ND->getBody(), StmtParent, TU))) 834 return true; 835 836 return false; 837} 838 839namespace { 840 struct ContainerDeclsSort { 841 SourceManager &SM; 842 ContainerDeclsSort(SourceManager &sm) : SM(sm) {} 843 bool operator()(Decl *A, Decl *B) { 844 SourceLocation L_A = A->getLocStart(); 845 SourceLocation L_B = B->getLocStart(); 846 assert(L_A.isValid() && L_B.isValid()); 847 return SM.isBeforeInTranslationUnit(L_A, L_B); 848 } 849 }; 850} 851 852bool CursorVisitor::VisitObjCContainerDecl(ObjCContainerDecl *D) { 853 // FIXME: Eventually convert back to just 'VisitDeclContext()'. Essentially 854 // an @implementation can lexically contain Decls that are not properly 855 // nested in the AST. When we identify such cases, we need to retrofit 856 // this nesting here. 857 if (!DI_current) 858 return VisitDeclContext(D); 859 860 // Scan the Decls that immediately come after the container 861 // in the current DeclContext. If any fall within the 862 // container's lexical region, stash them into a vector 863 // for later processing. 864 llvm::SmallVector<Decl *, 24> DeclsInContainer; 865 SourceLocation EndLoc = D->getSourceRange().getEnd(); 866 SourceManager &SM = AU->getSourceManager(); 867 if (EndLoc.isValid()) { 868 DeclContext::decl_iterator next = *DI_current; 869 while (++next != DE_current) { 870 Decl *D_next = *next; 871 if (!D_next) 872 break; 873 SourceLocation L = D_next->getLocStart(); 874 if (!L.isValid()) 875 break; 876 if (SM.isBeforeInTranslationUnit(L, EndLoc)) { 877 *DI_current = next; 878 DeclsInContainer.push_back(D_next); 879 continue; 880 } 881 break; 882 } 883 } 884 885 // The common case. 886 if (DeclsInContainer.empty()) 887 return VisitDeclContext(D); 888 889 // Get all the Decls in the DeclContext, and sort them with the 890 // additional ones we've collected. Then visit them. 891 for (DeclContext::decl_iterator I = D->decls_begin(), E = D->decls_end(); 892 I!=E; ++I) { 893 Decl *subDecl = *I; 894 if (!subDecl || subDecl->getLexicalDeclContext() != D || 895 subDecl->getLocStart().isInvalid()) 896 continue; 897 DeclsInContainer.push_back(subDecl); 898 } 899 900 // Now sort the Decls so that they appear in lexical order. 901 std::sort(DeclsInContainer.begin(), DeclsInContainer.end(), 902 ContainerDeclsSort(SM)); 903 904 // Now visit the decls. 905 for (llvm::SmallVectorImpl<Decl*>::iterator I = DeclsInContainer.begin(), 906 E = DeclsInContainer.end(); I != E; ++I) { 907 CXCursor Cursor = MakeCXCursor(*I, TU); 908 const llvm::Optional<bool> &V = shouldVisitCursor(Cursor); 909 if (!V.hasValue()) 910 continue; 911 if (!V.getValue()) 912 return false; 913 if (Visit(Cursor, true)) 914 return true; 915 } 916 return false; 917} 918 919bool CursorVisitor::VisitObjCCategoryDecl(ObjCCategoryDecl *ND) { 920 if (Visit(MakeCursorObjCClassRef(ND->getClassInterface(), ND->getLocation(), 921 TU))) 922 return true; 923 924 ObjCCategoryDecl::protocol_loc_iterator PL = ND->protocol_loc_begin(); 925 for (ObjCCategoryDecl::protocol_iterator I = ND->protocol_begin(), 926 E = ND->protocol_end(); I != E; ++I, ++PL) 927 if (Visit(MakeCursorObjCProtocolRef(*I, *PL, TU))) 928 return true; 929 930 return VisitObjCContainerDecl(ND); 931} 932 933bool CursorVisitor::VisitObjCProtocolDecl(ObjCProtocolDecl *PID) { 934 ObjCProtocolDecl::protocol_loc_iterator PL = PID->protocol_loc_begin(); 935 for (ObjCProtocolDecl::protocol_iterator I = PID->protocol_begin(), 936 E = PID->protocol_end(); I != E; ++I, ++PL) 937 if (Visit(MakeCursorObjCProtocolRef(*I, *PL, TU))) 938 return true; 939 940 return VisitObjCContainerDecl(PID); 941} 942 943bool CursorVisitor::VisitObjCPropertyDecl(ObjCPropertyDecl *PD) { 944 if (PD->getTypeSourceInfo() && Visit(PD->getTypeSourceInfo()->getTypeLoc())) 945 return true; 946 947 // FIXME: This implements a workaround with @property declarations also being 948 // installed in the DeclContext for the @interface. Eventually this code 949 // should be removed. 950 ObjCCategoryDecl *CDecl = dyn_cast<ObjCCategoryDecl>(PD->getDeclContext()); 951 if (!CDecl || !CDecl->IsClassExtension()) 952 return false; 953 954 ObjCInterfaceDecl *ID = CDecl->getClassInterface(); 955 if (!ID) 956 return false; 957 958 IdentifierInfo *PropertyId = PD->getIdentifier(); 959 ObjCPropertyDecl *prevDecl = 960 ObjCPropertyDecl::findPropertyDecl(cast<DeclContext>(ID), PropertyId); 961 962 if (!prevDecl) 963 return false; 964 965 // Visit synthesized methods since they will be skipped when visiting 966 // the @interface. 967 if (ObjCMethodDecl *MD = prevDecl->getGetterMethodDecl()) 968 if (MD->isSynthesized() && MD->getLexicalDeclContext() == CDecl) 969 if (Visit(MakeCXCursor(MD, TU))) 970 return true; 971 972 if (ObjCMethodDecl *MD = prevDecl->getSetterMethodDecl()) 973 if (MD->isSynthesized() && MD->getLexicalDeclContext() == CDecl) 974 if (Visit(MakeCXCursor(MD, TU))) 975 return true; 976 977 return false; 978} 979 980bool CursorVisitor::VisitObjCInterfaceDecl(ObjCInterfaceDecl *D) { 981 // Issue callbacks for super class. 982 if (D->getSuperClass() && 983 Visit(MakeCursorObjCSuperClassRef(D->getSuperClass(), 984 D->getSuperClassLoc(), 985 TU))) 986 return true; 987 988 ObjCInterfaceDecl::protocol_loc_iterator PL = D->protocol_loc_begin(); 989 for (ObjCInterfaceDecl::protocol_iterator I = D->protocol_begin(), 990 E = D->protocol_end(); I != E; ++I, ++PL) 991 if (Visit(MakeCursorObjCProtocolRef(*I, *PL, TU))) 992 return true; 993 994 return VisitObjCContainerDecl(D); 995} 996 997bool CursorVisitor::VisitObjCImplDecl(ObjCImplDecl *D) { 998 return VisitObjCContainerDecl(D); 999} 1000 1001bool CursorVisitor::VisitObjCCategoryImplDecl(ObjCCategoryImplDecl *D) { 1002 // 'ID' could be null when dealing with invalid code. 1003 if (ObjCInterfaceDecl *ID = D->getClassInterface()) 1004 if (Visit(MakeCursorObjCClassRef(ID, D->getLocation(), TU))) 1005 return true; 1006 1007 return VisitObjCImplDecl(D); 1008} 1009 1010bool CursorVisitor::VisitObjCImplementationDecl(ObjCImplementationDecl *D) { 1011#if 0 1012 // Issue callbacks for super class. 1013 // FIXME: No source location information! 1014 if (D->getSuperClass() && 1015 Visit(MakeCursorObjCSuperClassRef(D->getSuperClass(), 1016 D->getSuperClassLoc(), 1017 TU))) 1018 return true; 1019#endif 1020 1021 return VisitObjCImplDecl(D); 1022} 1023 1024bool CursorVisitor::VisitObjCForwardProtocolDecl(ObjCForwardProtocolDecl *D) { 1025 ObjCForwardProtocolDecl::protocol_loc_iterator PL = D->protocol_loc_begin(); 1026 for (ObjCForwardProtocolDecl::protocol_iterator I = D->protocol_begin(), 1027 E = D->protocol_end(); 1028 I != E; ++I, ++PL) 1029 if (Visit(MakeCursorObjCProtocolRef(*I, *PL, TU))) 1030 return true; 1031 1032 return false; 1033} 1034 1035bool CursorVisitor::VisitObjCClassDecl(ObjCClassDecl *D) { 1036 for (ObjCClassDecl::iterator C = D->begin(), CEnd = D->end(); C != CEnd; ++C) 1037 if (Visit(MakeCursorObjCClassRef(C->getInterface(), C->getLocation(), TU))) 1038 return true; 1039 1040 return false; 1041} 1042 1043bool CursorVisitor::VisitObjCPropertyImplDecl(ObjCPropertyImplDecl *PD) { 1044 if (ObjCIvarDecl *Ivar = PD->getPropertyIvarDecl()) 1045 return Visit(MakeCursorMemberRef(Ivar, PD->getPropertyIvarDeclLoc(), TU)); 1046 1047 return false; 1048} 1049 1050bool CursorVisitor::VisitNamespaceDecl(NamespaceDecl *D) { 1051 return VisitDeclContext(D); 1052} 1053 1054bool CursorVisitor::VisitNamespaceAliasDecl(NamespaceAliasDecl *D) { 1055 // Visit nested-name-specifier. 1056 if (NestedNameSpecifier *Qualifier = D->getQualifier()) 1057 if (VisitNestedNameSpecifier(Qualifier, D->getQualifierRange())) 1058 return true; 1059 1060 return Visit(MakeCursorNamespaceRef(D->getAliasedNamespace(), 1061 D->getTargetNameLoc(), TU)); 1062} 1063 1064bool CursorVisitor::VisitUsingDecl(UsingDecl *D) { 1065 // Visit nested-name-specifier. 1066 if (NestedNameSpecifier *Qualifier = D->getTargetNestedNameDecl()) 1067 if (VisitNestedNameSpecifier(Qualifier, D->getNestedNameRange())) 1068 return true; 1069 1070 if (Visit(MakeCursorOverloadedDeclRef(D, D->getLocation(), TU))) 1071 return true; 1072 1073 return VisitDeclarationNameInfo(D->getNameInfo()); 1074} 1075 1076bool CursorVisitor::VisitUsingDirectiveDecl(UsingDirectiveDecl *D) { 1077 // Visit nested-name-specifier. 1078 if (NestedNameSpecifier *Qualifier = D->getQualifier()) 1079 if (VisitNestedNameSpecifier(Qualifier, D->getQualifierRange())) 1080 return true; 1081 1082 return Visit(MakeCursorNamespaceRef(D->getNominatedNamespaceAsWritten(), 1083 D->getIdentLocation(), TU)); 1084} 1085 1086bool CursorVisitor::VisitUnresolvedUsingValueDecl(UnresolvedUsingValueDecl *D) { 1087 // Visit nested-name-specifier. 1088 if (NestedNameSpecifier *Qualifier = D->getTargetNestedNameSpecifier()) 1089 if (VisitNestedNameSpecifier(Qualifier, D->getTargetNestedNameRange())) 1090 return true; 1091 1092 return VisitDeclarationNameInfo(D->getNameInfo()); 1093} 1094 1095bool CursorVisitor::VisitUnresolvedUsingTypenameDecl( 1096 UnresolvedUsingTypenameDecl *D) { 1097 // Visit nested-name-specifier. 1098 if (NestedNameSpecifier *Qualifier = D->getTargetNestedNameSpecifier()) 1099 if (VisitNestedNameSpecifier(Qualifier, D->getTargetNestedNameRange())) 1100 return true; 1101 1102 return false; 1103} 1104 1105bool CursorVisitor::VisitDeclarationNameInfo(DeclarationNameInfo Name) { 1106 switch (Name.getName().getNameKind()) { 1107 case clang::DeclarationName::Identifier: 1108 case clang::DeclarationName::CXXLiteralOperatorName: 1109 case clang::DeclarationName::CXXOperatorName: 1110 case clang::DeclarationName::CXXUsingDirective: 1111 return false; 1112 1113 case clang::DeclarationName::CXXConstructorName: 1114 case clang::DeclarationName::CXXDestructorName: 1115 case clang::DeclarationName::CXXConversionFunctionName: 1116 if (TypeSourceInfo *TSInfo = Name.getNamedTypeInfo()) 1117 return Visit(TSInfo->getTypeLoc()); 1118 return false; 1119 1120 case clang::DeclarationName::ObjCZeroArgSelector: 1121 case clang::DeclarationName::ObjCOneArgSelector: 1122 case clang::DeclarationName::ObjCMultiArgSelector: 1123 // FIXME: Per-identifier location info? 1124 return false; 1125 } 1126 1127 return false; 1128} 1129 1130bool CursorVisitor::VisitNestedNameSpecifier(NestedNameSpecifier *NNS, 1131 SourceRange Range) { 1132 // FIXME: This whole routine is a hack to work around the lack of proper 1133 // source information in nested-name-specifiers (PR5791). Since we do have 1134 // a beginning source location, we can visit the first component of the 1135 // nested-name-specifier, if it's a single-token component. 1136 if (!NNS) 1137 return false; 1138 1139 // Get the first component in the nested-name-specifier. 1140 while (NestedNameSpecifier *Prefix = NNS->getPrefix()) 1141 NNS = Prefix; 1142 1143 switch (NNS->getKind()) { 1144 case NestedNameSpecifier::Namespace: 1145 // FIXME: The token at this source location might actually have been a 1146 // namespace alias, but we don't model that. Lame! 1147 return Visit(MakeCursorNamespaceRef(NNS->getAsNamespace(), Range.getBegin(), 1148 TU)); 1149 1150 case NestedNameSpecifier::TypeSpec: { 1151 // If the type has a form where we know that the beginning of the source 1152 // range matches up with a reference cursor. Visit the appropriate reference 1153 // cursor. 1154 Type *T = NNS->getAsType(); 1155 if (const TypedefType *Typedef = dyn_cast<TypedefType>(T)) 1156 return Visit(MakeCursorTypeRef(Typedef->getDecl(), Range.getBegin(), TU)); 1157 if (const TagType *Tag = dyn_cast<TagType>(T)) 1158 return Visit(MakeCursorTypeRef(Tag->getDecl(), Range.getBegin(), TU)); 1159 if (const TemplateSpecializationType *TST 1160 = dyn_cast<TemplateSpecializationType>(T)) 1161 return VisitTemplateName(TST->getTemplateName(), Range.getBegin()); 1162 break; 1163 } 1164 1165 case NestedNameSpecifier::TypeSpecWithTemplate: 1166 case NestedNameSpecifier::Global: 1167 case NestedNameSpecifier::Identifier: 1168 break; 1169 } 1170 1171 return false; 1172} 1173 1174bool CursorVisitor::VisitTemplateParameters( 1175 const TemplateParameterList *Params) { 1176 if (!Params) 1177 return false; 1178 1179 for (TemplateParameterList::const_iterator P = Params->begin(), 1180 PEnd = Params->end(); 1181 P != PEnd; ++P) { 1182 if (Visit(MakeCXCursor(*P, TU))) 1183 return true; 1184 } 1185 1186 return false; 1187} 1188 1189bool CursorVisitor::VisitTemplateName(TemplateName Name, SourceLocation Loc) { 1190 switch (Name.getKind()) { 1191 case TemplateName::Template: 1192 return Visit(MakeCursorTemplateRef(Name.getAsTemplateDecl(), Loc, TU)); 1193 1194 case TemplateName::OverloadedTemplate: 1195 // Visit the overloaded template set. 1196 if (Visit(MakeCursorOverloadedDeclRef(Name, Loc, TU))) 1197 return true; 1198 1199 return false; 1200 1201 case TemplateName::DependentTemplate: 1202 // FIXME: Visit nested-name-specifier. 1203 return false; 1204 1205 case TemplateName::QualifiedTemplate: 1206 // FIXME: Visit nested-name-specifier. 1207 return Visit(MakeCursorTemplateRef( 1208 Name.getAsQualifiedTemplateName()->getDecl(), 1209 Loc, TU)); 1210 } 1211 1212 return false; 1213} 1214 1215bool CursorVisitor::VisitTemplateArgumentLoc(const TemplateArgumentLoc &TAL) { 1216 switch (TAL.getArgument().getKind()) { 1217 case TemplateArgument::Null: 1218 case TemplateArgument::Integral: 1219 return false; 1220 1221 case TemplateArgument::Pack: 1222 // FIXME: Implement when variadic templates come along. 1223 return false; 1224 1225 case TemplateArgument::Type: 1226 if (TypeSourceInfo *TSInfo = TAL.getTypeSourceInfo()) 1227 return Visit(TSInfo->getTypeLoc()); 1228 return false; 1229 1230 case TemplateArgument::Declaration: 1231 if (Expr *E = TAL.getSourceDeclExpression()) 1232 return Visit(MakeCXCursor(E, StmtParent, TU)); 1233 return false; 1234 1235 case TemplateArgument::Expression: 1236 if (Expr *E = TAL.getSourceExpression()) 1237 return Visit(MakeCXCursor(E, StmtParent, TU)); 1238 return false; 1239 1240 case TemplateArgument::Template: 1241 return VisitTemplateName(TAL.getArgument().getAsTemplate(), 1242 TAL.getTemplateNameLoc()); 1243 } 1244 1245 return false; 1246} 1247 1248bool CursorVisitor::VisitLinkageSpecDecl(LinkageSpecDecl *D) { 1249 return VisitDeclContext(D); 1250} 1251 1252bool CursorVisitor::VisitQualifiedTypeLoc(QualifiedTypeLoc TL) { 1253 return Visit(TL.getUnqualifiedLoc()); 1254} 1255 1256bool CursorVisitor::VisitBuiltinTypeLoc(BuiltinTypeLoc TL) { 1257 ASTContext &Context = AU->getASTContext(); 1258 1259 // Some builtin types (such as Objective-C's "id", "sel", and 1260 // "Class") have associated declarations. Create cursors for those. 1261 QualType VisitType; 1262 switch (TL.getType()->getAs<BuiltinType>()->getKind()) { 1263 case BuiltinType::Void: 1264 case BuiltinType::Bool: 1265 case BuiltinType::Char_U: 1266 case BuiltinType::UChar: 1267 case BuiltinType::Char16: 1268 case BuiltinType::Char32: 1269 case BuiltinType::UShort: 1270 case BuiltinType::UInt: 1271 case BuiltinType::ULong: 1272 case BuiltinType::ULongLong: 1273 case BuiltinType::UInt128: 1274 case BuiltinType::Char_S: 1275 case BuiltinType::SChar: 1276 case BuiltinType::WChar: 1277 case BuiltinType::Short: 1278 case BuiltinType::Int: 1279 case BuiltinType::Long: 1280 case BuiltinType::LongLong: 1281 case BuiltinType::Int128: 1282 case BuiltinType::Float: 1283 case BuiltinType::Double: 1284 case BuiltinType::LongDouble: 1285 case BuiltinType::NullPtr: 1286 case BuiltinType::Overload: 1287 case BuiltinType::Dependent: 1288 break; 1289 1290 case BuiltinType::UndeducedAuto: // FIXME: Deserves a cursor? 1291 break; 1292 1293 case BuiltinType::ObjCId: 1294 VisitType = Context.getObjCIdType(); 1295 break; 1296 1297 case BuiltinType::ObjCClass: 1298 VisitType = Context.getObjCClassType(); 1299 break; 1300 1301 case BuiltinType::ObjCSel: 1302 VisitType = Context.getObjCSelType(); 1303 break; 1304 } 1305 1306 if (!VisitType.isNull()) { 1307 if (const TypedefType *Typedef = VisitType->getAs<TypedefType>()) 1308 return Visit(MakeCursorTypeRef(Typedef->getDecl(), TL.getBuiltinLoc(), 1309 TU)); 1310 } 1311 1312 return false; 1313} 1314 1315bool CursorVisitor::VisitTypedefTypeLoc(TypedefTypeLoc TL) { 1316 return Visit(MakeCursorTypeRef(TL.getTypedefDecl(), TL.getNameLoc(), TU)); 1317} 1318 1319bool CursorVisitor::VisitUnresolvedUsingTypeLoc(UnresolvedUsingTypeLoc TL) { 1320 return Visit(MakeCursorTypeRef(TL.getDecl(), TL.getNameLoc(), TU)); 1321} 1322 1323bool CursorVisitor::VisitTagTypeLoc(TagTypeLoc TL) { 1324 return Visit(MakeCursorTypeRef(TL.getDecl(), TL.getNameLoc(), TU)); 1325} 1326 1327bool CursorVisitor::VisitTemplateTypeParmTypeLoc(TemplateTypeParmTypeLoc TL) { 1328 // FIXME: We can't visit the template type parameter, because there's 1329 // no context information with which we can match up the depth/index in the 1330 // type to the appropriate 1331 return false; 1332} 1333 1334bool CursorVisitor::VisitObjCInterfaceTypeLoc(ObjCInterfaceTypeLoc TL) { 1335 if (Visit(MakeCursorObjCClassRef(TL.getIFaceDecl(), TL.getNameLoc(), TU))) 1336 return true; 1337 1338 return false; 1339} 1340 1341bool CursorVisitor::VisitObjCObjectTypeLoc(ObjCObjectTypeLoc TL) { 1342 if (TL.hasBaseTypeAsWritten() && Visit(TL.getBaseLoc())) 1343 return true; 1344 1345 for (unsigned I = 0, N = TL.getNumProtocols(); I != N; ++I) { 1346 if (Visit(MakeCursorObjCProtocolRef(TL.getProtocol(I), TL.getProtocolLoc(I), 1347 TU))) 1348 return true; 1349 } 1350 1351 return false; 1352} 1353 1354bool CursorVisitor::VisitObjCObjectPointerTypeLoc(ObjCObjectPointerTypeLoc TL) { 1355 return Visit(TL.getPointeeLoc()); 1356} 1357 1358bool CursorVisitor::VisitPointerTypeLoc(PointerTypeLoc TL) { 1359 return Visit(TL.getPointeeLoc()); 1360} 1361 1362bool CursorVisitor::VisitBlockPointerTypeLoc(BlockPointerTypeLoc TL) { 1363 return Visit(TL.getPointeeLoc()); 1364} 1365 1366bool CursorVisitor::VisitMemberPointerTypeLoc(MemberPointerTypeLoc TL) { 1367 return Visit(TL.getPointeeLoc()); 1368} 1369 1370bool CursorVisitor::VisitLValueReferenceTypeLoc(LValueReferenceTypeLoc TL) { 1371 return Visit(TL.getPointeeLoc()); 1372} 1373 1374bool CursorVisitor::VisitRValueReferenceTypeLoc(RValueReferenceTypeLoc TL) { 1375 return Visit(TL.getPointeeLoc()); 1376} 1377 1378bool CursorVisitor::VisitFunctionTypeLoc(FunctionTypeLoc TL, 1379 bool SkipResultType) { 1380 if (!SkipResultType && Visit(TL.getResultLoc())) 1381 return true; 1382 1383 for (unsigned I = 0, N = TL.getNumArgs(); I != N; ++I) 1384 if (Decl *D = TL.getArg(I)) 1385 if (Visit(MakeCXCursor(D, TU))) 1386 return true; 1387 1388 return false; 1389} 1390 1391bool CursorVisitor::VisitArrayTypeLoc(ArrayTypeLoc TL) { 1392 if (Visit(TL.getElementLoc())) 1393 return true; 1394 1395 if (Expr *Size = TL.getSizeExpr()) 1396 return Visit(MakeCXCursor(Size, StmtParent, TU)); 1397 1398 return false; 1399} 1400 1401bool CursorVisitor::VisitTemplateSpecializationTypeLoc( 1402 TemplateSpecializationTypeLoc TL) { 1403 // Visit the template name. 1404 if (VisitTemplateName(TL.getTypePtr()->getTemplateName(), 1405 TL.getTemplateNameLoc())) 1406 return true; 1407 1408 // Visit the template arguments. 1409 for (unsigned I = 0, N = TL.getNumArgs(); I != N; ++I) 1410 if (VisitTemplateArgumentLoc(TL.getArgLoc(I))) 1411 return true; 1412 1413 return false; 1414} 1415 1416bool CursorVisitor::VisitTypeOfExprTypeLoc(TypeOfExprTypeLoc TL) { 1417 return Visit(MakeCXCursor(TL.getUnderlyingExpr(), StmtParent, TU)); 1418} 1419 1420bool CursorVisitor::VisitTypeOfTypeLoc(TypeOfTypeLoc TL) { 1421 if (TypeSourceInfo *TSInfo = TL.getUnderlyingTInfo()) 1422 return Visit(TSInfo->getTypeLoc()); 1423 1424 return false; 1425} 1426 1427bool CursorVisitor::VisitCXXRecordDecl(CXXRecordDecl *D) { 1428 if (D->isDefinition()) { 1429 for (CXXRecordDecl::base_class_iterator I = D->bases_begin(), 1430 E = D->bases_end(); I != E; ++I) { 1431 if (Visit(cxcursor::MakeCursorCXXBaseSpecifier(I, TU))) 1432 return true; 1433 } 1434 } 1435 1436 return VisitTagDecl(D); 1437} 1438 1439bool CursorVisitor::VisitAttributes(Decl *D) { 1440 for (AttrVec::const_iterator i = D->attr_begin(), e = D->attr_end(); 1441 i != e; ++i) 1442 if (Visit(MakeCXCursor(*i, D, TU))) 1443 return true; 1444 1445 return false; 1446} 1447 1448//===----------------------------------------------------------------------===// 1449// Data-recursive visitor methods. 1450//===----------------------------------------------------------------------===// 1451 1452namespace { 1453#define DEF_JOB(NAME, DATA, KIND)\ 1454class NAME : public VisitorJob {\ 1455public:\ 1456 NAME(DATA *d, CXCursor parent) : VisitorJob(parent, VisitorJob::KIND, d) {} \ 1457 static bool classof(const VisitorJob *VJ) { return VJ->getKind() == KIND; }\ 1458 DATA *get() const { return static_cast<DATA*>(data[0]); }\ 1459}; 1460 1461DEF_JOB(StmtVisit, Stmt, StmtVisitKind) 1462DEF_JOB(MemberExprParts, MemberExpr, MemberExprPartsKind) 1463DEF_JOB(DeclRefExprParts, DeclRefExpr, DeclRefExprPartsKind) 1464DEF_JOB(OverloadExprParts, OverloadExpr, OverloadExprPartsKind) 1465DEF_JOB(ExplicitTemplateArgsVisit, ExplicitTemplateArgumentList, 1466 ExplicitTemplateArgsVisitKind) 1467#undef DEF_JOB 1468 1469class DeclVisit : public VisitorJob { 1470public: 1471 DeclVisit(Decl *d, CXCursor parent, bool isFirst) : 1472 VisitorJob(parent, VisitorJob::DeclVisitKind, 1473 d, isFirst ? (void*) 1 : (void*) 0) {} 1474 static bool classof(const VisitorJob *VJ) { 1475 return VJ->getKind() == DeclVisitKind; 1476 } 1477 Decl *get() const { return static_cast<Decl*>(data[0]); } 1478 bool isFirst() const { return data[1] ? true : false; } 1479}; 1480class TypeLocVisit : public VisitorJob { 1481public: 1482 TypeLocVisit(TypeLoc tl, CXCursor parent) : 1483 VisitorJob(parent, VisitorJob::TypeLocVisitKind, 1484 tl.getType().getAsOpaquePtr(), tl.getOpaqueData()) {} 1485 1486 static bool classof(const VisitorJob *VJ) { 1487 return VJ->getKind() == TypeLocVisitKind; 1488 } 1489 1490 TypeLoc get() const { 1491 QualType T = QualType::getFromOpaquePtr(data[0]); 1492 return TypeLoc(T, data[1]); 1493 } 1494}; 1495 1496class LabelRefVisit : public VisitorJob { 1497public: 1498 LabelRefVisit(LabelStmt *LS, SourceLocation labelLoc, CXCursor parent) 1499 : VisitorJob(parent, VisitorJob::LabelRefVisitKind, LS, 1500 (void*) labelLoc.getRawEncoding()) {} 1501 1502 static bool classof(const VisitorJob *VJ) { 1503 return VJ->getKind() == VisitorJob::LabelRefVisitKind; 1504 } 1505 LabelStmt *get() const { return static_cast<LabelStmt*>(data[0]); } 1506 SourceLocation getLoc() const { 1507 return SourceLocation::getFromRawEncoding((unsigned)(uintptr_t) data[1]); } 1508}; 1509class NestedNameSpecifierVisit : public VisitorJob { 1510public: 1511 NestedNameSpecifierVisit(NestedNameSpecifier *NS, SourceRange R, 1512 CXCursor parent) 1513 : VisitorJob(parent, VisitorJob::NestedNameSpecifierVisitKind, 1514 NS, (void*) R.getBegin().getRawEncoding(), 1515 (void*) R.getEnd().getRawEncoding()) {} 1516 static bool classof(const VisitorJob *VJ) { 1517 return VJ->getKind() == VisitorJob::NestedNameSpecifierVisitKind; 1518 } 1519 NestedNameSpecifier *get() const { 1520 return static_cast<NestedNameSpecifier*>(data[0]); 1521 } 1522 SourceRange getSourceRange() const { 1523 SourceLocation A = 1524 SourceLocation::getFromRawEncoding((unsigned)(uintptr_t) data[1]); 1525 SourceLocation B = 1526 SourceLocation::getFromRawEncoding((unsigned)(uintptr_t) data[2]); 1527 return SourceRange(A, B); 1528 } 1529}; 1530class DeclarationNameInfoVisit : public VisitorJob { 1531public: 1532 DeclarationNameInfoVisit(Stmt *S, CXCursor parent) 1533 : VisitorJob(parent, VisitorJob::DeclarationNameInfoVisitKind, S) {} 1534 static bool classof(const VisitorJob *VJ) { 1535 return VJ->getKind() == VisitorJob::DeclarationNameInfoVisitKind; 1536 } 1537 DeclarationNameInfo get() const { 1538 Stmt *S = static_cast<Stmt*>(data[0]); 1539 switch (S->getStmtClass()) { 1540 default: 1541 llvm_unreachable("Unhandled Stmt"); 1542 case Stmt::CXXDependentScopeMemberExprClass: 1543 return cast<CXXDependentScopeMemberExpr>(S)->getMemberNameInfo(); 1544 case Stmt::DependentScopeDeclRefExprClass: 1545 return cast<DependentScopeDeclRefExpr>(S)->getNameInfo(); 1546 } 1547 } 1548}; 1549class MemberRefVisit : public VisitorJob { 1550public: 1551 MemberRefVisit(FieldDecl *D, SourceLocation L, CXCursor parent) 1552 : VisitorJob(parent, VisitorJob::MemberRefVisitKind, D, 1553 (void*) L.getRawEncoding()) {} 1554 static bool classof(const VisitorJob *VJ) { 1555 return VJ->getKind() == VisitorJob::MemberRefVisitKind; 1556 } 1557 FieldDecl *get() const { 1558 return static_cast<FieldDecl*>(data[0]); 1559 } 1560 SourceLocation getLoc() const { 1561 return SourceLocation::getFromRawEncoding((unsigned)(uintptr_t) data[1]); 1562 } 1563}; 1564class EnqueueVisitor : public StmtVisitor<EnqueueVisitor, void> { 1565 VisitorWorkList &WL; 1566 CXCursor Parent; 1567public: 1568 EnqueueVisitor(VisitorWorkList &wl, CXCursor parent) 1569 : WL(wl), Parent(parent) {} 1570 1571 void VisitAddrLabelExpr(AddrLabelExpr *E); 1572 void VisitBlockExpr(BlockExpr *B); 1573 void VisitCompoundLiteralExpr(CompoundLiteralExpr *E); 1574 void VisitCompoundStmt(CompoundStmt *S); 1575 void VisitCXXDefaultArgExpr(CXXDefaultArgExpr *E) { /* Do nothing. */ } 1576 void VisitCXXDependentScopeMemberExpr(CXXDependentScopeMemberExpr *E); 1577 void VisitCXXNewExpr(CXXNewExpr *E); 1578 void VisitCXXScalarValueInitExpr(CXXScalarValueInitExpr *E); 1579 void VisitCXXOperatorCallExpr(CXXOperatorCallExpr *E); 1580 void VisitCXXPseudoDestructorExpr(CXXPseudoDestructorExpr *E); 1581 void VisitCXXTemporaryObjectExpr(CXXTemporaryObjectExpr *E); 1582 void VisitCXXTypeidExpr(CXXTypeidExpr *E); 1583 void VisitCXXUnresolvedConstructExpr(CXXUnresolvedConstructExpr *E); 1584 void VisitCXXUuidofExpr(CXXUuidofExpr *E); 1585 void VisitDeclRefExpr(DeclRefExpr *D); 1586 void VisitDeclStmt(DeclStmt *S); 1587 void VisitDependentScopeDeclRefExpr(DependentScopeDeclRefExpr *E); 1588 void VisitDesignatedInitExpr(DesignatedInitExpr *E); 1589 void VisitExplicitCastExpr(ExplicitCastExpr *E); 1590 void VisitForStmt(ForStmt *FS); 1591 void VisitGotoStmt(GotoStmt *GS); 1592 void VisitIfStmt(IfStmt *If); 1593 void VisitInitListExpr(InitListExpr *IE); 1594 void VisitMemberExpr(MemberExpr *M); 1595 void VisitOffsetOfExpr(OffsetOfExpr *E); 1596 void VisitObjCEncodeExpr(ObjCEncodeExpr *E); 1597 void VisitObjCMessageExpr(ObjCMessageExpr *M); 1598 void VisitOverloadExpr(OverloadExpr *E); 1599 void VisitSizeOfAlignOfExpr(SizeOfAlignOfExpr *E); 1600 void VisitStmt(Stmt *S); 1601 void VisitSwitchStmt(SwitchStmt *S); 1602 void VisitTypesCompatibleExpr(TypesCompatibleExpr *E); 1603 void VisitWhileStmt(WhileStmt *W); 1604 void VisitUnaryTypeTraitExpr(UnaryTypeTraitExpr *E); 1605 void VisitUnresolvedMemberExpr(UnresolvedMemberExpr *U); 1606 void VisitVAArgExpr(VAArgExpr *E); 1607 1608private: 1609 void AddDeclarationNameInfo(Stmt *S); 1610 void AddNestedNameSpecifier(NestedNameSpecifier *NS, SourceRange R); 1611 void AddExplicitTemplateArgs(const ExplicitTemplateArgumentList *A); 1612 void AddMemberRef(FieldDecl *D, SourceLocation L); 1613 void AddStmt(Stmt *S); 1614 void AddDecl(Decl *D, bool isFirst = true); 1615 void AddTypeLoc(TypeSourceInfo *TI); 1616 void EnqueueChildren(Stmt *S); 1617}; 1618} // end anonyous namespace 1619 1620void EnqueueVisitor::AddDeclarationNameInfo(Stmt *S) { 1621 // 'S' should always be non-null, since it comes from the 1622 // statement we are visiting. 1623 WL.push_back(DeclarationNameInfoVisit(S, Parent)); 1624} 1625void EnqueueVisitor::AddNestedNameSpecifier(NestedNameSpecifier *N, 1626 SourceRange R) { 1627 if (N) 1628 WL.push_back(NestedNameSpecifierVisit(N, R, Parent)); 1629} 1630void EnqueueVisitor::AddStmt(Stmt *S) { 1631 if (S) 1632 WL.push_back(StmtVisit(S, Parent)); 1633} 1634void EnqueueVisitor::AddDecl(Decl *D, bool isFirst) { 1635 if (D) 1636 WL.push_back(DeclVisit(D, Parent, isFirst)); 1637} 1638void EnqueueVisitor:: 1639 AddExplicitTemplateArgs(const ExplicitTemplateArgumentList *A) { 1640 if (A) 1641 WL.push_back(ExplicitTemplateArgsVisit( 1642 const_cast<ExplicitTemplateArgumentList*>(A), Parent)); 1643} 1644void EnqueueVisitor::AddMemberRef(FieldDecl *D, SourceLocation L) { 1645 if (D) 1646 WL.push_back(MemberRefVisit(D, L, Parent)); 1647} 1648void EnqueueVisitor::AddTypeLoc(TypeSourceInfo *TI) { 1649 if (TI) 1650 WL.push_back(TypeLocVisit(TI->getTypeLoc(), Parent)); 1651 } 1652void EnqueueVisitor::EnqueueChildren(Stmt *S) { 1653 unsigned size = WL.size(); 1654 for (Stmt::child_iterator Child = S->child_begin(), ChildEnd = S->child_end(); 1655 Child != ChildEnd; ++Child) { 1656 AddStmt(*Child); 1657 } 1658 if (size == WL.size()) 1659 return; 1660 // Now reverse the entries we just added. This will match the DFS 1661 // ordering performed by the worklist. 1662 VisitorWorkList::iterator I = WL.begin() + size, E = WL.end(); 1663 std::reverse(I, E); 1664} 1665void EnqueueVisitor::VisitAddrLabelExpr(AddrLabelExpr *E) { 1666 WL.push_back(LabelRefVisit(E->getLabel(), E->getLabelLoc(), Parent)); 1667} 1668void EnqueueVisitor::VisitBlockExpr(BlockExpr *B) { 1669 AddDecl(B->getBlockDecl()); 1670} 1671void EnqueueVisitor::VisitCompoundLiteralExpr(CompoundLiteralExpr *E) { 1672 EnqueueChildren(E); 1673 AddTypeLoc(E->getTypeSourceInfo()); 1674} 1675void EnqueueVisitor::VisitCompoundStmt(CompoundStmt *S) { 1676 for (CompoundStmt::reverse_body_iterator I = S->body_rbegin(), 1677 E = S->body_rend(); I != E; ++I) { 1678 AddStmt(*I); 1679 } 1680} 1681void EnqueueVisitor:: 1682VisitCXXDependentScopeMemberExpr(CXXDependentScopeMemberExpr *E) { 1683 AddExplicitTemplateArgs(E->getOptionalExplicitTemplateArgs()); 1684 AddDeclarationNameInfo(E); 1685 if (NestedNameSpecifier *Qualifier = E->getQualifier()) 1686 AddNestedNameSpecifier(Qualifier, E->getQualifierRange()); 1687 if (!E->isImplicitAccess()) 1688 AddStmt(E->getBase()); 1689} 1690void EnqueueVisitor::VisitCXXNewExpr(CXXNewExpr *E) { 1691 // Enqueue the initializer or constructor arguments. 1692 for (unsigned I = E->getNumConstructorArgs(); I > 0; --I) 1693 AddStmt(E->getConstructorArg(I-1)); 1694 // Enqueue the array size, if any. 1695 AddStmt(E->getArraySize()); 1696 // Enqueue the allocated type. 1697 AddTypeLoc(E->getAllocatedTypeSourceInfo()); 1698 // Enqueue the placement arguments. 1699 for (unsigned I = E->getNumPlacementArgs(); I > 0; --I) 1700 AddStmt(E->getPlacementArg(I-1)); 1701} 1702void EnqueueVisitor::VisitCXXOperatorCallExpr(CXXOperatorCallExpr *CE) { 1703 for (unsigned I = CE->getNumArgs(); I > 1 /* Yes, this is 1 */; --I) 1704 AddStmt(CE->getArg(I-1)); 1705 AddStmt(CE->getCallee()); 1706 AddStmt(CE->getArg(0)); 1707} 1708void EnqueueVisitor::VisitCXXPseudoDestructorExpr(CXXPseudoDestructorExpr *E) { 1709 // Visit the name of the type being destroyed. 1710 AddTypeLoc(E->getDestroyedTypeInfo()); 1711 // Visit the scope type that looks disturbingly like the nested-name-specifier 1712 // but isn't. 1713 AddTypeLoc(E->getScopeTypeInfo()); 1714 // Visit the nested-name-specifier. 1715 if (NestedNameSpecifier *Qualifier = E->getQualifier()) 1716 AddNestedNameSpecifier(Qualifier, E->getQualifierRange()); 1717 // Visit base expression. 1718 AddStmt(E->getBase()); 1719} 1720void EnqueueVisitor::VisitCXXScalarValueInitExpr(CXXScalarValueInitExpr *E) { 1721 AddTypeLoc(E->getTypeSourceInfo()); 1722} 1723void EnqueueVisitor::VisitCXXTemporaryObjectExpr(CXXTemporaryObjectExpr *E) { 1724 EnqueueChildren(E); 1725 AddTypeLoc(E->getTypeSourceInfo()); 1726} 1727void EnqueueVisitor::VisitCXXTypeidExpr(CXXTypeidExpr *E) { 1728 EnqueueChildren(E); 1729 if (E->isTypeOperand()) 1730 AddTypeLoc(E->getTypeOperandSourceInfo()); 1731} 1732 1733void EnqueueVisitor::VisitCXXUnresolvedConstructExpr(CXXUnresolvedConstructExpr 1734 *E) { 1735 EnqueueChildren(E); 1736 AddTypeLoc(E->getTypeSourceInfo()); 1737} 1738void EnqueueVisitor::VisitCXXUuidofExpr(CXXUuidofExpr *E) { 1739 EnqueueChildren(E); 1740 if (E->isTypeOperand()) 1741 AddTypeLoc(E->getTypeOperandSourceInfo()); 1742} 1743void EnqueueVisitor::VisitDeclRefExpr(DeclRefExpr *DR) { 1744 if (DR->hasExplicitTemplateArgs()) { 1745 AddExplicitTemplateArgs(&DR->getExplicitTemplateArgs()); 1746 } 1747 WL.push_back(DeclRefExprParts(DR, Parent)); 1748} 1749void EnqueueVisitor::VisitDependentScopeDeclRefExpr(DependentScopeDeclRefExpr *E) { 1750 AddExplicitTemplateArgs(E->getOptionalExplicitTemplateArgs()); 1751 AddDeclarationNameInfo(E); 1752 if (NestedNameSpecifier *Qualifier = E->getQualifier()) 1753 AddNestedNameSpecifier(Qualifier, E->getQualifierRange()); 1754} 1755void EnqueueVisitor::VisitDeclStmt(DeclStmt *S) { 1756 unsigned size = WL.size(); 1757 bool isFirst = true; 1758 for (DeclStmt::decl_iterator D = S->decl_begin(), DEnd = S->decl_end(); 1759 D != DEnd; ++D) { 1760 AddDecl(*D, isFirst); 1761 isFirst = false; 1762 } 1763 if (size == WL.size()) 1764 return; 1765 // Now reverse the entries we just added. This will match the DFS 1766 // ordering performed by the worklist. 1767 VisitorWorkList::iterator I = WL.begin() + size, E = WL.end(); 1768 std::reverse(I, E); 1769} 1770void EnqueueVisitor::VisitDesignatedInitExpr(DesignatedInitExpr *E) { 1771 AddStmt(E->getInit()); 1772 typedef DesignatedInitExpr::Designator Designator; 1773 for (DesignatedInitExpr::reverse_designators_iterator 1774 D = E->designators_rbegin(), DEnd = E->designators_rend(); 1775 D != DEnd; ++D) { 1776 if (D->isFieldDesignator()) { 1777 if (FieldDecl *Field = D->getField()) 1778 AddMemberRef(Field, D->getFieldLoc()); 1779 continue; 1780 } 1781 if (D->isArrayDesignator()) { 1782 AddStmt(E->getArrayIndex(*D)); 1783 continue; 1784 } 1785 assert(D->isArrayRangeDesignator() && "Unknown designator kind"); 1786 AddStmt(E->getArrayRangeEnd(*D)); 1787 AddStmt(E->getArrayRangeStart(*D)); 1788 } 1789} 1790void EnqueueVisitor::VisitExplicitCastExpr(ExplicitCastExpr *E) { 1791 EnqueueChildren(E); 1792 AddTypeLoc(E->getTypeInfoAsWritten()); 1793} 1794void EnqueueVisitor::VisitForStmt(ForStmt *FS) { 1795 AddStmt(FS->getBody()); 1796 AddStmt(FS->getInc()); 1797 AddStmt(FS->getCond()); 1798 AddDecl(FS->getConditionVariable()); 1799 AddStmt(FS->getInit()); 1800} 1801void EnqueueVisitor::VisitGotoStmt(GotoStmt *GS) { 1802 WL.push_back(LabelRefVisit(GS->getLabel(), GS->getLabelLoc(), Parent)); 1803} 1804void EnqueueVisitor::VisitIfStmt(IfStmt *If) { 1805 AddStmt(If->getElse()); 1806 AddStmt(If->getThen()); 1807 AddStmt(If->getCond()); 1808 AddDecl(If->getConditionVariable()); 1809} 1810void EnqueueVisitor::VisitInitListExpr(InitListExpr *IE) { 1811 // We care about the syntactic form of the initializer list, only. 1812 if (InitListExpr *Syntactic = IE->getSyntacticForm()) 1813 IE = Syntactic; 1814 EnqueueChildren(IE); 1815} 1816void EnqueueVisitor::VisitMemberExpr(MemberExpr *M) { 1817 WL.push_back(MemberExprParts(M, Parent)); 1818 1819 // If the base of the member access expression is an implicit 'this', don't 1820 // visit it. 1821 // FIXME: If we ever want to show these implicit accesses, this will be 1822 // unfortunate. However, clang_getCursor() relies on this behavior. 1823 if (CXXThisExpr *This 1824 = llvm::dyn_cast<CXXThisExpr>(M->getBase()->IgnoreParenImpCasts())) 1825 if (This->isImplicit()) 1826 return; 1827 1828 AddStmt(M->getBase()); 1829} 1830void EnqueueVisitor::VisitObjCEncodeExpr(ObjCEncodeExpr *E) { 1831 AddTypeLoc(E->getEncodedTypeSourceInfo()); 1832} 1833void EnqueueVisitor::VisitObjCMessageExpr(ObjCMessageExpr *M) { 1834 EnqueueChildren(M); 1835 AddTypeLoc(M->getClassReceiverTypeInfo()); 1836} 1837void EnqueueVisitor::VisitOffsetOfExpr(OffsetOfExpr *E) { 1838 // Visit the components of the offsetof expression. 1839 for (unsigned N = E->getNumComponents(), I = N; I > 0; --I) { 1840 typedef OffsetOfExpr::OffsetOfNode OffsetOfNode; 1841 const OffsetOfNode &Node = E->getComponent(I-1); 1842 switch (Node.getKind()) { 1843 case OffsetOfNode::Array: 1844 AddStmt(E->getIndexExpr(Node.getArrayExprIndex())); 1845 break; 1846 case OffsetOfNode::Field: 1847 AddMemberRef(Node.getField(), Node.getRange().getEnd()); 1848 break; 1849 case OffsetOfNode::Identifier: 1850 case OffsetOfNode::Base: 1851 continue; 1852 } 1853 } 1854 // Visit the type into which we're computing the offset. 1855 AddTypeLoc(E->getTypeSourceInfo()); 1856} 1857void EnqueueVisitor::VisitOverloadExpr(OverloadExpr *E) { 1858 AddExplicitTemplateArgs(E->getOptionalExplicitTemplateArgs()); 1859 WL.push_back(OverloadExprParts(E, Parent)); 1860} 1861void EnqueueVisitor::VisitSizeOfAlignOfExpr(SizeOfAlignOfExpr *E) { 1862 EnqueueChildren(E); 1863 if (E->isArgumentType()) 1864 AddTypeLoc(E->getArgumentTypeInfo()); 1865} 1866void EnqueueVisitor::VisitStmt(Stmt *S) { 1867 EnqueueChildren(S); 1868} 1869void EnqueueVisitor::VisitSwitchStmt(SwitchStmt *S) { 1870 AddStmt(S->getBody()); 1871 AddStmt(S->getCond()); 1872 AddDecl(S->getConditionVariable()); 1873} 1874void EnqueueVisitor::VisitTypesCompatibleExpr(TypesCompatibleExpr *E) { 1875 AddTypeLoc(E->getArgTInfo2()); 1876 AddTypeLoc(E->getArgTInfo1()); 1877} 1878 1879void EnqueueVisitor::VisitWhileStmt(WhileStmt *W) { 1880 AddStmt(W->getBody()); 1881 AddStmt(W->getCond()); 1882 AddDecl(W->getConditionVariable()); 1883} 1884void EnqueueVisitor::VisitUnaryTypeTraitExpr(UnaryTypeTraitExpr *E) { 1885 AddTypeLoc(E->getQueriedTypeSourceInfo()); 1886} 1887void EnqueueVisitor::VisitUnresolvedMemberExpr(UnresolvedMemberExpr *U) { 1888 VisitOverloadExpr(U); 1889 if (!U->isImplicitAccess()) 1890 AddStmt(U->getBase()); 1891} 1892void EnqueueVisitor::VisitVAArgExpr(VAArgExpr *E) { 1893 AddStmt(E->getSubExpr()); 1894 AddTypeLoc(E->getWrittenTypeInfo()); 1895} 1896 1897void CursorVisitor::EnqueueWorkList(VisitorWorkList &WL, Stmt *S) { 1898 EnqueueVisitor(WL, MakeCXCursor(S, StmtParent, TU)).Visit(S); 1899} 1900 1901bool CursorVisitor::IsInRegionOfInterest(CXCursor C) { 1902 if (RegionOfInterest.isValid()) { 1903 SourceRange Range = getRawCursorExtent(C); 1904 if (Range.isInvalid() || CompareRegionOfInterest(Range)) 1905 return false; 1906 } 1907 return true; 1908} 1909 1910bool CursorVisitor::RunVisitorWorkList(VisitorWorkList &WL) { 1911 while (!WL.empty()) { 1912 // Dequeue the worklist item. 1913 VisitorJob LI = WL.back(); 1914 WL.pop_back(); 1915 1916 // Set the Parent field, then back to its old value once we're done. 1917 SetParentRAII SetParent(Parent, StmtParent, LI.getParent()); 1918 1919 switch (LI.getKind()) { 1920 case VisitorJob::DeclVisitKind: { 1921 Decl *D = cast<DeclVisit>(&LI)->get(); 1922 if (!D) 1923 continue; 1924 1925 // For now, perform default visitation for Decls. 1926 if (Visit(MakeCXCursor(D, TU, cast<DeclVisit>(&LI)->isFirst()))) 1927 return true; 1928 1929 continue; 1930 } 1931 case VisitorJob::ExplicitTemplateArgsVisitKind: { 1932 const ExplicitTemplateArgumentList *ArgList = 1933 cast<ExplicitTemplateArgsVisit>(&LI)->get(); 1934 for (const TemplateArgumentLoc *Arg = ArgList->getTemplateArgs(), 1935 *ArgEnd = Arg + ArgList->NumTemplateArgs; 1936 Arg != ArgEnd; ++Arg) { 1937 if (VisitTemplateArgumentLoc(*Arg)) 1938 return true; 1939 } 1940 continue; 1941 } 1942 case VisitorJob::TypeLocVisitKind: { 1943 // Perform default visitation for TypeLocs. 1944 if (Visit(cast<TypeLocVisit>(&LI)->get())) 1945 return true; 1946 continue; 1947 } 1948 case VisitorJob::LabelRefVisitKind: { 1949 LabelStmt *LS = cast<LabelRefVisit>(&LI)->get(); 1950 if (Visit(MakeCursorLabelRef(LS, 1951 cast<LabelRefVisit>(&LI)->getLoc(), 1952 TU))) 1953 return true; 1954 continue; 1955 } 1956 case VisitorJob::NestedNameSpecifierVisitKind: { 1957 NestedNameSpecifierVisit *V = cast<NestedNameSpecifierVisit>(&LI); 1958 if (VisitNestedNameSpecifier(V->get(), V->getSourceRange())) 1959 return true; 1960 continue; 1961 } 1962 case VisitorJob::DeclarationNameInfoVisitKind: { 1963 if (VisitDeclarationNameInfo(cast<DeclarationNameInfoVisit>(&LI) 1964 ->get())) 1965 return true; 1966 continue; 1967 } 1968 case VisitorJob::MemberRefVisitKind: { 1969 MemberRefVisit *V = cast<MemberRefVisit>(&LI); 1970 if (Visit(MakeCursorMemberRef(V->get(), V->getLoc(), TU))) 1971 return true; 1972 continue; 1973 } 1974 case VisitorJob::StmtVisitKind: { 1975 Stmt *S = cast<StmtVisit>(&LI)->get(); 1976 if (!S) 1977 continue; 1978 1979 // Update the current cursor. 1980 CXCursor Cursor = MakeCXCursor(S, StmtParent, TU); 1981 if (!IsInRegionOfInterest(Cursor)) 1982 continue; 1983 switch (Visitor(Cursor, Parent, ClientData)) { 1984 case CXChildVisit_Break: return true; 1985 case CXChildVisit_Continue: break; 1986 case CXChildVisit_Recurse: 1987 EnqueueWorkList(WL, S); 1988 break; 1989 } 1990 continue; 1991 } 1992 case VisitorJob::MemberExprPartsKind: { 1993 // Handle the other pieces in the MemberExpr besides the base. 1994 MemberExpr *M = cast<MemberExprParts>(&LI)->get(); 1995 1996 // Visit the nested-name-specifier 1997 if (NestedNameSpecifier *Qualifier = M->getQualifier()) 1998 if (VisitNestedNameSpecifier(Qualifier, M->getQualifierRange())) 1999 return true; 2000 2001 // Visit the declaration name. 2002 if (VisitDeclarationNameInfo(M->getMemberNameInfo())) 2003 return true; 2004 2005 // Visit the explicitly-specified template arguments, if any. 2006 if (M->hasExplicitTemplateArgs()) { 2007 for (const TemplateArgumentLoc *Arg = M->getTemplateArgs(), 2008 *ArgEnd = Arg + M->getNumTemplateArgs(); 2009 Arg != ArgEnd; ++Arg) { 2010 if (VisitTemplateArgumentLoc(*Arg)) 2011 return true; 2012 } 2013 } 2014 continue; 2015 } 2016 case VisitorJob::DeclRefExprPartsKind: { 2017 DeclRefExpr *DR = cast<DeclRefExprParts>(&LI)->get(); 2018 // Visit nested-name-specifier, if present. 2019 if (NestedNameSpecifier *Qualifier = DR->getQualifier()) 2020 if (VisitNestedNameSpecifier(Qualifier, DR->getQualifierRange())) 2021 return true; 2022 // Visit declaration name. 2023 if (VisitDeclarationNameInfo(DR->getNameInfo())) 2024 return true; 2025 continue; 2026 } 2027 case VisitorJob::OverloadExprPartsKind: { 2028 OverloadExpr *O = cast<OverloadExprParts>(&LI)->get(); 2029 // Visit the nested-name-specifier. 2030 if (NestedNameSpecifier *Qualifier = O->getQualifier()) 2031 if (VisitNestedNameSpecifier(Qualifier, O->getQualifierRange())) 2032 return true; 2033 // Visit the declaration name. 2034 if (VisitDeclarationNameInfo(O->getNameInfo())) 2035 return true; 2036 // Visit the overloaded declaration reference. 2037 if (Visit(MakeCursorOverloadedDeclRef(O, TU))) 2038 return true; 2039 continue; 2040 } 2041 } 2042 } 2043 return false; 2044} 2045 2046bool CursorVisitor::Visit(Stmt *S) { 2047 VisitorWorkList *WL = 0; 2048 if (!WorkListFreeList.empty()) { 2049 WL = WorkListFreeList.back(); 2050 WL->clear(); 2051 WorkListFreeList.pop_back(); 2052 } 2053 else { 2054 WL = new VisitorWorkList(); 2055 WorkListCache.push_back(WL); 2056 } 2057 EnqueueWorkList(*WL, S); 2058 bool result = RunVisitorWorkList(*WL); 2059 WorkListFreeList.push_back(WL); 2060 return result; 2061} 2062 2063//===----------------------------------------------------------------------===// 2064// Misc. API hooks. 2065//===----------------------------------------------------------------------===// 2066 2067static llvm::sys::Mutex EnableMultithreadingMutex; 2068static bool EnabledMultithreading; 2069 2070extern "C" { 2071CXIndex clang_createIndex(int excludeDeclarationsFromPCH, 2072 int displayDiagnostics) { 2073 // Disable pretty stack trace functionality, which will otherwise be a very 2074 // poor citizen of the world and set up all sorts of signal handlers. 2075 llvm::DisablePrettyStackTrace = true; 2076 2077 // We use crash recovery to make some of our APIs more reliable, implicitly 2078 // enable it. 2079 llvm::CrashRecoveryContext::Enable(); 2080 2081 // Enable support for multithreading in LLVM. 2082 { 2083 llvm::sys::ScopedLock L(EnableMultithreadingMutex); 2084 if (!EnabledMultithreading) { 2085 llvm::llvm_start_multithreaded(); 2086 EnabledMultithreading = true; 2087 } 2088 } 2089 2090 CIndexer *CIdxr = new CIndexer(); 2091 if (excludeDeclarationsFromPCH) 2092 CIdxr->setOnlyLocalDecls(); 2093 if (displayDiagnostics) 2094 CIdxr->setDisplayDiagnostics(); 2095 return CIdxr; 2096} 2097 2098void clang_disposeIndex(CXIndex CIdx) { 2099 if (CIdx) 2100 delete static_cast<CIndexer *>(CIdx); 2101} 2102 2103CXTranslationUnit clang_createTranslationUnit(CXIndex CIdx, 2104 const char *ast_filename) { 2105 if (!CIdx) 2106 return 0; 2107 2108 CIndexer *CXXIdx = static_cast<CIndexer *>(CIdx); 2109 FileSystemOptions FileSystemOpts; 2110 FileSystemOpts.WorkingDir = CXXIdx->getWorkingDirectory(); 2111 2112 llvm::IntrusiveRefCntPtr<Diagnostic> Diags; 2113 ASTUnit *TU = ASTUnit::LoadFromASTFile(ast_filename, Diags, FileSystemOpts, 2114 CXXIdx->getOnlyLocalDecls(), 2115 0, 0, true); 2116 return MakeCXTranslationUnit(TU); 2117} 2118 2119unsigned clang_defaultEditingTranslationUnitOptions() { 2120 return CXTranslationUnit_PrecompiledPreamble | 2121 CXTranslationUnit_CacheCompletionResults | 2122 CXTranslationUnit_CXXPrecompiledPreamble; 2123} 2124 2125CXTranslationUnit 2126clang_createTranslationUnitFromSourceFile(CXIndex CIdx, 2127 const char *source_filename, 2128 int num_command_line_args, 2129 const char * const *command_line_args, 2130 unsigned num_unsaved_files, 2131 struct CXUnsavedFile *unsaved_files) { 2132 return clang_parseTranslationUnit(CIdx, source_filename, 2133 command_line_args, num_command_line_args, 2134 unsaved_files, num_unsaved_files, 2135 CXTranslationUnit_DetailedPreprocessingRecord); 2136} 2137 2138struct ParseTranslationUnitInfo { 2139 CXIndex CIdx; 2140 const char *source_filename; 2141 const char *const *command_line_args; 2142 int num_command_line_args; 2143 struct CXUnsavedFile *unsaved_files; 2144 unsigned num_unsaved_files; 2145 unsigned options; 2146 CXTranslationUnit result; 2147}; 2148static void clang_parseTranslationUnit_Impl(void *UserData) { 2149 ParseTranslationUnitInfo *PTUI = 2150 static_cast<ParseTranslationUnitInfo*>(UserData); 2151 CXIndex CIdx = PTUI->CIdx; 2152 const char *source_filename = PTUI->source_filename; 2153 const char * const *command_line_args = PTUI->command_line_args; 2154 int num_command_line_args = PTUI->num_command_line_args; 2155 struct CXUnsavedFile *unsaved_files = PTUI->unsaved_files; 2156 unsigned num_unsaved_files = PTUI->num_unsaved_files; 2157 unsigned options = PTUI->options; 2158 PTUI->result = 0; 2159 2160 if (!CIdx) 2161 return; 2162 2163 CIndexer *CXXIdx = static_cast<CIndexer *>(CIdx); 2164 2165 bool PrecompilePreamble = options & CXTranslationUnit_PrecompiledPreamble; 2166 bool CompleteTranslationUnit 2167 = ((options & CXTranslationUnit_Incomplete) == 0); 2168 bool CacheCodeCompetionResults 2169 = options & CXTranslationUnit_CacheCompletionResults; 2170 bool CXXPrecompilePreamble 2171 = options & CXTranslationUnit_CXXPrecompiledPreamble; 2172 bool CXXChainedPCH 2173 = options & CXTranslationUnit_CXXChainedPCH; 2174 2175 // Configure the diagnostics. 2176 DiagnosticOptions DiagOpts; 2177 llvm::IntrusiveRefCntPtr<Diagnostic> Diags; 2178 Diags = CompilerInstance::createDiagnostics(DiagOpts, 0, 0); 2179 2180 llvm::SmallVector<ASTUnit::RemappedFile, 4> RemappedFiles; 2181 for (unsigned I = 0; I != num_unsaved_files; ++I) { 2182 llvm::StringRef Data(unsaved_files[I].Contents, unsaved_files[I].Length); 2183 const llvm::MemoryBuffer *Buffer 2184 = llvm::MemoryBuffer::getMemBufferCopy(Data, unsaved_files[I].Filename); 2185 RemappedFiles.push_back(std::make_pair(unsaved_files[I].Filename, 2186 Buffer)); 2187 } 2188 2189 llvm::SmallVector<const char *, 16> Args; 2190 2191 // The 'source_filename' argument is optional. If the caller does not 2192 // specify it then it is assumed that the source file is specified 2193 // in the actual argument list. 2194 if (source_filename) 2195 Args.push_back(source_filename); 2196 2197 // Since the Clang C library is primarily used by batch tools dealing with 2198 // (often very broken) source code, where spell-checking can have a 2199 // significant negative impact on performance (particularly when 2200 // precompiled headers are involved), we disable it by default. 2201 // Only do this if we haven't found a spell-checking-related argument. 2202 bool FoundSpellCheckingArgument = false; 2203 for (int I = 0; I != num_command_line_args; ++I) { 2204 if (strcmp(command_line_args[I], "-fno-spell-checking") == 0 || 2205 strcmp(command_line_args[I], "-fspell-checking") == 0) { 2206 FoundSpellCheckingArgument = true; 2207 break; 2208 } 2209 } 2210 if (!FoundSpellCheckingArgument) 2211 Args.push_back("-fno-spell-checking"); 2212 2213 Args.insert(Args.end(), command_line_args, 2214 command_line_args + num_command_line_args); 2215 2216 // Do we need the detailed preprocessing record? 2217 if (options & CXTranslationUnit_DetailedPreprocessingRecord) { 2218 Args.push_back("-Xclang"); 2219 Args.push_back("-detailed-preprocessing-record"); 2220 } 2221 2222 unsigned NumErrors = Diags->getClient()->getNumErrors(); 2223 llvm::OwningPtr<ASTUnit> Unit( 2224 ASTUnit::LoadFromCommandLine(Args.data(), Args.data() + Args.size(), 2225 Diags, 2226 CXXIdx->getClangResourcesPath(), 2227 CXXIdx->getOnlyLocalDecls(), 2228 /*CaptureDiagnostics=*/true, 2229 RemappedFiles.data(), 2230 RemappedFiles.size(), 2231 PrecompilePreamble, 2232 CompleteTranslationUnit, 2233 CacheCodeCompetionResults, 2234 CXXPrecompilePreamble, 2235 CXXChainedPCH)); 2236 2237 if (NumErrors != Diags->getClient()->getNumErrors()) { 2238 // Make sure to check that 'Unit' is non-NULL. 2239 if (CXXIdx->getDisplayDiagnostics() && Unit.get()) { 2240 for (ASTUnit::stored_diag_iterator D = Unit->stored_diag_begin(), 2241 DEnd = Unit->stored_diag_end(); 2242 D != DEnd; ++D) { 2243 CXStoredDiagnostic Diag(*D, Unit->getASTContext().getLangOptions()); 2244 CXString Msg = clang_formatDiagnostic(&Diag, 2245 clang_defaultDiagnosticDisplayOptions()); 2246 fprintf(stderr, "%s\n", clang_getCString(Msg)); 2247 clang_disposeString(Msg); 2248 } 2249#ifdef LLVM_ON_WIN32 2250 // On Windows, force a flush, since there may be multiple copies of 2251 // stderr and stdout in the file system, all with different buffers 2252 // but writing to the same device. 2253 fflush(stderr); 2254#endif 2255 } 2256 } 2257 2258 PTUI->result = MakeCXTranslationUnit(Unit.take()); 2259} 2260CXTranslationUnit clang_parseTranslationUnit(CXIndex CIdx, 2261 const char *source_filename, 2262 const char * const *command_line_args, 2263 int num_command_line_args, 2264 struct CXUnsavedFile *unsaved_files, 2265 unsigned num_unsaved_files, 2266 unsigned options) { 2267 ParseTranslationUnitInfo PTUI = { CIdx, source_filename, command_line_args, 2268 num_command_line_args, unsaved_files, 2269 num_unsaved_files, options, 0 }; 2270 llvm::CrashRecoveryContext CRC; 2271 2272 if (!RunSafely(CRC, clang_parseTranslationUnit_Impl, &PTUI)) { 2273 fprintf(stderr, "libclang: crash detected during parsing: {\n"); 2274 fprintf(stderr, " 'source_filename' : '%s'\n", source_filename); 2275 fprintf(stderr, " 'command_line_args' : ["); 2276 for (int i = 0; i != num_command_line_args; ++i) { 2277 if (i) 2278 fprintf(stderr, ", "); 2279 fprintf(stderr, "'%s'", command_line_args[i]); 2280 } 2281 fprintf(stderr, "],\n"); 2282 fprintf(stderr, " 'unsaved_files' : ["); 2283 for (unsigned i = 0; i != num_unsaved_files; ++i) { 2284 if (i) 2285 fprintf(stderr, ", "); 2286 fprintf(stderr, "('%s', '...', %ld)", unsaved_files[i].Filename, 2287 unsaved_files[i].Length); 2288 } 2289 fprintf(stderr, "],\n"); 2290 fprintf(stderr, " 'options' : %d,\n", options); 2291 fprintf(stderr, "}\n"); 2292 2293 return 0; 2294 } 2295 2296 return PTUI.result; 2297} 2298 2299unsigned clang_defaultSaveOptions(CXTranslationUnit TU) { 2300 return CXSaveTranslationUnit_None; 2301} 2302 2303int clang_saveTranslationUnit(CXTranslationUnit TU, const char *FileName, 2304 unsigned options) { 2305 if (!TU) 2306 return 1; 2307 2308 return static_cast<ASTUnit *>(TU->TUData)->Save(FileName); 2309} 2310 2311void clang_disposeTranslationUnit(CXTranslationUnit CTUnit) { 2312 if (CTUnit) { 2313 // If the translation unit has been marked as unsafe to free, just discard 2314 // it. 2315 if (static_cast<ASTUnit *>(CTUnit->TUData)->isUnsafeToFree()) 2316 return; 2317 2318 delete static_cast<ASTUnit *>(CTUnit->TUData); 2319 disposeCXStringPool(CTUnit->StringPool); 2320 delete CTUnit; 2321 } 2322} 2323 2324unsigned clang_defaultReparseOptions(CXTranslationUnit TU) { 2325 return CXReparse_None; 2326} 2327 2328struct ReparseTranslationUnitInfo { 2329 CXTranslationUnit TU; 2330 unsigned num_unsaved_files; 2331 struct CXUnsavedFile *unsaved_files; 2332 unsigned options; 2333 int result; 2334}; 2335 2336static void clang_reparseTranslationUnit_Impl(void *UserData) { 2337 ReparseTranslationUnitInfo *RTUI = 2338 static_cast<ReparseTranslationUnitInfo*>(UserData); 2339 CXTranslationUnit TU = RTUI->TU; 2340 unsigned num_unsaved_files = RTUI->num_unsaved_files; 2341 struct CXUnsavedFile *unsaved_files = RTUI->unsaved_files; 2342 unsigned options = RTUI->options; 2343 (void) options; 2344 RTUI->result = 1; 2345 2346 if (!TU) 2347 return; 2348 2349 ASTUnit *CXXUnit = static_cast<ASTUnit *>(TU->TUData); 2350 ASTUnit::ConcurrencyCheck Check(*CXXUnit); 2351 2352 llvm::SmallVector<ASTUnit::RemappedFile, 4> RemappedFiles; 2353 for (unsigned I = 0; I != num_unsaved_files; ++I) { 2354 llvm::StringRef Data(unsaved_files[I].Contents, unsaved_files[I].Length); 2355 const llvm::MemoryBuffer *Buffer 2356 = llvm::MemoryBuffer::getMemBufferCopy(Data, unsaved_files[I].Filename); 2357 RemappedFiles.push_back(std::make_pair(unsaved_files[I].Filename, 2358 Buffer)); 2359 } 2360 2361 if (!CXXUnit->Reparse(RemappedFiles.data(), RemappedFiles.size())) 2362 RTUI->result = 0; 2363} 2364 2365int clang_reparseTranslationUnit(CXTranslationUnit TU, 2366 unsigned num_unsaved_files, 2367 struct CXUnsavedFile *unsaved_files, 2368 unsigned options) { 2369 ReparseTranslationUnitInfo RTUI = { TU, num_unsaved_files, unsaved_files, 2370 options, 0 }; 2371 llvm::CrashRecoveryContext CRC; 2372 2373 if (!RunSafely(CRC, clang_reparseTranslationUnit_Impl, &RTUI)) { 2374 fprintf(stderr, "libclang: crash detected during reparsing\n"); 2375 static_cast<ASTUnit *>(TU->TUData)->setUnsafeToFree(true); 2376 return 1; 2377 } 2378 2379 2380 return RTUI.result; 2381} 2382 2383 2384CXString clang_getTranslationUnitSpelling(CXTranslationUnit CTUnit) { 2385 if (!CTUnit) 2386 return createCXString(""); 2387 2388 ASTUnit *CXXUnit = static_cast<ASTUnit *>(CTUnit->TUData); 2389 return createCXString(CXXUnit->getOriginalSourceFileName(), true); 2390} 2391 2392CXCursor clang_getTranslationUnitCursor(CXTranslationUnit TU) { 2393 CXCursor Result = { CXCursor_TranslationUnit, { 0, 0, TU } }; 2394 return Result; 2395} 2396 2397} // end: extern "C" 2398 2399//===----------------------------------------------------------------------===// 2400// CXSourceLocation and CXSourceRange Operations. 2401//===----------------------------------------------------------------------===// 2402 2403extern "C" { 2404CXSourceLocation clang_getNullLocation() { 2405 CXSourceLocation Result = { { 0, 0 }, 0 }; 2406 return Result; 2407} 2408 2409unsigned clang_equalLocations(CXSourceLocation loc1, CXSourceLocation loc2) { 2410 return (loc1.ptr_data[0] == loc2.ptr_data[0] && 2411 loc1.ptr_data[1] == loc2.ptr_data[1] && 2412 loc1.int_data == loc2.int_data); 2413} 2414 2415CXSourceLocation clang_getLocation(CXTranslationUnit tu, 2416 CXFile file, 2417 unsigned line, 2418 unsigned column) { 2419 if (!tu || !file) 2420 return clang_getNullLocation(); 2421 2422 ASTUnit *CXXUnit = static_cast<ASTUnit *>(tu->TUData); 2423 SourceLocation SLoc 2424 = CXXUnit->getSourceManager().getLocation( 2425 static_cast<const FileEntry *>(file), 2426 line, column); 2427 if (SLoc.isInvalid()) return clang_getNullLocation(); 2428 2429 return cxloc::translateSourceLocation(CXXUnit->getASTContext(), SLoc); 2430} 2431 2432CXSourceLocation clang_getLocationForOffset(CXTranslationUnit tu, 2433 CXFile file, 2434 unsigned offset) { 2435 if (!tu || !file) 2436 return clang_getNullLocation(); 2437 2438 ASTUnit *CXXUnit = static_cast<ASTUnit *>(tu->TUData); 2439 SourceLocation Start 2440 = CXXUnit->getSourceManager().getLocation( 2441 static_cast<const FileEntry *>(file), 2442 1, 1); 2443 if (Start.isInvalid()) return clang_getNullLocation(); 2444 2445 SourceLocation SLoc = Start.getFileLocWithOffset(offset); 2446 2447 if (SLoc.isInvalid()) return clang_getNullLocation(); 2448 2449 return cxloc::translateSourceLocation(CXXUnit->getASTContext(), SLoc); 2450} 2451 2452CXSourceRange clang_getNullRange() { 2453 CXSourceRange Result = { { 0, 0 }, 0, 0 }; 2454 return Result; 2455} 2456 2457CXSourceRange clang_getRange(CXSourceLocation begin, CXSourceLocation end) { 2458 if (begin.ptr_data[0] != end.ptr_data[0] || 2459 begin.ptr_data[1] != end.ptr_data[1]) 2460 return clang_getNullRange(); 2461 2462 CXSourceRange Result = { { begin.ptr_data[0], begin.ptr_data[1] }, 2463 begin.int_data, end.int_data }; 2464 return Result; 2465} 2466 2467void clang_getInstantiationLocation(CXSourceLocation location, 2468 CXFile *file, 2469 unsigned *line, 2470 unsigned *column, 2471 unsigned *offset) { 2472 SourceLocation Loc = SourceLocation::getFromRawEncoding(location.int_data); 2473 2474 if (!location.ptr_data[0] || Loc.isInvalid()) { 2475 if (file) 2476 *file = 0; 2477 if (line) 2478 *line = 0; 2479 if (column) 2480 *column = 0; 2481 if (offset) 2482 *offset = 0; 2483 return; 2484 } 2485 2486 const SourceManager &SM = 2487 *static_cast<const SourceManager*>(location.ptr_data[0]); 2488 SourceLocation InstLoc = SM.getInstantiationLoc(Loc); 2489 2490 if (file) 2491 *file = (void *)SM.getFileEntryForID(SM.getFileID(InstLoc)); 2492 if (line) 2493 *line = SM.getInstantiationLineNumber(InstLoc); 2494 if (column) 2495 *column = SM.getInstantiationColumnNumber(InstLoc); 2496 if (offset) 2497 *offset = SM.getDecomposedLoc(InstLoc).second; 2498} 2499 2500void clang_getSpellingLocation(CXSourceLocation location, 2501 CXFile *file, 2502 unsigned *line, 2503 unsigned *column, 2504 unsigned *offset) { 2505 SourceLocation Loc = SourceLocation::getFromRawEncoding(location.int_data); 2506 2507 if (!location.ptr_data[0] || Loc.isInvalid()) { 2508 if (file) 2509 *file = 0; 2510 if (line) 2511 *line = 0; 2512 if (column) 2513 *column = 0; 2514 if (offset) 2515 *offset = 0; 2516 return; 2517 } 2518 2519 const SourceManager &SM = 2520 *static_cast<const SourceManager*>(location.ptr_data[0]); 2521 SourceLocation SpellLoc = Loc; 2522 if (SpellLoc.isMacroID()) { 2523 SourceLocation SimpleSpellingLoc = SM.getImmediateSpellingLoc(SpellLoc); 2524 if (SimpleSpellingLoc.isFileID() && 2525 SM.getFileEntryForID(SM.getDecomposedLoc(SimpleSpellingLoc).first)) 2526 SpellLoc = SimpleSpellingLoc; 2527 else 2528 SpellLoc = SM.getInstantiationLoc(SpellLoc); 2529 } 2530 2531 std::pair<FileID, unsigned> LocInfo = SM.getDecomposedLoc(SpellLoc); 2532 FileID FID = LocInfo.first; 2533 unsigned FileOffset = LocInfo.second; 2534 2535 if (file) 2536 *file = (void *)SM.getFileEntryForID(FID); 2537 if (line) 2538 *line = SM.getLineNumber(FID, FileOffset); 2539 if (column) 2540 *column = SM.getColumnNumber(FID, FileOffset); 2541 if (offset) 2542 *offset = FileOffset; 2543} 2544 2545CXSourceLocation clang_getRangeStart(CXSourceRange range) { 2546 CXSourceLocation Result = { { range.ptr_data[0], range.ptr_data[1] }, 2547 range.begin_int_data }; 2548 return Result; 2549} 2550 2551CXSourceLocation clang_getRangeEnd(CXSourceRange range) { 2552 CXSourceLocation Result = { { range.ptr_data[0], range.ptr_data[1] }, 2553 range.end_int_data }; 2554 return Result; 2555} 2556 2557} // end: extern "C" 2558 2559//===----------------------------------------------------------------------===// 2560// CXFile Operations. 2561//===----------------------------------------------------------------------===// 2562 2563extern "C" { 2564CXString clang_getFileName(CXFile SFile) { 2565 if (!SFile) 2566 return createCXString((const char*)NULL); 2567 2568 FileEntry *FEnt = static_cast<FileEntry *>(SFile); 2569 return createCXString(FEnt->getName()); 2570} 2571 2572time_t clang_getFileTime(CXFile SFile) { 2573 if (!SFile) 2574 return 0; 2575 2576 FileEntry *FEnt = static_cast<FileEntry *>(SFile); 2577 return FEnt->getModificationTime(); 2578} 2579 2580CXFile clang_getFile(CXTranslationUnit tu, const char *file_name) { 2581 if (!tu) 2582 return 0; 2583 2584 ASTUnit *CXXUnit = static_cast<ASTUnit *>(tu->TUData); 2585 2586 FileManager &FMgr = CXXUnit->getFileManager(); 2587 const FileEntry *File = FMgr.getFile(file_name, CXXUnit->getFileSystemOpts()); 2588 return const_cast<FileEntry *>(File); 2589} 2590 2591} // end: extern "C" 2592 2593//===----------------------------------------------------------------------===// 2594// CXCursor Operations. 2595//===----------------------------------------------------------------------===// 2596 2597static Decl *getDeclFromExpr(Stmt *E) { 2598 if (CastExpr *CE = dyn_cast<CastExpr>(E)) 2599 return getDeclFromExpr(CE->getSubExpr()); 2600 2601 if (DeclRefExpr *RefExpr = dyn_cast<DeclRefExpr>(E)) 2602 return RefExpr->getDecl(); 2603 if (BlockDeclRefExpr *RefExpr = dyn_cast<BlockDeclRefExpr>(E)) 2604 return RefExpr->getDecl(); 2605 if (MemberExpr *ME = dyn_cast<MemberExpr>(E)) 2606 return ME->getMemberDecl(); 2607 if (ObjCIvarRefExpr *RE = dyn_cast<ObjCIvarRefExpr>(E)) 2608 return RE->getDecl(); 2609 if (ObjCPropertyRefExpr *PRE = dyn_cast<ObjCPropertyRefExpr>(E)) 2610 return PRE->getProperty(); 2611 2612 if (CallExpr *CE = dyn_cast<CallExpr>(E)) 2613 return getDeclFromExpr(CE->getCallee()); 2614 if (CXXConstructExpr *CE = llvm::dyn_cast<CXXConstructExpr>(E)) 2615 if (!CE->isElidable()) 2616 return CE->getConstructor(); 2617 if (ObjCMessageExpr *OME = dyn_cast<ObjCMessageExpr>(E)) 2618 return OME->getMethodDecl(); 2619 2620 if (ObjCProtocolExpr *PE = dyn_cast<ObjCProtocolExpr>(E)) 2621 return PE->getProtocol(); 2622 2623 return 0; 2624} 2625 2626static SourceLocation getLocationFromExpr(Expr *E) { 2627 if (ObjCMessageExpr *Msg = dyn_cast<ObjCMessageExpr>(E)) 2628 return /*FIXME:*/Msg->getLeftLoc(); 2629 if (DeclRefExpr *DRE = dyn_cast<DeclRefExpr>(E)) 2630 return DRE->getLocation(); 2631 if (BlockDeclRefExpr *RefExpr = dyn_cast<BlockDeclRefExpr>(E)) 2632 return RefExpr->getLocation(); 2633 if (MemberExpr *Member = dyn_cast<MemberExpr>(E)) 2634 return Member->getMemberLoc(); 2635 if (ObjCIvarRefExpr *Ivar = dyn_cast<ObjCIvarRefExpr>(E)) 2636 return Ivar->getLocation(); 2637 return E->getLocStart(); 2638} 2639 2640extern "C" { 2641 2642unsigned clang_visitChildren(CXCursor parent, 2643 CXCursorVisitor visitor, 2644 CXClientData client_data) { 2645 CursorVisitor CursorVis(getCursorTU(parent), visitor, client_data, 2646 getCursorASTUnit(parent)->getMaxPCHLevel()); 2647 return CursorVis.VisitChildren(parent); 2648} 2649 2650#ifndef __has_feature 2651#define __has_feature(x) 0 2652#endif 2653#if __has_feature(blocks) 2654typedef enum CXChildVisitResult 2655 (^CXCursorVisitorBlock)(CXCursor cursor, CXCursor parent); 2656 2657static enum CXChildVisitResult visitWithBlock(CXCursor cursor, CXCursor parent, 2658 CXClientData client_data) { 2659 CXCursorVisitorBlock block = (CXCursorVisitorBlock)client_data; 2660 return block(cursor, parent); 2661} 2662#else 2663// If we are compiled with a compiler that doesn't have native blocks support, 2664// define and call the block manually, so the 2665typedef struct _CXChildVisitResult 2666{ 2667 void *isa; 2668 int flags; 2669 int reserved; 2670 enum CXChildVisitResult(*invoke)(struct _CXChildVisitResult*, CXCursor, 2671 CXCursor); 2672} *CXCursorVisitorBlock; 2673 2674static enum CXChildVisitResult visitWithBlock(CXCursor cursor, CXCursor parent, 2675 CXClientData client_data) { 2676 CXCursorVisitorBlock block = (CXCursorVisitorBlock)client_data; 2677 return block->invoke(block, cursor, parent); 2678} 2679#endif 2680 2681 2682unsigned clang_visitChildrenWithBlock(CXCursor parent, 2683 CXCursorVisitorBlock block) { 2684 return clang_visitChildren(parent, visitWithBlock, block); 2685} 2686 2687static CXString getDeclSpelling(Decl *D) { 2688 NamedDecl *ND = dyn_cast_or_null<NamedDecl>(D); 2689 if (!ND) { 2690 if (ObjCPropertyImplDecl *PropImpl =llvm::dyn_cast<ObjCPropertyImplDecl>(D)) 2691 if (ObjCPropertyDecl *Property = PropImpl->getPropertyDecl()) 2692 return createCXString(Property->getIdentifier()->getName()); 2693 2694 return createCXString(""); 2695 } 2696 2697 if (ObjCMethodDecl *OMD = dyn_cast<ObjCMethodDecl>(ND)) 2698 return createCXString(OMD->getSelector().getAsString()); 2699 2700 if (ObjCCategoryImplDecl *CIMP = dyn_cast<ObjCCategoryImplDecl>(ND)) 2701 // No, this isn't the same as the code below. getIdentifier() is non-virtual 2702 // and returns different names. NamedDecl returns the class name and 2703 // ObjCCategoryImplDecl returns the category name. 2704 return createCXString(CIMP->getIdentifier()->getNameStart()); 2705 2706 if (isa<UsingDirectiveDecl>(D)) 2707 return createCXString(""); 2708 2709 llvm::SmallString<1024> S; 2710 llvm::raw_svector_ostream os(S); 2711 ND->printName(os); 2712 2713 return createCXString(os.str()); 2714} 2715 2716CXString clang_getCursorSpelling(CXCursor C) { 2717 if (clang_isTranslationUnit(C.kind)) 2718 return clang_getTranslationUnitSpelling( 2719 static_cast<CXTranslationUnit>(C.data[2])); 2720 2721 if (clang_isReference(C.kind)) { 2722 switch (C.kind) { 2723 case CXCursor_ObjCSuperClassRef: { 2724 ObjCInterfaceDecl *Super = getCursorObjCSuperClassRef(C).first; 2725 return createCXString(Super->getIdentifier()->getNameStart()); 2726 } 2727 case CXCursor_ObjCClassRef: { 2728 ObjCInterfaceDecl *Class = getCursorObjCClassRef(C).first; 2729 return createCXString(Class->getIdentifier()->getNameStart()); 2730 } 2731 case CXCursor_ObjCProtocolRef: { 2732 ObjCProtocolDecl *OID = getCursorObjCProtocolRef(C).first; 2733 assert(OID && "getCursorSpelling(): Missing protocol decl"); 2734 return createCXString(OID->getIdentifier()->getNameStart()); 2735 } 2736 case CXCursor_CXXBaseSpecifier: { 2737 CXXBaseSpecifier *B = getCursorCXXBaseSpecifier(C); 2738 return createCXString(B->getType().getAsString()); 2739 } 2740 case CXCursor_TypeRef: { 2741 TypeDecl *Type = getCursorTypeRef(C).first; 2742 assert(Type && "Missing type decl"); 2743 2744 return createCXString(getCursorContext(C).getTypeDeclType(Type). 2745 getAsString()); 2746 } 2747 case CXCursor_TemplateRef: { 2748 TemplateDecl *Template = getCursorTemplateRef(C).first; 2749 assert(Template && "Missing template decl"); 2750 2751 return createCXString(Template->getNameAsString()); 2752 } 2753 2754 case CXCursor_NamespaceRef: { 2755 NamedDecl *NS = getCursorNamespaceRef(C).first; 2756 assert(NS && "Missing namespace decl"); 2757 2758 return createCXString(NS->getNameAsString()); 2759 } 2760 2761 case CXCursor_MemberRef: { 2762 FieldDecl *Field = getCursorMemberRef(C).first; 2763 assert(Field && "Missing member decl"); 2764 2765 return createCXString(Field->getNameAsString()); 2766 } 2767 2768 case CXCursor_LabelRef: { 2769 LabelStmt *Label = getCursorLabelRef(C).first; 2770 assert(Label && "Missing label"); 2771 2772 return createCXString(Label->getID()->getName()); 2773 } 2774 2775 case CXCursor_OverloadedDeclRef: { 2776 OverloadedDeclRefStorage Storage = getCursorOverloadedDeclRef(C).first; 2777 if (Decl *D = Storage.dyn_cast<Decl *>()) { 2778 if (NamedDecl *ND = dyn_cast<NamedDecl>(D)) 2779 return createCXString(ND->getNameAsString()); 2780 return createCXString(""); 2781 } 2782 if (OverloadExpr *E = Storage.dyn_cast<OverloadExpr *>()) 2783 return createCXString(E->getName().getAsString()); 2784 OverloadedTemplateStorage *Ovl 2785 = Storage.get<OverloadedTemplateStorage*>(); 2786 if (Ovl->size() == 0) 2787 return createCXString(""); 2788 return createCXString((*Ovl->begin())->getNameAsString()); 2789 } 2790 2791 default: 2792 return createCXString("<not implemented>"); 2793 } 2794 } 2795 2796 if (clang_isExpression(C.kind)) { 2797 Decl *D = getDeclFromExpr(getCursorExpr(C)); 2798 if (D) 2799 return getDeclSpelling(D); 2800 return createCXString(""); 2801 } 2802 2803 if (clang_isStatement(C.kind)) { 2804 Stmt *S = getCursorStmt(C); 2805 if (LabelStmt *Label = dyn_cast_or_null<LabelStmt>(S)) 2806 return createCXString(Label->getID()->getName()); 2807 2808 return createCXString(""); 2809 } 2810 2811 if (C.kind == CXCursor_MacroInstantiation) 2812 return createCXString(getCursorMacroInstantiation(C)->getName() 2813 ->getNameStart()); 2814 2815 if (C.kind == CXCursor_MacroDefinition) 2816 return createCXString(getCursorMacroDefinition(C)->getName() 2817 ->getNameStart()); 2818 2819 if (C.kind == CXCursor_InclusionDirective) 2820 return createCXString(getCursorInclusionDirective(C)->getFileName()); 2821 2822 if (clang_isDeclaration(C.kind)) 2823 return getDeclSpelling(getCursorDecl(C)); 2824 2825 return createCXString(""); 2826} 2827 2828CXString clang_getCursorDisplayName(CXCursor C) { 2829 if (!clang_isDeclaration(C.kind)) 2830 return clang_getCursorSpelling(C); 2831 2832 Decl *D = getCursorDecl(C); 2833 if (!D) 2834 return createCXString(""); 2835 2836 PrintingPolicy &Policy = getCursorContext(C).PrintingPolicy; 2837 if (FunctionTemplateDecl *FunTmpl = dyn_cast<FunctionTemplateDecl>(D)) 2838 D = FunTmpl->getTemplatedDecl(); 2839 2840 if (FunctionDecl *Function = dyn_cast<FunctionDecl>(D)) { 2841 llvm::SmallString<64> Str; 2842 llvm::raw_svector_ostream OS(Str); 2843 OS << Function->getNameAsString(); 2844 if (Function->getPrimaryTemplate()) 2845 OS << "<>"; 2846 OS << "("; 2847 for (unsigned I = 0, N = Function->getNumParams(); I != N; ++I) { 2848 if (I) 2849 OS << ", "; 2850 OS << Function->getParamDecl(I)->getType().getAsString(Policy); 2851 } 2852 2853 if (Function->isVariadic()) { 2854 if (Function->getNumParams()) 2855 OS << ", "; 2856 OS << "..."; 2857 } 2858 OS << ")"; 2859 return createCXString(OS.str()); 2860 } 2861 2862 if (ClassTemplateDecl *ClassTemplate = dyn_cast<ClassTemplateDecl>(D)) { 2863 llvm::SmallString<64> Str; 2864 llvm::raw_svector_ostream OS(Str); 2865 OS << ClassTemplate->getNameAsString(); 2866 OS << "<"; 2867 TemplateParameterList *Params = ClassTemplate->getTemplateParameters(); 2868 for (unsigned I = 0, N = Params->size(); I != N; ++I) { 2869 if (I) 2870 OS << ", "; 2871 2872 NamedDecl *Param = Params->getParam(I); 2873 if (Param->getIdentifier()) { 2874 OS << Param->getIdentifier()->getName(); 2875 continue; 2876 } 2877 2878 // There is no parameter name, which makes this tricky. Try to come up 2879 // with something useful that isn't too long. 2880 if (TemplateTypeParmDecl *TTP = dyn_cast<TemplateTypeParmDecl>(Param)) 2881 OS << (TTP->wasDeclaredWithTypename()? "typename" : "class"); 2882 else if (NonTypeTemplateParmDecl *NTTP 2883 = dyn_cast<NonTypeTemplateParmDecl>(Param)) 2884 OS << NTTP->getType().getAsString(Policy); 2885 else 2886 OS << "template<...> class"; 2887 } 2888 2889 OS << ">"; 2890 return createCXString(OS.str()); 2891 } 2892 2893 if (ClassTemplateSpecializationDecl *ClassSpec 2894 = dyn_cast<ClassTemplateSpecializationDecl>(D)) { 2895 // If the type was explicitly written, use that. 2896 if (TypeSourceInfo *TSInfo = ClassSpec->getTypeAsWritten()) 2897 return createCXString(TSInfo->getType().getAsString(Policy)); 2898 2899 llvm::SmallString<64> Str; 2900 llvm::raw_svector_ostream OS(Str); 2901 OS << ClassSpec->getNameAsString(); 2902 OS << TemplateSpecializationType::PrintTemplateArgumentList( 2903 ClassSpec->getTemplateArgs().data(), 2904 ClassSpec->getTemplateArgs().size(), 2905 Policy); 2906 return createCXString(OS.str()); 2907 } 2908 2909 return clang_getCursorSpelling(C); 2910} 2911 2912CXString clang_getCursorKindSpelling(enum CXCursorKind Kind) { 2913 switch (Kind) { 2914 case CXCursor_FunctionDecl: 2915 return createCXString("FunctionDecl"); 2916 case CXCursor_TypedefDecl: 2917 return createCXString("TypedefDecl"); 2918 case CXCursor_EnumDecl: 2919 return createCXString("EnumDecl"); 2920 case CXCursor_EnumConstantDecl: 2921 return createCXString("EnumConstantDecl"); 2922 case CXCursor_StructDecl: 2923 return createCXString("StructDecl"); 2924 case CXCursor_UnionDecl: 2925 return createCXString("UnionDecl"); 2926 case CXCursor_ClassDecl: 2927 return createCXString("ClassDecl"); 2928 case CXCursor_FieldDecl: 2929 return createCXString("FieldDecl"); 2930 case CXCursor_VarDecl: 2931 return createCXString("VarDecl"); 2932 case CXCursor_ParmDecl: 2933 return createCXString("ParmDecl"); 2934 case CXCursor_ObjCInterfaceDecl: 2935 return createCXString("ObjCInterfaceDecl"); 2936 case CXCursor_ObjCCategoryDecl: 2937 return createCXString("ObjCCategoryDecl"); 2938 case CXCursor_ObjCProtocolDecl: 2939 return createCXString("ObjCProtocolDecl"); 2940 case CXCursor_ObjCPropertyDecl: 2941 return createCXString("ObjCPropertyDecl"); 2942 case CXCursor_ObjCIvarDecl: 2943 return createCXString("ObjCIvarDecl"); 2944 case CXCursor_ObjCInstanceMethodDecl: 2945 return createCXString("ObjCInstanceMethodDecl"); 2946 case CXCursor_ObjCClassMethodDecl: 2947 return createCXString("ObjCClassMethodDecl"); 2948 case CXCursor_ObjCImplementationDecl: 2949 return createCXString("ObjCImplementationDecl"); 2950 case CXCursor_ObjCCategoryImplDecl: 2951 return createCXString("ObjCCategoryImplDecl"); 2952 case CXCursor_CXXMethod: 2953 return createCXString("CXXMethod"); 2954 case CXCursor_UnexposedDecl: 2955 return createCXString("UnexposedDecl"); 2956 case CXCursor_ObjCSuperClassRef: 2957 return createCXString("ObjCSuperClassRef"); 2958 case CXCursor_ObjCProtocolRef: 2959 return createCXString("ObjCProtocolRef"); 2960 case CXCursor_ObjCClassRef: 2961 return createCXString("ObjCClassRef"); 2962 case CXCursor_TypeRef: 2963 return createCXString("TypeRef"); 2964 case CXCursor_TemplateRef: 2965 return createCXString("TemplateRef"); 2966 case CXCursor_NamespaceRef: 2967 return createCXString("NamespaceRef"); 2968 case CXCursor_MemberRef: 2969 return createCXString("MemberRef"); 2970 case CXCursor_LabelRef: 2971 return createCXString("LabelRef"); 2972 case CXCursor_OverloadedDeclRef: 2973 return createCXString("OverloadedDeclRef"); 2974 case CXCursor_UnexposedExpr: 2975 return createCXString("UnexposedExpr"); 2976 case CXCursor_BlockExpr: 2977 return createCXString("BlockExpr"); 2978 case CXCursor_DeclRefExpr: 2979 return createCXString("DeclRefExpr"); 2980 case CXCursor_MemberRefExpr: 2981 return createCXString("MemberRefExpr"); 2982 case CXCursor_CallExpr: 2983 return createCXString("CallExpr"); 2984 case CXCursor_ObjCMessageExpr: 2985 return createCXString("ObjCMessageExpr"); 2986 case CXCursor_UnexposedStmt: 2987 return createCXString("UnexposedStmt"); 2988 case CXCursor_LabelStmt: 2989 return createCXString("LabelStmt"); 2990 case CXCursor_InvalidFile: 2991 return createCXString("InvalidFile"); 2992 case CXCursor_InvalidCode: 2993 return createCXString("InvalidCode"); 2994 case CXCursor_NoDeclFound: 2995 return createCXString("NoDeclFound"); 2996 case CXCursor_NotImplemented: 2997 return createCXString("NotImplemented"); 2998 case CXCursor_TranslationUnit: 2999 return createCXString("TranslationUnit"); 3000 case CXCursor_UnexposedAttr: 3001 return createCXString("UnexposedAttr"); 3002 case CXCursor_IBActionAttr: 3003 return createCXString("attribute(ibaction)"); 3004 case CXCursor_IBOutletAttr: 3005 return createCXString("attribute(iboutlet)"); 3006 case CXCursor_IBOutletCollectionAttr: 3007 return createCXString("attribute(iboutletcollection)"); 3008 case CXCursor_PreprocessingDirective: 3009 return createCXString("preprocessing directive"); 3010 case CXCursor_MacroDefinition: 3011 return createCXString("macro definition"); 3012 case CXCursor_MacroInstantiation: 3013 return createCXString("macro instantiation"); 3014 case CXCursor_InclusionDirective: 3015 return createCXString("inclusion directive"); 3016 case CXCursor_Namespace: 3017 return createCXString("Namespace"); 3018 case CXCursor_LinkageSpec: 3019 return createCXString("LinkageSpec"); 3020 case CXCursor_CXXBaseSpecifier: 3021 return createCXString("C++ base class specifier"); 3022 case CXCursor_Constructor: 3023 return createCXString("CXXConstructor"); 3024 case CXCursor_Destructor: 3025 return createCXString("CXXDestructor"); 3026 case CXCursor_ConversionFunction: 3027 return createCXString("CXXConversion"); 3028 case CXCursor_TemplateTypeParameter: 3029 return createCXString("TemplateTypeParameter"); 3030 case CXCursor_NonTypeTemplateParameter: 3031 return createCXString("NonTypeTemplateParameter"); 3032 case CXCursor_TemplateTemplateParameter: 3033 return createCXString("TemplateTemplateParameter"); 3034 case CXCursor_FunctionTemplate: 3035 return createCXString("FunctionTemplate"); 3036 case CXCursor_ClassTemplate: 3037 return createCXString("ClassTemplate"); 3038 case CXCursor_ClassTemplatePartialSpecialization: 3039 return createCXString("ClassTemplatePartialSpecialization"); 3040 case CXCursor_NamespaceAlias: 3041 return createCXString("NamespaceAlias"); 3042 case CXCursor_UsingDirective: 3043 return createCXString("UsingDirective"); 3044 case CXCursor_UsingDeclaration: 3045 return createCXString("UsingDeclaration"); 3046 } 3047 3048 llvm_unreachable("Unhandled CXCursorKind"); 3049 return createCXString((const char*) 0); 3050} 3051 3052enum CXChildVisitResult GetCursorVisitor(CXCursor cursor, 3053 CXCursor parent, 3054 CXClientData client_data) { 3055 CXCursor *BestCursor = static_cast<CXCursor *>(client_data); 3056 3057 // If our current best cursor is the construction of a temporary object, 3058 // don't replace that cursor with a type reference, because we want 3059 // clang_getCursor() to point at the constructor. 3060 if (clang_isExpression(BestCursor->kind) && 3061 isa<CXXTemporaryObjectExpr>(getCursorExpr(*BestCursor)) && 3062 cursor.kind == CXCursor_TypeRef) 3063 return CXChildVisit_Recurse; 3064 3065 *BestCursor = cursor; 3066 return CXChildVisit_Recurse; 3067} 3068 3069CXCursor clang_getCursor(CXTranslationUnit TU, CXSourceLocation Loc) { 3070 if (!TU) 3071 return clang_getNullCursor(); 3072 3073 ASTUnit *CXXUnit = static_cast<ASTUnit *>(TU->TUData); 3074 ASTUnit::ConcurrencyCheck Check(*CXXUnit); 3075 3076 // Translate the given source location to make it point at the beginning of 3077 // the token under the cursor. 3078 SourceLocation SLoc = cxloc::translateSourceLocation(Loc); 3079 3080 // Guard against an invalid SourceLocation, or we may assert in one 3081 // of the following calls. 3082 if (SLoc.isInvalid()) 3083 return clang_getNullCursor(); 3084 3085 bool Logging = getenv("LIBCLANG_LOGGING"); 3086 SLoc = Lexer::GetBeginningOfToken(SLoc, CXXUnit->getSourceManager(), 3087 CXXUnit->getASTContext().getLangOptions()); 3088 3089 CXCursor Result = MakeCXCursorInvalid(CXCursor_NoDeclFound); 3090 if (SLoc.isValid()) { 3091 // FIXME: Would be great to have a "hint" cursor, then walk from that 3092 // hint cursor upward until we find a cursor whose source range encloses 3093 // the region of interest, rather than starting from the translation unit. 3094 CXCursor Parent = clang_getTranslationUnitCursor(TU); 3095 CursorVisitor CursorVis(TU, GetCursorVisitor, &Result, 3096 Decl::MaxPCHLevel, SourceLocation(SLoc)); 3097 CursorVis.VisitChildren(Parent); 3098 } 3099 3100 if (Logging) { 3101 CXFile SearchFile; 3102 unsigned SearchLine, SearchColumn; 3103 CXFile ResultFile; 3104 unsigned ResultLine, ResultColumn; 3105 CXString SearchFileName, ResultFileName, KindSpelling, USR; 3106 const char *IsDef = clang_isCursorDefinition(Result)? " (Definition)" : ""; 3107 CXSourceLocation ResultLoc = clang_getCursorLocation(Result); 3108 3109 clang_getInstantiationLocation(Loc, &SearchFile, &SearchLine, &SearchColumn, 3110 0); 3111 clang_getInstantiationLocation(ResultLoc, &ResultFile, &ResultLine, 3112 &ResultColumn, 0); 3113 SearchFileName = clang_getFileName(SearchFile); 3114 ResultFileName = clang_getFileName(ResultFile); 3115 KindSpelling = clang_getCursorKindSpelling(Result.kind); 3116 USR = clang_getCursorUSR(Result); 3117 fprintf(stderr, "clang_getCursor(%s:%d:%d) = %s(%s:%d:%d):%s%s\n", 3118 clang_getCString(SearchFileName), SearchLine, SearchColumn, 3119 clang_getCString(KindSpelling), 3120 clang_getCString(ResultFileName), ResultLine, ResultColumn, 3121 clang_getCString(USR), IsDef); 3122 clang_disposeString(SearchFileName); 3123 clang_disposeString(ResultFileName); 3124 clang_disposeString(KindSpelling); 3125 clang_disposeString(USR); 3126 } 3127 3128 return Result; 3129} 3130 3131CXCursor clang_getNullCursor(void) { 3132 return MakeCXCursorInvalid(CXCursor_InvalidFile); 3133} 3134 3135unsigned clang_equalCursors(CXCursor X, CXCursor Y) { 3136 return X == Y; 3137} 3138 3139unsigned clang_hashCursor(CXCursor C) { 3140 unsigned Index = 0; 3141 if (clang_isExpression(C.kind) || clang_isStatement(C.kind)) 3142 Index = 1; 3143 3144 return llvm::DenseMapInfo<std::pair<unsigned, void*> >::getHashValue( 3145 std::make_pair(C.kind, C.data[Index])); 3146} 3147 3148unsigned clang_isInvalid(enum CXCursorKind K) { 3149 return K >= CXCursor_FirstInvalid && K <= CXCursor_LastInvalid; 3150} 3151 3152unsigned clang_isDeclaration(enum CXCursorKind K) { 3153 return K >= CXCursor_FirstDecl && K <= CXCursor_LastDecl; 3154} 3155 3156unsigned clang_isReference(enum CXCursorKind K) { 3157 return K >= CXCursor_FirstRef && K <= CXCursor_LastRef; 3158} 3159 3160unsigned clang_isExpression(enum CXCursorKind K) { 3161 return K >= CXCursor_FirstExpr && K <= CXCursor_LastExpr; 3162} 3163 3164unsigned clang_isStatement(enum CXCursorKind K) { 3165 return K >= CXCursor_FirstStmt && K <= CXCursor_LastStmt; 3166} 3167 3168unsigned clang_isTranslationUnit(enum CXCursorKind K) { 3169 return K == CXCursor_TranslationUnit; 3170} 3171 3172unsigned clang_isPreprocessing(enum CXCursorKind K) { 3173 return K >= CXCursor_FirstPreprocessing && K <= CXCursor_LastPreprocessing; 3174} 3175 3176unsigned clang_isUnexposed(enum CXCursorKind K) { 3177 switch (K) { 3178 case CXCursor_UnexposedDecl: 3179 case CXCursor_UnexposedExpr: 3180 case CXCursor_UnexposedStmt: 3181 case CXCursor_UnexposedAttr: 3182 return true; 3183 default: 3184 return false; 3185 } 3186} 3187 3188CXCursorKind clang_getCursorKind(CXCursor C) { 3189 return C.kind; 3190} 3191 3192CXSourceLocation clang_getCursorLocation(CXCursor C) { 3193 if (clang_isReference(C.kind)) { 3194 switch (C.kind) { 3195 case CXCursor_ObjCSuperClassRef: { 3196 std::pair<ObjCInterfaceDecl *, SourceLocation> P 3197 = getCursorObjCSuperClassRef(C); 3198 return cxloc::translateSourceLocation(P.first->getASTContext(), P.second); 3199 } 3200 3201 case CXCursor_ObjCProtocolRef: { 3202 std::pair<ObjCProtocolDecl *, SourceLocation> P 3203 = getCursorObjCProtocolRef(C); 3204 return cxloc::translateSourceLocation(P.first->getASTContext(), P.second); 3205 } 3206 3207 case CXCursor_ObjCClassRef: { 3208 std::pair<ObjCInterfaceDecl *, SourceLocation> P 3209 = getCursorObjCClassRef(C); 3210 return cxloc::translateSourceLocation(P.first->getASTContext(), P.second); 3211 } 3212 3213 case CXCursor_TypeRef: { 3214 std::pair<TypeDecl *, SourceLocation> P = getCursorTypeRef(C); 3215 return cxloc::translateSourceLocation(P.first->getASTContext(), P.second); 3216 } 3217 3218 case CXCursor_TemplateRef: { 3219 std::pair<TemplateDecl *, SourceLocation> P = getCursorTemplateRef(C); 3220 return cxloc::translateSourceLocation(P.first->getASTContext(), P.second); 3221 } 3222 3223 case CXCursor_NamespaceRef: { 3224 std::pair<NamedDecl *, SourceLocation> P = getCursorNamespaceRef(C); 3225 return cxloc::translateSourceLocation(P.first->getASTContext(), P.second); 3226 } 3227 3228 case CXCursor_MemberRef: { 3229 std::pair<FieldDecl *, SourceLocation> P = getCursorMemberRef(C); 3230 return cxloc::translateSourceLocation(P.first->getASTContext(), P.second); 3231 } 3232 3233 case CXCursor_CXXBaseSpecifier: { 3234 CXXBaseSpecifier *BaseSpec = getCursorCXXBaseSpecifier(C); 3235 if (!BaseSpec) 3236 return clang_getNullLocation(); 3237 3238 if (TypeSourceInfo *TSInfo = BaseSpec->getTypeSourceInfo()) 3239 return cxloc::translateSourceLocation(getCursorContext(C), 3240 TSInfo->getTypeLoc().getBeginLoc()); 3241 3242 return cxloc::translateSourceLocation(getCursorContext(C), 3243 BaseSpec->getSourceRange().getBegin()); 3244 } 3245 3246 case CXCursor_LabelRef: { 3247 std::pair<LabelStmt *, SourceLocation> P = getCursorLabelRef(C); 3248 return cxloc::translateSourceLocation(getCursorContext(C), P.second); 3249 } 3250 3251 case CXCursor_OverloadedDeclRef: 3252 return cxloc::translateSourceLocation(getCursorContext(C), 3253 getCursorOverloadedDeclRef(C).second); 3254 3255 default: 3256 // FIXME: Need a way to enumerate all non-reference cases. 3257 llvm_unreachable("Missed a reference kind"); 3258 } 3259 } 3260 3261 if (clang_isExpression(C.kind)) 3262 return cxloc::translateSourceLocation(getCursorContext(C), 3263 getLocationFromExpr(getCursorExpr(C))); 3264 3265 if (clang_isStatement(C.kind)) 3266 return cxloc::translateSourceLocation(getCursorContext(C), 3267 getCursorStmt(C)->getLocStart()); 3268 3269 if (C.kind == CXCursor_PreprocessingDirective) { 3270 SourceLocation L = cxcursor::getCursorPreprocessingDirective(C).getBegin(); 3271 return cxloc::translateSourceLocation(getCursorContext(C), L); 3272 } 3273 3274 if (C.kind == CXCursor_MacroInstantiation) { 3275 SourceLocation L 3276 = cxcursor::getCursorMacroInstantiation(C)->getSourceRange().getBegin(); 3277 return cxloc::translateSourceLocation(getCursorContext(C), L); 3278 } 3279 3280 if (C.kind == CXCursor_MacroDefinition) { 3281 SourceLocation L = cxcursor::getCursorMacroDefinition(C)->getLocation(); 3282 return cxloc::translateSourceLocation(getCursorContext(C), L); 3283 } 3284 3285 if (C.kind == CXCursor_InclusionDirective) { 3286 SourceLocation L 3287 = cxcursor::getCursorInclusionDirective(C)->getSourceRange().getBegin(); 3288 return cxloc::translateSourceLocation(getCursorContext(C), L); 3289 } 3290 3291 if (C.kind < CXCursor_FirstDecl || C.kind > CXCursor_LastDecl) 3292 return clang_getNullLocation(); 3293 3294 Decl *D = getCursorDecl(C); 3295 SourceLocation Loc = D->getLocation(); 3296 if (ObjCInterfaceDecl *Class = dyn_cast<ObjCInterfaceDecl>(D)) 3297 Loc = Class->getClassLoc(); 3298 // FIXME: Multiple variables declared in a single declaration 3299 // currently lack the information needed to correctly determine their 3300 // ranges when accounting for the type-specifier. We use context 3301 // stored in the CXCursor to determine if the VarDecl is in a DeclGroup, 3302 // and if so, whether it is the first decl. 3303 if (VarDecl *VD = dyn_cast<VarDecl>(D)) { 3304 if (!cxcursor::isFirstInDeclGroup(C)) 3305 Loc = VD->getLocation(); 3306 } 3307 3308 return cxloc::translateSourceLocation(getCursorContext(C), Loc); 3309} 3310 3311} // end extern "C" 3312 3313static SourceRange getRawCursorExtent(CXCursor C) { 3314 if (clang_isReference(C.kind)) { 3315 switch (C.kind) { 3316 case CXCursor_ObjCSuperClassRef: 3317 return getCursorObjCSuperClassRef(C).second; 3318 3319 case CXCursor_ObjCProtocolRef: 3320 return getCursorObjCProtocolRef(C).second; 3321 3322 case CXCursor_ObjCClassRef: 3323 return getCursorObjCClassRef(C).second; 3324 3325 case CXCursor_TypeRef: 3326 return getCursorTypeRef(C).second; 3327 3328 case CXCursor_TemplateRef: 3329 return getCursorTemplateRef(C).second; 3330 3331 case CXCursor_NamespaceRef: 3332 return getCursorNamespaceRef(C).second; 3333 3334 case CXCursor_MemberRef: 3335 return getCursorMemberRef(C).second; 3336 3337 case CXCursor_CXXBaseSpecifier: 3338 return getCursorCXXBaseSpecifier(C)->getSourceRange(); 3339 3340 case CXCursor_LabelRef: 3341 return getCursorLabelRef(C).second; 3342 3343 case CXCursor_OverloadedDeclRef: 3344 return getCursorOverloadedDeclRef(C).second; 3345 3346 default: 3347 // FIXME: Need a way to enumerate all non-reference cases. 3348 llvm_unreachable("Missed a reference kind"); 3349 } 3350 } 3351 3352 if (clang_isExpression(C.kind)) 3353 return getCursorExpr(C)->getSourceRange(); 3354 3355 if (clang_isStatement(C.kind)) 3356 return getCursorStmt(C)->getSourceRange(); 3357 3358 if (C.kind == CXCursor_PreprocessingDirective) 3359 return cxcursor::getCursorPreprocessingDirective(C); 3360 3361 if (C.kind == CXCursor_MacroInstantiation) 3362 return cxcursor::getCursorMacroInstantiation(C)->getSourceRange(); 3363 3364 if (C.kind == CXCursor_MacroDefinition) 3365 return cxcursor::getCursorMacroDefinition(C)->getSourceRange(); 3366 3367 if (C.kind == CXCursor_InclusionDirective) 3368 return cxcursor::getCursorInclusionDirective(C)->getSourceRange(); 3369 3370 if (C.kind >= CXCursor_FirstDecl && C.kind <= CXCursor_LastDecl) { 3371 Decl *D = cxcursor::getCursorDecl(C); 3372 SourceRange R = D->getSourceRange(); 3373 // FIXME: Multiple variables declared in a single declaration 3374 // currently lack the information needed to correctly determine their 3375 // ranges when accounting for the type-specifier. We use context 3376 // stored in the CXCursor to determine if the VarDecl is in a DeclGroup, 3377 // and if so, whether it is the first decl. 3378 if (VarDecl *VD = dyn_cast<VarDecl>(D)) { 3379 if (!cxcursor::isFirstInDeclGroup(C)) 3380 R.setBegin(VD->getLocation()); 3381 } 3382 return R; 3383 } 3384 return SourceRange(); 3385} 3386 3387/// \brief Retrieves the "raw" cursor extent, which is then extended to include 3388/// the decl-specifier-seq for declarations. 3389static SourceRange getFullCursorExtent(CXCursor C, SourceManager &SrcMgr) { 3390 if (C.kind >= CXCursor_FirstDecl && C.kind <= CXCursor_LastDecl) { 3391 Decl *D = cxcursor::getCursorDecl(C); 3392 SourceRange R = D->getSourceRange(); 3393 3394 if (const DeclaratorDecl *DD = dyn_cast<DeclaratorDecl>(D)) { 3395 if (TypeSourceInfo *TI = DD->getTypeSourceInfo()) { 3396 TypeLoc TL = TI->getTypeLoc(); 3397 SourceLocation TLoc = TL.getSourceRange().getBegin(); 3398 if (TLoc.isValid() && R.getBegin().isValid() && 3399 SrcMgr.isBeforeInTranslationUnit(TLoc, R.getBegin())) 3400 R.setBegin(TLoc); 3401 } 3402 3403 // FIXME: Multiple variables declared in a single declaration 3404 // currently lack the information needed to correctly determine their 3405 // ranges when accounting for the type-specifier. We use context 3406 // stored in the CXCursor to determine if the VarDecl is in a DeclGroup, 3407 // and if so, whether it is the first decl. 3408 if (VarDecl *VD = dyn_cast<VarDecl>(D)) { 3409 if (!cxcursor::isFirstInDeclGroup(C)) 3410 R.setBegin(VD->getLocation()); 3411 } 3412 } 3413 3414 return R; 3415 } 3416 3417 return getRawCursorExtent(C); 3418} 3419 3420extern "C" { 3421 3422CXSourceRange clang_getCursorExtent(CXCursor C) { 3423 SourceRange R = getRawCursorExtent(C); 3424 if (R.isInvalid()) 3425 return clang_getNullRange(); 3426 3427 return cxloc::translateSourceRange(getCursorContext(C), R); 3428} 3429 3430CXCursor clang_getCursorReferenced(CXCursor C) { 3431 if (clang_isInvalid(C.kind)) 3432 return clang_getNullCursor(); 3433 3434 CXTranslationUnit tu = getCursorTU(C); 3435 if (clang_isDeclaration(C.kind)) { 3436 Decl *D = getCursorDecl(C); 3437 if (UsingDecl *Using = dyn_cast<UsingDecl>(D)) 3438 return MakeCursorOverloadedDeclRef(Using, D->getLocation(), tu); 3439 if (ObjCClassDecl *Classes = dyn_cast<ObjCClassDecl>(D)) 3440 return MakeCursorOverloadedDeclRef(Classes, D->getLocation(), tu); 3441 if (ObjCForwardProtocolDecl *Protocols 3442 = dyn_cast<ObjCForwardProtocolDecl>(D)) 3443 return MakeCursorOverloadedDeclRef(Protocols, D->getLocation(), tu); 3444 if (ObjCPropertyImplDecl *PropImpl =llvm::dyn_cast<ObjCPropertyImplDecl>(D)) 3445 if (ObjCPropertyDecl *Property = PropImpl->getPropertyDecl()) 3446 return MakeCXCursor(Property, tu); 3447 3448 return C; 3449 } 3450 3451 if (clang_isExpression(C.kind)) { 3452 Expr *E = getCursorExpr(C); 3453 Decl *D = getDeclFromExpr(E); 3454 if (D) 3455 return MakeCXCursor(D, tu); 3456 3457 if (OverloadExpr *Ovl = dyn_cast_or_null<OverloadExpr>(E)) 3458 return MakeCursorOverloadedDeclRef(Ovl, tu); 3459 3460 return clang_getNullCursor(); 3461 } 3462 3463 if (clang_isStatement(C.kind)) { 3464 Stmt *S = getCursorStmt(C); 3465 if (GotoStmt *Goto = dyn_cast_or_null<GotoStmt>(S)) 3466 return MakeCXCursor(Goto->getLabel(), getCursorDecl(C), tu); 3467 3468 return clang_getNullCursor(); 3469 } 3470 3471 if (C.kind == CXCursor_MacroInstantiation) { 3472 if (MacroDefinition *Def = getCursorMacroInstantiation(C)->getDefinition()) 3473 return MakeMacroDefinitionCursor(Def, tu); 3474 } 3475 3476 if (!clang_isReference(C.kind)) 3477 return clang_getNullCursor(); 3478 3479 switch (C.kind) { 3480 case CXCursor_ObjCSuperClassRef: 3481 return MakeCXCursor(getCursorObjCSuperClassRef(C).first, tu); 3482 3483 case CXCursor_ObjCProtocolRef: { 3484 return MakeCXCursor(getCursorObjCProtocolRef(C).first, tu); 3485 3486 case CXCursor_ObjCClassRef: 3487 return MakeCXCursor(getCursorObjCClassRef(C).first, tu ); 3488 3489 case CXCursor_TypeRef: 3490 return MakeCXCursor(getCursorTypeRef(C).first, tu ); 3491 3492 case CXCursor_TemplateRef: 3493 return MakeCXCursor(getCursorTemplateRef(C).first, tu ); 3494 3495 case CXCursor_NamespaceRef: 3496 return MakeCXCursor(getCursorNamespaceRef(C).first, tu ); 3497 3498 case CXCursor_MemberRef: 3499 return MakeCXCursor(getCursorMemberRef(C).first, tu ); 3500 3501 case CXCursor_CXXBaseSpecifier: { 3502 CXXBaseSpecifier *B = cxcursor::getCursorCXXBaseSpecifier(C); 3503 return clang_getTypeDeclaration(cxtype::MakeCXType(B->getType(), 3504 tu )); 3505 } 3506 3507 case CXCursor_LabelRef: 3508 // FIXME: We end up faking the "parent" declaration here because we 3509 // don't want to make CXCursor larger. 3510 return MakeCXCursor(getCursorLabelRef(C).first, 3511 static_cast<ASTUnit*>(tu->TUData)->getASTContext() 3512 .getTranslationUnitDecl(), 3513 tu); 3514 3515 case CXCursor_OverloadedDeclRef: 3516 return C; 3517 3518 default: 3519 // We would prefer to enumerate all non-reference cursor kinds here. 3520 llvm_unreachable("Unhandled reference cursor kind"); 3521 break; 3522 } 3523 } 3524 3525 return clang_getNullCursor(); 3526} 3527 3528CXCursor clang_getCursorDefinition(CXCursor C) { 3529 if (clang_isInvalid(C.kind)) 3530 return clang_getNullCursor(); 3531 3532 CXTranslationUnit TU = getCursorTU(C); 3533 3534 bool WasReference = false; 3535 if (clang_isReference(C.kind) || clang_isExpression(C.kind)) { 3536 C = clang_getCursorReferenced(C); 3537 WasReference = true; 3538 } 3539 3540 if (C.kind == CXCursor_MacroInstantiation) 3541 return clang_getCursorReferenced(C); 3542 3543 if (!clang_isDeclaration(C.kind)) 3544 return clang_getNullCursor(); 3545 3546 Decl *D = getCursorDecl(C); 3547 if (!D) 3548 return clang_getNullCursor(); 3549 3550 switch (D->getKind()) { 3551 // Declaration kinds that don't really separate the notions of 3552 // declaration and definition. 3553 case Decl::Namespace: 3554 case Decl::Typedef: 3555 case Decl::TemplateTypeParm: 3556 case Decl::EnumConstant: 3557 case Decl::Field: 3558 case Decl::IndirectField: 3559 case Decl::ObjCIvar: 3560 case Decl::ObjCAtDefsField: 3561 case Decl::ImplicitParam: 3562 case Decl::ParmVar: 3563 case Decl::NonTypeTemplateParm: 3564 case Decl::TemplateTemplateParm: 3565 case Decl::ObjCCategoryImpl: 3566 case Decl::ObjCImplementation: 3567 case Decl::AccessSpec: 3568 case Decl::LinkageSpec: 3569 case Decl::ObjCPropertyImpl: 3570 case Decl::FileScopeAsm: 3571 case Decl::StaticAssert: 3572 case Decl::Block: 3573 return C; 3574 3575 // Declaration kinds that don't make any sense here, but are 3576 // nonetheless harmless. 3577 case Decl::TranslationUnit: 3578 break; 3579 3580 // Declaration kinds for which the definition is not resolvable. 3581 case Decl::UnresolvedUsingTypename: 3582 case Decl::UnresolvedUsingValue: 3583 break; 3584 3585 case Decl::UsingDirective: 3586 return MakeCXCursor(cast<UsingDirectiveDecl>(D)->getNominatedNamespace(), 3587 TU); 3588 3589 case Decl::NamespaceAlias: 3590 return MakeCXCursor(cast<NamespaceAliasDecl>(D)->getNamespace(), TU); 3591 3592 case Decl::Enum: 3593 case Decl::Record: 3594 case Decl::CXXRecord: 3595 case Decl::ClassTemplateSpecialization: 3596 case Decl::ClassTemplatePartialSpecialization: 3597 if (TagDecl *Def = cast<TagDecl>(D)->getDefinition()) 3598 return MakeCXCursor(Def, TU); 3599 return clang_getNullCursor(); 3600 3601 case Decl::Function: 3602 case Decl::CXXMethod: 3603 case Decl::CXXConstructor: 3604 case Decl::CXXDestructor: 3605 case Decl::CXXConversion: { 3606 const FunctionDecl *Def = 0; 3607 if (cast<FunctionDecl>(D)->getBody(Def)) 3608 return MakeCXCursor(const_cast<FunctionDecl *>(Def), TU); 3609 return clang_getNullCursor(); 3610 } 3611 3612 case Decl::Var: { 3613 // Ask the variable if it has a definition. 3614 if (VarDecl *Def = cast<VarDecl>(D)->getDefinition()) 3615 return MakeCXCursor(Def, TU); 3616 return clang_getNullCursor(); 3617 } 3618 3619 case Decl::FunctionTemplate: { 3620 const FunctionDecl *Def = 0; 3621 if (cast<FunctionTemplateDecl>(D)->getTemplatedDecl()->getBody(Def)) 3622 return MakeCXCursor(Def->getDescribedFunctionTemplate(), TU); 3623 return clang_getNullCursor(); 3624 } 3625 3626 case Decl::ClassTemplate: { 3627 if (RecordDecl *Def = cast<ClassTemplateDecl>(D)->getTemplatedDecl() 3628 ->getDefinition()) 3629 return MakeCXCursor(cast<CXXRecordDecl>(Def)->getDescribedClassTemplate(), 3630 TU); 3631 return clang_getNullCursor(); 3632 } 3633 3634 case Decl::Using: 3635 return MakeCursorOverloadedDeclRef(cast<UsingDecl>(D), 3636 D->getLocation(), TU); 3637 3638 case Decl::UsingShadow: 3639 return clang_getCursorDefinition( 3640 MakeCXCursor(cast<UsingShadowDecl>(D)->getTargetDecl(), 3641 TU)); 3642 3643 case Decl::ObjCMethod: { 3644 ObjCMethodDecl *Method = cast<ObjCMethodDecl>(D); 3645 if (Method->isThisDeclarationADefinition()) 3646 return C; 3647 3648 // Dig out the method definition in the associated 3649 // @implementation, if we have it. 3650 // FIXME: The ASTs should make finding the definition easier. 3651 if (ObjCInterfaceDecl *Class 3652 = dyn_cast<ObjCInterfaceDecl>(Method->getDeclContext())) 3653 if (ObjCImplementationDecl *ClassImpl = Class->getImplementation()) 3654 if (ObjCMethodDecl *Def = ClassImpl->getMethod(Method->getSelector(), 3655 Method->isInstanceMethod())) 3656 if (Def->isThisDeclarationADefinition()) 3657 return MakeCXCursor(Def, TU); 3658 3659 return clang_getNullCursor(); 3660 } 3661 3662 case Decl::ObjCCategory: 3663 if (ObjCCategoryImplDecl *Impl 3664 = cast<ObjCCategoryDecl>(D)->getImplementation()) 3665 return MakeCXCursor(Impl, TU); 3666 return clang_getNullCursor(); 3667 3668 case Decl::ObjCProtocol: 3669 if (!cast<ObjCProtocolDecl>(D)->isForwardDecl()) 3670 return C; 3671 return clang_getNullCursor(); 3672 3673 case Decl::ObjCInterface: 3674 // There are two notions of a "definition" for an Objective-C 3675 // class: the interface and its implementation. When we resolved a 3676 // reference to an Objective-C class, produce the @interface as 3677 // the definition; when we were provided with the interface, 3678 // produce the @implementation as the definition. 3679 if (WasReference) { 3680 if (!cast<ObjCInterfaceDecl>(D)->isForwardDecl()) 3681 return C; 3682 } else if (ObjCImplementationDecl *Impl 3683 = cast<ObjCInterfaceDecl>(D)->getImplementation()) 3684 return MakeCXCursor(Impl, TU); 3685 return clang_getNullCursor(); 3686 3687 case Decl::ObjCProperty: 3688 // FIXME: We don't really know where to find the 3689 // ObjCPropertyImplDecls that implement this property. 3690 return clang_getNullCursor(); 3691 3692 case Decl::ObjCCompatibleAlias: 3693 if (ObjCInterfaceDecl *Class 3694 = cast<ObjCCompatibleAliasDecl>(D)->getClassInterface()) 3695 if (!Class->isForwardDecl()) 3696 return MakeCXCursor(Class, TU); 3697 3698 return clang_getNullCursor(); 3699 3700 case Decl::ObjCForwardProtocol: 3701 return MakeCursorOverloadedDeclRef(cast<ObjCForwardProtocolDecl>(D), 3702 D->getLocation(), TU); 3703 3704 case Decl::ObjCClass: 3705 return MakeCursorOverloadedDeclRef(cast<ObjCClassDecl>(D), D->getLocation(), 3706 TU); 3707 3708 case Decl::Friend: 3709 if (NamedDecl *Friend = cast<FriendDecl>(D)->getFriendDecl()) 3710 return clang_getCursorDefinition(MakeCXCursor(Friend, TU)); 3711 return clang_getNullCursor(); 3712 3713 case Decl::FriendTemplate: 3714 if (NamedDecl *Friend = cast<FriendTemplateDecl>(D)->getFriendDecl()) 3715 return clang_getCursorDefinition(MakeCXCursor(Friend, TU)); 3716 return clang_getNullCursor(); 3717 } 3718 3719 return clang_getNullCursor(); 3720} 3721 3722unsigned clang_isCursorDefinition(CXCursor C) { 3723 if (!clang_isDeclaration(C.kind)) 3724 return 0; 3725 3726 return clang_getCursorDefinition(C) == C; 3727} 3728 3729CXCursor clang_getCanonicalCursor(CXCursor C) { 3730 if (!clang_isDeclaration(C.kind)) 3731 return C; 3732 3733 if (Decl *D = getCursorDecl(C)) 3734 return MakeCXCursor(D->getCanonicalDecl(), getCursorTU(C)); 3735 3736 return C; 3737} 3738 3739unsigned clang_getNumOverloadedDecls(CXCursor C) { 3740 if (C.kind != CXCursor_OverloadedDeclRef) 3741 return 0; 3742 3743 OverloadedDeclRefStorage Storage = getCursorOverloadedDeclRef(C).first; 3744 if (OverloadExpr *E = Storage.dyn_cast<OverloadExpr *>()) 3745 return E->getNumDecls(); 3746 3747 if (OverloadedTemplateStorage *S 3748 = Storage.dyn_cast<OverloadedTemplateStorage*>()) 3749 return S->size(); 3750 3751 Decl *D = Storage.get<Decl*>(); 3752 if (UsingDecl *Using = dyn_cast<UsingDecl>(D)) 3753 return Using->shadow_size(); 3754 if (ObjCClassDecl *Classes = dyn_cast<ObjCClassDecl>(D)) 3755 return Classes->size(); 3756 if (ObjCForwardProtocolDecl *Protocols =dyn_cast<ObjCForwardProtocolDecl>(D)) 3757 return Protocols->protocol_size(); 3758 3759 return 0; 3760} 3761 3762CXCursor clang_getOverloadedDecl(CXCursor cursor, unsigned index) { 3763 if (cursor.kind != CXCursor_OverloadedDeclRef) 3764 return clang_getNullCursor(); 3765 3766 if (index >= clang_getNumOverloadedDecls(cursor)) 3767 return clang_getNullCursor(); 3768 3769 CXTranslationUnit TU = getCursorTU(cursor); 3770 OverloadedDeclRefStorage Storage = getCursorOverloadedDeclRef(cursor).first; 3771 if (OverloadExpr *E = Storage.dyn_cast<OverloadExpr *>()) 3772 return MakeCXCursor(E->decls_begin()[index], TU); 3773 3774 if (OverloadedTemplateStorage *S 3775 = Storage.dyn_cast<OverloadedTemplateStorage*>()) 3776 return MakeCXCursor(S->begin()[index], TU); 3777 3778 Decl *D = Storage.get<Decl*>(); 3779 if (UsingDecl *Using = dyn_cast<UsingDecl>(D)) { 3780 // FIXME: This is, unfortunately, linear time. 3781 UsingDecl::shadow_iterator Pos = Using->shadow_begin(); 3782 std::advance(Pos, index); 3783 return MakeCXCursor(cast<UsingShadowDecl>(*Pos)->getTargetDecl(), TU); 3784 } 3785 3786 if (ObjCClassDecl *Classes = dyn_cast<ObjCClassDecl>(D)) 3787 return MakeCXCursor(Classes->begin()[index].getInterface(), TU); 3788 3789 if (ObjCForwardProtocolDecl *Protocols = dyn_cast<ObjCForwardProtocolDecl>(D)) 3790 return MakeCXCursor(Protocols->protocol_begin()[index], TU); 3791 3792 return clang_getNullCursor(); 3793} 3794 3795void clang_getDefinitionSpellingAndExtent(CXCursor C, 3796 const char **startBuf, 3797 const char **endBuf, 3798 unsigned *startLine, 3799 unsigned *startColumn, 3800 unsigned *endLine, 3801 unsigned *endColumn) { 3802 assert(getCursorDecl(C) && "CXCursor has null decl"); 3803 NamedDecl *ND = static_cast<NamedDecl *>(getCursorDecl(C)); 3804 FunctionDecl *FD = dyn_cast<FunctionDecl>(ND); 3805 CompoundStmt *Body = dyn_cast<CompoundStmt>(FD->getBody()); 3806 3807 SourceManager &SM = FD->getASTContext().getSourceManager(); 3808 *startBuf = SM.getCharacterData(Body->getLBracLoc()); 3809 *endBuf = SM.getCharacterData(Body->getRBracLoc()); 3810 *startLine = SM.getSpellingLineNumber(Body->getLBracLoc()); 3811 *startColumn = SM.getSpellingColumnNumber(Body->getLBracLoc()); 3812 *endLine = SM.getSpellingLineNumber(Body->getRBracLoc()); 3813 *endColumn = SM.getSpellingColumnNumber(Body->getRBracLoc()); 3814} 3815 3816void clang_enableStackTraces(void) { 3817 llvm::sys::PrintStackTraceOnErrorSignal(); 3818} 3819 3820void clang_executeOnThread(void (*fn)(void*), void *user_data, 3821 unsigned stack_size) { 3822 llvm::llvm_execute_on_thread(fn, user_data, stack_size); 3823} 3824 3825} // end: extern "C" 3826 3827//===----------------------------------------------------------------------===// 3828// Token-based Operations. 3829//===----------------------------------------------------------------------===// 3830 3831/* CXToken layout: 3832 * int_data[0]: a CXTokenKind 3833 * int_data[1]: starting token location 3834 * int_data[2]: token length 3835 * int_data[3]: reserved 3836 * ptr_data: for identifiers and keywords, an IdentifierInfo*. 3837 * otherwise unused. 3838 */ 3839extern "C" { 3840 3841CXTokenKind clang_getTokenKind(CXToken CXTok) { 3842 return static_cast<CXTokenKind>(CXTok.int_data[0]); 3843} 3844 3845CXString clang_getTokenSpelling(CXTranslationUnit TU, CXToken CXTok) { 3846 switch (clang_getTokenKind(CXTok)) { 3847 case CXToken_Identifier: 3848 case CXToken_Keyword: 3849 // We know we have an IdentifierInfo*, so use that. 3850 return createCXString(static_cast<IdentifierInfo *>(CXTok.ptr_data) 3851 ->getNameStart()); 3852 3853 case CXToken_Literal: { 3854 // We have stashed the starting pointer in the ptr_data field. Use it. 3855 const char *Text = static_cast<const char *>(CXTok.ptr_data); 3856 return createCXString(llvm::StringRef(Text, CXTok.int_data[2])); 3857 } 3858 3859 case CXToken_Punctuation: 3860 case CXToken_Comment: 3861 break; 3862 } 3863 3864 // We have to find the starting buffer pointer the hard way, by 3865 // deconstructing the source location. 3866 ASTUnit *CXXUnit = static_cast<ASTUnit *>(TU->TUData); 3867 if (!CXXUnit) 3868 return createCXString(""); 3869 3870 SourceLocation Loc = SourceLocation::getFromRawEncoding(CXTok.int_data[1]); 3871 std::pair<FileID, unsigned> LocInfo 3872 = CXXUnit->getSourceManager().getDecomposedLoc(Loc); 3873 bool Invalid = false; 3874 llvm::StringRef Buffer 3875 = CXXUnit->getSourceManager().getBufferData(LocInfo.first, &Invalid); 3876 if (Invalid) 3877 return createCXString(""); 3878 3879 return createCXString(Buffer.substr(LocInfo.second, CXTok.int_data[2])); 3880} 3881 3882CXSourceLocation clang_getTokenLocation(CXTranslationUnit TU, CXToken CXTok) { 3883 ASTUnit *CXXUnit = static_cast<ASTUnit *>(TU->TUData); 3884 if (!CXXUnit) 3885 return clang_getNullLocation(); 3886 3887 return cxloc::translateSourceLocation(CXXUnit->getASTContext(), 3888 SourceLocation::getFromRawEncoding(CXTok.int_data[1])); 3889} 3890 3891CXSourceRange clang_getTokenExtent(CXTranslationUnit TU, CXToken CXTok) { 3892 ASTUnit *CXXUnit = static_cast<ASTUnit *>(TU->TUData); 3893 if (!CXXUnit) 3894 return clang_getNullRange(); 3895 3896 return cxloc::translateSourceRange(CXXUnit->getASTContext(), 3897 SourceLocation::getFromRawEncoding(CXTok.int_data[1])); 3898} 3899 3900void clang_tokenize(CXTranslationUnit TU, CXSourceRange Range, 3901 CXToken **Tokens, unsigned *NumTokens) { 3902 if (Tokens) 3903 *Tokens = 0; 3904 if (NumTokens) 3905 *NumTokens = 0; 3906 3907 ASTUnit *CXXUnit = static_cast<ASTUnit *>(TU->TUData); 3908 if (!CXXUnit || !Tokens || !NumTokens) 3909 return; 3910 3911 ASTUnit::ConcurrencyCheck Check(*CXXUnit); 3912 3913 SourceRange R = cxloc::translateCXSourceRange(Range); 3914 if (R.isInvalid()) 3915 return; 3916 3917 SourceManager &SourceMgr = CXXUnit->getSourceManager(); 3918 std::pair<FileID, unsigned> BeginLocInfo 3919 = SourceMgr.getDecomposedLoc(R.getBegin()); 3920 std::pair<FileID, unsigned> EndLocInfo 3921 = SourceMgr.getDecomposedLoc(R.getEnd()); 3922 3923 // Cannot tokenize across files. 3924 if (BeginLocInfo.first != EndLocInfo.first) 3925 return; 3926 3927 // Create a lexer 3928 bool Invalid = false; 3929 llvm::StringRef Buffer 3930 = SourceMgr.getBufferData(BeginLocInfo.first, &Invalid); 3931 if (Invalid) 3932 return; 3933 3934 Lexer Lex(SourceMgr.getLocForStartOfFile(BeginLocInfo.first), 3935 CXXUnit->getASTContext().getLangOptions(), 3936 Buffer.begin(), Buffer.data() + BeginLocInfo.second, Buffer.end()); 3937 Lex.SetCommentRetentionState(true); 3938 3939 // Lex tokens until we hit the end of the range. 3940 const char *EffectiveBufferEnd = Buffer.data() + EndLocInfo.second; 3941 llvm::SmallVector<CXToken, 32> CXTokens; 3942 Token Tok; 3943 bool previousWasAt = false; 3944 do { 3945 // Lex the next token 3946 Lex.LexFromRawLexer(Tok); 3947 if (Tok.is(tok::eof)) 3948 break; 3949 3950 // Initialize the CXToken. 3951 CXToken CXTok; 3952 3953 // - Common fields 3954 CXTok.int_data[1] = Tok.getLocation().getRawEncoding(); 3955 CXTok.int_data[2] = Tok.getLength(); 3956 CXTok.int_data[3] = 0; 3957 3958 // - Kind-specific fields 3959 if (Tok.isLiteral()) { 3960 CXTok.int_data[0] = CXToken_Literal; 3961 CXTok.ptr_data = (void *)Tok.getLiteralData(); 3962 } else if (Tok.is(tok::identifier)) { 3963 // Lookup the identifier to determine whether we have a keyword. 3964 std::pair<FileID, unsigned> LocInfo 3965 = SourceMgr.getDecomposedLoc(Tok.getLocation()); 3966 bool Invalid = false; 3967 llvm::StringRef Buf 3968 = CXXUnit->getSourceManager().getBufferData(LocInfo.first, &Invalid); 3969 if (Invalid) 3970 return; 3971 3972 const char *StartPos = Buf.data() + LocInfo.second; 3973 IdentifierInfo *II 3974 = CXXUnit->getPreprocessor().LookUpIdentifierInfo(Tok, StartPos); 3975 3976 if ((II->getObjCKeywordID() != tok::objc_not_keyword) && previousWasAt) { 3977 CXTok.int_data[0] = CXToken_Keyword; 3978 } 3979 else { 3980 CXTok.int_data[0] = II->getTokenID() == tok::identifier? 3981 CXToken_Identifier 3982 : CXToken_Keyword; 3983 } 3984 CXTok.ptr_data = II; 3985 } else if (Tok.is(tok::comment)) { 3986 CXTok.int_data[0] = CXToken_Comment; 3987 CXTok.ptr_data = 0; 3988 } else { 3989 CXTok.int_data[0] = CXToken_Punctuation; 3990 CXTok.ptr_data = 0; 3991 } 3992 CXTokens.push_back(CXTok); 3993 previousWasAt = Tok.is(tok::at); 3994 } while (Lex.getBufferLocation() <= EffectiveBufferEnd); 3995 3996 if (CXTokens.empty()) 3997 return; 3998 3999 *Tokens = (CXToken *)malloc(sizeof(CXToken) * CXTokens.size()); 4000 memmove(*Tokens, CXTokens.data(), sizeof(CXToken) * CXTokens.size()); 4001 *NumTokens = CXTokens.size(); 4002} 4003 4004void clang_disposeTokens(CXTranslationUnit TU, 4005 CXToken *Tokens, unsigned NumTokens) { 4006 free(Tokens); 4007} 4008 4009} // end: extern "C" 4010 4011//===----------------------------------------------------------------------===// 4012// Token annotation APIs. 4013//===----------------------------------------------------------------------===// 4014 4015typedef llvm::DenseMap<unsigned, CXCursor> AnnotateTokensData; 4016static enum CXChildVisitResult AnnotateTokensVisitor(CXCursor cursor, 4017 CXCursor parent, 4018 CXClientData client_data); 4019namespace { 4020class AnnotateTokensWorker { 4021 AnnotateTokensData &Annotated; 4022 CXToken *Tokens; 4023 CXCursor *Cursors; 4024 unsigned NumTokens; 4025 unsigned TokIdx; 4026 unsigned PreprocessingTokIdx; 4027 CursorVisitor AnnotateVis; 4028 SourceManager &SrcMgr; 4029 4030 bool MoreTokens() const { return TokIdx < NumTokens; } 4031 unsigned NextToken() const { return TokIdx; } 4032 void AdvanceToken() { ++TokIdx; } 4033 SourceLocation GetTokenLoc(unsigned tokI) { 4034 return SourceLocation::getFromRawEncoding(Tokens[tokI].int_data[1]); 4035 } 4036 4037public: 4038 AnnotateTokensWorker(AnnotateTokensData &annotated, 4039 CXToken *tokens, CXCursor *cursors, unsigned numTokens, 4040 CXTranslationUnit tu, SourceRange RegionOfInterest) 4041 : Annotated(annotated), Tokens(tokens), Cursors(cursors), 4042 NumTokens(numTokens), TokIdx(0), PreprocessingTokIdx(0), 4043 AnnotateVis(tu, 4044 AnnotateTokensVisitor, this, 4045 Decl::MaxPCHLevel, RegionOfInterest), 4046 SrcMgr(static_cast<ASTUnit*>(tu->TUData)->getSourceManager()) {} 4047 4048 void VisitChildren(CXCursor C) { AnnotateVis.VisitChildren(C); } 4049 enum CXChildVisitResult Visit(CXCursor cursor, CXCursor parent); 4050 void AnnotateTokens(CXCursor parent); 4051 void AnnotateTokens() { 4052 AnnotateTokens(clang_getTranslationUnitCursor(AnnotateVis.getTU())); 4053 } 4054}; 4055} 4056 4057void AnnotateTokensWorker::AnnotateTokens(CXCursor parent) { 4058 // Walk the AST within the region of interest, annotating tokens 4059 // along the way. 4060 VisitChildren(parent); 4061 4062 for (unsigned I = 0 ; I < TokIdx ; ++I) { 4063 AnnotateTokensData::iterator Pos = Annotated.find(Tokens[I].int_data[1]); 4064 if (Pos != Annotated.end() && 4065 (clang_isInvalid(Cursors[I].kind) || 4066 Pos->second.kind != CXCursor_PreprocessingDirective)) 4067 Cursors[I] = Pos->second; 4068 } 4069 4070 // Finish up annotating any tokens left. 4071 if (!MoreTokens()) 4072 return; 4073 4074 const CXCursor &C = clang_getNullCursor(); 4075 for (unsigned I = TokIdx ; I < NumTokens ; ++I) { 4076 AnnotateTokensData::iterator Pos = Annotated.find(Tokens[I].int_data[1]); 4077 Cursors[I] = (Pos == Annotated.end()) ? C : Pos->second; 4078 } 4079} 4080 4081enum CXChildVisitResult 4082AnnotateTokensWorker::Visit(CXCursor cursor, CXCursor parent) { 4083 CXSourceLocation Loc = clang_getCursorLocation(cursor); 4084 SourceRange cursorRange = getRawCursorExtent(cursor); 4085 if (cursorRange.isInvalid()) 4086 return CXChildVisit_Recurse; 4087 4088 if (clang_isPreprocessing(cursor.kind)) { 4089 // For macro instantiations, just note where the beginning of the macro 4090 // instantiation occurs. 4091 if (cursor.kind == CXCursor_MacroInstantiation) { 4092 Annotated[Loc.int_data] = cursor; 4093 return CXChildVisit_Recurse; 4094 } 4095 4096 // Items in the preprocessing record are kept separate from items in 4097 // declarations, so we keep a separate token index. 4098 unsigned SavedTokIdx = TokIdx; 4099 TokIdx = PreprocessingTokIdx; 4100 4101 // Skip tokens up until we catch up to the beginning of the preprocessing 4102 // entry. 4103 while (MoreTokens()) { 4104 const unsigned I = NextToken(); 4105 SourceLocation TokLoc = GetTokenLoc(I); 4106 switch (LocationCompare(SrcMgr, TokLoc, cursorRange)) { 4107 case RangeBefore: 4108 AdvanceToken(); 4109 continue; 4110 case RangeAfter: 4111 case RangeOverlap: 4112 break; 4113 } 4114 break; 4115 } 4116 4117 // Look at all of the tokens within this range. 4118 while (MoreTokens()) { 4119 const unsigned I = NextToken(); 4120 SourceLocation TokLoc = GetTokenLoc(I); 4121 switch (LocationCompare(SrcMgr, TokLoc, cursorRange)) { 4122 case RangeBefore: 4123 assert(0 && "Infeasible"); 4124 case RangeAfter: 4125 break; 4126 case RangeOverlap: 4127 Cursors[I] = cursor; 4128 AdvanceToken(); 4129 continue; 4130 } 4131 break; 4132 } 4133 4134 // Save the preprocessing token index; restore the non-preprocessing 4135 // token index. 4136 PreprocessingTokIdx = TokIdx; 4137 TokIdx = SavedTokIdx; 4138 return CXChildVisit_Recurse; 4139 } 4140 4141 if (cursorRange.isInvalid()) 4142 return CXChildVisit_Continue; 4143 4144 SourceLocation L = SourceLocation::getFromRawEncoding(Loc.int_data); 4145 4146 // Adjust the annotated range based specific declarations. 4147 const enum CXCursorKind cursorK = clang_getCursorKind(cursor); 4148 if (cursorK >= CXCursor_FirstDecl && cursorK <= CXCursor_LastDecl) { 4149 Decl *D = cxcursor::getCursorDecl(cursor); 4150 // Don't visit synthesized ObjC methods, since they have no syntatic 4151 // representation in the source. 4152 if (const ObjCMethodDecl *MD = dyn_cast<ObjCMethodDecl>(D)) { 4153 if (MD->isSynthesized()) 4154 return CXChildVisit_Continue; 4155 } 4156 if (const DeclaratorDecl *DD = dyn_cast<DeclaratorDecl>(D)) { 4157 if (TypeSourceInfo *TI = DD->getTypeSourceInfo()) { 4158 TypeLoc TL = TI->getTypeLoc(); 4159 SourceLocation TLoc = TL.getSourceRange().getBegin(); 4160 if (TLoc.isValid() && L.isValid() && 4161 SrcMgr.isBeforeInTranslationUnit(TLoc, L)) 4162 cursorRange.setBegin(TLoc); 4163 } 4164 } 4165 } 4166 4167 // If the location of the cursor occurs within a macro instantiation, record 4168 // the spelling location of the cursor in our annotation map. We can then 4169 // paper over the token labelings during a post-processing step to try and 4170 // get cursor mappings for tokens that are the *arguments* of a macro 4171 // instantiation. 4172 if (L.isMacroID()) { 4173 unsigned rawEncoding = SrcMgr.getSpellingLoc(L).getRawEncoding(); 4174 // Only invalidate the old annotation if it isn't part of a preprocessing 4175 // directive. Here we assume that the default construction of CXCursor 4176 // results in CXCursor.kind being an initialized value (i.e., 0). If 4177 // this isn't the case, we can fix by doing lookup + insertion. 4178 4179 CXCursor &oldC = Annotated[rawEncoding]; 4180 if (!clang_isPreprocessing(oldC.kind)) 4181 oldC = cursor; 4182 } 4183 4184 const enum CXCursorKind K = clang_getCursorKind(parent); 4185 const CXCursor updateC = 4186 (clang_isInvalid(K) || K == CXCursor_TranslationUnit) 4187 ? clang_getNullCursor() : parent; 4188 4189 while (MoreTokens()) { 4190 const unsigned I = NextToken(); 4191 SourceLocation TokLoc = GetTokenLoc(I); 4192 switch (LocationCompare(SrcMgr, TokLoc, cursorRange)) { 4193 case RangeBefore: 4194 Cursors[I] = updateC; 4195 AdvanceToken(); 4196 continue; 4197 case RangeAfter: 4198 case RangeOverlap: 4199 break; 4200 } 4201 break; 4202 } 4203 4204 // Visit children to get their cursor information. 4205 const unsigned BeforeChildren = NextToken(); 4206 VisitChildren(cursor); 4207 const unsigned AfterChildren = NextToken(); 4208 4209 // Adjust 'Last' to the last token within the extent of the cursor. 4210 while (MoreTokens()) { 4211 const unsigned I = NextToken(); 4212 SourceLocation TokLoc = GetTokenLoc(I); 4213 switch (LocationCompare(SrcMgr, TokLoc, cursorRange)) { 4214 case RangeBefore: 4215 assert(0 && "Infeasible"); 4216 case RangeAfter: 4217 break; 4218 case RangeOverlap: 4219 Cursors[I] = updateC; 4220 AdvanceToken(); 4221 continue; 4222 } 4223 break; 4224 } 4225 const unsigned Last = NextToken(); 4226 4227 // Scan the tokens that are at the beginning of the cursor, but are not 4228 // capture by the child cursors. 4229 4230 // For AST elements within macros, rely on a post-annotate pass to 4231 // to correctly annotate the tokens with cursors. Otherwise we can 4232 // get confusing results of having tokens that map to cursors that really 4233 // are expanded by an instantiation. 4234 if (L.isMacroID()) 4235 cursor = clang_getNullCursor(); 4236 4237 for (unsigned I = BeforeChildren; I != AfterChildren; ++I) { 4238 if (!clang_isInvalid(clang_getCursorKind(Cursors[I]))) 4239 break; 4240 4241 Cursors[I] = cursor; 4242 } 4243 // Scan the tokens that are at the end of the cursor, but are not captured 4244 // but the child cursors. 4245 for (unsigned I = AfterChildren; I != Last; ++I) 4246 Cursors[I] = cursor; 4247 4248 TokIdx = Last; 4249 return CXChildVisit_Continue; 4250} 4251 4252static enum CXChildVisitResult AnnotateTokensVisitor(CXCursor cursor, 4253 CXCursor parent, 4254 CXClientData client_data) { 4255 return static_cast<AnnotateTokensWorker*>(client_data)->Visit(cursor, parent); 4256} 4257 4258// This gets run a separate thread to avoid stack blowout. 4259static void runAnnotateTokensWorker(void *UserData) { 4260 ((AnnotateTokensWorker*)UserData)->AnnotateTokens(); 4261} 4262 4263extern "C" { 4264 4265void clang_annotateTokens(CXTranslationUnit TU, 4266 CXToken *Tokens, unsigned NumTokens, 4267 CXCursor *Cursors) { 4268 4269 if (NumTokens == 0 || !Tokens || !Cursors) 4270 return; 4271 4272 // Any token we don't specifically annotate will have a NULL cursor. 4273 CXCursor C = clang_getNullCursor(); 4274 for (unsigned I = 0; I != NumTokens; ++I) 4275 Cursors[I] = C; 4276 4277 ASTUnit *CXXUnit = static_cast<ASTUnit *>(TU->TUData); 4278 if (!CXXUnit) 4279 return; 4280 4281 ASTUnit::ConcurrencyCheck Check(*CXXUnit); 4282 4283 // Determine the region of interest, which contains all of the tokens. 4284 SourceRange RegionOfInterest; 4285 RegionOfInterest.setBegin(cxloc::translateSourceLocation( 4286 clang_getTokenLocation(TU, Tokens[0]))); 4287 RegionOfInterest.setEnd(cxloc::translateSourceLocation( 4288 clang_getTokenLocation(TU, 4289 Tokens[NumTokens - 1]))); 4290 4291 // A mapping from the source locations found when re-lexing or traversing the 4292 // region of interest to the corresponding cursors. 4293 AnnotateTokensData Annotated; 4294 4295 // Relex the tokens within the source range to look for preprocessing 4296 // directives. 4297 SourceManager &SourceMgr = CXXUnit->getSourceManager(); 4298 std::pair<FileID, unsigned> BeginLocInfo 4299 = SourceMgr.getDecomposedLoc(RegionOfInterest.getBegin()); 4300 std::pair<FileID, unsigned> EndLocInfo 4301 = SourceMgr.getDecomposedLoc(RegionOfInterest.getEnd()); 4302 4303 llvm::StringRef Buffer; 4304 bool Invalid = false; 4305 if (BeginLocInfo.first == EndLocInfo.first && 4306 ((Buffer = SourceMgr.getBufferData(BeginLocInfo.first, &Invalid)),true) && 4307 !Invalid) { 4308 Lexer Lex(SourceMgr.getLocForStartOfFile(BeginLocInfo.first), 4309 CXXUnit->getASTContext().getLangOptions(), 4310 Buffer.begin(), Buffer.data() + BeginLocInfo.second, 4311 Buffer.end()); 4312 Lex.SetCommentRetentionState(true); 4313 4314 // Lex tokens in raw mode until we hit the end of the range, to avoid 4315 // entering #includes or expanding macros. 4316 while (true) { 4317 Token Tok; 4318 Lex.LexFromRawLexer(Tok); 4319 4320 reprocess: 4321 if (Tok.is(tok::hash) && Tok.isAtStartOfLine()) { 4322 // We have found a preprocessing directive. Gobble it up so that we 4323 // don't see it while preprocessing these tokens later, but keep track 4324 // of all of the token locations inside this preprocessing directive so 4325 // that we can annotate them appropriately. 4326 // 4327 // FIXME: Some simple tests here could identify macro definitions and 4328 // #undefs, to provide specific cursor kinds for those. 4329 std::vector<SourceLocation> Locations; 4330 do { 4331 Locations.push_back(Tok.getLocation()); 4332 Lex.LexFromRawLexer(Tok); 4333 } while (!Tok.isAtStartOfLine() && !Tok.is(tok::eof)); 4334 4335 using namespace cxcursor; 4336 CXCursor Cursor 4337 = MakePreprocessingDirectiveCursor(SourceRange(Locations.front(), 4338 Locations.back()), 4339 TU); 4340 for (unsigned I = 0, N = Locations.size(); I != N; ++I) { 4341 Annotated[Locations[I].getRawEncoding()] = Cursor; 4342 } 4343 4344 if (Tok.isAtStartOfLine()) 4345 goto reprocess; 4346 4347 continue; 4348 } 4349 4350 if (Tok.is(tok::eof)) 4351 break; 4352 } 4353 } 4354 4355 // Annotate all of the source locations in the region of interest that map to 4356 // a specific cursor. 4357 AnnotateTokensWorker W(Annotated, Tokens, Cursors, NumTokens, 4358 TU, RegionOfInterest); 4359 4360 // Run the worker within a CrashRecoveryContext. 4361 // FIXME: We use a ridiculous stack size here because the data-recursion 4362 // algorithm uses a large stack frame than the non-data recursive version, 4363 // and AnnotationTokensWorker currently transforms the data-recursion 4364 // algorithm back into a traditional recursion by explicitly calling 4365 // VisitChildren(). We will need to remove this explicit recursive call. 4366 llvm::CrashRecoveryContext CRC; 4367 if (!RunSafely(CRC, runAnnotateTokensWorker, &W, 4368 GetSafetyThreadStackSize() * 2)) { 4369 fprintf(stderr, "libclang: crash detected while annotating tokens\n"); 4370 } 4371} 4372} // end: extern "C" 4373 4374//===----------------------------------------------------------------------===// 4375// Operations for querying linkage of a cursor. 4376//===----------------------------------------------------------------------===// 4377 4378extern "C" { 4379CXLinkageKind clang_getCursorLinkage(CXCursor cursor) { 4380 if (!clang_isDeclaration(cursor.kind)) 4381 return CXLinkage_Invalid; 4382 4383 Decl *D = cxcursor::getCursorDecl(cursor); 4384 if (NamedDecl *ND = dyn_cast_or_null<NamedDecl>(D)) 4385 switch (ND->getLinkage()) { 4386 case NoLinkage: return CXLinkage_NoLinkage; 4387 case InternalLinkage: return CXLinkage_Internal; 4388 case UniqueExternalLinkage: return CXLinkage_UniqueExternal; 4389 case ExternalLinkage: return CXLinkage_External; 4390 }; 4391 4392 return CXLinkage_Invalid; 4393} 4394} // end: extern "C" 4395 4396//===----------------------------------------------------------------------===// 4397// Operations for querying language of a cursor. 4398//===----------------------------------------------------------------------===// 4399 4400static CXLanguageKind getDeclLanguage(const Decl *D) { 4401 switch (D->getKind()) { 4402 default: 4403 break; 4404 case Decl::ImplicitParam: 4405 case Decl::ObjCAtDefsField: 4406 case Decl::ObjCCategory: 4407 case Decl::ObjCCategoryImpl: 4408 case Decl::ObjCClass: 4409 case Decl::ObjCCompatibleAlias: 4410 case Decl::ObjCForwardProtocol: 4411 case Decl::ObjCImplementation: 4412 case Decl::ObjCInterface: 4413 case Decl::ObjCIvar: 4414 case Decl::ObjCMethod: 4415 case Decl::ObjCProperty: 4416 case Decl::ObjCPropertyImpl: 4417 case Decl::ObjCProtocol: 4418 return CXLanguage_ObjC; 4419 case Decl::CXXConstructor: 4420 case Decl::CXXConversion: 4421 case Decl::CXXDestructor: 4422 case Decl::CXXMethod: 4423 case Decl::CXXRecord: 4424 case Decl::ClassTemplate: 4425 case Decl::ClassTemplatePartialSpecialization: 4426 case Decl::ClassTemplateSpecialization: 4427 case Decl::Friend: 4428 case Decl::FriendTemplate: 4429 case Decl::FunctionTemplate: 4430 case Decl::LinkageSpec: 4431 case Decl::Namespace: 4432 case Decl::NamespaceAlias: 4433 case Decl::NonTypeTemplateParm: 4434 case Decl::StaticAssert: 4435 case Decl::TemplateTemplateParm: 4436 case Decl::TemplateTypeParm: 4437 case Decl::UnresolvedUsingTypename: 4438 case Decl::UnresolvedUsingValue: 4439 case Decl::Using: 4440 case Decl::UsingDirective: 4441 case Decl::UsingShadow: 4442 return CXLanguage_CPlusPlus; 4443 } 4444 4445 return CXLanguage_C; 4446} 4447 4448extern "C" { 4449 4450enum CXAvailabilityKind clang_getCursorAvailability(CXCursor cursor) { 4451 if (clang_isDeclaration(cursor.kind)) 4452 if (Decl *D = cxcursor::getCursorDecl(cursor)) { 4453 if (D->hasAttr<UnavailableAttr>() || 4454 (isa<FunctionDecl>(D) && cast<FunctionDecl>(D)->isDeleted())) 4455 return CXAvailability_Available; 4456 4457 if (D->hasAttr<DeprecatedAttr>()) 4458 return CXAvailability_Deprecated; 4459 } 4460 4461 return CXAvailability_Available; 4462} 4463 4464CXLanguageKind clang_getCursorLanguage(CXCursor cursor) { 4465 if (clang_isDeclaration(cursor.kind)) 4466 return getDeclLanguage(cxcursor::getCursorDecl(cursor)); 4467 4468 return CXLanguage_Invalid; 4469} 4470 4471CXCursor clang_getCursorSemanticParent(CXCursor cursor) { 4472 if (clang_isDeclaration(cursor.kind)) { 4473 if (Decl *D = getCursorDecl(cursor)) { 4474 DeclContext *DC = D->getDeclContext(); 4475 return MakeCXCursor(cast<Decl>(DC), getCursorTU(cursor)); 4476 } 4477 } 4478 4479 if (clang_isStatement(cursor.kind) || clang_isExpression(cursor.kind)) { 4480 if (Decl *D = getCursorDecl(cursor)) 4481 return MakeCXCursor(D, getCursorTU(cursor)); 4482 } 4483 4484 return clang_getNullCursor(); 4485} 4486 4487CXCursor clang_getCursorLexicalParent(CXCursor cursor) { 4488 if (clang_isDeclaration(cursor.kind)) { 4489 if (Decl *D = getCursorDecl(cursor)) { 4490 DeclContext *DC = D->getLexicalDeclContext(); 4491 return MakeCXCursor(cast<Decl>(DC), getCursorTU(cursor)); 4492 } 4493 } 4494 4495 // FIXME: Note that we can't easily compute the lexical context of a 4496 // statement or expression, so we return nothing. 4497 return clang_getNullCursor(); 4498} 4499 4500static void CollectOverriddenMethods(DeclContext *Ctx, 4501 ObjCMethodDecl *Method, 4502 llvm::SmallVectorImpl<ObjCMethodDecl *> &Methods) { 4503 if (!Ctx) 4504 return; 4505 4506 // If we have a class or category implementation, jump straight to the 4507 // interface. 4508 if (ObjCImplDecl *Impl = dyn_cast<ObjCImplDecl>(Ctx)) 4509 return CollectOverriddenMethods(Impl->getClassInterface(), Method, Methods); 4510 4511 ObjCContainerDecl *Container = dyn_cast<ObjCContainerDecl>(Ctx); 4512 if (!Container) 4513 return; 4514 4515 // Check whether we have a matching method at this level. 4516 if (ObjCMethodDecl *Overridden = Container->getMethod(Method->getSelector(), 4517 Method->isInstanceMethod())) 4518 if (Method != Overridden) { 4519 // We found an override at this level; there is no need to look 4520 // into other protocols or categories. 4521 Methods.push_back(Overridden); 4522 return; 4523 } 4524 4525 if (ObjCProtocolDecl *Protocol = dyn_cast<ObjCProtocolDecl>(Container)) { 4526 for (ObjCProtocolDecl::protocol_iterator P = Protocol->protocol_begin(), 4527 PEnd = Protocol->protocol_end(); 4528 P != PEnd; ++P) 4529 CollectOverriddenMethods(*P, Method, Methods); 4530 } 4531 4532 if (ObjCCategoryDecl *Category = dyn_cast<ObjCCategoryDecl>(Container)) { 4533 for (ObjCCategoryDecl::protocol_iterator P = Category->protocol_begin(), 4534 PEnd = Category->protocol_end(); 4535 P != PEnd; ++P) 4536 CollectOverriddenMethods(*P, Method, Methods); 4537 } 4538 4539 if (ObjCInterfaceDecl *Interface = dyn_cast<ObjCInterfaceDecl>(Container)) { 4540 for (ObjCInterfaceDecl::protocol_iterator P = Interface->protocol_begin(), 4541 PEnd = Interface->protocol_end(); 4542 P != PEnd; ++P) 4543 CollectOverriddenMethods(*P, Method, Methods); 4544 4545 for (ObjCCategoryDecl *Category = Interface->getCategoryList(); 4546 Category; Category = Category->getNextClassCategory()) 4547 CollectOverriddenMethods(Category, Method, Methods); 4548 4549 // We only look into the superclass if we haven't found anything yet. 4550 if (Methods.empty()) 4551 if (ObjCInterfaceDecl *Super = Interface->getSuperClass()) 4552 return CollectOverriddenMethods(Super, Method, Methods); 4553 } 4554} 4555 4556void clang_getOverriddenCursors(CXCursor cursor, 4557 CXCursor **overridden, 4558 unsigned *num_overridden) { 4559 if (overridden) 4560 *overridden = 0; 4561 if (num_overridden) 4562 *num_overridden = 0; 4563 if (!overridden || !num_overridden) 4564 return; 4565 4566 if (!clang_isDeclaration(cursor.kind)) 4567 return; 4568 4569 Decl *D = getCursorDecl(cursor); 4570 if (!D) 4571 return; 4572 4573 // Handle C++ member functions. 4574 CXTranslationUnit TU = getCursorTU(cursor); 4575 if (CXXMethodDecl *CXXMethod = dyn_cast<CXXMethodDecl>(D)) { 4576 *num_overridden = CXXMethod->size_overridden_methods(); 4577 if (!*num_overridden) 4578 return; 4579 4580 *overridden = new CXCursor [*num_overridden]; 4581 unsigned I = 0; 4582 for (CXXMethodDecl::method_iterator 4583 M = CXXMethod->begin_overridden_methods(), 4584 MEnd = CXXMethod->end_overridden_methods(); 4585 M != MEnd; (void)++M, ++I) 4586 (*overridden)[I] = MakeCXCursor(const_cast<CXXMethodDecl*>(*M), TU); 4587 return; 4588 } 4589 4590 ObjCMethodDecl *Method = dyn_cast<ObjCMethodDecl>(D); 4591 if (!Method) 4592 return; 4593 4594 // Handle Objective-C methods. 4595 llvm::SmallVector<ObjCMethodDecl *, 4> Methods; 4596 CollectOverriddenMethods(Method->getDeclContext(), Method, Methods); 4597 4598 if (Methods.empty()) 4599 return; 4600 4601 *num_overridden = Methods.size(); 4602 *overridden = new CXCursor [Methods.size()]; 4603 for (unsigned I = 0, N = Methods.size(); I != N; ++I) 4604 (*overridden)[I] = MakeCXCursor(Methods[I], TU); 4605} 4606 4607void clang_disposeOverriddenCursors(CXCursor *overridden) { 4608 delete [] overridden; 4609} 4610 4611CXFile clang_getIncludedFile(CXCursor cursor) { 4612 if (cursor.kind != CXCursor_InclusionDirective) 4613 return 0; 4614 4615 InclusionDirective *ID = getCursorInclusionDirective(cursor); 4616 return (void *)ID->getFile(); 4617} 4618 4619} // end: extern "C" 4620 4621 4622//===----------------------------------------------------------------------===// 4623// C++ AST instrospection. 4624//===----------------------------------------------------------------------===// 4625 4626extern "C" { 4627unsigned clang_CXXMethod_isStatic(CXCursor C) { 4628 if (!clang_isDeclaration(C.kind)) 4629 return 0; 4630 4631 CXXMethodDecl *Method = 0; 4632 Decl *D = cxcursor::getCursorDecl(C); 4633 if (FunctionTemplateDecl *FunTmpl = dyn_cast_or_null<FunctionTemplateDecl>(D)) 4634 Method = dyn_cast<CXXMethodDecl>(FunTmpl->getTemplatedDecl()); 4635 else 4636 Method = dyn_cast_or_null<CXXMethodDecl>(D); 4637 return (Method && Method->isStatic()) ? 1 : 0; 4638} 4639 4640} // end: extern "C" 4641 4642//===----------------------------------------------------------------------===// 4643// Attribute introspection. 4644//===----------------------------------------------------------------------===// 4645 4646extern "C" { 4647CXType clang_getIBOutletCollectionType(CXCursor C) { 4648 if (C.kind != CXCursor_IBOutletCollectionAttr) 4649 return cxtype::MakeCXType(QualType(), cxcursor::getCursorTU(C)); 4650 4651 IBOutletCollectionAttr *A = 4652 cast<IBOutletCollectionAttr>(cxcursor::getCursorAttr(C)); 4653 4654 return cxtype::MakeCXType(A->getInterface(), cxcursor::getCursorTU(C)); 4655} 4656} // end: extern "C" 4657 4658//===----------------------------------------------------------------------===// 4659// Misc. utility functions. 4660//===----------------------------------------------------------------------===// 4661 4662/// Default to using an 8 MB stack size on "safety" threads. 4663static unsigned SafetyStackThreadSize = 8 << 20; 4664 4665namespace clang { 4666 4667bool RunSafely(llvm::CrashRecoveryContext &CRC, 4668 void (*Fn)(void*), void *UserData, 4669 unsigned Size) { 4670 if (!Size) 4671 Size = GetSafetyThreadStackSize(); 4672 if (Size) 4673 return CRC.RunSafelyOnThread(Fn, UserData, Size); 4674 return CRC.RunSafely(Fn, UserData); 4675} 4676 4677unsigned GetSafetyThreadStackSize() { 4678 return SafetyStackThreadSize; 4679} 4680 4681void SetSafetyThreadStackSize(unsigned Value) { 4682 SafetyStackThreadSize = Value; 4683} 4684 4685} 4686 4687extern "C" { 4688 4689CXString clang_getClangVersion() { 4690 return createCXString(getClangFullVersion()); 4691} 4692 4693} // end: extern "C" 4694