source/gnulinker.cpp

   1 #include <stdexcept>
   2 #include <vector>
   3 #include <msp/fs/dir.h>
   4 #include <msp/fs/utils.h>
   5 #include <msp/strings/format.h>
   6 #include <msp/strings/utils.h>
   7 #include "builder.h"
   8 #include "component.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"
  20
  21 using namespace std;
  22 using namespace Msp;
  23
  24 GnuLinker::GnuLinker(Builder &b, const Architecture &a, const FS::Path &sysroot):
  25         Tool(b, a, "LINK")
  26 {
  27         input_suffixes.push_back(".o");
  28         input_suffixes.push_back(".a");
  29
  30         if(!sysroot.empty())
  31         {
  32                 build_info.sysroot = sysroot;
  33                 system_path.push_back(sysroot/"usr"/"lib");
  34         }
  35         else if(architecture->is_native())
  36         {
  37                 system_path.push_back("/lib");
  38                 system_path.push_back("/usr/lib");
  39                 if(architecture->match_name("pc-32-linux"))
  40                         system_path.push_back("/usr/lib/i386-linux-gnu");
  41                 else if(architecture->match_name("pc-64-linux"))
  42                         system_path.push_back("/usr/lib/x86_64-linux-gnu");
  43         }
  44         else
  45                 system_path.push_back("/usr/"+architecture->get_cross_prefix()+"/lib");
  46
  47         default_linker = new Linker(*this, "CC");
  48         cxx_linker = new Linker(*this, "CXX");
  49 }
  50
  51 GnuLinker::~GnuLinker()
  52 {
  53         delete default_linker;
  54         delete cxx_linker;
  55 }
  56
  57 Target *GnuLinker::create_target(const list<Target *> &sources, const string &arg)
  58 {
  59         if(sources.empty())
  60                 throw invalid_argument("GnuLinker::create_target");
  61         list<ObjectFile *> objs;
  62         Linker *linker = default_linker;
  63         for(list<Target *>::const_iterator i=sources.begin(); i!=sources.end(); ++i)
  64         {
  65                 if(ObjectFile *obj = dynamic_cast<ObjectFile *>(*i))
  66                 {
  67                         objs.push_back(obj);
  68                         if(obj->get_tool()->get_tag()=="CXX")
  69                                 linker = cxx_linker;
  70                 }
  71                 else
  72                         throw invalid_argument("GnuLinker::create_target");
  73         }
  74
  75         const Component &comp = *objs.front()->get_component();
  76         Binary *bin = 0;
  77         if(arg=="shared")
  78         {
  79                 SharedLibrary *shlib = new SharedLibrary(builder, comp, objs);
  80                 if(architecture->get_system()=="windows")
  81                 {
  82                         Tool &dlltool = builder.get_toolchain().get_tool("DLL");
  83                         dlltool.create_target(*shlib);
  84                 }
  85                 bin = shlib;
  86         }
  87         else
  88                 bin = new Executable(builder, comp, objs);
  89         bin->set_tool(*linker);
  90         return bin;
  91 }
  92
  93 Target *GnuLinker::create_install(Target &target) const
  94 {
  95         if(SharedLibrary *shlib = dynamic_cast<SharedLibrary *>(&target))
  96         {
  97                 Tool &copy = builder.get_toolchain().get_tool("CP");
  98                 InstalledFile *inst_tgt = dynamic_cast<InstalledFile *>(copy.create_target(target));
  99                 if(architecture->get_system()=="windows")
 100                         builder.get_build_graph().add_installed_target(*shlib->get_import_library());
 101                 else
 102                 {
 103                         const Pattern &pattern = architecture->get_shared_library_patterns().front();
 104                         string link_name = pattern.apply(shlib->get_libname());
 105                         if(link_name!=FS::basename(inst_tgt->get_path()))
 106                                 inst_tgt->set_symlink(link_name);
 107                 }
 108                 return inst_tgt;
 109         }
 110         else
 111                 return 0;
 112 }
 113
 114 Task *GnuLinker::run(const Target &) const
 115 {
 116         throw logic_error("GnuLinker should not be run directly");
 117 }
 118
 119
 120 GnuLinker::Linker::Linker(GnuLinker &p, const string &ct):
 121         SubTool(p),
 122         compiler_tag(ct)
 123 {
 124         if(compiler_tag=="CC")
 125                 set_command("gcc", true);
 126         else if(compiler_tag=="CXX")
 127                 set_command("g++", true);
 128         else
 129                 throw invalid_argument("GnuLinker::Linker::Linker");
 130 }
 131
 132 Target *GnuLinker::Linker::create_target(const list<Target *> &sources, const string &arg)
 133 {
 134         return parent.create_target(sources, arg);
 135 }
 136
 137 Target *GnuLinker::Linker::create_install(Target &target) const
 138 {
 139         return parent.create_install(target);
 140 }
 141
 142 string GnuLinker::Linker::create_build_signature(const BuildInfo &binfo) const
 143 {
 144         string result = FS::basename(executable->get_path());
 145         result += ',';
 146         if(binfo.libmode<=BuildInfo::STATIC)
 147                 result += 't';
 148         else
 149                 result += 'd';
 150         if(binfo.strip)
 151                 result += 's';
 152         if(!binfo.libs.empty())
 153         {
 154                 result += ",l";
 155                 result += join(binfo.libs.begin(), binfo.libs.end(), ",l");
 156         }
 157         return result;
 158 }
 159
 160 void GnuLinker::Linker::do_prepare()
 161 {
 162         Tool &compiler = builder.get_toolchain().get_tool(compiler_tag);
 163         if(dynamic_cast<GnuCompiler *>(&compiler))
 164         {
 165                 compiler.prepare();
 166                 executable = compiler.get_executable();
 167         }
 168 }
 169
 170 Task *GnuLinker::Linker::run(const Target &target) const
 171 {
 172         const Binary &bin = dynamic_cast<const Binary &>(target);
 173
 174         vector<string> argv;
 175         argv.push_back(executable->get_path().str());
 176
 177         const Component &comp = *bin.get_component();
 178
 179         FS::Path work_dir = comp.get_package().get_source_directory();
 180
 181         if(const SharedLibrary *shlib = dynamic_cast<const SharedLibrary *>(&bin))
 182         {
 183                 argv.push_back("-shared");
 184                 argv.push_back("-fPIC");
 185                 if(architecture->get_system()!="windows" && !shlib->get_soname().empty())
 186                 {
 187                         if(architecture->get_system()=="darwin")
 188                         {
 189                                 argv.push_back("-install_name");
 190                                 argv.push_back(shlib->get_soname());
 191
 192                                 const string &ver = shlib->get_package()->get_version();
 193                                 const string &if_ver = shlib->get_package()->get_interface_version();
 194                                 if(!ver.empty() && !if_ver.empty())
 195                                 {
 196                                         argv.push_back("-current_version");
 197                                         argv.push_back(ver);
 198                                         argv.push_back("-compatibility_version");
 199                                         argv.push_back(if_ver);
 200                                 }
 201                         }
 202                         else
 203                                 argv.push_back("-Wl,-soname,"+shlib->get_soname());
 204                 }
 205         }
 206
 207         BuildInfo binfo;
 208         target.collect_build_info(binfo);
 209
 210         const FS::Path &sysroot = binfo.sysroot;
 211         if(!sysroot.empty())
 212                 argv.push_back("--sysroot="+sysroot.str());
 213
 214         for(BuildInfo::PathList::const_iterator i=binfo.libpath.begin(); i!=binfo.libpath.end(); ++i)
 215                 argv.push_back("-L"+i->str());
 216         if(binfo.strip)
 217                 argv.push_back("-s");
 218         if(binfo.threads && architecture->get_system()!="windows" && architecture->get_system()!="darwin")
 219                 argv.push_back("-pthread");
 220
 221         const Architecture &native_arch = builder.get_native_arch();
 222         if(architecture->is_native() && architecture->get_bits()!=native_arch.get_bits())
 223                 argv.push_back(format("-m%d", architecture->get_bits()));
 224
 225         argv.push_back("-o");
 226         argv.push_back(relative(bin.get_path(), work_dir).str());
 227
 228         bool static_link_ok = (binfo.libmode<=BuildInfo::STATIC);
 229
 230         const Target::Dependencies &depends = target.get_dependencies();
 231         for(Target::Dependencies::const_iterator i=depends.begin(); i!=depends.end(); ++i)
 232         {
 233                 FileTarget *file = dynamic_cast<FileTarget *>(*i);
 234                 Target *tgt = (*i)->get_real_target();
 235
 236                 if(ObjectFile *obj = dynamic_cast<ObjectFile *>(tgt))
 237                         argv.push_back(relative(obj->get_path(), work_dir).str());
 238                 else if(StaticLibrary *stlib = dynamic_cast<StaticLibrary *>(tgt))
 239                         argv.push_back((file?file:stlib)->get_path().str());
 240                 else if(SharedLibrary *shlib = dynamic_cast<SharedLibrary *>(tgt))
 241                 {
 242                         argv.push_back("-l"+shlib->get_libname());
 243                         static_link_ok = false;
 244                 }
 245                 else if(ImportLibrary *imp = dynamic_cast<ImportLibrary *>(tgt))
 246                 {
 247                         shlib = imp->get_shared_library();
 248                         if(shlib)
 249                                 argv.push_back("-l"+shlib->get_libname());
 250                         else
 251                                 argv.push_back((file?file:imp)->get_path().str());
 252                         static_link_ok = false;
 253                 }
 254         }
 255
 256         for(BuildInfo::WordList::const_iterator i=binfo.libs.begin(); i!=binfo.libs.end(); ++i)
 257                 if(i->size()>10 && !i->compare(i->size()-10, 10, ".framework"))
 258                 {
 259                         argv.push_back("-framework");
 260                         argv.push_back(i->substr(0, i->size()-10));
 261                 }
 262
 263         if(static_link_ok)
 264                 argv.push_back("-static");
 265         else if(architecture->get_system()=="windows")
 266                 argv.push_back("-Wl,--enable-auto-import");
 267
 268         return new ExternalTask(argv, work_dir);
 269 }