DeclPrinter.cpp revision 560de45ccbf21c5e4dbeef3fc49f932e499cc181 
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        // FIXME. This is strictly for visualization of destructor's AST for
380        // how base/members are destructed. It has no other validity.
381        assert (D->isThisDeclarationADefinition() && "Destructor with dtor-list");
382        Proto += " : ";
383        for (CXXDestructorDecl::destr_const_iterator B = DDecl->destr_begin(),
384             E = DDecl->destr_end();
385             B != E; ++B) {
386          CXXBaseOrMemberInitializer * BMInitializer = (*B);
387          if (B != DDecl->destr_begin())
388            Proto += ", ";
389
390          if (BMInitializer->isMemberInitializer()) {
391            FieldDecl *FD = BMInitializer->getMember();
392            Proto += "~";
393            Proto += FD->getNameAsString();
394          }
395          else // FIXME. skip dependent types for now.
396            if (const RecordType *RT =
397                BMInitializer->getBaseClass()->getAsRecordType()) {
398              const CXXRecordDecl *BaseDecl =
399                cast<CXXRecordDecl>(RT->getDecl());
400              Proto += "~";
401              Proto += BaseDecl->getNameAsString();
402            }
403          Proto += "()";
404        }
405      }
406    }
407    else
408      AFT->getResultType().getAsStringInternal(Proto, Policy);
409  } else {
410    D->getType().getAsStringInternal(Proto, Policy);
411  }
412
413  Out << Proto;
414
415  if (D->isPure())
416    Out << " = 0";
417  else if (D->isDeleted())
418    Out << " = delete";
419  else if (D->isThisDeclarationADefinition()) {
420    if (!D->hasPrototype() && D->getNumParams()) {
421      // This is a K&R function definition, so we need to print the
422      // parameters.
423      Out << '\n';
424      DeclPrinter ParamPrinter(Out, Context, SubPolicy, Indentation);
425      Indentation += Policy.Indentation;
426      for (unsigned i = 0, e = D->getNumParams(); i != e; ++i) {
427        Indent();
428        ParamPrinter.VisitParmVarDecl(D->getParamDecl(i));
429        Out << ";\n";
430      }
431      Indentation -= Policy.Indentation;
432    } else
433      Out << ' ';
434
435    D->getBody()->printPretty(Out, Context, 0, SubPolicy, Indentation);
436    Out << '\n';
437  }
438}
439
440void DeclPrinter::VisitFieldDecl(FieldDecl *D) {
441  if (!Policy.SuppressSpecifiers && D->isMutable())
442    Out << "mutable ";
443
444  std::string Name = D->getNameAsString();
445  D->getType().getAsStringInternal(Name, Policy);
446  Out << Name;
447
448  if (D->isBitField()) {
449    Out << " : ";
450    D->getBitWidth()->printPretty(Out, Context, 0, Policy, Indentation);
451  }
452}
453
454void DeclPrinter::VisitVarDecl(VarDecl *D) {
455  if (!Policy.SuppressSpecifiers && D->getStorageClass() != VarDecl::None)
456    Out << VarDecl::getStorageClassSpecifierString(D->getStorageClass()) << " ";
457
458  if (!Policy.SuppressSpecifiers && D->isThreadSpecified())
459    Out << "__thread ";
460
461  std::string Name = D->getNameAsString();
462  QualType T = D->getType();
463  if (OriginalParmVarDecl *Parm = dyn_cast<OriginalParmVarDecl>(D))
464    T = Parm->getOriginalType();
465  T.getAsStringInternal(Name, Policy);
466  Out << Name;
467  if (D->getInit()) {
468    if (D->hasCXXDirectInitializer())
469      Out << "(";
470    else
471      Out << " = ";
472    D->getInit()->printPretty(Out, Context, 0, Policy, Indentation);
473    if (D->hasCXXDirectInitializer())
474      Out << ")";
475  }
476}
477
478void DeclPrinter::VisitParmVarDecl(ParmVarDecl *D) {
479  VisitVarDecl(D);
480}
481
482void DeclPrinter::VisitOriginalParmVarDecl(OriginalParmVarDecl *D) {
483  VisitVarDecl(D);
484}
485
486void DeclPrinter::VisitFileScopeAsmDecl(FileScopeAsmDecl *D) {
487  Out << "__asm (";
488  D->getAsmString()->printPretty(Out, Context, 0, Policy, Indentation);
489  Out << ")";
490}
491
492//----------------------------------------------------------------------------
493// C++ declarations
494//----------------------------------------------------------------------------
495void DeclPrinter::VisitOverloadedFunctionDecl(OverloadedFunctionDecl *D) {
496  assert(false &&
497         "OverloadedFunctionDecls aren't really decls and are never printed");
498}
499
500void DeclPrinter::VisitNamespaceDecl(NamespaceDecl *D) {
501  Out << "namespace " << D->getNameAsString() << " {\n";
502  VisitDeclContext(D);
503  Indent() << "}";
504}
505
506void DeclPrinter::VisitUsingDirectiveDecl(UsingDirectiveDecl *D) {
507  Out << "using namespace ";
508  if (D->getQualifier())
509    D->getQualifier()->print(Out, Policy);
510  Out << D->getNominatedNamespace()->getNameAsString();
511}
512
513void DeclPrinter::VisitNamespaceAliasDecl(NamespaceAliasDecl *D) {
514  Out << "namespace " << D->getNameAsString() << " = ";
515  if (D->getQualifier())
516    D->getQualifier()->print(Out, Policy);
517  Out << D->getAliasedNamespace()->getNameAsString();
518}
519
520void DeclPrinter::VisitCXXRecordDecl(CXXRecordDecl *D) {
521  Out << D->getKindName();
522  if (D->getIdentifier()) {
523    Out << " ";
524    Out << D->getNameAsString();
525  }
526
527  if (D->isDefinition()) {
528    // Print the base classes
529    if (D->getNumBases()) {
530      Out << " : ";
531      for(CXXRecordDecl::base_class_iterator Base = D->bases_begin(),
532                                          BaseEnd = D->bases_end();
533          Base != BaseEnd; ++Base) {
534        if (Base != D->bases_begin())
535          Out << ", ";
536
537        if (Base->isVirtual())
538          Out << "virtual ";
539
540        switch(Base->getAccessSpecifierAsWritten()) {
541        case AS_none:      break;
542        case AS_public:    Out << "public "; break;
543        case AS_protected: Out << "protected "; break;
544        case AS_private:   Out << " private "; break;
545        }
546
547        Out << Base->getType().getAsString(Policy);
548      }
549    }
550
551    // Print the class definition
552    // FIXME: Doesn't print access specifiers, e.g., "public:"
553    Out << " {\n";
554    VisitDeclContext(D);
555    Indent() << "}";
556  }
557}
558
559void DeclPrinter::VisitLinkageSpecDecl(LinkageSpecDecl *D) {
560  const char *l;
561  if (D->getLanguage() == LinkageSpecDecl::lang_c)
562    l = "C";
563  else {
564    assert(D->getLanguage() == LinkageSpecDecl::lang_cxx &&
565           "unknown language in linkage specification");
566    l = "C++";
567  }
568
569  Out << "extern \"" << l << "\" ";
570  if (D->hasBraces()) {
571    Out << "{\n";
572    VisitDeclContext(D);
573    Indent() << "}";
574  } else
575    Visit(*D->decls_begin());
576}
577
578void DeclPrinter::VisitTemplateDecl(TemplateDecl *D) {
579  Out << "template <";
580
581  TemplateParameterList *Params = D->getTemplateParameters();
582  for (unsigned i = 0, e = Params->size(); i != e; ++i) {
583    if (i != 0)
584      Out << ", ";
585
586    const Decl *Param = Params->getParam(i);
587    if (const TemplateTypeParmDecl *TTP =
588          dyn_cast<TemplateTypeParmDecl>(Param)) {
589
590      QualType ParamType =
591        Context.getTypeDeclType(const_cast<TemplateTypeParmDecl*>(TTP));
592
593      if (TTP->wasDeclaredWithTypename())
594        Out << "typename ";
595      else
596        Out << "class ";
597
598      if (TTP->isParameterPack())
599        Out << "... ";
600
601      Out << ParamType.getAsString(Policy);
602
603      if (TTP->hasDefaultArgument()) {
604        Out << " = ";
605        Out << TTP->getDefaultArgument().getAsString(Policy);
606      };
607    } else if (const NonTypeTemplateParmDecl *NTTP =
608                 dyn_cast<NonTypeTemplateParmDecl>(Param)) {
609      Out << NTTP->getType().getAsString(Policy);
610
611      if (IdentifierInfo *Name = NTTP->getIdentifier()) {
612        Out << ' ';
613        Out << Name->getName();
614      }
615
616      if (NTTP->hasDefaultArgument()) {
617        Out << " = ";
618        NTTP->getDefaultArgument()->printPretty(Out, Context, 0, Policy,
619                                                Indentation);
620      }
621    }
622  }
623
624  Out << "> ";
625
626  Visit(D->getTemplatedDecl());
627}
628
629//----------------------------------------------------------------------------
630// Objective-C declarations
631//----------------------------------------------------------------------------
632
633void DeclPrinter::VisitObjCClassDecl(ObjCClassDecl *D) {
634  Out << "@class ";
635  for (ObjCClassDecl::iterator I = D->begin(), E = D->end();
636       I != E; ++I) {
637    if (I != D->begin()) Out << ", ";
638    Out << (*I)->getNameAsString();
639  }
640}
641
642void DeclPrinter::VisitObjCMethodDecl(ObjCMethodDecl *OMD) {
643  if (OMD->isInstanceMethod())
644    Out << "- ";
645  else
646    Out << "+ ";
647  if (!OMD->getResultType().isNull())
648    Out << '(' << OMD->getResultType().getAsString(Policy) << ")";
649
650  std::string name = OMD->getSelector().getAsString();
651  std::string::size_type pos, lastPos = 0;
652  for (ObjCMethodDecl::param_iterator PI = OMD->param_begin(),
653       E = OMD->param_end(); PI != E; ++PI) {
654    // FIXME: selector is missing here!
655    pos = name.find_first_of(":", lastPos);
656    Out << " " << name.substr(lastPos, pos - lastPos);
657    Out << ":(" << (*PI)->getType().getAsString(Policy) << ")"
658        << (*PI)->getNameAsString();
659    lastPos = pos + 1;
660  }
661
662  if (OMD->param_begin() == OMD->param_end())
663    Out << " " << name;
664
665  if (OMD->isVariadic())
666      Out << ", ...";
667
668  if (OMD->getBody()) {
669    Out << ' ';
670    OMD->getBody()->printPretty(Out, Context, 0, Policy);
671    Out << '\n';
672  }
673}
674
675void DeclPrinter::VisitObjCImplementationDecl(ObjCImplementationDecl *OID) {
676  std::string I = OID->getNameAsString();
677  ObjCInterfaceDecl *SID = OID->getSuperClass();
678
679  if (SID)
680    Out << "@implementation " << I << " : " << SID->getNameAsString();
681  else
682    Out << "@implementation " << I;
683  Out << "\n";
684  VisitDeclContext(OID, false);
685  Out << "@end";
686}
687
688void DeclPrinter::VisitObjCInterfaceDecl(ObjCInterfaceDecl *OID) {
689  std::string I = OID->getNameAsString();
690  ObjCInterfaceDecl *SID = OID->getSuperClass();
691
692  if (SID)
693    Out << "@interface " << I << " : " << SID->getNameAsString();
694  else
695    Out << "@interface " << I;
696
697  // Protocols?
698  const ObjCList<ObjCProtocolDecl> &Protocols = OID->getReferencedProtocols();
699  if (!Protocols.empty()) {
700    for (ObjCList<ObjCProtocolDecl>::iterator I = Protocols.begin(),
701         E = Protocols.end(); I != E; ++I)
702      Out << (I == Protocols.begin() ? '<' : ',') << (*I)->getNameAsString();
703  }
704
705  if (!Protocols.empty())
706    Out << "> ";
707
708  if (OID->ivar_size() > 0) {
709    Out << "{\n";
710    Indentation += Policy.Indentation;
711    for (ObjCInterfaceDecl::ivar_iterator I = OID->ivar_begin(),
712         E = OID->ivar_end(); I != E; ++I) {
713      Indent() << (*I)->getType().getAsString(Policy)
714          << ' '  << (*I)->getNameAsString() << ";\n";
715    }
716    Indentation -= Policy.Indentation;
717    Out << "}\n";
718  }
719
720  VisitDeclContext(OID, false);
721  Out << "@end";
722  // FIXME: implement the rest...
723}
724
725void DeclPrinter::VisitObjCForwardProtocolDecl(ObjCForwardProtocolDecl *D) {
726  Out << "@protocol ";
727  for (ObjCForwardProtocolDecl::protocol_iterator I = D->protocol_begin(),
728         E = D->protocol_end();
729       I != E; ++I) {
730    if (I != D->protocol_begin()) Out << ", ";
731    Out << (*I)->getNameAsString();
732  }
733}
734
735void DeclPrinter::VisitObjCProtocolDecl(ObjCProtocolDecl *PID) {
736  Out << "@protocol " << PID->getNameAsString() << '\n';
737  VisitDeclContext(PID, false);
738  Out << "@end";
739}
740
741void DeclPrinter::VisitObjCCategoryImplDecl(ObjCCategoryImplDecl *PID) {
742  Out << "@implementation "
743      << PID->getClassInterface()->getNameAsString()
744      << '(' << PID->getNameAsString() << ")\n";
745
746  VisitDeclContext(PID, false);
747  Out << "@end";
748  // FIXME: implement the rest...
749}
750
751void DeclPrinter::VisitObjCCategoryDecl(ObjCCategoryDecl *PID) {
752  Out << "@interface "
753      << PID->getClassInterface()->getNameAsString()
754      << '(' << PID->getNameAsString() << ")\n";
755  VisitDeclContext(PID, false);
756  Out << "@end";
757
758  // FIXME: implement the rest...
759}
760
761void DeclPrinter::VisitObjCCompatibleAliasDecl(ObjCCompatibleAliasDecl *AID) {
762  Out << "@compatibility_alias " << AID->getNameAsString()
763      << ' ' << AID->getClassInterface()->getNameAsString() << ";\n";
764}
765
766/// PrintObjCPropertyDecl - print a property declaration.
767///
768void DeclPrinter::VisitObjCPropertyDecl(ObjCPropertyDecl *PDecl) {
769  if (PDecl->getPropertyImplementation() == ObjCPropertyDecl::Required)
770    Out << "@required\n";
771  else if (PDecl->getPropertyImplementation() == ObjCPropertyDecl::Optional)
772    Out << "@optional\n";
773
774  Out << "@property";
775  if (PDecl->getPropertyAttributes() != ObjCPropertyDecl::OBJC_PR_noattr) {
776    bool first = true;
777    Out << " (";
778    if (PDecl->getPropertyAttributes() &
779        ObjCPropertyDecl::OBJC_PR_readonly) {
780      Out << (first ? ' ' : ',') << "readonly";
781      first = false;
782  }
783
784  if (PDecl->getPropertyAttributes() & ObjCPropertyDecl::OBJC_PR_getter) {
785    Out << (first ? ' ' : ',') << "getter = "
786        << PDecl->getGetterName().getAsString();
787    first = false;
788  }
789  if (PDecl->getPropertyAttributes() & ObjCPropertyDecl::OBJC_PR_setter) {
790    Out << (first ? ' ' : ',') << "setter = "
791        << PDecl->getSetterName().getAsString();
792    first = false;
793  }
794
795  if (PDecl->getPropertyAttributes() & ObjCPropertyDecl::OBJC_PR_assign) {
796    Out << (first ? ' ' : ',') << "assign";
797    first = false;
798  }
799
800  if (PDecl->getPropertyAttributes() &
801      ObjCPropertyDecl::OBJC_PR_readwrite) {
802    Out << (first ? ' ' : ',') << "readwrite";
803    first = false;
804  }
805
806  if (PDecl->getPropertyAttributes() & ObjCPropertyDecl::OBJC_PR_retain) {
807    Out << (first ? ' ' : ',') << "retain";
808    first = false;
809  }
810
811  if (PDecl->getPropertyAttributes() & ObjCPropertyDecl::OBJC_PR_copy) {
812    Out << (first ? ' ' : ',') << "copy";
813    first = false;
814  }
815
816  if (PDecl->getPropertyAttributes() &
817      ObjCPropertyDecl::OBJC_PR_nonatomic) {
818    Out << (first ? ' ' : ',') << "nonatomic";
819    first = false;
820  }
821  Out << " )";
822  }
823  Out << ' ' << PDecl->getType().getAsString(Policy)
824  << ' ' << PDecl->getNameAsString();
825}
826
827void DeclPrinter::VisitObjCPropertyImplDecl(ObjCPropertyImplDecl *PID) {
828  if (PID->getPropertyImplementation() == ObjCPropertyImplDecl::Synthesize)
829    Out << "@synthesize ";
830  else
831    Out << "@dynamic ";
832  Out << PID->getPropertyDecl()->getNameAsString();
833  if (PID->getPropertyIvarDecl())
834    Out << "=" << PID->getPropertyIvarDecl()->getNameAsString();
835}
836