/**	\author    coidgen 0.7.4
	\version    (0.0 build 1)
	\date      
	\brief     
*/



// Service header info (for version checking),  ! DO NOT CHANGE !
static const char COID_bin_data[] =
"060005000000302E372E3409000000312E302028312E3029A10B0000E38BD64000000000000000000000000001000000"
"0100000001000000070000006578616D706C65000000000000000000000000050000000500000005000000FFFFFFFF04"
"0000006F7063640000000000000000000080000000000500000072656164310000000001000000FFFFFFFF0A00000046"
"4F4F5F535452554354000000000000000000000208000000000107200000000000000000FFFFFFFF040000006F706364"
"0000000000000000000080000000000500000072656164320100000001000000FFFFFFFF0A000000464F4F5F53545255"
"435400000000000000000100080C000000000107200200000000000000FFFFFFFF040000006F70636400000000000000"
"00000080000000000400000073656E640200000003000000FFFFFFFF03000000696E7400000000000000000000040800"
"0000FFFFFFFF0D000000636F6E73742063686172737472000000000000000000001108000000FFFFFFFF0C0000006269"
"6E73747265616D627566000000000000000000000208000000010107200000000000000000FFFFFFFF040000006F7063"
"640000000000000000000080000000000900000072656D61705F666E630300000001000000FFFFFFFF0D00000052454D"
"41505F4558414D504C45000000000000000000000208000001FFFFFFFF1800000052454D41505F4558414D504C455F63"
"6C69656E7473696465000000000000000000000208000000000007200100000000000000FFFFFFFF040000006F706364"
"000000000000000000008000000000070000006765745F7074720400000001000000FFFFFFFF0A000000464F4F5F5354"
"5255435400000000000000000200010400000000000120000000000000000001FFFFFFFF040000006F70636400000000"
"00000000000080000000000E0000006163636570745F636F6E6E6563740500008002000000FFFFFFFF0D000000636F6E"
"73742063686172737472000000000000000000001108000000FFFFFFFF0E000000636F6E73742070617373776F726400"
"000000000000000000310800000000008720000000000000000001FFFFFFFF040000006F706364000000000000000000"
"008000000000150000006163636570745F636F6E6E6563745F7368617265640600008000000000005080200000000000"
"00000000000001FFFFFFFF040000006F706364000000000000000000008000000000150000006163636570745F737461"
"727475705F706172616D73FFFF008001000000FFFFFFFF0D000000636D645F696E746572666163650000000000000000"
"0000010800000000008720000000000000000000000001000700FFFFFFFF00000000"
;
//*/


#include "coid/comm/interfnc.h"
#include "example.h"


