/* **************************************************************************************************** */
/* IRA Istituto di Radioastronomia                                                                      */
/* $Id: SP_function5.h,v 1.4 2010-09-13 16:41:21 a.orlati Exp $											*/
/*                                                                                                      */
/* This code is under GNU General Public Licence (GPL).                                                 */
/*                                                                                                      */
/* Who                                			    when                   What                                              */
/* Andrea Orlati(aorlati@ira.inaf.it)  01/08/2008      Creation                                          */

#ifndef _SP_FUNCTION5_H_
#define _SP_FUNCTION5_H_

#include "SP_functor.h"

namespace SimpleParser {

template<class OBJ,_sp_const_function CONST_SPEC,class RT,class A0,class A1,class A2,class A3,class A4> class function5: public _SP_FUNCTOR
{
public:
	typedef typename RET<RT>::return_type return_type;
	typedef typename RET<RT>::argument return_argument;
	typedef typename A0::argument arg0;
	typedef typename A0::parameter_type param0;
	typedef typename A1::argument arg1;
	typedef typename A1::parameter_type param1; 
	typedef typename A2::argument arg2;
	typedef typename A2::parameter_type param2;
	typedef typename A3::argument arg3;
	typedef typename A3::parameter_type param3;
	typedef typename A4::argument arg4;
	typedef typename A4::parameter_type param4;
	
	typedef return_type (OBJ::*normal_func_type)(param0,param1,param2,param3,param4);
	typedef return_type (OBJ::*const_func_type)(param0,param1,param2,param3,param4) const;
	typedef typename conditional<CONST_SPEC,const_func_type,normal_func_type>::type func_type;
	
	function5(OBJ *object, func_type func) : _SP_FUNCTOR(object,5),m_func(func) {};
	/*
   * @throw (ACSErr::ACSbaseExImpl)
   */
	return_type operator()(arg0& pp0,arg1& pp1,arg2& pp2,arg3& pp3,arg4& pp4) const {
		return (*_SP_FUNCTOR::m_obj.*m_func)( pp0,pp1,pp2,pp3,pp4); //can throw a generic exception
	}
	/*
   * @throw (ACSErr::ACSbaseExImpl, ParserErrors::ConversionErrorExImpl)
   */
	void call(IRA::CString *params,const WORD& parLen) {
		WORD pCount=0;
		try {
			if (A0::isInput) {
				if (pCount<parLen) {
					p0=(const char *)params[pCount];
					pCount++;
				}
			}
			if (A1::isInput) {
				if (pCount<parLen) {
					p1=(const char *)params[pCount];
					pCount++;
				}
			}	
			if (A2::isInput) {
				if (pCount<parLen) {
					p2=(const char *)params[pCount];
					pCount++;
				}
			}
			if (A3::isInput) {
				if (pCount<parLen) {
					p3=(const char *)params[pCount];
					pCount++;
				}
			}
			if (A4::isInput) {
				if (pCount<parLen) {
					p4=(const char *)params[pCount];
					pCount++;
				}
			}				
		}
		catch (ParserErrors::BadTypeFormatExImpl& err) {
			_ADD_BACKTRACE(ParserErrors::ConversionErrorExImpl,impl,err,"function5::call()");
			throw impl;
		}
		catch (...) {
			_THROW_EXCPT(ParserErrors::ConversionErrorExImpl,"function5::call()");
		}
		retVal=(*_SP_FUNCTOR::m_obj.*m_func)(p0,p1,p2,p3,p4); //can throw a generic exception
	}
	WORD get(IRA::CString *params)  {
		int n=1;
		params[0]=(const char *)retVal;
		if (A0::isOutput) {
			params[n]=(const char*)p0;
			n++;
		}
		if (A1::isOutput) {
			params[n]=(const char*)p1;
			n++;
		}
		if (A2::isOutput) {
			params[n]=(const char*)p2;
			n++;
		}
		if (A3::isOutput) {
			params[n]=(const char*)p3;
			n++;
		}
		if (A4::isOutput) {
			params[n]=(const char*)p4;
			n++;
		}				
		return n;
	}
protected:
	func_type m_func;
	arg0 p0;
	arg1 p1;
	arg2 p2;
	arg3 p3;
	arg4 p4;
	return_argument retVal;
};

template<class OBJ,_sp_const_function CONST_SPEC,class A0,class A1,class A2,class A3,class A4> 
class function5<OBJ,CONST_SPEC,void_type,A0,A1,A2,A3,A4>: public _SP_FUNCTOR
{
public:
	typedef typename RET<void_type>::return_type return_type;
	typedef typename RET<void_type>::argument return_argument;
	typedef typename A0::argument arg0;
	typedef typename A0::parameter_type param0; 
	typedef typename A1::argument arg1;
	typedef typename A1::parameter_type param1;
	typedef typename A2::argument arg2;
	typedef typename A2::parameter_type param2; 	
	typedef typename A3::argument arg3;
	typedef typename A3::parameter_type param3;
	typedef typename A4::argument arg4;
	typedef typename A4::parameter_type param4; 	
	
