2004-12-13 03:50:50 +00:00
|
|
|
//===- lib/Linker/Linker.cpp - Basic Linker functionality ----------------===//
|
2005-04-21 22:55:34 +00:00
|
|
|
//
|
2004-12-13 03:00:28 +00:00
|
|
|
// The LLVM Compiler Infrastructure
|
|
|
|
//
|
2005-04-21 22:55:34 +00:00
|
|
|
// This file was developed by Reid Spencer and is distributed under the
|
2004-12-13 03:00:28 +00:00
|
|
|
// University of Illinois Open Source License. See LICENSE.TXT for details.
|
2005-04-21 22:55:34 +00:00
|
|
|
//
|
2004-12-13 03:00:28 +00:00
|
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
//
|
2004-12-13 03:50:50 +00:00
|
|
|
// This file contains basic Linker functionality that all usages will need.
|
2004-12-13 03:00:28 +00:00
|
|
|
//
|
|
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
|
|
|
|
#include "llvm/Linker.h"
|
|
|
|
#include "llvm/Module.h"
|
|
|
|
#include "llvm/Bytecode/Reader.h"
|
2004-12-16 19:19:24 +00:00
|
|
|
#include "llvm/Config/config.h"
|
2004-12-13 03:00:28 +00:00
|
|
|
#include <iostream>
|
|
|
|
|
|
|
|
using namespace llvm;
|
|
|
|
|
2005-12-13 20:00:37 +00:00
|
|
|
Linker::Linker(const std::string& progname, const std::string& modname, unsigned flags)
|
2004-12-13 03:00:28 +00:00
|
|
|
: Composite(0)
|
|
|
|
, LibPaths()
|
|
|
|
, Flags(flags)
|
|
|
|
, Error()
|
|
|
|
, ProgramName(progname)
|
|
|
|
{
|
2005-12-13 20:00:37 +00:00
|
|
|
Composite = new Module(modname);
|
2004-12-13 03:00:28 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
Linker::Linker(const std::string& progname, Module* aModule, unsigned flags)
|
|
|
|
: Composite(aModule)
|
|
|
|
, LibPaths()
|
|
|
|
, Flags(flags)
|
|
|
|
, Error()
|
|
|
|
, ProgramName(progname)
|
|
|
|
{
|
|
|
|
}
|
|
|
|
|
|
|
|
Linker::~Linker() {
|
|
|
|
delete Composite;
|
|
|
|
}
|
|
|
|
|
2005-04-21 22:55:34 +00:00
|
|
|
bool
|
2004-12-13 03:00:28 +00:00
|
|
|
Linker::error(const std::string& message) {
|
|
|
|
Error = message;
|
|
|
|
if (!(Flags&QuietErrors)) {
|
|
|
|
std::cerr << ProgramName << ": error: " << message << "\n";
|
|
|
|
}
|
|
|
|
return true;
|
|
|
|
}
|
|
|
|
|
|
|
|
bool
|
|
|
|
Linker::warning(const std::string& message) {
|
|
|
|
Error = message;
|
|
|
|
if (!(Flags&QuietErrors)) {
|
|
|
|
std::cerr << ProgramName << ": warning: " << message << "\n";
|
|
|
|
}
|
|
|
|
return false;
|
|
|
|
}
|
|
|
|
|
|
|
|
void
|
|
|
|
Linker::verbose(const std::string& message) {
|
|
|
|
if (Flags&Verbose) {
|
|
|
|
std::cerr << " " << message << "\n";
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
void
|
|
|
|
Linker::addPath(const sys::Path& path) {
|
|
|
|
LibPaths.push_back(path);
|
|
|
|
}
|
|
|
|
|
|
|
|
void
|
|
|
|
Linker::addPaths(const std::vector<std::string>& paths) {
|
2004-12-13 03:50:50 +00:00
|
|
|
for (unsigned i = 0; i != paths.size(); ++i) {
|
2004-12-13 03:00:28 +00:00
|
|
|
sys::Path aPath;
|
2005-07-07 23:21:43 +00:00
|
|
|
aPath.set(paths[i]);
|
2004-12-13 03:00:28 +00:00
|
|
|
LibPaths.push_back(aPath);
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
void
|
|
|
|
Linker::addSystemPaths() {
|
|
|
|
sys::Path::GetBytecodeLibraryPaths(LibPaths);
|
|
|
|
LibPaths.insert(LibPaths.begin(),sys::Path("./"));
|
|
|
|
}
|
|
|
|
|
|
|
|
Module*
|
|
|
|
Linker::releaseModule() {
|
|
|
|
Module* result = Composite;
|
|
|
|
LibPaths.clear();
|
|
|
|
Error.clear();
|
2004-12-13 03:50:50 +00:00
|
|
|
Composite = 0;
|
2004-12-13 03:00:28 +00:00
|
|
|
Flags = 0;
|
|
|
|
return result;
|
|
|
|
}
|
|
|
|
|
|
|
|
// LoadObject - Read in and parse the bytecode file named by FN and return the
|
2005-04-21 22:55:34 +00:00
|
|
|
// module it contains (wrapped in an auto_ptr), or auto_ptr<Module>() and set
|
2004-12-13 03:00:28 +00:00
|
|
|
// Error if an error occurs.
|
2005-04-21 22:55:34 +00:00
|
|
|
std::auto_ptr<Module>
|
2004-12-13 03:00:28 +00:00
|
|
|
Linker::LoadObject(const sys::Path &FN) {
|
|
|
|
std::string ParseErrorMessage;
|
|
|
|
Module *Result = ParseBytecodeFile(FN.toString(), &ParseErrorMessage);
|
2005-04-21 22:55:34 +00:00
|
|
|
if (Result)
|
2004-12-13 03:00:28 +00:00
|
|
|
return std::auto_ptr<Module>(Result);
|
|
|
|
Error = "Bytecode file '" + FN.toString() + "' could not be loaded";
|
2005-04-21 22:55:34 +00:00
|
|
|
if (ParseErrorMessage.size())
|
2004-12-13 03:00:28 +00:00
|
|
|
Error += ": " + ParseErrorMessage;
|
|
|
|
return std::auto_ptr<Module>();
|
|
|
|
}
|
|
|
|
|
2005-04-21 22:55:34 +00:00
|
|
|
// IsLibrary - Determine if "Name" is a library in "Directory". Return
|
2004-12-13 03:50:50 +00:00
|
|
|
// a non-empty sys::Path if its found, an empty one otherwise.
|
2005-04-21 22:55:34 +00:00
|
|
|
static inline sys::Path IsLibrary(const std::string& Name,
|
2004-12-13 03:00:28 +00:00
|
|
|
const sys::Path& Directory) {
|
|
|
|
|
|
|
|
sys::Path FullPath(Directory);
|
|
|
|
|
2005-07-07 23:21:43 +00:00
|
|
|
// Make sure the directory actually is a directory in the file system.
|
|
|
|
if (FullPath.isDirectory())
|
|
|
|
{
|
|
|
|
// Try the libX.a form
|
|
|
|
FullPath.appendComponent("lib" + Name);
|
|
|
|
FullPath.appendSuffix("a");
|
|
|
|
if (FullPath.isArchive())
|
|
|
|
return FullPath;
|
|
|
|
|
|
|
|
// Try the libX.bca form
|
|
|
|
FullPath.eraseSuffix();
|
|
|
|
FullPath.appendSuffix("bca");
|
|
|
|
if (FullPath.isArchive())
|
|
|
|
return FullPath;
|
2004-12-13 03:00:28 +00:00
|
|
|
|
2006-01-10 03:12:29 +00:00
|
|
|
// Try the libX.so (or .dylib) form
|
2005-07-07 23:21:43 +00:00
|
|
|
FullPath.eraseSuffix();
|
|
|
|
FullPath.appendSuffix(&(LTDL_SHLIB_EXT[1]));
|
|
|
|
if (FullPath.isDynamicLibrary()) // Native shared library?
|
|
|
|
return FullPath;
|
|
|
|
if (FullPath.isBytecodeFile()) // .so file containing bytecode?
|
|
|
|
return FullPath;
|
2004-12-13 03:00:28 +00:00
|
|
|
|
2005-07-07 23:21:43 +00:00
|
|
|
// Not found .. fall through
|
|
|
|
}
|
2004-12-13 03:00:28 +00:00
|
|
|
|
2005-07-07 23:21:43 +00:00
|
|
|
// Indicate that the library was not found in the directory.
|
2004-12-13 03:00:28 +00:00
|
|
|
FullPath.clear();
|
|
|
|
return FullPath;
|
|
|
|
}
|
|
|
|
|
|
|
|
/// FindLib - Try to convert Filename into the name of a file that we can open,
|
|
|
|
/// if it does not already name a file we can open, by first trying to open
|
|
|
|
/// Filename, then libFilename.[suffix] for each of a set of several common
|
2005-04-21 22:55:34 +00:00
|
|
|
/// library suffixes, in each of the directories in LibPaths. Returns an empty
|
2004-12-13 03:50:50 +00:00
|
|
|
/// Path if no matching file can be found.
|
2004-12-13 03:00:28 +00:00
|
|
|
///
|
2005-04-21 22:55:34 +00:00
|
|
|
sys::Path
|
2006-01-17 22:01:57 +00:00
|
|
|
Linker::FindLib(const std::string &Filename) {
|
2004-12-13 03:00:28 +00:00
|
|
|
// Determine if the pathname can be found as it stands.
|
|
|
|
sys::Path FilePath(Filename);
|
2005-07-07 18:21:42 +00:00
|
|
|
if (FilePath.canRead() &&
|
2004-12-13 03:00:28 +00:00
|
|
|
(FilePath.isArchive() || FilePath.isDynamicLibrary()))
|
|
|
|
return FilePath;
|
|
|
|
|
|
|
|
// Iterate over the directories in Paths to see if we can find the library
|
|
|
|
// there.
|
|
|
|
for (unsigned Index = 0; Index != LibPaths.size(); ++Index) {
|
|
|
|
sys::Path Directory(LibPaths[Index]);
|
|
|
|
sys::Path FullPath = IsLibrary(Filename,Directory);
|
|
|
|
if (!FullPath.isEmpty())
|
|
|
|
return FullPath;
|
|
|
|
}
|
|
|
|
return sys::Path();
|
|
|
|
}
|