/* "CodeWorker":	a scripting language for parsing and generating text.

Copyright (C) 1996-1997, 1999-2002 Cédric Lemaire

This library is free software; you can redistribute it and/or
modify it under the terms of the GNU Lesser General Public
License as published by the Free Software Foundation; either
version 2.1 of the License, or (at your option) any later version.

This library is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
Lesser General Public License for more details.

You should have received a copy of the GNU Lesser General Public
License along with this library; if not, write to the Free Software
Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA

To contact the author: codeworker@free.fr
*/

#ifdef WIN32
#pragma warning (disable : 4786)
#endif

#include "UtlException.h"
#include "UtlTrace.h"
#include "ScpStream.h"

#include "DtaScriptVariable.h"
#include "ExprScriptVariable.h"
#include "DtaProject.h"
#include "CGRuntime.h"
#include "CppCompilerEnvironment.h"
#include "GrfSetAssignment.h"


namespace CodeWorker {
	GrfSetAssignment::~GrfSetAssignment() {
		if (_pVariable != 0L) delete _pVariable;
		if (_pValue != 0L) delete _pValue;
	}

	SEQUENCE_INTERRUPTION_LIST GrfSetAssignment::executeInternal(DtaScriptVariable& visibility) {
		DtaScriptVariable* pVariable = visibility.getExistingVariable(*_pVariable);
		if (pVariable == 0L) {
			std::string sErrorMessage = "variable '" + _pVariable->toString() + "' should exist either into the tree (see 'insert') or as a local variable (see 'local') before assigning a value through 'set'";
			sErrorMessage += UtlTrace::getTraceStack();
			if (DtaProject::getInstance().addWarning(sErrorMessage) == 1) CGRuntime::traceLine(sErrorMessage);
			pVariable = visibility.getVariable(*_pVariable);
		}
		ExprScriptConstantTree* pConstantTree = dynamic_cast<ExprScriptConstantTree*>(_pValue);
		if (pConstantTree != 0L) {
			if (!_bContatenation) pVariable->clearContent();
			pConstantTree->setTree(visibility, *pVariable);
		} else {
			std::string sValue = _pValue->getValue(visibility);
			if (_bContatenation) {
				const char* tcValue = pVariable->getValue();
				if (tcValue != 0L) sValue = std::string(tcValue) + sValue;
			}
			pVariable->setValue(sValue.c_str());
		}
		return NO_INTERRUPTION;
	}

	void GrfSetAssignment::compileCpp(CppCompilerEnvironment& theCompilerEnvironment) const {
		ExprScriptConstantTree* pConstantTree = dynamic_cast<ExprScriptConstantTree*>(_pValue);
		if (pConstantTree != 0L) {
			if (!_bContatenation) {
				CW_BODY_INDENT;
				_pVariable->compileCppForSet(theCompilerEnvironment);
				CW_BODY_STREAM << ".clearNode()";CW_BODY_ENDL;
			}
			pConstantTree->compileCppInit(theCompilerEnvironment, *_pVariable);
		} else {
			// a classical value
			CW_BODY_INDENT;
			_pVariable->compileCppForSet(theCompilerEnvironment);
			if (_bContatenation) CW_BODY_STREAM << ".concatenateValue(";
			else CW_BODY_STREAM << ".setValue(";
			_pValue->compileCpp(theCompilerEnvironment);
			CW_BODY_STREAM << ");";CW_BODY_ENDL;
		}
	}
}
