xref: /freebsd/contrib/llvm-project/lld/ELF/InputSection.cpp (revision 0b37c1590418417c894529d371800dfac71ef887)
1 //===- InputSection.cpp ---------------------------------------------------===//
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 "InputSection.h"
10 #include "Config.h"
11 #include "EhFrame.h"
12 #include "InputFiles.h"
13 #include "LinkerScript.h"
14 #include "OutputSections.h"
15 #include "Relocations.h"
16 #include "SymbolTable.h"
17 #include "Symbols.h"
18 #include "SyntheticSections.h"
19 #include "Target.h"
20 #include "Thunks.h"
21 #include "lld/Common/ErrorHandler.h"
22 #include "lld/Common/Memory.h"
23 #include "llvm/Support/Compiler.h"
24 #include "llvm/Support/Compression.h"
25 #include "llvm/Support/Endian.h"
26 #include "llvm/Support/Threading.h"
27 #include "llvm/Support/xxhash.h"
28 #include <algorithm>
29 #include <mutex>
30 #include <set>
31 #include <vector>
32 
33 using namespace llvm;
34 using namespace llvm::ELF;
35 using namespace llvm::object;
36 using namespace llvm::support;
37 using namespace llvm::support::endian;
38 using namespace llvm::sys;
39 
40 namespace lld {
41 // Returns a string to construct an error message.
42 std::string toString(const elf::InputSectionBase *sec) {
43   return (toString(sec->file) + ":(" + sec->name + ")").str();
44 }
45 
46 namespace elf {
47 std::vector<InputSectionBase *> inputSections;
48 
49 template <class ELFT>
50 static ArrayRef<uint8_t> getSectionContents(ObjFile<ELFT> &file,
51                                             const typename ELFT::Shdr &hdr) {
52   if (hdr.sh_type == SHT_NOBITS)
53     return makeArrayRef<uint8_t>(nullptr, hdr.sh_size);
54   return check(file.getObj().getSectionContents(&hdr));
55 }
56 
57 InputSectionBase::InputSectionBase(InputFile *file, uint64_t flags,
58                                    uint32_t type, uint64_t entsize,
59                                    uint32_t link, uint32_t info,
60                                    uint32_t alignment, ArrayRef<uint8_t> data,
61                                    StringRef name, Kind sectionKind)
62     : SectionBase(sectionKind, name, flags, entsize, alignment, type, info,
63                   link),
64       file(file), rawData(data) {
65   // In order to reduce memory allocation, we assume that mergeable
66   // sections are smaller than 4 GiB, which is not an unreasonable
67   // assumption as of 2017.
68   if (sectionKind == SectionBase::Merge && rawData.size() > UINT32_MAX)
69     error(toString(this) + ": section too large");
70 
71   numRelocations = 0;
72   areRelocsRela = false;
73 
74   // The ELF spec states that a value of 0 means the section has
75   // no alignment constraints.
76   uint32_t v = std::max<uint32_t>(alignment, 1);
77   if (!isPowerOf2_64(v))
78     fatal(toString(this) + ": sh_addralign is not a power of 2");
79   this->alignment = v;
80 
81   // In ELF, each section can be compressed by zlib, and if compressed,
82   // section name may be mangled by appending "z" (e.g. ".zdebug_info").
83   // If that's the case, demangle section name so that we can handle a
84   // section as if it weren't compressed.
85   if ((flags & SHF_COMPRESSED) || name.startswith(".zdebug")) {
86     if (!zlib::isAvailable())
87       error(toString(file) + ": contains a compressed section, " +
88             "but zlib is not available");
89     parseCompressedHeader();
90   }
91 }
92 
93 // Drop SHF_GROUP bit unless we are producing a re-linkable object file.
94 // SHF_GROUP is a marker that a section belongs to some comdat group.
95 // That flag doesn't make sense in an executable.
96 static uint64_t getFlags(uint64_t flags) {
97   flags &= ~(uint64_t)SHF_INFO_LINK;
98   if (!config->relocatable)
99     flags &= ~(uint64_t)SHF_GROUP;
100   return flags;
101 }
102 
103 // GNU assembler 2.24 and LLVM 4.0.0's MC (the newest release as of
104 // March 2017) fail to infer section types for sections starting with
105 // ".init_array." or ".fini_array.". They set SHT_PROGBITS instead of
106 // SHF_INIT_ARRAY. As a result, the following assembler directive
107 // creates ".init_array.100" with SHT_PROGBITS, for example.
108 //
109 //   .section .init_array.100, "aw"
110 //
111 // This function forces SHT_{INIT,FINI}_ARRAY so that we can handle
112 // incorrect inputs as if they were correct from the beginning.
113 static uint64_t getType(uint64_t type, StringRef name) {
114   if (type == SHT_PROGBITS && name.startswith(".init_array."))
115     return SHT_INIT_ARRAY;
116   if (type == SHT_PROGBITS && name.startswith(".fini_array."))
117     return SHT_FINI_ARRAY;
118   return type;
119 }
120 
121 template <class ELFT>
122 InputSectionBase::InputSectionBase(ObjFile<ELFT> &file,
123                                    const typename ELFT::Shdr &hdr,
124                                    StringRef name, Kind sectionKind)
125     : InputSectionBase(&file, getFlags(hdr.sh_flags),
126                        getType(hdr.sh_type, name), hdr.sh_entsize, hdr.sh_link,
127                        hdr.sh_info, hdr.sh_addralign,
128                        getSectionContents(file, hdr), name, sectionKind) {
129   // We reject object files having insanely large alignments even though
130   // they are allowed by the spec. I think 4GB is a reasonable limitation.
131   // We might want to relax this in the future.
132   if (hdr.sh_addralign > UINT32_MAX)
133     fatal(toString(&file) + ": section sh_addralign is too large");
134 }
135 
136 size_t InputSectionBase::getSize() const {
137   if (auto *s = dyn_cast<SyntheticSection>(this))
138     return s->getSize();
139   if (uncompressedSize >= 0)
140     return uncompressedSize;
141   return rawData.size();
142 }
143 
144 void InputSectionBase::uncompress() const {
145   size_t size = uncompressedSize;
146   char *uncompressedBuf;
147   {
148     static std::mutex mu;
149     std::lock_guard<std::mutex> lock(mu);
150     uncompressedBuf = bAlloc.Allocate<char>(size);
151   }
152 
153   if (Error e = zlib::uncompress(toStringRef(rawData), uncompressedBuf, size))
154     fatal(toString(this) +
155           ": uncompress failed: " + llvm::toString(std::move(e)));
156   rawData = makeArrayRef((uint8_t *)uncompressedBuf, size);
157   uncompressedSize = -1;
158 }
159 
160 uint64_t InputSectionBase::getOffsetInFile() const {
161   const uint8_t *fileStart = (const uint8_t *)file->mb.getBufferStart();
162   const uint8_t *secStart = data().begin();
163   return secStart - fileStart;
164 }
165 
166 uint64_t SectionBase::getOffset(uint64_t offset) const {
167   switch (kind()) {
168   case Output: {
169     auto *os = cast<OutputSection>(this);
170     // For output sections we treat offset -1 as the end of the section.
171     return offset == uint64_t(-1) ? os->size : offset;
172   }
173   case Regular:
174   case Synthetic:
175     return cast<InputSection>(this)->getOffset(offset);
176   case EHFrame:
177     // The file crtbeginT.o has relocations pointing to the start of an empty
178     // .eh_frame that is known to be the first in the link. It does that to
179     // identify the start of the output .eh_frame.
180     return offset;
181   case Merge:
182     const MergeInputSection *ms = cast<MergeInputSection>(this);
183     if (InputSection *isec = ms->getParent())
184       return isec->getOffset(ms->getParentOffset(offset));
185     return ms->getParentOffset(offset);
186   }
187   llvm_unreachable("invalid section kind");
188 }
189 
190 uint64_t SectionBase::getVA(uint64_t offset) const {
191   const OutputSection *out = getOutputSection();
192   return (out ? out->addr : 0) + getOffset(offset);
193 }
194 
195 OutputSection *SectionBase::getOutputSection() {
196   InputSection *sec;
197   if (auto *isec = dyn_cast<InputSection>(this))
198     sec = isec;
199   else if (auto *ms = dyn_cast<MergeInputSection>(this))
200     sec = ms->getParent();
201   else if (auto *eh = dyn_cast<EhInputSection>(this))
202     sec = eh->getParent();
203   else
204     return cast<OutputSection>(this);
205   return sec ? sec->getParent() : nullptr;
206 }
207 
208 // When a section is compressed, `rawData` consists with a header followed
209 // by zlib-compressed data. This function parses a header to initialize
210 // `uncompressedSize` member and remove the header from `rawData`.
211 void InputSectionBase::parseCompressedHeader() {
212   using Chdr64 = typename ELF64LE::Chdr;
213   using Chdr32 = typename ELF32LE::Chdr;
214 
215   // Old-style header
216   if (name.startswith(".zdebug")) {
217     if (!toStringRef(rawData).startswith("ZLIB")) {
218       error(toString(this) + ": corrupted compressed section header");
219       return;
220     }
221     rawData = rawData.slice(4);
222 
223     if (rawData.size() < 8) {
224       error(toString(this) + ": corrupted compressed section header");
225       return;
226     }
227 
228     uncompressedSize = read64be(rawData.data());
229     rawData = rawData.slice(8);
230 
231     // Restore the original section name.
232     // (e.g. ".zdebug_info" -> ".debug_info")
233     name = saver.save("." + name.substr(2));
234     return;
235   }
236 
237   assert(flags & SHF_COMPRESSED);
238   flags &= ~(uint64_t)SHF_COMPRESSED;
239 
240   // New-style 64-bit header
241   if (config->is64) {
242     if (rawData.size() < sizeof(Chdr64)) {
243       error(toString(this) + ": corrupted compressed section");
244       return;
245     }
246 
247     auto *hdr = reinterpret_cast<const Chdr64 *>(rawData.data());
248     if (hdr->ch_type != ELFCOMPRESS_ZLIB) {
249       error(toString(this) + ": unsupported compression type");
250       return;
251     }
252 
253     uncompressedSize = hdr->ch_size;
254     alignment = std::max<uint32_t>(hdr->ch_addralign, 1);
255     rawData = rawData.slice(sizeof(*hdr));
256     return;
257   }
258 
259   // New-style 32-bit header
260   if (rawData.size() < sizeof(Chdr32)) {
261     error(toString(this) + ": corrupted compressed section");
262     return;
263   }
264 
265   auto *hdr = reinterpret_cast<const Chdr32 *>(rawData.data());
266   if (hdr->ch_type != ELFCOMPRESS_ZLIB) {
267     error(toString(this) + ": unsupported compression type");
268     return;
269   }
270 
271   uncompressedSize = hdr->ch_size;
272   alignment = std::max<uint32_t>(hdr->ch_addralign, 1);
273   rawData = rawData.slice(sizeof(*hdr));
274 }
275 
276 InputSection *InputSectionBase::getLinkOrderDep() const {
277   assert(link);
278   assert(flags & SHF_LINK_ORDER);
279   return cast<InputSection>(file->getSections()[link]);
280 }
281 
282 // Find a function symbol that encloses a given location.
283 template <class ELFT>
284 Defined *InputSectionBase::getEnclosingFunction(uint64_t offset) {
285   for (Symbol *b : file->getSymbols())
286     if (Defined *d = dyn_cast<Defined>(b))
287       if (d->section == this && d->type == STT_FUNC && d->value <= offset &&
288           offset < d->value + d->size)
289         return d;
290   return nullptr;
291 }
292 
293 // Returns a source location string. Used to construct an error message.
294 template <class ELFT>
295 std::string InputSectionBase::getLocation(uint64_t offset) {
296   std::string secAndOffset = (name + "+0x" + utohexstr(offset)).str();
297 
298   // We don't have file for synthetic sections.
299   if (getFile<ELFT>() == nullptr)
300     return (config->outputFile + ":(" + secAndOffset + ")")
301         .str();
302 
303   // First check if we can get desired values from debugging information.
304   if (Optional<DILineInfo> info = getFile<ELFT>()->getDILineInfo(this, offset))
305     return info->FileName + ":" + std::to_string(info->Line) + ":(" +
306            secAndOffset + ")";
307 
308   // File->sourceFile contains STT_FILE symbol that contains a
309   // source file name. If it's missing, we use an object file name.
310   std::string srcFile = getFile<ELFT>()->sourceFile;
311   if (srcFile.empty())
312     srcFile = toString(file);
313 
314   if (Defined *d = getEnclosingFunction<ELFT>(offset))
315     return srcFile + ":(function " + toString(*d) + ": " + secAndOffset + ")";
316 
317   // If there's no symbol, print out the offset in the section.
318   return (srcFile + ":(" + secAndOffset + ")");
319 }
320 
321 // This function is intended to be used for constructing an error message.
322 // The returned message looks like this:
323 //
324 //   foo.c:42 (/home/alice/possibly/very/long/path/foo.c:42)
325 //
326 //  Returns an empty string if there's no way to get line info.
327 std::string InputSectionBase::getSrcMsg(const Symbol &sym, uint64_t offset) {
328   return file->getSrcMsg(sym, *this, offset);
329 }
330 
331 // Returns a filename string along with an optional section name. This
332 // function is intended to be used for constructing an error
333 // message. The returned message looks like this:
334 //
335 //   path/to/foo.o:(function bar)
336 //
337 // or
338 //
339 //   path/to/foo.o:(function bar) in archive path/to/bar.a
340 std::string InputSectionBase::getObjMsg(uint64_t off) {
341   std::string filename = file->getName();
342 
343   std::string archive;
344   if (!file->archiveName.empty())
345     archive = " in archive " + file->archiveName;
346 
347   // Find a symbol that encloses a given location.
348   for (Symbol *b : file->getSymbols())
349     if (auto *d = dyn_cast<Defined>(b))
350       if (d->section == this && d->value <= off && off < d->value + d->size)
351         return filename + ":(" + toString(*d) + ")" + archive;
352 
353   // If there's no symbol, print out the offset in the section.
354   return (filename + ":(" + name + "+0x" + utohexstr(off) + ")" + archive)
355       .str();
356 }
357 
358 InputSection InputSection::discarded(nullptr, 0, 0, 0, ArrayRef<uint8_t>(), "");
359 
360 InputSection::InputSection(InputFile *f, uint64_t flags, uint32_t type,
361                            uint32_t alignment, ArrayRef<uint8_t> data,
362                            StringRef name, Kind k)
363     : InputSectionBase(f, flags, type,
364                        /*Entsize*/ 0, /*Link*/ 0, /*Info*/ 0, alignment, data,
365                        name, k) {}
366 
367 template <class ELFT>
368 InputSection::InputSection(ObjFile<ELFT> &f, const typename ELFT::Shdr &header,
369                            StringRef name)
370     : InputSectionBase(f, header, name, InputSectionBase::Regular) {}
371 
372 bool InputSection::classof(const SectionBase *s) {
373   return s->kind() == SectionBase::Regular ||
374          s->kind() == SectionBase::Synthetic;
375 }
376 
377 OutputSection *InputSection::getParent() const {
378   return cast_or_null<OutputSection>(parent);
379 }
380 
381 // Copy SHT_GROUP section contents. Used only for the -r option.
382 template <class ELFT> void InputSection::copyShtGroup(uint8_t *buf) {
383   // ELFT::Word is the 32-bit integral type in the target endianness.
384   using u32 = typename ELFT::Word;
385   ArrayRef<u32> from = getDataAs<u32>();
386   auto *to = reinterpret_cast<u32 *>(buf);
387 
388   // The first entry is not a section number but a flag.
389   *to++ = from[0];
390 
391   // Adjust section numbers because section numbers in an input object
392   // files are different in the output.
393   ArrayRef<InputSectionBase *> sections = file->getSections();
394   for (uint32_t idx : from.slice(1))
395     *to++ = sections[idx]->getOutputSection()->sectionIndex;
396 }
397 
398 InputSectionBase *InputSection::getRelocatedSection() const {
399   if (!file || (type != SHT_RELA && type != SHT_REL))
400     return nullptr;
401   ArrayRef<InputSectionBase *> sections = file->getSections();
402   return sections[info];
403 }
404 
405 // This is used for -r and --emit-relocs. We can't use memcpy to copy
406 // relocations because we need to update symbol table offset and section index
407 // for each relocation. So we copy relocations one by one.
408 template <class ELFT, class RelTy>
409 void InputSection::copyRelocations(uint8_t *buf, ArrayRef<RelTy> rels) {
410   InputSectionBase *sec = getRelocatedSection();
411 
412   for (const RelTy &rel : rels) {
413     RelType type = rel.getType(config->isMips64EL);
414     const ObjFile<ELFT> *file = getFile<ELFT>();
415     Symbol &sym = file->getRelocTargetSym(rel);
416 
417     auto *p = reinterpret_cast<typename ELFT::Rela *>(buf);
418     buf += sizeof(RelTy);
419 
420     if (RelTy::IsRela)
421       p->r_addend = getAddend<ELFT>(rel);
422 
423     // Output section VA is zero for -r, so r_offset is an offset within the
424     // section, but for --emit-relocs it is a virtual address.
425     p->r_offset = sec->getVA(rel.r_offset);
426     p->setSymbolAndType(in.symTab->getSymbolIndex(&sym), type,
427                         config->isMips64EL);
428 
429     if (sym.type == STT_SECTION) {
430       // We combine multiple section symbols into only one per
431       // section. This means we have to update the addend. That is
432       // trivial for Elf_Rela, but for Elf_Rel we have to write to the
433       // section data. We do that by adding to the Relocation vector.
434 
435       // .eh_frame is horribly special and can reference discarded sections. To
436       // avoid having to parse and recreate .eh_frame, we just replace any
437       // relocation in it pointing to discarded sections with R_*_NONE, which
438       // hopefully creates a frame that is ignored at runtime. Also, don't warn
439       // on .gcc_except_table and debug sections.
440       //
441       // See the comment in maybeReportUndefined for PPC64 .toc .
442       auto *d = dyn_cast<Defined>(&sym);
443       if (!d) {
444         if (!sec->name.startswith(".debug") &&
445             !sec->name.startswith(".zdebug") && sec->name != ".eh_frame" &&
446             sec->name != ".gcc_except_table" && sec->name != ".toc") {
447           uint32_t secIdx = cast<Undefined>(sym).discardedSecIdx;
448           Elf_Shdr_Impl<ELFT> sec =
449               CHECK(file->getObj().sections(), file)[secIdx];
450           warn("relocation refers to a discarded section: " +
451                CHECK(file->getObj().getSectionName(&sec), file) +
452                "\n>>> referenced by " + getObjMsg(p->r_offset));
453         }
454         p->setSymbolAndType(0, 0, false);
455         continue;
456       }
457       SectionBase *section = d->section->repl;
458       if (!section->isLive()) {
459         p->setSymbolAndType(0, 0, false);
460         continue;
461       }
462 
463       int64_t addend = getAddend<ELFT>(rel);
464       const uint8_t *bufLoc = sec->data().begin() + rel.r_offset;
465       if (!RelTy::IsRela)
466         addend = target->getImplicitAddend(bufLoc, type);
467 
468       if (config->emachine == EM_MIPS && config->relocatable &&
469           target->getRelExpr(type, sym, bufLoc) == R_MIPS_GOTREL) {
470         // Some MIPS relocations depend on "gp" value. By default,
471         // this value has 0x7ff0 offset from a .got section. But
472         // relocatable files produced by a compiler or a linker
473         // might redefine this default value and we must use it
474         // for a calculation of the relocation result. When we
475         // generate EXE or DSO it's trivial. Generating a relocatable
476         // output is more difficult case because the linker does
477         // not calculate relocations in this mode and loses
478         // individual "gp" values used by each input object file.
479         // As a workaround we add the "gp" value to the relocation
480         // addend and save it back to the file.
481         addend += sec->getFile<ELFT>()->mipsGp0;
482       }
483 
484       if (RelTy::IsRela)
485         p->r_addend = sym.getVA(addend) - section->getOutputSection()->addr;
486       else if (config->relocatable && type != target->noneRel)
487         sec->relocations.push_back({R_ABS, type, rel.r_offset, addend, &sym});
488     }
489   }
490 }
491 
492 // The ARM and AArch64 ABI handle pc-relative relocations to undefined weak
493 // references specially. The general rule is that the value of the symbol in
494 // this context is the address of the place P. A further special case is that
495 // branch relocations to an undefined weak reference resolve to the next
496 // instruction.
497 static uint32_t getARMUndefinedRelativeWeakVA(RelType type, uint32_t a,
498                                               uint32_t p) {
499   switch (type) {
500   // Unresolved branch relocations to weak references resolve to next
501   // instruction, this will be either 2 or 4 bytes on from P.
502   case R_ARM_THM_JUMP11:
503     return p + 2 + a;
504   case R_ARM_CALL:
505   case R_ARM_JUMP24:
506   case R_ARM_PC24:
507   case R_ARM_PLT32:
508   case R_ARM_PREL31:
509   case R_ARM_THM_JUMP19:
510   case R_ARM_THM_JUMP24:
511     return p + 4 + a;
512   case R_ARM_THM_CALL:
513     // We don't want an interworking BLX to ARM
514     return p + 5 + a;
515   // Unresolved non branch pc-relative relocations
516   // R_ARM_TARGET2 which can be resolved relatively is not present as it never
517   // targets a weak-reference.
518   case R_ARM_MOVW_PREL_NC:
519   case R_ARM_MOVT_PREL:
520   case R_ARM_REL32:
521   case R_ARM_THM_MOVW_PREL_NC:
522   case R_ARM_THM_MOVT_PREL:
523     return p + a;
524   }
525   llvm_unreachable("ARM pc-relative relocation expected\n");
526 }
527 
528 // The comment above getARMUndefinedRelativeWeakVA applies to this function.
529 static uint64_t getAArch64UndefinedRelativeWeakVA(uint64_t type, uint64_t a,
530                                                   uint64_t p) {
531   switch (type) {
532   // Unresolved branch relocations to weak references resolve to next
533   // instruction, this is 4 bytes on from P.
534   case R_AARCH64_CALL26:
535   case R_AARCH64_CONDBR19:
536   case R_AARCH64_JUMP26:
537   case R_AARCH64_TSTBR14:
538     return p + 4 + a;
539   // Unresolved non branch pc-relative relocations
540   case R_AARCH64_PREL16:
541   case R_AARCH64_PREL32:
542   case R_AARCH64_PREL64:
543   case R_AARCH64_ADR_PREL_LO21:
544   case R_AARCH64_LD_PREL_LO19:
545     return p + a;
546   }
547   llvm_unreachable("AArch64 pc-relative relocation expected\n");
548 }
549 
550 // ARM SBREL relocations are of the form S + A - B where B is the static base
551 // The ARM ABI defines base to be "addressing origin of the output segment
552 // defining the symbol S". We defined the "addressing origin"/static base to be
553 // the base of the PT_LOAD segment containing the Sym.
554 // The procedure call standard only defines a Read Write Position Independent
555 // RWPI variant so in practice we should expect the static base to be the base
556 // of the RW segment.
557 static uint64_t getARMStaticBase(const Symbol &sym) {
558   OutputSection *os = sym.getOutputSection();
559   if (!os || !os->ptLoad || !os->ptLoad->firstSec)
560     fatal("SBREL relocation to " + sym.getName() + " without static base");
561   return os->ptLoad->firstSec->addr;
562 }
563 
564 // For R_RISCV_PC_INDIRECT (R_RISCV_PCREL_LO12_{I,S}), the symbol actually
565 // points the corresponding R_RISCV_PCREL_HI20 relocation, and the target VA
566 // is calculated using PCREL_HI20's symbol.
567 //
568 // This function returns the R_RISCV_PCREL_HI20 relocation from
569 // R_RISCV_PCREL_LO12's symbol and addend.
570 static Relocation *getRISCVPCRelHi20(const Symbol *sym, uint64_t addend) {
571   const Defined *d = cast<Defined>(sym);
572   if (!d->section) {
573     error("R_RISCV_PCREL_LO12 relocation points to an absolute symbol: " +
574           sym->getName());
575     return nullptr;
576   }
577   InputSection *isec = cast<InputSection>(d->section);
578 
579   if (addend != 0)
580     warn("Non-zero addend in R_RISCV_PCREL_LO12 relocation to " +
581          isec->getObjMsg(d->value) + " is ignored");
582 
583   // Relocations are sorted by offset, so we can use std::equal_range to do
584   // binary search.
585   Relocation r;
586   r.offset = d->value;
587   auto range =
588       std::equal_range(isec->relocations.begin(), isec->relocations.end(), r,
589                        [](const Relocation &lhs, const Relocation &rhs) {
590                          return lhs.offset < rhs.offset;
591                        });
592 
593   for (auto it = range.first; it != range.second; ++it)
594     if (it->type == R_RISCV_PCREL_HI20 || it->type == R_RISCV_GOT_HI20 ||
595         it->type == R_RISCV_TLS_GD_HI20 || it->type == R_RISCV_TLS_GOT_HI20)
596       return &*it;
597 
598   error("R_RISCV_PCREL_LO12 relocation points to " + isec->getObjMsg(d->value) +
599         " without an associated R_RISCV_PCREL_HI20 relocation");
600   return nullptr;
601 }
602 
603 // A TLS symbol's virtual address is relative to the TLS segment. Add a
604 // target-specific adjustment to produce a thread-pointer-relative offset.
605 static int64_t getTlsTpOffset(const Symbol &s) {
606   // On targets that support TLSDESC, _TLS_MODULE_BASE_@tpoff = 0.
607   if (&s == ElfSym::tlsModuleBase)
608     return 0;
609 
610   // There are 2 TLS layouts. Among targets we support, x86 uses TLS Variant 2
611   // while most others use Variant 1. At run time TP will be aligned to p_align.
612 
613   // Variant 1. TP will be followed by an optional gap (which is the size of 2
614   // pointers on ARM/AArch64, 0 on other targets), followed by alignment
615   // padding, then the static TLS blocks. The alignment padding is added so that
616   // (TP + gap + padding) is congruent to p_vaddr modulo p_align.
617   //
618   // Variant 2. Static TLS blocks, followed by alignment padding are placed
619   // before TP. The alignment padding is added so that (TP - padding -
620   // p_memsz) is congruent to p_vaddr modulo p_align.
621   PhdrEntry *tls = Out::tlsPhdr;
622   switch (config->emachine) {
623     // Variant 1.
624   case EM_ARM:
625   case EM_AARCH64:
626     return s.getVA(0) + config->wordsize * 2 +
627            ((tls->p_vaddr - config->wordsize * 2) & (tls->p_align - 1));
628   case EM_MIPS:
629   case EM_PPC:
630   case EM_PPC64:
631     // Adjusted Variant 1. TP is placed with a displacement of 0x7000, which is
632     // to allow a signed 16-bit offset to reach 0x1000 of TCB/thread-library
633     // data and 0xf000 of the program's TLS segment.
634     return s.getVA(0) + (tls->p_vaddr & (tls->p_align - 1)) - 0x7000;
635   case EM_RISCV:
636     return s.getVA(0) + (tls->p_vaddr & (tls->p_align - 1));
637 
638     // Variant 2.
639   case EM_HEXAGON:
640   case EM_386:
641   case EM_X86_64:
642     return s.getVA(0) - tls->p_memsz -
643            ((-tls->p_vaddr - tls->p_memsz) & (tls->p_align - 1));
644   default:
645     llvm_unreachable("unhandled Config->EMachine");
646   }
647 }
648 
649 static uint64_t getRelocTargetVA(const InputFile *file, RelType type, int64_t a,
650                                  uint64_t p, const Symbol &sym, RelExpr expr) {
651   switch (expr) {
652   case R_ABS:
653   case R_DTPREL:
654   case R_RELAX_TLS_LD_TO_LE_ABS:
655   case R_RELAX_GOT_PC_NOPIC:
656   case R_RISCV_ADD:
657     return sym.getVA(a);
658   case R_ADDEND:
659     return a;
660   case R_ARM_SBREL:
661     return sym.getVA(a) - getARMStaticBase(sym);
662   case R_GOT:
663   case R_RELAX_TLS_GD_TO_IE_ABS:
664     return sym.getGotVA() + a;
665   case R_GOTONLY_PC:
666     return in.got->getVA() + a - p;
667   case R_GOTPLTONLY_PC:
668     return in.gotPlt->getVA() + a - p;
669   case R_GOTREL:
670   case R_PPC64_RELAX_TOC:
671     return sym.getVA(a) - in.got->getVA();
672   case R_GOTPLTREL:
673     return sym.getVA(a) - in.gotPlt->getVA();
674   case R_GOTPLT:
675   case R_RELAX_TLS_GD_TO_IE_GOTPLT:
676     return sym.getGotVA() + a - in.gotPlt->getVA();
677   case R_TLSLD_GOT_OFF:
678   case R_GOT_OFF:
679   case R_RELAX_TLS_GD_TO_IE_GOT_OFF:
680     return sym.getGotOffset() + a;
681   case R_AARCH64_GOT_PAGE_PC:
682   case R_AARCH64_RELAX_TLS_GD_TO_IE_PAGE_PC:
683     return getAArch64Page(sym.getGotVA() + a) - getAArch64Page(p);
684   case R_GOT_PC:
685   case R_RELAX_TLS_GD_TO_IE:
686     return sym.getGotVA() + a - p;
687   case R_MIPS_GOTREL:
688     return sym.getVA(a) - in.mipsGot->getGp(file);
689   case R_MIPS_GOT_GP:
690     return in.mipsGot->getGp(file) + a;
691   case R_MIPS_GOT_GP_PC: {
692     // R_MIPS_LO16 expression has R_MIPS_GOT_GP_PC type iif the target
693     // is _gp_disp symbol. In that case we should use the following
694     // formula for calculation "AHL + GP - P + 4". For details see p. 4-19 at
695     // ftp://www.linux-mips.org/pub/linux/mips/doc/ABI/mipsabi.pdf
696     // microMIPS variants of these relocations use slightly different
697     // expressions: AHL + GP - P + 3 for %lo() and AHL + GP - P - 1 for %hi()
698     // to correctly handle less-sugnificant bit of the microMIPS symbol.
699     uint64_t v = in.mipsGot->getGp(file) + a - p;
700     if (type == R_MIPS_LO16 || type == R_MICROMIPS_LO16)
701       v += 4;
702     if (type == R_MICROMIPS_LO16 || type == R_MICROMIPS_HI16)
703       v -= 1;
704     return v;
705   }
706   case R_MIPS_GOT_LOCAL_PAGE:
707     // If relocation against MIPS local symbol requires GOT entry, this entry
708     // should be initialized by 'page address'. This address is high 16-bits
709     // of sum the symbol's value and the addend.
710     return in.mipsGot->getVA() + in.mipsGot->getPageEntryOffset(file, sym, a) -
711            in.mipsGot->getGp(file);
712   case R_MIPS_GOT_OFF:
713   case R_MIPS_GOT_OFF32:
714     // In case of MIPS if a GOT relocation has non-zero addend this addend
715     // should be applied to the GOT entry content not to the GOT entry offset.
716     // That is why we use separate expression type.
717     return in.mipsGot->getVA() + in.mipsGot->getSymEntryOffset(file, sym, a) -
718            in.mipsGot->getGp(file);
719   case R_MIPS_TLSGD:
720     return in.mipsGot->getVA() + in.mipsGot->getGlobalDynOffset(file, sym) -
721            in.mipsGot->getGp(file);
722   case R_MIPS_TLSLD:
723     return in.mipsGot->getVA() + in.mipsGot->getTlsIndexOffset(file) -
724            in.mipsGot->getGp(file);
725   case R_AARCH64_PAGE_PC: {
726     uint64_t val = sym.isUndefWeak() ? p + a : sym.getVA(a);
727     return getAArch64Page(val) - getAArch64Page(p);
728   }
729   case R_RISCV_PC_INDIRECT: {
730     if (const Relocation *hiRel = getRISCVPCRelHi20(&sym, a))
731       return getRelocTargetVA(file, hiRel->type, hiRel->addend, sym.getVA(),
732                               *hiRel->sym, hiRel->expr);
733     return 0;
734   }
735   case R_PC: {
736     uint64_t dest;
737     if (sym.isUndefWeak()) {
738       // On ARM and AArch64 a branch to an undefined weak resolves to the
739       // next instruction, otherwise the place.
740       if (config->emachine == EM_ARM)
741         dest = getARMUndefinedRelativeWeakVA(type, a, p);
742       else if (config->emachine == EM_AARCH64)
743         dest = getAArch64UndefinedRelativeWeakVA(type, a, p);
744       else if (config->emachine == EM_PPC)
745         dest = p;
746       else
747         dest = sym.getVA(a);
748     } else {
749       dest = sym.getVA(a);
750     }
751     return dest - p;
752   }
753   case R_PLT:
754     return sym.getPltVA() + a;
755   case R_PLT_PC:
756   case R_PPC64_CALL_PLT:
757     return sym.getPltVA() + a - p;
758   case R_PPC32_PLTREL:
759     // R_PPC_PLTREL24 uses the addend (usually 0 or 0x8000) to indicate r30
760     // stores _GLOBAL_OFFSET_TABLE_ or .got2+0x8000. The addend is ignored for
761     // target VA computation.
762     return sym.getPltVA() - p;
763   case R_PPC64_CALL: {
764     uint64_t symVA = sym.getVA(a);
765     // If we have an undefined weak symbol, we might get here with a symbol
766     // address of zero. That could overflow, but the code must be unreachable,
767     // so don't bother doing anything at all.
768     if (!symVA)
769       return 0;
770 
771     // PPC64 V2 ABI describes two entry points to a function. The global entry
772     // point is used for calls where the caller and callee (may) have different
773     // TOC base pointers and r2 needs to be modified to hold the TOC base for
774     // the callee. For local calls the caller and callee share the same
775     // TOC base and so the TOC pointer initialization code should be skipped by
776     // branching to the local entry point.
777     return symVA - p + getPPC64GlobalEntryToLocalEntryOffset(sym.stOther);
778   }
779   case R_PPC64_TOCBASE:
780     return getPPC64TocBase() + a;
781   case R_RELAX_GOT_PC:
782     return sym.getVA(a) - p;
783   case R_RELAX_TLS_GD_TO_LE:
784   case R_RELAX_TLS_IE_TO_LE:
785   case R_RELAX_TLS_LD_TO_LE:
786   case R_TLS:
787     // It is not very clear what to return if the symbol is undefined. With
788     // --noinhibit-exec, even a non-weak undefined reference may reach here.
789     // Just return A, which matches R_ABS, and the behavior of some dynamic
790     // loaders.
791     if (sym.isUndefined())
792       return a;
793     return getTlsTpOffset(sym) + a;
794   case R_RELAX_TLS_GD_TO_LE_NEG:
795   case R_NEG_TLS:
796     if (sym.isUndefined())
797       return a;
798     return -getTlsTpOffset(sym) + a;
799   case R_SIZE:
800     return sym.getSize() + a;
801   case R_TLSDESC:
802     return in.got->getGlobalDynAddr(sym) + a;
803   case R_TLSDESC_PC:
804     return in.got->getGlobalDynAddr(sym) + a - p;
805   case R_AARCH64_TLSDESC_PAGE:
806     return getAArch64Page(in.got->getGlobalDynAddr(sym) + a) -
807            getAArch64Page(p);
808   case R_TLSGD_GOT:
809     return in.got->getGlobalDynOffset(sym) + a;
810   case R_TLSGD_GOTPLT:
811     return in.got->getVA() + in.got->getGlobalDynOffset(sym) + a - in.gotPlt->getVA();
812   case R_TLSGD_PC:
813     return in.got->getGlobalDynAddr(sym) + a - p;
814   case R_TLSLD_GOTPLT:
815     return in.got->getVA() + in.got->getTlsIndexOff() + a - in.gotPlt->getVA();
816   case R_TLSLD_GOT:
817     return in.got->getTlsIndexOff() + a;
818   case R_TLSLD_PC:
819     return in.got->getTlsIndexVA() + a - p;
820   default:
821     llvm_unreachable("invalid expression");
822   }
823 }
824 
825 // This function applies relocations to sections without SHF_ALLOC bit.
826 // Such sections are never mapped to memory at runtime. Debug sections are
827 // an example. Relocations in non-alloc sections are much easier to
828 // handle than in allocated sections because it will never need complex
829 // treatment such as GOT or PLT (because at runtime no one refers them).
830 // So, we handle relocations for non-alloc sections directly in this
831 // function as a performance optimization.
832 template <class ELFT, class RelTy>
833 void InputSection::relocateNonAlloc(uint8_t *buf, ArrayRef<RelTy> rels) {
834   const unsigned bits = sizeof(typename ELFT::uint) * 8;
835 
836   for (const RelTy &rel : rels) {
837     RelType type = rel.getType(config->isMips64EL);
838 
839     // GCC 8.0 or earlier have a bug that they emit R_386_GOTPC relocations
840     // against _GLOBAL_OFFSET_TABLE_ for .debug_info. The bug has been fixed
841     // in 2017 (https://gcc.gnu.org/bugzilla/show_bug.cgi?id=82630), but we
842     // need to keep this bug-compatible code for a while.
843     if (config->emachine == EM_386 && type == R_386_GOTPC)
844       continue;
845 
846     uint64_t offset = getOffset(rel.r_offset);
847     uint8_t *bufLoc = buf + offset;
848     int64_t addend = getAddend<ELFT>(rel);
849     if (!RelTy::IsRela)
850       addend += target->getImplicitAddend(bufLoc, type);
851 
852     Symbol &sym = getFile<ELFT>()->getRelocTargetSym(rel);
853     RelExpr expr = target->getRelExpr(type, sym, bufLoc);
854     if (expr == R_NONE)
855       continue;
856 
857     if (expr != R_ABS && expr != R_DTPREL && expr != R_RISCV_ADD) {
858       std::string msg = getLocation<ELFT>(offset) +
859                         ": has non-ABS relocation " + toString(type) +
860                         " against symbol '" + toString(sym) + "'";
861       if (expr != R_PC) {
862         error(msg);
863         return;
864       }
865 
866       // If the control reaches here, we found a PC-relative relocation in a
867       // non-ALLOC section. Since non-ALLOC section is not loaded into memory
868       // at runtime, the notion of PC-relative doesn't make sense here. So,
869       // this is a usage error. However, GNU linkers historically accept such
870       // relocations without any errors and relocate them as if they were at
871       // address 0. For bug-compatibilty, we accept them with warnings. We
872       // know Steel Bank Common Lisp as of 2018 have this bug.
873       warn(msg);
874       target->relocateOne(bufLoc, type,
875                           SignExtend64<bits>(sym.getVA(addend - offset)));
876       continue;
877     }
878 
879     if (sym.isTls() && !Out::tlsPhdr)
880       target->relocateOne(bufLoc, type, 0);
881     else
882       target->relocateOne(bufLoc, type, SignExtend64<bits>(sym.getVA(addend)));
883   }
884 }
885 
886 // This is used when '-r' is given.
887 // For REL targets, InputSection::copyRelocations() may store artificial
888 // relocations aimed to update addends. They are handled in relocateAlloc()
889 // for allocatable sections, and this function does the same for
890 // non-allocatable sections, such as sections with debug information.
891 static void relocateNonAllocForRelocatable(InputSection *sec, uint8_t *buf) {
892   const unsigned bits = config->is64 ? 64 : 32;
893 
894   for (const Relocation &rel : sec->relocations) {
895     // InputSection::copyRelocations() adds only R_ABS relocations.
896     assert(rel.expr == R_ABS);
897     uint8_t *bufLoc = buf + rel.offset + sec->outSecOff;
898     uint64_t targetVA = SignExtend64(rel.sym->getVA(rel.addend), bits);
899     target->relocateOne(bufLoc, rel.type, targetVA);
900   }
901 }
902 
903 template <class ELFT>
904 void InputSectionBase::relocate(uint8_t *buf, uint8_t *bufEnd) {
905   if (flags & SHF_EXECINSTR)
906     adjustSplitStackFunctionPrologues<ELFT>(buf, bufEnd);
907 
908   if (flags & SHF_ALLOC) {
909     relocateAlloc(buf, bufEnd);
910     return;
911   }
912 
913   auto *sec = cast<InputSection>(this);
914   if (config->relocatable)
915     relocateNonAllocForRelocatable(sec, buf);
916   else if (sec->areRelocsRela)
917     sec->relocateNonAlloc<ELFT>(buf, sec->template relas<ELFT>());
918   else
919     sec->relocateNonAlloc<ELFT>(buf, sec->template rels<ELFT>());
920 }
921 
922 void InputSectionBase::relocateAlloc(uint8_t *buf, uint8_t *bufEnd) {
923   assert(flags & SHF_ALLOC);
924   const unsigned bits = config->wordsize * 8;
925 
926   for (const Relocation &rel : relocations) {
927     uint64_t offset = rel.offset;
928     if (auto *sec = dyn_cast<InputSection>(this))
929       offset += sec->outSecOff;
930     uint8_t *bufLoc = buf + offset;
931     RelType type = rel.type;
932 
933     uint64_t addrLoc = getOutputSection()->addr + offset;
934     RelExpr expr = rel.expr;
935     uint64_t targetVA = SignExtend64(
936         getRelocTargetVA(file, type, rel.addend, addrLoc, *rel.sym, expr),
937         bits);
938 
939     switch (expr) {
940     case R_RELAX_GOT_PC:
941     case R_RELAX_GOT_PC_NOPIC:
942       target->relaxGot(bufLoc, type, targetVA);
943       break;
944     case R_PPC64_RELAX_TOC:
945       if (!tryRelaxPPC64TocIndirection(type, rel, bufLoc))
946         target->relocateOne(bufLoc, type, targetVA);
947       break;
948     case R_RELAX_TLS_IE_TO_LE:
949       target->relaxTlsIeToLe(bufLoc, type, targetVA);
950       break;
951     case R_RELAX_TLS_LD_TO_LE:
952     case R_RELAX_TLS_LD_TO_LE_ABS:
953       target->relaxTlsLdToLe(bufLoc, type, targetVA);
954       break;
955     case R_RELAX_TLS_GD_TO_LE:
956     case R_RELAX_TLS_GD_TO_LE_NEG:
957       target->relaxTlsGdToLe(bufLoc, type, targetVA);
958       break;
959     case R_AARCH64_RELAX_TLS_GD_TO_IE_PAGE_PC:
960     case R_RELAX_TLS_GD_TO_IE:
961     case R_RELAX_TLS_GD_TO_IE_ABS:
962     case R_RELAX_TLS_GD_TO_IE_GOT_OFF:
963     case R_RELAX_TLS_GD_TO_IE_GOTPLT:
964       target->relaxTlsGdToIe(bufLoc, type, targetVA);
965       break;
966     case R_PPC64_CALL:
967       // If this is a call to __tls_get_addr, it may be part of a TLS
968       // sequence that has been relaxed and turned into a nop. In this
969       // case, we don't want to handle it as a call.
970       if (read32(bufLoc) == 0x60000000) // nop
971         break;
972 
973       // Patch a nop (0x60000000) to a ld.
974       if (rel.sym->needsTocRestore) {
975         // gcc/gfortran 5.4, 6.3 and earlier versions do not add nop for
976         // recursive calls even if the function is preemptible. This is not
977         // wrong in the common case where the function is not preempted at
978         // runtime. Just ignore.
979         if ((bufLoc + 8 > bufEnd || read32(bufLoc + 4) != 0x60000000) &&
980             rel.sym->file != file) {
981           // Use substr(6) to remove the "__plt_" prefix.
982           errorOrWarn(getErrorLocation(bufLoc) + "call to " +
983                       lld::toString(*rel.sym).substr(6) +
984                       " lacks nop, can't restore toc");
985           break;
986         }
987         write32(bufLoc + 4, 0xe8410018); // ld %r2, 24(%r1)
988       }
989       target->relocateOne(bufLoc, type, targetVA);
990       break;
991     default:
992       target->relocateOne(bufLoc, type, targetVA);
993       break;
994     }
995   }
996 }
997 
998 // For each function-defining prologue, find any calls to __morestack,
999 // and replace them with calls to __morestack_non_split.
1000 static void switchMorestackCallsToMorestackNonSplit(
1001     DenseSet<Defined *> &prologues, std::vector<Relocation *> &morestackCalls) {
1002 
1003   // If the target adjusted a function's prologue, all calls to
1004   // __morestack inside that function should be switched to
1005   // __morestack_non_split.
1006   Symbol *moreStackNonSplit = symtab->find("__morestack_non_split");
1007   if (!moreStackNonSplit) {
1008     error("Mixing split-stack objects requires a definition of "
1009           "__morestack_non_split");
1010     return;
1011   }
1012 
1013   // Sort both collections to compare addresses efficiently.
1014   llvm::sort(morestackCalls, [](const Relocation *l, const Relocation *r) {
1015     return l->offset < r->offset;
1016   });
1017   std::vector<Defined *> functions(prologues.begin(), prologues.end());
1018   llvm::sort(functions, [](const Defined *l, const Defined *r) {
1019     return l->value < r->value;
1020   });
1021 
1022   auto it = morestackCalls.begin();
1023   for (Defined *f : functions) {
1024     // Find the first call to __morestack within the function.
1025     while (it != morestackCalls.end() && (*it)->offset < f->value)
1026       ++it;
1027     // Adjust all calls inside the function.
1028     while (it != morestackCalls.end() && (*it)->offset < f->value + f->size) {
1029       (*it)->sym = moreStackNonSplit;
1030       ++it;
1031     }
1032   }
1033 }
1034 
1035 static bool enclosingPrologueAttempted(uint64_t offset,
1036                                        const DenseSet<Defined *> &prologues) {
1037   for (Defined *f : prologues)
1038     if (f->value <= offset && offset < f->value + f->size)
1039       return true;
1040   return false;
1041 }
1042 
1043 // If a function compiled for split stack calls a function not
1044 // compiled for split stack, then the caller needs its prologue
1045 // adjusted to ensure that the called function will have enough stack
1046 // available. Find those functions, and adjust their prologues.
1047 template <class ELFT>
1048 void InputSectionBase::adjustSplitStackFunctionPrologues(uint8_t *buf,
1049                                                          uint8_t *end) {
1050   if (!getFile<ELFT>()->splitStack)
1051     return;
1052   DenseSet<Defined *> prologues;
1053   std::vector<Relocation *> morestackCalls;
1054 
1055   for (Relocation &rel : relocations) {
1056     // Local symbols can't possibly be cross-calls, and should have been
1057     // resolved long before this line.
1058     if (rel.sym->isLocal())
1059       continue;
1060 
1061     // Ignore calls into the split-stack api.
1062     if (rel.sym->getName().startswith("__morestack")) {
1063       if (rel.sym->getName().equals("__morestack"))
1064         morestackCalls.push_back(&rel);
1065       continue;
1066     }
1067 
1068     // A relocation to non-function isn't relevant. Sometimes
1069     // __morestack is not marked as a function, so this check comes
1070     // after the name check.
1071     if (rel.sym->type != STT_FUNC)
1072       continue;
1073 
1074     // If the callee's-file was compiled with split stack, nothing to do.  In
1075     // this context, a "Defined" symbol is one "defined by the binary currently
1076     // being produced". So an "undefined" symbol might be provided by a shared
1077     // library. It is not possible to tell how such symbols were compiled, so be
1078     // conservative.
1079     if (Defined *d = dyn_cast<Defined>(rel.sym))
1080       if (InputSection *isec = cast_or_null<InputSection>(d->section))
1081         if (!isec || !isec->getFile<ELFT>() || isec->getFile<ELFT>()->splitStack)
1082           continue;
1083 
1084     if (enclosingPrologueAttempted(rel.offset, prologues))
1085       continue;
1086 
1087     if (Defined *f = getEnclosingFunction<ELFT>(rel.offset)) {
1088       prologues.insert(f);
1089       if (target->adjustPrologueForCrossSplitStack(buf + getOffset(f->value),
1090                                                    end, f->stOther))
1091         continue;
1092       if (!getFile<ELFT>()->someNoSplitStack)
1093         error(toString(this) + ": " + f->getName() +
1094               " (with -fsplit-stack) calls " + rel.sym->getName() +
1095               " (without -fsplit-stack), but couldn't adjust its prologue");
1096     }
1097   }
1098 
1099   if (target->needsMoreStackNonSplit)
1100     switchMorestackCallsToMorestackNonSplit(prologues, morestackCalls);
1101 }
1102 
1103 template <class ELFT> void InputSection::writeTo(uint8_t *buf) {
1104   if (type == SHT_NOBITS)
1105     return;
1106 
1107   if (auto *s = dyn_cast<SyntheticSection>(this)) {
1108     s->writeTo(buf + outSecOff);
1109     return;
1110   }
1111 
1112   // If -r or --emit-relocs is given, then an InputSection
1113   // may be a relocation section.
1114   if (type == SHT_RELA) {
1115     copyRelocations<ELFT>(buf + outSecOff, getDataAs<typename ELFT::Rela>());
1116     return;
1117   }
1118   if (type == SHT_REL) {
1119     copyRelocations<ELFT>(buf + outSecOff, getDataAs<typename ELFT::Rel>());
1120     return;
1121   }
1122 
1123   // If -r is given, we may have a SHT_GROUP section.
1124   if (type == SHT_GROUP) {
1125     copyShtGroup<ELFT>(buf + outSecOff);
1126     return;
1127   }
1128 
1129   // If this is a compressed section, uncompress section contents directly
1130   // to the buffer.
1131   if (uncompressedSize >= 0) {
1132     size_t size = uncompressedSize;
1133     if (Error e = zlib::uncompress(toStringRef(rawData),
1134                                    (char *)(buf + outSecOff), size))
1135       fatal(toString(this) +
1136             ": uncompress failed: " + llvm::toString(std::move(e)));
1137     uint8_t *bufEnd = buf + outSecOff + size;
1138     relocate<ELFT>(buf, bufEnd);
1139     return;
1140   }
1141 
1142   // Copy section contents from source object file to output file
1143   // and then apply relocations.
1144   memcpy(buf + outSecOff, data().data(), data().size());
1145   uint8_t *bufEnd = buf + outSecOff + data().size();
1146   relocate<ELFT>(buf, bufEnd);
1147 }
1148 
1149 void InputSection::replace(InputSection *other) {
1150   alignment = std::max(alignment, other->alignment);
1151 
1152   // When a section is replaced with another section that was allocated to
1153   // another partition, the replacement section (and its associated sections)
1154   // need to be placed in the main partition so that both partitions will be
1155   // able to access it.
1156   if (partition != other->partition) {
1157     partition = 1;
1158     for (InputSection *isec : dependentSections)
1159       isec->partition = 1;
1160   }
1161 
1162   other->repl = repl;
1163   other->markDead();
1164 }
1165 
1166 template <class ELFT>
1167 EhInputSection::EhInputSection(ObjFile<ELFT> &f,
1168                                const typename ELFT::Shdr &header,
1169                                StringRef name)
1170     : InputSectionBase(f, header, name, InputSectionBase::EHFrame) {}
1171 
1172 SyntheticSection *EhInputSection::getParent() const {
1173   return cast_or_null<SyntheticSection>(parent);
1174 }
1175 
1176 // Returns the index of the first relocation that points to a region between
1177 // Begin and Begin+Size.
1178 template <class IntTy, class RelTy>
1179 static unsigned getReloc(IntTy begin, IntTy size, const ArrayRef<RelTy> &rels,
1180                          unsigned &relocI) {
1181   // Start search from RelocI for fast access. That works because the
1182   // relocations are sorted in .eh_frame.
1183   for (unsigned n = rels.size(); relocI < n; ++relocI) {
1184     const RelTy &rel = rels[relocI];
1185     if (rel.r_offset < begin)
1186       continue;
1187 
1188     if (rel.r_offset < begin + size)
1189       return relocI;
1190     return -1;
1191   }
1192   return -1;
1193 }
1194 
1195 // .eh_frame is a sequence of CIE or FDE records.
1196 // This function splits an input section into records and returns them.
1197 template <class ELFT> void EhInputSection::split() {
1198   if (areRelocsRela)
1199     split<ELFT>(relas<ELFT>());
1200   else
1201     split<ELFT>(rels<ELFT>());
1202 }
1203 
1204 template <class ELFT, class RelTy>
1205 void EhInputSection::split(ArrayRef<RelTy> rels) {
1206   unsigned relI = 0;
1207   for (size_t off = 0, end = data().size(); off != end;) {
1208     size_t size = readEhRecordSize(this, off);
1209     pieces.emplace_back(off, this, size, getReloc(off, size, rels, relI));
1210     // The empty record is the end marker.
1211     if (size == 4)
1212       break;
1213     off += size;
1214   }
1215 }
1216 
1217 static size_t findNull(StringRef s, size_t entSize) {
1218   // Optimize the common case.
1219   if (entSize == 1)
1220     return s.find(0);
1221 
1222   for (unsigned i = 0, n = s.size(); i != n; i += entSize) {
1223     const char *b = s.begin() + i;
1224     if (std::all_of(b, b + entSize, [](char c) { return c == 0; }))
1225       return i;
1226   }
1227   return StringRef::npos;
1228 }
1229 
1230 SyntheticSection *MergeInputSection::getParent() const {
1231   return cast_or_null<SyntheticSection>(parent);
1232 }
1233 
1234 // Split SHF_STRINGS section. Such section is a sequence of
1235 // null-terminated strings.
1236 void MergeInputSection::splitStrings(ArrayRef<uint8_t> data, size_t entSize) {
1237   size_t off = 0;
1238   bool isAlloc = flags & SHF_ALLOC;
1239   StringRef s = toStringRef(data);
1240 
1241   while (!s.empty()) {
1242     size_t end = findNull(s, entSize);
1243     if (end == StringRef::npos)
1244       fatal(toString(this) + ": string is not null terminated");
1245     size_t size = end + entSize;
1246 
1247     pieces.emplace_back(off, xxHash64(s.substr(0, size)), !isAlloc);
1248     s = s.substr(size);
1249     off += size;
1250   }
1251 }
1252 
1253 // Split non-SHF_STRINGS section. Such section is a sequence of
1254 // fixed size records.
1255 void MergeInputSection::splitNonStrings(ArrayRef<uint8_t> data,
1256                                         size_t entSize) {
1257   size_t size = data.size();
1258   assert((size % entSize) == 0);
1259   bool isAlloc = flags & SHF_ALLOC;
1260 
1261   for (size_t i = 0; i != size; i += entSize)
1262     pieces.emplace_back(i, xxHash64(data.slice(i, entSize)), !isAlloc);
1263 }
1264 
1265 template <class ELFT>
1266 MergeInputSection::MergeInputSection(ObjFile<ELFT> &f,
1267                                      const typename ELFT::Shdr &header,
1268                                      StringRef name)
1269     : InputSectionBase(f, header, name, InputSectionBase::Merge) {}
1270 
1271 MergeInputSection::MergeInputSection(uint64_t flags, uint32_t type,
1272                                      uint64_t entsize, ArrayRef<uint8_t> data,
1273                                      StringRef name)
1274     : InputSectionBase(nullptr, flags, type, entsize, /*Link*/ 0, /*Info*/ 0,
1275                        /*Alignment*/ entsize, data, name, SectionBase::Merge) {}
1276 
1277 // This function is called after we obtain a complete list of input sections
1278 // that need to be linked. This is responsible to split section contents
1279 // into small chunks for further processing.
1280 //
1281 // Note that this function is called from parallelForEach. This must be
1282 // thread-safe (i.e. no memory allocation from the pools).
1283 void MergeInputSection::splitIntoPieces() {
1284   assert(pieces.empty());
1285 
1286   if (flags & SHF_STRINGS)
1287     splitStrings(data(), entsize);
1288   else
1289     splitNonStrings(data(), entsize);
1290 }
1291 
1292 SectionPiece *MergeInputSection::getSectionPiece(uint64_t offset) {
1293   if (this->data().size() <= offset)
1294     fatal(toString(this) + ": offset is outside the section");
1295 
1296   // If Offset is not at beginning of a section piece, it is not in the map.
1297   // In that case we need to  do a binary search of the original section piece vector.
1298   auto it = partition_point(
1299       pieces, [=](SectionPiece p) { return p.inputOff <= offset; });
1300   return &it[-1];
1301 }
1302 
1303 // Returns the offset in an output section for a given input offset.
1304 // Because contents of a mergeable section is not contiguous in output,
1305 // it is not just an addition to a base output offset.
1306 uint64_t MergeInputSection::getParentOffset(uint64_t offset) const {
1307   // If Offset is not at beginning of a section piece, it is not in the map.
1308   // In that case we need to search from the original section piece vector.
1309   const SectionPiece &piece =
1310       *(const_cast<MergeInputSection *>(this)->getSectionPiece (offset));
1311   uint64_t addend = offset - piece.inputOff;
1312   return piece.outputOff + addend;
1313 }
1314 
1315 template InputSection::InputSection(ObjFile<ELF32LE> &, const ELF32LE::Shdr &,
1316                                     StringRef);
1317 template InputSection::InputSection(ObjFile<ELF32BE> &, const ELF32BE::Shdr &,
1318                                     StringRef);
1319 template InputSection::InputSection(ObjFile<ELF64LE> &, const ELF64LE::Shdr &,
1320                                     StringRef);
1321 template InputSection::InputSection(ObjFile<ELF64BE> &, const ELF64BE::Shdr &,
1322                                     StringRef);
1323 
1324 template std::string InputSectionBase::getLocation<ELF32LE>(uint64_t);
1325 template std::string InputSectionBase::getLocation<ELF32BE>(uint64_t);
1326 template std::string InputSectionBase::getLocation<ELF64LE>(uint64_t);
1327 template std::string InputSectionBase::getLocation<ELF64BE>(uint64_t);
1328 
1329 template void InputSection::writeTo<ELF32LE>(uint8_t *);
1330 template void InputSection::writeTo<ELF32BE>(uint8_t *);
1331 template void InputSection::writeTo<ELF64LE>(uint8_t *);
1332 template void InputSection::writeTo<ELF64BE>(uint8_t *);
1333 
1334 template MergeInputSection::MergeInputSection(ObjFile<ELF32LE> &,
1335                                               const ELF32LE::Shdr &, StringRef);
1336 template MergeInputSection::MergeInputSection(ObjFile<ELF32BE> &,
1337                                               const ELF32BE::Shdr &, StringRef);
1338 template MergeInputSection::MergeInputSection(ObjFile<ELF64LE> &,
1339                                               const ELF64LE::Shdr &, StringRef);
1340 template MergeInputSection::MergeInputSection(ObjFile<ELF64BE> &,
1341                                               const ELF64BE::Shdr &, StringRef);
1342 
1343 template EhInputSection::EhInputSection(ObjFile<ELF32LE> &,
1344                                         const ELF32LE::Shdr &, StringRef);
1345 template EhInputSection::EhInputSection(ObjFile<ELF32BE> &,
1346                                         const ELF32BE::Shdr &, StringRef);
1347 template EhInputSection::EhInputSection(ObjFile<ELF64LE> &,
1348                                         const ELF64LE::Shdr &, StringRef);
1349 template EhInputSection::EhInputSection(ObjFile<ELF64BE> &,
1350                                         const ELF64BE::Shdr &, StringRef);
1351 
1352 template void EhInputSection::split<ELF32LE>();
1353 template void EhInputSection::split<ELF32BE>();
1354 template void EhInputSection::split<ELF64LE>();
1355 template void EhInputSection::split<ELF64BE>();
1356 
1357 } // namespace elf
1358 } // namespace lld
1359