diff options
Diffstat (limited to 'TAO/tao/IFR_Client/InterfaceC.cpp')
| -rw-r--r-- | TAO/tao/IFR_Client/InterfaceC.cpp | 36835 |
1 files changed, 6318 insertions, 30517 deletions
diff --git a/TAO/tao/IFR_Client/InterfaceC.cpp b/TAO/tao/IFR_Client/InterfaceC.cpp index 5aa837936cc..b2ad0857da3 100644 --- a/TAO/tao/IFR_Client/InterfaceC.cpp +++ b/TAO/tao/IFR_Client/InterfaceC.cpp @@ -23,12 +23,6 @@ #include "tao/Stub.h" #include "tao/Invocation.h" -// The Following header must remain visible since it contains the -// "TAO_INTERCEPTOR" macros. Note that this won't cause problems when -// portable interceptor support is disabled since those macros are -// always visible, too. -#include "tao/PortableInterceptor.h" - #if TAO_HAS_INTERCEPTORS == 1 #include "tao/RequestInfo_Util.h" #endif /* TAO_HAS_INTERCEPTORS == 1 */ @@ -125,136 +119,46 @@ IR_DefinitionKind _TAO_IRObject_Remote_Proxy_Impl::def_kind ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - CORBA_IRObject::TAO_ClientRequestInfo_CORBA_IRObject_def_kind_get ri ( - &_tao_call, - _collocated_tao_target_, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (_tao_retval); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (_tao_retval); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (_tao_retval); + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (_tao_retval); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), + _tao_retval ); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - _tao_retval - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_retval) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_retval) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), _tao_retval ); - - } - - TAO_INTERCEPTOR ( - IR_DefinitionKind _tao_retval_info = _tao_retval; - ri.result (_tao_retval_info); - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (_tao_retval); - -#endif /* TAO_HAS_INTERCEPTORS */ - - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } + } + break; + } return _tao_retval; } @@ -279,120 +183,36 @@ void _TAO_IRObject_Remote_Proxy_Impl::destroy ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - CORBA_IRObject::TAO_ClientRequestInfo_CORBA_IRObject_destroy ri ( - &_tao_call, - _collocated_tao_target_, - ACE_TRY_ENV - ); - ACE_CHECK; - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK; - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK; - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) - ); - - } - - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK; - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK; + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), ACE_TRY_ENV ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK; - -#endif /* TAO_HAS_INTERCEPTORS */ - - if (_invoke_status == TAO_INVOKE_RESTART) + ACE_CHECK; + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK; + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) { - _tao_call.restart_flag (1); - continue; + ACE_THROW ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) + ); } - - break; - } - + + break; + } } @@ -413,17 +233,13 @@ _TAO_IRObject_Proxy_Broker::~_TAO_IRObject_Proxy_Broker (void) { } -_TAO_IRObject_Proxy_Broker * (*_TAO_IRObject_Proxy_Broker_Factory_function_pointer) ( - CORBA::Object_ptr obj - ) = 0; - -// Factory Member function Implementation. -_TAO_IRObject_Remote_Proxy_Broker * -_TAO_IRObject_Remote_Proxy_Broker::the_TAO_IRObject_Remote_Proxy_Broker (void) +// Factory function Implementation. +_TAO_IRObject_Remote_Proxy_Broker *the_TAO_IRObject_Remote_Proxy_Broker (void) { static ::_TAO_IRObject_Remote_Proxy_Broker remote_proxy_broker; return &remote_proxy_broker; } + _TAO_IRObject_Remote_Proxy_Broker::_TAO_IRObject_Remote_Proxy_Broker (void) { } @@ -452,7 +268,7 @@ _TAO_IRObject_Remote_Proxy_Broker::select_proxy ( // default constructor CORBA_IRObject::CORBA_IRObject (int collocated) { - this->CORBA_IRObject_setup_collocation (collocated); + this->_tao_setup_collocation (collocated); } // destructor @@ -460,14 +276,16 @@ CORBA_IRObject::~CORBA_IRObject (void) {} void -CORBA_IRObject::CORBA_IRObject_setup_collocation (int collocated) +CORBA_IRObject::_tao_setup_collocation (int collocated) { if (collocated) this->the_TAO_IRObject_Proxy_Broker_ = _TAO_IRObject_Proxy_Broker_Factory_function_pointer (this); else this->the_TAO_IRObject_Proxy_Broker_ = - _TAO_IRObject_Remote_Proxy_Broker::the_TAO_IRObject_Remote_Proxy_Broker (); + the_TAO_IRObject_Remote_Proxy_Broker (); + + } void CORBA_IRObject::_tao_any_destructor (void *x) @@ -609,111 +427,6 @@ void CORBA_IRObject::destroy ( ); } -#if (TAO_HAS_INTERCEPTORS == 1) -CORBA_IRObject::TAO_ClientRequestInfo_CORBA_IRObject_def_kind_get::TAO_ClientRequestInfo_CORBA_IRObject_def_kind_get ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target) -{} - -Dynamic::ParameterList * -CORBA_IRObject::TAO_ClientRequestInfo_CORBA_IRObject_def_kind_get::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return parameter_list; -} - -Dynamic::ExceptionList * -CORBA_IRObject::TAO_ClientRequestInfo_CORBA_IRObject_def_kind_get::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -CORBA_IRObject::TAO_ClientRequestInfo_CORBA_IRObject_def_kind_get::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -CORBA_IRObject::TAO_ClientRequestInfo_CORBA_IRObject_def_kind_get::result (IR_DefinitionKind result) -{ - // update the result - this->_result = result; -} - -CORBA_IRObject::TAO_ClientRequestInfo_CORBA_IRObject_destroy::TAO_ClientRequestInfo_CORBA_IRObject_destroy ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target) -{} - -Dynamic::ParameterList * -CORBA_IRObject::TAO_ClientRequestInfo_CORBA_IRObject_destroy::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return parameter_list; -} - -Dynamic::ExceptionList * -CORBA_IRObject::TAO_ClientRequestInfo_CORBA_IRObject_destroy::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -CORBA_IRObject::TAO_ClientRequestInfo_CORBA_IRObject_destroy::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 1; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return result_any; -} - -#endif /* TAO_HAS_INTERCEPTORS */ - static const CORBA::Long _oc_IR_Identifier[] = { TAO_ENCAP_BYTE_ORDER, // byte order @@ -748,7 +461,6 @@ static const CORBA::Long _oc_IR_ScopedName[] = 0U, // string length }; - static CORBA::TypeCode _tc_TAO_tc_IR_ScopedName (CORBA::tk_alias, sizeof (_oc_IR_ScopedName), (char *) &_oc_IR_ScopedName, 0, sizeof (IR::ScopedName)); TAO_NAMESPACE_TYPE (CORBA::TypeCode_ptr) TAO_NAMESPACE_BEGIN (IR) @@ -826,137 +538,46 @@ char * _TAO_Contained_Remote_Proxy_Impl::id ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_Contained::TAO_ClientRequestInfo_IR_Contained_id_get ri ( - &_tao_call, - _collocated_tao_target_, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), + 0 ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - char * _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ - - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } + } + break; + } return _tao_safe_retval._retn (); } @@ -982,130 +603,45 @@ void _TAO_Contained_Remote_Proxy_Impl::id ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_Contained::TAO_ClientRequestInfo_IR_Contained_id_set ri ( - &_tao_call, - _collocated_tao_target_, - id, - ACE_TRY_ENV - ); - ACE_CHECK; - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK; - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK; - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << id) - )) - TAO_INTERCEPTOR_THROW ( - CORBA::MARSHAL () - ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) - ); - - } - - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK; - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK; + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), ACE_TRY_ENV ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV + ACE_CHECK; + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << id) + )) + ACE_THROW ( + CORBA::MARSHAL () ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK; -#endif /* TAO_HAS_INTERCEPTORS */ - - if (_invoke_status == TAO_INVOKE_RESTART) + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK; + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) { - _tao_call.restart_flag (1); - continue; + ACE_THROW ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) + ); } - - break; - } - + + break; + } } char * _TAO_Contained_Remote_Proxy_Impl::name ( @@ -1131,137 +667,46 @@ char * _TAO_Contained_Remote_Proxy_Impl::name ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_Contained::TAO_ClientRequestInfo_IR_Contained_name_get ri ( - &_tao_call, - _collocated_tao_target_, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), + 0 ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - char * _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ - - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } + } + break; + } return _tao_safe_retval._retn (); } @@ -1287,130 +732,45 @@ void _TAO_Contained_Remote_Proxy_Impl::name ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_Contained::TAO_ClientRequestInfo_IR_Contained_name_set ri ( - &_tao_call, - _collocated_tao_target_, - name, - ACE_TRY_ENV - ); - ACE_CHECK; - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK; - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK; - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << name) - )) - TAO_INTERCEPTOR_THROW ( - CORBA::MARSHAL () - ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) - ); - - } - - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK; - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK; + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), ACE_TRY_ENV ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV + ACE_CHECK; + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << name) + )) + ACE_THROW ( + CORBA::MARSHAL () ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK; -#endif /* TAO_HAS_INTERCEPTORS */ - - if (_invoke_status == TAO_INVOKE_RESTART) + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK; + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) { - _tao_call.restart_flag (1); - continue; + ACE_THROW ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) + ); } - - break; - } - + + break; + } } char * _TAO_Contained_Remote_Proxy_Impl::version ( @@ -1438,137 +798,46 @@ char * _TAO_Contained_Remote_Proxy_Impl::version ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_Contained::TAO_ClientRequestInfo_IR_Contained_version_get ri ( - &_tao_call, - _collocated_tao_target_, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), + 0 ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - char * _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ - - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } + } + break; + } return _tao_safe_retval._retn (); } @@ -1593,130 +862,45 @@ void _TAO_Contained_Remote_Proxy_Impl::version ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_Contained::TAO_ClientRequestInfo_IR_Contained_version_set ri ( - &_tao_call, - _collocated_tao_target_, - version, - ACE_TRY_ENV - ); - ACE_CHECK; - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK; - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK; - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << version) - )) - TAO_INTERCEPTOR_THROW ( - CORBA::MARSHAL () - ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) - ); - - } - - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK; - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK; + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), ACE_TRY_ENV ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV + ACE_CHECK; + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << version) + )) + ACE_THROW ( + CORBA::MARSHAL () ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK; -#endif /* TAO_HAS_INTERCEPTORS */ - - if (_invoke_status == TAO_INVOKE_RESTART) + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK; + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) { - _tao_call.restart_flag (1); - continue; + ACE_THROW ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) + ); } - - break; - } - + + break; + } } IR_Container_ptr _TAO_Contained_Remote_Proxy_Impl::defined_in ( @@ -1743,137 +927,46 @@ IR_Container_ptr _TAO_Contained_Remote_Proxy_Impl::defined_in ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_Contained::TAO_ClientRequestInfo_IR_Contained_defined_in_get ri ( - &_tao_call, - _collocated_tao_target_, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), + 0 ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - IR_Container_ptr _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ - - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } + } + break; + } return _tao_safe_retval._retn (); } @@ -1899,137 +992,46 @@ char * _TAO_Contained_Remote_Proxy_Impl::absolute_name ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_Contained::TAO_ClientRequestInfo_IR_Contained_absolute_name_get ri ( - &_tao_call, - _collocated_tao_target_, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), + 0 ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - char * _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ - - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } + } + break; + } return _tao_safe_retval._retn (); } @@ -2056,137 +1058,46 @@ IR_Repository_ptr _TAO_Contained_Remote_Proxy_Impl::containing_repository ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_Contained::TAO_ClientRequestInfo_IR_Contained_containing_repository_get ri ( - &_tao_call, - _collocated_tao_target_, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), + 0 ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - IR_Repository_ptr _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ - - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } + } + break; + } return _tao_safe_retval._retn (); } @@ -2214,137 +1125,46 @@ IR_Contained::Description * _TAO_Contained_Remote_Proxy_Impl::describe ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_Contained::TAO_ClientRequestInfo_IR_Contained_describe ri ( - &_tao_call, - _collocated_tao_target_, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), + 0 ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - IR_Contained::Description * _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ - - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } + } + break; + } return _tao_safe_retval._retn (); } @@ -2371,134 +1191,47 @@ void _TAO_Contained_Remote_Proxy_Impl::move ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_Contained::TAO_ClientRequestInfo_IR_Contained_move ri ( - &_tao_call, - _collocated_tao_target_, - new_container, - new_name, - new_version, - ACE_TRY_ENV - ); - ACE_CHECK; - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK; - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK; - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << new_container) && - (_tao_out << new_name) && - (_tao_out << new_version) - )) - TAO_INTERCEPTOR_THROW ( - CORBA::MARSHAL () - ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) - ); - - } - - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK; - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK; + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), ACE_TRY_ENV ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV + ACE_CHECK; + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << new_container) && + (_tao_out << new_name) && + (_tao_out << new_version) + )) + ACE_THROW ( + CORBA::MARSHAL () ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK; -#endif /* TAO_HAS_INTERCEPTORS */ - - if (_invoke_status == TAO_INVOKE_RESTART) + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK; + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) { - _tao_call.restart_flag (1); - continue; + ACE_THROW ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) + ); } - - break; - } - + + break; + } } @@ -2519,13 +1252,8 @@ _TAO_Contained_Proxy_Broker::~_TAO_Contained_Proxy_Broker (void) { } -_TAO_Contained_Proxy_Broker * (*_TAO_Contained_Proxy_Broker_Factory_function_pointer) ( - CORBA::Object_ptr obj - ) = 0; - -// Factory Member function Implementation. -_TAO_Contained_Remote_Proxy_Broker * -_TAO_Contained_Remote_Proxy_Broker::the_TAO_Contained_Remote_Proxy_Broker (void) +// Factory function Implementation. +_TAO_Contained_Remote_Proxy_Broker *the_TAO_Contained_Remote_Proxy_Broker (void) { static ::_TAO_Contained_Remote_Proxy_Broker remote_proxy_broker; return &remote_proxy_broker; @@ -2559,7 +1287,7 @@ _TAO_Contained_Remote_Proxy_Broker::select_proxy ( // default constructor IR_Contained::IR_Contained (int collocated) { - this->IR_Contained_setup_collocation (collocated); + this->_tao_setup_collocation (collocated); } // destructor @@ -2567,16 +1295,16 @@ IR_Contained::~IR_Contained (void) {} void -IR_Contained::IR_Contained_setup_collocation (int collocated) +IR_Contained::_tao_setup_collocation (int collocated) { if (collocated) this->the_TAO_Contained_Proxy_Broker_ = _TAO_Contained_Proxy_Broker_Factory_function_pointer (this); else this->the_TAO_Contained_Proxy_Broker_ = - _TAO_Contained_Remote_Proxy_Broker::the_TAO_Contained_Remote_Proxy_Broker (); + ::the_TAO_Contained_Remote_Proxy_Broker (); - this->CORBA_IRObject_setup_collocation (collocated); + CORBA_IRObject::_tao_setup_collocation (collocated); } void IR_Contained::_tao_any_destructor (void *x) @@ -2920,636 +1648,6 @@ void IR_Contained::move ( ); } -#if (TAO_HAS_INTERCEPTORS == 1) -IR_Contained::TAO_ClientRequestInfo_IR_Contained_id_get::TAO_ClientRequestInfo_IR_Contained_id_get ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target) -{} - -Dynamic::ParameterList * -IR_Contained::TAO_ClientRequestInfo_IR_Contained_id_get::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return parameter_list; -} - -Dynamic::ExceptionList * -IR_Contained::TAO_ClientRequestInfo_IR_Contained_id_get::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_Contained::TAO_ClientRequestInfo_IR_Contained_id_get::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_Contained::TAO_ClientRequestInfo_IR_Contained_id_get::result (char * result) -{ - // update the result - this->_result = result; -} - -IR_Contained::TAO_ClientRequestInfo_IR_Contained_id_set::TAO_ClientRequestInfo_IR_Contained_id_set ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - const char * id, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - id_ (id) -{} - -Dynamic::ParameterList * -IR_Contained::TAO_ClientRequestInfo_IR_Contained_id_set::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_id = parameter_list->length (); - parameter_list->length (length_id + 1); - (*parameter_list)[length_id].argument <<= id_; - (*parameter_list)[length_id].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_Contained::TAO_ClientRequestInfo_IR_Contained_id_set::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_Contained::TAO_ClientRequestInfo_IR_Contained_id_set::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 1; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return result_any; -} - -IR_Contained::TAO_ClientRequestInfo_IR_Contained_name_get::TAO_ClientRequestInfo_IR_Contained_name_get ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target) -{} - -Dynamic::ParameterList * -IR_Contained::TAO_ClientRequestInfo_IR_Contained_name_get::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return parameter_list; -} - -Dynamic::ExceptionList * -IR_Contained::TAO_ClientRequestInfo_IR_Contained_name_get::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_Contained::TAO_ClientRequestInfo_IR_Contained_name_get::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_Contained::TAO_ClientRequestInfo_IR_Contained_name_get::result (char * result) -{ - // update the result - this->_result = result; -} - -IR_Contained::TAO_ClientRequestInfo_IR_Contained_name_set::TAO_ClientRequestInfo_IR_Contained_name_set ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - const char * name, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - name_ (name) -{} - -Dynamic::ParameterList * -IR_Contained::TAO_ClientRequestInfo_IR_Contained_name_set::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_name = parameter_list->length (); - parameter_list->length (length_name + 1); - (*parameter_list)[length_name].argument <<= name_; - (*parameter_list)[length_name].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_Contained::TAO_ClientRequestInfo_IR_Contained_name_set::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_Contained::TAO_ClientRequestInfo_IR_Contained_name_set::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 1; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return result_any; -} - -IR_Contained::TAO_ClientRequestInfo_IR_Contained_version_get::TAO_ClientRequestInfo_IR_Contained_version_get ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target) -{} - -Dynamic::ParameterList * -IR_Contained::TAO_ClientRequestInfo_IR_Contained_version_get::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return parameter_list; -} - -Dynamic::ExceptionList * -IR_Contained::TAO_ClientRequestInfo_IR_Contained_version_get::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_Contained::TAO_ClientRequestInfo_IR_Contained_version_get::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_Contained::TAO_ClientRequestInfo_IR_Contained_version_get::result (char * result) -{ - // update the result - this->_result = result; -} - -IR_Contained::TAO_ClientRequestInfo_IR_Contained_version_set::TAO_ClientRequestInfo_IR_Contained_version_set ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - const char * version, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - version_ (version) -{} - -Dynamic::ParameterList * -IR_Contained::TAO_ClientRequestInfo_IR_Contained_version_set::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_version = parameter_list->length (); - parameter_list->length (length_version + 1); - (*parameter_list)[length_version].argument <<= version_; - (*parameter_list)[length_version].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_Contained::TAO_ClientRequestInfo_IR_Contained_version_set::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_Contained::TAO_ClientRequestInfo_IR_Contained_version_set::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 1; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return result_any; -} - -IR_Contained::TAO_ClientRequestInfo_IR_Contained_defined_in_get::TAO_ClientRequestInfo_IR_Contained_defined_in_get ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target) -{} - -Dynamic::ParameterList * -IR_Contained::TAO_ClientRequestInfo_IR_Contained_defined_in_get::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return parameter_list; -} - -Dynamic::ExceptionList * -IR_Contained::TAO_ClientRequestInfo_IR_Contained_defined_in_get::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_Contained::TAO_ClientRequestInfo_IR_Contained_defined_in_get::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_Contained::TAO_ClientRequestInfo_IR_Contained_defined_in_get::result (IR_Container_ptr result) -{ - // update the result - this->_result = result; -} - -IR_Contained::TAO_ClientRequestInfo_IR_Contained_absolute_name_get::TAO_ClientRequestInfo_IR_Contained_absolute_name_get ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target) -{} - -Dynamic::ParameterList * -IR_Contained::TAO_ClientRequestInfo_IR_Contained_absolute_name_get::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return parameter_list; -} - -Dynamic::ExceptionList * -IR_Contained::TAO_ClientRequestInfo_IR_Contained_absolute_name_get::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_Contained::TAO_ClientRequestInfo_IR_Contained_absolute_name_get::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_Contained::TAO_ClientRequestInfo_IR_Contained_absolute_name_get::result (char * result) -{ - // update the result - this->_result = result; -} - -IR_Contained::TAO_ClientRequestInfo_IR_Contained_containing_repository_get::TAO_ClientRequestInfo_IR_Contained_containing_repository_get ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target) -{} - -Dynamic::ParameterList * -IR_Contained::TAO_ClientRequestInfo_IR_Contained_containing_repository_get::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return parameter_list; -} - -Dynamic::ExceptionList * -IR_Contained::TAO_ClientRequestInfo_IR_Contained_containing_repository_get::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_Contained::TAO_ClientRequestInfo_IR_Contained_containing_repository_get::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_Contained::TAO_ClientRequestInfo_IR_Contained_containing_repository_get::result (IR_Repository_ptr result) -{ - // update the result - this->_result = result; -} - -IR_Contained::TAO_ClientRequestInfo_IR_Contained_describe::TAO_ClientRequestInfo_IR_Contained_describe ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target) -{} - -Dynamic::ParameterList * -IR_Contained::TAO_ClientRequestInfo_IR_Contained_describe::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return parameter_list; -} - -Dynamic::ExceptionList * -IR_Contained::TAO_ClientRequestInfo_IR_Contained_describe::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_Contained::TAO_ClientRequestInfo_IR_Contained_describe::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_Contained::TAO_ClientRequestInfo_IR_Contained_describe::result (ACE_NESTED_CLASS (IR_Contained,Description) * result) -{ - // update the result - this->_result = result; -} - -IR_Contained::TAO_ClientRequestInfo_IR_Contained_move::TAO_ClientRequestInfo_IR_Contained_move ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - IR_Container_ptr new_container, - const char * new_name, - const char * new_version, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - new_container_ (new_container), - new_name_ (new_name), - new_version_ (new_version) -{} - -Dynamic::ParameterList * -IR_Contained::TAO_ClientRequestInfo_IR_Contained_move::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_new_container = parameter_list->length (); - parameter_list->length (length_new_container + 1); - (*parameter_list)[length_new_container].argument <<= this->new_container_; - - (*parameter_list)[length_new_container].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_new_name = parameter_list->length (); - parameter_list->length (length_new_name + 1); - (*parameter_list)[length_new_name].argument <<= new_name_; - (*parameter_list)[length_new_name].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_new_version = parameter_list->length (); - parameter_list->length (length_new_version + 1); - (*parameter_list)[length_new_version].argument <<= new_version_; - (*parameter_list)[length_new_version].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_Contained::TAO_ClientRequestInfo_IR_Contained_move::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_Contained::TAO_ClientRequestInfo_IR_Contained_move::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 1; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return result_any; -} - -#endif /* TAO_HAS_INTERCEPTORS */ - static const CORBA::Long _oc_IR_Contained[] = { TAO_ENCAP_BYTE_ORDER, // byte order @@ -5897,148 +3995,56 @@ IR_Contained_ptr _TAO_Container_Remote_Proxy_Impl::lookup ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_Container::TAO_ClientRequestInfo_IR_Container_lookup ri ( - &_tao_call, - _collocated_tao_target_, - search_name, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << search_name) - )) - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::MARSHAL (), + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << search_name) + )) + ACE_THROW_RETURN ( + CORBA::MARSHAL (), + 0 + ); + + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - IR_Contained_ptr _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ - - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } + } + break; + } return _tao_safe_retval._retn (); } @@ -6068,150 +4074,57 @@ IR_ContainedSeq * _TAO_Container_Remote_Proxy_Impl::contents ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_Container::TAO_ClientRequestInfo_IR_Container_contents ri ( - &_tao_call, - _collocated_tao_target_, - limit_type, - exclude_inherited, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << limit_type) && + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << limit_type) && (_tao_out << CORBA::Any::from_boolean (exclude_inherited)) - )) - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::MARSHAL (), + )) + ACE_THROW_RETURN ( + CORBA::MARSHAL (), + 0 + ); + + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - IR_ContainedSeq * _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ - - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } + } + break; + } return _tao_safe_retval._retn (); } @@ -6243,154 +4156,60 @@ IR_ContainedSeq * _TAO_Container_Remote_Proxy_Impl::lookup_name ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_Container::TAO_ClientRequestInfo_IR_Container_lookup_name ri ( - &_tao_call, - _collocated_tao_target_, - search_name, - levels_to_search, - limit_type, - exclude_inherited, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << search_name) && + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << search_name) && (_tao_out << levels_to_search) && (_tao_out << limit_type) && (_tao_out << CORBA::Any::from_boolean (exclude_inherited)) - )) - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::MARSHAL (), + )) + ACE_THROW_RETURN ( + CORBA::MARSHAL (), + 0 + ); + + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - IR_ContainedSeq * _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -6421,152 +4240,58 @@ IR_Container::DescriptionSeq * _TAO_Container_Remote_Proxy_Impl::describe_conten istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_Container::TAO_ClientRequestInfo_IR_Container_describe_contents ri ( - &_tao_call, - _collocated_tao_target_, - limit_type, - exclude_inherited, - max_returned_objs, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << limit_type) && + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << limit_type) && (_tao_out << CORBA::Any::from_boolean (exclude_inherited)) && (_tao_out << max_returned_objs) - )) - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::MARSHAL (), + )) + ACE_THROW_RETURN ( + CORBA::MARSHAL (), + 0 + ); + + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - IR_Container::DescriptionSeq * _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ - - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } + } + break; + } return _tao_safe_retval._retn (); } @@ -6596,152 +4321,59 @@ IR_ModuleDef_ptr _TAO_Container_Remote_Proxy_Impl::create_module ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_Container::TAO_ClientRequestInfo_IR_Container_create_module ri ( - &_tao_call, - _collocated_tao_target_, - id, - name, - version, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << id) && + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << id) && (_tao_out << name) && (_tao_out << version) - )) - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::MARSHAL (), + )) + ACE_THROW_RETURN ( + CORBA::MARSHAL (), + 0 + ); + + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - IR_ModuleDef_ptr _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -6773,156 +4405,61 @@ IR_ConstantDef_ptr _TAO_Container_Remote_Proxy_Impl::create_constant ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_Container::TAO_ClientRequestInfo_IR_Container_create_constant ri ( - &_tao_call, - _collocated_tao_target_, - id, - name, - version, - type, - value, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << id) && + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << id) && (_tao_out << name) && (_tao_out << version) && (_tao_out << type) && (_tao_out << value) - )) - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::MARSHAL (), + )) + ACE_THROW_RETURN ( + CORBA::MARSHAL (), + 0 + ); + + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - IR_ConstantDef_ptr _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -6953,154 +4490,60 @@ IR_StructDef_ptr _TAO_Container_Remote_Proxy_Impl::create_struct ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_Container::TAO_ClientRequestInfo_IR_Container_create_struct ri ( - &_tao_call, - _collocated_tao_target_, - id, - name, - version, - members, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << id) && + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << id) && (_tao_out << name) && (_tao_out << version) && (_tao_out << members) - )) - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::MARSHAL (), + )) + ACE_THROW_RETURN ( + CORBA::MARSHAL (), + 0 + ); + + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - IR_StructDef_ptr _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -7132,156 +4575,61 @@ IR_UnionDef_ptr _TAO_Container_Remote_Proxy_Impl::create_union ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_Container::TAO_ClientRequestInfo_IR_Container_create_union ri ( - &_tao_call, - _collocated_tao_target_, - id, - name, - version, - discriminator_type, - members, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << id) && + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << id) && (_tao_out << name) && (_tao_out << version) && (_tao_out << discriminator_type) && (_tao_out << members) - )) - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::MARSHAL (), + )) + ACE_THROW_RETURN ( + CORBA::MARSHAL (), + 0 + ); + + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - IR_UnionDef_ptr _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -7312,154 +4660,60 @@ IR_EnumDef_ptr _TAO_Container_Remote_Proxy_Impl::create_enum ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_Container::TAO_ClientRequestInfo_IR_Container_create_enum ri ( - &_tao_call, - _collocated_tao_target_, - id, - name, - version, - members, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << id) && + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << id) && (_tao_out << name) && (_tao_out << version) && (_tao_out << members) - )) - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::MARSHAL (), + )) + ACE_THROW_RETURN ( + CORBA::MARSHAL (), + 0 + ); + + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - IR_EnumDef_ptr _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -7490,154 +4744,60 @@ IR_AliasDef_ptr _TAO_Container_Remote_Proxy_Impl::create_alias ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_Container::TAO_ClientRequestInfo_IR_Container_create_alias ri ( - &_tao_call, - _collocated_tao_target_, - id, - name, - version, - original_type, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << id) && + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << id) && (_tao_out << name) && (_tao_out << version) && (_tao_out << original_type) - )) - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::MARSHAL (), + )) + ACE_THROW_RETURN ( + CORBA::MARSHAL (), + 0 + ); + + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - IR_AliasDef_ptr _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -7671,158 +4831,62 @@ IR_InterfaceDef_ptr _TAO_Container_Remote_Proxy_Impl::create_interface ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_Container::TAO_ClientRequestInfo_IR_Container_create_interface ri ( - &_tao_call, - _collocated_tao_target_, - id, - name, - version, - base_interfaces, - is_abstract, - is_local, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << id) && + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << id) && (_tao_out << name) && (_tao_out << version) && (_tao_out << base_interfaces) && (_tao_out << CORBA::Any::from_boolean (is_abstract)) && (_tao_out << CORBA::Any::from_boolean (is_local)) - )) - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::MARSHAL (), + )) + ACE_THROW_RETURN ( + CORBA::MARSHAL (), + 0 + ); + + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - IR_InterfaceDef_ptr _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -7859,62 +4923,22 @@ IR_ValueDef_ptr _TAO_Container_Remote_Proxy_Impl::create_value ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_Container::TAO_ClientRequestInfo_IR_Container_create_value ri ( - &_tao_call, - _collocated_tao_target_, - id, - name, - version, - is_custom, - is_abstract, - base_value, - is_truncatable, - abstract_base_values, - supported_interfaces, - initializers, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << id) && + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << id) && (_tao_out << name) && (_tao_out << version) && (_tao_out << CORBA::Any::from_boolean (is_custom)) && @@ -7924,101 +4948,41 @@ IR_ValueDef_ptr _TAO_Container_Remote_Proxy_Impl::create_value ( (_tao_out << abstract_base_values) && (_tao_out << supported_interfaces) && (_tao_out << initializers) - )) - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::MARSHAL (), + )) + ACE_THROW_RETURN ( + CORBA::MARSHAL (), + 0 + ); + + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - IR_ValueDef_ptr _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -8049,154 +5013,60 @@ IR_ValueBoxDef_ptr _TAO_Container_Remote_Proxy_Impl::create_value_box ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_Container::TAO_ClientRequestInfo_IR_Container_create_value_box ri ( - &_tao_call, - _collocated_tao_target_, - id, - name, - version, - original_type_def, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << id) && + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << id) && (_tao_out << name) && (_tao_out << version) && (_tao_out << original_type_def) - )) - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::MARSHAL (), + )) + ACE_THROW_RETURN ( + CORBA::MARSHAL (), + 0 + ); + + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - IR_ValueBoxDef_ptr _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -8227,154 +5097,60 @@ IR_ExceptionDef_ptr _TAO_Container_Remote_Proxy_Impl::create_exception ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_Container::TAO_ClientRequestInfo_IR_Container_create_exception ri ( - &_tao_call, - _collocated_tao_target_, - id, - name, - version, - members, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << id) && + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << id) && (_tao_out << name) && (_tao_out << version) && (_tao_out << members) - )) - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::MARSHAL (), + )) + ACE_THROW_RETURN ( + CORBA::MARSHAL (), + 0 + ); + + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - IR_ExceptionDef_ptr _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -8404,152 +5180,59 @@ IR_NativeDef_ptr _TAO_Container_Remote_Proxy_Impl::create_native ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_Container::TAO_ClientRequestInfo_IR_Container_create_native ri ( - &_tao_call, - _collocated_tao_target_, - id, - name, - version, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << id) && + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << id) && (_tao_out << name) && (_tao_out << version) - )) - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::MARSHAL (), + )) + ACE_THROW_RETURN ( + CORBA::MARSHAL (), + 0 + ); + + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - IR_NativeDef_ptr _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -8571,13 +5254,8 @@ _TAO_Container_Proxy_Broker::~_TAO_Container_Proxy_Broker (void) { } -_TAO_Container_Proxy_Broker * (*_TAO_Container_Proxy_Broker_Factory_function_pointer) ( - CORBA::Object_ptr obj - ) = 0; - -// Factory Member function Implementation. -_TAO_Container_Remote_Proxy_Broker * -_TAO_Container_Remote_Proxy_Broker::the_TAO_Container_Remote_Proxy_Broker (void) +// Factory function Implementation. +_TAO_Container_Remote_Proxy_Broker *the_TAO_Container_Remote_Proxy_Broker (void) { static ::_TAO_Container_Remote_Proxy_Broker remote_proxy_broker; return &remote_proxy_broker; @@ -8611,7 +5289,7 @@ _TAO_Container_Remote_Proxy_Broker::select_proxy ( // default constructor IR_Container::IR_Container (int collocated) { - this->IR_Container_setup_collocation (collocated); + this->_tao_setup_collocation (collocated); } // destructor @@ -8619,16 +5297,16 @@ IR_Container::~IR_Container (void) {} void -IR_Container::IR_Container_setup_collocation (int collocated) +IR_Container::_tao_setup_collocation (int collocated) { if (collocated) this->the_TAO_Container_Proxy_Broker_ = _TAO_Container_Proxy_Broker_Factory_function_pointer (this); else this->the_TAO_Container_Proxy_Broker_ = - _TAO_Container_Remote_Proxy_Broker::the_TAO_Container_Remote_Proxy_Broker (); + ::the_TAO_Container_Remote_Proxy_Broker (); - this->CORBA_IRObject_setup_collocation (collocated); + CORBA_IRObject::_tao_setup_collocation (collocated); } @@ -9299,1329 +5977,6 @@ IR_NativeDef_ptr IR_Container::create_native ( ); } -#if (TAO_HAS_INTERCEPTORS == 1) -IR_Container::TAO_ClientRequestInfo_IR_Container_lookup::TAO_ClientRequestInfo_IR_Container_lookup ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - const char * search_name, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - search_name_ (search_name) -{} - -Dynamic::ParameterList * -IR_Container::TAO_ClientRequestInfo_IR_Container_lookup::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_search_name = parameter_list->length (); - parameter_list->length (length_search_name + 1); - (*parameter_list)[length_search_name].argument <<= search_name_; - (*parameter_list)[length_search_name].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_Container::TAO_ClientRequestInfo_IR_Container_lookup::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_Container::TAO_ClientRequestInfo_IR_Container_lookup::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_Container::TAO_ClientRequestInfo_IR_Container_lookup::result (IR_Contained_ptr result) -{ - // update the result - this->_result = result; -} - -IR_Container::TAO_ClientRequestInfo_IR_Container_contents::TAO_ClientRequestInfo_IR_Container_contents ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - IR_DefinitionKind & limit_type, - const CORBA::Boolean & exclude_inherited, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - limit_type_ (limit_type), - exclude_inherited_ (exclude_inherited) -{} - -Dynamic::ParameterList * -IR_Container::TAO_ClientRequestInfo_IR_Container_contents::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_limit_type = parameter_list->length (); - parameter_list->length (length_limit_type + 1); - (*parameter_list)[length_limit_type].argument <<= this->limit_type_; - - (*parameter_list)[length_limit_type].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_exclude_inherited = parameter_list->length (); - parameter_list->length (length_exclude_inherited + 1); - (*parameter_list)[length_exclude_inherited].argument <<= CORBA::Any::from_boolean (this->exclude_inherited_); - (*parameter_list)[length_exclude_inherited].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_Container::TAO_ClientRequestInfo_IR_Container_contents::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_Container::TAO_ClientRequestInfo_IR_Container_contents::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_Container::TAO_ClientRequestInfo_IR_Container_contents::result (IR_ContainedSeq * result) -{ - // update the result - this->_result = result; -} - -IR_Container::TAO_ClientRequestInfo_IR_Container_lookup_name::TAO_ClientRequestInfo_IR_Container_lookup_name ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - const char * search_name, - const CORBA::Long & levels_to_search, - IR_DefinitionKind & limit_type, - const CORBA::Boolean & exclude_inherited, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - search_name_ (search_name), - levels_to_search_ (levels_to_search), - limit_type_ (limit_type), - exclude_inherited_ (exclude_inherited) -{} - -Dynamic::ParameterList * -IR_Container::TAO_ClientRequestInfo_IR_Container_lookup_name::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_search_name = parameter_list->length (); - parameter_list->length (length_search_name + 1); - (*parameter_list)[length_search_name].argument <<= search_name_; - (*parameter_list)[length_search_name].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_levels_to_search = parameter_list->length (); - parameter_list->length (length_levels_to_search + 1); - (*parameter_list)[length_levels_to_search].argument <<= levels_to_search_; - (*parameter_list)[length_levels_to_search].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_limit_type = parameter_list->length (); - parameter_list->length (length_limit_type + 1); - (*parameter_list)[length_limit_type].argument <<= this->limit_type_; - - (*parameter_list)[length_limit_type].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_exclude_inherited = parameter_list->length (); - parameter_list->length (length_exclude_inherited + 1); - (*parameter_list)[length_exclude_inherited].argument <<= CORBA::Any::from_boolean (this->exclude_inherited_); - (*parameter_list)[length_exclude_inherited].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_Container::TAO_ClientRequestInfo_IR_Container_lookup_name::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_Container::TAO_ClientRequestInfo_IR_Container_lookup_name::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_Container::TAO_ClientRequestInfo_IR_Container_lookup_name::result (IR_ContainedSeq * result) -{ - // update the result - this->_result = result; -} - -IR_Container::TAO_ClientRequestInfo_IR_Container_describe_contents::TAO_ClientRequestInfo_IR_Container_describe_contents ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - IR_DefinitionKind & limit_type, - const CORBA::Boolean & exclude_inherited, - const CORBA::Long & max_returned_objs, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - limit_type_ (limit_type), - exclude_inherited_ (exclude_inherited), - max_returned_objs_ (max_returned_objs) -{} - -Dynamic::ParameterList * -IR_Container::TAO_ClientRequestInfo_IR_Container_describe_contents::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_limit_type = parameter_list->length (); - parameter_list->length (length_limit_type + 1); - (*parameter_list)[length_limit_type].argument <<= this->limit_type_; - - (*parameter_list)[length_limit_type].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_exclude_inherited = parameter_list->length (); - parameter_list->length (length_exclude_inherited + 1); - (*parameter_list)[length_exclude_inherited].argument <<= CORBA::Any::from_boolean (this->exclude_inherited_); - (*parameter_list)[length_exclude_inherited].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_max_returned_objs = parameter_list->length (); - parameter_list->length (length_max_returned_objs + 1); - (*parameter_list)[length_max_returned_objs].argument <<= max_returned_objs_; - (*parameter_list)[length_max_returned_objs].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_Container::TAO_ClientRequestInfo_IR_Container_describe_contents::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_Container::TAO_ClientRequestInfo_IR_Container_describe_contents::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_Container::TAO_ClientRequestInfo_IR_Container_describe_contents::result (ACE_NESTED_CLASS (IR_Container,DescriptionSeq) * result) -{ - // update the result - this->_result = result; -} - -IR_Container::TAO_ClientRequestInfo_IR_Container_create_module::TAO_ClientRequestInfo_IR_Container_create_module ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - const char * id, - const char * name, - const char * version, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - id_ (id), - name_ (name), - version_ (version) -{} - -Dynamic::ParameterList * -IR_Container::TAO_ClientRequestInfo_IR_Container_create_module::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_id = parameter_list->length (); - parameter_list->length (length_id + 1); - (*parameter_list)[length_id].argument <<= id_; - (*parameter_list)[length_id].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_name = parameter_list->length (); - parameter_list->length (length_name + 1); - (*parameter_list)[length_name].argument <<= name_; - (*parameter_list)[length_name].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_version = parameter_list->length (); - parameter_list->length (length_version + 1); - (*parameter_list)[length_version].argument <<= version_; - (*parameter_list)[length_version].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_Container::TAO_ClientRequestInfo_IR_Container_create_module::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_Container::TAO_ClientRequestInfo_IR_Container_create_module::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_Container::TAO_ClientRequestInfo_IR_Container_create_module::result (IR_ModuleDef_ptr result) -{ - // update the result - this->_result = result; -} - -IR_Container::TAO_ClientRequestInfo_IR_Container_create_constant::TAO_ClientRequestInfo_IR_Container_create_constant ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - const char * id, - const char * name, - const char * version, - IR_IDLType_ptr type, - const CORBA::Any & value, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - id_ (id), - name_ (name), - version_ (version), - type_ (type), - value_ (value) -{} - -Dynamic::ParameterList * -IR_Container::TAO_ClientRequestInfo_IR_Container_create_constant::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_id = parameter_list->length (); - parameter_list->length (length_id + 1); - (*parameter_list)[length_id].argument <<= id_; - (*parameter_list)[length_id].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_name = parameter_list->length (); - parameter_list->length (length_name + 1); - (*parameter_list)[length_name].argument <<= name_; - (*parameter_list)[length_name].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_version = parameter_list->length (); - parameter_list->length (length_version + 1); - (*parameter_list)[length_version].argument <<= version_; - (*parameter_list)[length_version].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_type = parameter_list->length (); - parameter_list->length (length_type + 1); - (*parameter_list)[length_type].argument <<= this->type_; - - (*parameter_list)[length_type].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_value = parameter_list->length (); - parameter_list->length (length_value + 1); - (*parameter_list)[length_value].argument <<= value_; - (*parameter_list)[length_value].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_Container::TAO_ClientRequestInfo_IR_Container_create_constant::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_Container::TAO_ClientRequestInfo_IR_Container_create_constant::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_Container::TAO_ClientRequestInfo_IR_Container_create_constant::result (IR_ConstantDef_ptr result) -{ - // update the result - this->_result = result; -} - -IR_Container::TAO_ClientRequestInfo_IR_Container_create_struct::TAO_ClientRequestInfo_IR_Container_create_struct ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - const char * id, - const char * name, - const char * version, - const IR_StructMemberSeq & members, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - id_ (id), - name_ (name), - version_ (version), - members_ (members) -{} - -Dynamic::ParameterList * -IR_Container::TAO_ClientRequestInfo_IR_Container_create_struct::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_id = parameter_list->length (); - parameter_list->length (length_id + 1); - (*parameter_list)[length_id].argument <<= id_; - (*parameter_list)[length_id].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_name = parameter_list->length (); - parameter_list->length (length_name + 1); - (*parameter_list)[length_name].argument <<= name_; - (*parameter_list)[length_name].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_version = parameter_list->length (); - parameter_list->length (length_version + 1); - (*parameter_list)[length_version].argument <<= version_; - (*parameter_list)[length_version].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_members = parameter_list->length (); - parameter_list->length (length_members + 1); - (*parameter_list)[length_members].argument <<= this->members_; - - (*parameter_list)[length_members].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_Container::TAO_ClientRequestInfo_IR_Container_create_struct::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_Container::TAO_ClientRequestInfo_IR_Container_create_struct::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_Container::TAO_ClientRequestInfo_IR_Container_create_struct::result (IR_StructDef_ptr result) -{ - // update the result - this->_result = result; -} - -IR_Container::TAO_ClientRequestInfo_IR_Container_create_union::TAO_ClientRequestInfo_IR_Container_create_union ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - const char * id, - const char * name, - const char * version, - IR_IDLType_ptr discriminator_type, - const IR_UnionMemberSeq & members, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - id_ (id), - name_ (name), - version_ (version), - discriminator_type_ (discriminator_type), - members_ (members) -{} - -Dynamic::ParameterList * -IR_Container::TAO_ClientRequestInfo_IR_Container_create_union::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_id = parameter_list->length (); - parameter_list->length (length_id + 1); - (*parameter_list)[length_id].argument <<= id_; - (*parameter_list)[length_id].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_name = parameter_list->length (); - parameter_list->length (length_name + 1); - (*parameter_list)[length_name].argument <<= name_; - (*parameter_list)[length_name].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_version = parameter_list->length (); - parameter_list->length (length_version + 1); - (*parameter_list)[length_version].argument <<= version_; - (*parameter_list)[length_version].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_discriminator_type = parameter_list->length (); - parameter_list->length (length_discriminator_type + 1); - (*parameter_list)[length_discriminator_type].argument <<= this->discriminator_type_; - - (*parameter_list)[length_discriminator_type].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_members = parameter_list->length (); - parameter_list->length (length_members + 1); - (*parameter_list)[length_members].argument <<= this->members_; - - (*parameter_list)[length_members].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_Container::TAO_ClientRequestInfo_IR_Container_create_union::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_Container::TAO_ClientRequestInfo_IR_Container_create_union::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_Container::TAO_ClientRequestInfo_IR_Container_create_union::result (IR_UnionDef_ptr result) -{ - // update the result - this->_result = result; -} - -IR_Container::TAO_ClientRequestInfo_IR_Container_create_enum::TAO_ClientRequestInfo_IR_Container_create_enum ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - const char * id, - const char * name, - const char * version, - const IR_EnumMemberSeq & members, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - id_ (id), - name_ (name), - version_ (version), - members_ (members) -{} - -Dynamic::ParameterList * -IR_Container::TAO_ClientRequestInfo_IR_Container_create_enum::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_id = parameter_list->length (); - parameter_list->length (length_id + 1); - (*parameter_list)[length_id].argument <<= id_; - (*parameter_list)[length_id].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_name = parameter_list->length (); - parameter_list->length (length_name + 1); - (*parameter_list)[length_name].argument <<= name_; - (*parameter_list)[length_name].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_version = parameter_list->length (); - parameter_list->length (length_version + 1); - (*parameter_list)[length_version].argument <<= version_; - (*parameter_list)[length_version].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_members = parameter_list->length (); - parameter_list->length (length_members + 1); - (*parameter_list)[length_members].argument <<= this->members_; - - (*parameter_list)[length_members].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_Container::TAO_ClientRequestInfo_IR_Container_create_enum::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_Container::TAO_ClientRequestInfo_IR_Container_create_enum::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_Container::TAO_ClientRequestInfo_IR_Container_create_enum::result (IR_EnumDef_ptr result) -{ - // update the result - this->_result = result; -} - -IR_Container::TAO_ClientRequestInfo_IR_Container_create_alias::TAO_ClientRequestInfo_IR_Container_create_alias ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - const char * id, - const char * name, - const char * version, - IR_IDLType_ptr original_type, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - id_ (id), - name_ (name), - version_ (version), - original_type_ (original_type) -{} - -Dynamic::ParameterList * -IR_Container::TAO_ClientRequestInfo_IR_Container_create_alias::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_id = parameter_list->length (); - parameter_list->length (length_id + 1); - (*parameter_list)[length_id].argument <<= id_; - (*parameter_list)[length_id].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_name = parameter_list->length (); - parameter_list->length (length_name + 1); - (*parameter_list)[length_name].argument <<= name_; - (*parameter_list)[length_name].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_version = parameter_list->length (); - parameter_list->length (length_version + 1); - (*parameter_list)[length_version].argument <<= version_; - (*parameter_list)[length_version].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_original_type = parameter_list->length (); - parameter_list->length (length_original_type + 1); - (*parameter_list)[length_original_type].argument <<= this->original_type_; - - (*parameter_list)[length_original_type].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_Container::TAO_ClientRequestInfo_IR_Container_create_alias::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_Container::TAO_ClientRequestInfo_IR_Container_create_alias::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_Container::TAO_ClientRequestInfo_IR_Container_create_alias::result (IR_AliasDef_ptr result) -{ - // update the result - this->_result = result; -} - -IR_Container::TAO_ClientRequestInfo_IR_Container_create_interface::TAO_ClientRequestInfo_IR_Container_create_interface ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - const char * id, - const char * name, - const char * version, - const IR_InterfaceDefSeq & base_interfaces, - const CORBA::Boolean & is_abstract, - const CORBA::Boolean & is_local, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - id_ (id), - name_ (name), - version_ (version), - base_interfaces_ (base_interfaces), - is_abstract_ (is_abstract), - is_local_ (is_local) -{} - -Dynamic::ParameterList * -IR_Container::TAO_ClientRequestInfo_IR_Container_create_interface::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_id = parameter_list->length (); - parameter_list->length (length_id + 1); - (*parameter_list)[length_id].argument <<= id_; - (*parameter_list)[length_id].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_name = parameter_list->length (); - parameter_list->length (length_name + 1); - (*parameter_list)[length_name].argument <<= name_; - (*parameter_list)[length_name].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_version = parameter_list->length (); - parameter_list->length (length_version + 1); - (*parameter_list)[length_version].argument <<= version_; - (*parameter_list)[length_version].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_base_interfaces = parameter_list->length (); - parameter_list->length (length_base_interfaces + 1); - (*parameter_list)[length_base_interfaces].argument <<= this->base_interfaces_; - - (*parameter_list)[length_base_interfaces].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_is_abstract = parameter_list->length (); - parameter_list->length (length_is_abstract + 1); - (*parameter_list)[length_is_abstract].argument <<= CORBA::Any::from_boolean (this->is_abstract_); - (*parameter_list)[length_is_abstract].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_is_local = parameter_list->length (); - parameter_list->length (length_is_local + 1); - (*parameter_list)[length_is_local].argument <<= CORBA::Any::from_boolean (this->is_local_); - (*parameter_list)[length_is_local].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_Container::TAO_ClientRequestInfo_IR_Container_create_interface::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_Container::TAO_ClientRequestInfo_IR_Container_create_interface::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_Container::TAO_ClientRequestInfo_IR_Container_create_interface::result (IR_InterfaceDef_ptr result) -{ - // update the result - this->_result = result; -} - -IR_Container::TAO_ClientRequestInfo_IR_Container_create_value::TAO_ClientRequestInfo_IR_Container_create_value ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - const char * id, - const char * name, - const char * version, - const CORBA::Boolean & is_custom, - const CORBA::Boolean & is_abstract, - IR_ValueDef_ptr base_value, - const CORBA::Boolean & is_truncatable, - const IR_ValueDefSeq & abstract_base_values, - const IR_InterfaceDefSeq & supported_interfaces, - const IR_InitializerSeq & initializers, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - id_ (id), - name_ (name), - version_ (version), - is_custom_ (is_custom), - is_abstract_ (is_abstract), - base_value_ (base_value), - is_truncatable_ (is_truncatable), - abstract_base_values_ (abstract_base_values), - supported_interfaces_ (supported_interfaces), - initializers_ (initializers) -{} - -Dynamic::ParameterList * -IR_Container::TAO_ClientRequestInfo_IR_Container_create_value::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_id = parameter_list->length (); - parameter_list->length (length_id + 1); - (*parameter_list)[length_id].argument <<= id_; - (*parameter_list)[length_id].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_name = parameter_list->length (); - parameter_list->length (length_name + 1); - (*parameter_list)[length_name].argument <<= name_; - (*parameter_list)[length_name].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_version = parameter_list->length (); - parameter_list->length (length_version + 1); - (*parameter_list)[length_version].argument <<= version_; - (*parameter_list)[length_version].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_is_custom = parameter_list->length (); - parameter_list->length (length_is_custom + 1); - (*parameter_list)[length_is_custom].argument <<= CORBA::Any::from_boolean (this->is_custom_); - (*parameter_list)[length_is_custom].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_is_abstract = parameter_list->length (); - parameter_list->length (length_is_abstract + 1); - (*parameter_list)[length_is_abstract].argument <<= CORBA::Any::from_boolean (this->is_abstract_); - (*parameter_list)[length_is_abstract].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_base_value = parameter_list->length (); - parameter_list->length (length_base_value + 1); - (*parameter_list)[length_base_value].argument <<= this->base_value_; - - (*parameter_list)[length_base_value].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_is_truncatable = parameter_list->length (); - parameter_list->length (length_is_truncatable + 1); - (*parameter_list)[length_is_truncatable].argument <<= CORBA::Any::from_boolean (this->is_truncatable_); - (*parameter_list)[length_is_truncatable].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_abstract_base_values = parameter_list->length (); - parameter_list->length (length_abstract_base_values + 1); - (*parameter_list)[length_abstract_base_values].argument <<= this->abstract_base_values_; - - (*parameter_list)[length_abstract_base_values].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_supported_interfaces = parameter_list->length (); - parameter_list->length (length_supported_interfaces + 1); - (*parameter_list)[length_supported_interfaces].argument <<= this->supported_interfaces_; - - (*parameter_list)[length_supported_interfaces].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_initializers = parameter_list->length (); - parameter_list->length (length_initializers + 1); - (*parameter_list)[length_initializers].argument <<= this->initializers_; - - (*parameter_list)[length_initializers].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_Container::TAO_ClientRequestInfo_IR_Container_create_value::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_Container::TAO_ClientRequestInfo_IR_Container_create_value::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_Container::TAO_ClientRequestInfo_IR_Container_create_value::result (IR_ValueDef_ptr result) -{ - // update the result - this->_result = result; -} - -IR_Container::TAO_ClientRequestInfo_IR_Container_create_value_box::TAO_ClientRequestInfo_IR_Container_create_value_box ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - const char * id, - const char * name, - const char * version, - IR_IDLType_ptr original_type_def, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - id_ (id), - name_ (name), - version_ (version), - original_type_def_ (original_type_def) -{} - -Dynamic::ParameterList * -IR_Container::TAO_ClientRequestInfo_IR_Container_create_value_box::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_id = parameter_list->length (); - parameter_list->length (length_id + 1); - (*parameter_list)[length_id].argument <<= id_; - (*parameter_list)[length_id].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_name = parameter_list->length (); - parameter_list->length (length_name + 1); - (*parameter_list)[length_name].argument <<= name_; - (*parameter_list)[length_name].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_version = parameter_list->length (); - parameter_list->length (length_version + 1); - (*parameter_list)[length_version].argument <<= version_; - (*parameter_list)[length_version].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_original_type_def = parameter_list->length (); - parameter_list->length (length_original_type_def + 1); - (*parameter_list)[length_original_type_def].argument <<= this->original_type_def_; - - (*parameter_list)[length_original_type_def].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_Container::TAO_ClientRequestInfo_IR_Container_create_value_box::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_Container::TAO_ClientRequestInfo_IR_Container_create_value_box::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_Container::TAO_ClientRequestInfo_IR_Container_create_value_box::result (IR_ValueBoxDef_ptr result) -{ - // update the result - this->_result = result; -} - -IR_Container::TAO_ClientRequestInfo_IR_Container_create_exception::TAO_ClientRequestInfo_IR_Container_create_exception ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - const char * id, - const char * name, - const char * version, - const IR_StructMemberSeq & members, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - id_ (id), - name_ (name), - version_ (version), - members_ (members) -{} - -Dynamic::ParameterList * -IR_Container::TAO_ClientRequestInfo_IR_Container_create_exception::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_id = parameter_list->length (); - parameter_list->length (length_id + 1); - (*parameter_list)[length_id].argument <<= id_; - (*parameter_list)[length_id].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_name = parameter_list->length (); - parameter_list->length (length_name + 1); - (*parameter_list)[length_name].argument <<= name_; - (*parameter_list)[length_name].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_version = parameter_list->length (); - parameter_list->length (length_version + 1); - (*parameter_list)[length_version].argument <<= version_; - (*parameter_list)[length_version].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_members = parameter_list->length (); - parameter_list->length (length_members + 1); - (*parameter_list)[length_members].argument <<= this->members_; - - (*parameter_list)[length_members].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_Container::TAO_ClientRequestInfo_IR_Container_create_exception::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_Container::TAO_ClientRequestInfo_IR_Container_create_exception::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_Container::TAO_ClientRequestInfo_IR_Container_create_exception::result (IR_ExceptionDef_ptr result) -{ - // update the result - this->_result = result; -} - -IR_Container::TAO_ClientRequestInfo_IR_Container_create_native::TAO_ClientRequestInfo_IR_Container_create_native ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - const char * id, - const char * name, - const char * version, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - id_ (id), - name_ (name), - version_ (version) -{} - -Dynamic::ParameterList * -IR_Container::TAO_ClientRequestInfo_IR_Container_create_native::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_id = parameter_list->length (); - parameter_list->length (length_id + 1); - (*parameter_list)[length_id].argument <<= id_; - (*parameter_list)[length_id].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_name = parameter_list->length (); - parameter_list->length (length_name + 1); - (*parameter_list)[length_name].argument <<= name_; - (*parameter_list)[length_name].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_version = parameter_list->length (); - parameter_list->length (length_version + 1); - (*parameter_list)[length_version].argument <<= version_; - (*parameter_list)[length_version].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_Container::TAO_ClientRequestInfo_IR_Container_create_native::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_Container::TAO_ClientRequestInfo_IR_Container_create_native::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_Container::TAO_ClientRequestInfo_IR_Container_create_native::result (IR_NativeDef_ptr result) -{ - // update the result - this->_result = result; -} - -#endif /* TAO_HAS_INTERCEPTORS */ - static const CORBA::Long _oc_IR_Container[] = { TAO_ENCAP_BYTE_ORDER, // byte order @@ -10669,137 +6024,47 @@ CORBA::TypeCode_ptr _TAO_IDLType_Remote_Proxy_Impl::type ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_IDLType::TAO_ClientRequestInfo_IR_IDLType_type_get ri ( - &_tao_call, - _collocated_tao_target_, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), + 0 ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - CORBA::TypeCode_ptr _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -10821,13 +6086,8 @@ _TAO_IDLType_Proxy_Broker::~_TAO_IDLType_Proxy_Broker (void) { } -_TAO_IDLType_Proxy_Broker * (*_TAO_IDLType_Proxy_Broker_Factory_function_pointer) ( - CORBA::Object_ptr obj - ) = 0; - -// Factory Member function Implementation. -_TAO_IDLType_Remote_Proxy_Broker * -_TAO_IDLType_Remote_Proxy_Broker::the_TAO_IDLType_Remote_Proxy_Broker (void) +// Factory function Implementation. +_TAO_IDLType_Remote_Proxy_Broker *the_TAO_IDLType_Remote_Proxy_Broker (void) { static ::_TAO_IDLType_Remote_Proxy_Broker remote_proxy_broker; return &remote_proxy_broker; @@ -10861,7 +6121,7 @@ _TAO_IDLType_Remote_Proxy_Broker::select_proxy ( // default constructor IR_IDLType::IR_IDLType (int collocated) { - this->IR_IDLType_setup_collocation (collocated); + this->_tao_setup_collocation (collocated); } // destructor @@ -10869,16 +6129,16 @@ IR_IDLType::~IR_IDLType (void) {} void -IR_IDLType::IR_IDLType_setup_collocation (int collocated) +IR_IDLType::_tao_setup_collocation (int collocated) { if (collocated) this->the_TAO_IDLType_Proxy_Broker_ = _TAO_IDLType_Proxy_Broker_Factory_function_pointer (this); else this->the_TAO_IDLType_Proxy_Broker_ = - ::_TAO_IDLType_Remote_Proxy_Broker::the_TAO_IDLType_Remote_Proxy_Broker (); + ::the_TAO_IDLType_Remote_Proxy_Broker (); - this->CORBA_IRObject_setup_collocation (collocated); + CORBA_IRObject::_tao_setup_collocation (collocated); } @@ -11020,65 +6280,6 @@ CORBA::TypeCode_ptr IR_IDLType::type ( ); } -#if (TAO_HAS_INTERCEPTORS == 1) -IR_IDLType::TAO_ClientRequestInfo_IR_IDLType_type_get::TAO_ClientRequestInfo_IR_IDLType_type_get ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target) -{} - -Dynamic::ParameterList * -IR_IDLType::TAO_ClientRequestInfo_IR_IDLType_type_get::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return parameter_list; -} - -Dynamic::ExceptionList * -IR_IDLType::TAO_ClientRequestInfo_IR_IDLType_type_get::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_IDLType::TAO_ClientRequestInfo_IR_IDLType_type_get::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_IDLType::TAO_ClientRequestInfo_IR_IDLType_type_get::result (CORBA::TypeCode_ptr result) -{ - // update the result - this->_result = result; -} - -#endif /* TAO_HAS_INTERCEPTORS */ - static const CORBA::Long _oc_IR_IDLType[] = { TAO_ENCAP_BYTE_ORDER, // byte order @@ -11161,148 +6362,57 @@ IR_Contained_ptr _TAO_Repository_Remote_Proxy_Impl::lookup_id ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_Repository::TAO_ClientRequestInfo_IR_Repository_lookup_id ri ( - &_tao_call, - _collocated_tao_target_, - search_id, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << search_id) - )) - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::MARSHAL (), + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << search_id) + )) + ACE_THROW_RETURN ( + CORBA::MARSHAL (), + 0 + ); + + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - IR_Contained_ptr _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -11330,148 +6440,57 @@ CORBA::TypeCode_ptr _TAO_Repository_Remote_Proxy_Impl::get_canonical_typecode ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_Repository::TAO_ClientRequestInfo_IR_Repository_get_canonical_typecode ri ( - &_tao_call, - _collocated_tao_target_, - tc, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << tc) - )) - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::MARSHAL (), + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << tc) + )) + ACE_THROW_RETURN ( + CORBA::MARSHAL (), + 0 + ); + + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - CORBA::TypeCode_ptr _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -11499,148 +6518,57 @@ IR_PrimitiveDef_ptr _TAO_Repository_Remote_Proxy_Impl::get_primitive ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_Repository::TAO_ClientRequestInfo_IR_Repository_get_primitive ri ( - &_tao_call, - _collocated_tao_target_, - kind, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << kind) - )) - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::MARSHAL (), + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << kind) + )) + ACE_THROW_RETURN ( + CORBA::MARSHAL (), + 0 + ); + + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - IR_PrimitiveDef_ptr _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -11668,148 +6596,57 @@ IR_StringDef_ptr _TAO_Repository_Remote_Proxy_Impl::create_string ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_Repository::TAO_ClientRequestInfo_IR_Repository_create_string ri ( - &_tao_call, - _collocated_tao_target_, - bound, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << bound) - )) - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::MARSHAL (), + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << bound) + )) + ACE_THROW_RETURN ( + CORBA::MARSHAL (), + 0 + ); + + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - IR_StringDef_ptr _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -11837,148 +6674,57 @@ IR_WstringDef_ptr _TAO_Repository_Remote_Proxy_Impl::create_wstring ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_Repository::TAO_ClientRequestInfo_IR_Repository_create_wstring ri ( - &_tao_call, - _collocated_tao_target_, - bound, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << bound) - )) - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::MARSHAL (), + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << bound) + )) + ACE_THROW_RETURN ( + CORBA::MARSHAL (), + 0 + ); + + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - IR_WstringDef_ptr _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -12007,150 +6753,58 @@ IR_SequenceDef_ptr _TAO_Repository_Remote_Proxy_Impl::create_sequence ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_Repository::TAO_ClientRequestInfo_IR_Repository_create_sequence ri ( - &_tao_call, - _collocated_tao_target_, - bound, - element_type, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << bound) && + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << bound) && (_tao_out << element_type) - )) - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::MARSHAL (), + )) + ACE_THROW_RETURN ( + CORBA::MARSHAL (), + 0 + ); + + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - IR_SequenceDef_ptr _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -12179,150 +6833,58 @@ IR_ArrayDef_ptr _TAO_Repository_Remote_Proxy_Impl::create_array ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_Repository::TAO_ClientRequestInfo_IR_Repository_create_array ri ( - &_tao_call, - _collocated_tao_target_, - length, - element_type, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << length) && + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << length) && (_tao_out << element_type) - )) - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::MARSHAL (), + )) + ACE_THROW_RETURN ( + CORBA::MARSHAL (), + 0 + ); + + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - IR_ArrayDef_ptr _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -12351,150 +6913,58 @@ IR_FixedDef_ptr _TAO_Repository_Remote_Proxy_Impl::create_fixed ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_Repository::TAO_ClientRequestInfo_IR_Repository_create_fixed ri ( - &_tao_call, - _collocated_tao_target_, - digits, - scale, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << digits) && + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << digits) && (_tao_out << scale) - )) - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::MARSHAL (), + )) + ACE_THROW_RETURN ( + CORBA::MARSHAL (), + 0 + ); + + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - IR_FixedDef_ptr _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -12516,13 +6986,8 @@ _TAO_Repository_Proxy_Broker::~_TAO_Repository_Proxy_Broker (void) { } -_TAO_Repository_Proxy_Broker * (*_TAO_Repository_Proxy_Broker_Factory_function_pointer) ( - CORBA::Object_ptr obj - ) = 0; - -// Factory Member function Implementation. -_TAO_Repository_Remote_Proxy_Broker * -_TAO_Repository_Remote_Proxy_Broker::the_TAO_Repository_Remote_Proxy_Broker (void) +// Factory function Implementation. +_TAO_Repository_Remote_Proxy_Broker *the_TAO_Repository_Remote_Proxy_Broker (void) { static ::_TAO_Repository_Remote_Proxy_Broker remote_proxy_broker; return &remote_proxy_broker; @@ -12556,7 +7021,7 @@ _TAO_Repository_Remote_Proxy_Broker::select_proxy ( // default constructor IR_Repository::IR_Repository (int collocated) { - this->IR_Repository_setup_collocation (collocated); + this->_tao_setup_collocation (collocated); } // destructor @@ -12564,16 +7029,16 @@ IR_Repository::~IR_Repository (void) {} void -IR_Repository::IR_Repository_setup_collocation (int collocated) +IR_Repository::_tao_setup_collocation (int collocated) { if (collocated) this->the_TAO_Repository_Proxy_Broker_ = _TAO_Repository_Proxy_Broker_Factory_function_pointer (this); else this->the_TAO_Repository_Proxy_Broker_ = - ::_TAO_Repository_Remote_Proxy_Broker::the_TAO_Repository_Remote_Proxy_Broker (); + ::the_TAO_Repository_Remote_Proxy_Broker (); - this->IR_Container_setup_collocation (collocated); + IR_Container::_tao_setup_collocation (collocated); } @@ -12840,553 +7305,6 @@ IR_FixedDef_ptr IR_Repository::create_fixed ( ); } -#if (TAO_HAS_INTERCEPTORS == 1) -IR_Repository::TAO_ClientRequestInfo_IR_Repository_lookup_id::TAO_ClientRequestInfo_IR_Repository_lookup_id ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - const char * search_id, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - search_id_ (search_id) -{} - -Dynamic::ParameterList * -IR_Repository::TAO_ClientRequestInfo_IR_Repository_lookup_id::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_search_id = parameter_list->length (); - parameter_list->length (length_search_id + 1); - (*parameter_list)[length_search_id].argument <<= search_id_; - (*parameter_list)[length_search_id].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_Repository::TAO_ClientRequestInfo_IR_Repository_lookup_id::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_Repository::TAO_ClientRequestInfo_IR_Repository_lookup_id::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_Repository::TAO_ClientRequestInfo_IR_Repository_lookup_id::result (IR_Contained_ptr result) -{ - // update the result - this->_result = result; -} - -IR_Repository::TAO_ClientRequestInfo_IR_Repository_get_canonical_typecode::TAO_ClientRequestInfo_IR_Repository_get_canonical_typecode ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - CORBA::TypeCode_ptr tc, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - tc_ (tc) -{} - -Dynamic::ParameterList * -IR_Repository::TAO_ClientRequestInfo_IR_Repository_get_canonical_typecode::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_tc = parameter_list->length (); - parameter_list->length (length_tc + 1); - (*parameter_list)[length_tc].argument <<= tc_; - (*parameter_list)[length_tc].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_Repository::TAO_ClientRequestInfo_IR_Repository_get_canonical_typecode::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_Repository::TAO_ClientRequestInfo_IR_Repository_get_canonical_typecode::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_Repository::TAO_ClientRequestInfo_IR_Repository_get_canonical_typecode::result (CORBA::TypeCode_ptr result) -{ - // update the result - this->_result = result; -} - -IR_Repository::TAO_ClientRequestInfo_IR_Repository_get_primitive::TAO_ClientRequestInfo_IR_Repository_get_primitive ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - IR_PrimitiveKind & kind, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - kind_ (kind) -{} - -Dynamic::ParameterList * -IR_Repository::TAO_ClientRequestInfo_IR_Repository_get_primitive::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_kind = parameter_list->length (); - parameter_list->length (length_kind + 1); - (*parameter_list)[length_kind].argument <<= this->kind_; - - (*parameter_list)[length_kind].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_Repository::TAO_ClientRequestInfo_IR_Repository_get_primitive::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_Repository::TAO_ClientRequestInfo_IR_Repository_get_primitive::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_Repository::TAO_ClientRequestInfo_IR_Repository_get_primitive::result (IR_PrimitiveDef_ptr result) -{ - // update the result - this->_result = result; -} - -IR_Repository::TAO_ClientRequestInfo_IR_Repository_create_string::TAO_ClientRequestInfo_IR_Repository_create_string ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - const CORBA::ULong & bound, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - bound_ (bound) -{} - -Dynamic::ParameterList * -IR_Repository::TAO_ClientRequestInfo_IR_Repository_create_string::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_bound = parameter_list->length (); - parameter_list->length (length_bound + 1); - (*parameter_list)[length_bound].argument <<= bound_; - (*parameter_list)[length_bound].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_Repository::TAO_ClientRequestInfo_IR_Repository_create_string::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_Repository::TAO_ClientRequestInfo_IR_Repository_create_string::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_Repository::TAO_ClientRequestInfo_IR_Repository_create_string::result (IR_StringDef_ptr result) -{ - // update the result - this->_result = result; -} - -IR_Repository::TAO_ClientRequestInfo_IR_Repository_create_wstring::TAO_ClientRequestInfo_IR_Repository_create_wstring ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - const CORBA::ULong & bound, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - bound_ (bound) -{} - -Dynamic::ParameterList * -IR_Repository::TAO_ClientRequestInfo_IR_Repository_create_wstring::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_bound = parameter_list->length (); - parameter_list->length (length_bound + 1); - (*parameter_list)[length_bound].argument <<= bound_; - (*parameter_list)[length_bound].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_Repository::TAO_ClientRequestInfo_IR_Repository_create_wstring::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_Repository::TAO_ClientRequestInfo_IR_Repository_create_wstring::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_Repository::TAO_ClientRequestInfo_IR_Repository_create_wstring::result (IR_WstringDef_ptr result) -{ - // update the result - this->_result = result; -} - -IR_Repository::TAO_ClientRequestInfo_IR_Repository_create_sequence::TAO_ClientRequestInfo_IR_Repository_create_sequence ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - const CORBA::ULong & bound, - IR_IDLType_ptr element_type, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - bound_ (bound), - element_type_ (element_type) -{} - -Dynamic::ParameterList * -IR_Repository::TAO_ClientRequestInfo_IR_Repository_create_sequence::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_bound = parameter_list->length (); - parameter_list->length (length_bound + 1); - (*parameter_list)[length_bound].argument <<= bound_; - (*parameter_list)[length_bound].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_element_type = parameter_list->length (); - parameter_list->length (length_element_type + 1); - (*parameter_list)[length_element_type].argument <<= this->element_type_; - - (*parameter_list)[length_element_type].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_Repository::TAO_ClientRequestInfo_IR_Repository_create_sequence::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_Repository::TAO_ClientRequestInfo_IR_Repository_create_sequence::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_Repository::TAO_ClientRequestInfo_IR_Repository_create_sequence::result (IR_SequenceDef_ptr result) -{ - // update the result - this->_result = result; -} - -IR_Repository::TAO_ClientRequestInfo_IR_Repository_create_array::TAO_ClientRequestInfo_IR_Repository_create_array ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - const CORBA::ULong & length, - IR_IDLType_ptr element_type, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - length_ (length), - element_type_ (element_type) -{} - -Dynamic::ParameterList * -IR_Repository::TAO_ClientRequestInfo_IR_Repository_create_array::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_length = parameter_list->length (); - parameter_list->length (length_length + 1); - (*parameter_list)[length_length].argument <<= length_; - (*parameter_list)[length_length].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_element_type = parameter_list->length (); - parameter_list->length (length_element_type + 1); - (*parameter_list)[length_element_type].argument <<= this->element_type_; - - (*parameter_list)[length_element_type].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_Repository::TAO_ClientRequestInfo_IR_Repository_create_array::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_Repository::TAO_ClientRequestInfo_IR_Repository_create_array::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_Repository::TAO_ClientRequestInfo_IR_Repository_create_array::result (IR_ArrayDef_ptr result) -{ - // update the result - this->_result = result; -} - -IR_Repository::TAO_ClientRequestInfo_IR_Repository_create_fixed::TAO_ClientRequestInfo_IR_Repository_create_fixed ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - const CORBA::UShort & digits, - const CORBA::Short & scale, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - digits_ (digits), - scale_ (scale) -{} - -Dynamic::ParameterList * -IR_Repository::TAO_ClientRequestInfo_IR_Repository_create_fixed::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_digits = parameter_list->length (); - parameter_list->length (length_digits + 1); - (*parameter_list)[length_digits].argument <<= digits_; - (*parameter_list)[length_digits].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_scale = parameter_list->length (); - parameter_list->length (length_scale + 1); - (*parameter_list)[length_scale].argument <<= scale_; - (*parameter_list)[length_scale].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_Repository::TAO_ClientRequestInfo_IR_Repository_create_fixed::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_Repository::TAO_ClientRequestInfo_IR_Repository_create_fixed::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_Repository::TAO_ClientRequestInfo_IR_Repository_create_fixed::result (IR_FixedDef_ptr result) -{ - // update the result - this->_result = result; -} - -#endif /* TAO_HAS_INTERCEPTORS */ - static const CORBA::Long _oc_IR_Repository[] = { TAO_ENCAP_BYTE_ORDER, // byte order @@ -13439,156 +7357,61 @@ IR_ComponentDef_ptr _TAO_ComponentRepository_Remote_Proxy_Impl::create_component istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_ComponentRepository::TAO_ClientRequestInfo_IR_ComponentRepository_create_component ri ( - &_tao_call, - _collocated_tao_target_, - id, - name, - version, - base_component, - supports_interfaces, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << id) && + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << id) && (_tao_out << name) && (_tao_out << version) && (_tao_out << base_component) && (_tao_out << supports_interfaces) - )) - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::MARSHAL (), + )) + ACE_THROW_RETURN ( + CORBA::MARSHAL (), + 0 + ); + + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - IR_ComponentDef_ptr _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -13621,158 +7444,62 @@ IR_HomeDef_ptr _TAO_ComponentRepository_Remote_Proxy_Impl::create_home ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_ComponentRepository::TAO_ClientRequestInfo_IR_ComponentRepository_create_home ri ( - &_tao_call, - _collocated_tao_target_, - id, - name, - version, - base_home, - managed_component, - primary_key, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << id) && + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << id) && (_tao_out << name) && (_tao_out << version) && (_tao_out << base_home) && (_tao_out << managed_component) && (_tao_out << primary_key) - )) - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::MARSHAL (), + )) + ACE_THROW_RETURN ( + CORBA::MARSHAL (), + 0 + ); + + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - IR_HomeDef_ptr _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -13794,13 +7521,8 @@ _TAO_ComponentRepository_Proxy_Broker::~_TAO_ComponentRepository_Proxy_Broker (v { } -_TAO_ComponentRepository_Proxy_Broker * (*_TAO_ComponentRepository_Proxy_Broker_Factory_function_pointer) ( - CORBA::Object_ptr obj - ) = 0; - -// Factory Member function Implementation. -_TAO_ComponentRepository_Remote_Proxy_Broker * -_TAO_ComponentRepository_Remote_Proxy_Broker::the_TAO_ComponentRepository_Remote_Proxy_Broker (void) +// Factory function Implementation. +_TAO_ComponentRepository_Remote_Proxy_Broker *the_TAO_ComponentRepository_Remote_Proxy_Broker (void) { static ::_TAO_ComponentRepository_Remote_Proxy_Broker remote_proxy_broker; return &remote_proxy_broker; @@ -13834,7 +7556,7 @@ _TAO_ComponentRepository_Remote_Proxy_Broker::select_proxy ( // default constructor IR_ComponentRepository::IR_ComponentRepository (int collocated) { - this->IR_ComponentRepository_setup_collocation (collocated); + this->_tao_setup_collocation (collocated); } // destructor @@ -13842,16 +7564,16 @@ IR_ComponentRepository::~IR_ComponentRepository (void) {} void -IR_ComponentRepository::IR_ComponentRepository_setup_collocation (int collocated) +IR_ComponentRepository::_tao_setup_collocation (int collocated) { if (collocated) this->the_TAO_ComponentRepository_Proxy_Broker_ = _TAO_ComponentRepository_Proxy_Broker_Factory_function_pointer (this); else this->the_TAO_ComponentRepository_Proxy_Broker_ = - _TAO_ComponentRepository_Remote_Proxy_Broker::the_TAO_ComponentRepository_Remote_Proxy_Broker (); + ::the_TAO_ComponentRepository_Remote_Proxy_Broker (); - this->IR_Repository_setup_collocation (collocated); + IR_Repository::_tao_setup_collocation (collocated); } @@ -14053,207 +7775,6 @@ IR_HomeDef_ptr IR_ComponentRepository::create_home ( ); } -#if (TAO_HAS_INTERCEPTORS == 1) -IR_ComponentRepository::TAO_ClientRequestInfo_IR_ComponentRepository_create_component::TAO_ClientRequestInfo_IR_ComponentRepository_create_component ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - const char * id, - const char * name, - const char * version, - IR_ComponentDef_ptr base_component, - const IR_InterfaceDefSeq & supports_interfaces, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - id_ (id), - name_ (name), - version_ (version), - base_component_ (base_component), - supports_interfaces_ (supports_interfaces) -{} - -Dynamic::ParameterList * -IR_ComponentRepository::TAO_ClientRequestInfo_IR_ComponentRepository_create_component::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_id = parameter_list->length (); - parameter_list->length (length_id + 1); - (*parameter_list)[length_id].argument <<= id_; - (*parameter_list)[length_id].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_name = parameter_list->length (); - parameter_list->length (length_name + 1); - (*parameter_list)[length_name].argument <<= name_; - (*parameter_list)[length_name].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_version = parameter_list->length (); - parameter_list->length (length_version + 1); - (*parameter_list)[length_version].argument <<= version_; - (*parameter_list)[length_version].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_base_component = parameter_list->length (); - parameter_list->length (length_base_component + 1); - (*parameter_list)[length_base_component].argument <<= this->base_component_; - - (*parameter_list)[length_base_component].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_supports_interfaces = parameter_list->length (); - parameter_list->length (length_supports_interfaces + 1); - (*parameter_list)[length_supports_interfaces].argument <<= this->supports_interfaces_; - - (*parameter_list)[length_supports_interfaces].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_ComponentRepository::TAO_ClientRequestInfo_IR_ComponentRepository_create_component::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_ComponentRepository::TAO_ClientRequestInfo_IR_ComponentRepository_create_component::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_ComponentRepository::TAO_ClientRequestInfo_IR_ComponentRepository_create_component::result (IR_ComponentDef_ptr result) -{ - // update the result - this->_result = result; -} - -IR_ComponentRepository::TAO_ClientRequestInfo_IR_ComponentRepository_create_home::TAO_ClientRequestInfo_IR_ComponentRepository_create_home ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - const char * id, - const char * name, - const char * version, - IR_HomeDef_ptr base_home, - IR_ComponentDef_ptr managed_component, - IR_ValueDef_ptr primary_key, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - id_ (id), - name_ (name), - version_ (version), - base_home_ (base_home), - managed_component_ (managed_component), - primary_key_ (primary_key) -{} - -Dynamic::ParameterList * -IR_ComponentRepository::TAO_ClientRequestInfo_IR_ComponentRepository_create_home::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_id = parameter_list->length (); - parameter_list->length (length_id + 1); - (*parameter_list)[length_id].argument <<= id_; - (*parameter_list)[length_id].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_name = parameter_list->length (); - parameter_list->length (length_name + 1); - (*parameter_list)[length_name].argument <<= name_; - (*parameter_list)[length_name].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_version = parameter_list->length (); - parameter_list->length (length_version + 1); - (*parameter_list)[length_version].argument <<= version_; - (*parameter_list)[length_version].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_base_home = parameter_list->length (); - parameter_list->length (length_base_home + 1); - (*parameter_list)[length_base_home].argument <<= this->base_home_; - - (*parameter_list)[length_base_home].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_managed_component = parameter_list->length (); - parameter_list->length (length_managed_component + 1); - (*parameter_list)[length_managed_component].argument <<= this->managed_component_; - - (*parameter_list)[length_managed_component].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_primary_key = parameter_list->length (); - parameter_list->length (length_primary_key + 1); - (*parameter_list)[length_primary_key].argument <<= this->primary_key_; - - (*parameter_list)[length_primary_key].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_ComponentRepository::TAO_ClientRequestInfo_IR_ComponentRepository_create_home::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_ComponentRepository::TAO_ClientRequestInfo_IR_ComponentRepository_create_home::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_ComponentRepository::TAO_ClientRequestInfo_IR_ComponentRepository_create_home::result (IR_HomeDef_ptr result) -{ - // update the result - this->_result = result; -} - -#endif /* TAO_HAS_INTERCEPTORS */ - static const CORBA::Long _oc_IR_ComponentRepository[] = { TAO_ENCAP_BYTE_ORDER, // byte order @@ -14296,13 +7817,8 @@ _TAO_ModuleDef_Proxy_Broker::~_TAO_ModuleDef_Proxy_Broker (void) { } -_TAO_ModuleDef_Proxy_Broker * (*_TAO_ModuleDef_Proxy_Broker_Factory_function_pointer) ( - CORBA::Object_ptr obj - ) = 0; - -// Factory Member function Implementation. -_TAO_ModuleDef_Remote_Proxy_Broker * -_TAO_ModuleDef_Remote_Proxy_Broker::the_TAO_ModuleDef_Remote_Proxy_Broker (void) +// Factory function Implementation. +_TAO_ModuleDef_Remote_Proxy_Broker *the_TAO_ModuleDef_Remote_Proxy_Broker (void) { static ::_TAO_ModuleDef_Remote_Proxy_Broker remote_proxy_broker; return &remote_proxy_broker; @@ -14336,7 +7852,7 @@ _TAO_ModuleDef_Remote_Proxy_Broker::select_proxy ( // default constructor IR_ModuleDef::IR_ModuleDef (int collocated) { - this->IR_ModuleDef_setup_collocation (collocated); + this->_tao_setup_collocation (collocated); } // destructor @@ -14344,17 +7860,18 @@ IR_ModuleDef::~IR_ModuleDef (void) {} void -IR_ModuleDef::IR_ModuleDef_setup_collocation (int collocated) +IR_ModuleDef::_tao_setup_collocation (int collocated) { if (collocated) this->the_TAO_ModuleDef_Proxy_Broker_ = _TAO_ModuleDef_Proxy_Broker_Factory_function_pointer (this); else this->the_TAO_ModuleDef_Proxy_Broker_ = - _TAO_ModuleDef_Remote_Proxy_Broker::the_TAO_ModuleDef_Remote_Proxy_Broker (); + ::the_TAO_ModuleDef_Remote_Proxy_Broker (); + + IR_Container::_tao_setup_collocation (collocated); + IR_Contained::_tao_setup_collocation (collocated); - this->IR_Container_setup_collocation (collocated); - this->IR_Contained_setup_collocation (collocated); } void IR_ModuleDef::_tao_any_destructor (void *x) @@ -14609,137 +8126,47 @@ CORBA::TypeCode_ptr _TAO_ConstantDef_Remote_Proxy_Impl::type ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_ConstantDef::TAO_ClientRequestInfo_IR_ConstantDef_type_get ri ( - &_tao_call, - _collocated_tao_target_, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), + 0 ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - CORBA::TypeCode_ptr _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -14766,137 +8193,47 @@ IR_IDLType_ptr _TAO_ConstantDef_Remote_Proxy_Impl::type_def ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_ConstantDef::TAO_ClientRequestInfo_IR_ConstantDef_type_def_get ri ( - &_tao_call, - _collocated_tao_target_, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), + 0 ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - IR_IDLType_ptr _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -14922,130 +8259,46 @@ void _TAO_ConstantDef_Remote_Proxy_Impl::type_def ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_ConstantDef::TAO_ClientRequestInfo_IR_ConstantDef_type_def_set ri ( - &_tao_call, - _collocated_tao_target_, - type_def, - ACE_TRY_ENV - ); - ACE_CHECK; - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK; - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK; - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << type_def) - )) - TAO_INTERCEPTOR_THROW ( - CORBA::MARSHAL () - ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) - ); - - } - - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK; - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK; + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), ACE_TRY_ENV ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV + ACE_CHECK; + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << type_def) + )) + ACE_THROW ( + CORBA::MARSHAL () ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK; -#endif /* TAO_HAS_INTERCEPTORS */ - - if (_invoke_status == TAO_INVOKE_RESTART) + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK; + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) { - _tao_call.restart_flag (1); - continue; + ACE_THROW ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) + ); } - - break; - } - + + break; + } + } CORBA::Any * _TAO_ConstantDef_Remote_Proxy_Impl::value ( @@ -15072,137 +8325,47 @@ CORBA::Any * _TAO_ConstantDef_Remote_Proxy_Impl::value ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_ConstantDef::TAO_ClientRequestInfo_IR_ConstantDef_value_get ri ( - &_tao_call, - _collocated_tao_target_, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), + 0 ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - CORBA::Any * _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -15228,130 +8391,46 @@ void _TAO_ConstantDef_Remote_Proxy_Impl::value ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_ConstantDef::TAO_ClientRequestInfo_IR_ConstantDef_value_set ri ( - &_tao_call, - _collocated_tao_target_, - value, - ACE_TRY_ENV - ); - ACE_CHECK; - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK; - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK; - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << value) - )) - TAO_INTERCEPTOR_THROW ( - CORBA::MARSHAL () - ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) - ); - - } - - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK; - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK; + + ACE_CHECK; + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), ACE_TRY_ENV ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV + ACE_CHECK; + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << value) + )) + ACE_THROW ( + CORBA::MARSHAL () ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK; -#endif /* TAO_HAS_INTERCEPTORS */ - - if (_invoke_status == TAO_INVOKE_RESTART) + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK; + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) { - _tao_call.restart_flag (1); - continue; + ACE_THROW ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) + ); } - - break; - } - + + break; + } } // @@ -15371,13 +8450,8 @@ _TAO_ConstantDef_Proxy_Broker::~_TAO_ConstantDef_Proxy_Broker (void) { } -_TAO_ConstantDef_Proxy_Broker * (*_TAO_ConstantDef_Proxy_Broker_Factory_function_pointer) ( - CORBA::Object_ptr obj - ) = 0; - -// Factory Member function Implementation. -_TAO_ConstantDef_Remote_Proxy_Broker * -_TAO_ConstantDef_Remote_Proxy_Broker::the_TAO_ConstantDef_Remote_Proxy_Broker (void) +// Factory function Implementation. +_TAO_ConstantDef_Remote_Proxy_Broker *the_TAO_ConstantDef_Remote_Proxy_Broker (void) { static ::_TAO_ConstantDef_Remote_Proxy_Broker remote_proxy_broker; return &remote_proxy_broker; @@ -15411,7 +8485,7 @@ _TAO_ConstantDef_Remote_Proxy_Broker::select_proxy ( // default constructor IR_ConstantDef::IR_ConstantDef (int collocated) { - this->IR_ConstantDef_setup_collocation (collocated); + this->_tao_setup_collocation (collocated); } // destructor @@ -15419,16 +8493,16 @@ IR_ConstantDef::~IR_ConstantDef (void) {} void -IR_ConstantDef::IR_ConstantDef_setup_collocation (int collocated) +IR_ConstantDef::_tao_setup_collocation (int collocated) { if (collocated) this->the_TAO_ConstantDef_Proxy_Broker_ = _TAO_ConstantDef_Proxy_Broker_Factory_function_pointer (this); else this->the_TAO_ConstantDef_Proxy_Broker_ = - _TAO_ConstantDef_Remote_Proxy_Broker::the_TAO_ConstantDef_Remote_Proxy_Broker (); + ::the_TAO_ConstantDef_Remote_Proxy_Broker (); - this->IR_Contained_setup_collocation (collocated); + IR_Contained::_tao_setup_collocation (collocated); } @@ -15638,288 +8712,6 @@ void IR_ConstantDef::value ( ); } -#if (TAO_HAS_INTERCEPTORS == 1) -IR_ConstantDef::TAO_ClientRequestInfo_IR_ConstantDef_type_get::TAO_ClientRequestInfo_IR_ConstantDef_type_get ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target) -{} - -Dynamic::ParameterList * -IR_ConstantDef::TAO_ClientRequestInfo_IR_ConstantDef_type_get::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return parameter_list; -} - -Dynamic::ExceptionList * -IR_ConstantDef::TAO_ClientRequestInfo_IR_ConstantDef_type_get::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_ConstantDef::TAO_ClientRequestInfo_IR_ConstantDef_type_get::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_ConstantDef::TAO_ClientRequestInfo_IR_ConstantDef_type_get::result (CORBA::TypeCode_ptr result) -{ - // update the result - this->_result = result; -} - -IR_ConstantDef::TAO_ClientRequestInfo_IR_ConstantDef_type_def_get::TAO_ClientRequestInfo_IR_ConstantDef_type_def_get ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target) -{} - -Dynamic::ParameterList * -IR_ConstantDef::TAO_ClientRequestInfo_IR_ConstantDef_type_def_get::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return parameter_list; -} - -Dynamic::ExceptionList * -IR_ConstantDef::TAO_ClientRequestInfo_IR_ConstantDef_type_def_get::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_ConstantDef::TAO_ClientRequestInfo_IR_ConstantDef_type_def_get::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_ConstantDef::TAO_ClientRequestInfo_IR_ConstantDef_type_def_get::result (IR_IDLType_ptr result) -{ - // update the result - this->_result = result; -} - -IR_ConstantDef::TAO_ClientRequestInfo_IR_ConstantDef_type_def_set::TAO_ClientRequestInfo_IR_ConstantDef_type_def_set ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - IR_IDLType_ptr type_def, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - type_def_ (type_def) -{} - -Dynamic::ParameterList * -IR_ConstantDef::TAO_ClientRequestInfo_IR_ConstantDef_type_def_set::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_type_def = parameter_list->length (); - parameter_list->length (length_type_def + 1); - (*parameter_list)[length_type_def].argument <<= this->type_def_; - - (*parameter_list)[length_type_def].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_ConstantDef::TAO_ClientRequestInfo_IR_ConstantDef_type_def_set::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_ConstantDef::TAO_ClientRequestInfo_IR_ConstantDef_type_def_set::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 1; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return result_any; -} - -IR_ConstantDef::TAO_ClientRequestInfo_IR_ConstantDef_value_get::TAO_ClientRequestInfo_IR_ConstantDef_value_get ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target) -{} - -Dynamic::ParameterList * -IR_ConstantDef::TAO_ClientRequestInfo_IR_ConstantDef_value_get::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return parameter_list; -} - -Dynamic::ExceptionList * -IR_ConstantDef::TAO_ClientRequestInfo_IR_ConstantDef_value_get::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_ConstantDef::TAO_ClientRequestInfo_IR_ConstantDef_value_get::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_ConstantDef::TAO_ClientRequestInfo_IR_ConstantDef_value_get::result (CORBA::Any * result) -{ - // update the result - this->_result = result; -} - -IR_ConstantDef::TAO_ClientRequestInfo_IR_ConstantDef_value_set::TAO_ClientRequestInfo_IR_ConstantDef_value_set ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - const CORBA::Any & value, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - value_ (value) -{} - -Dynamic::ParameterList * -IR_ConstantDef::TAO_ClientRequestInfo_IR_ConstantDef_value_set::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_value = parameter_list->length (); - parameter_list->length (length_value + 1); - (*parameter_list)[length_value].argument <<= value_; - (*parameter_list)[length_value].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_ConstantDef::TAO_ClientRequestInfo_IR_ConstantDef_value_set::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_ConstantDef::TAO_ClientRequestInfo_IR_ConstantDef_value_set::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 1; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return result_any; -} - -#endif /* TAO_HAS_INTERCEPTORS */ - static const CORBA::Long _oc_IR_ConstantDef[] = { TAO_ENCAP_BYTE_ORDER, // byte order @@ -16024,13 +8816,8 @@ _TAO_TypedefDef_Proxy_Broker::~_TAO_TypedefDef_Proxy_Broker (void) { } -_TAO_TypedefDef_Proxy_Broker * (*_TAO_TypedefDef_Proxy_Broker_Factory_function_pointer) ( - CORBA::Object_ptr obj - ) = 0; - -// Factory Member function Implementation. -_TAO_TypedefDef_Remote_Proxy_Broker * -_TAO_TypedefDef_Remote_Proxy_Broker::the_TAO_TypedefDef_Remote_Proxy_Broker (void) +// Factory function Implementation. +_TAO_TypedefDef_Remote_Proxy_Broker *the_TAO_TypedefDef_Remote_Proxy_Broker (void) { static ::_TAO_TypedefDef_Remote_Proxy_Broker remote_proxy_broker; return &remote_proxy_broker; @@ -16064,7 +8851,7 @@ _TAO_TypedefDef_Remote_Proxy_Broker::select_proxy ( // default constructor IR_TypedefDef::IR_TypedefDef (int collocated) { - this->IR_TypedefDef_setup_collocation (collocated); + this->_tao_setup_collocation (collocated); } // destructor @@ -16072,17 +8859,17 @@ IR_TypedefDef::~IR_TypedefDef (void) {} void -IR_TypedefDef::IR_TypedefDef_setup_collocation (int collocated) +IR_TypedefDef::_tao_setup_collocation (int collocated) { if (collocated) this->the_TAO_TypedefDef_Proxy_Broker_ = _TAO_TypedefDef_Proxy_Broker_Factory_function_pointer (this); else this->the_TAO_TypedefDef_Proxy_Broker_ = - _TAO_TypedefDef_Remote_Proxy_Broker::the_TAO_TypedefDef_Remote_Proxy_Broker (); + ::the_TAO_TypedefDef_Remote_Proxy_Broker (); - this->IR_Contained_setup_collocation (collocated); - this->IR_IDLType_setup_collocation (collocated); + IR_Contained::_tao_setup_collocation (collocated); + IR_IDLType::_tao_setup_collocation (collocated); } @@ -16342,137 +9129,47 @@ IR_StructMemberSeq * _TAO_StructDef_Remote_Proxy_Impl::members ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_StructDef::TAO_ClientRequestInfo_IR_StructDef_members_get ri ( - &_tao_call, - _collocated_tao_target_, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), + 0 ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - IR_StructMemberSeq * _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -16498,130 +9195,45 @@ void _TAO_StructDef_Remote_Proxy_Impl::members ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_StructDef::TAO_ClientRequestInfo_IR_StructDef_members_set ri ( - &_tao_call, - _collocated_tao_target_, - members, - ACE_TRY_ENV - ); - ACE_CHECK; - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK; - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK; - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << members) - )) - TAO_INTERCEPTOR_THROW ( - CORBA::MARSHAL () - ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) - ); - - } - - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK; - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK; + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), ACE_TRY_ENV ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV + ACE_CHECK; + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << members) + )) + ACE_THROW ( + CORBA::MARSHAL () ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK; -#endif /* TAO_HAS_INTERCEPTORS */ - - if (_invoke_status == TAO_INVOKE_RESTART) + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK; + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) { - _tao_call.restart_flag (1); - continue; + ACE_THROW ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) + ); } - - break; - } - + + break; + } } @@ -16642,13 +9254,8 @@ _TAO_StructDef_Proxy_Broker::~_TAO_StructDef_Proxy_Broker (void) { } -_TAO_StructDef_Proxy_Broker * (*_TAO_StructDef_Proxy_Broker_Factory_function_pointer) ( - CORBA::Object_ptr obj - ) = 0; - -// Factory Member function Implementation. -_TAO_StructDef_Remote_Proxy_Broker * -_TAO_StructDef_Remote_Proxy_Broker::the_TAO_StructDef_Remote_Proxy_Broker (void) +// Factory function Implementation. +_TAO_StructDef_Remote_Proxy_Broker *the_TAO_StructDef_Remote_Proxy_Broker (void) { static ::_TAO_StructDef_Remote_Proxy_Broker remote_proxy_broker; return &remote_proxy_broker; @@ -16682,7 +9289,7 @@ _TAO_StructDef_Remote_Proxy_Broker::select_proxy ( // default constructor IR_StructDef::IR_StructDef (int collocated) { - this->IR_StructDef_setup_collocation (collocated); + this->_tao_setup_collocation (collocated); } // destructor @@ -16690,17 +9297,17 @@ IR_StructDef::~IR_StructDef (void) {} void -IR_StructDef::IR_StructDef_setup_collocation (int collocated) +IR_StructDef::_tao_setup_collocation (int collocated) { if (collocated) this->the_TAO_StructDef_Proxy_Broker_ = _TAO_StructDef_Proxy_Broker_Factory_function_pointer (this); else this->the_TAO_StructDef_Proxy_Broker_ = - _TAO_StructDef_Remote_Proxy_Broker::the_TAO_StructDef_Remote_Proxy_Broker (); + ::the_TAO_StructDef_Remote_Proxy_Broker (); - this->IR_TypedefDef_setup_collocation (collocated); - this->IR_Container_setup_collocation (collocated); + IR_TypedefDef::_tao_setup_collocation (collocated); + IR_Container::_tao_setup_collocation (collocated); } @@ -16908,121 +9515,6 @@ void IR_StructDef::members ( ); } -#if (TAO_HAS_INTERCEPTORS == 1) -IR_StructDef::TAO_ClientRequestInfo_IR_StructDef_members_get::TAO_ClientRequestInfo_IR_StructDef_members_get ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target) -{} - -Dynamic::ParameterList * -IR_StructDef::TAO_ClientRequestInfo_IR_StructDef_members_get::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return parameter_list; -} - -Dynamic::ExceptionList * -IR_StructDef::TAO_ClientRequestInfo_IR_StructDef_members_get::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_StructDef::TAO_ClientRequestInfo_IR_StructDef_members_get::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_StructDef::TAO_ClientRequestInfo_IR_StructDef_members_get::result (IR_StructMemberSeq * result) -{ - // update the result - this->_result = result; -} - -IR_StructDef::TAO_ClientRequestInfo_IR_StructDef_members_set::TAO_ClientRequestInfo_IR_StructDef_members_set ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - const IR_StructMemberSeq & members, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - members_ (members) -{} - -Dynamic::ParameterList * -IR_StructDef::TAO_ClientRequestInfo_IR_StructDef_members_set::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_members = parameter_list->length (); - parameter_list->length (length_members + 1); - (*parameter_list)[length_members].argument <<= this->members_; - - (*parameter_list)[length_members].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_StructDef::TAO_ClientRequestInfo_IR_StructDef_members_set::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_StructDef::TAO_ClientRequestInfo_IR_StructDef_members_set::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 1; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return result_any; -} - -#endif /* TAO_HAS_INTERCEPTORS */ - static const CORBA::Long _oc_IR_StructDef[] = { TAO_ENCAP_BYTE_ORDER, // byte order @@ -17070,137 +9562,47 @@ CORBA::TypeCode_ptr _TAO_UnionDef_Remote_Proxy_Impl::discriminator_type ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_UnionDef::TAO_ClientRequestInfo_IR_UnionDef_discriminator_type_get ri ( - &_tao_call, - _collocated_tao_target_, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), + 0 ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - CORBA::TypeCode_ptr _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -17227,137 +9629,47 @@ IR_IDLType_ptr _TAO_UnionDef_Remote_Proxy_Impl::discriminator_type_def ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_UnionDef::TAO_ClientRequestInfo_IR_UnionDef_discriminator_type_def_get ri ( - &_tao_call, - _collocated_tao_target_, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), + 0 ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - IR_IDLType_ptr _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -17383,130 +9695,45 @@ void _TAO_UnionDef_Remote_Proxy_Impl::discriminator_type_def ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_UnionDef::TAO_ClientRequestInfo_IR_UnionDef_discriminator_type_def_set ri ( - &_tao_call, - _collocated_tao_target_, - discriminator_type_def, - ACE_TRY_ENV - ); - ACE_CHECK; - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK; - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK; - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << discriminator_type_def) - )) - TAO_INTERCEPTOR_THROW ( - CORBA::MARSHAL () - ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) - ); - - } - - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK; - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK; + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), ACE_TRY_ENV ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV + ACE_CHECK; + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << discriminator_type_def) + )) + ACE_THROW ( + CORBA::MARSHAL () ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK; -#endif /* TAO_HAS_INTERCEPTORS */ - - if (_invoke_status == TAO_INVOKE_RESTART) + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK; + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) { - _tao_call.restart_flag (1); - continue; + ACE_THROW ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) + ); } - - break; - } - + + break; + } } IR_UnionMemberSeq * _TAO_UnionDef_Remote_Proxy_Impl::members ( @@ -17533,137 +9760,47 @@ IR_UnionMemberSeq * _TAO_UnionDef_Remote_Proxy_Impl::members ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_UnionDef::TAO_ClientRequestInfo_IR_UnionDef_members_get ri ( - &_tao_call, - _collocated_tao_target_, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), + 0 ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - IR_UnionMemberSeq * _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -17689,130 +9826,45 @@ void _TAO_UnionDef_Remote_Proxy_Impl::members ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_UnionDef::TAO_ClientRequestInfo_IR_UnionDef_members_set ri ( - &_tao_call, - _collocated_tao_target_, - members, - ACE_TRY_ENV - ); - ACE_CHECK; - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK; - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK; - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << members) - )) - TAO_INTERCEPTOR_THROW ( - CORBA::MARSHAL () - ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) - ); - - } - - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK; - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK; + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), ACE_TRY_ENV ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV + ACE_CHECK; + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << members) + )) + ACE_THROW ( + CORBA::MARSHAL () ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK; -#endif /* TAO_HAS_INTERCEPTORS */ - - if (_invoke_status == TAO_INVOKE_RESTART) + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK; + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) { - _tao_call.restart_flag (1); - continue; + ACE_THROW ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) + ); } - - break; - } - + + break; + } } @@ -17833,13 +9885,8 @@ _TAO_UnionDef_Proxy_Broker::~_TAO_UnionDef_Proxy_Broker (void) { } -_TAO_UnionDef_Proxy_Broker * (*_TAO_UnionDef_Proxy_Broker_Factory_function_pointer) ( - CORBA::Object_ptr obj - ) = 0; - -// Factory Member function Implementation. -_TAO_UnionDef_Remote_Proxy_Broker * -_TAO_UnionDef_Remote_Proxy_Broker::the_TAO_UnionDef_Remote_Proxy_Broker (void) +// Factory function Implementation. +_TAO_UnionDef_Remote_Proxy_Broker *the_TAO_UnionDef_Remote_Proxy_Broker (void) { static ::_TAO_UnionDef_Remote_Proxy_Broker remote_proxy_broker; return &remote_proxy_broker; @@ -17873,7 +9920,7 @@ _TAO_UnionDef_Remote_Proxy_Broker::select_proxy ( // default constructor IR_UnionDef::IR_UnionDef (int collocated) { - this->IR_UnionDef_setup_collocation (collocated); + this->_tao_setup_collocation (collocated); } // destructor @@ -17881,17 +9928,17 @@ IR_UnionDef::~IR_UnionDef (void) {} void -IR_UnionDef::IR_UnionDef_setup_collocation (int collocated) +IR_UnionDef::_tao_setup_collocation (int collocated) { if (collocated) this->the_TAO_UnionDef_Proxy_Broker_ = _TAO_UnionDef_Proxy_Broker_Factory_function_pointer (this); else this->the_TAO_UnionDef_Proxy_Broker_ = - _TAO_UnionDef_Remote_Proxy_Broker::the_TAO_UnionDef_Remote_Proxy_Broker (); + ::the_TAO_UnionDef_Remote_Proxy_Broker (); - this->IR_TypedefDef_setup_collocation (collocated); - this->IR_Container_setup_collocation (collocated); + IR_TypedefDef::_tao_setup_collocation (collocated); + IR_Container::_tao_setup_collocation (collocated); } void IR_UnionDef::_tao_any_destructor (void *x) @@ -18139,289 +10186,6 @@ void IR_UnionDef::members ( ); } -#if (TAO_HAS_INTERCEPTORS == 1) -IR_UnionDef::TAO_ClientRequestInfo_IR_UnionDef_discriminator_type_get::TAO_ClientRequestInfo_IR_UnionDef_discriminator_type_get ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target) -{} - -Dynamic::ParameterList * -IR_UnionDef::TAO_ClientRequestInfo_IR_UnionDef_discriminator_type_get::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return parameter_list; -} - -Dynamic::ExceptionList * -IR_UnionDef::TAO_ClientRequestInfo_IR_UnionDef_discriminator_type_get::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_UnionDef::TAO_ClientRequestInfo_IR_UnionDef_discriminator_type_get::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_UnionDef::TAO_ClientRequestInfo_IR_UnionDef_discriminator_type_get::result (CORBA::TypeCode_ptr result) -{ - // update the result - this->_result = result; -} - -IR_UnionDef::TAO_ClientRequestInfo_IR_UnionDef_discriminator_type_def_get::TAO_ClientRequestInfo_IR_UnionDef_discriminator_type_def_get ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target) -{} - -Dynamic::ParameterList * -IR_UnionDef::TAO_ClientRequestInfo_IR_UnionDef_discriminator_type_def_get::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return parameter_list; -} - -Dynamic::ExceptionList * -IR_UnionDef::TAO_ClientRequestInfo_IR_UnionDef_discriminator_type_def_get::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_UnionDef::TAO_ClientRequestInfo_IR_UnionDef_discriminator_type_def_get::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_UnionDef::TAO_ClientRequestInfo_IR_UnionDef_discriminator_type_def_get::result (IR_IDLType_ptr result) -{ - // update the result - this->_result = result; -} - -IR_UnionDef::TAO_ClientRequestInfo_IR_UnionDef_discriminator_type_def_set::TAO_ClientRequestInfo_IR_UnionDef_discriminator_type_def_set ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - IR_IDLType_ptr discriminator_type_def, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - discriminator_type_def_ (discriminator_type_def) -{} - -Dynamic::ParameterList * -IR_UnionDef::TAO_ClientRequestInfo_IR_UnionDef_discriminator_type_def_set::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_discriminator_type_def = parameter_list->length (); - parameter_list->length (length_discriminator_type_def + 1); - (*parameter_list)[length_discriminator_type_def].argument <<= this->discriminator_type_def_; - - (*parameter_list)[length_discriminator_type_def].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_UnionDef::TAO_ClientRequestInfo_IR_UnionDef_discriminator_type_def_set::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_UnionDef::TAO_ClientRequestInfo_IR_UnionDef_discriminator_type_def_set::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 1; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return result_any; -} - -IR_UnionDef::TAO_ClientRequestInfo_IR_UnionDef_members_get::TAO_ClientRequestInfo_IR_UnionDef_members_get ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target) -{} - -Dynamic::ParameterList * -IR_UnionDef::TAO_ClientRequestInfo_IR_UnionDef_members_get::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return parameter_list; -} - -Dynamic::ExceptionList * -IR_UnionDef::TAO_ClientRequestInfo_IR_UnionDef_members_get::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_UnionDef::TAO_ClientRequestInfo_IR_UnionDef_members_get::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_UnionDef::TAO_ClientRequestInfo_IR_UnionDef_members_get::result (IR_UnionMemberSeq * result) -{ - // update the result - this->_result = result; -} - -IR_UnionDef::TAO_ClientRequestInfo_IR_UnionDef_members_set::TAO_ClientRequestInfo_IR_UnionDef_members_set ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - const IR_UnionMemberSeq & members, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - members_ (members) -{} - -Dynamic::ParameterList * -IR_UnionDef::TAO_ClientRequestInfo_IR_UnionDef_members_set::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_members = parameter_list->length (); - parameter_list->length (length_members + 1); - (*parameter_list)[length_members].argument <<= this->members_; - - (*parameter_list)[length_members].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_UnionDef::TAO_ClientRequestInfo_IR_UnionDef_members_set::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_UnionDef::TAO_ClientRequestInfo_IR_UnionDef_members_set::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 1; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return result_any; -} - -#endif /* TAO_HAS_INTERCEPTORS */ - static const CORBA::Long _oc_IR_UnionDef[] = { TAO_ENCAP_BYTE_ORDER, // byte order @@ -18470,137 +10234,47 @@ IR_EnumMemberSeq * _TAO_EnumDef_Remote_Proxy_Impl::members ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_EnumDef::TAO_ClientRequestInfo_IR_EnumDef_members_get ri ( - &_tao_call, - _collocated_tao_target_, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), + 0 ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - IR_EnumMemberSeq * _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -18625,130 +10299,45 @@ void _TAO_EnumDef_Remote_Proxy_Impl::members ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_EnumDef::TAO_ClientRequestInfo_IR_EnumDef_members_set ri ( - &_tao_call, - _collocated_tao_target_, - members, - ACE_TRY_ENV - ); - ACE_CHECK; - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK; - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK; - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << members) - )) - TAO_INTERCEPTOR_THROW ( - CORBA::MARSHAL () - ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) - ); - - } - - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK; - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK; + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), ACE_TRY_ENV ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV + ACE_CHECK; + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << members) + )) + ACE_THROW ( + CORBA::MARSHAL () ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK; -#endif /* TAO_HAS_INTERCEPTORS */ - - if (_invoke_status == TAO_INVOKE_RESTART) + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK; + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) { - _tao_call.restart_flag (1); - continue; + ACE_THROW ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) + ); } - - break; - } - + + break; + } } @@ -18769,13 +10358,8 @@ _TAO_EnumDef_Proxy_Broker::~_TAO_EnumDef_Proxy_Broker (void) { } -_TAO_EnumDef_Proxy_Broker * (*_TAO_EnumDef_Proxy_Broker_Factory_function_pointer) ( - CORBA::Object_ptr obj - ) = 0; - -// Factory Member function Implementation. -_TAO_EnumDef_Remote_Proxy_Broker * -_TAO_EnumDef_Remote_Proxy_Broker::the_TAO_EnumDef_Remote_Proxy_Broker (void) +// Factory function Implementation. +_TAO_EnumDef_Remote_Proxy_Broker *the_TAO_EnumDef_Remote_Proxy_Broker (void) { static ::_TAO_EnumDef_Remote_Proxy_Broker remote_proxy_broker; return &remote_proxy_broker; @@ -18809,7 +10393,7 @@ _TAO_EnumDef_Remote_Proxy_Broker::select_proxy ( // default constructor IR_EnumDef::IR_EnumDef (int collocated) { - this->IR_EnumDef_setup_collocation (collocated); + this->_tao_setup_collocation (collocated); } // destructor @@ -18817,16 +10401,16 @@ IR_EnumDef::~IR_EnumDef (void) {} void -IR_EnumDef::IR_EnumDef_setup_collocation (int collocated) +IR_EnumDef::_tao_setup_collocation (int collocated) { if (collocated) this->the_TAO_EnumDef_Proxy_Broker_ = _TAO_EnumDef_Proxy_Broker_Factory_function_pointer (this); else this->the_TAO_EnumDef_Proxy_Broker_ = - _TAO_EnumDef_Remote_Proxy_Broker::the_TAO_EnumDef_Remote_Proxy_Broker (); + ::the_TAO_EnumDef_Remote_Proxy_Broker (); - this->IR_TypedefDef_setup_collocation (collocated); + IR_TypedefDef::_tao_setup_collocation (collocated); } @@ -19021,121 +10605,6 @@ void IR_EnumDef::members ( ); } -#if (TAO_HAS_INTERCEPTORS == 1) -IR_EnumDef::TAO_ClientRequestInfo_IR_EnumDef_members_get::TAO_ClientRequestInfo_IR_EnumDef_members_get ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target) -{} - -Dynamic::ParameterList * -IR_EnumDef::TAO_ClientRequestInfo_IR_EnumDef_members_get::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return parameter_list; -} - -Dynamic::ExceptionList * -IR_EnumDef::TAO_ClientRequestInfo_IR_EnumDef_members_get::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_EnumDef::TAO_ClientRequestInfo_IR_EnumDef_members_get::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_EnumDef::TAO_ClientRequestInfo_IR_EnumDef_members_get::result (IR_EnumMemberSeq * result) -{ - // update the result - this->_result = result; -} - -IR_EnumDef::TAO_ClientRequestInfo_IR_EnumDef_members_set::TAO_ClientRequestInfo_IR_EnumDef_members_set ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - const IR_EnumMemberSeq & members, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - members_ (members) -{} - -Dynamic::ParameterList * -IR_EnumDef::TAO_ClientRequestInfo_IR_EnumDef_members_set::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_members = parameter_list->length (); - parameter_list->length (length_members + 1); - (*parameter_list)[length_members].argument <<= this->members_; - - (*parameter_list)[length_members].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_EnumDef::TAO_ClientRequestInfo_IR_EnumDef_members_set::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_EnumDef::TAO_ClientRequestInfo_IR_EnumDef_members_set::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 1; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return result_any; -} - -#endif /* TAO_HAS_INTERCEPTORS */ - static const CORBA::Long _oc_IR_EnumDef[] = { TAO_ENCAP_BYTE_ORDER, // byte order @@ -19183,137 +10652,47 @@ IR_IDLType_ptr _TAO_AliasDef_Remote_Proxy_Impl::original_type_def ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_AliasDef::TAO_ClientRequestInfo_IR_AliasDef_original_type_def_get ri ( - &_tao_call, - _collocated_tao_target_, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), + 0 ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - IR_IDLType_ptr _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -19338,130 +10717,45 @@ void _TAO_AliasDef_Remote_Proxy_Impl::original_type_def ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_AliasDef::TAO_ClientRequestInfo_IR_AliasDef_original_type_def_set ri ( - &_tao_call, - _collocated_tao_target_, - original_type_def, - ACE_TRY_ENV - ); - ACE_CHECK; - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK; - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK; - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << original_type_def) - )) - TAO_INTERCEPTOR_THROW ( - CORBA::MARSHAL () - ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) - ); - - } - - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK; - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK; + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), ACE_TRY_ENV ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV + ACE_CHECK; + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << original_type_def) + )) + ACE_THROW ( + CORBA::MARSHAL () ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK; -#endif /* TAO_HAS_INTERCEPTORS */ - - if (_invoke_status == TAO_INVOKE_RESTART) + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK; + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) { - _tao_call.restart_flag (1); - continue; + ACE_THROW ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) + ); } - - break; - } - + + break; + } } @@ -19482,13 +10776,8 @@ _TAO_AliasDef_Proxy_Broker::~_TAO_AliasDef_Proxy_Broker (void) { } -_TAO_AliasDef_Proxy_Broker * (*_TAO_AliasDef_Proxy_Broker_Factory_function_pointer) ( - CORBA::Object_ptr obj - ) = 0; - -// Factory Member function Implementation. -_TAO_AliasDef_Remote_Proxy_Broker * -_TAO_AliasDef_Remote_Proxy_Broker::the_TAO_AliasDef_Remote_Proxy_Broker (void) +// Factory function Implementation. +_TAO_AliasDef_Remote_Proxy_Broker *the_TAO_AliasDef_Remote_Proxy_Broker (void) { static ::_TAO_AliasDef_Remote_Proxy_Broker remote_proxy_broker; return &remote_proxy_broker; @@ -19522,7 +10811,7 @@ _TAO_AliasDef_Remote_Proxy_Broker::select_proxy ( // default constructor IR_AliasDef::IR_AliasDef (int collocated) { - this->IR_AliasDef_setup_collocation (collocated); + this->_tao_setup_collocation (collocated); } // destructor @@ -19530,16 +10819,16 @@ IR_AliasDef::~IR_AliasDef (void) {} void -IR_AliasDef::IR_AliasDef_setup_collocation (int collocated) +IR_AliasDef::_tao_setup_collocation (int collocated) { if (collocated) this->the_TAO_AliasDef_Proxy_Broker_ = _TAO_AliasDef_Proxy_Broker_Factory_function_pointer (this); else this->the_TAO_AliasDef_Proxy_Broker_ = - _TAO_AliasDef_Remote_Proxy_Broker::the_TAO_AliasDef_Remote_Proxy_Broker (); + ::the_TAO_AliasDef_Remote_Proxy_Broker (); - this->IR_TypedefDef_setup_collocation (collocated); + IR_TypedefDef::_tao_setup_collocation (collocated); } @@ -19734,121 +11023,6 @@ void IR_AliasDef::original_type_def ( ); } -#if (TAO_HAS_INTERCEPTORS == 1) -IR_AliasDef::TAO_ClientRequestInfo_IR_AliasDef_original_type_def_get::TAO_ClientRequestInfo_IR_AliasDef_original_type_def_get ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target) -{} - -Dynamic::ParameterList * -IR_AliasDef::TAO_ClientRequestInfo_IR_AliasDef_original_type_def_get::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return parameter_list; -} - -Dynamic::ExceptionList * -IR_AliasDef::TAO_ClientRequestInfo_IR_AliasDef_original_type_def_get::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_AliasDef::TAO_ClientRequestInfo_IR_AliasDef_original_type_def_get::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_AliasDef::TAO_ClientRequestInfo_IR_AliasDef_original_type_def_get::result (IR_IDLType_ptr result) -{ - // update the result - this->_result = result; -} - -IR_AliasDef::TAO_ClientRequestInfo_IR_AliasDef_original_type_def_set::TAO_ClientRequestInfo_IR_AliasDef_original_type_def_set ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - IR_IDLType_ptr original_type_def, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - original_type_def_ (original_type_def) -{} - -Dynamic::ParameterList * -IR_AliasDef::TAO_ClientRequestInfo_IR_AliasDef_original_type_def_set::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_original_type_def = parameter_list->length (); - parameter_list->length (length_original_type_def + 1); - (*parameter_list)[length_original_type_def].argument <<= this->original_type_def_; - - (*parameter_list)[length_original_type_def].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_AliasDef::TAO_ClientRequestInfo_IR_AliasDef_original_type_def_set::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_AliasDef::TAO_ClientRequestInfo_IR_AliasDef_original_type_def_set::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 1; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return result_any; -} - -#endif /* TAO_HAS_INTERCEPTORS */ - static const CORBA::Long _oc_IR_AliasDef[] = { TAO_ENCAP_BYTE_ORDER, // byte order @@ -19891,13 +11065,8 @@ _TAO_NativeDef_Proxy_Broker::~_TAO_NativeDef_Proxy_Broker (void) { } -_TAO_NativeDef_Proxy_Broker * (*_TAO_NativeDef_Proxy_Broker_Factory_function_pointer) ( - CORBA::Object_ptr obj - ) = 0; - -// Factory Member function Implementation. -_TAO_NativeDef_Remote_Proxy_Broker * -_TAO_NativeDef_Remote_Proxy_Broker::the_TAO_NativeDef_Remote_Proxy_Broker (void) +// Factory function Implementation. +_TAO_NativeDef_Remote_Proxy_Broker *the_TAO_NativeDef_Remote_Proxy_Broker (void) { static ::_TAO_NativeDef_Remote_Proxy_Broker remote_proxy_broker; return &remote_proxy_broker; @@ -19931,7 +11100,7 @@ _TAO_NativeDef_Remote_Proxy_Broker::select_proxy ( // default constructor IR_NativeDef::IR_NativeDef (int collocated) { - this->IR_NativeDef_setup_collocation (collocated); + this->_tao_setup_collocation (collocated); } // destructor @@ -19939,18 +11108,19 @@ IR_NativeDef::~IR_NativeDef (void) {} void -IR_NativeDef::IR_NativeDef_setup_collocation (int collocated) +IR_NativeDef::_tao_setup_collocation (int collocated) { if (collocated) this->the_TAO_NativeDef_Proxy_Broker_ = _TAO_NativeDef_Proxy_Broker_Factory_function_pointer (this); else this->the_TAO_NativeDef_Proxy_Broker_ = - _TAO_NativeDef_Remote_Proxy_Broker::the_TAO_NativeDef_Remote_Proxy_Broker (); + ::the_TAO_NativeDef_Remote_Proxy_Broker (); - this->IR_TypedefDef_setup_collocation (collocated); -} + IR_TypedefDef::_tao_setup_collocation (collocated); +} + void IR_NativeDef::_tao_any_destructor (void *x) { IR_NativeDef *tmp = ACE_static_cast (IR_NativeDef*,x); @@ -20160,136 +11330,47 @@ IR_PrimitiveKind _TAO_PrimitiveDef_Remote_Proxy_Impl::kind ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_PrimitiveDef::TAO_ClientRequestInfo_IR_PrimitiveDef_kind_get ri ( - &_tao_call, - _collocated_tao_target_, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (_tao_retval); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (_tao_retval); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (_tao_retval); + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (_tao_retval); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), + _tao_retval ); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - _tao_retval - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_retval) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_retval) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), _tao_retval ); - - } - - TAO_INTERCEPTOR ( - IR_PrimitiveKind _tao_retval_info = _tao_retval; - ri.result (_tao_retval_info); - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (_tao_retval); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_retval; } @@ -20311,13 +11392,8 @@ _TAO_PrimitiveDef_Proxy_Broker::~_TAO_PrimitiveDef_Proxy_Broker (void) { } -_TAO_PrimitiveDef_Proxy_Broker * (*_TAO_PrimitiveDef_Proxy_Broker_Factory_function_pointer) ( - CORBA::Object_ptr obj - ) = 0; - -// Factory Member function Implementation. -_TAO_PrimitiveDef_Remote_Proxy_Broker * -_TAO_PrimitiveDef_Remote_Proxy_Broker::the_TAO_PrimitiveDef_Remote_Proxy_Broker (void) +// Factory function Implementation. +_TAO_PrimitiveDef_Remote_Proxy_Broker *the_TAO_PrimitiveDef_Remote_Proxy_Broker (void) { static ::_TAO_PrimitiveDef_Remote_Proxy_Broker remote_proxy_broker; return &remote_proxy_broker; @@ -20351,7 +11427,7 @@ _TAO_PrimitiveDef_Remote_Proxy_Broker::select_proxy ( // default constructor IR_PrimitiveDef::IR_PrimitiveDef (int collocated) { - this->IR_PrimitiveDef_setup_collocation (collocated); + this->_tao_setup_collocation (collocated); } // destructor @@ -20359,16 +11435,16 @@ IR_PrimitiveDef::~IR_PrimitiveDef (void) {} void -IR_PrimitiveDef::IR_PrimitiveDef_setup_collocation (int collocated) +IR_PrimitiveDef::_tao_setup_collocation (int collocated) { if (collocated) this->the_TAO_PrimitiveDef_Proxy_Broker_ = _TAO_PrimitiveDef_Proxy_Broker_Factory_function_pointer (this); else this->the_TAO_PrimitiveDef_Proxy_Broker_ = - _TAO_PrimitiveDef_Remote_Proxy_Broker::the_TAO_PrimitiveDef_Remote_Proxy_Broker (); + ::the_TAO_PrimitiveDef_Remote_Proxy_Broker (); - this->IR_IDLType_setup_collocation (collocated); + IR_IDLType::_tao_setup_collocation (collocated); } @@ -20522,65 +11598,6 @@ IR_PrimitiveKind IR_PrimitiveDef::kind ( ); } -#if (TAO_HAS_INTERCEPTORS == 1) -IR_PrimitiveDef::TAO_ClientRequestInfo_IR_PrimitiveDef_kind_get::TAO_ClientRequestInfo_IR_PrimitiveDef_kind_get ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target) -{} - -Dynamic::ParameterList * -IR_PrimitiveDef::TAO_ClientRequestInfo_IR_PrimitiveDef_kind_get::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return parameter_list; -} - -Dynamic::ExceptionList * -IR_PrimitiveDef::TAO_ClientRequestInfo_IR_PrimitiveDef_kind_get::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_PrimitiveDef::TAO_ClientRequestInfo_IR_PrimitiveDef_kind_get::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_PrimitiveDef::TAO_ClientRequestInfo_IR_PrimitiveDef_kind_get::result (IR_PrimitiveKind result) -{ - // update the result - this->_result = result; -} - -#endif /* TAO_HAS_INTERCEPTORS */ - static const CORBA::Long _oc_IR_PrimitiveDef[] = { TAO_ENCAP_BYTE_ORDER, // byte order @@ -20627,136 +11644,47 @@ CORBA::ULong _TAO_StringDef_Remote_Proxy_Impl::bound ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_StringDef::TAO_ClientRequestInfo_IR_StringDef_bound_get ri ( - &_tao_call, - _collocated_tao_target_, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (_tao_retval); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (_tao_retval); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (_tao_retval); + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (_tao_retval); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), + _tao_retval ); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - _tao_retval - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_retval) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_retval) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), _tao_retval ); - - } - - TAO_INTERCEPTOR ( - CORBA::ULong _tao_retval_info = _tao_retval; - ri.result (_tao_retval_info); - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (_tao_retval); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_retval; } @@ -20781,130 +11709,45 @@ void _TAO_StringDef_Remote_Proxy_Impl::bound ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_StringDef::TAO_ClientRequestInfo_IR_StringDef_bound_set ri ( - &_tao_call, - _collocated_tao_target_, - bound, - ACE_TRY_ENV - ); - ACE_CHECK; - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK; - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK; - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << bound) - )) - TAO_INTERCEPTOR_THROW ( - CORBA::MARSHAL () - ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) - ); - - } - - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK; - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK; + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), ACE_TRY_ENV ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV + ACE_CHECK; + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << bound) + )) + ACE_THROW ( + CORBA::MARSHAL () ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK; -#endif /* TAO_HAS_INTERCEPTORS */ - - if (_invoke_status == TAO_INVOKE_RESTART) + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK; + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) { - _tao_call.restart_flag (1); - continue; + ACE_THROW ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) + ); } - - break; - } - + + break; + } } @@ -20925,13 +11768,8 @@ _TAO_StringDef_Proxy_Broker::~_TAO_StringDef_Proxy_Broker (void) { } -_TAO_StringDef_Proxy_Broker * (*_TAO_StringDef_Proxy_Broker_Factory_function_pointer) ( - CORBA::Object_ptr obj - ) = 0; - -// Factory Member function Implementation. -_TAO_StringDef_Remote_Proxy_Broker * -_TAO_StringDef_Remote_Proxy_Broker::the_TAO_StringDef_Remote_Proxy_Broker (void) +// Factory function Implementation. +_TAO_StringDef_Remote_Proxy_Broker *the_TAO_StringDef_Remote_Proxy_Broker (void) { static ::_TAO_StringDef_Remote_Proxy_Broker remote_proxy_broker; return &remote_proxy_broker; @@ -20965,7 +11803,7 @@ _TAO_StringDef_Remote_Proxy_Broker::select_proxy ( // default constructor IR_StringDef::IR_StringDef (int collocated) { - this->IR_StringDef_setup_collocation (collocated); + this->_tao_setup_collocation (collocated); } // destructor @@ -20973,16 +11811,17 @@ IR_StringDef::~IR_StringDef (void) {} void -IR_StringDef::IR_StringDef_setup_collocation (int collocated) +IR_StringDef::_tao_setup_collocation (int collocated) { if (collocated) this->the_TAO_StringDef_Proxy_Broker_ = _TAO_StringDef_Proxy_Broker_Factory_function_pointer (this); else this->the_TAO_StringDef_Proxy_Broker_ = - _TAO_StringDef_Remote_Proxy_Broker::the_TAO_StringDef_Remote_Proxy_Broker (); + ::the_TAO_StringDef_Remote_Proxy_Broker (); + + IR_IDLType::_tao_setup_collocation (collocated); - this->IR_IDLType_setup_collocation (collocated); } void IR_StringDef::_tao_any_destructor (void *x) @@ -21150,120 +11989,6 @@ void IR_StringDef::bound ( ); } -#if (TAO_HAS_INTERCEPTORS == 1) -IR_StringDef::TAO_ClientRequestInfo_IR_StringDef_bound_get::TAO_ClientRequestInfo_IR_StringDef_bound_get ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target) -{} - -Dynamic::ParameterList * -IR_StringDef::TAO_ClientRequestInfo_IR_StringDef_bound_get::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return parameter_list; -} - -Dynamic::ExceptionList * -IR_StringDef::TAO_ClientRequestInfo_IR_StringDef_bound_get::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_StringDef::TAO_ClientRequestInfo_IR_StringDef_bound_get::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_StringDef::TAO_ClientRequestInfo_IR_StringDef_bound_get::result (CORBA::ULong result) -{ - // update the result - this->_result = result; -} - -IR_StringDef::TAO_ClientRequestInfo_IR_StringDef_bound_set::TAO_ClientRequestInfo_IR_StringDef_bound_set ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - const CORBA::ULong & bound, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - bound_ (bound) -{} - -Dynamic::ParameterList * -IR_StringDef::TAO_ClientRequestInfo_IR_StringDef_bound_set::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_bound = parameter_list->length (); - parameter_list->length (length_bound + 1); - (*parameter_list)[length_bound].argument <<= bound_; - (*parameter_list)[length_bound].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_StringDef::TAO_ClientRequestInfo_IR_StringDef_bound_set::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_StringDef::TAO_ClientRequestInfo_IR_StringDef_bound_set::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 1; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return result_any; -} - -#endif /* TAO_HAS_INTERCEPTORS */ - static const CORBA::Long _oc_IR_StringDef[] = { TAO_ENCAP_BYTE_ORDER, // byte order @@ -21310,136 +12035,47 @@ CORBA::ULong _TAO_WstringDef_Remote_Proxy_Impl::bound ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_WstringDef::TAO_ClientRequestInfo_IR_WstringDef_bound_get ri ( - &_tao_call, - _collocated_tao_target_, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (_tao_retval); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (_tao_retval); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (_tao_retval); + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (_tao_retval); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), + _tao_retval ); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - _tao_retval - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_retval) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_retval) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), _tao_retval ); - - } - - TAO_INTERCEPTOR ( - CORBA::ULong _tao_retval_info = _tao_retval; - ri.result (_tao_retval_info); - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (_tao_retval); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_retval; } @@ -21464,130 +12100,45 @@ void _TAO_WstringDef_Remote_Proxy_Impl::bound ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_WstringDef::TAO_ClientRequestInfo_IR_WstringDef_bound_set ri ( - &_tao_call, - _collocated_tao_target_, - bound, - ACE_TRY_ENV - ); - ACE_CHECK; - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK; - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK; - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << bound) - )) - TAO_INTERCEPTOR_THROW ( - CORBA::MARSHAL () - ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) - ); - - } - - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK; - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK; + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), ACE_TRY_ENV ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV + ACE_CHECK; + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << bound) + )) + ACE_THROW ( + CORBA::MARSHAL () ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK; -#endif /* TAO_HAS_INTERCEPTORS */ - - if (_invoke_status == TAO_INVOKE_RESTART) + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK; + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) { - _tao_call.restart_flag (1); - continue; + ACE_THROW ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) + ); } - - break; - } - + + break; + } } @@ -21608,13 +12159,8 @@ _TAO_WstringDef_Proxy_Broker::~_TAO_WstringDef_Proxy_Broker (void) { } -_TAO_WstringDef_Proxy_Broker * (*_TAO_WstringDef_Proxy_Broker_Factory_function_pointer) ( - CORBA::Object_ptr obj - ) = 0; - -// Factory Member function Implementation. -_TAO_WstringDef_Remote_Proxy_Broker * -_TAO_WstringDef_Remote_Proxy_Broker::the_TAO_WstringDef_Remote_Proxy_Broker (void) +// Factory function Implementation. +_TAO_WstringDef_Remote_Proxy_Broker *the_TAO_WstringDef_Remote_Proxy_Broker (void) { static ::_TAO_WstringDef_Remote_Proxy_Broker remote_proxy_broker; return &remote_proxy_broker; @@ -21648,7 +12194,7 @@ _TAO_WstringDef_Remote_Proxy_Broker::select_proxy ( // default constructor IR_WstringDef::IR_WstringDef (int collocated) { - this->IR_WstringDef_setup_collocation (collocated); + this->_tao_setup_collocation (collocated); } // destructor @@ -21656,16 +12202,16 @@ IR_WstringDef::~IR_WstringDef (void) {} void -IR_WstringDef::IR_WstringDef_setup_collocation (int collocated) +IR_WstringDef::_tao_setup_collocation (int collocated) { if (collocated) this->the_TAO_WstringDef_Proxy_Broker_ = _TAO_WstringDef_Proxy_Broker_Factory_function_pointer (this); else this->the_TAO_WstringDef_Proxy_Broker_ = - _TAO_WstringDef_Remote_Proxy_Broker::the_TAO_WstringDef_Remote_Proxy_Broker (); + ::the_TAO_WstringDef_Remote_Proxy_Broker (); - this->IR_IDLType_setup_collocation (collocated); + IR_IDLType::_tao_setup_collocation (collocated); } @@ -21836,120 +12382,6 @@ void IR_WstringDef::bound ( ); } -#if (TAO_HAS_INTERCEPTORS == 1) -IR_WstringDef::TAO_ClientRequestInfo_IR_WstringDef_bound_get::TAO_ClientRequestInfo_IR_WstringDef_bound_get ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target) -{} - -Dynamic::ParameterList * -IR_WstringDef::TAO_ClientRequestInfo_IR_WstringDef_bound_get::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return parameter_list; -} - -Dynamic::ExceptionList * -IR_WstringDef::TAO_ClientRequestInfo_IR_WstringDef_bound_get::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_WstringDef::TAO_ClientRequestInfo_IR_WstringDef_bound_get::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_WstringDef::TAO_ClientRequestInfo_IR_WstringDef_bound_get::result (CORBA::ULong result) -{ - // update the result - this->_result = result; -} - -IR_WstringDef::TAO_ClientRequestInfo_IR_WstringDef_bound_set::TAO_ClientRequestInfo_IR_WstringDef_bound_set ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - const CORBA::ULong & bound, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - bound_ (bound) -{} - -Dynamic::ParameterList * -IR_WstringDef::TAO_ClientRequestInfo_IR_WstringDef_bound_set::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_bound = parameter_list->length (); - parameter_list->length (length_bound + 1); - (*parameter_list)[length_bound].argument <<= bound_; - (*parameter_list)[length_bound].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_WstringDef::TAO_ClientRequestInfo_IR_WstringDef_bound_set::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_WstringDef::TAO_ClientRequestInfo_IR_WstringDef_bound_set::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 1; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return result_any; -} - -#endif /* TAO_HAS_INTERCEPTORS */ - static const CORBA::Long _oc_IR_WstringDef[] = { TAO_ENCAP_BYTE_ORDER, // byte order @@ -21999,136 +12431,47 @@ CORBA::UShort _TAO_FixedDef_Remote_Proxy_Impl::digits ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_FixedDef::TAO_ClientRequestInfo_IR_FixedDef_digits_get ri ( - &_tao_call, - _collocated_tao_target_, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (_tao_retval); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (_tao_retval); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (_tao_retval); + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (_tao_retval); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), + _tao_retval ); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - _tao_retval - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_retval) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_retval) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), _tao_retval ); - - } - - TAO_INTERCEPTOR ( - CORBA::UShort _tao_retval_info = _tao_retval; - ri.result (_tao_retval_info); - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (_tao_retval); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_retval; } @@ -22153,130 +12496,45 @@ void _TAO_FixedDef_Remote_Proxy_Impl::digits ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_FixedDef::TAO_ClientRequestInfo_IR_FixedDef_digits_set ri ( - &_tao_call, - _collocated_tao_target_, - digits, - ACE_TRY_ENV - ); - ACE_CHECK; - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK; - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK; - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << digits) - )) - TAO_INTERCEPTOR_THROW ( - CORBA::MARSHAL () - ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) - ); - - } - - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK; - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK; + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), ACE_TRY_ENV ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV + ACE_CHECK; + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << digits) + )) + ACE_THROW ( + CORBA::MARSHAL () ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK; -#endif /* TAO_HAS_INTERCEPTORS */ - - if (_invoke_status == TAO_INVOKE_RESTART) + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK; + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) { - _tao_call.restart_flag (1); - continue; + ACE_THROW ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) + ); } - - break; - } - + + break; + } } CORBA::Short _TAO_FixedDef_Remote_Proxy_Impl::scale ( @@ -22304,136 +12562,47 @@ CORBA::Short _TAO_FixedDef_Remote_Proxy_Impl::scale ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_FixedDef::TAO_ClientRequestInfo_IR_FixedDef_scale_get ri ( - &_tao_call, - _collocated_tao_target_, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (_tao_retval); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (_tao_retval); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (_tao_retval); + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (_tao_retval); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), + _tao_retval ); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - _tao_retval - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_retval) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_retval) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), _tao_retval ); - - } - - TAO_INTERCEPTOR ( - CORBA::Short _tao_retval_info = _tao_retval; - ri.result (_tao_retval_info); - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (_tao_retval); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_retval; } @@ -22458,130 +12627,45 @@ void _TAO_FixedDef_Remote_Proxy_Impl::scale ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_FixedDef::TAO_ClientRequestInfo_IR_FixedDef_scale_set ri ( - &_tao_call, - _collocated_tao_target_, - scale, - ACE_TRY_ENV - ); - ACE_CHECK; - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK; - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK; - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << scale) - )) - TAO_INTERCEPTOR_THROW ( - CORBA::MARSHAL () - ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) - ); - - } - - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK; - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK; + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), ACE_TRY_ENV ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV + ACE_CHECK; + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << scale) + )) + ACE_THROW ( + CORBA::MARSHAL () ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK; -#endif /* TAO_HAS_INTERCEPTORS */ - - if (_invoke_status == TAO_INVOKE_RESTART) + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK; + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) { - _tao_call.restart_flag (1); - continue; + ACE_THROW ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) + ); } - - break; - } - + + break; + } } @@ -22602,13 +12686,8 @@ _TAO_FixedDef_Proxy_Broker::~_TAO_FixedDef_Proxy_Broker (void) { } -_TAO_FixedDef_Proxy_Broker * (*_TAO_FixedDef_Proxy_Broker_Factory_function_pointer) ( - CORBA::Object_ptr obj - ) = 0; - -// Factory Member function Implementation. -_TAO_FixedDef_Remote_Proxy_Broker * -_TAO_FixedDef_Remote_Proxy_Broker::the_TAO_FixedDef_Remote_Proxy_Broker (void) +// Factory function Implementation. +_TAO_FixedDef_Remote_Proxy_Broker *the_TAO_FixedDef_Remote_Proxy_Broker (void) { static ::_TAO_FixedDef_Remote_Proxy_Broker remote_proxy_broker; return &remote_proxy_broker; @@ -22642,7 +12721,7 @@ _TAO_FixedDef_Remote_Proxy_Broker::select_proxy ( // default constructor IR_FixedDef::IR_FixedDef (int collocated) { - this->IR_FixedDef_setup_collocation (collocated); + this->_tao_setup_collocation (collocated); } // destructor @@ -22650,16 +12729,16 @@ IR_FixedDef::~IR_FixedDef (void) {} void -IR_FixedDef::IR_FixedDef_setup_collocation (int collocated) +IR_FixedDef::_tao_setup_collocation (int collocated) { if (collocated) this->the_TAO_FixedDef_Proxy_Broker_ = _TAO_FixedDef_Proxy_Broker_Factory_function_pointer (this); else this->the_TAO_FixedDef_Proxy_Broker_ = - _TAO_FixedDef_Remote_Proxy_Broker::the_TAO_FixedDef_Remote_Proxy_Broker (); + ::the_TAO_FixedDef_Remote_Proxy_Broker (); - this->IR_IDLType_setup_collocation (collocated); + IR_IDLType::_tao_setup_collocation (collocated); } @@ -22860,231 +12939,6 @@ void IR_FixedDef::scale ( ); } -#if (TAO_HAS_INTERCEPTORS == 1) -IR_FixedDef::TAO_ClientRequestInfo_IR_FixedDef_digits_get::TAO_ClientRequestInfo_IR_FixedDef_digits_get ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target) -{} - -Dynamic::ParameterList * -IR_FixedDef::TAO_ClientRequestInfo_IR_FixedDef_digits_get::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return parameter_list; -} - -Dynamic::ExceptionList * -IR_FixedDef::TAO_ClientRequestInfo_IR_FixedDef_digits_get::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_FixedDef::TAO_ClientRequestInfo_IR_FixedDef_digits_get::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_FixedDef::TAO_ClientRequestInfo_IR_FixedDef_digits_get::result (CORBA::UShort result) -{ - // update the result - this->_result = result; -} - -IR_FixedDef::TAO_ClientRequestInfo_IR_FixedDef_digits_set::TAO_ClientRequestInfo_IR_FixedDef_digits_set ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - const CORBA::UShort & digits, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - digits_ (digits) -{} - -Dynamic::ParameterList * -IR_FixedDef::TAO_ClientRequestInfo_IR_FixedDef_digits_set::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_digits = parameter_list->length (); - parameter_list->length (length_digits + 1); - (*parameter_list)[length_digits].argument <<= digits_; - (*parameter_list)[length_digits].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_FixedDef::TAO_ClientRequestInfo_IR_FixedDef_digits_set::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_FixedDef::TAO_ClientRequestInfo_IR_FixedDef_digits_set::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 1; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return result_any; -} - -IR_FixedDef::TAO_ClientRequestInfo_IR_FixedDef_scale_get::TAO_ClientRequestInfo_IR_FixedDef_scale_get ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target) -{} - -Dynamic::ParameterList * -IR_FixedDef::TAO_ClientRequestInfo_IR_FixedDef_scale_get::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return parameter_list; -} - -Dynamic::ExceptionList * -IR_FixedDef::TAO_ClientRequestInfo_IR_FixedDef_scale_get::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_FixedDef::TAO_ClientRequestInfo_IR_FixedDef_scale_get::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_FixedDef::TAO_ClientRequestInfo_IR_FixedDef_scale_get::result (CORBA::Short result) -{ - // update the result - this->_result = result; -} - -IR_FixedDef::TAO_ClientRequestInfo_IR_FixedDef_scale_set::TAO_ClientRequestInfo_IR_FixedDef_scale_set ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - const CORBA::Short & scale, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - scale_ (scale) -{} - -Dynamic::ParameterList * -IR_FixedDef::TAO_ClientRequestInfo_IR_FixedDef_scale_set::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_scale = parameter_list->length (); - parameter_list->length (length_scale + 1); - (*parameter_list)[length_scale].argument <<= scale_; - (*parameter_list)[length_scale].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_FixedDef::TAO_ClientRequestInfo_IR_FixedDef_scale_set::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_FixedDef::TAO_ClientRequestInfo_IR_FixedDef_scale_set::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 1; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return result_any; -} - -#endif /* TAO_HAS_INTERCEPTORS */ - static const CORBA::Long _oc_IR_FixedDef[] = { TAO_ENCAP_BYTE_ORDER, // byte order @@ -23134,136 +12988,47 @@ CORBA::ULong _TAO_SequenceDef_Remote_Proxy_Impl::bound ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_SequenceDef::TAO_ClientRequestInfo_IR_SequenceDef_bound_get ri ( - &_tao_call, - _collocated_tao_target_, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (_tao_retval); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (_tao_retval); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (_tao_retval); + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (_tao_retval); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), + _tao_retval ); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - _tao_retval - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_retval) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_retval) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), _tao_retval ); - - } - - TAO_INTERCEPTOR ( - CORBA::ULong _tao_retval_info = _tao_retval; - ri.result (_tao_retval_info); - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (_tao_retval); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_retval; } @@ -23288,130 +13053,45 @@ void _TAO_SequenceDef_Remote_Proxy_Impl::bound ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_SequenceDef::TAO_ClientRequestInfo_IR_SequenceDef_bound_set ri ( - &_tao_call, - _collocated_tao_target_, - bound, - ACE_TRY_ENV - ); - ACE_CHECK; - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK; - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK; - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << bound) - )) - TAO_INTERCEPTOR_THROW ( - CORBA::MARSHAL () - ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) - ); - - } - - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK; - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK; + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), ACE_TRY_ENV ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV + ACE_CHECK; + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << bound) + )) + ACE_THROW ( + CORBA::MARSHAL () ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK; -#endif /* TAO_HAS_INTERCEPTORS */ - - if (_invoke_status == TAO_INVOKE_RESTART) + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK; + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) { - _tao_call.restart_flag (1); - continue; + ACE_THROW ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) + ); } - - break; - } - + + break; + } } CORBA::TypeCode_ptr _TAO_SequenceDef_Remote_Proxy_Impl::element_type ( @@ -23440,137 +13120,47 @@ CORBA::TypeCode_ptr _TAO_SequenceDef_Remote_Proxy_Impl::element_type ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_SequenceDef::TAO_ClientRequestInfo_IR_SequenceDef_element_type_get ri ( - &_tao_call, - _collocated_tao_target_, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), + 0 ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - CORBA::TypeCode_ptr _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -23600,137 +13190,47 @@ IR_IDLType_ptr _TAO_SequenceDef_Remote_Proxy_Impl::element_type_def ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_SequenceDef::TAO_ClientRequestInfo_IR_SequenceDef_element_type_def_get ri ( - &_tao_call, - _collocated_tao_target_, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), + 0 ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - IR_IDLType_ptr _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -23755,130 +13255,45 @@ void _TAO_SequenceDef_Remote_Proxy_Impl::element_type_def ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_SequenceDef::TAO_ClientRequestInfo_IR_SequenceDef_element_type_def_set ri ( - &_tao_call, - _collocated_tao_target_, - element_type_def, - ACE_TRY_ENV - ); - ACE_CHECK; - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK; - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK; - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << element_type_def) - )) - TAO_INTERCEPTOR_THROW ( - CORBA::MARSHAL () - ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) - ); - - } - - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK; - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK; + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), ACE_TRY_ENV ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV + ACE_CHECK; + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << element_type_def) + )) + ACE_THROW ( + CORBA::MARSHAL () ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK; -#endif /* TAO_HAS_INTERCEPTORS */ - - if (_invoke_status == TAO_INVOKE_RESTART) + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK; + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) { - _tao_call.restart_flag (1); - continue; + ACE_THROW ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) + ); } - - break; - } - + + break; + } } @@ -23899,13 +13314,8 @@ _TAO_SequenceDef_Proxy_Broker::~_TAO_SequenceDef_Proxy_Broker (void) { } -_TAO_SequenceDef_Proxy_Broker * (*_TAO_SequenceDef_Proxy_Broker_Factory_function_pointer) ( - CORBA::Object_ptr obj - ) = 0; - -// Factory Member function Implementation. -_TAO_SequenceDef_Remote_Proxy_Broker * -_TAO_SequenceDef_Remote_Proxy_Broker::the_TAO_SequenceDef_Remote_Proxy_Broker (void) +// Factory function Implementation. +_TAO_SequenceDef_Remote_Proxy_Broker *the_TAO_SequenceDef_Remote_Proxy_Broker (void) { static ::_TAO_SequenceDef_Remote_Proxy_Broker remote_proxy_broker; return &remote_proxy_broker; @@ -23939,7 +13349,7 @@ _TAO_SequenceDef_Remote_Proxy_Broker::select_proxy ( // default constructor IR_SequenceDef::IR_SequenceDef (int collocated) { - this->IR_SequenceDef_setup_collocation (collocated); + this->_tao_setup_collocation (collocated); } // destructor @@ -23947,16 +13357,17 @@ IR_SequenceDef::~IR_SequenceDef (void) {} void -IR_SequenceDef::IR_SequenceDef_setup_collocation (int collocated) +IR_SequenceDef::_tao_setup_collocation (int collocated) { if (collocated) this->the_TAO_SequenceDef_Proxy_Broker_ = _TAO_SequenceDef_Proxy_Broker_Factory_function_pointer (this); else this->the_TAO_SequenceDef_Proxy_Broker_ = - _TAO_SequenceDef_Remote_Proxy_Broker::the_TAO_SequenceDef_Remote_Proxy_Broker (); + ::the_TAO_SequenceDef_Remote_Proxy_Broker (); + + IR_IDLType::_tao_setup_collocation (collocated); - this->IR_IDLType_setup_collocation (collocated); } void IR_SequenceDef::_tao_any_destructor (void *x) @@ -24170,288 +13581,6 @@ void IR_SequenceDef::element_type_def ( ); } -#if (TAO_HAS_INTERCEPTORS == 1) -IR_SequenceDef::TAO_ClientRequestInfo_IR_SequenceDef_bound_get::TAO_ClientRequestInfo_IR_SequenceDef_bound_get ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target) -{} - -Dynamic::ParameterList * -IR_SequenceDef::TAO_ClientRequestInfo_IR_SequenceDef_bound_get::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return parameter_list; -} - -Dynamic::ExceptionList * -IR_SequenceDef::TAO_ClientRequestInfo_IR_SequenceDef_bound_get::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_SequenceDef::TAO_ClientRequestInfo_IR_SequenceDef_bound_get::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_SequenceDef::TAO_ClientRequestInfo_IR_SequenceDef_bound_get::result (CORBA::ULong result) -{ - // update the result - this->_result = result; -} - -IR_SequenceDef::TAO_ClientRequestInfo_IR_SequenceDef_bound_set::TAO_ClientRequestInfo_IR_SequenceDef_bound_set ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - const CORBA::ULong & bound, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - bound_ (bound) -{} - -Dynamic::ParameterList * -IR_SequenceDef::TAO_ClientRequestInfo_IR_SequenceDef_bound_set::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_bound = parameter_list->length (); - parameter_list->length (length_bound + 1); - (*parameter_list)[length_bound].argument <<= bound_; - (*parameter_list)[length_bound].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_SequenceDef::TAO_ClientRequestInfo_IR_SequenceDef_bound_set::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_SequenceDef::TAO_ClientRequestInfo_IR_SequenceDef_bound_set::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 1; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return result_any; -} - -IR_SequenceDef::TAO_ClientRequestInfo_IR_SequenceDef_element_type_get::TAO_ClientRequestInfo_IR_SequenceDef_element_type_get ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target) -{} - -Dynamic::ParameterList * -IR_SequenceDef::TAO_ClientRequestInfo_IR_SequenceDef_element_type_get::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return parameter_list; -} - -Dynamic::ExceptionList * -IR_SequenceDef::TAO_ClientRequestInfo_IR_SequenceDef_element_type_get::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_SequenceDef::TAO_ClientRequestInfo_IR_SequenceDef_element_type_get::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_SequenceDef::TAO_ClientRequestInfo_IR_SequenceDef_element_type_get::result (CORBA::TypeCode_ptr result) -{ - // update the result - this->_result = result; -} - -IR_SequenceDef::TAO_ClientRequestInfo_IR_SequenceDef_element_type_def_get::TAO_ClientRequestInfo_IR_SequenceDef_element_type_def_get ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target) -{} - -Dynamic::ParameterList * -IR_SequenceDef::TAO_ClientRequestInfo_IR_SequenceDef_element_type_def_get::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return parameter_list; -} - -Dynamic::ExceptionList * -IR_SequenceDef::TAO_ClientRequestInfo_IR_SequenceDef_element_type_def_get::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_SequenceDef::TAO_ClientRequestInfo_IR_SequenceDef_element_type_def_get::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_SequenceDef::TAO_ClientRequestInfo_IR_SequenceDef_element_type_def_get::result (IR_IDLType_ptr result) -{ - // update the result - this->_result = result; -} - -IR_SequenceDef::TAO_ClientRequestInfo_IR_SequenceDef_element_type_def_set::TAO_ClientRequestInfo_IR_SequenceDef_element_type_def_set ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - IR_IDLType_ptr element_type_def, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - element_type_def_ (element_type_def) -{} - -Dynamic::ParameterList * -IR_SequenceDef::TAO_ClientRequestInfo_IR_SequenceDef_element_type_def_set::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_element_type_def = parameter_list->length (); - parameter_list->length (length_element_type_def + 1); - (*parameter_list)[length_element_type_def].argument <<= this->element_type_def_; - - (*parameter_list)[length_element_type_def].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_SequenceDef::TAO_ClientRequestInfo_IR_SequenceDef_element_type_def_set::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_SequenceDef::TAO_ClientRequestInfo_IR_SequenceDef_element_type_def_set::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 1; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return result_any; -} - -#endif /* TAO_HAS_INTERCEPTORS */ - static const CORBA::Long _oc_IR_SequenceDef[] = { TAO_ENCAP_BYTE_ORDER, // byte order @@ -24501,136 +13630,47 @@ CORBA::ULong _TAO_ArrayDef_Remote_Proxy_Impl::length ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_ArrayDef::TAO_ClientRequestInfo_IR_ArrayDef_length_get ri ( - &_tao_call, - _collocated_tao_target_, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (_tao_retval); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (_tao_retval); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (_tao_retval); + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (_tao_retval); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), + _tao_retval ); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - _tao_retval - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_retval) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_retval) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), _tao_retval ); - - } - - TAO_INTERCEPTOR ( - CORBA::ULong _tao_retval_info = _tao_retval; - ri.result (_tao_retval_info); - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (_tao_retval); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_retval; } @@ -24655,130 +13695,45 @@ void _TAO_ArrayDef_Remote_Proxy_Impl::length ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_ArrayDef::TAO_ClientRequestInfo_IR_ArrayDef_length_set ri ( - &_tao_call, - _collocated_tao_target_, - length, - ACE_TRY_ENV - ); - ACE_CHECK; - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK; - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK; - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << length) - )) - TAO_INTERCEPTOR_THROW ( - CORBA::MARSHAL () - ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) - ); - - } - - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK; - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK; + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), ACE_TRY_ENV ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV + ACE_CHECK; + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << length) + )) + ACE_THROW ( + CORBA::MARSHAL () ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK; -#endif /* TAO_HAS_INTERCEPTORS */ - - if (_invoke_status == TAO_INVOKE_RESTART) + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK; + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) { - _tao_call.restart_flag (1); - continue; + ACE_THROW ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) + ); } - - break; - } - + + break; + } } CORBA::TypeCode_ptr _TAO_ArrayDef_Remote_Proxy_Impl::element_type ( @@ -24807,137 +13762,47 @@ CORBA::TypeCode_ptr _TAO_ArrayDef_Remote_Proxy_Impl::element_type ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_ArrayDef::TAO_ClientRequestInfo_IR_ArrayDef_element_type_get ri ( - &_tao_call, - _collocated_tao_target_, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), + 0 ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - CORBA::TypeCode_ptr _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -24967,137 +13832,47 @@ IR_IDLType_ptr _TAO_ArrayDef_Remote_Proxy_Impl::element_type_def ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_ArrayDef::TAO_ClientRequestInfo_IR_ArrayDef_element_type_def_get ri ( - &_tao_call, - _collocated_tao_target_, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), + 0 ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - IR_IDLType_ptr _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -25122,130 +13897,45 @@ void _TAO_ArrayDef_Remote_Proxy_Impl::element_type_def ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_ArrayDef::TAO_ClientRequestInfo_IR_ArrayDef_element_type_def_set ri ( - &_tao_call, - _collocated_tao_target_, - element_type_def, - ACE_TRY_ENV - ); - ACE_CHECK; - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK; - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK; - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << element_type_def) - )) - TAO_INTERCEPTOR_THROW ( - CORBA::MARSHAL () - ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) - ); - - } - - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK; - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK; + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), ACE_TRY_ENV ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV + ACE_CHECK; + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << element_type_def) + )) + ACE_THROW ( + CORBA::MARSHAL () ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK; -#endif /* TAO_HAS_INTERCEPTORS */ - - if (_invoke_status == TAO_INVOKE_RESTART) + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK; + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) { - _tao_call.restart_flag (1); - continue; + ACE_THROW ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) + ); } - - break; - } - + + break; + } } @@ -25266,13 +13956,8 @@ _TAO_ArrayDef_Proxy_Broker::~_TAO_ArrayDef_Proxy_Broker (void) { } -_TAO_ArrayDef_Proxy_Broker * (*_TAO_ArrayDef_Proxy_Broker_Factory_function_pointer) ( - CORBA::Object_ptr obj - ) = 0; - -// Factory Member function Implementation. -_TAO_ArrayDef_Remote_Proxy_Broker * -_TAO_ArrayDef_Remote_Proxy_Broker::the_TAO_ArrayDef_Remote_Proxy_Broker (void) +// Factory function Implementation. +_TAO_ArrayDef_Remote_Proxy_Broker *the_TAO_ArrayDef_Remote_Proxy_Broker (void) { static ::_TAO_ArrayDef_Remote_Proxy_Broker remote_proxy_broker; return &remote_proxy_broker; @@ -25306,7 +13991,7 @@ _TAO_ArrayDef_Remote_Proxy_Broker::select_proxy ( // default constructor IR_ArrayDef::IR_ArrayDef (int collocated) { - this->IR_ArrayDef_setup_collocation (collocated); + this->_tao_setup_collocation (collocated); } // destructor @@ -25314,16 +13999,17 @@ IR_ArrayDef::~IR_ArrayDef (void) {} void -IR_ArrayDef::IR_ArrayDef_setup_collocation (int collocated) +IR_ArrayDef::_tao_setup_collocation (int collocated) { if (collocated) this->the_TAO_ArrayDef_Proxy_Broker_ = _TAO_ArrayDef_Proxy_Broker_Factory_function_pointer (this); else this->the_TAO_ArrayDef_Proxy_Broker_ = - _TAO_ArrayDef_Remote_Proxy_Broker::the_TAO_ArrayDef_Remote_Proxy_Broker (); + ::the_TAO_ArrayDef_Remote_Proxy_Broker (); + + IR_IDLType::_tao_setup_collocation (collocated); - this->IR_IDLType_setup_collocation (collocated); } void IR_ArrayDef::_tao_any_destructor (void *x) @@ -25537,288 +14223,6 @@ void IR_ArrayDef::element_type_def ( ); } -#if (TAO_HAS_INTERCEPTORS == 1) -IR_ArrayDef::TAO_ClientRequestInfo_IR_ArrayDef_length_get::TAO_ClientRequestInfo_IR_ArrayDef_length_get ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target) -{} - -Dynamic::ParameterList * -IR_ArrayDef::TAO_ClientRequestInfo_IR_ArrayDef_length_get::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return parameter_list; -} - -Dynamic::ExceptionList * -IR_ArrayDef::TAO_ClientRequestInfo_IR_ArrayDef_length_get::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_ArrayDef::TAO_ClientRequestInfo_IR_ArrayDef_length_get::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_ArrayDef::TAO_ClientRequestInfo_IR_ArrayDef_length_get::result (CORBA::ULong result) -{ - // update the result - this->_result = result; -} - -IR_ArrayDef::TAO_ClientRequestInfo_IR_ArrayDef_length_set::TAO_ClientRequestInfo_IR_ArrayDef_length_set ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - const CORBA::ULong & length, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - length_ (length) -{} - -Dynamic::ParameterList * -IR_ArrayDef::TAO_ClientRequestInfo_IR_ArrayDef_length_set::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_length = parameter_list->length (); - parameter_list->length (length_length + 1); - (*parameter_list)[length_length].argument <<= length_; - (*parameter_list)[length_length].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_ArrayDef::TAO_ClientRequestInfo_IR_ArrayDef_length_set::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_ArrayDef::TAO_ClientRequestInfo_IR_ArrayDef_length_set::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 1; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return result_any; -} - -IR_ArrayDef::TAO_ClientRequestInfo_IR_ArrayDef_element_type_get::TAO_ClientRequestInfo_IR_ArrayDef_element_type_get ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target) -{} - -Dynamic::ParameterList * -IR_ArrayDef::TAO_ClientRequestInfo_IR_ArrayDef_element_type_get::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return parameter_list; -} - -Dynamic::ExceptionList * -IR_ArrayDef::TAO_ClientRequestInfo_IR_ArrayDef_element_type_get::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_ArrayDef::TAO_ClientRequestInfo_IR_ArrayDef_element_type_get::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_ArrayDef::TAO_ClientRequestInfo_IR_ArrayDef_element_type_get::result (CORBA::TypeCode_ptr result) -{ - // update the result - this->_result = result; -} - -IR_ArrayDef::TAO_ClientRequestInfo_IR_ArrayDef_element_type_def_get::TAO_ClientRequestInfo_IR_ArrayDef_element_type_def_get ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target) -{} - -Dynamic::ParameterList * -IR_ArrayDef::TAO_ClientRequestInfo_IR_ArrayDef_element_type_def_get::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return parameter_list; -} - -Dynamic::ExceptionList * -IR_ArrayDef::TAO_ClientRequestInfo_IR_ArrayDef_element_type_def_get::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_ArrayDef::TAO_ClientRequestInfo_IR_ArrayDef_element_type_def_get::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_ArrayDef::TAO_ClientRequestInfo_IR_ArrayDef_element_type_def_get::result (IR_IDLType_ptr result) -{ - // update the result - this->_result = result; -} - -IR_ArrayDef::TAO_ClientRequestInfo_IR_ArrayDef_element_type_def_set::TAO_ClientRequestInfo_IR_ArrayDef_element_type_def_set ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - IR_IDLType_ptr element_type_def, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - element_type_def_ (element_type_def) -{} - -Dynamic::ParameterList * -IR_ArrayDef::TAO_ClientRequestInfo_IR_ArrayDef_element_type_def_set::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_element_type_def = parameter_list->length (); - parameter_list->length (length_element_type_def + 1); - (*parameter_list)[length_element_type_def].argument <<= this->element_type_def_; - - (*parameter_list)[length_element_type_def].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_ArrayDef::TAO_ClientRequestInfo_IR_ArrayDef_element_type_def_set::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_ArrayDef::TAO_ClientRequestInfo_IR_ArrayDef_element_type_def_set::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 1; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return result_any; -} - -#endif /* TAO_HAS_INTERCEPTORS */ - static const CORBA::Long _oc_IR_ArrayDef[] = { TAO_ENCAP_BYTE_ORDER, // byte order @@ -25869,137 +14273,47 @@ CORBA::TypeCode_ptr _TAO_ExceptionDef_Remote_Proxy_Impl::type ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_ExceptionDef::TAO_ClientRequestInfo_IR_ExceptionDef_type_get ri ( - &_tao_call, - _collocated_tao_target_, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), + 0 ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - CORBA::TypeCode_ptr _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -26030,137 +14344,47 @@ IR_StructMemberSeq * _TAO_ExceptionDef_Remote_Proxy_Impl::members ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_ExceptionDef::TAO_ClientRequestInfo_IR_ExceptionDef_members_get ri ( - &_tao_call, - _collocated_tao_target_, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), + 0 ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - IR_StructMemberSeq * _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -26185,130 +14409,45 @@ void _TAO_ExceptionDef_Remote_Proxy_Impl::members ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_ExceptionDef::TAO_ClientRequestInfo_IR_ExceptionDef_members_set ri ( - &_tao_call, - _collocated_tao_target_, - members, - ACE_TRY_ENV - ); - ACE_CHECK; - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK; - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK; - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << members) - )) - TAO_INTERCEPTOR_THROW ( - CORBA::MARSHAL () - ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) - ); - - } - - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK; - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK; + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), ACE_TRY_ENV ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV + ACE_CHECK; + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << members) + )) + ACE_THROW ( + CORBA::MARSHAL () ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK; -#endif /* TAO_HAS_INTERCEPTORS */ - - if (_invoke_status == TAO_INVOKE_RESTART) + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK; + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) { - _tao_call.restart_flag (1); - continue; + ACE_THROW ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) + ); } - - break; - } - + + break; + } } @@ -26329,13 +14468,8 @@ _TAO_ExceptionDef_Proxy_Broker::~_TAO_ExceptionDef_Proxy_Broker (void) { } -_TAO_ExceptionDef_Proxy_Broker * (*_TAO_ExceptionDef_Proxy_Broker_Factory_function_pointer) ( - CORBA::Object_ptr obj - ) = 0; - -// Factory Member function Implementation. -_TAO_ExceptionDef_Remote_Proxy_Broker * -_TAO_ExceptionDef_Remote_Proxy_Broker::the_TAO_ExceptionDef_Remote_Proxy_Broker (void) +// Factory function Implementation. +_TAO_ExceptionDef_Remote_Proxy_Broker *the_TAO_ExceptionDef_Remote_Proxy_Broker (void) { static ::_TAO_ExceptionDef_Remote_Proxy_Broker remote_proxy_broker; return &remote_proxy_broker; @@ -26369,7 +14503,7 @@ _TAO_ExceptionDef_Remote_Proxy_Broker::select_proxy ( // default constructor IR_ExceptionDef::IR_ExceptionDef (int collocated) { - this->IR_ExceptionDef_setup_collocation (collocated); + this->_tao_setup_collocation (collocated); } // destructor @@ -26377,17 +14511,18 @@ IR_ExceptionDef::~IR_ExceptionDef (void) {} void -IR_ExceptionDef::IR_ExceptionDef_setup_collocation (int collocated) +IR_ExceptionDef::_tao_setup_collocation (int collocated) { if (collocated) this->the_TAO_ExceptionDef_Proxy_Broker_ = _TAO_ExceptionDef_Proxy_Broker_Factory_function_pointer (this); else this->the_TAO_ExceptionDef_Proxy_Broker_ = - _TAO_ExceptionDef_Remote_Proxy_Broker::the_TAO_ExceptionDef_Remote_Proxy_Broker (); + ::the_TAO_ExceptionDef_Remote_Proxy_Broker (); + + IR_Contained::_tao_setup_collocation (collocated); + IR_Container::_tao_setup_collocation (collocated); - this->IR_Contained_setup_collocation (collocated); - this->IR_Container_setup_collocation (collocated); } void IR_ExceptionDef::_tao_any_destructor (void *x) @@ -26584,177 +14719,6 @@ void IR_ExceptionDef::members ( ); } -#if (TAO_HAS_INTERCEPTORS == 1) -IR_ExceptionDef::TAO_ClientRequestInfo_IR_ExceptionDef_type_get::TAO_ClientRequestInfo_IR_ExceptionDef_type_get ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target) -{} - -Dynamic::ParameterList * -IR_ExceptionDef::TAO_ClientRequestInfo_IR_ExceptionDef_type_get::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return parameter_list; -} - -Dynamic::ExceptionList * -IR_ExceptionDef::TAO_ClientRequestInfo_IR_ExceptionDef_type_get::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_ExceptionDef::TAO_ClientRequestInfo_IR_ExceptionDef_type_get::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_ExceptionDef::TAO_ClientRequestInfo_IR_ExceptionDef_type_get::result (CORBA::TypeCode_ptr result) -{ - // update the result - this->_result = result; -} - -IR_ExceptionDef::TAO_ClientRequestInfo_IR_ExceptionDef_members_get::TAO_ClientRequestInfo_IR_ExceptionDef_members_get ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target) -{} - -Dynamic::ParameterList * -IR_ExceptionDef::TAO_ClientRequestInfo_IR_ExceptionDef_members_get::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return parameter_list; -} - -Dynamic::ExceptionList * -IR_ExceptionDef::TAO_ClientRequestInfo_IR_ExceptionDef_members_get::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_ExceptionDef::TAO_ClientRequestInfo_IR_ExceptionDef_members_get::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_ExceptionDef::TAO_ClientRequestInfo_IR_ExceptionDef_members_get::result (IR_StructMemberSeq * result) -{ - // update the result - this->_result = result; -} - -IR_ExceptionDef::TAO_ClientRequestInfo_IR_ExceptionDef_members_set::TAO_ClientRequestInfo_IR_ExceptionDef_members_set ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - const IR_StructMemberSeq & members, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - members_ (members) -{} - -Dynamic::ParameterList * -IR_ExceptionDef::TAO_ClientRequestInfo_IR_ExceptionDef_members_set::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_members = parameter_list->length (); - parameter_list->length (length_members + 1); - (*parameter_list)[length_members].argument <<= this->members_; - - (*parameter_list)[length_members].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_ExceptionDef::TAO_ClientRequestInfo_IR_ExceptionDef_members_set::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_ExceptionDef::TAO_ClientRequestInfo_IR_ExceptionDef_members_set::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 1; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return result_any; -} - -#endif /* TAO_HAS_INTERCEPTORS */ - static const CORBA::Long _oc_IR_ExceptionDef[] = { TAO_ENCAP_BYTE_ORDER, // byte order @@ -27163,137 +15127,47 @@ CORBA::TypeCode_ptr _TAO_AttributeDef_Remote_Proxy_Impl::type ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_AttributeDef::TAO_ClientRequestInfo_IR_AttributeDef_type_get ri ( - &_tao_call, - _collocated_tao_target_, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), + 0 ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - CORBA::TypeCode_ptr _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -27323,137 +15197,47 @@ IR_IDLType_ptr _TAO_AttributeDef_Remote_Proxy_Impl::type_def ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_AttributeDef::TAO_ClientRequestInfo_IR_AttributeDef_type_def_get ri ( - &_tao_call, - _collocated_tao_target_, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), + 0 ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - IR_IDLType_ptr _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -27478,130 +15262,45 @@ void _TAO_AttributeDef_Remote_Proxy_Impl::type_def ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_AttributeDef::TAO_ClientRequestInfo_IR_AttributeDef_type_def_set ri ( - &_tao_call, - _collocated_tao_target_, - type_def, - ACE_TRY_ENV - ); - ACE_CHECK; - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK; - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK; - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << type_def) - )) - TAO_INTERCEPTOR_THROW ( - CORBA::MARSHAL () - ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) - ); - - } - - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK; - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK; + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), ACE_TRY_ENV ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV + ACE_CHECK; + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << type_def) + )) + ACE_THROW ( + CORBA::MARSHAL () ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK; -#endif /* TAO_HAS_INTERCEPTORS */ - - if (_invoke_status == TAO_INVOKE_RESTART) + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK; + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) { - _tao_call.restart_flag (1); - continue; + ACE_THROW ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) + ); } - - break; - } - + + break; + } } IR_AttributeMode _TAO_AttributeDef_Remote_Proxy_Impl::mode ( @@ -27629,136 +15328,47 @@ IR_AttributeMode _TAO_AttributeDef_Remote_Proxy_Impl::mode ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_AttributeDef::TAO_ClientRequestInfo_IR_AttributeDef_mode_get ri ( - &_tao_call, - _collocated_tao_target_, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (_tao_retval); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (_tao_retval); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (_tao_retval); + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (_tao_retval); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), + _tao_retval ); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - _tao_retval - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_retval) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_retval) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), _tao_retval ); - - } - - TAO_INTERCEPTOR ( - IR_AttributeMode _tao_retval_info = _tao_retval; - ri.result (_tao_retval_info); - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (_tao_retval); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_retval; } @@ -27783,130 +15393,45 @@ void _TAO_AttributeDef_Remote_Proxy_Impl::mode ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_AttributeDef::TAO_ClientRequestInfo_IR_AttributeDef_mode_set ri ( - &_tao_call, - _collocated_tao_target_, - mode, - ACE_TRY_ENV - ); - ACE_CHECK; - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK; - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK; - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << mode) - )) - TAO_INTERCEPTOR_THROW ( - CORBA::MARSHAL () - ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) - ); - - } - - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK; - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK; + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), ACE_TRY_ENV ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV + ACE_CHECK; + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << mode) + )) + ACE_THROW ( + CORBA::MARSHAL () ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK; -#endif /* TAO_HAS_INTERCEPTORS */ - - if (_invoke_status == TAO_INVOKE_RESTART) + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK; + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) { - _tao_call.restart_flag (1); - continue; + ACE_THROW ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) + ); } - - break; - } - + + break; + } } @@ -27927,13 +15452,8 @@ _TAO_AttributeDef_Proxy_Broker::~_TAO_AttributeDef_Proxy_Broker (void) { } -_TAO_AttributeDef_Proxy_Broker * (*_TAO_AttributeDef_Proxy_Broker_Factory_function_pointer) ( - CORBA::Object_ptr obj - ) = 0; - -// Factory Member function Implementation. -_TAO_AttributeDef_Remote_Proxy_Broker * -_TAO_AttributeDef_Remote_Proxy_Broker::the_TAO_AttributeDef_Remote_Proxy_Broker (void) +// Factory function Implementation. +_TAO_AttributeDef_Remote_Proxy_Broker *the_TAO_AttributeDef_Remote_Proxy_Broker (void) { static ::_TAO_AttributeDef_Remote_Proxy_Broker remote_proxy_broker; return &remote_proxy_broker; @@ -27967,7 +15487,7 @@ _TAO_AttributeDef_Remote_Proxy_Broker::select_proxy ( // default constructor IR_AttributeDef::IR_AttributeDef (int collocated) { - this->IR_AttributeDef_setup_collocation (collocated); + this->_tao_setup_collocation (collocated); } // destructor @@ -27975,16 +15495,17 @@ IR_AttributeDef::~IR_AttributeDef (void) {} void -IR_AttributeDef::IR_AttributeDef_setup_collocation (int collocated) +IR_AttributeDef::_tao_setup_collocation (int collocated) { if (collocated) this->the_TAO_AttributeDef_Proxy_Broker_ = _TAO_AttributeDef_Proxy_Broker_Factory_function_pointer (this); else this->the_TAO_AttributeDef_Proxy_Broker_ = - _TAO_AttributeDef_Remote_Proxy_Broker::the_TAO_AttributeDef_Remote_Proxy_Broker (); + ::the_TAO_AttributeDef_Remote_Proxy_Broker (); + + IR_Contained::_tao_setup_collocation (collocated); - this->IR_Contained_setup_collocation (collocated); } void IR_AttributeDef::_tao_any_destructor (void *x) @@ -28198,289 +15719,6 @@ void IR_AttributeDef::mode ( ); } -#if (TAO_HAS_INTERCEPTORS == 1) -IR_AttributeDef::TAO_ClientRequestInfo_IR_AttributeDef_type_get::TAO_ClientRequestInfo_IR_AttributeDef_type_get ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target) -{} - -Dynamic::ParameterList * -IR_AttributeDef::TAO_ClientRequestInfo_IR_AttributeDef_type_get::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return parameter_list; -} - -Dynamic::ExceptionList * -IR_AttributeDef::TAO_ClientRequestInfo_IR_AttributeDef_type_get::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_AttributeDef::TAO_ClientRequestInfo_IR_AttributeDef_type_get::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_AttributeDef::TAO_ClientRequestInfo_IR_AttributeDef_type_get::result (CORBA::TypeCode_ptr result) -{ - // update the result - this->_result = result; -} - -IR_AttributeDef::TAO_ClientRequestInfo_IR_AttributeDef_type_def_get::TAO_ClientRequestInfo_IR_AttributeDef_type_def_get ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target) -{} - -Dynamic::ParameterList * -IR_AttributeDef::TAO_ClientRequestInfo_IR_AttributeDef_type_def_get::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return parameter_list; -} - -Dynamic::ExceptionList * -IR_AttributeDef::TAO_ClientRequestInfo_IR_AttributeDef_type_def_get::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_AttributeDef::TAO_ClientRequestInfo_IR_AttributeDef_type_def_get::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_AttributeDef::TAO_ClientRequestInfo_IR_AttributeDef_type_def_get::result (IR_IDLType_ptr result) -{ - // update the result - this->_result = result; -} - -IR_AttributeDef::TAO_ClientRequestInfo_IR_AttributeDef_type_def_set::TAO_ClientRequestInfo_IR_AttributeDef_type_def_set ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - IR_IDLType_ptr type_def, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - type_def_ (type_def) -{} - -Dynamic::ParameterList * -IR_AttributeDef::TAO_ClientRequestInfo_IR_AttributeDef_type_def_set::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_type_def = parameter_list->length (); - parameter_list->length (length_type_def + 1); - (*parameter_list)[length_type_def].argument <<= this->type_def_; - - (*parameter_list)[length_type_def].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_AttributeDef::TAO_ClientRequestInfo_IR_AttributeDef_type_def_set::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_AttributeDef::TAO_ClientRequestInfo_IR_AttributeDef_type_def_set::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 1; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return result_any; -} - -IR_AttributeDef::TAO_ClientRequestInfo_IR_AttributeDef_mode_get::TAO_ClientRequestInfo_IR_AttributeDef_mode_get ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target) -{} - -Dynamic::ParameterList * -IR_AttributeDef::TAO_ClientRequestInfo_IR_AttributeDef_mode_get::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return parameter_list; -} - -Dynamic::ExceptionList * -IR_AttributeDef::TAO_ClientRequestInfo_IR_AttributeDef_mode_get::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_AttributeDef::TAO_ClientRequestInfo_IR_AttributeDef_mode_get::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_AttributeDef::TAO_ClientRequestInfo_IR_AttributeDef_mode_get::result (IR_AttributeMode result) -{ - // update the result - this->_result = result; -} - -IR_AttributeDef::TAO_ClientRequestInfo_IR_AttributeDef_mode_set::TAO_ClientRequestInfo_IR_AttributeDef_mode_set ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - IR_AttributeMode & mode, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - mode_ (mode) -{} - -Dynamic::ParameterList * -IR_AttributeDef::TAO_ClientRequestInfo_IR_AttributeDef_mode_set::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_mode = parameter_list->length (); - parameter_list->length (length_mode + 1); - (*parameter_list)[length_mode].argument <<= this->mode_; - - (*parameter_list)[length_mode].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_AttributeDef::TAO_ClientRequestInfo_IR_AttributeDef_mode_set::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_AttributeDef::TAO_ClientRequestInfo_IR_AttributeDef_mode_set::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 1; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return result_any; -} - -#endif /* TAO_HAS_INTERCEPTORS */ - static const CORBA::Long _oc_IR_AttributeDef[] = { TAO_ENCAP_BYTE_ORDER, // byte order @@ -29024,137 +16262,47 @@ CORBA::TypeCode_ptr _TAO_OperationDef_Remote_Proxy_Impl::result ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_OperationDef::TAO_ClientRequestInfo_IR_OperationDef_result_get ri ( - &_tao_call, - _collocated_tao_target_, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), + 0 ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - CORBA::TypeCode_ptr _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -29184,137 +16332,47 @@ IR_IDLType_ptr _TAO_OperationDef_Remote_Proxy_Impl::result_def ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_OperationDef::TAO_ClientRequestInfo_IR_OperationDef_result_def_get ri ( - &_tao_call, - _collocated_tao_target_, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), + 0 ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - IR_IDLType_ptr _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -29339,130 +16397,45 @@ void _TAO_OperationDef_Remote_Proxy_Impl::result_def ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_OperationDef::TAO_ClientRequestInfo_IR_OperationDef_result_def_set ri ( - &_tao_call, - _collocated_tao_target_, - result_def, - ACE_TRY_ENV - ); - ACE_CHECK; - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK; - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK; - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << result_def) - )) - TAO_INTERCEPTOR_THROW ( - CORBA::MARSHAL () - ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) - ); - - } - - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK; - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK; + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), ACE_TRY_ENV ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV + ACE_CHECK; + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << result_def) + )) + ACE_THROW ( + CORBA::MARSHAL () ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK; -#endif /* TAO_HAS_INTERCEPTORS */ - - if (_invoke_status == TAO_INVOKE_RESTART) + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK; + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) { - _tao_call.restart_flag (1); - continue; + ACE_THROW ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) + ); } - - break; - } - + + break; + } } IR_ParDescriptionSeq * _TAO_OperationDef_Remote_Proxy_Impl::params ( @@ -29492,137 +16465,47 @@ IR_ParDescriptionSeq * _TAO_OperationDef_Remote_Proxy_Impl::params ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_OperationDef::TAO_ClientRequestInfo_IR_OperationDef_params_get ri ( - &_tao_call, - _collocated_tao_target_, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), + 0 ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - IR_ParDescriptionSeq * _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -29647,130 +16530,45 @@ void _TAO_OperationDef_Remote_Proxy_Impl::params ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_OperationDef::TAO_ClientRequestInfo_IR_OperationDef_params_set ri ( - &_tao_call, - _collocated_tao_target_, - params, - ACE_TRY_ENV - ); - ACE_CHECK; - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK; - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK; - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << params) - )) - TAO_INTERCEPTOR_THROW ( - CORBA::MARSHAL () - ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) - ); - - } - - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK; - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK; + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), ACE_TRY_ENV ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV + ACE_CHECK; + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << params) + )) + ACE_THROW ( + CORBA::MARSHAL () ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK; -#endif /* TAO_HAS_INTERCEPTORS */ - - if (_invoke_status == TAO_INVOKE_RESTART) + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK; + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) { - _tao_call.restart_flag (1); - continue; + ACE_THROW ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) + ); } - - break; - } - + + break; + } } IR_OperationMode _TAO_OperationDef_Remote_Proxy_Impl::mode ( @@ -29798,136 +16596,47 @@ IR_OperationMode _TAO_OperationDef_Remote_Proxy_Impl::mode ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_OperationDef::TAO_ClientRequestInfo_IR_OperationDef_mode_get ri ( - &_tao_call, - _collocated_tao_target_, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (_tao_retval); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (_tao_retval); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (_tao_retval); + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (_tao_retval); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), + _tao_retval ); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - _tao_retval - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_retval) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_retval) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), _tao_retval ); - - } - - TAO_INTERCEPTOR ( - IR_OperationMode _tao_retval_info = _tao_retval; - ri.result (_tao_retval_info); - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (_tao_retval); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_retval; } @@ -29952,130 +16661,45 @@ void _TAO_OperationDef_Remote_Proxy_Impl::mode ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_OperationDef::TAO_ClientRequestInfo_IR_OperationDef_mode_set ri ( - &_tao_call, - _collocated_tao_target_, - mode, - ACE_TRY_ENV - ); - ACE_CHECK; - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK; - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK; - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << mode) - )) - TAO_INTERCEPTOR_THROW ( - CORBA::MARSHAL () - ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) - ); - - } - - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK; - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK; + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), ACE_TRY_ENV ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV + ACE_CHECK; + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << mode) + )) + ACE_THROW ( + CORBA::MARSHAL () ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK; -#endif /* TAO_HAS_INTERCEPTORS */ - - if (_invoke_status == TAO_INVOKE_RESTART) + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK; + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) { - _tao_call.restart_flag (1); - continue; + ACE_THROW ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) + ); } - - break; - } - + + break; + } } IR_ContextIdSeq * _TAO_OperationDef_Remote_Proxy_Impl::contexts ( @@ -30105,137 +16729,47 @@ IR_ContextIdSeq * _TAO_OperationDef_Remote_Proxy_Impl::contexts ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_OperationDef::TAO_ClientRequestInfo_IR_OperationDef_contexts_get ri ( - &_tao_call, - _collocated_tao_target_, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), + 0 ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - IR_ContextIdSeq * _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -30260,130 +16794,45 @@ void _TAO_OperationDef_Remote_Proxy_Impl::contexts ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_OperationDef::TAO_ClientRequestInfo_IR_OperationDef_contexts_set ri ( - &_tao_call, - _collocated_tao_target_, - contexts, - ACE_TRY_ENV - ); - ACE_CHECK; - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK; - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK; - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << contexts) - )) - TAO_INTERCEPTOR_THROW ( - CORBA::MARSHAL () - ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) - ); - - } - - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK; - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK; + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), ACE_TRY_ENV ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV + ACE_CHECK; + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << contexts) + )) + ACE_THROW ( + CORBA::MARSHAL () ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK; -#endif /* TAO_HAS_INTERCEPTORS */ - - if (_invoke_status == TAO_INVOKE_RESTART) + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK; + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) { - _tao_call.restart_flag (1); - continue; + ACE_THROW ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) + ); } - - break; - } - + + break; + } } IR_ExceptionDefSeq * _TAO_OperationDef_Remote_Proxy_Impl::exceptions ( @@ -30413,137 +16862,47 @@ IR_ExceptionDefSeq * _TAO_OperationDef_Remote_Proxy_Impl::exceptions ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_OperationDef::TAO_ClientRequestInfo_IR_OperationDef_exceptions_get ri ( - &_tao_call, - _collocated_tao_target_, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), + 0 ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - IR_ExceptionDefSeq * _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -30568,130 +16927,45 @@ void _TAO_OperationDef_Remote_Proxy_Impl::exceptions ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_OperationDef::TAO_ClientRequestInfo_IR_OperationDef_exceptions_set ri ( - &_tao_call, - _collocated_tao_target_, - exceptions, - ACE_TRY_ENV - ); - ACE_CHECK; - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK; - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK; - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << exceptions) - )) - TAO_INTERCEPTOR_THROW ( - CORBA::MARSHAL () - ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) - ); - - } - - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK; - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK; + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), ACE_TRY_ENV ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV + ACE_CHECK; + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << exceptions) + )) + ACE_THROW ( + CORBA::MARSHAL () ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK; -#endif /* TAO_HAS_INTERCEPTORS */ - - if (_invoke_status == TAO_INVOKE_RESTART) + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK; + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) { - _tao_call.restart_flag (1); - continue; + ACE_THROW ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) + ); } - - break; - } - + + break; + } } @@ -30712,13 +16986,8 @@ _TAO_OperationDef_Proxy_Broker::~_TAO_OperationDef_Proxy_Broker (void) { } -_TAO_OperationDef_Proxy_Broker * (*_TAO_OperationDef_Proxy_Broker_Factory_function_pointer) ( - CORBA::Object_ptr obj - ) = 0; - -// Factory Member function Implementation. -_TAO_OperationDef_Remote_Proxy_Broker * -_TAO_OperationDef_Remote_Proxy_Broker::the_TAO_OperationDef_Remote_Proxy_Broker (void) +// Factory function Implementation. +_TAO_OperationDef_Remote_Proxy_Broker *the_TAO_OperationDef_Remote_Proxy_Broker (void) { static ::_TAO_OperationDef_Remote_Proxy_Broker remote_proxy_broker; return &remote_proxy_broker; @@ -30752,7 +17021,7 @@ _TAO_OperationDef_Remote_Proxy_Broker::select_proxy ( // default constructor IR_OperationDef::IR_OperationDef (int collocated) { - this->IR_OperationDef_setup_collocation (collocated); + this->_tao_setup_collocation (collocated); } // destructor @@ -30760,16 +17029,17 @@ IR_OperationDef::~IR_OperationDef (void) {} void -IR_OperationDef::IR_OperationDef_setup_collocation (int collocated) +IR_OperationDef::_tao_setup_collocation (int collocated) { if (collocated) this->the_TAO_OperationDef_Proxy_Broker_ = _TAO_OperationDef_Proxy_Broker_Factory_function_pointer (this); else this->the_TAO_OperationDef_Proxy_Broker_ = - _TAO_OperationDef_Remote_Proxy_Broker::the_TAO_OperationDef_Remote_Proxy_Broker (); + ::the_TAO_OperationDef_Remote_Proxy_Broker (); + + IR_Contained::_tao_setup_collocation (collocated); - this->IR_Contained_setup_collocation (collocated); } void IR_OperationDef::_tao_any_destructor (void *x) @@ -31073,625 +17343,6 @@ void IR_OperationDef::exceptions ( ); } -#if (TAO_HAS_INTERCEPTORS == 1) -IR_OperationDef::TAO_ClientRequestInfo_IR_OperationDef_result_get::TAO_ClientRequestInfo_IR_OperationDef_result_get ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target) -{} - -Dynamic::ParameterList * -IR_OperationDef::TAO_ClientRequestInfo_IR_OperationDef_result_get::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return parameter_list; -} - -Dynamic::ExceptionList * -IR_OperationDef::TAO_ClientRequestInfo_IR_OperationDef_result_get::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_OperationDef::TAO_ClientRequestInfo_IR_OperationDef_result_get::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_OperationDef::TAO_ClientRequestInfo_IR_OperationDef_result_get::result (CORBA::TypeCode_ptr result) -{ - // update the result - this->_result = result; -} - -IR_OperationDef::TAO_ClientRequestInfo_IR_OperationDef_result_def_get::TAO_ClientRequestInfo_IR_OperationDef_result_def_get ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target) -{} - -Dynamic::ParameterList * -IR_OperationDef::TAO_ClientRequestInfo_IR_OperationDef_result_def_get::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return parameter_list; -} - -Dynamic::ExceptionList * -IR_OperationDef::TAO_ClientRequestInfo_IR_OperationDef_result_def_get::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_OperationDef::TAO_ClientRequestInfo_IR_OperationDef_result_def_get::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_OperationDef::TAO_ClientRequestInfo_IR_OperationDef_result_def_get::result (IR_IDLType_ptr result) -{ - // update the result - this->_result = result; -} - -IR_OperationDef::TAO_ClientRequestInfo_IR_OperationDef_result_def_set::TAO_ClientRequestInfo_IR_OperationDef_result_def_set ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - IR_IDLType_ptr result_def, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - result_def_ (result_def) -{} - -Dynamic::ParameterList * -IR_OperationDef::TAO_ClientRequestInfo_IR_OperationDef_result_def_set::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_result_def = parameter_list->length (); - parameter_list->length (length_result_def + 1); - (*parameter_list)[length_result_def].argument <<= this->result_def_; - - (*parameter_list)[length_result_def].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_OperationDef::TAO_ClientRequestInfo_IR_OperationDef_result_def_set::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_OperationDef::TAO_ClientRequestInfo_IR_OperationDef_result_def_set::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 1; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return result_any; -} - -IR_OperationDef::TAO_ClientRequestInfo_IR_OperationDef_params_get::TAO_ClientRequestInfo_IR_OperationDef_params_get ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target) -{} - -Dynamic::ParameterList * -IR_OperationDef::TAO_ClientRequestInfo_IR_OperationDef_params_get::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return parameter_list; -} - -Dynamic::ExceptionList * -IR_OperationDef::TAO_ClientRequestInfo_IR_OperationDef_params_get::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_OperationDef::TAO_ClientRequestInfo_IR_OperationDef_params_get::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_OperationDef::TAO_ClientRequestInfo_IR_OperationDef_params_get::result (IR_ParDescriptionSeq * result) -{ - // update the result - this->_result = result; -} - -IR_OperationDef::TAO_ClientRequestInfo_IR_OperationDef_params_set::TAO_ClientRequestInfo_IR_OperationDef_params_set ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - const IR_ParDescriptionSeq & params, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - params_ (params) -{} - -Dynamic::ParameterList * -IR_OperationDef::TAO_ClientRequestInfo_IR_OperationDef_params_set::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_params = parameter_list->length (); - parameter_list->length (length_params + 1); - (*parameter_list)[length_params].argument <<= this->params_; - - (*parameter_list)[length_params].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_OperationDef::TAO_ClientRequestInfo_IR_OperationDef_params_set::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_OperationDef::TAO_ClientRequestInfo_IR_OperationDef_params_set::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 1; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return result_any; -} - -IR_OperationDef::TAO_ClientRequestInfo_IR_OperationDef_mode_get::TAO_ClientRequestInfo_IR_OperationDef_mode_get ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target) -{} - -Dynamic::ParameterList * -IR_OperationDef::TAO_ClientRequestInfo_IR_OperationDef_mode_get::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return parameter_list; -} - -Dynamic::ExceptionList * -IR_OperationDef::TAO_ClientRequestInfo_IR_OperationDef_mode_get::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_OperationDef::TAO_ClientRequestInfo_IR_OperationDef_mode_get::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_OperationDef::TAO_ClientRequestInfo_IR_OperationDef_mode_get::result (IR_OperationMode result) -{ - // update the result - this->_result = result; -} - -IR_OperationDef::TAO_ClientRequestInfo_IR_OperationDef_mode_set::TAO_ClientRequestInfo_IR_OperationDef_mode_set ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - IR_OperationMode & mode, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - mode_ (mode) -{} - -Dynamic::ParameterList * -IR_OperationDef::TAO_ClientRequestInfo_IR_OperationDef_mode_set::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_mode = parameter_list->length (); - parameter_list->length (length_mode + 1); - (*parameter_list)[length_mode].argument <<= this->mode_; - - (*parameter_list)[length_mode].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_OperationDef::TAO_ClientRequestInfo_IR_OperationDef_mode_set::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_OperationDef::TAO_ClientRequestInfo_IR_OperationDef_mode_set::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 1; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return result_any; -} - -IR_OperationDef::TAO_ClientRequestInfo_IR_OperationDef_contexts_get::TAO_ClientRequestInfo_IR_OperationDef_contexts_get ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target) -{} - -Dynamic::ParameterList * -IR_OperationDef::TAO_ClientRequestInfo_IR_OperationDef_contexts_get::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return parameter_list; -} - -Dynamic::ExceptionList * -IR_OperationDef::TAO_ClientRequestInfo_IR_OperationDef_contexts_get::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_OperationDef::TAO_ClientRequestInfo_IR_OperationDef_contexts_get::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_OperationDef::TAO_ClientRequestInfo_IR_OperationDef_contexts_get::result (IR_ContextIdSeq * result) -{ - // update the result - this->_result = result; -} - -IR_OperationDef::TAO_ClientRequestInfo_IR_OperationDef_contexts_set::TAO_ClientRequestInfo_IR_OperationDef_contexts_set ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - const IR_ContextIdSeq & contexts, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - contexts_ (contexts) -{} - -Dynamic::ParameterList * -IR_OperationDef::TAO_ClientRequestInfo_IR_OperationDef_contexts_set::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_contexts = parameter_list->length (); - parameter_list->length (length_contexts + 1); - (*parameter_list)[length_contexts].argument <<= this->contexts_; - - (*parameter_list)[length_contexts].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_OperationDef::TAO_ClientRequestInfo_IR_OperationDef_contexts_set::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_OperationDef::TAO_ClientRequestInfo_IR_OperationDef_contexts_set::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 1; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return result_any; -} - -IR_OperationDef::TAO_ClientRequestInfo_IR_OperationDef_exceptions_get::TAO_ClientRequestInfo_IR_OperationDef_exceptions_get ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target) -{} - -Dynamic::ParameterList * -IR_OperationDef::TAO_ClientRequestInfo_IR_OperationDef_exceptions_get::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return parameter_list; -} - -Dynamic::ExceptionList * -IR_OperationDef::TAO_ClientRequestInfo_IR_OperationDef_exceptions_get::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_OperationDef::TAO_ClientRequestInfo_IR_OperationDef_exceptions_get::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_OperationDef::TAO_ClientRequestInfo_IR_OperationDef_exceptions_get::result (IR_ExceptionDefSeq * result) -{ - // update the result - this->_result = result; -} - -IR_OperationDef::TAO_ClientRequestInfo_IR_OperationDef_exceptions_set::TAO_ClientRequestInfo_IR_OperationDef_exceptions_set ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - const IR_ExceptionDefSeq & exceptions, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - exceptions_ (exceptions) -{} - -Dynamic::ParameterList * -IR_OperationDef::TAO_ClientRequestInfo_IR_OperationDef_exceptions_set::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_exceptions = parameter_list->length (); - parameter_list->length (length_exceptions + 1); - (*parameter_list)[length_exceptions].argument <<= this->exceptions_; - - (*parameter_list)[length_exceptions].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_OperationDef::TAO_ClientRequestInfo_IR_OperationDef_exceptions_set::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_OperationDef::TAO_ClientRequestInfo_IR_OperationDef_exceptions_set::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 1; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return result_any; -} - -#endif /* TAO_HAS_INTERCEPTORS */ - static const CORBA::Long _oc_IR_OperationDef[] = { TAO_ENCAP_BYTE_ORDER, // byte order @@ -32569,137 +18220,47 @@ IR_InterfaceDefSeq * _TAO_InterfaceDef_Remote_Proxy_Impl::base_interfaces ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_InterfaceDef::TAO_ClientRequestInfo_IR_InterfaceDef_base_interfaces_get ri ( - &_tao_call, - _collocated_tao_target_, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), + 0 ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - IR_InterfaceDefSeq * _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -32725,130 +18286,45 @@ void _TAO_InterfaceDef_Remote_Proxy_Impl::base_interfaces ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_InterfaceDef::TAO_ClientRequestInfo_IR_InterfaceDef_base_interfaces_set ri ( - &_tao_call, - _collocated_tao_target_, - base_interfaces, - ACE_TRY_ENV - ); - ACE_CHECK; - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK; - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK; - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << base_interfaces) - )) - TAO_INTERCEPTOR_THROW ( - CORBA::MARSHAL () - ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) - ); - - } - - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK; - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK; + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), ACE_TRY_ENV ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV + ACE_CHECK; + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << base_interfaces) + )) + ACE_THROW ( + CORBA::MARSHAL () ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK; -#endif /* TAO_HAS_INTERCEPTORS */ - - if (_invoke_status == TAO_INVOKE_RESTART) + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK; + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) { - _tao_call.restart_flag (1); - continue; + ACE_THROW ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) + ); } - - break; - } - + + break; + } } CORBA::Boolean _TAO_InterfaceDef_Remote_Proxy_Impl::is_abstract ( @@ -32876,136 +18352,47 @@ CORBA::Boolean _TAO_InterfaceDef_Remote_Proxy_Impl::is_abstract ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_InterfaceDef::TAO_ClientRequestInfo_IR_InterfaceDef_is_abstract_get ri ( - &_tao_call, - _collocated_tao_target_, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (_tao_retval); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (_tao_retval); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (_tao_retval); + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (_tao_retval); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), + _tao_retval ); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - _tao_retval - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> CORBA::Any::to_boolean (_tao_retval)) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> CORBA::Any::to_boolean (_tao_retval)) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), _tao_retval ); - - } - - TAO_INTERCEPTOR ( - CORBA::Boolean _tao_retval_info = _tao_retval; - ri.result (_tao_retval_info); - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (_tao_retval); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_retval; } @@ -33031,130 +18418,45 @@ void _TAO_InterfaceDef_Remote_Proxy_Impl::is_abstract ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_InterfaceDef::TAO_ClientRequestInfo_IR_InterfaceDef_is_abstract_set ri ( - &_tao_call, - _collocated_tao_target_, - is_abstract, - ACE_TRY_ENV - ); - ACE_CHECK; - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK; - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK; - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << CORBA::Any::from_boolean (is_abstract)) - )) - TAO_INTERCEPTOR_THROW ( - CORBA::MARSHAL () - ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) - ); - - } - - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK; - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK; + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), ACE_TRY_ENV ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV + ACE_CHECK; + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << CORBA::Any::from_boolean (is_abstract)) + )) + ACE_THROW ( + CORBA::MARSHAL () ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK; -#endif /* TAO_HAS_INTERCEPTORS */ - - if (_invoke_status == TAO_INVOKE_RESTART) + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK; + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) { - _tao_call.restart_flag (1); - continue; + ACE_THROW ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) + ); } - - break; - } - + + break; + } } CORBA::Boolean _TAO_InterfaceDef_Remote_Proxy_Impl::is_local ( @@ -33182,136 +18484,47 @@ CORBA::Boolean _TAO_InterfaceDef_Remote_Proxy_Impl::is_local ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_InterfaceDef::TAO_ClientRequestInfo_IR_InterfaceDef_is_local_get ri ( - &_tao_call, - _collocated_tao_target_, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (_tao_retval); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (_tao_retval); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (_tao_retval); + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (_tao_retval); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), + _tao_retval ); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - _tao_retval - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> CORBA::Any::to_boolean (_tao_retval)) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> CORBA::Any::to_boolean (_tao_retval)) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), _tao_retval ); - - } - - TAO_INTERCEPTOR ( - CORBA::Boolean _tao_retval_info = _tao_retval; - ri.result (_tao_retval_info); - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (_tao_retval); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_retval; } @@ -33337,130 +18550,45 @@ void _TAO_InterfaceDef_Remote_Proxy_Impl::is_local ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_InterfaceDef::TAO_ClientRequestInfo_IR_InterfaceDef_is_local_set ri ( - &_tao_call, - _collocated_tao_target_, - is_local, - ACE_TRY_ENV - ); - ACE_CHECK; - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK; - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK; - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << CORBA::Any::from_boolean (is_local)) - )) - TAO_INTERCEPTOR_THROW ( - CORBA::MARSHAL () - ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) - ); - - } - - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK; - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK; + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), ACE_TRY_ENV ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV + ACE_CHECK; + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << CORBA::Any::from_boolean (is_local)) + )) + ACE_THROW ( + CORBA::MARSHAL () ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK; -#endif /* TAO_HAS_INTERCEPTORS */ - - if (_invoke_status == TAO_INVOKE_RESTART) + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK; + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) { - _tao_call.restart_flag (1); - continue; + ACE_THROW ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) + ); } - - break; - } - + + break; + } } CORBA::Boolean _TAO_InterfaceDef_Remote_Proxy_Impl::is_a ( @@ -33489,147 +18617,57 @@ CORBA::Boolean _TAO_InterfaceDef_Remote_Proxy_Impl::is_a ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_InterfaceDef::TAO_ClientRequestInfo_IR_InterfaceDef_is_a ri ( - &_tao_call, - _collocated_tao_target_, - interface_id, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (_tao_retval); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << interface_id) - )) - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::MARSHAL (), + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (_tao_retval); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (_tao_retval); + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << interface_id) + )) + ACE_THROW_RETURN ( + CORBA::MARSHAL (), + _tao_retval + ); + + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (_tao_retval); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), _tao_retval ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - _tao_retval - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> CORBA::Any::to_boolean (_tao_retval)) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> CORBA::Any::to_boolean (_tao_retval)) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), _tao_retval ); - - } - - TAO_INTERCEPTOR ( - CORBA::Boolean _tao_retval_info = _tao_retval; - ri.result (_tao_retval_info); - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (_tao_retval); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_retval; } @@ -33666,160 +18704,63 @@ IR_AttributeDef_ptr _TAO_InterfaceDef_Remote_Proxy_Impl::create_attribute ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_InterfaceDef::TAO_ClientRequestInfo_IR_InterfaceDef_create_attribute ri ( - &_tao_call, - _collocated_tao_target_, - id, - name, - version, - type, - mode, - get_exceptions, - put_exceptions, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << id) && + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << id) && (_tao_out << name) && (_tao_out << version) && (_tao_out << type) && (_tao_out << mode) && (_tao_out << get_exceptions) && (_tao_out << put_exceptions) - )) - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::MARSHAL (), + )) + ACE_THROW_RETURN ( + CORBA::MARSHAL (), + 0 + ); + + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - IR_AttributeDef_ptr _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -33857,60 +18798,22 @@ IR_OperationDef_ptr _TAO_InterfaceDef_Remote_Proxy_Impl::create_operation ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_InterfaceDef::TAO_ClientRequestInfo_IR_InterfaceDef_create_operation ri ( - &_tao_call, - _collocated_tao_target_, - id, - name, - version, - result, - mode, - params, - exceptions, - contexts, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << id) && + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << id) && (_tao_out << name) && (_tao_out << version) && (_tao_out << result) && @@ -33918,101 +18821,41 @@ IR_OperationDef_ptr _TAO_InterfaceDef_Remote_Proxy_Impl::create_operation ( (_tao_out << params) && (_tao_out << exceptions) && (_tao_out << contexts) - )) - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::MARSHAL (), + )) + ACE_THROW_RETURN ( + CORBA::MARSHAL (), + 0 + ); + + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - IR_OperationDef_ptr _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -34034,13 +18877,8 @@ _TAO_InterfaceDef_Proxy_Broker::~_TAO_InterfaceDef_Proxy_Broker (void) { } -_TAO_InterfaceDef_Proxy_Broker * (*_TAO_InterfaceDef_Proxy_Broker_Factory_function_pointer) ( - CORBA::Object_ptr obj - ) = 0; - -// Factory Member function Implementation. -_TAO_InterfaceDef_Remote_Proxy_Broker * -_TAO_InterfaceDef_Remote_Proxy_Broker::the_TAO_InterfaceDef_Remote_Proxy_Broker (void) +// Factory function Implementation. +_TAO_InterfaceDef_Remote_Proxy_Broker *the_TAO_InterfaceDef_Remote_Proxy_Broker (void) { static ::_TAO_InterfaceDef_Remote_Proxy_Broker remote_proxy_broker; return &remote_proxy_broker; @@ -34074,7 +18912,7 @@ _TAO_InterfaceDef_Remote_Proxy_Broker::select_proxy ( // default constructor IR_InterfaceDef::IR_InterfaceDef (int collocated) { - this->IR_InterfaceDef_setup_collocation (collocated); + this->_tao_setup_collocation (collocated); } // destructor @@ -34082,18 +18920,19 @@ IR_InterfaceDef::~IR_InterfaceDef (void) {} void -IR_InterfaceDef::IR_InterfaceDef_setup_collocation (int collocated) +IR_InterfaceDef::_tao_setup_collocation (int collocated) { if (collocated) this->the_TAO_InterfaceDef_Proxy_Broker_ = _TAO_InterfaceDef_Proxy_Broker_Factory_function_pointer (this); else this->the_TAO_InterfaceDef_Proxy_Broker_ = - _TAO_InterfaceDef_Remote_Proxy_Broker::the_TAO_InterfaceDef_Remote_Proxy_Broker (); + ::the_TAO_InterfaceDef_Remote_Proxy_Broker (); + + IR_Container::_tao_setup_collocation (collocated); + IR_Contained::_tao_setup_collocation (collocated); + IR_IDLType::_tao_setup_collocation (collocated); - this->IR_Container_setup_collocation (collocated); - this->IR_Contained_setup_collocation (collocated); - this->IR_IDLType_setup_collocation (collocated); } void IR_InterfaceDef::_tao_any_destructor (void *x) @@ -34423,638 +19262,6 @@ IR_OperationDef_ptr IR_InterfaceDef::create_operation ( ); } -#if (TAO_HAS_INTERCEPTORS == 1) -IR_InterfaceDef::TAO_ClientRequestInfo_IR_InterfaceDef_base_interfaces_get::TAO_ClientRequestInfo_IR_InterfaceDef_base_interfaces_get ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target) -{} - -Dynamic::ParameterList * -IR_InterfaceDef::TAO_ClientRequestInfo_IR_InterfaceDef_base_interfaces_get::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return parameter_list; -} - -Dynamic::ExceptionList * -IR_InterfaceDef::TAO_ClientRequestInfo_IR_InterfaceDef_base_interfaces_get::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_InterfaceDef::TAO_ClientRequestInfo_IR_InterfaceDef_base_interfaces_get::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_InterfaceDef::TAO_ClientRequestInfo_IR_InterfaceDef_base_interfaces_get::result (IR_InterfaceDefSeq * result) -{ - // update the result - this->_result = result; -} - -IR_InterfaceDef::TAO_ClientRequestInfo_IR_InterfaceDef_base_interfaces_set::TAO_ClientRequestInfo_IR_InterfaceDef_base_interfaces_set ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - const IR_InterfaceDefSeq & base_interfaces, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - base_interfaces_ (base_interfaces) -{} - -Dynamic::ParameterList * -IR_InterfaceDef::TAO_ClientRequestInfo_IR_InterfaceDef_base_interfaces_set::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_base_interfaces = parameter_list->length (); - parameter_list->length (length_base_interfaces + 1); - (*parameter_list)[length_base_interfaces].argument <<= this->base_interfaces_; - - (*parameter_list)[length_base_interfaces].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_InterfaceDef::TAO_ClientRequestInfo_IR_InterfaceDef_base_interfaces_set::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_InterfaceDef::TAO_ClientRequestInfo_IR_InterfaceDef_base_interfaces_set::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 1; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return result_any; -} - -IR_InterfaceDef::TAO_ClientRequestInfo_IR_InterfaceDef_is_abstract_get::TAO_ClientRequestInfo_IR_InterfaceDef_is_abstract_get ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target) -{} - -Dynamic::ParameterList * -IR_InterfaceDef::TAO_ClientRequestInfo_IR_InterfaceDef_is_abstract_get::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return parameter_list; -} - -Dynamic::ExceptionList * -IR_InterfaceDef::TAO_ClientRequestInfo_IR_InterfaceDef_is_abstract_get::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_InterfaceDef::TAO_ClientRequestInfo_IR_InterfaceDef_is_abstract_get::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= CORBA::Any::from_boolean (this->_result); - return safe_result_any._retn (); -} - -void -IR_InterfaceDef::TAO_ClientRequestInfo_IR_InterfaceDef_is_abstract_get::result (CORBA::Boolean result) -{ - // update the result - this->_result = result; -} - -IR_InterfaceDef::TAO_ClientRequestInfo_IR_InterfaceDef_is_abstract_set::TAO_ClientRequestInfo_IR_InterfaceDef_is_abstract_set ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - const CORBA::Boolean & is_abstract, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - is_abstract_ (is_abstract) -{} - -Dynamic::ParameterList * -IR_InterfaceDef::TAO_ClientRequestInfo_IR_InterfaceDef_is_abstract_set::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_is_abstract = parameter_list->length (); - parameter_list->length (length_is_abstract + 1); - (*parameter_list)[length_is_abstract].argument <<= CORBA::Any::from_boolean (this->is_abstract_); - (*parameter_list)[length_is_abstract].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_InterfaceDef::TAO_ClientRequestInfo_IR_InterfaceDef_is_abstract_set::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_InterfaceDef::TAO_ClientRequestInfo_IR_InterfaceDef_is_abstract_set::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 1; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return result_any; -} - -IR_InterfaceDef::TAO_ClientRequestInfo_IR_InterfaceDef_is_local_get::TAO_ClientRequestInfo_IR_InterfaceDef_is_local_get ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target) -{} - -Dynamic::ParameterList * -IR_InterfaceDef::TAO_ClientRequestInfo_IR_InterfaceDef_is_local_get::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return parameter_list; -} - -Dynamic::ExceptionList * -IR_InterfaceDef::TAO_ClientRequestInfo_IR_InterfaceDef_is_local_get::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_InterfaceDef::TAO_ClientRequestInfo_IR_InterfaceDef_is_local_get::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= CORBA::Any::from_boolean (this->_result); - return safe_result_any._retn (); -} - -void -IR_InterfaceDef::TAO_ClientRequestInfo_IR_InterfaceDef_is_local_get::result (CORBA::Boolean result) -{ - // update the result - this->_result = result; -} - -IR_InterfaceDef::TAO_ClientRequestInfo_IR_InterfaceDef_is_local_set::TAO_ClientRequestInfo_IR_InterfaceDef_is_local_set ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - const CORBA::Boolean & is_local, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - is_local_ (is_local) -{} - -Dynamic::ParameterList * -IR_InterfaceDef::TAO_ClientRequestInfo_IR_InterfaceDef_is_local_set::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_is_local = parameter_list->length (); - parameter_list->length (length_is_local + 1); - (*parameter_list)[length_is_local].argument <<= CORBA::Any::from_boolean (this->is_local_); - (*parameter_list)[length_is_local].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_InterfaceDef::TAO_ClientRequestInfo_IR_InterfaceDef_is_local_set::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_InterfaceDef::TAO_ClientRequestInfo_IR_InterfaceDef_is_local_set::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 1; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return result_any; -} - -IR_InterfaceDef::TAO_ClientRequestInfo_IR_InterfaceDef_is_a::TAO_ClientRequestInfo_IR_InterfaceDef_is_a ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - const char * interface_id, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - interface_id_ (interface_id) -{} - -Dynamic::ParameterList * -IR_InterfaceDef::TAO_ClientRequestInfo_IR_InterfaceDef_is_a::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_interface_id = parameter_list->length (); - parameter_list->length (length_interface_id + 1); - (*parameter_list)[length_interface_id].argument <<= interface_id_; - (*parameter_list)[length_interface_id].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_InterfaceDef::TAO_ClientRequestInfo_IR_InterfaceDef_is_a::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_InterfaceDef::TAO_ClientRequestInfo_IR_InterfaceDef_is_a::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= CORBA::Any::from_boolean (this->_result); - return safe_result_any._retn (); -} - -void -IR_InterfaceDef::TAO_ClientRequestInfo_IR_InterfaceDef_is_a::result (CORBA::Boolean result) -{ - // update the result - this->_result = result; -} - -IR_InterfaceDef::TAO_ClientRequestInfo_IR_InterfaceDef_create_attribute::TAO_ClientRequestInfo_IR_InterfaceDef_create_attribute ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - const char * id, - const char * name, - const char * version, - IR_IDLType_ptr type, - IR_AttributeMode & mode, - const IR_ExceptionDefSeq & get_exceptions, - const IR_ExceptionDefSeq & put_exceptions, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - id_ (id), - name_ (name), - version_ (version), - type_ (type), - mode_ (mode), - get_exceptions_ (get_exceptions), - put_exceptions_ (put_exceptions) -{} - -Dynamic::ParameterList * -IR_InterfaceDef::TAO_ClientRequestInfo_IR_InterfaceDef_create_attribute::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_id = parameter_list->length (); - parameter_list->length (length_id + 1); - (*parameter_list)[length_id].argument <<= id_; - (*parameter_list)[length_id].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_name = parameter_list->length (); - parameter_list->length (length_name + 1); - (*parameter_list)[length_name].argument <<= name_; - (*parameter_list)[length_name].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_version = parameter_list->length (); - parameter_list->length (length_version + 1); - (*parameter_list)[length_version].argument <<= version_; - (*parameter_list)[length_version].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_type = parameter_list->length (); - parameter_list->length (length_type + 1); - (*parameter_list)[length_type].argument <<= this->type_; - - (*parameter_list)[length_type].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_mode = parameter_list->length (); - parameter_list->length (length_mode + 1); - (*parameter_list)[length_mode].argument <<= this->mode_; - - (*parameter_list)[length_mode].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_get_exceptions = parameter_list->length (); - parameter_list->length (length_get_exceptions + 1); - (*parameter_list)[length_get_exceptions].argument <<= this->get_exceptions_; - - (*parameter_list)[length_get_exceptions].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_put_exceptions = parameter_list->length (); - parameter_list->length (length_put_exceptions + 1); - (*parameter_list)[length_put_exceptions].argument <<= this->put_exceptions_; - - (*parameter_list)[length_put_exceptions].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_InterfaceDef::TAO_ClientRequestInfo_IR_InterfaceDef_create_attribute::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_InterfaceDef::TAO_ClientRequestInfo_IR_InterfaceDef_create_attribute::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_InterfaceDef::TAO_ClientRequestInfo_IR_InterfaceDef_create_attribute::result (IR_AttributeDef_ptr result) -{ - // update the result - this->_result = result; -} - -IR_InterfaceDef::TAO_ClientRequestInfo_IR_InterfaceDef_create_operation::TAO_ClientRequestInfo_IR_InterfaceDef_create_operation ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - const char * id, - const char * name, - const char * version, - IR_IDLType_ptr result, - IR_OperationMode & mode, - const IR_ParDescriptionSeq & params, - const IR_ExceptionDefSeq & exceptions, - const IR_ContextIdSeq & contexts, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - id_ (id), - name_ (name), - version_ (version), - result_ (result), - mode_ (mode), - params_ (params), - exceptions_ (exceptions), - contexts_ (contexts) -{} - -Dynamic::ParameterList * -IR_InterfaceDef::TAO_ClientRequestInfo_IR_InterfaceDef_create_operation::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_id = parameter_list->length (); - parameter_list->length (length_id + 1); - (*parameter_list)[length_id].argument <<= id_; - (*parameter_list)[length_id].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_name = parameter_list->length (); - parameter_list->length (length_name + 1); - (*parameter_list)[length_name].argument <<= name_; - (*parameter_list)[length_name].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_version = parameter_list->length (); - parameter_list->length (length_version + 1); - (*parameter_list)[length_version].argument <<= version_; - (*parameter_list)[length_version].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_result = parameter_list->length (); - parameter_list->length (length_result + 1); - (*parameter_list)[length_result].argument <<= this->result_; - - (*parameter_list)[length_result].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_mode = parameter_list->length (); - parameter_list->length (length_mode + 1); - (*parameter_list)[length_mode].argument <<= this->mode_; - - (*parameter_list)[length_mode].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_params = parameter_list->length (); - parameter_list->length (length_params + 1); - (*parameter_list)[length_params].argument <<= this->params_; - - (*parameter_list)[length_params].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_exceptions = parameter_list->length (); - parameter_list->length (length_exceptions + 1); - (*parameter_list)[length_exceptions].argument <<= this->exceptions_; - - (*parameter_list)[length_exceptions].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_contexts = parameter_list->length (); - parameter_list->length (length_contexts + 1); - (*parameter_list)[length_contexts].argument <<= this->contexts_; - - (*parameter_list)[length_contexts].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_InterfaceDef::TAO_ClientRequestInfo_IR_InterfaceDef_create_operation::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_InterfaceDef::TAO_ClientRequestInfo_IR_InterfaceDef_create_operation::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_InterfaceDef::TAO_ClientRequestInfo_IR_InterfaceDef_create_operation::result (IR_OperationDef_ptr result) -{ - // update the result - this->_result = result; -} - -#endif /* TAO_HAS_INTERCEPTORS */ - static const CORBA::Long _oc_IR_InterfaceDef[] = { TAO_ENCAP_BYTE_ORDER, // byte order @@ -35810,137 +20017,46 @@ CORBA::TypeCode_ptr _TAO_ValueMemberDef_Remote_Proxy_Impl::type ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_ValueMemberDef::TAO_ClientRequestInfo_IR_ValueMemberDef_type_get ri ( - &_tao_call, - _collocated_tao_target_, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), + 0 ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - CORBA::TypeCode_ptr _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ - - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } + } + break; + } return _tao_safe_retval._retn (); } @@ -35970,137 +20086,47 @@ IR_IDLType_ptr _TAO_ValueMemberDef_Remote_Proxy_Impl::type_def ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_ValueMemberDef::TAO_ClientRequestInfo_IR_ValueMemberDef_type_def_get ri ( - &_tao_call, - _collocated_tao_target_, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), + 0 ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - IR_IDLType_ptr _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -36126,130 +20152,45 @@ void _TAO_ValueMemberDef_Remote_Proxy_Impl::type_def ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_ValueMemberDef::TAO_ClientRequestInfo_IR_ValueMemberDef_type_def_set ri ( - &_tao_call, - _collocated_tao_target_, - type_def, - ACE_TRY_ENV - ); - ACE_CHECK; - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK; - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK; - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << type_def) - )) - TAO_INTERCEPTOR_THROW ( - CORBA::MARSHAL () - ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) - ); - - } - - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK; - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK; + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), ACE_TRY_ENV ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV + ACE_CHECK; + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << type_def) + )) + ACE_THROW ( + CORBA::MARSHAL () ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK; -#endif /* TAO_HAS_INTERCEPTORS */ - - if (_invoke_status == TAO_INVOKE_RESTART) + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK; + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) { - _tao_call.restart_flag (1); - continue; + ACE_THROW ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) + ); } - - break; - } - + + break; + } } CORBA::Visibility _TAO_ValueMemberDef_Remote_Proxy_Impl::access ( @@ -36277,136 +20218,47 @@ CORBA::Visibility _TAO_ValueMemberDef_Remote_Proxy_Impl::access ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_ValueMemberDef::TAO_ClientRequestInfo_IR_ValueMemberDef_access_get ri ( - &_tao_call, - _collocated_tao_target_, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (_tao_retval); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (_tao_retval); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (_tao_retval); + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (_tao_retval); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), + _tao_retval ); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - _tao_retval - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_retval) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_retval) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), _tao_retval ); - - } - - TAO_INTERCEPTOR ( - CORBA::Visibility _tao_retval_info = _tao_retval; - ri.result (_tao_retval_info); - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (_tao_retval); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_retval; } @@ -36432,130 +20284,45 @@ void _TAO_ValueMemberDef_Remote_Proxy_Impl::access ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_ValueMemberDef::TAO_ClientRequestInfo_IR_ValueMemberDef_access_set ri ( - &_tao_call, - _collocated_tao_target_, - access, - ACE_TRY_ENV - ); - ACE_CHECK; - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK; - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK; - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << access) - )) - TAO_INTERCEPTOR_THROW ( - CORBA::MARSHAL () - ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) - ); - - } - - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK; - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK; + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), ACE_TRY_ENV ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV + ACE_CHECK; + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << access) + )) + ACE_THROW ( + CORBA::MARSHAL () ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK; -#endif /* TAO_HAS_INTERCEPTORS */ - - if (_invoke_status == TAO_INVOKE_RESTART) + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK; + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) { - _tao_call.restart_flag (1); - continue; + ACE_THROW ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) + ); } - - break; - } - + + break; + } } @@ -36576,13 +20343,8 @@ _TAO_ValueMemberDef_Proxy_Broker::~_TAO_ValueMemberDef_Proxy_Broker (void) { } -_TAO_ValueMemberDef_Proxy_Broker * (*_TAO_ValueMemberDef_Proxy_Broker_Factory_function_pointer) ( - CORBA::Object_ptr obj - ) = 0; - -// Factory Member function Implementation. -_TAO_ValueMemberDef_Remote_Proxy_Broker * -_TAO_ValueMemberDef_Remote_Proxy_Broker::the_TAO_ValueMemberDef_Remote_Proxy_Broker (void) +// Factory function Implementation. +_TAO_ValueMemberDef_Remote_Proxy_Broker *the_TAO_ValueMemberDef_Remote_Proxy_Broker (void) { static ::_TAO_ValueMemberDef_Remote_Proxy_Broker remote_proxy_broker; return &remote_proxy_broker; @@ -36616,7 +20378,7 @@ _TAO_ValueMemberDef_Remote_Proxy_Broker::select_proxy ( // default constructor IR_ValueMemberDef::IR_ValueMemberDef (int collocated) { - this->IR_ValueMemberDef_setup_collocation (collocated); + this->_tao_setup_collocation (collocated); } // destructor @@ -36624,16 +20386,17 @@ IR_ValueMemberDef::~IR_ValueMemberDef (void) {} void -IR_ValueMemberDef::IR_ValueMemberDef_setup_collocation (int collocated) +IR_ValueMemberDef::_tao_setup_collocation (int collocated) { if (collocated) this->the_TAO_ValueMemberDef_Proxy_Broker_ = _TAO_ValueMemberDef_Proxy_Broker_Factory_function_pointer (this); else this->the_TAO_ValueMemberDef_Proxy_Broker_ = - _TAO_ValueMemberDef_Remote_Proxy_Broker::the_TAO_ValueMemberDef_Remote_Proxy_Broker (); + ::the_TAO_ValueMemberDef_Remote_Proxy_Broker (); + + IR_Contained::_tao_setup_collocation (collocated); - this->IR_Contained_setup_collocation (collocated); } void IR_ValueMemberDef::_tao_any_destructor (void *x) @@ -36847,288 +20610,6 @@ void IR_ValueMemberDef::access ( ); } -#if (TAO_HAS_INTERCEPTORS == 1) -IR_ValueMemberDef::TAO_ClientRequestInfo_IR_ValueMemberDef_type_get::TAO_ClientRequestInfo_IR_ValueMemberDef_type_get ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target) -{} - -Dynamic::ParameterList * -IR_ValueMemberDef::TAO_ClientRequestInfo_IR_ValueMemberDef_type_get::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return parameter_list; -} - -Dynamic::ExceptionList * -IR_ValueMemberDef::TAO_ClientRequestInfo_IR_ValueMemberDef_type_get::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_ValueMemberDef::TAO_ClientRequestInfo_IR_ValueMemberDef_type_get::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_ValueMemberDef::TAO_ClientRequestInfo_IR_ValueMemberDef_type_get::result (CORBA::TypeCode_ptr result) -{ - // update the result - this->_result = result; -} - -IR_ValueMemberDef::TAO_ClientRequestInfo_IR_ValueMemberDef_type_def_get::TAO_ClientRequestInfo_IR_ValueMemberDef_type_def_get ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target) -{} - -Dynamic::ParameterList * -IR_ValueMemberDef::TAO_ClientRequestInfo_IR_ValueMemberDef_type_def_get::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return parameter_list; -} - -Dynamic::ExceptionList * -IR_ValueMemberDef::TAO_ClientRequestInfo_IR_ValueMemberDef_type_def_get::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_ValueMemberDef::TAO_ClientRequestInfo_IR_ValueMemberDef_type_def_get::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_ValueMemberDef::TAO_ClientRequestInfo_IR_ValueMemberDef_type_def_get::result (IR_IDLType_ptr result) -{ - // update the result - this->_result = result; -} - -IR_ValueMemberDef::TAO_ClientRequestInfo_IR_ValueMemberDef_type_def_set::TAO_ClientRequestInfo_IR_ValueMemberDef_type_def_set ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - IR_IDLType_ptr type_def, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - type_def_ (type_def) -{} - -Dynamic::ParameterList * -IR_ValueMemberDef::TAO_ClientRequestInfo_IR_ValueMemberDef_type_def_set::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_type_def = parameter_list->length (); - parameter_list->length (length_type_def + 1); - (*parameter_list)[length_type_def].argument <<= this->type_def_; - - (*parameter_list)[length_type_def].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_ValueMemberDef::TAO_ClientRequestInfo_IR_ValueMemberDef_type_def_set::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_ValueMemberDef::TAO_ClientRequestInfo_IR_ValueMemberDef_type_def_set::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 1; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return result_any; -} - -IR_ValueMemberDef::TAO_ClientRequestInfo_IR_ValueMemberDef_access_get::TAO_ClientRequestInfo_IR_ValueMemberDef_access_get ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target) -{} - -Dynamic::ParameterList * -IR_ValueMemberDef::TAO_ClientRequestInfo_IR_ValueMemberDef_access_get::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return parameter_list; -} - -Dynamic::ExceptionList * -IR_ValueMemberDef::TAO_ClientRequestInfo_IR_ValueMemberDef_access_get::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_ValueMemberDef::TAO_ClientRequestInfo_IR_ValueMemberDef_access_get::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_ValueMemberDef::TAO_ClientRequestInfo_IR_ValueMemberDef_access_get::result (CORBA::Visibility result) -{ - // update the result - this->_result = result; -} - -IR_ValueMemberDef::TAO_ClientRequestInfo_IR_ValueMemberDef_access_set::TAO_ClientRequestInfo_IR_ValueMemberDef_access_set ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - const CORBA::Visibility & access, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - access_ (access) -{} - -Dynamic::ParameterList * -IR_ValueMemberDef::TAO_ClientRequestInfo_IR_ValueMemberDef_access_set::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_access = parameter_list->length (); - parameter_list->length (length_access + 1); - (*parameter_list)[length_access].argument <<= access_; - (*parameter_list)[length_access].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_ValueMemberDef::TAO_ClientRequestInfo_IR_ValueMemberDef_access_set::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_ValueMemberDef::TAO_ClientRequestInfo_IR_ValueMemberDef_access_set::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 1; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return result_any; -} - -#endif /* TAO_HAS_INTERCEPTORS */ - static const CORBA::Long _oc_IR_ValueMemberDef[] = { TAO_ENCAP_BYTE_ORDER, // byte order @@ -37180,137 +20661,47 @@ IR_InterfaceDefSeq * _TAO_ValueDef_Remote_Proxy_Impl::supported_interfaces ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_supported_interfaces_get ri ( - &_tao_call, - _collocated_tao_target_, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), + 0 ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - IR_InterfaceDefSeq * _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -37336,130 +20727,45 @@ void _TAO_ValueDef_Remote_Proxy_Impl::supported_interfaces ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_supported_interfaces_set ri ( - &_tao_call, - _collocated_tao_target_, - supported_interfaces, - ACE_TRY_ENV - ); - ACE_CHECK; - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK; - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK; - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << supported_interfaces) - )) - TAO_INTERCEPTOR_THROW ( - CORBA::MARSHAL () - ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) - ); - - } - - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK; - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK; + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), ACE_TRY_ENV ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV + ACE_CHECK; + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << supported_interfaces) + )) + ACE_THROW ( + CORBA::MARSHAL () ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK; -#endif /* TAO_HAS_INTERCEPTORS */ - - if (_invoke_status == TAO_INVOKE_RESTART) + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK; + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) { - _tao_call.restart_flag (1); - continue; + ACE_THROW ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) + ); } - - break; - } - + + break; + } } IR_InitializerSeq * _TAO_ValueDef_Remote_Proxy_Impl::initializers ( @@ -37489,137 +20795,47 @@ IR_InitializerSeq * _TAO_ValueDef_Remote_Proxy_Impl::initializers ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_initializers_get ri ( - &_tao_call, - _collocated_tao_target_, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), + 0 ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - IR_InitializerSeq * _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -37645,130 +20861,45 @@ void _TAO_ValueDef_Remote_Proxy_Impl::initializers ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_initializers_set ri ( - &_tao_call, - _collocated_tao_target_, - initializers, - ACE_TRY_ENV - ); - ACE_CHECK; - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK; - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK; - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << initializers) - )) - TAO_INTERCEPTOR_THROW ( - CORBA::MARSHAL () - ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) - ); - - } - - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK; - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK; + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), ACE_TRY_ENV ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV + ACE_CHECK; + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << initializers) + )) + ACE_THROW ( + CORBA::MARSHAL () ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK; -#endif /* TAO_HAS_INTERCEPTORS */ - - if (_invoke_status == TAO_INVOKE_RESTART) + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK; + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) { - _tao_call.restart_flag (1); - continue; + ACE_THROW ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) + ); } - - break; - } - + + break; + } } IR_ValueDef_ptr _TAO_ValueDef_Remote_Proxy_Impl::base_value ( @@ -37797,137 +20928,47 @@ IR_ValueDef_ptr _TAO_ValueDef_Remote_Proxy_Impl::base_value ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_base_value_get ri ( - &_tao_call, - _collocated_tao_target_, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), + 0 ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - IR_ValueDef_ptr _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -37953,130 +20994,45 @@ void _TAO_ValueDef_Remote_Proxy_Impl::base_value ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_base_value_set ri ( - &_tao_call, - _collocated_tao_target_, - base_value, - ACE_TRY_ENV - ); - ACE_CHECK; - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK; - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK; - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << base_value) - )) - TAO_INTERCEPTOR_THROW ( - CORBA::MARSHAL () - ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) - ); - - } - - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK; - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK; + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), ACE_TRY_ENV ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV + ACE_CHECK; + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << base_value) + )) + ACE_THROW ( + CORBA::MARSHAL () ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK; -#endif /* TAO_HAS_INTERCEPTORS */ - - if (_invoke_status == TAO_INVOKE_RESTART) + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK; + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) { - _tao_call.restart_flag (1); - continue; + ACE_THROW ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) + ); } - - break; - } - + + break; + } } IR_ValueDefSeq * _TAO_ValueDef_Remote_Proxy_Impl::abstract_base_values ( @@ -38106,137 +21062,47 @@ IR_ValueDefSeq * _TAO_ValueDef_Remote_Proxy_Impl::abstract_base_values ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_abstract_base_values_get ri ( - &_tao_call, - _collocated_tao_target_, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), + 0 ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - IR_ValueDefSeq * _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -38262,130 +21128,45 @@ void _TAO_ValueDef_Remote_Proxy_Impl::abstract_base_values ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_abstract_base_values_set ri ( - &_tao_call, - _collocated_tao_target_, - abstract_base_values, - ACE_TRY_ENV - ); - ACE_CHECK; - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK; - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK; - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << abstract_base_values) - )) - TAO_INTERCEPTOR_THROW ( - CORBA::MARSHAL () - ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) - ); - - } - - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK; - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK; + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), ACE_TRY_ENV ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV + ACE_CHECK; + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << abstract_base_values) + )) + ACE_THROW ( + CORBA::MARSHAL () ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK; -#endif /* TAO_HAS_INTERCEPTORS */ - - if (_invoke_status == TAO_INVOKE_RESTART) + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK; + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) { - _tao_call.restart_flag (1); - continue; + ACE_THROW ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) + ); } - - break; - } - + + break; + } } CORBA::Boolean _TAO_ValueDef_Remote_Proxy_Impl::is_abstract ( @@ -38413,136 +21194,47 @@ CORBA::Boolean _TAO_ValueDef_Remote_Proxy_Impl::is_abstract ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_is_abstract_get ri ( - &_tao_call, - _collocated_tao_target_, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (_tao_retval); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (_tao_retval); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (_tao_retval); + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (_tao_retval); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), + _tao_retval ); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - _tao_retval - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> CORBA::Any::to_boolean (_tao_retval)) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> CORBA::Any::to_boolean (_tao_retval)) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), _tao_retval ); - - } - - TAO_INTERCEPTOR ( - CORBA::Boolean _tao_retval_info = _tao_retval; - ri.result (_tao_retval_info); - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (_tao_retval); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_retval; } @@ -38568,130 +21260,45 @@ void _TAO_ValueDef_Remote_Proxy_Impl::is_abstract ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_is_abstract_set ri ( - &_tao_call, - _collocated_tao_target_, - is_abstract, - ACE_TRY_ENV - ); - ACE_CHECK; - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK; - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK; - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << CORBA::Any::from_boolean (is_abstract)) - )) - TAO_INTERCEPTOR_THROW ( - CORBA::MARSHAL () - ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) - ); - - } - - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK; - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK; + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), ACE_TRY_ENV ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV + ACE_CHECK; + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << CORBA::Any::from_boolean (is_abstract)) + )) + ACE_THROW ( + CORBA::MARSHAL () ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK; -#endif /* TAO_HAS_INTERCEPTORS */ - - if (_invoke_status == TAO_INVOKE_RESTART) + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK; + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) { - _tao_call.restart_flag (1); - continue; + ACE_THROW ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) + ); } - - break; - } - + + break; + } } CORBA::Boolean _TAO_ValueDef_Remote_Proxy_Impl::is_custom ( @@ -38719,136 +21326,47 @@ CORBA::Boolean _TAO_ValueDef_Remote_Proxy_Impl::is_custom ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_is_custom_get ri ( - &_tao_call, - _collocated_tao_target_, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (_tao_retval); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (_tao_retval); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (_tao_retval); + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (_tao_retval); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), + _tao_retval ); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - _tao_retval - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> CORBA::Any::to_boolean (_tao_retval)) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> CORBA::Any::to_boolean (_tao_retval)) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), _tao_retval ); - - } - - TAO_INTERCEPTOR ( - CORBA::Boolean _tao_retval_info = _tao_retval; - ri.result (_tao_retval_info); - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (_tao_retval); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_retval; } @@ -38874,130 +21392,45 @@ void _TAO_ValueDef_Remote_Proxy_Impl::is_custom ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_is_custom_set ri ( - &_tao_call, - _collocated_tao_target_, - is_custom, - ACE_TRY_ENV - ); - ACE_CHECK; - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK; - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK; - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << CORBA::Any::from_boolean (is_custom)) - )) - TAO_INTERCEPTOR_THROW ( - CORBA::MARSHAL () - ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) - ); - - } - - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK; - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK; + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), ACE_TRY_ENV ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV + ACE_CHECK; + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << CORBA::Any::from_boolean (is_custom)) + )) + ACE_THROW ( + CORBA::MARSHAL () ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK; -#endif /* TAO_HAS_INTERCEPTORS */ - - if (_invoke_status == TAO_INVOKE_RESTART) + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK; + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) { - _tao_call.restart_flag (1); - continue; + ACE_THROW ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) + ); } - - break; - } - + + break; + } } CORBA::Boolean _TAO_ValueDef_Remote_Proxy_Impl::is_truncatable ( @@ -39025,136 +21458,47 @@ CORBA::Boolean _TAO_ValueDef_Remote_Proxy_Impl::is_truncatable ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_is_truncatable_get ri ( - &_tao_call, - _collocated_tao_target_, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (_tao_retval); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (_tao_retval); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (_tao_retval); + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (_tao_retval); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), + _tao_retval ); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - _tao_retval - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> CORBA::Any::to_boolean (_tao_retval)) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> CORBA::Any::to_boolean (_tao_retval)) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), _tao_retval ); - - } - - TAO_INTERCEPTOR ( - CORBA::Boolean _tao_retval_info = _tao_retval; - ri.result (_tao_retval_info); - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (_tao_retval); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_retval; } @@ -39180,130 +21524,45 @@ void _TAO_ValueDef_Remote_Proxy_Impl::is_truncatable ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_is_truncatable_set ri ( - &_tao_call, - _collocated_tao_target_, - is_truncatable, - ACE_TRY_ENV - ); - ACE_CHECK; - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK; - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK; - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << CORBA::Any::from_boolean (is_truncatable)) - )) - TAO_INTERCEPTOR_THROW ( - CORBA::MARSHAL () - ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) - ); - - } - - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK; - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK; + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), ACE_TRY_ENV ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV + ACE_CHECK; + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << CORBA::Any::from_boolean (is_truncatable)) + )) + ACE_THROW ( + CORBA::MARSHAL () ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK; -#endif /* TAO_HAS_INTERCEPTORS */ - - if (_invoke_status == TAO_INVOKE_RESTART) + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK; + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) { - _tao_call.restart_flag (1); - continue; + ACE_THROW ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) + ); } - - break; - } - + + break; + } } CORBA::Boolean _TAO_ValueDef_Remote_Proxy_Impl::is_a ( @@ -39332,147 +21591,57 @@ CORBA::Boolean _TAO_ValueDef_Remote_Proxy_Impl::is_a ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_is_a ri ( - &_tao_call, - _collocated_tao_target_, - id, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (_tao_retval); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << id) - )) - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::MARSHAL (), + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (_tao_retval); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (_tao_retval); + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << id) + )) + ACE_THROW_RETURN ( + CORBA::MARSHAL (), + _tao_retval + ); + + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (_tao_retval); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), _tao_retval ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - _tao_retval - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> CORBA::Any::to_boolean (_tao_retval)) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> CORBA::Any::to_boolean (_tao_retval)) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), _tao_retval ); - - } - - TAO_INTERCEPTOR ( - CORBA::Boolean _tao_retval_info = _tao_retval; - ri.result (_tao_retval_info); - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (_tao_retval); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_retval; } @@ -39507,156 +21676,61 @@ IR_ValueMemberDef_ptr _TAO_ValueDef_Remote_Proxy_Impl::create_value_member ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_create_value_member ri ( - &_tao_call, - _collocated_tao_target_, - id, - name, - version, - type, - access, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << id) && + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << id) && (_tao_out << name) && (_tao_out << version) && (_tao_out << type) && (_tao_out << access) - )) - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::MARSHAL (), + )) + ACE_THROW_RETURN ( + CORBA::MARSHAL (), + 0 + ); + + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - IR_ValueMemberDef_ptr _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -39693,160 +21767,63 @@ IR_AttributeDef_ptr _TAO_ValueDef_Remote_Proxy_Impl::create_attribute ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_create_attribute ri ( - &_tao_call, - _collocated_tao_target_, - id, - name, - version, - type, - mode, - get_exceptions, - put_exceptions, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << id) && + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << id) && (_tao_out << name) && (_tao_out << version) && (_tao_out << type) && (_tao_out << mode) && (_tao_out << get_exceptions) && (_tao_out << put_exceptions) - )) - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::MARSHAL (), + )) + ACE_THROW_RETURN ( + CORBA::MARSHAL (), + 0 + ); + + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - IR_AttributeDef_ptr _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -39884,60 +21861,22 @@ IR_OperationDef_ptr _TAO_ValueDef_Remote_Proxy_Impl::create_operation ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_create_operation ri ( - &_tao_call, - _collocated_tao_target_, - id, - name, - version, - result, - mode, - params, - exceptions, - contexts, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << id) && + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << id) && (_tao_out << name) && (_tao_out << version) && (_tao_out << result) && @@ -39945,101 +21884,41 @@ IR_OperationDef_ptr _TAO_ValueDef_Remote_Proxy_Impl::create_operation ( (_tao_out << params) && (_tao_out << exceptions) && (_tao_out << contexts) - )) - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::MARSHAL (), + )) + ACE_THROW_RETURN ( + CORBA::MARSHAL (), + 0 + ); + + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - IR_OperationDef_ptr _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -40061,13 +21940,8 @@ _TAO_ValueDef_Proxy_Broker::~_TAO_ValueDef_Proxy_Broker (void) { } -_TAO_ValueDef_Proxy_Broker * (*_TAO_ValueDef_Proxy_Broker_Factory_function_pointer) ( - CORBA::Object_ptr obj - ) = 0; - -// Factory Member function Implementation. -_TAO_ValueDef_Remote_Proxy_Broker * -_TAO_ValueDef_Remote_Proxy_Broker::the_TAO_ValueDef_Remote_Proxy_Broker (void) +// Factory function Implementation. +_TAO_ValueDef_Remote_Proxy_Broker *the_TAO_ValueDef_Remote_Proxy_Broker (void) { static ::_TAO_ValueDef_Remote_Proxy_Broker remote_proxy_broker; return &remote_proxy_broker; @@ -40101,7 +21975,7 @@ _TAO_ValueDef_Remote_Proxy_Broker::select_proxy ( // default constructor IR_ValueDef::IR_ValueDef (int collocated) { - this->IR_ValueDef_setup_collocation (collocated); + this->_tao_setup_collocation (collocated); } // destructor @@ -40109,18 +21983,19 @@ IR_ValueDef::~IR_ValueDef (void) {} void -IR_ValueDef::IR_ValueDef_setup_collocation (int collocated) +IR_ValueDef::_tao_setup_collocation (int collocated) { if (collocated) this->the_TAO_ValueDef_Proxy_Broker_ = _TAO_ValueDef_Proxy_Broker_Factory_function_pointer (this); else this->the_TAO_ValueDef_Proxy_Broker_ = - _TAO_ValueDef_Remote_Proxy_Broker::the_TAO_ValueDef_Remote_Proxy_Broker (); + ::the_TAO_ValueDef_Remote_Proxy_Broker (); + + IR_Container::_tao_setup_collocation (collocated); + IR_Contained::_tao_setup_collocation (collocated); + IR_IDLType::_tao_setup_collocation (collocated); - this->IR_Container_setup_collocation (collocated); - this->IR_Contained_setup_collocation (collocated); - this->IR_IDLType_setup_collocation (collocated); } void IR_ValueDef::_tao_any_destructor (void *x) @@ -40594,1179 +22469,6 @@ IR_OperationDef_ptr IR_ValueDef::create_operation ( ); } -#if (TAO_HAS_INTERCEPTORS == 1) -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_supported_interfaces_get::TAO_ClientRequestInfo_IR_ValueDef_supported_interfaces_get ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target) -{} - -Dynamic::ParameterList * -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_supported_interfaces_get::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return parameter_list; -} - -Dynamic::ExceptionList * -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_supported_interfaces_get::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_supported_interfaces_get::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_supported_interfaces_get::result (IR_InterfaceDefSeq * result) -{ - // update the result - this->_result = result; -} - -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_supported_interfaces_set::TAO_ClientRequestInfo_IR_ValueDef_supported_interfaces_set ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - const IR_InterfaceDefSeq & supported_interfaces, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - supported_interfaces_ (supported_interfaces) -{} - -Dynamic::ParameterList * -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_supported_interfaces_set::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_supported_interfaces = parameter_list->length (); - parameter_list->length (length_supported_interfaces + 1); - (*parameter_list)[length_supported_interfaces].argument <<= this->supported_interfaces_; - - (*parameter_list)[length_supported_interfaces].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_supported_interfaces_set::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_supported_interfaces_set::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 1; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return result_any; -} - -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_initializers_get::TAO_ClientRequestInfo_IR_ValueDef_initializers_get ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target) -{} - -Dynamic::ParameterList * -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_initializers_get::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return parameter_list; -} - -Dynamic::ExceptionList * -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_initializers_get::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_initializers_get::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_initializers_get::result (IR_InitializerSeq * result) -{ - // update the result - this->_result = result; -} - -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_initializers_set::TAO_ClientRequestInfo_IR_ValueDef_initializers_set ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - const IR_InitializerSeq & initializers, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - initializers_ (initializers) -{} - -Dynamic::ParameterList * -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_initializers_set::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_initializers = parameter_list->length (); - parameter_list->length (length_initializers + 1); - (*parameter_list)[length_initializers].argument <<= this->initializers_; - - (*parameter_list)[length_initializers].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_initializers_set::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_initializers_set::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 1; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return result_any; -} - -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_base_value_get::TAO_ClientRequestInfo_IR_ValueDef_base_value_get ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target) -{} - -Dynamic::ParameterList * -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_base_value_get::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return parameter_list; -} - -Dynamic::ExceptionList * -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_base_value_get::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_base_value_get::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_base_value_get::result (IR_ValueDef_ptr result) -{ - // update the result - this->_result = result; -} - -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_base_value_set::TAO_ClientRequestInfo_IR_ValueDef_base_value_set ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - IR_ValueDef_ptr base_value, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - base_value_ (base_value) -{} - -Dynamic::ParameterList * -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_base_value_set::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_base_value = parameter_list->length (); - parameter_list->length (length_base_value + 1); - (*parameter_list)[length_base_value].argument <<= this->base_value_; - - (*parameter_list)[length_base_value].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_base_value_set::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_base_value_set::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 1; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return result_any; -} - -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_abstract_base_values_get::TAO_ClientRequestInfo_IR_ValueDef_abstract_base_values_get ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target) -{} - -Dynamic::ParameterList * -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_abstract_base_values_get::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return parameter_list; -} - -Dynamic::ExceptionList * -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_abstract_base_values_get::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_abstract_base_values_get::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_abstract_base_values_get::result (IR_ValueDefSeq * result) -{ - // update the result - this->_result = result; -} - -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_abstract_base_values_set::TAO_ClientRequestInfo_IR_ValueDef_abstract_base_values_set ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - const IR_ValueDefSeq & abstract_base_values, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - abstract_base_values_ (abstract_base_values) -{} - -Dynamic::ParameterList * -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_abstract_base_values_set::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_abstract_base_values = parameter_list->length (); - parameter_list->length (length_abstract_base_values + 1); - (*parameter_list)[length_abstract_base_values].argument <<= this->abstract_base_values_; - - (*parameter_list)[length_abstract_base_values].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_abstract_base_values_set::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_abstract_base_values_set::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 1; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return result_any; -} - -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_is_abstract_get::TAO_ClientRequestInfo_IR_ValueDef_is_abstract_get ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target) -{} - -Dynamic::ParameterList * -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_is_abstract_get::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return parameter_list; -} - -Dynamic::ExceptionList * -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_is_abstract_get::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_is_abstract_get::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= CORBA::Any::from_boolean (this->_result); - return safe_result_any._retn (); -} - -void -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_is_abstract_get::result (CORBA::Boolean result) -{ - // update the result - this->_result = result; -} - -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_is_abstract_set::TAO_ClientRequestInfo_IR_ValueDef_is_abstract_set ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - const CORBA::Boolean & is_abstract, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - is_abstract_ (is_abstract) -{} - -Dynamic::ParameterList * -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_is_abstract_set::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_is_abstract = parameter_list->length (); - parameter_list->length (length_is_abstract + 1); - (*parameter_list)[length_is_abstract].argument <<= CORBA::Any::from_boolean (this->is_abstract_); - (*parameter_list)[length_is_abstract].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_is_abstract_set::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_is_abstract_set::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 1; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return result_any; -} - -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_is_custom_get::TAO_ClientRequestInfo_IR_ValueDef_is_custom_get ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target) -{} - -Dynamic::ParameterList * -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_is_custom_get::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return parameter_list; -} - -Dynamic::ExceptionList * -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_is_custom_get::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_is_custom_get::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= CORBA::Any::from_boolean (this->_result); - return safe_result_any._retn (); -} - -void -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_is_custom_get::result (CORBA::Boolean result) -{ - // update the result - this->_result = result; -} - -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_is_custom_set::TAO_ClientRequestInfo_IR_ValueDef_is_custom_set ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - const CORBA::Boolean & is_custom, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - is_custom_ (is_custom) -{} - -Dynamic::ParameterList * -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_is_custom_set::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_is_custom = parameter_list->length (); - parameter_list->length (length_is_custom + 1); - (*parameter_list)[length_is_custom].argument <<= CORBA::Any::from_boolean (this->is_custom_); - (*parameter_list)[length_is_custom].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_is_custom_set::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_is_custom_set::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 1; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return result_any; -} - -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_is_truncatable_get::TAO_ClientRequestInfo_IR_ValueDef_is_truncatable_get ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target) -{} - -Dynamic::ParameterList * -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_is_truncatable_get::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return parameter_list; -} - -Dynamic::ExceptionList * -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_is_truncatable_get::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_is_truncatable_get::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= CORBA::Any::from_boolean (this->_result); - return safe_result_any._retn (); -} - -void -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_is_truncatable_get::result (CORBA::Boolean result) -{ - // update the result - this->_result = result; -} - -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_is_truncatable_set::TAO_ClientRequestInfo_IR_ValueDef_is_truncatable_set ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - const CORBA::Boolean & is_truncatable, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - is_truncatable_ (is_truncatable) -{} - -Dynamic::ParameterList * -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_is_truncatable_set::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_is_truncatable = parameter_list->length (); - parameter_list->length (length_is_truncatable + 1); - (*parameter_list)[length_is_truncatable].argument <<= CORBA::Any::from_boolean (this->is_truncatable_); - (*parameter_list)[length_is_truncatable].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_is_truncatable_set::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_is_truncatable_set::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 1; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return result_any; -} - -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_is_a::TAO_ClientRequestInfo_IR_ValueDef_is_a ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - const char * id, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - id_ (id) -{} - -Dynamic::ParameterList * -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_is_a::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_id = parameter_list->length (); - parameter_list->length (length_id + 1); - (*parameter_list)[length_id].argument <<= id_; - (*parameter_list)[length_id].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_is_a::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_is_a::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= CORBA::Any::from_boolean (this->_result); - return safe_result_any._retn (); -} - -void -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_is_a::result (CORBA::Boolean result) -{ - // update the result - this->_result = result; -} - -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_create_value_member::TAO_ClientRequestInfo_IR_ValueDef_create_value_member ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - const char * id, - const char * name, - const char * version, - IR_IDLType_ptr type, - const CORBA::Visibility & access, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - id_ (id), - name_ (name), - version_ (version), - type_ (type), - access_ (access) -{} - -Dynamic::ParameterList * -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_create_value_member::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_id = parameter_list->length (); - parameter_list->length (length_id + 1); - (*parameter_list)[length_id].argument <<= id_; - (*parameter_list)[length_id].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_name = parameter_list->length (); - parameter_list->length (length_name + 1); - (*parameter_list)[length_name].argument <<= name_; - (*parameter_list)[length_name].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_version = parameter_list->length (); - parameter_list->length (length_version + 1); - (*parameter_list)[length_version].argument <<= version_; - (*parameter_list)[length_version].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_type = parameter_list->length (); - parameter_list->length (length_type + 1); - (*parameter_list)[length_type].argument <<= this->type_; - - (*parameter_list)[length_type].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_access = parameter_list->length (); - parameter_list->length (length_access + 1); - (*parameter_list)[length_access].argument <<= access_; - (*parameter_list)[length_access].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_create_value_member::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_create_value_member::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_create_value_member::result (IR_ValueMemberDef_ptr result) -{ - // update the result - this->_result = result; -} - -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_create_attribute::TAO_ClientRequestInfo_IR_ValueDef_create_attribute ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - const char * id, - const char * name, - const char * version, - IR_IDLType_ptr type, - IR_AttributeMode & mode, - const IR_ExceptionDefSeq & get_exceptions, - const IR_ExceptionDefSeq & put_exceptions, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - id_ (id), - name_ (name), - version_ (version), - type_ (type), - mode_ (mode), - get_exceptions_ (get_exceptions), - put_exceptions_ (put_exceptions) -{} - -Dynamic::ParameterList * -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_create_attribute::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_id = parameter_list->length (); - parameter_list->length (length_id + 1); - (*parameter_list)[length_id].argument <<= id_; - (*parameter_list)[length_id].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_name = parameter_list->length (); - parameter_list->length (length_name + 1); - (*parameter_list)[length_name].argument <<= name_; - (*parameter_list)[length_name].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_version = parameter_list->length (); - parameter_list->length (length_version + 1); - (*parameter_list)[length_version].argument <<= version_; - (*parameter_list)[length_version].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_type = parameter_list->length (); - parameter_list->length (length_type + 1); - (*parameter_list)[length_type].argument <<= this->type_; - - (*parameter_list)[length_type].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_mode = parameter_list->length (); - parameter_list->length (length_mode + 1); - (*parameter_list)[length_mode].argument <<= this->mode_; - - (*parameter_list)[length_mode].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_get_exceptions = parameter_list->length (); - parameter_list->length (length_get_exceptions + 1); - (*parameter_list)[length_get_exceptions].argument <<= this->get_exceptions_; - - (*parameter_list)[length_get_exceptions].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_put_exceptions = parameter_list->length (); - parameter_list->length (length_put_exceptions + 1); - (*parameter_list)[length_put_exceptions].argument <<= this->put_exceptions_; - - (*parameter_list)[length_put_exceptions].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_create_attribute::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_create_attribute::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_create_attribute::result (IR_AttributeDef_ptr result) -{ - // update the result - this->_result = result; -} - -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_create_operation::TAO_ClientRequestInfo_IR_ValueDef_create_operation ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - const char * id, - const char * name, - const char * version, - IR_IDLType_ptr result, - IR_OperationMode & mode, - const IR_ParDescriptionSeq & params, - const IR_ExceptionDefSeq & exceptions, - const IR_ContextIdSeq & contexts, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - id_ (id), - name_ (name), - version_ (version), - result_ (result), - mode_ (mode), - params_ (params), - exceptions_ (exceptions), - contexts_ (contexts) -{} - -Dynamic::ParameterList * -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_create_operation::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_id = parameter_list->length (); - parameter_list->length (length_id + 1); - (*parameter_list)[length_id].argument <<= id_; - (*parameter_list)[length_id].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_name = parameter_list->length (); - parameter_list->length (length_name + 1); - (*parameter_list)[length_name].argument <<= name_; - (*parameter_list)[length_name].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_version = parameter_list->length (); - parameter_list->length (length_version + 1); - (*parameter_list)[length_version].argument <<= version_; - (*parameter_list)[length_version].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_result = parameter_list->length (); - parameter_list->length (length_result + 1); - (*parameter_list)[length_result].argument <<= this->result_; - - (*parameter_list)[length_result].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_mode = parameter_list->length (); - parameter_list->length (length_mode + 1); - (*parameter_list)[length_mode].argument <<= this->mode_; - - (*parameter_list)[length_mode].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_params = parameter_list->length (); - parameter_list->length (length_params + 1); - (*parameter_list)[length_params].argument <<= this->params_; - - (*parameter_list)[length_params].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_exceptions = parameter_list->length (); - parameter_list->length (length_exceptions + 1); - (*parameter_list)[length_exceptions].argument <<= this->exceptions_; - - (*parameter_list)[length_exceptions].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_contexts = parameter_list->length (); - parameter_list->length (length_contexts + 1); - (*parameter_list)[length_contexts].argument <<= this->contexts_; - - (*parameter_list)[length_contexts].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_create_operation::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_create_operation::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_ValueDef::TAO_ClientRequestInfo_IR_ValueDef_create_operation::result (IR_OperationDef_ptr result) -{ - // update the result - this->_result = result; -} - -#endif /* TAO_HAS_INTERCEPTORS */ - static const CORBA::Long _oc_IR_ValueDef[] = { TAO_ENCAP_BYTE_ORDER, // byte order @@ -42459,137 +23161,47 @@ IR_IDLType_ptr _TAO_ValueBoxDef_Remote_Proxy_Impl::original_type_def ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_ValueBoxDef::TAO_ClientRequestInfo_IR_ValueBoxDef_original_type_def_get ri ( - &_tao_call, - _collocated_tao_target_, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), + 0 ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - IR_IDLType_ptr _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -42615,130 +23227,45 @@ void _TAO_ValueBoxDef_Remote_Proxy_Impl::original_type_def ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_ValueBoxDef::TAO_ClientRequestInfo_IR_ValueBoxDef_original_type_def_set ri ( - &_tao_call, - _collocated_tao_target_, - original_type_def, - ACE_TRY_ENV - ); - ACE_CHECK; - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK; - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK; - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << original_type_def) - )) - TAO_INTERCEPTOR_THROW ( - CORBA::MARSHAL () - ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) - ); - - } - - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK; - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK; + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), ACE_TRY_ENV ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV + ACE_CHECK; + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << original_type_def) + )) + ACE_THROW ( + CORBA::MARSHAL () ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK; -#endif /* TAO_HAS_INTERCEPTORS */ - - if (_invoke_status == TAO_INVOKE_RESTART) + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK; + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) { - _tao_call.restart_flag (1); - continue; + ACE_THROW ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) + ); } - - break; - } - + + break; + } } @@ -42759,13 +23286,8 @@ _TAO_ValueBoxDef_Proxy_Broker::~_TAO_ValueBoxDef_Proxy_Broker (void) { } -_TAO_ValueBoxDef_Proxy_Broker * (*_TAO_ValueBoxDef_Proxy_Broker_Factory_function_pointer) ( - CORBA::Object_ptr obj - ) = 0; - -// Factory Member function Implementation. -_TAO_ValueBoxDef_Remote_Proxy_Broker * -_TAO_ValueBoxDef_Remote_Proxy_Broker::the_TAO_ValueBoxDef_Remote_Proxy_Broker (void) +// Factory function Implementation. +_TAO_ValueBoxDef_Remote_Proxy_Broker *the_TAO_ValueBoxDef_Remote_Proxy_Broker (void) { static ::_TAO_ValueBoxDef_Remote_Proxy_Broker remote_proxy_broker; return &remote_proxy_broker; @@ -42799,7 +23321,7 @@ _TAO_ValueBoxDef_Remote_Proxy_Broker::select_proxy ( // default constructor IR_ValueBoxDef::IR_ValueBoxDef (int collocated) { - this->IR_ValueBoxDef_setup_collocation (collocated); + this->_tao_setup_collocation (collocated); } // destructor @@ -42807,16 +23329,17 @@ IR_ValueBoxDef::~IR_ValueBoxDef (void) {} void -IR_ValueBoxDef::IR_ValueBoxDef_setup_collocation (int collocated) +IR_ValueBoxDef::_tao_setup_collocation (int collocated) { if (collocated) this->the_TAO_ValueBoxDef_Proxy_Broker_ = _TAO_ValueBoxDef_Proxy_Broker_Factory_function_pointer (this); else this->the_TAO_ValueBoxDef_Proxy_Broker_ = - _TAO_ValueBoxDef_Remote_Proxy_Broker::the_TAO_ValueBoxDef_Remote_Proxy_Broker (); + ::the_TAO_ValueBoxDef_Remote_Proxy_Broker (); + + IR_TypedefDef::_tao_setup_collocation (collocated); - this->IR_TypedefDef_setup_collocation (collocated); } void IR_ValueBoxDef::_tao_any_destructor (void *x) @@ -43012,121 +23535,6 @@ void IR_ValueBoxDef::original_type_def ( ); } -#if (TAO_HAS_INTERCEPTORS == 1) -IR_ValueBoxDef::TAO_ClientRequestInfo_IR_ValueBoxDef_original_type_def_get::TAO_ClientRequestInfo_IR_ValueBoxDef_original_type_def_get ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target) -{} - -Dynamic::ParameterList * -IR_ValueBoxDef::TAO_ClientRequestInfo_IR_ValueBoxDef_original_type_def_get::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return parameter_list; -} - -Dynamic::ExceptionList * -IR_ValueBoxDef::TAO_ClientRequestInfo_IR_ValueBoxDef_original_type_def_get::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_ValueBoxDef::TAO_ClientRequestInfo_IR_ValueBoxDef_original_type_def_get::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_ValueBoxDef::TAO_ClientRequestInfo_IR_ValueBoxDef_original_type_def_get::result (IR_IDLType_ptr result) -{ - // update the result - this->_result = result; -} - -IR_ValueBoxDef::TAO_ClientRequestInfo_IR_ValueBoxDef_original_type_def_set::TAO_ClientRequestInfo_IR_ValueBoxDef_original_type_def_set ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - IR_IDLType_ptr original_type_def, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - original_type_def_ (original_type_def) -{} - -Dynamic::ParameterList * -IR_ValueBoxDef::TAO_ClientRequestInfo_IR_ValueBoxDef_original_type_def_set::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_original_type_def = parameter_list->length (); - parameter_list->length (length_original_type_def + 1); - (*parameter_list)[length_original_type_def].argument <<= this->original_type_def_; - - (*parameter_list)[length_original_type_def].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_ValueBoxDef::TAO_ClientRequestInfo_IR_ValueBoxDef_original_type_def_set::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_ValueBoxDef::TAO_ClientRequestInfo_IR_ValueBoxDef_original_type_def_set::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 1; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return result_any; -} - -#endif /* TAO_HAS_INTERCEPTORS */ - static const CORBA::Long _oc_IR_ValueBoxDef[] = { TAO_ENCAP_BYTE_ORDER, // byte order @@ -43177,137 +23585,47 @@ IR_InterfaceDef_ptr _TAO_ProvidesDef_Remote_Proxy_Impl::interface_type ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_ProvidesDef::TAO_ClientRequestInfo_IR_ProvidesDef_interface_type_get ri ( - &_tao_call, - _collocated_tao_target_, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), + 0 ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - IR_InterfaceDef_ptr _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -43329,13 +23647,8 @@ _TAO_ProvidesDef_Proxy_Broker::~_TAO_ProvidesDef_Proxy_Broker (void) { } -_TAO_ProvidesDef_Proxy_Broker * (*_TAO_ProvidesDef_Proxy_Broker_Factory_function_pointer) ( - CORBA::Object_ptr obj - ) = 0; - -// Factory Member function Implementation. -_TAO_ProvidesDef_Remote_Proxy_Broker * -_TAO_ProvidesDef_Remote_Proxy_Broker::the_TAO_ProvidesDef_Remote_Proxy_Broker (void) +// Factory function Implementation. +_TAO_ProvidesDef_Remote_Proxy_Broker *the_TAO_ProvidesDef_Remote_Proxy_Broker (void) { static ::_TAO_ProvidesDef_Remote_Proxy_Broker remote_proxy_broker; return &remote_proxy_broker; @@ -43369,7 +23682,7 @@ _TAO_ProvidesDef_Remote_Proxy_Broker::select_proxy ( // default constructor IR_ProvidesDef::IR_ProvidesDef (int collocated) { - this->IR_ProvidesDef_setup_collocation (collocated); + this->_tao_setup_collocation (collocated); } // destructor @@ -43377,16 +23690,17 @@ IR_ProvidesDef::~IR_ProvidesDef (void) {} void -IR_ProvidesDef::IR_ProvidesDef_setup_collocation (int collocated) +IR_ProvidesDef::_tao_setup_collocation (int collocated) { if (collocated) this->the_TAO_ProvidesDef_Proxy_Broker_ = _TAO_ProvidesDef_Proxy_Broker_Factory_function_pointer (this); else this->the_TAO_ProvidesDef_Proxy_Broker_ = - _TAO_ProvidesDef_Remote_Proxy_Broker::the_TAO_ProvidesDef_Remote_Proxy_Broker (); + ::the_TAO_ProvidesDef_Remote_Proxy_Broker (); + + IR_Contained::_tao_setup_collocation (collocated); - this->IR_Contained_setup_collocation (collocated); } void IR_ProvidesDef::_tao_any_destructor (void *x) @@ -43540,65 +23854,6 @@ IR_InterfaceDef_ptr IR_ProvidesDef::interface_type ( ); } -#if (TAO_HAS_INTERCEPTORS == 1) -IR_ProvidesDef::TAO_ClientRequestInfo_IR_ProvidesDef_interface_type_get::TAO_ClientRequestInfo_IR_ProvidesDef_interface_type_get ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target) -{} - -Dynamic::ParameterList * -IR_ProvidesDef::TAO_ClientRequestInfo_IR_ProvidesDef_interface_type_get::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return parameter_list; -} - -Dynamic::ExceptionList * -IR_ProvidesDef::TAO_ClientRequestInfo_IR_ProvidesDef_interface_type_get::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_ProvidesDef::TAO_ClientRequestInfo_IR_ProvidesDef_interface_type_get::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_ProvidesDef::TAO_ClientRequestInfo_IR_ProvidesDef_interface_type_get::result (IR_InterfaceDef_ptr result) -{ - // update the result - this->_result = result; -} - -#endif /* TAO_HAS_INTERCEPTORS */ - static const CORBA::Long _oc_IR_ProvidesDef[] = { TAO_ENCAP_BYTE_ORDER, // byte order @@ -43712,137 +23967,47 @@ IR_InterfaceDef_ptr _TAO_UsesDef_Remote_Proxy_Impl::interface_type ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_UsesDef::TAO_ClientRequestInfo_IR_UsesDef_interface_type_get ri ( - &_tao_call, - _collocated_tao_target_, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), + 0 ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - IR_InterfaceDef_ptr _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -43871,136 +24036,47 @@ CORBA::Boolean _TAO_UsesDef_Remote_Proxy_Impl::is_multiple ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_UsesDef::TAO_ClientRequestInfo_IR_UsesDef_is_multiple_get ri ( - &_tao_call, - _collocated_tao_target_, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (_tao_retval); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (_tao_retval); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (_tao_retval); + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (_tao_retval); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), + _tao_retval ); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - _tao_retval - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> CORBA::Any::to_boolean (_tao_retval)) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> CORBA::Any::to_boolean (_tao_retval)) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), _tao_retval ); - - } - - TAO_INTERCEPTOR ( - CORBA::Boolean _tao_retval_info = _tao_retval; - ri.result (_tao_retval_info); - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (_tao_retval); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_retval; } @@ -44022,14 +24098,8 @@ _TAO_UsesDef_Proxy_Broker::~_TAO_UsesDef_Proxy_Broker (void) { } - -_TAO_UsesDef_Proxy_Broker * (*_TAO_UsesDef_Proxy_Broker_Factory_function_pointer) ( - CORBA::Object_ptr obj - ) = 0; - -// Factory Member function Implementation. -_TAO_UsesDef_Remote_Proxy_Broker * -_TAO_UsesDef_Remote_Proxy_Broker::the_TAO_UsesDef_Remote_Proxy_Broker (void) +// Factory function Implementation. +_TAO_UsesDef_Remote_Proxy_Broker *the_TAO_UsesDef_Remote_Proxy_Broker (void) { static ::_TAO_UsesDef_Remote_Proxy_Broker remote_proxy_broker; return &remote_proxy_broker; @@ -44063,7 +24133,7 @@ _TAO_UsesDef_Remote_Proxy_Broker::select_proxy ( // default constructor IR_UsesDef::IR_UsesDef (int collocated) { - this->IR_UsesDef_setup_collocation (collocated); + this->_tao_setup_collocation (collocated); } // destructor @@ -44071,16 +24141,17 @@ IR_UsesDef::~IR_UsesDef (void) {} void -IR_UsesDef::IR_UsesDef_setup_collocation (int collocated) +IR_UsesDef::_tao_setup_collocation (int collocated) { if (collocated) this->the_TAO_UsesDef_Proxy_Broker_ = _TAO_UsesDef_Proxy_Broker_Factory_function_pointer (this); else this->the_TAO_UsesDef_Proxy_Broker_ = - _TAO_UsesDef_Remote_Proxy_Broker::the_TAO_UsesDef_Remote_Proxy_Broker (); + ::the_TAO_UsesDef_Remote_Proxy_Broker (); + + IR_Contained::_tao_setup_collocation (collocated); - this->IR_Contained_setup_collocation (collocated); } void IR_UsesDef::_tao_any_destructor (void *x) @@ -44248,121 +24319,6 @@ CORBA::Boolean IR_UsesDef::is_multiple ( ); } -#if (TAO_HAS_INTERCEPTORS == 1) -IR_UsesDef::TAO_ClientRequestInfo_IR_UsesDef_interface_type_get::TAO_ClientRequestInfo_IR_UsesDef_interface_type_get ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target) -{} - -Dynamic::ParameterList * -IR_UsesDef::TAO_ClientRequestInfo_IR_UsesDef_interface_type_get::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return parameter_list; -} - -Dynamic::ExceptionList * -IR_UsesDef::TAO_ClientRequestInfo_IR_UsesDef_interface_type_get::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_UsesDef::TAO_ClientRequestInfo_IR_UsesDef_interface_type_get::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_UsesDef::TAO_ClientRequestInfo_IR_UsesDef_interface_type_get::result (IR_InterfaceDef_ptr result) -{ - // update the result - this->_result = result; -} - -IR_UsesDef::TAO_ClientRequestInfo_IR_UsesDef_is_multiple_get::TAO_ClientRequestInfo_IR_UsesDef_is_multiple_get ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target) -{} - -Dynamic::ParameterList * -IR_UsesDef::TAO_ClientRequestInfo_IR_UsesDef_is_multiple_get::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return parameter_list; -} - -Dynamic::ExceptionList * -IR_UsesDef::TAO_ClientRequestInfo_IR_UsesDef_is_multiple_get::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_UsesDef::TAO_ClientRequestInfo_IR_UsesDef_is_multiple_get::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= CORBA::Any::from_boolean (this->_result); - return safe_result_any._retn (); -} - -void -IR_UsesDef::TAO_ClientRequestInfo_IR_UsesDef_is_multiple_get::result (CORBA::Boolean result) -{ - // update the result - this->_result = result; -} - -#endif /* TAO_HAS_INTERCEPTORS */ - static const CORBA::Long _oc_IR_UsesDef[] = { TAO_ENCAP_BYTE_ORDER, // byte order @@ -44779,147 +24735,57 @@ CORBA::Boolean _TAO_EventDef_Remote_Proxy_Impl::is_a ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_EventDef::TAO_ClientRequestInfo_IR_EventDef_is_a ri ( - &_tao_call, - _collocated_tao_target_, - event_id, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (_tao_retval); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << event_id) - )) - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::MARSHAL (), + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (_tao_retval); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (_tao_retval); + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << event_id) + )) + ACE_THROW_RETURN ( + CORBA::MARSHAL (), + _tao_retval + ); + + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (_tao_retval); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), _tao_retval ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - _tao_retval - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> CORBA::Any::to_boolean (_tao_retval)) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> CORBA::Any::to_boolean (_tao_retval)) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), _tao_retval ); - - } - - TAO_INTERCEPTOR ( - CORBA::Boolean _tao_retval_info = _tao_retval; - ri.result (_tao_retval_info); - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (_tao_retval); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_retval; } @@ -44949,137 +24815,47 @@ IR_ValueDef_ptr _TAO_EventDef_Remote_Proxy_Impl::event ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_EventDef::TAO_ClientRequestInfo_IR_EventDef_event_get ri ( - &_tao_call, - _collocated_tao_target_, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), + 0 ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - IR_ValueDef_ptr _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -45101,13 +24877,8 @@ _TAO_EventDef_Proxy_Broker::~_TAO_EventDef_Proxy_Broker (void) { } -_TAO_EventDef_Proxy_Broker * (*_TAO_EventDef_Proxy_Broker_Factory_function_pointer) ( - CORBA::Object_ptr obj - ) = 0; - -// Factory Member function Implementation. -_TAO_EventDef_Remote_Proxy_Broker * -_TAO_EventDef_Remote_Proxy_Broker::the_TAO_EventDef_Remote_Proxy_Broker (void) +// Factory function Implementation. +_TAO_EventDef_Remote_Proxy_Broker *the_TAO_EventDef_Remote_Proxy_Broker (void) { static ::_TAO_EventDef_Remote_Proxy_Broker remote_proxy_broker; return &remote_proxy_broker; @@ -45141,7 +24912,7 @@ _TAO_EventDef_Remote_Proxy_Broker::select_proxy ( // default constructor IR_EventDef::IR_EventDef (int collocated) { - this->IR_EventDef_setup_collocation (collocated); + this->_tao_setup_collocation (collocated); } // destructor @@ -45149,16 +24920,17 @@ IR_EventDef::~IR_EventDef (void) {} void -IR_EventDef::IR_EventDef_setup_collocation (int collocated) +IR_EventDef::_tao_setup_collocation (int collocated) { if (collocated) this->the_TAO_EventDef_Proxy_Broker_ = _TAO_EventDef_Proxy_Broker_Factory_function_pointer (this); else this->the_TAO_EventDef_Proxy_Broker_ = - _TAO_EventDef_Remote_Proxy_Broker::the_TAO_EventDef_Remote_Proxy_Broker (); + ::the_TAO_EventDef_Remote_Proxy_Broker (); + + IR_Contained::_tao_setup_collocation (collocated); - this->IR_Contained_setup_collocation (collocated); } void IR_EventDef::_tao_any_destructor (void *x) @@ -45328,130 +25100,6 @@ IR_ValueDef_ptr IR_EventDef::event ( ); } -#if (TAO_HAS_INTERCEPTORS == 1) -IR_EventDef::TAO_ClientRequestInfo_IR_EventDef_is_a::TAO_ClientRequestInfo_IR_EventDef_is_a ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - const char * event_id, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - event_id_ (event_id) -{} - -Dynamic::ParameterList * -IR_EventDef::TAO_ClientRequestInfo_IR_EventDef_is_a::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_event_id = parameter_list->length (); - parameter_list->length (length_event_id + 1); - (*parameter_list)[length_event_id].argument <<= event_id_; - (*parameter_list)[length_event_id].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_EventDef::TAO_ClientRequestInfo_IR_EventDef_is_a::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_EventDef::TAO_ClientRequestInfo_IR_EventDef_is_a::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= CORBA::Any::from_boolean (this->_result); - return safe_result_any._retn (); -} - -void -IR_EventDef::TAO_ClientRequestInfo_IR_EventDef_is_a::result (CORBA::Boolean result) -{ - // update the result - this->_result = result; -} - -IR_EventDef::TAO_ClientRequestInfo_IR_EventDef_event_get::TAO_ClientRequestInfo_IR_EventDef_event_get ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target) -{} - -Dynamic::ParameterList * -IR_EventDef::TAO_ClientRequestInfo_IR_EventDef_event_get::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return parameter_list; -} - -Dynamic::ExceptionList * -IR_EventDef::TAO_ClientRequestInfo_IR_EventDef_event_get::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_EventDef::TAO_ClientRequestInfo_IR_EventDef_event_get::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_EventDef::TAO_ClientRequestInfo_IR_EventDef_event_get::result (IR_ValueDef_ptr result) -{ - // update the result - this->_result = result; -} - -#endif /* TAO_HAS_INTERCEPTORS */ - static const CORBA::Long _oc_IR_EventDef[] = { TAO_ENCAP_BYTE_ORDER, // byte order @@ -45557,13 +25205,8 @@ _TAO_EmitsDef_Proxy_Broker::~_TAO_EmitsDef_Proxy_Broker (void) { } -_TAO_EmitsDef_Proxy_Broker * (*_TAO_EmitsDef_Proxy_Broker_Factory_function_pointer) ( - CORBA::Object_ptr obj - ) = 0; - -// Factory Member function Implementation. -_TAO_EmitsDef_Remote_Proxy_Broker * -_TAO_EmitsDef_Remote_Proxy_Broker::the_TAO_EmitsDef_Remote_Proxy_Broker (void) +// Factory function Implementation. +_TAO_EmitsDef_Remote_Proxy_Broker *the_TAO_EmitsDef_Remote_Proxy_Broker (void) { static ::_TAO_EmitsDef_Remote_Proxy_Broker remote_proxy_broker; return &remote_proxy_broker; @@ -45597,7 +25240,7 @@ _TAO_EmitsDef_Remote_Proxy_Broker::select_proxy ( // default constructor IR_EmitsDef::IR_EmitsDef (int collocated) { - this->IR_EmitsDef_setup_collocation (collocated); + this->_tao_setup_collocation (collocated); } // destructor @@ -45605,16 +25248,17 @@ IR_EmitsDef::~IR_EmitsDef (void) {} void -IR_EmitsDef::IR_EmitsDef_setup_collocation (int collocated) +IR_EmitsDef::_tao_setup_collocation (int collocated) { if (collocated) this->the_TAO_EmitsDef_Proxy_Broker_ = _TAO_EmitsDef_Proxy_Broker_Factory_function_pointer (this); else this->the_TAO_EmitsDef_Proxy_Broker_ = - _TAO_EmitsDef_Remote_Proxy_Broker::the_TAO_EmitsDef_Remote_Proxy_Broker (); + ::the_TAO_EmitsDef_Remote_Proxy_Broker (); + + IR_EventDef::_tao_setup_collocation (collocated); - this->IR_EventDef_setup_collocation (collocated); } void IR_EmitsDef::_tao_any_destructor (void *x) @@ -45809,13 +25453,8 @@ _TAO_PublishesDef_Proxy_Broker::~_TAO_PublishesDef_Proxy_Broker (void) { } -_TAO_PublishesDef_Proxy_Broker * (*_TAO_PublishesDef_Proxy_Broker_Factory_function_pointer) ( - CORBA::Object_ptr obj - ) = 0; - -// Factory Member function Implementation. -_TAO_PublishesDef_Remote_Proxy_Broker * -_TAO_PublishesDef_Remote_Proxy_Broker::the_TAO_PublishesDef_Remote_Proxy_Broker (void) +// Factory function Implementation. +_TAO_PublishesDef_Remote_Proxy_Broker *the_TAO_PublishesDef_Remote_Proxy_Broker (void) { static ::_TAO_PublishesDef_Remote_Proxy_Broker remote_proxy_broker; return &remote_proxy_broker; @@ -45849,7 +25488,7 @@ _TAO_PublishesDef_Remote_Proxy_Broker::select_proxy ( // default constructor IR_PublishesDef::IR_PublishesDef (int collocated) { - this->IR_PublishesDef_setup_collocation (collocated); + this->_tao_setup_collocation (collocated); } // destructor @@ -45857,16 +25496,17 @@ IR_PublishesDef::~IR_PublishesDef (void) {} void -IR_PublishesDef::IR_PublishesDef_setup_collocation (int collocated) +IR_PublishesDef::_tao_setup_collocation (int collocated) { if (collocated) this->the_TAO_PublishesDef_Proxy_Broker_ = _TAO_PublishesDef_Proxy_Broker_Factory_function_pointer (this); else this->the_TAO_PublishesDef_Proxy_Broker_ = - _TAO_PublishesDef_Remote_Proxy_Broker::the_TAO_PublishesDef_Remote_Proxy_Broker (); + ::the_TAO_PublishesDef_Remote_Proxy_Broker (); + + IR_EventDef::_tao_setup_collocation (collocated); - this->IR_EventDef_setup_collocation (collocated); } void IR_PublishesDef::_tao_any_destructor (void *x) @@ -46061,13 +25701,8 @@ _TAO_ConsumesDef_Proxy_Broker::~_TAO_ConsumesDef_Proxy_Broker (void) { } -_TAO_ConsumesDef_Proxy_Broker * (*_TAO_ConsumesDef_Proxy_Broker_Factory_function_pointer) ( - CORBA::Object_ptr obj - ) = 0; - -// Factory Member function Implementation. -_TAO_ConsumesDef_Remote_Proxy_Broker * -_TAO_ConsumesDef_Remote_Proxy_Broker::the_TAO_ConsumesDef_Remote_Proxy_Broker (void) +// Factory function Implementation. +_TAO_ConsumesDef_Remote_Proxy_Broker *the_TAO_ConsumesDef_Remote_Proxy_Broker (void) { static ::_TAO_ConsumesDef_Remote_Proxy_Broker remote_proxy_broker; return &remote_proxy_broker; @@ -46101,7 +25736,7 @@ _TAO_ConsumesDef_Remote_Proxy_Broker::select_proxy ( // default constructor IR_ConsumesDef::IR_ConsumesDef (int collocated) { - this->IR_ConsumesDef_setup_collocation (collocated); + this->_tao_setup_collocation (collocated); } // destructor @@ -46109,16 +25744,17 @@ IR_ConsumesDef::~IR_ConsumesDef (void) {} void -IR_ConsumesDef::IR_ConsumesDef_setup_collocation (int collocated) +IR_ConsumesDef::_tao_setup_collocation (int collocated) { if (collocated) this->the_TAO_ConsumesDef_Proxy_Broker_ = _TAO_ConsumesDef_Proxy_Broker_Factory_function_pointer (this); else this->the_TAO_ConsumesDef_Proxy_Broker_ = - _TAO_ConsumesDef_Remote_Proxy_Broker::the_TAO_ConsumesDef_Remote_Proxy_Broker (); + ::the_TAO_ConsumesDef_Remote_Proxy_Broker (); + + IR_EventDef::_tao_setup_collocation (collocated); - this->IR_EventDef_setup_collocation (collocated); } void IR_ConsumesDef::_tao_any_destructor (void *x) @@ -46322,137 +25958,47 @@ IR_InterfaceDefSeq * _TAO_ComponentDef_Remote_Proxy_Impl::supported_interfaces ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_supported_interfaces_get ri ( - &_tao_call, - _collocated_tao_target_, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), + 0 ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - IR_InterfaceDefSeq * _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -46478,130 +26024,45 @@ void _TAO_ComponentDef_Remote_Proxy_Impl::supported_interfaces ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_supported_interfaces_set ri ( - &_tao_call, - _collocated_tao_target_, - supported_interfaces, - ACE_TRY_ENV - ); - ACE_CHECK; - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK; - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK; - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << supported_interfaces) - )) - TAO_INTERCEPTOR_THROW ( - CORBA::MARSHAL () - ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK; - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) - ); - - } - - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK; - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK; + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), ACE_TRY_ENV ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV + ACE_CHECK; + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << supported_interfaces) + )) + ACE_THROW ( + CORBA::MARSHAL () ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK; -#endif /* TAO_HAS_INTERCEPTORS */ - - if (_invoke_status == TAO_INVOKE_RESTART) + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK; + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) { - _tao_call.restart_flag (1); - continue; + ACE_THROW ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES) + ); } - - break; - } - + + break; + } } IR_ComponentDef_ptr _TAO_ComponentDef_Remote_Proxy_Impl::base_component ( @@ -46630,137 +26091,47 @@ IR_ComponentDef_ptr _TAO_ComponentDef_Remote_Proxy_Impl::base_component ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_base_component_get ri ( - &_tao_call, - _collocated_tao_target_, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), + 0 ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - IR_ComponentDef_ptr _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -46791,137 +26162,47 @@ IR_ProvidesDefSeq * _TAO_ComponentDef_Remote_Proxy_Impl::provides_interfaces ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_provides_interfaces_get ri ( - &_tao_call, - _collocated_tao_target_, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), + 0 ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - IR_ProvidesDefSeq * _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -46952,137 +26233,47 @@ IR_UsesDefSeq * _TAO_ComponentDef_Remote_Proxy_Impl::uses_interfaces ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_uses_interfaces_get ri ( - &_tao_call, - _collocated_tao_target_, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), + 0 ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - IR_UsesDefSeq * _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -47113,137 +26304,47 @@ IR_EmitsDefSeq * _TAO_ComponentDef_Remote_Proxy_Impl::emits_events ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_emits_events_get ri ( - &_tao_call, - _collocated_tao_target_, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), + 0 ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - IR_EmitsDefSeq * _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -47274,137 +26375,47 @@ IR_PublishesDefSeq * _TAO_ComponentDef_Remote_Proxy_Impl::publishes_events ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_publishes_events_get ri ( - &_tao_call, - _collocated_tao_target_, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), + 0 ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - IR_PublishesDefSeq * _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -47435,137 +26446,47 @@ IR_ConsumesDefSeq * _TAO_ComponentDef_Remote_Proxy_Impl::consumes_events ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_consumes_events_get ri ( - &_tao_call, - _collocated_tao_target_, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), + 0 ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - IR_ConsumesDefSeq * _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -47594,136 +26515,47 @@ CORBA::Boolean _TAO_ComponentDef_Remote_Proxy_Impl::is_basic ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_is_basic_get ri ( - &_tao_call, - _collocated_tao_target_, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (_tao_retval); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (_tao_retval); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (_tao_retval); + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (_tao_retval); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), + _tao_retval ); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - _tao_retval - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> CORBA::Any::to_boolean (_tao_retval)) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> CORBA::Any::to_boolean (_tao_retval)) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), _tao_retval ); - - } - - TAO_INTERCEPTOR ( - CORBA::Boolean _tao_retval_info = _tao_retval; - ri.result (_tao_retval_info); - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (_tao_retval); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_retval; } @@ -47757,154 +26589,60 @@ IR_ProvidesDef_ptr _TAO_ComponentDef_Remote_Proxy_Impl::create_provides ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_create_provides ri ( - &_tao_call, - _collocated_tao_target_, - id, - name, - version, - interface_type, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << id) && + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << id) && (_tao_out << name) && (_tao_out << version) && (_tao_out << interface_type) - )) - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::MARSHAL (), + )) + ACE_THROW_RETURN ( + CORBA::MARSHAL (), + 0 + ); + + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - IR_ProvidesDef_ptr _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -47939,156 +26677,61 @@ IR_UsesDef_ptr _TAO_ComponentDef_Remote_Proxy_Impl::create_uses ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_create_uses ri ( - &_tao_call, - _collocated_tao_target_, - id, - name, - version, - interface_type, - is_multiple, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << id) && + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << id) && (_tao_out << name) && (_tao_out << version) && (_tao_out << interface_type) && (_tao_out << CORBA::Any::from_boolean (is_multiple)) - )) - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::MARSHAL (), + )) + ACE_THROW_RETURN ( + CORBA::MARSHAL (), + 0 + ); + + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - IR_UsesDef_ptr _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -48122,154 +26765,60 @@ IR_EmitsDef_ptr _TAO_ComponentDef_Remote_Proxy_Impl::create_emits ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_create_emits ri ( - &_tao_call, - _collocated_tao_target_, - id, - name, - version, - value, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << id) && + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << id) && (_tao_out << name) && (_tao_out << version) && (_tao_out << value) - )) - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::MARSHAL (), + )) + ACE_THROW_RETURN ( + CORBA::MARSHAL (), + 0 + ); + + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - IR_EmitsDef_ptr _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -48303,154 +26852,60 @@ IR_PublishesDef_ptr _TAO_ComponentDef_Remote_Proxy_Impl::create_publishes ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_create_publishes ri ( - &_tao_call, - _collocated_tao_target_, - id, - name, - version, - value, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << id) && + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << id) && (_tao_out << name) && (_tao_out << version) && (_tao_out << value) - )) - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::MARSHAL (), + )) + ACE_THROW_RETURN ( + CORBA::MARSHAL (), + 0 + ); + + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - IR_PublishesDef_ptr _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -48484,154 +26939,60 @@ IR_ConsumesDef_ptr _TAO_ComponentDef_Remote_Proxy_Impl::create_consumes ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_create_consumes ri ( - &_tao_call, - _collocated_tao_target_, - id, - name, - version, - value, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << id) && + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << id) && (_tao_out << name) && (_tao_out << version) && (_tao_out << value) - )) - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::MARSHAL (), + )) + ACE_THROW_RETURN ( + CORBA::MARSHAL (), + 0 + ); + + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - IR_ConsumesDef_ptr _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -48653,13 +27014,8 @@ _TAO_ComponentDef_Proxy_Broker::~_TAO_ComponentDef_Proxy_Broker (void) { } -_TAO_ComponentDef_Proxy_Broker * (*_TAO_ComponentDef_Proxy_Broker_Factory_function_pointer) ( - CORBA::Object_ptr obj - ) = 0; - -// Factory Member function Implementation. -_TAO_ComponentDef_Remote_Proxy_Broker * -_TAO_ComponentDef_Remote_Proxy_Broker::the_TAO_ComponentDef_Remote_Proxy_Broker (void) +// Factory function Implementation. +_TAO_ComponentDef_Remote_Proxy_Broker *the_TAO_ComponentDef_Remote_Proxy_Broker (void) { static ::_TAO_ComponentDef_Remote_Proxy_Broker remote_proxy_broker; return &remote_proxy_broker; @@ -48693,7 +27049,7 @@ _TAO_ComponentDef_Remote_Proxy_Broker::select_proxy ( // default constructor IR_ComponentDef::IR_ComponentDef (int collocated) { - this->IR_ComponentDef_setup_collocation (collocated); + this->_tao_setup_collocation (collocated); } // destructor @@ -48701,16 +27057,17 @@ IR_ComponentDef::~IR_ComponentDef (void) {} void -IR_ComponentDef::IR_ComponentDef_setup_collocation (int collocated) +IR_ComponentDef::_tao_setup_collocation (int collocated) { if (collocated) this->the_TAO_ComponentDef_Proxy_Broker_ = _TAO_ComponentDef_Proxy_Broker_Factory_function_pointer (this); else this->the_TAO_ComponentDef_Proxy_Broker_ = - _TAO_ComponentDef_Remote_Proxy_Broker::the_TAO_ComponentDef_Remote_Proxy_Broker (); + ::the_TAO_ComponentDef_Remote_Proxy_Broker (); + + IR_InterfaceDef::_tao_setup_collocation (collocated); - this->IR_InterfaceDef_setup_collocation (collocated); } void IR_ComponentDef::_tao_any_destructor (void *x) @@ -49129,955 +27486,6 @@ IR_ConsumesDef_ptr IR_ComponentDef::create_consumes ( ); } -#if (TAO_HAS_INTERCEPTORS == 1) -IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_supported_interfaces_get::TAO_ClientRequestInfo_IR_ComponentDef_supported_interfaces_get ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target) -{} - -Dynamic::ParameterList * -IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_supported_interfaces_get::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return parameter_list; -} - -Dynamic::ExceptionList * -IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_supported_interfaces_get::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_supported_interfaces_get::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_supported_interfaces_get::result (IR_InterfaceDefSeq * result) -{ - // update the result - this->_result = result; -} - -IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_supported_interfaces_set::TAO_ClientRequestInfo_IR_ComponentDef_supported_interfaces_set ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - const IR_InterfaceDefSeq & supported_interfaces, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - supported_interfaces_ (supported_interfaces) -{} - -Dynamic::ParameterList * -IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_supported_interfaces_set::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_supported_interfaces = parameter_list->length (); - parameter_list->length (length_supported_interfaces + 1); - (*parameter_list)[length_supported_interfaces].argument <<= this->supported_interfaces_; - - (*parameter_list)[length_supported_interfaces].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_supported_interfaces_set::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_supported_interfaces_set::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 1; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return result_any; -} - -IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_base_component_get::TAO_ClientRequestInfo_IR_ComponentDef_base_component_get ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target) -{} - -Dynamic::ParameterList * -IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_base_component_get::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return parameter_list; -} - -Dynamic::ExceptionList * -IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_base_component_get::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_base_component_get::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_base_component_get::result (IR_ComponentDef_ptr result) -{ - // update the result - this->_result = result; -} - -IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_provides_interfaces_get::TAO_ClientRequestInfo_IR_ComponentDef_provides_interfaces_get ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target) -{} - -Dynamic::ParameterList * -IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_provides_interfaces_get::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return parameter_list; -} - -Dynamic::ExceptionList * -IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_provides_interfaces_get::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_provides_interfaces_get::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_provides_interfaces_get::result (IR_ProvidesDefSeq * result) -{ - // update the result - this->_result = result; -} - -IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_uses_interfaces_get::TAO_ClientRequestInfo_IR_ComponentDef_uses_interfaces_get ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target) -{} - -Dynamic::ParameterList * -IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_uses_interfaces_get::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return parameter_list; -} - -Dynamic::ExceptionList * -IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_uses_interfaces_get::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_uses_interfaces_get::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_uses_interfaces_get::result (IR_UsesDefSeq * result) -{ - // update the result - this->_result = result; -} - -IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_emits_events_get::TAO_ClientRequestInfo_IR_ComponentDef_emits_events_get ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target) -{} - -Dynamic::ParameterList * -IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_emits_events_get::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return parameter_list; -} - -Dynamic::ExceptionList * -IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_emits_events_get::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_emits_events_get::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_emits_events_get::result (IR_EmitsDefSeq * result) -{ - // update the result - this->_result = result; -} - -IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_publishes_events_get::TAO_ClientRequestInfo_IR_ComponentDef_publishes_events_get ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target) -{} - -Dynamic::ParameterList * -IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_publishes_events_get::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return parameter_list; -} - -Dynamic::ExceptionList * -IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_publishes_events_get::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_publishes_events_get::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_publishes_events_get::result (IR_PublishesDefSeq * result) -{ - // update the result - this->_result = result; -} - -IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_consumes_events_get::TAO_ClientRequestInfo_IR_ComponentDef_consumes_events_get ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target) -{} - -Dynamic::ParameterList * -IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_consumes_events_get::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return parameter_list; -} - -Dynamic::ExceptionList * -IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_consumes_events_get::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_consumes_events_get::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_consumes_events_get::result (IR_ConsumesDefSeq * result) -{ - // update the result - this->_result = result; -} - -IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_is_basic_get::TAO_ClientRequestInfo_IR_ComponentDef_is_basic_get ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target) -{} - -Dynamic::ParameterList * -IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_is_basic_get::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return parameter_list; -} - -Dynamic::ExceptionList * -IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_is_basic_get::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_is_basic_get::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= CORBA::Any::from_boolean (this->_result); - return safe_result_any._retn (); -} - -void -IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_is_basic_get::result (CORBA::Boolean result) -{ - // update the result - this->_result = result; -} - -IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_create_provides::TAO_ClientRequestInfo_IR_ComponentDef_create_provides ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - const char * id, - const char * name, - const char * version, - IR_InterfaceDef_ptr interface_type, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - id_ (id), - name_ (name), - version_ (version), - interface_type_ (interface_type) -{} - -Dynamic::ParameterList * -IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_create_provides::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_id = parameter_list->length (); - parameter_list->length (length_id + 1); - (*parameter_list)[length_id].argument <<= id_; - (*parameter_list)[length_id].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_name = parameter_list->length (); - parameter_list->length (length_name + 1); - (*parameter_list)[length_name].argument <<= name_; - (*parameter_list)[length_name].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_version = parameter_list->length (); - parameter_list->length (length_version + 1); - (*parameter_list)[length_version].argument <<= version_; - (*parameter_list)[length_version].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_interface_type = parameter_list->length (); - parameter_list->length (length_interface_type + 1); - (*parameter_list)[length_interface_type].argument <<= this->interface_type_; - - (*parameter_list)[length_interface_type].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_create_provides::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_create_provides::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_create_provides::result (IR_ProvidesDef_ptr result) -{ - // update the result - this->_result = result; -} - -IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_create_uses::TAO_ClientRequestInfo_IR_ComponentDef_create_uses ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - const char * id, - const char * name, - const char * version, - IR_InterfaceDef_ptr interface_type, - const CORBA::Boolean & is_multiple, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - id_ (id), - name_ (name), - version_ (version), - interface_type_ (interface_type), - is_multiple_ (is_multiple) -{} - -Dynamic::ParameterList * -IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_create_uses::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_id = parameter_list->length (); - parameter_list->length (length_id + 1); - (*parameter_list)[length_id].argument <<= id_; - (*parameter_list)[length_id].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_name = parameter_list->length (); - parameter_list->length (length_name + 1); - (*parameter_list)[length_name].argument <<= name_; - (*parameter_list)[length_name].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_version = parameter_list->length (); - parameter_list->length (length_version + 1); - (*parameter_list)[length_version].argument <<= version_; - (*parameter_list)[length_version].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_interface_type = parameter_list->length (); - parameter_list->length (length_interface_type + 1); - (*parameter_list)[length_interface_type].argument <<= this->interface_type_; - - (*parameter_list)[length_interface_type].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_is_multiple = parameter_list->length (); - parameter_list->length (length_is_multiple + 1); - (*parameter_list)[length_is_multiple].argument <<= CORBA::Any::from_boolean (this->is_multiple_); - (*parameter_list)[length_is_multiple].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_create_uses::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_create_uses::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_create_uses::result (IR_UsesDef_ptr result) -{ - // update the result - this->_result = result; -} - -IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_create_emits::TAO_ClientRequestInfo_IR_ComponentDef_create_emits ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - const char * id, - const char * name, - const char * version, - IR_ValueDef_ptr value, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - id_ (id), - name_ (name), - version_ (version), - value_ (value) -{} - -Dynamic::ParameterList * -IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_create_emits::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_id = parameter_list->length (); - parameter_list->length (length_id + 1); - (*parameter_list)[length_id].argument <<= id_; - (*parameter_list)[length_id].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_name = parameter_list->length (); - parameter_list->length (length_name + 1); - (*parameter_list)[length_name].argument <<= name_; - (*parameter_list)[length_name].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_version = parameter_list->length (); - parameter_list->length (length_version + 1); - (*parameter_list)[length_version].argument <<= version_; - (*parameter_list)[length_version].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_value = parameter_list->length (); - parameter_list->length (length_value + 1); - (*parameter_list)[length_value].argument <<= this->value_; - - (*parameter_list)[length_value].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_create_emits::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_create_emits::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_create_emits::result (IR_EmitsDef_ptr result) -{ - // update the result - this->_result = result; -} - -IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_create_publishes::TAO_ClientRequestInfo_IR_ComponentDef_create_publishes ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - const char * id, - const char * name, - const char * version, - IR_ValueDef_ptr value, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - id_ (id), - name_ (name), - version_ (version), - value_ (value) -{} - -Dynamic::ParameterList * -IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_create_publishes::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_id = parameter_list->length (); - parameter_list->length (length_id + 1); - (*parameter_list)[length_id].argument <<= id_; - (*parameter_list)[length_id].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_name = parameter_list->length (); - parameter_list->length (length_name + 1); - (*parameter_list)[length_name].argument <<= name_; - (*parameter_list)[length_name].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_version = parameter_list->length (); - parameter_list->length (length_version + 1); - (*parameter_list)[length_version].argument <<= version_; - (*parameter_list)[length_version].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_value = parameter_list->length (); - parameter_list->length (length_value + 1); - (*parameter_list)[length_value].argument <<= this->value_; - - (*parameter_list)[length_value].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_create_publishes::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_create_publishes::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_create_publishes::result (IR_PublishesDef_ptr result) -{ - // update the result - this->_result = result; -} - -IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_create_consumes::TAO_ClientRequestInfo_IR_ComponentDef_create_consumes ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - const char * id, - const char * name, - const char * version, - IR_ValueDef_ptr value, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - id_ (id), - name_ (name), - version_ (version), - value_ (value) -{} - -Dynamic::ParameterList * -IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_create_consumes::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_id = parameter_list->length (); - parameter_list->length (length_id + 1); - (*parameter_list)[length_id].argument <<= id_; - (*parameter_list)[length_id].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_name = parameter_list->length (); - parameter_list->length (length_name + 1); - (*parameter_list)[length_name].argument <<= name_; - (*parameter_list)[length_name].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_version = parameter_list->length (); - parameter_list->length (length_version + 1); - (*parameter_list)[length_version].argument <<= version_; - (*parameter_list)[length_version].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_value = parameter_list->length (); - parameter_list->length (length_value + 1); - (*parameter_list)[length_value].argument <<= this->value_; - - (*parameter_list)[length_value].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_create_consumes::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_create_consumes::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_ComponentDef::TAO_ClientRequestInfo_IR_ComponentDef_create_consumes::result (IR_ConsumesDef_ptr result) -{ - // update the result - this->_result = result; -} - -#endif /* TAO_HAS_INTERCEPTORS */ - static const CORBA::Long _oc_IR_ComponentDef[] = { TAO_ENCAP_BYTE_ORDER, // byte order @@ -50490,147 +27898,57 @@ CORBA::Boolean _TAO_PrimaryKeyDef_Remote_Proxy_Impl::is_a ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_PrimaryKeyDef::TAO_ClientRequestInfo_IR_PrimaryKeyDef_is_a ri ( - &_tao_call, - _collocated_tao_target_, - primary_key_id, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (_tao_retval); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << primary_key_id) - )) - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::MARSHAL (), + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (_tao_retval); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (_tao_retval); + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << primary_key_id) + )) + ACE_THROW_RETURN ( + CORBA::MARSHAL (), + _tao_retval + ); + + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (_tao_retval); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), _tao_retval ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - _tao_retval - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> CORBA::Any::to_boolean (_tao_retval)) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> CORBA::Any::to_boolean (_tao_retval)) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), _tao_retval ); - - } - - TAO_INTERCEPTOR ( - CORBA::Boolean _tao_retval_info = _tao_retval; - ri.result (_tao_retval_info); - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (_tao_retval); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_retval; } @@ -50660,137 +27978,47 @@ IR_ValueDef_ptr _TAO_PrimaryKeyDef_Remote_Proxy_Impl::primary_key ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_PrimaryKeyDef::TAO_ClientRequestInfo_IR_PrimaryKeyDef_primary_key_get ri ( - &_tao_call, - _collocated_tao_target_, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), + 0 ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - IR_ValueDef_ptr _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -50812,13 +28040,8 @@ _TAO_PrimaryKeyDef_Proxy_Broker::~_TAO_PrimaryKeyDef_Proxy_Broker (void) { } -_TAO_PrimaryKeyDef_Proxy_Broker * (*_TAO_PrimaryKeyDef_Proxy_Broker_Factory_function_pointer) ( - CORBA::Object_ptr obj - ) = 0; - -// Factory Member function Implementation. -_TAO_PrimaryKeyDef_Remote_Proxy_Broker * -_TAO_PrimaryKeyDef_Remote_Proxy_Broker::the_TAO_PrimaryKeyDef_Remote_Proxy_Broker (void) +// Factory function Implementation. +_TAO_PrimaryKeyDef_Remote_Proxy_Broker *the_TAO_PrimaryKeyDef_Remote_Proxy_Broker (void) { static ::_TAO_PrimaryKeyDef_Remote_Proxy_Broker remote_proxy_broker; return &remote_proxy_broker; @@ -50852,7 +28075,7 @@ _TAO_PrimaryKeyDef_Remote_Proxy_Broker::select_proxy ( // default constructor IR_PrimaryKeyDef::IR_PrimaryKeyDef (int collocated) { - this->IR_PrimaryKeyDef_setup_collocation (collocated); + this->_tao_setup_collocation (collocated); } // destructor @@ -50860,16 +28083,17 @@ IR_PrimaryKeyDef::~IR_PrimaryKeyDef (void) {} void -IR_PrimaryKeyDef::IR_PrimaryKeyDef_setup_collocation (int collocated) +IR_PrimaryKeyDef::_tao_setup_collocation (int collocated) { if (collocated) this->the_TAO_PrimaryKeyDef_Proxy_Broker_ = _TAO_PrimaryKeyDef_Proxy_Broker_Factory_function_pointer (this); else this->the_TAO_PrimaryKeyDef_Proxy_Broker_ = - _TAO_PrimaryKeyDef_Remote_Proxy_Broker::the_TAO_PrimaryKeyDef_Remote_Proxy_Broker (); + ::the_TAO_PrimaryKeyDef_Remote_Proxy_Broker (); + + IR_Contained::_tao_setup_collocation (collocated); - this->IR_Contained_setup_collocation (collocated); } void IR_PrimaryKeyDef::_tao_any_destructor (void *x) @@ -51039,130 +28263,6 @@ IR_ValueDef_ptr IR_PrimaryKeyDef::primary_key ( ); } -#if (TAO_HAS_INTERCEPTORS == 1) -IR_PrimaryKeyDef::TAO_ClientRequestInfo_IR_PrimaryKeyDef_is_a::TAO_ClientRequestInfo_IR_PrimaryKeyDef_is_a ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - const char * primary_key_id, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - primary_key_id_ (primary_key_id) -{} - -Dynamic::ParameterList * -IR_PrimaryKeyDef::TAO_ClientRequestInfo_IR_PrimaryKeyDef_is_a::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_primary_key_id = parameter_list->length (); - parameter_list->length (length_primary_key_id + 1); - (*parameter_list)[length_primary_key_id].argument <<= primary_key_id_; - (*parameter_list)[length_primary_key_id].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_PrimaryKeyDef::TAO_ClientRequestInfo_IR_PrimaryKeyDef_is_a::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_PrimaryKeyDef::TAO_ClientRequestInfo_IR_PrimaryKeyDef_is_a::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= CORBA::Any::from_boolean (this->_result); - return safe_result_any._retn (); -} - -void -IR_PrimaryKeyDef::TAO_ClientRequestInfo_IR_PrimaryKeyDef_is_a::result (CORBA::Boolean result) -{ - // update the result - this->_result = result; -} - -IR_PrimaryKeyDef::TAO_ClientRequestInfo_IR_PrimaryKeyDef_primary_key_get::TAO_ClientRequestInfo_IR_PrimaryKeyDef_primary_key_get ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target) -{} - -Dynamic::ParameterList * -IR_PrimaryKeyDef::TAO_ClientRequestInfo_IR_PrimaryKeyDef_primary_key_get::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return parameter_list; -} - -Dynamic::ExceptionList * -IR_PrimaryKeyDef::TAO_ClientRequestInfo_IR_PrimaryKeyDef_primary_key_get::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_PrimaryKeyDef::TAO_ClientRequestInfo_IR_PrimaryKeyDef_primary_key_get::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_PrimaryKeyDef::TAO_ClientRequestInfo_IR_PrimaryKeyDef_primary_key_get::result (IR_ValueDef_ptr result) -{ - // update the result - this->_result = result; -} - -#endif /* TAO_HAS_INTERCEPTORS */ - static const CORBA::Long _oc_IR_PrimaryKeyDef[] = { TAO_ENCAP_BYTE_ORDER, // byte order @@ -51268,13 +28368,8 @@ _TAO_FactoryDef_Proxy_Broker::~_TAO_FactoryDef_Proxy_Broker (void) { } -_TAO_FactoryDef_Proxy_Broker * (*_TAO_FactoryDef_Proxy_Broker_Factory_function_pointer) ( - CORBA::Object_ptr obj - ) = 0; - -// Factory Member function Implementation. -_TAO_FactoryDef_Remote_Proxy_Broker * -_TAO_FactoryDef_Remote_Proxy_Broker::the_TAO_FactoryDef_Remote_Proxy_Broker (void) +// Factory function Implementation. +_TAO_FactoryDef_Remote_Proxy_Broker *the_TAO_FactoryDef_Remote_Proxy_Broker (void) { static ::_TAO_FactoryDef_Remote_Proxy_Broker remote_proxy_broker; return &remote_proxy_broker; @@ -51308,7 +28403,7 @@ _TAO_FactoryDef_Remote_Proxy_Broker::select_proxy ( // default constructor IR_FactoryDef::IR_FactoryDef (int collocated) { - this->IR_FactoryDef_setup_collocation (collocated); + this->_tao_setup_collocation (collocated); } // destructor @@ -51316,16 +28411,17 @@ IR_FactoryDef::~IR_FactoryDef (void) {} void -IR_FactoryDef::IR_FactoryDef_setup_collocation (int collocated) +IR_FactoryDef::_tao_setup_collocation (int collocated) { if (collocated) this->the_TAO_FactoryDef_Proxy_Broker_ = _TAO_FactoryDef_Proxy_Broker_Factory_function_pointer (this); else this->the_TAO_FactoryDef_Proxy_Broker_ = - _TAO_FactoryDef_Remote_Proxy_Broker::the_TAO_FactoryDef_Remote_Proxy_Broker (); + ::the_TAO_FactoryDef_Remote_Proxy_Broker (); + + IR_OperationDef::_tao_setup_collocation (collocated); - this->IR_OperationDef_setup_collocation (collocated); } void IR_FactoryDef::_tao_any_destructor (void *x) @@ -51520,13 +28616,8 @@ _TAO_FinderDef_Proxy_Broker::~_TAO_FinderDef_Proxy_Broker (void) { } -_TAO_FinderDef_Proxy_Broker * (*_TAO_FinderDef_Proxy_Broker_Factory_function_pointer) ( - CORBA::Object_ptr obj - ) = 0; - -// Factory Member function Implementation. -_TAO_FinderDef_Remote_Proxy_Broker * -_TAO_FinderDef_Remote_Proxy_Broker::the_TAO_FinderDef_Remote_Proxy_Broker (void) +// Factory function Implementation. +_TAO_FinderDef_Remote_Proxy_Broker *the_TAO_FinderDef_Remote_Proxy_Broker (void) { static ::_TAO_FinderDef_Remote_Proxy_Broker remote_proxy_broker; return &remote_proxy_broker; @@ -51560,7 +28651,7 @@ _TAO_FinderDef_Remote_Proxy_Broker::select_proxy ( // default constructor IR_FinderDef::IR_FinderDef (int collocated) { - this->IR_FinderDef_setup_collocation (collocated); + this->_tao_setup_collocation (collocated); } // destructor @@ -51568,16 +28659,17 @@ IR_FinderDef::~IR_FinderDef (void) {} void -IR_FinderDef::IR_FinderDef_setup_collocation (int collocated) +IR_FinderDef::_tao_setup_collocation (int collocated) { if (collocated) this->the_TAO_FinderDef_Proxy_Broker_ = _TAO_FinderDef_Proxy_Broker_Factory_function_pointer (this); else this->the_TAO_FinderDef_Proxy_Broker_ = - _TAO_FinderDef_Remote_Proxy_Broker::the_TAO_FinderDef_Remote_Proxy_Broker (); + ::the_TAO_FinderDef_Remote_Proxy_Broker (); + + IR_OperationDef::_tao_setup_collocation (collocated); - this->IR_OperationDef_setup_collocation (collocated); } void IR_FinderDef::_tao_any_destructor (void *x) @@ -51780,137 +28872,47 @@ IR_HomeDef_ptr _TAO_HomeDef_Remote_Proxy_Impl::base_home ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_HomeDef::TAO_ClientRequestInfo_IR_HomeDef_base_home_get ri ( - &_tao_call, - _collocated_tao_target_, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), + 0 ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - IR_HomeDef_ptr _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -51940,137 +28942,47 @@ IR_ComponentDef_ptr _TAO_HomeDef_Remote_Proxy_Impl::managed_component ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_HomeDef::TAO_ClientRequestInfo_IR_HomeDef_managed_component_get ri ( - &_tao_call, - _collocated_tao_target_, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), + 0 ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - IR_ComponentDef_ptr _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -52100,137 +29012,47 @@ IR_PrimaryKeyDef_ptr _TAO_HomeDef_Remote_Proxy_Impl::primary_key ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_HomeDef::TAO_ClientRequestInfo_IR_HomeDef_primary_key_get ri ( - &_tao_call, - _collocated_tao_target_, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), + 0 ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - IR_PrimaryKeyDef_ptr _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -52261,137 +29083,47 @@ IR_FactoryDefSeq * _TAO_HomeDef_Remote_Proxy_Impl::factories ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_HomeDef::TAO_ClientRequestInfo_IR_HomeDef_factories_get ri ( - &_tao_call, - _collocated_tao_target_, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), + 0 ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - IR_FactoryDefSeq * _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -52422,137 +29154,47 @@ IR_FinderDefSeq * _TAO_HomeDef_Remote_Proxy_Impl::finders ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_HomeDef::TAO_ClientRequestInfo_IR_HomeDef_finders_get ri ( - &_tao_call, - _collocated_tao_target_, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), + 0 ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - IR_FinderDefSeq * _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -52581,136 +29223,47 @@ CORBA::Boolean _TAO_HomeDef_Remote_Proxy_Impl::is_basic ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_HomeDef::TAO_ClientRequestInfo_IR_HomeDef_is_basic_get ri ( - &_tao_call, - _collocated_tao_target_, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (_tao_retval); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (_tao_retval); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (_tao_retval); + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (_tao_retval); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), + _tao_retval ); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - _tao_retval - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> CORBA::Any::to_boolean (_tao_retval)) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> CORBA::Any::to_boolean (_tao_retval)) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), _tao_retval ); - - } - - TAO_INTERCEPTOR ( - CORBA::Boolean _tao_retval_info = _tao_retval; - ri.result (_tao_retval_info); - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (_tao_retval); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (_tao_retval); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_retval; } @@ -52744,154 +29297,60 @@ IR_PrimaryKeyDef_ptr _TAO_HomeDef_Remote_Proxy_Impl::create_primary_key ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_HomeDef::TAO_ClientRequestInfo_IR_HomeDef_create_primary_key ri ( - &_tao_call, - _collocated_tao_target_, - id, - name, - version, - primary_key, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << id) && + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << id) && (_tao_out << name) && (_tao_out << version) && (_tao_out << primary_key) - )) - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::MARSHAL (), + )) + ACE_THROW_RETURN ( + CORBA::MARSHAL (), + 0 + ); + + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - IR_PrimaryKeyDef_ptr _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -52926,156 +29385,61 @@ IR_FactoryDef_ptr _TAO_HomeDef_Remote_Proxy_Impl::create_factory ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_HomeDef::TAO_ClientRequestInfo_IR_HomeDef_create_factory ri ( - &_tao_call, - _collocated_tao_target_, - id, - name, - version, - params, - exceptions, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << id) && + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << id) && (_tao_out << name) && (_tao_out << version) && (_tao_out << params) && (_tao_out << exceptions) - )) - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::MARSHAL (), + )) + ACE_THROW_RETURN ( + CORBA::MARSHAL (), + 0 + ); + + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - IR_FactoryDef_ptr _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -53110,156 +29474,61 @@ IR_FinderDef_ptr _TAO_HomeDef_Remote_Proxy_Impl::create_finder ( istub->orb_core () ); -#if (TAO_HAS_INTERCEPTORS == 1) - TAO_ClientRequestInterceptor_Adapter _tao_vfr ( - istub->orb_core ()->client_request_interceptors () - ); - -#endif /* TAO_HAS_INTERCEPTORS */ - - for (;;) - { - int _invoke_status = TAO_INVOKE_EXCEPTION; - -#if TAO_HAS_INTERCEPTORS == 1 - IR_HomeDef::TAO_ClientRequestInfo_IR_HomeDef_create_finder ri ( - &_tao_call, - _collocated_tao_target_, - id, - name, - version, - params, - exceptions, - ACE_TRY_ENV - ); - ACE_CHECK_RETURN (0); - - ACE_TRY - { -#endif /* TAO_HAS_INTERCEPTORS */ - - _tao_call.start (ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; - TAO_INTERCEPTOR (ri.response_expected (1)); - - TAO_INTERCEPTOR ( - _tao_vfr.send_request ( - &ri, - ACE_TRY_ENV - ) - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - _tao_call.prepare_header ( - ACE_static_cast (CORBA::Octet, _tao_response_flag), - ACE_TRY_ENV - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - TAO_OutputCDR &_tao_out = _tao_call.out_stream (); - if (!( - (_tao_out << id) && + for (;;) + { + _tao_call.start (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + CORBA::Short _tao_response_flag = TAO_TWOWAY_RESPONSE_FLAG; + + _tao_call.prepare_header ( + ACE_static_cast (CORBA::Octet, _tao_response_flag), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + + TAO_OutputCDR &_tao_out = _tao_call.out_stream (); + if (!( + (_tao_out << id) && (_tao_out << name) && (_tao_out << version) && (_tao_out << params) && (_tao_out << exceptions) - )) - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::MARSHAL (), + )) + ACE_THROW_RETURN ( + CORBA::MARSHAL (), + 0 + ); + + int _invoke_status = + _tao_call.invoke (0, 0, ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + + if (_invoke_status == TAO_INVOKE_RESTART) + { + _tao_call.restart_flag (1); + continue; + } + if (_invoke_status != TAO_INVOKE_OK) + { + ACE_THROW_RETURN ( + CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - _invoke_status = - _tao_call.invoke (0, 0, ACE_TRY_ENV); - TAO_INTERCEPTOR_CHECK_RETURN (0); - - if (_invoke_status == TAO_INVOKE_EXCEPTION) - { - TAO_INTERCEPTOR_THROW_RETURN ( - CORBA::UNKNOWN (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), - 0 - ); - - } - - TAO_InputCDR &_tao_in = _tao_call.inp_stream (); - if (!( - (_tao_in >> _tao_safe_retval.inout ()) - )) - { - TAO_INTERCEPTOR_THROW_RETURN ( + } + TAO_InputCDR &_tao_in = _tao_call.inp_stream (); + if (!( + (_tao_in >> _tao_safe_retval.inout ()) + )) + { + ACE_THROW_RETURN ( CORBA::MARSHAL (TAO_DEFAULT_MINOR_CODE, CORBA::COMPLETED_YES), 0 ); - - } - - TAO_INTERCEPTOR ( - IR_FinderDef_ptr _tao_retval_info = _tao_safe_retval._retn (); - ri.result (_tao_retval_info); - _tao_safe_retval = _tao_retval_info; - ); - - TAO_INTERCEPTOR ( - ri.reply_status (_invoke_status); - if (_invoke_status == TAO_INVOKE_OK) - { - _tao_vfr.receive_reply ( - &ri, - ACE_TRY_ENV - ); - } - else - { - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - } - - ); - TAO_INTERCEPTOR_CHECK_RETURN (0); - -#if TAO_HAS_INTERCEPTORS == 1 - } - ACE_CATCH (PortableInterceptor::ForwardRequest, exc) - { - _invoke_status = - _tao_call.location_forward (exc.forward.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - ri.forward_reference (exc); - _tao_vfr.receive_other ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ri.exception (&ACE_ANY_EXCEPTION); - _tao_vfr.receive_exception ( - &ri, - ACE_TRY_ENV - ); - ACE_TRY_CHECK; - ACE_RE_THROW; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (0); - -#endif /* TAO_HAS_INTERCEPTORS */ + } + break; + } - if (_invoke_status == TAO_INVOKE_RESTART) - { - _tao_call.restart_flag (1); - continue; - } - - break; - } return _tao_safe_retval._retn (); } @@ -53281,13 +29550,8 @@ _TAO_HomeDef_Proxy_Broker::~_TAO_HomeDef_Proxy_Broker (void) { } -_TAO_HomeDef_Proxy_Broker * (*_TAO_HomeDef_Proxy_Broker_Factory_function_pointer) ( - CORBA::Object_ptr obj - ) = 0; - -// Factory Member function Implementation. -_TAO_HomeDef_Remote_Proxy_Broker * -_TAO_HomeDef_Remote_Proxy_Broker::the_TAO_HomeDef_Remote_Proxy_Broker (void) +// Factory function Implementation. +_TAO_HomeDef_Remote_Proxy_Broker *the_TAO_HomeDef_Remote_Proxy_Broker (void) { static ::_TAO_HomeDef_Remote_Proxy_Broker remote_proxy_broker; return &remote_proxy_broker; @@ -53321,7 +29585,7 @@ _TAO_HomeDef_Remote_Proxy_Broker::select_proxy ( // default constructor IR_HomeDef::IR_HomeDef (int collocated) { - this->IR_HomeDef_setup_collocation (collocated); + this->_tao_setup_collocation (collocated); } // destructor @@ -53329,16 +29593,17 @@ IR_HomeDef::~IR_HomeDef (void) {} void -IR_HomeDef::IR_HomeDef_setup_collocation (int collocated) +IR_HomeDef::_tao_setup_collocation (int collocated) { if (collocated) this->the_TAO_HomeDef_Proxy_Broker_ = _TAO_HomeDef_Proxy_Broker_Factory_function_pointer (this); else this->the_TAO_HomeDef_Proxy_Broker_ = - _TAO_HomeDef_Remote_Proxy_Broker::the_TAO_HomeDef_Remote_Proxy_Broker (); + ::the_TAO_HomeDef_Remote_Proxy_Broker (); + + IR_InterfaceDef::_tao_setup_collocation (collocated); - this->IR_InterfaceDef_setup_collocation (collocated); } void IR_HomeDef::_tao_any_destructor (void *x) @@ -53671,622 +29936,6 @@ IR_FinderDef_ptr IR_HomeDef::create_finder ( ); } -#if (TAO_HAS_INTERCEPTORS == 1) -IR_HomeDef::TAO_ClientRequestInfo_IR_HomeDef_base_home_get::TAO_ClientRequestInfo_IR_HomeDef_base_home_get ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target) -{} - -Dynamic::ParameterList * -IR_HomeDef::TAO_ClientRequestInfo_IR_HomeDef_base_home_get::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return parameter_list; -} - -Dynamic::ExceptionList * -IR_HomeDef::TAO_ClientRequestInfo_IR_HomeDef_base_home_get::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_HomeDef::TAO_ClientRequestInfo_IR_HomeDef_base_home_get::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_HomeDef::TAO_ClientRequestInfo_IR_HomeDef_base_home_get::result (IR_HomeDef_ptr result) -{ - // update the result - this->_result = result; -} - -IR_HomeDef::TAO_ClientRequestInfo_IR_HomeDef_managed_component_get::TAO_ClientRequestInfo_IR_HomeDef_managed_component_get ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target) -{} - -Dynamic::ParameterList * -IR_HomeDef::TAO_ClientRequestInfo_IR_HomeDef_managed_component_get::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return parameter_list; -} - -Dynamic::ExceptionList * -IR_HomeDef::TAO_ClientRequestInfo_IR_HomeDef_managed_component_get::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_HomeDef::TAO_ClientRequestInfo_IR_HomeDef_managed_component_get::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_HomeDef::TAO_ClientRequestInfo_IR_HomeDef_managed_component_get::result (IR_ComponentDef_ptr result) -{ - // update the result - this->_result = result; -} - -IR_HomeDef::TAO_ClientRequestInfo_IR_HomeDef_primary_key_get::TAO_ClientRequestInfo_IR_HomeDef_primary_key_get ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target) -{} - -Dynamic::ParameterList * -IR_HomeDef::TAO_ClientRequestInfo_IR_HomeDef_primary_key_get::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return parameter_list; -} - -Dynamic::ExceptionList * -IR_HomeDef::TAO_ClientRequestInfo_IR_HomeDef_primary_key_get::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_HomeDef::TAO_ClientRequestInfo_IR_HomeDef_primary_key_get::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_HomeDef::TAO_ClientRequestInfo_IR_HomeDef_primary_key_get::result (IR_PrimaryKeyDef_ptr result) -{ - // update the result - this->_result = result; -} - -IR_HomeDef::TAO_ClientRequestInfo_IR_HomeDef_factories_get::TAO_ClientRequestInfo_IR_HomeDef_factories_get ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target) -{} - -Dynamic::ParameterList * -IR_HomeDef::TAO_ClientRequestInfo_IR_HomeDef_factories_get::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return parameter_list; -} - -Dynamic::ExceptionList * -IR_HomeDef::TAO_ClientRequestInfo_IR_HomeDef_factories_get::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_HomeDef::TAO_ClientRequestInfo_IR_HomeDef_factories_get::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_HomeDef::TAO_ClientRequestInfo_IR_HomeDef_factories_get::result (IR_FactoryDefSeq * result) -{ - // update the result - this->_result = result; -} - -IR_HomeDef::TAO_ClientRequestInfo_IR_HomeDef_finders_get::TAO_ClientRequestInfo_IR_HomeDef_finders_get ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target) -{} - -Dynamic::ParameterList * -IR_HomeDef::TAO_ClientRequestInfo_IR_HomeDef_finders_get::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return parameter_list; -} - -Dynamic::ExceptionList * -IR_HomeDef::TAO_ClientRequestInfo_IR_HomeDef_finders_get::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_HomeDef::TAO_ClientRequestInfo_IR_HomeDef_finders_get::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_HomeDef::TAO_ClientRequestInfo_IR_HomeDef_finders_get::result (IR_FinderDefSeq * result) -{ - // update the result - this->_result = result; -} - -IR_HomeDef::TAO_ClientRequestInfo_IR_HomeDef_is_basic_get::TAO_ClientRequestInfo_IR_HomeDef_is_basic_get ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target) -{} - -Dynamic::ParameterList * -IR_HomeDef::TAO_ClientRequestInfo_IR_HomeDef_is_basic_get::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return parameter_list; -} - -Dynamic::ExceptionList * -IR_HomeDef::TAO_ClientRequestInfo_IR_HomeDef_is_basic_get::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_HomeDef::TAO_ClientRequestInfo_IR_HomeDef_is_basic_get::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= CORBA::Any::from_boolean (this->_result); - return safe_result_any._retn (); -} - -void -IR_HomeDef::TAO_ClientRequestInfo_IR_HomeDef_is_basic_get::result (CORBA::Boolean result) -{ - // update the result - this->_result = result; -} - -IR_HomeDef::TAO_ClientRequestInfo_IR_HomeDef_create_primary_key::TAO_ClientRequestInfo_IR_HomeDef_create_primary_key ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - const char * id, - const char * name, - const char * version, - IR_ValueDef_ptr primary_key, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - id_ (id), - name_ (name), - version_ (version), - primary_key_ (primary_key) -{} - -Dynamic::ParameterList * -IR_HomeDef::TAO_ClientRequestInfo_IR_HomeDef_create_primary_key::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_id = parameter_list->length (); - parameter_list->length (length_id + 1); - (*parameter_list)[length_id].argument <<= id_; - (*parameter_list)[length_id].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_name = parameter_list->length (); - parameter_list->length (length_name + 1); - (*parameter_list)[length_name].argument <<= name_; - (*parameter_list)[length_name].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_version = parameter_list->length (); - parameter_list->length (length_version + 1); - (*parameter_list)[length_version].argument <<= version_; - (*parameter_list)[length_version].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_primary_key = parameter_list->length (); - parameter_list->length (length_primary_key + 1); - (*parameter_list)[length_primary_key].argument <<= this->primary_key_; - - (*parameter_list)[length_primary_key].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_HomeDef::TAO_ClientRequestInfo_IR_HomeDef_create_primary_key::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_HomeDef::TAO_ClientRequestInfo_IR_HomeDef_create_primary_key::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_HomeDef::TAO_ClientRequestInfo_IR_HomeDef_create_primary_key::result (IR_PrimaryKeyDef_ptr result) -{ - // update the result - this->_result = result; -} - -IR_HomeDef::TAO_ClientRequestInfo_IR_HomeDef_create_factory::TAO_ClientRequestInfo_IR_HomeDef_create_factory ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - const char * id, - const char * name, - const char * version, - const IR_ParDescriptionSeq & params, - const IR_ExceptionDefSeq & exceptions, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - id_ (id), - name_ (name), - version_ (version), - params_ (params), - exceptions_ (exceptions) -{} - -Dynamic::ParameterList * -IR_HomeDef::TAO_ClientRequestInfo_IR_HomeDef_create_factory::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_id = parameter_list->length (); - parameter_list->length (length_id + 1); - (*parameter_list)[length_id].argument <<= id_; - (*parameter_list)[length_id].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_name = parameter_list->length (); - parameter_list->length (length_name + 1); - (*parameter_list)[length_name].argument <<= name_; - (*parameter_list)[length_name].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_version = parameter_list->length (); - parameter_list->length (length_version + 1); - (*parameter_list)[length_version].argument <<= version_; - (*parameter_list)[length_version].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_params = parameter_list->length (); - parameter_list->length (length_params + 1); - (*parameter_list)[length_params].argument <<= this->params_; - - (*parameter_list)[length_params].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_exceptions = parameter_list->length (); - parameter_list->length (length_exceptions + 1); - (*parameter_list)[length_exceptions].argument <<= this->exceptions_; - - (*parameter_list)[length_exceptions].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_HomeDef::TAO_ClientRequestInfo_IR_HomeDef_create_factory::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_HomeDef::TAO_ClientRequestInfo_IR_HomeDef_create_factory::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_HomeDef::TAO_ClientRequestInfo_IR_HomeDef_create_factory::result (IR_FactoryDef_ptr result) -{ - // update the result - this->_result = result; -} - -IR_HomeDef::TAO_ClientRequestInfo_IR_HomeDef_create_finder::TAO_ClientRequestInfo_IR_HomeDef_create_finder ( - TAO_GIOP_Invocation *_tao_invocation, - CORBA::Object_ptr _tao_target, - const char * id, - const char * name, - const char * version, - const IR_ParDescriptionSeq & params, - const IR_ExceptionDefSeq & exceptions, - CORBA::Environment & - ) - : TAO_ClientRequestInfo (_tao_invocation, _tao_target), - id_ (id), - name_ (name), - version_ (version), - params_ (params), - exceptions_ (exceptions) -{} - -Dynamic::ParameterList * -IR_HomeDef::TAO_ClientRequestInfo_IR_HomeDef_create_finder::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the argument list on demand. - Dynamic::ParameterList *parameter_list = - TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - Dynamic::ParameterList_var safe_parameter_list = parameter_list; - - CORBA::ULong length_id = parameter_list->length (); - parameter_list->length (length_id + 1); - (*parameter_list)[length_id].argument <<= id_; - (*parameter_list)[length_id].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_name = parameter_list->length (); - parameter_list->length (length_name + 1); - (*parameter_list)[length_name].argument <<= name_; - (*parameter_list)[length_name].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_version = parameter_list->length (); - parameter_list->length (length_version + 1); - (*parameter_list)[length_version].argument <<= version_; - (*parameter_list)[length_version].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_params = parameter_list->length (); - parameter_list->length (length_params + 1); - (*parameter_list)[length_params].argument <<= this->params_; - - (*parameter_list)[length_params].mode = Dynamic::PARAM_IN; - - CORBA::ULong length_exceptions = parameter_list->length (); - parameter_list->length (length_exceptions + 1); - (*parameter_list)[length_exceptions].argument <<= this->exceptions_; - - (*parameter_list)[length_exceptions].mode = Dynamic::PARAM_IN; - - return safe_parameter_list._retn (); -} - -Dynamic::ExceptionList * -IR_HomeDef::TAO_ClientRequestInfo_IR_HomeDef_create_finder::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the exception list on demand. - Dynamic::ExceptionList *exception_list = - TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - return exception_list; -} - - -CORBA::Any * -IR_HomeDef::TAO_ClientRequestInfo_IR_HomeDef_create_finder::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -{ - // Generate the result on demand. - CORBA::Boolean tk_void_any = 0; - CORBA::Any *result_any = - TAO_RequestInfo_Util::make_any (tk_void_any, ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - - CORBA::Any_var safe_result_any = result_any; - - (*result_any) <<= this->_result; - return safe_result_any._retn (); -} - -void -IR_HomeDef::TAO_ClientRequestInfo_IR_HomeDef_create_finder::result (IR_FinderDef_ptr result) -{ - // update the result - this->_result = result; -} - -#endif /* TAO_HAS_INTERCEPTORS */ - static const CORBA::Long _oc_IR_HomeDef[] = { TAO_ENCAP_BYTE_ORDER, // byte order @@ -54841,6 +30490,10 @@ CORBA::Boolean operator>>= (const CORBA::Any &_tao_any, IR_DefinitionKind &_tao_ return 0; } +_TAO_IRObject_Proxy_Broker * (*_TAO_IRObject_Proxy_Broker_Factory_function_pointer) ( + CORBA::Object_ptr obj + ) = 0; + void operator<<= (CORBA::Any &_tao_any, CORBA_IRObject_ptr _tao_elem) { TAO_OutputCDR stream; @@ -54895,11 +30548,15 @@ CORBA::Boolean operator>>= (const CORBA::Any &_tao_any, CORBA_IRObject_ptr &_tao #if defined (ACE_HAS_EXPLICIT_TEMPLATE_INSTANTIATION) || \ defined (ACE_HAS_GNU_REPO) - template class TAO_Object_Manager<CORBA_IRObject,CORBA_IRObject_var>; + template class TAO_Object_Manager<CORBA_IRObject,CORBA::IRObject_var>; #elif defined (ACE_HAS_TEMPLATE_INSTANTIATION_PRAGMA) - # pragma instantiate TAO_Object_Manager<CORBA_IRObject,CORBA_IRObject_var> + # pragma instantiate TAO_Object_Manager<CORBA_IRObject,CORBA::IRObject_var> #endif /* ACE_HAS_EXPLICIT_TEMPLATE_INSTANTIATION */ +_TAO_Contained_Proxy_Broker * (*_TAO_Contained_Proxy_Broker_Factory_function_pointer) ( + CORBA::Object_ptr obj + ) = 0; + void operator<<= (CORBA::Any &_tao_any, IR_Contained_ptr _tao_elem) { TAO_OutputCDR stream; @@ -56707,6 +32364,10 @@ CORBA::Boolean operator>>= (const CORBA::Any &_tao_any, const IR_EnumMemberSeq * return 0; } +_TAO_Container_Proxy_Broker * (*_TAO_Container_Proxy_Broker_Factory_function_pointer) ( + CORBA::Object_ptr obj + ) = 0; + void operator<<= (CORBA::Any &_tao_any, IR_Container_ptr _tao_elem) { TAO_OutputCDR stream; @@ -56936,6 +32597,10 @@ CORBA::Boolean operator>>= (const CORBA::Any &_tao_any, const IR_Container::Desc return 0; } +_TAO_IDLType_Proxy_Broker * (*_TAO_IDLType_Proxy_Broker_Factory_function_pointer) ( + CORBA::Object_ptr obj + ) = 0; + void operator<<= (CORBA::Any &_tao_any, IR_IDLType_ptr _tao_elem) { TAO_OutputCDR stream; @@ -57033,6 +32698,10 @@ CORBA::Boolean operator>>= (const CORBA::Any &_tao_any, IR_PrimitiveKind &_tao_e return 0; } +_TAO_Repository_Proxy_Broker * (*_TAO_Repository_Proxy_Broker_Factory_function_pointer) ( + CORBA::Object_ptr obj + ) = 0; + void operator<<= (CORBA::Any &_tao_any, IR_Repository_ptr _tao_elem) { TAO_OutputCDR stream; @@ -57092,6 +32761,10 @@ CORBA::Boolean operator>>= (const CORBA::Any &_tao_any, IR_Repository_ptr &_tao_ # pragma instantiate TAO_Object_Manager<IR_Repository,IR_Repository_var> #endif /* ACE_HAS_EXPLICIT_TEMPLATE_INSTANTIATION */ +_TAO_ComponentRepository_Proxy_Broker * (*_TAO_ComponentRepository_Proxy_Broker_Factory_function_pointer) ( + CORBA::Object_ptr obj + ) = 0; + void operator<<= (CORBA::Any &_tao_any, IR_ComponentRepository_ptr _tao_elem) { TAO_OutputCDR stream; @@ -57151,6 +32824,10 @@ CORBA::Boolean operator>>= (const CORBA::Any &_tao_any, IR_ComponentRepository_p # pragma instantiate TAO_Object_Manager<IR_ComponentRepository,IR_ComponentRepository_var> #endif /* ACE_HAS_EXPLICIT_TEMPLATE_INSTANTIATION */ +_TAO_ModuleDef_Proxy_Broker * (*_TAO_ModuleDef_Proxy_Broker_Factory_function_pointer) ( + CORBA::Object_ptr obj + ) = 0; + void operator<<= (CORBA::Any &_tao_any, IR_ModuleDef_ptr _tao_elem) { TAO_OutputCDR stream; @@ -57291,6 +32968,10 @@ CORBA::Boolean operator>>= (const CORBA::Any &_tao_any, const IR_ModuleDescripti return 0; } +_TAO_ConstantDef_Proxy_Broker * (*_TAO_ConstantDef_Proxy_Broker_Factory_function_pointer) ( + CORBA::Object_ptr obj + ) = 0; + void operator<<= (CORBA::Any &_tao_any, IR_ConstantDef_ptr _tao_elem) { TAO_OutputCDR stream; @@ -57431,6 +33112,10 @@ CORBA::Boolean operator>>= (const CORBA::Any &_tao_any, const IR_ConstantDescrip return 0; } +_TAO_TypedefDef_Proxy_Broker * (*_TAO_TypedefDef_Proxy_Broker_Factory_function_pointer) ( + CORBA::Object_ptr obj + ) = 0; + void operator<<= (CORBA::Any &_tao_any, IR_TypedefDef_ptr _tao_elem) { TAO_OutputCDR stream; @@ -57571,6 +33256,10 @@ CORBA::Boolean operator>>= (const CORBA::Any &_tao_any, const IR_TypeDescription return 0; } +_TAO_StructDef_Proxy_Broker * (*_TAO_StructDef_Proxy_Broker_Factory_function_pointer) ( + CORBA::Object_ptr obj + ) = 0; + void operator<<= (CORBA::Any &_tao_any, IR_StructDef_ptr _tao_elem) { TAO_OutputCDR stream; @@ -57630,6 +33319,10 @@ CORBA::Boolean operator>>= (const CORBA::Any &_tao_any, IR_StructDef_ptr &_tao_e # pragma instantiate TAO_Object_Manager<IR_StructDef,IR_StructDef_var> #endif /* ACE_HAS_EXPLICIT_TEMPLATE_INSTANTIATION */ +_TAO_UnionDef_Proxy_Broker * (*_TAO_UnionDef_Proxy_Broker_Factory_function_pointer) ( + CORBA::Object_ptr obj + ) = 0; + void operator<<= (CORBA::Any &_tao_any, IR_UnionDef_ptr _tao_elem) { TAO_OutputCDR stream; @@ -57689,6 +33382,10 @@ CORBA::Boolean operator>>= (const CORBA::Any &_tao_any, IR_UnionDef_ptr &_tao_el # pragma instantiate TAO_Object_Manager<IR_UnionDef,IR_UnionDef_var> #endif /* ACE_HAS_EXPLICIT_TEMPLATE_INSTANTIATION */ +_TAO_EnumDef_Proxy_Broker * (*_TAO_EnumDef_Proxy_Broker_Factory_function_pointer) ( + CORBA::Object_ptr obj + ) = 0; + void operator<<= (CORBA::Any &_tao_any, IR_EnumDef_ptr _tao_elem) { TAO_OutputCDR stream; @@ -57748,6 +33445,10 @@ CORBA::Boolean operator>>= (const CORBA::Any &_tao_any, IR_EnumDef_ptr &_tao_ele # pragma instantiate TAO_Object_Manager<IR_EnumDef,IR_EnumDef_var> #endif /* ACE_HAS_EXPLICIT_TEMPLATE_INSTANTIATION */ +_TAO_AliasDef_Proxy_Broker * (*_TAO_AliasDef_Proxy_Broker_Factory_function_pointer) ( + CORBA::Object_ptr obj + ) = 0; + void operator<<= (CORBA::Any &_tao_any, IR_AliasDef_ptr _tao_elem) { TAO_OutputCDR stream; @@ -57807,6 +33508,10 @@ CORBA::Boolean operator>>= (const CORBA::Any &_tao_any, IR_AliasDef_ptr &_tao_el # pragma instantiate TAO_Object_Manager<IR_AliasDef,IR_AliasDef_var> #endif /* ACE_HAS_EXPLICIT_TEMPLATE_INSTANTIATION */ +_TAO_NativeDef_Proxy_Broker * (*_TAO_NativeDef_Proxy_Broker_Factory_function_pointer) ( + CORBA::Object_ptr obj + ) = 0; + void operator<<= (CORBA::Any &_tao_any, IR_NativeDef_ptr _tao_elem) { TAO_OutputCDR stream; @@ -57866,6 +33571,10 @@ CORBA::Boolean operator>>= (const CORBA::Any &_tao_any, IR_NativeDef_ptr &_tao_e # pragma instantiate TAO_Object_Manager<IR_NativeDef,IR_NativeDef_var> #endif /* ACE_HAS_EXPLICIT_TEMPLATE_INSTANTIATION */ +_TAO_PrimitiveDef_Proxy_Broker * (*_TAO_PrimitiveDef_Proxy_Broker_Factory_function_pointer) ( + CORBA::Object_ptr obj + ) = 0; + void operator<<= (CORBA::Any &_tao_any, IR_PrimitiveDef_ptr _tao_elem) { TAO_OutputCDR stream; @@ -57925,6 +33634,10 @@ CORBA::Boolean operator>>= (const CORBA::Any &_tao_any, IR_PrimitiveDef_ptr &_ta # pragma instantiate TAO_Object_Manager<IR_PrimitiveDef,IR_PrimitiveDef_var> #endif /* ACE_HAS_EXPLICIT_TEMPLATE_INSTANTIATION */ +_TAO_StringDef_Proxy_Broker * (*_TAO_StringDef_Proxy_Broker_Factory_function_pointer) ( + CORBA::Object_ptr obj + ) = 0; + void operator<<= (CORBA::Any &_tao_any, IR_StringDef_ptr _tao_elem) { TAO_OutputCDR stream; @@ -57984,6 +33697,10 @@ CORBA::Boolean operator>>= (const CORBA::Any &_tao_any, IR_StringDef_ptr &_tao_e # pragma instantiate TAO_Object_Manager<IR_StringDef,IR_StringDef_var> #endif /* ACE_HAS_EXPLICIT_TEMPLATE_INSTANTIATION */ +_TAO_WstringDef_Proxy_Broker * (*_TAO_WstringDef_Proxy_Broker_Factory_function_pointer) ( + CORBA::Object_ptr obj + ) = 0; + void operator<<= (CORBA::Any &_tao_any, IR_WstringDef_ptr _tao_elem) { TAO_OutputCDR stream; @@ -58043,6 +33760,10 @@ CORBA::Boolean operator>>= (const CORBA::Any &_tao_any, IR_WstringDef_ptr &_tao_ # pragma instantiate TAO_Object_Manager<IR_WstringDef,IR_WstringDef_var> #endif /* ACE_HAS_EXPLICIT_TEMPLATE_INSTANTIATION */ +_TAO_FixedDef_Proxy_Broker * (*_TAO_FixedDef_Proxy_Broker_Factory_function_pointer) ( + CORBA::Object_ptr obj + ) = 0; + void operator<<= (CORBA::Any &_tao_any, IR_FixedDef_ptr _tao_elem) { TAO_OutputCDR stream; @@ -58102,6 +33823,10 @@ CORBA::Boolean operator>>= (const CORBA::Any &_tao_any, IR_FixedDef_ptr &_tao_el # pragma instantiate TAO_Object_Manager<IR_FixedDef,IR_FixedDef_var> #endif /* ACE_HAS_EXPLICIT_TEMPLATE_INSTANTIATION */ +_TAO_SequenceDef_Proxy_Broker * (*_TAO_SequenceDef_Proxy_Broker_Factory_function_pointer) ( + CORBA::Object_ptr obj + ) = 0; + void operator<<= (CORBA::Any &_tao_any, IR_SequenceDef_ptr _tao_elem) { TAO_OutputCDR stream; @@ -58161,6 +33886,10 @@ CORBA::Boolean operator>>= (const CORBA::Any &_tao_any, IR_SequenceDef_ptr &_tao # pragma instantiate TAO_Object_Manager<IR_SequenceDef,IR_SequenceDef_var> #endif /* ACE_HAS_EXPLICIT_TEMPLATE_INSTANTIATION */ +_TAO_ArrayDef_Proxy_Broker * (*_TAO_ArrayDef_Proxy_Broker_Factory_function_pointer) ( + CORBA::Object_ptr obj + ) = 0; + void operator<<= (CORBA::Any &_tao_any, IR_ArrayDef_ptr _tao_elem) { TAO_OutputCDR stream; @@ -58220,6 +33949,10 @@ CORBA::Boolean operator>>= (const CORBA::Any &_tao_any, IR_ArrayDef_ptr &_tao_el # pragma instantiate TAO_Object_Manager<IR_ArrayDef,IR_ArrayDef_var> #endif /* ACE_HAS_EXPLICIT_TEMPLATE_INSTANTIATION */ +_TAO_ExceptionDef_Proxy_Broker * (*_TAO_ExceptionDef_Proxy_Broker_Factory_function_pointer) ( + CORBA::Object_ptr obj + ) = 0; + void operator<<= (CORBA::Any &_tao_any, IR_ExceptionDef_ptr _tao_elem) { TAO_OutputCDR stream; @@ -58576,6 +34309,10 @@ CORBA::Boolean operator>>= (const CORBA::Any &_tao_any, IR_AttributeMode &_tao_e return 0; } +_TAO_AttributeDef_Proxy_Broker * (*_TAO_AttributeDef_Proxy_Broker_Factory_function_pointer) ( + CORBA::Object_ptr obj + ) = 0; + void operator<<= (CORBA::Any &_tao_any, IR_AttributeDef_ptr _tao_elem) { TAO_OutputCDR stream; @@ -59051,6 +34788,10 @@ CORBA::Boolean operator>>= (const CORBA::Any &_tao_any, const IR_ContextIdSeq *& return 0; } +_TAO_OperationDef_Proxy_Broker * (*_TAO_OperationDef_Proxy_Broker_Factory_function_pointer) ( + CORBA::Object_ptr obj + ) = 0; + void operator<<= (CORBA::Any &_tao_any, IR_OperationDef_ptr _tao_elem) { TAO_OutputCDR stream; @@ -59458,6 +35199,10 @@ CORBA::Boolean operator>>= (const CORBA::Any &_tao_any, const IR_AttrDescription return 0; } +_TAO_InterfaceDef_Proxy_Broker * (*_TAO_InterfaceDef_Proxy_Broker_Factory_function_pointer) ( + CORBA::Object_ptr obj + ) = 0; + void operator<<= (CORBA::Any &_tao_any, IR_InterfaceDef_ptr _tao_elem) { TAO_OutputCDR stream; @@ -59768,6 +35513,10 @@ CORBA::Boolean operator>>= (const CORBA::Any &_tao_any, const IR_ValueMemberSeq return 0; } +_TAO_ValueMemberDef_Proxy_Broker * (*_TAO_ValueMemberDef_Proxy_Broker_Factory_function_pointer) ( + CORBA::Object_ptr obj + ) = 0; + void operator<<= (CORBA::Any &_tao_any, IR_ValueMemberDef_ptr _tao_elem) { TAO_OutputCDR stream; @@ -59827,6 +35576,10 @@ CORBA::Boolean operator>>= (const CORBA::Any &_tao_any, IR_ValueMemberDef_ptr &_ # pragma instantiate TAO_Object_Manager<IR_ValueMemberDef,IR_ValueMemberDef_var> #endif /* ACE_HAS_EXPLICIT_TEMPLATE_INSTANTIATION */ +_TAO_ValueDef_Proxy_Broker * (*_TAO_ValueDef_Proxy_Broker_Factory_function_pointer) ( + CORBA::Object_ptr obj + ) = 0; + void operator<<= (CORBA::Any &_tao_any, IR_ValueDef_ptr _tao_elem) { TAO_OutputCDR stream; @@ -59967,6 +35720,10 @@ CORBA::Boolean operator>>= (const CORBA::Any &_tao_any, const IR_ValueDescriptio return 0; } +_TAO_ValueBoxDef_Proxy_Broker * (*_TAO_ValueBoxDef_Proxy_Broker_Factory_function_pointer) ( + CORBA::Object_ptr obj + ) = 0; + void operator<<= (CORBA::Any &_tao_any, IR_ValueBoxDef_ptr _tao_elem) { TAO_OutputCDR stream; @@ -60026,6 +35783,10 @@ CORBA::Boolean operator>>= (const CORBA::Any &_tao_any, IR_ValueBoxDef_ptr &_tao # pragma instantiate TAO_Object_Manager<IR_ValueBoxDef,IR_ValueBoxDef_var> #endif /* ACE_HAS_EXPLICIT_TEMPLATE_INSTANTIATION */ +_TAO_ProvidesDef_Proxy_Broker * (*_TAO_ProvidesDef_Proxy_Broker_Factory_function_pointer) ( + CORBA::Object_ptr obj + ) = 0; + void operator<<= (CORBA::Any &_tao_any, IR_ProvidesDef_ptr _tao_elem) { TAO_OutputCDR stream; @@ -60166,6 +35927,10 @@ CORBA::Boolean operator>>= (const CORBA::Any &_tao_any, const IR_ProvidesDescrip return 0; } +_TAO_UsesDef_Proxy_Broker * (*_TAO_UsesDef_Proxy_Broker_Factory_function_pointer) ( + CORBA::Object_ptr obj + ) = 0; + void operator<<= (CORBA::Any &_tao_any, IR_UsesDef_ptr _tao_elem) { TAO_OutputCDR stream; @@ -60484,6 +36249,10 @@ CORBA::Boolean operator>>= (const CORBA::Any &_tao_any, const IR_UsesDescSeq *&_ return 0; } +_TAO_EventDef_Proxy_Broker * (*_TAO_EventDef_Proxy_Broker_Factory_function_pointer) ( + CORBA::Object_ptr obj + ) = 0; + void operator<<= (CORBA::Any &_tao_any, IR_EventDef_ptr _tao_elem) { TAO_OutputCDR stream; @@ -60624,6 +36393,10 @@ CORBA::Boolean operator>>= (const CORBA::Any &_tao_any, const IR_EventDescriptio return 0; } +_TAO_EmitsDef_Proxy_Broker * (*_TAO_EmitsDef_Proxy_Broker_Factory_function_pointer) ( + CORBA::Object_ptr obj + ) = 0; + void operator<<= (CORBA::Any &_tao_any, IR_EmitsDef_ptr _tao_elem) { TAO_OutputCDR stream; @@ -60683,6 +36456,10 @@ CORBA::Boolean operator>>= (const CORBA::Any &_tao_any, IR_EmitsDef_ptr &_tao_el # pragma instantiate TAO_Object_Manager<IR_EmitsDef,IR_EmitsDef_var> #endif /* ACE_HAS_EXPLICIT_TEMPLATE_INSTANTIATION */ +_TAO_PublishesDef_Proxy_Broker * (*_TAO_PublishesDef_Proxy_Broker_Factory_function_pointer) ( + CORBA::Object_ptr obj + ) = 0; + void operator<<= (CORBA::Any &_tao_any, IR_PublishesDef_ptr _tao_elem) { TAO_OutputCDR stream; @@ -60742,6 +36519,10 @@ CORBA::Boolean operator>>= (const CORBA::Any &_tao_any, IR_PublishesDef_ptr &_ta # pragma instantiate TAO_Object_Manager<IR_PublishesDef,IR_PublishesDef_var> #endif /* ACE_HAS_EXPLICIT_TEMPLATE_INSTANTIATION */ +_TAO_ConsumesDef_Proxy_Broker * (*_TAO_ConsumesDef_Proxy_Broker_Factory_function_pointer) ( + CORBA::Object_ptr obj + ) = 0; + void operator<<= (CORBA::Any &_tao_any, IR_ConsumesDef_ptr _tao_elem) { TAO_OutputCDR stream; @@ -60801,6 +36582,10 @@ CORBA::Boolean operator>>= (const CORBA::Any &_tao_any, IR_ConsumesDef_ptr &_tao # pragma instantiate TAO_Object_Manager<IR_ConsumesDef,IR_ConsumesDef_var> #endif /* ACE_HAS_EXPLICIT_TEMPLATE_INSTANTIATION */ +_TAO_ComponentDef_Proxy_Broker * (*_TAO_ComponentDef_Proxy_Broker_Factory_function_pointer) ( + CORBA::Object_ptr obj + ) = 0; + void operator<<= (CORBA::Any &_tao_any, IR_ComponentDef_ptr _tao_elem) { TAO_OutputCDR stream; @@ -60941,6 +36726,10 @@ CORBA::Boolean operator>>= (const CORBA::Any &_tao_any, const IR_ComponentDescri return 0; } +_TAO_PrimaryKeyDef_Proxy_Broker * (*_TAO_PrimaryKeyDef_Proxy_Broker_Factory_function_pointer) ( + CORBA::Object_ptr obj + ) = 0; + void operator<<= (CORBA::Any &_tao_any, IR_PrimaryKeyDef_ptr _tao_elem) { TAO_OutputCDR stream; @@ -61081,6 +36870,10 @@ CORBA::Boolean operator>>= (const CORBA::Any &_tao_any, const IR_PrimaryKeyDescr return 0; } +_TAO_FactoryDef_Proxy_Broker * (*_TAO_FactoryDef_Proxy_Broker_Factory_function_pointer) ( + CORBA::Object_ptr obj + ) = 0; + void operator<<= (CORBA::Any &_tao_any, IR_FactoryDef_ptr _tao_elem) { TAO_OutputCDR stream; @@ -61140,6 +36933,10 @@ CORBA::Boolean operator>>= (const CORBA::Any &_tao_any, IR_FactoryDef_ptr &_tao_ # pragma instantiate TAO_Object_Manager<IR_FactoryDef,IR_FactoryDef_var> #endif /* ACE_HAS_EXPLICIT_TEMPLATE_INSTANTIATION */ +_TAO_FinderDef_Proxy_Broker * (*_TAO_FinderDef_Proxy_Broker_Factory_function_pointer) ( + CORBA::Object_ptr obj + ) = 0; + void operator<<= (CORBA::Any &_tao_any, IR_FinderDef_ptr _tao_elem) { TAO_OutputCDR stream; @@ -61199,6 +36996,10 @@ CORBA::Boolean operator>>= (const CORBA::Any &_tao_any, IR_FinderDef_ptr &_tao_e # pragma instantiate TAO_Object_Manager<IR_FinderDef,IR_FinderDef_var> #endif /* ACE_HAS_EXPLICIT_TEMPLATE_INSTANTIATION */ +_TAO_HomeDef_Proxy_Broker * (*_TAO_HomeDef_Proxy_Broker_Factory_function_pointer) ( + CORBA::Object_ptr obj + ) = 0; + void operator<<= (CORBA::Any &_tao_any, IR_HomeDef_ptr _tao_elem) { TAO_OutputCDR stream; |