StmtPrinter.cpp revision 09105f52b1f28cbb1374c27c3c70f5517e2c465d
1//===--- StmtPrinter.cpp - Printing implementation for Stmt 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 Stmt::dumpPretty/Stmt::printPretty methods, which
11// pretty print the AST back out to C code.
12//
13//===----------------------------------------------------------------------===//
14
15#include "clang/AST/StmtVisitor.h"
16#include "clang/AST/DeclCXX.h"
17#include "clang/AST/DeclObjC.h"
18#include "clang/AST/PrettyPrinter.h"
19#include "llvm/Support/Compiler.h"
20#include "llvm/Support/Streams.h"
21#include "llvm/Support/Format.h"
22using namespace clang;
23
24//===----------------------------------------------------------------------===//
25// StmtPrinter Visitor
26//===----------------------------------------------------------------------===//
27
28namespace  {
29  class VISIBILITY_HIDDEN StmtPrinter : public StmtVisitor<StmtPrinter> {
30    llvm::raw_ostream &OS;
31    ASTContext &Context;
32    unsigned IndentLevel;
33    clang::PrinterHelper* Helper;
34    PrintingPolicy Policy;
35
36  public:
37    StmtPrinter(llvm::raw_ostream &os, ASTContext &C, PrinterHelper* helper,
38                const PrintingPolicy &Policy,
39                unsigned Indentation = 0)
40      : OS(os), Context(C), IndentLevel(Indentation), Helper(helper),
41        Policy(Policy) {}
42
43    void PrintStmt(Stmt *S) {
44      PrintStmt(S, Policy.Indentation);
45    }
46
47    void PrintStmt(Stmt *S, int SubIndent) {
48      IndentLevel += SubIndent;
49      if (S && isa<Expr>(S)) {
50        // If this is an expr used in a stmt context, indent and newline it.
51        Indent();
52        Visit(S);
53        OS << ";\n";
54      } else if (S) {
55        Visit(S);
56      } else {
57        Indent() << "<<<NULL STATEMENT>>>\n";
58      }
59      IndentLevel -= SubIndent;
60    }
61
62    void PrintRawCompoundStmt(CompoundStmt *S);
63    void PrintRawDecl(Decl *D);
64    void PrintRawDeclStmt(DeclStmt *S);
65    void PrintRawIfStmt(IfStmt *If);
66    void PrintRawCXXCatchStmt(CXXCatchStmt *Catch);
67
68    void PrintExpr(Expr *E) {
69      if (E)
70        Visit(E);
71      else
72        OS << "<null expr>";
73    }
74
75    llvm::raw_ostream &Indent(int Delta = 0) {
76      for (int i = 0, e = IndentLevel+Delta; i < e; ++i)
77        OS << "  ";
78      return OS;
79    }
80
81    bool PrintOffsetOfDesignator(Expr *E);
82    void VisitUnaryOffsetOf(UnaryOperator *Node);
83
84    void Visit(Stmt* S) {
85      if (Helper && Helper->handledStmt(S,OS))
86          return;
87      else StmtVisitor<StmtPrinter>::Visit(S);
88    }
89
90    void VisitStmt(Stmt *Node);
91#define STMT(CLASS, PARENT) \
92    void Visit##CLASS(CLASS *Node);
93#include "clang/AST/StmtNodes.def"
94  };
95}
96
97//===----------------------------------------------------------------------===//
98//  Stmt printing methods.
99//===----------------------------------------------------------------------===//
100
101void StmtPrinter::VisitStmt(Stmt *Node) {
102  Indent() << "<<unknown stmt type>>\n";
103}
104
105/// PrintRawCompoundStmt - Print a compound stmt without indenting the {, and
106/// with no newline after the }.
107void StmtPrinter::PrintRawCompoundStmt(CompoundStmt *Node) {
108  OS << "{\n";
109  for (CompoundStmt::body_iterator I = Node->body_begin(), E = Node->body_end();
110       I != E; ++I)
111    PrintStmt(*I);
112
113  Indent() << "}";
114}
115
116void StmtPrinter::PrintRawDecl(Decl *D) {
117  D->print(OS, Policy, IndentLevel);
118}
119
120void StmtPrinter::PrintRawDeclStmt(DeclStmt *S) {
121  DeclStmt::decl_iterator Begin = S->decl_begin(), End = S->decl_end();
122  llvm::SmallVector<Decl*, 2> Decls;
123  for ( ; Begin != End; ++Begin)
124    Decls.push_back(*Begin);
125
126  Decl::printGroup(Decls.data(), Decls.size(), OS, Policy, IndentLevel);
127}
128
129void StmtPrinter::VisitNullStmt(NullStmt *Node) {
130  Indent() << ";\n";
131}
132
133void StmtPrinter::VisitDeclStmt(DeclStmt *Node) {
134  Indent();
135  PrintRawDeclStmt(Node);
136  OS << ";\n";
137}
138
139void StmtPrinter::VisitCompoundStmt(CompoundStmt *Node) {
140  Indent();
141  PrintRawCompoundStmt(Node);
142  OS << "\n";
143}
144
145void StmtPrinter::VisitCaseStmt(CaseStmt *Node) {
146  Indent(-1) << "case ";
147  PrintExpr(Node->getLHS());
148  if (Node->getRHS()) {
149    OS << " ... ";
150    PrintExpr(Node->getRHS());
151  }
152  OS << ":\n";
153
154  PrintStmt(Node->getSubStmt(), 0);
155}
156
157void StmtPrinter::VisitDefaultStmt(DefaultStmt *Node) {
158  Indent(-1) << "default:\n";
159  PrintStmt(Node->getSubStmt(), 0);
160}
161
162void StmtPrinter::VisitLabelStmt(LabelStmt *Node) {
163  Indent(-1) << Node->getName() << ":\n";
164  PrintStmt(Node->getSubStmt(), 0);
165}
166
167void StmtPrinter::PrintRawIfStmt(IfStmt *If) {
168  OS << "if (";
169  PrintExpr(If->getCond());
170  OS << ')';
171
172  if (CompoundStmt *CS = dyn_cast<CompoundStmt>(If->getThen())) {
173    OS << ' ';
174    PrintRawCompoundStmt(CS);
175    OS << (If->getElse() ? ' ' : '\n');
176  } else {
177    OS << '\n';
178    PrintStmt(If->getThen());
179    if (If->getElse()) Indent();
180  }
181
182  if (Stmt *Else = If->getElse()) {
183    OS << "else";
184
185    if (CompoundStmt *CS = dyn_cast<CompoundStmt>(Else)) {
186      OS << ' ';
187      PrintRawCompoundStmt(CS);
188      OS << '\n';
189    } else if (IfStmt *ElseIf = dyn_cast<IfStmt>(Else)) {
190      OS << ' ';
191      PrintRawIfStmt(ElseIf);
192    } else {
193      OS << '\n';
194      PrintStmt(If->getElse());
195    }
196  }
197}
198
199void StmtPrinter::VisitIfStmt(IfStmt *If) {
200  Indent();
201  PrintRawIfStmt(If);
202}
203
204void StmtPrinter::VisitSwitchStmt(SwitchStmt *Node) {
205  Indent() << "switch (";
206  PrintExpr(Node->getCond());
207  OS << ")";
208
209  // Pretty print compoundstmt bodies (very common).
210  if (CompoundStmt *CS = dyn_cast<CompoundStmt>(Node->getBody())) {
211    OS << " ";
212    PrintRawCompoundStmt(CS);
213    OS << "\n";
214  } else {
215    OS << "\n";
216    PrintStmt(Node->getBody());
217  }
218}
219
220void StmtPrinter::VisitSwitchCase(SwitchCase*) {
221  assert(0 && "SwitchCase is an abstract class");
222}
223
224void StmtPrinter::VisitWhileStmt(WhileStmt *Node) {
225  Indent() << "while (";
226  PrintExpr(Node->getCond());
227  OS << ")\n";
228  PrintStmt(Node->getBody());
229}
230
231void StmtPrinter::VisitDoStmt(DoStmt *Node) {
232  Indent() << "do ";
233  if (CompoundStmt *CS = dyn_cast<CompoundStmt>(Node->getBody())) {
234    PrintRawCompoundStmt(CS);
235    OS << " ";
236  } else {
237    OS << "\n";
238    PrintStmt(Node->getBody());
239    Indent();
240  }
241
242  OS << "while (";
243  PrintExpr(Node->getCond());
244  OS << ");\n";
245}
246
247void StmtPrinter::VisitForStmt(ForStmt *Node) {
248  Indent() << "for (";
249  if (Node->getInit()) {
250    if (DeclStmt *DS = dyn_cast<DeclStmt>(Node->getInit()))
251      PrintRawDeclStmt(DS);
252    else
253      PrintExpr(cast<Expr>(Node->getInit()));
254  }
255  OS << ";";
256  if (Node->getCond()) {
257    OS << " ";
258    PrintExpr(Node->getCond());
259  }
260  OS << ";";
261  if (Node->getInc()) {
262    OS << " ";
263    PrintExpr(Node->getInc());
264  }
265  OS << ") ";
266
267  if (CompoundStmt *CS = dyn_cast<CompoundStmt>(Node->getBody())) {
268    PrintRawCompoundStmt(CS);
269    OS << "\n";
270  } else {
271    OS << "\n";
272    PrintStmt(Node->getBody());
273  }
274}
275
276void StmtPrinter::VisitObjCForCollectionStmt(ObjCForCollectionStmt *Node) {
277  Indent() << "for (";
278  if (DeclStmt *DS = dyn_cast<DeclStmt>(Node->getElement()))
279    PrintRawDeclStmt(DS);
280  else
281    PrintExpr(cast<Expr>(Node->getElement()));
282  OS << " in ";
283  PrintExpr(Node->getCollection());
284  OS << ") ";
285
286  if (CompoundStmt *CS = dyn_cast<CompoundStmt>(Node->getBody())) {
287    PrintRawCompoundStmt(CS);
288    OS << "\n";
289  } else {
290    OS << "\n";
291    PrintStmt(Node->getBody());
292  }
293}
294
295void StmtPrinter::VisitGotoStmt(GotoStmt *Node) {
296  Indent() << "goto " << Node->getLabel()->getName() << ";\n";
297}
298
299void StmtPrinter::VisitIndirectGotoStmt(IndirectGotoStmt *Node) {
300  Indent() << "goto *";
301  PrintExpr(Node->getTarget());
302  OS << ";\n";
303}
304
305void StmtPrinter::VisitContinueStmt(ContinueStmt *Node) {
306  Indent() << "continue;\n";
307}
308
309void StmtPrinter::VisitBreakStmt(BreakStmt *Node) {
310  Indent() << "break;\n";
311}
312
313
314void StmtPrinter::VisitReturnStmt(ReturnStmt *Node) {
315  Indent() << "return";
316  if (Node->getRetValue()) {
317    OS << " ";
318    PrintExpr(Node->getRetValue());
319  }
320  OS << ";\n";
321}
322
323
324void StmtPrinter::VisitAsmStmt(AsmStmt *Node) {
325  Indent() << "asm ";
326
327  if (Node->isVolatile())
328    OS << "volatile ";
329
330  OS << "(";
331  VisitStringLiteral(Node->getAsmString());
332
333  // Outputs
334  if (Node->getNumOutputs() != 0 || Node->getNumInputs() != 0 ||
335      Node->getNumClobbers() != 0)
336    OS << " : ";
337
338  for (unsigned i = 0, e = Node->getNumOutputs(); i != e; ++i) {
339    if (i != 0)
340      OS << ", ";
341
342    if (!Node->getOutputName(i).empty()) {
343      OS << '[';
344      OS << Node->getOutputName(i);
345      OS << "] ";
346    }
347
348    VisitStringLiteral(Node->getOutputConstraintLiteral(i));
349    OS << " ";
350    Visit(Node->getOutputExpr(i));
351  }
352
353  // Inputs
354  if (Node->getNumInputs() != 0 || Node->getNumClobbers() != 0)
355    OS << " : ";
356
357  for (unsigned i = 0, e = Node->getNumInputs(); i != e; ++i) {
358    if (i != 0)
359      OS << ", ";
360
361    if (!Node->getInputName(i).empty()) {
362      OS << '[';
363      OS << Node->getInputName(i);
364      OS << "] ";
365    }
366
367    VisitStringLiteral(Node->getInputConstraintLiteral(i));
368    OS << " ";
369    Visit(Node->getInputExpr(i));
370  }
371
372  // Clobbers
373  if (Node->getNumClobbers() != 0)
374    OS << " : ";
375
376  for (unsigned i = 0, e = Node->getNumClobbers(); i != e; ++i) {
377    if (i != 0)
378      OS << ", ";
379
380    VisitStringLiteral(Node->getClobber(i));
381  }
382
383  OS << ");\n";
384}
385
386void StmtPrinter::VisitObjCAtTryStmt(ObjCAtTryStmt *Node) {
387  Indent() << "@try";
388  if (CompoundStmt *TS = dyn_cast<CompoundStmt>(Node->getTryBody())) {
389    PrintRawCompoundStmt(TS);
390    OS << "\n";
391  }
392
393  for (ObjCAtCatchStmt *catchStmt =
394         static_cast<ObjCAtCatchStmt *>(Node->getCatchStmts());
395       catchStmt;
396       catchStmt =
397         static_cast<ObjCAtCatchStmt *>(catchStmt->getNextCatchStmt())) {
398    Indent() << "@catch(";
399    if (catchStmt->getCatchParamDecl()) {
400      if (Decl *DS = catchStmt->getCatchParamDecl())
401        PrintRawDecl(DS);
402    }
403    OS << ")";
404    if (CompoundStmt *CS = dyn_cast<CompoundStmt>(catchStmt->getCatchBody()))
405      {
406        PrintRawCompoundStmt(CS);
407        OS << "\n";
408      }
409  }
410
411  if (ObjCAtFinallyStmt *FS =static_cast<ObjCAtFinallyStmt *>(
412          Node->getFinallyStmt())) {
413    Indent() << "@finally";
414    PrintRawCompoundStmt(dyn_cast<CompoundStmt>(FS->getFinallyBody()));
415    OS << "\n";
416  }
417}
418
419void StmtPrinter::VisitObjCAtFinallyStmt(ObjCAtFinallyStmt *Node) {
420}
421
422void StmtPrinter::VisitObjCAtCatchStmt (ObjCAtCatchStmt *Node) {
423  Indent() << "@catch (...) { /* todo */ } \n";
424}
425
426void StmtPrinter::VisitObjCAtThrowStmt(ObjCAtThrowStmt *Node) {
427  Indent() << "@throw";
428  if (Node->getThrowExpr()) {
429    OS << " ";
430    PrintExpr(Node->getThrowExpr());
431  }
432  OS << ";\n";
433}
434
435void StmtPrinter::VisitObjCAtSynchronizedStmt(ObjCAtSynchronizedStmt *Node) {
436  Indent() << "@synchronized (";
437  PrintExpr(Node->getSynchExpr());
438  OS << ")";
439  PrintRawCompoundStmt(Node->getSynchBody());
440  OS << "\n";
441}
442
443void StmtPrinter::PrintRawCXXCatchStmt(CXXCatchStmt *Node) {
444  OS << "catch (";
445  if (Decl *ExDecl = Node->getExceptionDecl())
446    PrintRawDecl(ExDecl);
447  else
448    OS << "...";
449  OS << ") ";
450  PrintRawCompoundStmt(cast<CompoundStmt>(Node->getHandlerBlock()));
451}
452
453void StmtPrinter::VisitCXXCatchStmt(CXXCatchStmt *Node) {
454  Indent();
455  PrintRawCXXCatchStmt(Node);
456  OS << "\n";
457}
458
459void StmtPrinter::VisitCXXTryStmt(CXXTryStmt *Node) {
460  Indent() << "try ";
461  PrintRawCompoundStmt(Node->getTryBlock());
462  for(unsigned i = 0, e = Node->getNumHandlers(); i < e; ++i) {
463    OS << " ";
464    PrintRawCXXCatchStmt(Node->getHandler(i));
465  }
466  OS << "\n";
467}
468
469//===----------------------------------------------------------------------===//
470//  Expr printing methods.
471//===----------------------------------------------------------------------===//
472
473void StmtPrinter::VisitExpr(Expr *Node) {
474  OS << "<<unknown expr type>>";
475}
476
477void StmtPrinter::VisitDeclRefExpr(DeclRefExpr *Node) {
478  OS << Node->getDecl()->getNameAsString();
479}
480
481void StmtPrinter::VisitQualifiedDeclRefExpr(QualifiedDeclRefExpr *Node) {
482  NamedDecl *D = Node->getDecl();
483
484  Node->getQualifier()->print(OS, Policy);
485  OS << D->getNameAsString();
486}
487
488void StmtPrinter::VisitUnresolvedDeclRefExpr(UnresolvedDeclRefExpr *Node) {
489  Node->getQualifier()->print(OS, Policy);
490  OS << Node->getDeclName().getAsString();
491}
492
493void StmtPrinter::VisitTemplateIdRefExpr(TemplateIdRefExpr *Node) {
494  if (Node->getQualifier())
495    Node->getQualifier()->print(OS, Policy);
496  Node->getTemplateName().print(OS, Policy, true);
497  OS << '<';
498  OS << TemplateSpecializationType::PrintTemplateArgumentList(
499                                                      Node->getTemplateArgs(),
500                                                   Node->getNumTemplateArgs(),
501                                                              Policy);
502  OS << '>';
503}
504
505void StmtPrinter::VisitObjCIvarRefExpr(ObjCIvarRefExpr *Node) {
506  if (Node->getBase()) {
507    PrintExpr(Node->getBase());
508    OS << (Node->isArrow() ? "->" : ".");
509  }
510  OS << Node->getDecl()->getNameAsString();
511}
512
513void StmtPrinter::VisitObjCPropertyRefExpr(ObjCPropertyRefExpr *Node) {
514  if (Node->getBase()) {
515    PrintExpr(Node->getBase());
516    OS << ".";
517  }
518  OS << Node->getProperty()->getNameAsCString();
519}
520
521void StmtPrinter::VisitObjCImplicitSetterGetterRefExpr(
522                                        ObjCImplicitSetterGetterRefExpr *Node) {
523  if (Node->getBase()) {
524    PrintExpr(Node->getBase());
525    OS << ".";
526  }
527  if (Node->getGetterMethod())
528    OS << Node->getGetterMethod()->getNameAsString();
529
530}
531
532void StmtPrinter::VisitPredefinedExpr(PredefinedExpr *Node) {
533  switch (Node->getIdentType()) {
534    default:
535      assert(0 && "unknown case");
536    case PredefinedExpr::Func:
537      OS << "__func__";
538      break;
539    case PredefinedExpr::Function:
540      OS << "__FUNCTION__";
541      break;
542    case PredefinedExpr::PrettyFunction:
543      OS << "__PRETTY_FUNCTION__";
544      break;
545  }
546}
547
548void StmtPrinter::VisitCharacterLiteral(CharacterLiteral *Node) {
549  unsigned value = Node->getValue();
550  if (Node->isWide())
551    OS << "L";
552  switch (value) {
553  case '\\':
554    OS << "'\\\\'";
555    break;
556  case '\'':
557    OS << "'\\''";
558    break;
559  case '\a':
560    // TODO: K&R: the meaning of '\\a' is different in traditional C
561    OS << "'\\a'";
562    break;
563  case '\b':
564    OS << "'\\b'";
565    break;
566  // Nonstandard escape sequence.
567  /*case '\e':
568    OS << "'\\e'";
569    break;*/
570  case '\f':
571    OS << "'\\f'";
572    break;
573  case '\n':
574    OS << "'\\n'";
575    break;
576  case '\r':
577    OS << "'\\r'";
578    break;
579  case '\t':
580    OS << "'\\t'";
581    break;
582  case '\v':
583    OS << "'\\v'";
584    break;
585  default:
586    if (value < 256 && isprint(value)) {
587      OS << "'" << (char)value << "'";
588    } else if (value < 256) {
589      OS << "'\\x" << llvm::format("%x", value) << "'";
590    } else {
591      // FIXME what to really do here?
592      OS << value;
593    }
594  }
595}
596
597void StmtPrinter::VisitIntegerLiteral(IntegerLiteral *Node) {
598  bool isSigned = Node->getType()->isSignedIntegerType();
599  OS << Node->getValue().toString(10, isSigned);
600
601  // Emit suffixes.  Integer literals are always a builtin integer type.
602  switch (Node->getType()->getAsBuiltinType()->getKind()) {
603  default: assert(0 && "Unexpected type for integer literal!");
604  case BuiltinType::Int:       break; // no suffix.
605  case BuiltinType::UInt:      OS << 'U'; break;
606  case BuiltinType::Long:      OS << 'L'; break;
607  case BuiltinType::ULong:     OS << "UL"; break;
608  case BuiltinType::LongLong:  OS << "LL"; break;
609  case BuiltinType::ULongLong: OS << "ULL"; break;
610  }
611}
612void StmtPrinter::VisitFloatingLiteral(FloatingLiteral *Node) {
613  // FIXME: print value more precisely.
614  OS << Node->getValueAsApproximateDouble();
615}
616
617void StmtPrinter::VisitImaginaryLiteral(ImaginaryLiteral *Node) {
618  PrintExpr(Node->getSubExpr());
619  OS << "i";
620}
621
622void StmtPrinter::VisitStringLiteral(StringLiteral *Str) {
623  if (Str->isWide()) OS << 'L';
624  OS << '"';
625
626  // FIXME: this doesn't print wstrings right.
627  for (unsigned i = 0, e = Str->getByteLength(); i != e; ++i) {
628    unsigned char Char = Str->getStrData()[i];
629
630    switch (Char) {
631    default:
632      if (isprint(Char))
633        OS << (char)Char;
634      else  // Output anything hard as an octal escape.
635        OS << '\\'
636        << (char)('0'+ ((Char >> 6) & 7))
637        << (char)('0'+ ((Char >> 3) & 7))
638        << (char)('0'+ ((Char >> 0) & 7));
639      break;
640    // Handle some common non-printable cases to make dumps prettier.
641    case '\\': OS << "\\\\"; break;
642    case '"': OS << "\\\""; break;
643    case '\n': OS << "\\n"; break;
644    case '\t': OS << "\\t"; break;
645    case '\a': OS << "\\a"; break;
646    case '\b': OS << "\\b"; break;
647    }
648  }
649  OS << '"';
650}
651void StmtPrinter::VisitParenExpr(ParenExpr *Node) {
652  OS << "(";
653  PrintExpr(Node->getSubExpr());
654  OS << ")";
655}
656void StmtPrinter::VisitUnaryOperator(UnaryOperator *Node) {
657  if (!Node->isPostfix()) {
658    OS << UnaryOperator::getOpcodeStr(Node->getOpcode());
659
660    // Print a space if this is an "identifier operator" like __real, or if
661    // it might be concatenated incorrectly like '+'.
662    switch (Node->getOpcode()) {
663    default: break;
664    case UnaryOperator::Real:
665    case UnaryOperator::Imag:
666    case UnaryOperator::Extension:
667      OS << ' ';
668      break;
669    case UnaryOperator::Plus:
670    case UnaryOperator::Minus:
671      if (isa<UnaryOperator>(Node->getSubExpr()))
672        OS << ' ';
673      break;
674    }
675  }
676  PrintExpr(Node->getSubExpr());
677
678  if (Node->isPostfix())
679    OS << UnaryOperator::getOpcodeStr(Node->getOpcode());
680}
681
682bool StmtPrinter::PrintOffsetOfDesignator(Expr *E) {
683  if (isa<UnaryOperator>(E)) {
684    // Base case, print the type and comma.
685    OS << E->getType().getAsString() << ", ";
686    return true;
687  } else if (ArraySubscriptExpr *ASE = dyn_cast<ArraySubscriptExpr>(E)) {
688    PrintOffsetOfDesignator(ASE->getLHS());
689    OS << "[";
690    PrintExpr(ASE->getRHS());
691    OS << "]";
692    return false;
693  } else {
694    MemberExpr *ME = cast<MemberExpr>(E);
695    bool IsFirst = PrintOffsetOfDesignator(ME->getBase());
696    OS << (IsFirst ? "" : ".") << ME->getMemberDecl()->getNameAsString();
697    return false;
698  }
699}
700
701void StmtPrinter::VisitUnaryOffsetOf(UnaryOperator *Node) {
702  OS << "__builtin_offsetof(";
703  PrintOffsetOfDesignator(Node->getSubExpr());
704  OS << ")";
705}
706
707void StmtPrinter::VisitSizeOfAlignOfExpr(SizeOfAlignOfExpr *Node) {
708  OS << (Node->isSizeOf() ? "sizeof" : "__alignof");
709  if (Node->isArgumentType())
710    OS << "(" << Node->getArgumentType().getAsString() << ")";
711  else {
712    OS << " ";
713    PrintExpr(Node->getArgumentExpr());
714  }
715}
716void StmtPrinter::VisitArraySubscriptExpr(ArraySubscriptExpr *Node) {
717  PrintExpr(Node->getLHS());
718  OS << "[";
719  PrintExpr(Node->getRHS());
720  OS << "]";
721}
722
723void StmtPrinter::VisitCallExpr(CallExpr *Call) {
724  PrintExpr(Call->getCallee());
725  OS << "(";
726  for (unsigned i = 0, e = Call->getNumArgs(); i != e; ++i) {
727    if (isa<CXXDefaultArgExpr>(Call->getArg(i))) {
728      // Don't print any defaulted arguments
729      break;
730    }
731
732    if (i) OS << ", ";
733    PrintExpr(Call->getArg(i));
734  }
735  OS << ")";
736}
737void StmtPrinter::VisitMemberExpr(MemberExpr *Node) {
738  // FIXME: Suppress printing implicit bases (like "this")
739  PrintExpr(Node->getBase());
740  OS << (Node->isArrow() ? "->" : ".");
741  // FIXME: Suppress printing references to unnamed objects
742  // representing anonymous unions/structs
743  OS << Node->getMemberDecl()->getNameAsString();
744}
745void StmtPrinter::VisitObjCIsaExpr(ObjCIsaExpr *Node) {
746  PrintExpr(Node->getBase());
747  OS << (Node->isArrow() ? "->isa" : ".isa");
748}
749
750void StmtPrinter::VisitExtVectorElementExpr(ExtVectorElementExpr *Node) {
751  PrintExpr(Node->getBase());
752  OS << ".";
753  OS << Node->getAccessor().getName();
754}
755void StmtPrinter::VisitCastExpr(CastExpr *) {
756  assert(0 && "CastExpr is an abstract class");
757}
758void StmtPrinter::VisitExplicitCastExpr(ExplicitCastExpr *) {
759  assert(0 && "ExplicitCastExpr is an abstract class");
760}
761void StmtPrinter::VisitCStyleCastExpr(CStyleCastExpr *Node) {
762  OS << "(" << Node->getType().getAsString() << ")";
763  PrintExpr(Node->getSubExpr());
764}
765void StmtPrinter::VisitCompoundLiteralExpr(CompoundLiteralExpr *Node) {
766  OS << "(" << Node->getType().getAsString() << ")";
767  PrintExpr(Node->getInitializer());
768}
769void StmtPrinter::VisitImplicitCastExpr(ImplicitCastExpr *Node) {
770  // No need to print anything, simply forward to the sub expression.
771  PrintExpr(Node->getSubExpr());
772}
773void StmtPrinter::VisitBinaryOperator(BinaryOperator *Node) {
774  PrintExpr(Node->getLHS());
775  OS << " " << BinaryOperator::getOpcodeStr(Node->getOpcode()) << " ";
776  PrintExpr(Node->getRHS());
777}
778void StmtPrinter::VisitCompoundAssignOperator(CompoundAssignOperator *Node) {
779  PrintExpr(Node->getLHS());
780  OS << " " << BinaryOperator::getOpcodeStr(Node->getOpcode()) << " ";
781  PrintExpr(Node->getRHS());
782}
783void StmtPrinter::VisitConditionalOperator(ConditionalOperator *Node) {
784  PrintExpr(Node->getCond());
785
786  if (Node->getLHS()) {
787    OS << " ? ";
788    PrintExpr(Node->getLHS());
789    OS << " : ";
790  }
791  else { // Handle GCC extension where LHS can be NULL.
792    OS << " ?: ";
793  }
794
795  PrintExpr(Node->getRHS());
796}
797
798// GNU extensions.
799
800void StmtPrinter::VisitAddrLabelExpr(AddrLabelExpr *Node) {
801  OS << "&&" << Node->getLabel()->getName();
802}
803
804void StmtPrinter::VisitStmtExpr(StmtExpr *E) {
805  OS << "(";
806  PrintRawCompoundStmt(E->getSubStmt());
807  OS << ")";
808}
809
810void StmtPrinter::VisitTypesCompatibleExpr(TypesCompatibleExpr *Node) {
811  OS << "__builtin_types_compatible_p(";
812  OS << Node->getArgType1().getAsString() << ",";
813  OS << Node->getArgType2().getAsString() << ")";
814}
815
816void StmtPrinter::VisitChooseExpr(ChooseExpr *Node) {
817  OS << "__builtin_choose_expr(";
818  PrintExpr(Node->getCond());
819  OS << ", ";
820  PrintExpr(Node->getLHS());
821  OS << ", ";
822  PrintExpr(Node->getRHS());
823  OS << ")";
824}
825
826void StmtPrinter::VisitGNUNullExpr(GNUNullExpr *) {
827  OS << "__null";
828}
829
830void StmtPrinter::VisitShuffleVectorExpr(ShuffleVectorExpr *Node) {
831  OS << "__builtin_shufflevector(";
832  for (unsigned i = 0, e = Node->getNumSubExprs(); i != e; ++i) {
833    if (i) OS << ", ";
834    PrintExpr(Node->getExpr(i));
835  }
836  OS << ")";
837}
838
839void StmtPrinter::VisitInitListExpr(InitListExpr* Node) {
840  if (Node->getSyntacticForm()) {
841    Visit(Node->getSyntacticForm());
842    return;
843  }
844
845  OS << "{ ";
846  for (unsigned i = 0, e = Node->getNumInits(); i != e; ++i) {
847    if (i) OS << ", ";
848    if (Node->getInit(i))
849      PrintExpr(Node->getInit(i));
850    else
851      OS << "0";
852  }
853  OS << " }";
854}
855
856void StmtPrinter::VisitParenListExpr(ParenListExpr* Node) {
857  OS << "( ";
858  for (unsigned i = 0, e = Node->getNumExprs(); i != e; ++i) {
859    if (i) OS << ", ";
860    PrintExpr(Node->getExpr(i));
861  }
862  OS << " )";
863}
864
865void StmtPrinter::VisitDesignatedInitExpr(DesignatedInitExpr *Node) {
866  for (DesignatedInitExpr::designators_iterator D = Node->designators_begin(),
867                      DEnd = Node->designators_end();
868       D != DEnd; ++D) {
869    if (D->isFieldDesignator()) {
870      if (D->getDotLoc().isInvalid())
871        OS << D->getFieldName()->getName() << ":";
872      else
873        OS << "." << D->getFieldName()->getName();
874    } else {
875      OS << "[";
876      if (D->isArrayDesignator()) {
877        PrintExpr(Node->getArrayIndex(*D));
878      } else {
879        PrintExpr(Node->getArrayRangeStart(*D));
880        OS << " ... ";
881        PrintExpr(Node->getArrayRangeEnd(*D));
882      }
883      OS << "]";
884    }
885  }
886
887  OS << " = ";
888  PrintExpr(Node->getInit());
889}
890
891void StmtPrinter::VisitImplicitValueInitExpr(ImplicitValueInitExpr *Node) {
892  if (Policy.LangOpts.CPlusPlus)
893    OS << "/*implicit*/" << Node->getType().getAsString(Policy) << "()";
894  else {
895    OS << "/*implicit*/(" << Node->getType().getAsString(Policy) << ")";
896    if (Node->getType()->isRecordType())
897      OS << "{}";
898    else
899      OS << 0;
900  }
901}
902
903void StmtPrinter::VisitVAArgExpr(VAArgExpr *Node) {
904  OS << "__builtin_va_arg(";
905  PrintExpr(Node->getSubExpr());
906  OS << ", ";
907  OS << Node->getType().getAsString();
908  OS << ")";
909}
910
911// C++
912void StmtPrinter::VisitCXXOperatorCallExpr(CXXOperatorCallExpr *Node) {
913  const char *OpStrings[NUM_OVERLOADED_OPERATORS] = {
914    "",
915#define OVERLOADED_OPERATOR(Name,Spelling,Token,Unary,Binary,MemberOnly) \
916    Spelling,
917#include "clang/Basic/OperatorKinds.def"
918  };
919
920  OverloadedOperatorKind Kind = Node->getOperator();
921  if (Kind == OO_PlusPlus || Kind == OO_MinusMinus) {
922    if (Node->getNumArgs() == 1) {
923      OS << OpStrings[Kind] << ' ';
924      PrintExpr(Node->getArg(0));
925    } else {
926      PrintExpr(Node->getArg(0));
927      OS << ' ' << OpStrings[Kind];
928    }
929  } else if (Kind == OO_Call) {
930    PrintExpr(Node->getArg(0));
931    OS << '(';
932    for (unsigned ArgIdx = 1; ArgIdx < Node->getNumArgs(); ++ArgIdx) {
933      if (ArgIdx > 1)
934        OS << ", ";
935      if (!isa<CXXDefaultArgExpr>(Node->getArg(ArgIdx)))
936        PrintExpr(Node->getArg(ArgIdx));
937    }
938    OS << ')';
939  } else if (Kind == OO_Subscript) {
940    PrintExpr(Node->getArg(0));
941    OS << '[';
942    PrintExpr(Node->getArg(1));
943    OS << ']';
944  } else if (Node->getNumArgs() == 1) {
945    OS << OpStrings[Kind] << ' ';
946    PrintExpr(Node->getArg(0));
947  } else if (Node->getNumArgs() == 2) {
948    PrintExpr(Node->getArg(0));
949    OS << ' ' << OpStrings[Kind] << ' ';
950    PrintExpr(Node->getArg(1));
951  } else {
952    assert(false && "unknown overloaded operator");
953  }
954}
955
956void StmtPrinter::VisitCXXMemberCallExpr(CXXMemberCallExpr *Node) {
957  VisitCallExpr(cast<CallExpr>(Node));
958}
959
960void StmtPrinter::VisitCXXNamedCastExpr(CXXNamedCastExpr *Node) {
961  OS << Node->getCastName() << '<';
962  OS << Node->getTypeAsWritten().getAsString() << ">(";
963  PrintExpr(Node->getSubExpr());
964  OS << ")";
965}
966
967void StmtPrinter::VisitCXXStaticCastExpr(CXXStaticCastExpr *Node) {
968  VisitCXXNamedCastExpr(Node);
969}
970
971void StmtPrinter::VisitCXXDynamicCastExpr(CXXDynamicCastExpr *Node) {
972  VisitCXXNamedCastExpr(Node);
973}
974
975void StmtPrinter::VisitCXXReinterpretCastExpr(CXXReinterpretCastExpr *Node) {
976  VisitCXXNamedCastExpr(Node);
977}
978
979void StmtPrinter::VisitCXXConstCastExpr(CXXConstCastExpr *Node) {
980  VisitCXXNamedCastExpr(Node);
981}
982
983void StmtPrinter::VisitCXXTypeidExpr(CXXTypeidExpr *Node) {
984  OS << "typeid(";
985  if (Node->isTypeOperand()) {
986    OS << Node->getTypeOperand().getAsString();
987  } else {
988    PrintExpr(Node->getExprOperand());
989  }
990  OS << ")";
991}
992
993void StmtPrinter::VisitCXXBoolLiteralExpr(CXXBoolLiteralExpr *Node) {
994  OS << (Node->getValue() ? "true" : "false");
995}
996
997void StmtPrinter::VisitCXXNullPtrLiteralExpr(CXXNullPtrLiteralExpr *Node) {
998  OS << "nullptr";
999}
1000
1001void StmtPrinter::VisitCXXThisExpr(CXXThisExpr *Node) {
1002  OS << "this";
1003}
1004
1005void StmtPrinter::VisitCXXThrowExpr(CXXThrowExpr *Node) {
1006  if (Node->getSubExpr() == 0)
1007    OS << "throw";
1008  else {
1009    OS << "throw ";
1010    PrintExpr(Node->getSubExpr());
1011  }
1012}
1013
1014void StmtPrinter::VisitCXXDefaultArgExpr(CXXDefaultArgExpr *Node) {
1015  // Nothing to print: we picked up the default argument
1016}
1017
1018void StmtPrinter::VisitCXXFunctionalCastExpr(CXXFunctionalCastExpr *Node) {
1019  OS << Node->getType().getAsString();
1020  OS << "(";
1021  PrintExpr(Node->getSubExpr());
1022  OS << ")";
1023}
1024
1025void StmtPrinter::VisitCXXBindTemporaryExpr(CXXBindTemporaryExpr *Node) {
1026  PrintExpr(Node->getSubExpr());
1027}
1028
1029void StmtPrinter::VisitCXXTemporaryObjectExpr(CXXTemporaryObjectExpr *Node) {
1030  OS << Node->getType().getAsString();
1031  OS << "(";
1032  for (CXXTemporaryObjectExpr::arg_iterator Arg = Node->arg_begin(),
1033                                         ArgEnd = Node->arg_end();
1034       Arg != ArgEnd; ++Arg) {
1035    if (Arg != Node->arg_begin())
1036      OS << ", ";
1037    PrintExpr(*Arg);
1038  }
1039  OS << ")";
1040}
1041
1042void StmtPrinter::VisitCXXZeroInitValueExpr(CXXZeroInitValueExpr *Node) {
1043  OS << Node->getType().getAsString() << "()";
1044}
1045
1046void
1047StmtPrinter::VisitCXXConditionDeclExpr(CXXConditionDeclExpr *E) {
1048  PrintRawDecl(E->getVarDecl());
1049}
1050
1051void StmtPrinter::VisitCXXNewExpr(CXXNewExpr *E) {
1052  if (E->isGlobalNew())
1053    OS << "::";
1054  OS << "new ";
1055  unsigned NumPlace = E->getNumPlacementArgs();
1056  if (NumPlace > 0) {
1057    OS << "(";
1058    PrintExpr(E->getPlacementArg(0));
1059    for (unsigned i = 1; i < NumPlace; ++i) {
1060      OS << ", ";
1061      PrintExpr(E->getPlacementArg(i));
1062    }
1063    OS << ") ";
1064  }
1065  if (E->isParenTypeId())
1066    OS << "(";
1067  std::string TypeS;
1068  if (Expr *Size = E->getArraySize()) {
1069    llvm::raw_string_ostream s(TypeS);
1070    Size->printPretty(s, Context, Helper, Policy);
1071    s.flush();
1072    TypeS = "[" + TypeS + "]";
1073  }
1074  E->getAllocatedType().getAsStringInternal(TypeS, Policy);
1075  OS << TypeS;
1076  if (E->isParenTypeId())
1077    OS << ")";
1078
1079  if (E->hasInitializer()) {
1080    OS << "(";
1081    unsigned NumCons = E->getNumConstructorArgs();
1082    if (NumCons > 0) {
1083      PrintExpr(E->getConstructorArg(0));
1084      for (unsigned i = 1; i < NumCons; ++i) {
1085        OS << ", ";
1086        PrintExpr(E->getConstructorArg(i));
1087      }
1088    }
1089    OS << ")";
1090  }
1091}
1092
1093void StmtPrinter::VisitCXXDeleteExpr(CXXDeleteExpr *E) {
1094  if (E->isGlobalDelete())
1095    OS << "::";
1096  OS << "delete ";
1097  if (E->isArrayForm())
1098    OS << "[] ";
1099  PrintExpr(E->getArgument());
1100}
1101
1102void StmtPrinter::VisitUnresolvedFunctionNameExpr(UnresolvedFunctionNameExpr *E) {
1103  OS << E->getName().getAsString();
1104}
1105
1106void StmtPrinter::VisitCXXConstructExpr(CXXConstructExpr *E) {
1107  // Nothing to print.
1108}
1109
1110void StmtPrinter::VisitCXXExprWithTemporaries(CXXExprWithTemporaries *E) {
1111  // Just forward to the sub expression.
1112  PrintExpr(E->getSubExpr());
1113}
1114
1115void
1116StmtPrinter::VisitCXXUnresolvedConstructExpr(
1117                                           CXXUnresolvedConstructExpr *Node) {
1118  OS << Node->getTypeAsWritten().getAsString();
1119  OS << "(";
1120  for (CXXUnresolvedConstructExpr::arg_iterator Arg = Node->arg_begin(),
1121                                             ArgEnd = Node->arg_end();
1122       Arg != ArgEnd; ++Arg) {
1123    if (Arg != Node->arg_begin())
1124      OS << ", ";
1125    PrintExpr(*Arg);
1126  }
1127  OS << ")";
1128}
1129
1130void StmtPrinter::VisitCXXUnresolvedMemberExpr(CXXUnresolvedMemberExpr *Node) {
1131  PrintExpr(Node->getBase());
1132  OS << (Node->isArrow() ? "->" : ".");
1133  OS << Node->getMember().getAsString();
1134}
1135
1136static const char *getTypeTraitName(UnaryTypeTrait UTT) {
1137  switch (UTT) {
1138  default: assert(false && "Unknown type trait");
1139  case UTT_HasNothrowAssign:      return "__has_nothrow_assign";
1140  case UTT_HasNothrowCopy:        return "__has_nothrow_copy";
1141  case UTT_HasNothrowConstructor: return "__has_nothrow_constructor";
1142  case UTT_HasTrivialAssign:      return "__has_trivial_assign";
1143  case UTT_HasTrivialCopy:        return "__has_trivial_copy";
1144  case UTT_HasTrivialConstructor: return "__has_trivial_constructor";
1145  case UTT_HasTrivialDestructor:  return "__has_trivial_destructor";
1146  case UTT_HasVirtualDestructor:  return "__has_virtual_destructor";
1147  case UTT_IsAbstract:            return "__is_abstract";
1148  case UTT_IsClass:               return "__is_class";
1149  case UTT_IsEmpty:               return "__is_empty";
1150  case UTT_IsEnum:                return "__is_enum";
1151  case UTT_IsPOD:                 return "__is_pod";
1152  case UTT_IsPolymorphic:         return "__is_polymorphic";
1153  case UTT_IsUnion:               return "__is_union";
1154  }
1155}
1156
1157void StmtPrinter::VisitUnaryTypeTraitExpr(UnaryTypeTraitExpr *E) {
1158  OS << getTypeTraitName(E->getTrait()) << "("
1159     << E->getQueriedType().getAsString() << ")";
1160}
1161
1162// Obj-C
1163
1164void StmtPrinter::VisitObjCStringLiteral(ObjCStringLiteral *Node) {
1165  OS << "@";
1166  VisitStringLiteral(Node->getString());
1167}
1168
1169void StmtPrinter::VisitObjCEncodeExpr(ObjCEncodeExpr *Node) {
1170  OS << "@encode(" << Node->getEncodedType().getAsString() << ')';
1171}
1172
1173void StmtPrinter::VisitObjCSelectorExpr(ObjCSelectorExpr *Node) {
1174  OS << "@selector(" << Node->getSelector().getAsString() << ')';
1175}
1176
1177void StmtPrinter::VisitObjCProtocolExpr(ObjCProtocolExpr *Node) {
1178  OS << "@protocol(" << Node->getProtocol()->getNameAsString() << ')';
1179}
1180
1181void StmtPrinter::VisitObjCMessageExpr(ObjCMessageExpr *Mess) {
1182  OS << "[";
1183  Expr *receiver = Mess->getReceiver();
1184  if (receiver) PrintExpr(receiver);
1185  else OS << Mess->getClassName()->getName();
1186  OS << ' ';
1187  Selector selector = Mess->getSelector();
1188  if (selector.isUnarySelector()) {
1189    OS << selector.getIdentifierInfoForSlot(0)->getName();
1190  } else {
1191    for (unsigned i = 0, e = Mess->getNumArgs(); i != e; ++i) {
1192      if (i < selector.getNumArgs()) {
1193        if (i > 0) OS << ' ';
1194        if (selector.getIdentifierInfoForSlot(i))
1195          OS << selector.getIdentifierInfoForSlot(i)->getName() << ':';
1196        else
1197           OS << ":";
1198      }
1199      else OS << ", "; // Handle variadic methods.
1200
1201      PrintExpr(Mess->getArg(i));
1202    }
1203  }
1204  OS << "]";
1205}
1206
1207void StmtPrinter::VisitObjCSuperExpr(ObjCSuperExpr *) {
1208  OS << "super";
1209}
1210
1211void StmtPrinter::VisitBlockExpr(BlockExpr *Node) {
1212  BlockDecl *BD = Node->getBlockDecl();
1213  OS << "^";
1214
1215  const FunctionType *AFT = Node->getFunctionType();
1216
1217  if (isa<FunctionNoProtoType>(AFT)) {
1218    OS << "()";
1219  } else if (!BD->param_empty() || cast<FunctionProtoType>(AFT)->isVariadic()) {
1220    OS << '(';
1221    std::string ParamStr;
1222    for (BlockDecl::param_iterator AI = BD->param_begin(),
1223         E = BD->param_end(); AI != E; ++AI) {
1224      if (AI != BD->param_begin()) OS << ", ";
1225      ParamStr = (*AI)->getNameAsString();
1226      (*AI)->getType().getAsStringInternal(ParamStr, Policy);
1227      OS << ParamStr;
1228    }
1229
1230    const FunctionProtoType *FT = cast<FunctionProtoType>(AFT);
1231    if (FT->isVariadic()) {
1232      if (!BD->param_empty()) OS << ", ";
1233      OS << "...";
1234    }
1235    OS << ')';
1236  }
1237}
1238
1239void StmtPrinter::VisitBlockDeclRefExpr(BlockDeclRefExpr *Node) {
1240  OS << Node->getDecl()->getNameAsString();
1241}
1242//===----------------------------------------------------------------------===//
1243// Stmt method implementations
1244//===----------------------------------------------------------------------===//
1245
1246void Stmt::dumpPretty(ASTContext& Context) const {
1247  printPretty(llvm::errs(), Context, 0,
1248              PrintingPolicy(Context.getLangOptions()));
1249}
1250
1251void Stmt::printPretty(llvm::raw_ostream &OS, ASTContext& Context,
1252                       PrinterHelper* Helper,
1253                       const PrintingPolicy &Policy,
1254                       unsigned Indentation) const {
1255  if (this == 0) {
1256    OS << "<NULL>";
1257    return;
1258  }
1259
1260  if (Policy.Dump) {
1261    dump(Context.getSourceManager());
1262    return;
1263  }
1264
1265  StmtPrinter P(OS, Context, Helper, Policy, Indentation);
1266  P.Visit(const_cast<Stmt*>(this));
1267}
1268
1269//===----------------------------------------------------------------------===//
1270// PrinterHelper
1271//===----------------------------------------------------------------------===//
1272
1273// Implement virtual destructor.
1274PrinterHelper::~PrinterHelper() {}
1275