1 #include <msp/fs/dir.h>
2 #include <msp/fs/utils.h>
3 #include <msp/strings/format.h>
4 #include "architecture.h"
7 #include "externaltask.h"
8 #include "gnucompiler.h"
9 #include "objectfile.h"
10 #include "sourcefile.h"
11 #include "sourcepackage.h"
16 GnuCompiler::GnuCompiler(Builder &b, const Architecture &a, const string &t, const string &c):
20 if(architecture->is_cross())
21 command = format("%s-%s", architecture->get_cross_prefix(), command);
22 executable = builder.get_vfs().find_binary(command);
24 if(architecture->is_native())
25 system_path.push_back("/usr/include");
27 system_path.push_back("/usr/"+architecture->get_cross_prefix()+"/include");
30 Target *GnuCompiler::create_target(const list<Target *> &sources, const string &) const
33 throw invalid_argument("GnuCCompiler::create_target");
34 SourceFile &source = dynamic_cast<SourceFile &>(*sources.front());
35 ObjectFile *obj = new ObjectFile(builder, *source.get_component(), source);
40 string GnuCompiler::create_build_signature(const BuildInfo &binfo) const
42 string result = FS::basename(executable->get_path());
49 result += (binfo.optimize>0 ? '0'+binfo.optimize : 's');
54 Task *GnuCompiler::run(const Target &target) const
56 const ObjectFile &object = dynamic_cast<const ObjectFile &>(target);
57 const Component &comp = *object.get_component();
59 ExternalTask::Arguments argv;
60 argv.push_back(executable->get_path().str());
63 const BuildInfo &binfo = comp.get_build_info();
64 if(binfo.warning_level>=1)
66 argv.push_back("-Wall");
67 if(binfo.warning_level>=2)
69 argv.push_back("-Wextra");
70 argv.push_back("-Wundef");
72 if(binfo.warning_level>=3)
74 argv.push_back("-pedantic");
75 argv.push_back("-Wno-long-long");
76 argv.push_back("-Wshadow");
79 argv.push_back("-Wc++-compat");
80 argv.push_back("-Wstrict-prototypes");
83 if(binfo.warning_level>=4)
85 // Some truly paranoid warnings
86 argv.push_back("-Wstrict-overflow=4");
87 argv.push_back("-Wfloat-equal");
88 argv.push_back("-Wconversion");
89 argv.push_back("-Wwrite-strings");
90 argv.push_back("-Winline");
92 if(binfo.fatal_warnings)
93 argv.push_back("-Werror");
95 for(BuildInfo::PathList::const_iterator i=binfo.incpath.begin(); i!=binfo.incpath.end(); ++i)
96 argv.push_back("-I"+i->str());
97 for(BuildInfo::DefineMap::const_iterator i=binfo.defines.begin(); i!=binfo.defines.end(); ++i)
100 argv.push_back(format("-D%s", i->first));
102 argv.push_back(format("-D%s=%s", i->first, i->second));
105 argv.push_back("-ggdb");
109 argv.push_back("-Os");
111 argv.push_back(format("-O%d", binfo.optimize));
114 argv.push_back("-pthread");
115 if(comp.get_type()==Component::LIBRARY && architecture->get_system()!="windows")
116 argv.push_back("-fPIC");
118 const Architecture &native_arch = builder.get_native_arch();
119 if(architecture->get_bits()!=native_arch.get_bits())
120 argv.push_back(format("-m%d", architecture->get_bits()));
122 const string &cpu = architecture->get_cpu();
124 argv.push_back("-march="+cpu);
126 FS::Path obj_path = object.get_path();
127 FS::Path src_path = object.get_source().get_path();
128 FS::Path work_dir = comp.get_package().get_source_directory();
130 argv.push_back("-o");
131 argv.push_back(relative(obj_path, work_dir).str());
132 argv.push_back(relative(src_path, work_dir).str());
134 if(!builder.get_dry_run())
135 FS::mkpath(FS::dirname(obj_path), 0755);
137 return new ExternalTask(argv, work_dir);