DeclPrinter.cpp revision 4e1272381cf2553bcc4394bc1690be1b954f6be6 
1//===--- DeclPrinter.cpp - Printing implementation for Decl ASTs ----------===//
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 Decl::dump method, which pretty print the
11// AST back out to C/Objective-C/C++/Objective-C++ code.
12//
13//===----------------------------------------------------------------------===//
14#include "clang/AST/ASTContext.h"
15#include "clang/AST/DeclVisitor.h"
16#include "clang/AST/Decl.h"
17#include "clang/AST/DeclCXX.h"
18#include "clang/AST/DeclObjC.h"
19#include "clang/AST/Expr.h"
20#include "clang/AST/PrettyPrinter.h"
21#include "llvm/Support/Compiler.h"
22#include "llvm/Support/Streams.h"
23#include "llvm/Support/Format.h"
24#include "llvm/Support/raw_ostream.h"
25using namespace clang;
26
27namespace {
28  class VISIBILITY_HIDDEN DeclPrinter : public DeclVisitor<DeclPrinter> {
29    llvm::raw_ostream &Out;
30    ASTContext &Context;
31    PrintingPolicy Policy;
32    unsigned Indentation;
33
34    llvm::raw_ostream& Indent();
35    void ProcessDeclGroup(llvm::SmallVectorImpl<Decl*>& Decls);
36
37  public:
38    DeclPrinter(llvm::raw_ostream &Out, ASTContext &Context,
39                const PrintingPolicy &Policy,
40                unsigned Indentation = 0)
41      : Out(Out), Context(Context), Policy(Policy), Indentation(Indentation) { }
42
43    void VisitDeclContext(DeclContext *DC, bool Indent = true);
44
45    void VisitTranslationUnitDecl(TranslationUnitDecl *D);
46    void VisitTypedefDecl(TypedefDecl *D);
47    void VisitEnumDecl(EnumDecl *D);
48    void VisitRecordDecl(RecordDecl *D);
49    void VisitEnumConstantDecl(EnumConstantDecl *D);
50    void VisitFunctionDecl(FunctionDecl *D);
51    void VisitFieldDecl(FieldDecl *D);
52    void VisitVarDecl(VarDecl *D);
53    void VisitParmVarDecl(ParmVarDecl *D);
54    void VisitOriginalParmVarDecl(OriginalParmVarDecl *D);
55    void VisitFileScopeAsmDecl(FileScopeAsmDecl *D);
56    void VisitOverloadedFunctionDecl(OverloadedFunctionDecl *D);
57    void VisitNamespaceDecl(NamespaceDecl *D);
58    void VisitUsingDirectiveDecl(UsingDirectiveDecl *D);
59    void VisitNamespaceAliasDecl(NamespaceAliasDecl *D);
60    void VisitCXXRecordDecl(CXXRecordDecl *D);
61    void VisitLinkageSpecDecl(LinkageSpecDecl *D);
62    void VisitTemplateDecl(TemplateDecl *D);
63    void VisitObjCMethodDecl(ObjCMethodDecl *D);
64    void VisitObjCClassDecl(ObjCClassDecl *D);
65    void VisitObjCImplementationDecl(ObjCImplementationDecl *D);
66    void VisitObjCInterfaceDecl(ObjCInterfaceDecl *D);
67    void VisitObjCForwardProtocolDecl(ObjCForwardProtocolDecl *D);
68    void VisitObjCProtocolDecl(ObjCProtocolDecl *D);
69    void VisitObjCCategoryImplDecl(ObjCCategoryImplDecl *D);
70    void VisitObjCCategoryDecl(ObjCCategoryDecl *D);
71    void VisitObjCCompatibleAliasDecl(ObjCCompatibleAliasDecl *D);
72    void VisitObjCPropertyDecl(ObjCPropertyDecl *D);
73    void VisitObjCPropertyImplDecl(ObjCPropertyImplDecl *D);
74  };
75}
76
77void Decl::print(llvm::raw_ostream &Out, unsigned Indentation) {
78  print(Out, getASTContext().PrintingPolicy, Indentation);
79}
80
81void Decl::print(llvm::raw_ostream &Out, const PrintingPolicy &Policy,
82                 unsigned Indentation) {
83  DeclPrinter Printer(Out, getASTContext(), Policy, Indentation);
84  Printer.Visit(this);
85}
86
87static QualType GetBaseType(QualType T) {
88  // FIXME: This should be on the Type class!
89  QualType BaseType = T;
90  while (!BaseType->isSpecifierType()) {
91    if (isa<TypedefType>(BaseType))
92      break;
93    else if (const PointerType* PTy = BaseType->getAsPointerType())
94      BaseType = PTy->getPointeeType();
95    else if (const ArrayType* ATy = dyn_cast<ArrayType>(BaseType))
96      BaseType = ATy->getElementType();
97    else if (const FunctionType* FTy = BaseType->getAsFunctionType())
98      BaseType = FTy->getResultType();
99    else if (const VectorType *VTy = BaseType->getAsVectorType())
100      BaseType = VTy->getElementType();
101    else
102      assert(0 && "Unknown declarator!");
103  }
104  return BaseType;
105}
106
107static QualType getDeclType(Decl* D) {
108  if (TypedefDecl* TDD = dyn_cast<TypedefDecl>(D))
109    return TDD->getUnderlyingType();
110  if (ValueDecl* VD = dyn_cast<ValueDecl>(D))
111    return VD->getType();
112  return QualType();
113}
114
115void Decl::printGroup(Decl** Begin, unsigned NumDecls,
116                      llvm::raw_ostream &Out, const PrintingPolicy &Policy,
117                      unsigned Indentation) {
118  if (NumDecls == 1) {
119    (*Begin)->print(Out, Policy, Indentation);
120    return;
121  }
122
123  Decl** End = Begin + NumDecls;
124  TagDecl* TD = dyn_cast<TagDecl>(*Begin);
125  if (TD)
126    ++Begin;
127
128  PrintingPolicy SubPolicy(Policy);
129  if (TD && TD->isDefinition()) {
130    TD->print(Out, Policy, Indentation);
131    Out << " ";
132    SubPolicy.SuppressTag = true;
133  }
134
135  bool isFirst = true;
136  for ( ; Begin != End; ++Begin) {
137    if (isFirst) {
138      SubPolicy.SuppressSpecifiers = false;
139      isFirst = false;
140    } else {
141      if (!isFirst) Out << ", ";
142      SubPolicy.SuppressSpecifiers = true;
143    }
144
145    (*Begin)->print(Out, SubPolicy, Indentation);
146  }
147}
148
149void Decl::dump() {
150  print(llvm::errs());
151}
152
153llvm::raw_ostream& DeclPrinter::Indent() {
154  for (unsigned i = 0; i < Indentation; ++i)
155    Out << "  ";
156  return Out;
157}
158
159void DeclPrinter::ProcessDeclGroup(llvm::SmallVectorImpl<Decl*>& Decls) {
160  this->Indent();
161  Decl::printGroup(Decls.data(), Decls.size(), Out, Policy, Indentation);
162  Out << ";\n";
163  Decls.clear();
164
165}
166
167//----------------------------------------------------------------------------
168// Common C declarations
169//----------------------------------------------------------------------------
170
171void DeclPrinter::VisitDeclContext(DeclContext *DC, bool Indent) {
172  if (Indent)
173    Indentation += Policy.Indentation;
174
175  llvm::SmallVector<Decl*, 2> Decls;
176  for (DeclContext::decl_iterator D = DC->decls_begin(), DEnd = DC->decls_end();
177       D != DEnd; ++D) {
178    if (!Policy.Dump) {
179      // Skip over implicit declarations in pretty-printing mode.
180      if (D->isImplicit()) continue;
181      // FIXME: Ugly hack so we don't pretty-print the builtin declaration
182      // of __builtin_va_list.  There should be some other way to check that.
183      if (isa<NamedDecl>(*D) && cast<NamedDecl>(*D)->getNameAsString() ==
184          "__builtin_va_list")
185        continue;
186    }
187
188    // The next bits of code handles stuff like "struct {int x;} a,b"; we're
189    // forced to merge the declarations because there's no other way to
190    // refer to the struct in question.  This limited merging is safe without
191    // a bunch of other checks because it only merges declarations directly
192    // referring to the tag, not typedefs.
193    //
194    // Check whether the current declaration should be grouped with a previous
195    // unnamed struct.
196    QualType CurDeclType = getDeclType(*D);
197    if (!Decls.empty() && !CurDeclType.isNull()) {
198      QualType BaseType = GetBaseType(CurDeclType);
199      if (!BaseType.isNull() && isa<TagType>(BaseType) &&
200          cast<TagType>(BaseType)->getDecl() == Decls[0]) {
201        Decls.push_back(*D);
202        continue;
203      }
204    }
205
206    // If we have a merged group waiting to be handled, handle it now.
207    if (!Decls.empty())
208      ProcessDeclGroup(Decls);
209
210    // If the current declaration is an unnamed tag type, save it
211    // so we can merge it with the subsequent declaration(s) using it.
212    if (isa<TagDecl>(*D) && !cast<TagDecl>(*D)->getIdentifier()) {
213      Decls.push_back(*D);
214      continue;
215    }
216    this->Indent();
217    Visit(*D);
218
219    // FIXME: Need to be able to tell the DeclPrinter when
220    const char *Terminator = 0;
221    if (isa<FunctionDecl>(*D) &&
222        cast<FunctionDecl>(*D)->isThisDeclarationADefinition())
223      Terminator = 0;
224    else if (isa<ObjCMethodDecl>(*D) && cast<ObjCMethodDecl>(*D)->getBody())
225      Terminator = 0;
226    else if (isa<NamespaceDecl>(*D) || isa<LinkageSpecDecl>(*D) ||
227             isa<ObjCImplementationDecl>(*D) ||
228             isa<ObjCInterfaceDecl>(*D) ||
229             isa<ObjCProtocolDecl>(*D) ||
230             isa<ObjCCategoryImplDecl>(*D) ||
231             isa<ObjCCategoryDecl>(*D))
232      Terminator = 0;
233    else if (isa<EnumConstantDecl>(*D)) {
234      DeclContext::decl_iterator Next = D;
235      ++Next;
236      if (Next != DEnd)
237        Terminator = ",";
238    } else
239      Terminator = ";";
240
241    if (Terminator)
242      Out << Terminator;
243    Out << "\n";
244  }
245
246  if (!Decls.empty())
247    ProcessDeclGroup(Decls);
248
249  if (Indent)
250    Indentation -= Policy.Indentation;
251}
252
253void DeclPrinter::VisitTranslationUnitDecl(TranslationUnitDecl *D) {
254  VisitDeclContext(D, false);
255}
256
257void DeclPrinter::VisitTypedefDecl(TypedefDecl *D) {
258  std::string S = D->getNameAsString();
259  D->getUnderlyingType().getAsStringInternal(S, Policy);
260  if (!Policy.SuppressSpecifiers)
261    Out << "typedef ";
262  Out << S;
263}
264
265void DeclPrinter::VisitEnumDecl(EnumDecl *D) {
266  Out << "enum " << D->getNameAsString() << " {\n";
267  VisitDeclContext(D);
268  Indent() << "}";
269}
270
271void DeclPrinter::VisitRecordDecl(RecordDecl *D) {
272  Out << D->getKindName();
273  if (D->getIdentifier()) {
274    Out << " ";
275    Out << D->getNameAsString();
276  }
277
278  if (D->isDefinition()) {
279    Out << " {\n";
280    VisitDeclContext(D);
281    Indent() << "}";
282  }
283}
284
285void DeclPrinter::VisitEnumConstantDecl(EnumConstantDecl *D) {
286  Out << D->getNameAsString();
287  if (Expr *Init = D->getInitExpr()) {
288    Out << " = ";
289    Init->printPretty(Out, Context, 0, Policy, Indentation);
290  }
291}
292
293void DeclPrinter::VisitFunctionDecl(FunctionDecl *D) {
294  if (!Policy.SuppressSpecifiers) {
295    switch (D->getStorageClass()) {
296    case FunctionDecl::None: break;
297    case FunctionDecl::Extern: Out << "extern "; break;
298    case FunctionDecl::Static: Out << "static "; break;
299    case FunctionDecl::PrivateExtern: Out << "__private_extern__ "; break;
300    }
301
302    if (D->isInline())           Out << "inline ";
303    if (D->isVirtualAsWritten()) Out << "virtual ";
304  }
305
306  PrintingPolicy SubPolicy(Policy);
307  SubPolicy.SuppressSpecifiers = false;
308  std::string Proto = D->getNameAsString();
309  if (isa<FunctionType>(D->getType().getTypePtr())) {
310    const FunctionType *AFT = D->getType()->getAsFunctionType();
311
312    const FunctionProtoType *FT = 0;
313    if (D->hasWrittenPrototype())
314      FT = dyn_cast<FunctionProtoType>(AFT);
315
316    Proto += "(";
317    if (FT) {
318      llvm::raw_string_ostream POut(Proto);
319      DeclPrinter ParamPrinter(POut, Context, SubPolicy, Indentation);
320      for (unsigned i = 0, e = D->getNumParams(); i != e; ++i) {
321        if (i) POut << ", ";
322        ParamPrinter.VisitParmVarDecl(D->getParamDecl(i));
323      }
324
325      if (FT->isVariadic()) {
326        if (D->getNumParams()) POut << ", ";
327        POut << "...";
328      }
329    } else if (D->isThisDeclarationADefinition() && !D->hasPrototype()) {
330      for (unsigned i = 0, e = D->getNumParams(); i != e; ++i) {
331        if (i)
332          Proto += ", ";
333        Proto += D->getParamDecl(i)->getNameAsString();
334      }
335    }
336
337    Proto += ")";
338    if (CXXConstructorDecl *CDecl = dyn_cast<CXXConstructorDecl>(D)) {
339      if (CDecl->getNumBaseOrMemberInitializers() > 0) {
340        Proto += " : ";
341        Out << Proto;
342        Proto.clear();
343        for (CXXConstructorDecl::init_const_iterator B = CDecl->init_begin(),
344             E = CDecl->init_end();
345             B != E; ++B) {
346          CXXBaseOrMemberInitializer * BMInitializer = (*B);
347          if (B != CDecl->init_begin())
348            Out << ", ";
349          bool hasArguments = (BMInitializer->begin() != BMInitializer->end());
350          if (BMInitializer->isMemberInitializer()) {
351            FieldDecl *FD = BMInitializer->getMember();
352            Out <<  FD->getNameAsString();
353          }
354          else // FIXME. skip dependent types for now.
355            if (const RecordType *RT =
356                BMInitializer->getBaseClass()->getAsRecordType()) {
357              const CXXRecordDecl *BaseDecl =
358                cast<CXXRecordDecl>(RT->getDecl());
359              Out << BaseDecl->getNameAsString();
360          }
361          if (hasArguments) {
362            Out << "(";
363            for (CXXBaseOrMemberInitializer::arg_const_iterator BE =
364                 BMInitializer->begin(), EE =  BMInitializer->end();
365                 BE != EE; BE++) {
366              if (BE != BMInitializer->begin())
367                Out<< ", ";
368              Expr *Exp = (*BE);
369              Exp->printPretty(Out, Context, 0, Policy, Indentation);
370            }
371            Out << ")";
372          } else
373            Out << "()";
374        }
375      }
376    }
377    else if (CXXDestructorDecl *DDecl = dyn_cast<CXXDestructorDecl>(D)) {
378      if (DDecl->getNumBaseOrMemberDestructions() > 0) {
379        // List order of base/member destruction for visualization purposes.
380        assert (D->isThisDeclarationADefinition() && "Destructor with dtor-list");
381        Proto += "/* : ";
382        for (CXXDestructorDecl::destr_const_iterator *B = DDecl->destr_begin(),
383             *E = DDecl->destr_end();
384             B != E; ++B) {
385          uintptr_t BaseOrMember = (*B);
386          if (B != DDecl->destr_begin())
387            Proto += ", ";
388
389          if (DDecl->isMemberToDestroy(BaseOrMember)) {
390            FieldDecl *FD = DDecl->getMemberToDestroy(BaseOrMember);
391            Proto += "~";
392            Proto += FD->getNameAsString();
393          }
394          else // FIXME. skip dependent types for now.
395            if (const RecordType *RT =
396                  DDecl->getAnyBaseClassToDestroy(BaseOrMember)
397                    ->getAsRecordType()) {
398              const CXXRecordDecl *BaseDecl =
399                cast<CXXRecordDecl>(RT->getDecl());
400              Proto += "~";
401              Proto += BaseDecl->getNameAsString();
402            }
403          Proto += "()";
404        }
405        Proto += " */";
406      }
407    }
408    else
409      AFT->getResultType().getAsStringInternal(Proto, Policy);
410  } else {
411    D->getType().getAsStringInternal(Proto, Policy);
412  }
413
414  Out << Proto;
415
416  if (D->isPure())
417    Out << " = 0";
418  else if (D->isDeleted())
419    Out << " = delete";
420  else if (D->isThisDeclarationADefinition()) {
421    if (!D->hasPrototype() && D->getNumParams()) {
422      // This is a K&R function definition, so we need to print the
423      // parameters.
424      Out << '\n';
425      DeclPrinter ParamPrinter(Out, Context, SubPolicy, Indentation);
426      Indentation += Policy.Indentation;
427      for (unsigned i = 0, e = D->getNumParams(); i != e; ++i) {
428        Indent();
429        ParamPrinter.VisitParmVarDecl(D->getParamDecl(i));
430        Out << ";\n";
431      }
432      Indentation -= Policy.Indentation;
433    } else
434      Out << ' ';
435
436    D->getBody()->printPretty(Out, Context, 0, SubPolicy, Indentation);
437    Out << '\n';
438  }
439}
440
441void DeclPrinter::VisitFieldDecl(FieldDecl *D) {
442  if (!Policy.SuppressSpecifiers && D->isMutable())
443    Out << "mutable ";
444
445  std::string Name = D->getNameAsString();
446  D->getType().getAsStringInternal(Name, Policy);
447  Out << Name;
448
449  if (D->isBitField()) {
450    Out << " : ";
451    D->getBitWidth()->printPretty(Out, Context, 0, Policy, Indentation);
452  }
453}
454
455void DeclPrinter::VisitVarDecl(VarDecl *D) {
456  if (!Policy.SuppressSpecifiers && D->getStorageClass() != VarDecl::None)
457    Out << VarDecl::getStorageClassSpecifierString(D->getStorageClass()) << " ";
458
459  if (!Policy.SuppressSpecifiers && D->isThreadSpecified())
460    Out << "__thread ";
461
462  std::string Name = D->getNameAsString();
463  QualType T = D->getType();
464  if (OriginalParmVarDecl *Parm = dyn_cast<OriginalParmVarDecl>(D))
465    T = Parm->getOriginalType();
466  T.getAsStringInternal(Name, Policy);
467  Out << Name;
468  if (D->getInit()) {
469    if (D->hasCXXDirectInitializer())
470      Out << "(";
471    else
472      Out << " = ";
473    D->getInit()->printPretty(Out, Context, 0, Policy, Indentation);
474    if (D->hasCXXDirectInitializer())
475      Out << ")";
476  }
477}
478
479void DeclPrinter::VisitParmVarDecl(ParmVarDecl *D) {
480  VisitVarDecl(D);
481}
482
483void DeclPrinter::VisitOriginalParmVarDecl(OriginalParmVarDecl *D) {
484  VisitVarDecl(D);
485}
486
487void DeclPrinter::VisitFileScopeAsmDecl(FileScopeAsmDecl *D) {
488  Out << "__asm (";
489  D->getAsmString()->printPretty(Out, Context, 0, Policy, Indentation);
490  Out << ")";
491}
492
493//----------------------------------------------------------------------------
494// C++ declarations
495//----------------------------------------------------------------------------
496void DeclPrinter::VisitOverloadedFunctionDecl(OverloadedFunctionDecl *D) {
497  assert(false &&
498         "OverloadedFunctionDecls aren't really decls and are never printed");
499}
500
501void DeclPrinter::VisitNamespaceDecl(NamespaceDecl *D) {
502  Out << "namespace " << D->getNameAsString() << " {\n";
503  VisitDeclContext(D);
504  Indent() << "}";
505}
506
507void DeclPrinter::VisitUsingDirectiveDecl(UsingDirectiveDecl *D) {
508  Out << "using namespace ";
509  if (D->getQualifier())
510    D->getQualifier()->print(Out, Policy);
511  Out << D->getNominatedNamespace()->getNameAsString();
512}
513
514void DeclPrinter::VisitNamespaceAliasDecl(NamespaceAliasDecl *D) {
515  Out << "namespace " << D->getNameAsString() << " = ";
516  if (D->getQualifier())
517    D->getQualifier()->print(Out, Policy);
518  Out << D->getAliasedNamespace()->getNameAsString();
519}
520
521void DeclPrinter::VisitCXXRecordDecl(CXXRecordDecl *D) {
522  Out << D->getKindName();
523  if (D->getIdentifier()) {
524    Out << " ";
525    Out << D->getNameAsString();
526  }
527
528  if (D->isDefinition()) {
529    // Print the base classes
530    if (D->getNumBases()) {
531      Out << " : ";
532      for(CXXRecordDecl::base_class_iterator Base = D->bases_begin(),
533                                          BaseEnd = D->bases_end();
534          Base != BaseEnd; ++Base) {
535        if (Base != D->bases_begin())
536          Out << ", ";
537
538        if (Base->isVirtual())
539          Out << "virtual ";
540
541        switch(Base->getAccessSpecifierAsWritten()) {
542        case AS_none:      break;
543        case AS_public:    Out << "public "; break;
544        case AS_protected: Out << "protected "; break;
545        case AS_private:   Out << " private "; break;
546        }
547
548        Out << Base->getType().getAsString(Policy);
549      }
550    }
551
552    // Print the class definition
553    // FIXME: Doesn't print access specifiers, e.g., "public:"
554    Out << " {\n";
555    VisitDeclContext(D);
556    Indent() << "}";
557  }
558}
559
560void DeclPrinter::VisitLinkageSpecDecl(LinkageSpecDecl *D) {
561  const char *l;
562  if (D->getLanguage() == LinkageSpecDecl::lang_c)
563    l = "C";
564  else {
565    assert(D->getLanguage() == LinkageSpecDecl::lang_cxx &&
566           "unknown language in linkage specification");
567    l = "C++";
568  }
569
570  Out << "extern \"" << l << "\" ";
571  if (D->hasBraces()) {
572    Out << "{\n";
573    VisitDeclContext(D);
574    Indent() << "}";
575  } else
576    Visit(*D->decls_begin());
577}
578
579void DeclPrinter::VisitTemplateDecl(TemplateDecl *D) {
580  Out << "template <";
581
582  TemplateParameterList *Params = D->getTemplateParameters();
583  for (unsigned i = 0, e = Params->size(); i != e; ++i) {
584    if (i != 0)
585      Out << ", ";
586
587    const Decl *Param = Params->getParam(i);
588    if (const TemplateTypeParmDecl *TTP =
589          dyn_cast<TemplateTypeParmDecl>(Param)) {
590
591      QualType ParamType =
592        Context.getTypeDeclType(const_cast<TemplateTypeParmDecl*>(TTP));
593
594      if (TTP->wasDeclaredWithTypename())
595        Out << "typename ";
596      else
597        Out << "class ";
598
599      if (TTP->isParameterPack())
600        Out << "... ";
601
602      Out << ParamType.getAsString(Policy);
603
604      if (TTP->hasDefaultArgument()) {
605        Out << " = ";
606        Out << TTP->getDefaultArgument().getAsString(Policy);
607      };
608    } else if (const NonTypeTemplateParmDecl *NTTP =
609                 dyn_cast<NonTypeTemplateParmDecl>(Param)) {
610      Out << NTTP->getType().getAsString(Policy);
611
612      if (IdentifierInfo *Name = NTTP->getIdentifier()) {
613        Out << ' ';
614        Out << Name->getName();
615      }
616
617      if (NTTP->hasDefaultArgument()) {
618        Out << " = ";
619        NTTP->getDefaultArgument()->printPretty(Out, Context, 0, Policy,
620                                                Indentation);
621      }
622    }
623  }
624
625  Out << "> ";
626
627  Visit(D->getTemplatedDecl());
628}
629
630//----------------------------------------------------------------------------
631// Objective-C declarations
632//----------------------------------------------------------------------------
633
634void DeclPrinter::VisitObjCClassDecl(ObjCClassDecl *D) {
635  Out << "@class ";
636  for (ObjCClassDecl::iterator I = D->begin(), E = D->end();
637       I != E; ++I) {
638    if (I != D->begin()) Out << ", ";
639    Out << (*I)->getNameAsString();
640  }
641}
642
643void DeclPrinter::VisitObjCMethodDecl(ObjCMethodDecl *OMD) {
644  if (OMD->isInstanceMethod())
645    Out << "- ";
646  else
647    Out << "+ ";
648  if (!OMD->getResultType().isNull())
649    Out << '(' << OMD->getResultType().getAsString(Policy) << ")";
650
651  std::string name = OMD->getSelector().getAsString();
652  std::string::size_type pos, lastPos = 0;
653  for (ObjCMethodDecl::param_iterator PI = OMD->param_begin(),
654       E = OMD->param_end(); PI != E; ++PI) {
655    // FIXME: selector is missing here!
656    pos = name.find_first_of(":", lastPos);
657    Out << " " << name.substr(lastPos, pos - lastPos);
658    Out << ":(" << (*PI)->getType().getAsString(Policy) << ")"
659        << (*PI)->getNameAsString();
660    lastPos = pos + 1;
661  }
662
663  if (OMD->param_begin() == OMD->param_end())
664    Out << " " << name;
665
666  if (OMD->isVariadic())
667      Out << ", ...";
668
669  if (OMD->getBody()) {
670    Out << ' ';
671    OMD->getBody()->printPretty(Out, Context, 0, Policy);
672    Out << '\n';
673  }
674}
675
676void DeclPrinter::VisitObjCImplementationDecl(ObjCImplementationDecl *OID) {
677  std::string I = OID->getNameAsString();
678  ObjCInterfaceDecl *SID = OID->getSuperClass();
679
680  if (SID)
681    Out << "@implementation " << I << " : " << SID->getNameAsString();
682  else
683    Out << "@implementation " << I;
684  Out << "\n";
685  VisitDeclContext(OID, false);
686  Out << "@end";
687}
688
689void DeclPrinter::VisitObjCInterfaceDecl(ObjCInterfaceDecl *OID) {
690  std::string I = OID->getNameAsString();
691  ObjCInterfaceDecl *SID = OID->getSuperClass();
692
693  if (SID)
694    Out << "@interface " << I << " : " << SID->getNameAsString();
695  else
696    Out << "@interface " << I;
697
698  // Protocols?
699  const ObjCList<ObjCProtocolDecl> &Protocols = OID->getReferencedProtocols();
700  if (!Protocols.empty()) {
701    for (ObjCList<ObjCProtocolDecl>::iterator I = Protocols.begin(),
702         E = Protocols.end(); I != E; ++I)
703      Out << (I == Protocols.begin() ? '<' : ',') << (*I)->getNameAsString();
704  }
705
706  if (!Protocols.empty())
707    Out << "> ";
708
709  if (OID->ivar_size() > 0) {
710    Out << "{\n";
711    Indentation += Policy.Indentation;
712    for (ObjCInterfaceDecl::ivar_iterator I = OID->ivar_begin(),
713         E = OID->ivar_end(); I != E; ++I) {
714      Indent() << (*I)->getType().getAsString(Policy)
715          << ' '  << (*I)->getNameAsString() << ";\n";
716    }
717    Indentation -= Policy.Indentation;
718    Out << "}\n";
719  }
720
721  VisitDeclContext(OID, false);
722  Out << "@end";
723  // FIXME: implement the rest...
724}
725
726void DeclPrinter::VisitObjCForwardProtocolDecl(ObjCForwardProtocolDecl *D) {
727  Out << "@protocol ";
728  for (ObjCForwardProtocolDecl::protocol_iterator I = D->protocol_begin(),
729         E = D->protocol_end();
730       I != E; ++I) {
731    if (I != D->protocol_begin()) Out << ", ";
732    Out << (*I)->getNameAsString();
733  }
734}
735
736void DeclPrinter::VisitObjCProtocolDecl(ObjCProtocolDecl *PID) {
737  Out << "@protocol " << PID->getNameAsString() << '\n';
738  VisitDeclContext(PID, false);
739  Out << "@end";
740}
741
742void DeclPrinter::VisitObjCCategoryImplDecl(ObjCCategoryImplDecl *PID) {
743  Out << "@implementation "
744      << PID->getClassInterface()->getNameAsString()
745      << '(' << PID->getNameAsString() << ")\n";
746
747  VisitDeclContext(PID, false);
748  Out << "@end";
749  // FIXME: implement the rest...
750}
751
752void DeclPrinter::VisitObjCCategoryDecl(ObjCCategoryDecl *PID) {
753  Out << "@interface "
754      << PID->getClassInterface()->getNameAsString()
755      << '(' << PID->getNameAsString() << ")\n";
756  VisitDeclContext(PID, false);
757  Out << "@end";
758
759  // FIXME: implement the rest...
760}
761
762void DeclPrinter::VisitObjCCompatibleAliasDecl(ObjCCompatibleAliasDecl *AID) {
763  Out << "@compatibility_alias " << AID->getNameAsString()
764      << ' ' << AID->getClassInterface()->getNameAsString() << ";\n";
765}
766
767/// PrintObjCPropertyDecl - print a property declaration.
768///
769void DeclPrinter::VisitObjCPropertyDecl(ObjCPropertyDecl *PDecl) {
770  if (PDecl->getPropertyImplementation() == ObjCPropertyDecl::Required)
771    Out << "@required\n";
772  else if (PDecl->getPropertyImplementation() == ObjCPropertyDecl::Optional)
773    Out << "@optional\n";
774
775  Out << "@property";
776  if (PDecl->getPropertyAttributes() != ObjCPropertyDecl::OBJC_PR_noattr) {
777    bool first = true;
778    Out << " (";
779    if (PDecl->getPropertyAttributes() &
780        ObjCPropertyDecl::OBJC_PR_readonly) {
781      Out << (first ? ' ' : ',') << "readonly";
782      first = false;
783  }
784
785  if (PDecl->getPropertyAttributes() & ObjCPropertyDecl::OBJC_PR_getter) {
786    Out << (first ? ' ' : ',') << "getter = "
787        << PDecl->getGetterName().getAsString();
788    first = false;
789  }
790  if (PDecl->getPropertyAttributes() & ObjCPropertyDecl::OBJC_PR_setter) {
791    Out << (first ? ' ' : ',') << "setter = "
792        << PDecl->getSetterName().getAsString();
793    first = false;
794  }
795
796  if (PDecl->getPropertyAttributes() & ObjCPropertyDecl::OBJC_PR_assign) {
797    Out << (first ? ' ' : ',') << "assign";
798    first = false;
799  }
800
801  if (PDecl->getPropertyAttributes() &
802      ObjCPropertyDecl::OBJC_PR_readwrite) {
803    Out << (first ? ' ' : ',') << "readwrite";
804    first = false;
805  }
806
807  if (PDecl->getPropertyAttributes() & ObjCPropertyDecl::OBJC_PR_retain) {
808    Out << (first ? ' ' : ',') << "retain";
809    first = false;
810  }
811
812  if (PDecl->getPropertyAttributes() & ObjCPropertyDecl::OBJC_PR_copy) {
813    Out << (first ? ' ' : ',') << "copy";
814    first = false;
815  }
816
817  if (PDecl->getPropertyAttributes() &
818      ObjCPropertyDecl::OBJC_PR_nonatomic) {
819    Out << (first ? ' ' : ',') << "nonatomic";
820    first = false;
821  }
822  Out << " )";
823  }
824  Out << ' ' << PDecl->getType().getAsString(Policy)
825  << ' ' << PDecl->getNameAsString();
826}
827
828void DeclPrinter::VisitObjCPropertyImplDecl(ObjCPropertyImplDecl *PID) {
829  if (PID->getPropertyImplementation() == ObjCPropertyImplDecl::Synthesize)
830    Out << "@synthesize ";
831  else
832    Out << "@dynamic ";
833  Out << PID->getPropertyDecl()->getNameAsString();
834  if (PID->getPropertyIvarDecl())
835    Out << "=" << PID->getPropertyIvarDecl()->getNameAsString();
836}
837