+++ /dev/null
-#include <cstdlib>
-#include <msp/io/print.h>
-#include <msp/strings/lexicalcast.h>
-#include <msp/strings/utils.h>
-#include "binarypackage.h"
-#include "builder.h"
-#include "misc.h"
-#include "pkgconfigfile.h"
-#include "tool.h"
-#include "sourcepackage.h"
-
-using namespace std;
-using namespace Msp;
-
-namespace {
-
-bool component_sort(const Component &c1, const Component &c2)
-{ return c1.get_type()<c2.get_type(); }
-
-}
-
-
-SourcePackage::SourcePackage(Builder &b, const string &n, const FS::Path &s):
- Package(b, n),
- source(s),
- build_type(0),
- config(*this),
- deps_cache(*this)
-{
- components.push_back(Component(*this, Component::TARBALL, "@src"));
-}
-
-void SourcePackage::set_build_type(const BuildType &t)
-{
- build_type = &t;
-}
-
-FS::Path SourcePackage::get_temp_dir() const
-{
- string subdir = builder.get_current_arch().get_name();
- if(build_type)
- {
- subdir += '.';
- subdir += build_type->get_name();
- }
- return source/config.get_option("tempdir").value/subdir;
-}
-
-FS::Path SourcePackage::get_out_dir() const
-{
- const Architecture &arch = builder.get_current_arch();
- string detail = (build_type ? build_type->get_name() : string());
- if(arch.is_native())
- return source/detail;
- else
- return source/arch.get_name()/detail;
-}
-
-string SourcePackage::expand_string(const string &str) const
-{
- string result = str;
- string::size_type dollar = 0;
- unsigned n = 0;
- while((dollar = result.find('$'))!=string::npos)
- {
- if(n>1000)
- throw bad_expansion("nested too deep");
-
- string::size_type end;
- string var;
- if(dollar+1<result.size() && result[dollar+1]=='{')
- {
- end = result.find('}', dollar+2);
- if(end==string::npos)
- throw bad_expansion("unterminated variable reference");
- var = result.substr(dollar+2, end-dollar-2);
- ++end;
- }
- else
- {
- for(end=dollar+1; (isalnum(result[end]) || result[end]=='_'); ++end) ;
- var = result.substr(dollar+1, end-dollar-1);
- }
-
- string value;
- if(config.is_option(var))
- value = config.get_option(var).value;
- else if(var=="arch")
- value = builder.get_current_arch().get_name();
- else if(var=="system")
- value = builder.get_current_arch().get_system();
- else if(const char *ptr = getenv(var.c_str()))
- value = ptr;
-
- result.replace(dollar, end-dollar, value);
-
- ++n;
- }
-
- return result;
-}
-
-void SourcePackage::do_configure(const StringMap &opts, unsigned flag)
-{
- init_config();
-
- config.load();
-
- if(flag && config.update(opts))
- builder.get_logger().log("configure", format("Configuration of %s changed", name));
-
- config.finish();
-
- for(ConditionList::iterator i=conditions.begin(); i!=conditions.end(); ++i)
- if(i->eval())
- {
- const StringList &reqs = i->get_requires();
- for(StringList::const_iterator j=reqs.begin(); j!=reqs.end(); ++j)
- if(Package *pkg = builder.get_package_manager().find_package(*j))
- requires.push_back(pkg);
- }
-
- for(PackageList::iterator i=requires.begin(); i!=requires.end(); ++i)
- {
- BinaryPackage *bpkg = dynamic_cast<BinaryPackage *>(*i);
- if(bpkg && bpkg->get_need_path())
- bpkg->set_path(config.get_option(bpkg->get_name()+"_path").value);
- }
-
- deps_cache.load();
-
- for(ComponentList::iterator i=components.begin(); i!=components.end(); ++i)
- i->configure(opts, flag);
-}
-
-void SourcePackage::init_config()
-{
- config.add_option("tempdir", "temp", "Directory for storing temporary files");
-
- for(FeatureList::iterator i=features.begin(); i!=features.end(); ++i)
- config.add_option("with_"+i->name, i->def_value, i->descr);
-
- for(PackageList::const_iterator i=requires.begin(); i!=requires.end(); ++i)
- {
- BinaryPackage *bpkg = dynamic_cast<BinaryPackage *>(*i);
- if(bpkg && bpkg->get_need_path())
- config.add_option(bpkg->get_name()+"_path", "/usr", "Path for "+bpkg->get_name());
- }
-}
-
-void SourcePackage::create_build_info()
-{
- if(build_type)
- build_info.update_from(build_type->get_build_info());
-
- // XXX Currently, a package-specific settings will override cmdline. This might or might not be desirable.
- const StringList &warnings = builder.get_warnings();
- build_info.warnings.insert(build_info.warnings.begin(), warnings.begin(), warnings.end());
-
- build_info.incpath.push_back((builder.get_prefix()/"include").str());
- build_info.libpath.push_back((builder.get_prefix()/"lib").str());
-
- bool export_paths = false;
- for(ComponentList::const_iterator i=components.begin(); (!export_paths && i!=components.end()); ++i)
- export_paths = (i->get_type()==Component::LIBRARY);
-
- if(export_paths)
- {
- export_binfo.incpath.push_back((builder.get_prefix()/"include").str());
- export_binfo.libpath.push_back((builder.get_prefix()/"lib").str());
- }
-
- for(FeatureList::iterator i=features.begin(); i!=features.end(); ++i)
- if(lexical_cast<bool>(config.get_option("with_"+i->name).value))
- build_info.defines["WITH_"+toupper(i->name)] = "1";
-
- for(ConditionList::iterator i=conditions.begin(); i!=conditions.end(); ++i)
- if(i->eval())
- build_info.update_from(i->get_build_info());
-
- for(list<Component>::iterator i=components.begin(); i!=components.end(); ++i)
- {
- i->create_build_info();
- if(i->get_type()==Component::LIBRARY)
- export_binfo.libs.push_back(i->get_name());
- }
-}
-
-void SourcePackage::create_targets()
-{
- bool pc_needed = false;
- for(ComponentList::const_iterator i=components.begin(); i!=components.end(); ++i)
- {
- i->create_targets();
- if(i->get_type()==Component::LIBRARY)
- pc_needed = true;
- }
-
- if(pc_needed)
- {
- PkgConfigFile *pc = new PkgConfigFile(builder, *this);
- builder.get_target("install")->add_depend(*builder.get_toolchain().get_tool("CP").create_target(*pc));
- }
-}
-
-void SourcePackage::save_caches()
-{
- config.save();
- deps_cache.save();
-}
-
-
-SourcePackage::Loader::Loader(SourcePackage &p):
- DataFile::DerivedObjectLoader<SourcePackage, Package>(p)
-{
- add("version", &SourcePackage::version);
- add("description", &SourcePackage::description);
- add("build_info", &Loader::build_info);
- add("feature", &Loader::feature);
- add("if", &Loader::condition);
- add("program", &Loader::component<Component::PROGRAM>);
- add("library", &Loader::component<Component::LIBRARY>);
- add("module", &Loader::component<Component::MODULE>);
- add("headers", &Loader::headers);
- add("install", &Loader::component<Component::INSTALL>);
- add("datafile", &Loader::component<Component::DATAFILE>);
- add("tarball", &Loader::tarball);
- add("tar_file", &Loader::tar_file);
-}
-
-void SourcePackage::Loader::finish()
-{
- obj.components.sort(component_sort);
-
- for(map<string, string>::const_iterator i=install_map.begin(); i!=install_map.end(); ++i)
- {
- for(ComponentList::iterator j=obj.components.begin(); j!=obj.components.end(); ++j)
- {
- const StringList &sources = j->get_sources();
- for(StringList::const_iterator k=sources.begin(); k!=sources.end(); ++k)
- {
- if(!i->first.compare(0, k->size(), *k))
- {
- const_cast<InstallMap &>(j->get_install_map()).add_mapping(obj.source/i->first, i->second);
- }
- }
- }
- }
-}
-
-void SourcePackage::Loader::feature(const string &n, const string &d)
-{
- Feature feat(n);
- feat.descr = d;
- feat.def_value = "no";
- load_sub(feat);
- obj.features.push_back(feat);
-}
-
-void SourcePackage::Loader::condition(const string &c)
-{
- Condition cond(obj, c);
- load_sub(cond);
- obj.conditions.push_back(cond);
-}
-
-template<Component::Type t>
-void SourcePackage::Loader::component(const string &n)
-{
- Component comp(obj, t, n);
- load_sub(comp);
- obj.components.push_back(comp);
-}
-
-void SourcePackage::Loader::build_info()
-{
- load_sub(obj.build_info);
-}
-
-void SourcePackage::Loader::headers(const string &n)
-{
- IO::print("%s: Note: headers components are deprecated\n", get_source());
- Component comp(obj, Component::LIBRARY, n);
- load_sub(comp);
- const StringList &sources = comp.get_sources();
- for(StringList::const_iterator i=sources.begin(); i!=sources.end(); ++i)
- install_map[*i] = "include/"+comp.get_name();
-}
-
-void SourcePackage::Loader::tarball(const string &n)
-{
- if(n=="@src")
- {
- for(ComponentList::iterator i=obj.components.begin(); i!=obj.components.end(); ++i)
- if(i->get_type()==Component::TARBALL && i->get_name()==n)
- load_sub(*i);
- }
- else
- {
- Component trbl(obj, Component::TARBALL, n);
- load_sub(trbl);
- }
-}
-
-void SourcePackage::Loader::tar_file(const string &f)
-{
- IO::print("%s: Note: tar_file is deprecated\n", get_source());
- for(ComponentList::iterator i=obj.components.begin(); i!=obj.components.end(); ++i)
- if(i->get_type()==Component::TARBALL && i->get_name()=="@src")
- const_cast<StringList &>(i->get_sources()).push_back((obj.source/f).str());
-}