lib/MC/MCELFStreamer.cpp

   1 //===- lib/MC/MCELFStreamer.cpp - ELF Object 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 // This file assembles .s files and emits ELF .o object files.
  11 //
  12 //===----------------------------------------------------------------------===//
  13
  14 #include "llvm/MC/MCELFStreamer.h"
  15 #include "llvm/ADT/STLExtras.h"
  16 #include "llvm/ADT/SmallPtrSet.h"
  17 #include "llvm/MC/MCAsmBackend.h"
  18 #include "llvm/MC/MCAsmLayout.h"
  19 #include "llvm/MC/MCAsmInfo.h"
  20 #include "llvm/MC/MCAssembler.h"
  21 #include "llvm/MC/MCCodeEmitter.h"
  22 #include "llvm/MC/MCContext.h"
  23 #include "llvm/MC/MCExpr.h"
  24 #include "llvm/MC/MCInst.h"
  25 #include "llvm/MC/MCObjectFileInfo.h"
  26 #include "llvm/MC/MCObjectStreamer.h"
  27 #include "llvm/MC/MCSection.h"
  28 #include "llvm/MC/MCSectionELF.h"
  29 #include "llvm/MC/MCSymbolELF.h"
  30 #include "llvm/MC/MCSymbol.h"
  31 #include "llvm/MC/MCValue.h"
  32 #include "llvm/Support/Debug.h"
  33 #include "llvm/Support/ELF.h"
  34 #include "llvm/Support/ErrorHandling.h"
  35 #include "llvm/Support/TargetRegistry.h"
  36 #include "llvm/Support/raw_ostream.h"
  37
  38 using namespace llvm;
  39
  40 bool MCELFStreamer::isBundleLocked() const {
  41   return getCurrentSectionOnly()->isBundleLocked();
  42 }
  43
  44 MCELFStreamer::~MCELFStreamer() {
  45 }
  46
  47 void MCELFStreamer::mergeFragment(MCDataFragment *DF,
  48                                   MCDataFragment *EF) {
  49   MCAssembler &Assembler = getAssembler();
  50
  51   if (Assembler.isBundlingEnabled() && Assembler.getRelaxAll()) {
  52     uint64_t FSize = EF->getContents().size();
  53
  54     if (FSize > Assembler.getBundleAlignSize())
  55       report_fatal_error("Fragment can't be larger than a bundle size");
  56
  57     uint64_t RequiredBundlePadding = computeBundlePadding(
  58         Assembler, EF, DF->getContents().size(), FSize);
  59
  60     if (RequiredBundlePadding > UINT8_MAX)
  61       report_fatal_error("Padding cannot exceed 255 bytes");
  62
  63     if (RequiredBundlePadding > 0) {
  64       SmallString<256> Code;
  65       raw_svector_ostream VecOS(Code);
  66       MCObjectWriter *OW = Assembler.getBackend().createObjectWriter(VecOS);
  67
  68       EF->setBundlePadding(static_cast<uint8_t>(RequiredBundlePadding));
  69
  70       Assembler.writeFragmentPadding(*EF, FSize, OW);
  71       delete OW;
  72
  73       DF->getContents().append(Code.begin(), Code.end());
  74     }
  75   }
  76
  77   flushPendingLabels(DF, DF->getContents().size());
  78
  79   for (unsigned i = 0, e = EF->getFixups().size(); i != e; ++i) {
  80     EF->getFixups()[i].setOffset(EF->getFixups()[i].getOffset() +
  81                                  DF->getContents().size());
  82     DF->getFixups().push_back(EF->getFixups()[i]);
  83   }
  84   DF->setHasInstructions(true);
  85   DF->getContents().append(EF->getContents().begin(), EF->getContents().end());
  86 }
  87
  88 void MCELFStreamer::InitSections(bool NoExecStack) {
  89   // This emulates the same behavior of GNU as. This makes it easier
  90   // to compare the output as the major sections are in the same order.
  91   MCContext &Ctx = getContext();
  92   SwitchSection(Ctx.getObjectFileInfo()->getTextSection());
  93   EmitCodeAlignment(4);
  94
  95   SwitchSection(Ctx.getObjectFileInfo()->getDataSection());
  96   EmitCodeAlignment(4);
  97
  98   SwitchSection(Ctx.getObjectFileInfo()->getBSSSection());
  99   EmitCodeAlignment(4);
 100
 101   SwitchSection(Ctx.getObjectFileInfo()->getTextSection());
 102
 103   if (NoExecStack)
 104     SwitchSection(Ctx.getAsmInfo()->getNonexecutableStackSection(Ctx));
 105 }
 106
 107 void MCELFStreamer::EmitLabel(MCSymbol *S) {
 108   auto *Symbol = cast<MCSymbolELF>(S);
 109   assert(Symbol->isUndefined() && "Cannot define a symbol twice!");
 110
 111   MCObjectStreamer::EmitLabel(Symbol);
 112
 113   const MCSectionELF &Section =
 114       static_cast<const MCSectionELF &>(*getCurrentSectionOnly());
 115   if (Section.getFlags() & ELF::SHF_TLS)
 116     Symbol->setType(ELF::STT_TLS);
 117 }
 118
 119 void MCELFStreamer::EmitAssemblerFlag(MCAssemblerFlag Flag) {
 120   // Let the target do whatever target specific stuff it needs to do.
 121   getAssembler().getBackend().handleAssemblerFlag(Flag);
 122   // Do any generic stuff we need to do.
 123   switch (Flag) {
 124   case MCAF_SyntaxUnified: return; // no-op here.
 125   case MCAF_Code16: return; // Change parsing mode; no-op here.
 126   case MCAF_Code32: return; // Change parsing mode; no-op here.
 127   case MCAF_Code64: return; // Change parsing mode; no-op here.
 128   case MCAF_SubsectionsViaSymbols:
 129     getAssembler().setSubsectionsViaSymbols(true);
 130     return;
 131   }
 132
 133   llvm_unreachable("invalid assembler flag!");
 134 }
 135
 136 // If bundle alignment is used and there are any instructions in the section, it
 137 // needs to be aligned to at least the bundle size.
 138 static void setSectionAlignmentForBundling(const MCAssembler &Assembler,
 139                                            MCSection *Section) {
 140   if (Section && Assembler.isBundlingEnabled() && Section->hasInstructions() &&
 141       Section->getAlignment() < Assembler.getBundleAlignSize())
 142     Section->setAlignment(Assembler.getBundleAlignSize());
 143 }
 144
 145 void MCELFStreamer::ChangeSection(MCSection *Section,
 146                                   const MCExpr *Subsection) {
 147   MCSection *CurSection = getCurrentSectionOnly();
 148   if (CurSection && isBundleLocked())
 149     report_fatal_error("Unterminated .bundle_lock when changing a section");
 150
 151   MCAssembler &Asm = getAssembler();
 152   // Ensure the previous section gets aligned if necessary.
 153   setSectionAlignmentForBundling(Asm, CurSection);
 154   auto *SectionELF = static_cast<const MCSectionELF *>(Section);
 155   const MCSymbol *Grp = SectionELF->getGroup();
 156   if (Grp)
 157     Asm.registerSymbol(*Grp);
 158
 159   this->MCObjectStreamer::ChangeSection(Section, Subsection);
 160   MCContext &Ctx = getContext();
 161   auto *Begin = cast_or_null<MCSymbolELF>(Section->getBeginSymbol());
 162   if (!Begin) {
 163     Begin = Ctx.getOrCreateSectionSymbol(*SectionELF);
 164     Section->setBeginSymbol(Begin);
 165   }
 166   if (Begin->isUndefined()) {
 167     Asm.registerSymbol(*Begin);
 168     Begin->setType(ELF::STT_SECTION);
 169   }
 170 }
 171
 172 void MCELFStreamer::EmitWeakReference(MCSymbol *Alias, const MCSymbol *Symbol) {
 173   getAssembler().registerSymbol(*Symbol);
 174   const MCExpr *Value = MCSymbolRefExpr::create(
 175       Symbol, MCSymbolRefExpr::VK_WEAKREF, getContext());
 176   Alias->setVariableValue(Value);
 177 }
 178
 179 // When GNU as encounters more than one .type declaration for an object it seems
 180 // to use a mechanism similar to the one below to decide which type is actually
 181 // used in the object file.  The greater of T1 and T2 is selected based on the
 182 // following ordering:
 183 //  STT_NOTYPE < STT_OBJECT < STT_FUNC < STT_GNU_IFUNC < STT_TLS < anything else
 184 // If neither T1 < T2 nor T2 < T1 according to this ordering, use T2 (the user
 185 // provided type).
 186 static unsigned CombineSymbolTypes(unsigned T1, unsigned T2) {
 187   for (unsigned Type : {ELF::STT_NOTYPE, ELF::STT_OBJECT, ELF::STT_FUNC,
 188                         ELF::STT_GNU_IFUNC, ELF::STT_TLS}) {
 189     if (T1 == Type)
 190       return T2;
 191     if (T2 == Type)
 192       return T1;
 193   }
 194
 195   return T2;
 196 }
 197
 198 bool MCELFStreamer::EmitSymbolAttribute(MCSymbol *S, MCSymbolAttr Attribute) {
 199   auto *Symbol = cast<MCSymbolELF>(S);
 200   // Indirect symbols are handled differently, to match how 'as' handles
 201   // them. This makes writing matching .o files easier.
 202   if (Attribute == MCSA_IndirectSymbol) {
 203     // Note that we intentionally cannot use the symbol data here; this is
 204     // important for matching the string table that 'as' generates.
 205     IndirectSymbolData ISD;
 206     ISD.Symbol = Symbol;
 207     ISD.Section = getCurrentSectionOnly();
 208     getAssembler().getIndirectSymbols().push_back(ISD);
 209     return true;
 210   }
 211
 212   // Adding a symbol attribute always introduces the symbol, note that an
 213   // important side effect of calling registerSymbol here is to register
 214   // the symbol with the assembler.
 215   getAssembler().registerSymbol(*Symbol);
 216
 217   // The implementation of symbol attributes is designed to match 'as', but it
 218   // leaves much to desired. It doesn't really make sense to arbitrarily add and
 219   // remove flags, but 'as' allows this (in particular, see .desc).
 220   //
 221   // In the future it might be worth trying to make these operations more well
 222   // defined.
 223   switch (Attribute) {
 224   case MCSA_LazyReference:
 225   case MCSA_Reference:
 226   case MCSA_SymbolResolver:
 227   case MCSA_PrivateExtern:
 228   case MCSA_WeakDefinition:
 229   case MCSA_WeakDefAutoPrivate:
 230   case MCSA_Invalid:
 231   case MCSA_IndirectSymbol:
 232     return false;
 233
 234   case MCSA_NoDeadStrip:
 235     // Ignore for now.
 236     break;
 237
 238   case MCSA_ELF_TypeGnuUniqueObject:
 239     Symbol->setType(CombineSymbolTypes(Symbol->getType(), ELF::STT_OBJECT));
 240     Symbol->setBinding(ELF::STB_GNU_UNIQUE);
 241     Symbol->setExternal(true);
 242     break;
 243
 244   case MCSA_Global:
 245     Symbol->setBinding(ELF::STB_GLOBAL);
 246     Symbol->setExternal(true);
 247     break;
 248
 249   case MCSA_WeakReference:
 250   case MCSA_Weak:
 251     Symbol->setBinding(ELF::STB_WEAK);
 252     Symbol->setExternal(true);
 253     break;
 254
 255   case MCSA_Local:
 256     Symbol->setBinding(ELF::STB_LOCAL);
 257     Symbol->setExternal(false);
 258     break;
 259
 260   case MCSA_ELF_TypeFunction:
 261     Symbol->setType(CombineSymbolTypes(Symbol->getType(), ELF::STT_FUNC));
 262     break;
 263
 264   case MCSA_ELF_TypeIndFunction:
 265     Symbol->setType(CombineSymbolTypes(Symbol->getType(), ELF::STT_GNU_IFUNC));
 266     break;
 267
 268   case MCSA_ELF_TypeObject:
 269     Symbol->setType(CombineSymbolTypes(Symbol->getType(), ELF::STT_OBJECT));
 270     break;
 271
 272   case MCSA_ELF_TypeTLS:
 273     Symbol->setType(CombineSymbolTypes(Symbol->getType(), ELF::STT_TLS));
 274     break;
 275
 276   case MCSA_ELF_TypeCommon:
 277     // TODO: Emit these as a common symbol.
 278     Symbol->setType(CombineSymbolTypes(Symbol->getType(), ELF::STT_OBJECT));
 279     break;
 280
 281   case MCSA_ELF_TypeNoType:
 282     Symbol->setType(CombineSymbolTypes(Symbol->getType(), ELF::STT_NOTYPE));
 283     break;
 284
 285   case MCSA_Protected:
 286     Symbol->setVisibility(ELF::STV_PROTECTED);
 287     break;
 288
 289   case MCSA_Hidden:
 290     Symbol->setVisibility(ELF::STV_HIDDEN);
 291     break;
 292
 293   case MCSA_Internal:
 294     Symbol->setVisibility(ELF::STV_INTERNAL);
 295     break;
 296   }
 297
 298   return true;
 299 }
 300
 301 void MCELFStreamer::EmitCommonSymbol(MCSymbol *S, uint64_t Size,
 302                                      unsigned ByteAlignment) {
 303   auto *Symbol = cast<MCSymbolELF>(S);
 304   getAssembler().registerSymbol(*Symbol);
 305
 306   if (!Symbol->isBindingSet()) {
 307     Symbol->setBinding(ELF::STB_GLOBAL);
 308     Symbol->setExternal(true);
 309   }
 310
 311   Symbol->setType(ELF::STT_OBJECT);
 312
 313   if (Symbol->getBinding() == ELF::STB_LOCAL) {
 314     MCSection &Section = *getAssembler().getContext().getELFSection(
 315         ".bss", ELF::SHT_NOBITS, ELF::SHF_WRITE | ELF::SHF_ALLOC);
 316     MCSectionSubPair P = getCurrentSection();
 317     SwitchSection(&Section);
 318
 319     EmitValueToAlignment(ByteAlignment, 0, 1, 0);
 320     EmitLabel(Symbol);
 321     EmitZeros(Size);
 322
 323     // Update the maximum alignment of the section if necessary.
 324     if (ByteAlignment > Section.getAlignment())
 325       Section.setAlignment(ByteAlignment);
 326
 327     SwitchSection(P.first, P.second);
 328   } else {
 329     if(Symbol->declareCommon(Size, ByteAlignment))
 330       report_fatal_error("Symbol: " + Symbol->getName() +
 331                          " redeclared as different type");
 332   }
 333
 334   cast<MCSymbolELF>(Symbol)
 335       ->setSize(MCConstantExpr::create(Size, getContext()));
 336 }
 337
 338 void MCELFStreamer::emitELFSize(MCSymbolELF *Symbol, const MCExpr *Value) {
 339   Symbol->setSize(Value);
 340 }
 341
 342 void MCELFStreamer::EmitLocalCommonSymbol(MCSymbol *S, uint64_t Size,
 343                                           unsigned ByteAlignment) {
 344   auto *Symbol = cast<MCSymbolELF>(S);
 345   // FIXME: Should this be caught and done earlier?
 346   getAssembler().registerSymbol(*Symbol);
 347   Symbol->setBinding(ELF::STB_LOCAL);
 348   Symbol->setExternal(false);
 349   EmitCommonSymbol(Symbol, Size, ByteAlignment);
 350 }
 351
 352 void MCELFStreamer::EmitValueImpl(const MCExpr *Value, unsigned Size,
 353                                   SMLoc Loc) {
 354   if (isBundleLocked())
 355     report_fatal_error("Emitting values inside a locked bundle is forbidden");
 356   fixSymbolsInTLSFixups(Value);
 357   MCObjectStreamer::EmitValueImpl(Value, Size, Loc);
 358 }
 359
 360 void MCELFStreamer::EmitValueToAlignment(unsigned ByteAlignment,
 361                                          int64_t Value,
 362                                          unsigned ValueSize,
 363                                          unsigned MaxBytesToEmit) {
 364   if (isBundleLocked())
 365     report_fatal_error("Emitting values inside a locked bundle is forbidden");
 366   MCObjectStreamer::EmitValueToAlignment(ByteAlignment, Value,
 367                                          ValueSize, MaxBytesToEmit);
 368 }
 369
 370 // Add a symbol for the file name of this module. They start after the
 371 // null symbol and don't count as normal symbol, i.e. a non-STT_FILE symbol
 372 // with the same name may appear.
 373 void MCELFStreamer::EmitFileDirective(StringRef Filename) {
 374   getAssembler().addFileName(Filename);
 375 }
 376
 377 void MCELFStreamer::EmitIdent(StringRef IdentString) {
 378   MCSection *Comment = getAssembler().getContext().getELFSection(
 379       ".comment", ELF::SHT_PROGBITS, ELF::SHF_MERGE | ELF::SHF_STRINGS, 1, "");
 380   PushSection();
 381   SwitchSection(Comment);
 382   if (!SeenIdent) {
 383     EmitIntValue(0, 1);
 384     SeenIdent = true;
 385   }
 386   EmitBytes(IdentString);
 387   EmitIntValue(0, 1);
 388   PopSection();
 389 }
 390
 391 void MCELFStreamer::fixSymbolsInTLSFixups(const MCExpr *expr) {
 392   switch (expr->getKind()) {
 393   case MCExpr::Target:
 394     cast<MCTargetExpr>(expr)->fixELFSymbolsInTLSFixups(getAssembler());
 395     break;
 396   case MCExpr::Constant:
 397     break;
 398
 399   case MCExpr::Binary: {
 400     const MCBinaryExpr *be = cast<MCBinaryExpr>(expr);
 401     fixSymbolsInTLSFixups(be->getLHS());
 402     fixSymbolsInTLSFixups(be->getRHS());
 403     break;
 404   }
 405
 406   case MCExpr::SymbolRef: {
 407     const MCSymbolRefExpr &symRef = *cast<MCSymbolRefExpr>(expr);
 408     switch (symRef.getKind()) {
 409     default:
 410       return;
 411     case MCSymbolRefExpr::VK_GOTTPOFF:
 412     case MCSymbolRefExpr::VK_INDNTPOFF:
 413     case MCSymbolRefExpr::VK_NTPOFF:
 414     case MCSymbolRefExpr::VK_GOTNTPOFF:
 415     case MCSymbolRefExpr::VK_TLSGD:
 416     case MCSymbolRefExpr::VK_TLSLD:
 417     case MCSymbolRefExpr::VK_TLSLDM:
 418     case MCSymbolRefExpr::VK_TPOFF:
 419     case MCSymbolRefExpr::VK_DTPOFF:
 420     case MCSymbolRefExpr::VK_Mips_TLSGD:
 421     case MCSymbolRefExpr::VK_Mips_GOTTPREL:
 422     case MCSymbolRefExpr::VK_Mips_TPREL_HI:
 423     case MCSymbolRefExpr::VK_Mips_TPREL_LO:
 424     case MCSymbolRefExpr::VK_PPC_DTPMOD:
 425     case MCSymbolRefExpr::VK_PPC_TPREL:
 426     case MCSymbolRefExpr::VK_PPC_TPREL_LO:
 427     case MCSymbolRefExpr::VK_PPC_TPREL_HI:
 428     case MCSymbolRefExpr::VK_PPC_TPREL_HA:
 429     case MCSymbolRefExpr::VK_PPC_TPREL_HIGHER:
 430     case MCSymbolRefExpr::VK_PPC_TPREL_HIGHERA:
 431     case MCSymbolRefExpr::VK_PPC_TPREL_HIGHEST:
 432     case MCSymbolRefExpr::VK_PPC_TPREL_HIGHESTA:
 433     case MCSymbolRefExpr::VK_PPC_DTPREL:
 434     case MCSymbolRefExpr::VK_PPC_DTPREL_LO:
 435     case MCSymbolRefExpr::VK_PPC_DTPREL_HI:
 436     case MCSymbolRefExpr::VK_PPC_DTPREL_HA:
 437     case MCSymbolRefExpr::VK_PPC_DTPREL_HIGHER:
 438     case MCSymbolRefExpr::VK_PPC_DTPREL_HIGHERA:
 439     case MCSymbolRefExpr::VK_PPC_DTPREL_HIGHEST:
 440     case MCSymbolRefExpr::VK_PPC_DTPREL_HIGHESTA:
 441     case MCSymbolRefExpr::VK_PPC_GOT_TPREL:
 442     case MCSymbolRefExpr::VK_PPC_GOT_TPREL_LO:
 443     case MCSymbolRefExpr::VK_PPC_GOT_TPREL_HI:
 444     case MCSymbolRefExpr::VK_PPC_GOT_TPREL_HA:
 445     case MCSymbolRefExpr::VK_PPC_GOT_DTPREL:
 446     case MCSymbolRefExpr::VK_PPC_GOT_DTPREL_LO:
 447     case MCSymbolRefExpr::VK_PPC_GOT_DTPREL_HI:
 448     case MCSymbolRefExpr::VK_PPC_GOT_DTPREL_HA:
 449     case MCSymbolRefExpr::VK_PPC_TLS:
 450     case MCSymbolRefExpr::VK_PPC_GOT_TLSGD:
 451     case MCSymbolRefExpr::VK_PPC_GOT_TLSGD_LO:
 452     case MCSymbolRefExpr::VK_PPC_GOT_TLSGD_HI:
 453     case MCSymbolRefExpr::VK_PPC_GOT_TLSGD_HA:
 454     case MCSymbolRefExpr::VK_PPC_TLSGD:
 455     case MCSymbolRefExpr::VK_PPC_GOT_TLSLD:
 456     case MCSymbolRefExpr::VK_PPC_GOT_TLSLD_LO:
 457     case MCSymbolRefExpr::VK_PPC_GOT_TLSLD_HI:
 458     case MCSymbolRefExpr::VK_PPC_GOT_TLSLD_HA:
 459     case MCSymbolRefExpr::VK_PPC_TLSLD:
 460       break;
 461     }
 462     getAssembler().registerSymbol(symRef.getSymbol());
 463     cast<MCSymbolELF>(symRef.getSymbol()).setType(ELF::STT_TLS);
 464     break;
 465   }
 466
 467   case MCExpr::Unary:
 468     fixSymbolsInTLSFixups(cast<MCUnaryExpr>(expr)->getSubExpr());
 469     break;
 470   }
 471 }
 472
 473 void MCELFStreamer::EmitInstToFragment(const MCInst &Inst,
 474                                        const MCSubtargetInfo &STI) {
 475   this->MCObjectStreamer::EmitInstToFragment(Inst, STI);
 476   MCRelaxableFragment &F = *cast<MCRelaxableFragment>(getCurrentFragment());
 477
 478   for (unsigned i = 0, e = F.getFixups().size(); i != e; ++i)
 479     fixSymbolsInTLSFixups(F.getFixups()[i].getValue());
 480 }
 481
 482 void MCELFStreamer::EmitInstToData(const MCInst &Inst,
 483                                    const MCSubtargetInfo &STI) {
 484   MCAssembler &Assembler = getAssembler();
 485   SmallVector<MCFixup, 4> Fixups;
 486   SmallString<256> Code;
 487   raw_svector_ostream VecOS(Code);
 488   Assembler.getEmitter().encodeInstruction(Inst, VecOS, Fixups, STI);
 489
 490   for (unsigned i = 0, e = Fixups.size(); i != e; ++i)
 491     fixSymbolsInTLSFixups(Fixups[i].getValue());
 492
 493   // There are several possibilities here:
 494   //
 495   // If bundling is disabled, append the encoded instruction to the current data
 496   // fragment (or create a new such fragment if the current fragment is not a
 497   // data fragment).
 498   //
 499   // If bundling is enabled:
 500   // - If we're not in a bundle-locked group, emit the instruction into a
 501   //   fragment of its own. If there are no fixups registered for the
 502   //   instruction, emit a MCCompactEncodedInstFragment. Otherwise, emit a
 503   //   MCDataFragment.
 504   // - If we're in a bundle-locked group, append the instruction to the current
 505   //   data fragment because we want all the instructions in a group to get into
 506   //   the same fragment. Be careful not to do that for the first instruction in
 507   //   the group, though.
 508   MCDataFragment *DF;
 509
 510   if (Assembler.isBundlingEnabled()) {
 511     MCSection &Sec = *getCurrentSectionOnly();
 512     if (Assembler.getRelaxAll() && isBundleLocked())
 513       // If the -mc-relax-all flag is used and we are bundle-locked, we re-use
 514       // the current bundle group.
 515       DF = BundleGroups.back();
 516     else if (Assembler.getRelaxAll() && !isBundleLocked())
 517       // When not in a bundle-locked group and the -mc-relax-all flag is used,
 518       // we create a new temporary fragment which will be later merged into
 519       // the current fragment.
 520       DF = new MCDataFragment();
 521     else if (isBundleLocked() && !Sec.isBundleGroupBeforeFirstInst())
 522       // If we are bundle-locked, we re-use the current fragment.
 523       // The bundle-locking directive ensures this is a new data fragment.
 524       DF = cast<MCDataFragment>(getCurrentFragment());
 525     else if (!isBundleLocked() && Fixups.size() == 0) {
 526       // Optimize memory usage by emitting the instruction to a
 527       // MCCompactEncodedInstFragment when not in a bundle-locked group and
 528       // there are no fixups registered.
 529       MCCompactEncodedInstFragment *CEIF = new MCCompactEncodedInstFragment();
 530       insert(CEIF);
 531       CEIF->getContents().append(Code.begin(), Code.end());
 532       return;
 533     } else {
 534       DF = new MCDataFragment();
 535       insert(DF);
 536     }
 537     if (Sec.getBundleLockState() == MCSection::BundleLockedAlignToEnd) {
 538       // If this fragment is for a group marked "align_to_end", set a flag
 539       // in the fragment. This can happen after the fragment has already been
 540       // created if there are nested bundle_align groups and an inner one
 541       // is the one marked align_to_end.
 542       DF->setAlignToBundleEnd(true);
 543     }
 544
 545     // We're now emitting an instruction in a bundle group, so this flag has
 546     // to be turned off.
 547     Sec.setBundleGroupBeforeFirstInst(false);
 548   } else {
 549     DF = getOrCreateDataFragment();
 550   }
 551
 552   // Add the fixups and data.
 553   for (unsigned i = 0, e = Fixups.size(); i != e; ++i) {
 554     Fixups[i].setOffset(Fixups[i].getOffset() + DF->getContents().size());
 555     DF->getFixups().push_back(Fixups[i]);
 556   }
 557   DF->setHasInstructions(true);
 558   DF->getContents().append(Code.begin(), Code.end());
 559
 560   if (Assembler.isBundlingEnabled() && Assembler.getRelaxAll()) {
 561     if (!isBundleLocked()) {
 562       mergeFragment(getOrCreateDataFragment(), DF);
 563       delete DF;
 564     }
 565   }
 566 }
 567
 568 void MCELFStreamer::EmitBundleAlignMode(unsigned AlignPow2) {
 569   assert(AlignPow2 <= 30 && "Invalid bundle alignment");
 570   MCAssembler &Assembler = getAssembler();
 571   if (AlignPow2 > 0 && (Assembler.getBundleAlignSize() == 0 ||
 572                         Assembler.getBundleAlignSize() == 1U << AlignPow2))
 573     Assembler.setBundleAlignSize(1U << AlignPow2);
 574   else
 575     report_fatal_error(".bundle_align_mode cannot be changed once set");
 576 }
 577
 578 void MCELFStreamer::EmitBundleLock(bool AlignToEnd) {
 579   MCSection &Sec = *getCurrentSectionOnly();
 580
 581   // Sanity checks
 582   //
 583   if (!getAssembler().isBundlingEnabled())
 584     report_fatal_error(".bundle_lock forbidden when bundling is disabled");
 585
 586   if (!isBundleLocked())
 587     Sec.setBundleGroupBeforeFirstInst(true);
 588
 589   if (getAssembler().getRelaxAll() && !isBundleLocked()) {
 590     // TODO: drop the lock state and set directly in the fragment
 591     MCDataFragment *DF = new MCDataFragment();
 592     BundleGroups.push_back(DF);
 593   }
 594
 595   Sec.setBundleLockState(AlignToEnd ? MCSection::BundleLockedAlignToEnd
 596                                     : MCSection::BundleLocked);
 597 }
 598
 599 void MCELFStreamer::EmitBundleUnlock() {
 600   MCSection &Sec = *getCurrentSectionOnly();
 601
 602   // Sanity checks
 603   if (!getAssembler().isBundlingEnabled())
 604     report_fatal_error(".bundle_unlock forbidden when bundling is disabled");
 605   else if (!isBundleLocked())
 606     report_fatal_error(".bundle_unlock without matching lock");
 607   else if (Sec.isBundleGroupBeforeFirstInst())
 608     report_fatal_error("Empty bundle-locked group is forbidden");
 609
 610   // When the -mc-relax-all flag is used, we emit instructions to fragments
 611   // stored on a stack. When the bundle unlock is emitted, we pop a fragment
 612   // from the stack a merge it to the one below.
 613   if (getAssembler().getRelaxAll()) {
 614     assert(!BundleGroups.empty() && "There are no bundle groups");
 615     MCDataFragment *DF = BundleGroups.back();
 616
 617     // FIXME: Use BundleGroups to track the lock state instead.
 618     Sec.setBundleLockState(MCSection::NotBundleLocked);
 619
 620     // FIXME: Use more separate fragments for nested groups.
 621     if (!isBundleLocked()) {
 622       mergeFragment(getOrCreateDataFragment(), DF);
 623       BundleGroups.pop_back();
 624       delete DF;
 625     }
 626
 627     if (Sec.getBundleLockState() != MCSection::BundleLockedAlignToEnd)
 628       getOrCreateDataFragment()->setAlignToBundleEnd(false);
 629   } else
 630     Sec.setBundleLockState(MCSection::NotBundleLocked);
 631 }
 632
 633 void MCELFStreamer::Flush() {
 634
 635 }
 636
 637 void MCELFStreamer::FinishImpl() {
 638   // Ensure the last section gets aligned if necessary.
 639   MCSection *CurSection = getCurrentSectionOnly();
 640   setSectionAlignmentForBundling(getAssembler(), CurSection);
 641
 642   EmitFrames(nullptr);
 643
 644   Flush();
 645
 646   this->MCObjectStreamer::FinishImpl();
 647 }
 648
 649 MCStreamer *llvm::createELFStreamer(MCContext &Context, MCAsmBackend &MAB,
 650                                     raw_pwrite_stream &OS, MCCodeEmitter *CE,
 651                                     bool RelaxAll) {
 652   MCELFStreamer *S = new MCELFStreamer(Context, MAB, OS, CE);
 653   if (RelaxAll)
 654     S->getAssembler().setRelaxAll(true);
 655   return S;
 656 }
 657
 658 void MCELFStreamer::EmitThumbFunc(MCSymbol *Func) {
 659   llvm_unreachable("Generic ELF doesn't support this directive");
 660 }
 661
 662 void MCELFStreamer::EmitSymbolDesc(MCSymbol *Symbol, unsigned DescValue) {
 663   llvm_unreachable("ELF doesn't support this directive");
 664 }
 665
 666 void MCELFStreamer::BeginCOFFSymbolDef(const MCSymbol *Symbol) {
 667   llvm_unreachable("ELF doesn't support this directive");
 668 }
 669
 670 void MCELFStreamer::EmitCOFFSymbolStorageClass(int StorageClass) {
 671   llvm_unreachable("ELF doesn't support this directive");
 672 }
 673
 674 void MCELFStreamer::EmitCOFFSymbolType(int Type) {
 675   llvm_unreachable("ELF doesn't support this directive");
 676 }
 677
 678 void MCELFStreamer::EndCOFFSymbolDef() {
 679   llvm_unreachable("ELF doesn't support this directive");
 680 }
 681
 682 void MCELFStreamer::EmitZerofill(MCSection *Section, MCSymbol *Symbol,
 683                                  uint64_t Size, unsigned ByteAlignment) {
 684   llvm_unreachable("ELF doesn't support this directive");
 685 }
 686
 687 void MCELFStreamer::EmitTBSSSymbol(MCSection *Section, MCSymbol *Symbol,
 688                                    uint64_t Size, unsigned ByteAlignment) {
 689   llvm_unreachable("ELF doesn't support this directive");
 690 }