/*
 * This file was generated by orbit-idl - DO NOT EDIT!
 */

#include <string.h>
#include "test-ir.h"
#define GET_ATOM(x) G_STMT_START{ GIOP_RECV_BUFFER(_ORBIT_recv_buffer)->decoder(&x, (GIOP_RECV_BUFFER(_ORBIT_recv_buffer)->cur), sizeof(x)); ((guchar *)GIOP_RECV_BUFFER(_ORBIT_recv_buffer)->cur) += sizeof(x); }G_STMT_END

/***************** Begin module Test ***************/

static void
skel_Test_Inter__get_a1(POA_Test_Inter * _ORBIT_servant,
			GIOPRecvBuffer * _ORBIT_recv_buffer,
			CORBA_Environment * ev,
		 CORBA_long(*_impl__get_a1) (PortableServer_Servant servant,
					     CORBA_Environment * ev))
{
   CORBA_long _ORBIT_retval;
   GIOPSendBuffer *_ORBIT_send_buffer;

   _ORBIT_retval = _impl__get_a1(_ORBIT_servant, ev);
   _ORBIT_send_buffer =
      giop_send_reply_buffer_use(GIOP_MESSAGE_BUFFER(_ORBIT_recv_buffer)->connection, NULL,
			   _ORBIT_recv_buffer->message.u.request.request_id,
				 ev->_major);

   if (ev->_major == CORBA_NO_EXCEPTION) {
      /* marshal return value */
      giop_message_buffer_do_alignment(GIOP_MESSAGE_BUFFER(_ORBIT_send_buffer), 4);
      giop_message_buffer_append_mem(GIOP_MESSAGE_BUFFER(_ORBIT_send_buffer), &_ORBIT_retval, sizeof(_ORBIT_retval));
   } else if (ev->_major == CORBA_SYSTEM_EXCEPTION)
      ORBit_send_system_exception(_ORBIT_send_buffer, ev);
   else if (ev->_major == CORBA_USER_EXCEPTION)
      ORBit_send_user_exception(_ORBIT_send_buffer, ev, NULL);
   giop_send_buffer_write(_ORBIT_send_buffer);
   giop_send_buffer_unuse(_ORBIT_send_buffer);
}

static void
skel_Test_Inter__set_a1(POA_Test_Inter * _ORBIT_servant,
			GIOPRecvBuffer * _ORBIT_recv_buffer,
			CORBA_Environment * ev,
		      void (*_impl__set_a1) (PortableServer_Servant servant,
					     const CORBA_long value,
					     CORBA_Environment * ev))
{
   CORBA_long value;
   GIOPSendBuffer *_ORBIT_send_buffer;

   if (giop_msg_conversion_needed(GIOP_MESSAGE_BUFFER(_ORBIT_recv_buffer))) {

      /* demarshal parameter value */
      GIOP_RECV_BUFFER(_ORBIT_recv_buffer)->cur = ALIGN_ADDRESS(GIOP_RECV_BUFFER(_ORBIT_recv_buffer)->cur, 4);
      GET_ATOM(value);
   } else {

      /* demarshal parameter value */
      GIOP_RECV_BUFFER(_ORBIT_recv_buffer)->cur = ALIGN_ADDRESS(GIOP_RECV_BUFFER(_ORBIT_recv_buffer)->cur, 4);
      value = *((CORBA_long *) GIOP_RECV_BUFFER(_ORBIT_recv_buffer)->cur);
      ((char *) GIOP_RECV_BUFFER(_ORBIT_recv_buffer)->cur) += sizeof(CORBA_long);
   }

   _impl__set_a1(_ORBIT_servant, value,
		 ev);
   _ORBIT_send_buffer =
      giop_send_reply_buffer_use(GIOP_MESSAGE_BUFFER(_ORBIT_recv_buffer)->connection, NULL,
			   _ORBIT_recv_buffer->message.u.request.request_id,
				 ev->_major);

   if (ev->_major == CORBA_NO_EXCEPTION) {
   } else if (ev->_major == CORBA_SYSTEM_EXCEPTION)
      ORBit_send_system_exception(_ORBIT_send_buffer, ev);
   else if (ev->_major == CORBA_USER_EXCEPTION)
      ORBit_send_user_exception(_ORBIT_send_buffer, ev, NULL);
   giop_send_buffer_write(_ORBIT_send_buffer);
   giop_send_buffer_unuse(_ORBIT_send_buffer);
}

