1 //===- lib/Linker/Linker.cpp - Basic Linker functionality ----------------===//
3 // The LLVM Compiler Infrastructure
5 // This file is distributed under the University of Illinois Open Source
6 // License. See LICENSE.TXT for details.
8 //===----------------------------------------------------------------------===//
10 // This file contains basic Linker functionality that all usages will need.
12 //===----------------------------------------------------------------------===//
14 #include "llvm/Linker.h"
15 #include "llvm/Module.h"
16 #include "llvm/Bitcode/ReaderWriter.h"
17 #include "llvm/System/Path.h"
18 #include "llvm/Support/MemoryBuffer.h"
19 #include "llvm/Support/raw_ostream.h"
20 #include "llvm/Config/config.h"
23 Linker::Linker(const StringRef
&progname
, const StringRef
&modname
,
24 LLVMContext
& C
, unsigned flags
):
26 Composite(new Module(modname
, C
)),
30 ProgramName(progname
) { }
32 Linker::Linker(const StringRef
&progname
, Module
* aModule
, unsigned flags
) :
33 Context(aModule
->getContext()),
38 ProgramName(progname
) { }
45 Linker::error(const StringRef
&message
) {
47 if (!(Flags
&QuietErrors
))
48 errs() << ProgramName
<< ": error: " << message
<< "\n";
53 Linker::warning(const StringRef
&message
) {
55 if (!(Flags
&QuietWarnings
))
56 errs() << ProgramName
<< ": warning: " << message
<< "\n";
61 Linker::verbose(const StringRef
&message
) {
63 errs() << " " << message
<< "\n";
67 Linker::addPath(const sys::Path
& path
) {
68 LibPaths
.push_back(path
);
72 Linker::addPaths(const std::vector
<std::string
>& paths
) {
73 for (unsigned i
= 0, e
= paths
.size(); i
!= e
; ++i
)
74 LibPaths
.push_back(sys::Path(paths
[i
]));
78 Linker::addSystemPaths() {
79 sys::Path::GetBitcodeLibraryPaths(LibPaths
);
80 LibPaths
.insert(LibPaths
.begin(),sys::Path("./"));
84 Linker::releaseModule() {
85 Module
* result
= Composite
;
93 // LoadObject - Read in and parse the bitcode file named by FN and return the
94 // module it contains (wrapped in an auto_ptr), or auto_ptr<Module>() and set
95 // Error if an error occurs.
97 Linker::LoadObject(const sys::Path
&FN
) {
98 std::string ParseErrorMessage
;
101 std::auto_ptr
<MemoryBuffer
> Buffer(MemoryBuffer::getFileOrSTDIN(FN
.c_str()));
103 Result
= ParseBitcodeFile(Buffer
.get(), Context
, &ParseErrorMessage
);
105 ParseErrorMessage
= "Error reading file '" + FN
.str() + "'";
108 return std::auto_ptr
<Module
>(Result
);
109 Error
= "Bitcode file '" + FN
.str() + "' could not be loaded";
110 if (ParseErrorMessage
.size())
111 Error
+= ": " + ParseErrorMessage
;
112 return std::auto_ptr
<Module
>();
115 // IsLibrary - Determine if "Name" is a library in "Directory". Return
116 // a non-empty sys::Path if its found, an empty one otherwise.
117 static inline sys::Path
IsLibrary(const StringRef
&Name
,
118 const sys::Path
&Directory
) {
120 sys::Path
FullPath(Directory
);
122 // Try the libX.a form
123 FullPath
.appendComponent(("lib" + Name
).str());
124 FullPath
.appendSuffix("a");
125 if (FullPath
.isArchive())
128 // Try the libX.bca form
129 FullPath
.eraseSuffix();
130 FullPath
.appendSuffix("bca");
131 if (FullPath
.isArchive())
134 // Try the libX.so (or .dylib) form
135 FullPath
.eraseSuffix();
136 FullPath
.appendSuffix(&(LTDL_SHLIB_EXT
[1]));
137 if (FullPath
.isDynamicLibrary()) // Native shared library?
139 if (FullPath
.isBitcodeFile()) // .so file containing bitcode?
142 // Not found .. fall through
144 // Indicate that the library was not found in the directory.
149 /// FindLib - Try to convert Filename into the name of a file that we can open,
150 /// if it does not already name a file we can open, by first trying to open
151 /// Filename, then libFilename.[suffix] for each of a set of several common
152 /// library suffixes, in each of the directories in LibPaths. Returns an empty
153 /// Path if no matching file can be found.
156 Linker::FindLib(const StringRef
&Filename
) {
157 // Determine if the pathname can be found as it stands.
158 sys::Path
FilePath(Filename
);
159 if (FilePath
.canRead() &&
160 (FilePath
.isArchive() || FilePath
.isDynamicLibrary()))
163 // Iterate over the directories in Paths to see if we can find the library
165 for (unsigned Index
= 0; Index
!= LibPaths
.size(); ++Index
) {
166 sys::Path
Directory(LibPaths
[Index
]);
167 sys::Path FullPath
= IsLibrary(Filename
, Directory
);
168 if (!FullPath
.isEmpty())