X-Git-Url: http://git.tdb.fi/?p=libs%2Fdatafile.git;a=blobdiff_plain;f=source%2Floader.cpp;h=997e7c9eec27f7f480c711291f6a47f997c7039e;hp=8d4f2bea35b07f0cf485cbc50a8d22fe146b5cd1;hb=1a3b30ea35fbc19e56bbd35e4ee1811d8d5e02a4;hpb=256f7238bc60d6dcc31a564988f5cc02a60c4537

diff --git a/source/loader.cpp b/source/loader.cpp
index 8d4f2be..997e7c9 100644
--- a/source/loader.cpp
+++ b/source/loader.cpp
@@ -1,81 +1,215 @@
-/* $Id$
-
-This file is part of libmspdatafile
-Copyright © 2006-2008  Mikko Rasa, Mikkosoft Productions
-Distributed under the LGPL
-*/
-
+#include <msp/core/raii.h>
+#include <msp/strings/format.h>
+#include "except.h"
 #include "loader.h"
+#include "type.h"
 
 using namespace std;
 
-namespace Msp {
-namespace DataFile {
+namespace {
 
-void Loader::load(const Statement &st)
+bool signature_match(char s, char a)
 {
-	for(list<Statement>::const_iterator i=st.sub.begin(); i!=st.sub.end(); ++i)
-		load_statement(*i);
-	finish();
+	if(s==a)
+		return true;
+	if(s==Msp::DataFile::IntType::signature && a==Msp::DataFile::FloatType::signature)
+		return true;
+	return false;
 }
 
-void Loader::load(Parser &p)
+bool signature_match(const string &st_sig, const string &act_sig)
 {
-	while(p)
+	if(act_sig=="*")
+		return true;
+	else if(act_sig.size()==2 && act_sig[1]=='*')
 	{
-		Statement st=p.parse();
-		if(st.valid)
-			load_statement(st);
+		for(string::const_iterator i=st_sig.begin(); i!=st_sig.end(); ++i)
+			if(!signature_match(*i, act_sig[0]))
+				return false;
+
+		return true;
 	}
-	finish();
+	else if(st_sig.size()==act_sig.size())
+	{
+		for(unsigned i=0; i<st_sig.size(); ++i)
+			if(!signature_match(st_sig[i], act_sig[i]))
+				return false;
+
+		return true;
+	}
+	else
+		return false;
+}
+
 }
 
+
+namespace Msp {
+namespace DataFile {
+
+Loader::Loader():
+	cur_st(0),
+	direct(false),
+	check_sub_loads(false)
+{ }
+
 Loader::~Loader()
 {
 	for(ActionMap::iterator i=actions.begin(); i!=actions.end(); ++i)
 		delete i->second;
 }
 
-void Loader::load_sub_with(Loader &ldr)
+void Loader::load(Parser &p)
 {
-	if(!cur_st)
-		throw InvalidState("load_sub called without current statement");
+	while(p)
+	{
+		if(p.peek(0))
+			load_direct(p, 0);
+		else if(p)  // Peek may have processed an __end, so recheck goodness
+		{
+			// Parse in raw mode so we can peek immediately after a mode change
+			Statement st = p.parse(true);
+			if(st.valid && !st.control)
+				load_statement(st);
+		}
+	}
+	finish();
+}
 
-	ldr.load(*cur_st);
+void Loader::load(const Statement &st)
+{
+	for(list<Statement>::const_iterator i=st.sub.begin(); i!=st.sub.end(); ++i)
+		load_statement(*i);
+	finish();
 }
 
-void Loader::add(const string &k, LoaderAction *a)
+void Loader::load_direct(Parser &p, unsigned l)
 {
-	ActionMap::iterator i=actions.find(k);
-	if(i!=actions.end())
+	SetForScope<Parser *> set_parser(cur_parser, &p);
+	SetForScope<unsigned> set_level(cur_level, l);
+
+	while(p)
 	{
-		delete i->second;
-		i->second=a;
+		const StatementKey *key = p.peek(l);
+		if(!key)
+			break;
+
+		LoaderAction *act = find_action(*key);
+		if(act)
+		{
+			SetFlag set_direct(direct);
+			if(!p.parse_and_load(l, *this, *act))
+				throw logic_error("direct load failed");
+		}
+		else
+			load_statement(p.parse());
 	}
-	else
-		actions[k]=a;
 }
 
 void Loader::load_statement(const Statement &st)
 {
-	cur_st=&st;
-	ActionMap::iterator j=actions.find(st.keyword);
-	if(j==actions.end())
-		throw_at(KeyError("Unknown keyword", st.keyword), st.get_location());
-	if(j->second)
+	SetForScope<const Statement *> set_cst(cur_st, &st);
+
+	try
 	{
-		try
+		StatementKey key(st.keyword, st.get_signature());
+
+		if(!aux_loaders.empty() && !has_action(key))
 		{
-			j->second->execute(*this, st);
+			for(list<Loader *>::const_iterator i=aux_loaders.begin(); i!=aux_loaders.end(); ++i)
+				if((*i)->has_action(key))
+					return (*i)->load_statement(st);
 		}
-		catch(Exception &e)
+
+		LoaderAction *act = find_action(key);
+		if(act)
 		{
-			if(!e.where()[0])
-				e.at(st.get_location());
-			throw;
+			sub_loaded = false;
+			act->execute(*this, st);
+			if(check_sub_loads && !st.sub.empty() && !sub_loaded)
+				throw logic_error("substatements ignored");
 		}
 	}
-	cur_st=0;
+	catch(const data_error &)
+	{
+		throw;
+	}
+	catch(const exception &e)
+	{
+		throw data_error(st.source, st.line, e);
+	}
+}
+
+void Loader::load_sub_with(Loader &ldr)
+{
+	if(direct)
+	{
+		ldr.load_direct(*cur_parser, cur_level+1);
+		ldr.finish();
+	}
+	else if(cur_st)
+	{
+		ldr.load(*cur_st);
+		sub_loaded = true;
+	}
+	else
+		throw logic_error("no current statement");
+}
+
+void Loader::add(const string &kwd, LoaderAction *act)
+{
+	StatementKey key(kwd, (act ? act->get_signature() : "*"));
+	ActionMap::iterator i = actions.find(key);
+	if(i!=actions.end())
+	{
+		delete i->second;
+		i->second = act;
+	}
+	else
+		actions[key] = act;
+}
+
+void Loader::add_auxiliary_loader(Loader &ldr)
+{
+	aux_loaders.push_back(&ldr);
+}
+
+bool Loader::has_action(const StatementKey &key) const
+{
+	ActionMap::const_iterator i = actions.lower_bound(StatementKey(key.keyword, string()));
+	for(; (i!=actions.end() && i->first.keyword==key.keyword); ++i)
+		if(signature_match(key.signature, i->first.signature))
+			return true;
+	return false;
+}
+
+LoaderAction *Loader::find_action(const StatementKey &key) const
+{
+	ActionMap::const_iterator begin = actions.lower_bound(StatementKey(key.keyword, string()));
+	ActionMap::const_iterator end = actions.upper_bound(StatementKey(key.keyword, "~"));
+
+	if(begin==end)
+		throw unknown_keyword(key.keyword);
+
+	for(ActionMap::const_iterator i=begin; i!=end; ++i)
+		if(signature_match(key.signature, i->first.signature))
+			return i->second;
+
+	throw invalid_signature(key.keyword, key.signature);
+}
+
+const string &Loader::get_source() const
+{
+	if(!cur_st)
+		throw logic_error("no current statement");
+	return cur_st->source;
+}
+
+const string &Loader::get_keyword() const
+{
+	if(!cur_st)
+		throw logic_error("no current statement");
+	return cur_st->keyword;
 }
 
 } // namespace DataFile