xref: /llvm-project/clang/tools/libclang/CXCursor.cpp (revision 0162e459efac896816898588f6bbcf1fae43df41)
1 //===- CXCursor.cpp - Routines for manipulating CXCursors -----------------===//
2 //
3 //                     The LLVM Compiler Infrastructure
4 //
5 // This file is distributed under the University of Illinois Open Source
6 // License. See LICENSE.TXT for details.
7 //
8 //===----------------------------------------------------------------------===//
9 //
10 // This file defines routines for manipulating CXCursors. It should be the
11 // only file that has internal knowledge of the encoding of the data in
12 // CXCursor.
13 //
14 //===----------------------------------------------------------------------===//
15 
16 #include "CXTranslationUnit.h"
17 #include "CXCursor.h"
18 #include "CXString.h"
19 #include "CXType.h"
20 #include "clang-c/Index.h"
21 #include "clang/AST/Attr.h"
22 #include "clang/AST/Decl.h"
23 #include "clang/AST/DeclCXX.h"
24 #include "clang/AST/DeclObjC.h"
25 #include "clang/AST/DeclTemplate.h"
26 #include "clang/AST/Expr.h"
27 #include "clang/AST/ExprCXX.h"
28 #include "clang/AST/ExprObjC.h"
29 #include "clang/Frontend/ASTUnit.h"
30 #include "llvm/Support/ErrorHandling.h"
31 
32 using namespace clang;
33 using namespace cxcursor;
34 
35 CXCursor cxcursor::MakeCXCursorInvalid(CXCursorKind K, CXTranslationUnit TU) {
36   assert(K >= CXCursor_FirstInvalid && K <= CXCursor_LastInvalid);
37   CXCursor C = { K, 0, { nullptr, nullptr, TU } };
38   return C;
39 }
40 
41 static CXCursorKind GetCursorKind(const Attr *A) {
42   assert(A && "Invalid arguments!");
43   switch (A->getKind()) {
44     default: break;
45     case attr::IBAction: return CXCursor_IBActionAttr;
46     case attr::IBOutlet: return CXCursor_IBOutletAttr;
47     case attr::IBOutletCollection: return CXCursor_IBOutletCollectionAttr;
48     case attr::Final: return CXCursor_CXXFinalAttr;
49     case attr::Override: return CXCursor_CXXOverrideAttr;
50     case attr::Annotate: return CXCursor_AnnotateAttr;
51     case attr::AsmLabel: return CXCursor_AsmLabelAttr;
52     case attr::Packed: return CXCursor_PackedAttr;
53     case attr::Pure: return CXCursor_PureAttr;
54     case attr::Const: return CXCursor_ConstAttr;
55     case attr::NoDuplicate: return CXCursor_NoDuplicateAttr;
56     case attr::CUDAConstant: return CXCursor_CUDAConstantAttr;
57     case attr::CUDADevice: return CXCursor_CUDADeviceAttr;
58     case attr::CUDAGlobal: return CXCursor_CUDAGlobalAttr;
59     case attr::CUDAHost: return CXCursor_CUDAHostAttr;
60   }
61 
62   return CXCursor_UnexposedAttr;
63 }
64 
65 CXCursor cxcursor::MakeCXCursor(const Attr *A, const Decl *Parent,
66                                 CXTranslationUnit TU) {
67   assert(A && Parent && TU && "Invalid arguments!");
68   CXCursor C = { GetCursorKind(A), 0, { Parent, A, TU } };
69   return C;
70 }
71 
72 CXCursor cxcursor::MakeCXCursor(const Decl *D, CXTranslationUnit TU,
73                                 SourceRange RegionOfInterest,
74                                 bool FirstInDeclGroup) {
75   assert(D && TU && "Invalid arguments!");
76 
77   CXCursorKind K = getCursorKindForDecl(D);
78 
79   if (K == CXCursor_ObjCClassMethodDecl ||
80       K == CXCursor_ObjCInstanceMethodDecl) {
81     int SelectorIdIndex = -1;
82     // Check if cursor points to a selector id.
83     if (RegionOfInterest.isValid() &&
84         RegionOfInterest.getBegin() == RegionOfInterest.getEnd()) {
85       SmallVector<SourceLocation, 16> SelLocs;
86       cast<ObjCMethodDecl>(D)->getSelectorLocs(SelLocs);
87       SmallVectorImpl<SourceLocation>::iterator
88         I=std::find(SelLocs.begin(), SelLocs.end(),RegionOfInterest.getBegin());
89       if (I != SelLocs.end())
90         SelectorIdIndex = I - SelLocs.begin();
91     }
92     CXCursor C = { K, SelectorIdIndex,
93                    { D, (void*)(intptr_t) (FirstInDeclGroup ? 1 : 0), TU }};
94     return C;
95   }
96 
97   CXCursor C = { K, 0, { D, (void*)(intptr_t) (FirstInDeclGroup ? 1 : 0), TU }};
98   return C;
99 }
100 
101 CXCursor cxcursor::MakeCXCursor(const Stmt *S, const Decl *Parent,
102                                 CXTranslationUnit TU,
103                                 SourceRange RegionOfInterest) {
104   assert(S && TU && "Invalid arguments!");
105   CXCursorKind K = CXCursor_NotImplemented;
106 
107   switch (S->getStmtClass()) {
108   case Stmt::NoStmtClass:
109     break;
110 
111   case Stmt::CaseStmtClass:
112     K = CXCursor_CaseStmt;
113     break;
114 
115   case Stmt::DefaultStmtClass:
116     K = CXCursor_DefaultStmt;
117     break;
118 
119   case Stmt::IfStmtClass:
120     K = CXCursor_IfStmt;
121     break;
122 
123   case Stmt::SwitchStmtClass:
124     K = CXCursor_SwitchStmt;
125     break;
126 
127   case Stmt::WhileStmtClass:
128     K = CXCursor_WhileStmt;
129     break;
130 
131   case Stmt::DoStmtClass:
132     K = CXCursor_DoStmt;
133     break;
134 
135   case Stmt::ForStmtClass:
136     K = CXCursor_ForStmt;
137     break;
138 
139   case Stmt::GotoStmtClass:
140     K = CXCursor_GotoStmt;
141     break;
142 
143   case Stmt::IndirectGotoStmtClass:
144     K = CXCursor_IndirectGotoStmt;
145     break;
146 
147   case Stmt::ContinueStmtClass:
148     K = CXCursor_ContinueStmt;
149     break;
150 
151   case Stmt::BreakStmtClass:
152     K = CXCursor_BreakStmt;
153     break;
154 
155   case Stmt::ReturnStmtClass:
156     K = CXCursor_ReturnStmt;
157     break;
158 
159   case Stmt::GCCAsmStmtClass:
160     K = CXCursor_GCCAsmStmt;
161     break;
162 
163   case Stmt::MSAsmStmtClass:
164     K = CXCursor_MSAsmStmt;
165     break;
166 
167   case Stmt::ObjCAtTryStmtClass:
168     K = CXCursor_ObjCAtTryStmt;
169     break;
170 
171   case Stmt::ObjCAtCatchStmtClass:
172     K = CXCursor_ObjCAtCatchStmt;
173     break;
174 
175   case Stmt::ObjCAtFinallyStmtClass:
176     K = CXCursor_ObjCAtFinallyStmt;
177     break;
178 
179   case Stmt::ObjCAtThrowStmtClass:
180     K = CXCursor_ObjCAtThrowStmt;
181     break;
182 
183   case Stmt::ObjCAtSynchronizedStmtClass:
184     K = CXCursor_ObjCAtSynchronizedStmt;
185     break;
186 
187   case Stmt::ObjCAutoreleasePoolStmtClass:
188     K = CXCursor_ObjCAutoreleasePoolStmt;
189     break;
190 
191   case Stmt::ObjCForCollectionStmtClass:
192     K = CXCursor_ObjCForCollectionStmt;
193     break;
194 
195   case Stmt::CXXCatchStmtClass:
196     K = CXCursor_CXXCatchStmt;
197     break;
198 
199   case Stmt::CXXTryStmtClass:
200     K = CXCursor_CXXTryStmt;
201     break;
202 
203   case Stmt::CXXForRangeStmtClass:
204     K = CXCursor_CXXForRangeStmt;
205     break;
206 
207   case Stmt::SEHTryStmtClass:
208     K = CXCursor_SEHTryStmt;
209     break;
210 
211   case Stmt::SEHExceptStmtClass:
212     K = CXCursor_SEHExceptStmt;
213     break;
214 
215   case Stmt::SEHFinallyStmtClass:
216     K = CXCursor_SEHFinallyStmt;
217     break;
218 
219   case Stmt::SEHLeaveStmtClass:
220     K = CXCursor_SEHLeaveStmt;
221     break;
222 
223   case Stmt::ArrayTypeTraitExprClass:
224   case Stmt::AsTypeExprClass:
225   case Stmt::AtomicExprClass:
226   case Stmt::BinaryConditionalOperatorClass:
227   case Stmt::TypeTraitExprClass:
228   case Stmt::CXXBindTemporaryExprClass:
229   case Stmt::CXXDefaultArgExprClass:
230   case Stmt::CXXDefaultInitExprClass:
231   case Stmt::CXXStdInitializerListExprClass:
232   case Stmt::CXXScalarValueInitExprClass:
233   case Stmt::CXXUuidofExprClass:
234   case Stmt::ChooseExprClass:
235   case Stmt::DesignatedInitExprClass:
236   case Stmt::ExprWithCleanupsClass:
237   case Stmt::ExpressionTraitExprClass:
238   case Stmt::ExtVectorElementExprClass:
239   case Stmt::ImplicitCastExprClass:
240   case Stmt::ImplicitValueInitExprClass:
241   case Stmt::MaterializeTemporaryExprClass:
242   case Stmt::ObjCIndirectCopyRestoreExprClass:
243   case Stmt::OffsetOfExprClass:
244   case Stmt::ParenListExprClass:
245   case Stmt::PredefinedExprClass:
246   case Stmt::ShuffleVectorExprClass:
247   case Stmt::ConvertVectorExprClass:
248   case Stmt::UnaryExprOrTypeTraitExprClass:
249   case Stmt::VAArgExprClass:
250   case Stmt::ObjCArrayLiteralClass:
251   case Stmt::ObjCDictionaryLiteralClass:
252   case Stmt::ObjCBoxedExprClass:
253   case Stmt::ObjCSubscriptRefExprClass:
254     K = CXCursor_UnexposedExpr;
255     break;
256 
257   case Stmt::OpaqueValueExprClass:
258     if (Expr *Src = cast<OpaqueValueExpr>(S)->getSourceExpr())
259       return MakeCXCursor(Src, Parent, TU, RegionOfInterest);
260     K = CXCursor_UnexposedExpr;
261     break;
262 
263   case Stmt::PseudoObjectExprClass:
264     return MakeCXCursor(cast<PseudoObjectExpr>(S)->getSyntacticForm(),
265                         Parent, TU, RegionOfInterest);
266 
267   case Stmt::CompoundStmtClass:
268     K = CXCursor_CompoundStmt;
269     break;
270 
271   case Stmt::NullStmtClass:
272     K = CXCursor_NullStmt;
273     break;
274 
275   case Stmt::LabelStmtClass:
276     K = CXCursor_LabelStmt;
277     break;
278 
279   case Stmt::AttributedStmtClass:
280     K = CXCursor_UnexposedStmt;
281     break;
282 
283   case Stmt::DeclStmtClass:
284     K = CXCursor_DeclStmt;
285     break;
286 
287   case Stmt::CapturedStmtClass:
288     K = CXCursor_UnexposedStmt;
289     break;
290 
291   case Stmt::IntegerLiteralClass:
292     K = CXCursor_IntegerLiteral;
293     break;
294 
295   case Stmt::FloatingLiteralClass:
296     K = CXCursor_FloatingLiteral;
297     break;
298 
299   case Stmt::ImaginaryLiteralClass:
300     K = CXCursor_ImaginaryLiteral;
301     break;
302 
303   case Stmt::StringLiteralClass:
304     K = CXCursor_StringLiteral;
305     break;
306 
307   case Stmt::CharacterLiteralClass:
308     K = CXCursor_CharacterLiteral;
309     break;
310 
311   case Stmt::ParenExprClass:
312     K = CXCursor_ParenExpr;
313     break;
314 
315   case Stmt::UnaryOperatorClass:
316     K = CXCursor_UnaryOperator;
317     break;
318 
319   case Stmt::CXXNoexceptExprClass:
320     K = CXCursor_UnaryExpr;
321     break;
322 
323   case Stmt::ArraySubscriptExprClass:
324     K = CXCursor_ArraySubscriptExpr;
325     break;
326 
327   case Stmt::BinaryOperatorClass:
328     K = CXCursor_BinaryOperator;
329     break;
330 
331   case Stmt::CompoundAssignOperatorClass:
332     K = CXCursor_CompoundAssignOperator;
333     break;
334 
335   case Stmt::ConditionalOperatorClass:
336     K = CXCursor_ConditionalOperator;
337     break;
338 
339   case Stmt::CStyleCastExprClass:
340     K = CXCursor_CStyleCastExpr;
341     break;
342 
343   case Stmt::CompoundLiteralExprClass:
344     K = CXCursor_CompoundLiteralExpr;
345     break;
346 
347   case Stmt::InitListExprClass:
348     K = CXCursor_InitListExpr;
349     break;
350 
351   case Stmt::AddrLabelExprClass:
352     K = CXCursor_AddrLabelExpr;
353     break;
354 
355   case Stmt::StmtExprClass:
356     K = CXCursor_StmtExpr;
357     break;
358 
359   case Stmt::GenericSelectionExprClass:
360     K = CXCursor_GenericSelectionExpr;
361     break;
362 
363   case Stmt::GNUNullExprClass:
364     K = CXCursor_GNUNullExpr;
365     break;
366 
367   case Stmt::CXXStaticCastExprClass:
368     K = CXCursor_CXXStaticCastExpr;
369     break;
370 
371   case Stmt::CXXDynamicCastExprClass:
372     K = CXCursor_CXXDynamicCastExpr;
373     break;
374 
375   case Stmt::CXXReinterpretCastExprClass:
376     K = CXCursor_CXXReinterpretCastExpr;
377     break;
378 
379   case Stmt::CXXConstCastExprClass:
380     K = CXCursor_CXXConstCastExpr;
381     break;
382 
383   case Stmt::CXXFunctionalCastExprClass:
384     K = CXCursor_CXXFunctionalCastExpr;
385     break;
386 
387   case Stmt::CXXTypeidExprClass:
388     K = CXCursor_CXXTypeidExpr;
389     break;
390 
391   case Stmt::CXXBoolLiteralExprClass:
392     K = CXCursor_CXXBoolLiteralExpr;
393     break;
394 
395   case Stmt::CXXNullPtrLiteralExprClass:
396     K = CXCursor_CXXNullPtrLiteralExpr;
397     break;
398 
399   case Stmt::CXXThisExprClass:
400     K = CXCursor_CXXThisExpr;
401     break;
402 
403   case Stmt::CXXThrowExprClass:
404     K = CXCursor_CXXThrowExpr;
405     break;
406 
407   case Stmt::CXXNewExprClass:
408     K = CXCursor_CXXNewExpr;
409     break;
410 
411   case Stmt::CXXDeleteExprClass:
412     K = CXCursor_CXXDeleteExpr;
413     break;
414 
415   case Stmt::ObjCStringLiteralClass:
416     K = CXCursor_ObjCStringLiteral;
417     break;
418 
419   case Stmt::ObjCEncodeExprClass:
420     K = CXCursor_ObjCEncodeExpr;
421     break;
422 
423   case Stmt::ObjCSelectorExprClass:
424     K = CXCursor_ObjCSelectorExpr;
425     break;
426 
427   case Stmt::ObjCProtocolExprClass:
428     K = CXCursor_ObjCProtocolExpr;
429     break;
430 
431   case Stmt::ObjCBoolLiteralExprClass:
432     K = CXCursor_ObjCBoolLiteralExpr;
433     break;
434 
435   case Stmt::ObjCBridgedCastExprClass:
436     K = CXCursor_ObjCBridgedCastExpr;
437     break;
438 
439   case Stmt::BlockExprClass:
440     K = CXCursor_BlockExpr;
441     break;
442 
443   case Stmt::PackExpansionExprClass:
444     K = CXCursor_PackExpansionExpr;
445     break;
446 
447   case Stmt::SizeOfPackExprClass:
448     K = CXCursor_SizeOfPackExpr;
449     break;
450 
451   case Stmt::DeclRefExprClass:
452     if (const ImplicitParamDecl *IPD =
453          dyn_cast_or_null<ImplicitParamDecl>(cast<DeclRefExpr>(S)->getDecl())) {
454       if (const ObjCMethodDecl *MD =
455             dyn_cast<ObjCMethodDecl>(IPD->getDeclContext())) {
456         if (MD->getSelfDecl() == IPD) {
457           K = CXCursor_ObjCSelfExpr;
458           break;
459         }
460       }
461     }
462 
463     K = CXCursor_DeclRefExpr;
464     break;
465 
466   case Stmt::DependentScopeDeclRefExprClass:
467   case Stmt::SubstNonTypeTemplateParmExprClass:
468   case Stmt::SubstNonTypeTemplateParmPackExprClass:
469   case Stmt::FunctionParmPackExprClass:
470   case Stmt::UnresolvedLookupExprClass:
471     K = CXCursor_DeclRefExpr;
472     break;
473 
474   case Stmt::CXXDependentScopeMemberExprClass:
475   case Stmt::CXXPseudoDestructorExprClass:
476   case Stmt::MemberExprClass:
477   case Stmt::MSPropertyRefExprClass:
478   case Stmt::ObjCIsaExprClass:
479   case Stmt::ObjCIvarRefExprClass:
480   case Stmt::ObjCPropertyRefExprClass:
481   case Stmt::UnresolvedMemberExprClass:
482     K = CXCursor_MemberRefExpr;
483     break;
484 
485   case Stmt::CallExprClass:
486   case Stmt::CXXOperatorCallExprClass:
487   case Stmt::CXXMemberCallExprClass:
488   case Stmt::CUDAKernelCallExprClass:
489   case Stmt::CXXConstructExprClass:
490   case Stmt::CXXTemporaryObjectExprClass:
491   case Stmt::CXXUnresolvedConstructExprClass:
492   case Stmt::UserDefinedLiteralClass:
493     K = CXCursor_CallExpr;
494     break;
495 
496   case Stmt::LambdaExprClass:
497     K = CXCursor_LambdaExpr;
498     break;
499 
500   case Stmt::ObjCMessageExprClass: {
501     K = CXCursor_ObjCMessageExpr;
502     int SelectorIdIndex = -1;
503     // Check if cursor points to a selector id.
504     if (RegionOfInterest.isValid() &&
505         RegionOfInterest.getBegin() == RegionOfInterest.getEnd()) {
506       SmallVector<SourceLocation, 16> SelLocs;
507       cast<ObjCMessageExpr>(S)->getSelectorLocs(SelLocs);
508       SmallVectorImpl<SourceLocation>::iterator
509         I=std::find(SelLocs.begin(), SelLocs.end(),RegionOfInterest.getBegin());
510       if (I != SelLocs.end())
511         SelectorIdIndex = I - SelLocs.begin();
512     }
513     CXCursor C = { K, 0, { Parent, S, TU } };
514     return getSelectorIdentifierCursor(SelectorIdIndex, C);
515   }
516 
517   case Stmt::MSDependentExistsStmtClass:
518     K = CXCursor_UnexposedStmt;
519     break;
520   case Stmt::OMPParallelDirectiveClass:
521     K = CXCursor_OMPParallelDirective;
522     break;
523   case Stmt::OMPSimdDirectiveClass:
524     K = CXCursor_OMPSimdDirective;
525     break;
526   case Stmt::OMPForDirectiveClass:
527     K = CXCursor_OMPForDirective;
528     break;
529   case Stmt::OMPSectionsDirectiveClass:
530     K = CXCursor_OMPSectionsDirective;
531     break;
532   case Stmt::OMPSectionDirectiveClass:
533     K = CXCursor_OMPSectionDirective;
534     break;
535   case Stmt::OMPSingleDirectiveClass:
536     K = CXCursor_OMPSingleDirective;
537     break;
538   case Stmt::OMPMasterDirectiveClass:
539     K = CXCursor_OMPMasterDirective;
540     break;
541   case Stmt::OMPCriticalDirectiveClass:
542     K = CXCursor_OMPCriticalDirective;
543     break;
544   case Stmt::OMPParallelForDirectiveClass:
545     K = CXCursor_OMPParallelForDirective;
546     break;
547   case Stmt::OMPParallelSectionsDirectiveClass:
548     K = CXCursor_OMPParallelSectionsDirective;
549     break;
550   case Stmt::OMPTaskDirectiveClass:
551     K = CXCursor_OMPTaskDirective;
552     break;
553   case Stmt::OMPTaskyieldDirectiveClass:
554     K = CXCursor_OMPTaskyieldDirective;
555     break;
556   case Stmt::OMPBarrierDirectiveClass:
557     K = CXCursor_OMPBarrierDirective;
558     break;
559   case Stmt::OMPTaskwaitDirectiveClass:
560     K = CXCursor_OMPTaskwaitDirective;
561     break;
562   case Stmt::OMPFlushDirectiveClass:
563     K = CXCursor_OMPFlushDirective;
564     break;
565   case Stmt::OMPOrderedDirectiveClass:
566     K = CXCursor_OMPOrderedDirective;
567     break;
568   case Stmt::OMPAtomicDirectiveClass:
569     K = CXCursor_OMPAtomicDirective;
570     break;
571   }
572 
573   CXCursor C = { K, 0, { Parent, S, TU } };
574   return C;
575 }
576 
577 CXCursor cxcursor::MakeCursorObjCSuperClassRef(ObjCInterfaceDecl *Super,
578                                                SourceLocation Loc,
579                                                CXTranslationUnit TU) {
580   assert(Super && TU && "Invalid arguments!");
581   void *RawLoc = Loc.getPtrEncoding();
582   CXCursor C = { CXCursor_ObjCSuperClassRef, 0, { Super, RawLoc, TU } };
583   return C;
584 }
585 
586 std::pair<const ObjCInterfaceDecl *, SourceLocation>
587 cxcursor::getCursorObjCSuperClassRef(CXCursor C) {
588   assert(C.kind == CXCursor_ObjCSuperClassRef);
589   return std::make_pair(static_cast<const ObjCInterfaceDecl *>(C.data[0]),
590                         SourceLocation::getFromPtrEncoding(C.data[1]));
591 }
592 
593 CXCursor cxcursor::MakeCursorObjCProtocolRef(const ObjCProtocolDecl *Proto,
594                                              SourceLocation Loc,
595                                              CXTranslationUnit TU) {
596   assert(Proto && TU && "Invalid arguments!");
597   void *RawLoc = Loc.getPtrEncoding();
598   CXCursor C = { CXCursor_ObjCProtocolRef, 0, { Proto, RawLoc, TU } };
599   return C;
600 }
601 
602 std::pair<const ObjCProtocolDecl *, SourceLocation>
603 cxcursor::getCursorObjCProtocolRef(CXCursor C) {
604   assert(C.kind == CXCursor_ObjCProtocolRef);
605   return std::make_pair(static_cast<const ObjCProtocolDecl *>(C.data[0]),
606                         SourceLocation::getFromPtrEncoding(C.data[1]));
607 }
608 
609 CXCursor cxcursor::MakeCursorObjCClassRef(const ObjCInterfaceDecl *Class,
610                                           SourceLocation Loc,
611                                           CXTranslationUnit TU) {
612   // 'Class' can be null for invalid code.
613   if (!Class)
614     return MakeCXCursorInvalid(CXCursor_InvalidCode);
615   assert(TU && "Invalid arguments!");
616   void *RawLoc = Loc.getPtrEncoding();
617   CXCursor C = { CXCursor_ObjCClassRef, 0, { Class, RawLoc, TU } };
618   return C;
619 }
620 
621 std::pair<const ObjCInterfaceDecl *, SourceLocation>
622 cxcursor::getCursorObjCClassRef(CXCursor C) {
623   assert(C.kind == CXCursor_ObjCClassRef);
624   return std::make_pair(static_cast<const ObjCInterfaceDecl *>(C.data[0]),
625                         SourceLocation::getFromPtrEncoding(C.data[1]));
626 }
627 
628 CXCursor cxcursor::MakeCursorTypeRef(const TypeDecl *Type, SourceLocation Loc,
629                                      CXTranslationUnit TU) {
630   assert(Type && TU && "Invalid arguments!");
631   void *RawLoc = Loc.getPtrEncoding();
632   CXCursor C = { CXCursor_TypeRef, 0, { Type, RawLoc, TU } };
633   return C;
634 }
635 
636 std::pair<const TypeDecl *, SourceLocation>
637 cxcursor::getCursorTypeRef(CXCursor C) {
638   assert(C.kind == CXCursor_TypeRef);
639   return std::make_pair(static_cast<const TypeDecl *>(C.data[0]),
640                         SourceLocation::getFromPtrEncoding(C.data[1]));
641 }
642 
643 CXCursor cxcursor::MakeCursorTemplateRef(const TemplateDecl *Template,
644                                          SourceLocation Loc,
645                                          CXTranslationUnit TU) {
646   assert(Template && TU && "Invalid arguments!");
647   void *RawLoc = Loc.getPtrEncoding();
648   CXCursor C = { CXCursor_TemplateRef, 0, { Template, RawLoc, TU } };
649   return C;
650 }
651 
652 std::pair<const TemplateDecl *, SourceLocation>
653 cxcursor::getCursorTemplateRef(CXCursor C) {
654   assert(C.kind == CXCursor_TemplateRef);
655   return std::make_pair(static_cast<const TemplateDecl *>(C.data[0]),
656                         SourceLocation::getFromPtrEncoding(C.data[1]));
657 }
658 
659 CXCursor cxcursor::MakeCursorNamespaceRef(const NamedDecl *NS,
660                                           SourceLocation Loc,
661                                           CXTranslationUnit TU) {
662 
663   assert(NS && (isa<NamespaceDecl>(NS) || isa<NamespaceAliasDecl>(NS)) && TU &&
664          "Invalid arguments!");
665   void *RawLoc = Loc.getPtrEncoding();
666   CXCursor C = { CXCursor_NamespaceRef, 0, { NS, RawLoc, TU } };
667   return C;
668 }
669 
670 std::pair<const NamedDecl *, SourceLocation>
671 cxcursor::getCursorNamespaceRef(CXCursor C) {
672   assert(C.kind == CXCursor_NamespaceRef);
673   return std::make_pair(static_cast<const NamedDecl *>(C.data[0]),
674                         SourceLocation::getFromPtrEncoding(C.data[1]));
675 }
676 
677 CXCursor cxcursor::MakeCursorVariableRef(const VarDecl *Var, SourceLocation Loc,
678                                          CXTranslationUnit TU) {
679 
680   assert(Var && TU && "Invalid arguments!");
681   void *RawLoc = Loc.getPtrEncoding();
682   CXCursor C = { CXCursor_VariableRef, 0, { Var, RawLoc, TU } };
683   return C;
684 }
685 
686 std::pair<const VarDecl *, SourceLocation>
687 cxcursor::getCursorVariableRef(CXCursor C) {
688   assert(C.kind == CXCursor_VariableRef);
689   return std::make_pair(static_cast<const VarDecl *>(C.data[0]),
690                         SourceLocation::getFromPtrEncoding(C.data[1]));
691 }
692 
693 CXCursor cxcursor::MakeCursorMemberRef(const FieldDecl *Field, SourceLocation Loc,
694                                        CXTranslationUnit TU) {
695 
696   assert(Field && TU && "Invalid arguments!");
697   void *RawLoc = Loc.getPtrEncoding();
698   CXCursor C = { CXCursor_MemberRef, 0, { Field, RawLoc, TU } };
699   return C;
700 }
701 
702 std::pair<const FieldDecl *, SourceLocation>
703 cxcursor::getCursorMemberRef(CXCursor C) {
704   assert(C.kind == CXCursor_MemberRef);
705   return std::make_pair(static_cast<const FieldDecl *>(C.data[0]),
706                         SourceLocation::getFromPtrEncoding(C.data[1]));
707 }
708 
709 CXCursor cxcursor::MakeCursorCXXBaseSpecifier(const CXXBaseSpecifier *B,
710                                               CXTranslationUnit TU){
711   CXCursor C = { CXCursor_CXXBaseSpecifier, 0, { B, nullptr, TU } };
712   return C;
713 }
714 
715 const CXXBaseSpecifier *cxcursor::getCursorCXXBaseSpecifier(CXCursor C) {
716   assert(C.kind == CXCursor_CXXBaseSpecifier);
717   return static_cast<const CXXBaseSpecifier*>(C.data[0]);
718 }
719 
720 CXCursor cxcursor::MakePreprocessingDirectiveCursor(SourceRange Range,
721                                                     CXTranslationUnit TU) {
722   CXCursor C = { CXCursor_PreprocessingDirective, 0,
723                  { Range.getBegin().getPtrEncoding(),
724                    Range.getEnd().getPtrEncoding(),
725                    TU }
726                };
727   return C;
728 }
729 
730 SourceRange cxcursor::getCursorPreprocessingDirective(CXCursor C) {
731   assert(C.kind == CXCursor_PreprocessingDirective);
732   SourceRange Range(SourceLocation::getFromPtrEncoding(C.data[0]),
733                     SourceLocation::getFromPtrEncoding(C.data[1]));
734   ASTUnit *TU = getCursorASTUnit(C);
735   return TU->mapRangeFromPreamble(Range);
736 }
737 
738 CXCursor cxcursor::MakeMacroDefinitionCursor(const MacroDefinition *MI,
739                                              CXTranslationUnit TU) {
740   CXCursor C = { CXCursor_MacroDefinition, 0, { MI, nullptr, TU } };
741   return C;
742 }
743 
744 const MacroDefinition *cxcursor::getCursorMacroDefinition(CXCursor C) {
745   assert(C.kind == CXCursor_MacroDefinition);
746   return static_cast<const MacroDefinition *>(C.data[0]);
747 }
748 
749 CXCursor cxcursor::MakeMacroExpansionCursor(MacroExpansion *MI,
750                                             CXTranslationUnit TU) {
751   CXCursor C = { CXCursor_MacroExpansion, 0, { MI, nullptr, TU } };
752   return C;
753 }
754 
755 CXCursor cxcursor::MakeMacroExpansionCursor(MacroDefinition *MI,
756                                             SourceLocation Loc,
757                                             CXTranslationUnit TU) {
758   assert(Loc.isValid());
759   CXCursor C = { CXCursor_MacroExpansion, 0, { MI, Loc.getPtrEncoding(), TU } };
760   return C;
761 }
762 
763 const IdentifierInfo *cxcursor::MacroExpansionCursor::getName() const {
764   if (isPseudo())
765     return getAsMacroDefinition()->getName();
766   return getAsMacroExpansion()->getName();
767 }
768 const MacroDefinition *cxcursor::MacroExpansionCursor::getDefinition() const {
769   if (isPseudo())
770     return getAsMacroDefinition();
771   return getAsMacroExpansion()->getDefinition();
772 }
773 SourceRange cxcursor::MacroExpansionCursor::getSourceRange() const {
774   if (isPseudo())
775     return getPseudoLoc();
776   return getAsMacroExpansion()->getSourceRange();
777 }
778 
779 CXCursor cxcursor::MakeInclusionDirectiveCursor(InclusionDirective *ID,
780                                                 CXTranslationUnit TU) {
781   CXCursor C = { CXCursor_InclusionDirective, 0, { ID, nullptr, TU } };
782   return C;
783 }
784 
785 const InclusionDirective *cxcursor::getCursorInclusionDirective(CXCursor C) {
786   assert(C.kind == CXCursor_InclusionDirective);
787   return static_cast<const InclusionDirective *>(C.data[0]);
788 }
789 
790 CXCursor cxcursor::MakeCursorLabelRef(LabelStmt *Label, SourceLocation Loc,
791                                       CXTranslationUnit TU) {
792 
793   assert(Label && TU && "Invalid arguments!");
794   void *RawLoc = Loc.getPtrEncoding();
795   CXCursor C = { CXCursor_LabelRef, 0, { Label, RawLoc, TU } };
796   return C;
797 }
798 
799 std::pair<const LabelStmt *, SourceLocation>
800 cxcursor::getCursorLabelRef(CXCursor C) {
801   assert(C.kind == CXCursor_LabelRef);
802   return std::make_pair(static_cast<const LabelStmt *>(C.data[0]),
803                         SourceLocation::getFromPtrEncoding(C.data[1]));
804 }
805 
806 CXCursor cxcursor::MakeCursorOverloadedDeclRef(const OverloadExpr *E,
807                                                CXTranslationUnit TU) {
808   assert(E && TU && "Invalid arguments!");
809   OverloadedDeclRefStorage Storage(E);
810   void *RawLoc = E->getNameLoc().getPtrEncoding();
811   CXCursor C = {
812                  CXCursor_OverloadedDeclRef, 0,
813                  { Storage.getOpaqueValue(), RawLoc, TU }
814                };
815   return C;
816 }
817 
818 CXCursor cxcursor::MakeCursorOverloadedDeclRef(const Decl *D,
819                                                SourceLocation Loc,
820                                                CXTranslationUnit TU) {
821   assert(D && TU && "Invalid arguments!");
822   void *RawLoc = Loc.getPtrEncoding();
823   OverloadedDeclRefStorage Storage(D);
824   CXCursor C = {
825     CXCursor_OverloadedDeclRef, 0,
826     { Storage.getOpaqueValue(), RawLoc, TU }
827   };
828   return C;
829 }
830 
831 CXCursor cxcursor::MakeCursorOverloadedDeclRef(TemplateName Name,
832                                                SourceLocation Loc,
833                                                CXTranslationUnit TU) {
834   assert(Name.getAsOverloadedTemplate() && TU && "Invalid arguments!");
835   void *RawLoc = Loc.getPtrEncoding();
836   OverloadedDeclRefStorage Storage(Name.getAsOverloadedTemplate());
837   CXCursor C = {
838     CXCursor_OverloadedDeclRef, 0,
839     { Storage.getOpaqueValue(), RawLoc, TU }
840   };
841   return C;
842 }
843 
844 std::pair<cxcursor::OverloadedDeclRefStorage, SourceLocation>
845 cxcursor::getCursorOverloadedDeclRef(CXCursor C) {
846   assert(C.kind == CXCursor_OverloadedDeclRef);
847   return std::make_pair(OverloadedDeclRefStorage::getFromOpaqueValue(
848                                        const_cast<void *>(C.data[0])),
849                         SourceLocation::getFromPtrEncoding(C.data[1]));
850 }
851 
852 const Decl *cxcursor::getCursorDecl(CXCursor Cursor) {
853   return static_cast<const Decl *>(Cursor.data[0]);
854 }
855 
856 const Expr *cxcursor::getCursorExpr(CXCursor Cursor) {
857   return dyn_cast_or_null<Expr>(getCursorStmt(Cursor));
858 }
859 
860 const Stmt *cxcursor::getCursorStmt(CXCursor Cursor) {
861   if (Cursor.kind == CXCursor_ObjCSuperClassRef ||
862       Cursor.kind == CXCursor_ObjCProtocolRef ||
863       Cursor.kind == CXCursor_ObjCClassRef)
864     return nullptr;
865 
866   return static_cast<const Stmt *>(Cursor.data[1]);
867 }
868 
869 const Attr *cxcursor::getCursorAttr(CXCursor Cursor) {
870   return static_cast<const Attr *>(Cursor.data[1]);
871 }
872 
873 const Decl *cxcursor::getCursorParentDecl(CXCursor Cursor) {
874   return static_cast<const Decl *>(Cursor.data[0]);
875 }
876 
877 ASTContext &cxcursor::getCursorContext(CXCursor Cursor) {
878   return getCursorASTUnit(Cursor)->getASTContext();
879 }
880 
881 ASTUnit *cxcursor::getCursorASTUnit(CXCursor Cursor) {
882   CXTranslationUnit TU = getCursorTU(Cursor);
883   if (!TU)
884     return nullptr;
885   return cxtu::getASTUnit(TU);
886 }
887 
888 CXTranslationUnit cxcursor::getCursorTU(CXCursor Cursor) {
889   return static_cast<CXTranslationUnit>(const_cast<void*>(Cursor.data[2]));
890 }
891 
892 void cxcursor::getOverriddenCursors(CXCursor cursor,
893                                     SmallVectorImpl<CXCursor> &overridden) {
894   assert(clang_isDeclaration(cursor.kind));
895   const NamedDecl *D = dyn_cast_or_null<NamedDecl>(getCursorDecl(cursor));
896   if (!D)
897     return;
898 
899   CXTranslationUnit TU = getCursorTU(cursor);
900   SmallVector<const NamedDecl *, 8> OverDecls;
901   D->getASTContext().getOverriddenMethods(D, OverDecls);
902 
903   for (SmallVectorImpl<const NamedDecl *>::iterator
904          I = OverDecls.begin(), E = OverDecls.end(); I != E; ++I) {
905     overridden.push_back(MakeCXCursor(*I, TU));
906   }
907 }
908 
909 std::pair<int, SourceLocation>
910 cxcursor::getSelectorIdentifierIndexAndLoc(CXCursor cursor) {
911   if (cursor.kind == CXCursor_ObjCMessageExpr) {
912     if (cursor.xdata != -1)
913       return std::make_pair(cursor.xdata,
914                             cast<ObjCMessageExpr>(getCursorExpr(cursor))
915                                                 ->getSelectorLoc(cursor.xdata));
916   } else if (cursor.kind == CXCursor_ObjCClassMethodDecl ||
917              cursor.kind == CXCursor_ObjCInstanceMethodDecl) {
918     if (cursor.xdata != -1)
919       return std::make_pair(cursor.xdata,
920                             cast<ObjCMethodDecl>(getCursorDecl(cursor))
921                                                 ->getSelectorLoc(cursor.xdata));
922   }
923 
924   return std::make_pair(-1, SourceLocation());
925 }
926 
927 CXCursor cxcursor::getSelectorIdentifierCursor(int SelIdx, CXCursor cursor) {
928   CXCursor newCursor = cursor;
929 
930   if (cursor.kind == CXCursor_ObjCMessageExpr) {
931     if (SelIdx == -1 ||
932         unsigned(SelIdx) >= cast<ObjCMessageExpr>(getCursorExpr(cursor))
933                                                          ->getNumSelectorLocs())
934       newCursor.xdata = -1;
935     else
936       newCursor.xdata = SelIdx;
937   } else if (cursor.kind == CXCursor_ObjCClassMethodDecl ||
938              cursor.kind == CXCursor_ObjCInstanceMethodDecl) {
939     if (SelIdx == -1 ||
940         unsigned(SelIdx) >= cast<ObjCMethodDecl>(getCursorDecl(cursor))
941                                                          ->getNumSelectorLocs())
942       newCursor.xdata = -1;
943     else
944       newCursor.xdata = SelIdx;
945   }
946 
947   return newCursor;
948 }
949 
950 CXCursor cxcursor::getTypeRefCursor(CXCursor cursor) {
951   if (cursor.kind != CXCursor_CallExpr)
952     return cursor;
953 
954   if (cursor.xdata == 0)
955     return cursor;
956 
957   const Expr *E = getCursorExpr(cursor);
958   TypeSourceInfo *Type = nullptr;
959   if (const CXXUnresolvedConstructExpr *
960         UnCtor = dyn_cast<CXXUnresolvedConstructExpr>(E)) {
961     Type = UnCtor->getTypeSourceInfo();
962   } else if (const CXXTemporaryObjectExpr *Tmp =
963                  dyn_cast<CXXTemporaryObjectExpr>(E)){
964     Type = Tmp->getTypeSourceInfo();
965   }
966 
967   if (!Type)
968     return cursor;
969 
970   CXTranslationUnit TU = getCursorTU(cursor);
971   QualType Ty = Type->getType();
972   TypeLoc TL = Type->getTypeLoc();
973   SourceLocation Loc = TL.getBeginLoc();
974 
975   if (const ElaboratedType *ElabT = Ty->getAs<ElaboratedType>()) {
976     Ty = ElabT->getNamedType();
977     ElaboratedTypeLoc ElabTL = TL.castAs<ElaboratedTypeLoc>();
978     Loc = ElabTL.getNamedTypeLoc().getBeginLoc();
979   }
980 
981   if (const TypedefType *Typedef = Ty->getAs<TypedefType>())
982     return MakeCursorTypeRef(Typedef->getDecl(), Loc, TU);
983   if (const TagType *Tag = Ty->getAs<TagType>())
984     return MakeCursorTypeRef(Tag->getDecl(), Loc, TU);
985   if (const TemplateTypeParmType *TemplP = Ty->getAs<TemplateTypeParmType>())
986     return MakeCursorTypeRef(TemplP->getDecl(), Loc, TU);
987 
988   return cursor;
989 }
990 
991 bool cxcursor::operator==(CXCursor X, CXCursor Y) {
992   return X.kind == Y.kind && X.data[0] == Y.data[0] && X.data[1] == Y.data[1] &&
993          X.data[2] == Y.data[2];
994 }
995 
996 // FIXME: Remove once we can model DeclGroups and their appropriate ranges
997 // properly in the ASTs.
998 bool cxcursor::isFirstInDeclGroup(CXCursor C) {
999   assert(clang_isDeclaration(C.kind));
1000   return ((uintptr_t) (C.data[1])) != 0;
1001 }
1002 
1003 //===----------------------------------------------------------------------===//
1004 // libclang CXCursor APIs
1005 //===----------------------------------------------------------------------===//
1006 
1007 extern "C" {
1008 
1009 int clang_Cursor_isNull(CXCursor cursor) {
1010   return clang_equalCursors(cursor, clang_getNullCursor());
1011 }
1012 
1013 CXTranslationUnit clang_Cursor_getTranslationUnit(CXCursor cursor) {
1014   return getCursorTU(cursor);
1015 }
1016 
1017 int clang_Cursor_getNumArguments(CXCursor C) {
1018   if (clang_isDeclaration(C.kind)) {
1019     const Decl *D = cxcursor::getCursorDecl(C);
1020     if (const ObjCMethodDecl *MD = dyn_cast_or_null<ObjCMethodDecl>(D))
1021       return MD->param_size();
1022     if (const FunctionDecl *FD = dyn_cast_or_null<FunctionDecl>(D))
1023       return FD->param_size();
1024   }
1025 
1026   if (clang_isExpression(C.kind)) {
1027     const Expr *E = cxcursor::getCursorExpr(C);
1028     if (const CallExpr *CE = dyn_cast<CallExpr>(E)) {
1029       return CE->getNumArgs();
1030     }
1031   }
1032 
1033   return -1;
1034 }
1035 
1036 CXCursor clang_Cursor_getArgument(CXCursor C, unsigned i) {
1037   if (clang_isDeclaration(C.kind)) {
1038     const Decl *D = cxcursor::getCursorDecl(C);
1039     if (const ObjCMethodDecl *MD = dyn_cast_or_null<ObjCMethodDecl>(D)) {
1040       if (i < MD->param_size())
1041         return cxcursor::MakeCXCursor(MD->parameters()[i],
1042                                       cxcursor::getCursorTU(C));
1043     } else if (const FunctionDecl *FD = dyn_cast_or_null<FunctionDecl>(D)) {
1044       if (i < FD->param_size())
1045         return cxcursor::MakeCXCursor(FD->parameters()[i],
1046                                       cxcursor::getCursorTU(C));
1047     }
1048   }
1049 
1050   if (clang_isExpression(C.kind)) {
1051     const Expr *E = cxcursor::getCursorExpr(C);
1052     if (const CallExpr *CE = dyn_cast<CallExpr>(E)) {
1053       if (i < CE->getNumArgs()) {
1054         return cxcursor::MakeCXCursor(CE->getArg(i),
1055                                       getCursorDecl(C),
1056                                       cxcursor::getCursorTU(C));
1057       }
1058     }
1059   }
1060 
1061   return clang_getNullCursor();
1062 }
1063 
1064 } // end: extern "C"
1065 
1066 //===----------------------------------------------------------------------===//
1067 // CXCursorSet.
1068 //===----------------------------------------------------------------------===//
1069 
1070 typedef llvm::DenseMap<CXCursor, unsigned> CXCursorSet_Impl;
1071 
1072 static inline CXCursorSet packCXCursorSet(CXCursorSet_Impl *setImpl) {
1073   return (CXCursorSet) setImpl;
1074 }
1075 static inline CXCursorSet_Impl *unpackCXCursorSet(CXCursorSet set) {
1076   return (CXCursorSet_Impl*) set;
1077 }
1078 namespace llvm {
1079 template<> struct DenseMapInfo<CXCursor> {
1080 public:
1081   static inline CXCursor getEmptyKey() {
1082     return MakeCXCursorInvalid(CXCursor_InvalidFile);
1083   }
1084   static inline CXCursor getTombstoneKey() {
1085     return MakeCXCursorInvalid(CXCursor_NoDeclFound);
1086   }
1087   static inline unsigned getHashValue(const CXCursor &cursor) {
1088     return llvm::DenseMapInfo<std::pair<const void *, const void *> >
1089       ::getHashValue(std::make_pair(cursor.data[0], cursor.data[1]));
1090   }
1091   static inline bool isEqual(const CXCursor &x, const CXCursor &y) {
1092     return x.kind == y.kind &&
1093            x.data[0] == y.data[0] &&
1094            x.data[1] == y.data[1];
1095   }
1096 };
1097 }
1098 
1099 extern "C" {
1100 CXCursorSet clang_createCXCursorSet() {
1101   return packCXCursorSet(new CXCursorSet_Impl());
1102 }
1103 
1104 void clang_disposeCXCursorSet(CXCursorSet set) {
1105   delete unpackCXCursorSet(set);
1106 }
1107 
1108 unsigned clang_CXCursorSet_contains(CXCursorSet set, CXCursor cursor) {
1109   CXCursorSet_Impl *setImpl = unpackCXCursorSet(set);
1110   if (!setImpl)
1111     return 0;
1112   return setImpl->find(cursor) != setImpl->end();
1113 }
1114 
1115 unsigned clang_CXCursorSet_insert(CXCursorSet set, CXCursor cursor) {
1116   // Do not insert invalid cursors into the set.
1117   if (cursor.kind >= CXCursor_FirstInvalid &&
1118       cursor.kind <= CXCursor_LastInvalid)
1119     return 1;
1120 
1121   CXCursorSet_Impl *setImpl = unpackCXCursorSet(set);
1122   if (!setImpl)
1123     return 1;
1124   unsigned &entry = (*setImpl)[cursor];
1125   unsigned flag = entry == 0 ? 1 : 0;
1126   entry = 1;
1127   return flag;
1128 }
1129 
1130 CXCompletionString clang_getCursorCompletionString(CXCursor cursor) {
1131   enum CXCursorKind kind = clang_getCursorKind(cursor);
1132   if (clang_isDeclaration(kind)) {
1133     const Decl *decl = getCursorDecl(cursor);
1134     if (const NamedDecl *namedDecl = dyn_cast_or_null<NamedDecl>(decl)) {
1135       ASTUnit *unit = getCursorASTUnit(cursor);
1136       CodeCompletionResult Result(namedDecl, CCP_Declaration);
1137       CodeCompletionString *String
1138         = Result.CreateCodeCompletionString(unit->getASTContext(),
1139                                             unit->getPreprocessor(),
1140                                  unit->getCodeCompletionTUInfo().getAllocator(),
1141                                  unit->getCodeCompletionTUInfo(),
1142                                  true);
1143       return String;
1144     }
1145   }
1146   else if (kind == CXCursor_MacroDefinition) {
1147     const MacroDefinition *definition = getCursorMacroDefinition(cursor);
1148     const IdentifierInfo *MacroInfo = definition->getName();
1149     ASTUnit *unit = getCursorASTUnit(cursor);
1150     CodeCompletionResult Result(MacroInfo);
1151     CodeCompletionString *String
1152       = Result.CreateCodeCompletionString(unit->getASTContext(),
1153                                           unit->getPreprocessor(),
1154                                  unit->getCodeCompletionTUInfo().getAllocator(),
1155                                  unit->getCodeCompletionTUInfo(),
1156                                  false);
1157     return String;
1158   }
1159   return nullptr;
1160 }
1161 } // end: extern C.
1162 
1163 namespace {
1164   struct OverridenCursorsPool {
1165     typedef SmallVector<CXCursor, 2> CursorVec;
1166     std::vector<CursorVec*> AllCursors;
1167     std::vector<CursorVec*> AvailableCursors;
1168 
1169     ~OverridenCursorsPool() {
1170       for (std::vector<CursorVec*>::iterator I = AllCursors.begin(),
1171            E = AllCursors.end(); I != E; ++I) {
1172         delete *I;
1173       }
1174     }
1175   };
1176 }
1177 
1178 void *cxcursor::createOverridenCXCursorsPool() {
1179   return new OverridenCursorsPool();
1180 }
1181 
1182 void cxcursor::disposeOverridenCXCursorsPool(void *pool) {
1183   delete static_cast<OverridenCursorsPool*>(pool);
1184 }
1185 
1186 extern "C" {
1187 void clang_getOverriddenCursors(CXCursor cursor,
1188                                 CXCursor **overridden,
1189                                 unsigned *num_overridden) {
1190   if (overridden)
1191     *overridden = nullptr;
1192   if (num_overridden)
1193     *num_overridden = 0;
1194 
1195   CXTranslationUnit TU = cxcursor::getCursorTU(cursor);
1196 
1197   if (!overridden || !num_overridden || !TU)
1198     return;
1199 
1200   if (!clang_isDeclaration(cursor.kind))
1201     return;
1202 
1203   OverridenCursorsPool &pool =
1204     *static_cast<OverridenCursorsPool*>(TU->OverridenCursorsPool);
1205 
1206   OverridenCursorsPool::CursorVec *Vec = nullptr;
1207 
1208   if (!pool.AvailableCursors.empty()) {
1209     Vec = pool.AvailableCursors.back();
1210     pool.AvailableCursors.pop_back();
1211   }
1212   else {
1213     Vec = new OverridenCursorsPool::CursorVec();
1214     pool.AllCursors.push_back(Vec);
1215   }
1216 
1217   // Clear out the vector, but don't free the memory contents.  This
1218   // reduces malloc() traffic.
1219   Vec->clear();
1220 
1221   // Use the first entry to contain a back reference to the vector.
1222   // This is a complete hack.
1223   CXCursor backRefCursor = MakeCXCursorInvalid(CXCursor_InvalidFile, TU);
1224   backRefCursor.data[0] = Vec;
1225   assert(cxcursor::getCursorTU(backRefCursor) == TU);
1226   Vec->push_back(backRefCursor);
1227 
1228   // Get the overriden cursors.
1229   cxcursor::getOverriddenCursors(cursor, *Vec);
1230 
1231   // Did we get any overriden cursors?  If not, return Vec to the pool
1232   // of available cursor vectors.
1233   if (Vec->size() == 1) {
1234     pool.AvailableCursors.push_back(Vec);
1235     return;
1236   }
1237 
1238   // Now tell the caller about the overriden cursors.
1239   assert(Vec->size() > 1);
1240   *overridden = &((*Vec)[1]);
1241   *num_overridden = Vec->size() - 1;
1242 }
1243 
1244 void clang_disposeOverriddenCursors(CXCursor *overridden) {
1245   if (!overridden)
1246     return;
1247 
1248   // Use pointer arithmetic to get back the first faux entry
1249   // which has a back-reference to the TU and the vector.
1250   --overridden;
1251   OverridenCursorsPool::CursorVec *Vec =
1252       static_cast<OverridenCursorsPool::CursorVec *>(
1253           const_cast<void *>(overridden->data[0]));
1254   CXTranslationUnit TU = getCursorTU(*overridden);
1255 
1256   assert(Vec && TU);
1257 
1258   OverridenCursorsPool &pool =
1259     *static_cast<OverridenCursorsPool*>(TU->OverridenCursorsPool);
1260 
1261   pool.AvailableCursors.push_back(Vec);
1262 }
1263 
1264 int clang_Cursor_isDynamicCall(CXCursor C) {
1265   const Expr *E = nullptr;
1266   if (clang_isExpression(C.kind))
1267     E = getCursorExpr(C);
1268   if (!E)
1269     return 0;
1270 
1271   if (const ObjCMessageExpr *MsgE = dyn_cast<ObjCMessageExpr>(E))
1272     return MsgE->getReceiverKind() == ObjCMessageExpr::Instance;
1273 
1274   const MemberExpr *ME = nullptr;
1275   if (isa<MemberExpr>(E))
1276     ME = cast<MemberExpr>(E);
1277   else if (const CallExpr *CE = dyn_cast<CallExpr>(E))
1278     ME = dyn_cast_or_null<MemberExpr>(CE->getCallee());
1279 
1280   if (ME) {
1281     if (const CXXMethodDecl *
1282           MD = dyn_cast_or_null<CXXMethodDecl>(ME->getMemberDecl()))
1283       return MD->isVirtual() && !ME->hasQualifier();
1284   }
1285 
1286   return 0;
1287 }
1288 
1289 CXType clang_Cursor_getReceiverType(CXCursor C) {
1290   CXTranslationUnit TU = cxcursor::getCursorTU(C);
1291   const Expr *E = nullptr;
1292   if (clang_isExpression(C.kind))
1293     E = getCursorExpr(C);
1294 
1295   if (const ObjCMessageExpr *MsgE = dyn_cast_or_null<ObjCMessageExpr>(E))
1296     return cxtype::MakeCXType(MsgE->getReceiverType(), TU);
1297 
1298   return cxtype::MakeCXType(QualType(), TU);
1299 }
1300 
1301 } // end: extern "C"
1302