source/sourcepackage.cpp

   1 #include <cstdlib>
   2 #include <msp/io/print.h>
   3 #include <msp/strings/lexicalcast.h>
   4 #include <msp/strings/utils.h>
   5 #include "binarypackage.h"
   6 #include "builder.h"
   7 #include "misc.h"
   8 #include "pkgconfigfile.h"
   9 #include "tool.h"
  10 #include "sourcepackage.h"
  11
  12 using namespace std;
  13 using namespace Msp;
  14
  15 namespace {
  16
  17 bool component_sort(const Component &c1, const Component &c2)
  18 { return c1.get_type()<c2.get_type(); }
  19
  20 }
  21
  22
  23 SourcePackage::SourcePackage(Builder &b, const string &n, const FS::Path &s):
  24         Package(b, n),
  25         source(s),
  26         build_type(0),
  27         config(*this),
  28         deps_cache(*this)
  29 {
  30         components.push_back(Component(*this, Component::TARBALL, "@src"));
  31 }
  32
  33 void SourcePackage::set_build_type(const BuildType &t)
  34 {
  35         build_type = &t;
  36 }
  37
  38 FS::Path SourcePackage::get_temp_dir() const
  39 {
  40         string subdir = builder.get_current_arch().get_name();
  41         if(build_type)
  42         {
  43                 subdir += '.';
  44                 subdir += build_type->get_name();
  45         }
  46
  47         const FS::Path &temp = builder.get_temp_directory();
  48         if(temp.is_absolute())
  49                 return temp/name/subdir;
  50         else
  51                 return source/temp/subdir;
  52 }
  53
  54 FS::Path SourcePackage::get_out_dir() const
  55 {
  56         const Architecture &arch = builder.get_current_arch();
  57         string detail = (build_type ? build_type->get_name() : string());
  58         if(arch.is_native())
  59                 return source/detail;
  60         else
  61                 return source/arch.get_name()/detail;
  62 }
  63
  64 string SourcePackage::expand_string(const string &str) const
  65 {
  66         string result = str;
  67         string::size_type dollar = 0;
  68         unsigned n = 0;
  69         while((dollar = result.find('$'))!=string::npos)
  70         {
  71                 if(n>1000)
  72                         throw bad_expansion("nested too deep");
  73
  74                 string::size_type end;
  75                 string var;
  76                 if(dollar+1<result.size() && result[dollar+1]=='{')
  77                 {
  78                         end = result.find('}', dollar+2);
  79                         if(end==string::npos)
  80                                 throw bad_expansion("unterminated variable reference");
  81                         var = result.substr(dollar+2, end-dollar-2);
  82                         ++end;
  83                 }
  84                 else
  85                 {
  86                         for(end=dollar+1; (isalnum(result[end]) || result[end]=='_'); ++end) ;
  87                         var = result.substr(dollar+1, end-dollar-1);
  88                 }
  89
  90                 string value;
  91                 if(config.is_option(var))
  92                         value = config.get_option(var).value;
  93                 else if(var=="arch")
  94                         value = builder.get_current_arch().get_name();
  95                 else if(var=="system")
  96                         value = builder.get_current_arch().get_system();
  97                 else if(const char *ptr = getenv(var.c_str()))
  98                         value = ptr;
  99
 100                 result.replace(dollar, end-dollar, value);
 101
 102                 ++n;
 103         }
 104
 105         return result;
 106 }
 107
 108 void SourcePackage::do_configure(const StringMap &opts, unsigned flag)
 109 {
 110         init_config();
 111
 112         config.load();
 113
 114         if(flag && config.update(opts))
 115                 builder.get_logger().log("configure", format("Configuration of %s changed", name));
 116
 117         config.finish();
 118
 119         for(ConditionList::iterator i=conditions.begin(); i!=conditions.end(); ++i)
 120                 if(i->eval())
 121                 {
 122                         const StringList &reqs = i->get_requires();
 123                         for(StringList::const_iterator j=reqs.begin(); j!=reqs.end(); ++j)
 124                                 if(Package *pkg = builder.get_package_manager().find_package(*j))
 125                                         requires.push_back(pkg);
 126                 }
 127
 128         for(PackageList::iterator i=requires.begin(); i!=requires.end(); ++i)
 129         {
 130                 BinaryPackage *bpkg = dynamic_cast<BinaryPackage *>(*i);
 131                 if(bpkg && bpkg->get_need_path())
 132                         bpkg->set_path(config.get_option(bpkg->get_name()+"_path").value);
 133         }
 134
 135         deps_cache.load();
 136
 137         for(ComponentList::iterator i=components.begin(); i!=components.end(); ++i)
 138                 i->configure(opts, flag);
 139 }
 140
 141 void SourcePackage::init_config()
 142 {
 143         for(FeatureList::iterator i=features.begin(); i!=features.end(); ++i)
 144                 config.add_option("with_"+i->name, i->def_value, i->descr);
 145
 146         for(PackageList::const_iterator i=requires.begin(); i!=requires.end(); ++i)
 147         {
 148                 BinaryPackage *bpkg = dynamic_cast<BinaryPackage *>(*i);
 149                 if(bpkg && bpkg->get_need_path())
 150                         config.add_option(bpkg->get_name()+"_path", "/usr", "Path for "+bpkg->get_name());
 151         }
 152 }
 153
 154 void SourcePackage::create_build_info()
 155 {
 156         if(build_type)
 157                 build_info.update_from(build_type->get_build_info());
 158
 159         // XXX Currently, a package-specific settings will override cmdline.  This might or might not be desirable.
 160         const StringList &warnings = builder.get_warnings();
 161         build_info.warnings.insert(build_info.warnings.begin(), warnings.begin(), warnings.end());
 162
 163         build_info.incpath.push_back((builder.get_prefix()/"include").str());
 164         build_info.libpath.push_back((builder.get_prefix()/"lib").str());
 165
 166         bool export_paths = false;
 167         for(ComponentList::const_iterator i=components.begin(); (!export_paths && i!=components.end()); ++i)
 168                 export_paths = (i->get_type()==Component::LIBRARY);
 169
 170         if(export_paths)
 171         {
 172                 export_binfo.incpath.push_back((builder.get_prefix()/"include").str());
 173                 export_binfo.libpath.push_back((builder.get_prefix()/"lib").str());
 174         }
 175
 176         for(FeatureList::iterator i=features.begin(); i!=features.end(); ++i)
 177                 if(lexical_cast<bool>(config.get_option("with_"+i->name).value))
 178                         build_info.defines["WITH_"+toupper(i->name)] = "1";
 179
 180         for(ConditionList::iterator i=conditions.begin(); i!=conditions.end(); ++i)
 181                 if(i->eval())
 182                         build_info.update_from(i->get_build_info());
 183
 184         for(list<Component>::iterator i=components.begin(); i!=components.end(); ++i)
 185         {
 186                 i->create_build_info();
 187                 if(i->get_type()==Component::LIBRARY)
 188                         export_binfo.libs.push_back(i->get_name());
 189         }
 190 }
 191
 192 void SourcePackage::create_targets()
 193 {
 194         bool pc_needed = false;
 195         for(ComponentList::const_iterator i=components.begin(); i!=components.end(); ++i)
 196         {
 197                 i->create_targets();
 198                 if(i->get_type()==Component::LIBRARY)
 199                         pc_needed = true;
 200         }
 201
 202         if(pc_needed)
 203         {
 204                 PkgConfigFile *pc = new PkgConfigFile(builder, *this);
 205                 builder.get_target("install")->add_depend(*builder.get_toolchain().get_tool("CP").create_target(*pc));
 206         }
 207 }
 208
 209 void SourcePackage::save_caches()
 210 {
 211         config.save();
 212         deps_cache.save();
 213 }
 214
 215
 216 SourcePackage::Loader::Loader(SourcePackage &p):
 217         DataFile::DerivedObjectLoader<SourcePackage, Package>(p)
 218 {
 219         add("version",     &SourcePackage::version);
 220         add("description", &SourcePackage::description);
 221         add("build_info",  &Loader::build_info);
 222         add("feature",     &Loader::feature);
 223         add("if",          &Loader::condition);
 224         add("program",     &Loader::component<Component::PROGRAM>);
 225         add("library",     &Loader::component<Component::LIBRARY>);
 226         add("module",      &Loader::component<Component::MODULE>);
 227         add("headers",     &Loader::headers);
 228         add("install",     &Loader::component<Component::INSTALL>);
 229         add("datafile",    &Loader::component<Component::DATAFILE>);
 230         add("tarball",     &Loader::tarball);
 231         add("tar_file",    &Loader::tar_file);
 232 }
 233
 234 void SourcePackage::Loader::finish()
 235 {
 236         obj.components.sort(component_sort);
 237
 238         for(map<string, string>::const_iterator i=install_map.begin(); i!=install_map.end(); ++i)
 239         {
 240                 for(ComponentList::iterator j=obj.components.begin(); j!=obj.components.end(); ++j)
 241                 {
 242                         const StringList &sources = j->get_sources();
 243                         for(StringList::const_iterator k=sources.begin(); k!=sources.end(); ++k)
 244                         {
 245                                 if(!i->first.compare(0, k->size(), *k))
 246                                 {
 247                                         const_cast<InstallMap &>(j->get_install_map()).add_mapping(obj.source/i->first, i->second);
 248                                 }
 249                         }
 250                 }
 251         }
 252 }
 253
 254 void SourcePackage::Loader::feature(const string &n, const string &d)
 255 {
 256         Feature feat(n);
 257         feat.descr = d;
 258         feat.def_value = "no";
 259         load_sub(feat);
 260         obj.features.push_back(feat);
 261 }
 262
 263 void SourcePackage::Loader::condition(const string &c)
 264 {
 265         Condition cond(obj, c);
 266         load_sub(cond);
 267         obj.conditions.push_back(cond);
 268 }
 269
 270 template<Component::Type t>
 271 void SourcePackage::Loader::component(const string &n)
 272 {
 273         Component comp(obj, t, n);
 274         load_sub(comp);
 275         obj.components.push_back(comp);
 276 }
 277
 278 void SourcePackage::Loader::build_info()
 279 {
 280         load_sub(obj.build_info);
 281 }
 282
 283 void SourcePackage::Loader::headers(const string &n)
 284 {
 285         IO::print("%s: Note: headers components are deprecated\n", get_source());
 286         Component comp(obj, Component::LIBRARY, n);
 287         load_sub(comp);
 288         const StringList &sources = comp.get_sources();
 289         for(StringList::const_iterator i=sources.begin(); i!=sources.end(); ++i)
 290                 install_map[*i] = "include/"+comp.get_name();
 291 }
 292
 293 void SourcePackage::Loader::tarball(const string &n)
 294 {
 295         if(n=="@src")
 296         {
 297                 for(ComponentList::iterator i=obj.components.begin(); i!=obj.components.end(); ++i)
 298                         if(i->get_type()==Component::TARBALL && i->get_name()==n)
 299                                 load_sub(*i);
 300         }
 301         else
 302         {
 303                 Component trbl(obj, Component::TARBALL, n);
 304                 load_sub(trbl);
 305         }
 306 }
 307
 308 void SourcePackage::Loader::tar_file(const string &f)
 309 {
 310         IO::print("%s: Note: tar_file is deprecated\n", get_source());
 311         for(ComponentList::iterator i=obj.components.begin(); i!=obj.components.end(); ++i)
 312                 if(i->get_type()==Component::TARBALL && i->get_name()=="@src")
 313                         const_cast<StringList &>(i->get_sources()).push_back((obj.source/f).str());
 314 }