| 
									
										
										
										
											2002-10-12 11:37:38 +00:00
										 |  |  | /**
 | 
					
						
							|  |  |  |  * 'Expression Controller enables to calculate an expression that wires inputs to output | 
					
						
							|  |  |  |  * | 
					
						
							|  |  |  |  * $Id$ | 
					
						
							|  |  |  |  * | 
					
						
							| 
									
										
										
										
											2008-04-16 22:40:48 +00:00
										 |  |  |  * ***** BEGIN GPL LICENSE BLOCK ***** | 
					
						
							| 
									
										
										
										
											2002-10-12 11:37:38 +00:00
										 |  |  |  * | 
					
						
							|  |  |  |  * This program is free software; you can redistribute it and/or | 
					
						
							|  |  |  |  * modify it under the terms of the GNU General Public License | 
					
						
							|  |  |  |  * as published by the Free Software Foundation; either version 2 | 
					
						
							| 
									
										
										
										
											2008-04-16 22:40:48 +00:00
										 |  |  |  * of the License, or (at your option) any later version. | 
					
						
							| 
									
										
										
										
											2002-10-12 11:37:38 +00:00
										 |  |  |  * | 
					
						
							|  |  |  |  * This program 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 General Public License for more details. | 
					
						
							|  |  |  |  * | 
					
						
							|  |  |  |  * You should have received a copy of the GNU General Public License | 
					
						
							|  |  |  |  * along with this program; if not, write to the Free Software Foundation, | 
					
						
							|  |  |  |  * Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA. | 
					
						
							|  |  |  |  * | 
					
						
							|  |  |  |  * The Original Code is Copyright (C) 2001-2002 by NaN Holding BV. | 
					
						
							|  |  |  |  * All rights reserved. | 
					
						
							|  |  |  |  * | 
					
						
							|  |  |  |  * The Original Code is: all of this file. | 
					
						
							|  |  |  |  * | 
					
						
							|  |  |  |  * Contributor(s): none yet. | 
					
						
							|  |  |  |  * | 
					
						
							| 
									
										
										
										
											2008-04-16 22:40:48 +00:00
										 |  |  |  * ***** END GPL LICENSE BLOCK ***** | 
					
						
							| 
									
										
										
										
											2002-10-12 11:37:38 +00:00
										 |  |  |  */ | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | #include "SCA_ExpressionController.h"
 | 
					
						
							|  |  |  | #include "SCA_ISensor.h"
 | 
					
						
							|  |  |  | #include "SCA_LogicManager.h"
 | 
					
						
							|  |  |  | #include "BoolValue.h"
 | 
					
						
							|  |  |  | #include "InputParser.h"
 | 
					
						
							|  |  |  | #include "MT_Transform.h" // for fuzzyZero
 | 
					
						
							|  |  |  | 
 | 
					
						
							| 
									
										
										
										
											2009-09-29 21:42:40 +00:00
										 |  |  | #include <stdio.h>
 | 
					
						
							|  |  |  | 
 | 
					
						
							| 
									
										
										
										
											2002-11-25 15:29:57 +00:00
										 |  |  | #ifdef HAVE_CONFIG_H
 | 
					
						
							|  |  |  | #include <config.h>
 | 
					
						
							|  |  |  | #endif
 | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | 
 | 
					
						
							| 
									
										
										
										
											2002-10-12 11:37:38 +00:00
										 |  |  | /* ------------------------------------------------------------------------- */ | 
					
						
							|  |  |  | /* Native functions                                                          */ | 
					
						
							|  |  |  | /* ------------------------------------------------------------------------- */ | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | SCA_ExpressionController::SCA_ExpressionController(SCA_IObject* gameobj, | 
					
						
							| 
									
										
										
										
											2009-06-28 11:22:26 +00:00
										 |  |  | 												   const STR_String& exprtext) | 
					
						
							|  |  |  | 	:SCA_IController(gameobj), | 
					
						
							| 
									
										
										
										
											2009-03-11 22:11:52 +00:00
										 |  |  | 	m_exprText(exprtext), | 
					
						
							|  |  |  | 	m_exprCache(NULL) | 
					
						
							| 
									
										
										
										
											2002-10-12 11:37:38 +00:00
										 |  |  | { | 
					
						
							|  |  |  | } | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | SCA_ExpressionController::~SCA_ExpressionController() | 
					
						
							|  |  |  | { | 
					
						
							| 
									
										
										
										
											2009-03-11 22:11:52 +00:00
										 |  |  | 	if (m_exprCache) | 
					
						
							|  |  |  | 		m_exprCache->Release(); | 
					
						
							| 
									
										
										
										
											2002-10-12 11:37:38 +00:00
										 |  |  | } | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | CValue* SCA_ExpressionController::GetReplica() | 
					
						
							|  |  |  | { | 
					
						
							|  |  |  | 	SCA_ExpressionController* replica = new SCA_ExpressionController(*this); | 
					
						
							|  |  |  | 	replica->m_exprText = m_exprText; | 
					
						
							| 
									
										
										
										
											2009-03-11 22:11:52 +00:00
										 |  |  | 	replica->m_exprCache = NULL; | 
					
						
							| 
									
										
										
										
											2002-10-12 11:37:38 +00:00
										 |  |  | 	// this will copy properties and so on...
 | 
					
						
							| 
									
										
										
										
											2009-06-08 20:08:19 +00:00
										 |  |  | 	replica->ProcessReplica(); | 
					
						
							| 
									
										
										
										
											2002-10-12 11:37:38 +00:00
										 |  |  | 
 | 
					
						
							|  |  |  | 	return replica; | 
					
						
							|  |  |  | } | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | 
 | 
					
						
							| 
									
										
										
										
											2009-03-11 22:11:52 +00:00
										 |  |  | // Forced deletion of precalculated expression to break reference loop
 | 
					
						
							|  |  |  | // Use this function when you know that you won't use the sensor anymore
 | 
					
						
							|  |  |  | void SCA_ExpressionController::Delete() | 
					
						
							|  |  |  | { | 
					
						
							|  |  |  | 	if (m_exprCache) | 
					
						
							|  |  |  | 	{ | 
					
						
							|  |  |  | 		m_exprCache->Release(); | 
					
						
							|  |  |  | 		m_exprCache = NULL; | 
					
						
							|  |  |  | 	} | 
					
						
							|  |  |  | 	Release(); | 
					
						
							|  |  |  | } | 
					
						
							|  |  |  | 
 | 
					
						
							| 
									
										
										
										
											2002-10-12 11:37:38 +00:00
										 |  |  | 
 | 
					
						
							|  |  |  | void SCA_ExpressionController::Trigger(SCA_LogicManager* logicmgr) | 
					
						
							|  |  |  | { | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | 	bool expressionresult = false; | 
					
						
							| 
									
										
										
										
											2009-03-11 22:11:52 +00:00
										 |  |  | 	if (!m_exprCache) | 
					
						
							|  |  |  | 	{ | 
					
						
							|  |  |  | 		CParser parser; | 
					
						
							|  |  |  | 		parser.SetContext(this->AddRef()); | 
					
						
							|  |  |  | 		m_exprCache = parser.ProcessText(m_exprText); | 
					
						
							|  |  |  | 	} | 
					
						
							|  |  |  | 	if (m_exprCache) | 
					
						
							| 
									
										
										
										
											2002-10-12 11:37:38 +00:00
										 |  |  | 	{ | 
					
						
							| 
									
										
										
										
											2009-03-11 22:11:52 +00:00
										 |  |  | 		CValue* value = m_exprCache->Calculate(); | 
					
						
							| 
									
										
										
										
											2002-10-12 11:37:38 +00:00
										 |  |  | 		if (value) | 
					
						
							|  |  |  | 		{ | 
					
						
							|  |  |  | 			if (value->IsError()) | 
					
						
							|  |  |  | 			{ | 
					
						
							|  |  |  | 				printf(value->GetText()); | 
					
						
							|  |  |  | 			} else | 
					
						
							|  |  |  | 			{ | 
					
						
							| 
									
										
										
										
											2009-04-20 15:06:46 +00:00
										 |  |  | 				float num = (float)value->GetNumber(); | 
					
						
							| 
									
										
										
										
											2002-10-12 11:37:38 +00:00
										 |  |  | 				expressionresult = !MT_fuzzyZero(num); | 
					
						
							|  |  |  | 			} | 
					
						
							|  |  |  | 			value->Release(); | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | 		} | 
					
						
							|  |  |  | 	} | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | 	for (vector<SCA_IActuator*>::const_iterator i=m_linkedactuators.begin(); | 
					
						
							|  |  |  | 	!(i==m_linkedactuators.end());i++) | 
					
						
							|  |  |  | 	{ | 
					
						
							|  |  |  | 		SCA_IActuator* actua = *i; | 
					
						
							| 
									
										
										
										
											2009-06-08 20:08:19 +00:00
										 |  |  | 		logicmgr->AddActiveActuator(actua,expressionresult); | 
					
						
							| 
									
										
										
										
											2002-10-12 11:37:38 +00:00
										 |  |  | 	} | 
					
						
							|  |  |  | } | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | CValue* SCA_ExpressionController::FindIdentifier(const STR_String& identifiername) | 
					
						
							|  |  |  | { | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | 	CValue* identifierval = NULL; | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | 	for (vector<SCA_ISensor*>::const_iterator is=m_linkedsensors.begin(); | 
					
						
							|  |  |  | 	!(is==m_linkedsensors.end());is++) | 
					
						
							|  |  |  | 	{ | 
					
						
							|  |  |  | 		SCA_ISensor* sensor = *is; | 
					
						
							|  |  |  | 		if (sensor->GetName() == identifiername) | 
					
						
							|  |  |  | 		{ | 
					
						
							| 
									
										
										
										
											2009-06-08 20:08:19 +00:00
										 |  |  | 			identifierval = new CBoolValue(sensor->GetState()); | 
					
						
							| 
									
										
										
										
											2002-10-12 11:37:38 +00:00
										 |  |  | 			//identifierval = sensor->AddRef();
 | 
					
						
							|  |  |  | 		} | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | 		//if (!sensor->IsPositiveTrigger())
 | 
					
						
							|  |  |  | 		//{
 | 
					
						
							|  |  |  | 		//	sensorresult = false;
 | 
					
						
							|  |  |  | 		//	break;
 | 
					
						
							|  |  |  | 		//}
 | 
					
						
							|  |  |  | 	} | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | 	if (identifierval) | 
					
						
							|  |  |  | 		return identifierval; | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | 	return  GetParent()->FindIdentifier(identifiername); | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | } |