Now that the linker supports lazily materialising globals, don't
[oota-llvm.git] / tools / lto / LTOCodeGenerator.cpp
1 //===-LTOCodeGenerator.cpp - LLVM Link Time Optimizer ---------------------===//
2 //
3 //                     The LLVM Compiler Infrastructure
4 //
5 // This file is distributed under the University of Illinois Open Source
6 // License. See LICENSE.TXT for details.
7 // 
8 //===----------------------------------------------------------------------===//
9 //
10 // This file implements the Link Time Optimization library. This library is 
11 // intended to be used by linker to optimize code at link time.
12 //
13 //===----------------------------------------------------------------------===//
14
15 #include "LTOModule.h"
16 #include "LTOCodeGenerator.h"
17 #include "llvm/Constants.h"
18 #include "llvm/DerivedTypes.h"
19 #include "llvm/Linker.h"
20 #include "llvm/LLVMContext.h"
21 #include "llvm/Module.h"
22 #include "llvm/PassManager.h"
23 #include "llvm/ADT/StringExtras.h"
24 #include "llvm/ADT/Triple.h"
25 #include "llvm/Analysis/Passes.h"
26 #include "llvm/Analysis/Verifier.h"
27 #include "llvm/Bitcode/ReaderWriter.h"
28 #include "llvm/MC/MCAsmInfo.h"
29 #include "llvm/MC/MCContext.h"
30 #include "llvm/MC/SubtargetFeature.h"
31 #include "llvm/Target/Mangler.h"
32 #include "llvm/Target/TargetOptions.h"
33 #include "llvm/Target/TargetData.h"
34 #include "llvm/Target/TargetMachine.h"
35 #include "llvm/Target/TargetRegisterInfo.h"
36 #include "llvm/Support/CommandLine.h"
37 #include "llvm/Support/FormattedStream.h"
38 #include "llvm/Support/MemoryBuffer.h"
39 #include "llvm/Support/SystemUtils.h"
40 #include "llvm/Support/ToolOutputFile.h"
41 #include "llvm/Support/Host.h"
42 #include "llvm/Support/Program.h"
43 #include "llvm/Support/Signals.h"
44 #include "llvm/Support/TargetRegistry.h"
45 #include "llvm/Support/TargetSelect.h"
46 #include "llvm/Support/system_error.h"
47 #include "llvm/Config/config.h"
48 #include "llvm/Transforms/IPO.h"
49 #include "llvm/Transforms/IPO/PassManagerBuilder.h"
50 #include <cstdlib>
51 #include <unistd.h>
52 #include <fcntl.h>
53
54
55 using namespace llvm;
56
57 static cl::opt<bool> DisableInline("disable-inlining",
58   cl::desc("Do not run the inliner pass"));
59
60
61 const char* LTOCodeGenerator::getVersionString()
62 {
63 #ifdef LLVM_VERSION_INFO
64     return PACKAGE_NAME " version " PACKAGE_VERSION ", " LLVM_VERSION_INFO;
65 #else
66     return PACKAGE_NAME " version " PACKAGE_VERSION;
67 #endif
68 }
69
70
71 LTOCodeGenerator::LTOCodeGenerator() 
72     : _context(getGlobalContext()),
73       _linker("LinkTimeOptimizer", "ld-temp.o", _context), _target(NULL),
74       _emitDwarfDebugInfo(false), _scopeRestrictionsDone(false),
75       _codeModel(LTO_CODEGEN_PIC_MODEL_DYNAMIC),
76       _nativeObjectFile(NULL)
77 {
78     InitializeAllTargets();
79     InitializeAllTargetMCs();
80     InitializeAllAsmPrinters();
81 }
82
83 LTOCodeGenerator::~LTOCodeGenerator()
84 {
85     delete _target;
86     delete _nativeObjectFile;
87 }
88
89
90
91 bool LTOCodeGenerator::addModule(LTOModule* mod, std::string& errMsg)
92 {
93   bool ret = _linker.LinkInModule(mod->getLLVVMModule(), &errMsg);
94
95   const std::vector<const char*> &undefs = mod->getAsmUndefinedRefs();
96   for (int i = 0, e = undefs.size(); i != e; ++i)
97     _asmUndefinedRefs[undefs[i]] = 1;
98
99   return ret;
100 }
101     
102
103 bool LTOCodeGenerator::setDebugInfo(lto_debug_model debug, std::string& errMsg)
104 {
105     switch (debug) {
106         case LTO_DEBUG_MODEL_NONE:
107             _emitDwarfDebugInfo = false;
108             return false;
109             
110         case LTO_DEBUG_MODEL_DWARF:
111             _emitDwarfDebugInfo = true;
112             return false;
113     }
114     errMsg = "unknown debug format";
115     return true;
116 }
117
118
119 bool LTOCodeGenerator::setCodePICModel(lto_codegen_model model, 
120                                        std::string& errMsg)
121 {
122     switch (model) {
123         case LTO_CODEGEN_PIC_MODEL_STATIC:
124         case LTO_CODEGEN_PIC_MODEL_DYNAMIC:
125         case LTO_CODEGEN_PIC_MODEL_DYNAMIC_NO_PIC:
126             _codeModel = model;
127             return false;
128     }
129     errMsg = "unknown pic model";
130     return true;
131 }
132
133 void LTOCodeGenerator::setCpu(const char* mCpu)
134 {
135   _mCpu = mCpu;
136 }
137
138 void LTOCodeGenerator::addMustPreserveSymbol(const char* sym)
139 {
140     _mustPreserveSymbols[sym] = 1;
141 }
142
143
144 bool LTOCodeGenerator::writeMergedModules(const char *path,
145                                           std::string &errMsg) {
146   if (determineTarget(errMsg))
147     return true;
148
149   // mark which symbols can not be internalized 
150   applyScopeRestrictions();
151
152   // create output file
153   std::string ErrInfo;
154   tool_output_file Out(path, ErrInfo,
155                        raw_fd_ostream::F_Binary);
156   if (!ErrInfo.empty()) {
157     errMsg = "could not open bitcode file for writing: ";
158     errMsg += path;
159     return true;
160   }
161     
162   // write bitcode to it
163   WriteBitcodeToFile(_linker.getModule(), Out.os());
164   Out.os().close();
165
166   if (Out.os().has_error()) {
167     errMsg = "could not write bitcode file: ";
168     errMsg += path;
169     Out.os().clear_error();
170     return true;
171   }
172   
173   Out.keep();
174   return false;
175 }
176
177
178 bool LTOCodeGenerator::compile_to_file(const char** name, std::string& errMsg)
179 {
180   // make unique temp .o file to put generated object file
181   sys::PathWithStatus uniqueObjPath("lto-llvm.o");
182   if ( uniqueObjPath.createTemporaryFileOnDisk(false, &errMsg) ) {
183     uniqueObjPath.eraseFromDisk();
184     return true;
185   }
186   sys::RemoveFileOnSignal(uniqueObjPath);
187
188   // generate object file
189   bool genResult = false;
190   tool_output_file objFile(uniqueObjPath.c_str(), errMsg);
191   if (!errMsg.empty())
192     return true;
193   genResult = this->generateObjectFile(objFile.os(), errMsg);
194   objFile.os().close();
195   if (objFile.os().has_error()) {
196     objFile.os().clear_error();
197     return true;
198   }
199   objFile.keep();
200   if ( genResult ) {
201     uniqueObjPath.eraseFromDisk();
202     return true;
203   }
204
205   _nativeObjectPath = uniqueObjPath.str();
206   *name = _nativeObjectPath.c_str();
207   return false;
208 }
209
210 const void* LTOCodeGenerator::compile(size_t* length, std::string& errMsg)
211 {
212   const char *name;
213   if (compile_to_file(&name, errMsg))
214     return NULL;
215
216   // remove old buffer if compile() called twice
217   delete _nativeObjectFile;
218
219   // read .o file into memory buffer
220   OwningPtr<MemoryBuffer> BuffPtr;
221   if (error_code ec = MemoryBuffer::getFile(name, BuffPtr, -1, false)) {
222     errMsg = ec.message();
223     return NULL;
224   }
225   _nativeObjectFile = BuffPtr.take();
226
227   // remove temp files
228   sys::Path(_nativeObjectPath).eraseFromDisk();
229
230   // return buffer, unless error
231   if ( _nativeObjectFile == NULL )
232     return NULL;
233   *length = _nativeObjectFile->getBufferSize();
234   return _nativeObjectFile->getBufferStart();
235 }
236
237 bool LTOCodeGenerator::determineTarget(std::string& errMsg)
238 {
239     if ( _target == NULL ) {
240         std::string Triple = _linker.getModule()->getTargetTriple();
241         if (Triple.empty())
242           Triple = sys::getDefaultTargetTriple();
243
244         // create target machine from info for merged modules
245         const Target *march = TargetRegistry::lookupTarget(Triple, errMsg);
246         if ( march == NULL )
247             return true;
248
249         // The relocation model is actually a static member of TargetMachine
250         // and needs to be set before the TargetMachine is instantiated.
251         Reloc::Model RelocModel = Reloc::Default;
252         switch( _codeModel ) {
253         case LTO_CODEGEN_PIC_MODEL_STATIC:
254             RelocModel = Reloc::Static;
255             break;
256         case LTO_CODEGEN_PIC_MODEL_DYNAMIC:
257             RelocModel = Reloc::PIC_;
258             break;
259         case LTO_CODEGEN_PIC_MODEL_DYNAMIC_NO_PIC:
260             RelocModel = Reloc::DynamicNoPIC;
261             break;
262         }
263
264         // construct LTOModule, hand over ownership of module and target
265         SubtargetFeatures Features;
266         Features.getDefaultSubtargetFeatures(llvm::Triple(Triple));
267         std::string FeatureStr = Features.getString();
268         _target = march->createTargetMachine(Triple, _mCpu, FeatureStr,
269                                              RelocModel);
270     }
271     return false;
272 }
273
274 void LTOCodeGenerator::applyRestriction(GlobalValue &GV,
275                                      std::vector<const char*> &mustPreserveList,
276                                         SmallPtrSet<GlobalValue*, 8> &asmUsed,
277                                         Mangler &mangler) {
278   SmallString<64> Buffer;
279   mangler.getNameWithPrefix(Buffer, &GV, false);
280
281   if (GV.isDeclaration())
282     return;
283   if (_mustPreserveSymbols.count(Buffer))
284     mustPreserveList.push_back(GV.getName().data());
285   if (_asmUndefinedRefs.count(Buffer))
286     asmUsed.insert(&GV);
287 }
288
289 static void findUsedValues(GlobalVariable *LLVMUsed,
290                            SmallPtrSet<GlobalValue*, 8> &UsedValues) {
291   if (LLVMUsed == 0) return;
292
293   ConstantArray *Inits = dyn_cast<ConstantArray>(LLVMUsed->getInitializer());
294   if (Inits == 0) return;
295
296   for (unsigned i = 0, e = Inits->getNumOperands(); i != e; ++i)
297     if (GlobalValue *GV = 
298           dyn_cast<GlobalValue>(Inits->getOperand(i)->stripPointerCasts()))
299       UsedValues.insert(GV);
300 }
301
302 void LTOCodeGenerator::applyScopeRestrictions() {
303   if (_scopeRestrictionsDone) return;
304   Module *mergedModule = _linker.getModule();
305
306   // Start off with a verification pass.
307   PassManager passes;
308   passes.add(createVerifierPass());
309
310   // mark which symbols can not be internalized 
311   MCContext Context(*_target->getMCAsmInfo(), *_target->getRegisterInfo(), NULL);
312   Mangler mangler(Context, *_target->getTargetData());
313   std::vector<const char*> mustPreserveList;
314   SmallPtrSet<GlobalValue*, 8> asmUsed;
315
316   for (Module::iterator f = mergedModule->begin(),
317          e = mergedModule->end(); f != e; ++f)
318     applyRestriction(*f, mustPreserveList, asmUsed, mangler);
319   for (Module::global_iterator v = mergedModule->global_begin(), 
320          e = mergedModule->global_end(); v !=  e; ++v)
321     applyRestriction(*v, mustPreserveList, asmUsed, mangler);
322   for (Module::alias_iterator a = mergedModule->alias_begin(),
323          e = mergedModule->alias_end(); a != e; ++a)
324     applyRestriction(*a, mustPreserveList, asmUsed, mangler);
325
326   GlobalVariable *LLVMCompilerUsed =
327     mergedModule->getGlobalVariable("llvm.compiler.used");
328   findUsedValues(LLVMCompilerUsed, asmUsed);
329   if (LLVMCompilerUsed)
330     LLVMCompilerUsed->eraseFromParent();
331
332   llvm::Type *i8PTy = llvm::Type::getInt8PtrTy(_context);
333   std::vector<Constant*> asmUsed2;
334   for (SmallPtrSet<GlobalValue*, 16>::const_iterator i = asmUsed.begin(),
335          e = asmUsed.end(); i !=e; ++i) {
336     GlobalValue *GV = *i;
337     Constant *c = ConstantExpr::getBitCast(GV, i8PTy);
338     asmUsed2.push_back(c);
339   }
340
341   llvm::ArrayType *ATy = llvm::ArrayType::get(i8PTy, asmUsed2.size());
342   LLVMCompilerUsed =
343     new llvm::GlobalVariable(*mergedModule, ATy, false,
344                              llvm::GlobalValue::AppendingLinkage,
345                              llvm::ConstantArray::get(ATy, asmUsed2),
346                              "llvm.compiler.used");
347
348   LLVMCompilerUsed->setSection("llvm.metadata");
349
350   passes.add(createInternalizePass(mustPreserveList));
351
352   // apply scope restrictions
353   passes.run(*mergedModule);
354   
355   _scopeRestrictionsDone = true;
356 }
357
358 /// Optimize merged modules using various IPO passes
359 bool LTOCodeGenerator::generateObjectFile(raw_ostream &out,
360                                           std::string &errMsg) {
361     if ( this->determineTarget(errMsg) ) 
362         return true;
363
364     // mark which symbols can not be internalized 
365     this->applyScopeRestrictions();
366
367     Module* mergedModule = _linker.getModule();
368
369     // if options were requested, set them
370     if ( !_codegenOptions.empty() )
371         cl::ParseCommandLineOptions(_codegenOptions.size(), 
372                                     const_cast<char **>(&_codegenOptions[0]));
373
374     // Instantiate the pass manager to organize the passes.
375     PassManager passes;
376
377     // Start off with a verification pass.
378     passes.add(createVerifierPass());
379
380     // Add an appropriate TargetData instance for this module...
381     passes.add(new TargetData(*_target->getTargetData()));
382     
383     PassManagerBuilder().populateLTOPassManager(passes, /*Internalize=*/ false,
384                                                 !DisableInline);
385
386     // Make sure everything is still good.
387     passes.add(createVerifierPass());
388
389     FunctionPassManager *codeGenPasses = new FunctionPassManager(mergedModule);
390
391     codeGenPasses->add(new TargetData(*_target->getTargetData()));
392
393     formatted_raw_ostream Out(out);
394
395     if (_target->addPassesToEmitFile(*codeGenPasses, Out,
396                                      TargetMachine::CGFT_ObjectFile,
397                                      CodeGenOpt::Aggressive)) {
398       errMsg = "target file type not supported";
399       return true;
400     }
401
402     // Run our queue of passes all at once now, efficiently.
403     passes.run(*mergedModule);
404
405     // Run the code generator, and write assembly file
406     codeGenPasses->doInitialization();
407
408     for (Module::iterator
409            it = mergedModule->begin(), e = mergedModule->end(); it != e; ++it)
410       if (!it->isDeclaration())
411         codeGenPasses->run(*it);
412
413     codeGenPasses->doFinalization();
414     delete codeGenPasses;
415
416     return false; // success
417 }
418
419
420 /// Optimize merged modules using various IPO passes
421 void LTOCodeGenerator::setCodeGenDebugOptions(const char* options)
422 {
423     for (std::pair<StringRef, StringRef> o = getToken(options);
424          !o.first.empty(); o = getToken(o.second)) {
425         // ParseCommandLineOptions() expects argv[0] to be program name.
426         // Lazily add that.
427         if ( _codegenOptions.empty() ) 
428             _codegenOptions.push_back("libLTO");
429         _codegenOptions.push_back(strdup(o.first.str().c_str()));
430     }
431 }