1 //===- lib/MC/MCContext.cpp - Machine Code Context ------------------------===//
2 //
3 // Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
4 // See https://llvm.org/LICENSE.txt for license information.
5 // SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
6 //
7 //===----------------------------------------------------------------------===//
8 
9 #include "llvm/MC/MCContext.h"
10 #include "llvm/ADT/Optional.h"
11 #include "llvm/ADT/SmallString.h"
12 #include "llvm/ADT/SmallVector.h"
13 #include "llvm/ADT/StringMap.h"
14 #include "llvm/ADT/StringRef.h"
15 #include "llvm/ADT/Twine.h"
16 #include "llvm/BinaryFormat/COFF.h"
17 #include "llvm/BinaryFormat/ELF.h"
18 #include "llvm/BinaryFormat/XCOFF.h"
19 #include "llvm/MC/MCAsmInfo.h"
20 #include "llvm/MC/MCCodeView.h"
21 #include "llvm/MC/MCDwarf.h"
22 #include "llvm/MC/MCExpr.h"
23 #include "llvm/MC/MCFragment.h"
24 #include "llvm/MC/MCLabel.h"
25 #include "llvm/MC/MCObjectFileInfo.h"
26 #include "llvm/MC/MCSectionCOFF.h"
27 #include "llvm/MC/MCSectionELF.h"
28 #include "llvm/MC/MCSectionMachO.h"
29 #include "llvm/MC/MCSectionWasm.h"
30 #include "llvm/MC/MCSectionXCOFF.h"
31 #include "llvm/MC/MCStreamer.h"
32 #include "llvm/MC/MCSymbol.h"
33 #include "llvm/MC/MCSymbolCOFF.h"
34 #include "llvm/MC/MCSymbolELF.h"
35 #include "llvm/MC/MCSymbolMachO.h"
36 #include "llvm/MC/MCSymbolWasm.h"
37 #include "llvm/MC/MCSymbolXCOFF.h"
38 #include "llvm/MC/SectionKind.h"
39 #include "llvm/Support/Casting.h"
40 #include "llvm/Support/CommandLine.h"
41 #include "llvm/Support/ErrorHandling.h"
42 #include "llvm/Support/MemoryBuffer.h"
43 #include "llvm/Support/Path.h"
44 #include "llvm/Support/Signals.h"
45 #include "llvm/Support/SourceMgr.h"
46 #include "llvm/Support/raw_ostream.h"
47 #include <cassert>
48 #include <cstdlib>
49 #include <tuple>
50 #include <utility>
51 
52 using namespace llvm;
53 
54 static cl::opt<char*>
55 AsSecureLogFileName("as-secure-log-file-name",
56         cl::desc("As secure log file name (initialized from "
57                  "AS_SECURE_LOG_FILE env variable)"),
58         cl::init(getenv("AS_SECURE_LOG_FILE")), cl::Hidden);
59 
defaultDiagHandler(const SMDiagnostic & SMD,bool,const SourceMgr &,std::vector<const MDNode * > &)60 static void defaultDiagHandler(const SMDiagnostic &SMD, bool, const SourceMgr &,
61                                std::vector<const MDNode *> &) {
62   SMD.print(nullptr, errs());
63 }
64 
MCContext(const Triple & TheTriple,const MCAsmInfo * mai,const MCRegisterInfo * mri,const MCSubtargetInfo * msti,const SourceMgr * mgr,MCTargetOptions const * TargetOpts,bool DoAutoReset)65 MCContext::MCContext(const Triple &TheTriple, const MCAsmInfo *mai,
66                      const MCRegisterInfo *mri, const MCSubtargetInfo *msti,
67                      const SourceMgr *mgr, MCTargetOptions const *TargetOpts,
68                      bool DoAutoReset)
69     : TT(TheTriple), SrcMgr(mgr), InlineSrcMgr(nullptr),
70       DiagHandler(defaultDiagHandler), MAI(mai), MRI(mri), MSTI(msti),
71       Symbols(Allocator), UsedNames(Allocator),
72       InlineAsmUsedLabelNames(Allocator),
73       CurrentDwarfLoc(0, 0, 0, DWARF2_FLAG_IS_STMT, 0, 0),
74       AutoReset(DoAutoReset), TargetOptions(TargetOpts) {
75   SecureLogFile = AsSecureLogFileName;
76 
77   if (SrcMgr && SrcMgr->getNumBuffers())
78     MainFileName = std::string(SrcMgr->getMemoryBuffer(SrcMgr->getMainFileID())
79                                    ->getBufferIdentifier());
80 
81   switch (TheTriple.getObjectFormat()) {
82   case Triple::MachO:
83     Env = IsMachO;
84     break;
85   case Triple::COFF:
86     if (!TheTriple.isOSWindows())
87       report_fatal_error(
88           "Cannot initialize MC for non-Windows COFF object files.");
89 
90     Env = IsCOFF;
91     break;
92   case Triple::ELF:
93     Env = IsELF;
94     break;
95   case Triple::Wasm:
96     Env = IsWasm;
97     break;
98   case Triple::XCOFF:
99     Env = IsXCOFF;
100     break;
101   case Triple::GOFF:
102     report_fatal_error("Cannot initialize MC for GOFF object file format");
103     break;
104   case Triple::UnknownObjectFormat:
105     report_fatal_error("Cannot initialize MC for unknown object file format.");
106     break;
107   }
108 }
109 
~MCContext()110 MCContext::~MCContext() {
111   if (AutoReset)
112     reset();
113 
114   // NOTE: The symbols are all allocated out of a bump pointer allocator,
115   // we don't need to free them here.
116 }
117 
initInlineSourceManager()118 void MCContext::initInlineSourceManager() {
119   if (!InlineSrcMgr)
120     InlineSrcMgr.reset(new SourceMgr());
121 }
122 
123 //===----------------------------------------------------------------------===//
124 // Module Lifetime Management
125 //===----------------------------------------------------------------------===//
126 
reset()127 void MCContext::reset() {
128   SrcMgr = nullptr;
129   InlineSrcMgr.reset();
130   LocInfos.clear();
131   DiagHandler = defaultDiagHandler;
132 
133   // Call the destructors so the fragments are freed
134   COFFAllocator.DestroyAll();
135   ELFAllocator.DestroyAll();
136   MachOAllocator.DestroyAll();
137   XCOFFAllocator.DestroyAll();
138   MCInstAllocator.DestroyAll();
139 
140   MCSubtargetAllocator.DestroyAll();
141   InlineAsmUsedLabelNames.clear();
142   UsedNames.clear();
143   Symbols.clear();
144   Allocator.Reset();
145   Instances.clear();
146   CompilationDir.clear();
147   MainFileName.clear();
148   MCDwarfLineTablesCUMap.clear();
149   SectionsForRanges.clear();
150   MCGenDwarfLabelEntries.clear();
151   DwarfDebugFlags = StringRef();
152   DwarfCompileUnitID = 0;
153   CurrentDwarfLoc = MCDwarfLoc(0, 0, 0, DWARF2_FLAG_IS_STMT, 0, 0);
154 
155   CVContext.reset();
156 
157   MachOUniquingMap.clear();
158   ELFUniquingMap.clear();
159   COFFUniquingMap.clear();
160   WasmUniquingMap.clear();
161   XCOFFUniquingMap.clear();
162 
163   ELFEntrySizeMap.clear();
164   ELFSeenGenericMergeableSections.clear();
165 
166   NextID.clear();
167   AllowTemporaryLabels = true;
168   DwarfLocSeen = false;
169   GenDwarfForAssembly = false;
170   GenDwarfFileNumber = 0;
171 
172   HadError = false;
173 }
174 
175 //===----------------------------------------------------------------------===//
176 // MCInst Management
177 //===----------------------------------------------------------------------===//
178 
createMCInst()179 MCInst *MCContext::createMCInst() {
180   return new (MCInstAllocator.Allocate()) MCInst;
181 }
182 
183 //===----------------------------------------------------------------------===//
184 // Symbol Manipulation
185 //===----------------------------------------------------------------------===//
186 
getOrCreateSymbol(const Twine & Name)187 MCSymbol *MCContext::getOrCreateSymbol(const Twine &Name) {
188   SmallString<128> NameSV;
189   StringRef NameRef = Name.toStringRef(NameSV);
190 
191   assert(!NameRef.empty() && "Normal symbols cannot be unnamed!");
192 
193   MCSymbol *&Sym = Symbols[NameRef];
194   if (!Sym)
195     Sym = createSymbol(NameRef, false, false);
196 
197   return Sym;
198 }
199 
getOrCreateFrameAllocSymbol(StringRef FuncName,unsigned Idx)200 MCSymbol *MCContext::getOrCreateFrameAllocSymbol(StringRef FuncName,
201                                                  unsigned Idx) {
202   return getOrCreateSymbol(Twine(MAI->getPrivateGlobalPrefix()) + FuncName +
203                            "$frame_escape_" + Twine(Idx));
204 }
205 
getOrCreateParentFrameOffsetSymbol(StringRef FuncName)206 MCSymbol *MCContext::getOrCreateParentFrameOffsetSymbol(StringRef FuncName) {
207   return getOrCreateSymbol(Twine(MAI->getPrivateGlobalPrefix()) + FuncName +
208                            "$parent_frame_offset");
209 }
210 
getOrCreateLSDASymbol(StringRef FuncName)211 MCSymbol *MCContext::getOrCreateLSDASymbol(StringRef FuncName) {
212   return getOrCreateSymbol(Twine(MAI->getPrivateGlobalPrefix()) + "__ehtable$" +
213                            FuncName);
214 }
215 
createSymbolImpl(const StringMapEntry<bool> * Name,bool IsTemporary)216 MCSymbol *MCContext::createSymbolImpl(const StringMapEntry<bool> *Name,
217                                       bool IsTemporary) {
218   static_assert(std::is_trivially_destructible<MCSymbolCOFF>(),
219                 "MCSymbol classes must be trivially destructible");
220   static_assert(std::is_trivially_destructible<MCSymbolELF>(),
221                 "MCSymbol classes must be trivially destructible");
222   static_assert(std::is_trivially_destructible<MCSymbolMachO>(),
223                 "MCSymbol classes must be trivially destructible");
224   static_assert(std::is_trivially_destructible<MCSymbolWasm>(),
225                 "MCSymbol classes must be trivially destructible");
226   static_assert(std::is_trivially_destructible<MCSymbolXCOFF>(),
227                 "MCSymbol classes must be trivially destructible");
228 
229   switch (getObjectFileType()) {
230   case MCContext::IsCOFF:
231     return new (Name, *this) MCSymbolCOFF(Name, IsTemporary);
232   case MCContext::IsELF:
233     return new (Name, *this) MCSymbolELF(Name, IsTemporary);
234   case MCContext::IsMachO:
235     return new (Name, *this) MCSymbolMachO(Name, IsTemporary);
236   case MCContext::IsWasm:
237     return new (Name, *this) MCSymbolWasm(Name, IsTemporary);
238   case MCContext::IsXCOFF:
239     return createXCOFFSymbolImpl(Name, IsTemporary);
240   }
241   return new (Name, *this) MCSymbol(MCSymbol::SymbolKindUnset, Name,
242                                     IsTemporary);
243 }
244 
createSymbol(StringRef Name,bool AlwaysAddSuffix,bool CanBeUnnamed)245 MCSymbol *MCContext::createSymbol(StringRef Name, bool AlwaysAddSuffix,
246                                   bool CanBeUnnamed) {
247   if (CanBeUnnamed && !UseNamesOnTempLabels)
248     return createSymbolImpl(nullptr, true);
249 
250   // Determine whether this is a user written assembler temporary or normal
251   // label, if used.
252   bool IsTemporary = CanBeUnnamed;
253   if (AllowTemporaryLabels && !IsTemporary)
254     IsTemporary = Name.startswith(MAI->getPrivateGlobalPrefix());
255 
256   SmallString<128> NewName = Name;
257   bool AddSuffix = AlwaysAddSuffix;
258   unsigned &NextUniqueID = NextID[Name];
259   while (true) {
260     if (AddSuffix) {
261       NewName.resize(Name.size());
262       raw_svector_ostream(NewName) << NextUniqueID++;
263     }
264     auto NameEntry = UsedNames.insert(std::make_pair(NewName, true));
265     if (NameEntry.second || !NameEntry.first->second) {
266       // Ok, we found a name.
267       // Mark it as used for a non-section symbol.
268       NameEntry.first->second = true;
269       // Have the MCSymbol object itself refer to the copy of the string that is
270       // embedded in the UsedNames entry.
271       return createSymbolImpl(&*NameEntry.first, IsTemporary);
272     }
273     assert(IsTemporary && "Cannot rename non-temporary symbols");
274     AddSuffix = true;
275   }
276   llvm_unreachable("Infinite loop");
277 }
278 
createTempSymbol(const Twine & Name,bool AlwaysAddSuffix)279 MCSymbol *MCContext::createTempSymbol(const Twine &Name, bool AlwaysAddSuffix) {
280   SmallString<128> NameSV;
281   raw_svector_ostream(NameSV) << MAI->getPrivateGlobalPrefix() << Name;
282   return createSymbol(NameSV, AlwaysAddSuffix, true);
283 }
284 
createNamedTempSymbol(const Twine & Name)285 MCSymbol *MCContext::createNamedTempSymbol(const Twine &Name) {
286   SmallString<128> NameSV;
287   raw_svector_ostream(NameSV) << MAI->getPrivateGlobalPrefix() << Name;
288   return createSymbol(NameSV, true, false);
289 }
290 
createLinkerPrivateTempSymbol()291 MCSymbol *MCContext::createLinkerPrivateTempSymbol() {
292   SmallString<128> NameSV;
293   raw_svector_ostream(NameSV) << MAI->getLinkerPrivateGlobalPrefix() << "tmp";
294   return createSymbol(NameSV, true, false);
295 }
296 
createTempSymbol()297 MCSymbol *MCContext::createTempSymbol() { return createTempSymbol("tmp"); }
298 
createNamedTempSymbol()299 MCSymbol *MCContext::createNamedTempSymbol() {
300   return createNamedTempSymbol("tmp");
301 }
302 
NextInstance(unsigned LocalLabelVal)303 unsigned MCContext::NextInstance(unsigned LocalLabelVal) {
304   MCLabel *&Label = Instances[LocalLabelVal];
305   if (!Label)
306     Label = new (*this) MCLabel(0);
307   return Label->incInstance();
308 }
309 
GetInstance(unsigned LocalLabelVal)310 unsigned MCContext::GetInstance(unsigned LocalLabelVal) {
311   MCLabel *&Label = Instances[LocalLabelVal];
312   if (!Label)
313     Label = new (*this) MCLabel(0);
314   return Label->getInstance();
315 }
316 
getOrCreateDirectionalLocalSymbol(unsigned LocalLabelVal,unsigned Instance)317 MCSymbol *MCContext::getOrCreateDirectionalLocalSymbol(unsigned LocalLabelVal,
318                                                        unsigned Instance) {
319   MCSymbol *&Sym = LocalSymbols[std::make_pair(LocalLabelVal, Instance)];
320   if (!Sym)
321     Sym = createNamedTempSymbol();
322   return Sym;
323 }
324 
createDirectionalLocalSymbol(unsigned LocalLabelVal)325 MCSymbol *MCContext::createDirectionalLocalSymbol(unsigned LocalLabelVal) {
326   unsigned Instance = NextInstance(LocalLabelVal);
327   return getOrCreateDirectionalLocalSymbol(LocalLabelVal, Instance);
328 }
329 
getDirectionalLocalSymbol(unsigned LocalLabelVal,bool Before)330 MCSymbol *MCContext::getDirectionalLocalSymbol(unsigned LocalLabelVal,
331                                                bool Before) {
332   unsigned Instance = GetInstance(LocalLabelVal);
333   if (!Before)
334     ++Instance;
335   return getOrCreateDirectionalLocalSymbol(LocalLabelVal, Instance);
336 }
337 
lookupSymbol(const Twine & Name) const338 MCSymbol *MCContext::lookupSymbol(const Twine &Name) const {
339   SmallString<128> NameSV;
340   StringRef NameRef = Name.toStringRef(NameSV);
341   return Symbols.lookup(NameRef);
342 }
343 
setSymbolValue(MCStreamer & Streamer,StringRef Sym,uint64_t Val)344 void MCContext::setSymbolValue(MCStreamer &Streamer,
345                               StringRef Sym,
346                               uint64_t Val) {
347   auto Symbol = getOrCreateSymbol(Sym);
348   Streamer.emitAssignment(Symbol, MCConstantExpr::create(Val, *this));
349 }
350 
registerInlineAsmLabel(MCSymbol * Sym)351 void MCContext::registerInlineAsmLabel(MCSymbol *Sym) {
352   InlineAsmUsedLabelNames[Sym->getName()] = Sym;
353 }
354 
355 MCSymbolXCOFF *
createXCOFFSymbolImpl(const StringMapEntry<bool> * Name,bool IsTemporary)356 MCContext::createXCOFFSymbolImpl(const StringMapEntry<bool> *Name,
357                                  bool IsTemporary) {
358   if (!Name)
359     return new (nullptr, *this) MCSymbolXCOFF(nullptr, IsTemporary);
360 
361   StringRef OriginalName = Name->first();
362   if (OriginalName.startswith("._Renamed..") ||
363       OriginalName.startswith("_Renamed.."))
364     reportError(SMLoc(), "invalid symbol name from source");
365 
366   if (MAI->isValidUnquotedName(OriginalName))
367     return new (Name, *this) MCSymbolXCOFF(Name, IsTemporary);
368 
369   // Now we have a name that contains invalid character(s) for XCOFF symbol.
370   // Let's replace with something valid, but save the original name so that
371   // we could still use the original name in the symbol table.
372   SmallString<128> InvalidName(OriginalName);
373 
374   // If it's an entry point symbol, we will keep the '.'
375   // in front for the convention purpose. Otherwise, add "_Renamed.."
376   // as prefix to signal this is an renamed symbol.
377   const bool IsEntryPoint = !InvalidName.empty() && InvalidName[0] == '.';
378   SmallString<128> ValidName =
379       StringRef(IsEntryPoint ? "._Renamed.." : "_Renamed..");
380 
381   // Append the hex values of '_' and invalid characters with "_Renamed..";
382   // at the same time replace invalid characters with '_'.
383   for (size_t I = 0; I < InvalidName.size(); ++I) {
384     if (!MAI->isAcceptableChar(InvalidName[I]) || InvalidName[I] == '_') {
385       raw_svector_ostream(ValidName).write_hex(InvalidName[I]);
386       InvalidName[I] = '_';
387     }
388   }
389 
390   // Skip entry point symbol's '.' as we already have a '.' in front of
391   // "_Renamed".
392   if (IsEntryPoint)
393     ValidName.append(InvalidName.substr(1, InvalidName.size() - 1));
394   else
395     ValidName.append(InvalidName);
396 
397   auto NameEntry = UsedNames.insert(std::make_pair(ValidName, true));
398   assert((NameEntry.second || !NameEntry.first->second) &&
399          "This name is used somewhere else.");
400   // Mark the name as used for a non-section symbol.
401   NameEntry.first->second = true;
402   // Have the MCSymbol object itself refer to the copy of the string
403   // that is embedded in the UsedNames entry.
404   MCSymbolXCOFF *XSym = new (&*NameEntry.first, *this)
405       MCSymbolXCOFF(&*NameEntry.first, IsTemporary);
406   XSym->setSymbolTableName(MCSymbolXCOFF::getUnqualifiedName(OriginalName));
407   return XSym;
408 }
409 
410 //===----------------------------------------------------------------------===//
411 // Section Management
412 //===----------------------------------------------------------------------===//
413 
getMachOSection(StringRef Segment,StringRef Section,unsigned TypeAndAttributes,unsigned Reserved2,SectionKind Kind,const char * BeginSymName)414 MCSectionMachO *MCContext::getMachOSection(StringRef Segment, StringRef Section,
415                                            unsigned TypeAndAttributes,
416                                            unsigned Reserved2, SectionKind Kind,
417                                            const char *BeginSymName) {
418   // We unique sections by their segment/section pair.  The returned section
419   // may not have the same flags as the requested section, if so this should be
420   // diagnosed by the client as an error.
421 
422   // Form the name to look up.
423   assert(Section.size() <= 16 && "section name is too long");
424   assert(!memchr(Section.data(), '\0', Section.size()) &&
425          "section name cannot contain NUL");
426 
427   // Do the lookup, if we have a hit, return it.
428   auto R = MachOUniquingMap.try_emplace((Segment + Twine(',') + Section).str());
429   if (!R.second)
430     return R.first->second;
431 
432   MCSymbol *Begin = nullptr;
433   if (BeginSymName)
434     Begin = createTempSymbol(BeginSymName, false);
435 
436   // Otherwise, return a new section.
437   StringRef Name = R.first->first();
438   R.first->second = new (MachOAllocator.Allocate())
439       MCSectionMachO(Segment, Name.substr(Name.size() - Section.size()),
440                      TypeAndAttributes, Reserved2, Kind, Begin);
441   return R.first->second;
442 }
443 
renameELFSection(MCSectionELF * Section,StringRef Name)444 void MCContext::renameELFSection(MCSectionELF *Section, StringRef Name) {
445   StringRef GroupName;
446   if (const MCSymbol *Group = Section->getGroup())
447     GroupName = Group->getName();
448 
449   // This function is only used by .debug*, which should not have the
450   // SHF_LINK_ORDER flag.
451   unsigned UniqueID = Section->getUniqueID();
452   ELFUniquingMap.erase(
453       ELFSectionKey{Section->getName(), GroupName, "", UniqueID});
454   auto I = ELFUniquingMap
455                .insert(std::make_pair(
456                    ELFSectionKey{Name, GroupName, "", UniqueID}, Section))
457                .first;
458   StringRef CachedName = I->first.SectionName;
459   const_cast<MCSectionELF *>(Section)->setSectionName(CachedName);
460 }
461 
createELFSectionImpl(StringRef Section,unsigned Type,unsigned Flags,SectionKind K,unsigned EntrySize,const MCSymbolELF * Group,bool Comdat,unsigned UniqueID,const MCSymbolELF * LinkedToSym)462 MCSectionELF *MCContext::createELFSectionImpl(StringRef Section, unsigned Type,
463                                               unsigned Flags, SectionKind K,
464                                               unsigned EntrySize,
465                                               const MCSymbolELF *Group,
466                                               bool Comdat, unsigned UniqueID,
467                                               const MCSymbolELF *LinkedToSym) {
468   MCSymbolELF *R;
469   MCSymbol *&Sym = Symbols[Section];
470   // A section symbol can not redefine regular symbols. There may be multiple
471   // sections with the same name, in which case the first such section wins.
472   if (Sym && Sym->isDefined() &&
473       (!Sym->isInSection() || Sym->getSection().getBeginSymbol() != Sym))
474     reportError(SMLoc(), "invalid symbol redefinition");
475   if (Sym && Sym->isUndefined()) {
476     R = cast<MCSymbolELF>(Sym);
477   } else {
478     auto NameIter = UsedNames.insert(std::make_pair(Section, false)).first;
479     R = new (&*NameIter, *this) MCSymbolELF(&*NameIter, /*isTemporary*/ false);
480     if (!Sym)
481       Sym = R;
482   }
483   R->setBinding(ELF::STB_LOCAL);
484   R->setType(ELF::STT_SECTION);
485 
486   auto *Ret = new (ELFAllocator.Allocate())
487       MCSectionELF(Section, Type, Flags, K, EntrySize, Group, Comdat, UniqueID,
488                    R, LinkedToSym);
489 
490   auto *F = new MCDataFragment();
491   Ret->getFragmentList().insert(Ret->begin(), F);
492   F->setParent(Ret);
493   R->setFragment(F);
494 
495   return Ret;
496 }
497 
createELFRelSection(const Twine & Name,unsigned Type,unsigned Flags,unsigned EntrySize,const MCSymbolELF * Group,const MCSectionELF * RelInfoSection)498 MCSectionELF *MCContext::createELFRelSection(const Twine &Name, unsigned Type,
499                                              unsigned Flags, unsigned EntrySize,
500                                              const MCSymbolELF *Group,
501                                              const MCSectionELF *RelInfoSection) {
502   StringMap<bool>::iterator I;
503   bool Inserted;
504   std::tie(I, Inserted) =
505       RelSecNames.insert(std::make_pair(Name.str(), true));
506 
507   return createELFSectionImpl(
508       I->getKey(), Type, Flags, SectionKind::getReadOnly(), EntrySize, Group,
509       true, true, cast<MCSymbolELF>(RelInfoSection->getBeginSymbol()));
510 }
511 
getELFNamedSection(const Twine & Prefix,const Twine & Suffix,unsigned Type,unsigned Flags,unsigned EntrySize)512 MCSectionELF *MCContext::getELFNamedSection(const Twine &Prefix,
513                                             const Twine &Suffix, unsigned Type,
514                                             unsigned Flags,
515                                             unsigned EntrySize) {
516   return getELFSection(Prefix + "." + Suffix, Type, Flags, EntrySize, Suffix,
517                        /*IsComdat=*/true);
518 }
519 
getELFSection(const Twine & Section,unsigned Type,unsigned Flags,unsigned EntrySize,const Twine & Group,bool IsComdat,unsigned UniqueID,const MCSymbolELF * LinkedToSym)520 MCSectionELF *MCContext::getELFSection(const Twine &Section, unsigned Type,
521                                        unsigned Flags, unsigned EntrySize,
522                                        const Twine &Group, bool IsComdat,
523                                        unsigned UniqueID,
524                                        const MCSymbolELF *LinkedToSym) {
525   MCSymbolELF *GroupSym = nullptr;
526   if (!Group.isTriviallyEmpty() && !Group.str().empty())
527     GroupSym = cast<MCSymbolELF>(getOrCreateSymbol(Group));
528 
529   return getELFSection(Section, Type, Flags, EntrySize, GroupSym, IsComdat,
530                        UniqueID, LinkedToSym);
531 }
532 
getELFSection(const Twine & Section,unsigned Type,unsigned Flags,unsigned EntrySize,const MCSymbolELF * GroupSym,bool IsComdat,unsigned UniqueID,const MCSymbolELF * LinkedToSym)533 MCSectionELF *MCContext::getELFSection(const Twine &Section, unsigned Type,
534                                        unsigned Flags, unsigned EntrySize,
535                                        const MCSymbolELF *GroupSym,
536                                        bool IsComdat, unsigned UniqueID,
537                                        const MCSymbolELF *LinkedToSym) {
538   StringRef Group = "";
539   if (GroupSym)
540     Group = GroupSym->getName();
541   assert(!(LinkedToSym && LinkedToSym->getName().empty()));
542   // Do the lookup, if we have a hit, return it.
543   auto IterBool = ELFUniquingMap.insert(std::make_pair(
544       ELFSectionKey{Section.str(), Group,
545                     LinkedToSym ? LinkedToSym->getName() : "", UniqueID},
546       nullptr));
547   auto &Entry = *IterBool.first;
548   if (!IterBool.second)
549     return Entry.second;
550 
551   StringRef CachedName = Entry.first.SectionName;
552 
553   SectionKind Kind;
554   if (Flags & ELF::SHF_ARM_PURECODE)
555     Kind = SectionKind::getExecuteOnly();
556   else if (Flags & ELF::SHF_EXECINSTR)
557     Kind = SectionKind::getText();
558   else
559     Kind = SectionKind::getReadOnly();
560 
561   MCSectionELF *Result =
562       createELFSectionImpl(CachedName, Type, Flags, Kind, EntrySize, GroupSym,
563                            IsComdat, UniqueID, LinkedToSym);
564   Entry.second = Result;
565 
566   recordELFMergeableSectionInfo(Result->getName(), Result->getFlags(),
567                                 Result->getUniqueID(), Result->getEntrySize());
568 
569   return Result;
570 }
571 
createELFGroupSection(const MCSymbolELF * Group,bool IsComdat)572 MCSectionELF *MCContext::createELFGroupSection(const MCSymbolELF *Group,
573                                                bool IsComdat) {
574   return createELFSectionImpl(".group", ELF::SHT_GROUP, 0,
575                               SectionKind::getReadOnly(), 4, Group, IsComdat,
576                               MCSection::NonUniqueID, nullptr);
577 }
578 
recordELFMergeableSectionInfo(StringRef SectionName,unsigned Flags,unsigned UniqueID,unsigned EntrySize)579 void MCContext::recordELFMergeableSectionInfo(StringRef SectionName,
580                                               unsigned Flags, unsigned UniqueID,
581                                               unsigned EntrySize) {
582   bool IsMergeable = Flags & ELF::SHF_MERGE;
583   if (IsMergeable && (UniqueID == GenericSectionID))
584     ELFSeenGenericMergeableSections.insert(SectionName);
585 
586   // For mergeable sections or non-mergeable sections with a generic mergeable
587   // section name we enter their Unique ID into the ELFEntrySizeMap so that
588   // compatible globals can be assigned to the same section.
589   if (IsMergeable || isELFGenericMergeableSection(SectionName)) {
590     ELFEntrySizeMap.insert(std::make_pair(
591         ELFEntrySizeKey{SectionName, Flags, EntrySize}, UniqueID));
592   }
593 }
594 
isELFImplicitMergeableSectionNamePrefix(StringRef SectionName)595 bool MCContext::isELFImplicitMergeableSectionNamePrefix(StringRef SectionName) {
596   return SectionName.startswith(".rodata.str") ||
597          SectionName.startswith(".rodata.cst");
598 }
599 
isELFGenericMergeableSection(StringRef SectionName)600 bool MCContext::isELFGenericMergeableSection(StringRef SectionName) {
601   return isELFImplicitMergeableSectionNamePrefix(SectionName) ||
602          ELFSeenGenericMergeableSections.count(SectionName);
603 }
604 
getELFUniqueIDForEntsize(StringRef SectionName,unsigned Flags,unsigned EntrySize)605 Optional<unsigned> MCContext::getELFUniqueIDForEntsize(StringRef SectionName,
606                                                        unsigned Flags,
607                                                        unsigned EntrySize) {
608   auto I = ELFEntrySizeMap.find(
609       MCContext::ELFEntrySizeKey{SectionName, Flags, EntrySize});
610   return (I != ELFEntrySizeMap.end()) ? Optional<unsigned>(I->second) : None;
611 }
612 
getCOFFSection(StringRef Section,unsigned Characteristics,SectionKind Kind,StringRef COMDATSymName,int Selection,unsigned UniqueID,const char * BeginSymName)613 MCSectionCOFF *MCContext::getCOFFSection(StringRef Section,
614                                          unsigned Characteristics,
615                                          SectionKind Kind,
616                                          StringRef COMDATSymName, int Selection,
617                                          unsigned UniqueID,
618                                          const char *BeginSymName) {
619   MCSymbol *COMDATSymbol = nullptr;
620   if (!COMDATSymName.empty()) {
621     COMDATSymbol = getOrCreateSymbol(COMDATSymName);
622     COMDATSymName = COMDATSymbol->getName();
623   }
624 
625 
626   // Do the lookup, if we have a hit, return it.
627   COFFSectionKey T{Section, COMDATSymName, Selection, UniqueID};
628   auto IterBool = COFFUniquingMap.insert(std::make_pair(T, nullptr));
629   auto Iter = IterBool.first;
630   if (!IterBool.second)
631     return Iter->second;
632 
633   MCSymbol *Begin = nullptr;
634   if (BeginSymName)
635     Begin = createTempSymbol(BeginSymName, false);
636 
637   StringRef CachedName = Iter->first.SectionName;
638   MCSectionCOFF *Result = new (COFFAllocator.Allocate()) MCSectionCOFF(
639       CachedName, Characteristics, COMDATSymbol, Selection, Kind, Begin);
640 
641   Iter->second = Result;
642   return Result;
643 }
644 
getCOFFSection(StringRef Section,unsigned Characteristics,SectionKind Kind,const char * BeginSymName)645 MCSectionCOFF *MCContext::getCOFFSection(StringRef Section,
646                                          unsigned Characteristics,
647                                          SectionKind Kind,
648                                          const char *BeginSymName) {
649   return getCOFFSection(Section, Characteristics, Kind, "", 0, GenericSectionID,
650                         BeginSymName);
651 }
652 
getAssociativeCOFFSection(MCSectionCOFF * Sec,const MCSymbol * KeySym,unsigned UniqueID)653 MCSectionCOFF *MCContext::getAssociativeCOFFSection(MCSectionCOFF *Sec,
654                                                     const MCSymbol *KeySym,
655                                                     unsigned UniqueID) {
656   // Return the normal section if we don't have to be associative or unique.
657   if (!KeySym && UniqueID == GenericSectionID)
658     return Sec;
659 
660   // If we have a key symbol, make an associative section with the same name and
661   // kind as the normal section.
662   unsigned Characteristics = Sec->getCharacteristics();
663   if (KeySym) {
664     Characteristics |= COFF::IMAGE_SCN_LNK_COMDAT;
665     return getCOFFSection(Sec->getName(), Characteristics, Sec->getKind(),
666                           KeySym->getName(),
667                           COFF::IMAGE_COMDAT_SELECT_ASSOCIATIVE, UniqueID);
668   }
669 
670   return getCOFFSection(Sec->getName(), Characteristics, Sec->getKind(), "", 0,
671                         UniqueID);
672 }
673 
getWasmSection(const Twine & Section,SectionKind K,unsigned Flags,const Twine & Group,unsigned UniqueID,const char * BeginSymName)674 MCSectionWasm *MCContext::getWasmSection(const Twine &Section, SectionKind K,
675                                          unsigned Flags, const Twine &Group,
676                                          unsigned UniqueID,
677                                          const char *BeginSymName) {
678   MCSymbolWasm *GroupSym = nullptr;
679   if (!Group.isTriviallyEmpty() && !Group.str().empty()) {
680     GroupSym = cast<MCSymbolWasm>(getOrCreateSymbol(Group));
681     GroupSym->setComdat(true);
682   }
683 
684   return getWasmSection(Section, K, Flags, GroupSym, UniqueID, BeginSymName);
685 }
686 
getWasmSection(const Twine & Section,SectionKind Kind,unsigned Flags,const MCSymbolWasm * GroupSym,unsigned UniqueID,const char * BeginSymName)687 MCSectionWasm *MCContext::getWasmSection(const Twine &Section, SectionKind Kind,
688                                          unsigned Flags,
689                                          const MCSymbolWasm *GroupSym,
690                                          unsigned UniqueID,
691                                          const char *BeginSymName) {
692   StringRef Group = "";
693   if (GroupSym)
694     Group = GroupSym->getName();
695   // Do the lookup, if we have a hit, return it.
696   auto IterBool = WasmUniquingMap.insert(
697       std::make_pair(WasmSectionKey{Section.str(), Group, UniqueID}, nullptr));
698   auto &Entry = *IterBool.first;
699   if (!IterBool.second)
700     return Entry.second;
701 
702   StringRef CachedName = Entry.first.SectionName;
703 
704   MCSymbol *Begin = createSymbol(CachedName, true, false);
705   Symbols[Begin->getName()] = Begin;
706   cast<MCSymbolWasm>(Begin)->setType(wasm::WASM_SYMBOL_TYPE_SECTION);
707 
708   MCSectionWasm *Result = new (WasmAllocator.Allocate())
709       MCSectionWasm(CachedName, Kind, Flags, GroupSym, UniqueID, Begin);
710   Entry.second = Result;
711 
712   auto *F = new MCDataFragment();
713   Result->getFragmentList().insert(Result->begin(), F);
714   F->setParent(Result);
715   Begin->setFragment(F);
716 
717   return Result;
718 }
719 
getXCOFFSection(StringRef Section,SectionKind Kind,Optional<XCOFF::CsectProperties> CsectProp,bool MultiSymbolsAllowed,const char * BeginSymName,Optional<XCOFF::DwarfSectionSubtypeFlags> DwarfSectionSubtypeFlags)720 MCSectionXCOFF *MCContext::getXCOFFSection(
721     StringRef Section, SectionKind Kind,
722     Optional<XCOFF::CsectProperties> CsectProp, bool MultiSymbolsAllowed,
723     const char *BeginSymName,
724     Optional<XCOFF::DwarfSectionSubtypeFlags> DwarfSectionSubtypeFlags) {
725   bool IsDwarfSec = DwarfSectionSubtypeFlags.hasValue();
726   assert((IsDwarfSec != CsectProp.hasValue()) && "Invalid XCOFF section!");
727 
728   // Do the lookup. If we have a hit, return it.
729   auto IterBool = XCOFFUniquingMap.insert(std::make_pair(
730       IsDwarfSec
731           ? XCOFFSectionKey(Section.str(), DwarfSectionSubtypeFlags.getValue())
732           : XCOFFSectionKey(Section.str(), CsectProp->MappingClass),
733       nullptr));
734   auto &Entry = *IterBool.first;
735   if (!IterBool.second) {
736     MCSectionXCOFF *ExistedEntry = Entry.second;
737     if (ExistedEntry->isMultiSymbolsAllowed() != MultiSymbolsAllowed)
738       report_fatal_error("section's multiply symbols policy does not match");
739 
740     return ExistedEntry;
741   }
742 
743   // Otherwise, return a new section.
744   StringRef CachedName = Entry.first.SectionName;
745   MCSymbolXCOFF *QualName = nullptr;
746   // Debug section don't have storage class attribute.
747   if (IsDwarfSec)
748     QualName = cast<MCSymbolXCOFF>(getOrCreateSymbol(CachedName));
749   else
750     QualName = cast<MCSymbolXCOFF>(getOrCreateSymbol(
751         CachedName + "[" +
752         XCOFF::getMappingClassString(CsectProp->MappingClass) + "]"));
753 
754   MCSymbol *Begin = nullptr;
755   if (BeginSymName)
756     Begin = createTempSymbol(BeginSymName, false);
757 
758   // QualName->getUnqualifiedName() and CachedName are the same except when
759   // CachedName contains invalid character(s) such as '$' for an XCOFF symbol.
760   MCSectionXCOFF *Result = nullptr;
761   if (IsDwarfSec)
762     Result = new (XCOFFAllocator.Allocate())
763         MCSectionXCOFF(QualName->getUnqualifiedName(), Kind, QualName,
764                        DwarfSectionSubtypeFlags.getValue(), Begin, CachedName,
765                        MultiSymbolsAllowed);
766   else
767     Result = new (XCOFFAllocator.Allocate())
768         MCSectionXCOFF(QualName->getUnqualifiedName(), CsectProp->MappingClass,
769                        CsectProp->Type, Kind, QualName, Begin, CachedName,
770                        MultiSymbolsAllowed);
771 
772   Entry.second = Result;
773 
774   auto *F = new MCDataFragment();
775   Result->getFragmentList().insert(Result->begin(), F);
776   F->setParent(Result);
777 
778   if (Begin)
779     Begin->setFragment(F);
780 
781   return Result;
782 }
783 
getSubtargetCopy(const MCSubtargetInfo & STI)784 MCSubtargetInfo &MCContext::getSubtargetCopy(const MCSubtargetInfo &STI) {
785   return *new (MCSubtargetAllocator.Allocate()) MCSubtargetInfo(STI);
786 }
787 
addDebugPrefixMapEntry(const std::string & From,const std::string & To)788 void MCContext::addDebugPrefixMapEntry(const std::string &From,
789                                        const std::string &To) {
790   DebugPrefixMap.insert(std::make_pair(From, To));
791 }
792 
RemapDebugPaths()793 void MCContext::RemapDebugPaths() {
794   const auto &DebugPrefixMap = this->DebugPrefixMap;
795   if (DebugPrefixMap.empty())
796     return;
797 
798   const auto RemapDebugPath = [&DebugPrefixMap](std::string &Path) {
799     SmallString<256> P(Path);
800     for (const auto &Entry : DebugPrefixMap) {
801       if (llvm::sys::path::replace_path_prefix(P, Entry.first, Entry.second)) {
802         Path = P.str().str();
803         break;
804       }
805     }
806   };
807 
808   // Remap compilation directory.
809   std::string CompDir = std::string(CompilationDir.str());
810   RemapDebugPath(CompDir);
811   CompilationDir = CompDir;
812 
813   // Remap MCDwarfDirs in all compilation units.
814   for (auto &CUIDTablePair : MCDwarfLineTablesCUMap)
815     for (auto &Dir : CUIDTablePair.second.getMCDwarfDirs())
816       RemapDebugPath(Dir);
817 }
818 
819 //===----------------------------------------------------------------------===//
820 // Dwarf Management
821 //===----------------------------------------------------------------------===//
822 
setGenDwarfRootFile(StringRef InputFileName,StringRef Buffer)823 void MCContext::setGenDwarfRootFile(StringRef InputFileName, StringRef Buffer) {
824   // MCDwarf needs the root file as well as the compilation directory.
825   // If we find a '.file 0' directive that will supersede these values.
826   Optional<MD5::MD5Result> Cksum;
827   if (getDwarfVersion() >= 5) {
828     MD5 Hash;
829     MD5::MD5Result Sum;
830     Hash.update(Buffer);
831     Hash.final(Sum);
832     Cksum = Sum;
833   }
834   // Canonicalize the root filename. It cannot be empty, and should not
835   // repeat the compilation dir.
836   // The MCContext ctor initializes MainFileName to the name associated with
837   // the SrcMgr's main file ID, which might be the same as InputFileName (and
838   // possibly include directory components).
839   // Or, MainFileName might have been overridden by a -main-file-name option,
840   // which is supposed to be just a base filename with no directory component.
841   // So, if the InputFileName and MainFileName are not equal, assume
842   // MainFileName is a substitute basename and replace the last component.
843   SmallString<1024> FileNameBuf = InputFileName;
844   if (FileNameBuf.empty() || FileNameBuf == "-")
845     FileNameBuf = "<stdin>";
846   if (!getMainFileName().empty() && FileNameBuf != getMainFileName()) {
847     llvm::sys::path::remove_filename(FileNameBuf);
848     llvm::sys::path::append(FileNameBuf, getMainFileName());
849   }
850   StringRef FileName = FileNameBuf;
851   if (FileName.consume_front(getCompilationDir()))
852     if (llvm::sys::path::is_separator(FileName.front()))
853       FileName = FileName.drop_front();
854   assert(!FileName.empty());
855   setMCLineTableRootFile(
856       /*CUID=*/0, getCompilationDir(), FileName, Cksum, None);
857 }
858 
859 /// getDwarfFile - takes a file name and number to place in the dwarf file and
860 /// directory tables.  If the file number has already been allocated it is an
861 /// error and zero is returned and the client reports the error, else the
862 /// allocated file number is returned.  The file numbers may be in any order.
getDwarfFile(StringRef Directory,StringRef FileName,unsigned FileNumber,Optional<MD5::MD5Result> Checksum,Optional<StringRef> Source,unsigned CUID)863 Expected<unsigned> MCContext::getDwarfFile(StringRef Directory,
864                                            StringRef FileName,
865                                            unsigned FileNumber,
866                                            Optional<MD5::MD5Result> Checksum,
867                                            Optional<StringRef> Source,
868                                            unsigned CUID) {
869   MCDwarfLineTable &Table = MCDwarfLineTablesCUMap[CUID];
870   return Table.tryGetFile(Directory, FileName, Checksum, Source, DwarfVersion,
871                           FileNumber);
872 }
873 
874 /// isValidDwarfFileNumber - takes a dwarf file number and returns true if it
875 /// currently is assigned and false otherwise.
isValidDwarfFileNumber(unsigned FileNumber,unsigned CUID)876 bool MCContext::isValidDwarfFileNumber(unsigned FileNumber, unsigned CUID) {
877   const MCDwarfLineTable &LineTable = getMCDwarfLineTable(CUID);
878   if (FileNumber == 0)
879     return getDwarfVersion() >= 5;
880   if (FileNumber >= LineTable.getMCDwarfFiles().size())
881     return false;
882 
883   return !LineTable.getMCDwarfFiles()[FileNumber].Name.empty();
884 }
885 
886 /// Remove empty sections from SectionsForRanges, to avoid generating
887 /// useless debug info for them.
finalizeDwarfSections(MCStreamer & MCOS)888 void MCContext::finalizeDwarfSections(MCStreamer &MCOS) {
889   SectionsForRanges.remove_if(
890       [&](MCSection *Sec) { return !MCOS.mayHaveInstructions(*Sec); });
891 }
892 
getCVContext()893 CodeViewContext &MCContext::getCVContext() {
894   if (!CVContext.get())
895     CVContext.reset(new CodeViewContext);
896   return *CVContext.get();
897 }
898 
899 //===----------------------------------------------------------------------===//
900 // Error Reporting
901 //===----------------------------------------------------------------------===//
902 
diagnose(const SMDiagnostic & SMD)903 void MCContext::diagnose(const SMDiagnostic &SMD) {
904   assert(DiagHandler && "MCContext::DiagHandler is not set");
905   bool UseInlineSrcMgr = false;
906   const SourceMgr *SMP = nullptr;
907   if (SrcMgr) {
908     SMP = SrcMgr;
909   } else if (InlineSrcMgr) {
910     SMP = InlineSrcMgr.get();
911     UseInlineSrcMgr = true;
912   } else
913     llvm_unreachable("Either SourceMgr should be available");
914   DiagHandler(SMD, UseInlineSrcMgr, *SMP, LocInfos);
915 }
916 
reportCommon(SMLoc Loc,std::function<void (SMDiagnostic &,const SourceMgr *)> GetMessage)917 void MCContext::reportCommon(
918     SMLoc Loc,
919     std::function<void(SMDiagnostic &, const SourceMgr *)> GetMessage) {
920   // * MCContext::SrcMgr is null when the MC layer emits machine code for input
921   //   other than assembly file, say, for .c/.cpp/.ll/.bc.
922   // * MCContext::InlineSrcMgr is null when the inline asm is not used.
923   // * A default SourceMgr is needed for diagnosing when both MCContext::SrcMgr
924   //   and MCContext::InlineSrcMgr are null.
925   SourceMgr SM;
926   const SourceMgr *SMP = &SM;
927   bool UseInlineSrcMgr = false;
928 
929   // FIXME: Simplify these by combining InlineSrcMgr & SrcMgr.
930   //        For MC-only execution, only SrcMgr is used;
931   //        For non MC-only execution, InlineSrcMgr is only ctor'd if there is
932   //        inline asm in the IR.
933   if (Loc.isValid()) {
934     if (SrcMgr) {
935       SMP = SrcMgr;
936     } else if (InlineSrcMgr) {
937       SMP = InlineSrcMgr.get();
938       UseInlineSrcMgr = true;
939     } else
940       llvm_unreachable("Either SourceMgr should be available");
941   }
942 
943   SMDiagnostic D;
944   GetMessage(D, SMP);
945   DiagHandler(D, UseInlineSrcMgr, *SMP, LocInfos);
946 }
947 
reportError(SMLoc Loc,const Twine & Msg)948 void MCContext::reportError(SMLoc Loc, const Twine &Msg) {
949   HadError = true;
950   reportCommon(Loc, [&](SMDiagnostic &D, const SourceMgr *SMP) {
951     D = SMP->GetMessage(Loc, SourceMgr::DK_Error, Msg);
952   });
953 }
954 
reportWarning(SMLoc Loc,const Twine & Msg)955 void MCContext::reportWarning(SMLoc Loc, const Twine &Msg) {
956   if (TargetOptions && TargetOptions->MCNoWarn)
957     return;
958   if (TargetOptions && TargetOptions->MCFatalWarnings) {
959     reportError(Loc, Msg);
960   } else {
961     reportCommon(Loc, [&](SMDiagnostic &D, const SourceMgr *SMP) {
962       D = SMP->GetMessage(Loc, SourceMgr::DK_Warning, Msg);
963     });
964   }
965 }
966 
reportFatalError(SMLoc Loc,const Twine & Msg)967 void MCContext::reportFatalError(SMLoc Loc, const Twine &Msg) {
968   reportError(Loc, Msg);
969 
970   // If we reached here, we are failing ungracefully. Run the interrupt handlers
971   // to make sure any special cleanups get done, in particular that we remove
972   // files registered with RemoveFileOnSignal.
973   sys::RunInterruptHandlers();
974   exit(1);
975 }
976