static void
skel_Test_Inter__get_a2(POA_Test_Inter * _ORBIT_servant,
			GIOPRecvBuffer * _ORBIT_recv_buffer,
			CORBA_Environment * ev,
		 CORBA_long(*_impl__get_a2) (PortableServer_Servant servant,
					     CORBA_Environment * ev))
{
   CORBA_long _ORBIT_retval;
   GIOPSendBuffer *_ORBIT_send_buffer;

   _ORBIT_retval = _impl__get_a2(_ORBIT_servant, ev);
   _ORBIT_send_buffer =
      giop_send_reply_buffer_use(GIOP_MESSAGE_BUFFER(_ORBIT_recv_buffer)->connection, NULL,
			   _ORBIT_recv_buffer->message.u.request.request_id,
				 ev->_major);

   if (ev->_major == CORBA_NO_EXCEPTION) {
      /* marshal return value */
      giop_message_buffer_do_alignment(GIOP_MESSAGE_BUFFER(_ORBIT_send_buffer), 4);
      giop_message_buffer_append_mem(GIOP_MESSAGE_BUFFER(_ORBIT_send_buffer), &_ORBIT_retval, sizeof(_ORBIT_retval));
   } else if (ev->_major == CORBA_SYSTEM_EXCEPTION)
      ORBit_send_system_exception(_ORBIT_send_buffer, ev);
   else if (ev->_major == CORBA_USER_EXCEPTION)
      ORBit_send_user_exception(_ORBIT_send_buffer, ev, NULL);
   giop_send_buffer_write(_ORBIT_send_buffer);
   giop_send_buffer_unuse(_ORBIT_send_buffer);
}

static void
skel_Test_Inter_method1(POA_Test_Inter * _ORBIT_servant,
			GIOPRecvBuffer * _ORBIT_recv_buffer,
			CORBA_Environment * ev,
		 CORBA_long(*_impl_method1) (PortableServer_Servant servant,
					     const CORBA_long arg1,
					     CORBA_long * arg2,
					     CORBA_Environment * ev))
{
   CORBA_long arg1;
   CORBA_long arg2;
   CORBA_long _ORBIT_retval;
   GIOPSendBuffer *_ORBIT_send_buffer;

   if (giop_msg_conversion_needed(GIOP_MESSAGE_BUFFER(_ORBIT_recv_buffer))) {

      /* demarshal parameter arg1 */
      GIOP_RECV_BUFFER(_ORBIT_recv_buffer)->cur = ALIGN_ADDRESS(GIOP_RECV_BUFFER(_ORBIT_recv_buffer)->cur, 4);
      GET_ATOM(arg1);
   } else {

      /* demarshal parameter arg1 */
      GIOP_RECV_BUFFER(_ORBIT_recv_buffer)->cur = ALIGN_ADDRESS(GIOP_RECV_BUFFER(_ORBIT_recv_buffer)->cur, 4);
      arg1 = *((CORBA_long *) GIOP_RECV_BUFFER(_ORBIT_recv_buffer)->cur);
      ((char *) GIOP_RECV_BUFFER(_ORBIT_recv_buffer)->cur) += sizeof(CORBA_long);
   }

   _ORBIT_retval = _impl_method1(_ORBIT_servant, arg1,
				 &(arg2),
				 ev);
   _ORBIT_send_buffer =
      giop_send_reply_buffer_use(GIOP_MESSAGE_BUFFER(_ORBIT_recv_buffer)->connection, NULL,
			   _ORBIT_recv_buffer->message.u.request.request_id,
				 ev->_major);

   if (ev->_major == CORBA_NO_EXCEPTION) {
      /* marshal return value */
      giop_message_buffer_do_alignment(GIOP_MESSAGE_BUFFER(_ORBIT_send_buffer), 4);
      giop_message_buffer_append_mem(GIOP_MESSAGE_BUFFER(_ORBIT_send_buffer), &_ORBIT_retval, sizeof(_ORBIT_retval));
      /* marshal parameter arg2 */
      giop_message_buffer_append_mem(GIOP_MESSAGE_BUFFER(_ORBIT_send_buffer), &arg2, sizeof(arg2));
   } else if (ev->_major == CORBA_SYSTEM_EXCEPTION)
      ORBit_send_system_exception(_ORBIT_send_buffer, ev);
   else if (ev->_major == CORBA_USER_EXCEPTION)
      ORBit_send_user_exception(_ORBIT_send_buffer, ev, NULL);
   giop_send_buffer_write(_ORBIT_send_buffer);
   giop_send_buffer_unuse(_ORBIT_send_buffer);
}

