annotate lld/COFF/LTO.cpp @ 201:a96fbbdf2d0f

...
author Shinji KONO <kono@ie.u-ryukyu.ac.jp>
date Fri, 04 Jun 2021 21:07:06 +0900
parents 0572611fdcc8
children 2e18cbf3894f
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
150
anatofuz
parents:
diff changeset
1 //===- LTO.cpp ------------------------------------------------------------===//
anatofuz
parents:
diff changeset
2 //
anatofuz
parents:
diff changeset
3 // Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
anatofuz
parents:
diff changeset
4 // See https://llvm.org/LICENSE.txt for license information.
anatofuz
parents:
diff changeset
5 // SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
anatofuz
parents:
diff changeset
6 //
anatofuz
parents:
diff changeset
7 //===----------------------------------------------------------------------===//
anatofuz
parents:
diff changeset
8
anatofuz
parents:
diff changeset
9 #include "LTO.h"
anatofuz
parents:
diff changeset
10 #include "Config.h"
anatofuz
parents:
diff changeset
11 #include "InputFiles.h"
anatofuz
parents:
diff changeset
12 #include "Symbols.h"
anatofuz
parents:
diff changeset
13 #include "lld/Common/Args.h"
anatofuz
parents:
diff changeset
14 #include "lld/Common/ErrorHandler.h"
anatofuz
parents:
diff changeset
15 #include "lld/Common/Strings.h"
anatofuz
parents:
diff changeset
16 #include "lld/Common/TargetOptionsCommandFlags.h"
anatofuz
parents:
diff changeset
17 #include "llvm/ADT/STLExtras.h"
anatofuz
parents:
diff changeset
18 #include "llvm/ADT/SmallString.h"
anatofuz
parents:
diff changeset
19 #include "llvm/ADT/StringRef.h"
anatofuz
parents:
diff changeset
20 #include "llvm/ADT/Twine.h"
anatofuz
parents:
diff changeset
21 #include "llvm/Bitcode/BitcodeWriter.h"
anatofuz
parents:
diff changeset
22 #include "llvm/IR/DiagnosticPrinter.h"
anatofuz
parents:
diff changeset
23 #include "llvm/LTO/Caching.h"
anatofuz
parents:
diff changeset
24 #include "llvm/LTO/Config.h"
anatofuz
parents:
diff changeset
25 #include "llvm/LTO/LTO.h"
anatofuz
parents:
diff changeset
26 #include "llvm/Object/SymbolicFile.h"
anatofuz
parents:
diff changeset
27 #include "llvm/Support/CodeGen.h"
anatofuz
parents:
diff changeset
28 #include "llvm/Support/Error.h"
anatofuz
parents:
diff changeset
29 #include "llvm/Support/FileSystem.h"
anatofuz
parents:
diff changeset
30 #include "llvm/Support/MemoryBuffer.h"
anatofuz
parents:
diff changeset
31 #include "llvm/Support/raw_ostream.h"
anatofuz
parents:
diff changeset
32 #include <algorithm>
anatofuz
parents:
diff changeset
33 #include <cstddef>
anatofuz
parents:
diff changeset
34 #include <memory>
anatofuz
parents:
diff changeset
35 #include <string>
anatofuz
parents:
diff changeset
36 #include <system_error>
anatofuz
parents:
diff changeset
37 #include <vector>
anatofuz
parents:
diff changeset
38
anatofuz
parents:
diff changeset
39 using namespace llvm;
anatofuz
parents:
diff changeset
40 using namespace llvm::object;
173
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
41 using namespace lld;
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
42 using namespace lld::coff;
150
anatofuz
parents:
diff changeset
43
anatofuz
parents:
diff changeset
44 // Creates an empty file to and returns a raw_fd_ostream to write to it.
anatofuz
parents:
diff changeset
45 static std::unique_ptr<raw_fd_ostream> openFile(StringRef file) {
anatofuz
parents:
diff changeset
46 std::error_code ec;
anatofuz
parents:
diff changeset
47 auto ret =
anatofuz
parents:
diff changeset
48 std::make_unique<raw_fd_ostream>(file, ec, sys::fs::OpenFlags::OF_None);
anatofuz
parents:
diff changeset
49 if (ec) {
anatofuz
parents:
diff changeset
50 error("cannot open " + file + ": " + ec.message());
anatofuz
parents:
diff changeset
51 return nullptr;
anatofuz
parents:
diff changeset
52 }
anatofuz
parents:
diff changeset
53 return ret;
anatofuz
parents:
diff changeset
54 }
anatofuz
parents:
diff changeset
55
anatofuz
parents:
diff changeset
56 static std::string getThinLTOOutputFile(StringRef path) {
anatofuz
parents:
diff changeset
57 return lto::getThinLTOOutputFile(
anatofuz
parents:
diff changeset
58 std::string(path), std::string(config->thinLTOPrefixReplace.first),
anatofuz
parents:
diff changeset
59 std::string(config->thinLTOPrefixReplace.second));
anatofuz
parents:
diff changeset
60 }
anatofuz
parents:
diff changeset
61
anatofuz
parents:
diff changeset
62 static lto::Config createConfig() {
anatofuz
parents:
diff changeset
63 lto::Config c;
anatofuz
parents:
diff changeset
64 c.Options = initTargetOptionsFromCodeGenFlags();
anatofuz
parents:
diff changeset
65
anatofuz
parents:
diff changeset
66 // Always emit a section per function/datum with LTO. LLVM LTO should get most
anatofuz
parents:
diff changeset
67 // of the benefit of linker GC, but there are still opportunities for ICF.
anatofuz
parents:
diff changeset
68 c.Options.FunctionSections = true;
anatofuz
parents:
diff changeset
69 c.Options.DataSections = true;
anatofuz
parents:
diff changeset
70
anatofuz
parents:
diff changeset
71 // Use static reloc model on 32-bit x86 because it usually results in more
anatofuz
parents:
diff changeset
72 // compact code, and because there are also known code generation bugs when
anatofuz
parents:
diff changeset
73 // using the PIC model (see PR34306).
anatofuz
parents:
diff changeset
74 if (config->machine == COFF::IMAGE_FILE_MACHINE_I386)
anatofuz
parents:
diff changeset
75 c.RelocModel = Reloc::Static;
anatofuz
parents:
diff changeset
76 else
anatofuz
parents:
diff changeset
77 c.RelocModel = Reloc::PIC_;
anatofuz
parents:
diff changeset
78 c.DisableVerify = true;
anatofuz
parents:
diff changeset
79 c.DiagHandler = diagnosticHandler;
anatofuz
parents:
diff changeset
80 c.OptLevel = config->ltoo;
anatofuz
parents:
diff changeset
81 c.CPU = getCPUStr();
anatofuz
parents:
diff changeset
82 c.MAttrs = getMAttrs();
anatofuz
parents:
diff changeset
83 c.CGOptLevel = args::getCGOptLevel(config->ltoo);
173
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
84 c.AlwaysEmitRegularLTOObj = !config->ltoObjPath.empty();
150
anatofuz
parents:
diff changeset
85
anatofuz
parents:
diff changeset
86 if (config->saveTemps)
anatofuz
parents:
diff changeset
87 checkError(c.addSaveTemps(std::string(config->outputFile) + ".",
anatofuz
parents:
diff changeset
88 /*UseInputModulePath*/ true));
anatofuz
parents:
diff changeset
89 return c;
anatofuz
parents:
diff changeset
90 }
anatofuz
parents:
diff changeset
91
anatofuz
parents:
diff changeset
92 BitcodeCompiler::BitcodeCompiler() {
anatofuz
parents:
diff changeset
93 // Initialize indexFile.
anatofuz
parents:
diff changeset
94 if (!config->thinLTOIndexOnlyArg.empty())
anatofuz
parents:
diff changeset
95 indexFile = openFile(config->thinLTOIndexOnlyArg);
anatofuz
parents:
diff changeset
96
anatofuz
parents:
diff changeset
97 // Initialize ltoObj.
anatofuz
parents:
diff changeset
98 lto::ThinBackend backend;
anatofuz
parents:
diff changeset
99 if (config->thinLTOIndexOnly) {
anatofuz
parents:
diff changeset
100 auto OnIndexWrite = [&](StringRef S) { thinIndices.erase(S); };
anatofuz
parents:
diff changeset
101 backend = lto::createWriteIndexesThinBackend(
anatofuz
parents:
diff changeset
102 std::string(config->thinLTOPrefixReplace.first),
anatofuz
parents:
diff changeset
103 std::string(config->thinLTOPrefixReplace.second),
anatofuz
parents:
diff changeset
104 config->thinLTOEmitImportsFiles, indexFile.get(), OnIndexWrite);
173
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
105 } else {
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
106 backend = lto::createInProcessThinBackend(
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
107 llvm::heavyweight_hardware_concurrency(config->thinLTOJobs));
150
anatofuz
parents:
diff changeset
108 }
anatofuz
parents:
diff changeset
109
anatofuz
parents:
diff changeset
110 ltoObj = std::make_unique<lto::LTO>(createConfig(), backend,
anatofuz
parents:
diff changeset
111 config->ltoPartitions);
anatofuz
parents:
diff changeset
112 }
anatofuz
parents:
diff changeset
113
anatofuz
parents:
diff changeset
114 BitcodeCompiler::~BitcodeCompiler() = default;
anatofuz
parents:
diff changeset
115
anatofuz
parents:
diff changeset
116 static void undefine(Symbol *s) { replaceSymbol<Undefined>(s, s->getName()); }
anatofuz
parents:
diff changeset
117
anatofuz
parents:
diff changeset
118 void BitcodeCompiler::add(BitcodeFile &f) {
anatofuz
parents:
diff changeset
119 lto::InputFile &obj = *f.obj;
anatofuz
parents:
diff changeset
120 unsigned symNum = 0;
anatofuz
parents:
diff changeset
121 std::vector<Symbol *> symBodies = f.getSymbols();
anatofuz
parents:
diff changeset
122 std::vector<lto::SymbolResolution> resols(symBodies.size());
anatofuz
parents:
diff changeset
123
anatofuz
parents:
diff changeset
124 if (config->thinLTOIndexOnly)
anatofuz
parents:
diff changeset
125 thinIndices.insert(obj.getName());
anatofuz
parents:
diff changeset
126
anatofuz
parents:
diff changeset
127 // Provide a resolution to the LTO API for each symbol.
anatofuz
parents:
diff changeset
128 for (const lto::InputFile::Symbol &objSym : obj.symbols()) {
anatofuz
parents:
diff changeset
129 Symbol *sym = symBodies[symNum];
anatofuz
parents:
diff changeset
130 lto::SymbolResolution &r = resols[symNum];
anatofuz
parents:
diff changeset
131 ++symNum;
anatofuz
parents:
diff changeset
132
anatofuz
parents:
diff changeset
133 // Ideally we shouldn't check for SF_Undefined but currently IRObjectFile
anatofuz
parents:
diff changeset
134 // reports two symbols for module ASM defined. Without this check, lld
anatofuz
parents:
diff changeset
135 // flags an undefined in IR with a definition in ASM as prevailing.
anatofuz
parents:
diff changeset
136 // Once IRObjectFile is fixed to report only one symbol this hack can
anatofuz
parents:
diff changeset
137 // be removed.
anatofuz
parents:
diff changeset
138 r.Prevailing = !objSym.isUndefined() && sym->getFile() == &f;
anatofuz
parents:
diff changeset
139 r.VisibleToRegularObj = sym->isUsedInRegularObj;
anatofuz
parents:
diff changeset
140 if (r.Prevailing)
anatofuz
parents:
diff changeset
141 undefine(sym);
anatofuz
parents:
diff changeset
142 }
anatofuz
parents:
diff changeset
143 checkError(ltoObj->add(std::move(f.obj), resols));
anatofuz
parents:
diff changeset
144 }
anatofuz
parents:
diff changeset
145
anatofuz
parents:
diff changeset
146 // Merge all the bitcode files we have seen, codegen the result
anatofuz
parents:
diff changeset
147 // and return the resulting objects.
173
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
148 std::vector<InputFile *> BitcodeCompiler::compile() {
150
anatofuz
parents:
diff changeset
149 unsigned maxTasks = ltoObj->getMaxTasks();
anatofuz
parents:
diff changeset
150 buf.resize(maxTasks);
anatofuz
parents:
diff changeset
151 files.resize(maxTasks);
anatofuz
parents:
diff changeset
152
anatofuz
parents:
diff changeset
153 // The /lldltocache option specifies the path to a directory in which to cache
anatofuz
parents:
diff changeset
154 // native object files for ThinLTO incremental builds. If a path was
anatofuz
parents:
diff changeset
155 // specified, configure LTO to use it as the cache directory.
anatofuz
parents:
diff changeset
156 lto::NativeObjectCache cache;
anatofuz
parents:
diff changeset
157 if (!config->ltoCache.empty())
anatofuz
parents:
diff changeset
158 cache = check(lto::localCache(
anatofuz
parents:
diff changeset
159 config->ltoCache, [&](size_t task, std::unique_ptr<MemoryBuffer> mb) {
anatofuz
parents:
diff changeset
160 files[task] = std::move(mb);
anatofuz
parents:
diff changeset
161 }));
anatofuz
parents:
diff changeset
162
anatofuz
parents:
diff changeset
163 checkError(ltoObj->run(
anatofuz
parents:
diff changeset
164 [&](size_t task) {
anatofuz
parents:
diff changeset
165 return std::make_unique<lto::NativeObjectStream>(
anatofuz
parents:
diff changeset
166 std::make_unique<raw_svector_ostream>(buf[task]));
anatofuz
parents:
diff changeset
167 },
anatofuz
parents:
diff changeset
168 cache));
anatofuz
parents:
diff changeset
169
anatofuz
parents:
diff changeset
170 // Emit empty index files for non-indexed files
anatofuz
parents:
diff changeset
171 for (StringRef s : thinIndices) {
anatofuz
parents:
diff changeset
172 std::string path = getThinLTOOutputFile(s);
anatofuz
parents:
diff changeset
173 openFile(path + ".thinlto.bc");
anatofuz
parents:
diff changeset
174 if (config->thinLTOEmitImportsFiles)
anatofuz
parents:
diff changeset
175 openFile(path + ".imports");
anatofuz
parents:
diff changeset
176 }
anatofuz
parents:
diff changeset
177
anatofuz
parents:
diff changeset
178 // ThinLTO with index only option is required to generate only the index
anatofuz
parents:
diff changeset
179 // files. After that, we exit from linker and ThinLTO backend runs in a
anatofuz
parents:
diff changeset
180 // distributed environment.
anatofuz
parents:
diff changeset
181 if (config->thinLTOIndexOnly) {
anatofuz
parents:
diff changeset
182 if (!config->ltoObjPath.empty())
anatofuz
parents:
diff changeset
183 saveBuffer(buf[0], config->ltoObjPath);
anatofuz
parents:
diff changeset
184 if (indexFile)
anatofuz
parents:
diff changeset
185 indexFile->close();
anatofuz
parents:
diff changeset
186 return {};
anatofuz
parents:
diff changeset
187 }
anatofuz
parents:
diff changeset
188
anatofuz
parents:
diff changeset
189 if (!config->ltoCache.empty())
anatofuz
parents:
diff changeset
190 pruneCache(config->ltoCache, config->ltoCachePolicy);
anatofuz
parents:
diff changeset
191
173
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
192 std::vector<InputFile *> ret;
150
anatofuz
parents:
diff changeset
193 for (unsigned i = 0; i != maxTasks; ++i) {
173
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
194 // Assign unique names to LTO objects. This ensures they have unique names
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
195 // in the PDB if one is produced. The names should look like:
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
196 // - foo.exe.lto.obj
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
197 // - foo.exe.lto.1.obj
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
198 // - ...
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
199 StringRef ltoObjName =
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
200 saver.save(Twine(config->outputFile) + ".lto" +
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
201 (i == 0 ? Twine("") : Twine('.') + Twine(i)) + ".obj");
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
202
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
203 // Get the native object contents either from the cache or from memory. Do
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
204 // not use the cached MemoryBuffer directly, or the PDB will not be
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
205 // deterministic.
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
206 StringRef objBuf;
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
207 if (files[i])
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
208 objBuf = files[i]->getBuffer();
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
209 else
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
210 objBuf = buf[i];
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
211 if (objBuf.empty())
150
anatofuz
parents:
diff changeset
212 continue;
173
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
213
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
214 if (config->saveTemps)
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
215 saveBuffer(buf[i], ltoObjName);
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
216 ret.push_back(make<ObjFile>(MemoryBufferRef(objBuf, ltoObjName)));
150
anatofuz
parents:
diff changeset
217 }
anatofuz
parents:
diff changeset
218
anatofuz
parents:
diff changeset
219 return ret;
anatofuz
parents:
diff changeset
220 }