-#include <fstream>
-#include <msp/error.h>
-#include <msp/path/utils.h>
+/* $Id$
+
+This file is part of builder
+Copyright © 2006-2009 Mikko Rasa, Mikkosoft Productions
+Distributed under the LGPL
+*/
+
+#include <cstdlib>
+#include <msp/core/except.h>
+#include <msp/fs/stat.h>
+#include <msp/fs/utils.h>
+#include <msp/io/except.h>
+#include <msp/io/file.h>
+#include <msp/io/print.h>
#include <msp/time/utils.h>
+#include "builder.h"
#include "config.h"
+#include "sourcepackage.h"
using namespace std;
using namespace Msp;
-/**
-Adds a configuration option.
+Config::Config(SourcePackage &p):
+ package(p),
+ freeze_mtime(false)
+{ }
-@param n Option name
-@param v Default value
-@param d Description
-*/
void Config::add_option(const string &n, const string &v, const string &d)
{
options.insert(OptionMap::value_type(n, Option(n, v, d)));
}
-/**
-Gets the given option from the configuration. If the option doesn't exist,
-an Exception is thrown.
-*/
const Config::Option &Config::get_option(const string &name) const
{
- OptionMap::const_iterator i=options.find(name);
+ OptionMap::const_iterator i = options.find(name);
if(i==options.end())
- throw Exception("Tried to access nonexistent option "+name);
+ throw KeyError("Unknown option", name);
return i->second;
}
-/**
-Checks whether an option with the given name exists.
-*/
bool Config::is_option(const string &name) const
{
return options.count(name);
}
-/**
-Selects the last profile used. If the profile cache file is not present, the
-default profile is assumed.
-*/
void Config::select_last_profile()
{
- ifstream in((source/".profile.cache").str().c_str());
- if(in)
+ try
{
+ IO::BufferedFile in((package.get_source()/".profile").str());
string profile;
- in>>profile;
+ in.getline(profile);
set_option("profile", profile);
}
- else
- set_option("profile", "default");
+ catch(const IO::FileNotFound &)
+ { }
+
+ freeze_mtime = true;
+ package.get_builder().apply_profile_template(*this, get_option("profile").value);
+ freeze_mtime = false;
load();
}
-/**
-Selects the given profile. The profile cache file is updated as well.
-*/
void Config::select_profile(const string &profile)
{
set_option("profile", profile);
- ofstream out((source/".profile.cache").str().c_str());
- if(out)
- out<<profile<<'\n';
+ if(!package.get_builder().get_dry_run())
+ {
+ IO::BufferedFile out((package.get_source()/".profile").str(), IO::M_WRITE);
+ IO::print(out, "%s\n", profile);
+ }
+
+ freeze_mtime = true;
+ package.get_builder().apply_profile_template(*this, profile);
+ freeze_mtime = false;
load();
}
-/**
-Processes options from the given raw option map. Nonexistent options are
-ignored. If any options were changed, the mtime of the configuration is updated
-to the current time.
-
-@param opts A map to process options from
-
-@return Whether any option values were changed
-*/
-bool Config::update(const RawOptionMap &opts)
+bool Config::update(const StringMap &opts)
{
- bool changed=false;
- for(RawOptionMap::const_iterator i=opts.begin(); i!=opts.end(); ++i)
+ bool changed = false;
+ for(StringMap::const_iterator i=opts.begin(); i!=opts.end(); ++i)
{
if(set_option(i->first, i->second) && i->first!="profile")
- changed=true;
+ changed = true;
}
- if(changed)
- mtime=Time::now();
+ if(changed && !freeze_mtime)
+ mtime = Time::now();
return changed;
}
+void Config::finish()
+{
+ for(unsigned n=0; n<20; ++n)
+ {
+ bool changed = false;
+ for(OptionMap::iterator i=options.begin(); i!=options.end(); ++i)
+ {
+ Option &opt = i->second;
+ string::size_type dollar = 0;
+ while((dollar = opt.value.find('$', dollar))!=string::npos)
+ {
+ string::size_type end;
+ string var;
+ if(opt.value[dollar+1]=='{')
+ {
+ end = opt.value.find('}', dollar+2);
+ if(end==string::npos)
+ throw Exception("Unterminated variable reference");
+ var = opt.value.substr(dollar+2, end-dollar-2);
+ ++end;
+ }
+ else
+ {
+ for(end=dollar+1; (isalnum(opt.value[end]) && opt.value[end]!='_'); ++end) ;
+ var = opt.value.substr(dollar+1, end-dollar-1);
+ }
+
+ string value;
+ if(is_option(var))
+ value = get_option(var).value;
+ else if(var=="arch")
+ value = package.get_builder().get_current_arch().get_name();
+ else if(const char *ptr = getenv(var.c_str()))
+ value = ptr;
+
+ opt.value.replace(dollar, end-dollar, value);
+
+ dollar += value.size();
+ changed = true;
+ }
+ }
+
+ if(!changed)
+ break;
+ }
+}
+
void Config::save() const
{
- Path::Path fn=source/".options.cache";
+ FS::Path fn = package.get_source()/".options";
- OptionMap::const_iterator i=options.find("profile");
+ OptionMap::const_iterator i = options.find("profile");
if(i!=options.end())
- fn=source/(".options."+i->second.value+".cache");
+ fn = package.get_source()/(".options."+i->second.value);
+
+ IO::BufferedFile out(fn.str(), IO::M_WRITE);
- ofstream out(fn.str().c_str());
- if(!out) return;
-
for(i=options.begin(); i!=options.end(); ++i)
- out<<"option \""<<i->second.name<<"\" \""<<i->second.value<<"\";\n";
+ IO::print(out, "option \"%s\" \"%s\";\n", i->second.name, i->second.value);
}
bool Config::set_option(const string &opt, const string &val)
{
- bool result=false;
+ bool result = false;
- OptionMap::iterator i=options.find(opt);
+ OptionMap::iterator i = options.find(opt);
if(i!=options.end())
{
if(i->second.value!=val)
- result=true;
- i->second.value=val;
+ result = true;
+ i->second.value = val;
}
return result;
void Config::load()
{
- Path::Path fn=source/".options.cache";
-
- OptionMap::iterator i=options.find("profile");
- if(i!=options.end())
- fn=source/(".options."+i->second.value+".cache");
+ FS::Path fn = package.get_source()/(".options."+get_option("profile").value);
- ifstream in(fn.str().c_str());
- if(!in) return;
+ try
+ {
+ IO::BufferedFile in(fn.str());
- struct stat st;
- Path::stat(fn, st);
- mtime=Time::TimeStamp::from_unixtime(st.st_mtime);
+ mtime = Time::TimeStamp::from_unixtime(FS::stat(fn).st_mtime);
- Parser::Parser parser(in, fn.str());
- Loader loader(*this);
- loader.load(parser);
+ DataFile::Parser parser(in, fn.str());
+ Loader loader(*this);
+ loader.load(parser);
+ }
+ catch(const IO::FileNotFound &)
+ { }
}
+
Config::Option::Option(const string &n, const string &v, const string &d):
name(n),
defv(v),
value(v)
{ }
+
Config::Loader::Loader(Config &c):
conf(c)
{