lib/MC/MCAsmStreamer.cpp

   1 //===- lib/MC/MCAsmStreamer.cpp - Text Assembly Output --------------------===//
   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 #include "llvm/MC/MCStreamer.h"
  11 #include "llvm/ADT/OwningPtr.h"
  12 #include "llvm/ADT/SmallString.h"
  13 #include "llvm/ADT/StringExtras.h"
  14 #include "llvm/ADT/Twine.h"
  15 #include "llvm/MC/MCAsmBackend.h"
  16 #include "llvm/MC/MCAsmInfo.h"
  17 #include "llvm/MC/MCCodeEmitter.h"
  18 #include "llvm/MC/MCContext.h"
  19 #include "llvm/MC/MCExpr.h"
  20 #include "llvm/MC/MCFixupKindInfo.h"
  21 #include "llvm/MC/MCInst.h"
  22 #include "llvm/MC/MCInstPrinter.h"
  23 #include "llvm/MC/MCObjectFileInfo.h"
  24 #include "llvm/MC/MCRegisterInfo.h"
  25 #include "llvm/MC/MCSectionCOFF.h"
  26 #include "llvm/MC/MCSectionMachO.h"
  27 #include "llvm/MC/MCSymbol.h"
  28 #include "llvm/Support/ErrorHandling.h"
  29 #include "llvm/Support/Format.h"
  30 #include "llvm/Support/FormattedStream.h"
  31 #include "llvm/Support/MathExtras.h"
  32 #include "llvm/Support/Path.h"
  33 #include <cctype>
  34 using namespace llvm;
  35
  36 namespace {
  37
  38 class MCAsmStreamer : public MCStreamer {
  39 protected:
  40   formatted_raw_ostream &OS;
  41   const MCAsmInfo *MAI;
  42 private:
  43   OwningPtr<MCInstPrinter> InstPrinter;
  44   OwningPtr<MCCodeEmitter> Emitter;
  45   OwningPtr<MCAsmBackend> AsmBackend;
  46
  47   SmallString<128> CommentToEmit;
  48   raw_svector_ostream CommentStream;
  49
  50   unsigned IsVerboseAsm : 1;
  51   unsigned ShowInst : 1;
  52   unsigned UseLoc : 1;
  53   unsigned UseCFI : 1;
  54   unsigned UseDwarfDirectory : 1;
  55
  56   enum EHSymbolFlags { EHGlobal         = 1,
  57                        EHWeakDefinition = 1 << 1,
  58                        EHPrivateExtern  = 1 << 2 };
  59   DenseMap<const MCSymbol*, unsigned> FlagMap;
  60
  61   bool needsSet(const MCExpr *Value);
  62
  63   void EmitRegisterName(int64_t Register);
  64   virtual void EmitCFIStartProcImpl(MCDwarfFrameInfo &Frame);
  65   virtual void EmitCFIEndProcImpl(MCDwarfFrameInfo &Frame);
  66
  67 public:
  68   MCAsmStreamer(MCContext &Context, formatted_raw_ostream &os,
  69                 bool isVerboseAsm, bool useLoc, bool useCFI,
  70                 bool useDwarfDirectory,
  71                 MCInstPrinter *printer, MCCodeEmitter *emitter,
  72                 MCAsmBackend *asmbackend,
  73                 bool showInst)
  74     : MCStreamer(SK_AsmStreamer, Context), OS(os), MAI(Context.getAsmInfo()),
  75       InstPrinter(printer), Emitter(emitter), AsmBackend(asmbackend),
  76       CommentStream(CommentToEmit), IsVerboseAsm(isVerboseAsm),
  77       ShowInst(showInst), UseLoc(useLoc), UseCFI(useCFI),
  78       UseDwarfDirectory(useDwarfDirectory) {
  79     if (InstPrinter && IsVerboseAsm)
  80       InstPrinter->setCommentStream(CommentStream);
  81   }
  82   ~MCAsmStreamer() {}
  83
  84   inline void EmitEOL() {
  85     // If we don't have any comments, just emit a \n.
  86     if (!IsVerboseAsm) {
  87       OS << '\n';
  88       return;
  89     }
  90     EmitCommentsAndEOL();
  91   }
  92   void EmitCommentsAndEOL();
  93
  94   /// isVerboseAsm - Return true if this streamer supports verbose assembly at
  95   /// all.
  96   virtual bool isVerboseAsm() const { return IsVerboseAsm; }
  97
  98   /// hasRawTextSupport - We support EmitRawText.
  99   virtual bool hasRawTextSupport() const { return true; }
 100
 101   /// AddComment - Add a comment that can be emitted to the generated .s
 102   /// file if applicable as a QoI issue to make the output of the compiler
 103   /// more readable.  This only affects the MCAsmStreamer, and only when
 104   /// verbose assembly output is enabled.
 105   virtual void AddComment(const Twine &T);
 106
 107   /// AddEncodingComment - Add a comment showing the encoding of an instruction.
 108   virtual void AddEncodingComment(const MCInst &Inst);
 109
 110   /// GetCommentOS - Return a raw_ostream that comments can be written to.
 111   /// Unlike AddComment, you are required to terminate comments with \n if you
 112   /// use this method.
 113   virtual raw_ostream &GetCommentOS() {
 114     if (!IsVerboseAsm)
 115       return nulls();  // Discard comments unless in verbose asm mode.
 116     return CommentStream;
 117   }
 118
 119   /// AddBlankLine - Emit a blank line to a .s file to pretty it up.
 120   virtual void AddBlankLine() {
 121     EmitEOL();
 122   }
 123
 124   /// @name MCStreamer Interface
 125   /// @{
 126
 127   virtual void ChangeSection(const MCSection *Section,
 128                              const MCExpr *Subsection);
 129
 130   virtual void InitSections() {
 131     InitToTextSection();
 132   }
 133
 134   virtual void InitToTextSection() {
 135     SwitchSection(getContext().getObjectFileInfo()->getTextSection());
 136   }
 137
 138   virtual void EmitLabel(MCSymbol *Symbol);
 139   virtual void EmitDebugLabel(MCSymbol *Symbol);
 140
 141   virtual void EmitEHSymAttributes(const MCSymbol *Symbol,
 142                                    MCSymbol *EHSymbol);
 143   virtual void EmitAssemblerFlag(MCAssemblerFlag Flag);
 144   virtual void EmitLinkerOptions(ArrayRef<std::string> Options);
 145   virtual void EmitDataRegion(MCDataRegionType Kind);
 146   virtual void EmitThumbFunc(MCSymbol *Func);
 147
 148   virtual void EmitAssignment(MCSymbol *Symbol, const MCExpr *Value);
 149   virtual void EmitWeakReference(MCSymbol *Alias, const MCSymbol *Symbol);
 150   virtual void EmitDwarfAdvanceLineAddr(int64_t LineDelta,
 151                                         const MCSymbol *LastLabel,
 152                                         const MCSymbol *Label,
 153                                         unsigned PointerSize);
 154   virtual void EmitDwarfAdvanceFrameAddr(const MCSymbol *LastLabel,
 155                                          const MCSymbol *Label);
 156
 157   virtual void EmitSymbolAttribute(MCSymbol *Symbol, MCSymbolAttr Attribute);
 158
 159   virtual void EmitSymbolDesc(MCSymbol *Symbol, unsigned DescValue);
 160   virtual void BeginCOFFSymbolDef(const MCSymbol *Symbol);
 161   virtual void EmitCOFFSymbolStorageClass(int StorageClass);
 162   virtual void EmitCOFFSymbolType(int Type);
 163   virtual void EndCOFFSymbolDef();
 164   virtual void EmitCOFFSecRel32(MCSymbol const *Symbol);
 165   virtual void EmitELFSize(MCSymbol *Symbol, const MCExpr *Value);
 166   virtual void EmitCommonSymbol(MCSymbol *Symbol, uint64_t Size,
 167                                 unsigned ByteAlignment);
 168
 169   /// EmitLocalCommonSymbol - Emit a local common (.lcomm) symbol.
 170   ///
 171   /// @param Symbol - The common symbol to emit.
 172   /// @param Size - The size of the common symbol.
 173   /// @param ByteAlignment - The alignment of the common symbol in bytes.
 174   virtual void EmitLocalCommonSymbol(MCSymbol *Symbol, uint64_t Size,
 175                                      unsigned ByteAlignment);
 176
 177   virtual void EmitZerofill(const MCSection *Section, MCSymbol *Symbol = 0,
 178                             uint64_t Size = 0, unsigned ByteAlignment = 0);
 179
 180   virtual void EmitTBSSSymbol (const MCSection *Section, MCSymbol *Symbol,
 181                                uint64_t Size, unsigned ByteAlignment = 0);
 182
 183   virtual void EmitBytes(StringRef Data, unsigned AddrSpace);
 184
 185   virtual void EmitValueImpl(const MCExpr *Value, unsigned Size,
 186                              unsigned AddrSpace);
 187   virtual void EmitIntValue(uint64_t Value, unsigned Size,
 188                             unsigned AddrSpace = 0);
 189
 190   virtual void EmitULEB128Value(const MCExpr *Value);
 191
 192   virtual void EmitSLEB128Value(const MCExpr *Value);
 193
 194   virtual void EmitGPRel64Value(const MCExpr *Value);
 195
 196   virtual void EmitGPRel32Value(const MCExpr *Value);
 197
 198
 199   virtual void EmitFill(uint64_t NumBytes, uint8_t FillValue,
 200                         unsigned AddrSpace);
 201
 202   virtual void EmitValueToAlignment(unsigned ByteAlignment, int64_t Value = 0,
 203                                     unsigned ValueSize = 1,
 204                                     unsigned MaxBytesToEmit = 0);
 205
 206   virtual void EmitCodeAlignment(unsigned ByteAlignment,
 207                                  unsigned MaxBytesToEmit = 0);
 208
 209   virtual bool EmitValueToOffset(const MCExpr *Offset,
 210                                  unsigned char Value = 0);
 211
 212   virtual void EmitFileDirective(StringRef Filename);
 213   virtual bool EmitDwarfFileDirective(unsigned FileNo, StringRef Directory,
 214                                       StringRef Filename, unsigned CUID = 0);
 215   virtual void EmitDwarfLocDirective(unsigned FileNo, unsigned Line,
 216                                      unsigned Column, unsigned Flags,
 217                                      unsigned Isa, unsigned Discriminator,
 218                                      StringRef FileName);
 219
 220   virtual void EmitCFISections(bool EH, bool Debug);
 221   virtual void EmitCFIDefCfa(int64_t Register, int64_t Offset);
 222   virtual void EmitCFIDefCfaOffset(int64_t Offset);
 223   virtual void EmitCFIDefCfaRegister(int64_t Register);
 224   virtual void EmitCFIOffset(int64_t Register, int64_t Offset);
 225   virtual void EmitCFIPersonality(const MCSymbol *Sym, unsigned Encoding);
 226   virtual void EmitCFILsda(const MCSymbol *Sym, unsigned Encoding);
 227   virtual void EmitCFIRememberState();
 228   virtual void EmitCFIRestoreState();
 229   virtual void EmitCFISameValue(int64_t Register);
 230   virtual void EmitCFIRelOffset(int64_t Register, int64_t Offset);
 231   virtual void EmitCFIAdjustCfaOffset(int64_t Adjustment);
 232   virtual void EmitCFISignalFrame();
 233   virtual void EmitCFIUndefined(int64_t Register);
 234   virtual void EmitCFIRegister(int64_t Register1, int64_t Register2);
 235
 236   virtual void EmitWin64EHStartProc(const MCSymbol *Symbol);
 237   virtual void EmitWin64EHEndProc();
 238   virtual void EmitWin64EHStartChained();
 239   virtual void EmitWin64EHEndChained();
 240   virtual void EmitWin64EHHandler(const MCSymbol *Sym, bool Unwind,
 241                                   bool Except);
 242   virtual void EmitWin64EHHandlerData();
 243   virtual void EmitWin64EHPushReg(unsigned Register);
 244   virtual void EmitWin64EHSetFrame(unsigned Register, unsigned Offset);
 245   virtual void EmitWin64EHAllocStack(unsigned Size);
 246   virtual void EmitWin64EHSaveReg(unsigned Register, unsigned Offset);
 247   virtual void EmitWin64EHSaveXMM(unsigned Register, unsigned Offset);
 248   virtual void EmitWin64EHPushFrame(bool Code);
 249   virtual void EmitWin64EHEndProlog();
 250
 251   virtual void EmitFnStart();
 252   virtual void EmitFnEnd();
 253   virtual void EmitCantUnwind();
 254   virtual void EmitPersonality(const MCSymbol *Personality);
 255   virtual void EmitHandlerData();
 256   virtual void EmitSetFP(unsigned FpReg, unsigned SpReg, int64_t Offset = 0);
 257   virtual void EmitPad(int64_t Offset);
 258   virtual void EmitRegSave(const SmallVectorImpl<unsigned> &RegList, bool);
 259
 260   virtual void EmitTCEntry(const MCSymbol &S);
 261
 262   virtual void EmitInstruction(const MCInst &Inst);
 263
 264   virtual void EmitBundleAlignMode(unsigned AlignPow2);
 265   virtual void EmitBundleLock(bool AlignToEnd);
 266   virtual void EmitBundleUnlock();
 267
 268   /// EmitRawText - If this file is backed by an assembly streamer, this dumps
 269   /// the specified string in the output .s file.  This capability is
 270   /// indicated by the hasRawTextSupport() predicate.
 271   virtual void EmitRawText(StringRef String);
 272
 273   virtual void FinishImpl();
 274
 275   /// @}
 276
 277   static bool classof(const MCStreamer *S) {
 278     return S->getKind() == SK_AsmStreamer;
 279   }
 280 };
 281
 282 } // end anonymous namespace.
 283
 284 /// AddComment - Add a comment that can be emitted to the generated .s
 285 /// file if applicable as a QoI issue to make the output of the compiler
 286 /// more readable.  This only affects the MCAsmStreamer, and only when
 287 /// verbose assembly output is enabled.
 288 void MCAsmStreamer::AddComment(const Twine &T) {
 289   if (!IsVerboseAsm) return;
 290
 291   // Make sure that CommentStream is flushed.
 292   CommentStream.flush();
 293
 294   T.toVector(CommentToEmit);
 295   // Each comment goes on its own line.
 296   CommentToEmit.push_back('\n');
 297
 298   // Tell the comment stream that the vector changed underneath it.
 299   CommentStream.resync();
 300 }
 301
 302 void MCAsmStreamer::EmitCommentsAndEOL() {
 303   if (CommentToEmit.empty() && CommentStream.GetNumBytesInBuffer() == 0) {
 304     OS << '\n';
 305     return;
 306   }
 307
 308   CommentStream.flush();
 309   StringRef Comments = CommentToEmit.str();
 310
 311   assert(Comments.back() == '\n' &&
 312          "Comment array not newline terminated");
 313   do {
 314     // Emit a line of comments.
 315     OS.PadToColumn(MAI->getCommentColumn());
 316     size_t Position = Comments.find('\n');
 317     OS << MAI->getCommentString() << ' ' << Comments.substr(0, Position) <<'\n';
 318
 319     Comments = Comments.substr(Position+1);
 320   } while (!Comments.empty());
 321
 322   CommentToEmit.clear();
 323   // Tell the comment stream that the vector changed underneath it.
 324   CommentStream.resync();
 325 }
 326
 327 static inline int64_t truncateToSize(int64_t Value, unsigned Bytes) {
 328   assert(Bytes && "Invalid size!");
 329   return Value & ((uint64_t) (int64_t) -1 >> (64 - Bytes * 8));
 330 }
 331
 332 void MCAsmStreamer::ChangeSection(const MCSection *Section,
 333                                   const MCExpr *Subsection) {
 334   assert(Section && "Cannot switch to a null section!");
 335   Section->PrintSwitchToSection(*MAI, OS, Subsection);
 336 }
 337
 338 void MCAsmStreamer::EmitEHSymAttributes(const MCSymbol *Symbol,
 339                                         MCSymbol *EHSymbol) {
 340   if (UseCFI)
 341     return;
 342
 343   unsigned Flags = FlagMap.lookup(Symbol);
 344
 345   if (Flags & EHGlobal)
 346     EmitSymbolAttribute(EHSymbol, MCSA_Global);
 347   if (Flags & EHWeakDefinition)
 348     EmitSymbolAttribute(EHSymbol, MCSA_WeakDefinition);
 349   if (Flags & EHPrivateExtern)
 350     EmitSymbolAttribute(EHSymbol, MCSA_PrivateExtern);
 351 }
 352
 353 void MCAsmStreamer::EmitLabel(MCSymbol *Symbol) {
 354   assert(Symbol->isUndefined() && "Cannot define a symbol twice!");
 355   MCStreamer::EmitLabel(Symbol);
 356
 357   OS << *Symbol << MAI->getLabelSuffix();
 358   EmitEOL();
 359 }
 360
 361 void MCAsmStreamer::EmitDebugLabel(MCSymbol *Symbol) {
 362   assert(Symbol->isUndefined() && "Cannot define a symbol twice!");
 363   MCStreamer::EmitDebugLabel(Symbol);
 364
 365   OS << *Symbol << MAI->getDebugLabelSuffix();
 366   EmitEOL();
 367 }
 368
 369 void MCAsmStreamer::EmitAssemblerFlag(MCAssemblerFlag Flag) {
 370   switch (Flag) {
 371   case MCAF_SyntaxUnified:         OS << "\t.syntax unified"; break;
 372   case MCAF_SubsectionsViaSymbols: OS << ".subsections_via_symbols"; break;
 373   case MCAF_Code16:                OS << '\t'<< MAI->getCode16Directive();break;
 374   case MCAF_Code32:                OS << '\t'<< MAI->getCode32Directive();break;
 375   case MCAF_Code64:                OS << '\t'<< MAI->getCode64Directive();break;
 376   }
 377   EmitEOL();
 378 }
 379
 380 void MCAsmStreamer::EmitLinkerOptions(ArrayRef<std::string> Options) {
 381   assert(!Options.empty() && "At least one option is required!");
 382   OS << "\t.linker_option \"" << Options[0] << '"';
 383   for (ArrayRef<std::string>::iterator it = Options.begin() + 1,
 384          ie = Options.end(); it != ie; ++it) {
 385     OS << ", " << '"' << *it << '"';
 386   }
 387   OS << "\n";
 388 }
 389
 390 void MCAsmStreamer::EmitDataRegion(MCDataRegionType Kind) {
 391   if (!MAI->doesSupportDataRegionDirectives())
 392     return;
 393   switch (Kind) {
 394   case MCDR_DataRegion:            OS << "\t.data_region"; break;
 395   case MCDR_DataRegionJT8:         OS << "\t.data_region jt8"; break;
 396   case MCDR_DataRegionJT16:        OS << "\t.data_region jt16"; break;
 397   case MCDR_DataRegionJT32:        OS << "\t.data_region jt32"; break;
 398   case MCDR_DataRegionEnd:         OS << "\t.end_data_region"; break;
 399   }
 400   EmitEOL();
 401 }
 402
 403 void MCAsmStreamer::EmitThumbFunc(MCSymbol *Func) {
 404   // This needs to emit to a temporary string to get properly quoted
 405   // MCSymbols when they have spaces in them.
 406   OS << "\t.thumb_func";
 407   // Only Mach-O hasSubsectionsViaSymbols()
 408   if (MAI->hasSubsectionsViaSymbols())
 409     OS << '\t' << *Func;
 410   EmitEOL();
 411 }
 412
 413 void MCAsmStreamer::EmitAssignment(MCSymbol *Symbol, const MCExpr *Value) {
 414   OS << *Symbol << " = " << *Value;
 415   EmitEOL();
 416
 417   // FIXME: Lift context changes into super class.
 418   Symbol->setVariableValue(Value);
 419 }
 420
 421 void MCAsmStreamer::EmitWeakReference(MCSymbol *Alias, const MCSymbol *Symbol) {
 422   OS << ".weakref " << *Alias << ", " << *Symbol;
 423   EmitEOL();
 424 }
 425
 426 void MCAsmStreamer::EmitDwarfAdvanceLineAddr(int64_t LineDelta,
 427                                              const MCSymbol *LastLabel,
 428                                              const MCSymbol *Label,
 429                                              unsigned PointerSize) {
 430   EmitDwarfSetLineAddr(LineDelta, Label, PointerSize);
 431 }
 432
 433 void MCAsmStreamer::EmitDwarfAdvanceFrameAddr(const MCSymbol *LastLabel,
 434                                               const MCSymbol *Label) {
 435   EmitIntValue(dwarf::DW_CFA_advance_loc4, 1);
 436   const MCExpr *AddrDelta = BuildSymbolDiff(getContext(), Label, LastLabel);
 437   AddrDelta = ForceExpAbs(AddrDelta);
 438   EmitValue(AddrDelta, 4);
 439 }
 440
 441
 442 void MCAsmStreamer::EmitSymbolAttribute(MCSymbol *Symbol,
 443                                         MCSymbolAttr Attribute) {
 444   switch (Attribute) {
 445   case MCSA_Invalid: llvm_unreachable("Invalid symbol attribute");
 446   case MCSA_ELF_TypeFunction:    /// .type _foo, STT_FUNC  # aka @function
 447   case MCSA_ELF_TypeIndFunction: /// .type _foo, STT_GNU_IFUNC
 448   case MCSA_ELF_TypeObject:      /// .type _foo, STT_OBJECT  # aka @object
 449   case MCSA_ELF_TypeTLS:         /// .type _foo, STT_TLS     # aka @tls_object
 450   case MCSA_ELF_TypeCommon:      /// .type _foo, STT_COMMON  # aka @common
 451   case MCSA_ELF_TypeNoType:      /// .type _foo, STT_NOTYPE  # aka @notype
 452   case MCSA_ELF_TypeGnuUniqueObject:  /// .type _foo, @gnu_unique_object
 453     assert(MAI->hasDotTypeDotSizeDirective() && "Symbol Attr not supported");
 454     OS << "\t.type\t" << *Symbol << ','
 455        << ((MAI->getCommentString()[0] != '@') ? '@' : '%');
 456     switch (Attribute) {
 457     default: llvm_unreachable("Unknown ELF .type");
 458     case MCSA_ELF_TypeFunction:    OS << "function"; break;
 459     case MCSA_ELF_TypeIndFunction: OS << "gnu_indirect_function"; break;
 460     case MCSA_ELF_TypeObject:      OS << "object"; break;
 461     case MCSA_ELF_TypeTLS:         OS << "tls_object"; break;
 462     case MCSA_ELF_TypeCommon:      OS << "common"; break;
 463     case MCSA_ELF_TypeNoType:      OS << "no_type"; break;
 464     case MCSA_ELF_TypeGnuUniqueObject: OS << "gnu_unique_object"; break;
 465     }
 466     EmitEOL();
 467     return;
 468   case MCSA_Global: // .globl/.global
 469     OS << MAI->getGlobalDirective();
 470     FlagMap[Symbol] |= EHGlobal;
 471     break;
 472   case MCSA_Hidden:         OS << "\t.hidden\t";          break;
 473   case MCSA_IndirectSymbol: OS << "\t.indirect_symbol\t"; break;
 474   case MCSA_Internal:       OS << "\t.internal\t";        break;
 475   case MCSA_LazyReference:  OS << "\t.lazy_reference\t";  break;
 476   case MCSA_Local:          OS << "\t.local\t";           break;
 477   case MCSA_NoDeadStrip:    OS << "\t.no_dead_strip\t";   break;
 478   case MCSA_SymbolResolver: OS << "\t.symbol_resolver\t"; break;
 479   case MCSA_PrivateExtern:
 480     OS << "\t.private_extern\t";
 481     FlagMap[Symbol] |= EHPrivateExtern;
 482     break;
 483   case MCSA_Protected:      OS << "\t.protected\t";       break;
 484   case MCSA_Reference:      OS << "\t.reference\t";       break;
 485   case MCSA_Weak:           OS << "\t.weak\t";            break;
 486   case MCSA_WeakDefinition:
 487     OS << "\t.weak_definition\t";
 488     FlagMap[Symbol] |= EHWeakDefinition;
 489     break;
 490       // .weak_reference
 491   case MCSA_WeakReference:  OS << MAI->getWeakRefDirective(); break;
 492   case MCSA_WeakDefAutoPrivate: OS << "\t.weak_def_can_be_hidden\t"; break;
 493   }
 494
 495   OS << *Symbol;
 496   EmitEOL();
 497 }
 498
 499 void MCAsmStreamer::EmitSymbolDesc(MCSymbol *Symbol, unsigned DescValue) {
 500   OS << ".desc" << ' ' << *Symbol << ',' << DescValue;
 501   EmitEOL();
 502 }
 503
 504 void MCAsmStreamer::BeginCOFFSymbolDef(const MCSymbol *Symbol) {
 505   OS << "\t.def\t " << *Symbol << ';';
 506   EmitEOL();
 507 }
 508
 509 void MCAsmStreamer::EmitCOFFSymbolStorageClass (int StorageClass) {
 510   OS << "\t.scl\t" << StorageClass << ';';
 511   EmitEOL();
 512 }
 513
 514 void MCAsmStreamer::EmitCOFFSymbolType (int Type) {
 515   OS << "\t.type\t" << Type << ';';
 516   EmitEOL();
 517 }
 518
 519 void MCAsmStreamer::EndCOFFSymbolDef() {
 520   OS << "\t.endef";
 521   EmitEOL();
 522 }
 523
 524 void MCAsmStreamer::EmitCOFFSecRel32(MCSymbol const *Symbol) {
 525   OS << "\t.secrel32\t" << *Symbol << '\n';
 526   EmitEOL();
 527 }
 528
 529 void MCAsmStreamer::EmitELFSize(MCSymbol *Symbol, const MCExpr *Value) {
 530   assert(MAI->hasDotTypeDotSizeDirective());
 531   OS << "\t.size\t" << *Symbol << ", " << *Value << '\n';
 532 }
 533
 534 void MCAsmStreamer::EmitCommonSymbol(MCSymbol *Symbol, uint64_t Size,
 535                                      unsigned ByteAlignment) {
 536   OS << "\t.comm\t" << *Symbol << ',' << Size;
 537   if (ByteAlignment != 0) {
 538     if (MAI->getCOMMDirectiveAlignmentIsInBytes())
 539       OS << ',' << ByteAlignment;
 540     else
 541       OS << ',' << Log2_32(ByteAlignment);
 542   }
 543   EmitEOL();
 544 }
 545
 546 /// EmitLocalCommonSymbol - Emit a local common (.lcomm) symbol.
 547 ///
 548 /// @param Symbol - The common symbol to emit.
 549 /// @param Size - The size of the common symbol.
 550 void MCAsmStreamer::EmitLocalCommonSymbol(MCSymbol *Symbol, uint64_t Size,
 551                                           unsigned ByteAlign) {
 552   OS << "\t.lcomm\t" << *Symbol << ',' << Size;
 553   if (ByteAlign > 1) {
 554     switch (MAI->getLCOMMDirectiveAlignmentType()) {
 555     case LCOMM::NoAlignment:
 556       llvm_unreachable("alignment not supported on .lcomm!");
 557     case LCOMM::ByteAlignment:
 558       OS << ',' << ByteAlign;
 559       break;
 560     case LCOMM::Log2Alignment:
 561       assert(isPowerOf2_32(ByteAlign) && "alignment must be a power of 2");
 562       OS << ',' << Log2_32(ByteAlign);
 563       break;
 564     }
 565   }
 566   EmitEOL();
 567 }
 568
 569 void MCAsmStreamer::EmitZerofill(const MCSection *Section, MCSymbol *Symbol,
 570                                  uint64_t Size, unsigned ByteAlignment) {
 571   // Note: a .zerofill directive does not switch sections.
 572   OS << ".zerofill ";
 573
 574   // This is a mach-o specific directive.
 575   const MCSectionMachO *MOSection = ((const MCSectionMachO*)Section);
 576   OS << MOSection->getSegmentName() << "," << MOSection->getSectionName();
 577
 578   if (Symbol != NULL) {
 579     OS << ',' << *Symbol << ',' << Size;
 580     if (ByteAlignment != 0)
 581       OS << ',' << Log2_32(ByteAlignment);
 582   }
 583   EmitEOL();
 584 }
 585
 586 // .tbss sym, size, align
 587 // This depends that the symbol has already been mangled from the original,
 588 // e.g. _a.
 589 void MCAsmStreamer::EmitTBSSSymbol(const MCSection *Section, MCSymbol *Symbol,
 590                                    uint64_t Size, unsigned ByteAlignment) {
 591   assert(Symbol != NULL && "Symbol shouldn't be NULL!");
 592   // Instead of using the Section we'll just use the shortcut.
 593   // This is a mach-o specific directive and section.
 594   OS << ".tbss " << *Symbol << ", " << Size;
 595
 596   // Output align if we have it.  We default to 1 so don't bother printing
 597   // that.
 598   if (ByteAlignment > 1) OS << ", " << Log2_32(ByteAlignment);
 599
 600   EmitEOL();
 601 }
 602
 603 static inline char toOctal(int X) { return (X&7)+'0'; }
 604
 605 static void PrintQuotedString(StringRef Data, raw_ostream &OS) {
 606   OS << '"';
 607
 608   for (unsigned i = 0, e = Data.size(); i != e; ++i) {
 609     unsigned char C = Data[i];
 610     if (C == '"' || C == '\\') {
 611       OS << '\\' << (char)C;
 612       continue;
 613     }
 614
 615     if (isprint((unsigned char)C)) {
 616       OS << (char)C;
 617       continue;
 618     }
 619
 620     switch (C) {
 621       case '\b': OS << "\\b"; break;
 622       case '\f': OS << "\\f"; break;
 623       case '\n': OS << "\\n"; break;
 624       case '\r': OS << "\\r"; break;
 625       case '\t': OS << "\\t"; break;
 626       default:
 627         OS << '\\';
 628         OS << toOctal(C >> 6);
 629         OS << toOctal(C >> 3);
 630         OS << toOctal(C >> 0);
 631         break;
 632     }
 633   }
 634
 635   OS << '"';
 636 }
 637
 638
 639 void MCAsmStreamer::EmitBytes(StringRef Data, unsigned AddrSpace) {
 640   assert(getCurrentSection().first &&
 641          "Cannot emit contents before setting section!");
 642   if (Data.empty()) return;
 643
 644   if (Data.size() == 1) {
 645     OS << MAI->getData8bitsDirective(AddrSpace);
 646     OS << (unsigned)(unsigned char)Data[0];
 647     EmitEOL();
 648     return;
 649   }
 650
 651   // If the data ends with 0 and the target supports .asciz, use it, otherwise
 652   // use .ascii
 653   if (MAI->getAscizDirective() && Data.back() == 0) {
 654     OS << MAI->getAscizDirective();
 655     Data = Data.substr(0, Data.size()-1);
 656   } else {
 657     OS << MAI->getAsciiDirective();
 658   }
 659
 660   OS << ' ';
 661   PrintQuotedString(Data, OS);
 662   EmitEOL();
 663 }
 664
 665 void MCAsmStreamer::EmitIntValue(uint64_t Value, unsigned Size,
 666                                  unsigned AddrSpace) {
 667   EmitValue(MCConstantExpr::Create(Value, getContext()), Size, AddrSpace);
 668 }
 669
 670 void MCAsmStreamer::EmitValueImpl(const MCExpr *Value, unsigned Size,
 671                                   unsigned AddrSpace) {
 672   assert(getCurrentSection().first &&
 673          "Cannot emit contents before setting section!");
 674   const char *Directive = 0;
 675   switch (Size) {
 676   default: break;
 677   case 1: Directive = MAI->getData8bitsDirective(AddrSpace);  break;
 678   case 2: Directive = MAI->getData16bitsDirective(AddrSpace); break;
 679   case 4: Directive = MAI->getData32bitsDirective(AddrSpace); break;
 680   case 8:
 681     Directive = MAI->getData64bitsDirective(AddrSpace);
 682     // If the target doesn't support 64-bit data, emit as two 32-bit halves.
 683     if (Directive) break;
 684     int64_t IntValue;
 685     if (!Value->EvaluateAsAbsolute(IntValue))
 686       report_fatal_error("Don't know how to emit this value.");
 687     if (MAI->isLittleEndian()) {
 688       EmitIntValue((uint32_t)(IntValue >> 0 ), 4, AddrSpace);
 689       EmitIntValue((uint32_t)(IntValue >> 32), 4, AddrSpace);
 690     } else {
 691       EmitIntValue((uint32_t)(IntValue >> 32), 4, AddrSpace);
 692       EmitIntValue((uint32_t)(IntValue >> 0 ), 4, AddrSpace);
 693     }
 694     return;
 695   }
 696
 697   assert(Directive && "Invalid size for machine code value!");
 698   OS << Directive << *Value;
 699   EmitEOL();
 700 }
 701
 702 void MCAsmStreamer::EmitULEB128Value(const MCExpr *Value) {
 703   int64_t IntValue;
 704   if (Value->EvaluateAsAbsolute(IntValue)) {
 705     EmitULEB128IntValue(IntValue);
 706     return;
 707   }
 708   assert(MAI->hasLEB128() && "Cannot print a .uleb");
 709   OS << ".uleb128 " << *Value;
 710   EmitEOL();
 711 }
 712
 713 void MCAsmStreamer::EmitSLEB128Value(const MCExpr *Value) {
 714   int64_t IntValue;
 715   if (Value->EvaluateAsAbsolute(IntValue)) {
 716     EmitSLEB128IntValue(IntValue);
 717     return;
 718   }
 719   assert(MAI->hasLEB128() && "Cannot print a .sleb");
 720   OS << ".sleb128 " << *Value;
 721   EmitEOL();
 722 }
 723
 724 void MCAsmStreamer::EmitGPRel64Value(const MCExpr *Value) {
 725   assert(MAI->getGPRel64Directive() != 0);
 726   OS << MAI->getGPRel64Directive() << *Value;
 727   EmitEOL();
 728 }
 729
 730 void MCAsmStreamer::EmitGPRel32Value(const MCExpr *Value) {
 731   assert(MAI->getGPRel32Directive() != 0);
 732   OS << MAI->getGPRel32Directive() << *Value;
 733   EmitEOL();
 734 }
 735
 736
 737 /// EmitFill - Emit NumBytes bytes worth of the value specified by
 738 /// FillValue.  This implements directives such as '.space'.
 739 void MCAsmStreamer::EmitFill(uint64_t NumBytes, uint8_t FillValue,
 740                              unsigned AddrSpace) {
 741   if (NumBytes == 0) return;
 742
 743   if (AddrSpace == 0)
 744     if (const char *ZeroDirective = MAI->getZeroDirective()) {
 745       OS << ZeroDirective << NumBytes;
 746       if (FillValue != 0)
 747         OS << ',' << (int)FillValue;
 748       EmitEOL();
 749       return;
 750     }
 751
 752   // Emit a byte at a time.
 753   MCStreamer::EmitFill(NumBytes, FillValue, AddrSpace);
 754 }
 755
 756 void MCAsmStreamer::EmitValueToAlignment(unsigned ByteAlignment, int64_t Value,
 757                                          unsigned ValueSize,
 758                                          unsigned MaxBytesToEmit) {
 759   // Some assemblers don't support non-power of two alignments, so we always
 760   // emit alignments as a power of two if possible.
 761   if (isPowerOf2_32(ByteAlignment)) {
 762     switch (ValueSize) {
 763     default: llvm_unreachable("Invalid size for machine code value!");
 764     case 1: OS << MAI->getAlignDirective(); break;
 765     // FIXME: use MAI for this!
 766     case 2: OS << ".p2alignw "; break;
 767     case 4: OS << ".p2alignl "; break;
 768     case 8: llvm_unreachable("Unsupported alignment size!");
 769     }
 770
 771     if (MAI->getAlignmentIsInBytes())
 772       OS << ByteAlignment;
 773     else
 774       OS << Log2_32(ByteAlignment);
 775
 776     if (Value || MaxBytesToEmit) {
 777       OS << ", 0x";
 778       OS.write_hex(truncateToSize(Value, ValueSize));
 779
 780       if (MaxBytesToEmit)
 781         OS << ", " << MaxBytesToEmit;
 782     }
 783     EmitEOL();
 784     return;
 785   }
 786
 787   // Non-power of two alignment.  This is not widely supported by assemblers.
 788   // FIXME: Parameterize this based on MAI.
 789   switch (ValueSize) {
 790   default: llvm_unreachable("Invalid size for machine code value!");
 791   case 1: OS << ".balign";  break;
 792   case 2: OS << ".balignw"; break;
 793   case 4: OS << ".balignl"; break;
 794   case 8: llvm_unreachable("Unsupported alignment size!");
 795   }
 796
 797   OS << ' ' << ByteAlignment;
 798   OS << ", " << truncateToSize(Value, ValueSize);
 799   if (MaxBytesToEmit)
 800     OS << ", " << MaxBytesToEmit;
 801   EmitEOL();
 802 }
 803
 804 void MCAsmStreamer::EmitCodeAlignment(unsigned ByteAlignment,
 805                                       unsigned MaxBytesToEmit) {
 806   // Emit with a text fill value.
 807   EmitValueToAlignment(ByteAlignment, MAI->getTextAlignFillValue(),
 808                        1, MaxBytesToEmit);
 809 }
 810
 811 bool MCAsmStreamer::EmitValueToOffset(const MCExpr *Offset,
 812                                       unsigned char Value) {
 813   // FIXME: Verify that Offset is associated with the current section.
 814   OS << ".org " << *Offset << ", " << (unsigned) Value;
 815   EmitEOL();
 816   return false;
 817 }
 818
 819
 820 void MCAsmStreamer::EmitFileDirective(StringRef Filename) {
 821   assert(MAI->hasSingleParameterDotFile());
 822   OS << "\t.file\t";
 823   PrintQuotedString(Filename, OS);
 824   EmitEOL();
 825 }
 826
 827 bool MCAsmStreamer::EmitDwarfFileDirective(unsigned FileNo, StringRef Directory,
 828                                            StringRef Filename, unsigned CUID) {
 829   if (!UseDwarfDirectory && !Directory.empty()) {
 830     if (sys::path::is_absolute(Filename))
 831       return EmitDwarfFileDirective(FileNo, "", Filename, CUID);
 832
 833     SmallString<128> FullPathName = Directory;
 834     sys::path::append(FullPathName, Filename);
 835     return EmitDwarfFileDirective(FileNo, "", FullPathName, CUID);
 836   }
 837
 838   if (UseLoc) {
 839     OS << "\t.file\t" << FileNo << ' ';
 840     if (!Directory.empty()) {
 841       PrintQuotedString(Directory, OS);
 842       OS << ' ';
 843     }
 844     PrintQuotedString(Filename, OS);
 845     EmitEOL();
 846     // All .file will belong to a single CUID.
 847     CUID = 0;
 848   }
 849   return this->MCStreamer::EmitDwarfFileDirective(FileNo, Directory, Filename,
 850                                                   CUID);
 851 }
 852
 853 void MCAsmStreamer::EmitDwarfLocDirective(unsigned FileNo, unsigned Line,
 854                                           unsigned Column, unsigned Flags,
 855                                           unsigned Isa,
 856                                           unsigned Discriminator,
 857                                           StringRef FileName) {
 858   this->MCStreamer::EmitDwarfLocDirective(FileNo, Line, Column, Flags,
 859                                           Isa, Discriminator, FileName);
 860   if (!UseLoc)
 861     return;
 862
 863   OS << "\t.loc\t" << FileNo << " " << Line << " " << Column;
 864   if (Flags & DWARF2_FLAG_BASIC_BLOCK)
 865     OS << " basic_block";
 866   if (Flags & DWARF2_FLAG_PROLOGUE_END)
 867     OS << " prologue_end";
 868   if (Flags & DWARF2_FLAG_EPILOGUE_BEGIN)
 869     OS << " epilogue_begin";
 870
 871   unsigned OldFlags = getContext().getCurrentDwarfLoc().getFlags();
 872   if ((Flags & DWARF2_FLAG_IS_STMT) != (OldFlags & DWARF2_FLAG_IS_STMT)) {
 873     OS << " is_stmt ";
 874
 875     if (Flags & DWARF2_FLAG_IS_STMT)
 876       OS << "1";
 877     else
 878       OS << "0";
 879   }
 880
 881   if (Isa)
 882     OS << "isa " << Isa;
 883   if (Discriminator)
 884     OS << "discriminator " << Discriminator;
 885
 886   if (IsVerboseAsm) {
 887     OS.PadToColumn(MAI->getCommentColumn());
 888     OS << MAI->getCommentString() << ' ' << FileName << ':'
 889        << Line << ':' << Column;
 890   }
 891   EmitEOL();
 892 }
 893
 894 void MCAsmStreamer::EmitCFISections(bool EH, bool Debug) {
 895   MCStreamer::EmitCFISections(EH, Debug);
 896
 897   if (!UseCFI)
 898     return;
 899
 900   OS << "\t.cfi_sections ";
 901   if (EH) {
 902     OS << ".eh_frame";
 903     if (Debug)
 904       OS << ", .debug_frame";
 905   } else if (Debug) {
 906     OS << ".debug_frame";
 907   }
 908
 909   EmitEOL();
 910 }
 911
 912 void MCAsmStreamer::EmitCFIStartProcImpl(MCDwarfFrameInfo &Frame) {
 913   if (!UseCFI) {
 914     RecordProcStart(Frame);
 915     return;
 916   }
 917
 918   OS << "\t.cfi_startproc";
 919   EmitEOL();
 920 }
 921
 922 void MCAsmStreamer::EmitCFIEndProcImpl(MCDwarfFrameInfo &Frame) {
 923   if (!UseCFI) {
 924     RecordProcEnd(Frame);
 925     return;
 926   }
 927
 928   // Put a dummy non-null value in Frame.End to mark that this frame has been
 929   // closed.
 930   Frame.End = (MCSymbol *) 1;
 931
 932   OS << "\t.cfi_endproc";
 933   EmitEOL();
 934 }
 935
 936 void MCAsmStreamer::EmitRegisterName(int64_t Register) {
 937   if (InstPrinter && !MAI->useDwarfRegNumForCFI()) {
 938     const MCRegisterInfo *MRI = getContext().getRegisterInfo();
 939     unsigned LLVMRegister = MRI->getLLVMRegNum(Register, true);
 940     InstPrinter->printRegName(OS, LLVMRegister);
 941   } else {
 942     OS << Register;
 943   }
 944 }
 945
 946 void MCAsmStreamer::EmitCFIDefCfa(int64_t Register, int64_t Offset) {
 947   MCStreamer::EmitCFIDefCfa(Register, Offset);
 948
 949   if (!UseCFI)
 950     return;
 951
 952   OS << "\t.cfi_def_cfa ";
 953   EmitRegisterName(Register);
 954   OS << ", " << Offset;
 955   EmitEOL();
 956 }
 957
 958 void MCAsmStreamer::EmitCFIDefCfaOffset(int64_t Offset) {
 959   MCStreamer::EmitCFIDefCfaOffset(Offset);
 960
 961   if (!UseCFI)
 962     return;
 963
 964   OS << "\t.cfi_def_cfa_offset " << Offset;
 965   EmitEOL();
 966 }
 967
 968 void MCAsmStreamer::EmitCFIDefCfaRegister(int64_t Register) {
 969   MCStreamer::EmitCFIDefCfaRegister(Register);
 970
 971   if (!UseCFI)
 972     return;
 973
 974   OS << "\t.cfi_def_cfa_register ";
 975   EmitRegisterName(Register);
 976   EmitEOL();
 977 }
 978
 979 void MCAsmStreamer::EmitCFIOffset(int64_t Register, int64_t Offset) {
 980   this->MCStreamer::EmitCFIOffset(Register, Offset);
 981
 982   if (!UseCFI)
 983     return;
 984
 985   OS << "\t.cfi_offset ";
 986   EmitRegisterName(Register);
 987   OS << ", " << Offset;
 988   EmitEOL();
 989 }
 990
 991 void MCAsmStreamer::EmitCFIPersonality(const MCSymbol *Sym,
 992                                        unsigned Encoding) {
 993   MCStreamer::EmitCFIPersonality(Sym, Encoding);
 994
 995   if (!UseCFI)
 996     return;
 997
 998   OS << "\t.cfi_personality " << Encoding << ", " << *Sym;
 999   EmitEOL();
1000 }
1001
1002 void MCAsmStreamer::EmitCFILsda(const MCSymbol *Sym, unsigned Encoding) {
1003   MCStreamer::EmitCFILsda(Sym, Encoding);
1004
1005   if (!UseCFI)
1006     return;
1007
1008   OS << "\t.cfi_lsda " << Encoding << ", " << *Sym;
1009   EmitEOL();
1010 }
1011
1012 void MCAsmStreamer::EmitCFIRememberState() {
1013   MCStreamer::EmitCFIRememberState();
1014
1015   if (!UseCFI)
1016     return;
1017
1018   OS << "\t.cfi_remember_state";
1019   EmitEOL();
1020 }
1021
1022 void MCAsmStreamer::EmitCFIRestoreState() {
1023   MCStreamer::EmitCFIRestoreState();
1024
1025   if (!UseCFI)
1026     return;
1027
1028   OS << "\t.cfi_restore_state";
1029   EmitEOL();
1030 }
1031
1032 void MCAsmStreamer::EmitCFISameValue(int64_t Register) {
1033   MCStreamer::EmitCFISameValue(Register);
1034
1035   if (!UseCFI)
1036     return;
1037
1038   OS << "\t.cfi_same_value ";
1039   EmitRegisterName(Register);
1040   EmitEOL();
1041 }
1042
1043 void MCAsmStreamer::EmitCFIRelOffset(int64_t Register, int64_t Offset) {
1044   MCStreamer::EmitCFIRelOffset(Register, Offset);
1045
1046   if (!UseCFI)
1047     return;
1048
1049   OS << "\t.cfi_rel_offset ";
1050   EmitRegisterName(Register);
1051   OS << ", " << Offset;
1052   EmitEOL();
1053 }
1054
1055 void MCAsmStreamer::EmitCFIAdjustCfaOffset(int64_t Adjustment) {
1056   MCStreamer::EmitCFIAdjustCfaOffset(Adjustment);
1057
1058   if (!UseCFI)
1059     return;
1060
1061   OS << "\t.cfi_adjust_cfa_offset " << Adjustment;
1062   EmitEOL();
1063 }
1064
1065 void MCAsmStreamer::EmitCFISignalFrame() {
1066   MCStreamer::EmitCFISignalFrame();
1067
1068   if (!UseCFI)
1069     return;
1070
1071   OS << "\t.cfi_signal_frame";
1072   EmitEOL();
1073 }
1074
1075 void MCAsmStreamer::EmitCFIUndefined(int64_t Register) {
1076   MCStreamer::EmitCFIUndefined(Register);
1077
1078   if (!UseCFI)
1079     return;
1080
1081   OS << "\t.cfi_undefined " << Register;
1082   EmitEOL();
1083 }
1084
1085 void MCAsmStreamer::EmitCFIRegister(int64_t Register1, int64_t Register2) {
1086   MCStreamer::EmitCFIRegister(Register1, Register2);
1087
1088   if (!UseCFI)
1089     return;
1090
1091   OS << "\t.cfi_register " << Register1 << ", " << Register2;
1092   EmitEOL();
1093 }
1094
1095 void MCAsmStreamer::EmitWin64EHStartProc(const MCSymbol *Symbol) {
1096   MCStreamer::EmitWin64EHStartProc(Symbol);
1097
1098   OS << ".seh_proc " << *Symbol;
1099   EmitEOL();
1100 }
1101
1102 void MCAsmStreamer::EmitWin64EHEndProc() {
1103   MCStreamer::EmitWin64EHEndProc();
1104
1105   OS << "\t.seh_endproc";
1106   EmitEOL();
1107 }
1108
1109 void MCAsmStreamer::EmitWin64EHStartChained() {
1110   MCStreamer::EmitWin64EHStartChained();
1111
1112   OS << "\t.seh_startchained";
1113   EmitEOL();
1114 }
1115
1116 void MCAsmStreamer::EmitWin64EHEndChained() {
1117   MCStreamer::EmitWin64EHEndChained();
1118
1119   OS << "\t.seh_endchained";
1120   EmitEOL();
1121 }
1122
1123 void MCAsmStreamer::EmitWin64EHHandler(const MCSymbol *Sym, bool Unwind,
1124                                        bool Except) {
1125   MCStreamer::EmitWin64EHHandler(Sym, Unwind, Except);
1126
1127   OS << "\t.seh_handler " << *Sym;
1128   if (Unwind)
1129     OS << ", @unwind";
1130   if (Except)
1131     OS << ", @except";
1132   EmitEOL();
1133 }
1134
1135 static const MCSection *getWin64EHTableSection(StringRef suffix,
1136                                                MCContext &context) {
1137   // FIXME: This doesn't belong in MCObjectFileInfo. However,
1138   /// this duplicate code in MCWin64EH.cpp.
1139   if (suffix == "")
1140     return context.getObjectFileInfo()->getXDataSection();
1141   return context.getCOFFSection((".xdata"+suffix).str(),
1142                                 COFF::IMAGE_SCN_CNT_INITIALIZED_DATA |
1143                                 COFF::IMAGE_SCN_MEM_READ |
1144                                 COFF::IMAGE_SCN_MEM_WRITE,
1145                                 SectionKind::getDataRel());
1146 }
1147
1148 void MCAsmStreamer::EmitWin64EHHandlerData() {
1149   MCStreamer::EmitWin64EHHandlerData();
1150
1151   // Switch sections. Don't call SwitchSection directly, because that will
1152   // cause the section switch to be visible in the emitted assembly.
1153   // We only do this so the section switch that terminates the handler
1154   // data block is visible.
1155   MCWin64EHUnwindInfo *CurFrame = getCurrentW64UnwindInfo();
1156   StringRef suffix=MCWin64EHUnwindEmitter::GetSectionSuffix(CurFrame->Function);
1157   const MCSection *xdataSect = getWin64EHTableSection(suffix, getContext());
1158   if (xdataSect)
1159     SwitchSectionNoChange(xdataSect);
1160
1161   OS << "\t.seh_handlerdata";
1162   EmitEOL();
1163 }
1164
1165 void MCAsmStreamer::EmitWin64EHPushReg(unsigned Register) {
1166   MCStreamer::EmitWin64EHPushReg(Register);
1167
1168   OS << "\t.seh_pushreg " << Register;
1169   EmitEOL();
1170 }
1171
1172 void MCAsmStreamer::EmitWin64EHSetFrame(unsigned Register, unsigned Offset) {
1173   MCStreamer::EmitWin64EHSetFrame(Register, Offset);
1174
1175   OS << "\t.seh_setframe " << Register << ", " << Offset;
1176   EmitEOL();
1177 }
1178
1179 void MCAsmStreamer::EmitWin64EHAllocStack(unsigned Size) {
1180   MCStreamer::EmitWin64EHAllocStack(Size);
1181
1182   OS << "\t.seh_stackalloc " << Size;
1183   EmitEOL();
1184 }
1185
1186 void MCAsmStreamer::EmitWin64EHSaveReg(unsigned Register, unsigned Offset) {
1187   MCStreamer::EmitWin64EHSaveReg(Register, Offset);
1188
1189   OS << "\t.seh_savereg " << Register << ", " << Offset;
1190   EmitEOL();
1191 }
1192
1193 void MCAsmStreamer::EmitWin64EHSaveXMM(unsigned Register, unsigned Offset) {
1194   MCStreamer::EmitWin64EHSaveXMM(Register, Offset);
1195
1196   OS << "\t.seh_savexmm " << Register << ", " << Offset;
1197   EmitEOL();
1198 }
1199
1200 void MCAsmStreamer::EmitWin64EHPushFrame(bool Code) {
1201   MCStreamer::EmitWin64EHPushFrame(Code);
1202
1203   OS << "\t.seh_pushframe";
1204   if (Code)
1205     OS << " @code";
1206   EmitEOL();
1207 }
1208
1209 void MCAsmStreamer::EmitWin64EHEndProlog(void) {
1210   MCStreamer::EmitWin64EHEndProlog();
1211
1212   OS << "\t.seh_endprologue";
1213   EmitEOL();
1214 }
1215
1216 void MCAsmStreamer::AddEncodingComment(const MCInst &Inst) {
1217   raw_ostream &OS = GetCommentOS();
1218   SmallString<256> Code;
1219   SmallVector<MCFixup, 4> Fixups;
1220   raw_svector_ostream VecOS(Code);
1221   Emitter->EncodeInstruction(Inst, VecOS, Fixups);
1222   VecOS.flush();
1223
1224   // If we are showing fixups, create symbolic markers in the encoded
1225   // representation. We do this by making a per-bit map to the fixup item index,
1226   // then trying to display it as nicely as possible.
1227   SmallVector<uint8_t, 64> FixupMap;
1228   FixupMap.resize(Code.size() * 8);
1229   for (unsigned i = 0, e = Code.size() * 8; i != e; ++i)
1230     FixupMap[i] = 0;
1231
1232   for (unsigned i = 0, e = Fixups.size(); i != e; ++i) {
1233     MCFixup &F = Fixups[i];
1234     const MCFixupKindInfo &Info = AsmBackend->getFixupKindInfo(F.getKind());
1235     for (unsigned j = 0; j != Info.TargetSize; ++j) {
1236       unsigned Index = F.getOffset() * 8 + Info.TargetOffset + j;
1237       assert(Index < Code.size() * 8 && "Invalid offset in fixup!");
1238       FixupMap[Index] = 1 + i;
1239     }
1240   }
1241
1242   // FIXME: Note the fixup comments for Thumb2 are completely bogus since the
1243   // high order halfword of a 32-bit Thumb2 instruction is emitted first.
1244   OS << "encoding: [";
1245   for (unsigned i = 0, e = Code.size(); i != e; ++i) {
1246     if (i)
1247       OS << ',';
1248
1249     // See if all bits are the same map entry.
1250     uint8_t MapEntry = FixupMap[i * 8 + 0];
1251     for (unsigned j = 1; j != 8; ++j) {
1252       if (FixupMap[i * 8 + j] == MapEntry)
1253         continue;
1254
1255       MapEntry = uint8_t(~0U);
1256       break;
1257     }
1258
1259     if (MapEntry != uint8_t(~0U)) {
1260       if (MapEntry == 0) {
1261         OS << format("0x%02x", uint8_t(Code[i]));
1262       } else {
1263         if (Code[i]) {
1264           // FIXME: Some of the 8 bits require fix up.
1265           OS << format("0x%02x", uint8_t(Code[i])) << '\''
1266              << char('A' + MapEntry - 1) << '\'';
1267         } else
1268           OS << char('A' + MapEntry - 1);
1269       }
1270     } else {
1271       // Otherwise, write out in binary.
1272       OS << "0b";
1273       for (unsigned j = 8; j--;) {
1274         unsigned Bit = (Code[i] >> j) & 1;
1275
1276         unsigned FixupBit;
1277         if (MAI->isLittleEndian())
1278           FixupBit = i * 8 + j;
1279         else
1280           FixupBit = i * 8 + (7-j);
1281
1282         if (uint8_t MapEntry = FixupMap[FixupBit]) {
1283           assert(Bit == 0 && "Encoder wrote into fixed up bit!");
1284           OS << char('A' + MapEntry - 1);
1285         } else
1286           OS << Bit;
1287       }
1288     }
1289   }
1290   OS << "]\n";
1291
1292   for (unsigned i = 0, e = Fixups.size(); i != e; ++i) {
1293     MCFixup &F = Fixups[i];
1294     const MCFixupKindInfo &Info = AsmBackend->getFixupKindInfo(F.getKind());
1295     OS << "  fixup " << char('A' + i) << " - " << "offset: " << F.getOffset()
1296        << ", value: " << *F.getValue() << ", kind: " << Info.Name << "\n";
1297   }
1298 }
1299
1300 void MCAsmStreamer::EmitFnStart() {
1301   OS << "\t.fnstart";
1302   EmitEOL();
1303 }
1304
1305 void MCAsmStreamer::EmitFnEnd() {
1306   OS << "\t.fnend";
1307   EmitEOL();
1308 }
1309
1310 void MCAsmStreamer::EmitCantUnwind() {
1311   OS << "\t.cantunwind";
1312   EmitEOL();
1313 }
1314
1315 void MCAsmStreamer::EmitHandlerData() {
1316   OS << "\t.handlerdata";
1317   EmitEOL();
1318 }
1319
1320 void MCAsmStreamer::EmitPersonality(const MCSymbol *Personality) {
1321   OS << "\t.personality " << Personality->getName();
1322   EmitEOL();
1323 }
1324
1325 void MCAsmStreamer::EmitSetFP(unsigned FpReg, unsigned SpReg, int64_t Offset) {
1326   OS << "\t.setfp\t";
1327   InstPrinter->printRegName(OS, FpReg);
1328   OS << ", ";
1329   InstPrinter->printRegName(OS, SpReg);
1330   if (Offset)
1331     OS << ", #" << Offset;
1332   EmitEOL();
1333 }
1334
1335 void MCAsmStreamer::EmitPad(int64_t Offset) {
1336   OS << "\t.pad\t#" << Offset;
1337   EmitEOL();
1338 }
1339
1340 void MCAsmStreamer::EmitRegSave(const SmallVectorImpl<unsigned> &RegList,
1341                                 bool isVector) {
1342   assert(RegList.size() && "RegList should not be empty");
1343   if (isVector)
1344     OS << "\t.vsave\t{";
1345   else
1346     OS << "\t.save\t{";
1347
1348   InstPrinter->printRegName(OS, RegList[0]);
1349
1350   for (unsigned i = 1, e = RegList.size(); i != e; ++i) {
1351     OS << ", ";
1352     InstPrinter->printRegName(OS, RegList[i]);
1353   }
1354
1355   OS << "}";
1356   EmitEOL();
1357 }
1358
1359 void MCAsmStreamer::EmitTCEntry(const MCSymbol &S) {
1360   OS << "\t.tc ";
1361   OS << S.getName();
1362   OS << "[TC],";
1363   OS << S.getName();
1364   EmitEOL();
1365 }
1366
1367 void MCAsmStreamer::EmitInstruction(const MCInst &Inst) {
1368   assert(getCurrentSection().first &&
1369          "Cannot emit contents before setting section!");
1370
1371   // Show the encoding in a comment if we have a code emitter.
1372   if (Emitter)
1373     AddEncodingComment(Inst);
1374
1375   // Show the MCInst if enabled.
1376   if (ShowInst) {
1377     Inst.dump_pretty(GetCommentOS(), MAI, InstPrinter.get(), "\n ");
1378     GetCommentOS() << "\n";
1379   }
1380
1381   // If we have an AsmPrinter, use that to print, otherwise print the MCInst.
1382   if (InstPrinter)
1383     InstPrinter->printInst(&Inst, OS, "");
1384   else
1385     Inst.print(OS, MAI);
1386   EmitEOL();
1387 }
1388
1389 void MCAsmStreamer::EmitBundleAlignMode(unsigned AlignPow2) {
1390   OS << "\t.bundle_align_mode " << AlignPow2;
1391   EmitEOL();
1392 }
1393
1394 void MCAsmStreamer::EmitBundleLock(bool AlignToEnd) {
1395   OS << "\t.bundle_lock";
1396   if (AlignToEnd)
1397     OS << " align_to_end";
1398   EmitEOL();
1399 }
1400
1401 void MCAsmStreamer::EmitBundleUnlock() {
1402   OS << "\t.bundle_unlock";
1403   EmitEOL();
1404 }
1405
1406 /// EmitRawText - If this file is backed by an assembly streamer, this dumps
1407 /// the specified string in the output .s file.  This capability is
1408 /// indicated by the hasRawTextSupport() predicate.
1409 void MCAsmStreamer::EmitRawText(StringRef String) {
1410   if (!String.empty() && String.back() == '\n')
1411     String = String.substr(0, String.size()-1);
1412   OS << String;
1413   EmitEOL();
1414 }
1415
1416 void MCAsmStreamer::FinishImpl() {
1417   // FIXME: This header is duplicated with MCObjectStreamer
1418   // Dump out the dwarf file & directory tables and line tables.
1419   const MCSymbol *LineSectionSymbol = NULL;
1420   if (getContext().hasDwarfFiles() && !UseLoc)
1421     LineSectionSymbol = MCDwarfFileTable::Emit(this);
1422
1423   // If we are generating dwarf for assembly source files dump out the sections.
1424   if (getContext().getGenDwarfForAssembly())
1425     MCGenDwarfInfo::Emit(this, LineSectionSymbol);
1426
1427   if (!UseCFI)
1428     EmitFrames(false);
1429 }
1430 MCStreamer *llvm::createAsmStreamer(MCContext &Context,
1431                                     formatted_raw_ostream &OS,
1432                                     bool isVerboseAsm, bool useLoc,
1433                                     bool useCFI, bool useDwarfDirectory,
1434                                     MCInstPrinter *IP, MCCodeEmitter *CE,
1435                                     MCAsmBackend *MAB, bool ShowInst) {
1436   return new MCAsmStreamer(Context, OS, isVerboseAsm, useLoc, useCFI,
1437                            useDwarfDirectory, IP, CE, MAB, ShowInst);
1438 }