	typedef return_type (OBJ::*normal_func_type)(param0,param1,param2,param3,param4);
	typedef return_type (OBJ::*const_func_type)(param0,param1,param2,param3,param4) const;
	typedef typename conditional<CONST_SPEC,const_func_type,normal_func_type>::type func_type;
	
	function5(OBJ *object, func_type func) : _SP_FUNCTOR(object,5),m_func(func) {};
	/*
   * @throw (ACSErr::ACSbaseExImpl)
   */
	void  operator()(arg0& pp0,arg1& pp1,arg2& pp2,arg3& pp3,arg4& pp4) const {
		(*_SP_FUNCTOR::m_obj.*m_func)( pp0,pp1,pp2,pp3,pp4); //can throw a generic exception
	}
	/*
   * @throw (ACSErr::ACSbaseExImpl, ParserErrors::ConversionErrorExImpl)
   */
	void call(IRA::CString *params,const WORD& parLen) {
		WORD pCount=0;
		try {
			if (A0::isInput) {
				if (pCount<parLen) {
					p0=(const char *)params[pCount];
					pCount++;
				}
			}
			if (A1::isInput) {
				if (pCount<parLen) {
					p1=(const char *)params[pCount];
					pCount++;
				}
			}	
			if (A2::isInput) {
				if (pCount<parLen) {
					p2=(const char *)params[pCount];
					pCount++;
				}
			}
			if (A3::isInput) {
				if (pCount<parLen) {
					p3=(const char *)params[pCount];
					pCount++;
				}
			}
			if (A4::isInput) {
				if (pCount<parLen) {
					p4=(const char *)params[pCount];
					pCount++;
				}
			}				
		}
		catch (ParserErrors::BadTypeFormatExImpl& err) {
			_ADD_BACKTRACE(ParserErrors::ConversionErrorExImpl,impl,err,"function5::call()");
			throw impl;
		}
		catch (...) {
			_THROW_EXCPT(ParserErrors::ConversionErrorExImpl,"function5::call()");
		}
		(*_SP_FUNCTOR::m_obj.*m_func)(p0,p1,p2,p3,p4); //can throw a generic exception
	}
	WORD get(IRA::CString *params)  {
		int n=0;
		if (A0::isOutput) {
			params[n]=(const char*)p0;
			n++;
		}
		if (A1::isOutput) {
			params[n]=(const char*)p1;
			n++;
		}		
		if (A2::isOutput) {
			params[n]=(const char *)p2;
			n++;
		}
		if (A3::isOutput) {
			params[n]=(const char *)p3;
			n++;
		}
		if (A4::isOutput) {
			params[n]=(const char *)p4;
			n++;
		}				
		return n;				
	}
protected:
	func_type m_func;
	arg0 p0;
	arg1 p1;
	arg2 p2;
	arg3 p3;
	arg4 p4;
};

};


#endif /*_SP_FUNCTION4_H_*/