static ORBitSkeleton 
get_skel_Test_Inter(POA_Test_Inter * servant,
		    GIOPRecvBuffer * _ORBIT_recv_buffer,
		    gpointer * impl)
{
   gchar *opname = _ORBIT_recv_buffer->message.u.request.operation;

   switch (opname[0]) {
     case '_':
	switch (opname[1]) {
	  case 'g':
	     switch (opname[2]) {
	       case 'e':
		  switch (opname[3]) {
		    case 't':
		       switch (opname[4]) {
			 case '_':
			    switch (opname[5]) {
			      case 'a':
				 switch (opname[6]) {
				   case '1':
				      *impl = servant->vepv->Test_Inter_epv->_get_a1;
				      return (gpointer) skel_Test_Inter__get_a1;
				      break;
				   case '2':
				      *impl = servant->vepv->Test_Inter_epv->_get_a2;
				      return (gpointer) skel_Test_Inter__get_a2;
				      break;
				   default:
				      return NULL;
				 }
				 break;
			      default:
				 return NULL;
			    }
			    break;
			 default:
			    return NULL;
		       }
		       break;
		    default:
		       return NULL;
		  }
		  break;
	       default:
		  return NULL;
	     }
	     break;
	  case 's':
	     *impl = servant->vepv->Test_Inter_epv->_set_a1;
	     return (gpointer) skel_Test_Inter__set_a1;
	     break;
	  default:
	     return NULL;
	}
	break;
     case 'm':
	*impl = servant->vepv->Test_Inter_epv->method1;
	return (gpointer) skel_Test_Inter_method1;
	break;
     default:
	return NULL;
   }
}

static void 
init_local_objref_Test_Inter(CORBA_Object obj, POA_Test_Inter * servant)
{
   obj->vepv[Test_Inter__classid] = servant->vepv->Test_Inter_epv;
}

void 
POA_Test_Inter__init(POA_Test_Inter * servant,
		     CORBA_Environment * env)
{
   static const PortableServer_ClassInfo class_info =
   {(gpointer) & get_skel_Test_Inter, "IDL:Test/Inter:1.0", (gpointer) & init_local_objref_Test_Inter};

   PortableServer_ServantBase__init(((PortableServer_ServantBase *) servant), env);
   ORBIT_OBJECT_KEY(servant->_private)->class_info = (PortableServer_ClassInfo *) & class_info;
   if (!Test_Inter__classid)
      Test_Inter__classid = ORBit_register_class(&class_info);
}

void 
POA_Test_Inter__fini(POA_Test_Inter * servant,
		     CORBA_Environment * env)
{
   PortableServer_ServantBase__fini(servant, env);
}

/***************** End module Test ***************/