Book a Demo!
CoCalc Logo Icon
StoreFeaturesDocsShareSupportNewsAboutPoliciesSign UpSign In
BitchX
GitHub Repository: BitchX/BitchX1.3
 Path: blob/master/dll/europa/corba/orbit/europa-stubs.c
1074 views
1
/*

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

3
 */

4


5
#include <string.h>

6
#include "europa.h"

7


8
void

9
EuropaAI_Europa_inputChat(EuropaAI_Europa _obj, CORBA_char * text,

10
			  CORBA_Environment * ev)

11
{

12
   register GIOP_unsigned_long _ORBIT_request_id,

13
    _ORBIT_system_exception_minor;

14
   register CORBA_completion_status _ORBIT_completion_status;

15
   register GIOPSendBuffer *_ORBIT_send_buffer;

16
   register GIOPRecvBuffer *_ORBIT_recv_buffer;

17
   register GIOPConnection *_cnx;

18


19
   if (_obj->servant && _obj->vepv && EuropaAI_Europa__classid) {

20
      

21
	 ((POA_EuropaAI_Europa__epv *) _obj->vepv[EuropaAI_Europa__classid])->

22
	 inputChat(_obj->servant, text, ev);

23
      return;

24
   }

25
   _cnx = ORBit_object_get_connection(_obj);

26
 _ORBIT_retry_request:

27
   _ORBIT_send_buffer = NULL;

28
   _ORBIT_recv_buffer = NULL;

29
   _ORBIT_completion_status = CORBA_COMPLETED_NO;

30
   _ORBIT_request_id = GPOINTER_TO_UINT(alloca(0));

31
   {				/* marshalling */

32
      static const struct

33
      {

34
	 CORBA_unsigned_long len;

35
	 char opname[10];

36
      }

37
      _ORBIT_operation_name_data =

38
      {

39
      10, "inputChat"};

40
      static const struct iovec _ORBIT_operation_vec =

41
	 { (gpointer) & _ORBIT_operation_name_data, 14 };

42
      register CORBA_unsigned_long _ORBIT_tmpvar_0;

43
      CORBA_unsigned_long _ORBIT_tmpvar_1;

44


45
      _ORBIT_send_buffer =

46
	 giop_send_request_buffer_use(_cnx, NULL, _ORBIT_request_id,

47
				      CORBA_TRUE,

48
				      &(_obj->active_profile->object_key_vec),

49
				      &_ORBIT_operation_vec,

50
				      &ORBit_default_principal_iovec);

51


52
      _ORBIT_system_exception_minor = ex_CORBA_COMM_FAILURE;

53
      if (!_ORBIT_send_buffer)

54
	 goto _ORBIT_system_exception;

55
      _ORBIT_tmpvar_1 = strlen(text) + 1;

56
      giop_message_buffer_do_alignment(GIOP_MESSAGE_BUFFER

57
				       (_ORBIT_send_buffer), 4);

58
      {

59
	 guchar *_ORBIT_t;

60


61
	 _ORBIT_t = alloca(sizeof(_ORBIT_tmpvar_1));

62
	 memcpy(_ORBIT_t, &(_ORBIT_tmpvar_1), sizeof(_ORBIT_tmpvar_1));

63
	 giop_message_buffer_append_mem(GIOP_MESSAGE_BUFFER

64
					(_ORBIT_send_buffer), (_ORBIT_t),

65
					sizeof(_ORBIT_tmpvar_1));

66
      }

67
      giop_message_buffer_append_mem(GIOP_MESSAGE_BUFFER(_ORBIT_send_buffer),

68
				     (text),

69
				     sizeof(text[_ORBIT_tmpvar_0]) *

70
				     _ORBIT_tmpvar_1);

71
      giop_send_buffer_write(_ORBIT_send_buffer);

72
      _ORBIT_completion_status = CORBA_COMPLETED_MAYBE;

73
      giop_send_buffer_unuse(_ORBIT_send_buffer);

74
      _ORBIT_send_buffer = NULL;

75
   }

76
   {				/* demarshalling */

77
      register guchar *_ORBIT_curptr;

78


79
      _ORBIT_recv_buffer =

80
	 giop_recv_reply_buffer_use_2(_cnx, _ORBIT_request_id, TRUE);

81
      if (!_ORBIT_recv_buffer)

82
	 goto _ORBIT_system_exception;

83
      _ORBIT_completion_status = CORBA_COMPLETED_YES;

84
      if (_ORBIT_recv_buffer->message.u.reply.reply_status !=

85
	  GIOP_NO_EXCEPTION) goto _ORBIT_msg_exception;

86
      _ORBIT_curptr = GIOP_RECV_BUFFER(_ORBIT_recv_buffer)->cur;

87
      if (giop_msg_conversion_needed(GIOP_MESSAGE_BUFFER(_ORBIT_recv_buffer))) {

88
      } else {

89
      }

90
      giop_recv_buffer_unuse(_ORBIT_recv_buffer);

91
      return;

92
    _ORBIT_system_exception:

93
      CORBA_exception_set_system(ev, _ORBIT_system_exception_minor,

94
				 _ORBIT_completion_status);

95
      giop_recv_buffer_unuse(_ORBIT_recv_buffer);

96
      giop_send_buffer_unuse(_ORBIT_send_buffer);

97
      return;

98
    _ORBIT_msg_exception:

99
      if (_ORBIT_recv_buffer->message.u.reply.reply_status ==

100
	  GIOP_LOCATION_FORWARD) {

101
	 if (_obj->forward_locations != NULL)

102
	    ORBit_delete_profiles(_obj->forward_locations);

103
	 _obj->forward_locations = ORBit_demarshal_IOR(_ORBIT_recv_buffer);

104
	 _cnx = ORBit_object_get_forwarded_connection(_obj);

105
	 giop_recv_buffer_unuse(_ORBIT_recv_buffer);

106


107
	 goto _ORBIT_retry_request;

108
      } else {

109
	 ORBit_handle_exception(_ORBIT_recv_buffer, ev, NULL, _obj->orb);

110
	 giop_recv_buffer_unuse(_ORBIT_recv_buffer);

111
	 return;

112
      }

113
   }

114
}

115


116