namespace coid {


static inline const char ** COID_OUT_ARGS(const char ** from) {
	while( *from ) from++;
	return ++from;
}

typedef ServiceDescriptor::MethodDesc MethodDesc;
#define COID_MethodDesc_constructor(S,I,F)         MethodDesc( S[0], S[1], &S[2], COID_OUT_ARGS(&S[2]), I, F )
#define COID_MethodDesc_constructor_NotImpl        MethodDesc( NULL, NULL, NULL, NULL, 0, 0 )



typedef void (example::*coid_fnc)();

/// fake function, should never be called:
static void coid_throw() {throw ersFE_EXCEPTION;}

/// we need type cast in case there are 2 or more methods with the same name
#define COID_DISPATCH_CREATE_HOOK(M,i,t,tc) \
	if( i < coid_fnc_count ) { \
		if( (coid_flags[i] & COID_example_method_desc[i].flags & MethodDesc::xACCESS_MODE) ) \
			coid_fnc_table[t] = (coid_fnc) (tc) &example::M; \
		else *(void **) &coid_fnc_table[t] = (void *) coid_throw; \
	}


#define COID_DISPATCH_CREATE_CALLER_HOOK(M,i,t) \
	if( i < coid_fnc_count ) { \
		if( (coid_flags[i] & COID_example_method_desc[i].flags & MethodDesc::xACCESS_MODE) ) \
			coid_fnc_table[t] = (coid_fnc) &DISPATCH_CALLER_example_0_0::M; \
		else *(void **) &coid_fnc_table[t] = (void *) coid_throw; \
	}






/// functions:
uint COID_example_0_0_get_method_id( const token & name );
opcd COID_example_0_0_dispatch( InstanceData * _coid_inst_data, uint _coid_fnc_id, binstream & _coid_bstr );



struct DISPATCH_CALLER_example_0_0
{
	void call_dispatch( binstream * b ) {
		COID_CLIENT_EXESTREAM_ARGS * a = (COID_CLIENT_EXESTREAM_ARGS *) this;
		InstanceData d;  d._object = a->obj;
		COID_example_0_0_dispatch( &d, a->id, *b );
	}
};





enum {	/// command ids, format is: COID_classname_fncname_fncid
	COID_example_read1_0 = 0,
	COID_example_read2_1 = 1,
	COID_example_send_2 = 2,
	COID_example_remap_fnc_3 = 3,
	COID_example_get_ptr_4 = 4
};



/// info about every function:
static const char * COID_example_read1_0_finfo[] = {"read1", "opcd ", NULL, "FOO_STRUCT & list", NULL};
static const char * COID_example_read2_1_finfo[] = {"read2", "opcd ", NULL, "FOO_STRUCT & list", NULL};
static const char * COID_example_send_2_finfo[] = {"send", "opcd ", "int & ref", "const charstr & command", NULL, "int & ref", "binstreambuf & reply", NULL};
static const char * COID_example_remap_fnc_3_finfo[] = {"remap_fnc", "opcd ", NULL, "REMAP_EXAMPLE & arg", NULL};
static const char * COID_example_get_ptr_4_finfo[] = {"get_ptr", "opcd ", "FOO_STRUCT ** f", NULL, NULL};


/// create structure that holds everything about function:
static const MethodDesc COID_example_method_desc[] = {
	COID_MethodDesc_constructor( COID_example_read1_0_finfo, 0, MethodDesc::fACCESS_MODE_DIRECT | MethodDesc::fACCESS_MODE_INTERPROCESS | MethodDesc::fACCESS_MODE_REMOTE ),
	COID_MethodDesc_constructor( COID_example_read2_1_finfo, 1, MethodDesc::fACCESS_MODE_DIRECT | MethodDesc::fACCESS_MODE_INTERPROCESS | MethodDesc::fACCESS_MODE_REMOTE ),
	COID_MethodDesc_constructor( COID_example_send_2_finfo, 2, MethodDesc::fACCESS_MODE_DIRECT | MethodDesc::fACCESS_MODE_INTERPROCESS | MethodDesc::fACCESS_MODE_REMOTE | MethodDesc::fCONST ),
	COID_MethodDesc_constructor( COID_example_remap_fnc_3_finfo, 3, MethodDesc::fACCESS_MODE_DIRECT | MethodDesc::fACCESS_MODE_INTERPROCESS | MethodDesc::fACCESS_MODE_REMOTE | MethodDesc::fLOG_CALL ),
	COID_MethodDesc_constructor( COID_example_get_ptr_4_finfo, 4, MethodDesc::fACCESS_MODE_DIRECT | MethodDesc::fLOG_CALL )
};



static const char * COID_dependencies_example[] = {

	NULL
};


/// ServiceDescriptor:
static ServiceDescriptor COID_descriptor_example;



/// dispatch stores function tables for all 'direct' clients with different minor versions here
class COID_register_example_0_0
{
	struct table {
		ulong ver;
		coid_fnc * tbl;
	};
	dynarray<table>	_tables;

public:
//	comm_mutex_rw	_mx;
	comm_mutex	_mx;

