insilmaril@432: #include "parser.h"
insilmaril@432: 
insilmaril@432: #include <QRegExp>
insilmaril@432: #include <iostream>
insilmaril@432: 
insilmaril@432: using namespace std;
insilmaril@432: 
insilmaril@432: Parser::Parser()
insilmaril@432: {
insilmaril@447: 	initParser();
insilmaril@432: }
insilmaril@432: 
insilmaril@447: void Parser::initParser()
insilmaril@432: {
insilmaril@447: 	initAtom();
insilmaril@447: 	current=-1;
insilmaril@447: }
insilmaril@447: 
insilmaril@447: void Parser::initAtom()
insilmaril@447: {
insilmaril@447: 	atom="";
insilmaril@432: 	com="";
insilmaril@432: 	paramList.clear();
insilmaril@432: 	resetError();
insilmaril@432: }
insilmaril@432: 
insilmaril@447: void Parser::parseAtom (QString s)
insilmaril@432: {
insilmaril@447: 	initAtom();
insilmaril@447: 	atom=s;
insilmaril@432: 	QRegExp re;
insilmaril@432: 	int pos;
insilmaril@432: 
insilmaril@447: 	// Strip WS at beginning
insilmaril@447: 	re.setPattern ("\\w");
insilmaril@447: 	re.setMinimal (true);
insilmaril@447: 	pos=re.search (atom);
insilmaril@447: 	if (pos>=0)
insilmaril@447: 		s=s.right(s.length()-pos);
insilmaril@447: 
insilmaril@432: 	// Get command
insilmaril@432: 	re.setPattern ("\\b(.*)(\\s|\\()");
insilmaril@432: 	pos=re.search (s);
insilmaril@432: 	if (pos>=0)
insilmaril@432: 		com=re.cap(1);
insilmaril@432: 
insilmaril@432: 	// Get parameters
insilmaril@432: 	paramList.clear();
insilmaril@432: 	re.setPattern ("\\((.*)\\)");
insilmaril@432: 	pos=re.search (s);
insilmaril@432: 	//cout << "  s="<<s.ascii()<<endl;
insilmaril@432: 	//cout << "com="<<com.ascii()<<"  pos="<<pos<<endl<<endl;
insilmaril@432: 	if (pos>=0)
insilmaril@432: 	{
insilmaril@432: 		QString s=re.cap(1);
insilmaril@432: 		QString a;
insilmaril@432: 		bool inquote=false;
insilmaril@432: 		pos=0;
insilmaril@432: 		if (!s.isEmpty())
insilmaril@432: 		{
insilmaril@432: 			while (pos<s.length())
insilmaril@432: 			{
insilmaril@432: 				if (s.at(pos)=='\"') 
insilmaril@432: 				{
insilmaril@432: 					if (inquote)
insilmaril@432: 						inquote=false;
insilmaril@432: 					else	
insilmaril@432: 						inquote=true;
insilmaril@432: 				}
insilmaril@432: 
insilmaril@432: 				if (s.at(pos)==',' && !inquote)
insilmaril@432: 				{
insilmaril@432: 					a=s.left(pos);
insilmaril@432: 					paramList.append(a);
insilmaril@432: 					s=s.right(s.length()-pos-1);
insilmaril@432: 					pos=0;
insilmaril@432: 				} else
insilmaril@432: 					pos++;
insilmaril@432: 				
insilmaril@432: 			}
insilmaril@432: 			paramList.append (s);
insilmaril@432: 		}	
insilmaril@432: 	}	
insilmaril@432: }
insilmaril@432: 
insilmaril@447: QString Parser::getAtom()
insilmaril@447: {
insilmaril@447: 	return atom;
insilmaril@447: }
insilmaril@447: 
insilmaril@447: QString Parser::getCommand()
insilmaril@432: {
insilmaril@432: 	return com;
insilmaril@432: }
insilmaril@432: 
insilmaril@447: QStringList Parser::getParameters()
insilmaril@432: {
insilmaril@432: 	return paramList;
insilmaril@432: }
insilmaril@432: 
insilmaril@514: int Parser::parCount()
insilmaril@432: {
insilmaril@432: 	return paramList.count();
insilmaril@432: }
insilmaril@432: 
insilmaril@432: 
insilmaril@432: QString Parser::errorMessage()
insilmaril@432: {
insilmaril@432: 	QString l;
insilmaril@432: 	switch (errLevel)
insilmaril@432: 	{
insilmaril@432: 		case NoError: l="No Error";
insilmaril@432: 		case Warning: l="Warning";
insilmaril@432: 		case Aborted: l="Aborted";
insilmaril@432: 	}
insilmaril@432: 	return QString ("Error Level: %1\n    Command: %2\nDescription: %3")
insilmaril@432: 		.arg(l).arg(com).arg(errDescription);
insilmaril@432: }
insilmaril@432: 
insilmaril@432: QString Parser::errorDescription()
insilmaril@432: {
insilmaril@432: 	return errDescription;
insilmaril@432: }
insilmaril@432: 
insilmaril@432: ErrorLevel Parser::errorLevel()
insilmaril@432: {
insilmaril@432: 	return errLevel;
insilmaril@432: }
insilmaril@432: 
insilmaril@432: void Parser::setError(ErrorLevel level, const QString &description)
insilmaril@432: {
insilmaril@432: 	errDescription=description;
insilmaril@432: 	errLevel=level;
insilmaril@432: }
insilmaril@432: 
insilmaril@432: void Parser::resetError ()
insilmaril@432: {
insilmaril@432: 	errMessage="";
insilmaril@432: 	errDescription="";
insilmaril@432: 	errLevel=NoError;
insilmaril@432: }
insilmaril@432: 
insilmaril@432: 
insilmaril@514: bool Parser::checkParCount (QList <int> plist)
insilmaril@432: {
insilmaril@432: 	QStringList expList;
insilmaril@432: 	QString expected;
insilmaril@432: 	for (int i=0; i<plist.count();i++)
insilmaril@432: 	{
insilmaril@514: 		if (checkParCount (plist[i])) 
insilmaril@432: 		{
insilmaril@432: 			resetError();
insilmaril@432: 			return true;
insilmaril@432: 		}
insilmaril@432: 		expList.append(QString().setNum(plist[i]));
insilmaril@432: 	}	
insilmaril@432: 	expected=expList.join(",");	
insilmaril@432: 	errDescription=QString("Wrong number of parameters: Expected %1, but found %2").arg(expected).arg(paramList.count());
insilmaril@432: 	return false;
insilmaril@432: }
insilmaril@432: 
insilmaril@514: bool Parser::checkParCount (const int &expected)
insilmaril@432: {
insilmaril@432: 	if (paramList.count()!=expected)
insilmaril@432: 	{
insilmaril@432: 		errLevel=Aborted;
insilmaril@432: 		errDescription=QString("Wrong number of parameters: Expected %1, but found %2").arg(expected).arg(paramList.count());
insilmaril@432: 		return false;
insilmaril@432: 	} 
insilmaril@432: 	return true;	
insilmaril@432: }
insilmaril@432: 
insilmaril@514: bool Parser::checkParIsInt(const int &index)
insilmaril@432: {
insilmaril@432: 	bool ok;
insilmaril@432: 	if (index > paramList.count())
insilmaril@432: 	{
insilmaril@432: 		errLevel=Aborted;
insilmaril@432: 		errDescription=QString("Parameter index %1 is outside of parameter list").arg(index);
insilmaril@432: 		return false;
insilmaril@432: 	} else
insilmaril@432: 	{
insilmaril@432: 		paramList[index].toInt (&ok, 10);
insilmaril@432: 		if (!ok)
insilmaril@432: 		{
insilmaril@432: 			errLevel=Aborted;
insilmaril@432: 			errDescription=QString("Parameter %1 is not an integer").arg(index);
insilmaril@432: 			return false;
insilmaril@432: 		} 
insilmaril@432: 	}	
insilmaril@432: 	return true;
insilmaril@432: }
insilmaril@432: 
insilmaril@432: int Parser::parInt (bool &ok,const uint &index)
insilmaril@432: {
insilmaril@514: 	if (checkParIsInt (index))
insilmaril@432: 		return paramList[index].toInt (&ok, 10);
insilmaril@432: 	ok=false;
insilmaril@432: 	return 0;
insilmaril@432: }
insilmaril@432: 
insilmaril@432: QString Parser::parString (bool &ok,const int &index)
insilmaril@432: {
insilmaril@432: 	// return the string at index, this could be also stored in
insilmaril@432: 	// a variable later
insilmaril@432: 	QString r;
insilmaril@432: 	QRegExp re("\"(.*)\"");
insilmaril@432: 	int pos=re.search (paramList[index]);
insilmaril@432: 	if (pos>=0)
insilmaril@432: 		r=re.cap (1);
insilmaril@432: 	else	
insilmaril@432: 		r="";
insilmaril@432: 	ok=true;
insilmaril@432: 	return r;
insilmaril@432: }
insilmaril@432: 
insilmaril@432: bool Parser::parBool (bool &ok,const int &index)
insilmaril@432: {
insilmaril@432: 	// return the bool at index, this could be also stored in
insilmaril@432: 	// a variable later
insilmaril@432: 	QString r;
insilmaril@432: 	ok=true;
insilmaril@432: 	QString p=paramList[index];
insilmaril@432: 	if (p=="true" || p=="1")
insilmaril@432: 		return true;
insilmaril@432: 	else if	(p=="false" || p=="0")
insilmaril@432: 		return false;
insilmaril@432: 	ok=false;
insilmaril@432: 	return ok;
insilmaril@432: }
insilmaril@432: 
insilmaril@432: QColor Parser::parColor(bool &ok,const int &index)
insilmaril@432: {
insilmaril@432: 	// return the QColor at index
insilmaril@445: 	ok=false;
insilmaril@445: 	QString r;
insilmaril@445: 	QColor c;
insilmaril@445: 	QRegExp re("\"(.*)\"");
insilmaril@445: 	int pos=re.search (paramList[index]);
insilmaril@445: 	if (pos>=0)
insilmaril@445: 	{
insilmaril@445: 		r=re.cap (1);
insilmaril@445: 		c.setNamedColor(r);
insilmaril@445: 		ok=c.isValid();
insilmaril@445: 	}	
insilmaril@445: 	return c;
insilmaril@432: }
insilmaril@432: 
insilmaril@432: void Parser::setScript(const QString &s)
insilmaril@432: {
insilmaril@432: 	script=s;
insilmaril@432: }	
insilmaril@432: 
insilmaril@432: QString Parser::getScript()
insilmaril@432: {
insilmaril@432: 	return script;
insilmaril@432: }	
insilmaril@432: 
insilmaril@445: void Parser::runScript()
insilmaril@432: {
insilmaril@447: 	current=0;
insilmaril@432: }	
insilmaril@432: 
insilmaril@447: bool Parser::next()
insilmaril@445: {
insilmaril@447: 	int start=current;
insilmaril@447: 	if (current<0) runScript();
insilmaril@447: 	if (current>=script.length()-1) return false;
insilmaril@447: 
insilmaril@447: 	bool inBracket=false;
insilmaril@447: 	while (true)
insilmaril@447: 	{
insilmaril@447: 		//cout <<"current="<<current<< "   start="<<start<<"  length="<<script.length()<<endl;
insilmaril@447: 
insilmaril@447: 		// Check if we are inside a string
insilmaril@447: 		if (script.at(current)=='"')
insilmaril@447: 		{
insilmaril@447: 			if (inBracket)
insilmaril@447: 				inBracket=false;
insilmaril@447: 			else	
insilmaril@447: 				inBracket=true;
insilmaril@447: 		}
insilmaril@447: 
insilmaril@447: 		// Check if we are in a comment
insilmaril@447: 		if (!inBracket && script.at(current)=='#')
insilmaril@447: 		{
insilmaril@447: 			while (script.at(current)!='\n')
insilmaril@447: 			{
insilmaril@447: 				current++;
insilmaril@447: 				if (current>=script.length()) 
insilmaril@447: 					return false;
insilmaril@447: 			}
insilmaril@447: 			start=current;
insilmaril@447: 		}
insilmaril@447: 
insilmaril@447: 		// Check for end of atom
insilmaril@447: 		if (!inBracket && script.at(current)==';')
insilmaril@447: 		{
insilmaril@447: 			atom=script.mid(start,current-start);
insilmaril@447: 			current++;
insilmaril@447: 			return true;
insilmaril@447: 		}
insilmaril@447: 		
insilmaril@447: 		// Check for end of script
insilmaril@447: 		if (current==script.length() )
insilmaril@447: 		{
insilmaril@447: 			if (inBracket)
insilmaril@447: 			{
insilmaril@447: 				setError (Aborted,"Runaway string");
insilmaril@447: 				return false;
insilmaril@447: 			} else
insilmaril@447: 			{
insilmaril@447: 				atom=script.mid(start);
insilmaril@447: 				return true;
insilmaril@447: 			}
insilmaril@447: 		}
insilmaril@447: 		current++;
insilmaril@447: 	}
insilmaril@445: }	
insilmaril@445: