nevrax.org : docs

00001 
00006 /* Copyright, 2000 Nevrax Ltd.
00007  *
00008  * This file is part of NEVRAX NEL.
00009  * NEVRAX NEL is free software; you can redistribute it and/or modify
00010  * it under the terms of the GNU General Public License as published by
00011  * the Free Software Foundation; either version 2, or (at your option)
00012  * any later version.
00013 
00014  * NEVRAX NEL is distributed in the hope that it will be useful, but
00015  * WITHOUT ANY WARRANTY; without even the implied warranty of
00016  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
00017  * General Public License for more details.
00018 
00019  * You should have received a copy of the GNU General Public License
00020  * along with NEVRAX NEL; see the file COPYING. If not, write to the
00021  * Free Software Foundation, Inc., 59 Temple Place - Suite 330, Boston,
00022  * MA 02111-1307, USA.
00023  */
00024 
00025 
00026 #ifndef NL_MSGGETVALUE_H
00027 #define NL_MSGGETVALUE_H
00028 
00029 #include "nel/ai/agent/msg_getvalue.h"
00030 #include "nel/ai/agent/agent_digital.h"
00031 #include "nel/ai/agent/object_type.h"
00032 #include "nel/ai/script/codage.h"
00033 #include "nel/ai/script/object_unknown.h"
00034 #include "nel/ai/script/interpret_message_getvalue.h"
00035 
00036 namespace NLAIAGENT
00037 {
00038         CGetValueMsg::CGetValueMsg( std::list<IObjectIA *> &l, NLAISCRIPT::CMessageClass *b):CMessageScript(l,b)
00039         {
00040                 set(0, new DigitalType(0) );
00041         }
00042 
00043         CGetValueMsg::CGetValueMsg(NLAISCRIPT::CMessageClass *b) : CMessageScript(b)
00044         {               
00045                 CVectorGroupType *x = new CVectorGroupType(1);          
00046                 setMessageGroup(x);
00047                 setGroup(CMessageGroup::msgScriptingGroup);             
00048                 set(0, new DigitalType(0) );
00049         }
00050 
00051         CGetValueMsg::CGetValueMsg(IBasicAgent *agent):
00052                         CMessageScript((NLAISCRIPT::CMessageClass *)NLAISCRIPT::CGetValueMsgClass::IdGetValueMsgClass.getFactory()->getClass())
00053         {               
00054                 CVectorGroupType *x = new CVectorGroupType(1);
00055                 setMessageGroup(x);
00056                 setGroup(CMessageGroup::msgScriptingGroup);
00057                 set(0, new DigitalType(0) );
00058         }
00059 
00060         CGetValueMsg::CGetValueMsg(const CGetValueMsg &m): CMessageScript(m)
00061         {
00062         }
00063 
00064         CGetValueMsg::~CGetValueMsg()
00065         {
00066                 
00067         }
00068 
00069         const NLAIC::IBasicType *CGetValueMsg::clone() const
00070         {
00071                 const NLAIC::IBasicType *x;
00072                 x = new CGetValueMsg(*this);
00073                 return x;
00074         }
00075 
00076         const NLAIC::CIdentType &CGetValueMsg::getType() const
00077         {
00078                 if ( getCreatorClass() ) 
00079                         return getCreatorClass()->getType();
00080                 else
00081                         return NLAISCRIPT::CGetValueMsgClass::IdGetValueMsgClass;
00082         }       
00083 
00084         void CGetValueMsg::getDebugString(std::string &t) const
00085         {
00086                 const CStringType *c = (const CStringType *)getFront();
00087                 std::string txt;
00088                 c->getDebugString(txt);
00089                 t += NLAIC::stringGetBuild("CGetValueMsg<%s>",txt.c_str());
00090         }
00091 
00092 
00093         tQueue CGetValueMsg::isMember(const IVarName *className,const IVarName *funcName,const IObjectIA &params) const
00094         {
00095 
00096                 tQueue r;
00097 
00098                 if(className == NULL)
00099                 {
00100                         if( (*funcName) == CStringVarName( "Constructor" ) )
00101                         {                                       
00102 
00103                                 r.push( CIdMethod( IMessageBase::getMethodIndexSize(), 0.0, NULL, new NLAISCRIPT::CObjectUnknown(new NLAISCRIPT::COperandVoid) ) );                     
00104                         }
00105                 }
00106 
00107                 if ( r.empty() )
00108                         return CMessageScript::isMember(className, funcName, params);
00109                 else
00110                         return r;
00111         }
00112 
00113         NLAIAGENT::IObjectIA::CProcessResult CGetValueMsg::runMethodeMember(sint32, sint32, NLAIAGENT::IObjectIA *)
00114         {
00115                 return IObjectIA::CProcessResult();
00116         }
00117 
00118         IObjectIA::CProcessResult CGetValueMsg::runMethodeMember(sint32 index, IObjectIA *context)
00119         {
00120                 IBaseGroupType *arg = (IBaseGroupType *) ( (NLAISCRIPT::CCodeContext *)context )->Param.back();
00121 
00122                 switch( index - IMessageBase::getMethodIndexSize() )
00123                 {
00124                 case 0:
00125                         {                                       
00126                                 IObjectIA *param = (IObjectIA *) arg->get();
00127                                 arg->popFront();
00128 #ifdef NL_DEBUG
00129                                 std::string buffer;
00130                                 param->getDebugString( buffer );
00131 #endif
00132                                 set(0, param);
00133                         }
00134                         break;
00135                 }
00136                 return IObjectIA::CProcessResult();
00137         }
00138 
00139         sint32 CGetValueMsg::getBaseMethodCount() const
00140         {
00141                 return CMessageScript::getBaseMethodCount() + 1;
00142         }
00143 
00144 
00145 }       // NLAIAGENT
00146 
00147 #endif // NL_MSGGETVALUE_H
msg_getvalue.cpp