	COID_register_example_0_0() {
		COID_descriptor_example._version.set( "", 0, 0, 1 );
		COID_descriptor_example._coid_version = COID_VERSION;
		COID_descriptor_example._name = "example";
		COID_descriptor_example._shortname = "example";
		COID_descriptor_example._info = "info :)";
		COID_descriptor_example._dependencies = COID_dependencies_example;
		COID_descriptor_example._nmeth = 5;
		COID_descriptor_example._methflags = COID_example_method_desc;
		COID_descriptor_example._flags = ServiceDescriptor::fLOG_CALL | ServiceDescriptor::fALLOW_DIRECT_ACCESS | ServiceDescriptor::fALLOW_INTERPROCESS_ACCESS | ServiceDescriptor::fALLOW_REMOTE_ACCESS | ServiceDescriptor::fAUTONOMOUS;
		COID_descriptor_example._acceptor_port = (ulong) -1;
		COID_descriptor_example._bin_svc_data = COID_bin_data;
		COID_descriptor_example.get_method_id = COID_example_0_0_get_method_id;
		COID_descriptor_example.dispatch = COID_example_0_0_dispatch;
		INTERFACE_REGISTER(ServiceDescriptor).add( &COID_descriptor_example );
	}

	~COID_register_example_0_0() {
//		MXGUARDRW( (comm_mutex_rw &) _mx );
		MXGUARD( (comm_mutex &) _mx );
		for( ulong i=0; i<_tables.size(); i++ )
			delete [] _tables[i].tbl;
	}
	coid_fnc * get_table_notlocked( ulong ver ) {
		for( ulong i=0; i<_tables.size(); i++ )
			if( ver == _tables[i].ver ) return _tables[i].tbl;
		return NULL;
	}
	coid_fnc * get_table( ulong ver ) {
//		MXGUARDRW( (const comm_mutex_rw &) _mx );		/// ==> read lock
		MXGUARD( (const comm_mutex &) _mx );
		return get_table_notlocked( ver );
	}
	void insert_table( ulong ver, coid_fnc * tbl ) {
		table * t = _tables.add( 1 );	/// mutex has been locked
		t->ver = ver; t->tbl = tbl;
	}
};


// for dll linking
COID_register_example_0_0 & get_COID_register_example_0_0()
{
	static COID_register_example_0_0 x;
	coid_get_sdir();    //force exporting the symbol
	return x;
}

//for static linking (must be called from outside to link this object)
void get_COID_register_example()
{
	COID_register_example_0_0();
}

static COID_register_example_0_0 & COID_auto_register_variable = get_COID_register_example_0_0();










opcd COID_example_0_0_dispatch( InstanceData * _coid_inst_data, uint _coid_fnc_id, binstream & _coid_bstr )
{
	example * _coid_example_obj = (example *) _coid_inst_data->_object;
	double _coid_example_ticks = 0.0;
	binstream * _coid_log = NULL;
	opcd _coid_err_code = 0;

	switch( _coid_fnc_id ) {
		case StdDispatchMethod::CONSTRUCTOR: {
			_coid_inst_data->_object = _coid_example_obj = new example;
			_coid_example_obj->accept_startup_params( *_coid_inst_data->_cmdin );
			if( _coid_err_code ) {
				delete (example *) _coid_inst_data->_object; _coid_inst_data->_object = NULL;
				return _coid_err_code;
			}
		} break;
		case StdDispatchMethod::DESTRUCTOR: {
			delete _coid_example_obj; _coid_inst_data->_object = NULL;
		} break;
		case StdDispatchMethod::CREATE_INTERFACE: {
			Tptr<CreateInterfaceInfo> coid_iface_info;
			_coid_bstr >> coid_iface_info;
			const uint coid_fnc_count = coid_iface_info->_nmethods;
			const uint * coid_flags = coid_iface_info->_methflags;
			coid_fnc * coid_fnc_table = get_COID_register_example_0_0().get_table( coid_iface_info->_clientver.get_minor() );

			if( ! coid_fnc_table ) {
				//MXGUARDRW( get_COID_register_example_0_0()._mx );
				MXGUARD( get_COID_register_example_0_0()._mx );
				coid_fnc_table = get_COID_register_example_0_0().get_table_notlocked( coid_iface_info->_clientver.get_minor() );
				if( ! coid_fnc_table ) {
					coid_fnc_table = (coid_fnc *) new char[ sizeof(coid_fnc) * (coid_fnc_count + 1) ];	/// new coid_fnc[...] would allocate pointer to 0 bytes (M$ 'feature')
					memset( coid_fnc_table, 0, (coid_fnc_count + 1) * sizeof(coid_fnc) );
					ulong coid_table_index = 0;

					((CreateInterfaceInfo::t_fnc *) coid_fnc_table)[coid_table_index++] = coid_iface_info->_disconnect_interface;
					COID_DISPATCH_CREATE_HOOK( read1, 0, coid_table_index++, opcd (example::*)( FOO_STRUCT &  ) )
					COID_DISPATCH_CREATE_HOOK( read2, 1, coid_table_index++, opcd (example::*)( FOO_STRUCT &  ) )
					COID_DISPATCH_CREATE_HOOK( send, 2, coid_table_index++, opcd (example::*)( int & , const charstr & , binstreambuf &  ) const )
					COID_DISPATCH_CREATE_CALLER_HOOK( call_dispatch, 3, coid_table_index++ );  // remap_fnc contains fetch or remap args
					COID_DISPATCH_CREATE_HOOK( get_ptr, 4, coid_table_index++, opcd (example::*)( FOO_STRUCT **  ) )

					get_COID_register_example_0_0().insert_table( coid_iface_info->_clientver.get_minor(), coid_fnc_table );
				}
			}

			_coid_bstr.acknowledge();
			_coid_bstr << (Tptr<void> &) coid_fnc_table;
			_coid_bstr << (Tptr<void> &) _coid_inst_data->_object;
			_coid_bstr << (Tptr<void> &) coid_iface_info->_mutex;
		} break;
		case StdDispatchMethod::AUTHENTIFY: {
			if( (_coid_inst_data->_flags & (MethodDesc::fLOG_CALL | MethodDesc::fLOG_DURATION)) == (MethodDesc::fLOG_CALL | MethodDesc::fLOG_DURATION) )
				_coid_example_ticks = SINGLETON(HPTIMER).ftime();
			
			charstr name;
			_coid_bstr >> name;
			password pwd;
			_coid_bstr >> pwd;

			if( _coid_inst_data->_flags & MethodDesc::fLOG_CALL ) {
				_coid_log = &_coid_inst_data->_cmdin->post_method();
				*_coid_log << "(" << "80000005" << ") accept_connect ( "; *_coid_log << name; *_coid_log << ", "; *_coid_log << "?"; *_coid_log << " )";
			}

			_coid_bstr.acknowledge();

			_coid_err_code = _coid_example_obj->accept_connect( name, pwd );
			_coid_bstr << _coid_err_code;
			

			if( _coid_inst_data->_flags & MethodDesc::fLOG_CALL ) {
				*_coid_log << "  -->  ("; *_coid_log << ")";
				if( _coid_inst_data->_flags & MethodDesc::fLOG_DURATION )
					*_coid_log << " [" << (SINGLETON(HPTIMER).ftime() - _coid_example_ticks) * 1000 << "]";
				if( ! _coid_err_code ) *_coid_log << " .. ok" << EOM;
				else *_coid_log << " .. fail: " << opcd_formatter(_coid_err_code) << EOM;
			}
			
		} break;
		case StdDispatchMethod::AUTHENTIFY_SHARED: {
			_coid_bstr.acknowledge();
			_coid_bstr << _coid_err_code;
			return ersNOT_IMPLEMENTED;
		} break;
		case StdDispatchMethod::AUTHENTIFY_AUTO: {
			_coid_bstr.acknowledge();
			_coid_bstr << _coid_err_code;
			_coid_bstr.flush();
			return ersNOT_IMPLEMENTED;
		} break;
		case StdDispatchMethod::HANDLE_NET_LOOP: {
			return ersNOT_IMPLEMENTED;
		} break;
		case StdDispatchMethod::PREDESTRUCTOR: {
			_coid_bstr.acknowledge();
			_coid_bstr << _coid_err_code;
			_coid_bstr.flush();
			return ersNOT_IMPLEMENTED;
		} break;
		case StdDispatchMethod::COMMAND: {
			_coid_bstr.acknowledge();
			_coid_bstr << _coid_err_code;
			_coid_bstr.flush();
			return ersNOT_IMPLEMENTED;
		} break;
		case StdDispatchMethod::SPAWN: {
			_coid_bstr.acknowledge();
			_coid_bstr << _coid_err_code;
			_coid_bstr.flush();
			return ersNOT_IMPLEMENTED;
		} break;
		case StdDispatchMethod::ECHO: {
			_coid_bstr.acknowledge();
			_coid_bstr << _coid_err_code;
			_coid_bstr.flush();
			return ersNOT_IMPLEMENTED;
		} break;


		/// service-specific methods:
		case COID_example_read1_0: {
			if( (_coid_inst_data->_flags & (MethodDesc::fLOG_CALL | MethodDesc::fLOG_DURATION)) == (MethodDesc::fLOG_CALL | MethodDesc::fLOG_DURATION) )
				_coid_example_ticks = SINGLETON(HPTIMER).ftime();
			
			FOO_STRUCT list;

			if( _coid_inst_data->_flags & MethodDesc::fLOG_CALL ) {
				_coid_log = &_coid_inst_data->_cmdin->post_method();
				*_coid_log << "(" << COID_example_read1_0 << ") read1 ( "; *_coid_log << "?"; *_coid_log << " )";
			}

			_coid_bstr.acknowledge();

			_coid_err_code = _coid_example_obj->read1( list );
			_coid_bstr << _coid_err_code;
			if( ! _coid_err_code ) {
				_coid_bstr << list;
			}

			_coid_bstr.flush();

			if( _coid_inst_data->_flags & MethodDesc::fLOG_CALL ) {
				*_coid_log << "  -->  ("; *_coid_log << list; *_coid_log << ")";
				if( _coid_inst_data->_flags & MethodDesc::fLOG_DURATION )
					*_coid_log << " [" << (SINGLETON(HPTIMER).ftime() - _coid_example_ticks) * 1000 << "]";
				if( ! _coid_err_code ) *_coid_log << " .. ok" << EOM;
				else *_coid_log << " .. fail: " << opcd_formatter(_coid_err_code) << EOM;
			}
			
		} break;

		case COID_example_read2_1: {
			if( (_coid_inst_data->_flags & (MethodDesc::fLOG_CALL | MethodDesc::fLOG_DURATION)) == (MethodDesc::fLOG_CALL | MethodDesc::fLOG_DURATION) )
				_coid_example_ticks = SINGLETON(HPTIMER).ftime();
			
			FOO_STRUCT * list;

			if( _coid_inst_data->_flags & MethodDesc::fLOG_CALL ) {
				_coid_log = &_coid_inst_data->_cmdin->post_method();
				*_coid_log << "(" << COID_example_read2_1 << ") read2 ( "; *_coid_log << "?"; *_coid_log << " )";
			}

			_coid_bstr.acknowledge();

			_coid_err_code = _coid_example_obj->read2( list );
			_coid_bstr << _coid_err_code;
			if( ! _coid_err_code ) {
				_coid_bstr << *list;
			}

			_coid_bstr.flush();

			if( _coid_inst_data->_flags & MethodDesc::fLOG_CALL ) {
				*_coid_log << "  -->  ("; *_coid_log << *list; *_coid_log << ")";
				if( _coid_inst_data->_flags & MethodDesc::fLOG_DURATION )
					*_coid_log << " [" << (SINGLETON(HPTIMER).ftime() - _coid_example_ticks) * 1000 << "]";
				if( ! _coid_err_code ) *_coid_log << " .. ok" << EOM;
				else *_coid_log << " .. fail: " << opcd_formatter(_coid_err_code) << EOM;
			}
			
		} break;

		case COID_example_send_2: {
			if( (_coid_inst_data->_flags & (MethodDesc::fLOG_CALL | MethodDesc::fLOG_DURATION)) == (MethodDesc::fLOG_CALL | MethodDesc::fLOG_DURATION) )
				_coid_example_ticks = SINGLETON(HPTIMER).ftime();
			
			int ref;
			_coid_bstr >> ref;
			charstr command;
			_coid_bstr >> command;
			binstreambuf reply;

			if( _coid_inst_data->_flags & MethodDesc::fLOG_CALL ) {
				_coid_log = &_coid_inst_data->_cmdin->post_method();
				*_coid_log << "(" << COID_example_send_2 << ") send ( "; *_coid_log << ref; *_coid_log << ", "; *_coid_log << command; *_coid_log << ", "; *_coid_log << "?"; *_coid_log << " )";
			}

			_coid_bstr.acknowledge();

			_coid_err_code = _coid_example_obj->send( ref, command, reply );
			_coid_bstr << _coid_err_code;
			if( ! _coid_err_code ) {
				_coid_bstr << ref;
				_coid_bstr << reply;
			}

			_coid_bstr.flush();

			if( _coid_inst_data->_flags & MethodDesc::fLOG_CALL ) {
				*_coid_log << "  -->  ("; *_coid_log << ref; *_coid_log << ", "; *_coid_log << reply; *_coid_log << ")";
				if( _coid_inst_data->_flags & MethodDesc::fLOG_DURATION )
					*_coid_log << " [" << (SINGLETON(HPTIMER).ftime() - _coid_example_ticks) * 1000 << "]";
				if( ! _coid_err_code ) *_coid_log << " .. ok" << EOM;
				else *_coid_log << " .. fail: " << opcd_formatter(_coid_err_code) << EOM;
			}
			
		} break;

		case COID_example_remap_fnc_3: {
			if( (_coid_inst_data->_flags & (MethodDesc::fLOG_CALL | MethodDesc::fLOG_DURATION)) == (MethodDesc::fLOG_CALL | MethodDesc::fLOG_DURATION) )
				_coid_example_ticks = SINGLETON(HPTIMER).ftime();
			
			REMAP_EXAMPLE arg;

			if( _coid_inst_data->_flags & MethodDesc::fLOG_CALL ) {
				_coid_log = &_coid_inst_data->_cmdin->post_method();
				*_coid_log << "(" << COID_example_remap_fnc_3 << ") remap_fnc ( "; *_coid_log << "?"; *_coid_log << " )";
			}

			_coid_bstr.acknowledge();

			_coid_err_code = _coid_example_obj->remap_fnc( arg );
			_coid_bstr << _coid_err_code;
			if( ! _coid_err_code ) {
				_coid_bstr << arg;
			}

			_coid_bstr.flush();

			if( _coid_inst_data->_flags & MethodDesc::fLOG_CALL ) {
				*_coid_log << "  -->  ("; *_coid_log << arg; *_coid_log << ")";
				if( _coid_inst_data->_flags & MethodDesc::fLOG_DURATION )
					*_coid_log << " [" << (SINGLETON(HPTIMER).ftime() - _coid_example_ticks) * 1000 << "]";
				if( ! _coid_err_code ) *_coid_log << " .. ok" << EOM;
				else *_coid_log << " .. fail: " << opcd_formatter(_coid_err_code) << EOM;
			}
			
		} break;



		default:
			_coid_bstr.acknowledge( true );
			_coid_bstr << ersNOT_IMPLEMENTED;
			_coid_bstr.flush();
			return ersNOT_IMPLEMENTED;
		break;
	}



	return _coid_err_code;
}












/// method table
static METHOD_TABLE COID_example_method_table[] = {
	{"get_ptr", COID_example_get_ptr_4},
	{NULL, UMAX},
	{NULL, UMAX},
	{"remap_fnc", COID_example_remap_fnc_3},
	{"read2", COID_example_read2_1},
	{NULL, UMAX},
	{"send", COID_example_send_2},
	{"read1", COID_example_read1_0}
};



#define COID_dispatch_method_size		(sizeof(COID_example_method_table) / sizeof(METHOD_TABLE))



uint COID_example_0_0_get_method_id( const token & name )
{
	hash<token> mha;
	uint idx = mha(name) % COID_dispatch_method_size;

	for( ulong i=0; i<COID_dispatch_method_size; i++ ) {
		if( COID_example_method_table[idx].name )
			if( name == COID_example_method_table[idx].name )
				return COID_example_method_table[idx].id;
		idx++;
		if( idx == COID_dispatch_method_size ) idx = 0;
	}

	return UMAX;
}


} // namespace coid