1 //===- lib/MC/MCFragment.cpp - Assembler Fragment Implementation ----------===//
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 #include "llvm/MC/MCFragment.h"
11 #include "llvm/ADT/SmallVector.h"
12 #include "llvm/ADT/StringExtras.h"
13 #include "llvm/ADT/Twine.h"
14 #include "llvm/MC/MCAsmLayout.h"
15 #include "llvm/MC/MCAssembler.h"
16 #include "llvm/MC/MCContext.h"
17 #include "llvm/MC/MCExpr.h"
18 #include "llvm/MC/MCFixup.h"
19 #include "llvm/MC/MCSection.h"
20 #include "llvm/MC/MCSymbol.h"
21 #include "llvm/MC/MCValue.h"
22 #include "llvm/Support/Casting.h"
23 #include "llvm/Support/Compiler.h"
24 #include "llvm/Support/ErrorHandling.h"
25 #include "llvm/Support/raw_ostream.h"
32 MCAsmLayout::MCAsmLayout(MCAssembler &Asm) : Assembler(Asm) {
33 // Compute the section layout order. Virtual sections must go last.
34 for (MCSection &Sec : Asm)
35 if (!Sec.isVirtualSection())
36 SectionOrder.push_back(&Sec);
37 for (MCSection &Sec : Asm)
38 if (Sec.isVirtualSection())
39 SectionOrder.push_back(&Sec);
42 bool MCAsmLayout::isFragmentValid(const MCFragment *F) const {
43 const MCSection *Sec = F->getParent();
44 const MCFragment *LastValid = LastValidFragment.lookup(Sec);
47 assert(LastValid->getParent() == Sec);
48 return F->getLayoutOrder() <= LastValid->getLayoutOrder();
51 void MCAsmLayout::invalidateFragmentsFrom(MCFragment *F) {
52 // If this fragment wasn't already valid, we don't need to do anything.
53 if (!isFragmentValid(F))
56 // Otherwise, reset the last valid fragment to the previous fragment
57 // (if this is the first fragment, it will be NULL).
58 LastValidFragment[F->getParent()] = F->getPrevNode();
61 void MCAsmLayout::ensureValid(const MCFragment *F) const {
62 MCSection *Sec = F->getParent();
63 MCSection::iterator I;
64 if (MCFragment *Cur = LastValidFragment[Sec])
65 I = ++MCSection::iterator(Cur);
69 // Advance the layout position until the fragment is valid.
70 while (!isFragmentValid(F)) {
71 assert(I != Sec->end() && "Layout bookkeeping error");
72 const_cast<MCAsmLayout *>(this)->layoutFragment(&*I);
77 uint64_t MCAsmLayout::getFragmentOffset(const MCFragment *F) const {
79 assert(F->Offset != ~UINT64_C(0) && "Address not set!");
83 // Simple getSymbolOffset helper for the non-variable case.
84 static bool getLabelOffset(const MCAsmLayout &Layout, const MCSymbol &S,
85 bool ReportError, uint64_t &Val) {
86 if (!S.getFragment()) {
88 report_fatal_error("unable to evaluate offset to undefined symbol '" +
92 Val = Layout.getFragmentOffset(S.getFragment()) + S.getOffset();
96 static bool getSymbolOffsetImpl(const MCAsmLayout &Layout, const MCSymbol &S,
97 bool ReportError, uint64_t &Val) {
99 return getLabelOffset(Layout, S, ReportError, Val);
101 // If SD is a variable, evaluate it.
103 if (!S.getVariableValue()->evaluateAsValue(Target, Layout))
104 report_fatal_error("unable to evaluate offset for variable '" +
107 uint64_t Offset = Target.getConstant();
109 const MCSymbolRefExpr *A = Target.getSymA();
112 if (!getLabelOffset(Layout, A->getSymbol(), ReportError, ValA))
117 const MCSymbolRefExpr *B = Target.getSymB();
120 if (!getLabelOffset(Layout, B->getSymbol(), ReportError, ValB))
129 bool MCAsmLayout::getSymbolOffset(const MCSymbol &S, uint64_t &Val) const {
130 return getSymbolOffsetImpl(*this, S, false, Val);
133 uint64_t MCAsmLayout::getSymbolOffset(const MCSymbol &S) const {
135 getSymbolOffsetImpl(*this, S, true, Val);
139 const MCSymbol *MCAsmLayout::getBaseSymbol(const MCSymbol &Symbol) const {
140 if (!Symbol.isVariable())
143 const MCExpr *Expr = Symbol.getVariableValue();
145 if (!Expr->evaluateAsValue(Value, *this)) {
146 Assembler.getContext().reportError(
147 Expr->getLoc(), "expression could not be evaluated");
151 const MCSymbolRefExpr *RefB = Value.getSymB();
153 Assembler.getContext().reportError(
154 Expr->getLoc(), Twine("symbol '") + RefB->getSymbol().getName() +
155 "' could not be evaluated in a subtraction expression");
159 const MCSymbolRefExpr *A = Value.getSymA();
163 const MCSymbol &ASym = A->getSymbol();
164 const MCAssembler &Asm = getAssembler();
165 if (ASym.isCommon()) {
166 Asm.getContext().reportError(Expr->getLoc(),
167 "Common symbol '" + ASym.getName() +
168 "' cannot be used in assignment expr");
175 uint64_t MCAsmLayout::getSectionAddressSize(const MCSection *Sec) const {
176 // The size is the last fragment's end offset.
177 const MCFragment &F = Sec->getFragmentList().back();
178 return getFragmentOffset(&F) + getAssembler().computeFragmentSize(*this, F);
181 uint64_t MCAsmLayout::getSectionFileSize(const MCSection *Sec) const {
182 // Virtual sections have no file size.
183 if (Sec->isVirtualSection())
186 // Otherwise, the file size is the same as the address space size.
187 return getSectionAddressSize(Sec);
190 uint64_t llvm::computeBundlePadding(const MCAssembler &Assembler,
192 uint64_t FOffset, uint64_t FSize) {
193 uint64_t BundleSize = Assembler.getBundleAlignSize();
194 assert(BundleSize > 0 &&
195 "computeBundlePadding should only be called if bundling is enabled");
196 uint64_t BundleMask = BundleSize - 1;
197 uint64_t OffsetInBundle = FOffset & BundleMask;
198 uint64_t EndOfFragment = OffsetInBundle + FSize;
200 // There are two kinds of bundling restrictions:
202 // 1) For alignToBundleEnd(), add padding to ensure that the fragment will
203 // *end* on a bundle boundary.
204 // 2) Otherwise, check if the fragment would cross a bundle boundary. If it
205 // would, add padding until the end of the bundle so that the fragment
206 // will start in a new one.
207 if (F->alignToBundleEnd()) {
208 // Three possibilities here:
210 // A) The fragment just happens to end at a bundle boundary, so we're good.
211 // B) The fragment ends before the current bundle boundary: pad it just
212 // enough to reach the boundary.
213 // C) The fragment ends after the current bundle boundary: pad it until it
214 // reaches the end of the next bundle boundary.
216 // Note: this code could be made shorter with some modulo trickery, but it's
217 // intentionally kept in its more explicit form for simplicity.
218 if (EndOfFragment == BundleSize)
220 else if (EndOfFragment < BundleSize)
221 return BundleSize - EndOfFragment;
222 else { // EndOfFragment > BundleSize
223 return 2 * BundleSize - EndOfFragment;
225 } else if (OffsetInBundle > 0 && EndOfFragment > BundleSize)
226 return BundleSize - OffsetInBundle;
233 void ilist_alloc_traits<MCFragment>::deleteNode(MCFragment *V) { V->destroy(); }
235 MCFragment::~MCFragment() = default;
237 MCFragment::MCFragment(FragmentType Kind, bool HasInstructions,
238 uint8_t BundlePadding, MCSection *Parent)
239 : Kind(Kind), HasInstructions(HasInstructions), AlignToBundleEnd(false),
240 BundlePadding(BundlePadding), Parent(Parent), Atom(nullptr),
241 Offset(~UINT64_C(0)) {
242 if (Parent && !isDummy())
243 Parent->getFragmentList().push_back(this);
246 void MCFragment::destroy() {
247 // First check if we are the sentinal.
248 if (Kind == FragmentType(~0)) {
255 delete cast<MCAlignFragment>(this);
258 delete cast<MCDataFragment>(this);
260 case FT_CompactEncodedInst:
261 delete cast<MCCompactEncodedInstFragment>(this);
264 delete cast<MCFillFragment>(this);
267 delete cast<MCRelaxableFragment>(this);
270 delete cast<MCOrgFragment>(this);
273 delete cast<MCDwarfLineAddrFragment>(this);
276 delete cast<MCDwarfCallFrameFragment>(this);
279 delete cast<MCLEBFragment>(this);
282 delete cast<MCPaddingFragment>(this);
285 delete cast<MCSymbolIdFragment>(this);
287 case FT_CVInlineLines:
288 delete cast<MCCVInlineLineTableFragment>(this);
291 delete cast<MCCVDefRangeFragment>(this);
294 delete cast<MCDummyFragment>(this);
303 raw_ostream &operator<<(raw_ostream &OS, const MCFixup &AF) {
304 OS << "<MCFixup" << " Offset:" << AF.getOffset()
305 << " Value:" << *AF.getValue()
306 << " Kind:" << AF.getKind() << ">";
310 } // end namespace llvm
312 #if !defined(NDEBUG) || defined(LLVM_ENABLE_DUMP)
313 LLVM_DUMP_METHOD void MCFragment::dump() const {
314 raw_ostream &OS = errs();
318 case MCFragment::FT_Align: OS << "MCAlignFragment"; break;
319 case MCFragment::FT_Data: OS << "MCDataFragment"; break;
320 case MCFragment::FT_CompactEncodedInst:
321 OS << "MCCompactEncodedInstFragment"; break;
322 case MCFragment::FT_Fill: OS << "MCFillFragment"; break;
323 case MCFragment::FT_Relaxable: OS << "MCRelaxableFragment"; break;
324 case MCFragment::FT_Org: OS << "MCOrgFragment"; break;
325 case MCFragment::FT_Dwarf: OS << "MCDwarfFragment"; break;
326 case MCFragment::FT_DwarfFrame: OS << "MCDwarfCallFrameFragment"; break;
327 case MCFragment::FT_LEB: OS << "MCLEBFragment"; break;
328 case MCFragment::FT_Padding: OS << "MCPaddingFragment"; break;
329 case MCFragment::FT_SymbolId: OS << "MCSymbolIdFragment"; break;
330 case MCFragment::FT_CVInlineLines: OS << "MCCVInlineLineTableFragment"; break;
331 case MCFragment::FT_CVDefRange: OS << "MCCVDefRangeTableFragment"; break;
332 case MCFragment::FT_Dummy: OS << "MCDummyFragment"; break;
335 OS << "<MCFragment " << (const void*) this << " LayoutOrder:" << LayoutOrder
336 << " Offset:" << Offset
337 << " HasInstructions:" << hasInstructions()
338 << " BundlePadding:" << static_cast<unsigned>(getBundlePadding()) << ">";
341 case MCFragment::FT_Align: {
342 const MCAlignFragment *AF = cast<MCAlignFragment>(this);
343 if (AF->hasEmitNops())
344 OS << " (emit nops)";
346 OS << " Alignment:" << AF->getAlignment()
347 << " Value:" << AF->getValue() << " ValueSize:" << AF->getValueSize()
348 << " MaxBytesToEmit:" << AF->getMaxBytesToEmit() << ">";
351 case MCFragment::FT_Data: {
352 const MCDataFragment *DF = cast<MCDataFragment>(this);
355 const SmallVectorImpl<char> &Contents = DF->getContents();
356 for (unsigned i = 0, e = Contents.size(); i != e; ++i) {
358 OS << hexdigit((Contents[i] >> 4) & 0xF) << hexdigit(Contents[i] & 0xF);
360 OS << "] (" << Contents.size() << " bytes)";
362 if (DF->fixup_begin() != DF->fixup_end()) {
365 for (MCDataFragment::const_fixup_iterator it = DF->fixup_begin(),
366 ie = DF->fixup_end(); it != ie; ++it) {
367 if (it != DF->fixup_begin()) OS << ",\n ";
374 case MCFragment::FT_CompactEncodedInst: {
375 const MCCompactEncodedInstFragment *CEIF =
376 cast<MCCompactEncodedInstFragment>(this);
379 const SmallVectorImpl<char> &Contents = CEIF->getContents();
380 for (unsigned i = 0, e = Contents.size(); i != e; ++i) {
382 OS << hexdigit((Contents[i] >> 4) & 0xF) << hexdigit(Contents[i] & 0xF);
384 OS << "] (" << Contents.size() << " bytes)";
387 case MCFragment::FT_Fill: {
388 const MCFillFragment *FF = cast<MCFillFragment>(this);
389 OS << " Value:" << static_cast<unsigned>(FF->getValue())
390 << " Size:" << FF->getSize();
393 case MCFragment::FT_Relaxable: {
394 const MCRelaxableFragment *F = cast<MCRelaxableFragment>(this);
397 F->getInst().dump_pretty(OS);
400 case MCFragment::FT_Org: {
401 const MCOrgFragment *OF = cast<MCOrgFragment>(this);
403 OS << " Offset:" << OF->getOffset()
404 << " Value:" << static_cast<unsigned>(OF->getValue());
407 case MCFragment::FT_Dwarf: {
408 const MCDwarfLineAddrFragment *OF = cast<MCDwarfLineAddrFragment>(this);
410 OS << " AddrDelta:" << OF->getAddrDelta()
411 << " LineDelta:" << OF->getLineDelta();
414 case MCFragment::FT_DwarfFrame: {
415 const MCDwarfCallFrameFragment *CF = cast<MCDwarfCallFrameFragment>(this);
417 OS << " AddrDelta:" << CF->getAddrDelta();
420 case MCFragment::FT_LEB: {
421 const MCLEBFragment *LF = cast<MCLEBFragment>(this);
423 OS << " Value:" << LF->getValue() << " Signed:" << LF->isSigned();
426 case MCFragment::FT_Padding: {
427 const MCPaddingFragment *F = cast<MCPaddingFragment>(this);
429 OS << " PaddingPoliciesMask:" << F->getPaddingPoliciesMask()
430 << " IsInsertionPoint:" << F->isInsertionPoint()
431 << " Size:" << F->getSize();
434 F->getInst().dump_pretty(OS);
435 OS << " InstSize:" << F->getInstSize();
439 case MCFragment::FT_SymbolId: {
440 const MCSymbolIdFragment *F = cast<MCSymbolIdFragment>(this);
442 OS << " Sym:" << F->getSymbol();
445 case MCFragment::FT_CVInlineLines: {
446 const auto *F = cast<MCCVInlineLineTableFragment>(this);
448 OS << " Sym:" << *F->getFnStartSym();
451 case MCFragment::FT_CVDefRange: {
452 const auto *F = cast<MCCVDefRangeFragment>(this);
454 for (std::pair<const MCSymbol *, const MCSymbol *> RangeStartEnd :
456 OS << " RangeStart:" << RangeStartEnd.first;
457 OS << " RangeEnd:" << RangeStartEnd.second;
461 case MCFragment::FT_Dummy:
467 LLVM_DUMP_METHOD void MCAssembler::dump() const{
468 raw_ostream &OS = errs();
470 OS << "<MCAssembler\n";
471 OS << " Sections:[\n ";
472 for (const_iterator it = begin(), ie = end(); it != ie; ++it) {
473 if (it != begin()) OS << ",\n ";
479 for (const_symbol_iterator it = symbol_begin(), ie = symbol_end(); it != ie; ++it) {
480 if (it != symbol_begin()) OS << ",\n ";
483 OS << ", Index:" << it->getIndex() << ", ";