X-Git-Url: http://git.tdb.fi/?p=libs%2Fdatafile.git;a=blobdiff_plain;f=source%2Floader.cpp;h=81fd27eecebf87c16e3418ae6d11e3ead9ba8d80;hp=0a9f68f249a8d56fe76ab5ba36f5c5bfe76a57e8;hb=5da82753b395e335edaa09555566c6ffb8769118;hpb=92644bf892df1220c8df67e1fc3da85dd02c53c5

diff --git a/source/loader.cpp b/source/loader.cpp
index 0a9f68f..81fd27e 100644
--- a/source/loader.cpp
+++ b/source/loader.cpp
@@ -1,60 +1,208 @@
-/* $Id$
-
-This file is part of libmspdatafile
-Copyright © 2006  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 {
+
+bool signature_match(char s, char a)
+{
+	if(s==a)
+		return true;
+	if(s==Msp::DataFile::IntType::signature && a==Msp::DataFile::FloatType::signature)
+		return true;
+	return false;
+}
+
+bool signature_match(const string &st_sig, const string &act_sig)
+{
+	if(act_sig=="*")
+		return true;
+	else if(act_sig.size()==2 && act_sig[1]=='*')
+	{
+		for(string::const_iterator i=st_sig.begin(); i!=st_sig.end(); ++i)
+			if(!signature_match(*i, act_sig[0]))
+				return false;
+
+		return true;
+	}
+	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(Parser &p)
+{
+	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();
+}
+
 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::load(Parser &p)
+void Loader::load_direct(Parser &p, unsigned l)
 {
+	SetForScope<Parser *> set_parser(cur_parser, &p);
+	SetForScope<unsigned> set_level(cur_level, l);
+
 	while(p)
 	{
-		Statement st=p.parse();
-		if(st.valid)
-			load_statement(st);
+		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());
 	}
 }
 
-Loader::~Loader()
+void Loader::load_statement(const Statement &st)
 {
-	for(ActionMap::iterator i=actions.begin(); i!=actions.end(); ++i)
-		delete i->second;
+	SetForScope<const Statement *> set_cst(cur_st, &st);
+
+	try
+	{
+		StatementKey key(st.keyword, st.get_signature());
+
+		if(!aux_loaders.empty() && !has_action(key))
+		{
+			for(list<Loader *>::const_iterator i=aux_loaders.begin(); i!=aux_loaders.end(); ++i)
+				if((*i)->has_action(key))
+					return (*i)->load_statement(st);
+		}
+
+		LoaderAction *act = find_action(key);
+		if(act)
+		{
+			sub_loaded = false;
+			act->execute(*this, st);
+			if(check_sub_loads && !st.sub.empty() && !sub_loaded)
+				throw logic_error("substatements ignored");
+		}
+	}
+	catch(const data_error &)
+	{
+		throw;
+	}
+	catch(const exception &e)
+	{
+		throw data_error(st.source, st.line, e);
+	}
 }
 
-void Loader::add(const string &k, LoaderAction *a)
+void Loader::load_sub_with(Loader &ldr)
 {
-	ActionMap::iterator i=actions.find(k);
+	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=a;
+		i->second = act;
 	}
 	else
-		actions[k]=a;
+		actions[key] = act;
 }
 
-void Loader::load_statement(const Statement &st)
+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
 {
-	cur_st=&st;
-	ActionMap::iterator j=actions.find(st.keyword);
-	if(j==actions.end())
-		throw KeyError(st.get_location()+": Unknown keyword '"+st.keyword+"'");
-	if(j->second)
-		j->second->execute(*this, st);
-	cur_st=0;
+	if(!cur_st)
+		throw logic_error("no current statement");
+	return cur_st->source;
 }
 
 } // namespace DataFile