0
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1 //===-lto.cpp - LLVM Link Time Optimizer ----------------------------------===//
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
2 //
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
3 // The LLVM Compiler Infrastructure
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
4 //
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
5 // This file is distributed under the University of Illinois Open Source
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
6 // License. See LICENSE.TXT for details.
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
7 //
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
8 //===----------------------------------------------------------------------===//
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
9 //
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
10 // This file implements the Link Time Optimization library. This library is
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
11 // intended to be used by linker to optimize code at link time.
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
12 //
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
13 //===----------------------------------------------------------------------===//
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
14
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
15 #include "llvm-c/lto.h"
|
|
95
|
16 #include "llvm/ADT/STLExtras.h"
|
0
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
17 #include "llvm/CodeGen/CommandFlags.h"
|
|
83
|
18 #include "llvm/IR/LLVMContext.h"
|
0
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
19 #include "llvm/LTO/LTOCodeGenerator.h"
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
20 #include "llvm/LTO/LTOModule.h"
|
|
77
|
21 #include "llvm/Support/MemoryBuffer.h"
|
|
83
|
22 #include "llvm/Support/Signals.h"
|
|
77
|
23 #include "llvm/Support/TargetSelect.h"
|
0
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
24
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
25 // extra command-line flags needed for LTOCodeGenerator
|
|
95
|
26 static cl::opt<char>
|
|
|
27 OptLevel("O",
|
|
|
28 cl::desc("Optimization level. [-O0, -O1, -O2, or -O3] "
|
|
|
29 "(default = '-O2')"),
|
|
|
30 cl::Prefix,
|
|
|
31 cl::ZeroOrMore,
|
|
|
32 cl::init('2'));
|
0
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
33
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
34 static cl::opt<bool>
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
35 DisableInline("disable-inlining", cl::init(false),
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
36 cl::desc("Do not run the inliner pass"));
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
37
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
38 static cl::opt<bool>
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
39 DisableGVNLoadPRE("disable-gvn-loadpre", cl::init(false),
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
40 cl::desc("Do not run the GVN load PRE pass"));
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
41
|
|
83
|
42 static cl::opt<bool>
|
|
|
43 DisableLTOVectorization("disable-lto-vectorization", cl::init(false),
|
|
|
44 cl::desc("Do not run loop or slp vectorization during LTO"));
|
|
|
45
|
|
95
|
46 #ifdef NDEBUG
|
|
|
47 static bool VerifyByDefault = false;
|
|
|
48 #else
|
|
|
49 static bool VerifyByDefault = true;
|
|
|
50 #endif
|
|
|
51
|
|
|
52 static cl::opt<bool> DisableVerify(
|
|
|
53 "disable-llvm-verifier", cl::init(!VerifyByDefault),
|
|
|
54 cl::desc("Don't run the LLVM verifier during the optimization pipeline"));
|
|
|
55
|
0
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
56 // Holds most recent error string.
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
57 // *** Not thread safe ***
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
58 static std::string sLastErrorString;
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
59
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
60 // Holds the initialization state of the LTO module.
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
61 // *** Not thread safe ***
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
62 static bool initialized = false;
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
63
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
64 // Holds the command-line option parsing state of the LTO module.
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
65 static bool parsedOptions = false;
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
66
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
67 // Initialize the configured targets if they have not been initialized.
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
68 static void lto_initialize() {
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
69 if (!initialized) {
|
|
83
|
70 #ifdef LLVM_ON_WIN32
|
|
|
71 // Dialog box on crash disabling doesn't work across DLL boundaries, so do
|
|
|
72 // it here.
|
|
|
73 llvm::sys::DisableSystemDialogsOnCrash();
|
|
|
74 #endif
|
|
|
75
|
|
77
|
76 InitializeAllTargetInfos();
|
|
|
77 InitializeAllTargets();
|
|
|
78 InitializeAllTargetMCs();
|
|
|
79 InitializeAllAsmParsers();
|
|
|
80 InitializeAllAsmPrinters();
|
|
|
81 InitializeAllDisassemblers();
|
0
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
82 initialized = true;
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
83 }
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
84 }
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
85
|
|
95
|
86 namespace {
|
|
|
87
|
|
|
88 // This derived class owns the native object file. This helps implement the
|
|
|
89 // libLTO API semantics, which require that the code generator owns the object
|
|
|
90 // file.
|
|
|
91 struct LibLTOCodeGenerator : LTOCodeGenerator {
|
|
|
92 LibLTOCodeGenerator() {}
|
|
|
93 LibLTOCodeGenerator(std::unique_ptr<LLVMContext> Context)
|
|
|
94 : LTOCodeGenerator(std::move(Context)) {}
|
|
|
95
|
|
|
96 std::unique_ptr<MemoryBuffer> NativeObjectFile;
|
|
|
97 };
|
|
|
98
|
|
|
99 }
|
|
|
100
|
|
|
101 DEFINE_SIMPLE_CONVERSION_FUNCTIONS(LibLTOCodeGenerator, lto_code_gen_t)
|
|
77
|
102 DEFINE_SIMPLE_CONVERSION_FUNCTIONS(LTOModule, lto_module_t)
|
|
|
103
|
|
|
104 // Convert the subtarget features into a string to pass to LTOCodeGenerator.
|
|
|
105 static void lto_add_attrs(lto_code_gen_t cg) {
|
|
|
106 LTOCodeGenerator *CG = unwrap(cg);
|
|
|
107 if (MAttrs.size()) {
|
|
|
108 std::string attrs;
|
|
|
109 for (unsigned i = 0; i < MAttrs.size(); ++i) {
|
|
|
110 if (i > 0)
|
|
|
111 attrs.append(",");
|
|
|
112 attrs.append(MAttrs[i]);
|
|
|
113 }
|
|
|
114
|
|
|
115 CG->setAttr(attrs.c_str());
|
|
|
116 }
|
|
95
|
117
|
|
|
118 if (OptLevel < '0' || OptLevel > '3')
|
|
|
119 report_fatal_error("Optimization level must be between 0 and 3");
|
|
|
120 CG->setOptLevel(OptLevel - '0');
|
0
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
121 }
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
122
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
123 extern const char* lto_get_version() {
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
124 return LTOCodeGenerator::getVersionString();
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
125 }
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
126
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
127 const char* lto_get_error_message() {
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
128 return sLastErrorString.c_str();
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
129 }
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
130
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
131 bool lto_module_is_object_file(const char* path) {
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
132 return LTOModule::isBitcodeFile(path);
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
133 }
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
134
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
135 bool lto_module_is_object_file_for_target(const char* path,
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
136 const char* target_triplet_prefix) {
|
|
77
|
137 ErrorOr<std::unique_ptr<MemoryBuffer>> Buffer = MemoryBuffer::getFile(path);
|
|
|
138 if (!Buffer)
|
|
|
139 return false;
|
|
|
140 return LTOModule::isBitcodeForTarget(Buffer->get(), target_triplet_prefix);
|
0
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
141 }
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
142
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
143 bool lto_module_is_object_file_in_memory(const void* mem, size_t length) {
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
144 return LTOModule::isBitcodeFile(mem, length);
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
145 }
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
146
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
147 bool
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
148 lto_module_is_object_file_in_memory_for_target(const void* mem,
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
149 size_t length,
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
150 const char* target_triplet_prefix) {
|
|
77
|
151 std::unique_ptr<MemoryBuffer> buffer(LTOModule::makeBuffer(mem, length));
|
|
|
152 if (!buffer)
|
|
|
153 return false;
|
|
|
154 return LTOModule::isBitcodeForTarget(buffer.get(), target_triplet_prefix);
|
0
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
155 }
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
156
|
|
77
|
157 lto_module_t lto_module_create(const char* path) {
|
|
|
158 lto_initialize();
|
|
|
159 llvm::TargetOptions Options = InitTargetOptionsFromCodeGenFlags();
|
|
|
160 return wrap(LTOModule::createFromFile(path, Options, sLastErrorString));
|
|
|
161 }
|
|
|
162
|
0
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
163 lto_module_t lto_module_create_from_fd(int fd, const char *path, size_t size) {
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
164 lto_initialize();
|
|
77
|
165 llvm::TargetOptions Options = InitTargetOptionsFromCodeGenFlags();
|
|
|
166 return wrap(
|
|
|
167 LTOModule::createFromOpenFile(fd, path, size, Options, sLastErrorString));
|
0
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
168 }
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
169
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
170 lto_module_t lto_module_create_from_fd_at_offset(int fd, const char *path,
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
171 size_t file_size,
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
172 size_t map_size,
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
173 off_t offset) {
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
174 lto_initialize();
|
|
77
|
175 llvm::TargetOptions Options = InitTargetOptionsFromCodeGenFlags();
|
|
|
176 return wrap(LTOModule::createFromOpenFileSlice(fd, path, map_size, offset,
|
|
|
177 Options, sLastErrorString));
|
0
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
178 }
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
179
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
180 lto_module_t lto_module_create_from_memory(const void* mem, size_t length) {
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
181 lto_initialize();
|
|
77
|
182 llvm::TargetOptions Options = InitTargetOptionsFromCodeGenFlags();
|
|
|
183 return wrap(LTOModule::createFromBuffer(mem, length, Options, sLastErrorString));
|
0
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
184 }
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
185
|
|
77
|
186 lto_module_t lto_module_create_from_memory_with_path(const void* mem,
|
|
|
187 size_t length,
|
|
|
188 const char *path) {
|
|
|
189 lto_initialize();
|
|
|
190 llvm::TargetOptions Options = InitTargetOptionsFromCodeGenFlags();
|
|
|
191 return wrap(
|
|
|
192 LTOModule::createFromBuffer(mem, length, Options, sLastErrorString, path));
|
0
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
193 }
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
194
|
|
83
|
195 lto_module_t lto_module_create_in_local_context(const void *mem, size_t length,
|
|
|
196 const char *path) {
|
|
|
197 lto_initialize();
|
|
|
198 llvm::TargetOptions Options = InitTargetOptionsFromCodeGenFlags();
|
|
|
199 return wrap(LTOModule::createInLocalContext(mem, length, Options,
|
|
|
200 sLastErrorString, path));
|
|
|
201 }
|
|
|
202
|
|
|
203 lto_module_t lto_module_create_in_codegen_context(const void *mem,
|
|
|
204 size_t length,
|
|
|
205 const char *path,
|
|
|
206 lto_code_gen_t cg) {
|
|
|
207 lto_initialize();
|
|
|
208 llvm::TargetOptions Options = InitTargetOptionsFromCodeGenFlags();
|
|
|
209 return wrap(LTOModule::createInContext(mem, length, Options, sLastErrorString,
|
|
|
210 path, &unwrap(cg)->getContext()));
|
|
|
211 }
|
|
|
212
|
|
77
|
213 void lto_module_dispose(lto_module_t mod) { delete unwrap(mod); }
|
|
|
214
|
0
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
215 const char* lto_module_get_target_triple(lto_module_t mod) {
|
|
77
|
216 return unwrap(mod)->getTargetTriple().c_str();
|
|
|
217 }
|
|
|
218
|
|
|
219 void lto_module_set_target_triple(lto_module_t mod, const char *triple) {
|
|
|
220 return unwrap(mod)->setTargetTriple(triple);
|
0
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
221 }
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
222
|
|
77
|
223 unsigned int lto_module_get_num_symbols(lto_module_t mod) {
|
|
|
224 return unwrap(mod)->getSymbolCount();
|
|
|
225 }
|
|
|
226
|
|
|
227 const char* lto_module_get_symbol_name(lto_module_t mod, unsigned int index) {
|
|
|
228 return unwrap(mod)->getSymbolName(index);
|
0
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
229 }
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
230
|
|
77
|
231 lto_symbol_attributes lto_module_get_symbol_attribute(lto_module_t mod,
|
|
|
232 unsigned int index) {
|
|
|
233 return unwrap(mod)->getSymbolAttributes(index);
|
|
|
234 }
|
|
|
235
|
|
95
|
236 const char* lto_module_get_linkeropts(lto_module_t mod) {
|
|
|
237 return unwrap(mod)->getLinkerOpts();
|
0
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
238 }
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
239
|
|
77
|
240 void lto_codegen_set_diagnostic_handler(lto_code_gen_t cg,
|
|
|
241 lto_diagnostic_handler_t diag_handler,
|
|
|
242 void *ctxt) {
|
|
|
243 unwrap(cg)->setDiagnosticHandler(diag_handler, ctxt);
|
|
|
244 }
|
|
|
245
|
|
83
|
246 static lto_code_gen_t createCodeGen(bool InLocalContext) {
|
0
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
247 lto_initialize();
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
248
|
|
77
|
249 TargetOptions Options = InitTargetOptionsFromCodeGenFlags();
|
0
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
250
|
|
95
|
251 LibLTOCodeGenerator *CodeGen =
|
|
|
252 InLocalContext ? new LibLTOCodeGenerator(make_unique<LLVMContext>())
|
|
|
253 : new LibLTOCodeGenerator();
|
|
|
254 CodeGen->setTargetOptions(Options);
|
|
77
|
255 return wrap(CodeGen);
|
0
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
256 }
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
257
|
|
83
|
258 lto_code_gen_t lto_codegen_create(void) {
|
|
|
259 return createCodeGen(/* InLocalContext */ false);
|
|
|
260 }
|
|
|
261
|
|
|
262 lto_code_gen_t lto_codegen_create_in_local_context(void) {
|
|
|
263 return createCodeGen(/* InLocalContext */ true);
|
|
|
264 }
|
|
|
265
|
|
77
|
266 void lto_codegen_dispose(lto_code_gen_t cg) { delete unwrap(cg); }
|
|
|
267
|
0
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
268 bool lto_codegen_add_module(lto_code_gen_t cg, lto_module_t mod) {
|
|
83
|
269 return !unwrap(cg)->addModule(unwrap(mod));
|
0
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
270 }
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
271
|
|
95
|
272 void lto_codegen_set_module(lto_code_gen_t cg, lto_module_t mod) {
|
|
|
273 unwrap(cg)->setModule(std::unique_ptr<LTOModule>(unwrap(mod)));
|
|
|
274 }
|
|
|
275
|
0
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
276 bool lto_codegen_set_debug_model(lto_code_gen_t cg, lto_debug_model debug) {
|
|
77
|
277 unwrap(cg)->setDebugInfo(debug);
|
0
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
278 return false;
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
279 }
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
280
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
281 bool lto_codegen_set_pic_model(lto_code_gen_t cg, lto_codegen_model model) {
|
|
95
|
282 switch (model) {
|
|
|
283 case LTO_CODEGEN_PIC_MODEL_STATIC:
|
|
|
284 unwrap(cg)->setCodePICModel(Reloc::Static);
|
|
|
285 return false;
|
|
|
286 case LTO_CODEGEN_PIC_MODEL_DYNAMIC:
|
|
|
287 unwrap(cg)->setCodePICModel(Reloc::PIC_);
|
|
|
288 return false;
|
|
|
289 case LTO_CODEGEN_PIC_MODEL_DYNAMIC_NO_PIC:
|
|
|
290 unwrap(cg)->setCodePICModel(Reloc::DynamicNoPIC);
|
|
|
291 return false;
|
|
|
292 case LTO_CODEGEN_PIC_MODEL_DEFAULT:
|
|
|
293 unwrap(cg)->setCodePICModel(Reloc::Default);
|
|
|
294 return false;
|
|
|
295 }
|
|
|
296 sLastErrorString = "Unknown PIC model";
|
|
|
297 return true;
|
0
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
298 }
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
299
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
300 void lto_codegen_set_cpu(lto_code_gen_t cg, const char *cpu) {
|
|
77
|
301 return unwrap(cg)->setCpu(cpu);
|
0
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
302 }
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
303
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
304 void lto_codegen_set_assembler_path(lto_code_gen_t cg, const char *path) {
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
305 // In here only for backwards compatibility. We use MC now.
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
306 }
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
307
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
308 void lto_codegen_set_assembler_args(lto_code_gen_t cg, const char **args,
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
309 int nargs) {
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
310 // In here only for backwards compatibility. We use MC now.
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
311 }
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
312
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
313 void lto_codegen_add_must_preserve_symbol(lto_code_gen_t cg,
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
314 const char *symbol) {
|
|
77
|
315 unwrap(cg)->addMustPreserveSymbol(symbol);
|
0
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
316 }
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
317
|
|
95
|
318 static void maybeParseOptions(lto_code_gen_t cg) {
|
0
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
319 if (!parsedOptions) {
|
|
77
|
320 unwrap(cg)->parseCodeGenDebugOptions();
|
|
|
321 lto_add_attrs(cg);
|
0
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
322 parsedOptions = true;
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
323 }
|
|
95
|
324 }
|
|
|
325
|
|
|
326 bool lto_codegen_write_merged_modules(lto_code_gen_t cg, const char *path) {
|
|
|
327 maybeParseOptions(cg);
|
|
|
328 return !unwrap(cg)->writeMergedModules(path, sLastErrorString);
|
|
|
329 }
|
|
|
330
|
|
|
331 const void *lto_codegen_compile(lto_code_gen_t cg, size_t *length) {
|
|
|
332 maybeParseOptions(cg);
|
|
|
333 LibLTOCodeGenerator *CG = unwrap(cg);
|
|
|
334 CG->NativeObjectFile =
|
|
|
335 CG->compile(DisableVerify, DisableInline, DisableGVNLoadPRE,
|
|
|
336 DisableLTOVectorization, sLastErrorString);
|
|
|
337 if (!CG->NativeObjectFile)
|
|
|
338 return nullptr;
|
|
|
339 *length = CG->NativeObjectFile->getBufferSize();
|
|
|
340 return CG->NativeObjectFile->getBufferStart();
|
|
83
|
341 }
|
|
|
342
|
|
|
343 bool lto_codegen_optimize(lto_code_gen_t cg) {
|
|
95
|
344 maybeParseOptions(cg);
|
|
|
345 return !unwrap(cg)->optimize(DisableVerify, DisableInline, DisableGVNLoadPRE,
|
|
|
346 DisableLTOVectorization, sLastErrorString);
|
|
83
|
347 }
|
|
|
348
|
|
|
349 const void *lto_codegen_compile_optimized(lto_code_gen_t cg, size_t *length) {
|
|
95
|
350 maybeParseOptions(cg);
|
|
|
351 LibLTOCodeGenerator *CG = unwrap(cg);
|
|
|
352 CG->NativeObjectFile = CG->compileOptimized(sLastErrorString);
|
|
|
353 if (!CG->NativeObjectFile)
|
|
|
354 return nullptr;
|
|
|
355 *length = CG->NativeObjectFile->getBufferSize();
|
|
|
356 return CG->NativeObjectFile->getBufferStart();
|
0
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
357 }
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
358
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
359 bool lto_codegen_compile_to_file(lto_code_gen_t cg, const char **name) {
|
|
95
|
360 maybeParseOptions(cg);
|
|
83
|
361 return !unwrap(cg)->compile_to_file(
|
|
95
|
362 name, DisableVerify, DisableInline, DisableGVNLoadPRE,
|
|
83
|
363 DisableLTOVectorization, sLastErrorString);
|
0
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
364 }
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
365
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
366 void lto_codegen_debug_options(lto_code_gen_t cg, const char *opt) {
|
|
77
|
367 unwrap(cg)->setCodeGenDebugOptions(opt);
|
0
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
368 }
|
|
83
|
369
|
|
|
370 unsigned int lto_api_version() { return LTO_API_VERSION; }
|
|
95
|
371
|
|
|
372 void lto_codegen_set_should_internalize(lto_code_gen_t cg,
|
|
|
373 bool ShouldInternalize) {
|
|
|
374 unwrap(cg)->setShouldInternalize(ShouldInternalize);
|
|
|
375 }
|
|
|
376
|
|
|
377 void lto_codegen_set_should_embed_uselists(lto_code_gen_t cg,
|
|
|
378 lto_bool_t ShouldEmbedUselists) {
|
|
|
379 unwrap(cg)->setShouldEmbedUselists(ShouldEmbedUselists);
|
|
|
380 }
|
