//
// The LLVM Compiler Infrastructure
//
-// This file was developed by Devang Patel and is distributed under
-// the University of Illinois Open Source License. See LICENSE.TXT for details.
-//
+// This file is distributed under the University of Illinois Open Source
+// License. See LICENSE.TXT for details.
+//
//===----------------------------------------------------------------------===//
//
-// This file implementes link time optimization library. This library is
+// This file implements the Link Time Optimization library. This library is
// intended to be used by linker to optimize code at link time.
//
//===----------------------------------------------------------------------===//
-#include "llvm/Module.h"
-#include "llvm/PassManager.h"
-#include "llvm/Linker.h"
-#include "llvm/Constants.h"
-#include "llvm/DerivedTypes.h"
-#include "llvm/SymbolTable.h"
-#include "llvm/Bytecode/Reader.h"
-#include "llvm/Bytecode/Writer.h"
-#include "llvm/Support/CommandLine.h"
-#include "llvm/Support/FileUtilities.h"
-#include "llvm/Support/SystemUtils.h"
-#include "llvm/System/Program.h"
-#include "llvm/System/Signals.h"
-#include "llvm/Analysis/Passes.h"
-#include "llvm/Analysis/Verifier.h"
-#include "llvm/Target/SubtargetFeature.h"
-#include "llvm/Target/TargetData.h"
-#include "llvm/Target/TargetMachine.h"
-#include "llvm/Target/TargetMachineRegistry.h"
-#include "llvm/Transforms/IPO.h"
-#include "llvm/Transforms/Scalar.h"
-#include "llvm/Analysis/LoadValueNumbering.h"
-#include "llvm/LinkTimeOptimizer.h"
-#include <fstream>
-#include <iostream>
-
-using namespace llvm;
-
-extern "C"
-llvm::LinkTimeOptimizer *createLLVMOptimizer()
-{
- llvm::LinkTimeOptimizer *l = new llvm::LinkTimeOptimizer();
- return l;
+#include "llvm-c/lto.h"
+#include "LTOCodeGenerator.h"
+#include "LTOModule.h"
+#include "llvm-c/Core.h"
+
+
+// Holds most recent error string.
+// *** Not thread safe ***
+static std::string sLastErrorString;
+
+/// lto_get_version - Returns a printable string.
+extern const char* lto_get_version() {
+ return LTOCodeGenerator::getVersionString();
+}
+
+/// lto_get_error_message - Returns the last error string or NULL if last
+/// operation was successful.
+const char* lto_get_error_message() {
+ return sLastErrorString.c_str();
+}
+
+/// lto_module_is_object_file - Validates if a file is a loadable object file.
+bool lto_module_is_object_file(const char* path) {
+ return LTOModule::isBitcodeFile(path);
+}
+
+/// lto_module_is_object_file_for_target - Validates if a file is a loadable
+/// object file compilable for requested target.
+bool lto_module_is_object_file_for_target(const char* path,
+ const char* target_triplet_prefix) {
+ return LTOModule::isBitcodeFileForTarget(path, target_triplet_prefix);
+}
+
+/// lto_module_is_object_file_in_memory - Validates if a buffer is a loadable
+/// object file.
+bool lto_module_is_object_file_in_memory(const void* mem, size_t length) {
+ return LTOModule::isBitcodeFile(mem, length);
+}
+
+/// lto_module_is_object_file_in_memory_for_target - Validates if a buffer is a
+/// loadable object file compilable for the target.
+bool
+lto_module_is_object_file_in_memory_for_target(const void* mem,
+ size_t length,
+ const char* target_triplet_prefix) {
+ return LTOModule::isBitcodeFileForTarget(mem, length, target_triplet_prefix);
+}
+
+/// lto_module_create - Loads an object file from disk. Returns NULL on error
+/// (check lto_get_error_message() for details).
+lto_module_t lto_module_create(const char* path) {
+ return LTOModule::makeLTOModule(path, sLastErrorString);
+}
+
+/// lto_module_create_from_fd - Loads an object file from disk. Returns NULL on
+/// error (check lto_get_error_message() for details).
+lto_module_t lto_module_create_from_fd(int fd, const char *path, size_t size) {
+ return LTOModule::makeLTOModule(fd, path, size, sLastErrorString);
+}
+
+/// lto_module_create_from_fd_at_offset - Loads an object file from disk.
+/// Returns NULL on error (check lto_get_error_message() for details).
+lto_module_t lto_module_create_from_fd_at_offset(int fd, const char *path,
+ size_t file_size,
+ size_t map_size,
+ off_t offset) {
+ return LTOModule::makeLTOModule(fd, path, map_size, offset, sLastErrorString);
+}
+
+/// lto_module_create_from_memory - Loads an object file from memory. Returns
+/// NULL on error (check lto_get_error_message() for details).
+lto_module_t lto_module_create_from_memory(const void* mem, size_t length) {
+ return LTOModule::makeLTOModule(mem, length, sLastErrorString);
+}
+
+/// lto_module_dispose - Frees all memory for a module. Upon return the
+/// lto_module_t is no longer valid.
+void lto_module_dispose(lto_module_t mod) {
+ delete mod;
+}
+
+/// lto_module_get_target_triple - Returns triplet string which the object
+/// module was compiled under.
+const char* lto_module_get_target_triple(lto_module_t mod) {
+ return mod->getTargetTriple();
+}
+
+/// lto_module_set_target_triple - Sets triple string with which the object will
+/// be codegened.
+void lto_module_set_target_triple(lto_module_t mod, const char *triple) {
+ return mod->setTargetTriple(triple);
+}
+
+/// lto_module_get_num_symbols - Returns the number of symbols in the object
+/// module.
+unsigned int lto_module_get_num_symbols(lto_module_t mod) {
+ return mod->getSymbolCount();
+}
+
+/// lto_module_get_symbol_name - Returns the name of the ith symbol in the
+/// object module.
+const char* lto_module_get_symbol_name(lto_module_t mod, unsigned int index) {
+ return mod->getSymbolName(index);
}
+/// lto_module_get_symbol_attribute - Returns the attributes of the ith symbol
+/// in the object module.
+lto_symbol_attributes lto_module_get_symbol_attribute(lto_module_t mod,
+ unsigned int index) {
+ return mod->getSymbolAttributes(index);
+}
+
+/// lto_codegen_create - Instantiates a code generator. Returns NULL if there
+/// is an error.
+lto_code_gen_t lto_codegen_create(void) {
+ return new LTOCodeGenerator();
+}
+/// lto_codegen_dispose - Frees all memory for a code generator. Upon return the
+/// lto_code_gen_t is no longer valid.
+void lto_codegen_dispose(lto_code_gen_t cg) {
+ delete cg;
+}
+
+/// lto_codegen_add_module - Add an object module to the set of modules for
+/// which code will be generated. Returns true on error (check
+/// lto_get_error_message() for details).
+bool lto_codegen_add_module(lto_code_gen_t cg, lto_module_t mod) {
+ return !cg->addModule(mod, sLastErrorString);
+}
+
+/// lto_codegen_set_debug_model - Sets what if any format of debug info should
+/// be generated. Returns true on error (check lto_get_error_message() for
+/// details).
+bool lto_codegen_set_debug_model(lto_code_gen_t cg, lto_debug_model debug) {
+ cg->setDebugInfo(debug);
+ return false;
+}
+
+/// lto_codegen_set_pic_model - Sets what code model to generated. Returns true
+/// on error (check lto_get_error_message() for details).
+bool lto_codegen_set_pic_model(lto_code_gen_t cg, lto_codegen_model model) {
+ cg->setCodePICModel(model);
+ return false;
+}
+
+/// lto_codegen_set_cpu - Sets the cpu to generate code for.
+void lto_codegen_set_cpu(lto_code_gen_t cg, const char *cpu) {
+ return cg->setCpu(cpu);
+}
+
+/// lto_codegen_set_assembler_path - Sets the path to the assembler tool.
+void lto_codegen_set_assembler_path(lto_code_gen_t cg, const char *path) {
+ // In here only for backwards compatibility. We use MC now.
+}
-/// If symbol is not used then make it internal and let optimizer takes
-/// care of it.
-void LLVMSymbol::mayBeNotUsed() {
- gv->setLinkage(GlobalValue::InternalLinkage);
+/// lto_codegen_set_assembler_args - Sets extra arguments that libLTO should
+/// pass to the assembler.
+void lto_codegen_set_assembler_args(lto_code_gen_t cg, const char **args,
+ int nargs) {
+ // In here only for backwards compatibility. We use MC now.
}
-// Helper routine
-// FIXME : Take advantage of GlobalPrefix from AsmPrinter
-static const char *addUnderscore(const char *name) {
- size_t namelen = strlen(name);
- char *symName = (char*)malloc(namelen+2);
- symName[0] = '_';
- strcpy(&symName[1], name);
- return symName;
+/// lto_codegen_add_must_preserve_symbol - Adds to a list of all global symbols
+/// that must exist in the final generated code. If a function is not listed
+/// there, it might be inlined into every usage and optimized away.
+void lto_codegen_add_must_preserve_symbol(lto_code_gen_t cg,
+ const char *symbol) {
+ cg->addMustPreserveSymbol(symbol);
}
-// Map LLVM LinkageType to LTO LinakgeType
-static LTOLinkageTypes
-getLTOLinkageType(GlobalValue *v)
-{
- LTOLinkageTypes lt;
- if (v->hasExternalLinkage())
- lt = LTOExternalLinkage;
- else if (v->hasLinkOnceLinkage())
- lt = LTOLinkOnceLinkage;
- else if (v->hasWeakLinkage())
- lt = LTOWeakLinkage;
- else
- // Otherwise it is internal linkage for link time optimizer
- lt = LTOInternalLinkage;
- return lt;
+/// lto_codegen_write_merged_modules - Writes a new file at the specified path
+/// that contains the merged contents of all modules added so far. Returns true
+/// on error (check lto_get_error_message() for details).
+bool lto_codegen_write_merged_modules(lto_code_gen_t cg, const char *path) {
+ return !cg->writeMergedModules(path, sLastErrorString);
}
-// Find exeternal symbols referenced by VALUE. This is a recursive function.
-static void
-findExternalRefs(Value *value, std::set<const char *> &references) {
-
- if (ConstantExpr *ce = dyn_cast<ConstantExpr>(value))
- for (unsigned i = 0, e = ce->getNumOperands(); i != e; ++i)
- findExternalRefs(ce->getOperand(i), references);
- else if (GlobalValue *gv = dyn_cast<GlobalValue>(value)) {
- LTOLinkageTypes lt = getLTOLinkageType(gv);
- if (lt != LTOInternalLinkage && strncmp (gv->getName().c_str(), "llvm.", 5))
- references.insert(addUnderscore(gv->getName().c_str()));
- }
+/// lto_codegen_compile - Generates code for all added modules into one native
+/// object file. On success returns a pointer to a generated mach-o/ELF buffer
+/// and length set to the buffer size. The buffer is owned by the lto_code_gen_t
+/// object and will be freed when lto_codegen_dispose() is called, or
+/// lto_codegen_compile() is called again. On failure, returns NULL (check
+/// lto_get_error_message() for details).
+const void *lto_codegen_compile(lto_code_gen_t cg, size_t *length) {
+ return cg->compile(length, sLastErrorString);
}
-/// InputFilename is a LLVM bytecode file. Read it using bytecode reader.
-/// Collect global functions and symbol names in symbols vector.
-/// Collect external references in references vector.
-/// Return LTO_READ_SUCCESS if there is no error.
-enum LTOStatus
-LinkTimeOptimizer::readLLVMObjectFile(const std::string &InputFilename,
- NameToSymbolMap &symbols,
- std::set<const char *> &references)
-{
- Module *m = ParseBytecodeFile(InputFilename);
- if (!m)
- return LTO_READ_FAILURE;
-
- modules.push_back(m);
-
- for (Module::iterator f = m->begin(), e = m->end(); f != e; ++f) {
-
- LTOLinkageTypes lt = getLTOLinkageType(f);
-
- if (!f->isExternal() && lt != LTOInternalLinkage
- && strncmp (f->getName().c_str(), "llvm.", 5)) {
- const char *name = addUnderscore(f->getName().c_str());
- LLVMSymbol *newSymbol = new LLVMSymbol(lt, f);
- symbols[name] = newSymbol;
- allSymbols[name] = newSymbol;
- }
-
- // Collect external symbols referenced by this function.
- for (Function::iterator b = f->begin(), fe = f->end(); b != fe; ++b)
- for (BasicBlock::iterator i = b->begin(), be = b->end();
- i != be; ++i)
- for (unsigned count = 0, total = i->getNumOperands();
- count != total; ++count)
- findExternalRefs(i->getOperand(count), references);
- }
-
- for (Module::global_iterator v = m->global_begin(), e = m->global_end();
- v != e; ++v) {
- LTOLinkageTypes lt = getLTOLinkageType(v);
- if (!v->isExternal() && lt != LTOInternalLinkage
- && strncmp (v->getName().c_str(), "llvm.", 5)) {
- const char *name = addUnderscore(v->getName().c_str());
- LLVMSymbol *newSymbol = new LLVMSymbol(lt,v);
- symbols[name] = newSymbol;
- }
- }
-
- return LTO_READ_SUCCESS;
+/// lto_codegen_compile_to_file - Generates code for all added modules into one
+/// native object file. The name of the file is written to name. Returns true on
+/// error.
+bool lto_codegen_compile_to_file(lto_code_gen_t cg, const char **name) {
+ return !cg->compile_to_file(name, sLastErrorString);
}
-/// Optimize module M using various IPO passes. Use exportList to
-/// internalize selected symbols. Target platform is selected
-/// based on information available to module M. No new target
-/// features are selected.
-static enum LTOStatus lto_optimize(Module *M, std::ostream &Out,
- std::vector<const char *> &exportList)
-{
- // Instantiate the pass manager to organize the passes.
- PassManager Passes;
-
- // Collect Target info
- std::string Err;
- const TargetMachineRegistry::Entry* March =
- TargetMachineRegistry::getClosestStaticTargetForModule(*M, Err);
-
- if (March == 0)
- return LTO_NO_TARGET;
-
- // Create target
- std::string Features;
- std::auto_ptr<TargetMachine> target(March->CtorFn(*M, Features));
- if (!target.get())
- return LTO_NO_TARGET;
-
- TargetMachine &Target = *target.get();
-
- // Start off with a verification pass.
- Passes.add(createVerifierPass());
-
- // Add an appropriate TargetData instance for this module...
- Passes.add(new TargetData(*Target.getTargetData()));
-
- // Often if the programmer does not specify proper prototypes for the
- // functions they are calling, they end up calling a vararg version of the
- // function that does not get a body filled in (the real function has typed
- // arguments). This pass merges the two functions.
- Passes.add(createFunctionResolvingPass());
-
- // Internalize symbols if export list is nonemty
- if (!exportList.empty())
- Passes.add(createInternalizePass(exportList));
-
- // Now that we internalized some globals, see if we can hack on them!
- Passes.add(createGlobalOptimizerPass());
-
- // Linking modules together can lead to duplicated global constants, only
- // keep one copy of each constant...
- Passes.add(createConstantMergePass());
-
- // If the -s command line option was specified, strip the symbols out of the
- // resulting program to make it smaller. -s is a GLD option that we are
- // supporting.
- Passes.add(createStripSymbolsPass());
-
- // Propagate constants at call sites into the functions they call.
- Passes.add(createIPConstantPropagationPass());
-
- // Remove unused arguments from functions...
- Passes.add(createDeadArgEliminationPass());
-
- Passes.add(createFunctionInliningPass()); // Inline small functions
-
- Passes.add(createPruneEHPass()); // Remove dead EH info
-
- Passes.add(createGlobalDCEPass()); // Remove dead functions
-
- // If we didn't decide to inline a function, check to see if we can
- // transform it to pass arguments by value instead of by reference.
- Passes.add(createArgumentPromotionPass());
-
- // The IPO passes may leave cruft around. Clean up after them.
- Passes.add(createInstructionCombiningPass());
-
- Passes.add(createScalarReplAggregatesPass()); // Break up allocas
-
- // Run a few AA driven optimizations here and now, to cleanup the code.
- Passes.add(createGlobalsModRefPass()); // IP alias analysis
-
- Passes.add(createLICMPass()); // Hoist loop invariants
- Passes.add(createLoadValueNumberingPass()); // GVN for load instrs
- Passes.add(createGCSEPass()); // Remove common subexprs
- Passes.add(createDeadStoreEliminationPass()); // Nuke dead stores
-
- // Cleanup and simplify the code after the scalar optimizations.
- Passes.add(createInstructionCombiningPass());
-
- // Delete basic blocks, which optimization passes may have killed...
- Passes.add(createCFGSimplificationPass());
-
- // Now that we have optimized the program, discard unreachable functions...
- Passes.add(createGlobalDCEPass());
-
- // Make sure everything is still good.
- Passes.add(createVerifierPass());
-
- Target.addPassesToEmitFile(Passes, Out, TargetMachine::AssemblyFile, true);
-
- // Run our queue of passes all at once now, efficiently.
- Passes.run(*M);
-
- return LTO_OPT_SUCCESS;
+extern const struct NativeObjectFile *
+lto_codegen_compile_parallel(lto_code_gen_t cg, size_t *count) {
+ return cg->compile_parallel(count, sLastErrorString);
}
-///Link all modules together and optimize them using IPO. Generate
-/// native object file using OutputFilename
-/// Return appropriate LTOStatus.
-enum LTOStatus
-LinkTimeOptimizer::optimizeModules(const std::string &OutputFilename,
- std::vector<const char *> &exportList)
-{
- if (modules.empty())
- return LTO_NO_WORK;
-
- std::ios::openmode io_mode =
- std::ios::out | std::ios::trunc | std::ios::binary;
- std::string *errMsg = NULL;
- Module *bigOne = modules[0];
- Linker theLinker("LinkTimeOptimizer", bigOne, false);
- for (unsigned i = 1, e = modules.size(); i != e; ++i)
- if (theLinker.LinkModules(bigOne, modules[i], errMsg))
- return LTO_MODULE_MERGE_FAILURE;
-
-#if 0
- // Enable this when -save-temps is used
- std::ofstream Out("big.bc", io_mode);
- WriteBytecodeToFile(bigOne, Out, true);
-#endif
-
- // Strip leading underscore because it was added to match names
- // seen by linker.
- for (unsigned i = 0, e = exportList.size(); i != e; ++i) {
- const char *name = exportList[i];
- if (strlen(name) > 2 && name[0] == '_')
- exportList[i] = &name[1];
- }
-
- sys::Path tmpAsmFilePath("/tmp/");
- tmpAsmFilePath.createTemporaryFileOnDisk();
- sys::RemoveFileOnSignal(tmpAsmFilePath);
-
- std::ofstream asmFile(tmpAsmFilePath.c_str(), io_mode);
- if (!asmFile.is_open() || asmFile.bad()) {
- if (tmpAsmFilePath.exists())
- tmpAsmFilePath.eraseFromDisk();
- return LTO_WRITE_FAILURE;
- }
-
- enum LTOStatus status = lto_optimize(bigOne, asmFile, exportList);
- asmFile.close();
- if (status != LTO_OPT_SUCCESS) {
- tmpAsmFilePath.eraseFromDisk();
- return status;
- }
-
- // Run GCC to assemble and link the program into native code.
- //
- // Note:
- // We can't just assemble and link the file with the system assembler
- // and linker because we don't know where to put the _start symbol.
- // GCC mysteriously knows how to do it.
- const sys::Path gcc = FindExecutable("gcc", "/");
- if (gcc.isEmpty()) {
- tmpAsmFilePath.eraseFromDisk();
- return LTO_ASM_FAILURE;
- }
-
- std::vector<const char*> args;
- args.push_back(gcc.c_str());
- args.push_back("-c");
- args.push_back("-x");
- args.push_back("assembler");
- args.push_back("-o");
- args.push_back(OutputFilename.c_str());
- args.push_back(tmpAsmFilePath.c_str());
- args.push_back(0);
-
- int R1 = sys::Program::ExecuteAndWait(gcc, &args[0], 0, 0, 1);
-
- tmpAsmFilePath.eraseFromDisk();
-
- return LTO_OPT_SUCCESS;
+/// lto_codegen_debug_options - Used to pass extra options to the code
+/// generator.
+void lto_codegen_debug_options(lto_code_gen_t cg, const char *opt) {
+ cg->setCodeGenDebugOptions(opt);
}