1 //===- lib/MC/MCELFStreamer.cpp - ELF Object Output -----------------------===//
3 // The LLVM Compiler Infrastructure
5 // This file is distributed under the University of Illinois Open Source
6 // License. See LICENSE.TXT for details.
8 //===----------------------------------------------------------------------===//
10 // This file assembles .s files and emits ELF .o object files.
12 //===----------------------------------------------------------------------===//
14 #include "llvm/MC/MCELFStreamer.h"
15 #include "llvm/ADT/SmallPtrSet.h"
16 #include "llvm/ADT/STLExtras.h"
17 #include "llvm/MC/MCAssembler.h"
18 #include "llvm/MC/MCCodeEmitter.h"
19 #include "llvm/MC/MCContext.h"
20 #include "llvm/MC/MCELF.h"
21 #include "llvm/MC/MCELFSymbolFlags.h"
22 #include "llvm/MC/MCExpr.h"
23 #include "llvm/MC/MCInst.h"
24 #include "llvm/MC/MCObjectStreamer.h"
25 #include "llvm/MC/MCSection.h"
26 #include "llvm/MC/MCSectionELF.h"
27 #include "llvm/MC/MCSymbol.h"
28 #include "llvm/MC/MCValue.h"
29 #include "llvm/Support/Debug.h"
30 #include "llvm/Support/ELF.h"
31 #include "llvm/Support/ErrorHandling.h"
32 #include "llvm/Support/raw_ostream.h"
37 inline void MCELFStreamer::SetSection(StringRef Section, unsigned Type,
38 unsigned Flags, SectionKind Kind) {
39 SwitchSection(getContext().getELFSection(Section, Type, Flags, Kind));
42 inline void MCELFStreamer::SetSectionData() {
45 ELF::SHF_WRITE | ELF::SHF_ALLOC,
46 SectionKind::getDataRel());
47 EmitCodeAlignment(4, 0);
50 inline void MCELFStreamer::SetSectionText() {
53 ELF::SHF_EXECINSTR | ELF::SHF_ALLOC,
54 SectionKind::getText());
55 EmitCodeAlignment(4, 0);
58 inline void MCELFStreamer::SetSectionBss() {
61 ELF::SHF_WRITE | ELF::SHF_ALLOC,
62 SectionKind::getBSS());
63 EmitCodeAlignment(4, 0);
66 MCELFStreamer::~MCELFStreamer() {
69 void MCELFStreamer::InitToTextSection() {
73 void MCELFStreamer::InitSections() {
74 // This emulates the same behavior of GNU as. This makes it easier
75 // to compare the output as the major sections are in the same order.
82 void MCELFStreamer::EmitLabel(MCSymbol *Symbol) {
83 assert(Symbol->isUndefined() && "Cannot define a symbol twice!");
85 MCObjectStreamer::EmitLabel(Symbol);
87 const MCSectionELF &Section =
88 static_cast<const MCSectionELF&>(Symbol->getSection());
89 MCSymbolData &SD = getAssembler().getSymbolData(*Symbol);
90 if (Section.getFlags() & ELF::SHF_TLS)
91 MCELF::SetType(SD, ELF::STT_TLS);
94 void MCELFStreamer::EmitDebugLabel(MCSymbol *Symbol) {
98 void MCELFStreamer::EmitAssemblerFlag(MCAssemblerFlag Flag) {
100 case MCAF_SyntaxUnified: return; // no-op here.
101 case MCAF_Code16: return; // Change parsing mode; no-op here.
102 case MCAF_Code32: return; // Change parsing mode; no-op here.
103 case MCAF_Code64: return; // Change parsing mode; no-op here.
104 case MCAF_SubsectionsViaSymbols:
105 getAssembler().setSubsectionsViaSymbols(true);
109 llvm_unreachable("invalid assembler flag!");
112 void MCELFStreamer::ChangeSection(const MCSection *Section,
113 const MCExpr *Subsection) {
114 MCSectionData *CurSection = getCurrentSectionData();
115 if (CurSection && CurSection->isBundleLocked())
116 report_fatal_error("Unterminated .bundle_lock when changing a section");
117 const MCSymbol *Grp = static_cast<const MCSectionELF *>(Section)->getGroup();
119 getAssembler().getOrCreateSymbolData(*Grp);
120 this->MCObjectStreamer::ChangeSection(Section, Subsection);
123 void MCELFStreamer::EmitWeakReference(MCSymbol *Alias, const MCSymbol *Symbol) {
124 getAssembler().getOrCreateSymbolData(*Symbol);
125 MCSymbolData &AliasSD = getAssembler().getOrCreateSymbolData(*Alias);
126 AliasSD.setFlags(AliasSD.getFlags() | ELF_Other_Weakref);
127 const MCExpr *Value = MCSymbolRefExpr::Create(Symbol, getContext());
128 Alias->setVariableValue(Value);
131 // When GNU as encounters more than one .type declaration for an object it seems
132 // to use a mechanism similar to the one below to decide which type is actually
133 // used in the object file. The greater of T1 and T2 is selected based on the
134 // following ordering:
135 // STT_NOTYPE < STT_OBJECT < STT_FUNC < STT_GNU_IFUNC < STT_TLS < anything else
136 // If neither T1 < T2 nor T2 < T1 according to this ordering, use T2 (the user
138 static unsigned CombineSymbolTypes(unsigned T1, unsigned T2) {
139 unsigned TypeOrdering[] = {ELF::STT_NOTYPE, ELF::STT_OBJECT, ELF::STT_FUNC,
140 ELF::STT_GNU_IFUNC, ELF::STT_TLS};
141 for (unsigned i = 0; i != array_lengthof(TypeOrdering); ++i) {
142 if (T1 == TypeOrdering[i])
144 if (T2 == TypeOrdering[i])
151 void MCELFStreamer::EmitSymbolAttribute(MCSymbol *Symbol,
152 MCSymbolAttr Attribute) {
153 // Indirect symbols are handled differently, to match how 'as' handles
154 // them. This makes writing matching .o files easier.
155 if (Attribute == MCSA_IndirectSymbol) {
156 // Note that we intentionally cannot use the symbol data here; this is
157 // important for matching the string table that 'as' generates.
158 IndirectSymbolData ISD;
160 ISD.SectionData = getCurrentSectionData();
161 getAssembler().getIndirectSymbols().push_back(ISD);
165 // Adding a symbol attribute always introduces the symbol, note that an
166 // important side effect of calling getOrCreateSymbolData here is to register
167 // the symbol with the assembler.
168 MCSymbolData &SD = getAssembler().getOrCreateSymbolData(*Symbol);
170 // The implementation of symbol attributes is designed to match 'as', but it
171 // leaves much to desired. It doesn't really make sense to arbitrarily add and
172 // remove flags, but 'as' allows this (in particular, see .desc).
174 // In the future it might be worth trying to make these operations more well
177 case MCSA_LazyReference:
179 case MCSA_SymbolResolver:
180 case MCSA_PrivateExtern:
181 case MCSA_WeakDefinition:
182 case MCSA_WeakDefAutoPrivate:
184 case MCSA_IndirectSymbol:
185 llvm_unreachable("Invalid symbol attribute for ELF!");
187 case MCSA_NoDeadStrip:
188 case MCSA_ELF_TypeGnuUniqueObject:
193 MCELF::SetBinding(SD, ELF::STB_GLOBAL);
194 SD.setExternal(true);
195 BindingExplicitlySet.insert(Symbol);
198 case MCSA_WeakReference:
200 MCELF::SetBinding(SD, ELF::STB_WEAK);
201 SD.setExternal(true);
202 BindingExplicitlySet.insert(Symbol);
206 MCELF::SetBinding(SD, ELF::STB_LOCAL);
207 SD.setExternal(false);
208 BindingExplicitlySet.insert(Symbol);
211 case MCSA_ELF_TypeFunction:
212 MCELF::SetType(SD, CombineSymbolTypes(MCELF::GetType(SD),
216 case MCSA_ELF_TypeIndFunction:
217 MCELF::SetType(SD, CombineSymbolTypes(MCELF::GetType(SD),
218 ELF::STT_GNU_IFUNC));
221 case MCSA_ELF_TypeObject:
222 MCELF::SetType(SD, CombineSymbolTypes(MCELF::GetType(SD),
226 case MCSA_ELF_TypeTLS:
227 MCELF::SetType(SD, CombineSymbolTypes(MCELF::GetType(SD),
231 case MCSA_ELF_TypeCommon:
232 // TODO: Emit these as a common symbol.
233 MCELF::SetType(SD, CombineSymbolTypes(MCELF::GetType(SD),
237 case MCSA_ELF_TypeNoType:
238 MCELF::SetType(SD, CombineSymbolTypes(MCELF::GetType(SD),
243 MCELF::SetVisibility(SD, ELF::STV_PROTECTED);
247 MCELF::SetVisibility(SD, ELF::STV_HIDDEN);
251 MCELF::SetVisibility(SD, ELF::STV_INTERNAL);
256 void MCELFStreamer::EmitCommonSymbol(MCSymbol *Symbol, uint64_t Size,
257 unsigned ByteAlignment) {
258 MCSymbolData &SD = getAssembler().getOrCreateSymbolData(*Symbol);
260 if (!BindingExplicitlySet.count(Symbol)) {
261 MCELF::SetBinding(SD, ELF::STB_GLOBAL);
262 SD.setExternal(true);
265 MCELF::SetType(SD, ELF::STT_OBJECT);
267 if (MCELF::GetBinding(SD) == ELF_STB_Local) {
268 const MCSection *Section = getAssembler().getContext().getELFSection(".bss",
272 SectionKind::getBSS());
273 Symbol->setSection(*Section);
275 struct LocalCommon L = {&SD, Size, ByteAlignment};
276 LocalCommons.push_back(L);
278 SD.setCommon(Size, ByteAlignment);
281 SD.setSize(MCConstantExpr::Create(Size, getContext()));
284 void MCELFStreamer::EmitELFSize(MCSymbol *Symbol, const MCExpr *Value) {
285 MCSymbolData &SD = getAssembler().getOrCreateSymbolData(*Symbol);
289 void MCELFStreamer::EmitLocalCommonSymbol(MCSymbol *Symbol, uint64_t Size,
290 unsigned ByteAlignment) {
291 // FIXME: Should this be caught and done earlier?
292 MCSymbolData &SD = getAssembler().getOrCreateSymbolData(*Symbol);
293 MCELF::SetBinding(SD, ELF::STB_LOCAL);
294 SD.setExternal(false);
295 BindingExplicitlySet.insert(Symbol);
296 EmitCommonSymbol(Symbol, Size, ByteAlignment);
299 void MCELFStreamer::EmitValueImpl(const MCExpr *Value, unsigned Size) {
300 if (getCurrentSectionData()->isBundleLocked())
301 report_fatal_error("Emitting values inside a locked bundle is forbidden");
302 fixSymbolsInTLSFixups(Value);
303 MCObjectStreamer::EmitValueImpl(Value, Size);
306 void MCELFStreamer::EmitValueToAlignment(unsigned ByteAlignment,
309 unsigned MaxBytesToEmit) {
310 if (getCurrentSectionData()->isBundleLocked())
311 report_fatal_error("Emitting values inside a locked bundle is forbidden");
312 MCObjectStreamer::EmitValueToAlignment(ByteAlignment, Value,
313 ValueSize, MaxBytesToEmit);
317 // Add a symbol for the file name of this module. This is the second
318 // entry in the module's symbol table (the first being the null symbol).
319 void MCELFStreamer::EmitFileDirective(StringRef Filename) {
320 MCSymbol *Symbol = getAssembler().getContext().GetOrCreateSymbol(Filename);
321 Symbol->setSection(*getCurrentSection().first);
322 Symbol->setAbsolute();
324 MCSymbolData &SD = getAssembler().getOrCreateSymbolData(*Symbol);
326 SD.setFlags(ELF_STT_File | ELF_STB_Local | ELF_STV_Default);
329 void MCELFStreamer::fixSymbolsInTLSFixups(const MCExpr *expr) {
330 switch (expr->getKind()) {
332 cast<MCTargetExpr>(expr)->fixELFSymbolsInTLSFixups(getAssembler());
334 case MCExpr::Constant:
337 case MCExpr::Binary: {
338 const MCBinaryExpr *be = cast<MCBinaryExpr>(expr);
339 fixSymbolsInTLSFixups(be->getLHS());
340 fixSymbolsInTLSFixups(be->getRHS());
344 case MCExpr::SymbolRef: {
345 const MCSymbolRefExpr &symRef = *cast<MCSymbolRefExpr>(expr);
346 switch (symRef.getKind()) {
349 case MCSymbolRefExpr::VK_GOTTPOFF:
350 case MCSymbolRefExpr::VK_INDNTPOFF:
351 case MCSymbolRefExpr::VK_NTPOFF:
352 case MCSymbolRefExpr::VK_GOTNTPOFF:
353 case MCSymbolRefExpr::VK_TLSGD:
354 case MCSymbolRefExpr::VK_TLSLD:
355 case MCSymbolRefExpr::VK_TLSLDM:
356 case MCSymbolRefExpr::VK_TPOFF:
357 case MCSymbolRefExpr::VK_DTPOFF:
358 case MCSymbolRefExpr::VK_ARM_TLSGD:
359 case MCSymbolRefExpr::VK_ARM_TPOFF:
360 case MCSymbolRefExpr::VK_ARM_GOTTPOFF:
361 case MCSymbolRefExpr::VK_Mips_TLSGD:
362 case MCSymbolRefExpr::VK_Mips_GOTTPREL:
363 case MCSymbolRefExpr::VK_Mips_TPREL_HI:
364 case MCSymbolRefExpr::VK_Mips_TPREL_LO:
365 case MCSymbolRefExpr::VK_PPC_DTPMOD:
366 case MCSymbolRefExpr::VK_PPC_TPREL:
367 case MCSymbolRefExpr::VK_PPC_TPREL_LO:
368 case MCSymbolRefExpr::VK_PPC_TPREL_HI:
369 case MCSymbolRefExpr::VK_PPC_TPREL_HA:
370 case MCSymbolRefExpr::VK_PPC_TPREL_HIGHER:
371 case MCSymbolRefExpr::VK_PPC_TPREL_HIGHERA:
372 case MCSymbolRefExpr::VK_PPC_TPREL_HIGHEST:
373 case MCSymbolRefExpr::VK_PPC_TPREL_HIGHESTA:
374 case MCSymbolRefExpr::VK_PPC_DTPREL:
375 case MCSymbolRefExpr::VK_PPC_DTPREL_LO:
376 case MCSymbolRefExpr::VK_PPC_DTPREL_HI:
377 case MCSymbolRefExpr::VK_PPC_DTPREL_HA:
378 case MCSymbolRefExpr::VK_PPC_DTPREL_HIGHER:
379 case MCSymbolRefExpr::VK_PPC_DTPREL_HIGHERA:
380 case MCSymbolRefExpr::VK_PPC_DTPREL_HIGHEST:
381 case MCSymbolRefExpr::VK_PPC_DTPREL_HIGHESTA:
382 case MCSymbolRefExpr::VK_PPC_GOT_TPREL:
383 case MCSymbolRefExpr::VK_PPC_GOT_TPREL_LO:
384 case MCSymbolRefExpr::VK_PPC_GOT_TPREL_HI:
385 case MCSymbolRefExpr::VK_PPC_GOT_TPREL_HA:
386 case MCSymbolRefExpr::VK_PPC_GOT_DTPREL:
387 case MCSymbolRefExpr::VK_PPC_GOT_DTPREL_LO:
388 case MCSymbolRefExpr::VK_PPC_GOT_DTPREL_HI:
389 case MCSymbolRefExpr::VK_PPC_GOT_DTPREL_HA:
390 case MCSymbolRefExpr::VK_PPC_TLS:
391 case MCSymbolRefExpr::VK_PPC_GOT_TLSGD:
392 case MCSymbolRefExpr::VK_PPC_GOT_TLSGD_LO:
393 case MCSymbolRefExpr::VK_PPC_GOT_TLSGD_HI:
394 case MCSymbolRefExpr::VK_PPC_GOT_TLSGD_HA:
395 case MCSymbolRefExpr::VK_PPC_TLSGD:
396 case MCSymbolRefExpr::VK_PPC_GOT_TLSLD:
397 case MCSymbolRefExpr::VK_PPC_GOT_TLSLD_LO:
398 case MCSymbolRefExpr::VK_PPC_GOT_TLSLD_HI:
399 case MCSymbolRefExpr::VK_PPC_GOT_TLSLD_HA:
400 case MCSymbolRefExpr::VK_PPC_TLSLD:
403 MCSymbolData &SD = getAssembler().getOrCreateSymbolData(symRef.getSymbol());
404 MCELF::SetType(SD, ELF::STT_TLS);
409 fixSymbolsInTLSFixups(cast<MCUnaryExpr>(expr)->getSubExpr());
414 void MCELFStreamer::EmitInstToFragment(const MCInst &Inst) {
415 this->MCObjectStreamer::EmitInstToFragment(Inst);
416 MCRelaxableFragment &F = *cast<MCRelaxableFragment>(getCurrentFragment());
418 for (unsigned i = 0, e = F.getFixups().size(); i != e; ++i)
419 fixSymbolsInTLSFixups(F.getFixups()[i].getValue());
422 void MCELFStreamer::EmitInstToData(const MCInst &Inst) {
423 MCAssembler &Assembler = getAssembler();
424 SmallVector<MCFixup, 4> Fixups;
425 SmallString<256> Code;
426 raw_svector_ostream VecOS(Code);
427 Assembler.getEmitter().EncodeInstruction(Inst, VecOS, Fixups);
430 for (unsigned i = 0, e = Fixups.size(); i != e; ++i)
431 fixSymbolsInTLSFixups(Fixups[i].getValue());
433 // There are several possibilities here:
435 // If bundling is disabled, append the encoded instruction to the current data
436 // fragment (or create a new such fragment if the current fragment is not a
439 // If bundling is enabled:
440 // - If we're not in a bundle-locked group, emit the instruction into a
441 // fragment of its own. If there are no fixups registered for the
442 // instruction, emit a MCCompactEncodedInstFragment. Otherwise, emit a
444 // - If we're in a bundle-locked group, append the instruction to the current
445 // data fragment because we want all the instructions in a group to get into
446 // the same fragment. Be careful not to do that for the first instruction in
447 // the group, though.
450 if (Assembler.isBundlingEnabled()) {
451 MCSectionData *SD = getCurrentSectionData();
452 if (SD->isBundleLocked() && !SD->isBundleGroupBeforeFirstInst())
453 // If we are bundle-locked, we re-use the current fragment.
454 // The bundle-locking directive ensures this is a new data fragment.
455 DF = cast<MCDataFragment>(getCurrentFragment());
456 else if (!SD->isBundleLocked() && Fixups.size() == 0) {
457 // Optimize memory usage by emitting the instruction to a
458 // MCCompactEncodedInstFragment when not in a bundle-locked group and
459 // there are no fixups registered.
460 MCCompactEncodedInstFragment *CEIF = new MCCompactEncodedInstFragment();
462 CEIF->getContents().append(Code.begin(), Code.end());
465 DF = new MCDataFragment();
467 if (SD->getBundleLockState() == MCSectionData::BundleLockedAlignToEnd) {
468 // If this is a new fragment created for a bundle-locked group, and the
469 // group was marked as "align_to_end", set a flag in the fragment.
470 DF->setAlignToBundleEnd(true);
474 // We're now emitting an instruction in a bundle group, so this flag has
476 SD->setBundleGroupBeforeFirstInst(false);
478 DF = getOrCreateDataFragment();
481 // Add the fixups and data.
482 for (unsigned i = 0, e = Fixups.size(); i != e; ++i) {
483 Fixups[i].setOffset(Fixups[i].getOffset() + DF->getContents().size());
484 DF->getFixups().push_back(Fixups[i]);
486 DF->setHasInstructions(true);
487 DF->getContents().append(Code.begin(), Code.end());
490 void MCELFStreamer::EmitBundleAlignMode(unsigned AlignPow2) {
491 assert(AlignPow2 <= 30 && "Invalid bundle alignment");
492 MCAssembler &Assembler = getAssembler();
493 if (Assembler.getBundleAlignSize() == 0 && AlignPow2 > 0)
494 Assembler.setBundleAlignSize(1 << AlignPow2);
496 report_fatal_error(".bundle_align_mode should be only set once per file");
499 void MCELFStreamer::EmitBundleLock(bool AlignToEnd) {
500 MCSectionData *SD = getCurrentSectionData();
504 if (!getAssembler().isBundlingEnabled())
505 report_fatal_error(".bundle_lock forbidden when bundling is disabled");
506 else if (SD->isBundleLocked())
507 report_fatal_error("Nesting of .bundle_lock is forbidden");
509 SD->setBundleLockState(AlignToEnd ? MCSectionData::BundleLockedAlignToEnd :
510 MCSectionData::BundleLocked);
511 SD->setBundleGroupBeforeFirstInst(true);
514 void MCELFStreamer::EmitBundleUnlock() {
515 MCSectionData *SD = getCurrentSectionData();
518 if (!getAssembler().isBundlingEnabled())
519 report_fatal_error(".bundle_unlock forbidden when bundling is disabled");
520 else if (!SD->isBundleLocked())
521 report_fatal_error(".bundle_unlock without matching lock");
522 else if (SD->isBundleGroupBeforeFirstInst())
523 report_fatal_error("Empty bundle-locked group is forbidden");
525 SD->setBundleLockState(MCSectionData::NotBundleLocked);
528 void MCELFStreamer::FinishImpl() {
531 for (std::vector<LocalCommon>::const_iterator i = LocalCommons.begin(),
532 e = LocalCommons.end();
534 MCSymbolData *SD = i->SD;
535 uint64_t Size = i->Size;
536 unsigned ByteAlignment = i->ByteAlignment;
537 const MCSymbol &Symbol = SD->getSymbol();
538 const MCSection &Section = Symbol.getSection();
540 MCSectionData &SectData = getAssembler().getOrCreateSectionData(Section);
541 new MCAlignFragment(ByteAlignment, 0, 1, ByteAlignment, &SectData);
543 MCFragment *F = new MCFillFragment(0, 0, Size, &SectData);
546 // Update the maximum alignment of the section if necessary.
547 if (ByteAlignment > SectData.getAlignment())
548 SectData.setAlignment(ByteAlignment);
551 this->MCObjectStreamer::FinishImpl();
553 void MCELFStreamer::EmitTCEntry(const MCSymbol &S) {
554 // Creates a R_PPC64_TOC relocation
555 MCObjectStreamer::EmitSymbolValue(&S, 8);
558 MCStreamer *llvm::createELFStreamer(MCContext &Context, MCAsmBackend &MAB,
559 raw_ostream &OS, MCCodeEmitter *CE,
560 bool RelaxAll, bool NoExecStack) {
561 MCELFStreamer *S = new MCELFStreamer(Context, MAB, OS, CE);
563 S->getAssembler().setRelaxAll(true);
565 S->getAssembler().setNoExecStack(true);
569 void MCELFStreamer::EmitThumbFunc(MCSymbol *Func) {
570 llvm_unreachable("Generic ELF doesn't support this directive");
573 MCSymbolData &MCELFStreamer::getOrCreateSymbolData(MCSymbol *Symbol) {
574 return getAssembler().getOrCreateSymbolData(*Symbol);
577 void MCELFStreamer::EmitSymbolDesc(MCSymbol *Symbol, unsigned DescValue) {
578 llvm_unreachable("ELF doesn't support this directive");
581 void MCELFStreamer::BeginCOFFSymbolDef(const MCSymbol *Symbol) {
582 llvm_unreachable("ELF doesn't support this directive");
585 void MCELFStreamer::EmitCOFFSymbolStorageClass(int StorageClass) {
586 llvm_unreachable("ELF doesn't support this directive");
589 void MCELFStreamer::EmitCOFFSymbolType(int Type) {
590 llvm_unreachable("ELF doesn't support this directive");
593 void MCELFStreamer::EndCOFFSymbolDef() {
594 llvm_unreachable("ELF doesn't support this directive");
597 void MCELFStreamer::EmitZerofill(const MCSection *Section, MCSymbol *Symbol,
598 uint64_t Size, unsigned ByteAlignment) {
599 llvm_unreachable("ELF doesn't support this directive");
602 void MCELFStreamer::EmitTBSSSymbol(const MCSection *Section, MCSymbol *Symbol,
603 uint64_t Size, unsigned ByteAlignment) {
604 llvm_unreachable("ELF doesn't support this directive");