lib/AST/DeclPrinter.cpp

   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"
  25 using namespace clang;
  26
  27 namespace {
  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
  77 void Decl::print(llvm::raw_ostream &Out, unsigned Indentation) {
  78   print(Out, getASTContext().PrintingPolicy, Indentation);
  79 }
  80
  81 void 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
  87 static 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
 107 static 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
 115 void 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
 149 void Decl::dump() {
 150   print(llvm::errs());
 151 }
 152
 153 llvm::raw_ostream& DeclPrinter::Indent() {
 154   for (unsigned i = 0; i < Indentation; ++i)
 155     Out << "  ";
 156   return Out;
 157 }
 158
 159 void 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
 171 void 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
 253 void DeclPrinter::VisitTranslationUnitDecl(TranslationUnitDecl *D) {
 254   VisitDeclContext(D, false);
 255 }
 256
 257 void 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
 265 void DeclPrinter::VisitEnumDecl(EnumDecl *D) {
 266   Out << "enum " << D->getNameAsString() << " {\n";
 267   VisitDeclContext(D);
 268   Indent() << "}";
 269 }
 270
 271 void 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
 285 void 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
 293 void 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     AFT->getResultType().getAsStringInternal(Proto, Policy);
 339   } else {
 340     D->getType().getAsStringInternal(Proto, Policy);
 341   }
 342
 343   Out << Proto;
 344
 345   if (D->isPure())
 346     Out << " = 0";
 347   else if (D->isDeleted())
 348     Out << " = delete";
 349   else if (D->isThisDeclarationADefinition()) {
 350     if (!D->hasPrototype() && D->getNumParams()) {
 351       // This is a K&R function definition, so we need to print the
 352       // parameters.
 353       Out << '\n';
 354       DeclPrinter ParamPrinter(Out, Context, SubPolicy, Indentation);
 355       Indentation += Policy.Indentation;
 356       for (unsigned i = 0, e = D->getNumParams(); i != e; ++i) {
 357         Indent();
 358         ParamPrinter.VisitParmVarDecl(D->getParamDecl(i));
 359         Out << ";\n";
 360       }
 361       Indentation -= Policy.Indentation;
 362     } else
 363       Out << ' ';
 364
 365     D->getBody()->printPretty(Out, Context, 0, SubPolicy, Indentation);
 366     Out << '\n';
 367   }
 368 }
 369
 370 void DeclPrinter::VisitFieldDecl(FieldDecl *D) {
 371   if (!Policy.SuppressSpecifiers && D->isMutable())
 372     Out << "mutable ";
 373
 374   std::string Name = D->getNameAsString();
 375   D->getType().getAsStringInternal(Name, Policy);
 376   Out << Name;
 377
 378   if (D->isBitField()) {
 379     Out << " : ";
 380     D->getBitWidth()->printPretty(Out, Context, 0, Policy, Indentation);
 381   }
 382 }
 383
 384 void DeclPrinter::VisitVarDecl(VarDecl *D) {
 385   if (!Policy.SuppressSpecifiers && D->getStorageClass() != VarDecl::None)
 386     Out << VarDecl::getStorageClassSpecifierString(D->getStorageClass()) << " ";
 387
 388   if (!Policy.SuppressSpecifiers && D->isThreadSpecified())
 389     Out << "__thread ";
 390
 391   std::string Name = D->getNameAsString();
 392   QualType T = D->getType();
 393   if (OriginalParmVarDecl *Parm = dyn_cast<OriginalParmVarDecl>(D))
 394     T = Parm->getOriginalType();
 395   T.getAsStringInternal(Name, Policy);
 396   Out << Name;
 397   if (D->getInit()) {
 398     if (D->hasCXXDirectInitializer())
 399       Out << "(";
 400     else
 401       Out << " = ";
 402     D->getInit()->printPretty(Out, Context, 0, Policy, Indentation);
 403     if (D->hasCXXDirectInitializer())
 404       Out << ")";
 405   }
 406 }
 407
 408 void DeclPrinter::VisitParmVarDecl(ParmVarDecl *D) {
 409   VisitVarDecl(D);
 410 }
 411
 412 void DeclPrinter::VisitOriginalParmVarDecl(OriginalParmVarDecl *D) {
 413   VisitVarDecl(D);
 414 }
 415
 416 void DeclPrinter::VisitFileScopeAsmDecl(FileScopeAsmDecl *D) {
 417   Out << "__asm (";
 418   D->getAsmString()->printPretty(Out, Context, 0, Policy, Indentation);
 419   Out << ")";
 420 }
 421
 422 //----------------------------------------------------------------------------
 423 // C++ declarations
 424 //----------------------------------------------------------------------------
 425 void DeclPrinter::VisitOverloadedFunctionDecl(OverloadedFunctionDecl *D) {
 426   assert(false &&
 427          "OverloadedFunctionDecls aren't really decls and are never printed");
 428 }
 429
 430 void DeclPrinter::VisitNamespaceDecl(NamespaceDecl *D) {
 431   Out << "namespace " << D->getNameAsString() << " {\n";
 432   VisitDeclContext(D);
 433   Indent() << "}";
 434 }
 435
 436 void DeclPrinter::VisitUsingDirectiveDecl(UsingDirectiveDecl *D) {
 437   Out << "using namespace ";
 438   if (D->getQualifier())
 439     D->getQualifier()->print(Out, Policy);
 440   Out << D->getNominatedNamespace()->getNameAsString();
 441 }
 442
 443 void DeclPrinter::VisitNamespaceAliasDecl(NamespaceAliasDecl *D) {
 444   Out << "namespace " << D->getNameAsString() << " = ";
 445   if (D->getQualifier())
 446     D->getQualifier()->print(Out, Policy);
 447   Out << D->getAliasedNamespace()->getNameAsString();
 448 }
 449
 450 void DeclPrinter::VisitCXXRecordDecl(CXXRecordDecl *D) {
 451   Out << D->getKindName();
 452   if (D->getIdentifier()) {
 453     Out << " ";
 454     Out << D->getNameAsString();
 455   }
 456
 457   if (D->isDefinition()) {
 458     // Print the base classes
 459     if (D->getNumBases()) {
 460       Out << " : ";
 461       for(CXXRecordDecl::base_class_iterator Base = D->bases_begin(),
 462                                           BaseEnd = D->bases_end();
 463           Base != BaseEnd; ++Base) {
 464         if (Base != D->bases_begin())
 465           Out << ", ";
 466
 467         if (Base->isVirtual())
 468           Out << "virtual ";
 469
 470         switch(Base->getAccessSpecifierAsWritten()) {
 471         case AS_none:      break;
 472         case AS_public:    Out << "public "; break;
 473         case AS_protected: Out << "protected "; break;
 474         case AS_private:   Out << " private "; break;
 475         }
 476
 477         Out << Base->getType().getAsString(Policy);
 478       }
 479     }
 480
 481     // Print the class definition
 482     // FIXME: Doesn't print access specifiers, e.g., "public:"
 483     Out << " {\n";
 484     VisitDeclContext(D);
 485     Indent() << "}";
 486   }
 487 }
 488
 489 void DeclPrinter::VisitLinkageSpecDecl(LinkageSpecDecl *D) {
 490   const char *l;
 491   if (D->getLanguage() == LinkageSpecDecl::lang_c)
 492     l = "C";
 493   else {
 494     assert(D->getLanguage() == LinkageSpecDecl::lang_cxx &&
 495            "unknown language in linkage specification");
 496     l = "C++";
 497   }
 498
 499   Out << "extern \"" << l << "\" ";
 500   if (D->hasBraces()) {
 501     Out << "{\n";
 502     VisitDeclContext(D);
 503     Indent() << "}";
 504   } else
 505     Visit(*D->decls_begin());
 506 }
 507
 508 void DeclPrinter::VisitTemplateDecl(TemplateDecl *D) {
 509   Out << "template <";
 510
 511   TemplateParameterList *Params = D->getTemplateParameters();
 512   for (unsigned i = 0, e = Params->size(); i != e; ++i) {
 513     if (i != 0)
 514       Out << ", ";
 515
 516     const Decl *Param = Params->getParam(i);
 517     if (const TemplateTypeParmDecl *TTP =
 518           dyn_cast<TemplateTypeParmDecl>(Param)) {
 519
 520       QualType ParamType =
 521         Context.getTypeDeclType(const_cast<TemplateTypeParmDecl*>(TTP));
 522
 523       if (TTP->wasDeclaredWithTypename())
 524         Out << "typename ";
 525       else
 526         Out << "class ";
 527
 528       if (TTP->isParameterPack())
 529         Out << "... ";
 530
 531       Out << ParamType.getAsString(Policy);
 532
 533       if (TTP->hasDefaultArgument()) {
 534         Out << " = ";
 535         Out << TTP->getDefaultArgument().getAsString(Policy);
 536       };
 537     } else if (const NonTypeTemplateParmDecl *NTTP =
 538                  dyn_cast<NonTypeTemplateParmDecl>(Param)) {
 539       Out << NTTP->getType().getAsString(Policy);
 540
 541       if (IdentifierInfo *Name = NTTP->getIdentifier()) {
 542         Out << ' ';
 543         Out << Name->getName();
 544       }
 545
 546       if (NTTP->hasDefaultArgument()) {
 547         Out << " = ";
 548         NTTP->getDefaultArgument()->printPretty(Out, Context, 0, Policy,
 549                                                 Indentation);
 550       }
 551     }
 552   }
 553
 554   Out << "> ";
 555
 556   Visit(D->getTemplatedDecl());
 557 }
 558
 559 //----------------------------------------------------------------------------
 560 // Objective-C declarations
 561 //----------------------------------------------------------------------------
 562
 563 void DeclPrinter::VisitObjCClassDecl(ObjCClassDecl *D) {
 564   Out << "@class ";
 565   for (ObjCClassDecl::iterator I = D->begin(), E = D->end();
 566        I != E; ++I) {
 567     if (I != D->begin()) Out << ", ";
 568     Out << (*I)->getNameAsString();
 569   }
 570 }
 571
 572 void DeclPrinter::VisitObjCMethodDecl(ObjCMethodDecl *OMD) {
 573   if (OMD->isInstanceMethod())
 574     Out << "- ";
 575   else
 576     Out << "+ ";
 577   if (!OMD->getResultType().isNull())
 578     Out << '(' << OMD->getResultType().getAsString(Policy) << ")";
 579
 580   std::string name = OMD->getSelector().getAsString();
 581   std::string::size_type pos, lastPos = 0;
 582   for (ObjCMethodDecl::param_iterator PI = OMD->param_begin(),
 583        E = OMD->param_end(); PI != E; ++PI) {
 584     // FIXME: selector is missing here!
 585     pos = name.find_first_of(":", lastPos);
 586     Out << " " << name.substr(lastPos, pos - lastPos);
 587     Out << ":(" << (*PI)->getType().getAsString(Policy) << ")"
 588         << (*PI)->getNameAsString();
 589     lastPos = pos + 1;
 590   }
 591
 592   if (OMD->param_begin() == OMD->param_end())
 593     Out << " " << name;
 594
 595   if (OMD->isVariadic())
 596       Out << ", ...";
 597
 598   if (OMD->getBody()) {
 599     Out << ' ';
 600     OMD->getBody()->printPretty(Out, Context, 0, Policy);
 601     Out << '\n';
 602   }
 603 }
 604
 605 void DeclPrinter::VisitObjCImplementationDecl(ObjCImplementationDecl *OID) {
 606   std::string I = OID->getNameAsString();
 607   ObjCInterfaceDecl *SID = OID->getSuperClass();
 608
 609   if (SID)
 610     Out << "@implementation " << I << " : " << SID->getNameAsString();
 611   else
 612     Out << "@implementation " << I;
 613   Out << "\n";
 614   VisitDeclContext(OID, false);
 615   Out << "@end";
 616 }
 617
 618 void DeclPrinter::VisitObjCInterfaceDecl(ObjCInterfaceDecl *OID) {
 619   std::string I = OID->getNameAsString();
 620   ObjCInterfaceDecl *SID = OID->getSuperClass();
 621
 622   if (SID)
 623     Out << "@interface " << I << " : " << SID->getNameAsString();
 624   else
 625     Out << "@interface " << I;
 626
 627   // Protocols?
 628   const ObjCList<ObjCProtocolDecl> &Protocols = OID->getReferencedProtocols();
 629   if (!Protocols.empty()) {
 630     for (ObjCList<ObjCProtocolDecl>::iterator I = Protocols.begin(),
 631          E = Protocols.end(); I != E; ++I)
 632       Out << (I == Protocols.begin() ? '<' : ',') << (*I)->getNameAsString();
 633   }
 634
 635   if (!Protocols.empty())
 636     Out << "> ";
 637
 638   if (OID->ivar_size() > 0) {
 639     Out << "{\n";
 640     Indentation += Policy.Indentation;
 641     for (ObjCInterfaceDecl::ivar_iterator I = OID->ivar_begin(),
 642          E = OID->ivar_end(); I != E; ++I) {
 643       Indent() << (*I)->getType().getAsString(Policy)
 644           << ' '  << (*I)->getNameAsString() << ";\n";
 645     }
 646     Indentation -= Policy.Indentation;
 647     Out << "}\n";
 648   }
 649
 650   VisitDeclContext(OID, false);
 651   Out << "@end";
 652   // FIXME: implement the rest...
 653 }
 654
 655 void DeclPrinter::VisitObjCForwardProtocolDecl(ObjCForwardProtocolDecl *D) {
 656   Out << "@protocol ";
 657   for (ObjCForwardProtocolDecl::protocol_iterator I = D->protocol_begin(),
 658          E = D->protocol_end();
 659        I != E; ++I) {
 660     if (I != D->protocol_begin()) Out << ", ";
 661     Out << (*I)->getNameAsString();
 662   }
 663 }
 664
 665 void DeclPrinter::VisitObjCProtocolDecl(ObjCProtocolDecl *PID) {
 666   Out << "@protocol " << PID->getNameAsString() << '\n';
 667   VisitDeclContext(PID, false);
 668   Out << "@end";
 669 }
 670
 671 void DeclPrinter::VisitObjCCategoryImplDecl(ObjCCategoryImplDecl *PID) {
 672   Out << "@implementation "
 673       << PID->getClassInterface()->getNameAsString()
 674       << '(' << PID->getNameAsString() << ")\n";
 675
 676   VisitDeclContext(PID, false);
 677   Out << "@end";
 678   // FIXME: implement the rest...
 679 }
 680
 681 void DeclPrinter::VisitObjCCategoryDecl(ObjCCategoryDecl *PID) {
 682   Out << "@interface "
 683       << PID->getClassInterface()->getNameAsString()
 684       << '(' << PID->getNameAsString() << ")\n";
 685   VisitDeclContext(PID, false);
 686   Out << "@end";
 687
 688   // FIXME: implement the rest...
 689 }
 690
 691 void DeclPrinter::VisitObjCCompatibleAliasDecl(ObjCCompatibleAliasDecl *AID) {
 692   Out << "@compatibility_alias " << AID->getNameAsString()
 693       << ' ' << AID->getClassInterface()->getNameAsString() << ";\n";
 694 }
 695
 696 /// PrintObjCPropertyDecl - print a property declaration.
 697 ///
 698 void DeclPrinter::VisitObjCPropertyDecl(ObjCPropertyDecl *PDecl) {
 699   if (PDecl->getPropertyImplementation() == ObjCPropertyDecl::Required)
 700     Out << "@required\n";
 701   else if (PDecl->getPropertyImplementation() == ObjCPropertyDecl::Optional)
 702     Out << "@optional\n";
 703
 704   Out << "@property";
 705   if (PDecl->getPropertyAttributes() != ObjCPropertyDecl::OBJC_PR_noattr) {
 706     bool first = true;
 707     Out << " (";
 708     if (PDecl->getPropertyAttributes() &
 709         ObjCPropertyDecl::OBJC_PR_readonly) {
 710       Out << (first ? ' ' : ',') << "readonly";
 711       first = false;
 712   }
 713
 714   if (PDecl->getPropertyAttributes() & ObjCPropertyDecl::OBJC_PR_getter) {
 715     Out << (first ? ' ' : ',') << "getter = "
 716         << PDecl->getGetterName().getAsString();
 717     first = false;
 718   }
 719   if (PDecl->getPropertyAttributes() & ObjCPropertyDecl::OBJC_PR_setter) {
 720     Out << (first ? ' ' : ',') << "setter = "
 721         << PDecl->getSetterName().getAsString();
 722     first = false;
 723   }
 724
 725   if (PDecl->getPropertyAttributes() & ObjCPropertyDecl::OBJC_PR_assign) {
 726     Out << (first ? ' ' : ',') << "assign";
 727     first = false;
 728   }
 729
 730   if (PDecl->getPropertyAttributes() &
 731       ObjCPropertyDecl::OBJC_PR_readwrite) {
 732     Out << (first ? ' ' : ',') << "readwrite";
 733     first = false;
 734   }
 735
 736   if (PDecl->getPropertyAttributes() & ObjCPropertyDecl::OBJC_PR_retain) {
 737     Out << (first ? ' ' : ',') << "retain";
 738     first = false;
 739   }
 740
 741   if (PDecl->getPropertyAttributes() & ObjCPropertyDecl::OBJC_PR_copy) {
 742     Out << (first ? ' ' : ',') << "copy";
 743     first = false;
 744   }
 745
 746   if (PDecl->getPropertyAttributes() &
 747       ObjCPropertyDecl::OBJC_PR_nonatomic) {
 748     Out << (first ? ' ' : ',') << "nonatomic";
 749     first = false;
 750   }
 751   Out << " )";
 752   }
 753   Out << ' ' << PDecl->getType().getAsString(Policy)
 754   << ' ' << PDecl->getNameAsString();
 755 }
 756
 757 void DeclPrinter::VisitObjCPropertyImplDecl(ObjCPropertyImplDecl *PID) {
 758   if (PID->getPropertyImplementation() == ObjCPropertyImplDecl::Synthesize)
 759     Out << "@synthesize ";
 760   else
 761     Out << "@dynamic ";
 762   Out << PID->getPropertyDecl()->getNameAsString();
 763   if (PID->getPropertyIvarDecl())
 764     Out << "=" << PID->getPropertyIvarDecl()->getNameAsString();
 765 }