2 #include <msp/builder/builder.h>
3 #include <msp/builder/component.h>
4 #include <msp/builder/exportdefinitions.h>
5 #include <msp/builder/externaltask.h>
6 #include <msp/builder/importlibrary.h>
7 #include <msp/builder/installedfile.h>
8 #include <msp/builder/objectfile.h>
9 #include <msp/builder/sharedlibrary.h>
10 #include <msp/builder/sourcepackage.h>
11 #include <msp/fs/utils.h>
12 #include <msp/strings/format.h>
13 #include "mingwdlltool.h"
18 MingwDllTool::MingwDllTool(Builder &b, const Architecture &a):
21 set_command("dlltool", true);
25 Target *MingwDllTool::create_target(const vector<Target *> &sources, const string &)
28 throw invalid_argument("MingwDllTool::create_target");
29 SharedLibrary &shlib = dynamic_cast<SharedLibrary &>(*sources.front());
31 vector<ObjectFile *> objs;
32 objs.reserve(shlib.get_dependencies().size());
33 for(Target *d: shlib.get_dependencies())
34 if(ObjectFile *obj = dynamic_cast<ObjectFile *>(d))
37 ExportDefinitions *exp = new ExportDefinitions(builder, *shlib.get_component(), objs);
40 ImportLibrary *imp = new ImportLibrary(builder, *shlib.get_component(), shlib);
41 imp->add_dependency(*exp);
47 Task *MingwDllTool::_run(const Target &target)
49 const Tool &tool = *target.get_tool();
51 const ImportLibrary *imp = dynamic_cast<const ImportLibrary *>(&target);
52 const ExportDefinitions *exp = 0;
54 exp = &dynamic_cast<const ExportDefinitions &>(*imp->get_dependencies().front());
56 exp = dynamic_cast<const ExportDefinitions *>(&target);
58 throw invalid_argument("MingwDllTool::run");
61 argv.push_back(tool.get_executable()->get_path().str());
63 /* dlltool is stupid and puts temporary files in the working directory by
65 argv.push_back("--temp-prefix");
67 for(unsigned i=0; i<8; ++i)
68 random[i] = 'a'+(rand()%26);
69 argv.push_back(string("/tmp/")+string(random, 8));
71 const Component &comp = *target.get_component();
72 FS::Path work_dir = comp.get_package().get_source_directory();
76 const SharedLibrary &shlib = *imp->get_shared_library();
79 argv.push_back(relative(exp->get_path(), work_dir).str());
82 argv.push_back(FS::basename(shlib.get_path()));
85 argv.push_back(relative(imp->get_path(), work_dir).str());
89 for(Target *d: exp->get_dependencies())
90 if(ObjectFile *obj = dynamic_cast<ObjectFile *>(d))
91 argv.push_back(relative(obj->get_path(), work_dir).str());
94 argv.push_back(relative(exp->get_path(), work_dir).str());
97 return new ExternalTask(argv, work_dir);