/*
* Copyright (c) 2009 Nokia Corporation and/or its subsidiary(-ies).
* All rights reserved.
* This component and the accompanying materials are made available
* under the terms of "Eclipse Public License v1.0"
* which accompanies this distribution, and is available
* at the URL "http://www.eclipse.org/legal/epl-v10.html".
*
* Initial Contributors:
* Nokia Corporation - initial contribution.
*
* Contributors:
*
* Description:
*
*/
#include "FormulaParser.h"


ParseResult ParseFormula(const string& aFormula)
	{
	Parser cell_nameParser = Parser("B") | Parser("H") | Parser("L") | Parser("R") | Parser("T") | Parser("W") | Parser("b") | Parser("h") | Parser("l") | Parser("r") | Parser("t") | Parser("w");
	cell_nameParser.SetId(cell_name_ParserId);
	Parser parentParser = Parser("P");
	parentParser.SetId(parent_ParserId);
	Parser parent_cellParser = parentParser >> Parser("_") >> cell_nameParser;
	parent_cellParser.SetId(parent_cell_ParserId);
	Parser table_cellParser = Parser::Real();
	table_cellParser.SetId(table_cell_ParserId);
	Parser comp_cellParser = Parser::Real() >> Parser("_") >> cell_nameParser;
	comp_cellParser.SetId(comp_cell_ParserId);
	Parser abs_cellParser = 
		Parser("$") >> 
		Parser::Real() >> 
		Parser("!") >> 
		Parser::Real() >> 
		Parser("!") >> 
		cell_nameParser >> 
		Parser("!$");
	abs_cellParser.SetId(abs_cell_ParserId);

	// types of value
	Parser cellParser = 
		cell_nameParser | 
		parent_cellParser | 
		parentParser | 
		comp_cellParser | 
		abs_cellParser | 
		table_cellParser;

	Parser unitsParser = 
		Parser::Real() >> 
		(Parser("u") | Parser("U"));
	unitsParser.SetId(units_ParserId);

	Parser constantParser = 
		Parser::Real() >> 
		Parser("p");
	constantParser.SetId(constant_ParserId);

	Parser attributeParser = 
		Parser("pr") >> 
		Parser::Int();
	attributeParser.SetId(attribute_ParserId);

	Parser mysteryParser = 
		Parser::Int() >> 
		Parser("pr") >> 
		Parser::Int();
	mysteryParser.SetId(mystery_ParserId);

	// functions
	Parser expressionParser;
	Parser func_nameParser = Parser("CEIL") | Parser("FLOOR") | Parser("ROUND");
	Parser funcParser = func_nameParser >> Parser("(") >> expressionParser >> Parser(")");
	funcParser.SetId(func_ParserId);

	Parser valueParser = 
		unitsParser | 
		mysteryParser | 
		attributeParser | 
		constantParser | 
		funcParser | 
		cellParser ;

	// arithmetic expressions from boost spirit library example
	Parser groupParser = Parser("(") >> expressionParser >> Parser(")");
	groupParser.SetId(group_ParserId);
	Parser factorParser = valueParser | groupParser;

	Parser termExtStarParser;
	Parser termExtParser = 
		((Parser("*") >> factorParser) | 
		 (Parser("/") >> factorParser)) >>
		termExtStarParser;
	termExtStarParser = termExtParser | Parser::Nul();

	Parser termParser = 
		factorParser >> 
		termExtStarParser;
	termParser.SetId(term_ParserId);

	Parser expressionExtStarParser;
	Parser expressionExtParser = 
		((Parser("+") >> termParser) | 
		 (Parser("-") >> termParser)) >>
		expressionExtStarParser;
	expressionExtStarParser = expressionExtParser | Parser::Nul();

	expressionParser = 
		termParser >> 
		expressionExtStarParser;
	expressionParser.SetId(expression_ParserId);

	// comparisons
	Parser comp_opParser = Parser(">=") | Parser("<=") | Parser("=") | Parser(">") | Parser("<");

	Parser whitespaceParser;
	Parser compParser = 
		expressionParser >> 
		whitespaceParser >> 
		comp_opParser >> 
		whitespaceParser >> 
		expressionParser;
	compParser.SetId(comp_ParserId);

	Parser comp_groupParser = Parser("(") >> compParser >> Parser(")");
	comp_groupParser.SetId(comp_group_ParserId);
	Parser compOptParser = compParser | comp_groupParser;

	// conditionals
	Parser conditionalParser = 
		Parser("IF ") >> 
		compOptParser >> 
		Parser(" THEN ") >> 
		expressionParser >> 
		Parser(" ELSE ") >> 
		expressionParser;
	conditionalParser.SetId(conditional_ParserId);


	Parser whitespaceExtParser = Parser(" ") >> whitespaceParser;
	whitespaceParser = whitespaceExtParser | Parser::Nul();

	// formula
	Parser formulaParser = conditionalParser | expressionParser;


	return formulaParser.Parse(aFormula);
	}