source/builder.cpp

   1 /* $Id$
   2
   3 This file is part of builder
   4 Copyright © 2006-2007 Mikko Rasa, Mikkosoft Productions
   5 Distributed under the LGPL
   6 */
   7
   8 #include <fstream>
   9 #include <iostream>
  10 #include <set>
  11 #include <msp/core/error.h>
  12 #include <msp/core/getopt.h>
  13 #include <msp/datafile/parser.h>
  14 #include <msp/path/utils.h>
  15 #include <msp/strings/utils.h>
  16 #include <msp/time/units.h>
  17 #include <msp/time/utils.h>
  18 #include "action.h"
  19 #include "analyzer.h"
  20 #include "binarypackage.h"
  21 #include "builder.h"
  22 #include "header.h"
  23 #include "install.h"
  24 #include "misc.h"
  25 #include "package.h"
  26 #include "pkgconfig.h"
  27 #include "sharedlibrary.h"
  28 #include "sourcepackage.h"
  29 #include "systemlibrary.h"
  30 #include "tarball.h"
  31 #include "unlink.h"
  32 #include "virtualtarget.h"
  33
  34 using namespace std;
  35 using namespace Msp;
  36
  37 Builder::Builder(int argc, char **argv):
  38         default_pkg(0),
  39         analyzer(0),
  40         build(false),
  41         clean(0),
  42         dry_run(false),
  43         help(false),
  44         verbose(1),
  45         chrome(false),
  46         build_file("Build"),
  47         jobs(1),
  48         conf_all(false),
  49         conf_only(false),
  50         build_all(false),
  51         create_makefile(false)
  52 {
  53         string   analyze_mode;
  54         string   work_dir;
  55         bool     full_paths=false;
  56         unsigned max_depth=5;
  57
  58         GetOpt getopt;
  59         getopt.add_option('a', "analyze",    analyze_mode, GetOpt::REQUIRED_ARG);
  60         getopt.add_option('b', "build",      build,        GetOpt::NO_ARG);
  61         getopt.add_option('c', "clean",      clean,        GetOpt::NO_ARG);
  62         getopt.add_option('f', "file",       build_file,   GetOpt::REQUIRED_ARG);
  63         getopt.add_option('h', "help",       help,         GetOpt::NO_ARG);
  64         getopt.add_option('j', "jobs",       jobs,         GetOpt::REQUIRED_ARG);
  65         getopt.add_option('n', "dry-run",    dry_run,      GetOpt::NO_ARG);
  66         getopt.add_option('v', "verbose",    verbose,      GetOpt::NO_ARG);
  67         getopt.add_option('A', "conf-all",   conf_all,     GetOpt::NO_ARG);
  68         getopt.add_option('B', "build-all",  build_all,    GetOpt::NO_ARG);
  69         getopt.add_option('C', "chdir",      work_dir,     GetOpt::REQUIRED_ARG);
  70         getopt.add_option('W', "what-if",    what_if,      GetOpt::REQUIRED_ARG);
  71         getopt.add_option(     "chrome",     chrome,       GetOpt::NO_ARG);
  72         getopt.add_option(     "conf-only",  conf_only,    GetOpt::NO_ARG);
  73         getopt.add_option(     "full-paths", full_paths,   GetOpt::NO_ARG);
  74         //getopt.add_option(     "makefile",   create_makefile, GetOpt::NO_ARG);
  75         getopt.add_option(     "max-depth",  max_depth,    GetOpt::REQUIRED_ARG);
  76         getopt(argc, argv);
  77
  78         if(!analyze_mode.empty())
  79         {
  80                 analyzer=new Analyzer(*this);
  81
  82                 if(analyze_mode=="deps")
  83                         analyzer->set_mode(Analyzer::DEPS);
  84                 else if(analyze_mode=="alldeps")
  85                         analyzer->set_mode(Analyzer::ALLDEPS);
  86                 else if(analyze_mode=="rebuild")
  87                         analyzer->set_mode(Analyzer::REBUILD);
  88                 else if(analyze_mode=="rdeps")
  89                         analyzer->set_mode(Analyzer::RDEPS);
  90                 else
  91                         throw UsageError("Invalid analyze mode");
  92
  93                 analyzer->set_max_depth(max_depth);
  94                 analyzer->set_full_paths(full_paths);
  95         }
  96         else if(!clean && !create_makefile)
  97                 build=true;
  98
  99         const list<string> &args=getopt.get_args();
 100         for(list<string>::const_iterator i=args.begin(); i!=args.end(); ++i)
 101         {
 102                 unsigned equal=i->find('=');
 103                 if(equal!=string::npos)
 104                         cmdline_options.insert(StringMap::value_type(i->substr(0, equal), i->substr(equal+1)));
 105                 else
 106                         cmdline_targets.push_back(*i);
 107         }
 108
 109         if(cmdline_targets.empty())
 110                 cmdline_targets.push_back("default");
 111
 112         if(!work_dir.empty())
 113                 chdir(work_dir.c_str());
 114
 115         cwd=Path::getcwd();
 116
 117         archs.insert(StringMap::value_type("native", ""));
 118
 119         StringMap &native_tools=tools.insert(ToolMap::value_type("native", StringMap())).first->second;
 120         native_tools.insert(StringMap::value_type("CC",   "gcc"));
 121         native_tools.insert(StringMap::value_type("CXX",  "g++"));
 122         native_tools.insert(StringMap::value_type("LD",   "gcc"));
 123         native_tools.insert(StringMap::value_type("LDXX", "g++"));
 124         native_tools.insert(StringMap::value_type("AR",   "ar"));
 125
 126         const char *home=getenv("HOME");
 127         if(home)
 128                 load_build_file((Path::Path(home)/".builderrc").str());
 129 }
 130
 131 /**
 132 Gets a package with the specified name, possibly creating it.
 133
 134 @param   n  Package name
 135
 136 @return  Pointer to the package, or 0 if the package could not be located
 137 */
 138 Package *Builder::get_package(const string &n)
 139 {
 140         PackageMap::iterator i=packages.find(n);
 141         if(i!=packages.end())
 142                 return i->second;
 143
 144         // Try to get source directory with pkgconfig
 145         list<string> argv;
 146         argv.push_back("pkg-config");
 147         argv.push_back("--variable=source");
 148         argv.push_back(n);
 149         string srcdir=strip(run_command(argv));
 150
 151         PathList dirs;
 152         if(!srcdir.empty())
 153                 dirs.push_back(srcdir);
 154
 155         // Make some other guesses about the source directory
 156         string dirname=n;
 157         if(!dirname.compare(0, 3, "msp"))
 158                 dirname.erase(0, 3);
 159         dirs.push_back(cwd/dirname);
 160         dirs.push_back(cwd/".."/dirname);
 161
 162         // Go through the candidate directories and look for a Build file
 163         for(PathList::iterator j=dirs.begin(); j!=dirs.end(); ++j)
 164                 if(!load_build_file(*j/"Build"))
 165                 {
 166                         i=packages.find(n);
 167                         if(i!=packages.end())
 168                                 return i->second;
 169                         break;
 170                 }
 171
 172         // Package source not found - create a binary package
 173         Package *pkg=BinaryPackage::from_pkgconfig(*this, n);
 174
 175         packages.insert(PackageMap::value_type(n, pkg));
 176         if(pkg)
 177                 new_pkgs.push_back(pkg);
 178
 179         return pkg;
 180 }
 181
 182 /**
 183 Returns the target with the given name, or 0 if no such target exists.
 184 */
 185 Target *Builder::get_target(const string &n) const
 186 {
 187         TargetMap::const_iterator i=targets.find(n);
 188         if(i!=targets.end())
 189                 return i->second;
 190         return 0;
 191 }
 192
 193 /**
 194 Tries to locate a header included from a given location and with a given include
 195 path.  Considers known targets as well as existing files.  If a matching target
 196 is not found but a file exists, a new SystemHeader target will be created and
 197 returned.
 198 */
 199 Target *Builder::get_header(const string &include, const string &, const string &from, const list<string> &path)
 200 {
 201         string hash(8, 0);
 202         update_hash(hash, from);
 203         for(list<string>::const_iterator i=path.begin(); i!=path.end(); ++i)
 204                 update_hash(hash, *i);
 205
 206         string id=hash+include;
 207         TargetMap::iterator i=includes.find(id);
 208         if(i!=includes.end())
 209                 return i->second;
 210
 211         string fn=include.substr(1);
 212         Target *tgt=0;
 213         if(include[0]=='"' && (tgt=get_header(Path::Path(from)/fn)))
 214                 ;
 215         else if((tgt=get_header(Path::Path("/usr/include")/fn)))
 216                 ;
 217         //XXX Determine the C++ header location dynamically
 218         else if((tgt=get_header(Path::Path("/usr/include/c++/4.1.2")/fn)))
 219                 ;
 220         else
 221         {
 222                 for(list<string>::const_iterator j=path.begin(); (j!=path.end() && !tgt); ++j)
 223                         tgt=get_header(cwd/ *j/fn);
 224         }
 225
 226         includes.insert(TargetMap::value_type(id, tgt));
 227
 228         return tgt;
 229 }
 230
 231 /**
 232 Tries to locate a library with the given library path.  Considers known targets
 233 as well as existing files.  If a matching target is not found but a file exists,
 234 a new SystemLibrary target will be created and returned.
 235
 236 @param   lib   Name of the library to get (without "lib" prefix or extension)
 237 @param   path  List of paths to search for the library
 238 @param   mode  Shared / static mode
 239
 240 @return  Some kind of library target, if a match was found
 241 */
 242 Target *Builder::get_library(const string &lib, const string &arch, const list<string> &path, LibMode mode)
 243 {
 244         string hash(8, 0);
 245         for(list<string>::const_iterator i=path.begin(); i!=path.end(); ++i)
 246                 update_hash(hash, *i);
 247
 248         //XXX Incorporate mode into id
 249         string id=hash+lib;
 250         TargetMap::iterator i=libraries.find(id);
 251         if(i!=libraries.end())
 252                 return i->second;
 253
 254         StringList syspath;
 255         if(arch=="native")
 256         {
 257                 syspath.push_back("/lib");
 258                 syspath.push_back("/usr/lib");
 259         }
 260         else
 261                 syspath.push_back("/usr/"+get_arch_prefix(arch)+"/lib");
 262
 263         Target *tgt=0;
 264         for(StringList::iterator j=syspath.begin(); (!tgt && j!=syspath.end()); ++j)
 265                 tgt=get_library(lib, arch, *j, mode);
 266         for(StringList::const_iterator j=path.begin(); (!tgt && j!=path.end()); ++j)
 267                 tgt=get_library(lib, arch, cwd/ *j, mode);
 268
 269         libraries.insert(TargetMap::value_type(id, tgt));
 270
 271         return tgt;
 272 }
 273
 274 const string &Builder::get_arch_prefix(const string &arch) const
 275 {
 276         StringMap::const_iterator i=archs.find(arch);
 277         if(i==archs.end())
 278                 throw InvalidParameterValue("Unknown architecture");
 279
 280         return i->second;
 281 }
 282
 283 string Builder::get_tool(const std::string &tool, const std::string &arch)
 284 {
 285         ToolMap::iterator i=tools.find(arch);
 286         if(i!=tools.end())
 287         {
 288                 StringMap::iterator j=i->second.find(tool);
 289                 if(j!=i->second.end())
 290                         return j->second;
 291         }
 292
 293         // Either the arch, or the tool within the arch was not found
 294         i=tools.find("native");
 295         StringMap::iterator j=i->second.find(tool);
 296         if(j==i->second.end())
 297                 throw InvalidParameterValue("Unknown tool");
 298
 299         return get_arch_prefix(arch)+"-"+j->second;
 300 }
 301
 302 void Builder::apply_profile_template(Config &config, const string &pt) const
 303 {
 304         vector<string> parts=split(pt, '-');
 305
 306         for(vector<string>::iterator i=parts.begin(); i!=parts.end(); ++i)
 307         {
 308                 ProfileTemplateMap::const_iterator j=profile_tmpl.find(*i);
 309                 if(j==profile_tmpl.end())
 310                         continue;
 311
 312                 config.update(j->second);
 313         }
 314 }
 315
 316 /**
 317 Adds a target to both the target map and the new target queue.  Called from
 318 Target constructor.
 319 */
 320 void Builder::add_target(Target *t)
 321 {
 322         targets.insert(TargetMap::value_type(t->get_name(), t));
 323         new_tgts.push_back(t);
 324 }
 325
 326 int Builder::main()
 327 {
 328         if(load_build_file(cwd/build_file))
 329         {
 330                 cerr<<"No build info here.\n";
 331                 return 1;
 332         }
 333
 334         while(!new_pkgs.empty())
 335         {
 336                 Package *pkg=new_pkgs.front();
 337                 new_pkgs.erase(new_pkgs.begin());
 338                 pkg->resolve_refs();
 339         }
 340
 341         default_pkg->configure(cmdline_options, conf_all?2:1);
 342
 343         if(help)
 344         {
 345                 usage(0, "builder", false);
 346                 cout<<'\n';
 347                 package_help();
 348                 return 0;
 349         }
 350
 351         StringMap problems;
 352         for(PackageMap::iterator i=packages.begin(); i!=packages.end(); ++i)
 353         {
 354                 SourcePackage *spkg=dynamic_cast<SourcePackage *>(i->second);
 355                 string prob;
 356                 if(!i->second)
 357                         prob="missing";
 358                 else if(spkg && spkg->get_arch()!=default_pkg->get_arch())
 359                         prob="wrong architecture ("+spkg->get_arch()+")";
 360                 if(!prob.empty())
 361                         problems.insert(StringMap::value_type(i->first, prob));
 362         }
 363
 364         if(!problems.empty())
 365         {
 366                 cerr<<"The following problems were detected:\n";
 367                 for(StringMap::iterator i=problems.begin(); i!=problems.end(); ++i)
 368                         cerr<<"  "<<i->first<<": "<<i->second<<'\n';
 369                 cerr<<"Please fix them and try again.\n";
 370                 return 1;
 371         }
 372
 373         if(conf_only)
 374                 return 0;
 375
 376         if(create_targets())
 377                 return 1;
 378
 379         cout<<packages.size()<<" packages, "<<targets.size()<<" targets\n";
 380         if(verbose>=2)
 381         {
 382                 for(PackageMap::iterator i=packages.begin(); i!=packages.end(); ++i)
 383                 {
 384                         cout<<' '<<i->second->get_name();
 385                         if(dynamic_cast<SourcePackage *>(i->second))
 386                                 cout<<'*';
 387                         unsigned count=0;
 388                         unsigned ood_count=0;
 389                         for(TargetMap::iterator j=targets.begin(); j!=targets.end(); ++j)
 390                                 if(j->second->get_package()==i->second)
 391                                 {
 392                                         ++count;
 393                                         if(j->second->get_rebuild())
 394                                                 ++ood_count;
 395                                 }
 396                         if(count)
 397                         {
 398                                 cout<<" ("<<count<<" targets";
 399                                 if(ood_count)
 400                                         cout<<", "<<ood_count<<" out-of-date";
 401                                 cout<<')';
 402                         }
 403                         cout<<'\n';
 404                 }
 405         }
 406
 407         if(analyzer)
 408                 analyzer->analyze();
 409
 410         //if(create_makefile
 411
 412         if(clean)
 413                 exit_code=do_clean();
 414         else if(build)
 415                 exit_code=do_build();
 416
 417         return exit_code;
 418 }
 419
 420 Builder::~Builder()
 421 {
 422         for(PackageMap::iterator i=packages.begin(); i!=packages.end(); ++i)
 423                 delete i->second;
 424         for(TargetMap::iterator i=targets.begin(); i!=targets.end(); ++i)
 425                 delete i->second;
 426         delete analyzer;
 427 }
 428
 429 void Builder::usage(const char *reason, const char *argv0, bool brief)
 430 {
 431         if(reason)
 432                 cerr<<reason<<'\n';
 433
 434         if(brief)
 435                 cerr<<"Usage: "<<argv0<<" [-a|--analyze MODE] [-b|--build] [-c|--clean] [-f|--file FILE] [-h|--help] [-j|--jobs NUM] [-n||--dry-run] [-v|--verbose] [-A|--conf-all] [-B|--build-all] [-C|--chdir DIRECTORY] [-W|--what-if FILE] [--chrome] [--conf-only] [--full-paths] [--max-depth NUM] [<target> ...]";
 436         else
 437         {
 438                 cerr<<
 439                         "Usage: "<<argv0<<" [options] [<target> ...]\n"
 440                         "\n"
 441                         "Options:\n"
 442                         "  -a, --analyze MODE  Perform analysis.  MODE can be deps, alldeps or rebuild.\n"
 443                         "  -b, --build         Perform build even if doing analysis.\n"
 444                         "  -c, --clean         Clean buildable targets.\n"
 445                         "  -f, --file FILE     Read info from FILE instead of Build.\n"
 446                         "  -h, --help          Print this message.\n"
 447                         "  -j, --jobs NUM      Run NUM commands at once, whenever possible.\n"
 448                         "  -n, --dry-run       Don't actually do anything, only show what would be done.\n"
 449                         "  -v, --verbose       Print more information about what's going on.\n"
 450                         "  -A, --conf-all      Apply configuration to all packages.\n"
 451                         "  -B, --build-all     Build all targets unconditionally.\n"
 452                         "  -C, --chdir DIR     Change to DIR before doing anything else.\n"
 453                         "  -W, --what-if FILE  Pretend that FILE has changed.\n"
 454                         "  --chrome            Use extra chrome to print status.\n"
 455                         "  --conf-only         Stop after configuring packages.\n"
 456                         "  --full-paths        Output full paths in analysis.\n"
 457                         //"  --makefile          Create a makefile for this package.\n"
 458                         "  --max-depth NUM     Maximum depth to show in analysis.\n";
 459         }
 460 }
 461
 462 /**
 463 Loads the given build file.
 464
 465 @param   fn  Path to the file
 466
 467 @return  0 on success, -1 if the file could not be opened
 468 */
 469 int Builder::load_build_file(const Path::Path &fn)
 470 {
 471         ifstream in(fn.str().c_str());
 472         if(!in)
 473                 return -1;
 474
 475         if(verbose>=3)
 476                 cout<<"Reading "<<fn<<'\n';
 477
 478         DataFile::Parser parser(in, fn.str());
 479         Loader loader(*this, fn.subpath(0, fn.size()-1));
 480         loader.load(parser);
 481
 482         return 0;
 483 }
 484
 485 /**
 486 Creates targets for all packages and prepares them for building.
 487
 488 @return  0 if everything went ok, -1 if something bad happened and a build
 489          shouldn't be attempted
 490 */
 491 int Builder::create_targets()
 492 {
 493         Target *world=new VirtualTarget(*this, "world");
 494
 495         Target *def_tgt=new VirtualTarget(*this, "default");
 496         world->add_depend(def_tgt);
 497
 498         Target *install=new VirtualTarget(*this, "install");
 499         world->add_depend(install);
 500
 501         Target *tarballs=new VirtualTarget(*this, "tarballs");
 502         world->add_depend(tarballs);
 503
 504         for(PackageMap::iterator i=packages.begin(); i!=packages.end(); ++i)
 505         {
 506                 SourcePackage *spkg=dynamic_cast<SourcePackage *>(i->second);
 507                 if(!spkg)
 508                         continue;
 509
 510                 const ComponentList &components=spkg->get_components();
 511                 for(ComponentList::const_iterator j=components.begin(); j!=components.end(); ++j)
 512                         j->create_targets();
 513
 514                 if(spkg->get_install_flags()&(SourcePackage::LIB|SourcePackage::INCLUDE))
 515                 {
 516                         PkgConfig *pc=new PkgConfig(*this, *spkg);
 517                         install->add_depend(new Install(*this, *spkg, *pc));
 518                 }
 519
 520                 tarballs->add_depend(new TarBall(*this, *spkg));
 521         }
 522
 523         // Find dependencies until no new targets are created
 524         while(!new_tgts.empty())
 525         {
 526                 Target *tgt=new_tgts.front();
 527                 new_tgts.erase(new_tgts.begin());
 528                 tgt->find_depends();
 529                 if(!tgt->get_depends_ready())
 530                         new_tgts.push_back(tgt);
 531         }
 532
 533         // Apply what-ifs
 534         for(StringList::iterator i=what_if.begin(); i!=what_if.end(); ++i)
 535         {
 536                 Target *tgt=get_target((cwd/ *i).str());
 537                 if(!tgt)
 538                 {
 539                         cerr<<"Unknown what-if target "<<*i<<'\n';
 540                         return -1;
 541                 }
 542                 tgt->touch();
 543         }
 544
 545         // Make the cmdline target depend on all targets mentioned on the command line
 546         Target *cmdline=new VirtualTarget(*this, "cmdline");
 547         bool build_world=false;
 548         for(list<string>::iterator i=cmdline_targets.begin(); i!=cmdline_targets.end(); ++i)
 549         {
 550                 Target *tgt=get_target(*i);
 551                 if(!tgt)
 552                         tgt=get_target((cwd/ *i).str());
 553                 if(!tgt)
 554                 {
 555                         cerr<<"I don't know anything about "<<*i<<'\n';
 556                         return -1;
 557                 }
 558                 if(tgt==world)
 559                         build_world=true;
 560                 cmdline->add_depend(tgt);
 561         }
 562
 563         /* If world is to be built, prepare cmdline.  If not, add cmdline to world
 564            and prepare world.  I don't really like this, but it keeps the graph
 565            acyclic. */
 566         if(build_world)
 567                 cmdline->prepare();
 568         else
 569         {
 570                 world->add_depend(cmdline);
 571                 world->prepare();
 572         }
 573
 574         for(PackageMap::iterator i=packages.begin(); i!=packages.end(); ++i)
 575                 if(SourcePackage *spkg=dynamic_cast<SourcePackage *>(i->second))
 576                         spkg->get_deps_cache().save();
 577
 578         return 0;
 579 }
 580
 581 /**
 582 Check if a header exists, either as a target or a file.  Either an existing
 583 target or a new SystemHeader target will be returned.
 584 */
 585 Target *Builder::get_header(const Msp::Path::Path &fn)
 586 {
 587         Target *tgt=get_target(fn.str());
 588         if(tgt) return tgt;
 589
 590         if(Path::exists(fn))
 591         {
 592                 tgt=new SystemHeader(*this, fn.str());
 593                 return tgt;
 594         }
 595         return 0;
 596 }
 597
 598 Target *Builder::get_library(const string &lib, const string &arch, const Path::Path &path, LibMode mode)
 599 {
 600         // Populate a list of candidate filenames
 601         StringList candidates;
 602
 603         if(mode!=ALL_STATIC)
 604         {
 605                 if(arch=="win32")
 606                         candidates.push_back("lib"+lib+".dll");
 607                 else
 608                         candidates.push_back("lib"+lib+".so");
 609         }
 610
 611         /* Static libraries are always considered, since sometimes shared versions
 612         may not be available */
 613         candidates.push_back("lib"+lib+".a");
 614         if(arch=="win32")
 615                 candidates.push_back("lib"+lib+".dll.a");
 616
 617         for(StringList::iterator i=candidates.begin(); i!=candidates.end(); ++i)
 618         {
 619                 string full=(path/ *i).str();
 620                 Target *tgt=get_target(full);
 621
 622                 if(tgt)
 623                 {
 624                         Target *real_tgt=tgt;
 625                         if(dynamic_cast<Install *>(tgt))
 626                                 real_tgt=real_tgt->get_depends().front();
 627
 628                         /* Ignore dynamic libraries from local packages unless library mode is
 629                         DYNAMIC */
 630                         if(dynamic_cast<SharedLibrary *>(real_tgt) && mode!=DYNAMIC)
 631                                 continue;
 632                         else if(tgt)
 633                                 return tgt;
 634                 }
 635                 else if(Path::exists(full))
 636                 {
 637                         tgt=new SystemLibrary(*this, full);
 638                         return tgt;
 639                 }
 640         }
 641
 642         return 0;
 643 }
 644
 645 /**
 646 Updates a hash with a string.  This is used from get_header and get_library.
 647 */
 648 void Builder::update_hash(string &hash, const string &value)
 649 {
 650         for(unsigned i=0; i<value.size(); ++i)
 651                 hash[i%hash.size()]^=value[i];
 652 }
 653
 654 /**
 655 This function supervises the build process, starting new actions when slots
 656 become available.
 657 */
 658 int Builder::do_build()
 659 {
 660         Target *cmdline=get_target("cmdline");
 661
 662         unsigned total=cmdline->count_rebuild();
 663         if(!total)
 664         {
 665                 cout<<"Already up to date\n";
 666                 return 0;
 667         }
 668         cout<<"Will build "<<total<<" target(s)\n";
 669
 670         vector<Action *> actions;
 671
 672         if(chrome)
 673                 cout<<"0 targets built\n";
 674         unsigned count=0;
 675
 676         bool fail=false;
 677         bool finish=false;
 678
 679         while(!finish)
 680         {
 681                 if(actions.size()<jobs && !fail)
 682                 {
 683                         Target *tgt=cmdline->get_buildable_target();
 684                         if(tgt)
 685                         {
 686                                 Action *action=tgt->build();
 687                                 if(action)
 688                                         actions.push_back(action);
 689                         }
 690                         else if(actions.empty())
 691                                 finish=true;
 692                 }
 693                 else
 694                         Time::sleep(10*Time::msec);
 695
 696                 for(unsigned i=0; i<actions.size();)
 697                 {
 698                         int status=actions[i]->check();
 699                         if(status>=0)
 700                         {
 701                                 ++count;
 702                                 if(chrome)
 703                                 {
 704                                         cout<<"\e["<<actions.size()+1<<'A';
 705                                         cout<<count<<" targets built\n";
 706                                         if(i)
 707                                                 cout<<"\e["<<i<<"B";
 708                                         cout<<"\e[M";
 709                                         if(i<actions.size()-1)
 710                                                 cout<<"\e["<<actions.size()-i-1<<"B";
 711                                         cout.flush();
 712                                 }
 713                                 delete actions[i];
 714                                 actions.erase(actions.begin()+i);
 715                                 if(status>0)
 716                                         fail=true;
 717                                 if(actions.empty() && fail)
 718                                         finish=true;
 719                         }
 720                         else
 721                                 ++i;
 722                 }
 723         }
 724
 725         if(fail)
 726                 cout<<"Build failed\n";
 727
 728         return fail?1:0;
 729 }
 730
 731 /**
 732 Cleans buildable targets.  If clean is 1, cleans only this package.  If
 733 clean is 2 or greater, cleans all buildable packages.
 734 */
 735 int Builder::do_clean()
 736 {
 737         // Cleaning doesn't care about ordering, so a simpler method can be used
 738
 739         set<Target *> clean_tgts;
 740         TargetList queue;
 741         queue.push_back(get_target("cmdline"));
 742
 743         while(!queue.empty())
 744         {
 745                 Target *tgt=queue.front();
 746                 queue.erase(queue.begin());
 747
 748                 if(tgt->get_buildable() && (tgt->get_package()==default_pkg || clean>=2))
 749                         clean_tgts.insert(tgt);
 750
 751                 const TargetList &deps=tgt->get_depends();
 752                 for(TargetList::const_iterator i=deps.begin(); i!=deps.end(); ++i)
 753                         if(!clean_tgts.count(*i))
 754                                 queue.push_back(*i);
 755         }
 756
 757         for(set<Target *>::iterator i=clean_tgts.begin(); i!=clean_tgts.end(); ++i)
 758         {
 759                 Action *action=new Unlink(*this, **i);
 760                 while(action->check()<0);
 761                 delete action;
 762         }
 763
 764         return 0;
 765 }
 766
 767 /**
 768 Prints out information about the default package.
 769 */
 770 void Builder::package_help()
 771 {
 772         const Config &config=default_pkg->get_config();
 773         const Config::OptionMap &options=config.get_options();
 774
 775         cout<<"Required packages:\n  ";
 776         const PkgRefList &requires=default_pkg->get_requires();
 777         for(PkgRefList::const_iterator i=requires.begin(); i!=requires.end(); ++i)
 778         {
 779                 if(i!=requires.begin())
 780                         cout<<", ";
 781                 cout<<i->get_name();
 782         }
 783         cout<<"\n\n";
 784         cout<<"Package configuration:\n";
 785         for(Config::OptionMap::const_iterator i=options.begin(); i!=options.end(); ++i)
 786         {
 787                 const Config::Option &opt=i->second;
 788                 cout<<"  "<<opt.name<<": "<<opt.descr<<" ("<<opt.value<<") ["<<opt.defv<<"]\n";
 789         }
 790 }
 791
 792 Application::RegApp<Builder> Builder::reg;
 793
 794
 795 Builder::Loader::Loader(Builder &b, const Path::Path &s):
 796         bld(b),
 797         src(s)
 798 {
 799         add("architecture", &Loader::architecture);
 800         add("binary_package", &Loader::binpkg);
 801         add("profile", &Loader::profile);
 802         add("package", &Loader::package);
 803 }
 804
 805 void Builder::Loader::architecture(const string &a, const string &p)
 806 {
 807         bld.archs.insert(StringMap::value_type(a, p));
 808 }
 809
 810 void Builder::Loader::binpkg(const string &n)
 811 {
 812         BinaryPackage *pkg=new BinaryPackage(bld, n);
 813         load_sub(*pkg);
 814         bld.packages.insert(PackageMap::value_type(n, pkg));
 815         bld.new_pkgs.push_back(pkg);
 816 }
 817
 818 void Builder::Loader::profile(const string &n)
 819 {
 820         StringMap prf;
 821         load_sub<ProfileLoader>(prf);
 822         bld.profile_tmpl.insert(ProfileTemplateMap::value_type(n, prf));
 823 }
 824
 825 void Builder::Loader::package(const string &n)
 826 {
 827         SourcePackage *pkg=new SourcePackage(bld, n, src);
 828         load_sub(*pkg);
 829         bld.packages.insert(PackageMap::value_type(n, pkg));
 830         bld.new_pkgs.push_back(pkg);
 831         if(!bld.default_pkg)
 832                 bld.default_pkg=pkg;
 833 }
 834
 835
 836 Builder::ProfileLoader::ProfileLoader(StringMap &p):
 837         profile(p)
 838 {
 839         add("option", &ProfileLoader::option);
 840 }
 841
 842 void Builder::ProfileLoader::option(const string &o, const string &v)
 843 {
 844         profile.insert(StringMap::value_type(o, v));
 845 }