+/* $Id$
+
+This file is part of builder
+Copyright © 2006-2007 Mikko Rasa, Mikkosoft Productions
+Distributed under the LGPL
+*/
+
#include <fstream>
#include <iostream>
#include <set>
#include <msp/core/error.h>
-#include <msp/getopt++/getopt++.h>
+#include <msp/core/getopt.h>
#include <msp/parser/parser.h>
#include <msp/path/utils.h>
#include <msp/strings/utils.h>
#include "action.h"
#include "analyzer.h"
#include "builder.h"
-#include "executable.h"
#include "header.h"
#include "install.h"
#include "misc.h"
-#include "objectfile.h"
#include "package.h"
#include "pkgconfig.h"
#include "sharedlibrary.h"
-#include "staticlibrary.h"
#include "systemlibrary.h"
+#include "tarball.h"
#include "unlink.h"
#include "virtualtarget.h"
/**
Returns the target with the given name, or 0 if no such target exists.
*/
-Target *Builder::get_target(const string &n)
+Target *Builder::get_target(const string &n) const
{
- TargetMap::iterator i=targets.find(n);
+ TargetMap::const_iterator i=targets.find(n);
if(i!=targets.end())
return i->second;
return 0;
}
}
+/**
+Adds a target to both the target map and the new target queue. Called from
+Target constructor.
+*/
+void Builder::add_target(Target *t)
+{
+ targets.insert(TargetMap::value_type(t->get_name(), t));
+ new_tgts.push_back(t);
+}
+
int Builder::main()
{
if(load_build_file(cwd/build_file))
int Builder::create_targets()
{
Target *world=new VirtualTarget(*this, "world");
- add_target(world);
Target *def_tgt=new VirtualTarget(*this, "default");
- add_target(def_tgt);
world->add_depend(def_tgt);
Target *install=new VirtualTarget(*this, "install");
- add_target(install);
world->add_depend(install);
+ Target *tarballs=new VirtualTarget(*this, "tarballs");
+ world->add_depend(tarballs);
+
for(PackageMap::iterator i=packages.begin(); i!=packages.end(); ++i)
{
if(!i->second)
if(!i->second->get_buildable())
continue;
- Path::Path inst_base;
- if(i->second->get_buildable() && i->second->get_install_flags())
- inst_base=i->second->get_prefix();
-
const ComponentList &components=i->second->get_components();
for(ComponentList::const_iterator j=components.begin(); j!=components.end(); ++j)
- {
- // Collect all files belonging to the component
- PathList files;
- const PathList &sources=j->get_sources();
- for(PathList::const_iterator k=sources.begin(); k!=sources.end(); ++k)
- {
- struct stat st;
- stat(*k, st);
- if(S_ISDIR(st.st_mode))
- {
- list<string> sfiles=list_files(*k);
- for(list<string>::iterator l=sfiles.begin(); l!=sfiles.end(); ++l)
- files.push_back(*k / *l);
- }
- else
- files.push_back(*k);
- }
-
- bool build_exe=j->get_type()!=Component::HEADERS;
-
- list<ObjectFile *> objs;
- for(PathList::iterator k=files.begin(); k!=files.end(); ++k)
- {
- string basename=(*k)[-1];
- string ext=Path::splitext(basename).ext;
- if((ext==".cpp" || ext==".c") && build_exe)
- {
- SourceFile *src=new SourceFile(*this, &*j, k->str());
- add_target(src);
-
- // Compile sources
- ObjectFile *obj=new ObjectFile(*this, *j, *src);
- add_target(obj);
- objs.push_back(obj);
- }
- else if(ext==".h")
- {
- Target *hdr=get_target(k->str());
- if(!hdr)
- {
- hdr=new Header(*this, &*j, k->str());
- add_target(hdr);
- }
-
- // Install headers if requested
- if(!j->get_install_headers().empty())
- {
- Path::Path inst_path=inst_base/"include"/j->get_install_headers()/basename;
- Install *inst=new Install(*this, *i->second, *hdr, inst_path.str());
- add_target(inst);
- install->add_depend(inst);
- }
- }
- }
-
- if(build_exe)
- {
- Executable *exe=0;
- StaticLibrary *slib=0;
- if(j->get_type()==Component::LIBRARY)
- {
- exe=new SharedLibrary(*this, *j, objs);
- slib=new StaticLibrary(*this, *j, objs);
- add_target(slib);
- }
- else
- exe=new Executable(*this, *j, objs);
-
- add_target(exe);
- if(i->second==default_pkg)
- {
- def_tgt->add_depend(exe);
- if(slib) def_tgt->add_depend(slib);
- }
- else
- {
- world->add_depend(exe);
- if(slib) world->add_depend(slib);
- }
-
- if(j->get_install())
- {
- string inst_dir;
- if(j->get_type()==Component::PROGRAM)
- inst_dir="bin";
- else if(j->get_type()==Component::LIBRARY)
- inst_dir="lib";
- if(!inst_dir.empty())
- {
- Install *inst=new Install(*this, *i->second, *exe, (inst_base/inst_dir/Path::basename(exe->get_name())).str());
- add_target(inst);
- install->add_depend(inst);
-
- if(slib)
- {
- inst=new Install(*this, *i->second, *slib, (inst_base/inst_dir/Path::basename(slib->get_name())).str());
- add_target(inst);
- install->add_depend(inst);
- }
- }
- }
- }
- }
+ j->create_targets();
if(i->second->get_install_flags()&(Package::LIB|Package::INCLUDE))
{
PkgConfig *pc=new PkgConfig(*this, *i->second);
- add_target(pc);
- Install *inst=new Install(*this, *i->second, *pc, (inst_base/"lib"/"pkgconfig"/Path::basename(pc->get_name())).str());
- add_target(inst);
- install->add_depend(inst);
+ install->add_depend(new Install(*this, *i->second, *pc));
}
+
+ tarballs->add_depend(new TarBall(*this, *i->second));
}
// Find dependencies until no new targets are created
// Make the cmdline target depend on all targets mentioned on the command line
Target *cmdline=new VirtualTarget(*this, "cmdline");
- add_target(cmdline);
- world->add_depend(cmdline);
+ bool build_world=false;
for(list<string>::iterator i=cmdline_targets.begin(); i!=cmdline_targets.end(); ++i)
{
Target *tgt=get_target(*i);
cerr<<"I don't know anything about "<<*i<<'\n';
return -1;
}
+ if(tgt==world)
+ build_world=true;
cmdline->add_depend(tgt);
}
- world->prepare();
+ /* If world is to be built, prepare cmdline. If not, add cmdline to world
+ and prepare world. I don't really like this, but it keeps the graph
+ acyclic. */
+ if(build_world)
+ cmdline->prepare();
+ else
+ {
+ world->add_depend(cmdline);
+ world->prepare();
+ }
return 0;
}
if(Path::exists(fn))
{
- add_target(tgt=new SystemHeader(*this, fn.str()));
+ tgt=new SystemHeader(*this, fn.str());
return tgt;
}
return 0;
else if(Path::exists(full))
{
tgt=new SystemLibrary(*this, full);
- add_target(tgt);
return tgt;
}
}
return 0;
}
-/**
-Adds a target to both the target map and the new target queue.
-*/
-void Builder::add_target(Target *t)
-{
- targets.insert(TargetMap::value_type(t->get_name(), t));
- new_tgts.push_back(t);
-}
-
/**
Updates a hash with a string. This is used from get_header and get_library.
*/