3 #include <msp/fs/dir.h>
4 #include <msp/fs/utils.h>
5 #include <msp/strings/format.h>
6 #include <msp/strings/utils.h>
9 #include "executable.h"
10 #include "exportdefinitions.h"
11 #include "externaltask.h"
12 #include "gnucompiler.h"
13 #include "gnulinker.h"
14 #include "importlibrary.h"
15 #include "installedfile.h"
16 #include "objectfile.h"
17 #include "sharedlibrary.h"
18 #include "sourcepackage.h"
19 #include "staticlibrary.h"
24 GnuLinker::GnuLinker(Builder &b, const Architecture &a, const FS::Path &sysroot):
27 input_suffixes.push_back(".o");
28 input_suffixes.push_back(".a");
30 processing_unit = COMPONENT;
34 build_info.sysroot = sysroot;
35 system_path.push_back(sysroot/"usr"/"lib");
37 else if(architecture->is_native())
39 system_path.push_back("/lib");
40 system_path.push_back("/usr/lib");
41 if(architecture->match_name("pc-32-linux"))
42 system_path.push_back("/usr/lib/i386-linux-gnu");
43 else if(architecture->match_name("pc-64-linux"))
44 system_path.push_back("/usr/lib/x86_64-linux-gnu");
47 system_path.push_back("/usr/"+architecture->get_cross_prefix()+"/lib");
49 default_linker = new Linker(*this, "CC");
50 cxx_linker = new Linker(*this, "CXX");
53 GnuLinker::~GnuLinker()
55 delete default_linker;
59 Target *GnuLinker::create_target(const list<Target *> &sources, const string &arg)
62 throw invalid_argument("GnuLinker::create_target");
63 list<ObjectFile *> objs;
64 Linker *linker = default_linker;
65 for(list<Target *>::const_iterator i=sources.begin(); i!=sources.end(); ++i)
67 if(ObjectFile *obj = dynamic_cast<ObjectFile *>(*i))
70 if(obj->get_tool()->get_tag()=="CXX")
74 throw invalid_argument("GnuLinker::create_target");
77 const Component &comp = *objs.front()->get_component();
81 SharedLibrary *shlib = new SharedLibrary(builder, comp, objs);
82 if(architecture->get_system()=="windows")
84 Tool &dlltool = builder.get_toolchain().get_tool("DLL");
85 dlltool.create_target(*shlib);
90 bin = new Executable(builder, comp, objs);
91 bin->set_tool(*linker);
95 Target *GnuLinker::create_install(Target &target) const
97 if(SharedLibrary *shlib = dynamic_cast<SharedLibrary *>(&target))
99 Tool © = builder.get_toolchain().get_tool("CP");
100 InstalledFile *inst_tgt = dynamic_cast<InstalledFile *>(copy.create_target(target));
101 if(architecture->get_system()=="windows")
102 builder.get_build_graph().add_installed_target(*shlib->get_import_library());
105 const Pattern &pattern = architecture->get_shared_library_patterns().front();
106 string link_name = pattern.apply(shlib->get_libname());
107 if(link_name!=FS::basename(inst_tgt->get_path()))
108 inst_tgt->set_symlink(link_name);
116 Task *GnuLinker::run(const Target &) const
118 throw logic_error("GnuLinker should not be run directly");
122 GnuLinker::Linker::Linker(GnuLinker &p, const string &ct):
126 if(compiler_tag=="CC")
127 set_command("gcc", true);
128 else if(compiler_tag=="CXX")
129 set_command("g++", true);
131 throw invalid_argument("GnuLinker::Linker::Linker");
134 string GnuLinker::Linker::create_build_signature(const BuildInfo &binfo) const
136 string result = FS::basename(executable->get_path());
138 if(binfo.libmode<=BuildInfo::STATIC)
144 if(!binfo.libs.empty())
147 result += join(binfo.libs.begin(), binfo.libs.end(), ",l");
152 void GnuLinker::Linker::do_prepare()
154 Tool &compiler = builder.get_toolchain().get_tool(compiler_tag);
155 if(dynamic_cast<GnuCompiler *>(&compiler))
158 executable = compiler.get_executable();
162 Task *GnuLinker::Linker::run(const Target &target) const
164 const Binary &bin = dynamic_cast<const Binary &>(target);
167 argv.push_back(executable->get_path().str());
169 FS::Path work_dir = bin.get_component()->get_package().get_source_directory();
171 if(const SharedLibrary *shlib = dynamic_cast<const SharedLibrary *>(&bin))
173 argv.push_back("-shared");
174 argv.push_back("-fPIC");
175 if(architecture->get_system()!="windows" && !shlib->get_soname().empty())
177 if(architecture->get_system()=="darwin")
179 argv.push_back("-install_name");
180 argv.push_back(shlib->get_soname());
182 const string &ver = shlib->get_package()->get_version();
183 const string &if_ver = shlib->get_package()->get_interface_version();
184 if(!ver.empty() && !if_ver.empty())
186 argv.push_back("-current_version");
188 argv.push_back("-compatibility_version");
189 argv.push_back(if_ver);
193 argv.push_back("-Wl,-soname,"+shlib->get_soname());
198 target.collect_build_info(binfo);
200 const FS::Path &sysroot = binfo.sysroot;
202 argv.push_back("--sysroot="+sysroot.str());
204 for(BuildInfo::PathList::const_iterator i=binfo.libpath.begin(); i!=binfo.libpath.end(); ++i)
205 argv.push_back("-L"+i->str());
207 argv.push_back("-s");
208 if(binfo.threads && architecture->get_system()!="windows" && architecture->get_system()!="darwin")
209 argv.push_back("-pthread");
211 const Architecture &native_arch = builder.get_native_arch();
212 if(architecture->is_native() && architecture->get_bits()!=native_arch.get_bits())
213 argv.push_back(format("-m%d", architecture->get_bits()));
215 argv.push_back("-o");
216 argv.push_back(relative(bin.get_path(), work_dir).str());
218 for(BuildInfo::WordList::const_iterator i=binfo.keep_symbols.begin(); i!=binfo.keep_symbols.end(); ++i)
219 argv.push_back("-u"+*i);
221 bool static_link_ok = (binfo.libmode<=BuildInfo::STATIC);
223 if(architecture->get_system()=="windows" && architecture->get_cross_prefix().find("mingw")!=string::npos)
224 argv.push_back("-lmingw32");
226 const Target::Dependencies &depends = target.get_dependencies();
227 for(Target::Dependencies::const_iterator i=depends.begin(); i!=depends.end(); ++i)
229 FileTarget *file = dynamic_cast<FileTarget *>(*i);
230 Target *tgt = (*i)->get_real_target();
232 if(ObjectFile *obj = dynamic_cast<ObjectFile *>(tgt))
233 argv.push_back(relative(obj->get_path(), work_dir).str());
234 else if(StaticLibrary *stlib = dynamic_cast<StaticLibrary *>(tgt))
235 argv.push_back((file?file:stlib)->get_path().str());
236 else if(SharedLibrary *shlib = dynamic_cast<SharedLibrary *>(tgt))
238 argv.push_back("-l"+shlib->get_libname());
239 static_link_ok = false;
241 else if(ImportLibrary *imp = dynamic_cast<ImportLibrary *>(tgt))
243 shlib = imp->get_shared_library();
245 argv.push_back("-l"+shlib->get_libname());
247 argv.push_back((file?file:imp)->get_path().str());
248 static_link_ok = false;
252 for(BuildInfo::WordList::const_iterator i=binfo.libs.begin(); i!=binfo.libs.end(); ++i)
253 if(i->size()>10 && !i->compare(i->size()-10, 10, ".framework"))
255 argv.push_back("-framework");
256 argv.push_back(i->substr(0, i->size()-10));
260 argv.push_back("-static");
261 else if(architecture->get_system()=="windows")
262 argv.push_back("-Wl,--enable-auto-import");
264 return new ExternalTask(argv, work_dir);