diff options
Diffstat (limited to 'TAO/orbsvcs/IFR_Service/diffs/InterfaceS.cpp.diff')
-rw-r--r-- | TAO/orbsvcs/IFR_Service/diffs/InterfaceS.cpp.diff | 61875 |
1 files changed, 54941 insertions, 6934 deletions
diff --git a/TAO/orbsvcs/IFR_Service/diffs/InterfaceS.cpp.diff b/TAO/orbsvcs/IFR_Service/diffs/InterfaceS.cpp.diff index c7dc8c84170..9943343a372 100644 --- a/TAO/orbsvcs/IFR_Service/diffs/InterfaceS.cpp.diff +++ b/TAO/orbsvcs/IFR_Service/diffs/InterfaceS.cpp.diff @@ -1,5 +1,5 @@ ---- orig/InterfaceS.cpp Fri Mar 09 00:47:29 2001 -+++ ../../orbsvcs/IFR_Service/InterfaceS.cpp Thu Mar 01 15:34:30 2001 +--- InterfaceS.cpp Fri Jan 12 22:31:13 2001 ++++ ..\InterfaceS.cpp Fri Jan 12 22:36:26 2001 @@ -1,6 +1,6 @@ // -*- C++ -*- // @@ -8,16 +8,7 @@ // **** Code generated by the The ACE ORB (TAO) IDL Compiler **** // TAO and the TAO IDL Compiler have been developed by: -@@ -19,13 +19,15 @@ - // Information about TAO is available at: - // http://www.cs.wustl.edu/~schmidt/TAO.html - --#ifndef _TAO_IDL_ORIG_INTERFACES_CPP_ --#define _TAO_IDL_ORIG_INTERFACES_CPP_ -+#ifndef TAO_IDL_INTERFACES_CPP -+#define TAO_IDL_INTERFACES_CPP - - #include "InterfaceS.h" +@@ -23,6 +23,8 @@ #include "tao/PortableServer/Object_Adapter.h" #include "tao/PortableServer/Operation_Table.h" @@ -26,16 +17,16 @@ #if TAO_HAS_INTERCEPTORS == 1 #include "tao/RequestInfo_Util.h" #endif /* TAO_HAS_INTERCEPTORS == 1 */ -@@ -45,7 +47,7 @@ +@@ -42,7 +44,7 @@ public: const TAO_operation_db_entry * lookup (const char *str, unsigned int len); }; --/* starting time is 18:47:27 */ +-/* starting time is 16:31:11 */ +/* starting time is 22:05:52 */ /* C++ code produced by gperf version 2.8 (ACE version) */ /* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_CORBA_IRObject_Perfect_Hash_OpTable -N lookup */ unsigned int -@@ -116,12 +118,12 @@ +@@ -113,12 +115,12 @@ static const class TAO_operation_db_entry wordlist[] = { {"",0},{"",0},{"",0},{"",0},{"",0}, @@ -52,11 +43,11 @@ }; if (len <= MAX_WORD_LENGTH && len >= MIN_WORD_LENGTH) -@@ -138,37 +140,37 @@ +@@ -135,37 +137,37 @@ } return 0; } --/* ending time is 18:47:27 */ +-/* ending time is 16:31:11 */ +/* ending time is 22:05:52 */ static TAO_CORBA_IRObject_Perfect_Hash_OpTable tao_CORBA_IRObject_optable; @@ -98,7 +89,7 @@ ::CORBA::IRObject *object, CORBA::Environment &ACE_TRY_ENV ) -@@ -187,7 +189,7 @@ +@@ -184,7 +186,7 @@ } void @@ -107,7 +98,7 @@ TAO_ORB_Core::TAO_Collocation_Strategies strategy, CORBA::Environment &ACE_TRY_ENV ) -@@ -201,7 +203,7 @@ +@@ -198,7 +200,7 @@ case TAO_ORB_Core::THRU_POA_STRATEGY: ACE_NEW_THROW_EX ( this->proxy_cache_[strategy], @@ -116,7 +107,7 @@ CORBA::NO_MEMORY () ); ACE_CHECK; -@@ -211,7 +213,7 @@ +@@ -208,7 +210,7 @@ default: ACE_NEW_THROW_EX ( this->proxy_cache_[strategy], @@ -125,7 +116,7 @@ CORBA::NO_MEMORY () ); ACE_CHECK; -@@ -228,38 +230,44 @@ +@@ -225,38 +227,42 @@ /////////////////////////////////////////////////////////////////////// @@ -156,12 +147,7 @@ -static int CORBA__TAO_IRObject_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = - CORBA__TAO_IRObject_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, CORBA__TAO_IRObject_Proxy_Broker_Factory_Initializer)); +static int _TAO_IRObject_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = -+ _TAO_IRObject_Proxy_Broker_Factory_Initializer ( -+ ACE_reinterpret_cast ( -+ long, -+ _TAO_IRObject_Proxy_Broker_Factory_Initializer -+ ) -+ ); ++ _TAO_IRObject_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, _TAO_IRObject_Proxy_Broker_Factory_Initializer)); /////////////////////////////////////////////////////////////////////// @@ -170,6 +156,9 @@ -POA_CORBA::_TAO_IRObject_ThruPOA_Proxy_Impl::_TAO_IRObject_ThruPOA_Proxy_Impl (void) +_TAO_IRObject_ThruPOA_Proxy_Impl::_TAO_IRObject_ThruPOA_Proxy_Impl (void) ++{} ++ ++_TAO_IRObject_ThruPOA_Proxy_Impl::~_TAO_IRObject_ThruPOA_Proxy_Impl (void) {} // ThruPOA Implementation of the IDL interface methods @@ -180,7 +169,7 @@ CORBA_Object *_collocated_tao_target_, CORBA::Environment &ACE_TRY_ENV ) -@@ -267,7 +275,7 @@ +@@ -264,7 +270,7 @@ CORBA::SystemException )) { @@ -189,7 +178,7 @@ ACE_UNUSED_ARG (_tao_retval); TAO_Object_Adapter::Servant_Upcall servant_upcall ( _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -281,7 +289,7 @@ +@@ -278,7 +284,7 @@ ); ACE_CHECK_RETURN (_tao_retval); return ACE_reinterpret_cast ( @@ -198,7 +187,7 @@ servant_upcall.servant ()->_downcast ( "IDL:omg.org/CORBA/IRObject:1.0" ) -@@ -290,7 +298,8 @@ +@@ -287,7 +293,8 @@ ); } @@ -208,7 +197,7 @@ CORBA_Object *_collocated_tao_target_, CORBA::Environment &ACE_TRY_ENV ) -@@ -310,7 +319,7 @@ +@@ -307,7 +314,7 @@ ); ACE_CHECK; ACE_reinterpret_cast ( @@ -217,7 +206,7 @@ servant_upcall.servant ()->_downcast ( "IDL:omg.org/CORBA/IRObject:1.0" ) -@@ -325,31 +334,31 @@ +@@ -322,210 +329,105 @@ /////////////////////////////////////////////////////////////////////// // skeleton constructor @@ -242,73 +231,175 @@ -void POA_CORBA::IRObject::_get_def_kind_skel ( +void POA_CORBA_IRObject::_get_def_kind_skel ( TAO_ServerRequest &_tao_server_request, - void *_tao_object_reference, - void * /* context */, +- void *_tao_object_reference, +- void * /* context */, ++ void *_tao_object_reference, ++ void * /* context */, CORBA::Environment &ACE_TRY_ENV ) { - POA_CORBA::IRObject *_tao_impl = (POA_CORBA::IRObject *)_tao_object_reference; + POA_CORBA_IRObject *_tao_impl = (POA_CORBA_IRObject *)_tao_object_reference; - -- IR::DefinitionKind _tao_retval; + +- IR::DefinitionKind _tao_retval; + IR_DefinitionKind _tao_retval; - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( -@@ -357,7 +366,7 @@ - _tao_server_request.interceptor_count () - ); - +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- - POA_CORBA::IRObject::TAO_ServerRequestInfo_CORBA_IRObject_def_kind_get ri ( -+ POA_CORBA_IRObject::TAO_ServerRequestInfo_CORBA_IRObject_def_kind_get ri ( - _tao_server_request, - _tao_impl, +- _tao_server_request, +- _tao_impl +- , ++ _tao_retval = _tao_impl->def_kind ( ACE_TRY_ENV -@@ -376,7 +385,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::DefinitionKind _tao_retval_info = _tao_retval; -+ IR_DefinitionKind _tao_retval_info = _tao_retval; - ri.result (_tao_retval_info); - ri.reply_status (PortableInterceptor::SUCCESSFUL); - _tao_vfr.send_reply (&ri, ACE_TRY_ENV); -@@ -419,14 +428,14 @@ - ACE_UNUSED_ARG (ACE_TRY_ENV); + ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = + +- _tao_impl->def_kind ( +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::DefinitionKind _tao_retval_info = _tao_retval; +- ri.result (_tao_retval_info); +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; + ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); ++ ++ _tao_server_request.init_reply (); + TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); + if (!( + (_tao_out << _tao_retval) + )) +- ACE_THROW (CORBA::MARSHAL()); +- ++ ACE_THROW (CORBA::MARSHAL () ); } -void POA_CORBA::IRObject::destroy_skel ( +void POA_CORBA_IRObject::destroy_skel ( TAO_ServerRequest &_tao_server_request, - void *_tao_object_reference, - void * /* context */, +- void *_tao_object_reference, +- void * /* context */, ++ void *_tao_object_reference, ++ void * /* context */, CORBA::Environment &ACE_TRY_ENV - ) +- ) ++) { - POA_CORBA::IRObject *_tao_impl = (POA_CORBA::IRObject *)_tao_object_reference; + POA_CORBA_IRObject *_tao_impl = (POA_CORBA_IRObject *)_tao_object_reference; - - _tao_server_request.argument_flag (0); - -@@ -436,7 +445,7 @@ - _tao_server_request.interceptor_count () - ); - + +-_tao_server_request.argument_flag (0); +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- - POA_CORBA::IRObject::TAO_ServerRequestInfo_CORBA_IRObject_destroy ri ( -+ POA_CORBA_IRObject::TAO_ServerRequestInfo_CORBA_IRObject_destroy ri ( - _tao_server_request, - _tao_impl, +- _tao_server_request, +- _tao_impl +- , ++ _tao_impl->destroy ( ACE_TRY_ENV -@@ -489,7 +498,7 @@ - ACE_UNUSED_ARG (ACE_TRY_ENV); + ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- + +- _tao_impl->destroy ( +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; + ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); ++ ++ _tao_server_request.init_reply (); } -void POA_CORBA::IRObject::_is_a_skel ( +- TAO_ServerRequest &_tao_server_request, +void POA_CORBA_IRObject::_is_a_skel ( - TAO_ServerRequest &_tao_server_request, ++ TAO_ServerRequest &_tao_server_request, void * _tao_object_reference, void * /* context */, -@@ -497,10 +506,10 @@ + CORBA::Environment &ACE_TRY_ENV ) { TAO_InputCDR &_tao_in = _tao_server_request.incoming (); @@ -319,10 +410,12 @@ - if (!(_tao_in >> value.out ())) + if (!((_tao_in >> value.out ()))) ACE_THROW (CORBA::MARSHAL ()); - +- ++ _tao_retval = _tao_impl->_is_a (value.in (), ACE_TRY_ENV); -@@ -508,28 +517,28 @@ - + ACE_CHECK; +- ++ _tao_server_request.init_reply (); TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); - if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) @@ -331,8 +424,9 @@ } -void POA_CORBA::IRObject::_non_existent_skel ( +- TAO_ServerRequest &_tao_server_request, +void POA_CORBA_IRObject::_non_existent_skel ( - TAO_ServerRequest &_tao_server_request, ++ TAO_ServerRequest &_tao_server_request, void * _tao_object_reference, void * /* context */, CORBA::Environment &ACE_TRY_ENV @@ -342,7 +436,8 @@ + POA_CORBA_IRObject *_tao_impl = (POA_CORBA_IRObject *) _tao_object_reference; CORBA::Boolean _tao_retval = _tao_impl->_non_existent (ACE_TRY_ENV); ACE_CHECK; - +- ++ _tao_server_request.init_reply (); TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); - if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) @@ -355,7 +450,7 @@ const char* value, CORBA::Environment &ACE_TRY_ENV ) -@@ -542,29 +551,29 @@ +@@ -538,29 +440,29 @@ return 0; } @@ -364,10 +459,12 @@ const char* logical_type_id ) { - if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/IRObject:1.0") == 0) +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/IRObject:1.0") == 0) - return ACE_static_cast (POA_CORBA::IRObject_ptr, this); +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/Object:1.0") == 0) ++if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/IRObject:1.0") == 0) + return ACE_static_cast (POA_CORBA_IRObject_ptr, this); - if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/Object:1.0") == 0) ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/Object:1.0") == 0) return ACE_static_cast(PortableServer::Servant, this); return 0; } @@ -390,151 +487,216 @@ { TAO_Stub *stub = this->_create_stub (ACE_TRY_ENV); ACE_CHECK_RETURN (0); -@@ -580,11 +589,10 @@ +@@ -576,150 +478,6 @@ return ::CORBA::IRObject::_unchecked_narrow (obj.in ()); } - - #if (TAO_HAS_INTERCEPTORS == 1) +-#if (TAO_HAS_INTERCEPTORS == 1) -POA_CORBA::IRObject::TAO_ServerRequestInfo_CORBA_IRObject_def_kind_get::TAO_ServerRequestInfo_CORBA_IRObject_def_kind_get ( -+POA_CORBA_IRObject::TAO_ServerRequestInfo_CORBA_IRObject_def_kind_get::TAO_ServerRequestInfo_CORBA_IRObject_def_kind_get ( - TAO_ServerRequest &_tao_server_request, -- POA_CORBA::IRObject *tao_impl, -+ POA_CORBA_IRObject *tao_impl, - CORBA::Environment & - ) - : TAO_ServerRequestInfo (_tao_server_request), -@@ -592,7 +600,7 @@ - {} - - Dynamic::ParameterList * +- TAO_ServerRequest &_tao_server_request, +- POA_CORBA::IRObject *tao_impl +- , +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl) +-{} +- +-Dynamic::ParameterList * -POA_CORBA::IRObject::TAO_ServerRequestInfo_CORBA_IRObject_def_kind_get::arguments (CORBA::Environment &ACE_TRY_ENV) -+POA_CORBA_IRObject::TAO_ServerRequestInfo_CORBA_IRObject_def_kind_get::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) - { - // Generate the argument list on demand. -@@ -604,7 +612,7 @@ - } - - Dynamic::ExceptionList * +- 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 * -POA_CORBA::IRObject::TAO_ServerRequestInfo_CORBA_IRObject_def_kind_get::exceptions (CORBA::Environment &ACE_TRY_ENV) -+POA_CORBA_IRObject::TAO_ServerRequestInfo_CORBA_IRObject_def_kind_get::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) - { - // Generate the exception list on demand. -@@ -616,7 +624,7 @@ - } - - CORBA::Any * +- 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 * -POA_CORBA::IRObject::TAO_ServerRequestInfo_CORBA_IRObject_def_kind_get::result (CORBA::Environment &ACE_TRY_ENV) -+POA_CORBA_IRObject::TAO_ServerRequestInfo_CORBA_IRObject_def_kind_get::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) - { - // Generate the result on demand. -@@ -633,7 +641,7 @@ - } - - char * +- 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 (); +-} +- +-char * -POA_CORBA::IRObject::TAO_ServerRequestInfo_CORBA_IRObject_def_kind_get::target_most_derived_interface ( -+POA_CORBA_IRObject::TAO_ServerRequestInfo_CORBA_IRObject_def_kind_get::target_most_derived_interface ( - CORBA::Environment &) - ACE_THROW_SPEC ((CORBA::SystemException)) - { -@@ -642,7 +650,7 @@ - } - - CORBA::Boolean +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean -POA_CORBA::IRObject::TAO_ServerRequestInfo_CORBA_IRObject_def_kind_get::target_is_a ( -+POA_CORBA_IRObject::TAO_ServerRequestInfo_CORBA_IRObject_def_kind_get::target_is_a ( - const char * id, - CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -@@ -651,15 +659,15 @@ - } - - void +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-void -POA_CORBA::IRObject::TAO_ServerRequestInfo_CORBA_IRObject_def_kind_get::result (IR::DefinitionKind result) -+POA_CORBA_IRObject::TAO_ServerRequestInfo_CORBA_IRObject_def_kind_get::result (IR::DefinitionKind result) - { - // Update the result. - this->_result = result; - } - +-{ +- // Update the result. +- this->_result = result; +-} +- -POA_CORBA::IRObject::TAO_ServerRequestInfo_CORBA_IRObject_destroy::TAO_ServerRequestInfo_CORBA_IRObject_destroy ( -+POA_CORBA_IRObject::TAO_ServerRequestInfo_CORBA_IRObject_destroy::TAO_ServerRequestInfo_CORBA_IRObject_destroy ( - TAO_ServerRequest &_tao_server_request, -- POA_CORBA::IRObject *tao_impl, -+ POA_CORBA_IRObject *tao_impl, - CORBA::Environment & - ) - : TAO_ServerRequestInfo (_tao_server_request), -@@ -667,7 +675,7 @@ - {} - - Dynamic::ParameterList * +- TAO_ServerRequest &_tao_server_request, +- POA_CORBA::IRObject *tao_impl +- , +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl) +-{} +- +-Dynamic::ParameterList * -POA_CORBA::IRObject::TAO_ServerRequestInfo_CORBA_IRObject_destroy::arguments (CORBA::Environment &ACE_TRY_ENV) -+POA_CORBA_IRObject::TAO_ServerRequestInfo_CORBA_IRObject_destroy::arguments (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) - { - // Generate the argument list on demand. -@@ -679,7 +687,7 @@ - } - - Dynamic::ExceptionList * +- 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 * -POA_CORBA::IRObject::TAO_ServerRequestInfo_CORBA_IRObject_destroy::exceptions (CORBA::Environment &ACE_TRY_ENV) -+POA_CORBA_IRObject::TAO_ServerRequestInfo_CORBA_IRObject_destroy::exceptions (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) - { - // Generate the exception list on demand. -@@ -691,7 +699,7 @@ - } - - CORBA::Any * +- 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 * -POA_CORBA::IRObject::TAO_ServerRequestInfo_CORBA_IRObject_destroy::result (CORBA::Environment &ACE_TRY_ENV) -+POA_CORBA_IRObject::TAO_ServerRequestInfo_CORBA_IRObject_destroy::result (CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) - { - // Generate the result on demand. -@@ -704,7 +712,7 @@ - } - - char * +- 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; +-} +- +-char * -POA_CORBA::IRObject::TAO_ServerRequestInfo_CORBA_IRObject_destroy::target_most_derived_interface ( -+POA_CORBA_IRObject::TAO_ServerRequestInfo_CORBA_IRObject_destroy::target_most_derived_interface ( - CORBA::Environment &) - ACE_THROW_SPEC ((CORBA::SystemException)) - { -@@ -713,7 +721,7 @@ - } - - CORBA::Boolean +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean -POA_CORBA::IRObject::TAO_ServerRequestInfo_CORBA_IRObject_destroy::target_is_a ( -+POA_CORBA_IRObject::TAO_ServerRequestInfo_CORBA_IRObject_destroy::target_is_a ( - const char * id, - CORBA::Environment &ACE_TRY_ENV) - ACE_THROW_SPEC ((CORBA::SystemException)) -@@ -722,6 +730,7 @@ - } - - #endif /* TAO_HAS_INTERCEPTORS */ -+ +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-#endif /* TAO_HAS_INTERCEPTORS */ class TAO_IR_Contained_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable { private: -@@ -729,7 +738,7 @@ +@@ -727,7 +485,7 @@ public: const TAO_operation_db_entry * lookup (const char *str, unsigned int len); }; --/* starting time is 18:47:27 */ +-/* starting time is 16:31:11 */ +/* starting time is 11:23:09 */ /* C++ code produced by gperf version 2.8 (ACE version) */ /* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_Contained_Perfect_Hash_OpTable -N lookup */ unsigned int -@@ -855,16 +864,15 @@ +@@ -798,28 +556,28 @@ + static const class TAO_operation_db_entry wordlist[] = + { + {"",0},{"",0},{"",0},{"",0}, +- {"move", &POA_IR::Contained::move_skel}, ++ {"move", &POA_IR::Contained::move_skel}, + {"_is_a", &POA_IR::Contained::_is_a_skel}, +- {"_get_id", &POA_IR::Contained::_get_id_skel}, +- {"_set_id", &POA_IR::Contained::_set_id_skel}, +- {"describe", &POA_IR::Contained::describe_skel}, +- {"_get_name", &POA_IR::Contained::_get_name_skel}, +- {"_set_name", &POA_IR::Contained::_set_name_skel}, +- {"_get_version", &POA_IR::Contained::_get_version_skel}, +- {"_set_version", &POA_IR::Contained::_set_version_skel}, +- {"_get_def_kind", &POA_IR::Contained::_get_def_kind_skel}, +- {"_get_defined_in", &POA_IR::Contained::_get_defined_in_skel}, +- {"destroy", &POA_IR::Contained::destroy_skel}, +- {"_get_absolute_name", &POA_IR::Contained::_get_absolute_name_skel}, ++ {"_get_id", &POA_IR::Contained::_get_id_skel}, ++ {"_set_id", &POA_IR::Contained::_set_id_skel}, ++ {"describe", &POA_IR::Contained::describe_skel}, ++ {"_get_name", &POA_IR::Contained::_get_name_skel}, ++ {"_set_name", &POA_IR::Contained::_set_name_skel}, ++ {"_get_version", &POA_IR::Contained::_get_version_skel}, ++ {"_set_version", &POA_IR::Contained::_set_version_skel}, ++ {"_get_def_kind", &POA_IR::Contained::_get_def_kind_skel}, ++ {"_get_defined_in", &POA_IR::Contained::_get_defined_in_skel}, ++ {"destroy", &POA_IR::Contained::destroy_skel}, ++ {"_get_absolute_name", &POA_IR::Contained::_get_absolute_name_skel}, + {"_non_existent", &POA_IR::Contained::_non_existent_skel}, +- {"_get_containing_repository", &POA_IR::Contained::_get_containing_repository_skel}, ++ {"_get_containing_repository", &POA_IR::Contained::_get_containing_repository_skel}, + }; + + static const signed char lookup[] = + { +- -6, -2, -9, -2, 4, 5, -1, -43, 8, -43, -11, -2, -38, 13, +- -1, 14, -1, 15, 16, -1, -1, -1, -1, 17, -1, -1, -1, -1, +- -1, -1, -1, -1, -1, -1, -1, -1, 18, ++ -6, -2, -9, -2, 4, 5, -1, -43, 8, -43, -11, -2, -38, 13, ++ -1, 14, -1, 15, 16, -1, -1, -1, -1, 17, -1, -1, -1, -1, ++ -1, -1, -1, -1, -1, -1, -1, -1, 18, + }; + + if (len <= MAX_WORD_LENGTH && len >= MIN_WORD_LENGTH) +@@ -853,16 +611,15 @@ } return 0; } --/* ending time is 18:47:27 */ +-/* ending time is 16:31:11 */ +/* ending time is 11:23:09 */ static TAO_IR_Contained_Perfect_Hash_OpTable tao_IR_Contained_optable; @@ -549,7 +711,7 @@ { static POA_IR::_TAO_Contained_Strategized_Proxy_Broker strategized_proxy_broker; return &strategized_proxy_broker; -@@ -884,9 +892,9 @@ +@@ -882,9 +639,9 @@ } @@ -561,7 +723,7 @@ CORBA::Environment &ACE_TRY_ENV ) { -@@ -928,7 +936,7 @@ +@@ -926,7 +683,7 @@ default: ACE_NEW_THROW_EX ( this->proxy_cache_[strategy], @@ -570,7 +732,7 @@ CORBA::NO_MEMORY () ); ACE_CHECK; -@@ -945,26 +953,26 @@ +@@ -943,26 +700,26 @@ /////////////////////////////////////////////////////////////////////// @@ -605,16 +767,17 @@ /////////////////////////////////////////////////////////////////////// -@@ -1165,7 +1173,7 @@ - return; - } +@@ -972,6 +729,9 @@ + POA_IR::_TAO_Contained_ThruPOA_Proxy_Impl::_TAO_Contained_ThruPOA_Proxy_Impl (void) + {} --IR::Container_ptr POA_IR::_TAO_Contained_ThruPOA_Proxy_Impl::defined_in ( -+IR_Container_ptr POA_IR::_TAO_Contained_ThruPOA_Proxy_Impl::defined_in ( - CORBA_Object *_collocated_tao_target_, - CORBA::Environment &ACE_TRY_ENV - ) -@@ -1173,7 +1181,7 @@ ++POA_IR::_TAO_Contained_ThruPOA_Proxy_Impl::~_TAO_Contained_ThruPOA_Proxy_Impl (void) ++{} ++ + // ThruPOA Implementation of the IDL interface methods + + char * POA_IR::_TAO_Contained_ThruPOA_Proxy_Impl::id ( +@@ -1171,7 +931,7 @@ CORBA::SystemException )) { @@ -623,16 +786,7 @@ ACE_UNUSED_ARG (_tao_retval); TAO_Object_Adapter::Servant_Upcall servant_upcall ( _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -1227,7 +1235,7 @@ - ); - } - --IR::Repository_ptr POA_IR::_TAO_Contained_ThruPOA_Proxy_Impl::containing_repository ( -+IR_Repository_ptr POA_IR::_TAO_Contained_ThruPOA_Proxy_Impl::containing_repository ( - CORBA_Object *_collocated_tao_target_, - CORBA::Environment &ACE_TRY_ENV - ) -@@ -1235,7 +1243,7 @@ +@@ -1233,7 +993,7 @@ CORBA::SystemException )) { @@ -641,16 +795,7 @@ ACE_UNUSED_ARG (_tao_retval); TAO_Object_Adapter::Servant_Upcall servant_upcall ( _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -1258,7 +1266,7 @@ - ); - } - --IR::Contained::Description * POA_IR::_TAO_Contained_ThruPOA_Proxy_Impl::describe ( -+IR_Contained::Description * POA_IR::_TAO_Contained_ThruPOA_Proxy_Impl::describe ( - CORBA_Object *_collocated_tao_target_, - CORBA::Environment &ACE_TRY_ENV - ) -@@ -1266,7 +1274,7 @@ +@@ -1264,7 +1024,7 @@ CORBA::SystemException )) { @@ -659,7 +804,7 @@ ACE_UNUSED_ARG (_tao_retval); TAO_Object_Adapter::Servant_Upcall servant_upcall ( _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -1291,7 +1299,7 @@ +@@ -1289,7 +1049,7 @@ void POA_IR::_TAO_Contained_ThruPOA_Proxy_Impl::move ( CORBA_Object *_collocated_tao_target_, @@ -668,7 +813,7 @@ const char * new_name, const char * new_version, CORBA::Environment &ACE_TRY_ENV -@@ -1337,7 +1345,7 @@ +@@ -1335,7 +1095,7 @@ // copy ctor POA_IR::Contained::Contained (const Contained& rhs) @@ -677,80 +822,999 @@ TAO_ServantBase (rhs) {} -@@ -1832,7 +1840,7 @@ +@@ -1346,806 +1106,268 @@ + + void POA_IR::Contained::_get_id_skel ( + TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, ++ void *_tao_object_reference, ++ void * /* context */, + CORBA::Environment &ACE_TRY_ENV +- ) ++) { POA_IR::Contained *_tao_impl = (POA_IR::Contained *)_tao_object_reference; - -- IR::Container_var _tao_retval; + + CORBA::String_var _tao_retval; + +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::Contained::TAO_ServerRequestInfo_IR_Contained_id_get ri ( +- _tao_server_request, +- _tao_impl +- , ++ _tao_retval = _tao_impl->id ( + ACE_TRY_ENV + ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->id ( +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- char * _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; ++ + ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); ++ ++ _tao_server_request.init_reply (); + TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); + if (!( + (_tao_out << _tao_retval.in ()) + )) +- ACE_THROW (CORBA::MARSHAL()); +- ++ ACE_THROW (CORBA::MARSHAL () ); + } + + void POA_IR::Contained::_set_id_skel ( + TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, ++ void *_tao_object_reference, ++ void * /* context */, + CORBA::Environment &ACE_TRY_ENV +- ) ++) + { + TAO_InputCDR &_tao_in = _tao_server_request.incoming (); + POA_IR::Contained *_tao_impl = (POA_IR::Contained *)_tao_object_reference; + +-_tao_server_request.argument_flag (0); +- CORBA::String_var id; ++ CORBA::String_var id; + if (!( + (_tao_in >> id.out ()) + )) +- ACE_THROW (CORBA::MARSHAL()); ++ ACE_THROW (CORBA::MARSHAL () ); + +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::Contained::TAO_ServerRequestInfo_IR_Contained_id_set ri ( +- _tao_server_request, +- _tao_impl +- , ++ _tao_impl->id ( + id.in (), + ACE_TRY_ENV + ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- +- _tao_impl->id ( +- id.in (), +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; ++ + ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); ++ ++ _tao_server_request.init_reply (); + } + + void POA_IR::Contained::_get_name_skel ( + TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, ++ void *_tao_object_reference, ++ void * /* context */, + CORBA::Environment &ACE_TRY_ENV +- ) ++) + { + POA_IR::Contained *_tao_impl = (POA_IR::Contained *)_tao_object_reference; + + CORBA::String_var _tao_retval; + +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::Contained::TAO_ServerRequestInfo_IR_Contained_name_get ri ( +- _tao_server_request, +- _tao_impl +- , ++ _tao_retval = _tao_impl->name ( + ACE_TRY_ENV + ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->name ( +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- char * _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; ++ + ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); ++ ++ _tao_server_request.init_reply (); + TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); + if (!( + (_tao_out << _tao_retval.in ()) + )) +- ACE_THROW (CORBA::MARSHAL()); +- ++ ACE_THROW (CORBA::MARSHAL () ); + } + + void POA_IR::Contained::_set_name_skel ( + TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, ++ void *_tao_object_reference, ++ void * /* context */, + CORBA::Environment &ACE_TRY_ENV +- ) ++) + { + TAO_InputCDR &_tao_in = _tao_server_request.incoming (); + POA_IR::Contained *_tao_impl = (POA_IR::Contained *)_tao_object_reference; + +-_tao_server_request.argument_flag (0); +- CORBA::String_var name; ++ CORBA::String_var name; + if (!( + (_tao_in >> name.out ()) + )) +- ACE_THROW (CORBA::MARSHAL()); ++ ACE_THROW (CORBA::MARSHAL () ); + +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::Contained::TAO_ServerRequestInfo_IR_Contained_name_set ri ( +- _tao_server_request, +- _tao_impl +- , ++ _tao_impl->name ( + name.in (), + ACE_TRY_ENV + ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- +- _tao_impl->name ( +- name.in (), +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; ++ + ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); ++ ++ _tao_server_request.init_reply (); + } + + void POA_IR::Contained::_get_version_skel ( + TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, ++ void *_tao_object_reference, ++ void * /* context */, + CORBA::Environment &ACE_TRY_ENV +- ) ++) + { + POA_IR::Contained *_tao_impl = (POA_IR::Contained *)_tao_object_reference; + + CORBA::String_var _tao_retval; + +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::Contained::TAO_ServerRequestInfo_IR_Contained_version_get ri ( +- _tao_server_request, +- _tao_impl +- , ++ _tao_retval = _tao_impl->version ( + ACE_TRY_ENV + ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->version ( +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- char * _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; ++ + ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); ++ ++ _tao_server_request.init_reply (); + TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); + if (!( + (_tao_out << _tao_retval.in ()) + )) +- ACE_THROW (CORBA::MARSHAL()); +- ++ ACE_THROW (CORBA::MARSHAL () ); + } + + void POA_IR::Contained::_set_version_skel ( + TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, ++ void *_tao_object_reference, ++ void * /* context */, + CORBA::Environment &ACE_TRY_ENV +- ) ++) + { + TAO_InputCDR &_tao_in = _tao_server_request.incoming (); + POA_IR::Contained *_tao_impl = (POA_IR::Contained *)_tao_object_reference; + +-_tao_server_request.argument_flag (0); +- CORBA::String_var version; ++ CORBA::String_var version; + if (!( + (_tao_in >> version.out ()) + )) +- ACE_THROW (CORBA::MARSHAL()); ++ ACE_THROW (CORBA::MARSHAL () ); + +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::Contained::TAO_ServerRequestInfo_IR_Contained_version_set ri ( +- _tao_server_request, +- _tao_impl +- , ++ _tao_impl->version ( + version.in (), + ACE_TRY_ENV + ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- +- _tao_impl->version ( +- version.in (), +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; ++ + ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); ++ ++ _tao_server_request.init_reply (); + } + + void POA_IR::Contained::_get_defined_in_skel ( + TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, ++ void *_tao_object_reference, ++ void * /* context */, + CORBA::Environment &ACE_TRY_ENV +- ) ++) + { + POA_IR::Contained *_tao_impl = (POA_IR::Contained *)_tao_object_reference; + +- IR::Container_var _tao_retval; + IR_Container_var _tao_retval; - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( -@@ -1859,7 +1867,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::Container_ptr _tao_retval_info = _tao_retval._retn (); -+ IR_Container_ptr _tao_retval_info = _tao_retval._retn (); - ri.result (_tao_retval_info); - _tao_retval = _tao_retval_info; - ri.reply_status (PortableInterceptor::SUCCESSFUL); -@@ -1992,7 +2000,7 @@ +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::Contained::TAO_ServerRequestInfo_IR_Contained_defined_in_get ri ( +- _tao_server_request, +- _tao_impl +- , ++ _tao_retval = _tao_impl->defined_in ( + ACE_TRY_ENV + ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->defined_in ( +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::Container_ptr _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; ++ + ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); ++ ++ _tao_server_request.init_reply (); + TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); + if (!( + (_tao_out << _tao_retval.in ()) + )) +- ACE_THROW (CORBA::MARSHAL()); +- ++ ACE_THROW (CORBA::MARSHAL () ); + } + + void POA_IR::Contained::_get_absolute_name_skel ( + TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, ++ void *_tao_object_reference, ++ void * /* context */, + CORBA::Environment &ACE_TRY_ENV +- ) ++) { POA_IR::Contained *_tao_impl = (POA_IR::Contained *)_tao_object_reference; - -- IR::Repository_var _tao_retval; + + CORBA::String_var _tao_retval; + +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::Contained::TAO_ServerRequestInfo_IR_Contained_absolute_name_get ri ( +- _tao_server_request, +- _tao_impl +- , ++ _tao_retval = _tao_impl->absolute_name ( + ACE_TRY_ENV + ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->absolute_name ( +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- char * _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; ++ + ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); ++ ++ _tao_server_request.init_reply (); + TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); + if (!( + (_tao_out << _tao_retval.in ()) + )) +- ACE_THROW (CORBA::MARSHAL()); +- ++ ACE_THROW (CORBA::MARSHAL () ); + } + + void POA_IR::Contained::_get_containing_repository_skel ( + TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, ++ void *_tao_object_reference, ++ void * /* context */, + CORBA::Environment &ACE_TRY_ENV +- ) ++) + { + POA_IR::Contained *_tao_impl = (POA_IR::Contained *)_tao_object_reference; + +- IR::Repository_var _tao_retval; + IR_Repository_var _tao_retval; - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( -@@ -2019,7 +2027,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::Repository_ptr _tao_retval_info = _tao_retval._retn (); -+ IR_Repository_ptr _tao_retval_info = _tao_retval._retn (); - ri.result (_tao_retval_info); - _tao_retval = _tao_retval_info; - ri.reply_status (PortableInterceptor::SUCCESSFUL); -@@ -2072,7 +2080,7 @@ +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::Contained::TAO_ServerRequestInfo_IR_Contained_containing_repository_get ri ( +- _tao_server_request, +- _tao_impl +- , ++ _tao_retval = _tao_impl->containing_repository ( + ACE_TRY_ENV + ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->containing_repository ( +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::Repository_ptr _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; ++ + ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); ++ ++ _tao_server_request.init_reply (); + TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); + if (!( + (_tao_out << _tao_retval.in ()) + )) +- ACE_THROW (CORBA::MARSHAL()); +- ++ ACE_THROW (CORBA::MARSHAL () ); + } + + void POA_IR::Contained::describe_skel ( + TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, ++ void *_tao_object_reference, ++ void * /* context */, + CORBA::Environment &ACE_TRY_ENV +- ) ++) { POA_IR::Contained *_tao_impl = (POA_IR::Contained *)_tao_object_reference; - -- IR::Contained::Description_var _tao_retval; + +- IR::Contained::Description_var _tao_retval; + IR_Contained::Description_var _tao_retval; - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( -@@ -2099,7 +2107,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::Contained::Description * _tao_retval_info = _tao_retval._retn (); -+ IR_Contained::Description * _tao_retval_info = _tao_retval._retn (); - ri.result (_tao_retval_info); - _tao_retval = _tao_retval_info; - ri.reply_status (PortableInterceptor::SUCCESSFUL); -@@ -2154,7 +2162,7 @@ +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::Contained::TAO_ServerRequestInfo_IR_Contained_describe ri ( +- _tao_server_request, +- _tao_impl +- , ++ _tao_retval = _tao_impl->describe ( + ACE_TRY_ENV + ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->describe ( +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::Contained::Description * _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; ++ + ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); ++ ++ _tao_server_request.init_reply (); + TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); + if (!( + (_tao_out << _tao_retval.in ()) + )) +- ACE_THROW (CORBA::MARSHAL()); +- ++ ACE_THROW (CORBA::MARSHAL () ); + } + + void POA_IR::Contained::move_skel ( + TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, ++ void *_tao_object_reference, ++ void * /* context */, + CORBA::Environment &ACE_TRY_ENV +- ) ++) + { + TAO_InputCDR &_tao_in = _tao_server_request.incoming (); POA_IR::Contained *_tao_impl = (POA_IR::Contained *)_tao_object_reference; - - _tao_server_request.argument_flag (0); + +-_tao_server_request.argument_flag (0); - IR::Container_var new_container; -+ IR_Container_var new_container; ++ IR_Container_var new_container; CORBA::String_var new_name; CORBA::String_var new_version; if (!( -@@ -2241,7 +2249,7 @@ +@@ -2153,76 +1375,22 @@ + (_tao_in >> new_name.out ()) && + (_tao_in >> new_version.out ()) + )) +- ACE_THROW (CORBA::MARSHAL()); ++ ACE_THROW (CORBA::MARSHAL () ); + +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::Contained::TAO_ServerRequestInfo_IR_Contained_move ri ( +- _tao_server_request, +- _tao_impl +- , ++ _tao_impl->move ( + new_container.in (), + new_name.in (), + new_version.in (), + ACE_TRY_ENV + ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- +- _tao_impl->move ( +- new_container.in (), +- new_name.in (), +- new_version.in (), +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; ++ + ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); ++ ++ _tao_server_request.init_reply (); + } + + void POA_IR::Contained::_is_a_skel ( +- TAO_ServerRequest &_tao_server_request, ++ TAO_ServerRequest &_tao_server_request, + void * _tao_object_reference, + void * /* context */, + CORBA::Environment &ACE_TRY_ENV +@@ -2232,20 +1400,20 @@ POA_IR::Contained *_tao_impl = (POA_IR::Contained *) _tao_object_reference; CORBA::Boolean _tao_retval = 0; CORBA::String_var value; - if (!(_tao_in >> value.out ())) + if (!((_tao_in >> value.out ()))) ACE_THROW (CORBA::MARSHAL ()); - +- ++ _tao_retval = _tao_impl->_is_a (value.in (), ACE_TRY_ENV); -@@ -2249,7 +2257,7 @@ - + ACE_CHECK; +- ++ _tao_server_request.init_reply (); TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); - if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) @@ -758,8 +1822,18 @@ ACE_THROW (CORBA::MARSHAL ()); } -@@ -2266,7 +2274,7 @@ - + void POA_IR::Contained::_non_existent_skel ( +- TAO_ServerRequest &_tao_server_request, ++ TAO_ServerRequest &_tao_server_request, + void * _tao_object_reference, + void * /* context */, + CORBA::Environment &ACE_TRY_ENV +@@ -2254,10 +1422,10 @@ + POA_IR::Contained *_tao_impl = (POA_IR::Contained *) _tao_object_reference; + CORBA::Boolean _tao_retval = _tao_impl->_non_existent (ACE_TRY_ENV); + ACE_CHECK; +- ++ _tao_server_request.init_reply (); TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); - if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) @@ -767,7 +1841,7 @@ ACE_THROW (CORBA::MARSHAL ()); } -@@ -2291,7 +2299,7 @@ +@@ -2282,7 +1450,7 @@ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Contained:1.0") == 0) return ACE_static_cast (POA_IR::Contained_ptr, this); if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/IRObject:1.0") == 0) @@ -776,16 +1850,7 @@ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/Object:1.0") == 0) return ACE_static_cast(PortableServer::Servant, this); return 0; -@@ -2307,7 +2315,7 @@ - return "IDL:omg.org/IR/Contained:1.0"; - } - --IR::Contained* -+IR_Contained* - POA_IR::Contained::_this (CORBA_Environment &ACE_TRY_ENV) - { - TAO_Stub *stub = this->_create_stub (ACE_TRY_ENV); -@@ -2321,10 +2329,9 @@ +@@ -2312,5350 +1480,3829 @@ ACE_NEW_RETURN (tmp, CORBA::Object (stub, 0, this), 0); CORBA::Object_var obj = tmp; @@ -794,1386 +1859,9155 @@ } - - #if (TAO_HAS_INTERCEPTORS == 1) - POA_IR::Contained::TAO_ServerRequestInfo_IR_Contained_id_get::TAO_ServerRequestInfo_IR_Contained_id_get ( - TAO_ServerRequest &_tao_server_request, -@@ -3073,7 +3080,7 @@ - POA_IR::Contained::TAO_ServerRequestInfo_IR_Contained_move::TAO_ServerRequestInfo_IR_Contained_move ( - TAO_ServerRequest &_tao_server_request, - POA_IR::Contained *tao_impl, -- IR::Container_ptr new_container, -+ IR_Container_ptr new_container, - const char * new_name, - const char * new_version, - CORBA::Environment & -@@ -3159,6 +3166,7 @@ - } - - #endif /* TAO_HAS_INTERCEPTORS */ -+ - class TAO_IR_Container_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable - { - private: -@@ -3166,7 +3174,7 @@ - public: - const TAO_operation_db_entry * lookup (const char *str, unsigned int len); - }; --/* starting time is 18:47:27 */ +-#if (TAO_HAS_INTERCEPTORS == 1) +-POA_IR::Contained::TAO_ServerRequestInfo_IR_Contained_id_get::TAO_ServerRequestInfo_IR_Contained_id_get ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::Contained *tao_impl +- , +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl) +-{} +- +-Dynamic::ParameterList * +-POA_IR::Contained::TAO_ServerRequestInfo_IR_Contained_id_get::arguments (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++class TAO_IR_Container_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable + { +- // 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 * +-POA_IR::Contained::TAO_ServerRequestInfo_IR_Contained_id_get::exceptions (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++private: ++ unsigned int hash (const char *str, unsigned int len); ++public: ++ const TAO_operation_db_entry * lookup (const char *str, unsigned int len); ++}; +/* starting time is 11:23:09 */ - /* C++ code produced by gperf version 2.8 (ACE version) */ - /* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_Container_Perfect_Hash_OpTable -N lookup */ - unsigned int -@@ -3296,10 +3304,9 @@ - } - return 0; ++/* C++ code produced by gperf version 2.8 (ACE version) */ ++/* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_Container_Perfect_Hash_OpTable -N lookup */ ++unsigned int ++TAO_IR_Container_Perfect_Hash_OpTable::hash (const char *str, unsigned int len) + { +- // 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; ++ static const unsigned char asso_values[] = ++ { ++#if defined (ACE_MVS) ++ 39, 39, 39, 39, 39, 39, 39, 39, 39, 39, ++ 39, 39, 39, 39, 39, 39, 39, 39, 39, 39, ++ 39, 39, 39, 39, 39, 39, 39, 39, 39, 39, ++ 39, 39, 39, 39, 39, 39, 39, 39, 39, 39, ++ 39, 39, 39, 39, 39, 39, 39, 39, 39, 39, ++ 39, 39, 39, 39, 39, 39, 39, 39, 39, 39, ++ 39, 39, 39, 39, 39, 39, 39, 39, 39, 39, ++ 39, 39, 39, 39, 39, 39, 39, 39, 39, 39, ++ 39, 39, 39, 39, 39, 39, 39, 39, 39, 39, ++ 39, 39, 39, 39, 39, 39, 39, 39, 39, 39, ++ 39, 39, 39, 39, 39, 39, 39, 39, 39, 15, ++ 39, 39, 39, 39, 39, 39, 39, 39, 39, 39, ++ 39, 39, 39, 39, 39, 39, 39, 39, 39, 0, ++ 39, 0, 0, 0, 39, 39, 39, 39, 39, 39, ++ 39, 39, 39, 39, 39, 39, 39, 0, 20, 5, ++ 39, 0, 39, 39, 39, 39, 39, 39, 39, 39, ++ 39, 39, 10, 10, 39, 39, 39, 10, 0, 39, ++ 39, 39, 39, 39, 39, 39, 39, 39, 39, 39, ++ 39, 39, 39, 39, 39, 39, 39, 39, 39, 39, ++ 39, 39, 39, 39, 39, 39, 39, 39, 39, 39, ++ 39, 39, 39, 39, 39, 39, 39, 39, 39, 39, ++ 39, 39, 39, 39, 39, 39, 39, 39, 39, 39, ++ 39, 39, 39, 39, 39, 39, 39, 39, 39, 39, ++ 39, 39, 39, 39, 39, 39, 39, 39, 39, 39, ++ 39, 39, 39, 39, 39, 39, 39, 39, 39, 39, ++ 39, 39, 39, 39, 39, 39, ++#else ++ 39, 39, 39, 39, 39, 39, 39, 39, 39, 39, ++ 39, 39, 39, 39, 39, 39, 39, 39, 39, 39, ++ 39, 39, 39, 39, 39, 39, 39, 39, 39, 39, ++ 39, 39, 39, 39, 39, 39, 39, 39, 39, 39, ++ 39, 39, 39, 39, 39, 39, 39, 39, 39, 39, ++ 39, 39, 39, 39, 39, 39, 39, 39, 39, 39, ++ 39, 39, 39, 39, 39, 39, 39, 39, 39, 39, ++ 39, 39, 39, 39, 39, 39, 39, 39, 39, 39, ++ 39, 39, 39, 39, 39, 39, 39, 39, 39, 39, ++ 39, 39, 39, 39, 39, 15, 39, 0, 39, 0, ++ 0, 0, 39, 39, 39, 39, 39, 39, 0, 20, ++ 5, 39, 0, 39, 39, 10, 10, 39, 39, 39, ++ 10, 0, 39, 39, 39, 39, 39, 39, ++#endif /* ACE_MVS */ ++ }; ++ return len + asso_values[str[len - 1]] + asso_values[str[0]]; + } + +-CORBA::Any * +-POA_IR::Contained::TAO_ServerRequestInfo_IR_Contained_id_get::result (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++const class TAO_operation_db_entry * ++TAO_IR_Container_Perfect_Hash_OpTable::lookup (const char *str, unsigned int len) + { +- // 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 (); +-} ++ enum ++ { ++ TOTAL_KEYWORDS = 19, ++ MIN_WORD_LENGTH = 5, ++ MAX_WORD_LENGTH = 17, ++ MIN_HASH_VALUE = 6, ++ MAX_HASH_VALUE = 38, ++ HASH_VALUE_RANGE = 33, ++ DUPLICATES = 2 ++ }; + +-char * +-POA_IR::Contained::TAO_ServerRequestInfo_IR_Contained_id_get::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} ++ static const class TAO_operation_db_entry wordlist[] = ++ { ++ {"",0},{"",0},{"",0},{"",0},{"",0},{"",0}, ++ {"lookup", &POA_IR::Container::lookup_skel}, ++ {"destroy", &POA_IR::Container::destroy_skel}, ++ {"lookup_name", &POA_IR::Container::lookup_name_skel}, ++ {"create_value", &POA_IR::Container::create_value_skel}, ++ {"create_module", &POA_IR::Container::create_module_skel}, ++ {"create_native", &POA_IR::Container::create_native_skel}, ++ {"create_interface", &POA_IR::Container::create_interface_skel}, ++ {"create_union", &POA_IR::Container::create_union_skel}, ++ {"contents", &POA_IR::Container::contents_skel}, ++ {"_is_a", &POA_IR::Container::_is_a_skel}, ++ {"create_exception", &POA_IR::Container::create_exception_skel}, ++ {"create_alias", &POA_IR::Container::create_alias_skel}, ++ {"create_struct", &POA_IR::Container::create_struct_skel}, ++ {"create_constant", &POA_IR::Container::create_constant_skel}, ++ {"create_value_box", &POA_IR::Container::create_value_box_skel}, ++ {"describe_contents", &POA_IR::Container::describe_contents_skel}, ++ {"_get_def_kind", &POA_IR::Container::_get_def_kind_skel}, ++ {"create_enum", &POA_IR::Container::create_enum_skel}, ++ {"_non_existent", &POA_IR::Container::_non_existent_skel}, ++ }; + +-CORBA::Boolean +-POA_IR::Contained::TAO_ServerRequestInfo_IR_Contained_id_get::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} ++ static const signed char lookup[] = ++ { ++ -1, -1, -1, -1, -1, -1, 6, 7, -1, -10, -2, 8, 9, -42, ++ -1, -1, 12, 13, 14, -1, 15, 16, 17, 18, -1, 19, 20, 21, ++ 22, -1, -1, 23, -1, -1, -1, -1, -1, -1, 24, ++ }; + +-void +-POA_IR::Contained::TAO_ServerRequestInfo_IR_Contained_id_get::result (char * result) +-{ +- // Update the result. +- this->_result = result; +-} ++ if (len <= MAX_WORD_LENGTH && len >= MIN_WORD_LENGTH) ++ { ++ unsigned int key = hash (str, len); + +-POA_IR::Contained::TAO_ServerRequestInfo_IR_Contained_id_set::TAO_ServerRequestInfo_IR_Contained_id_set ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::Contained *tao_impl +- , +- const char * id, +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- id_ (id) +-{} ++ if (key <= MAX_HASH_VALUE && key >= MIN_HASH_VALUE) ++ { ++ int slot = lookup[key]; + +-Dynamic::ParameterList * +-POA_IR::Contained::TAO_ServerRequestInfo_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 (); +-} ++ if (slot >= 0 && slot < MAX_HASH_VALUE) ++ { ++ const char *s = wordlist[slot].opname_; + +-Dynamic::ExceptionList * +-POA_IR::Contained::TAO_ServerRequestInfo_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; +-} ++ if (*str == *s && !strncmp (str + 1, s + 1, len - 1)) ++ return &wordlist[slot]; ++ } ++ else if (slot < 0 && slot >= -MAX_HASH_VALUE) ++ return 0; ++ else ++ { ++ unsigned int offset = key + slot + (slot > 0 ? -MAX_HASH_VALUE : MAX_HASH_VALUE); ++ const class TAO_operation_db_entry *base = &wordlist[-lookup[offset]]; ++ const class TAO_operation_db_entry *ptr = base + -lookup[offset + 1]; + +-CORBA::Any * +-POA_IR::Contained::TAO_ServerRequestInfo_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; ++ while (--ptr >= base) ++ if (*str == *ptr->opname_ && !strncmp (str + 1, ptr->opname_ + 1, len - 1)) ++ return ptr; ++ } ++ } ++ } ++ return 0; } --/* ending time is 18:47:27 */ +/* ending time is 11:23:09 */ - static TAO_IR_Container_Perfect_Hash_OpTable tao_IR_Container_optable; ++static TAO_IR_Container_Perfect_Hash_OpTable tao_IR_Container_optable; +-char * +-POA_IR::Contained::TAO_ServerRequestInfo_IR_Contained_id_set::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} ++/////////////////////////////////////////////////////////////////////// ++// Strategized Proxy Broker Implementation ++// + +-CORBA::Boolean +-POA_IR::Contained::TAO_ServerRequestInfo_IR_Contained_id_set::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++// Factory function Implementation. ++POA_IR::_TAO_Container_Strategized_Proxy_Broker *POA_IR::_TAO_Container_Strategized_Proxy_Broker::the_TAO_Container_Strategized_Proxy_Broker (void) + { +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); ++ static POA_IR::_TAO_Container_Strategized_Proxy_Broker strategized_proxy_broker; ++ return &strategized_proxy_broker; + } + +-POA_IR::Contained::TAO_ServerRequestInfo_IR_Contained_name_get::TAO_ServerRequestInfo_IR_Contained_name_get ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::Contained *tao_impl +- , +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl) +-{} - - /////////////////////////////////////////////////////////////////////// - // Strategized Proxy Broker Implementation - // -@@ -3325,9 +3332,9 @@ +-Dynamic::ParameterList * +-POA_IR::Contained::TAO_ServerRequestInfo_IR_Contained_name_get::arguments (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++POA_IR::_TAO_Container_Strategized_Proxy_Broker::_TAO_Container_Strategized_Proxy_Broker (void) + { +- // Generate the argument list on demand. +- Dynamic::ParameterList *parameter_list = +- TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); +- ACE_CHECK_RETURN (0); ++ for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) ++ this->proxy_cache_[i] = 0; +- return parameter_list; } --IR::_TAO_Container_Proxy_Impl& +-Dynamic::ExceptionList * +-POA_IR::Contained::TAO_ServerRequestInfo_IR_Contained_name_get::exceptions (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++POA_IR::_TAO_Container_Strategized_Proxy_Broker::~_TAO_Container_Strategized_Proxy_Broker (void) + { +- // Generate the exception list on demand. +- Dynamic::ExceptionList *exception_list = +- TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); +- ACE_CHECK_RETURN (0); ++ for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) ++ delete this->proxy_cache_[i]; + +- return exception_list; + } + +-CORBA::Any * +-POA_IR::Contained::TAO_ServerRequestInfo_IR_Contained_name_get::result (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +_TAO_Container_Proxy_Impl& - POA_IR::_TAO_Container_Strategized_Proxy_Broker::select_proxy ( -- ::IR::Container *object, ++POA_IR::_TAO_Container_Strategized_Proxy_Broker::select_proxy ( + IR_Container *object, - CORBA::Environment &ACE_TRY_ENV - ) ++ CORBA::Environment &ACE_TRY_ENV ++ ) { -@@ -3359,7 +3366,7 @@ - case TAO_ORB_Core::THRU_POA_STRATEGY: - ACE_NEW_THROW_EX ( - this->proxy_cache_[strategy], -- POA_IR::_TAO_Container_ThruPOA_Proxy_Impl, +- // 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); ++ TAO_ORB_Core::TAO_Collocation_Strategies strategy = ++ TAO_ORB_Core::collocation_strategy (object); + +- CORBA::Any_var safe_result_any = result_any; ++ if (this->proxy_cache_[strategy] != 0) ++ return *this->proxy_cache_[strategy]; + +- (*result_any) <<= this->_result; ++ this->create_proxy (strategy, ACE_TRY_ENV); ++ ACE_CHECK_RETURN (*this->proxy_cache_[strategy]); ++ ++ return *this->proxy_cache_[strategy]; + +- return safe_result_any._retn (); +-} +- +-char * +-POA_IR::Contained::TAO_ServerRequestInfo_IR_Contained_name_get::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::Contained::TAO_ServerRequestInfo_IR_Contained_name_get::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); + } + + void +-POA_IR::Contained::TAO_ServerRequestInfo_IR_Contained_name_get::result (char * result) +-{ +- // Update the result. +- this->_result = result; +-} +- +-POA_IR::Contained::TAO_ServerRequestInfo_IR_Contained_name_set::TAO_ServerRequestInfo_IR_Contained_name_set ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::Contained *tao_impl +- , +- const char * name, +- CORBA::Environment & ++POA_IR::_TAO_Container_Strategized_Proxy_Broker::create_proxy ( ++ TAO_ORB_Core::TAO_Collocation_Strategies strategy, ++ CORBA::Environment &ACE_TRY_ENV + ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- name_ (name) +-{} +- +-Dynamic::ParameterList * +-POA_IR::Contained::TAO_ServerRequestInfo_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 * +-POA_IR::Contained::TAO_ServerRequestInfo_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 * +-POA_IR::Contained::TAO_ServerRequestInfo_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); ++ ACE_GUARD (TAO_SYNCH_MUTEX, guard, this->mutex_); + +- return result_any; +-} +- +-char * +-POA_IR::Contained::TAO_ServerRequestInfo_IR_Contained_name_set::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::Contained::TAO_ServerRequestInfo_IR_Contained_name_set::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); ++ if (this->proxy_cache_[strategy] == 0) ++ { ++ switch (strategy) ++ { ++ case TAO_ORB_Core::THRU_POA_STRATEGY: ++ ACE_NEW_THROW_EX ( ++ this->proxy_cache_[strategy], + _TAO_Container_ThruPOA_Proxy_Impl, - CORBA::NO_MEMORY () - ); - ACE_CHECK; -@@ -3369,7 +3376,7 @@ - default: - ACE_NEW_THROW_EX ( - this->proxy_cache_[strategy], -- ::IR::_TAO_Container_Remote_Proxy_Impl, ++ CORBA::NO_MEMORY () ++ ); ++ ACE_CHECK; ++ break; ++ ++ case TAO_ORB_Core::REMOTE_STRATEGY: ++ default: ++ ACE_NEW_THROW_EX ( ++ this->proxy_cache_[strategy], + _TAO_Container_Remote_Proxy_Impl, - CORBA::NO_MEMORY () - ); - ACE_CHECK; -@@ -3386,26 +3393,26 @@ - /////////////////////////////////////////////////////////////////////// - ++ CORBA::NO_MEMORY () ++ ); ++ ACE_CHECK; ++ break; ++ ++ } ++ ++ } + } + +-POA_IR::Contained::TAO_ServerRequestInfo_IR_Contained_version_get::TAO_ServerRequestInfo_IR_Contained_version_get ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::Contained *tao_impl +- , +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl) +-{} + +-Dynamic::ParameterList * +-POA_IR::Contained::TAO_ServerRequestInfo_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; +-} ++// ++// End Strategized Proxy Broker Implementation ++/////////////////////////////////////////////////////////////////////// ++ --IR::_TAO_Container_Proxy_Broker * --IR__TAO_Container_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) +-Dynamic::ExceptionList * +-POA_IR::Contained::TAO_ServerRequestInfo_IR_Contained_version_get::exceptions (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +_TAO_Container_Proxy_Broker * +_TAO_Container_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) { - ACE_UNUSED_ARG (obj); - return ::POA_IR::_TAO_Container_Strategized_Proxy_Broker::the_TAO_Container_Strategized_Proxy_Broker(); +- // 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; ++ ACE_UNUSED_ARG (obj); ++ return ::POA_IR::_TAO_Container_Strategized_Proxy_Broker::the_TAO_Container_Strategized_Proxy_Broker(); } - int --IR__TAO_Container_Proxy_Broker_Factory_Initializer (long _dummy_) +-CORBA::Any * +-POA_IR::Contained::TAO_ServerRequestInfo_IR_Contained_version_get::result (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++int +_TAO_Container_Proxy_Broker_Factory_Initializer (long _dummy_) { - ACE_UNUSED_ARG (_dummy_); +- // 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; ++ ACE_UNUSED_ARG (_dummy_); -- IR__TAO_Container_Proxy_Broker_Factory_function_pointer = -- IR__TAO_Container_Proxy_Broker_Factory_function; +- (*result_any) <<= this->_result; + _TAO_Container_Proxy_Broker_Factory_function_pointer = + _TAO_Container_Proxy_Broker_Factory_function; - return 0; +- return safe_result_any._retn (); ++ return 0; } --static int IR__TAO_Container_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = -- IR__TAO_Container_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, IR__TAO_Container_Proxy_Broker_Factory_Initializer)); +-char * +-POA_IR::Contained::TAO_ServerRequestInfo_IR_Contained_version_get::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +static int _TAO_Container_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = + _TAO_Container_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, _TAO_Container_Proxy_Broker_Factory_Initializer)); +-CORBA::Boolean +-POA_IR::Contained::TAO_ServerRequestInfo_IR_Contained_version_get::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} - /////////////////////////////////////////////////////////////////////// -@@ -3426,7 +3433,7 @@ - CORBA::SystemException - )) +-void +-POA_IR::Contained::TAO_ServerRequestInfo_IR_Contained_version_get::result (char * result) +-{ +- // Update the result. +- this->_result = result; +-} ++/////////////////////////////////////////////////////////////////////// ++// ThruPOA Proxy Implementation ++// + +-POA_IR::Contained::TAO_ServerRequestInfo_IR_Contained_version_set::TAO_ServerRequestInfo_IR_Contained_version_set ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::Contained *tao_impl +- , +- const char * version, +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- version_ (version) ++POA_IR::_TAO_Container_ThruPOA_Proxy_Impl::_TAO_Container_ThruPOA_Proxy_Impl (void) + {} + +-Dynamic::ParameterList * +-POA_IR::Contained::TAO_ServerRequestInfo_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 * +-POA_IR::Contained::TAO_ServerRequestInfo_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 * +-POA_IR::Contained::TAO_ServerRequestInfo_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; +-} +- +-char * +-POA_IR::Contained::TAO_ServerRequestInfo_IR_Contained_version_set::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} ++POA_IR::_TAO_Container_ThruPOA_Proxy_Impl::~_TAO_Container_ThruPOA_Proxy_Impl (void) ++{} + +-CORBA::Boolean +-POA_IR::Contained::TAO_ServerRequestInfo_IR_Contained_version_set::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} ++// ThruPOA Implementation of the IDL interface methods + +-POA_IR::Contained::TAO_ServerRequestInfo_IR_Contained_defined_in_get::TAO_ServerRequestInfo_IR_Contained_defined_in_get ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::Contained *tao_impl +- , +- CORBA::Environment & ++IR::Contained_ptr POA_IR::_TAO_Container_ThruPOA_Proxy_Impl::lookup ( ++ CORBA_Object *_collocated_tao_target_, ++ const char * search_name, ++ CORBA::Environment &ACE_TRY_ENV + ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl) +-{} +- +-Dynamic::ParameterList * +-POA_IR::Contained::TAO_ServerRequestInfo_IR_Contained_defined_in_get::arguments (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++ 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; ++ IR_Contained_var _tao_retval; ++ ACE_UNUSED_ARG (_tao_retval); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "lookup", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK_RETURN (0); ++ return ACE_reinterpret_cast ( ++ POA_IR::Container_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/Container:1.0" ++ ) ++ )->lookup ( ++ search_name, ++ ACE_TRY_ENV ++ ); + } + +-Dynamic::ExceptionList * +-POA_IR::Contained::TAO_ServerRequestInfo_IR_Contained_defined_in_get::exceptions (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++IR::ContainedSeq * POA_IR::_TAO_Container_ThruPOA_Proxy_Impl::contents ( ++ CORBA_Object *_collocated_tao_target_, ++ IR_DefinitionKind limit_type, ++ CORBA::Boolean exclude_inherited, ++ 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; ++ IR_ContainedSeq_var _tao_retval; ++ ACE_UNUSED_ARG (_tao_retval); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "contents", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK_RETURN (0); ++ return ACE_reinterpret_cast ( ++ POA_IR::Container_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/Container:1.0" ++ ) ++ )->contents ( ++ limit_type, ++ exclude_inherited, ++ ACE_TRY_ENV ++ ); + } + +-CORBA::Any * +-POA_IR::Contained::TAO_ServerRequestInfo_IR_Contained_defined_in_get::result (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++IR::ContainedSeq * POA_IR::_TAO_Container_ThruPOA_Proxy_Impl::lookup_name ( ++ CORBA_Object *_collocated_tao_target_, ++ const char * search_name, ++ CORBA::Long levels_to_search, ++ IR_DefinitionKind limit_type, ++ CORBA::Boolean exclude_inherited, ++ 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 (); ++ IR_ContainedSeq_var _tao_retval; ++ ACE_UNUSED_ARG (_tao_retval); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "lookup_name", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK_RETURN (0); ++ return ACE_reinterpret_cast ( ++ POA_IR::Container_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/Container:1.0" ++ ) ++ )->lookup_name ( ++ search_name, ++ levels_to_search, ++ limit_type, ++ exclude_inherited, ++ ACE_TRY_ENV ++ ); + } + +-char * +-POA_IR::Contained::TAO_ServerRequestInfo_IR_Contained_defined_in_get::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++IR::Container::DescriptionSeq * POA_IR::_TAO_Container_ThruPOA_Proxy_Impl::describe_contents ( ++ CORBA_Object *_collocated_tao_target_, ++ IR_DefinitionKind limit_type, ++ CORBA::Boolean exclude_inherited, ++ CORBA::Long max_returned_objs, ++ CORBA::Environment &ACE_TRY_ENV ++ ) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException ++ )) + { +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); ++ IR_Container::DescriptionSeq_var _tao_retval; ++ ACE_UNUSED_ARG (_tao_retval); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "describe_contents", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK_RETURN (0); ++ return ACE_reinterpret_cast ( ++ POA_IR::Container_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/Container:1.0" ++ ) ++ )->describe_contents ( ++ limit_type, ++ exclude_inherited, ++ max_returned_objs, ++ ACE_TRY_ENV ++ ); + } + +-CORBA::Boolean +-POA_IR::Contained::TAO_ServerRequestInfo_IR_Contained_defined_in_get::target_is_a ( ++IR::ModuleDef_ptr POA_IR::_TAO_Container_ThruPOA_Proxy_Impl::create_module ( ++ CORBA_Object *_collocated_tao_target_, + const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++ const char * name, ++ const char * version, ++ CORBA::Environment &ACE_TRY_ENV ++ ) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException ++ )) + { +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); ++ IR_ModuleDef_var _tao_retval; ++ ACE_UNUSED_ARG (_tao_retval); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "create_module", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK_RETURN (0); ++ return ACE_reinterpret_cast ( ++ POA_IR::Container_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/Container:1.0" ++ ) ++ )->create_module ( ++ id, ++ name, ++ version, ++ ACE_TRY_ENV ++ ); + } + +-void +-POA_IR::Contained::TAO_ServerRequestInfo_IR_Contained_defined_in_get::result (IR::Container_ptr result) +-{ +- // Update the result. +- this->_result = result; +-} +- +-POA_IR::Contained::TAO_ServerRequestInfo_IR_Contained_absolute_name_get::TAO_ServerRequestInfo_IR_Contained_absolute_name_get ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::Contained *tao_impl +- , +- CORBA::Environment & ++IR::ConstantDef_ptr POA_IR::_TAO_Container_ThruPOA_Proxy_Impl::create_constant ( ++ CORBA_Object *_collocated_tao_target_, ++ const char * id, ++ const char * name, ++ const char * version, ++ IR_IDLType_ptr type, ++ const CORBA::Any & value, ++ CORBA::Environment &ACE_TRY_ENV + ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl) +-{} +- +-Dynamic::ParameterList * +-POA_IR::Contained::TAO_ServerRequestInfo_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 * +-POA_IR::Contained::TAO_ServerRequestInfo_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 * +-POA_IR::Contained::TAO_ServerRequestInfo_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 (); +-} +- +-char * +-POA_IR::Contained::TAO_ServerRequestInfo_IR_Contained_absolute_name_get::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException ++ )) + { +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); ++ IR_ConstantDef_var _tao_retval; ++ ACE_UNUSED_ARG (_tao_retval); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "create_constant", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK_RETURN (0); ++ return ACE_reinterpret_cast ( ++ POA_IR::Container_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/Container:1.0" ++ ) ++ )->create_constant ( ++ id, ++ name, ++ version, ++ type, ++ value, ++ ACE_TRY_ENV ++ ); + } + +-CORBA::Boolean +-POA_IR::Contained::TAO_ServerRequestInfo_IR_Contained_absolute_name_get::target_is_a ( ++IR::StructDef_ptr POA_IR::_TAO_Container_ThruPOA_Proxy_Impl::create_struct ( ++ CORBA_Object *_collocated_tao_target_, + const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-void +-POA_IR::Contained::TAO_ServerRequestInfo_IR_Contained_absolute_name_get::result (char * result) ++ const char * name, ++ const char * version, ++ const IR_StructMemberSeq & members, ++ CORBA::Environment &ACE_TRY_ENV ++ ) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException ++ )) + { +- // Update the result. +- this->_result = result; ++ IR_StructDef_var _tao_retval; ++ ACE_UNUSED_ARG (_tao_retval); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "create_struct", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK_RETURN (0); ++ return ACE_reinterpret_cast ( ++ POA_IR::Container_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/Container:1.0" ++ ) ++ )->create_struct ( ++ id, ++ name, ++ version, ++ members, ++ ACE_TRY_ENV ++ ); + } + +-POA_IR::Contained::TAO_ServerRequestInfo_IR_Contained_containing_repository_get::TAO_ServerRequestInfo_IR_Contained_containing_repository_get ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::Contained *tao_impl +- , +- CORBA::Environment & ++IR::UnionDef_ptr POA_IR::_TAO_Container_ThruPOA_Proxy_Impl::create_union ( ++ CORBA_Object *_collocated_tao_target_, ++ const char * id, ++ const char * name, ++ const char * version, ++ IR_IDLType_ptr discriminator_type, ++ const IR_UnionMemberSeq & members, ++ CORBA::Environment &ACE_TRY_ENV + ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl) +-{} +- +-Dynamic::ParameterList * +-POA_IR::Contained::TAO_ServerRequestInfo_IR_Contained_containing_repository_get::arguments (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++ 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; ++ IR_UnionDef_var _tao_retval; ++ ACE_UNUSED_ARG (_tao_retval); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "create_union", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK_RETURN (0); ++ return ACE_reinterpret_cast ( ++ POA_IR::Container_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/Container:1.0" ++ ) ++ )->create_union ( ++ id, ++ name, ++ version, ++ discriminator_type, ++ members, ++ ACE_TRY_ENV ++ ); + } + +-Dynamic::ExceptionList * +-POA_IR::Contained::TAO_ServerRequestInfo_IR_Contained_containing_repository_get::exceptions (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++IR::EnumDef_ptr POA_IR::_TAO_Container_ThruPOA_Proxy_Impl::create_enum ( ++ CORBA_Object *_collocated_tao_target_, ++ const char * id, ++ const char * name, ++ const char * version, ++ const IR_EnumMemberSeq & members, ++ 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; ++ IR_EnumDef_var _tao_retval; ++ ACE_UNUSED_ARG (_tao_retval); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "create_enum", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK_RETURN (0); ++ return ACE_reinterpret_cast ( ++ POA_IR::Container_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/Container:1.0" ++ ) ++ )->create_enum ( ++ id, ++ name, ++ version, ++ members, ++ ACE_TRY_ENV ++ ); + } + +-CORBA::Any * +-POA_IR::Contained::TAO_ServerRequestInfo_IR_Contained_containing_repository_get::result (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++IR::AliasDef_ptr POA_IR::_TAO_Container_ThruPOA_Proxy_Impl::create_alias ( ++ CORBA_Object *_collocated_tao_target_, ++ const char * id, ++ const char * name, ++ const char * version, ++ IR_IDLType_ptr original_type, ++ 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 (); ++ IR_AliasDef_var _tao_retval; ++ ACE_UNUSED_ARG (_tao_retval); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "create_alias", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK_RETURN (0); ++ return ACE_reinterpret_cast ( ++ POA_IR::Container_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/Container:1.0" ++ ) ++ )->create_alias ( ++ id, ++ name, ++ version, ++ original_type, ++ ACE_TRY_ENV ++ ); + } + +-char * +-POA_IR::Contained::TAO_ServerRequestInfo_IR_Contained_containing_repository_get::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++IR::InterfaceDef_ptr POA_IR::_TAO_Container_ThruPOA_Proxy_Impl::create_interface ( ++ CORBA_Object *_collocated_tao_target_, ++ const char * id, ++ const char * name, ++ const char * version, ++ const IR_InterfaceDefSeq & base_interfaces, ++ CORBA::Boolean is_abstract, ++ CORBA::Boolean is_local, ++ CORBA::Environment &ACE_TRY_ENV ++ ) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException ++ )) + { +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); ++ IR_InterfaceDef_var _tao_retval; ++ ACE_UNUSED_ARG (_tao_retval); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "create_interface", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK_RETURN (0); ++ return ACE_reinterpret_cast ( ++ POA_IR::Container_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/Container:1.0" ++ ) ++ )->create_interface ( ++ id, ++ name, ++ version, ++ base_interfaces, ++ is_abstract, ++ is_local, ++ ACE_TRY_ENV ++ ); + } + +-CORBA::Boolean +-POA_IR::Contained::TAO_ServerRequestInfo_IR_Contained_containing_repository_get::target_is_a ( ++IR::ValueDef_ptr POA_IR::_TAO_Container_ThruPOA_Proxy_Impl::create_value ( ++ CORBA_Object *_collocated_tao_target_, + const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++ const char * name, ++ const char * version, ++ CORBA::Boolean is_custom, ++ CORBA::Boolean is_abstract, ++ IR_ValueDef_ptr base_value, ++ CORBA::Boolean is_truncatable, ++ const IR_ValueDefSeq & abstract_base_values, ++ const IR_InterfaceDefSeq & supported_interfaces, ++ const IR_InitializerSeq & initializers, ++ CORBA::Environment &ACE_TRY_ENV ++ ) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException ++ )) + { +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); ++ IR_ValueDef_var _tao_retval; ++ ACE_UNUSED_ARG (_tao_retval); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "create_value", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK_RETURN (0); ++ return ACE_reinterpret_cast ( ++ POA_IR::Container_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/Container:1.0" ++ ) ++ )->create_value ( ++ id, ++ name, ++ version, ++ is_custom, ++ is_abstract, ++ base_value, ++ is_truncatable, ++ abstract_base_values, ++ supported_interfaces, ++ initializers, ++ ACE_TRY_ENV ++ ); + } + +-void +-POA_IR::Contained::TAO_ServerRequestInfo_IR_Contained_containing_repository_get::result (IR::Repository_ptr result) ++IR::ValueBoxDef_ptr POA_IR::_TAO_Container_ThruPOA_Proxy_Impl::create_value_box ( ++ CORBA_Object *_collocated_tao_target_, ++ const char * id, ++ const char * name, ++ const char * version, ++ IR_IDLType_ptr original_type_def, ++ CORBA::Environment &ACE_TRY_ENV ++ ) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException ++ )) + { +- // Update the result. +- this->_result = result; ++ IR_ValueBoxDef_var _tao_retval; ++ ACE_UNUSED_ARG (_tao_retval); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "create_value_box", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK_RETURN (0); ++ return ACE_reinterpret_cast ( ++ POA_IR::Container_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/Container:1.0" ++ ) ++ )->create_value_box ( ++ id, ++ name, ++ version, ++ original_type_def, ++ ACE_TRY_ENV ++ ); + } + +-POA_IR::Contained::TAO_ServerRequestInfo_IR_Contained_describe::TAO_ServerRequestInfo_IR_Contained_describe ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::Contained *tao_impl +- , +- CORBA::Environment & ++IR::ExceptionDef_ptr POA_IR::_TAO_Container_ThruPOA_Proxy_Impl::create_exception ( ++ CORBA_Object *_collocated_tao_target_, ++ const char * id, ++ const char * name, ++ const char * version, ++ const IR_StructMemberSeq & members, ++ CORBA::Environment &ACE_TRY_ENV + ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl) +-{} +- +-Dynamic::ParameterList * +-POA_IR::Contained::TAO_ServerRequestInfo_IR_Contained_describe::arguments (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++ 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; ++ IR_ExceptionDef_var _tao_retval; ++ ACE_UNUSED_ARG (_tao_retval); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "create_exception", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK_RETURN (0); ++ return ACE_reinterpret_cast ( ++ POA_IR::Container_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/Container:1.0" ++ ) ++ )->create_exception ( ++ id, ++ name, ++ version, ++ members, ++ ACE_TRY_ENV ++ ); + } + +-Dynamic::ExceptionList * +-POA_IR::Contained::TAO_ServerRequestInfo_IR_Contained_describe::exceptions (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++IR::NativeDef_ptr POA_IR::_TAO_Container_ThruPOA_Proxy_Impl::create_native ( ++ CORBA_Object *_collocated_tao_target_, ++ const char * id, ++ const char * name, ++ const char * version, ++ 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; ++ IR_NativeDef_var _tao_retval; ++ ACE_UNUSED_ARG (_tao_retval); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "create_native", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK_RETURN (0); ++ return ACE_reinterpret_cast ( ++ POA_IR::Container_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/Container:1.0" ++ ) ++ )->create_native ( ++ id, ++ name, ++ version, ++ ACE_TRY_ENV ++ ); + } + +-CORBA::Any * +-POA_IR::Contained::TAO_ServerRequestInfo_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 (); +-} ++// ++// End ThruPOA Proxy Implementation ++/////////////////////////////////////////////////////////////////////// + +-char * +-POA_IR::Contained::TAO_ServerRequestInfo_IR_Contained_describe::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++// skeleton constructor ++POA_IR::Container::Container (void) + { +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); ++ this->optable_ = &tao_IR_Container_optable; + } + +-CORBA::Boolean +-POA_IR::Contained::TAO_ServerRequestInfo_IR_Contained_describe::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} ++// copy ctor ++POA_IR::Container::Container (const Container& rhs) ++ : POA_CORBA_IRObject (rhs), ++ TAO_ServantBase (rhs) ++{} + +-void +-POA_IR::Contained::TAO_ServerRequestInfo_IR_Contained_describe::result (IR::Contained::Description * result) ++// skeleton destructor ++POA_IR::Container::~Container (void) + { +- // Update the result. +- this->_result = result; + } + +-POA_IR::Contained::TAO_ServerRequestInfo_IR_Contained_move::TAO_ServerRequestInfo_IR_Contained_move ( ++void POA_IR::Container::lookup_skel ( + TAO_ServerRequest &_tao_server_request, +- POA_IR::Contained *tao_impl +- , +- IR::Container_ptr new_container, +- const char * new_name, +- const char * new_version, +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- new_container_ (new_container), +- new_name_ (new_name), +- new_version_ (new_version) +-{} +- +-Dynamic::ParameterList * +-POA_IR::Contained::TAO_ServerRequestInfo_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 * +-POA_IR::Contained::TAO_ServerRequestInfo_IR_Contained_move::exceptions (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) + { +- // 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; +-} ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::Container *_tao_impl = (POA_IR::Container *)_tao_object_reference; + +-CORBA::Any * +-POA_IR::Contained::TAO_ServerRequestInfo_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; ++ IR_Contained_var _tao_retval; ++ CORBA::String_var search_name; ++ if (!( ++ (_tao_in >> search_name.out ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); ++ ++ _tao_retval = _tao_impl->lookup ( ++ search_name.in (), ++ ACE_TRY_ENV ++ ); ++ ++ ACE_CHECK; ++ ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!( ++ (_tao_out << _tao_retval.in ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + } + +-char * +-POA_IR::Contained::TAO_ServerRequestInfo_IR_Contained_move::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++void POA_IR::Container::contents_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) + { +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::Container *_tao_impl = (POA_IR::Container *)_tao_object_reference; ++ ++ IR_ContainedSeq_var _tao_retval; ++ IR_DefinitionKind limit_type; ++ CORBA::Boolean exclude_inherited; ++ if (!( ++ (_tao_in >> limit_type) && ++ (_tao_in >> CORBA::Any::to_boolean (exclude_inherited)) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); ++ ++ _tao_retval = _tao_impl->contents ( ++ limit_type, ++ exclude_inherited, ++ ACE_TRY_ENV ++ ); ++ ++ ACE_CHECK; ++ ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!( ++ (_tao_out << _tao_retval.in ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + } + +-CORBA::Boolean +-POA_IR::Contained::TAO_ServerRequestInfo_IR_Contained_move::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++void POA_IR::Container::lookup_name_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) + { +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::Container *_tao_impl = (POA_IR::Container *)_tao_object_reference; ++ ++ IR_ContainedSeq_var _tao_retval; ++ CORBA::String_var search_name; ++ CORBA::Long levels_to_search; ++ IR_DefinitionKind limit_type; ++ CORBA::Boolean exclude_inherited; ++ if (!( ++ (_tao_in >> search_name.out ()) && ++ (_tao_in >> levels_to_search) && ++ (_tao_in >> limit_type) && ++ (_tao_in >> CORBA::Any::to_boolean (exclude_inherited)) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); ++ ++ _tao_retval = _tao_impl->lookup_name ( ++ search_name.in (), ++ levels_to_search, ++ limit_type, ++ exclude_inherited, ++ ACE_TRY_ENV ++ ); ++ ++ ACE_CHECK; ++ ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!( ++ (_tao_out << _tao_retval.in ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + } + +-#endif /* TAO_HAS_INTERCEPTORS */ +-class TAO_IR_Container_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable +-{ +-private: +- unsigned int hash (const char *str, unsigned int len); +-public: +- const TAO_operation_db_entry * lookup (const char *str, unsigned int len); +-}; +-/* starting time is 16:31:12 */ +-/* C++ code produced by gperf version 2.8 (ACE version) */ +-/* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_Container_Perfect_Hash_OpTable -N lookup */ +-unsigned int +-TAO_IR_Container_Perfect_Hash_OpTable::hash (const char *str, unsigned int len) ++void POA_IR::Container::describe_contents_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) + { +- static const unsigned char asso_values[] = +- { +-#if defined (ACE_MVS) +- 39, 39, 39, 39, 39, 39, 39, 39, 39, 39, +- 39, 39, 39, 39, 39, 39, 39, 39, 39, 39, +- 39, 39, 39, 39, 39, 39, 39, 39, 39, 39, +- 39, 39, 39, 39, 39, 39, 39, 39, 39, 39, +- 39, 39, 39, 39, 39, 39, 39, 39, 39, 39, +- 39, 39, 39, 39, 39, 39, 39, 39, 39, 39, +- 39, 39, 39, 39, 39, 39, 39, 39, 39, 39, +- 39, 39, 39, 39, 39, 39, 39, 39, 39, 39, +- 39, 39, 39, 39, 39, 39, 39, 39, 39, 39, +- 39, 39, 39, 39, 39, 39, 39, 39, 39, 39, +- 39, 39, 39, 39, 39, 39, 39, 39, 39, 15, +- 39, 39, 39, 39, 39, 39, 39, 39, 39, 39, +- 39, 39, 39, 39, 39, 39, 39, 39, 39, 0, +- 39, 0, 0, 0, 39, 39, 39, 39, 39, 39, +- 39, 39, 39, 39, 39, 39, 39, 0, 20, 5, +- 39, 0, 39, 39, 39, 39, 39, 39, 39, 39, +- 39, 39, 10, 10, 39, 39, 39, 10, 0, 39, +- 39, 39, 39, 39, 39, 39, 39, 39, 39, 39, +- 39, 39, 39, 39, 39, 39, 39, 39, 39, 39, +- 39, 39, 39, 39, 39, 39, 39, 39, 39, 39, +- 39, 39, 39, 39, 39, 39, 39, 39, 39, 39, +- 39, 39, 39, 39, 39, 39, 39, 39, 39, 39, +- 39, 39, 39, 39, 39, 39, 39, 39, 39, 39, +- 39, 39, 39, 39, 39, 39, 39, 39, 39, 39, +- 39, 39, 39, 39, 39, 39, 39, 39, 39, 39, +- 39, 39, 39, 39, 39, 39, +-#else +- 39, 39, 39, 39, 39, 39, 39, 39, 39, 39, +- 39, 39, 39, 39, 39, 39, 39, 39, 39, 39, +- 39, 39, 39, 39, 39, 39, 39, 39, 39, 39, +- 39, 39, 39, 39, 39, 39, 39, 39, 39, 39, +- 39, 39, 39, 39, 39, 39, 39, 39, 39, 39, +- 39, 39, 39, 39, 39, 39, 39, 39, 39, 39, +- 39, 39, 39, 39, 39, 39, 39, 39, 39, 39, +- 39, 39, 39, 39, 39, 39, 39, 39, 39, 39, +- 39, 39, 39, 39, 39, 39, 39, 39, 39, 39, +- 39, 39, 39, 39, 39, 15, 39, 0, 39, 0, +- 0, 0, 39, 39, 39, 39, 39, 39, 0, 20, +- 5, 39, 0, 39, 39, 10, 10, 39, 39, 39, +- 10, 0, 39, 39, 39, 39, 39, 39, +-#endif /* ACE_MVS */ +- }; +- return len + asso_values[str[len - 1]] + asso_values[str[0]]; +-} ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::Container *_tao_impl = (POA_IR::Container *)_tao_object_reference; + +-const class TAO_operation_db_entry * +-TAO_IR_Container_Perfect_Hash_OpTable::lookup (const char *str, unsigned int len) +-{ +- enum +- { +- TOTAL_KEYWORDS = 19, +- MIN_WORD_LENGTH = 5, +- MAX_WORD_LENGTH = 17, +- MIN_HASH_VALUE = 6, +- MAX_HASH_VALUE = 38, +- HASH_VALUE_RANGE = 33, +- DUPLICATES = 2 +- }; ++ IR_Container::DescriptionSeq_var _tao_retval; ++ IR_DefinitionKind limit_type; ++ CORBA::Boolean exclude_inherited; ++ CORBA::Long max_returned_objs; ++ if (!( ++ (_tao_in >> limit_type) && ++ (_tao_in >> CORBA::Any::to_boolean (exclude_inherited)) && ++ (_tao_in >> max_returned_objs) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + +- static const class TAO_operation_db_entry wordlist[] = +- { +- {"",0},{"",0},{"",0},{"",0},{"",0},{"",0}, +- {"lookup", &POA_IR::Container::lookup_skel}, +- {"destroy", &POA_IR::Container::destroy_skel}, +- {"lookup_name", &POA_IR::Container::lookup_name_skel}, +- {"create_value", &POA_IR::Container::create_value_skel}, +- {"create_module", &POA_IR::Container::create_module_skel}, +- {"create_native", &POA_IR::Container::create_native_skel}, +- {"create_interface", &POA_IR::Container::create_interface_skel}, +- {"create_union", &POA_IR::Container::create_union_skel}, +- {"contents", &POA_IR::Container::contents_skel}, +- {"_is_a", &POA_IR::Container::_is_a_skel}, +- {"create_exception", &POA_IR::Container::create_exception_skel}, +- {"create_alias", &POA_IR::Container::create_alias_skel}, +- {"create_struct", &POA_IR::Container::create_struct_skel}, +- {"create_constant", &POA_IR::Container::create_constant_skel}, +- {"create_value_box", &POA_IR::Container::create_value_box_skel}, +- {"describe_contents", &POA_IR::Container::describe_contents_skel}, +- {"_get_def_kind", &POA_IR::Container::_get_def_kind_skel}, +- {"create_enum", &POA_IR::Container::create_enum_skel}, +- {"_non_existent", &POA_IR::Container::_non_existent_skel}, +- }; ++ _tao_retval = _tao_impl->describe_contents ( ++ limit_type, ++ exclude_inherited, ++ max_returned_objs, ++ ACE_TRY_ENV ++ ); + +- static const signed char lookup[] = +- { +- -1, -1, -1, -1, -1, -1, 6, 7, -1, -10, -2, 8, 9, -42, +- -1, -1, 12, 13, 14, -1, 15, 16, 17, 18, -1, 19, 20, 21, +- 22, -1, -1, 23, -1, -1, -1, -1, -1, -1, 24, +- }; ++ ACE_CHECK; + +- if (len <= MAX_WORD_LENGTH && len >= MIN_WORD_LENGTH) +- { +- unsigned int key = hash (str, len); ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!( ++ (_tao_out << _tao_retval.in ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); ++} + +- if (key <= MAX_HASH_VALUE && key >= MIN_HASH_VALUE) +- { +- int slot = lookup[key]; ++void POA_IR::Container::create_module_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) ++{ ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::Container *_tao_impl = (POA_IR::Container *)_tao_object_reference; + +- if (slot >= 0 && slot < MAX_HASH_VALUE) +- { +- const char *s = wordlist[slot].opname_; ++ IR_ModuleDef_var _tao_retval; ++ CORBA::String_var id; ++ CORBA::String_var name; ++ CORBA::String_var version; ++ if (!( ++ (_tao_in >> id.out ()) && ++ (_tao_in >> name.out ()) && ++ (_tao_in >> version.out ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + +- if (*str == *s && !strncmp (str + 1, s + 1, len - 1)) +- return &wordlist[slot]; +- } +- else if (slot < 0 && slot >= -MAX_HASH_VALUE) +- return 0; +- else +- { +- unsigned int offset = key + slot + (slot > 0 ? -MAX_HASH_VALUE : MAX_HASH_VALUE); +- const class TAO_operation_db_entry *base = &wordlist[-lookup[offset]]; +- const class TAO_operation_db_entry *ptr = base + -lookup[offset + 1]; ++ _tao_retval = _tao_impl->create_module ( ++ id.in (), ++ name.in (), ++ version.in (), ++ ACE_TRY_ENV ++ ); + +- while (--ptr >= base) +- if (*str == *ptr->opname_ && !strncmp (str + 1, ptr->opname_ + 1, len - 1)) +- return ptr; +- } +- } +- } +- return 0; ++ ACE_CHECK; ++ ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!( ++ (_tao_out << _tao_retval.in ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + } +-/* ending time is 16:31:12 */ +-static TAO_IR_Container_Perfect_Hash_OpTable tao_IR_Container_optable; + ++void POA_IR::Container::create_constant_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) ++{ ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::Container *_tao_impl = (POA_IR::Container *)_tao_object_reference; + +-/////////////////////////////////////////////////////////////////////// +-// Strategized Proxy Broker Implementation +-// ++ IR_ConstantDef_var _tao_retval; ++ CORBA::String_var id; ++ CORBA::String_var name; ++ CORBA::String_var version; ++ IR_IDLType_var type; ++ CORBA::Any value; ++ if (!( ++ (_tao_in >> id.out ()) && ++ (_tao_in >> name.out ()) && ++ (_tao_in >> version.out ()) && ++ (_tao_in >> type.out ()) && ++ (_tao_in >> value) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + +-// Factory function Implementation. +-POA_IR::_TAO_Container_Strategized_Proxy_Broker *POA_IR::_TAO_Container_Strategized_Proxy_Broker::the_TAO_Container_Strategized_Proxy_Broker (void) +-{ +- static POA_IR::_TAO_Container_Strategized_Proxy_Broker strategized_proxy_broker; +- return &strategized_proxy_broker; +-} ++ _tao_retval = _tao_impl->create_constant ( ++ id.in (), ++ name.in (), ++ version.in (), ++ type.in (), ++ value, ++ ACE_TRY_ENV ++ ); + +-POA_IR::_TAO_Container_Strategized_Proxy_Broker::_TAO_Container_Strategized_Proxy_Broker (void) +-{ +- for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) +- this->proxy_cache_[i] = 0; +- +-} ++ ACE_CHECK; + +-POA_IR::_TAO_Container_Strategized_Proxy_Broker::~_TAO_Container_Strategized_Proxy_Broker (void) +-{ +- for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) +- delete this->proxy_cache_[i]; +- ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!( ++ (_tao_out << _tao_retval.in ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + } + +-IR::_TAO_Container_Proxy_Impl& +-POA_IR::_TAO_Container_Strategized_Proxy_Broker::select_proxy ( +- ::IR::Container *object, ++void POA_IR::Container::create_struct_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, + CORBA::Environment &ACE_TRY_ENV +- ) ++) { +- TAO_ORB_Core::TAO_Collocation_Strategies strategy = +- TAO_ORB_Core::collocation_strategy (object); +- +- if (this->proxy_cache_[strategy] != 0) +- return *this->proxy_cache_[strategy]; +- +- this->create_proxy (strategy, ACE_TRY_ENV); +- ACE_CHECK_RETURN (*this->proxy_cache_[strategy]); +- +- return *this->proxy_cache_[strategy]; +- ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::Container *_tao_impl = (POA_IR::Container *)_tao_object_reference; ++ ++ IR_StructDef_var _tao_retval; ++ CORBA::String_var id; ++ CORBA::String_var name; ++ CORBA::String_var version; ++ IR_StructMemberSeq members; ++ if (!( ++ (_tao_in >> id.out ()) && ++ (_tao_in >> name.out ()) && ++ (_tao_in >> version.out ()) && ++ (_tao_in >> members) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); ++ ++ _tao_retval = _tao_impl->create_struct ( ++ id.in (), ++ name.in (), ++ version.in (), ++ members, ++ ACE_TRY_ENV ++ ); ++ ++ ACE_CHECK; ++ ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!( ++ (_tao_out << _tao_retval.in ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + } + +-void +-POA_IR::_TAO_Container_Strategized_Proxy_Broker::create_proxy ( +- TAO_ORB_Core::TAO_Collocation_Strategies strategy, ++void POA_IR::Container::create_union_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, + CORBA::Environment &ACE_TRY_ENV +- ) ++) + { +- ACE_GUARD (TAO_SYNCH_MUTEX, guard, this->mutex_); +- +- if (this->proxy_cache_[strategy] == 0) +- { +- switch (strategy) +- { +- case TAO_ORB_Core::THRU_POA_STRATEGY: +- ACE_NEW_THROW_EX ( +- this->proxy_cache_[strategy], +- POA_IR::_TAO_Container_ThruPOA_Proxy_Impl, +- CORBA::NO_MEMORY () +- ); +- ACE_CHECK; +- break; +- +- case TAO_ORB_Core::REMOTE_STRATEGY: +- default: +- ACE_NEW_THROW_EX ( +- this->proxy_cache_[strategy], +- ::IR::_TAO_Container_Remote_Proxy_Impl, +- CORBA::NO_MEMORY () +- ); +- ACE_CHECK; +- break; +- +- } +- +- } +-} ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::Container *_tao_impl = (POA_IR::Container *)_tao_object_reference; + ++ IR_UnionDef_var _tao_retval; ++ CORBA::String_var id; ++ CORBA::String_var name; ++ CORBA::String_var version; ++ IR_IDLType_var discriminator_type; ++ IR_UnionMemberSeq members; ++ if (!( ++ (_tao_in >> id.out ()) && ++ (_tao_in >> name.out ()) && ++ (_tao_in >> version.out ()) && ++ (_tao_in >> discriminator_type.out ()) && ++ (_tao_in >> members) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + +-// +-// End Strategized Proxy Broker Implementation +-/////////////////////////////////////////////////////////////////////// ++ _tao_retval = _tao_impl->create_union ( ++ id.in (), ++ name.in (), ++ version.in (), ++ discriminator_type.in (), ++ members, ++ ACE_TRY_ENV ++ ); + ++ ACE_CHECK; + +-IR::_TAO_Container_Proxy_Broker * +-IR__TAO_Container_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) +-{ +- ACE_UNUSED_ARG (obj); +- return ::POA_IR::_TAO_Container_Strategized_Proxy_Broker::the_TAO_Container_Strategized_Proxy_Broker(); ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!( ++ (_tao_out << _tao_retval.in ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + } + +-int +-IR__TAO_Container_Proxy_Broker_Factory_Initializer (long _dummy_) ++void POA_IR::Container::create_enum_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) + { +- ACE_UNUSED_ARG (_dummy_); +- +- IR__TAO_Container_Proxy_Broker_Factory_function_pointer = +- IR__TAO_Container_Proxy_Broker_Factory_function; +- +- return 0; +-} +- +-static int IR__TAO_Container_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = +- IR__TAO_Container_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, IR__TAO_Container_Proxy_Broker_Factory_Initializer)); +- ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::Container *_tao_impl = (POA_IR::Container *)_tao_object_reference; + +-/////////////////////////////////////////////////////////////////////// +-// ThruPOA Proxy Implementation +-// ++ IR_EnumDef_var _tao_retval; ++ CORBA::String_var id; ++ CORBA::String_var name; ++ CORBA::String_var version; ++ IR_EnumMemberSeq members; ++ if (!( ++ (_tao_in >> id.out ()) && ++ (_tao_in >> name.out ()) && ++ (_tao_in >> version.out ()) && ++ (_tao_in >> members) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + +-POA_IR::_TAO_Container_ThruPOA_Proxy_Impl::_TAO_Container_ThruPOA_Proxy_Impl (void) +-{} ++ _tao_retval = _tao_impl->create_enum ( ++ id.in (), ++ name.in (), ++ version.in (), ++ members, ++ ACE_TRY_ENV ++ ); + +-// ThruPOA Implementation of the IDL interface methods ++ ACE_CHECK; + +-IR::Contained_ptr POA_IR::_TAO_Container_ThruPOA_Proxy_Impl::lookup ( +- CORBA_Object *_collocated_tao_target_, +- const char * search_name, +- CORBA::Environment &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!( ++ (_tao_out << _tao_retval.in ()) + )) +-{ - IR::Contained_var _tao_retval; -+ IR_Contained_var _tao_retval; - ACE_UNUSED_ARG (_tao_retval); - TAO_Object_Adapter::Servant_Upcall servant_upcall ( - _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -3450,9 +3457,9 @@ - ); +- ACE_UNUSED_ARG (_tao_retval); +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "lookup", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK_RETURN (0); +- return ACE_reinterpret_cast ( +- POA_IR::Container_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/Container:1.0" +- ) +- )->lookup ( +- search_name, +- ACE_TRY_ENV +- ); ++ ACE_THROW (CORBA::MARSHAL () ); } -IR::ContainedSeq * POA_IR::_TAO_Container_ThruPOA_Proxy_Impl::contents ( -+IR_ContainedSeq * POA_IR::_TAO_Container_ThruPOA_Proxy_Impl::contents ( - CORBA_Object *_collocated_tao_target_, +- CORBA_Object *_collocated_tao_target_, - IR::DefinitionKind limit_type, -+ IR_DefinitionKind limit_type, - CORBA::Boolean exclude_inherited, +- CORBA::Boolean exclude_inherited, ++void POA_IR::Container::create_alias_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, CORBA::Environment &ACE_TRY_ENV - ) -@@ -3460,7 +3467,7 @@ - CORBA::SystemException - )) +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) ++) { - IR::ContainedSeq_var _tao_retval; -+ IR_ContainedSeq_var _tao_retval; - ACE_UNUSED_ARG (_tao_retval); - TAO_Object_Adapter::Servant_Upcall servant_upcall ( - _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -3485,11 +3492,11 @@ - ); +- ACE_UNUSED_ARG (_tao_retval); +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "contents", +- forward_to.out (), ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::Container *_tao_impl = (POA_IR::Container *)_tao_object_reference; ++ ++ IR_AliasDef_var _tao_retval; ++ CORBA::String_var id; ++ CORBA::String_var name; ++ CORBA::String_var version; ++ IR_IDLType_var original_type; ++ if (!( ++ (_tao_in >> id.out ()) && ++ (_tao_in >> name.out ()) && ++ (_tao_in >> version.out ()) && ++ (_tao_in >> original_type.out ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); ++ ++ _tao_retval = _tao_impl->create_alias ( ++ id.in (), ++ name.in (), ++ version.in (), ++ original_type.in (), + ACE_TRY_ENV + ); +- ACE_CHECK_RETURN (0); +- return ACE_reinterpret_cast ( +- POA_IR::Container_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/Container:1.0" +- ) +- )->contents ( +- limit_type, +- exclude_inherited, +- ACE_TRY_ENV +- ); ++ ++ ACE_CHECK; ++ ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!( ++ (_tao_out << _tao_retval.in ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); } -IR::ContainedSeq * POA_IR::_TAO_Container_ThruPOA_Proxy_Impl::lookup_name ( -+IR_ContainedSeq * POA_IR::_TAO_Container_ThruPOA_Proxy_Impl::lookup_name ( - CORBA_Object *_collocated_tao_target_, - const char * search_name, - CORBA::Long levels_to_search, +- CORBA_Object *_collocated_tao_target_, +- const char * search_name, +- CORBA::Long levels_to_search, - IR::DefinitionKind limit_type, -+ IR_DefinitionKind limit_type, - CORBA::Boolean exclude_inherited, +- CORBA::Boolean exclude_inherited, ++void POA_IR::Container::create_interface_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, CORBA::Environment &ACE_TRY_ENV - ) -@@ -3497,7 +3504,7 @@ - CORBA::SystemException - )) +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) ++) { - IR::ContainedSeq_var _tao_retval; -+ IR_ContainedSeq_var _tao_retval; - ACE_UNUSED_ARG (_tao_retval); - TAO_Object_Adapter::Servant_Upcall servant_upcall ( - _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -3524,9 +3531,9 @@ - ); +- ACE_UNUSED_ARG (_tao_retval); +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "lookup_name", +- forward_to.out (), ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::Container *_tao_impl = (POA_IR::Container *)_tao_object_reference; ++ ++ IR_InterfaceDef_var _tao_retval; ++ CORBA::String_var id; ++ CORBA::String_var name; ++ CORBA::String_var version; ++ IR_InterfaceDefSeq base_interfaces; ++ CORBA::Boolean is_abstract; ++ CORBA::Boolean is_local; ++ if (!( ++ (_tao_in >> id.out ()) && ++ (_tao_in >> name.out ()) && ++ (_tao_in >> version.out ()) && ++ (_tao_in >> base_interfaces) && ++ (_tao_in >> CORBA::Any::to_boolean (is_abstract)) && ++ (_tao_in >> CORBA::Any::to_boolean (is_local)) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); ++ ++ _tao_retval = _tao_impl->create_interface ( ++ id.in (), ++ name.in (), ++ version.in (), ++ base_interfaces, ++ is_abstract, ++ is_local, + ACE_TRY_ENV + ); +- ACE_CHECK_RETURN (0); +- return ACE_reinterpret_cast ( +- POA_IR::Container_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/Container:1.0" +- ) +- )->lookup_name ( +- search_name, +- levels_to_search, +- limit_type, +- exclude_inherited, +- ACE_TRY_ENV +- ); ++ ++ ACE_CHECK; ++ ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!( ++ (_tao_out << _tao_retval.in ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); } -IR::Container::DescriptionSeq * POA_IR::_TAO_Container_ThruPOA_Proxy_Impl::describe_contents ( -+IR_Container::DescriptionSeq * POA_IR::_TAO_Container_ThruPOA_Proxy_Impl::describe_contents ( - CORBA_Object *_collocated_tao_target_, +- CORBA_Object *_collocated_tao_target_, - IR::DefinitionKind limit_type, -+ IR_DefinitionKind limit_type, - CORBA::Boolean exclude_inherited, - CORBA::Long max_returned_objs, - CORBA::Environment &ACE_TRY_ENV -@@ -3535,7 +3542,7 @@ - CORBA::SystemException - )) +- CORBA::Boolean exclude_inherited, +- CORBA::Long max_returned_objs, +- CORBA::Environment &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) ++void POA_IR::Container::create_value_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) { - IR::Container::DescriptionSeq_var _tao_retval; -+ IR_Container::DescriptionSeq_var _tao_retval; - ACE_UNUSED_ARG (_tao_retval); - TAO_Object_Adapter::Servant_Upcall servant_upcall ( - _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -3561,7 +3568,7 @@ - ); +- ACE_UNUSED_ARG (_tao_retval); +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "describe_contents", +- forward_to.out (), ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::Container *_tao_impl = (POA_IR::Container *)_tao_object_reference; ++ ++ IR_ValueDef_var _tao_retval; ++ CORBA::String_var id; ++ CORBA::String_var name; ++ CORBA::String_var version; ++ CORBA::Boolean is_custom; ++ CORBA::Boolean is_abstract; ++ IR_ValueDef_var base_value; ++ CORBA::Boolean is_truncatable; ++ IR_ValueDefSeq abstract_base_values; ++ IR_InterfaceDefSeq supported_interfaces; ++ IR_InitializerSeq initializers; ++ if (!( ++ (_tao_in >> id.out ()) && ++ (_tao_in >> name.out ()) && ++ (_tao_in >> version.out ()) && ++ (_tao_in >> CORBA::Any::to_boolean (is_custom)) && ++ (_tao_in >> CORBA::Any::to_boolean (is_abstract)) && ++ (_tao_in >> base_value.out ()) && ++ (_tao_in >> CORBA::Any::to_boolean (is_truncatable)) && ++ (_tao_in >> abstract_base_values) && ++ (_tao_in >> supported_interfaces) && ++ (_tao_in >> initializers) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); ++ ++ _tao_retval = _tao_impl->create_value ( ++ id.in (), ++ name.in (), ++ version.in (), ++ is_custom, ++ is_abstract, ++ base_value.in (), ++ is_truncatable, ++ abstract_base_values, ++ supported_interfaces, ++ initializers, + ACE_TRY_ENV + ); +- ACE_CHECK_RETURN (0); +- return ACE_reinterpret_cast ( +- POA_IR::Container_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/Container:1.0" +- ) +- )->describe_contents ( +- limit_type, +- exclude_inherited, +- max_returned_objs, +- ACE_TRY_ENV +- ); ++ ++ ACE_CHECK; ++ ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!( ++ (_tao_out << _tao_retval.in ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); } -IR::ModuleDef_ptr POA_IR::_TAO_Container_ThruPOA_Proxy_Impl::create_module ( -+IR_ModuleDef_ptr POA_IR::_TAO_Container_ThruPOA_Proxy_Impl::create_module ( - CORBA_Object *_collocated_tao_target_, - const char * id, - const char * name, -@@ -3572,7 +3579,7 @@ - CORBA::SystemException - )) +- CORBA_Object *_collocated_tao_target_, +- const char * id, +- const char * name, +- const char * version, ++void POA_IR::Container::create_value_box_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, + CORBA::Environment &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) ++) { - IR::ModuleDef_var _tao_retval; -+ IR_ModuleDef_var _tao_retval; - ACE_UNUSED_ARG (_tao_retval); - TAO_Object_Adapter::Servant_Upcall servant_upcall ( - _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -3598,12 +3605,12 @@ - ); +- ACE_UNUSED_ARG (_tao_retval); +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "create_module", +- forward_to.out (), ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::Container *_tao_impl = (POA_IR::Container *)_tao_object_reference; ++ ++ IR_ValueBoxDef_var _tao_retval; ++ CORBA::String_var id; ++ CORBA::String_var name; ++ CORBA::String_var version; ++ IR_IDLType_var original_type_def; ++ if (!( ++ (_tao_in >> id.out ()) && ++ (_tao_in >> name.out ()) && ++ (_tao_in >> version.out ()) && ++ (_tao_in >> original_type_def.out ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); ++ ++ _tao_retval = _tao_impl->create_value_box ( ++ id.in (), ++ name.in (), ++ version.in (), ++ original_type_def.in (), + ACE_TRY_ENV + ); +- ACE_CHECK_RETURN (0); +- return ACE_reinterpret_cast ( +- POA_IR::Container_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/Container:1.0" +- ) +- )->create_module ( +- id, +- name, +- version, +- ACE_TRY_ENV +- ); ++ ++ ACE_CHECK; ++ ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!( ++ (_tao_out << _tao_retval.in ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); } -IR::ConstantDef_ptr POA_IR::_TAO_Container_ThruPOA_Proxy_Impl::create_constant ( -+IR_ConstantDef_ptr POA_IR::_TAO_Container_ThruPOA_Proxy_Impl::create_constant ( - CORBA_Object *_collocated_tao_target_, - const char * id, - const char * name, - const char * version, +- CORBA_Object *_collocated_tao_target_, +- const char * id, +- const char * name, +- const char * version, - IR::IDLType_ptr type, -+ IR_IDLType_ptr type, - const CORBA::Any & value, +- const CORBA::Any & value, ++void POA_IR::Container::create_exception_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, CORBA::Environment &ACE_TRY_ENV - ) -@@ -3611,7 +3618,7 @@ - CORBA::SystemException - )) +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) ++) { - IR::ConstantDef_var _tao_retval; -+ IR_ConstantDef_var _tao_retval; - ACE_UNUSED_ARG (_tao_retval); - TAO_Object_Adapter::Servant_Upcall servant_upcall ( - _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -3639,19 +3646,19 @@ - ); +- ACE_UNUSED_ARG (_tao_retval); +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "create_constant", +- forward_to.out (), ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::Container *_tao_impl = (POA_IR::Container *)_tao_object_reference; ++ ++ IR_ExceptionDef_var _tao_retval; ++ CORBA::String_var id; ++ CORBA::String_var name; ++ CORBA::String_var version; ++ IR_StructMemberSeq members; ++ if (!( ++ (_tao_in >> id.out ()) && ++ (_tao_in >> name.out ()) && ++ (_tao_in >> version.out ()) && ++ (_tao_in >> members) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); ++ ++ _tao_retval = _tao_impl->create_exception ( ++ id.in (), ++ name.in (), ++ version.in (), ++ members, + ACE_TRY_ENV + ); +- ACE_CHECK_RETURN (0); +- return ACE_reinterpret_cast ( +- POA_IR::Container_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/Container:1.0" +- ) +- )->create_constant ( +- id, +- name, +- version, +- type, +- value, +- ACE_TRY_ENV +- ); ++ ++ ACE_CHECK; ++ ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!( ++ (_tao_out << _tao_retval.in ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); } -IR::StructDef_ptr POA_IR::_TAO_Container_ThruPOA_Proxy_Impl::create_struct ( -+IR_StructDef_ptr POA_IR::_TAO_Container_ThruPOA_Proxy_Impl::create_struct ( - CORBA_Object *_collocated_tao_target_, - const char * id, - const char * name, - const char * version, +- CORBA_Object *_collocated_tao_target_, +- const char * id, +- const char * name, +- const char * version, - const IR::StructMemberSeq & members, -+ const IR_StructMemberSeq & members, ++void POA_IR::Container::create_native_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, CORBA::Environment &ACE_TRY_ENV - ) - ACE_THROW_SPEC (( - CORBA::SystemException - )) +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) ++) { - IR::StructDef_var _tao_retval; -+ IR_StructDef_var _tao_retval; - ACE_UNUSED_ARG (_tao_retval); - TAO_Object_Adapter::Servant_Upcall servant_upcall ( - _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -3678,20 +3685,20 @@ - ); +- ACE_UNUSED_ARG (_tao_retval); +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "create_struct", +- forward_to.out (), ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::Container *_tao_impl = (POA_IR::Container *)_tao_object_reference; ++ ++ IR_NativeDef_var _tao_retval; ++ CORBA::String_var id; ++ CORBA::String_var name; ++ CORBA::String_var version; ++ if (!( ++ (_tao_in >> id.out ()) && ++ (_tao_in >> name.out ()) && ++ (_tao_in >> version.out ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); ++ ++ _tao_retval = _tao_impl->create_native ( ++ id.in (), ++ name.in (), ++ version.in (), + ACE_TRY_ENV + ); +- ACE_CHECK_RETURN (0); +- return ACE_reinterpret_cast ( +- POA_IR::Container_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/Container:1.0" +- ) +- )->create_struct ( +- id, +- name, +- version, +- members, +- ACE_TRY_ENV +- ); ++ ++ ACE_CHECK; ++ ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!( ++ (_tao_out << _tao_retval.in ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); } -IR::UnionDef_ptr POA_IR::_TAO_Container_ThruPOA_Proxy_Impl::create_union ( -+IR_UnionDef_ptr POA_IR::_TAO_Container_ThruPOA_Proxy_Impl::create_union ( - CORBA_Object *_collocated_tao_target_, - const char * id, - const char * name, - const char * version, +- CORBA_Object *_collocated_tao_target_, +- const char * id, +- const char * name, +- const char * version, - IR::IDLType_ptr discriminator_type, - const IR::UnionMemberSeq & members, -+ IR_IDLType_ptr discriminator_type, -+ const IR_UnionMemberSeq & members, ++void POA_IR::Container::_is_a_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void * _tao_object_reference, ++ void * /* context */, CORBA::Environment &ACE_TRY_ENV ) - ACE_THROW_SPEC (( - CORBA::SystemException - )) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) { - IR::UnionDef_var _tao_retval; -+ IR_UnionDef_var _tao_retval; - ACE_UNUSED_ARG (_tao_retval); - TAO_Object_Adapter::Servant_Upcall servant_upcall ( - _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -3719,19 +3726,19 @@ - ); +- ACE_UNUSED_ARG (_tao_retval); +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "create_union", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK_RETURN (0); +- return ACE_reinterpret_cast ( +- POA_IR::Container_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/Container:1.0" +- ) +- )->create_union ( +- id, +- name, +- version, +- discriminator_type, +- members, +- ACE_TRY_ENV +- ); ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::Container *_tao_impl = (POA_IR::Container *) _tao_object_reference; ++ CORBA::Boolean _tao_retval = 0; ++ CORBA::String_var value; ++ if (!((_tao_in >> value.out ()))) ++ ACE_THROW (CORBA::MARSHAL ()); ++ ++ _tao_retval = _tao_impl->_is_a (value.in (), ACE_TRY_ENV); ++ ACE_CHECK; ++ ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!((_tao_out << CORBA::Any::from_boolean (_tao_retval)))) ++ ACE_THROW (CORBA::MARSHAL ()); } -IR::EnumDef_ptr POA_IR::_TAO_Container_ThruPOA_Proxy_Impl::create_enum ( -+IR_EnumDef_ptr POA_IR::_TAO_Container_ThruPOA_Proxy_Impl::create_enum ( - CORBA_Object *_collocated_tao_target_, - const char * id, - const char * name, - const char * version, +- CORBA_Object *_collocated_tao_target_, +- const char * id, +- const char * name, +- const char * version, - const IR::EnumMemberSeq & members, -+ const IR_EnumMemberSeq & members, ++void POA_IR::Container::_non_existent_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void * _tao_object_reference, ++ void * /* context */, CORBA::Environment &ACE_TRY_ENV ) - ACE_THROW_SPEC (( - CORBA::SystemException - )) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) { - IR::EnumDef_var _tao_retval; -+ IR_EnumDef_var _tao_retval; - ACE_UNUSED_ARG (_tao_retval); - TAO_Object_Adapter::Servant_Upcall servant_upcall ( - _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -3758,19 +3765,19 @@ - ); +- ACE_UNUSED_ARG (_tao_retval); +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "create_enum", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK_RETURN (0); +- return ACE_reinterpret_cast ( +- POA_IR::Container_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/Container:1.0" +- ) +- )->create_enum ( +- id, +- name, +- version, +- members, +- ACE_TRY_ENV +- ); ++ POA_IR::Container *_tao_impl = (POA_IR::Container *) _tao_object_reference; ++ CORBA::Boolean _tao_retval = _tao_impl->_non_existent (ACE_TRY_ENV); ++ ACE_CHECK; ++ ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!((_tao_out << CORBA::Any::from_boolean (_tao_retval)))) ++ ACE_THROW (CORBA::MARSHAL ()); } -IR::AliasDef_ptr POA_IR::_TAO_Container_ThruPOA_Proxy_Impl::create_alias ( -+IR_AliasDef_ptr POA_IR::_TAO_Container_ThruPOA_Proxy_Impl::create_alias ( - CORBA_Object *_collocated_tao_target_, - const char * id, - const char * name, - const char * version, +- CORBA_Object *_collocated_tao_target_, +- const char * id, +- const char * name, +- const char * version, - IR::IDLType_ptr original_type, -+ IR_IDLType_ptr original_type, ++CORBA::Boolean POA_IR::Container::_is_a ( ++ const char* value, CORBA::Environment &ACE_TRY_ENV ) - ACE_THROW_SPEC (( - CORBA::SystemException - )) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) { - IR::AliasDef_var _tao_retval; -+ IR_AliasDef_var _tao_retval; - ACE_UNUSED_ARG (_tao_retval); - TAO_Object_Adapter::Servant_Upcall servant_upcall ( - _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -3797,12 +3804,12 @@ - ); +- ACE_UNUSED_ARG (_tao_retval); +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "create_alias", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK_RETURN (0); +- return ACE_reinterpret_cast ( +- POA_IR::Container_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/Container:1.0" +- ) +- )->create_alias ( +- id, +- name, +- version, +- original_type, +- ACE_TRY_ENV +- ); ++ if ( ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/Container:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/CORBA/IRObject:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, CORBA::_tc_Object->id (ACE_TRY_ENV)))) ++ return 1; ++ else ++ return 0; } -IR::InterfaceDef_ptr POA_IR::_TAO_Container_ThruPOA_Proxy_Impl::create_interface ( -+IR_InterfaceDef_ptr POA_IR::_TAO_Container_ThruPOA_Proxy_Impl::create_interface ( - CORBA_Object *_collocated_tao_target_, - const char * id, - const char * name, - const char * version, +- CORBA_Object *_collocated_tao_target_, +- const char * id, +- const char * name, +- const char * version, - const IR::InterfaceDefSeq & base_interfaces, -+ const IR_InterfaceDefSeq & base_interfaces, - CORBA::Boolean is_abstract, - CORBA::Boolean is_local, - CORBA::Environment &ACE_TRY_ENV -@@ -3811,7 +3818,7 @@ - CORBA::SystemException - )) +- CORBA::Boolean is_abstract, +- CORBA::Boolean is_local, +- CORBA::Environment &ACE_TRY_ENV ++void* POA_IR::Container::_downcast ( ++ const char* logical_type_id + ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) { - IR::InterfaceDef_var _tao_retval; -+ IR_InterfaceDef_var _tao_retval; - ACE_UNUSED_ARG (_tao_retval); - TAO_Object_Adapter::Servant_Upcall servant_upcall ( - _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -3840,25 +3847,25 @@ - ); +- ACE_UNUSED_ARG (_tao_retval); +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "create_interface", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK_RETURN (0); +- return ACE_reinterpret_cast ( +- POA_IR::Container_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/Container:1.0" +- ) +- )->create_interface ( +- id, +- name, +- version, +- base_interfaces, +- is_abstract, +- is_local, +- ACE_TRY_ENV +- ); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Container:1.0") == 0) ++ return ACE_static_cast (POA_IR::Container_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/IRObject:1.0") == 0) ++ return ACE_static_cast (POA_CORBA_IRObject_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/Object:1.0") == 0) ++ return ACE_static_cast(PortableServer::Servant, this); ++ return 0; } -IR::ValueDef_ptr POA_IR::_TAO_Container_ThruPOA_Proxy_Impl::create_value ( -+IR_ValueDef_ptr POA_IR::_TAO_Container_ThruPOA_Proxy_Impl::create_value ( - CORBA_Object *_collocated_tao_target_, - const char * id, - const char * name, - const char * version, - CORBA::Boolean is_custom, - CORBA::Boolean is_abstract, +- CORBA_Object *_collocated_tao_target_, +- const char * id, +- const char * name, +- const char * version, +- CORBA::Boolean is_custom, +- CORBA::Boolean is_abstract, - IR::ValueDef_ptr base_value, -+ IR_ValueDef_ptr base_value, - CORBA::Boolean is_truncatable, +- CORBA::Boolean is_truncatable, - const IR::ValueDefSeq & abstract_base_values, - const IR::InterfaceDefSeq & supported_interfaces, - const IR::InitializerSeq & initializers, -+ const IR_ValueDefSeq & abstract_base_values, -+ const IR_InterfaceDefSeq & supported_interfaces, -+ const IR_InitializerSeq & initializers, - CORBA::Environment &ACE_TRY_ENV - ) - ACE_THROW_SPEC (( - CORBA::SystemException - )) +- CORBA::Environment &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) ++void POA_IR::Container::_dispatch (TAO_ServerRequest &req, void *context, CORBA::Environment &ACE_TRY_ENV) { - IR::ValueDef_var _tao_retval; -+ IR_ValueDef_var _tao_retval; - ACE_UNUSED_ARG (_tao_retval); - TAO_Object_Adapter::Servant_Upcall servant_upcall ( - _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -3891,19 +3898,19 @@ - ); +- ACE_UNUSED_ARG (_tao_retval); +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "create_value", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK_RETURN (0); +- return ACE_reinterpret_cast ( +- POA_IR::Container_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/Container:1.0" +- ) +- )->create_value ( +- id, +- name, +- version, +- is_custom, +- is_abstract, +- base_value, +- is_truncatable, +- abstract_base_values, +- supported_interfaces, +- initializers, +- ACE_TRY_ENV +- ); ++ this->synchronous_upcall_dispatch(req, context, this, ACE_TRY_ENV); } -IR::ValueBoxDef_ptr POA_IR::_TAO_Container_ThruPOA_Proxy_Impl::create_value_box ( -+IR_ValueBoxDef_ptr POA_IR::_TAO_Container_ThruPOA_Proxy_Impl::create_value_box ( - CORBA_Object *_collocated_tao_target_, - const char * id, - const char * name, - const char * version, +- CORBA_Object *_collocated_tao_target_, +- const char * id, +- const char * name, +- const char * version, - IR::IDLType_ptr original_type_def, -+ IR_IDLType_ptr original_type_def, - CORBA::Environment &ACE_TRY_ENV - ) - ACE_THROW_SPEC (( - CORBA::SystemException - )) +- CORBA::Environment &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) ++const char* POA_IR::Container::_interface_repository_id (void) const { - IR::ValueBoxDef_var _tao_retval; -+ IR_ValueBoxDef_var _tao_retval; - ACE_UNUSED_ARG (_tao_retval); - TAO_Object_Adapter::Servant_Upcall servant_upcall ( - _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -3930,19 +3937,19 @@ - ); +- ACE_UNUSED_ARG (_tao_retval); +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "create_value_box", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK_RETURN (0); +- return ACE_reinterpret_cast ( +- POA_IR::Container_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/Container:1.0" +- ) +- )->create_value_box ( +- id, +- name, +- version, +- original_type_def, +- ACE_TRY_ENV +- ); ++ return "IDL:omg.org/IR/Container:1.0"; } -IR::ExceptionDef_ptr POA_IR::_TAO_Container_ThruPOA_Proxy_Impl::create_exception ( -+IR_ExceptionDef_ptr POA_IR::_TAO_Container_ThruPOA_Proxy_Impl::create_exception ( - CORBA_Object *_collocated_tao_target_, - const char * id, - const char * name, - const char * version, +- CORBA_Object *_collocated_tao_target_, +- const char * id, +- const char * name, +- const char * version, - const IR::StructMemberSeq & members, -+ const IR_StructMemberSeq & members, - CORBA::Environment &ACE_TRY_ENV - ) - ACE_THROW_SPEC (( - CORBA::SystemException - )) +- CORBA::Environment &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) ++IR::Container* ++POA_IR::Container::_this (CORBA_Environment &ACE_TRY_ENV) { - IR::ExceptionDef_var _tao_retval; -+ IR_ExceptionDef_var _tao_retval; - ACE_UNUSED_ARG (_tao_retval); - TAO_Object_Adapter::Servant_Upcall servant_upcall ( - _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -3969,7 +3976,7 @@ - ); +- ACE_UNUSED_ARG (_tao_retval); +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "create_exception", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK_RETURN (0); +- return ACE_reinterpret_cast ( +- POA_IR::Container_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/Container:1.0" +- ) +- )->create_exception ( +- id, +- name, +- version, +- members, +- ACE_TRY_ENV +- ); ++ TAO_Stub *stub = this->_create_stub (ACE_TRY_ENV); ++ ACE_CHECK_RETURN (0); ++ ++ CORBA::Object_ptr tmp = CORBA::Object::_nil (); ++ ++ if (stub->servant_orb_var ()->orb_core ()->optimize_collocation_objects ()) ++ ACE_NEW_RETURN (tmp, CORBA::Object (stub, 1, this), 0); ++ else ++ ACE_NEW_RETURN (tmp, CORBA::Object (stub, 0, this), 0); ++ ++ CORBA::Object_var obj = tmp; ++ return IR_Container::_unchecked_narrow (obj.in ()); } -IR::NativeDef_ptr POA_IR::_TAO_Container_ThruPOA_Proxy_Impl::create_native ( -+IR_NativeDef_ptr POA_IR::_TAO_Container_ThruPOA_Proxy_Impl::create_native ( - CORBA_Object *_collocated_tao_target_, - const char * id, - const char * name, -@@ -3980,7 +3987,7 @@ - CORBA::SystemException - )) +- CORBA_Object *_collocated_tao_target_, +- const char * id, +- const char * name, +- const char * version, +- CORBA::Environment &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) ++class TAO_IR_IDLType_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable { - IR::NativeDef_var _tao_retval; -+ IR_NativeDef_var _tao_retval; - ACE_UNUSED_ARG (_tao_retval); - TAO_Object_Adapter::Servant_Upcall servant_upcall ( - _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -4018,7 +4025,7 @@ +- ACE_UNUSED_ARG (_tao_retval); +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "create_native", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK_RETURN (0); +- return ACE_reinterpret_cast ( +- POA_IR::Container_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/Container:1.0" +- ) +- )->create_native ( +- id, +- name, +- version, +- ACE_TRY_ENV +- ); ++private: ++ unsigned int hash (const char *str, unsigned int len); ++public: ++ const TAO_operation_db_entry * lookup (const char *str, unsigned int len); ++}; ++/* starting time is 11:23:09 */ ++/* C++ code produced by gperf version 2.8 (ACE version) */ ++/* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_IDLType_Perfect_Hash_OpTable -N lookup */ ++unsigned int ++TAO_IR_IDLType_Perfect_Hash_OpTable::hash (const char *str, unsigned int len) ++{ ++ static const unsigned char asso_values[] = ++ { ++#if defined (ACE_MVS) ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 0, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 0, ++ 19, 19, 0, 0, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 5, 19, 19, 19, 19, 0, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, ++#else ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 0, 19, 0, 19, 19, ++ 0, 0, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 5, 19, 19, 19, ++ 19, 0, 19, 19, 19, 19, 19, 19, ++#endif /* ACE_MVS */ ++ }; ++ return len + asso_values[str[len - 1]] + asso_values[str[0]]; + } + +-// +-// End ThruPOA Proxy Implementation ++const class TAO_operation_db_entry * ++TAO_IR_IDLType_Perfect_Hash_OpTable::lookup (const char *str, unsigned int len) ++{ ++ enum ++ { ++ TOTAL_KEYWORDS = 5, ++ MIN_WORD_LENGTH = 5, ++ MAX_WORD_LENGTH = 13, ++ MIN_HASH_VALUE = 5, ++ MAX_HASH_VALUE = 18, ++ HASH_VALUE_RANGE = 14, ++ DUPLICATES = 0 ++ }; ++ ++ static const class TAO_operation_db_entry wordlist[] = ++ { ++ {"",0},{"",0},{"",0},{"",0},{"",0}, ++ {"_is_a", &POA_IR::IDLType::_is_a_skel}, ++ {"",0}, ++ {"destroy", &POA_IR::IDLType::destroy_skel}, ++ {"",0}, ++ {"_get_type", &POA_IR::IDLType::_get_type_skel}, ++ {"",0},{"",0},{"",0}, ++ {"_get_def_kind", &POA_IR::IDLType::_get_def_kind_skel}, ++ {"",0},{"",0},{"",0},{"",0}, ++ {"_non_existent", &POA_IR::IDLType::_non_existent_skel}, ++ }; ++ ++ if (len <= MAX_WORD_LENGTH && len >= MIN_WORD_LENGTH) ++ { ++ unsigned int key = hash (str, len); ++ ++ if (key <= MAX_HASH_VALUE && key >= MIN_HASH_VALUE) ++ { ++ const char *s = wordlist[key].opname_; ++ ++ if (*str == *s && !strncmp (str + 1, s + 1, len - 1)) ++ return &wordlist[key]; ++ } ++ } ++ return 0; ++} ++/* ending time is 11:23:09 */ ++static TAO_IR_IDLType_Perfect_Hash_OpTable tao_IR_IDLType_optable; ++ + /////////////////////////////////////////////////////////////////////// ++// Strategized Proxy Broker Implementation ++// - // copy ctor - POA_IR::Container::Container (const Container& rhs) +-// skeleton constructor +-POA_IR::Container::Container (void) ++// Factory function Implementation. ++POA_IR::_TAO_IDLType_Strategized_Proxy_Broker *POA_IR::_TAO_IDLType_Strategized_Proxy_Broker::the_TAO_IDLType_Strategized_Proxy_Broker (void) + { +- this->optable_ = &tao_IR_Container_optable; ++ static POA_IR::_TAO_IDLType_Strategized_Proxy_Broker strategized_proxy_broker; ++ return &strategized_proxy_broker; + } + +-// copy ctor +-POA_IR::Container::Container (const Container& rhs) - : ACE_NESTED_CLASS (POA_CORBA,IRObject) (rhs), -+ : POA_CORBA_IRObject (rhs), - TAO_ServantBase (rhs) - {} +- TAO_ServantBase (rhs) +-{} ++POA_IR::_TAO_IDLType_Strategized_Proxy_Broker::_TAO_IDLType_Strategized_Proxy_Broker (void) ++{ ++ for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) ++ this->proxy_cache_[i] = 0; ++ ++} + +-// skeleton destructor +-POA_IR::Container::~Container (void) ++POA_IR::_TAO_IDLType_Strategized_Proxy_Broker::~_TAO_IDLType_Strategized_Proxy_Broker (void) + { ++ for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) ++ delete this->proxy_cache_[i]; ++ + } + +-void POA_IR::Container::lookup_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, ++_TAO_IDLType_Proxy_Impl& ++POA_IR::_TAO_IDLType_Strategized_Proxy_Broker::select_proxy ( ++ IR_IDLType *object, + CORBA::Environment &ACE_TRY_ENV + ) + { +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::Container *_tao_impl = (POA_IR::Container *)_tao_object_reference; +- +- IR::Contained_var _tao_retval; +- CORBA::String_var search_name; +- if (!( +- (_tao_in >> search_name.out ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); ++ TAO_ORB_Core::TAO_Collocation_Strategies strategy = ++ TAO_ORB_Core::collocation_strategy (object); + +- POA_IR::Container::TAO_ServerRequestInfo_IR_Container_lookup ri ( +- _tao_server_request, +- _tao_impl +- , +- search_name.in (), +- ACE_TRY_ENV +- ); ++ if (this->proxy_cache_[strategy] != 0) ++ return *this->proxy_cache_[strategy]; + +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->lookup ( +- search_name.in (), +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::Contained_ptr _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ ++ this->create_proxy (strategy, ACE_TRY_ENV); ++ ACE_CHECK_RETURN (*this->proxy_cache_[strategy]); ++ ++ return *this->proxy_cache_[strategy]; + +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << _tao_retval.in ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- + } -@@ -4037,14 +4044,13 @@ - TAO_InputCDR &_tao_in = _tao_server_request.incoming (); - POA_IR::Container *_tao_impl = (POA_IR::Container *)_tao_object_reference; - -- IR::Contained_var _tao_retval; -+ IR_Contained_var _tao_retval; - CORBA::String_var search_name; - if (!( - (_tao_in >> search_name.out ()) - )) - ACE_THROW (CORBA::MARSHAL()); - -- - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( - _tao_server_request.orb_core ()->server_request_interceptors (), -@@ -4072,7 +4078,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::Contained_ptr _tao_retval_info = _tao_retval._retn (); -+ IR_Contained_ptr _tao_retval_info = _tao_retval._retn (); - ri.result (_tao_retval_info); - _tao_retval = _tao_retval_info; - ri.reply_status (PortableInterceptor::SUCCESSFUL); -@@ -4126,8 +4132,8 @@ - TAO_InputCDR &_tao_in = _tao_server_request.incoming (); - POA_IR::Container *_tao_impl = (POA_IR::Container *)_tao_object_reference; - -- IR::ContainedSeq_var _tao_retval; +-void POA_IR::Container::contents_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, ++void ++POA_IR::_TAO_IDLType_Strategized_Proxy_Broker::create_proxy ( ++ TAO_ORB_Core::TAO_Collocation_Strategies strategy, + CORBA::Environment &ACE_TRY_ENV + ) + { +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::Container *_tao_impl = (POA_IR::Container *)_tao_object_reference; +- +- IR::ContainedSeq_var _tao_retval; - IR::DefinitionKind limit_type; -+ IR_ContainedSeq_var _tao_retval; -+ IR_DefinitionKind limit_type; - CORBA::Boolean exclude_inherited; - if (!( - (_tao_in >> limit_type) && -@@ -4135,7 +4141,6 @@ - )) - ACE_THROW (CORBA::MARSHAL()); - -- - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( - _tao_server_request.orb_core ()->server_request_interceptors (), -@@ -4165,7 +4170,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::ContainedSeq * _tao_retval_info = _tao_retval._retn (); -+ IR_ContainedSeq * _tao_retval_info = _tao_retval._retn (); - ri.result (_tao_retval_info); - _tao_retval = _tao_retval_info; - ri.reply_status (PortableInterceptor::SUCCESSFUL); -@@ -4219,10 +4224,10 @@ - TAO_InputCDR &_tao_in = _tao_server_request.incoming (); - POA_IR::Container *_tao_impl = (POA_IR::Container *)_tao_object_reference; - -- IR::ContainedSeq_var _tao_retval; -+ IR_ContainedSeq_var _tao_retval; - CORBA::String_var search_name; - CORBA::Long levels_to_search; +- CORBA::Boolean exclude_inherited; +- if (!( +- (_tao_in >> limit_type) && +- (_tao_in >> CORBA::Any::to_boolean (exclude_inherited)) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); ++ ACE_GUARD (TAO_SYNCH_MUTEX, guard, this->mutex_); + +- POA_IR::Container::TAO_ServerRequestInfo_IR_Container_contents ri ( +- _tao_server_request, +- _tao_impl +- , +- limit_type, +- exclude_inherited, +- ACE_TRY_ENV +- ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->contents ( +- limit_type, +- exclude_inherited, +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::ContainedSeq * _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY ++ if (this->proxy_cache_[strategy] == 0) + { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << _tao_retval.in ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); ++ switch (strategy) ++ { ++ case TAO_ORB_Core::THRU_POA_STRATEGY: ++ ACE_NEW_THROW_EX ( ++ this->proxy_cache_[strategy], ++ _TAO_IDLType_ThruPOA_Proxy_Impl, ++ CORBA::NO_MEMORY () ++ ); ++ ACE_CHECK; ++ break; ++ ++ case TAO_ORB_Core::REMOTE_STRATEGY: ++ default: ++ ACE_NEW_THROW_EX ( ++ this->proxy_cache_[strategy], ++ _TAO_IDLType_Remote_Proxy_Impl, ++ CORBA::NO_MEMORY () ++ ); ++ ACE_CHECK; ++ break; ++ ++ } ++ ++ } ++} ++ ++ ++// ++// End Strategized Proxy Broker Implementation ++/////////////////////////////////////////////////////////////////////// ++ + ++_TAO_IDLType_Proxy_Broker * ++_TAO_IDLType_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) ++{ ++ ACE_UNUSED_ARG (obj); ++ return ::POA_IR::_TAO_IDLType_Strategized_Proxy_Broker::the_TAO_IDLType_Strategized_Proxy_Broker(); + } + +-void POA_IR::Container::lookup_name_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) ++int ++_TAO_IDLType_Proxy_Broker_Factory_Initializer (long _dummy_) + { +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::Container *_tao_impl = (POA_IR::Container *)_tao_object_reference; ++ ACE_UNUSED_ARG (_dummy_); ++ ++ _TAO_IDLType_Proxy_Broker_Factory_function_pointer = ++ _TAO_IDLType_Proxy_Broker_Factory_function; ++ ++ return 0; ++} + +- IR::ContainedSeq_var _tao_retval; +- CORBA::String_var search_name; +- CORBA::Long levels_to_search; - IR::DefinitionKind limit_type; -+ IR_DefinitionKind limit_type; - CORBA::Boolean exclude_inherited; - if (!( - (_tao_in >> search_name.out ()) && -@@ -4232,7 +4237,6 @@ - )) - ACE_THROW (CORBA::MARSHAL()); - -- - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( - _tao_server_request.orb_core ()->server_request_interceptors (), -@@ -4266,7 +4270,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::ContainedSeq * _tao_retval_info = _tao_retval._retn (); -+ IR_ContainedSeq * _tao_retval_info = _tao_retval._retn (); - ri.result (_tao_retval_info); - _tao_retval = _tao_retval_info; - ri.reply_status (PortableInterceptor::SUCCESSFUL); -@@ -4320,8 +4324,8 @@ - TAO_InputCDR &_tao_in = _tao_server_request.incoming (); - POA_IR::Container *_tao_impl = (POA_IR::Container *)_tao_object_reference; - -- IR::Container::DescriptionSeq_var _tao_retval; +- CORBA::Boolean exclude_inherited; +- if (!( +- (_tao_in >> search_name.out ()) && +- (_tao_in >> levels_to_search) && +- (_tao_in >> limit_type) && +- (_tao_in >> CORBA::Any::to_boolean (exclude_inherited)) +- )) +- ACE_THROW (CORBA::MARSHAL()); ++static int _TAO_IDLType_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = ++ _TAO_IDLType_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, _TAO_IDLType_Proxy_Broker_Factory_Initializer)); ++ ++ ++/////////////////////////////////////////////////////////////////////// ++// ThruPOA Proxy Implementation ++// ++ ++POA_IR::_TAO_IDLType_ThruPOA_Proxy_Impl::_TAO_IDLType_ThruPOA_Proxy_Impl (void) ++{} + ++POA_IR::_TAO_IDLType_ThruPOA_Proxy_Impl::~_TAO_IDLType_ThruPOA_Proxy_Impl (void) ++{} ++ ++// ThruPOA Implementation of the IDL interface methods + +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () ++CORBA::TypeCode_ptr POA_IR::_TAO_IDLType_ThruPOA_Proxy_Impl::type ( ++ CORBA_Object *_collocated_tao_target_, ++ CORBA::Environment &ACE_TRY_ENV ++ ) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException ++ )) ++{ ++ CORBA::TypeCode_var _tao_retval; ++ ACE_UNUSED_ARG (_tao_retval); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () + ); +- +- POA_IR::Container::TAO_ServerRequestInfo_IR_Container_lookup_name ri ( +- _tao_server_request, +- _tao_impl +- , +- search_name.in (), +- levels_to_search, +- limit_type, +- exclude_inherited, ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "type", ++ forward_to.out (), + ACE_TRY_ENV + ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->lookup_name ( +- search_name.in (), +- levels_to_search, +- limit_type, +- exclude_inherited, +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::ContainedSeq * _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, ++ ACE_CHECK_RETURN (0); ++ return ACE_reinterpret_cast ( ++ POA_IR::IDLType_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/IDLType:1.0" ++ ) ++ )->type ( + ACE_TRY_ENV + ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << _tao_retval.in ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); ++} ++ ++// ++// End ThruPOA Proxy Implementation ++/////////////////////////////////////////////////////////////////////// ++ ++// skeleton constructor ++POA_IR::IDLType::IDLType (void) ++{ ++ this->optable_ = &tao_IR_IDLType_optable; ++} ++ ++// copy ctor ++POA_IR::IDLType::IDLType (const IDLType& rhs) ++ : POA_CORBA_IRObject (rhs), ++ TAO_ServantBase (rhs) ++{} + ++// skeleton destructor ++POA_IR::IDLType::~IDLType (void) ++{ + } + +-void POA_IR::Container::describe_contents_skel ( ++void POA_IR::IDLType::_get_type_skel ( + TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, ++ void *_tao_object_reference, ++ void * /* context */, + CORBA::Environment &ACE_TRY_ENV +- ) ++) + { +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::Container *_tao_impl = (POA_IR::Container *)_tao_object_reference; +- +- IR::Container::DescriptionSeq_var _tao_retval; - IR::DefinitionKind limit_type; -+ IR_Container::DescriptionSeq_var _tao_retval; -+ IR_DefinitionKind limit_type; - CORBA::Boolean exclude_inherited; - CORBA::Long max_returned_objs; +- CORBA::Boolean exclude_inherited; +- CORBA::Long max_returned_objs; +- if (!( +- (_tao_in >> limit_type) && +- (_tao_in >> CORBA::Any::to_boolean (exclude_inherited)) && +- (_tao_in >> max_returned_objs) +- )) +- ACE_THROW (CORBA::MARSHAL()); ++ POA_IR::IDLType *_tao_impl = (POA_IR::IDLType *)_tao_object_reference; + ++ CORBA::TypeCode_var _tao_retval; + +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::Container::TAO_ServerRequestInfo_IR_Container_describe_contents ri ( +- _tao_server_request, +- _tao_impl +- , +- limit_type, +- exclude_inherited, +- max_returned_objs, ++ _tao_retval = _tao_impl->type ( + ACE_TRY_ENV + ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->describe_contents ( +- limit_type, +- exclude_inherited, +- max_returned_objs, +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::Container::DescriptionSeq * _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; ++ + ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); ++ ++ _tao_server_request.init_reply (); + TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); if (!( -@@ -4331,7 +4335,6 @@ + (_tao_out << _tao_retval.in ()) )) - ACE_THROW (CORBA::MARSHAL()); - -- - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( - _tao_server_request.orb_core ()->server_request_interceptors (), -@@ -4363,7 +4366,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::Container::DescriptionSeq * _tao_retval_info = _tao_retval._retn (); -+ IR_Container::DescriptionSeq * _tao_retval_info = _tao_retval._retn (); - ri.result (_tao_retval_info); - _tao_retval = _tao_retval_info; - ri.reply_status (PortableInterceptor::SUCCESSFUL); -@@ -4417,7 +4420,7 @@ - TAO_InputCDR &_tao_in = _tao_server_request.incoming (); - POA_IR::Container *_tao_impl = (POA_IR::Container *)_tao_object_reference; - -- IR::ModuleDef_var _tao_retval; -+ IR_ModuleDef_var _tao_retval; - CORBA::String_var id; - CORBA::String_var name; - CORBA::String_var version; -@@ -4428,7 +4431,6 @@ - )) - ACE_THROW (CORBA::MARSHAL()); - -- - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( - _tao_server_request.orb_core ()->server_request_interceptors (), -@@ -4460,7 +4462,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::ModuleDef_ptr _tao_retval_info = _tao_retval._retn (); -+ IR_ModuleDef_ptr _tao_retval_info = _tao_retval._retn (); - ri.result (_tao_retval_info); - _tao_retval = _tao_retval_info; - ri.reply_status (PortableInterceptor::SUCCESSFUL); -@@ -4514,11 +4516,11 @@ +- ACE_THROW (CORBA::MARSHAL()); +- ++ ACE_THROW (CORBA::MARSHAL () ); + } + +-void POA_IR::Container::create_module_skel ( ++void POA_IR::IDLType::_is_a_skel ( + TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, ++ void * _tao_object_reference, ++ void * /* context */, + CORBA::Environment &ACE_TRY_ENV + ) + { TAO_InputCDR &_tao_in = _tao_server_request.incoming (); - POA_IR::Container *_tao_impl = (POA_IR::Container *)_tao_object_reference; - -- IR::ConstantDef_var _tao_retval; -+ IR_ConstantDef_var _tao_retval; - CORBA::String_var id; - CORBA::String_var name; - CORBA::String_var version; +- POA_IR::Container *_tao_impl = (POA_IR::Container *)_tao_object_reference; +- +- IR::ModuleDef_var _tao_retval; +- CORBA::String_var id; +- CORBA::String_var name; +- CORBA::String_var version; +- if (!( +- (_tao_in >> id.out ()) && +- (_tao_in >> name.out ()) && +- (_tao_in >> version.out ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- ++ POA_IR::IDLType *_tao_impl = (POA_IR::IDLType *) _tao_object_reference; ++ CORBA::Boolean _tao_retval = 0; ++ CORBA::String_var value; ++ if (!((_tao_in >> value.out ()))) ++ ACE_THROW (CORBA::MARSHAL ()); + +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::Container::TAO_ServerRequestInfo_IR_Container_create_module ri ( +- _tao_server_request, +- _tao_impl +- , +- id.in (), +- name.in (), +- version.in (), +- ACE_TRY_ENV +- ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->create_module ( +- id.in (), +- name.in (), +- version.in (), +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::ModuleDef_ptr _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; ++ _tao_retval = _tao_impl->_is_a (value.in (), ACE_TRY_ENV); + ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << _tao_retval.in ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); + ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!((_tao_out << CORBA::Any::from_boolean (_tao_retval)))) ++ ACE_THROW (CORBA::MARSHAL ()); + } + +-void POA_IR::Container::create_constant_skel ( ++void POA_IR::IDLType::_non_existent_skel ( + TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, ++ void * _tao_object_reference, ++ void * /* context */, + CORBA::Environment &ACE_TRY_ENV + ) + { +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::Container *_tao_impl = (POA_IR::Container *)_tao_object_reference; ++ POA_IR::IDLType *_tao_impl = (POA_IR::IDLType *) _tao_object_reference; ++ CORBA::Boolean _tao_retval = _tao_impl->_non_existent (ACE_TRY_ENV); ++ ACE_CHECK; + +- IR::ConstantDef_var _tao_retval; +- CORBA::String_var id; +- CORBA::String_var name; +- CORBA::String_var version; - IR::IDLType_var type; -+ IR_IDLType_var type; - CORBA::Any value; - if (!( - (_tao_in >> id.out ()) && -@@ -4529,7 +4531,6 @@ - )) - ACE_THROW (CORBA::MARSHAL()); - -- - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( - _tao_server_request.orb_core ()->server_request_interceptors (), -@@ -4565,7 +4566,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::ConstantDef_ptr _tao_retval_info = _tao_retval._retn (); -+ IR_ConstantDef_ptr _tao_retval_info = _tao_retval._retn (); - ri.result (_tao_retval_info); - _tao_retval = _tao_retval_info; - ri.reply_status (PortableInterceptor::SUCCESSFUL); -@@ -4619,11 +4620,11 @@ - TAO_InputCDR &_tao_in = _tao_server_request.incoming (); - POA_IR::Container *_tao_impl = (POA_IR::Container *)_tao_object_reference; - -- IR::StructDef_var _tao_retval; -+ IR_StructDef_var _tao_retval; - CORBA::String_var id; - CORBA::String_var name; - CORBA::String_var version; +- CORBA::Any value; +- if (!( +- (_tao_in >> id.out ()) && +- (_tao_in >> name.out ()) && +- (_tao_in >> version.out ()) && +- (_tao_in >> type.out ()) && +- (_tao_in >> value) +- )) +- ACE_THROW (CORBA::MARSHAL()); ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!((_tao_out << CORBA::Any::from_boolean (_tao_retval)))) ++ ACE_THROW (CORBA::MARSHAL ()); ++} + ++CORBA::Boolean POA_IR::IDLType::_is_a ( ++ const char* value, ++ CORBA::Environment &ACE_TRY_ENV ++ ) ++{ ++ if ( ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/IDLType:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/CORBA/IRObject:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, CORBA::_tc_Object->id (ACE_TRY_ENV)))) ++ return 1; ++ else ++ return 0; ++} + +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); ++void* POA_IR::IDLType::_downcast ( ++ const char* logical_type_id ++ ) ++{ ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/IDLType:1.0") == 0) ++ return ACE_static_cast (POA_IR::IDLType_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/IRObject:1.0") == 0) ++ return ACE_static_cast (POA_CORBA_IRObject_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/Object:1.0") == 0) ++ return ACE_static_cast(PortableServer::Servant, this); ++ return 0; ++} ++ ++void POA_IR::IDLType::_dispatch (TAO_ServerRequest &req, void *context, CORBA::Environment &ACE_TRY_ENV) ++{ ++ this->synchronous_upcall_dispatch(req, context, this, ACE_TRY_ENV); ++} ++ ++const char* POA_IR::IDLType::_interface_repository_id (void) const ++{ ++ return "IDL:omg.org/IR/IDLType:1.0"; ++} ++ ++IR::IDLType* ++POA_IR::IDLType::_this (CORBA_Environment &ACE_TRY_ENV) ++{ ++ TAO_Stub *stub = this->_create_stub (ACE_TRY_ENV); ++ ACE_CHECK_RETURN (0); + +- POA_IR::Container::TAO_ServerRequestInfo_IR_Container_create_constant ri ( +- _tao_server_request, +- _tao_impl +- , +- id.in (), +- name.in (), +- version.in (), +- type.in (), +- value, +- ACE_TRY_ENV +- ); ++ CORBA::Object_ptr tmp = CORBA::Object::_nil (); ++ ++ if (stub->servant_orb_var ()->orb_core ()->optimize_collocation_objects ()) ++ ACE_NEW_RETURN (tmp, CORBA::Object (stub, 1, this), 0); ++ else ++ ACE_NEW_RETURN (tmp, CORBA::Object (stub, 0, this), 0); + +- ACE_TRY ++ CORBA::Object_var obj = tmp; ++ return IR_IDLType::_unchecked_narrow (obj.in ()); ++} ++ ++class TAO_IR_Repository_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable ++{ ++private: ++ unsigned int hash (const char *str, unsigned int len); ++public: ++ const TAO_operation_db_entry * lookup (const char *str, unsigned int len); ++}; ++/* starting time is 11:23:09 */ ++/* C++ code produced by gperf version 2.8 (ACE version) */ ++/* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_Repository_Perfect_Hash_OpTable -N lookup */ ++unsigned int ++TAO_IR_Repository_Perfect_Hash_OpTable::hash (const char *str, unsigned int len) ++{ ++ static const unsigned char asso_values[] = + { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->create_constant ( +- id.in (), +- name.in (), +- version.in (), +- type.in (), +- value, +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::ConstantDef_ptr _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) ++#if defined (ACE_MVS) ++ 71, 71, 71, 71, 71, 71, 71, 71, 71, 71, ++ 71, 71, 71, 71, 71, 71, 71, 71, 71, 71, ++ 71, 71, 71, 71, 71, 71, 71, 71, 71, 71, ++ 71, 71, 71, 71, 71, 71, 71, 71, 71, 71, ++ 71, 71, 71, 71, 71, 71, 71, 71, 71, 71, ++ 71, 71, 71, 71, 71, 71, 71, 71, 71, 71, ++ 71, 71, 71, 71, 71, 71, 71, 71, 71, 71, ++ 71, 71, 71, 71, 71, 71, 71, 71, 71, 71, ++ 71, 71, 71, 71, 71, 71, 71, 71, 71, 71, ++ 71, 71, 71, 71, 71, 71, 71, 71, 71, 71, ++ 71, 71, 71, 71, 71, 71, 71, 71, 71, 20, ++ 71, 71, 71, 71, 71, 71, 71, 71, 71, 71, ++ 71, 71, 71, 71, 71, 71, 71, 71, 71, 15, ++ 71, 0, 23, 10, 71, 5, 71, 71, 71, 71, ++ 71, 71, 71, 71, 71, 71, 71, 0, 0, 15, ++ 71, 0, 71, 71, 71, 71, 71, 71, 71, 71, ++ 71, 71, 30, 0, 71, 71, 71, 0, 0, 71, ++ 71, 71, 71, 71, 71, 71, 71, 71, 71, 71, ++ 71, 71, 71, 71, 71, 71, 71, 71, 71, 71, ++ 71, 71, 71, 71, 71, 71, 71, 71, 71, 71, ++ 71, 71, 71, 71, 71, 71, 71, 71, 71, 71, ++ 71, 71, 71, 71, 71, 71, 71, 71, 71, 71, ++ 71, 71, 71, 71, 71, 71, 71, 71, 71, 71, ++ 71, 71, 71, 71, 71, 71, 71, 71, 71, 71, ++ 71, 71, 71, 71, 71, 71, 71, 71, 71, 71, ++ 71, 71, 71, 71, 71, 71, ++#else ++ 71, 71, 71, 71, 71, 71, 71, 71, 71, 71, ++ 71, 71, 71, 71, 71, 71, 71, 71, 71, 71, ++ 71, 71, 71, 71, 71, 71, 71, 71, 71, 71, ++ 71, 71, 71, 71, 71, 71, 71, 71, 71, 71, ++ 71, 71, 71, 71, 71, 71, 71, 71, 71, 71, ++ 71, 71, 71, 71, 71, 71, 71, 71, 71, 71, ++ 71, 71, 71, 71, 71, 71, 71, 71, 71, 71, ++ 71, 71, 71, 71, 71, 71, 71, 71, 71, 71, ++ 71, 71, 71, 71, 71, 71, 71, 71, 71, 71, ++ 71, 71, 71, 71, 71, 20, 71, 15, 71, 0, ++ 23, 10, 71, 5, 71, 71, 71, 71, 0, 0, ++ 15, 71, 0, 71, 71, 30, 0, 71, 71, 71, ++ 0, 0, 71, 71, 71, 71, 71, 71, ++#endif /* ACE_MVS */ ++ }; ++ return len + asso_values[str[len - 1]] + asso_values[str[0]]; ++} ++ ++const class TAO_operation_db_entry * ++TAO_IR_Repository_Perfect_Hash_OpTable::lookup (const char *str, unsigned int len) ++{ ++ enum + { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY ++ TOTAL_KEYWORDS = 27, ++ MIN_WORD_LENGTH = 5, ++ MAX_WORD_LENGTH = 22, ++ MIN_HASH_VALUE = 6, ++ MAX_HASH_VALUE = 70, ++ HASH_VALUE_RANGE = 65, ++ DUPLICATES = 2 ++ }; ++ ++ static const class TAO_operation_db_entry wordlist[] = ++ { ++ {"",0},{"",0},{"",0},{"",0},{"",0},{"",0}, ++ {"lookup", &POA_IR::Repository::lookup_skel}, ++ {"create_enum", &POA_IR::Repository::create_enum_skel}, ++ {"create_array", &POA_IR::Repository::create_array_skel}, ++ {"create_struct", &POA_IR::Repository::create_struct_skel}, ++ {"create_constant", &POA_IR::Repository::create_constant_skel}, ++ {"create_value_box", &POA_IR::Repository::create_value_box_skel}, ++ {"create_string", &POA_IR::Repository::create_string_skel}, ++ {"create_wstring", &POA_IR::Repository::create_wstring_skel}, ++ {"lookup_name", &POA_IR::Repository::lookup_name_skel}, ++ {"create_value", &POA_IR::Repository::create_value_skel}, ++ {"create_module", &POA_IR::Repository::create_module_skel}, ++ {"create_native", &POA_IR::Repository::create_native_skel}, ++ {"create_sequence", &POA_IR::Repository::create_sequence_skel}, ++ {"create_interface", &POA_IR::Repository::create_interface_skel}, ++ {"create_union", &POA_IR::Repository::create_union_skel}, ++ {"get_primitive", &POA_IR::Repository::get_primitive_skel}, ++ {"destroy", &POA_IR::Repository::destroy_skel}, ++ {"create_exception", &POA_IR::Repository::create_exception_skel}, ++ {"lookup_id", &POA_IR::Repository::lookup_id_skel}, ++ {"_non_existent", &POA_IR::Repository::_non_existent_skel}, ++ {"create_fixed", &POA_IR::Repository::create_fixed_skel}, ++ {"get_canonical_typecode", &POA_IR::Repository::get_canonical_typecode_skel}, ++ {"contents", &POA_IR::Repository::contents_skel}, ++ {"_is_a", &POA_IR::Repository::_is_a_skel}, ++ {"create_alias", &POA_IR::Repository::create_alias_skel}, ++ {"_get_def_kind", &POA_IR::Repository::_get_def_kind_skel}, ++ {"describe_contents", &POA_IR::Repository::describe_contents_skel}, ++ }; ++ ++ static const signed char lookup[] = + { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; ++ -1, -1, -1, -1, -1, -1, 6, -1, -1, -16, -2, 7, 8, 9, ++ -1, 10, 11, -1, 12, 13, -1, 14, 15, -84, -1, 18, 19, 20, ++ 21, -1, 22, 23, 24, 25, -1, 26, -1, 27, 28, -1, 29, -1, ++ 30, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, ++ 31, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, ++ 32, ++ }; ++ ++ if (len <= MAX_WORD_LENGTH && len >= MIN_WORD_LENGTH) ++ { ++ unsigned int key = hash (str, len); ++ ++ if (key <= MAX_HASH_VALUE && key >= MIN_HASH_VALUE) ++ { ++ int slot = lookup[key]; ++ ++ if (slot >= 0 && slot < MAX_HASH_VALUE) ++ { ++ const char *s = wordlist[slot].opname_; ++ ++ if (*str == *s && !strncmp (str + 1, s + 1, len - 1)) ++ return &wordlist[slot]; ++ } ++ else if (slot < 0 && slot >= -MAX_HASH_VALUE) ++ return 0; ++ else ++ { ++ unsigned int offset = key + slot + (slot > 0 ? -MAX_HASH_VALUE : MAX_HASH_VALUE); ++ const class TAO_operation_db_entry *base = &wordlist[-lookup[offset]]; ++ const class TAO_operation_db_entry *ptr = base + -lookup[offset + 1]; ++ ++ while (--ptr >= base) ++ if (*str == *ptr->opname_ && !strncmp (str + 1, ptr->opname_ + 1, len - 1)) ++ return ptr; ++ } ++ } + } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ ++ return 0; ++} ++/* ending time is 11:23:09 */ ++static TAO_IR_Repository_Perfect_Hash_OpTable tao_IR_Repository_optable; ++ ++/////////////////////////////////////////////////////////////////////// ++// Strategized Proxy Broker Implementation ++// ++ ++// Factory function Implementation. ++POA_IR::_TAO_Repository_Strategized_Proxy_Broker *POA_IR::_TAO_Repository_Strategized_Proxy_Broker::the_TAO_Repository_Strategized_Proxy_Broker (void) ++{ ++ static POA_IR::_TAO_Repository_Strategized_Proxy_Broker strategized_proxy_broker; ++ return &strategized_proxy_broker; ++} ++ ++POA_IR::_TAO_Repository_Strategized_Proxy_Broker::_TAO_Repository_Strategized_Proxy_Broker (void) ++{ ++ for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) ++ this->proxy_cache_[i] = 0; + +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << _tao_retval.in ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); ++} + ++POA_IR::_TAO_Repository_Strategized_Proxy_Broker::~_TAO_Repository_Strategized_Proxy_Broker (void) ++{ ++ for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) ++ delete this->proxy_cache_[i]; ++ + } + +-void POA_IR::Container::create_struct_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, ++_TAO_Repository_Proxy_Impl& ++POA_IR::_TAO_Repository_Strategized_Proxy_Broker::select_proxy ( ++ IR_Repository *object, + CORBA::Environment &ACE_TRY_ENV + ) + { +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::Container *_tao_impl = (POA_IR::Container *)_tao_object_reference; +- +- IR::StructDef_var _tao_retval; +- CORBA::String_var id; +- CORBA::String_var name; +- CORBA::String_var version; - IR::StructMemberSeq members; -+ IR_StructMemberSeq members; - if (!( - (_tao_in >> id.out ()) && - (_tao_in >> name.out ()) && -@@ -4632,7 +4633,6 @@ - )) - ACE_THROW (CORBA::MARSHAL()); - -- - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( - _tao_server_request.orb_core ()->server_request_interceptors (), -@@ -4666,7 +4666,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::StructDef_ptr _tao_retval_info = _tao_retval._retn (); -+ IR_StructDef_ptr _tao_retval_info = _tao_retval._retn (); - ri.result (_tao_retval_info); - _tao_retval = _tao_retval_info; - ri.reply_status (PortableInterceptor::SUCCESSFUL); -@@ -4720,12 +4720,12 @@ - TAO_InputCDR &_tao_in = _tao_server_request.incoming (); - POA_IR::Container *_tao_impl = (POA_IR::Container *)_tao_object_reference; - -- IR::UnionDef_var _tao_retval; -+ IR_UnionDef_var _tao_retval; - CORBA::String_var id; - CORBA::String_var name; - CORBA::String_var version; +- if (!( +- (_tao_in >> id.out ()) && +- (_tao_in >> name.out ()) && +- (_tao_in >> version.out ()) && +- (_tao_in >> members) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); ++ TAO_ORB_Core::TAO_Collocation_Strategies strategy = ++ TAO_ORB_Core::collocation_strategy (object); + +- POA_IR::Container::TAO_ServerRequestInfo_IR_Container_create_struct ri ( +- _tao_server_request, +- _tao_impl +- , +- id.in (), +- name.in (), +- version.in (), +- members, +- ACE_TRY_ENV +- ); ++ if (this->proxy_cache_[strategy] != 0) ++ return *this->proxy_cache_[strategy]; + +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->create_struct ( +- id.in (), +- name.in (), +- version.in (), +- members, +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::StructDef_ptr _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ ++ this->create_proxy (strategy, ACE_TRY_ENV); ++ ACE_CHECK_RETURN (*this->proxy_cache_[strategy]); ++ ++ return *this->proxy_cache_[strategy]; + +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << _tao_retval.in ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- + } + +-void POA_IR::Container::create_union_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, ++void ++POA_IR::_TAO_Repository_Strategized_Proxy_Broker::create_proxy ( ++ TAO_ORB_Core::TAO_Collocation_Strategies strategy, + CORBA::Environment &ACE_TRY_ENV + ) + { +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::Container *_tao_impl = (POA_IR::Container *)_tao_object_reference; +- +- IR::UnionDef_var _tao_retval; +- CORBA::String_var id; +- CORBA::String_var name; +- CORBA::String_var version; - IR::IDLType_var discriminator_type; - IR::UnionMemberSeq members; -+ IR_IDLType_var discriminator_type; -+ IR_UnionMemberSeq members; - if (!( - (_tao_in >> id.out ()) && - (_tao_in >> name.out ()) && -@@ -4735,7 +4735,6 @@ - )) - ACE_THROW (CORBA::MARSHAL()); - -- - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( - _tao_server_request.orb_core ()->server_request_interceptors (), -@@ -4771,7 +4770,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::UnionDef_ptr _tao_retval_info = _tao_retval._retn (); -+ IR_UnionDef_ptr _tao_retval_info = _tao_retval._retn (); - ri.result (_tao_retval_info); - _tao_retval = _tao_retval_info; - ri.reply_status (PortableInterceptor::SUCCESSFUL); -@@ -4825,11 +4824,11 @@ - TAO_InputCDR &_tao_in = _tao_server_request.incoming (); - POA_IR::Container *_tao_impl = (POA_IR::Container *)_tao_object_reference; - -- IR::EnumDef_var _tao_retval; -+ IR_EnumDef_var _tao_retval; - CORBA::String_var id; - CORBA::String_var name; - CORBA::String_var version; +- if (!( +- (_tao_in >> id.out ()) && +- (_tao_in >> name.out ()) && +- (_tao_in >> version.out ()) && +- (_tao_in >> discriminator_type.out ()) && +- (_tao_in >> members) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); ++ ACE_GUARD (TAO_SYNCH_MUTEX, guard, this->mutex_); + +- POA_IR::Container::TAO_ServerRequestInfo_IR_Container_create_union ri ( +- _tao_server_request, +- _tao_impl +- , +- id.in (), +- name.in (), +- version.in (), +- discriminator_type.in (), +- members, +- ACE_TRY_ENV +- ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->create_union ( +- id.in (), +- name.in (), +- version.in (), +- discriminator_type.in (), +- members, +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::UnionDef_ptr _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY ++ if (this->proxy_cache_[strategy] == 0) + { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << _tao_retval.in ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); ++ switch (strategy) ++ { ++ case TAO_ORB_Core::THRU_POA_STRATEGY: ++ ACE_NEW_THROW_EX ( ++ this->proxy_cache_[strategy], ++ _TAO_Repository_ThruPOA_Proxy_Impl, ++ CORBA::NO_MEMORY () ++ ); ++ ACE_CHECK; ++ break; ++ ++ case TAO_ORB_Core::REMOTE_STRATEGY: ++ default: ++ ACE_NEW_THROW_EX ( ++ this->proxy_cache_[strategy], ++ _TAO_Repository_Remote_Proxy_Impl, ++ CORBA::NO_MEMORY () ++ ); ++ ACE_CHECK; ++ break; ++ ++ } ++ ++ } ++} ++ ++ ++// ++// End Strategized Proxy Broker Implementation ++/////////////////////////////////////////////////////////////////////// + ++ ++_TAO_Repository_Proxy_Broker * ++_TAO_Repository_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) ++{ ++ ACE_UNUSED_ARG (obj); ++ return ::POA_IR::_TAO_Repository_Strategized_Proxy_Broker::the_TAO_Repository_Strategized_Proxy_Broker(); + } + +-void POA_IR::Container::create_enum_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) ++int ++_TAO_Repository_Proxy_Broker_Factory_Initializer (long _dummy_) + { +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::Container *_tao_impl = (POA_IR::Container *)_tao_object_reference; ++ ACE_UNUSED_ARG (_dummy_); ++ ++ _TAO_Repository_Proxy_Broker_Factory_function_pointer = ++ _TAO_Repository_Proxy_Broker_Factory_function; ++ ++ return 0; ++} + +- IR::EnumDef_var _tao_retval; +- CORBA::String_var id; +- CORBA::String_var name; +- CORBA::String_var version; - IR::EnumMemberSeq members; -+ IR_EnumMemberSeq members; - if (!( - (_tao_in >> id.out ()) && - (_tao_in >> name.out ()) && -@@ -4838,7 +4837,6 @@ - )) - ACE_THROW (CORBA::MARSHAL()); - -- - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( - _tao_server_request.orb_core ()->server_request_interceptors (), -@@ -4872,7 +4870,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::EnumDef_ptr _tao_retval_info = _tao_retval._retn (); -+ IR_EnumDef_ptr _tao_retval_info = _tao_retval._retn (); - ri.result (_tao_retval_info); - _tao_retval = _tao_retval_info; - ri.reply_status (PortableInterceptor::SUCCESSFUL); -@@ -4926,11 +4924,11 @@ - TAO_InputCDR &_tao_in = _tao_server_request.incoming (); - POA_IR::Container *_tao_impl = (POA_IR::Container *)_tao_object_reference; - -- IR::AliasDef_var _tao_retval; -+ IR_AliasDef_var _tao_retval; - CORBA::String_var id; - CORBA::String_var name; - CORBA::String_var version; +- if (!( +- (_tao_in >> id.out ()) && +- (_tao_in >> name.out ()) && +- (_tao_in >> version.out ()) && +- (_tao_in >> members) +- )) +- ACE_THROW (CORBA::MARSHAL()); ++static int _TAO_Repository_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = ++ _TAO_Repository_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, _TAO_Repository_Proxy_Broker_Factory_Initializer)); ++ ++ ++/////////////////////////////////////////////////////////////////////// ++// ThruPOA Proxy Implementation ++// + ++POA_IR::_TAO_Repository_ThruPOA_Proxy_Impl::_TAO_Repository_ThruPOA_Proxy_Impl (void) ++{} ++ ++POA_IR::_TAO_Repository_ThruPOA_Proxy_Impl::~_TAO_Repository_ThruPOA_Proxy_Impl (void) ++{} + +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () ++// ThruPOA Implementation of the IDL interface methods ++ ++IR::Contained_ptr POA_IR::_TAO_Repository_ThruPOA_Proxy_Impl::lookup_id ( ++ CORBA_Object *_collocated_tao_target_, ++ const char * search_id, ++ CORBA::Environment &ACE_TRY_ENV ++ ) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException ++ )) ++{ ++ IR_Contained_var _tao_retval; ++ ACE_UNUSED_ARG (_tao_retval); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () + ); +- +- POA_IR::Container::TAO_ServerRequestInfo_IR_Container_create_enum ri ( +- _tao_server_request, +- _tao_impl +- , +- id.in (), +- name.in (), +- version.in (), +- members, ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "lookup_id", ++ forward_to.out (), + ACE_TRY_ENV + ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->create_enum ( +- id.in (), +- name.in (), +- version.in (), +- members, +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::EnumDef_ptr _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, ++ ACE_CHECK_RETURN (0); ++ return ACE_reinterpret_cast ( ++ POA_IR::Repository_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/Repository:1.0" ++ ) ++ )->lookup_id ( ++ search_id, + ACE_TRY_ENV + ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << _tao_retval.in ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- + } + +-void POA_IR::Container::create_alias_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, ++CORBA::TypeCode_ptr POA_IR::_TAO_Repository_ThruPOA_Proxy_Impl::get_canonical_typecode ( ++ CORBA_Object *_collocated_tao_target_, ++ CORBA::TypeCode_ptr tc, + CORBA::Environment &ACE_TRY_ENV + ) +-{ +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::Container *_tao_impl = (POA_IR::Container *)_tao_object_reference; +- +- IR::AliasDef_var _tao_retval; +- CORBA::String_var id; +- CORBA::String_var name; +- CORBA::String_var version; - IR::IDLType_var original_type; -+ IR_IDLType_var original_type; - if (!( - (_tao_in >> id.out ()) && - (_tao_in >> name.out ()) && -@@ -4939,7 +4937,6 @@ +- if (!( +- (_tao_in >> id.out ()) && +- (_tao_in >> name.out ()) && +- (_tao_in >> version.out ()) && +- (_tao_in >> original_type.out ()) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException )) - ACE_THROW (CORBA::MARSHAL()); - -- - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( - _tao_server_request.orb_core ()->server_request_interceptors (), -@@ -4973,7 +4970,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::AliasDef_ptr _tao_retval_info = _tao_retval._retn (); -+ IR_AliasDef_ptr _tao_retval_info = _tao_retval._retn (); - ri.result (_tao_retval_info); - _tao_retval = _tao_retval_info; - ri.reply_status (PortableInterceptor::SUCCESSFUL); -@@ -5027,11 +5024,11 @@ - TAO_InputCDR &_tao_in = _tao_server_request.incoming (); - POA_IR::Container *_tao_impl = (POA_IR::Container *)_tao_object_reference; - -- IR::InterfaceDef_var _tao_retval; -+ IR_InterfaceDef_var _tao_retval; - CORBA::String_var id; - CORBA::String_var name; - CORBA::String_var version; +- ACE_THROW (CORBA::MARSHAL()); +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () ++{ ++ CORBA::TypeCode_var _tao_retval; ++ ACE_UNUSED_ARG (_tao_retval); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () + ); +- +- POA_IR::Container::TAO_ServerRequestInfo_IR_Container_create_alias ri ( +- _tao_server_request, +- _tao_impl +- , +- id.in (), +- name.in (), +- version.in (), +- original_type.in (), ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "get_canonical_typecode", ++ forward_to.out (), + ACE_TRY_ENV + ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->create_alias ( +- id.in (), +- name.in (), +- version.in (), +- original_type.in (), +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::AliasDef_ptr _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, ++ ACE_CHECK_RETURN (0); ++ return ACE_reinterpret_cast ( ++ POA_IR::Repository_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/Repository:1.0" ++ ) ++ )->get_canonical_typecode ( ++ tc, + ACE_TRY_ENV + ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << _tao_retval.in ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- + } + +-void POA_IR::Container::create_interface_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, ++IR::PrimitiveDef_ptr POA_IR::_TAO_Repository_ThruPOA_Proxy_Impl::get_primitive ( ++ CORBA_Object *_collocated_tao_target_, ++ IR_PrimitiveKind kind, + CORBA::Environment &ACE_TRY_ENV + ) +-{ +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::Container *_tao_impl = (POA_IR::Container *)_tao_object_reference; +- +- IR::InterfaceDef_var _tao_retval; +- CORBA::String_var id; +- CORBA::String_var name; +- CORBA::String_var version; - IR::InterfaceDefSeq base_interfaces; -+ IR_InterfaceDefSeq base_interfaces; - CORBA::Boolean is_abstract; - CORBA::Boolean is_local; - if (!( -@@ -5044,7 +5041,6 @@ +- CORBA::Boolean is_abstract; +- CORBA::Boolean is_local; +- if (!( +- (_tao_in >> id.out ()) && +- (_tao_in >> name.out ()) && +- (_tao_in >> version.out ()) && +- (_tao_in >> base_interfaces) && +- (_tao_in >> CORBA::Any::to_boolean (is_abstract)) && +- (_tao_in >> CORBA::Any::to_boolean (is_local)) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException )) - ACE_THROW (CORBA::MARSHAL()); - -- - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( - _tao_server_request.orb_core ()->server_request_interceptors (), -@@ -5082,7 +5078,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::InterfaceDef_ptr _tao_retval_info = _tao_retval._retn (); -+ IR_InterfaceDef_ptr _tao_retval_info = _tao_retval._retn (); - ri.result (_tao_retval_info); - _tao_retval = _tao_retval_info; - ri.reply_status (PortableInterceptor::SUCCESSFUL); -@@ -5136,17 +5132,17 @@ - TAO_InputCDR &_tao_in = _tao_server_request.incoming (); - POA_IR::Container *_tao_impl = (POA_IR::Container *)_tao_object_reference; - -- IR::ValueDef_var _tao_retval; -+ IR_ValueDef_var _tao_retval; - CORBA::String_var id; - CORBA::String_var name; - CORBA::String_var version; - CORBA::Boolean is_custom; - CORBA::Boolean is_abstract; +- ACE_THROW (CORBA::MARSHAL()); +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () ++{ ++ IR_PrimitiveDef_var _tao_retval; ++ ACE_UNUSED_ARG (_tao_retval); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () + ); +- +- POA_IR::Container::TAO_ServerRequestInfo_IR_Container_create_interface ri ( +- _tao_server_request, +- _tao_impl +- , +- id.in (), +- name.in (), +- version.in (), +- base_interfaces, +- is_abstract, +- is_local, ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "get_primitive", ++ forward_to.out (), + ACE_TRY_ENV + ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->create_interface ( +- id.in (), +- name.in (), +- version.in (), +- base_interfaces, +- is_abstract, +- is_local, +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::InterfaceDef_ptr _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, ++ ACE_CHECK_RETURN (0); ++ return ACE_reinterpret_cast ( ++ POA_IR::Repository_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/Repository:1.0" ++ ) ++ )->get_primitive ( ++ kind, + ACE_TRY_ENV + ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << _tao_retval.in ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- + } + +-void POA_IR::Container::create_value_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, ++IR::StringDef_ptr POA_IR::_TAO_Repository_ThruPOA_Proxy_Impl::create_string ( ++ CORBA_Object *_collocated_tao_target_, ++ CORBA::ULong bound, + CORBA::Environment &ACE_TRY_ENV + ) +-{ +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::Container *_tao_impl = (POA_IR::Container *)_tao_object_reference; +- +- IR::ValueDef_var _tao_retval; +- CORBA::String_var id; +- CORBA::String_var name; +- CORBA::String_var version; +- CORBA::Boolean is_custom; +- CORBA::Boolean is_abstract; - IR::ValueDef_var base_value; -+ IR_ValueDef_var base_value; - CORBA::Boolean is_truncatable; +- CORBA::Boolean is_truncatable; - IR::ValueDefSeq abstract_base_values; - IR::InterfaceDefSeq supported_interfaces; - IR::InitializerSeq initializers; -+ IR_ValueDefSeq abstract_base_values; -+ IR_InterfaceDefSeq supported_interfaces; -+ IR_InitializerSeq initializers; - if (!( - (_tao_in >> id.out ()) && - (_tao_in >> name.out ()) && -@@ -5161,7 +5157,6 @@ +- if (!( +- (_tao_in >> id.out ()) && +- (_tao_in >> name.out ()) && +- (_tao_in >> version.out ()) && +- (_tao_in >> CORBA::Any::to_boolean (is_custom)) && +- (_tao_in >> CORBA::Any::to_boolean (is_abstract)) && +- (_tao_in >> base_value.out ()) && +- (_tao_in >> CORBA::Any::to_boolean (is_truncatable)) && +- (_tao_in >> abstract_base_values) && +- (_tao_in >> supported_interfaces) && +- (_tao_in >> initializers) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException )) - ACE_THROW (CORBA::MARSHAL()); - -- - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( - _tao_server_request.orb_core ()->server_request_interceptors (), -@@ -5207,7 +5202,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::ValueDef_ptr _tao_retval_info = _tao_retval._retn (); -+ IR_ValueDef_ptr _tao_retval_info = _tao_retval._retn (); - ri.result (_tao_retval_info); - _tao_retval = _tao_retval_info; - ri.reply_status (PortableInterceptor::SUCCESSFUL); -@@ -5261,11 +5256,11 @@ - TAO_InputCDR &_tao_in = _tao_server_request.incoming (); - POA_IR::Container *_tao_impl = (POA_IR::Container *)_tao_object_reference; - -- IR::ValueBoxDef_var _tao_retval; -+ IR_ValueBoxDef_var _tao_retval; - CORBA::String_var id; - CORBA::String_var name; - CORBA::String_var version; +- ACE_THROW (CORBA::MARSHAL()); +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () ++{ ++ IR_StringDef_var _tao_retval; ++ ACE_UNUSED_ARG (_tao_retval); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () + ); +- +- POA_IR::Container::TAO_ServerRequestInfo_IR_Container_create_value ri ( +- _tao_server_request, +- _tao_impl +- , +- id.in (), +- name.in (), +- version.in (), +- is_custom, +- is_abstract, +- base_value.in (), +- is_truncatable, +- abstract_base_values, +- supported_interfaces, +- initializers, ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "create_string", ++ forward_to.out (), + ACE_TRY_ENV + ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->create_value ( +- id.in (), +- name.in (), +- version.in (), +- is_custom, +- is_abstract, +- base_value.in (), +- is_truncatable, +- abstract_base_values, +- supported_interfaces, +- initializers, +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::ValueDef_ptr _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, ++ ACE_CHECK_RETURN (0); ++ return ACE_reinterpret_cast ( ++ POA_IR::Repository_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/Repository:1.0" ++ ) ++ )->create_string ( ++ bound, + ACE_TRY_ENV + ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << _tao_retval.in ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- + } + +-void POA_IR::Container::create_value_box_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, ++IR::WstringDef_ptr POA_IR::_TAO_Repository_ThruPOA_Proxy_Impl::create_wstring ( ++ CORBA_Object *_collocated_tao_target_, ++ CORBA::ULong bound, + CORBA::Environment &ACE_TRY_ENV + ) +-{ +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::Container *_tao_impl = (POA_IR::Container *)_tao_object_reference; +- +- IR::ValueBoxDef_var _tao_retval; +- CORBA::String_var id; +- CORBA::String_var name; +- CORBA::String_var version; - IR::IDLType_var original_type_def; -+ IR_IDLType_var original_type_def; - if (!( - (_tao_in >> id.out ()) && - (_tao_in >> name.out ()) && -@@ -5274,7 +5269,6 @@ +- if (!( +- (_tao_in >> id.out ()) && +- (_tao_in >> name.out ()) && +- (_tao_in >> version.out ()) && +- (_tao_in >> original_type_def.out ()) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException )) - ACE_THROW (CORBA::MARSHAL()); - -- - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( - _tao_server_request.orb_core ()->server_request_interceptors (), -@@ -5308,7 +5302,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::ValueBoxDef_ptr _tao_retval_info = _tao_retval._retn (); -+ IR_ValueBoxDef_ptr _tao_retval_info = _tao_retval._retn (); - ri.result (_tao_retval_info); - _tao_retval = _tao_retval_info; - ri.reply_status (PortableInterceptor::SUCCESSFUL); -@@ -5362,11 +5356,11 @@ - TAO_InputCDR &_tao_in = _tao_server_request.incoming (); - POA_IR::Container *_tao_impl = (POA_IR::Container *)_tao_object_reference; - -- IR::ExceptionDef_var _tao_retval; -+ IR_ExceptionDef_var _tao_retval; - CORBA::String_var id; - CORBA::String_var name; - CORBA::String_var version; +- ACE_THROW (CORBA::MARSHAL()); +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () ++{ ++ IR_WstringDef_var _tao_retval; ++ ACE_UNUSED_ARG (_tao_retval); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () + ); +- +- POA_IR::Container::TAO_ServerRequestInfo_IR_Container_create_value_box ri ( +- _tao_server_request, +- _tao_impl +- , +- id.in (), +- name.in (), +- version.in (), +- original_type_def.in (), ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "create_wstring", ++ forward_to.out (), + ACE_TRY_ENV + ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->create_value_box ( +- id.in (), +- name.in (), +- version.in (), +- original_type_def.in (), +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::ValueBoxDef_ptr _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, ++ ACE_CHECK_RETURN (0); ++ return ACE_reinterpret_cast ( ++ POA_IR::Repository_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/Repository:1.0" ++ ) ++ )->create_wstring ( ++ bound, + ACE_TRY_ENV + ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << _tao_retval.in ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- + } + +-void POA_IR::Container::create_exception_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, ++IR::SequenceDef_ptr POA_IR::_TAO_Repository_ThruPOA_Proxy_Impl::create_sequence ( ++ CORBA_Object *_collocated_tao_target_, ++ CORBA::ULong bound, ++ IR_IDLType_ptr element_type, + CORBA::Environment &ACE_TRY_ENV + ) +-{ +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::Container *_tao_impl = (POA_IR::Container *)_tao_object_reference; +- +- IR::ExceptionDef_var _tao_retval; +- CORBA::String_var id; +- CORBA::String_var name; +- CORBA::String_var version; - IR::StructMemberSeq members; -+ IR_StructMemberSeq members; - if (!( - (_tao_in >> id.out ()) && - (_tao_in >> name.out ()) && -@@ -5375,7 +5369,6 @@ +- if (!( +- (_tao_in >> id.out ()) && +- (_tao_in >> name.out ()) && +- (_tao_in >> version.out ()) && +- (_tao_in >> members) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException )) - ACE_THROW (CORBA::MARSHAL()); - -- - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( - _tao_server_request.orb_core ()->server_request_interceptors (), -@@ -5409,7 +5402,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::ExceptionDef_ptr _tao_retval_info = _tao_retval._retn (); -+ IR_ExceptionDef_ptr _tao_retval_info = _tao_retval._retn (); - ri.result (_tao_retval_info); - _tao_retval = _tao_retval_info; - ri.reply_status (PortableInterceptor::SUCCESSFUL); -@@ -5463,7 +5456,7 @@ - TAO_InputCDR &_tao_in = _tao_server_request.incoming (); - POA_IR::Container *_tao_impl = (POA_IR::Container *)_tao_object_reference; - -- IR::NativeDef_var _tao_retval; -+ IR_NativeDef_var _tao_retval; - CORBA::String_var id; - CORBA::String_var name; - CORBA::String_var version; -@@ -5474,7 +5467,6 @@ +- ACE_THROW (CORBA::MARSHAL()); +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () ++{ ++ IR_SequenceDef_var _tao_retval; ++ ACE_UNUSED_ARG (_tao_retval); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () + ); +- +- POA_IR::Container::TAO_ServerRequestInfo_IR_Container_create_exception ri ( +- _tao_server_request, +- _tao_impl +- , +- id.in (), +- name.in (), +- version.in (), +- members, ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "create_sequence", ++ forward_to.out (), + ACE_TRY_ENV + ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->create_exception ( +- id.in (), +- name.in (), +- version.in (), +- members, +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::ExceptionDef_ptr _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, ++ ACE_CHECK_RETURN (0); ++ return ACE_reinterpret_cast ( ++ POA_IR::Repository_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/Repository:1.0" ++ ) ++ )->create_sequence ( ++ bound, ++ element_type, + ACE_TRY_ENV + ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << _tao_retval.in ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- + } + +-void POA_IR::Container::create_native_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, ++IR::ArrayDef_ptr POA_IR::_TAO_Repository_ThruPOA_Proxy_Impl::create_array ( ++ CORBA_Object *_collocated_tao_target_, ++ CORBA::ULong length, ++ IR_IDLType_ptr element_type, + CORBA::Environment &ACE_TRY_ENV + ) +-{ +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::Container *_tao_impl = (POA_IR::Container *)_tao_object_reference; +- +- IR::NativeDef_var _tao_retval; +- CORBA::String_var id; +- CORBA::String_var name; +- CORBA::String_var version; +- if (!( +- (_tao_in >> id.out ()) && +- (_tao_in >> name.out ()) && +- (_tao_in >> version.out ()) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException )) - ACE_THROW (CORBA::MARSHAL()); - -- - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( - _tao_server_request.orb_core ()->server_request_interceptors (), -@@ -5506,7 +5498,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::NativeDef_ptr _tao_retval_info = _tao_retval._retn (); -+ IR_NativeDef_ptr _tao_retval_info = _tao_retval._retn (); - ri.result (_tao_retval_info); - _tao_retval = _tao_retval_info; - ri.reply_status (PortableInterceptor::SUCCESSFUL); -@@ -5561,7 +5553,7 @@ - POA_IR::Container *_tao_impl = (POA_IR::Container *) _tao_object_reference; - CORBA::Boolean _tao_retval = 0; - CORBA::String_var value; -- if (!(_tao_in >> value.out ())) -+ if (!((_tao_in >> value.out ()))) - ACE_THROW (CORBA::MARSHAL ()); - - _tao_retval = _tao_impl->_is_a (value.in (), ACE_TRY_ENV); -@@ -5569,7 +5561,7 @@ - - _tao_server_request.init_reply (); - TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); -- if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) -+ if (!((_tao_out << CORBA::Any::from_boolean (_tao_retval)))) - ACE_THROW (CORBA::MARSHAL ()); +- ACE_THROW (CORBA::MARSHAL()); +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () ++{ ++ IR_ArrayDef_var _tao_retval; ++ ACE_UNUSED_ARG (_tao_retval); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () + ); +- +- POA_IR::Container::TAO_ServerRequestInfo_IR_Container_create_native ri ( +- _tao_server_request, +- _tao_impl +- , +- id.in (), +- name.in (), +- version.in (), ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "create_array", ++ forward_to.out (), + ACE_TRY_ENV + ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->create_native ( +- id.in (), +- name.in (), +- version.in (), +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::NativeDef_ptr _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, ++ ACE_CHECK_RETURN (0); ++ return ACE_reinterpret_cast ( ++ POA_IR::Repository_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/Repository:1.0" ++ ) ++ )->create_array ( ++ length, ++ element_type, + ACE_TRY_ENV + ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << _tao_retval.in ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- } -@@ -5586,7 +5578,7 @@ - - _tao_server_request.init_reply (); - TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +-void POA_IR::Container::_is_a_skel ( +- TAO_ServerRequest &_tao_server_request, +- void * _tao_object_reference, +- void * /* context */, ++IR::FixedDef_ptr POA_IR::_TAO_Repository_ThruPOA_Proxy_Impl::create_fixed ( ++ CORBA_Object *_collocated_tao_target_, ++ CORBA::UShort digits, ++ CORBA::Short scale, + CORBA::Environment &ACE_TRY_ENV + ) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException ++ )) + { +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::Container *_tao_impl = (POA_IR::Container *) _tao_object_reference; +- CORBA::Boolean _tao_retval = 0; +- CORBA::String_var value; +- if (!(_tao_in >> value.out ())) +- ACE_THROW (CORBA::MARSHAL ()); +- +- _tao_retval = _tao_impl->_is_a (value.in (), ACE_TRY_ENV); +- ACE_CHECK; +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); - if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) -+ if (!((_tao_out << CORBA::Any::from_boolean (_tao_retval)))) - ACE_THROW (CORBA::MARSHAL ()); +- ACE_THROW (CORBA::MARSHAL ()); ++ IR_FixedDef_var _tao_retval; ++ ACE_UNUSED_ARG (_tao_retval); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "create_fixed", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK_RETURN (0); ++ return ACE_reinterpret_cast ( ++ POA_IR::Repository_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/Repository:1.0" ++ ) ++ )->create_fixed ( ++ digits, ++ scale, ++ ACE_TRY_ENV ++ ); + } + +-void POA_IR::Container::_non_existent_skel ( +- TAO_ServerRequest &_tao_server_request, +- void * _tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- POA_IR::Container *_tao_impl = (POA_IR::Container *) _tao_object_reference; +- CORBA::Boolean _tao_retval = _tao_impl->_non_existent (ACE_TRY_ENV); +- ACE_CHECK; +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) +- ACE_THROW (CORBA::MARSHAL ()); +-} ++// ++// End ThruPOA Proxy Implementation ++/////////////////////////////////////////////////////////////////////// + +-CORBA::Boolean POA_IR::Container::_is_a ( +- const char* value, +- CORBA::Environment &ACE_TRY_ENV +- ) ++// skeleton constructor ++POA_IR::Repository::Repository (void) + { +- if ( +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/Container:1.0")) || +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/CORBA/IRObject:1.0")) || +- (!ACE_OS::strcmp ((char *)value, CORBA::_tc_Object->id (ACE_TRY_ENV)))) +- return 1; +- else +- return 0; ++ this->optable_ = &tao_IR_Repository_optable; + } + +-void* POA_IR::Container::_downcast ( +- const char* logical_type_id +- ) +-{ +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Container:1.0") == 0) +- return ACE_static_cast (POA_IR::Container_ptr, this); +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/IRObject:1.0") == 0) +- return ACE_static_cast (POA_CORBA::IRObject_ptr, this); +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/Object:1.0") == 0) +- return ACE_static_cast(PortableServer::Servant, this); +- return 0; +-} ++// copy ctor ++POA_IR::Repository::Repository (const Repository& rhs) ++ : ACE_NESTED_CLASS (POA_IR,Container) (rhs), ++ POA_CORBA_IRObject (rhs), ++ TAO_ServantBase (rhs) ++{} + +-void POA_IR::Container::_dispatch (TAO_ServerRequest &req, void *context, CORBA::Environment &ACE_TRY_ENV) ++// skeleton destructor ++POA_IR::Repository::~Repository (void) + { +- this->synchronous_upcall_dispatch(req, context, this, ACE_TRY_ENV); } -@@ -5611,7 +5603,7 @@ - if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Container:1.0") == 0) - return ACE_static_cast (POA_IR::Container_ptr, this); - if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/IRObject:1.0") == 0) -- return ACE_static_cast (POA_CORBA::IRObject_ptr, this); -+ return ACE_static_cast (POA_CORBA_IRObject_ptr, this); - if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/Object:1.0") == 0) - return ACE_static_cast(PortableServer::Servant, this); - return 0; -@@ -5641,10 +5633,9 @@ - ACE_NEW_RETURN (tmp, CORBA::Object (stub, 0, this), 0); - - CORBA::Object_var obj = tmp; +-const char* POA_IR::Container::_interface_repository_id (void) const ++void POA_IR::Repository::lookup_id_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) + { +- return "IDL:omg.org/IR/Container:1.0"; +-} ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::Repository *_tao_impl = (POA_IR::Repository *)_tao_object_reference; + +-IR::Container* +-POA_IR::Container::_this (CORBA_Environment &ACE_TRY_ENV) +-{ +- TAO_Stub *stub = this->_create_stub (ACE_TRY_ENV); +- ACE_CHECK_RETURN (0); +- +- CORBA::Object_ptr tmp = CORBA::Object::_nil (); +- +- if (stub->servant_orb_var ()->orb_core ()->optimize_collocation_objects ()) +- ACE_NEW_RETURN (tmp, CORBA::Object (stub, 1, this), 0); +- else +- ACE_NEW_RETURN (tmp, CORBA::Object (stub, 0, this), 0); +- +- CORBA::Object_var obj = tmp; - return ::IR::Container::_unchecked_narrow (obj.in ()); -+ return IR_Container::_unchecked_narrow (obj.in ()); - } +-} ++ IR_Contained_var _tao_retval; ++ CORBA::String_var search_id; ++ if (!( ++ (_tao_in >> search_id.out ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + ++ _tao_retval = _tao_impl->lookup_id ( ++ search_id.in (), ++ ACE_TRY_ENV ++ ); -- - #if (TAO_HAS_INTERCEPTORS == 1) - POA_IR::Container::TAO_ServerRequestInfo_IR_Container_lookup::TAO_ServerRequestInfo_IR_Container_lookup ( - TAO_ServerRequest &_tao_server_request, -@@ -5733,7 +5724,7 @@ - POA_IR::Container::TAO_ServerRequestInfo_IR_Container_contents::TAO_ServerRequestInfo_IR_Container_contents ( +-#if (TAO_HAS_INTERCEPTORS == 1) +-POA_IR::Container::TAO_ServerRequestInfo_IR_Container_lookup::TAO_ServerRequestInfo_IR_Container_lookup ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::Container *tao_impl +- , +- const char * search_name, +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- search_name_ (search_name) +-{} ++ ACE_CHECK; + +-Dynamic::ParameterList * +-POA_IR::Container::TAO_ServerRequestInfo_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 (); ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!( ++ (_tao_out << _tao_retval.in ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + } + +-Dynamic::ExceptionList * +-POA_IR::Container::TAO_ServerRequestInfo_IR_Container_lookup::exceptions (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++void POA_IR::Repository::get_canonical_typecode_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) + { +- // 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; +-} ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::Repository *_tao_impl = (POA_IR::Repository *)_tao_object_reference; + +-CORBA::Any * +-POA_IR::Container::TAO_ServerRequestInfo_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 (); +-} ++ CORBA::TypeCode_var _tao_retval; ++ CORBA::TypeCode_var tc; ++ if (!( ++ (_tao_in >> tc.out ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + +-char * +-POA_IR::Container::TAO_ServerRequestInfo_IR_Container_lookup::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} ++ _tao_retval = _tao_impl->get_canonical_typecode ( ++ tc.in (), ++ ACE_TRY_ENV ++ ); + +-CORBA::Boolean +-POA_IR::Container::TAO_ServerRequestInfo_IR_Container_lookup::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} ++ ACE_CHECK; + +-void +-POA_IR::Container::TAO_ServerRequestInfo_IR_Container_lookup::result (IR::Contained_ptr result) +-{ +- // Update the result. +- this->_result = result; ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!( ++ (_tao_out << _tao_retval.in ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + } + +-POA_IR::Container::TAO_ServerRequestInfo_IR_Container_contents::TAO_ServerRequestInfo_IR_Container_contents ( ++void POA_IR::Repository::get_primitive_skel ( TAO_ServerRequest &_tao_server_request, - POA_IR::Container *tao_impl, +- POA_IR::Container *tao_impl +- , - IR::DefinitionKind & limit_type, -+ IR_DefinitionKind & limit_type, - const CORBA::Boolean & exclude_inherited, - CORBA::Environment & - ) -@@ -5827,7 +5818,7 @@ - POA_IR::Container *tao_impl, - const char * search_name, - const CORBA::Long & levels_to_search, +- const CORBA::Boolean & exclude_inherited, +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- limit_type_ (limit_type), +- exclude_inherited_ (exclude_inherited) +-{} +- +-Dynamic::ParameterList * +-POA_IR::Container::TAO_ServerRequestInfo_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 * +-POA_IR::Container::TAO_ServerRequestInfo_IR_Container_contents::exceptions (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) + { +- // 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; +-} ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::Repository *_tao_impl = (POA_IR::Repository *)_tao_object_reference; + +-CORBA::Any * +-POA_IR::Container::TAO_ServerRequestInfo_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 (); +-} ++ IR_PrimitiveDef_var _tao_retval; ++ IR_PrimitiveKind kind; ++ if (!( ++ (_tao_in >> kind) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + +-char * +-POA_IR::Container::TAO_ServerRequestInfo_IR_Container_contents::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} ++ _tao_retval = _tao_impl->get_primitive ( ++ kind, ++ ACE_TRY_ENV ++ ); + +-CORBA::Boolean +-POA_IR::Container::TAO_ServerRequestInfo_IR_Container_contents::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} ++ ACE_CHECK; + +-void +-POA_IR::Container::TAO_ServerRequestInfo_IR_Container_contents::result (IR::ContainedSeq * result) +-{ +- // Update the result. +- this->_result = result; ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!( ++ (_tao_out << _tao_retval.in ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + } + +-POA_IR::Container::TAO_ServerRequestInfo_IR_Container_lookup_name::TAO_ServerRequestInfo_IR_Container_lookup_name ( ++void POA_IR::Repository::create_string_skel ( + TAO_ServerRequest &_tao_server_request, +- POA_IR::Container *tao_impl +- , +- const char * search_name, +- const CORBA::Long & levels_to_search, - IR::DefinitionKind & limit_type, -+ IR_DefinitionKind & limit_type, - const CORBA::Boolean & exclude_inherited, - CORBA::Environment & - ) -@@ -5931,7 +5922,7 @@ - POA_IR::Container::TAO_ServerRequestInfo_IR_Container_describe_contents::TAO_ServerRequestInfo_IR_Container_describe_contents ( +- const CORBA::Boolean & exclude_inherited, +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- search_name_ (search_name), +- levels_to_search_ (levels_to_search), +- limit_type_ (limit_type), +- exclude_inherited_ (exclude_inherited) +-{} +- +-Dynamic::ParameterList * +-POA_IR::Container::TAO_ServerRequestInfo_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 * +-POA_IR::Container::TAO_ServerRequestInfo_IR_Container_lookup_name::exceptions (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) + { +- // 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; +-} ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::Repository *_tao_impl = (POA_IR::Repository *)_tao_object_reference; + +-CORBA::Any * +-POA_IR::Container::TAO_ServerRequestInfo_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 (); +-} ++ IR_StringDef_var _tao_retval; ++ CORBA::ULong bound; ++ if (!( ++ (_tao_in >> bound) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + +-char * +-POA_IR::Container::TAO_ServerRequestInfo_IR_Container_lookup_name::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} ++ _tao_retval = _tao_impl->create_string ( ++ bound, ++ ACE_TRY_ENV ++ ); + +-CORBA::Boolean +-POA_IR::Container::TAO_ServerRequestInfo_IR_Container_lookup_name::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} ++ ACE_CHECK; + +-void +-POA_IR::Container::TAO_ServerRequestInfo_IR_Container_lookup_name::result (IR::ContainedSeq * result) +-{ +- // Update the result. +- this->_result = result; ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!( ++ (_tao_out << _tao_retval.in ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + } + +-POA_IR::Container::TAO_ServerRequestInfo_IR_Container_describe_contents::TAO_ServerRequestInfo_IR_Container_describe_contents ( ++void POA_IR::Repository::create_wstring_skel ( TAO_ServerRequest &_tao_server_request, - POA_IR::Container *tao_impl, +- POA_IR::Container *tao_impl +- , - IR::DefinitionKind & limit_type, -+ IR_DefinitionKind & limit_type, - const CORBA::Boolean & exclude_inherited, - const CORBA::Long & max_returned_objs, - CORBA::Environment & -@@ -6131,7 +6122,7 @@ - const char * id, - const char * name, - const char * version, +- const CORBA::Boolean & exclude_inherited, +- const CORBA::Long & max_returned_objs, +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- limit_type_ (limit_type), +- exclude_inherited_ (exclude_inherited), +- max_returned_objs_ (max_returned_objs) +-{} +- +-Dynamic::ParameterList * +-POA_IR::Container::TAO_ServerRequestInfo_IR_Container_describe_contents::arguments (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) + { +- // 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 (); +-} ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::Repository *_tao_impl = (POA_IR::Repository *)_tao_object_reference; + +-Dynamic::ExceptionList * +-POA_IR::Container::TAO_ServerRequestInfo_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; +-} ++ IR_WstringDef_var _tao_retval; ++ CORBA::ULong bound; ++ if (!( ++ (_tao_in >> bound) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + +-CORBA::Any * +-POA_IR::Container::TAO_ServerRequestInfo_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 (); +-} ++ _tao_retval = _tao_impl->create_wstring ( ++ bound, ++ ACE_TRY_ENV ++ ); + +-char * +-POA_IR::Container::TAO_ServerRequestInfo_IR_Container_describe_contents::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} ++ ACE_CHECK; + +-CORBA::Boolean +-POA_IR::Container::TAO_ServerRequestInfo_IR_Container_describe_contents::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!( ++ (_tao_out << _tao_retval.in ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + } + +-void +-POA_IR::Container::TAO_ServerRequestInfo_IR_Container_describe_contents::result (IR::Container::DescriptionSeq * result) ++void POA_IR::Repository::create_sequence_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) + { +- // Update the result. +- this->_result = result; +-} ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::Repository *_tao_impl = (POA_IR::Repository *)_tao_object_reference; + +-POA_IR::Container::TAO_ServerRequestInfo_IR_Container_create_module::TAO_ServerRequestInfo_IR_Container_create_module ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::Container *tao_impl +- , +- const char * id, +- const char * name, +- const char * version, +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- id_ (id), +- name_ (name), +- version_ (version) +-{} +- +-Dynamic::ParameterList * +-POA_IR::Container::TAO_ServerRequestInfo_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 (); +-} ++ IR_SequenceDef_var _tao_retval; ++ CORBA::ULong bound; ++ IR_IDLType_var element_type; ++ if (!( ++ (_tao_in >> bound) && ++ (_tao_in >> element_type.out ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + +-Dynamic::ExceptionList * +-POA_IR::Container::TAO_ServerRequestInfo_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; +-} ++ _tao_retval = _tao_impl->create_sequence ( ++ bound, ++ element_type.in (), ++ ACE_TRY_ENV ++ ); + +-CORBA::Any * +-POA_IR::Container::TAO_ServerRequestInfo_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 (); +-} ++ ACE_CHECK; + +-char * +-POA_IR::Container::TAO_ServerRequestInfo_IR_Container_create_module::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!( ++ (_tao_out << _tao_retval.in ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + } + +-CORBA::Boolean +-POA_IR::Container::TAO_ServerRequestInfo_IR_Container_create_module::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++void POA_IR::Repository::create_array_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) + { +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::Repository *_tao_impl = (POA_IR::Repository *)_tao_object_reference; + +-void +-POA_IR::Container::TAO_ServerRequestInfo_IR_Container_create_module::result (IR::ModuleDef_ptr result) +-{ +- // Update the result. +- this->_result = result; +-} ++ IR_ArrayDef_var _tao_retval; ++ CORBA::ULong length; ++ IR_IDLType_var element_type; ++ if (!( ++ (_tao_in >> length) && ++ (_tao_in >> element_type.out ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + +-POA_IR::Container::TAO_ServerRequestInfo_IR_Container_create_constant::TAO_ServerRequestInfo_IR_Container_create_constant ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::Container *tao_impl +- , +- const char * id, +- const char * name, +- const char * version, - IR::IDLType_ptr type, -+ IR_IDLType_ptr type, - const CORBA::Any & value, - CORBA::Environment & - ) -@@ -6244,7 +6235,7 @@ - const char * id, - const char * name, - const char * version, +- const CORBA::Any & value, +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- id_ (id), +- name_ (name), +- version_ (version), +- type_ (type), +- value_ (value) +-{} +- +-Dynamic::ParameterList * +-POA_IR::Container::TAO_ServerRequestInfo_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 (); +-} ++ _tao_retval = _tao_impl->create_array ( ++ length, ++ element_type.in (), ++ ACE_TRY_ENV ++ ); + +-Dynamic::ExceptionList * +-POA_IR::Container::TAO_ServerRequestInfo_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; +-} ++ ACE_CHECK; + +-CORBA::Any * +-POA_IR::Container::TAO_ServerRequestInfo_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 (); ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!( ++ (_tao_out << _tao_retval.in ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + } + +-char * +-POA_IR::Container::TAO_ServerRequestInfo_IR_Container_create_constant::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++void POA_IR::Repository::create_fixed_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) + { +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::Repository *_tao_impl = (POA_IR::Repository *)_tao_object_reference; + +-CORBA::Boolean +-POA_IR::Container::TAO_ServerRequestInfo_IR_Container_create_constant::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} ++ IR_FixedDef_var _tao_retval; ++ CORBA::UShort digits; ++ CORBA::Short scale; ++ if (!( ++ (_tao_in >> digits) && ++ (_tao_in >> scale) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + +-void +-POA_IR::Container::TAO_ServerRequestInfo_IR_Container_create_constant::result (IR::ConstantDef_ptr result) +-{ +- // Update the result. +- this->_result = result; ++ _tao_retval = _tao_impl->create_fixed ( ++ digits, ++ scale, ++ ACE_TRY_ENV ++ ); ++ ++ ACE_CHECK; ++ ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!( ++ (_tao_out << _tao_retval.in ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + } + +-POA_IR::Container::TAO_ServerRequestInfo_IR_Container_create_struct::TAO_ServerRequestInfo_IR_Container_create_struct ( ++void POA_IR::Repository::_is_a_skel ( + TAO_ServerRequest &_tao_server_request, +- POA_IR::Container *tao_impl +- , +- const char * id, +- const char * name, +- const char * version, - const IR::StructMemberSeq & members, -+ const IR_StructMemberSeq & members, - CORBA::Environment & +- CORBA::Environment & ++ void * _tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ) - : TAO_ServerRequestInfo (_tao_server_request), -@@ -6350,8 +6341,8 @@ - const char * id, - const char * name, - const char * version, +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- id_ (id), +- name_ (name), +- version_ (version), +- members_ (members) +-{} +- +-Dynamic::ParameterList * +-POA_IR::Container::TAO_ServerRequestInfo_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 (); ++{ ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::Repository *_tao_impl = (POA_IR::Repository *) _tao_object_reference; ++ CORBA::Boolean _tao_retval = 0; ++ CORBA::String_var value; ++ if (!((_tao_in >> value.out ()))) ++ ACE_THROW (CORBA::MARSHAL ()); ++ ++ _tao_retval = _tao_impl->_is_a (value.in (), ACE_TRY_ENV); ++ ACE_CHECK; ++ ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!((_tao_out << CORBA::Any::from_boolean (_tao_retval)))) ++ ACE_THROW (CORBA::MARSHAL ()); + } + +-Dynamic::ExceptionList * +-POA_IR::Container::TAO_ServerRequestInfo_IR_Container_create_struct::exceptions (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++void POA_IR::Repository::_non_existent_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void * _tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++ ) + { +- // 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; ++ POA_IR::Repository *_tao_impl = (POA_IR::Repository *) _tao_object_reference; ++ CORBA::Boolean _tao_retval = _tao_impl->_non_existent (ACE_TRY_ENV); ++ ACE_CHECK; ++ ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!((_tao_out << CORBA::Any::from_boolean (_tao_retval)))) ++ ACE_THROW (CORBA::MARSHAL ()); + } + +-CORBA::Any * +-POA_IR::Container::TAO_ServerRequestInfo_IR_Container_create_struct::result (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++CORBA::Boolean POA_IR::Repository::_is_a ( ++ const char* value, ++ CORBA::Environment &ACE_TRY_ENV ++ ) + { +- // 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 (); ++ if ( ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/Repository:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/Container:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/CORBA/IRObject:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, CORBA::_tc_Object->id (ACE_TRY_ENV)))) ++ return 1; ++ else ++ return 0; + } + +-char * +-POA_IR::Container::TAO_ServerRequestInfo_IR_Container_create_struct::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++void* POA_IR::Repository::_downcast ( ++ const char* logical_type_id ++ ) + { +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Repository:1.0") == 0) ++ return ACE_static_cast (POA_IR::Repository_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Container:1.0") == 0) ++ return ACE_static_cast (POA_IR::Container_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/IRObject:1.0") == 0) ++ return ACE_static_cast (POA_CORBA_IRObject_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/Object:1.0") == 0) ++ return ACE_static_cast(PortableServer::Servant, this); ++ return 0; + } + +-CORBA::Boolean +-POA_IR::Container::TAO_ServerRequestInfo_IR_Container_create_struct::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++void POA_IR::Repository::_dispatch (TAO_ServerRequest &req, void *context, CORBA::Environment &ACE_TRY_ENV) + { +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); ++ this->synchronous_upcall_dispatch(req, context, this, ACE_TRY_ENV); + } + +-void +-POA_IR::Container::TAO_ServerRequestInfo_IR_Container_create_struct::result (IR::StructDef_ptr result) ++const char* POA_IR::Repository::_interface_repository_id (void) const + { +- // Update the result. +- this->_result = result; ++ return "IDL:omg.org/IR/Repository:1.0"; + } + +-POA_IR::Container::TAO_ServerRequestInfo_IR_Container_create_union::TAO_ServerRequestInfo_IR_Container_create_union ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::Container *tao_impl +- , +- const char * id, +- const char * name, +- const char * version, - IR::IDLType_ptr discriminator_type, - const IR::UnionMemberSeq & members, -+ IR_IDLType_ptr discriminator_type, -+ const IR_UnionMemberSeq & members, - CORBA::Environment & - ) - : TAO_ServerRequestInfo (_tao_server_request), -@@ -6464,7 +6455,7 @@ - const char * id, - const char * name, - const char * version, +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- id_ (id), +- name_ (name), +- version_ (version), +- discriminator_type_ (discriminator_type), +- members_ (members) +-{} +- +-Dynamic::ParameterList * +-POA_IR::Container::TAO_ServerRequestInfo_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); ++IR::Repository* ++POA_IR::Repository::_this (CORBA_Environment &ACE_TRY_ENV) ++{ ++ TAO_Stub *stub = this->_create_stub (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_; ++ CORBA::Object_ptr tmp = CORBA::Object::_nil (); + +- (*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_; ++ if (stub->servant_orb_var ()->orb_core ()->optimize_collocation_objects ()) ++ ACE_NEW_RETURN (tmp, CORBA::Object (stub, 1, this), 0); ++ else ++ ACE_NEW_RETURN (tmp, CORBA::Object (stub, 0, this), 0); + +- (*parameter_list)[length_members].mode = Dynamic::PARAM_IN; +- +- return safe_parameter_list._retn (); ++ CORBA::Object_var obj = tmp; ++ return IR_Repository::_unchecked_narrow (obj.in ()); + } + +-Dynamic::ExceptionList * +-POA_IR::Container::TAO_ServerRequestInfo_IR_Container_create_union::exceptions (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++class TAO_IR_ComponentRepository_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable + { +- // 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 * +-POA_IR::Container::TAO_ServerRequestInfo_IR_Container_create_union::result (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++private: ++ unsigned int hash (const char *str, unsigned int len); ++public: ++ const TAO_operation_db_entry * lookup (const char *str, unsigned int len); ++}; ++/* starting time is 11:23:09 */ ++/* C++ code produced by gperf version 2.8 (ACE version) */ ++/* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_ComponentRepository_Perfect_Hash_OpTable -N lookup */ ++unsigned int ++TAO_IR_ComponentRepository_Perfect_Hash_OpTable::hash (const char *str, unsigned int len) + { +- // 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 (); ++ static const unsigned char asso_values[] = ++ { ++#if defined (ACE_MVS) ++ 54, 54, 54, 54, 54, 54, 54, 54, 54, 54, ++ 54, 54, 54, 54, 54, 54, 54, 54, 54, 54, ++ 54, 54, 54, 54, 54, 54, 54, 54, 54, 54, ++ 54, 54, 54, 54, 54, 54, 54, 54, 54, 54, ++ 54, 54, 54, 54, 54, 54, 54, 54, 54, 54, ++ 54, 54, 54, 54, 54, 54, 54, 54, 54, 54, ++ 54, 54, 54, 54, 54, 54, 54, 54, 54, 54, ++ 54, 54, 54, 54, 54, 54, 54, 54, 54, 54, ++ 54, 54, 54, 54, 54, 54, 54, 54, 54, 54, ++ 54, 54, 54, 54, 54, 54, 54, 54, 54, 54, ++ 54, 54, 54, 54, 54, 54, 54, 54, 54, 15, ++ 54, 54, 54, 54, 54, 54, 54, 54, 54, 54, ++ 54, 54, 54, 54, 54, 54, 54, 54, 54, 5, ++ 54, 0, 25, 15, 54, 10, 54, 54, 54, 54, ++ 54, 54, 54, 54, 54, 54, 54, 10, 0, 3, ++ 54, 25, 54, 54, 54, 54, 54, 54, 54, 54, ++ 54, 54, 0, 5, 54, 54, 54, 0, 20, 54, ++ 54, 54, 54, 54, 54, 54, 54, 54, 54, 54, ++ 54, 54, 54, 54, 54, 54, 54, 54, 54, 54, ++ 54, 54, 54, 54, 54, 54, 54, 54, 54, 54, ++ 54, 54, 54, 54, 54, 54, 54, 54, 54, 54, ++ 54, 54, 54, 54, 54, 54, 54, 54, 54, 54, ++ 54, 54, 54, 54, 54, 54, 54, 54, 54, 54, ++ 54, 54, 54, 54, 54, 54, 54, 54, 54, 54, ++ 54, 54, 54, 54, 54, 54, 54, 54, 54, 54, ++ 54, 54, 54, 54, 54, 54, ++#else ++ 54, 54, 54, 54, 54, 54, 54, 54, 54, 54, ++ 54, 54, 54, 54, 54, 54, 54, 54, 54, 54, ++ 54, 54, 54, 54, 54, 54, 54, 54, 54, 54, ++ 54, 54, 54, 54, 54, 54, 54, 54, 54, 54, ++ 54, 54, 54, 54, 54, 54, 54, 54, 54, 54, ++ 54, 54, 54, 54, 54, 54, 54, 54, 54, 54, ++ 54, 54, 54, 54, 54, 54, 54, 54, 54, 54, ++ 54, 54, 54, 54, 54, 54, 54, 54, 54, 54, ++ 54, 54, 54, 54, 54, 54, 54, 54, 54, 54, ++ 54, 54, 54, 54, 54, 15, 54, 5, 54, 0, ++ 25, 15, 54, 10, 54, 54, 54, 54, 10, 0, ++ 3, 54, 25, 54, 54, 0, 5, 54, 54, 54, ++ 0, 20, 54, 54, 54, 54, 54, 54, ++#endif /* ACE_MVS */ ++ }; ++ return len + asso_values[str[len - 1]] + asso_values[str[0]]; + } + +-char * +-POA_IR::Container::TAO_ServerRequestInfo_IR_Container_create_union::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++const class TAO_operation_db_entry * ++TAO_IR_ComponentRepository_Perfect_Hash_OpTable::lookup (const char *str, unsigned int len) + { +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} ++ enum ++ { ++ TOTAL_KEYWORDS = 29, ++ MIN_WORD_LENGTH = 5, ++ MAX_WORD_LENGTH = 22, ++ MIN_HASH_VALUE = 8, ++ MAX_HASH_VALUE = 53, ++ HASH_VALUE_RANGE = 46, ++ DUPLICATES = 2 ++ }; + +-CORBA::Boolean +-POA_IR::Container::TAO_ServerRequestInfo_IR_Container_create_union::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} ++ static const class TAO_operation_db_entry wordlist[] = ++ { ++ {"",0},{"",0},{"",0},{"",0},{"",0},{"",0},{"",0},{"",0}, ++ {"contents", &POA_IR::ComponentRepository::contents_skel}, ++ {"create_enum", &POA_IR::ComponentRepository::create_enum_skel}, ++ {"create_alias", &POA_IR::ComponentRepository::create_alias_skel}, ++ {"create_union", &POA_IR::ComponentRepository::create_union_skel}, ++ {"create_value_box", &POA_IR::ComponentRepository::create_value_box_skel}, ++ {"create_struct", &POA_IR::ComponentRepository::create_struct_skel}, ++ {"create_exception", &POA_IR::ComponentRepository::create_exception_skel}, ++ {"create_constant", &POA_IR::ComponentRepository::create_constant_skel}, ++ {"create_component", &POA_IR::ComponentRepository::create_component_skel}, ++ {"create_string", &POA_IR::ComponentRepository::create_string_skel}, ++ {"create_wstring", &POA_IR::ComponentRepository::create_wstring_skel}, ++ {"_is_a", &POA_IR::ComponentRepository::_is_a_skel}, ++ {"create_home", &POA_IR::ComponentRepository::create_home_skel}, ++ {"create_value", &POA_IR::ComponentRepository::create_value_skel}, ++ {"create_module", &POA_IR::ComponentRepository::create_module_skel}, ++ {"create_native", &POA_IR::ComponentRepository::create_native_skel}, ++ {"create_sequence", &POA_IR::ComponentRepository::create_sequence_skel}, ++ {"create_interface", &POA_IR::ComponentRepository::create_interface_skel}, ++ {"create_array", &POA_IR::ComponentRepository::create_array_skel}, ++ {"_non_existent", &POA_IR::ComponentRepository::_non_existent_skel}, ++ {"lookup_name", &POA_IR::ComponentRepository::lookup_name_skel}, ++ {"create_fixed", &POA_IR::ComponentRepository::create_fixed_skel}, ++ {"get_primitive", &POA_IR::ComponentRepository::get_primitive_skel}, ++ {"lookup", &POA_IR::ComponentRepository::lookup_skel}, ++ {"describe_contents", &POA_IR::ComponentRepository::describe_contents_skel}, ++ {"lookup_id", &POA_IR::ComponentRepository::lookup_id_skel}, ++ {"get_canonical_typecode", &POA_IR::ComponentRepository::get_canonical_typecode_skel}, ++ {"destroy", &POA_IR::ComponentRepository::destroy_skel}, ++ {"_get_def_kind", &POA_IR::ComponentRepository::_get_def_kind_skel}, ++ }; + +-void +-POA_IR::Container::TAO_ServerRequestInfo_IR_Container_create_union::result (IR::UnionDef_ptr result) +-{ +- // Update the result. +- this->_result = result; +-} ++ static const signed char lookup[] = ++ { ++ -1, -1, -1, -1, -1, -1, -1, -1, 8, -1, -1, 9, 10, -22, ++ -2, 11, 12, -1, 13, 14, 15, 16, -1, 17, 18, 19, 20, 21, ++ -68, -1, 24, 25, 26, 27, -1, -1, 28, 29, 30, -1, -1, 31, ++ 32, -1, 33, -1, -1, 34, -1, -1, -1, -1, 35, 36, ++ }; + +-POA_IR::Container::TAO_ServerRequestInfo_IR_Container_create_enum::TAO_ServerRequestInfo_IR_Container_create_enum ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::Container *tao_impl +- , +- const char * id, +- const char * name, +- const char * version, - const IR::EnumMemberSeq & members, -+ const IR_EnumMemberSeq & members, - CORBA::Environment & - ) - : TAO_ServerRequestInfo (_tao_server_request), -@@ -6570,7 +6561,7 @@ - const char * id, - const char * name, - const char * version, +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- id_ (id), +- name_ (name), +- version_ (version), +- members_ (members) +-{} +- +-Dynamic::ParameterList * +-POA_IR::Container::TAO_ServerRequestInfo_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 (); +-} ++ if (len <= MAX_WORD_LENGTH && len >= MIN_WORD_LENGTH) ++ { ++ unsigned int key = hash (str, len); + +-Dynamic::ExceptionList * +-POA_IR::Container::TAO_ServerRequestInfo_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; +-} ++ if (key <= MAX_HASH_VALUE && key >= MIN_HASH_VALUE) ++ { ++ int slot = lookup[key]; + +-CORBA::Any * +-POA_IR::Container::TAO_ServerRequestInfo_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 (); +-} ++ if (slot >= 0 && slot < MAX_HASH_VALUE) ++ { ++ const char *s = wordlist[slot].opname_; + +-char * +-POA_IR::Container::TAO_ServerRequestInfo_IR_Container_create_enum::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} ++ if (*str == *s && !strncmp (str + 1, s + 1, len - 1)) ++ return &wordlist[slot]; ++ } ++ else if (slot < 0 && slot >= -MAX_HASH_VALUE) ++ return 0; ++ else ++ { ++ unsigned int offset = key + slot + (slot > 0 ? -MAX_HASH_VALUE : MAX_HASH_VALUE); ++ const class TAO_operation_db_entry *base = &wordlist[-lookup[offset]]; ++ const class TAO_operation_db_entry *ptr = base + -lookup[offset + 1]; + +-CORBA::Boolean +-POA_IR::Container::TAO_ServerRequestInfo_IR_Container_create_enum::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); ++ while (--ptr >= base) ++ if (*str == *ptr->opname_ && !strncmp (str + 1, ptr->opname_ + 1, len - 1)) ++ return ptr; ++ } ++ } ++ } ++ return 0; + } ++/* ending time is 11:23:09 */ ++static TAO_IR_ComponentRepository_Perfect_Hash_OpTable tao_IR_ComponentRepository_optable; + +-void +-POA_IR::Container::TAO_ServerRequestInfo_IR_Container_create_enum::result (IR::EnumDef_ptr result) ++/////////////////////////////////////////////////////////////////////// ++// Strategized Proxy Broker Implementation ++// ++ ++// Factory function Implementation. ++POA_IR::_TAO_ComponentRepository_Strategized_Proxy_Broker *POA_IR::_TAO_ComponentRepository_Strategized_Proxy_Broker::the_TAO_ComponentRepository_Strategized_Proxy_Broker (void) + { +- // Update the result. +- this->_result = result; ++ static POA_IR::_TAO_ComponentRepository_Strategized_Proxy_Broker strategized_proxy_broker; ++ return &strategized_proxy_broker; + } + +-POA_IR::Container::TAO_ServerRequestInfo_IR_Container_create_alias::TAO_ServerRequestInfo_IR_Container_create_alias ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::Container *tao_impl +- , +- const char * id, +- const char * name, +- const char * version, - IR::IDLType_ptr original_type, -+ IR_IDLType_ptr original_type, - CORBA::Environment & - ) - : TAO_ServerRequestInfo (_tao_server_request), -@@ -6676,7 +6667,7 @@ - const char * id, - const char * name, - const char * version, +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- id_ (id), +- name_ (name), +- version_ (version), +- original_type_ (original_type) +-{} +- +-Dynamic::ParameterList * +-POA_IR::Container::TAO_ServerRequestInfo_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; ++POA_IR::_TAO_ComponentRepository_Strategized_Proxy_Broker::_TAO_ComponentRepository_Strategized_Proxy_Broker (void) ++{ ++ for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) ++ this->proxy_cache_[i] = 0; + +- return safe_parameter_list._retn (); + } + +-Dynamic::ExceptionList * +-POA_IR::Container::TAO_ServerRequestInfo_IR_Container_create_alias::exceptions (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++POA_IR::_TAO_ComponentRepository_Strategized_Proxy_Broker::~_TAO_ComponentRepository_Strategized_Proxy_Broker (void) + { +- // Generate the exception list on demand. +- Dynamic::ExceptionList *exception_list = +- TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); +- ACE_CHECK_RETURN (0); ++ for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) ++ delete this->proxy_cache_[i]; + +- return exception_list; + } + +-CORBA::Any * +-POA_IR::Container::TAO_ServerRequestInfo_IR_Container_create_alias::result (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++_TAO_ComponentRepository_Proxy_Impl& ++POA_IR::_TAO_ComponentRepository_Strategized_Proxy_Broker::select_proxy ( ++ IR_ComponentRepository *object, ++ CORBA::Environment &ACE_TRY_ENV ++ ) + { +- // 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); ++ TAO_ORB_Core::TAO_Collocation_Strategies strategy = ++ TAO_ORB_Core::collocation_strategy (object); + +- CORBA::Any_var safe_result_any = result_any; ++ if (this->proxy_cache_[strategy] != 0) ++ return *this->proxy_cache_[strategy]; + +- (*result_any) <<= this->_result; ++ this->create_proxy (strategy, ACE_TRY_ENV); ++ ACE_CHECK_RETURN (*this->proxy_cache_[strategy]); ++ ++ return *this->proxy_cache_[strategy]; + +- return safe_result_any._retn (); +-} +- +-char * +-POA_IR::Container::TAO_ServerRequestInfo_IR_Container_create_alias::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::Container::TAO_ServerRequestInfo_IR_Container_create_alias::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); + } + + void +-POA_IR::Container::TAO_ServerRequestInfo_IR_Container_create_alias::result (IR::AliasDef_ptr result) ++POA_IR::_TAO_ComponentRepository_Strategized_Proxy_Broker::create_proxy ( ++ TAO_ORB_Core::TAO_Collocation_Strategies strategy, ++ CORBA::Environment &ACE_TRY_ENV ++ ) + { +- // Update the result. +- this->_result = result; +-} +- +-POA_IR::Container::TAO_ServerRequestInfo_IR_Container_create_interface::TAO_ServerRequestInfo_IR_Container_create_interface ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::Container *tao_impl +- , +- const char * id, +- const char * name, +- const char * version, - const IR::InterfaceDefSeq & base_interfaces, -+ const IR_InterfaceDefSeq & base_interfaces, - const CORBA::Boolean & is_abstract, - const CORBA::Boolean & is_local, - CORBA::Environment & -@@ -6798,11 +6789,11 @@ - const char * version, - const CORBA::Boolean & is_custom, - const CORBA::Boolean & is_abstract, +- const CORBA::Boolean & is_abstract, +- const CORBA::Boolean & is_local, +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- id_ (id), +- name_ (name), +- version_ (version), +- base_interfaces_ (base_interfaces), +- is_abstract_ (is_abstract), +- is_local_ (is_local) +-{} +- +-Dynamic::ParameterList * +-POA_IR::Container::TAO_ServerRequestInfo_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_; ++ ACE_GUARD (TAO_SYNCH_MUTEX, guard, this->mutex_); + +- (*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; ++ if (this->proxy_cache_[strategy] == 0) ++ { ++ switch (strategy) ++ { ++ case TAO_ORB_Core::THRU_POA_STRATEGY: ++ ACE_NEW_THROW_EX ( ++ this->proxy_cache_[strategy], ++ _TAO_ComponentRepository_ThruPOA_Proxy_Impl, ++ CORBA::NO_MEMORY () ++ ); ++ ACE_CHECK; ++ break; ++ ++ case TAO_ORB_Core::REMOTE_STRATEGY: ++ default: ++ ACE_NEW_THROW_EX ( ++ this->proxy_cache_[strategy], ++ _TAO_ComponentRepository_Remote_Proxy_Impl, ++ CORBA::NO_MEMORY () ++ ); ++ ACE_CHECK; ++ break; ++ ++ } + +- 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 * +-POA_IR::Container::TAO_ServerRequestInfo_IR_Container_create_interface::exceptions (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++ ++// ++// End Strategized Proxy Broker Implementation ++/////////////////////////////////////////////////////////////////////// ++ ++ ++_TAO_ComponentRepository_Proxy_Broker * ++_TAO_ComponentRepository_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) + { +- // 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; ++ ACE_UNUSED_ARG (obj); ++ return ::POA_IR::_TAO_ComponentRepository_Strategized_Proxy_Broker::the_TAO_ComponentRepository_Strategized_Proxy_Broker(); + } + +-CORBA::Any * +-POA_IR::Container::TAO_ServerRequestInfo_IR_Container_create_interface::result (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++int ++_TAO_ComponentRepository_Proxy_Broker_Factory_Initializer (long _dummy_) + { +- // 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; ++ ACE_UNUSED_ARG (_dummy_); + +- (*result_any) <<= this->_result; ++ _TAO_ComponentRepository_Proxy_Broker_Factory_function_pointer = ++ _TAO_ComponentRepository_Proxy_Broker_Factory_function; + +- return safe_result_any._retn (); ++ return 0; + } + +-char * +-POA_IR::Container::TAO_ServerRequestInfo_IR_Container_create_interface::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} ++static int _TAO_ComponentRepository_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = ++ _TAO_ComponentRepository_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, _TAO_ComponentRepository_Proxy_Broker_Factory_Initializer)); + +-CORBA::Boolean +-POA_IR::Container::TAO_ServerRequestInfo_IR_Container_create_interface::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-void +-POA_IR::Container::TAO_ServerRequestInfo_IR_Container_create_interface::result (IR::InterfaceDef_ptr result) +-{ +- // Update the result. +- this->_result = result; +-} +- +-POA_IR::Container::TAO_ServerRequestInfo_IR_Container_create_value::TAO_ServerRequestInfo_IR_Container_create_value ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::Container *tao_impl +- , +- const char * id, +- const char * name, +- const char * version, +- const CORBA::Boolean & is_custom, +- const CORBA::Boolean & is_abstract, - IR::ValueDef_ptr base_value, -+ IR_ValueDef_ptr base_value, - const CORBA::Boolean & is_truncatable, +- const CORBA::Boolean & is_truncatable, - const IR::ValueDefSeq & abstract_base_values, - const IR::InterfaceDefSeq & supported_interfaces, - const IR::InitializerSeq & initializers, -+ const IR_ValueDefSeq & abstract_base_values, -+ const IR_InterfaceDefSeq & supported_interfaces, -+ const IR_InitializerSeq & initializers, - CORBA::Environment & - ) - : TAO_ServerRequestInfo (_tao_server_request), -@@ -6947,7 +6938,7 @@ +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- 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 * +-POA_IR::Container::TAO_ServerRequestInfo_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 * +-POA_IR::Container::TAO_ServerRequestInfo_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 * +-POA_IR::Container::TAO_ServerRequestInfo_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 (); +-} ++/////////////////////////////////////////////////////////////////////// ++// ThruPOA Proxy Implementation ++// + +-char * +-POA_IR::Container::TAO_ServerRequestInfo_IR_Container_create_value::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} ++POA_IR::_TAO_ComponentRepository_ThruPOA_Proxy_Impl::_TAO_ComponentRepository_ThruPOA_Proxy_Impl (void) ++{} + +-CORBA::Boolean +-POA_IR::Container::TAO_ServerRequestInfo_IR_Container_create_value::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} ++POA_IR::_TAO_ComponentRepository_ThruPOA_Proxy_Impl::~_TAO_ComponentRepository_ThruPOA_Proxy_Impl (void) ++{} + +-void +-POA_IR::Container::TAO_ServerRequestInfo_IR_Container_create_value::result (IR::ValueDef_ptr result) +-{ +- // Update the result. +- this->_result = result; +-} ++// ThruPOA Implementation of the IDL interface methods + +-POA_IR::Container::TAO_ServerRequestInfo_IR_Container_create_value_box::TAO_ServerRequestInfo_IR_Container_create_value_box ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::Container *tao_impl +- , ++IR::ComponentDef_ptr POA_IR::_TAO_ComponentRepository_ThruPOA_Proxy_Impl::create_component ( ++ CORBA_Object *_collocated_tao_target_, const char * id, const char * name, const char * version, - IR::IDLType_ptr original_type_def, -+ IR_IDLType_ptr original_type_def, - CORBA::Environment & +- CORBA::Environment & ++ IR_ComponentDef_ptr base_component, ++ const IR_InterfaceDefSeq & supports_interfaces, ++ CORBA::Environment &ACE_TRY_ENV ) - : TAO_ServerRequestInfo (_tao_server_request), -@@ -7053,7 +7044,7 @@ +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- id_ (id), +- name_ (name), +- version_ (version), +- original_type_def_ (original_type_def) +-{} +- +-Dynamic::ParameterList * +-POA_IR::Container::TAO_ServerRequestInfo_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 * +-POA_IR::Container::TAO_ServerRequestInfo_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 * +-POA_IR::Container::TAO_ServerRequestInfo_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 (); +-} +- +-char * +-POA_IR::Container::TAO_ServerRequestInfo_IR_Container_create_value_box::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::Container::TAO_ServerRequestInfo_IR_Container_create_value_box::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-void +-POA_IR::Container::TAO_ServerRequestInfo_IR_Container_create_value_box::result (IR::ValueBoxDef_ptr result) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException ++ )) + { +- // Update the result. +- this->_result = result; ++ IR_ComponentDef_var _tao_retval; ++ ACE_UNUSED_ARG (_tao_retval); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "create_component", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK_RETURN (0); ++ return ACE_reinterpret_cast ( ++ POA_IR::ComponentRepository_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/ComponentRepository:1.0" ++ ) ++ )->create_component ( ++ id, ++ name, ++ version, ++ base_component, ++ supports_interfaces, ++ ACE_TRY_ENV ++ ); + } + +-POA_IR::Container::TAO_ServerRequestInfo_IR_Container_create_exception::TAO_ServerRequestInfo_IR_Container_create_exception ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::Container *tao_impl +- , ++IR::HomeDef_ptr POA_IR::_TAO_ComponentRepository_ThruPOA_Proxy_Impl::create_home ( ++ CORBA_Object *_collocated_tao_target_, const char * id, const char * name, const char * version, - const IR::StructMemberSeq & members, -+ const IR_StructMemberSeq & members, - CORBA::Environment & +- CORBA::Environment & ++ IR_HomeDef_ptr base_home, ++ IR_ComponentDef_ptr managed_component, ++ IR_ValueDef_ptr primary_key, ++ CORBA::Environment &ACE_TRY_ENV ) - : TAO_ServerRequestInfo (_tao_server_request), -@@ -7252,6 +7243,7 @@ - } +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- id_ (id), +- name_ (name), +- version_ (version), +- members_ (members) +-{} +- +-Dynamic::ParameterList * +-POA_IR::Container::TAO_ServerRequestInfo_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 * +-POA_IR::Container::TAO_ServerRequestInfo_IR_Container_create_exception::exceptions (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++ 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; ++ IR_HomeDef_var _tao_retval; ++ ACE_UNUSED_ARG (_tao_retval); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "create_home", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK_RETURN (0); ++ return ACE_reinterpret_cast ( ++ POA_IR::ComponentRepository_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/ComponentRepository:1.0" ++ ) ++ )->create_home ( ++ id, ++ name, ++ version, ++ base_home, ++ managed_component, ++ primary_key, ++ ACE_TRY_ENV ++ ); + } + +-CORBA::Any * +-POA_IR::Container::TAO_ServerRequestInfo_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 (); +-} ++// ++// End ThruPOA Proxy Implementation ++/////////////////////////////////////////////////////////////////////// + +-char * +-POA_IR::Container::TAO_ServerRequestInfo_IR_Container_create_exception::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++// skeleton constructor ++POA_IR::ComponentRepository::ComponentRepository (void) + { +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); ++ this->optable_ = &tao_IR_ComponentRepository_optable; + } + +-CORBA::Boolean +-POA_IR::Container::TAO_ServerRequestInfo_IR_Container_create_exception::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} ++// copy ctor ++POA_IR::ComponentRepository::ComponentRepository (const ComponentRepository& rhs) ++ : ACE_NESTED_CLASS (POA_IR,Repository) (rhs), ++ ACE_NESTED_CLASS (POA_IR,Container) (rhs), ++ POA_CORBA_IRObject (rhs), ++ TAO_ServantBase (rhs) ++{} - #endif /* TAO_HAS_INTERCEPTORS */ -+ - class TAO_IR_IDLType_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable +-void +-POA_IR::Container::TAO_ServerRequestInfo_IR_Container_create_exception::result (IR::ExceptionDef_ptr result) ++// skeleton destructor ++POA_IR::ComponentRepository::~ComponentRepository (void) { - private: -@@ -7259,7 +7251,7 @@ - public: - const TAO_operation_db_entry * lookup (const char *str, unsigned int len); - }; --/* starting time is 18:47:27 */ -+/* starting time is 11:23:09 */ - /* C++ code produced by gperf version 2.8 (ACE version) */ - /* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_IDLType_Perfect_Hash_OpTable -N lookup */ - unsigned int -@@ -7355,10 +7347,9 @@ - } - return 0; +- // Update the result. +- this->_result = result; } --/* ending time is 18:47:27 */ -+/* ending time is 11:23:09 */ - static TAO_IR_IDLType_Perfect_Hash_OpTable tao_IR_IDLType_optable; +-POA_IR::Container::TAO_ServerRequestInfo_IR_Container_create_native::TAO_ServerRequestInfo_IR_Container_create_native ( ++void POA_IR::ComponentRepository::create_component_skel ( + TAO_ServerRequest &_tao_server_request, +- POA_IR::Container *tao_impl +- , +- const char * id, +- const char * name, +- const char * version, +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- id_ (id), +- name_ (name), +- version_ (version) +-{} - - /////////////////////////////////////////////////////////////////////// - // Strategized Proxy Broker Implementation - // -@@ -7384,9 +7375,9 @@ - +-Dynamic::ParameterList * +-POA_IR::Container::TAO_ServerRequestInfo_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 * +-POA_IR::Container::TAO_ServerRequestInfo_IR_Container_create_native::exceptions (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) + { +- // 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; +-} ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::ComponentRepository *_tao_impl = (POA_IR::ComponentRepository *)_tao_object_reference; + +-CORBA::Any * +-POA_IR::Container::TAO_ServerRequestInfo_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 (); +-} ++ IR_ComponentDef_var _tao_retval; ++ CORBA::String_var id; ++ CORBA::String_var name; ++ CORBA::String_var version; ++ IR_ComponentDef_var base_component; ++ IR_InterfaceDefSeq supports_interfaces; ++ if (!( ++ (_tao_in >> id.out ()) && ++ (_tao_in >> name.out ()) && ++ (_tao_in >> version.out ()) && ++ (_tao_in >> base_component.out ()) && ++ (_tao_in >> supports_interfaces) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + +-char * +-POA_IR::Container::TAO_ServerRequestInfo_IR_Container_create_native::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} ++ _tao_retval = _tao_impl->create_component ( ++ id.in (), ++ name.in (), ++ version.in (), ++ base_component.in (), ++ supports_interfaces, ++ ACE_TRY_ENV ++ ); + +-CORBA::Boolean +-POA_IR::Container::TAO_ServerRequestInfo_IR_Container_create_native::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} ++ ACE_CHECK; + +-void +-POA_IR::Container::TAO_ServerRequestInfo_IR_Container_create_native::result (IR::NativeDef_ptr result) +-{ +- // Update the result. +- this->_result = result; ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!( ++ (_tao_out << _tao_retval.in ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + } + +-#endif /* TAO_HAS_INTERCEPTORS */ +-class TAO_IR_IDLType_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable ++void POA_IR::ComponentRepository::create_home_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) + { +-private: +- unsigned int hash (const char *str, unsigned int len); +-public: +- const TAO_operation_db_entry * lookup (const char *str, unsigned int len); +-}; +-/* starting time is 16:31:12 */ +-/* C++ code produced by gperf version 2.8 (ACE version) */ +-/* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_IDLType_Perfect_Hash_OpTable -N lookup */ +-unsigned int +-TAO_IR_IDLType_Perfect_Hash_OpTable::hash (const char *str, unsigned int len) +-{ +- static const unsigned char asso_values[] = +- { +-#if defined (ACE_MVS) +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 0, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 0, +- 19, 19, 0, 0, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 5, 19, 19, 19, 19, 0, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, +-#else +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 0, 19, 0, 19, 19, +- 0, 0, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 5, 19, 19, 19, +- 19, 0, 19, 19, 19, 19, 19, 19, +-#endif /* ACE_MVS */ +- }; +- return len + asso_values[str[len - 1]] + asso_values[str[0]]; +-} +- +-const class TAO_operation_db_entry * +-TAO_IR_IDLType_Perfect_Hash_OpTable::lookup (const char *str, unsigned int len) +-{ +- enum +- { +- TOTAL_KEYWORDS = 5, +- MIN_WORD_LENGTH = 5, +- MAX_WORD_LENGTH = 13, +- MIN_HASH_VALUE = 5, +- MAX_HASH_VALUE = 18, +- HASH_VALUE_RANGE = 14, +- DUPLICATES = 0 +- }; ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::ComponentRepository *_tao_impl = (POA_IR::ComponentRepository *)_tao_object_reference; + +- static const class TAO_operation_db_entry wordlist[] = +- { +- {"",0},{"",0},{"",0},{"",0},{"",0}, +- {"_is_a", &POA_IR::IDLType::_is_a_skel}, +- {"",0}, +- {"destroy", &POA_IR::IDLType::destroy_skel}, +- {"",0}, +- {"_get_type", &POA_IR::IDLType::_get_type_skel}, +- {"",0},{"",0},{"",0}, +- {"_get_def_kind", &POA_IR::IDLType::_get_def_kind_skel}, +- {"",0},{"",0},{"",0},{"",0}, +- {"_non_existent", &POA_IR::IDLType::_non_existent_skel}, +- }; ++ IR_HomeDef_var _tao_retval; ++ CORBA::String_var id; ++ CORBA::String_var name; ++ CORBA::String_var version; ++ IR_HomeDef_var base_home; ++ IR_ComponentDef_var managed_component; ++ IR_ValueDef_var primary_key; ++ if (!( ++ (_tao_in >> id.out ()) && ++ (_tao_in >> name.out ()) && ++ (_tao_in >> version.out ()) && ++ (_tao_in >> base_home.out ()) && ++ (_tao_in >> managed_component.out ()) && ++ (_tao_in >> primary_key.out ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + +- if (len <= MAX_WORD_LENGTH && len >= MIN_WORD_LENGTH) +- { +- unsigned int key = hash (str, len); ++ _tao_retval = _tao_impl->create_home ( ++ id.in (), ++ name.in (), ++ version.in (), ++ base_home.in (), ++ managed_component.in (), ++ primary_key.in (), ++ ACE_TRY_ENV ++ ); + +- if (key <= MAX_HASH_VALUE && key >= MIN_HASH_VALUE) +- { +- const char *s = wordlist[key].opname_; ++ ACE_CHECK; + +- if (*str == *s && !strncmp (str + 1, s + 1, len - 1)) +- return &wordlist[key]; +- } +- } +- return 0; ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!( ++ (_tao_out << _tao_retval.in ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + } +-/* ending time is 16:31:12 */ +-static TAO_IR_IDLType_Perfect_Hash_OpTable tao_IR_IDLType_optable; + ++void POA_IR::ComponentRepository::_is_a_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void * _tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++ ) ++{ ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::ComponentRepository *_tao_impl = (POA_IR::ComponentRepository *) _tao_object_reference; ++ CORBA::Boolean _tao_retval = 0; ++ CORBA::String_var value; ++ if (!((_tao_in >> value.out ()))) ++ ACE_THROW (CORBA::MARSHAL ()); + +-/////////////////////////////////////////////////////////////////////// +-// Strategized Proxy Broker Implementation +-// ++ _tao_retval = _tao_impl->_is_a (value.in (), ACE_TRY_ENV); ++ ACE_CHECK; + +-// Factory function Implementation. +-POA_IR::_TAO_IDLType_Strategized_Proxy_Broker *POA_IR::_TAO_IDLType_Strategized_Proxy_Broker::the_TAO_IDLType_Strategized_Proxy_Broker (void) +-{ +- static POA_IR::_TAO_IDLType_Strategized_Proxy_Broker strategized_proxy_broker; +- return &strategized_proxy_broker; ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!((_tao_out << CORBA::Any::from_boolean (_tao_retval)))) ++ ACE_THROW (CORBA::MARSHAL ()); + } + +-POA_IR::_TAO_IDLType_Strategized_Proxy_Broker::_TAO_IDLType_Strategized_Proxy_Broker (void) ++void POA_IR::ComponentRepository::_non_existent_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void * _tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++ ) + { +- for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) +- this->proxy_cache_[i] = 0; +- +-} ++ POA_IR::ComponentRepository *_tao_impl = (POA_IR::ComponentRepository *) _tao_object_reference; ++ CORBA::Boolean _tao_retval = _tao_impl->_non_existent (ACE_TRY_ENV); ++ ACE_CHECK; + +-POA_IR::_TAO_IDLType_Strategized_Proxy_Broker::~_TAO_IDLType_Strategized_Proxy_Broker (void) +-{ +- for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) +- delete this->proxy_cache_[i]; +- ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!((_tao_out << CORBA::Any::from_boolean (_tao_retval)))) ++ ACE_THROW (CORBA::MARSHAL ()); } -IR::_TAO_IDLType_Proxy_Impl& -+_TAO_IDLType_Proxy_Impl& - POA_IR::_TAO_IDLType_Strategized_Proxy_Broker::select_proxy ( +-POA_IR::_TAO_IDLType_Strategized_Proxy_Broker::select_proxy ( - ::IR::IDLType *object, -+ IR_IDLType *object, ++CORBA::Boolean POA_IR::ComponentRepository::_is_a ( ++ const char* value, CORBA::Environment &ACE_TRY_ENV ) { -@@ -7418,7 +7409,7 @@ - case TAO_ORB_Core::THRU_POA_STRATEGY: - ACE_NEW_THROW_EX ( - this->proxy_cache_[strategy], +- TAO_ORB_Core::TAO_Collocation_Strategies strategy = +- TAO_ORB_Core::collocation_strategy (object); +- +- if (this->proxy_cache_[strategy] != 0) +- return *this->proxy_cache_[strategy]; +- +- this->create_proxy (strategy, ACE_TRY_ENV); +- ACE_CHECK_RETURN (*this->proxy_cache_[strategy]); +- +- return *this->proxy_cache_[strategy]; +- ++ if ( ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/ComponentRepository:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/Repository:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/Container:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/CORBA/IRObject:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, CORBA::_tc_Object->id (ACE_TRY_ENV)))) ++ return 1; ++ else ++ return 0; + } + +-void +-POA_IR::_TAO_IDLType_Strategized_Proxy_Broker::create_proxy ( +- TAO_ORB_Core::TAO_Collocation_Strategies strategy, +- CORBA::Environment &ACE_TRY_ENV ++void* POA_IR::ComponentRepository::_downcast ( ++ const char* logical_type_id + ) + { +- ACE_GUARD (TAO_SYNCH_MUTEX, guard, this->mutex_); +- +- if (this->proxy_cache_[strategy] == 0) +- { +- switch (strategy) +- { +- case TAO_ORB_Core::THRU_POA_STRATEGY: +- ACE_NEW_THROW_EX ( +- this->proxy_cache_[strategy], - POA_IR::_TAO_IDLType_ThruPOA_Proxy_Impl, -+ _TAO_IDLType_ThruPOA_Proxy_Impl, - CORBA::NO_MEMORY () - ); - ACE_CHECK; -@@ -7428,7 +7419,7 @@ - default: - ACE_NEW_THROW_EX ( - this->proxy_cache_[strategy], +- CORBA::NO_MEMORY () +- ); +- ACE_CHECK; +- break; +- +- case TAO_ORB_Core::REMOTE_STRATEGY: +- default: +- ACE_NEW_THROW_EX ( +- this->proxy_cache_[strategy], - ::IR::_TAO_IDLType_Remote_Proxy_Impl, -+ _TAO_IDLType_Remote_Proxy_Impl, - CORBA::NO_MEMORY () - ); - ACE_CHECK; -@@ -7445,26 +7436,26 @@ - /////////////////////////////////////////////////////////////////////// +- CORBA::NO_MEMORY () +- ); +- ACE_CHECK; +- break; +- +- } +- +- } ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/ComponentRepository:1.0") == 0) ++ return ACE_static_cast (POA_IR::ComponentRepository_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Repository:1.0") == 0) ++ return ACE_static_cast (POA_IR::Repository_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Container:1.0") == 0) ++ return ACE_static_cast (POA_IR::Container_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/IRObject:1.0") == 0) ++ return ACE_static_cast (POA_CORBA_IRObject_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/Object:1.0") == 0) ++ return ACE_static_cast(PortableServer::Servant, this); ++ return 0; + } ++void POA_IR::ComponentRepository::_dispatch (TAO_ServerRequest &req, void *context, CORBA::Environment &ACE_TRY_ENV) ++{ ++ this->synchronous_upcall_dispatch(req, context, this, ACE_TRY_ENV); ++} +-// +-// End Strategized Proxy Broker Implementation +-/////////////////////////////////////////////////////////////////////// +- +- -IR::_TAO_IDLType_Proxy_Broker * -IR__TAO_IDLType_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) -+_TAO_IDLType_Proxy_Broker * -+_TAO_IDLType_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) ++const char* POA_IR::ComponentRepository::_interface_repository_id (void) const { - ACE_UNUSED_ARG (obj); - return ::POA_IR::_TAO_IDLType_Strategized_Proxy_Broker::the_TAO_IDLType_Strategized_Proxy_Broker(); +- ACE_UNUSED_ARG (obj); +- return ::POA_IR::_TAO_IDLType_Strategized_Proxy_Broker::the_TAO_IDLType_Strategized_Proxy_Broker(); ++ return "IDL:omg.org/IR/ComponentRepository:1.0"; } - int +-int -IR__TAO_IDLType_Proxy_Broker_Factory_Initializer (long _dummy_) -+_TAO_IDLType_Proxy_Broker_Factory_Initializer (long _dummy_) ++IR::ComponentRepository* ++POA_IR::ComponentRepository::_this (CORBA_Environment &ACE_TRY_ENV) { - ACE_UNUSED_ARG (_dummy_); +- ACE_UNUSED_ARG (_dummy_); ++ TAO_Stub *stub = this->_create_stub (ACE_TRY_ENV); ++ ACE_CHECK_RETURN (0); - IR__TAO_IDLType_Proxy_Broker_Factory_function_pointer = - IR__TAO_IDLType_Proxy_Broker_Factory_function; -+ _TAO_IDLType_Proxy_Broker_Factory_function_pointer = -+ _TAO_IDLType_Proxy_Broker_Factory_function; - - return 0; ++ CORBA::Object_ptr tmp = CORBA::Object::_nil (); + +- return 0; ++ if (stub->servant_orb_var ()->orb_core ()->optimize_collocation_objects ()) ++ ACE_NEW_RETURN (tmp, CORBA::Object (stub, 1, this), 0); ++ else ++ ACE_NEW_RETURN (tmp, CORBA::Object (stub, 0, this), 0); ++ ++ CORBA::Object_var obj = tmp; ++ return IR_ComponentRepository::_unchecked_narrow (obj.in ()); } -static int IR__TAO_IDLType_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = - IR__TAO_IDLType_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, IR__TAO_IDLType_Proxy_Broker_Factory_Initializer)); -+static int _TAO_IDLType_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = -+ _TAO_IDLType_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, _TAO_IDLType_Proxy_Broker_Factory_Initializer)); - +- +- +-/////////////////////////////////////////////////////////////////////// +-// ThruPOA Proxy Implementation +-// ++class TAO_IR_ModuleDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable ++{ ++private: ++ unsigned int hash (const char *str, unsigned int len); ++public: ++ const TAO_operation_db_entry * lookup (const char *str, unsigned int len); ++}; ++/* starting time is 11:23:09 */ ++/* C++ code produced by gperf version 2.8 (ACE version) */ ++/* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_ModuleDef_Perfect_Hash_OpTable -N lookup */ ++unsigned int ++TAO_IR_ModuleDef_Perfect_Hash_OpTable::hash (const char *str, unsigned int len) ++{ ++ static const unsigned char asso_values[] = ++ { ++#if defined (ACE_MVS) ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 10, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 0, ++ 52, 0, 15, 0, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 20, 0, 5, ++ 52, 10, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 10, 20, 52, 52, 52, 10, 15, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, ++#else ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 10, 52, 0, 52, 0, ++ 15, 0, 52, 52, 52, 52, 52, 52, 20, 0, ++ 5, 52, 10, 52, 52, 10, 20, 52, 52, 52, ++ 10, 15, 52, 52, 52, 52, 52, 52, ++#endif /* ACE_MVS */ ++ }; ++ return len + asso_values[str[len - 1]] + asso_values[str[0]]; ++} + +-POA_IR::_TAO_IDLType_ThruPOA_Proxy_Impl::_TAO_IDLType_ThruPOA_Proxy_Impl (void) +-{} ++const class TAO_operation_db_entry * ++TAO_IR_ModuleDef_Perfect_Hash_OpTable::lookup (const char *str, unsigned int len) ++{ ++ enum ++ { ++ TOTAL_KEYWORDS = 30, ++ MIN_WORD_LENGTH = 4, ++ MAX_WORD_LENGTH = 26, ++ MIN_HASH_VALUE = 4, ++ MAX_HASH_VALUE = 51, ++ HASH_VALUE_RANGE = 48, ++ DUPLICATES = 5 ++ }; + +-// ThruPOA Implementation of the IDL interface methods ++ static const class TAO_operation_db_entry wordlist[] = ++ { ++ {"",0},{"",0},{"",0},{"",0}, ++ {"move", &POA_IR::ModuleDef::move_skel}, ++ {"create_enum", &POA_IR::ModuleDef::create_enum_skel}, ++ {"create_value", &POA_IR::ModuleDef::create_value_skel}, ++ {"create_module", &POA_IR::ModuleDef::create_module_skel}, ++ {"create_native", &POA_IR::ModuleDef::create_native_skel}, ++ {"_is_a", &POA_IR::ModuleDef::_is_a_skel}, ++ {"create_interface", &POA_IR::ModuleDef::create_interface_skel}, ++ {"create_union", &POA_IR::ModuleDef::create_union_skel}, ++ {"contents", &POA_IR::ModuleDef::contents_skel}, ++ {"_get_name", &POA_IR::ModuleDef::_get_name_skel}, ++ {"_set_name", &POA_IR::ModuleDef::_set_name_skel}, ++ {"create_exception", &POA_IR::ModuleDef::create_exception_skel}, ++ {"create_alias", &POA_IR::ModuleDef::create_alias_skel}, ++ {"describe", &POA_IR::ModuleDef::describe_skel}, ++ {"create_value_box", &POA_IR::ModuleDef::create_value_box_skel}, ++ {"_get_version", &POA_IR::ModuleDef::_get_version_skel}, ++ {"_set_version", &POA_IR::ModuleDef::_set_version_skel}, ++ {"_get_absolute_name", &POA_IR::ModuleDef::_get_absolute_name_skel}, ++ {"_get_defined_in", &POA_IR::ModuleDef::_get_defined_in_skel}, ++ {"lookup_name", &POA_IR::ModuleDef::lookup_name_skel}, ++ {"_get_id", &POA_IR::ModuleDef::_get_id_skel}, ++ {"_set_id", &POA_IR::ModuleDef::_set_id_skel}, ++ {"create_struct", &POA_IR::ModuleDef::create_struct_skel}, ++ {"create_constant", &POA_IR::ModuleDef::create_constant_skel}, ++ {"lookup", &POA_IR::ModuleDef::lookup_skel}, ++ {"destroy", &POA_IR::ModuleDef::destroy_skel}, ++ {"_get_def_kind", &POA_IR::ModuleDef::_get_def_kind_skel}, ++ {"describe_contents", &POA_IR::ModuleDef::describe_contents_skel}, ++ {"_non_existent", &POA_IR::ModuleDef::_non_existent_skel}, ++ {"_get_containing_repository", &POA_IR::ModuleDef::_get_containing_repository_skel}, ++ }; + +-CORBA::TypeCode_ptr POA_IR::_TAO_IDLType_ThruPOA_Proxy_Impl::type ( +- CORBA_Object *_collocated_tao_target_, +- CORBA::Environment &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) +-{ +- CORBA::TypeCode_var _tao_retval; +- ACE_UNUSED_ARG (_tao_retval); +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "type", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK_RETURN (0); +- return ACE_reinterpret_cast ( +- POA_IR::IDLType_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/IDLType:1.0" +- ) +- )->type ( +- ACE_TRY_ENV +- ); ++ static const signed char lookup[] = ++ { ++ -1, -1, -1, -1, 4, -7, -2, -13, -2, -19, -2, 5, 6, -59, ++ -1, 9, 10, 11, 12, -63, -1, 15, 16, 17, -24, -2, 18, -69, ++ 21, -1, 22, 23, -59, 26, -1, 27, 28, 29, 30, -1, -1, -1, ++ 31, 32, -1, -1, -1, -1, -1, -1, -1, 33, ++ }; ++ ++ if (len <= MAX_WORD_LENGTH && len >= MIN_WORD_LENGTH) ++ { ++ unsigned int key = hash (str, len); ++ ++ if (key <= MAX_HASH_VALUE && key >= MIN_HASH_VALUE) ++ { ++ int slot = lookup[key]; ++ ++ if (slot >= 0 && slot < MAX_HASH_VALUE) ++ { ++ const char *s = wordlist[slot].opname_; ++ ++ if (*str == *s && !strncmp (str + 1, s + 1, len - 1)) ++ return &wordlist[slot]; ++ } ++ else if (slot < 0 && slot >= -MAX_HASH_VALUE) ++ return 0; ++ else ++ { ++ unsigned int offset = key + slot + (slot > 0 ? -MAX_HASH_VALUE : MAX_HASH_VALUE); ++ const class TAO_operation_db_entry *base = &wordlist[-lookup[offset]]; ++ const class TAO_operation_db_entry *ptr = base + -lookup[offset + 1]; ++ ++ while (--ptr >= base) ++ if (*str == *ptr->opname_ && !strncmp (str + 1, ptr->opname_ + 1, len - 1)) ++ return ptr; ++ } ++ } ++ } ++ return 0; + } ++/* ending time is 11:23:09 */ ++static TAO_IR_ModuleDef_Perfect_Hash_OpTable tao_IR_ModuleDef_optable; +-// +-// End ThruPOA Proxy Implementation /////////////////////////////////////////////////////////////////////// -@@ -7519,7 +7510,7 @@ ++// Strategized Proxy Broker Implementation ++// - // copy ctor - POA_IR::IDLType::IDLType (const IDLType& rhs) +-// skeleton constructor +-POA_IR::IDLType::IDLType (void) ++// Factory function Implementation. ++POA_IR::_TAO_ModuleDef_Strategized_Proxy_Broker *POA_IR::_TAO_ModuleDef_Strategized_Proxy_Broker::the_TAO_ModuleDef_Strategized_Proxy_Broker (void) + { +- this->optable_ = &tao_IR_IDLType_optable; ++ static POA_IR::_TAO_ModuleDef_Strategized_Proxy_Broker strategized_proxy_broker; ++ return &strategized_proxy_broker; + } + +-// copy ctor +-POA_IR::IDLType::IDLType (const IDLType& rhs) - : ACE_NESTED_CLASS (POA_CORBA,IRObject) (rhs), -+ : POA_CORBA_IRObject (rhs), - TAO_ServantBase (rhs) - {} +- TAO_ServantBase (rhs) +-{} +- +-// skeleton destructor +-POA_IR::IDLType::~IDLType (void) ++POA_IR::_TAO_ModuleDef_Strategized_Proxy_Broker::_TAO_ModuleDef_Strategized_Proxy_Broker (void) + { ++ for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) ++ this->proxy_cache_[i] = 0; ++ + } -@@ -7619,7 +7610,7 @@ - POA_IR::IDLType *_tao_impl = (POA_IR::IDLType *) _tao_object_reference; - CORBA::Boolean _tao_retval = 0; - CORBA::String_var value; +-void POA_IR::IDLType::_get_type_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) ++POA_IR::_TAO_ModuleDef_Strategized_Proxy_Broker::~_TAO_ModuleDef_Strategized_Proxy_Broker (void) + { +- POA_IR::IDLType *_tao_impl = (POA_IR::IDLType *)_tao_object_reference; +- +- CORBA::TypeCode_var _tao_retval; +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::IDLType::TAO_ServerRequestInfo_IR_IDLType_type_get ri ( +- _tao_server_request, +- _tao_impl +- , +- ACE_TRY_ENV +- ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->type ( +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- CORBA::TypeCode_ptr _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ ++ for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) ++ delete this->proxy_cache_[i]; + +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << _tao_retval.in ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- + } + +-void POA_IR::IDLType::_is_a_skel ( +- TAO_ServerRequest &_tao_server_request, +- void * _tao_object_reference, +- void * /* context */, ++_TAO_ModuleDef_Proxy_Impl& ++POA_IR::_TAO_ModuleDef_Strategized_Proxy_Broker::select_proxy ( ++ IR_ModuleDef *object, + CORBA::Environment &ACE_TRY_ENV + ) + { +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::IDLType *_tao_impl = (POA_IR::IDLType *) _tao_object_reference; +- CORBA::Boolean _tao_retval = 0; +- CORBA::String_var value; - if (!(_tao_in >> value.out ())) -+ if (!((_tao_in >> value.out ()))) - ACE_THROW (CORBA::MARSHAL ()); - - _tao_retval = _tao_impl->_is_a (value.in (), ACE_TRY_ENV); -@@ -7627,7 +7618,7 @@ - - _tao_server_request.init_reply (); - TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- ACE_THROW (CORBA::MARSHAL ()); ++ TAO_ORB_Core::TAO_Collocation_Strategies strategy = ++ TAO_ORB_Core::collocation_strategy (object); + +- _tao_retval = _tao_impl->_is_a (value.in (), ACE_TRY_ENV); +- ACE_CHECK; ++ if (this->proxy_cache_[strategy] != 0) ++ return *this->proxy_cache_[strategy]; ++ ++ this->create_proxy (strategy, ACE_TRY_ENV); ++ ACE_CHECK_RETURN (*this->proxy_cache_[strategy]); ++ ++ return *this->proxy_cache_[strategy]; + +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); - if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) -+ if (!((_tao_out << CORBA::Any::from_boolean (_tao_retval)))) - ACE_THROW (CORBA::MARSHAL ()); +- ACE_THROW (CORBA::MARSHAL ()); } -@@ -7644,7 +7635,7 @@ +-void POA_IR::IDLType::_non_existent_skel ( +- TAO_ServerRequest &_tao_server_request, +- void * _tao_object_reference, +- void * /* context */, ++void ++POA_IR::_TAO_ModuleDef_Strategized_Proxy_Broker::create_proxy ( ++ TAO_ORB_Core::TAO_Collocation_Strategies strategy, + CORBA::Environment &ACE_TRY_ENV + ) + { +- POA_IR::IDLType *_tao_impl = (POA_IR::IDLType *) _tao_object_reference; +- CORBA::Boolean _tao_retval = _tao_impl->_non_existent (ACE_TRY_ENV); +- ACE_CHECK; ++ ACE_GUARD (TAO_SYNCH_MUTEX, guard, this->mutex_); - _tao_server_request.init_reply (); - TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); - if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) +- ACE_THROW (CORBA::MARSHAL ()); ++ if (this->proxy_cache_[strategy] == 0) ++ { ++ switch (strategy) ++ { ++ case TAO_ORB_Core::THRU_POA_STRATEGY: ++ ACE_NEW_THROW_EX ( ++ this->proxy_cache_[strategy], ++ _TAO_ModuleDef_ThruPOA_Proxy_Impl, ++ CORBA::NO_MEMORY () ++ ); ++ ACE_CHECK; ++ break; ++ ++ case TAO_ORB_Core::REMOTE_STRATEGY: ++ default: ++ ACE_NEW_THROW_EX ( ++ this->proxy_cache_[strategy], ++ _TAO_ModuleDef_Remote_Proxy_Impl, ++ CORBA::NO_MEMORY () ++ ); ++ ACE_CHECK; ++ break; ++ ++ } ++ ++ } + } + +-CORBA::Boolean POA_IR::IDLType::_is_a ( +- const char* value, ++ ++// ++// End Strategized Proxy Broker Implementation ++/////////////////////////////////////////////////////////////////////// ++ ++ ++_TAO_ModuleDef_Proxy_Broker * ++_TAO_ModuleDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) ++{ ++ ACE_UNUSED_ARG (obj); ++ return ::POA_IR::_TAO_ModuleDef_Strategized_Proxy_Broker::the_TAO_ModuleDef_Strategized_Proxy_Broker(); ++} ++ ++int ++_TAO_ModuleDef_Proxy_Broker_Factory_Initializer (long _dummy_) ++{ ++ ACE_UNUSED_ARG (_dummy_); ++ ++ _TAO_ModuleDef_Proxy_Broker_Factory_function_pointer = ++ _TAO_ModuleDef_Proxy_Broker_Factory_function; ++ ++ return 0; ++} ++ ++static int _TAO_ModuleDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = ++ _TAO_ModuleDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, _TAO_ModuleDef_Proxy_Broker_Factory_Initializer)); ++ ++ ++/////////////////////////////////////////////////////////////////////// ++// ThruPOA Proxy Implementation ++// ++ ++POA_IR::_TAO_ModuleDef_ThruPOA_Proxy_Impl::_TAO_ModuleDef_ThruPOA_Proxy_Impl (void) ++{} ++ ++POA_IR::_TAO_ModuleDef_ThruPOA_Proxy_Impl::~_TAO_ModuleDef_ThruPOA_Proxy_Impl (void) ++{} ++ ++// ThruPOA Implementation of the IDL interface methods ++ ++// ++// End ThruPOA Proxy Implementation ++/////////////////////////////////////////////////////////////////////// ++ ++// skeleton constructor ++POA_IR::ModuleDef::ModuleDef (void) ++{ ++ this->optable_ = &tao_IR_ModuleDef_optable; ++} ++ ++// copy ctor ++POA_IR::ModuleDef::ModuleDef (const ModuleDef& rhs) ++ : ACE_NESTED_CLASS (POA_IR,Container) (rhs), ++ ACE_NESTED_CLASS (POA_IR,Contained) (rhs), ++ POA_CORBA_IRObject (rhs), ++ TAO_ServantBase (rhs) ++{} ++ ++// skeleton destructor ++POA_IR::ModuleDef::~ModuleDef (void) ++{ ++} ++ ++void POA_IR::ModuleDef::_is_a_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void * _tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++ ) ++{ ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::ModuleDef *_tao_impl = (POA_IR::ModuleDef *) _tao_object_reference; ++ CORBA::Boolean _tao_retval = 0; ++ CORBA::String_var value; ++ if (!((_tao_in >> value.out ()))) ++ ACE_THROW (CORBA::MARSHAL ()); ++ ++ _tao_retval = _tao_impl->_is_a (value.in (), ACE_TRY_ENV); ++ ACE_CHECK; ++ ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); + if (!((_tao_out << CORBA::Any::from_boolean (_tao_retval)))) - ACE_THROW (CORBA::MARSHAL ()); ++ ACE_THROW (CORBA::MARSHAL ()); ++} ++ ++void POA_IR::ModuleDef::_non_existent_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void * _tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++ ) ++{ ++ POA_IR::ModuleDef *_tao_impl = (POA_IR::ModuleDef *) _tao_object_reference; ++ CORBA::Boolean _tao_retval = _tao_impl->_non_existent (ACE_TRY_ENV); ++ ACE_CHECK; ++ ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!((_tao_out << CORBA::Any::from_boolean (_tao_retval)))) ++ ACE_THROW (CORBA::MARSHAL ()); ++} ++ ++CORBA::Boolean POA_IR::ModuleDef::_is_a ( ++ const char* value, + CORBA::Environment &ACE_TRY_ENV + ) + { + if ( +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/IDLType:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/ModuleDef:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/Container:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/Contained:1.0")) || + (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/CORBA/IRObject:1.0")) || + (!ACE_OS::strcmp ((char *)value, CORBA::_tc_Object->id (ACE_TRY_ENV)))) + return 1; +@@ -7663,31 +5310,35 @@ + return 0; } -@@ -7669,7 +7660,7 @@ - if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/IDLType:1.0") == 0) - return ACE_static_cast (POA_IR::IDLType_ptr, this); +-void* POA_IR::IDLType::_downcast ( ++void* POA_IR::ModuleDef::_downcast ( + const char* logical_type_id + ) + { +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/IDLType:1.0") == 0) +- return ACE_static_cast (POA_IR::IDLType_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/ModuleDef:1.0") == 0) ++ return ACE_static_cast (POA_IR::ModuleDef_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Container:1.0") == 0) ++ return ACE_static_cast (POA_IR::Container_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Contained:1.0") == 0) ++ return ACE_static_cast (POA_IR::Contained_ptr, this); if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/IRObject:1.0") == 0) - return ACE_static_cast (POA_CORBA::IRObject_ptr, this); + return ACE_static_cast (POA_CORBA_IRObject_ptr, this); if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/Object:1.0") == 0) return ACE_static_cast(PortableServer::Servant, this); return 0; -@@ -7699,10 +7690,9 @@ + } + +-void POA_IR::IDLType::_dispatch (TAO_ServerRequest &req, void *context, CORBA::Environment &ACE_TRY_ENV) ++void POA_IR::ModuleDef::_dispatch (TAO_ServerRequest &req, void *context, CORBA::Environment &ACE_TRY_ENV) + { + this->synchronous_upcall_dispatch(req, context, this, ACE_TRY_ENV); + } + +-const char* POA_IR::IDLType::_interface_repository_id (void) const ++const char* POA_IR::ModuleDef::_interface_repository_id (void) const + { +- return "IDL:omg.org/IR/IDLType:1.0"; ++ return "IDL:omg.org/IR/ModuleDef:1.0"; + } + +-IR::IDLType* +-POA_IR::IDLType::_this (CORBA_Environment &ACE_TRY_ENV) ++IR::ModuleDef* ++POA_IR::ModuleDef::_this (CORBA_Environment &ACE_TRY_ENV) + { + TAO_Stub *stub = this->_create_stub (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); +@@ -7700,203 +5351,114 @@ ACE_NEW_RETURN (tmp, CORBA::Object (stub, 0, this), 0); CORBA::Object_var obj = tmp; - return ::IR::IDLType::_unchecked_narrow (obj.in ()); -+ return IR_IDLType::_unchecked_narrow (obj.in ()); - } - +-} - - #if (TAO_HAS_INTERCEPTORS == 1) - POA_IR::IDLType::TAO_ServerRequestInfo_IR_IDLType_type_get::TAO_ServerRequestInfo_IR_IDLType_type_get ( - TAO_ServerRequest &_tao_server_request, -@@ -7780,6 +7770,7 @@ +- +-#if (TAO_HAS_INTERCEPTORS == 1) +-POA_IR::IDLType::TAO_ServerRequestInfo_IR_IDLType_type_get::TAO_ServerRequestInfo_IR_IDLType_type_get ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::IDLType *tao_impl +- , +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl) +-{} +- +-Dynamic::ParameterList * +-POA_IR::IDLType::TAO_ServerRequestInfo_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 * +-POA_IR::IDLType::TAO_ServerRequestInfo_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 * +-POA_IR::IDLType::TAO_ServerRequestInfo_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 (); +-} +- +-char * +-POA_IR::IDLType::TAO_ServerRequestInfo_IR_IDLType_type_get::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::IDLType::TAO_ServerRequestInfo_IR_IDLType_type_get::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-void +-POA_IR::IDLType::TAO_ServerRequestInfo_IR_IDLType_type_get::result (CORBA::TypeCode_ptr result) +-{ +- // Update the result. +- this->_result = result; ++ return IR_ModuleDef::_unchecked_narrow (obj.in ()); } - #endif /* TAO_HAS_INTERCEPTORS */ -+ - class TAO_IR_Repository_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable +-#endif /* TAO_HAS_INTERCEPTORS */ +-class TAO_IR_Repository_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable ++class TAO_IR_ConstantDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable { private: -@@ -7787,7 +7778,7 @@ + unsigned int hash (const char *str, unsigned int len); public: const TAO_operation_db_entry * lookup (const char *str, unsigned int len); }; --/* starting time is 18:47:27 */ +-/* starting time is 16:31:12 */ +/* starting time is 11:23:09 */ /* C++ code produced by gperf version 2.8 (ACE version) */ - /* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_Repository_Perfect_Hash_OpTable -N lookup */ +-/* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_Repository_Perfect_Hash_OpTable -N lookup */ ++/* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_ConstantDef_Perfect_Hash_OpTable -N lookup */ unsigned int -@@ -7928,10 +7919,9 @@ +-TAO_IR_Repository_Perfect_Hash_OpTable::hash (const char *str, unsigned int len) ++TAO_IR_ConstantDef_Perfect_Hash_OpTable::hash (const char *str, unsigned int len) + { + static const unsigned char asso_values[] = + { + #if defined (ACE_MVS) +- 71, 71, 71, 71, 71, 71, 71, 71, 71, 71, +- 71, 71, 71, 71, 71, 71, 71, 71, 71, 71, +- 71, 71, 71, 71, 71, 71, 71, 71, 71, 71, +- 71, 71, 71, 71, 71, 71, 71, 71, 71, 71, +- 71, 71, 71, 71, 71, 71, 71, 71, 71, 71, +- 71, 71, 71, 71, 71, 71, 71, 71, 71, 71, +- 71, 71, 71, 71, 71, 71, 71, 71, 71, 71, +- 71, 71, 71, 71, 71, 71, 71, 71, 71, 71, +- 71, 71, 71, 71, 71, 71, 71, 71, 71, 71, +- 71, 71, 71, 71, 71, 71, 71, 71, 71, 71, +- 71, 71, 71, 71, 71, 71, 71, 71, 71, 20, +- 71, 71, 71, 71, 71, 71, 71, 71, 71, 71, +- 71, 71, 71, 71, 71, 71, 71, 71, 71, 15, +- 71, 0, 23, 10, 71, 5, 71, 71, 71, 71, +- 71, 71, 71, 71, 71, 71, 71, 0, 0, 15, +- 71, 0, 71, 71, 71, 71, 71, 71, 71, 71, +- 71, 71, 30, 0, 71, 71, 71, 0, 0, 71, +- 71, 71, 71, 71, 71, 71, 71, 71, 71, 71, +- 71, 71, 71, 71, 71, 71, 71, 71, 71, 71, +- 71, 71, 71, 71, 71, 71, 71, 71, 71, 71, +- 71, 71, 71, 71, 71, 71, 71, 71, 71, 71, +- 71, 71, 71, 71, 71, 71, 71, 71, 71, 71, +- 71, 71, 71, 71, 71, 71, 71, 71, 71, 71, +- 71, 71, 71, 71, 71, 71, 71, 71, 71, 71, +- 71, 71, 71, 71, 71, 71, 71, 71, 71, 71, +- 71, 71, 71, 71, 71, 71, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 0, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 0, ++ 37, 37, 0, 0, 10, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 0, 0, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 15, 37, 37, 37, 37, 10, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, + #else +- 71, 71, 71, 71, 71, 71, 71, 71, 71, 71, +- 71, 71, 71, 71, 71, 71, 71, 71, 71, 71, +- 71, 71, 71, 71, 71, 71, 71, 71, 71, 71, +- 71, 71, 71, 71, 71, 71, 71, 71, 71, 71, +- 71, 71, 71, 71, 71, 71, 71, 71, 71, 71, +- 71, 71, 71, 71, 71, 71, 71, 71, 71, 71, +- 71, 71, 71, 71, 71, 71, 71, 71, 71, 71, +- 71, 71, 71, 71, 71, 71, 71, 71, 71, 71, +- 71, 71, 71, 71, 71, 71, 71, 71, 71, 71, +- 71, 71, 71, 71, 71, 20, 71, 15, 71, 0, +- 23, 10, 71, 5, 71, 71, 71, 71, 0, 0, +- 15, 71, 0, 71, 71, 30, 0, 71, 71, 71, +- 0, 0, 71, 71, 71, 71, 71, 71, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 0, 37, 0, 37, 37, ++ 0, 0, 10, 37, 37, 37, 37, 37, 37, 0, ++ 0, 37, 37, 37, 37, 37, 15, 37, 37, 37, ++ 37, 10, 37, 37, 37, 37, 37, 37, + #endif /* ACE_MVS */ + }; + return len + asso_values[str[len - 1]] + asso_values[str[0]]; + } + + const class TAO_operation_db_entry * +-TAO_IR_Repository_Perfect_Hash_OpTable::lookup (const char *str, unsigned int len) ++TAO_IR_ConstantDef_Perfect_Hash_OpTable::lookup (const char *str, unsigned int len) + { + enum + { +- TOTAL_KEYWORDS = 27, +- MIN_WORD_LENGTH = 5, +- MAX_WORD_LENGTH = 22, +- MIN_HASH_VALUE = 6, +- MAX_HASH_VALUE = 70, +- HASH_VALUE_RANGE = 65, +- DUPLICATES = 2 ++ TOTAL_KEYWORDS = 20, ++ MIN_WORD_LENGTH = 4, ++ MAX_WORD_LENGTH = 26, ++ MIN_HASH_VALUE = 4, ++ MAX_HASH_VALUE = 36, ++ HASH_VALUE_RANGE = 33, ++ DUPLICATES = 7 + }; + + static const class TAO_operation_db_entry wordlist[] = + { +- {"",0},{"",0},{"",0},{"",0},{"",0},{"",0}, +- {"lookup", &POA_IR::Repository::lookup_skel}, +- {"create_enum", &POA_IR::Repository::create_enum_skel}, +- {"create_array", &POA_IR::Repository::create_array_skel}, +- {"create_struct", &POA_IR::Repository::create_struct_skel}, +- {"create_constant", &POA_IR::Repository::create_constant_skel}, +- {"create_value_box", &POA_IR::Repository::create_value_box_skel}, +- {"create_string", &POA_IR::Repository::create_string_skel}, +- {"create_wstring", &POA_IR::Repository::create_wstring_skel}, +- {"lookup_name", &POA_IR::Repository::lookup_name_skel}, +- {"create_value", &POA_IR::Repository::create_value_skel}, +- {"create_module", &POA_IR::Repository::create_module_skel}, +- {"create_native", &POA_IR::Repository::create_native_skel}, +- {"create_sequence", &POA_IR::Repository::create_sequence_skel}, +- {"create_interface", &POA_IR::Repository::create_interface_skel}, +- {"create_union", &POA_IR::Repository::create_union_skel}, +- {"get_primitive", &POA_IR::Repository::get_primitive_skel}, +- {"destroy", &POA_IR::Repository::destroy_skel}, +- {"create_exception", &POA_IR::Repository::create_exception_skel}, +- {"lookup_id", &POA_IR::Repository::lookup_id_skel}, +- {"_non_existent", &POA_IR::Repository::_non_existent_skel}, +- {"create_fixed", &POA_IR::Repository::create_fixed_skel}, +- {"get_canonical_typecode", &POA_IR::Repository::get_canonical_typecode_skel}, +- {"contents", &POA_IR::Repository::contents_skel}, +- {"_is_a", &POA_IR::Repository::_is_a_skel}, +- {"create_alias", &POA_IR::Repository::create_alias_skel}, +- {"_get_def_kind", &POA_IR::Repository::_get_def_kind_skel}, +- {"describe_contents", &POA_IR::Repository::describe_contents_skel}, ++ {"",0},{"",0},{"",0},{"",0}, ++ {"move", &POA_IR::ConstantDef::move_skel}, ++ {"_is_a", &POA_IR::ConstantDef::_is_a_skel}, ++ {"_get_id", &POA_IR::ConstantDef::_get_id_skel}, ++ {"_set_id", &POA_IR::ConstantDef::_set_id_skel}, ++ {"describe", &POA_IR::ConstantDef::describe_skel}, ++ {"_get_type", &POA_IR::ConstantDef::_get_type_skel}, ++ {"_set_name", &POA_IR::ConstantDef::_set_name_skel}, ++ {"_get_name", &POA_IR::ConstantDef::_get_name_skel}, ++ {"_get_value", &POA_IR::ConstantDef::_get_value_skel}, ++ {"_set_value", &POA_IR::ConstantDef::_set_value_skel}, ++ {"_get_version", &POA_IR::ConstantDef::_get_version_skel}, ++ {"_set_version", &POA_IR::ConstantDef::_set_version_skel}, ++ {"_get_def_kind", &POA_IR::ConstantDef::_get_def_kind_skel}, ++ {"_get_defined_in", &POA_IR::ConstantDef::_get_defined_in_skel}, ++ {"destroy", &POA_IR::ConstantDef::destroy_skel}, ++ {"_get_absolute_name", &POA_IR::ConstantDef::_get_absolute_name_skel}, ++ {"_get_type_def", &POA_IR::ConstantDef::_get_type_def_skel}, ++ {"_set_type_def", &POA_IR::ConstantDef::_set_type_def_skel}, ++ {"_non_existent", &POA_IR::ConstantDef::_non_existent_skel}, ++ {"_get_containing_repository", &POA_IR::ConstantDef::_get_containing_repository_skel}, + }; + + static const signed char lookup[] = + { +- -1, -1, -1, -1, -1, -1, 6, -1, -1, -16, -2, 7, 8, 9, +- -1, 10, 11, -1, 12, 13, -1, 14, 15, -84, -1, 18, 19, 20, +- 21, -1, 22, 23, 24, 25, -1, 26, -1, 27, 28, -1, 29, -1, +- 30, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, +- 31, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, +- 32, ++ -12, -2, -14, -2, 4, 5, -1, 53, 8, 46, -46, -1, -46, 16, ++ -1, 17, -1, 18, 19, -9, -3, -20, -2, -38, -6, -2, -1, -1, ++ 22, -1, -1, -1, -1, -1, -1, -1, 23, + }; + + if (len <= MAX_WORD_LENGTH && len >= MIN_WORD_LENGTH) +@@ -7930,38 +5492,37 @@ } return 0; } --/* ending time is 18:47:27 */ +-/* ending time is 16:31:12 */ +-static TAO_IR_Repository_Perfect_Hash_OpTable tao_IR_Repository_optable; +- +/* ending time is 11:23:09 */ - static TAO_IR_Repository_Perfect_Hash_OpTable tao_IR_Repository_optable; ++static TAO_IR_ConstantDef_Perfect_Hash_OpTable tao_IR_ConstantDef_optable; -- /////////////////////////////////////////////////////////////////////// // Strategized Proxy Broker Implementation // -@@ -7957,9 +7947,9 @@ + + // Factory function Implementation. +-POA_IR::_TAO_Repository_Strategized_Proxy_Broker *POA_IR::_TAO_Repository_Strategized_Proxy_Broker::the_TAO_Repository_Strategized_Proxy_Broker (void) ++POA_IR::_TAO_ConstantDef_Strategized_Proxy_Broker *POA_IR::_TAO_ConstantDef_Strategized_Proxy_Broker::the_TAO_ConstantDef_Strategized_Proxy_Broker (void) + { +- static POA_IR::_TAO_Repository_Strategized_Proxy_Broker strategized_proxy_broker; ++ static POA_IR::_TAO_ConstantDef_Strategized_Proxy_Broker strategized_proxy_broker; + return &strategized_proxy_broker; + } + +-POA_IR::_TAO_Repository_Strategized_Proxy_Broker::_TAO_Repository_Strategized_Proxy_Broker (void) ++POA_IR::_TAO_ConstantDef_Strategized_Proxy_Broker::_TAO_ConstantDef_Strategized_Proxy_Broker (void) + { + for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) + this->proxy_cache_[i] = 0; + + } + +-POA_IR::_TAO_Repository_Strategized_Proxy_Broker::~_TAO_Repository_Strategized_Proxy_Broker (void) ++POA_IR::_TAO_ConstantDef_Strategized_Proxy_Broker::~_TAO_ConstantDef_Strategized_Proxy_Broker (void) + { + for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) + delete this->proxy_cache_[i]; } -IR::_TAO_Repository_Proxy_Impl& -+_TAO_Repository_Proxy_Impl& - POA_IR::_TAO_Repository_Strategized_Proxy_Broker::select_proxy ( +-POA_IR::_TAO_Repository_Strategized_Proxy_Broker::select_proxy ( - ::IR::Repository *object, -+ IR_Repository *object, ++_TAO_ConstantDef_Proxy_Impl& ++POA_IR::_TAO_ConstantDef_Strategized_Proxy_Broker::select_proxy ( ++ IR_ConstantDef *object, CORBA::Environment &ACE_TRY_ENV ) { -@@ -7991,7 +7981,7 @@ +@@ -7979,7 +5540,7 @@ + } + + void +-POA_IR::_TAO_Repository_Strategized_Proxy_Broker::create_proxy ( ++POA_IR::_TAO_ConstantDef_Strategized_Proxy_Broker::create_proxy ( + TAO_ORB_Core::TAO_Collocation_Strategies strategy, + CORBA::Environment &ACE_TRY_ENV + ) +@@ -7993,7 +5554,7 @@ case TAO_ORB_Core::THRU_POA_STRATEGY: ACE_NEW_THROW_EX ( this->proxy_cache_[strategy], - POA_IR::_TAO_Repository_ThruPOA_Proxy_Impl, -+ _TAO_Repository_ThruPOA_Proxy_Impl, ++ _TAO_ConstantDef_ThruPOA_Proxy_Impl, CORBA::NO_MEMORY () ); ACE_CHECK; -@@ -8001,7 +7991,7 @@ +@@ -8003,7 +5564,7 @@ default: ACE_NEW_THROW_EX ( this->proxy_cache_[strategy], - ::IR::_TAO_Repository_Remote_Proxy_Impl, -+ _TAO_Repository_Remote_Proxy_Impl, ++ _TAO_ConstantDef_Remote_Proxy_Impl, CORBA::NO_MEMORY () ); ACE_CHECK; -@@ -8018,26 +8008,26 @@ +@@ -8020,73 +5581,42 @@ /////////////////////////////////////////////////////////////////////// -IR::_TAO_Repository_Proxy_Broker * -IR__TAO_Repository_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) -+_TAO_Repository_Proxy_Broker * -+_TAO_Repository_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) ++_TAO_ConstantDef_Proxy_Broker * ++_TAO_ConstantDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) { ACE_UNUSED_ARG (obj); - return ::POA_IR::_TAO_Repository_Strategized_Proxy_Broker::the_TAO_Repository_Strategized_Proxy_Broker(); +- return ::POA_IR::_TAO_Repository_Strategized_Proxy_Broker::the_TAO_Repository_Strategized_Proxy_Broker(); ++ return ::POA_IR::_TAO_ConstantDef_Strategized_Proxy_Broker::the_TAO_ConstantDef_Strategized_Proxy_Broker(); } int -IR__TAO_Repository_Proxy_Broker_Factory_Initializer (long _dummy_) -+_TAO_Repository_Proxy_Broker_Factory_Initializer (long _dummy_) ++_TAO_ConstantDef_Proxy_Broker_Factory_Initializer (long _dummy_) { ACE_UNUSED_ARG (_dummy_); - IR__TAO_Repository_Proxy_Broker_Factory_function_pointer = - IR__TAO_Repository_Proxy_Broker_Factory_function; -+ _TAO_Repository_Proxy_Broker_Factory_function_pointer = -+ _TAO_Repository_Proxy_Broker_Factory_function; ++ _TAO_ConstantDef_Proxy_Broker_Factory_function_pointer = ++ _TAO_ConstantDef_Proxy_Broker_Factory_function; return 0; } -static int IR__TAO_Repository_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = - IR__TAO_Repository_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, IR__TAO_Repository_Proxy_Broker_Factory_Initializer)); -+static int _TAO_Repository_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = -+ _TAO_Repository_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, _TAO_Repository_Proxy_Broker_Factory_Initializer)); ++static int _TAO_ConstantDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = ++ _TAO_ConstantDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, _TAO_ConstantDef_Proxy_Broker_Factory_Initializer)); /////////////////////////////////////////////////////////////////////// -@@ -8058,7 +8048,7 @@ - CORBA::SystemException - )) - { + // ThruPOA Proxy Implementation + // + +-POA_IR::_TAO_Repository_ThruPOA_Proxy_Impl::_TAO_Repository_ThruPOA_Proxy_Impl (void) ++POA_IR::_TAO_ConstantDef_ThruPOA_Proxy_Impl::_TAO_ConstantDef_ThruPOA_Proxy_Impl (void) + {} + +-// ThruPOA Implementation of the IDL interface methods ++POA_IR::_TAO_ConstantDef_ThruPOA_Proxy_Impl::~_TAO_ConstantDef_ThruPOA_Proxy_Impl (void) ++{} + +-IR::Contained_ptr POA_IR::_TAO_Repository_ThruPOA_Proxy_Impl::lookup_id ( +- CORBA_Object *_collocated_tao_target_, +- const char * search_id, +- CORBA::Environment &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) +-{ - IR::Contained_var _tao_retval; -+ IR_Contained_var _tao_retval; - ACE_UNUSED_ARG (_tao_retval); - TAO_Object_Adapter::Servant_Upcall servant_upcall ( - _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -8115,16 +8105,16 @@ - ); - } +- ACE_UNUSED_ARG (_tao_retval); +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "lookup_id", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK_RETURN (0); +- return ACE_reinterpret_cast ( +- POA_IR::Repository_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/Repository:1.0" +- ) +- )->lookup_id ( +- search_id, +- ACE_TRY_ENV +- ); +-} ++// ThruPOA Implementation of the IDL interface methods --IR::PrimitiveDef_ptr POA_IR::_TAO_Repository_ThruPOA_Proxy_Impl::get_primitive ( -+IR_PrimitiveDef_ptr POA_IR::_TAO_Repository_ThruPOA_Proxy_Impl::get_primitive ( +-CORBA::TypeCode_ptr POA_IR::_TAO_Repository_ThruPOA_Proxy_Impl::get_canonical_typecode ( ++CORBA::TypeCode_ptr POA_IR::_TAO_ConstantDef_ThruPOA_Proxy_Impl::type ( CORBA_Object *_collocated_tao_target_, -- IR::PrimitiveKind kind, -+ IR_PrimitiveKind kind, +- CORBA::TypeCode_ptr tc, CORBA::Environment &ACE_TRY_ENV ) ACE_THROW_SPEC (( - CORBA::SystemException - )) - { +@@ -8101,98 +5631,30 @@ + CORBA::Object_var forward_to; + servant_upcall.prepare_for_upcall ( + _collocated_tao_target_->_object_key (), +- "get_canonical_typecode", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK_RETURN (0); +- return ACE_reinterpret_cast ( +- POA_IR::Repository_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/Repository:1.0" +- ) +- )->get_canonical_typecode ( +- tc, +- ACE_TRY_ENV +- ); +-} +- +-IR::PrimitiveDef_ptr POA_IR::_TAO_Repository_ThruPOA_Proxy_Impl::get_primitive ( +- CORBA_Object *_collocated_tao_target_, +- IR::PrimitiveKind kind, +- CORBA::Environment &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) +-{ - IR::PrimitiveDef_var _tao_retval; -+ IR_PrimitiveDef_var _tao_retval; - ACE_UNUSED_ARG (_tao_retval); - TAO_Object_Adapter::Servant_Upcall servant_upcall ( - _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -8148,7 +8138,7 @@ - ); - } - +- ACE_UNUSED_ARG (_tao_retval); +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "get_primitive", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK_RETURN (0); +- return ACE_reinterpret_cast ( +- POA_IR::Repository_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/Repository:1.0" +- ) +- )->get_primitive ( +- kind, +- ACE_TRY_ENV +- ); +-} +- -IR::StringDef_ptr POA_IR::_TAO_Repository_ThruPOA_Proxy_Impl::create_string ( -+IR_StringDef_ptr POA_IR::_TAO_Repository_ThruPOA_Proxy_Impl::create_string ( - CORBA_Object *_collocated_tao_target_, - CORBA::ULong bound, - CORBA::Environment &ACE_TRY_ENV -@@ -8157,7 +8147,7 @@ - CORBA::SystemException - )) - { +- CORBA_Object *_collocated_tao_target_, +- CORBA::ULong bound, +- CORBA::Environment &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) +-{ - IR::StringDef_var _tao_retval; -+ IR_StringDef_var _tao_retval; - ACE_UNUSED_ARG (_tao_retval); - TAO_Object_Adapter::Servant_Upcall servant_upcall ( - _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -8181,7 +8171,7 @@ +- ACE_UNUSED_ARG (_tao_retval); +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "create_string", ++ "type", + forward_to.out (), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + return ACE_reinterpret_cast ( +- POA_IR::Repository_ptr, ++ POA_IR::ConstantDef_ptr, + servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/Repository:1.0" ++ "IDL:omg.org/IR/ConstantDef:1.0" + ) +- )->create_string ( +- bound, ++ )->type ( + ACE_TRY_ENV ); } -IR::WstringDef_ptr POA_IR::_TAO_Repository_ThruPOA_Proxy_Impl::create_wstring ( -+IR_WstringDef_ptr POA_IR::_TAO_Repository_ThruPOA_Proxy_Impl::create_wstring ( ++IR::IDLType_ptr POA_IR::_TAO_ConstantDef_ThruPOA_Proxy_Impl::type_def ( CORBA_Object *_collocated_tao_target_, - CORBA::ULong bound, +- CORBA::ULong bound, CORBA::Environment &ACE_TRY_ENV -@@ -8190,7 +8180,7 @@ + ) + ACE_THROW_SPEC (( CORBA::SystemException )) { - IR::WstringDef_var _tao_retval; -+ IR_WstringDef_var _tao_retval; ++ IR_IDLType_var _tao_retval; ACE_UNUSED_ARG (_tao_retval); TAO_Object_Adapter::Servant_Upcall servant_upcall ( _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -8214,17 +8204,17 @@ +@@ -8200,68 +5662,62 @@ + CORBA::Object_var forward_to; + servant_upcall.prepare_for_upcall ( + _collocated_tao_target_->_object_key (), +- "create_wstring", ++ "type_def", + forward_to.out (), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + return ACE_reinterpret_cast ( +- POA_IR::Repository_ptr, ++ POA_IR::ConstantDef_ptr, + servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/Repository:1.0" ++ "IDL:omg.org/IR/ConstantDef:1.0" + ) +- )->create_wstring ( +- bound, ++ )->type_def ( + ACE_TRY_ENV ); } -IR::SequenceDef_ptr POA_IR::_TAO_Repository_ThruPOA_Proxy_Impl::create_sequence ( -+IR_SequenceDef_ptr POA_IR::_TAO_Repository_ThruPOA_Proxy_Impl::create_sequence ( ++void POA_IR::_TAO_ConstantDef_ThruPOA_Proxy_Impl::type_def ( CORBA_Object *_collocated_tao_target_, - CORBA::ULong bound, +- CORBA::ULong bound, - IR::IDLType_ptr element_type, -+ IR_IDLType_ptr element_type, ++ IR_IDLType_ptr type_def, CORBA::Environment &ACE_TRY_ENV ) ACE_THROW_SPEC (( @@ -2181,20 +11015,43 @@ )) { - IR::SequenceDef_var _tao_retval; -+ IR_SequenceDef_var _tao_retval; - ACE_UNUSED_ARG (_tao_retval); +- ACE_UNUSED_ARG (_tao_retval); TAO_Object_Adapter::Servant_Upcall servant_upcall ( _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -8249,17 +8239,17 @@ + ); + CORBA::Object_var forward_to; + servant_upcall.prepare_for_upcall ( + _collocated_tao_target_->_object_key (), +- "create_sequence", ++ "type_def", + forward_to.out (), + ACE_TRY_ENV + ); +- ACE_CHECK_RETURN (0); +- return ACE_reinterpret_cast ( +- POA_IR::Repository_ptr, ++ ACE_CHECK; ++ ACE_reinterpret_cast ( ++ POA_IR::ConstantDef_ptr, + servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/Repository:1.0" ++ "IDL:omg.org/IR/ConstantDef:1.0" + ) +- )->create_sequence ( +- bound, +- element_type, ++ )->type_def ( ++ type_def, + ACE_TRY_ENV ); ++ return; } -IR::ArrayDef_ptr POA_IR::_TAO_Repository_ThruPOA_Proxy_Impl::create_array ( -+IR_ArrayDef_ptr POA_IR::_TAO_Repository_ThruPOA_Proxy_Impl::create_array ( ++CORBA::Any * POA_IR::_TAO_ConstantDef_ThruPOA_Proxy_Impl::value ( CORBA_Object *_collocated_tao_target_, - CORBA::ULong length, +- CORBA::ULong length, - IR::IDLType_ptr element_type, -+ IR_IDLType_ptr element_type, CORBA::Environment &ACE_TRY_ENV ) ACE_THROW_SPEC (( @@ -2202,239 +11059,911 @@ )) { - IR::ArrayDef_var _tao_retval; -+ IR_ArrayDef_var _tao_retval; ++ CORBA::Any_var _tao_retval; ACE_UNUSED_ARG (_tao_retval); TAO_Object_Adapter::Servant_Upcall servant_upcall ( _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -8284,7 +8274,7 @@ +@@ -8269,56 +5725,51 @@ + CORBA::Object_var forward_to; + servant_upcall.prepare_for_upcall ( + _collocated_tao_target_->_object_key (), +- "create_array", ++ "value", + forward_to.out (), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + return ACE_reinterpret_cast ( +- POA_IR::Repository_ptr, ++ POA_IR::ConstantDef_ptr, + servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/Repository:1.0" ++ "IDL:omg.org/IR/ConstantDef:1.0" + ) +- )->create_array ( +- length, +- element_type, ++ )->value ( + ACE_TRY_ENV ); } -IR::FixedDef_ptr POA_IR::_TAO_Repository_ThruPOA_Proxy_Impl::create_fixed ( -+IR_FixedDef_ptr POA_IR::_TAO_Repository_ThruPOA_Proxy_Impl::create_fixed ( ++void POA_IR::_TAO_ConstantDef_ThruPOA_Proxy_Impl::value ( CORBA_Object *_collocated_tao_target_, - CORBA::UShort digits, - CORBA::Short scale, -@@ -8294,7 +8284,7 @@ +- CORBA::UShort digits, +- CORBA::Short scale, ++ const CORBA::Any & value, + CORBA::Environment &ACE_TRY_ENV + ) + ACE_THROW_SPEC (( CORBA::SystemException )) { - IR::FixedDef_var _tao_retval; -+ IR_FixedDef_var _tao_retval; - ACE_UNUSED_ARG (_tao_retval); +- ACE_UNUSED_ARG (_tao_retval); TAO_Object_Adapter::Servant_Upcall servant_upcall ( _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -8332,7 +8322,7 @@ + ); + CORBA::Object_var forward_to; + servant_upcall.prepare_for_upcall ( + _collocated_tao_target_->_object_key (), +- "create_fixed", ++ "value", + forward_to.out (), + ACE_TRY_ENV + ); +- ACE_CHECK_RETURN (0); +- return ACE_reinterpret_cast ( +- POA_IR::Repository_ptr, ++ ACE_CHECK; ++ ACE_reinterpret_cast ( ++ POA_IR::ConstantDef_ptr, + servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/Repository:1.0" ++ "IDL:omg.org/IR/ConstantDef:1.0" + ) +- )->create_fixed ( +- digits, +- scale, ++ )->value ( ++ value, + ACE_TRY_ENV + ); ++ return; + } + + // +@@ -8326,787 +5777,198 @@ + /////////////////////////////////////////////////////////////////////// + + // skeleton constructor +-POA_IR::Repository::Repository (void) ++POA_IR::ConstantDef::ConstantDef (void) + { +- this->optable_ = &tao_IR_Repository_optable; ++ this->optable_ = &tao_IR_ConstantDef_optable; + } + // copy ctor - POA_IR::Repository::Repository (const Repository& rhs) - : ACE_NESTED_CLASS (POA_IR,Container) (rhs), +-POA_IR::Repository::Repository (const Repository& rhs) +- : ACE_NESTED_CLASS (POA_IR,Container) (rhs), - ACE_NESTED_CLASS (POA_CORBA,IRObject) (rhs), ++POA_IR::ConstantDef::ConstantDef (const ConstantDef& rhs) ++ : ACE_NESTED_CLASS (POA_IR,Contained) (rhs), + POA_CORBA_IRObject (rhs), TAO_ServantBase (rhs) {} -@@ -8351,14 +8341,13 @@ - TAO_InputCDR &_tao_in = _tao_server_request.incoming (); - POA_IR::Repository *_tao_impl = (POA_IR::Repository *)_tao_object_reference; - -- IR::Contained_var _tao_retval; -+ IR_Contained_var _tao_retval; - CORBA::String_var search_id; + // skeleton destructor +-POA_IR::Repository::~Repository (void) ++POA_IR::ConstantDef::~ConstantDef (void) + { + } + +-void POA_IR::Repository::lookup_id_skel ( ++void POA_IR::ConstantDef::_get_type_skel ( + TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, ++ void *_tao_object_reference, ++ void * /* context */, + CORBA::Environment &ACE_TRY_ENV +- ) ++) + { +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::Repository *_tao_impl = (POA_IR::Repository *)_tao_object_reference; ++ POA_IR::ConstantDef *_tao_impl = (POA_IR::ConstantDef *)_tao_object_reference; + +- IR::Contained_var _tao_retval; +- CORBA::String_var search_id; ++ CORBA::TypeCode_var _tao_retval; ++ ++ _tao_retval = _tao_impl->type ( ++ ACE_TRY_ENV ++ ); ++ ++ ACE_CHECK; ++ ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); if (!( - (_tao_in >> search_id.out ()) - )) - ACE_THROW (CORBA::MARSHAL()); - -- - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( - _tao_server_request.orb_core ()->server_request_interceptors (), -@@ -8386,7 +8375,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::Contained_ptr _tao_retval_info = _tao_retval._retn (); -+ IR_Contained_ptr _tao_retval_info = _tao_retval._retn (); - ri.result (_tao_retval_info); - _tao_retval = _tao_retval_info; - ri.reply_status (PortableInterceptor::SUCCESSFUL); -@@ -8447,7 +8436,6 @@ +- (_tao_in >> search_id.out ()) ++ (_tao_out << _tao_retval.in ()) )) - ACE_THROW (CORBA::MARSHAL()); +- ACE_THROW (CORBA::MARSHAL()); ++ ACE_THROW (CORBA::MARSHAL () ); ++} ++ ++void POA_IR::ConstantDef::_get_type_def_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) ++{ ++ POA_IR::ConstantDef *_tao_impl = (POA_IR::ConstantDef *)_tao_object_reference; + ++ IR_IDLType_var _tao_retval; +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::Repository::TAO_ServerRequestInfo_IR_Repository_lookup_id ri ( +- _tao_server_request, +- _tao_impl +- , +- search_id.in (), ++ _tao_retval = _tao_impl->type_def ( + ACE_TRY_ENV + ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = - - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( - _tao_server_request.orb_core ()->server_request_interceptors (), -@@ -8529,14 +8517,13 @@ - TAO_InputCDR &_tao_in = _tao_server_request.incoming (); - POA_IR::Repository *_tao_impl = (POA_IR::Repository *)_tao_object_reference; - -- IR::PrimitiveDef_var _tao_retval; -- IR::PrimitiveKind kind; -+ IR_PrimitiveDef_var _tao_retval; -+ IR_PrimitiveKind kind; - if (!( - (_tao_in >> kind) - )) - ACE_THROW (CORBA::MARSHAL()); - -- - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( - _tao_server_request.orb_core ()->server_request_interceptors (), -@@ -8564,7 +8551,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::PrimitiveDef_ptr _tao_retval_info = _tao_retval._retn (); -+ IR_PrimitiveDef_ptr _tao_retval_info = _tao_retval._retn (); - ri.result (_tao_retval_info); - _tao_retval = _tao_retval_info; - ri.reply_status (PortableInterceptor::SUCCESSFUL); -@@ -8618,14 +8605,13 @@ - TAO_InputCDR &_tao_in = _tao_server_request.incoming (); - POA_IR::Repository *_tao_impl = (POA_IR::Repository *)_tao_object_reference; - -- IR::StringDef_var _tao_retval; -+ IR_StringDef_var _tao_retval; - CORBA::ULong bound; +- _tao_impl->lookup_id ( +- search_id.in (), +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::Contained_ptr _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; ++ + ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); ++ ++ _tao_server_request.init_reply (); + TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); if (!( - (_tao_in >> bound) + (_tao_out << _tao_retval.in ()) )) - ACE_THROW (CORBA::MARSHAL()); - -- - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( - _tao_server_request.orb_core ()->server_request_interceptors (), -@@ -8653,7 +8639,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::StringDef_ptr _tao_retval_info = _tao_retval._retn (); -+ IR_StringDef_ptr _tao_retval_info = _tao_retval._retn (); - ri.result (_tao_retval_info); - _tao_retval = _tao_retval_info; - ri.reply_status (PortableInterceptor::SUCCESSFUL); -@@ -8707,14 +8693,13 @@ +- ACE_THROW (CORBA::MARSHAL()); +- ++ ACE_THROW (CORBA::MARSHAL () ); + } + +-void POA_IR::Repository::get_canonical_typecode_skel ( ++void POA_IR::ConstantDef::_set_type_def_skel ( + TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, ++ void *_tao_object_reference, ++ void * /* context */, + CORBA::Environment &ACE_TRY_ENV +- ) ++) + { TAO_InputCDR &_tao_in = _tao_server_request.incoming (); - POA_IR::Repository *_tao_impl = (POA_IR::Repository *)_tao_object_reference; - -- IR::WstringDef_var _tao_retval; -+ IR_WstringDef_var _tao_retval; - CORBA::ULong bound; +- POA_IR::Repository *_tao_impl = (POA_IR::Repository *)_tao_object_reference; ++ POA_IR::ConstantDef *_tao_impl = (POA_IR::ConstantDef *)_tao_object_reference; + +- CORBA::TypeCode_var _tao_retval; +- CORBA::TypeCode_var tc; ++ IR_IDLType_var type_def; if (!( - (_tao_in >> bound) +- (_tao_in >> tc.out ()) ++ (_tao_in >> type_def.out ()) )) - ACE_THROW (CORBA::MARSHAL()); - -- - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( - _tao_server_request.orb_core ()->server_request_interceptors (), -@@ -8742,7 +8727,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::WstringDef_ptr _tao_retval_info = _tao_retval._retn (); -+ IR_WstringDef_ptr _tao_retval_info = _tao_retval._retn (); - ri.result (_tao_retval_info); - _tao_retval = _tao_retval_info; - ri.reply_status (PortableInterceptor::SUCCESSFUL); -@@ -8796,16 +8781,15 @@ - TAO_InputCDR &_tao_in = _tao_server_request.incoming (); - POA_IR::Repository *_tao_impl = (POA_IR::Repository *)_tao_object_reference; - -- IR::SequenceDef_var _tao_retval; -+ IR_SequenceDef_var _tao_retval; - CORBA::ULong bound; +- ACE_THROW (CORBA::MARSHAL()); ++ ACE_THROW (CORBA::MARSHAL () ); + +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::Repository::TAO_ServerRequestInfo_IR_Repository_get_canonical_typecode ri ( +- _tao_server_request, +- _tao_impl +- , +- tc.in (), ++ _tao_impl->type_def ( ++ type_def.in (), + ACE_TRY_ENV + ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->get_canonical_typecode ( +- tc.in (), +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- CORBA::TypeCode_ptr _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << _tao_retval.in ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- +-} +- +-void POA_IR::Repository::get_primitive_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::Repository *_tao_impl = (POA_IR::Repository *)_tao_object_reference; +- +- IR::PrimitiveDef_var _tao_retval; +- IR::PrimitiveKind kind; +- if (!( +- (_tao_in >> kind) +- )) +- ACE_THROW (CORBA::MARSHAL()); + +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::Repository::TAO_ServerRequestInfo_IR_Repository_get_primitive ri ( +- _tao_server_request, +- _tao_impl +- , +- kind, +- ACE_TRY_ENV +- ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->get_primitive ( +- kind, +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::PrimitiveDef_ptr _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; + ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << _tao_retval.in ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); + ++ _tao_server_request.init_reply (); + } + +-void POA_IR::Repository::create_string_skel ( ++void POA_IR::ConstantDef::_get_value_skel ( + TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, ++ void *_tao_object_reference, ++ void * /* context */, + CORBA::Environment &ACE_TRY_ENV +- ) ++) + { +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::Repository *_tao_impl = (POA_IR::Repository *)_tao_object_reference; +- +- IR::StringDef_var _tao_retval; +- CORBA::ULong bound; +- if (!( +- (_tao_in >> bound) +- )) +- ACE_THROW (CORBA::MARSHAL()); ++ POA_IR::ConstantDef *_tao_impl = (POA_IR::ConstantDef *)_tao_object_reference; + ++ CORBA::Any_var _tao_retval; + +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::Repository::TAO_ServerRequestInfo_IR_Repository_create_string ri ( +- _tao_server_request, +- _tao_impl +- , +- bound, ++ _tao_retval = _tao_impl->value ( + ACE_TRY_ENV + ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->create_string ( +- bound, +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::StringDef_ptr _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << _tao_retval.in ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- +-} +- +-void POA_IR::Repository::create_wstring_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::Repository *_tao_impl = (POA_IR::Repository *)_tao_object_reference; +- +- IR::WstringDef_var _tao_retval; +- CORBA::ULong bound; +- if (!( +- (_tao_in >> bound) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- + +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::Repository::TAO_ServerRequestInfo_IR_Repository_create_wstring ri ( +- _tao_server_request, +- _tao_impl +- , +- bound, +- ACE_TRY_ENV +- ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->create_wstring ( +- bound, +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::WstringDef_ptr _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; + ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << _tao_retval.in ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- +-} +- +-void POA_IR::Repository::create_sequence_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::Repository *_tao_impl = (POA_IR::Repository *)_tao_object_reference; +- +- IR::SequenceDef_var _tao_retval; +- CORBA::ULong bound; - IR::IDLType_var element_type; -+ IR_IDLType_var element_type; +- if (!( +- (_tao_in >> bound) && +- (_tao_in >> element_type.out ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- + +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::Repository::TAO_ServerRequestInfo_IR_Repository_create_sequence ri ( +- _tao_server_request, +- _tao_impl +- , +- bound, +- element_type.in (), +- ACE_TRY_ENV +- ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->create_sequence ( +- bound, +- element_type.in (), +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::SequenceDef_ptr _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); ++ _tao_server_request.init_reply (); + TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); if (!( - (_tao_in >> bound) && - (_tao_in >> element_type.out ()) + (_tao_out << _tao_retval.in ()) )) - ACE_THROW (CORBA::MARSHAL()); - -- - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( - _tao_server_request.orb_core ()->server_request_interceptors (), -@@ -8835,7 +8819,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::SequenceDef_ptr _tao_retval_info = _tao_retval._retn (); -+ IR_SequenceDef_ptr _tao_retval_info = _tao_retval._retn (); - ri.result (_tao_retval_info); - _tao_retval = _tao_retval_info; - ri.reply_status (PortableInterceptor::SUCCESSFUL); -@@ -8889,16 +8873,15 @@ +- ACE_THROW (CORBA::MARSHAL()); +- ++ ACE_THROW (CORBA::MARSHAL () ); + } + +-void POA_IR::Repository::create_array_skel ( ++void POA_IR::ConstantDef::_set_value_skel ( + TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, ++ void *_tao_object_reference, ++ void * /* context */, + CORBA::Environment &ACE_TRY_ENV +- ) ++) + { TAO_InputCDR &_tao_in = _tao_server_request.incoming (); - POA_IR::Repository *_tao_impl = (POA_IR::Repository *)_tao_object_reference; - -- IR::ArrayDef_var _tao_retval; -+ IR_ArrayDef_var _tao_retval; - CORBA::ULong length; +- POA_IR::Repository *_tao_impl = (POA_IR::Repository *)_tao_object_reference; ++ POA_IR::ConstantDef *_tao_impl = (POA_IR::ConstantDef *)_tao_object_reference; + +- IR::ArrayDef_var _tao_retval; +- CORBA::ULong length; - IR::IDLType_var element_type; -+ IR_IDLType_var element_type; ++ CORBA::Any value; if (!( - (_tao_in >> length) && - (_tao_in >> element_type.out ()) +- (_tao_in >> length) && +- (_tao_in >> element_type.out ()) ++ (_tao_in >> value) )) - ACE_THROW (CORBA::MARSHAL()); - -- - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( - _tao_server_request.orb_core ()->server_request_interceptors (), -@@ -8928,7 +8911,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::ArrayDef_ptr _tao_retval_info = _tao_retval._retn (); -+ IR_ArrayDef_ptr _tao_retval_info = _tao_retval._retn (); - ri.result (_tao_retval_info); - _tao_retval = _tao_retval_info; - ri.reply_status (PortableInterceptor::SUCCESSFUL); -@@ -8982,7 +8965,7 @@ +- ACE_THROW (CORBA::MARSHAL()); ++ ACE_THROW (CORBA::MARSHAL () ); + +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::Repository::TAO_ServerRequestInfo_IR_Repository_create_array ri ( +- _tao_server_request, +- _tao_impl +- , +- length, +- element_type.in (), ++ _tao_impl->value ( ++ value, + ACE_TRY_ENV + ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->create_array ( +- length, +- element_type.in (), +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::ArrayDef_ptr _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << _tao_retval.in ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- +-} +- +-void POA_IR::Repository::create_fixed_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::Repository *_tao_impl = (POA_IR::Repository *)_tao_object_reference; +- +- IR::FixedDef_var _tao_retval; +- CORBA::UShort digits; +- CORBA::Short scale; +- if (!( +- (_tao_in >> digits) && +- (_tao_in >> scale) +- )) +- ACE_THROW (CORBA::MARSHAL()); + +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::Repository::TAO_ServerRequestInfo_IR_Repository_create_fixed ri ( +- _tao_server_request, +- _tao_impl +- , +- digits, +- scale, +- ACE_TRY_ENV +- ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->create_fixed ( +- digits, +- scale, +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::FixedDef_ptr _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; + ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << _tao_retval.in ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); + ++ _tao_server_request.init_reply (); + } + +-void POA_IR::Repository::_is_a_skel ( +- TAO_ServerRequest &_tao_server_request, ++void POA_IR::ConstantDef::_is_a_skel ( ++ TAO_ServerRequest &_tao_server_request, + void * _tao_object_reference, + void * /* context */, + CORBA::Environment &ACE_TRY_ENV + ) + { TAO_InputCDR &_tao_in = _tao_server_request.incoming (); - POA_IR::Repository *_tao_impl = (POA_IR::Repository *)_tao_object_reference; - -- IR::FixedDef_var _tao_retval; -+ IR_FixedDef_var _tao_retval; - CORBA::UShort digits; - CORBA::Short scale; - if (!( -@@ -8991,7 +8974,6 @@ - )) - ACE_THROW (CORBA::MARSHAL()); - -- - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( - _tao_server_request.orb_core ()->server_request_interceptors (), -@@ -9021,7 +9003,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::FixedDef_ptr _tao_retval_info = _tao_retval._retn (); -+ IR_FixedDef_ptr _tao_retval_info = _tao_retval._retn (); - ri.result (_tao_retval_info); - _tao_retval = _tao_retval_info; - ri.reply_status (PortableInterceptor::SUCCESSFUL); -@@ -9076,7 +9058,7 @@ - POA_IR::Repository *_tao_impl = (POA_IR::Repository *) _tao_object_reference; +- POA_IR::Repository *_tao_impl = (POA_IR::Repository *) _tao_object_reference; ++ POA_IR::ConstantDef *_tao_impl = (POA_IR::ConstantDef *) _tao_object_reference; CORBA::Boolean _tao_retval = 0; CORBA::String_var value; - if (!(_tao_in >> value.out ())) + if (!((_tao_in >> value.out ()))) ACE_THROW (CORBA::MARSHAL ()); - +- ++ _tao_retval = _tao_impl->_is_a (value.in (), ACE_TRY_ENV); -@@ -9084,7 +9066,7 @@ - + ACE_CHECK; +- ++ _tao_server_request.init_reply (); TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); - if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) @@ -2442,8 +11971,21 @@ ACE_THROW (CORBA::MARSHAL ()); } -@@ -9101,7 +9083,7 @@ - +-void POA_IR::Repository::_non_existent_skel ( +- TAO_ServerRequest &_tao_server_request, ++void POA_IR::ConstantDef::_non_existent_skel ( ++ TAO_ServerRequest &_tao_server_request, + void * _tao_object_reference, + void * /* context */, + CORBA::Environment &ACE_TRY_ENV + ) + { +- POA_IR::Repository *_tao_impl = (POA_IR::Repository *) _tao_object_reference; ++ POA_IR::ConstantDef *_tao_impl = (POA_IR::ConstantDef *) _tao_object_reference; + CORBA::Boolean _tao_retval = _tao_impl->_non_existent (ACE_TRY_ENV); + ACE_CHECK; +- ++ _tao_server_request.init_reply (); TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); - if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) @@ -2451,161 +11993,1411 @@ ACE_THROW (CORBA::MARSHAL ()); } -@@ -9129,7 +9111,7 @@ - if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Container:1.0") == 0) - return ACE_static_cast (POA_IR::Container_ptr, this); +-CORBA::Boolean POA_IR::Repository::_is_a ( ++CORBA::Boolean POA_IR::ConstantDef::_is_a ( + const char* value, + CORBA::Environment &ACE_TRY_ENV + ) + { + if ( +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/Repository:1.0")) || +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/Container:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/ConstantDef:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/Contained:1.0")) || + (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/CORBA/IRObject:1.0")) || + (!ACE_OS::strcmp ((char *)value, CORBA::_tc_Object->id (ACE_TRY_ENV)))) + return 1; +@@ -9114,33 +5976,33 @@ + return 0; + } + +-void* POA_IR::Repository::_downcast ( ++void* POA_IR::ConstantDef::_downcast ( + const char* logical_type_id + ) + { +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Repository:1.0") == 0) +- return ACE_static_cast (POA_IR::Repository_ptr, this); +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Container:1.0") == 0) +- return ACE_static_cast (POA_IR::Container_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/ConstantDef:1.0") == 0) ++ return ACE_static_cast (POA_IR::ConstantDef_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Contained:1.0") == 0) ++ return ACE_static_cast (POA_IR::Contained_ptr, this); if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/IRObject:1.0") == 0) - return ACE_static_cast (POA_CORBA::IRObject_ptr, this); + return ACE_static_cast (POA_CORBA_IRObject_ptr, this); if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/Object:1.0") == 0) return ACE_static_cast(PortableServer::Servant, this); return 0; -@@ -9159,10 +9141,9 @@ + } + +-void POA_IR::Repository::_dispatch (TAO_ServerRequest &req, void *context, CORBA::Environment &ACE_TRY_ENV) ++void POA_IR::ConstantDef::_dispatch (TAO_ServerRequest &req, void *context, CORBA::Environment &ACE_TRY_ENV) + { + this->synchronous_upcall_dispatch(req, context, this, ACE_TRY_ENV); + } + +-const char* POA_IR::Repository::_interface_repository_id (void) const ++const char* POA_IR::ConstantDef::_interface_repository_id (void) const + { +- return "IDL:omg.org/IR/Repository:1.0"; ++ return "IDL:omg.org/IR/ConstantDef:1.0"; + } + +-IR::Repository* +-POA_IR::Repository::_this (CORBA_Environment &ACE_TRY_ENV) ++IR::ConstantDef* ++POA_IR::ConstantDef::_this (CORBA_Environment &ACE_TRY_ENV) + { + TAO_Stub *stub = this->_create_stub (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); +@@ -9153,831 +6015,508 @@ ACE_NEW_RETURN (tmp, CORBA::Object (stub, 0, this), 0); CORBA::Object_var obj = tmp; - return ::IR::Repository::_unchecked_narrow (obj.in ()); -+ return IR_Repository::_unchecked_narrow (obj.in ()); ++ return IR_ConstantDef::_unchecked_narrow (obj.in ()); } - - #if (TAO_HAS_INTERCEPTORS == 1) - POA_IR::Repository::TAO_ServerRequestInfo_IR_Repository_lookup_id::TAO_ServerRequestInfo_IR_Repository_lookup_id ( - TAO_ServerRequest &_tao_server_request, -@@ -9335,7 +9316,7 @@ - POA_IR::Repository::TAO_ServerRequestInfo_IR_Repository_get_primitive::TAO_ServerRequestInfo_IR_Repository_get_primitive ( - TAO_ServerRequest &_tao_server_request, - POA_IR::Repository *tao_impl, +-#if (TAO_HAS_INTERCEPTORS == 1) +-POA_IR::Repository::TAO_ServerRequestInfo_IR_Repository_lookup_id::TAO_ServerRequestInfo_IR_Repository_lookup_id ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::Repository *tao_impl +- , +- const char * search_id, +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- search_id_ (search_id) +-{} +- +-Dynamic::ParameterList * +-POA_IR::Repository::TAO_ServerRequestInfo_IR_Repository_lookup_id::arguments (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++class TAO_IR_TypedefDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable + { +- // 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 * +-POA_IR::Repository::TAO_ServerRequestInfo_IR_Repository_lookup_id::exceptions (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++private: ++ unsigned int hash (const char *str, unsigned int len); ++public: ++ const TAO_operation_db_entry * lookup (const char *str, unsigned int len); ++}; ++/* starting time is 11:23:09 */ ++/* C++ code produced by gperf version 2.8 (ACE version) */ ++/* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_TypedefDef_Perfect_Hash_OpTable -N lookup */ ++unsigned int ++TAO_IR_TypedefDef_Perfect_Hash_OpTable::hash (const char *str, unsigned int len) + { +- // 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; ++ static const unsigned char asso_values[] = ++ { ++#if defined (ACE_MVS) ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 0, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 0, ++ 37, 37, 0, 0, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 0, 0, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 10, 37, 37, 37, 37, 10, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, ++#else ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 0, 37, 0, 37, 37, ++ 0, 0, 37, 37, 37, 37, 37, 37, 37, 0, ++ 0, 37, 37, 37, 37, 37, 10, 37, 37, 37, ++ 37, 10, 37, 37, 37, 37, 37, 37, ++#endif /* ACE_MVS */ ++ }; ++ return len + asso_values[str[len - 1]] + asso_values[str[0]]; + } + +-CORBA::Any * +-POA_IR::Repository::TAO_ServerRequestInfo_IR_Repository_lookup_id::result (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++const class TAO_operation_db_entry * ++TAO_IR_TypedefDef_Perfect_Hash_OpTable::lookup (const char *str, unsigned int len) + { +- // 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 (); +-} ++ enum ++ { ++ TOTAL_KEYWORDS = 16, ++ MIN_WORD_LENGTH = 4, ++ MAX_WORD_LENGTH = 26, ++ MIN_HASH_VALUE = 4, ++ MAX_HASH_VALUE = 36, ++ HASH_VALUE_RANGE = 33, ++ DUPLICATES = 5 ++ }; + +-char * +-POA_IR::Repository::TAO_ServerRequestInfo_IR_Repository_lookup_id::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} ++ static const class TAO_operation_db_entry wordlist[] = ++ { ++ {"",0},{"",0},{"",0},{"",0}, ++ {"move", &POA_IR::TypedefDef::move_skel}, ++ {"_is_a", &POA_IR::TypedefDef::_is_a_skel}, ++ {"_get_id", &POA_IR::TypedefDef::_get_id_skel}, ++ {"_set_id", &POA_IR::TypedefDef::_set_id_skel}, ++ {"describe", &POA_IR::TypedefDef::describe_skel}, ++ {"_get_name", &POA_IR::TypedefDef::_get_name_skel}, ++ {"_get_type", &POA_IR::TypedefDef::_get_type_skel}, ++ {"_set_name", &POA_IR::TypedefDef::_set_name_skel}, ++ {"_get_version", &POA_IR::TypedefDef::_get_version_skel}, ++ {"_set_version", &POA_IR::TypedefDef::_set_version_skel}, ++ {"_get_def_kind", &POA_IR::TypedefDef::_get_def_kind_skel}, ++ {"_get_defined_in", &POA_IR::TypedefDef::_get_defined_in_skel}, ++ {"destroy", &POA_IR::TypedefDef::destroy_skel}, ++ {"_get_absolute_name", &POA_IR::TypedefDef::_get_absolute_name_skel}, ++ {"_non_existent", &POA_IR::TypedefDef::_non_existent_skel}, ++ {"_get_containing_repository", &POA_IR::TypedefDef::_get_containing_repository_skel}, ++ }; + +-CORBA::Boolean +-POA_IR::Repository::TAO_ServerRequestInfo_IR_Repository_lookup_id::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); ++ static const signed char lookup[] = ++ { ++ -6, -2, -9, -3, 4, 5, -1, -43, 8, -43, -12, -2, -38, 14, ++ -1, 15, -1, 16, 17, -1, -1, -1, -1, 18, -1, -1, -1, -1, ++ -1, -1, -1, -1, -1, -1, -1, -1, 19, ++ }; ++ ++ if (len <= MAX_WORD_LENGTH && len >= MIN_WORD_LENGTH) ++ { ++ unsigned int key = hash (str, len); ++ ++ if (key <= MAX_HASH_VALUE && key >= MIN_HASH_VALUE) ++ { ++ int slot = lookup[key]; ++ ++ if (slot >= 0 && slot < MAX_HASH_VALUE) ++ { ++ const char *s = wordlist[slot].opname_; ++ ++ if (*str == *s && !strncmp (str + 1, s + 1, len - 1)) ++ return &wordlist[slot]; ++ } ++ else if (slot < 0 && slot >= -MAX_HASH_VALUE) ++ return 0; ++ else ++ { ++ unsigned int offset = key + slot + (slot > 0 ? -MAX_HASH_VALUE : MAX_HASH_VALUE); ++ const class TAO_operation_db_entry *base = &wordlist[-lookup[offset]]; ++ const class TAO_operation_db_entry *ptr = base + -lookup[offset + 1]; ++ ++ while (--ptr >= base) ++ if (*str == *ptr->opname_ && !strncmp (str + 1, ptr->opname_ + 1, len - 1)) ++ return ptr; ++ } ++ } ++ } ++ return 0; + } ++/* ending time is 11:23:09 */ ++static TAO_IR_TypedefDef_Perfect_Hash_OpTable tao_IR_TypedefDef_optable; + +-void +-POA_IR::Repository::TAO_ServerRequestInfo_IR_Repository_lookup_id::result (IR::Contained_ptr result) ++/////////////////////////////////////////////////////////////////////// ++// Strategized Proxy Broker Implementation ++// ++ ++// Factory function Implementation. ++POA_IR::_TAO_TypedefDef_Strategized_Proxy_Broker *POA_IR::_TAO_TypedefDef_Strategized_Proxy_Broker::the_TAO_TypedefDef_Strategized_Proxy_Broker (void) + { +- // Update the result. +- this->_result = result; ++ static POA_IR::_TAO_TypedefDef_Strategized_Proxy_Broker strategized_proxy_broker; ++ return &strategized_proxy_broker; + } + +-POA_IR::Repository::TAO_ServerRequestInfo_IR_Repository_get_canonical_typecode::TAO_ServerRequestInfo_IR_Repository_get_canonical_typecode ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::Repository *tao_impl +- , +- CORBA::TypeCode_ptr tc, +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- tc_ (tc) +-{} +- +-Dynamic::ParameterList * +-POA_IR::Repository::TAO_ServerRequestInfo_IR_Repository_get_canonical_typecode::arguments (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++POA_IR::_TAO_TypedefDef_Strategized_Proxy_Broker::_TAO_TypedefDef_Strategized_Proxy_Broker (void) + { +- // 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; ++ for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) ++ this->proxy_cache_[i] = 0; + +- return safe_parameter_list._retn (); + } + +-Dynamic::ExceptionList * +-POA_IR::Repository::TAO_ServerRequestInfo_IR_Repository_get_canonical_typecode::exceptions (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++POA_IR::_TAO_TypedefDef_Strategized_Proxy_Broker::~_TAO_TypedefDef_Strategized_Proxy_Broker (void) + { +- // Generate the exception list on demand. +- Dynamic::ExceptionList *exception_list = +- TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); +- ACE_CHECK_RETURN (0); ++ for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) ++ delete this->proxy_cache_[i]; + +- return exception_list; + } + +-CORBA::Any * +-POA_IR::Repository::TAO_ServerRequestInfo_IR_Repository_get_canonical_typecode::result (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++_TAO_TypedefDef_Proxy_Impl& ++POA_IR::_TAO_TypedefDef_Strategized_Proxy_Broker::select_proxy ( ++ IR_TypedefDef *object, ++ CORBA::Environment &ACE_TRY_ENV ++ ) + { +- // 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); ++ TAO_ORB_Core::TAO_Collocation_Strategies strategy = ++ TAO_ORB_Core::collocation_strategy (object); + +- CORBA::Any_var safe_result_any = result_any; ++ if (this->proxy_cache_[strategy] != 0) ++ return *this->proxy_cache_[strategy]; + +- (*result_any) <<= this->_result; ++ this->create_proxy (strategy, ACE_TRY_ENV); ++ ACE_CHECK_RETURN (*this->proxy_cache_[strategy]); ++ ++ return *this->proxy_cache_[strategy]; + +- return safe_result_any._retn (); +-} +- +-char * +-POA_IR::Repository::TAO_ServerRequestInfo_IR_Repository_get_canonical_typecode::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::Repository::TAO_ServerRequestInfo_IR_Repository_get_canonical_typecode::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); + } + + void +-POA_IR::Repository::TAO_ServerRequestInfo_IR_Repository_get_canonical_typecode::result (CORBA::TypeCode_ptr result) +-{ +- // Update the result. +- this->_result = result; +-} +- +-POA_IR::Repository::TAO_ServerRequestInfo_IR_Repository_get_primitive::TAO_ServerRequestInfo_IR_Repository_get_primitive ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::Repository *tao_impl +- , - IR::PrimitiveKind & kind, -+ IR_PrimitiveKind & kind, - CORBA::Environment & +- CORBA::Environment & ++POA_IR::_TAO_TypedefDef_Strategized_Proxy_Broker::create_proxy ( ++ TAO_ORB_Core::TAO_Collocation_Strategies strategy, ++ CORBA::Environment &ACE_TRY_ENV ) - : TAO_ServerRequestInfo (_tao_server_request), -@@ -9589,7 +9570,7 @@ +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- kind_ (kind) +-{} +- +-Dynamic::ParameterList * +-POA_IR::Repository::TAO_ServerRequestInfo_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); ++ ACE_GUARD (TAO_SYNCH_MUTEX, guard, this->mutex_); + +- Dynamic::ParameterList_var safe_parameter_list = parameter_list; ++ if (this->proxy_cache_[strategy] == 0) ++ { ++ switch (strategy) ++ { ++ case TAO_ORB_Core::THRU_POA_STRATEGY: ++ ACE_NEW_THROW_EX ( ++ this->proxy_cache_[strategy], ++ _TAO_TypedefDef_ThruPOA_Proxy_Impl, ++ CORBA::NO_MEMORY () ++ ); ++ ACE_CHECK; ++ break; ++ ++ case TAO_ORB_Core::REMOTE_STRATEGY: ++ default: ++ ACE_NEW_THROW_EX ( ++ this->proxy_cache_[strategy], ++ _TAO_TypedefDef_Remote_Proxy_Impl, ++ CORBA::NO_MEMORY () ++ ); ++ ACE_CHECK; ++ break; ++ ++ } + +- 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 * +-POA_IR::Repository::TAO_ServerRequestInfo_IR_Repository_get_primitive::exceptions (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++ ++// ++// End Strategized Proxy Broker Implementation ++/////////////////////////////////////////////////////////////////////// ++ ++ ++_TAO_TypedefDef_Proxy_Broker * ++_TAO_TypedefDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) + { +- // 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; ++ ACE_UNUSED_ARG (obj); ++ return ::POA_IR::_TAO_TypedefDef_Strategized_Proxy_Broker::the_TAO_TypedefDef_Strategized_Proxy_Broker(); + } + +-CORBA::Any * +-POA_IR::Repository::TAO_ServerRequestInfo_IR_Repository_get_primitive::result (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++int ++_TAO_TypedefDef_Proxy_Broker_Factory_Initializer (long _dummy_) + { +- // 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; ++ ACE_UNUSED_ARG (_dummy_); + +- (*result_any) <<= this->_result; ++ _TAO_TypedefDef_Proxy_Broker_Factory_function_pointer = ++ _TAO_TypedefDef_Proxy_Broker_Factory_function; + +- return safe_result_any._retn (); ++ return 0; + } + +-char * +-POA_IR::Repository::TAO_ServerRequestInfo_IR_Repository_get_primitive::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} ++static int _TAO_TypedefDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = ++ _TAO_TypedefDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, _TAO_TypedefDef_Proxy_Broker_Factory_Initializer)); + +-CORBA::Boolean +-POA_IR::Repository::TAO_ServerRequestInfo_IR_Repository_get_primitive::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} + +-void +-POA_IR::Repository::TAO_ServerRequestInfo_IR_Repository_get_primitive::result (IR::PrimitiveDef_ptr result) +-{ +- // Update the result. +- this->_result = result; +-} ++/////////////////////////////////////////////////////////////////////// ++// ThruPOA Proxy Implementation ++// + +-POA_IR::Repository::TAO_ServerRequestInfo_IR_Repository_create_string::TAO_ServerRequestInfo_IR_Repository_create_string ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::Repository *tao_impl +- , +- const CORBA::ULong & bound, +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- bound_ (bound) ++POA_IR::_TAO_TypedefDef_ThruPOA_Proxy_Impl::_TAO_TypedefDef_ThruPOA_Proxy_Impl (void) + {} + +-Dynamic::ParameterList * +-POA_IR::Repository::TAO_ServerRequestInfo_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 * +-POA_IR::Repository::TAO_ServerRequestInfo_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 * +-POA_IR::Repository::TAO_ServerRequestInfo_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 (); +-} +- +-char * +-POA_IR::Repository::TAO_ServerRequestInfo_IR_Repository_create_string::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::Repository::TAO_ServerRequestInfo_IR_Repository_create_string::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-void +-POA_IR::Repository::TAO_ServerRequestInfo_IR_Repository_create_string::result (IR::StringDef_ptr result) +-{ +- // Update the result. +- this->_result = result; +-} +- +-POA_IR::Repository::TAO_ServerRequestInfo_IR_Repository_create_wstring::TAO_ServerRequestInfo_IR_Repository_create_wstring ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::Repository *tao_impl +- , +- const CORBA::ULong & bound, +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- bound_ (bound) ++POA_IR::_TAO_TypedefDef_ThruPOA_Proxy_Impl::~_TAO_TypedefDef_ThruPOA_Proxy_Impl (void) + {} + +-Dynamic::ParameterList * +-POA_IR::Repository::TAO_ServerRequestInfo_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 * +-POA_IR::Repository::TAO_ServerRequestInfo_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; +-} ++// ThruPOA Implementation of the IDL interface methods + +-CORBA::Any * +-POA_IR::Repository::TAO_ServerRequestInfo_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 (); +-} ++// ++// End ThruPOA Proxy Implementation ++/////////////////////////////////////////////////////////////////////// + +-char * +-POA_IR::Repository::TAO_ServerRequestInfo_IR_Repository_create_wstring::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++// skeleton constructor ++POA_IR::TypedefDef::TypedefDef (void) + { +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); ++ this->optable_ = &tao_IR_TypedefDef_optable; + } + +-CORBA::Boolean +-POA_IR::Repository::TAO_ServerRequestInfo_IR_Repository_create_wstring::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} ++// copy ctor ++POA_IR::TypedefDef::TypedefDef (const TypedefDef& rhs) ++ : ACE_NESTED_CLASS (POA_IR,Contained) (rhs), ++ ACE_NESTED_CLASS (POA_IR,IDLType) (rhs), ++ POA_CORBA_IRObject (rhs), ++ TAO_ServantBase (rhs) ++{} + +-void +-POA_IR::Repository::TAO_ServerRequestInfo_IR_Repository_create_wstring::result (IR::WstringDef_ptr result) ++// skeleton destructor ++POA_IR::TypedefDef::~TypedefDef (void) + { +- // Update the result. +- this->_result = result; + } + +-POA_IR::Repository::TAO_ServerRequestInfo_IR_Repository_create_sequence::TAO_ServerRequestInfo_IR_Repository_create_sequence ( ++void POA_IR::TypedefDef::_is_a_skel ( TAO_ServerRequest &_tao_server_request, - POA_IR::Repository *tao_impl, - const CORBA::ULong & bound, +- POA_IR::Repository *tao_impl +- , +- const CORBA::ULong & bound, - IR::IDLType_ptr element_type, -+ IR_IDLType_ptr element_type, - CORBA::Environment & +- CORBA::Environment & ++ void * _tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ) - : TAO_ServerRequestInfo (_tao_server_request), -@@ -9681,7 +9662,7 @@ +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- bound_ (bound), +- element_type_ (element_type) +-{} +- +-Dynamic::ParameterList * +-POA_IR::Repository::TAO_ServerRequestInfo_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 * +-POA_IR::Repository::TAO_ServerRequestInfo_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 * +-POA_IR::Repository::TAO_ServerRequestInfo_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 (); +-} +- +-char * +-POA_IR::Repository::TAO_ServerRequestInfo_IR_Repository_create_sequence::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) + { +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::TypedefDef *_tao_impl = (POA_IR::TypedefDef *) _tao_object_reference; ++ CORBA::Boolean _tao_retval = 0; ++ CORBA::String_var value; ++ if (!((_tao_in >> value.out ()))) ++ ACE_THROW (CORBA::MARSHAL ()); + +-CORBA::Boolean +-POA_IR::Repository::TAO_ServerRequestInfo_IR_Repository_create_sequence::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} ++ _tao_retval = _tao_impl->_is_a (value.in (), ACE_TRY_ENV); ++ ACE_CHECK; + +-void +-POA_IR::Repository::TAO_ServerRequestInfo_IR_Repository_create_sequence::result (IR::SequenceDef_ptr result) +-{ +- // Update the result. +- this->_result = result; ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!((_tao_out << CORBA::Any::from_boolean (_tao_retval)))) ++ ACE_THROW (CORBA::MARSHAL ()); + } + +-POA_IR::Repository::TAO_ServerRequestInfo_IR_Repository_create_array::TAO_ServerRequestInfo_IR_Repository_create_array ( ++void POA_IR::TypedefDef::_non_existent_skel ( TAO_ServerRequest &_tao_server_request, - POA_IR::Repository *tao_impl, - const CORBA::ULong & length, +- POA_IR::Repository *tao_impl +- , +- const CORBA::ULong & length, - IR::IDLType_ptr element_type, -+ IR_IDLType_ptr element_type, - CORBA::Environment & +- CORBA::Environment & ++ void * _tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ) - : TAO_ServerRequestInfo (_tao_server_request), -@@ -9861,6 +9842,7 @@ +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- length_ (length), +- element_type_ (element_type) +-{} +- +-Dynamic::ParameterList * +-POA_IR::Repository::TAO_ServerRequestInfo_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 * +-POA_IR::Repository::TAO_ServerRequestInfo_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 * +-POA_IR::Repository::TAO_ServerRequestInfo_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 (); +-} ++ POA_IR::TypedefDef *_tao_impl = (POA_IR::TypedefDef *) _tao_object_reference; ++ CORBA::Boolean _tao_retval = _tao_impl->_non_existent (ACE_TRY_ENV); ++ ACE_CHECK; + +-char * +-POA_IR::Repository::TAO_ServerRequestInfo_IR_Repository_create_array::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!((_tao_out << CORBA::Any::from_boolean (_tao_retval)))) ++ ACE_THROW (CORBA::MARSHAL ()); + } + +-CORBA::Boolean +-POA_IR::Repository::TAO_ServerRequestInfo_IR_Repository_create_array::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++CORBA::Boolean POA_IR::TypedefDef::_is_a ( ++ const char* value, ++ CORBA::Environment &ACE_TRY_ENV ++ ) + { +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); ++ if ( ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/TypedefDef:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/Contained:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/IDLType:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/CORBA/IRObject:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, CORBA::_tc_Object->id (ACE_TRY_ENV)))) ++ return 1; ++ else ++ return 0; + } + +-void +-POA_IR::Repository::TAO_ServerRequestInfo_IR_Repository_create_array::result (IR::ArrayDef_ptr result) ++void* POA_IR::TypedefDef::_downcast ( ++ const char* logical_type_id ++ ) + { +- // Update the result. +- this->_result = result; ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/TypedefDef:1.0") == 0) ++ return ACE_static_cast (POA_IR::TypedefDef_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Contained:1.0") == 0) ++ return ACE_static_cast (POA_IR::Contained_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/IDLType:1.0") == 0) ++ return ACE_static_cast (POA_IR::IDLType_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/IRObject:1.0") == 0) ++ return ACE_static_cast (POA_CORBA_IRObject_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/Object:1.0") == 0) ++ return ACE_static_cast(PortableServer::Servant, this); ++ return 0; + } + +-POA_IR::Repository::TAO_ServerRequestInfo_IR_Repository_create_fixed::TAO_ServerRequestInfo_IR_Repository_create_fixed ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::Repository *tao_impl +- , +- const CORBA::UShort & digits, +- const CORBA::Short & scale, +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- digits_ (digits), +- scale_ (scale) +-{} +- +-Dynamic::ParameterList * +-POA_IR::Repository::TAO_ServerRequestInfo_IR_Repository_create_fixed::arguments (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++void POA_IR::TypedefDef::_dispatch (TAO_ServerRequest &req, void *context, CORBA::Environment &ACE_TRY_ENV) + { +- // 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 (); ++ this->synchronous_upcall_dispatch(req, context, this, ACE_TRY_ENV); } - #endif /* TAO_HAS_INTERCEPTORS */ -+ - class TAO_IR_ComponentRepository_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable +-Dynamic::ExceptionList * +-POA_IR::Repository::TAO_ServerRequestInfo_IR_Repository_create_fixed::exceptions (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++const char* POA_IR::TypedefDef::_interface_repository_id (void) const + { +- // 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; ++ return "IDL:omg.org/IR/TypedefDef:1.0"; + } + +-CORBA::Any * +-POA_IR::Repository::TAO_ServerRequestInfo_IR_Repository_create_fixed::result (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++IR::TypedefDef* ++POA_IR::TypedefDef::_this (CORBA_Environment &ACE_TRY_ENV) + { +- // 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); ++ TAO_Stub *stub = this->_create_stub (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + +- CORBA::Any_var safe_result_any = result_any; ++ CORBA::Object_ptr tmp = CORBA::Object::_nil (); + +- (*result_any) <<= this->_result; ++ if (stub->servant_orb_var ()->orb_core ()->optimize_collocation_objects ()) ++ ACE_NEW_RETURN (tmp, CORBA::Object (stub, 1, this), 0); ++ else ++ ACE_NEW_RETURN (tmp, CORBA::Object (stub, 0, this), 0); + +- return safe_result_any._retn (); +-} +- +-char * +-POA_IR::Repository::TAO_ServerRequestInfo_IR_Repository_create_fixed::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::Repository::TAO_ServerRequestInfo_IR_Repository_create_fixed::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-void +-POA_IR::Repository::TAO_ServerRequestInfo_IR_Repository_create_fixed::result (IR::FixedDef_ptr result) +-{ +- // Update the result. +- this->_result = result; ++ CORBA::Object_var obj = tmp; ++ return IR_TypedefDef::_unchecked_narrow (obj.in ()); + } + +-#endif /* TAO_HAS_INTERCEPTORS */ +-class TAO_IR_ComponentRepository_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable ++class TAO_IR_StructDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable { private: -@@ -9868,7 +9850,7 @@ + unsigned int hash (const char *str, unsigned int len); public: const TAO_operation_db_entry * lookup (const char *str, unsigned int len); }; --/* starting time is 18:47:27 */ +-/* starting time is 16:31:12 */ +/* starting time is 11:23:09 */ /* C++ code produced by gperf version 2.8 (ACE version) */ - /* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_ComponentRepository_Perfect_Hash_OpTable -N lookup */ +-/* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_ComponentRepository_Perfect_Hash_OpTable -N lookup */ ++/* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_StructDef_Perfect_Hash_OpTable -N lookup */ unsigned int -@@ -10009,10 +9991,9 @@ +-TAO_IR_ComponentRepository_Perfect_Hash_OpTable::hash (const char *str, unsigned int len) ++TAO_IR_StructDef_Perfect_Hash_OpTable::hash (const char *str, unsigned int len) + { + static const unsigned char asso_values[] = + { + #if defined (ACE_MVS) +- 54, 54, 54, 54, 54, 54, 54, 54, 54, 54, +- 54, 54, 54, 54, 54, 54, 54, 54, 54, 54, +- 54, 54, 54, 54, 54, 54, 54, 54, 54, 54, +- 54, 54, 54, 54, 54, 54, 54, 54, 54, 54, +- 54, 54, 54, 54, 54, 54, 54, 54, 54, 54, +- 54, 54, 54, 54, 54, 54, 54, 54, 54, 54, +- 54, 54, 54, 54, 54, 54, 54, 54, 54, 54, +- 54, 54, 54, 54, 54, 54, 54, 54, 54, 54, +- 54, 54, 54, 54, 54, 54, 54, 54, 54, 54, +- 54, 54, 54, 54, 54, 54, 54, 54, 54, 54, +- 54, 54, 54, 54, 54, 54, 54, 54, 54, 15, +- 54, 54, 54, 54, 54, 54, 54, 54, 54, 54, +- 54, 54, 54, 54, 54, 54, 54, 54, 54, 5, +- 54, 0, 25, 15, 54, 10, 54, 54, 54, 54, +- 54, 54, 54, 54, 54, 54, 54, 10, 0, 3, +- 54, 25, 54, 54, 54, 54, 54, 54, 54, 54, +- 54, 54, 0, 5, 54, 54, 54, 0, 20, 54, +- 54, 54, 54, 54, 54, 54, 54, 54, 54, 54, +- 54, 54, 54, 54, 54, 54, 54, 54, 54, 54, +- 54, 54, 54, 54, 54, 54, 54, 54, 54, 54, +- 54, 54, 54, 54, 54, 54, 54, 54, 54, 54, +- 54, 54, 54, 54, 54, 54, 54, 54, 54, 54, +- 54, 54, 54, 54, 54, 54, 54, 54, 54, 54, +- 54, 54, 54, 54, 54, 54, 54, 54, 54, 54, +- 54, 54, 54, 54, 54, 54, 54, 54, 54, 54, +- 54, 54, 54, 54, 54, 54, +-#else +- 54, 54, 54, 54, 54, 54, 54, 54, 54, 54, +- 54, 54, 54, 54, 54, 54, 54, 54, 54, 54, +- 54, 54, 54, 54, 54, 54, 54, 54, 54, 54, +- 54, 54, 54, 54, 54, 54, 54, 54, 54, 54, +- 54, 54, 54, 54, 54, 54, 54, 54, 54, 54, +- 54, 54, 54, 54, 54, 54, 54, 54, 54, 54, +- 54, 54, 54, 54, 54, 54, 54, 54, 54, 54, +- 54, 54, 54, 54, 54, 54, 54, 54, 54, 54, +- 54, 54, 54, 54, 54, 54, 54, 54, 54, 54, +- 54, 54, 54, 54, 54, 15, 54, 5, 54, 0, +- 25, 15, 54, 10, 54, 54, 54, 54, 10, 0, +- 3, 54, 25, 54, 54, 0, 5, 54, 54, 54, +- 0, 20, 54, 54, 54, 54, 54, 54, +-#endif /* ACE_MVS */ +- }; ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 0, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 0, ++ 52, 20, 3, 0, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 10, 15, 5, ++ 52, 10, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 15, 15, 52, 52, 52, 15, 5, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, ++#else ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 0, 52, 0, 52, 20, ++ 3, 0, 52, 52, 52, 52, 52, 52, 10, 15, ++ 5, 52, 10, 52, 52, 15, 15, 52, 52, 52, ++ 15, 5, 52, 52, 52, 52, 52, 52, ++#endif /* ACE_MVS */ ++ }; + return len + asso_values[str[len - 1]] + asso_values[str[0]]; + } + + const class TAO_operation_db_entry * +-TAO_IR_ComponentRepository_Perfect_Hash_OpTable::lookup (const char *str, unsigned int len) ++TAO_IR_StructDef_Perfect_Hash_OpTable::lookup (const char *str, unsigned int len) + { + enum + { +- TOTAL_KEYWORDS = 29, +- MIN_WORD_LENGTH = 5, +- MAX_WORD_LENGTH = 22, +- MIN_HASH_VALUE = 8, +- MAX_HASH_VALUE = 53, +- HASH_VALUE_RANGE = 46, +- DUPLICATES = 2 ++ TOTAL_KEYWORDS = 33, ++ MIN_WORD_LENGTH = 4, ++ MAX_WORD_LENGTH = 26, ++ MIN_HASH_VALUE = 5, ++ MAX_HASH_VALUE = 51, ++ HASH_VALUE_RANGE = 47, ++ DUPLICATES = 7 + }; + + static const class TAO_operation_db_entry wordlist[] = + { +- {"",0},{"",0},{"",0},{"",0},{"",0},{"",0},{"",0},{"",0}, +- {"contents", &POA_IR::ComponentRepository::contents_skel}, +- {"create_enum", &POA_IR::ComponentRepository::create_enum_skel}, +- {"create_alias", &POA_IR::ComponentRepository::create_alias_skel}, +- {"create_union", &POA_IR::ComponentRepository::create_union_skel}, +- {"create_value_box", &POA_IR::ComponentRepository::create_value_box_skel}, +- {"create_struct", &POA_IR::ComponentRepository::create_struct_skel}, +- {"create_exception", &POA_IR::ComponentRepository::create_exception_skel}, +- {"create_constant", &POA_IR::ComponentRepository::create_constant_skel}, +- {"create_component", &POA_IR::ComponentRepository::create_component_skel}, +- {"create_string", &POA_IR::ComponentRepository::create_string_skel}, +- {"create_wstring", &POA_IR::ComponentRepository::create_wstring_skel}, +- {"_is_a", &POA_IR::ComponentRepository::_is_a_skel}, +- {"create_home", &POA_IR::ComponentRepository::create_home_skel}, +- {"create_value", &POA_IR::ComponentRepository::create_value_skel}, +- {"create_module", &POA_IR::ComponentRepository::create_module_skel}, +- {"create_native", &POA_IR::ComponentRepository::create_native_skel}, +- {"create_sequence", &POA_IR::ComponentRepository::create_sequence_skel}, +- {"create_interface", &POA_IR::ComponentRepository::create_interface_skel}, +- {"create_array", &POA_IR::ComponentRepository::create_array_skel}, +- {"_non_existent", &POA_IR::ComponentRepository::_non_existent_skel}, +- {"lookup_name", &POA_IR::ComponentRepository::lookup_name_skel}, +- {"create_fixed", &POA_IR::ComponentRepository::create_fixed_skel}, +- {"get_primitive", &POA_IR::ComponentRepository::get_primitive_skel}, +- {"lookup", &POA_IR::ComponentRepository::lookup_skel}, +- {"describe_contents", &POA_IR::ComponentRepository::describe_contents_skel}, +- {"lookup_id", &POA_IR::ComponentRepository::lookup_id_skel}, +- {"get_canonical_typecode", &POA_IR::ComponentRepository::get_canonical_typecode_skel}, +- {"destroy", &POA_IR::ComponentRepository::destroy_skel}, +- {"_get_def_kind", &POA_IR::ComponentRepository::_get_def_kind_skel}, ++ {"",0},{"",0},{"",0},{"",0},{"",0}, ++ {"_is_a", &POA_IR::StructDef::_is_a_skel}, ++ {"_get_name", &POA_IR::StructDef::_get_name_skel}, ++ {"_get_type", &POA_IR::StructDef::_get_type_skel}, ++ {"_set_name", &POA_IR::StructDef::_set_name_skel}, ++ {"_get_id", &POA_IR::StructDef::_get_id_skel}, ++ {"_set_id", &POA_IR::StructDef::_set_id_skel}, ++ {"describe", &POA_IR::StructDef::describe_skel}, ++ {"destroy", &POA_IR::StructDef::destroy_skel}, ++ {"_get_def_kind", &POA_IR::StructDef::_get_def_kind_skel}, ++ {"_get_version", &POA_IR::StructDef::_get_version_skel}, ++ {"_set_version", &POA_IR::StructDef::_set_version_skel}, ++ {"_get_absolute_name", &POA_IR::StructDef::_get_absolute_name_skel}, ++ {"move", &POA_IR::StructDef::move_skel}, ++ {"_get_defined_in", &POA_IR::StructDef::_get_defined_in_skel}, ++ {"lookup_name", &POA_IR::StructDef::lookup_name_skel}, ++ {"lookup", &POA_IR::StructDef::lookup_skel}, ++ {"_get_members", &POA_IR::StructDef::_get_members_skel}, ++ {"_set_members", &POA_IR::StructDef::_set_members_skel}, ++ {"_non_existent", &POA_IR::StructDef::_non_existent_skel}, ++ {"_get_containing_repository", &POA_IR::StructDef::_get_containing_repository_skel}, ++ {"create_value", &POA_IR::StructDef::create_value_skel}, ++ {"create_module", &POA_IR::StructDef::create_module_skel}, ++ {"create_native", &POA_IR::StructDef::create_native_skel}, ++ {"describe_contents", &POA_IR::StructDef::describe_contents_skel}, ++ {"create_interface", &POA_IR::StructDef::create_interface_skel}, ++ {"create_union", &POA_IR::StructDef::create_union_skel}, ++ {"create_exception", &POA_IR::StructDef::create_exception_skel}, ++ {"contents", &POA_IR::StructDef::contents_skel}, ++ {"create_enum", &POA_IR::StructDef::create_enum_skel}, ++ {"create_alias", &POA_IR::StructDef::create_alias_skel}, ++ {"create_struct", &POA_IR::StructDef::create_struct_skel}, ++ {"create_constant", &POA_IR::StructDef::create_constant_skel}, ++ {"create_value_box", &POA_IR::StructDef::create_value_box_skel}, + }; + + static const signed char lookup[] = + { +- -1, -1, -1, -1, -1, -1, -1, -1, 8, -1, -1, 9, 10, -22, +- -2, 11, 12, -1, 13, 14, 15, 16, -1, 17, 18, 19, 20, 21, +- -68, -1, 24, 25, 26, 27, -1, -1, 28, 29, 30, -1, -1, 31, +- 32, -1, 33, -1, -1, 34, -1, -1, -1, -1, 35, 36, ++ -1, -1, -1, -6, -3, 5, -1, -9, -2, -57, -54, 11, -1, -14, ++ -2, 12, 13, -55, 16, 17, 18, 19, -1, -1, -21, -2, 20, -54, ++ 23, -26, -2, 24, 25, -55, -1, 28, 29, 30, -1, -1, -1, 31, ++ -1, 32, -1, -1, 33, 34, 35, -1, 36, 37, + }; + + if (len <= MAX_WORD_LENGTH && len >= MIN_WORD_LENGTH) +@@ -10011,38 +6550,37 @@ } return 0; } --/* ending time is 18:47:27 */ +-/* ending time is 16:31:12 */ +-static TAO_IR_ComponentRepository_Perfect_Hash_OpTable tao_IR_ComponentRepository_optable; +- +/* ending time is 11:23:09 */ - static TAO_IR_ComponentRepository_Perfect_Hash_OpTable tao_IR_ComponentRepository_optable; ++static TAO_IR_StructDef_Perfect_Hash_OpTable tao_IR_StructDef_optable; -- /////////////////////////////////////////////////////////////////////// // Strategized Proxy Broker Implementation // -@@ -10038,9 +10019,9 @@ + + // Factory function Implementation. +-POA_IR::_TAO_ComponentRepository_Strategized_Proxy_Broker *POA_IR::_TAO_ComponentRepository_Strategized_Proxy_Broker::the_TAO_ComponentRepository_Strategized_Proxy_Broker (void) ++POA_IR::_TAO_StructDef_Strategized_Proxy_Broker *POA_IR::_TAO_StructDef_Strategized_Proxy_Broker::the_TAO_StructDef_Strategized_Proxy_Broker (void) + { +- static POA_IR::_TAO_ComponentRepository_Strategized_Proxy_Broker strategized_proxy_broker; ++ static POA_IR::_TAO_StructDef_Strategized_Proxy_Broker strategized_proxy_broker; + return &strategized_proxy_broker; + } + +-POA_IR::_TAO_ComponentRepository_Strategized_Proxy_Broker::_TAO_ComponentRepository_Strategized_Proxy_Broker (void) ++POA_IR::_TAO_StructDef_Strategized_Proxy_Broker::_TAO_StructDef_Strategized_Proxy_Broker (void) + { + for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) + this->proxy_cache_[i] = 0; + + } + +-POA_IR::_TAO_ComponentRepository_Strategized_Proxy_Broker::~_TAO_ComponentRepository_Strategized_Proxy_Broker (void) ++POA_IR::_TAO_StructDef_Strategized_Proxy_Broker::~_TAO_StructDef_Strategized_Proxy_Broker (void) + { + for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) + delete this->proxy_cache_[i]; } -IR::_TAO_ComponentRepository_Proxy_Impl& -+_TAO_ComponentRepository_Proxy_Impl& - POA_IR::_TAO_ComponentRepository_Strategized_Proxy_Broker::select_proxy ( +-POA_IR::_TAO_ComponentRepository_Strategized_Proxy_Broker::select_proxy ( - ::IR::ComponentRepository *object, -+ IR_ComponentRepository *object, ++_TAO_StructDef_Proxy_Impl& ++POA_IR::_TAO_StructDef_Strategized_Proxy_Broker::select_proxy ( ++ IR_StructDef *object, CORBA::Environment &ACE_TRY_ENV ) { -@@ -10072,7 +10053,7 @@ +@@ -10060,7 +6598,7 @@ + } + + void +-POA_IR::_TAO_ComponentRepository_Strategized_Proxy_Broker::create_proxy ( ++POA_IR::_TAO_StructDef_Strategized_Proxy_Broker::create_proxy ( + TAO_ORB_Core::TAO_Collocation_Strategies strategy, + CORBA::Environment &ACE_TRY_ENV + ) +@@ -10074,7 +6612,7 @@ case TAO_ORB_Core::THRU_POA_STRATEGY: ACE_NEW_THROW_EX ( this->proxy_cache_[strategy], - POA_IR::_TAO_ComponentRepository_ThruPOA_Proxy_Impl, -+ _TAO_ComponentRepository_ThruPOA_Proxy_Impl, ++ _TAO_StructDef_ThruPOA_Proxy_Impl, CORBA::NO_MEMORY () ); ACE_CHECK; -@@ -10082,7 +10063,7 @@ +@@ -10084,7 +6622,7 @@ default: ACE_NEW_THROW_EX ( this->proxy_cache_[strategy], - ::IR::_TAO_ComponentRepository_Remote_Proxy_Impl, -+ _TAO_ComponentRepository_Remote_Proxy_Impl, ++ _TAO_StructDef_Remote_Proxy_Impl, CORBA::NO_MEMORY () ); ACE_CHECK; -@@ -10099,26 +10080,26 @@ +@@ -10101,51 +6639,49 @@ /////////////////////////////////////////////////////////////////////// -IR::_TAO_ComponentRepository_Proxy_Broker * -IR__TAO_ComponentRepository_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) -+_TAO_ComponentRepository_Proxy_Broker * -+_TAO_ComponentRepository_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) ++_TAO_StructDef_Proxy_Broker * ++_TAO_StructDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) { ACE_UNUSED_ARG (obj); - return ::POA_IR::_TAO_ComponentRepository_Strategized_Proxy_Broker::the_TAO_ComponentRepository_Strategized_Proxy_Broker(); +- return ::POA_IR::_TAO_ComponentRepository_Strategized_Proxy_Broker::the_TAO_ComponentRepository_Strategized_Proxy_Broker(); ++ return ::POA_IR::_TAO_StructDef_Strategized_Proxy_Broker::the_TAO_StructDef_Strategized_Proxy_Broker(); } int -IR__TAO_ComponentRepository_Proxy_Broker_Factory_Initializer (long _dummy_) -+_TAO_ComponentRepository_Proxy_Broker_Factory_Initializer (long _dummy_) ++_TAO_StructDef_Proxy_Broker_Factory_Initializer (long _dummy_) { ACE_UNUSED_ARG (_dummy_); - IR__TAO_ComponentRepository_Proxy_Broker_Factory_function_pointer = - IR__TAO_ComponentRepository_Proxy_Broker_Factory_function; -+ _TAO_ComponentRepository_Proxy_Broker_Factory_function_pointer = -+ _TAO_ComponentRepository_Proxy_Broker_Factory_function; ++ _TAO_StructDef_Proxy_Broker_Factory_function_pointer = ++ _TAO_StructDef_Proxy_Broker_Factory_function; return 0; } -static int IR__TAO_ComponentRepository_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = - IR__TAO_ComponentRepository_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, IR__TAO_ComponentRepository_Proxy_Broker_Factory_Initializer)); -+static int _TAO_ComponentRepository_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = -+ _TAO_ComponentRepository_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, _TAO_ComponentRepository_Proxy_Broker_Factory_Initializer)); ++static int _TAO_StructDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = ++ _TAO_StructDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, _TAO_StructDef_Proxy_Broker_Factory_Initializer)); /////////////////////////////////////////////////////////////////////// -@@ -10130,20 +10111,20 @@ + // ThruPOA Proxy Implementation + // + +-POA_IR::_TAO_ComponentRepository_ThruPOA_Proxy_Impl::_TAO_ComponentRepository_ThruPOA_Proxy_Impl (void) ++POA_IR::_TAO_StructDef_ThruPOA_Proxy_Impl::_TAO_StructDef_ThruPOA_Proxy_Impl (void) ++{} ++ ++POA_IR::_TAO_StructDef_ThruPOA_Proxy_Impl::~_TAO_StructDef_ThruPOA_Proxy_Impl (void) + {} // ThruPOA Implementation of the IDL interface methods -IR::ComponentDef_ptr POA_IR::_TAO_ComponentRepository_ThruPOA_Proxy_Impl::create_component ( -+IR_ComponentDef_ptr POA_IR::_TAO_ComponentRepository_ThruPOA_Proxy_Impl::create_component ( ++IR::StructMemberSeq * POA_IR::_TAO_StructDef_ThruPOA_Proxy_Impl::members ( CORBA_Object *_collocated_tao_target_, - const char * id, - const char * name, - const char * version, +- const char * id, +- const char * name, +- const char * version, - IR::ComponentDef_ptr base_component, - const IR::InterfaceDefSeq & supports_interfaces, -+ IR_ComponentDef_ptr base_component, -+ const IR_InterfaceDefSeq & supports_interfaces, CORBA::Environment &ACE_TRY_ENV ) ACE_THROW_SPEC (( @@ -2613,26 +13405,48 @@ )) { - IR::ComponentDef_var _tao_retval; -+ IR_ComponentDef_var _tao_retval; ++ IR_StructMemberSeq_var _tao_retval; ACE_UNUSED_ARG (_tao_retval); TAO_Object_Adapter::Servant_Upcall servant_upcall ( _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -10171,21 +10152,21 @@ +@@ -10153,67 +6689,51 @@ + CORBA::Object_var forward_to; + servant_upcall.prepare_for_upcall ( + _collocated_tao_target_->_object_key (), +- "create_component", ++ "members", + forward_to.out (), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + return ACE_reinterpret_cast ( +- POA_IR::ComponentRepository_ptr, ++ POA_IR::StructDef_ptr, + servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/ComponentRepository:1.0" ++ "IDL:omg.org/IR/StructDef:1.0" + ) +- )->create_component ( +- id, +- name, +- version, +- base_component, +- supports_interfaces, ++ )->members ( + ACE_TRY_ENV ); } -IR::HomeDef_ptr POA_IR::_TAO_ComponentRepository_ThruPOA_Proxy_Impl::create_home ( -+IR_HomeDef_ptr POA_IR::_TAO_ComponentRepository_ThruPOA_Proxy_Impl::create_home ( ++void POA_IR::_TAO_StructDef_ThruPOA_Proxy_Impl::members ( CORBA_Object *_collocated_tao_target_, - const char * id, - const char * name, - const char * version, +- const char * id, +- const char * name, +- const char * version, - IR::HomeDef_ptr base_home, - IR::ComponentDef_ptr managed_component, - IR::ValueDef_ptr primary_key, -+ IR_HomeDef_ptr base_home, -+ IR_ComponentDef_ptr managed_component, -+ IR_ValueDef_ptr primary_key, ++ const IR_StructMemberSeq & members, CORBA::Environment &ACE_TRY_ENV ) ACE_THROW_SPEC (( @@ -2640,98 +13454,331 @@ )) { - IR::HomeDef_var _tao_retval; -+ IR_HomeDef_var _tao_retval; - ACE_UNUSED_ARG (_tao_retval); +- ACE_UNUSED_ARG (_tao_retval); TAO_Object_Adapter::Servant_Upcall servant_upcall ( _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -10228,7 +10209,7 @@ - POA_IR::ComponentRepository::ComponentRepository (const ComponentRepository& rhs) - : ACE_NESTED_CLASS (POA_IR,Repository) (rhs), + ); + CORBA::Object_var forward_to; + servant_upcall.prepare_for_upcall ( + _collocated_tao_target_->_object_key (), +- "create_home", ++ "members", + forward_to.out (), + ACE_TRY_ENV + ); +- ACE_CHECK_RETURN (0); +- return ACE_reinterpret_cast ( +- POA_IR::ComponentRepository_ptr, ++ ACE_CHECK; ++ ACE_reinterpret_cast ( ++ POA_IR::StructDef_ptr, + servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/ComponentRepository:1.0" ++ "IDL:omg.org/IR/StructDef:1.0" + ) +- )->create_home ( +- id, +- name, +- version, +- base_home, +- managed_component, +- primary_key, ++ )->members ( ++ members, + ACE_TRY_ENV + ); ++ return; + } + + // +@@ -10221,285 +6741,128 @@ + /////////////////////////////////////////////////////////////////////// + + // skeleton constructor +-POA_IR::ComponentRepository::ComponentRepository (void) ++POA_IR::StructDef::StructDef (void) + { +- this->optable_ = &tao_IR_ComponentRepository_optable; ++ this->optable_ = &tao_IR_StructDef_optable; + } + + // copy ctor +-POA_IR::ComponentRepository::ComponentRepository (const ComponentRepository& rhs) +- : ACE_NESTED_CLASS (POA_IR,Repository) (rhs), ++POA_IR::StructDef::StructDef (const StructDef& rhs) ++ : ACE_NESTED_CLASS (POA_IR,TypedefDef) (rhs), ACE_NESTED_CLASS (POA_IR,Container) (rhs), - ACE_NESTED_CLASS (POA_CORBA,IRObject) (rhs), ++ ACE_NESTED_CLASS (POA_IR,Contained) (rhs), ++ ACE_NESTED_CLASS (POA_IR,IDLType) (rhs), + POA_CORBA_IRObject (rhs), TAO_ServantBase (rhs) {} -@@ -10247,12 +10228,12 @@ - TAO_InputCDR &_tao_in = _tao_server_request.incoming (); - POA_IR::ComponentRepository *_tao_impl = (POA_IR::ComponentRepository *)_tao_object_reference; - -- IR::ComponentDef_var _tao_retval; -+ IR_ComponentDef_var _tao_retval; - CORBA::String_var id; - CORBA::String_var name; - CORBA::String_var version; + // skeleton destructor +-POA_IR::ComponentRepository::~ComponentRepository (void) ++POA_IR::StructDef::~StructDef (void) + { + } + +-void POA_IR::ComponentRepository::create_component_skel ( ++void POA_IR::StructDef::_get_members_skel ( + TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, ++ void *_tao_object_reference, ++ void * /* context */, + CORBA::Environment &ACE_TRY_ENV +- ) ++) + { +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::ComponentRepository *_tao_impl = (POA_IR::ComponentRepository *)_tao_object_reference; +- +- IR::ComponentDef_var _tao_retval; +- CORBA::String_var id; +- CORBA::String_var name; +- CORBA::String_var version; - IR::ComponentDef_var base_component; - IR::InterfaceDefSeq supports_interfaces; -+ IR_ComponentDef_var base_component; -+ IR_InterfaceDefSeq supports_interfaces; +- if (!( +- (_tao_in >> id.out ()) && +- (_tao_in >> name.out ()) && +- (_tao_in >> version.out ()) && +- (_tao_in >> base_component.out ()) && +- (_tao_in >> supports_interfaces) +- )) +- ACE_THROW (CORBA::MARSHAL()); ++ POA_IR::StructDef *_tao_impl = (POA_IR::StructDef *)_tao_object_reference; + ++ IR_StructMemberSeq_var _tao_retval; + +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::ComponentRepository::TAO_ServerRequestInfo_IR_ComponentRepository_create_component ri ( +- _tao_server_request, +- _tao_impl +- , +- id.in (), +- name.in (), +- version.in (), +- base_component.in (), +- supports_interfaces, ++ _tao_retval = _tao_impl->members ( + ACE_TRY_ENV + ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->create_component ( +- id.in (), +- name.in (), +- version.in (), +- base_component.in (), +- supports_interfaces, +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::ComponentDef_ptr _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; ++ + ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); ++ ++ _tao_server_request.init_reply (); + TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); if (!( - (_tao_in >> id.out ()) && - (_tao_in >> name.out ()) && -@@ -10262,7 +10243,6 @@ + (_tao_out << _tao_retval.in ()) )) - ACE_THROW (CORBA::MARSHAL()); - -- - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( - _tao_server_request.orb_core ()->server_request_interceptors (), -@@ -10298,7 +10278,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::ComponentDef_ptr _tao_retval_info = _tao_retval._retn (); -+ IR_ComponentDef_ptr _tao_retval_info = _tao_retval._retn (); - ri.result (_tao_retval_info); - _tao_retval = _tao_retval_info; - ri.reply_status (PortableInterceptor::SUCCESSFUL); -@@ -10352,13 +10332,13 @@ +- ACE_THROW (CORBA::MARSHAL()); +- ++ ACE_THROW (CORBA::MARSHAL () ); + } + +-void POA_IR::ComponentRepository::create_home_skel ( ++void POA_IR::StructDef::_set_members_skel ( + TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, ++ void *_tao_object_reference, ++ void * /* context */, + CORBA::Environment &ACE_TRY_ENV +- ) ++) + { TAO_InputCDR &_tao_in = _tao_server_request.incoming (); - POA_IR::ComponentRepository *_tao_impl = (POA_IR::ComponentRepository *)_tao_object_reference; - -- IR::HomeDef_var _tao_retval; -+ IR_HomeDef_var _tao_retval; - CORBA::String_var id; - CORBA::String_var name; - CORBA::String_var version; +- POA_IR::ComponentRepository *_tao_impl = (POA_IR::ComponentRepository *)_tao_object_reference; ++ POA_IR::StructDef *_tao_impl = (POA_IR::StructDef *)_tao_object_reference; + +- IR::HomeDef_var _tao_retval; +- CORBA::String_var id; +- CORBA::String_var name; +- CORBA::String_var version; - IR::HomeDef_var base_home; - IR::ComponentDef_var managed_component; - IR::ValueDef_var primary_key; -+ IR_HomeDef_var base_home; -+ IR_ComponentDef_var managed_component; -+ IR_ValueDef_var primary_key; ++ IR_StructMemberSeq members; if (!( - (_tao_in >> id.out ()) && - (_tao_in >> name.out ()) && -@@ -10369,7 +10349,6 @@ +- (_tao_in >> id.out ()) && +- (_tao_in >> name.out ()) && +- (_tao_in >> version.out ()) && +- (_tao_in >> base_home.out ()) && +- (_tao_in >> managed_component.out ()) && +- (_tao_in >> primary_key.out ()) ++ (_tao_in >> members) )) - ACE_THROW (CORBA::MARSHAL()); - -- - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( - _tao_server_request.orb_core ()->server_request_interceptors (), -@@ -10407,7 +10386,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::HomeDef_ptr _tao_retval_info = _tao_retval._retn (); -+ IR_HomeDef_ptr _tao_retval_info = _tao_retval._retn (); - ri.result (_tao_retval_info); - _tao_retval = _tao_retval_info; - ri.reply_status (PortableInterceptor::SUCCESSFUL); -@@ -10462,7 +10441,7 @@ - POA_IR::ComponentRepository *_tao_impl = (POA_IR::ComponentRepository *) _tao_object_reference; +- ACE_THROW (CORBA::MARSHAL()); ++ ACE_THROW (CORBA::MARSHAL () ); + +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::ComponentRepository::TAO_ServerRequestInfo_IR_ComponentRepository_create_home ri ( +- _tao_server_request, +- _tao_impl +- , +- id.in (), +- name.in (), +- version.in (), +- base_home.in (), +- managed_component.in (), +- primary_key.in (), ++ _tao_impl->members ( ++ members, + ACE_TRY_ENV + ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->create_home ( +- id.in (), +- name.in (), +- version.in (), +- base_home.in (), +- managed_component.in (), +- primary_key.in (), +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::HomeDef_ptr _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; ++ + ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << _tao_retval.in ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); + ++ _tao_server_request.init_reply (); + } + +-void POA_IR::ComponentRepository::_is_a_skel ( +- TAO_ServerRequest &_tao_server_request, ++void POA_IR::StructDef::_is_a_skel ( ++ TAO_ServerRequest &_tao_server_request, + void * _tao_object_reference, + void * /* context */, + CORBA::Environment &ACE_TRY_ENV + ) + { + TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::ComponentRepository *_tao_impl = (POA_IR::ComponentRepository *) _tao_object_reference; ++ POA_IR::StructDef *_tao_impl = (POA_IR::StructDef *) _tao_object_reference; CORBA::Boolean _tao_retval = 0; CORBA::String_var value; - if (!(_tao_in >> value.out ())) + if (!((_tao_in >> value.out ()))) ACE_THROW (CORBA::MARSHAL ()); - +- ++ _tao_retval = _tao_impl->_is_a (value.in (), ACE_TRY_ENV); -@@ -10470,7 +10449,7 @@ - + ACE_CHECK; +- ++ _tao_server_request.init_reply (); TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); - if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) @@ -2739,8 +13786,21 @@ ACE_THROW (CORBA::MARSHAL ()); } -@@ -10487,7 +10466,7 @@ - +-void POA_IR::ComponentRepository::_non_existent_skel ( +- TAO_ServerRequest &_tao_server_request, ++void POA_IR::StructDef::_non_existent_skel ( ++ TAO_ServerRequest &_tao_server_request, + void * _tao_object_reference, + void * /* context */, + CORBA::Environment &ACE_TRY_ENV + ) + { +- POA_IR::ComponentRepository *_tao_impl = (POA_IR::ComponentRepository *) _tao_object_reference; ++ POA_IR::StructDef *_tao_impl = (POA_IR::StructDef *) _tao_object_reference; + CORBA::Boolean _tao_retval = _tao_impl->_non_existent (ACE_TRY_ENV); + ACE_CHECK; +- ++ _tao_server_request.init_reply (); TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); - if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) @@ -2748,385 +13808,2071 @@ ACE_THROW (CORBA::MARSHAL ()); } -@@ -10518,7 +10497,7 @@ +-CORBA::Boolean POA_IR::ComponentRepository::_is_a ( ++CORBA::Boolean POA_IR::StructDef::_is_a ( + const char* value, + CORBA::Environment &ACE_TRY_ENV + ) + { + if ( +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/ComponentRepository:1.0")) || +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/Repository:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/StructDef:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/TypedefDef:1.0")) || + (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/Container:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/Contained:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/IDLType:1.0")) || + (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/CORBA/IRObject:1.0")) || + (!ACE_OS::strcmp ((char *)value, CORBA::_tc_Object->id (ACE_TRY_ENV)))) + return 1; +@@ -10507,35 +6870,39 @@ + return 0; + } + +-void* POA_IR::ComponentRepository::_downcast ( ++void* POA_IR::StructDef::_downcast ( + const char* logical_type_id + ) + { +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/ComponentRepository:1.0") == 0) +- return ACE_static_cast (POA_IR::ComponentRepository_ptr, this); +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Repository:1.0") == 0) +- return ACE_static_cast (POA_IR::Repository_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/StructDef:1.0") == 0) ++ return ACE_static_cast (POA_IR::StructDef_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/TypedefDef:1.0") == 0) ++ return ACE_static_cast (POA_IR::TypedefDef_ptr, this); if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Container:1.0") == 0) return ACE_static_cast (POA_IR::Container_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Contained:1.0") == 0) ++ return ACE_static_cast (POA_IR::Contained_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/IDLType:1.0") == 0) ++ return ACE_static_cast (POA_IR::IDLType_ptr, this); if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/IRObject:1.0") == 0) - return ACE_static_cast (POA_CORBA::IRObject_ptr, this); + return ACE_static_cast (POA_CORBA_IRObject_ptr, this); if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/Object:1.0") == 0) return ACE_static_cast(PortableServer::Servant, this); return 0; -@@ -10548,10 +10527,9 @@ + } + +-void POA_IR::ComponentRepository::_dispatch (TAO_ServerRequest &req, void *context, CORBA::Environment &ACE_TRY_ENV) ++void POA_IR::StructDef::_dispatch (TAO_ServerRequest &req, void *context, CORBA::Environment &ACE_TRY_ENV) + { + this->synchronous_upcall_dispatch(req, context, this, ACE_TRY_ENV); + } + +-const char* POA_IR::ComponentRepository::_interface_repository_id (void) const ++const char* POA_IR::StructDef::_interface_repository_id (void) const + { +- return "IDL:omg.org/IR/ComponentRepository:1.0"; ++ return "IDL:omg.org/IR/StructDef:1.0"; + } + +-IR::ComponentRepository* +-POA_IR::ComponentRepository::_this (CORBA_Environment &ACE_TRY_ENV) ++IR::StructDef* ++POA_IR::StructDef::_this (CORBA_Environment &ACE_TRY_ENV) + { + TAO_Stub *stub = this->_create_stub (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); +@@ -10548,366 +6915,132 @@ ACE_NEW_RETURN (tmp, CORBA::Object (stub, 0, this), 0); CORBA::Object_var obj = tmp; - return ::IR::ComponentRepository::_unchecked_narrow (obj.in ()); -+ return IR_ComponentRepository::_unchecked_narrow (obj.in ()); - } - +-} - - #if (TAO_HAS_INTERCEPTORS == 1) - POA_IR::ComponentRepository::TAO_ServerRequestInfo_IR_ComponentRepository_create_component::TAO_ServerRequestInfo_IR_ComponentRepository_create_component ( - TAO_ServerRequest &_tao_server_request, -@@ -10559,8 +10537,8 @@ - const char * id, - const char * name, - const char * version, +- +-#if (TAO_HAS_INTERCEPTORS == 1) +-POA_IR::ComponentRepository::TAO_ServerRequestInfo_IR_ComponentRepository_create_component::TAO_ServerRequestInfo_IR_ComponentRepository_create_component ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::ComponentRepository *tao_impl +- , +- const char * id, +- const char * name, +- const char * version, - IR::ComponentDef_ptr base_component, - const IR::InterfaceDefSeq & supports_interfaces, -+ IR_ComponentDef_ptr base_component, -+ const IR_InterfaceDefSeq & supports_interfaces, - CORBA::Environment & - ) - : TAO_ServerRequestInfo (_tao_server_request), -@@ -10673,9 +10651,9 @@ - const char * id, - const char * name, - const char * version, +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- id_ (id), +- name_ (name), +- version_ (version), +- base_component_ (base_component), +- supports_interfaces_ (supports_interfaces) +-{} +- +-Dynamic::ParameterList * +-POA_IR::ComponentRepository::TAO_ServerRequestInfo_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 * +-POA_IR::ComponentRepository::TAO_ServerRequestInfo_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 * +-POA_IR::ComponentRepository::TAO_ServerRequestInfo_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 (); +-} +- +-char * +-POA_IR::ComponentRepository::TAO_ServerRequestInfo_IR_ComponentRepository_create_component::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::ComponentRepository::TAO_ServerRequestInfo_IR_ComponentRepository_create_component::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-void +-POA_IR::ComponentRepository::TAO_ServerRequestInfo_IR_ComponentRepository_create_component::result (IR::ComponentDef_ptr result) +-{ +- // Update the result. +- this->_result = result; +-} +- +-POA_IR::ComponentRepository::TAO_ServerRequestInfo_IR_ComponentRepository_create_home::TAO_ServerRequestInfo_IR_ComponentRepository_create_home ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::ComponentRepository *tao_impl +- , +- const char * id, +- const char * name, +- const char * version, - IR::HomeDef_ptr base_home, - IR::ComponentDef_ptr managed_component, - IR::ValueDef_ptr primary_key, -+ IR_HomeDef_ptr base_home, -+ IR_ComponentDef_ptr managed_component, -+ IR_ValueDef_ptr primary_key, - CORBA::Environment & - ) - : TAO_ServerRequestInfo (_tao_server_request), -@@ -10790,6 +10768,7 @@ +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- id_ (id), +- name_ (name), +- version_ (version), +- base_home_ (base_home), +- managed_component_ (managed_component), +- primary_key_ (primary_key) +-{} +- +-Dynamic::ParameterList * +-POA_IR::ComponentRepository::TAO_ServerRequestInfo_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 * +-POA_IR::ComponentRepository::TAO_ServerRequestInfo_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 * +-POA_IR::ComponentRepository::TAO_ServerRequestInfo_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 (); +-} +- +-char * +-POA_IR::ComponentRepository::TAO_ServerRequestInfo_IR_ComponentRepository_create_home::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::ComponentRepository::TAO_ServerRequestInfo_IR_ComponentRepository_create_home::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-void +-POA_IR::ComponentRepository::TAO_ServerRequestInfo_IR_ComponentRepository_create_home::result (IR::HomeDef_ptr result) +-{ +- // Update the result. +- this->_result = result; ++ return IR_StructDef::_unchecked_narrow (obj.in ()); } - #endif /* TAO_HAS_INTERCEPTORS */ -+ - class TAO_IR_ModuleDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable +-#endif /* TAO_HAS_INTERCEPTORS */ +-class TAO_IR_ModuleDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable ++class TAO_IR_UnionDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable { private: -@@ -10797,7 +10776,7 @@ + unsigned int hash (const char *str, unsigned int len); public: const TAO_operation_db_entry * lookup (const char *str, unsigned int len); }; --/* starting time is 18:47:27 */ +-/* starting time is 16:31:12 */ +/* starting time is 11:23:09 */ /* C++ code produced by gperf version 2.8 (ACE version) */ - /* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_ModuleDef_Perfect_Hash_OpTable -N lookup */ +-/* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_ModuleDef_Perfect_Hash_OpTable -N lookup */ ++/* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_UnionDef_Perfect_Hash_OpTable -N lookup */ unsigned int -@@ -10939,10 +10918,9 @@ +-TAO_IR_ModuleDef_Perfect_Hash_OpTable::hash (const char *str, unsigned int len) ++TAO_IR_UnionDef_Perfect_Hash_OpTable::hash (const char *str, unsigned int len) + { + static const unsigned char asso_values[] = + { + #if defined (ACE_MVS) +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 10, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 0, +- 52, 0, 15, 0, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 20, 0, 5, +- 52, 10, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 10, 20, 52, 52, 52, 10, 15, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, ++ 68, 68, 68, 68, 68, 68, 68, 68, 68, 68, ++ 68, 68, 68, 68, 68, 68, 68, 68, 68, 68, ++ 68, 68, 68, 68, 68, 68, 68, 68, 68, 68, ++ 68, 68, 68, 68, 68, 68, 68, 68, 68, 68, ++ 68, 68, 68, 68, 68, 68, 68, 68, 68, 68, ++ 68, 68, 68, 68, 68, 68, 68, 68, 68, 68, ++ 68, 68, 68, 68, 68, 68, 68, 68, 68, 68, ++ 68, 68, 68, 68, 68, 68, 68, 68, 68, 68, ++ 68, 68, 68, 68, 68, 68, 68, 68, 68, 68, ++ 68, 68, 68, 68, 68, 68, 68, 68, 68, 68, ++ 68, 68, 68, 68, 68, 68, 68, 68, 68, 0, ++ 68, 68, 68, 68, 68, 68, 68, 68, 68, 68, ++ 68, 68, 68, 68, 68, 68, 68, 68, 68, 0, ++ 68, 25, 3, 0, 0, 68, 68, 68, 68, 68, ++ 68, 68, 68, 68, 68, 68, 68, 10, 0, 10, ++ 68, 10, 68, 68, 68, 68, 68, 68, 68, 68, ++ 68, 68, 30, 15, 68, 68, 68, 5, 5, 68, ++ 68, 68, 68, 68, 68, 68, 68, 68, 68, 68, ++ 68, 68, 68, 68, 68, 68, 68, 68, 68, 68, ++ 68, 68, 68, 68, 68, 68, 68, 68, 68, 68, ++ 68, 68, 68, 68, 68, 68, 68, 68, 68, 68, ++ 68, 68, 68, 68, 68, 68, 68, 68, 68, 68, ++ 68, 68, 68, 68, 68, 68, 68, 68, 68, 68, ++ 68, 68, 68, 68, 68, 68, 68, 68, 68, 68, ++ 68, 68, 68, 68, 68, 68, 68, 68, 68, 68, ++ 68, 68, 68, 68, 68, 68, + #else +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 10, 52, 0, 52, 0, +- 15, 0, 52, 52, 52, 52, 52, 52, 20, 0, +- 5, 52, 10, 52, 52, 10, 20, 52, 52, 52, +- 10, 15, 52, 52, 52, 52, 52, 52, ++ 68, 68, 68, 68, 68, 68, 68, 68, 68, 68, ++ 68, 68, 68, 68, 68, 68, 68, 68, 68, 68, ++ 68, 68, 68, 68, 68, 68, 68, 68, 68, 68, ++ 68, 68, 68, 68, 68, 68, 68, 68, 68, 68, ++ 68, 68, 68, 68, 68, 68, 68, 68, 68, 68, ++ 68, 68, 68, 68, 68, 68, 68, 68, 68, 68, ++ 68, 68, 68, 68, 68, 68, 68, 68, 68, 68, ++ 68, 68, 68, 68, 68, 68, 68, 68, 68, 68, ++ 68, 68, 68, 68, 68, 68, 68, 68, 68, 68, ++ 68, 68, 68, 68, 68, 0, 68, 0, 68, 25, ++ 3, 0, 0, 68, 68, 68, 68, 68, 10, 0, ++ 10, 68, 10, 68, 68, 30, 15, 68, 68, 68, ++ 5, 5, 68, 68, 68, 68, 68, 68, + #endif /* ACE_MVS */ + }; + return len + asso_values[str[len - 1]] + asso_values[str[0]]; + } + + const class TAO_operation_db_entry * +-TAO_IR_ModuleDef_Perfect_Hash_OpTable::lookup (const char *str, unsigned int len) ++TAO_IR_UnionDef_Perfect_Hash_OpTable::lookup (const char *str, unsigned int len) + { + enum + { +- TOTAL_KEYWORDS = 30, ++ TOTAL_KEYWORDS = 36, + MIN_WORD_LENGTH = 4, +- MAX_WORD_LENGTH = 26, ++ MAX_WORD_LENGTH = 27, + MIN_HASH_VALUE = 4, +- MAX_HASH_VALUE = 51, +- HASH_VALUE_RANGE = 48, +- DUPLICATES = 5 ++ MAX_HASH_VALUE = 67, ++ HASH_VALUE_RANGE = 64, ++ DUPLICATES = 8 + }; + + static const class TAO_operation_db_entry wordlist[] = + { + {"",0},{"",0},{"",0},{"",0}, +- {"move", &POA_IR::ModuleDef::move_skel}, +- {"create_enum", &POA_IR::ModuleDef::create_enum_skel}, +- {"create_value", &POA_IR::ModuleDef::create_value_skel}, +- {"create_module", &POA_IR::ModuleDef::create_module_skel}, +- {"create_native", &POA_IR::ModuleDef::create_native_skel}, +- {"_is_a", &POA_IR::ModuleDef::_is_a_skel}, +- {"create_interface", &POA_IR::ModuleDef::create_interface_skel}, +- {"create_union", &POA_IR::ModuleDef::create_union_skel}, +- {"contents", &POA_IR::ModuleDef::contents_skel}, +- {"_get_name", &POA_IR::ModuleDef::_get_name_skel}, +- {"_set_name", &POA_IR::ModuleDef::_set_name_skel}, +- {"create_exception", &POA_IR::ModuleDef::create_exception_skel}, +- {"create_alias", &POA_IR::ModuleDef::create_alias_skel}, +- {"describe", &POA_IR::ModuleDef::describe_skel}, +- {"create_value_box", &POA_IR::ModuleDef::create_value_box_skel}, +- {"_get_version", &POA_IR::ModuleDef::_get_version_skel}, +- {"_set_version", &POA_IR::ModuleDef::_set_version_skel}, +- {"_get_absolute_name", &POA_IR::ModuleDef::_get_absolute_name_skel}, +- {"_get_defined_in", &POA_IR::ModuleDef::_get_defined_in_skel}, +- {"lookup_name", &POA_IR::ModuleDef::lookup_name_skel}, +- {"_get_id", &POA_IR::ModuleDef::_get_id_skel}, +- {"_set_id", &POA_IR::ModuleDef::_set_id_skel}, +- {"create_struct", &POA_IR::ModuleDef::create_struct_skel}, +- {"create_constant", &POA_IR::ModuleDef::create_constant_skel}, +- {"lookup", &POA_IR::ModuleDef::lookup_skel}, +- {"destroy", &POA_IR::ModuleDef::destroy_skel}, +- {"_get_def_kind", &POA_IR::ModuleDef::_get_def_kind_skel}, +- {"describe_contents", &POA_IR::ModuleDef::describe_contents_skel}, +- {"_non_existent", &POA_IR::ModuleDef::_non_existent_skel}, +- {"_get_containing_repository", &POA_IR::ModuleDef::_get_containing_repository_skel}, ++ {"move", &POA_IR::UnionDef::move_skel}, ++ {"_is_a", &POA_IR::UnionDef::_is_a_skel}, ++ {"_get_name", &POA_IR::UnionDef::_get_name_skel}, ++ {"_get_type", &POA_IR::UnionDef::_get_type_skel}, ++ {"_set_name", &POA_IR::UnionDef::_set_name_skel}, ++ {"_get_id", &POA_IR::UnionDef::_get_id_skel}, ++ {"_set_id", &POA_IR::UnionDef::_set_id_skel}, ++ {"describe", &POA_IR::UnionDef::describe_skel}, ++ {"destroy", &POA_IR::UnionDef::destroy_skel}, ++ {"_get_def_kind", &POA_IR::UnionDef::_get_def_kind_skel}, ++ {"_get_absolute_name", &POA_IR::UnionDef::_get_absolute_name_skel}, ++ {"lookup_name", &POA_IR::UnionDef::lookup_name_skel}, ++ {"_get_version", &POA_IR::UnionDef::_get_version_skel}, ++ {"_set_version", &POA_IR::UnionDef::_set_version_skel}, ++ {"_get_discriminator_type", &POA_IR::UnionDef::_get_discriminator_type_skel}, ++ {"_get_defined_in", &POA_IR::UnionDef::_get_defined_in_skel}, ++ {"lookup", &POA_IR::UnionDef::lookup_skel}, ++ {"_get_discriminator_type_def", &POA_IR::UnionDef::_get_discriminator_type_def_skel}, ++ {"_set_discriminator_type_def", &POA_IR::UnionDef::_set_discriminator_type_def_skel}, ++ {"_non_existent", &POA_IR::UnionDef::_non_existent_skel}, ++ {"_get_containing_repository", &POA_IR::UnionDef::_get_containing_repository_skel}, ++ {"create_enum", &POA_IR::UnionDef::create_enum_skel}, ++ {"create_value", &POA_IR::UnionDef::create_value_skel}, ++ {"create_module", &POA_IR::UnionDef::create_module_skel}, ++ {"create_native", &POA_IR::UnionDef::create_native_skel}, ++ {"create_interface", &POA_IR::UnionDef::create_interface_skel}, ++ {"_get_members", &POA_IR::UnionDef::_get_members_skel}, ++ {"_set_members", &POA_IR::UnionDef::_set_members_skel}, ++ {"create_value_box", &POA_IR::UnionDef::create_value_box_skel}, ++ {"create_union", &POA_IR::UnionDef::create_union_skel}, ++ {"describe_contents", &POA_IR::UnionDef::describe_contents_skel}, ++ {"create_exception", &POA_IR::UnionDef::create_exception_skel}, ++ {"create_struct", &POA_IR::UnionDef::create_struct_skel}, ++ {"create_constant", &POA_IR::UnionDef::create_constant_skel}, ++ {"contents", &POA_IR::UnionDef::contents_skel}, ++ {"create_alias", &POA_IR::UnionDef::create_alias_skel}, + }; + + static const signed char lookup[] = + { +- -1, -1, -1, -1, 4, -7, -2, -13, -2, -19, -2, 5, 6, -59, +- -1, 9, 10, 11, 12, -63, -1, 15, 16, 17, -24, -2, 18, -69, +- 21, -1, 22, 23, -59, 26, -1, 27, 28, 29, 30, -1, -1, -1, +- 31, 32, -1, -1, -1, -1, -1, -1, -1, 33, ++ -1, -1, -6, -3, 4, 5, -1, -9, -2, -74, -70, 11, -1, -16, ++ -2, 12, 13, -1, 14, -21, -2, 15, -76, 18, -1, 19, 20, -75, ++ 23, -1, -1, 24, -1, -1, -27, -2, 25, 26, -71, -30, -2, 29, ++ -70, -1, -1, -1, 32, 33, -1, -1, 34, 35, -1, 36, -1, 37, ++ -1, -1, -1, -1, -1, -1, -1, 38, -1, -1, -1, 39, + }; + + if (len <= MAX_WORD_LENGTH && len >= MIN_WORD_LENGTH) +@@ -10941,38 +7074,37 @@ } return 0; } --/* ending time is 18:47:27 */ +-/* ending time is 16:31:12 */ +-static TAO_IR_ModuleDef_Perfect_Hash_OpTable tao_IR_ModuleDef_optable; +- +/* ending time is 11:23:09 */ - static TAO_IR_ModuleDef_Perfect_Hash_OpTable tao_IR_ModuleDef_optable; ++static TAO_IR_UnionDef_Perfect_Hash_OpTable tao_IR_UnionDef_optable; -- /////////////////////////////////////////////////////////////////////// // Strategized Proxy Broker Implementation // -@@ -10968,9 +10946,9 @@ + + // Factory function Implementation. +-POA_IR::_TAO_ModuleDef_Strategized_Proxy_Broker *POA_IR::_TAO_ModuleDef_Strategized_Proxy_Broker::the_TAO_ModuleDef_Strategized_Proxy_Broker (void) ++POA_IR::_TAO_UnionDef_Strategized_Proxy_Broker *POA_IR::_TAO_UnionDef_Strategized_Proxy_Broker::the_TAO_UnionDef_Strategized_Proxy_Broker (void) + { +- static POA_IR::_TAO_ModuleDef_Strategized_Proxy_Broker strategized_proxy_broker; ++ static POA_IR::_TAO_UnionDef_Strategized_Proxy_Broker strategized_proxy_broker; + return &strategized_proxy_broker; + } + +-POA_IR::_TAO_ModuleDef_Strategized_Proxy_Broker::_TAO_ModuleDef_Strategized_Proxy_Broker (void) ++POA_IR::_TAO_UnionDef_Strategized_Proxy_Broker::_TAO_UnionDef_Strategized_Proxy_Broker (void) + { + for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) + this->proxy_cache_[i] = 0; + + } + +-POA_IR::_TAO_ModuleDef_Strategized_Proxy_Broker::~_TAO_ModuleDef_Strategized_Proxy_Broker (void) ++POA_IR::_TAO_UnionDef_Strategized_Proxy_Broker::~_TAO_UnionDef_Strategized_Proxy_Broker (void) + { + for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) + delete this->proxy_cache_[i]; } -IR::_TAO_ModuleDef_Proxy_Impl& -+_TAO_ModuleDef_Proxy_Impl& - POA_IR::_TAO_ModuleDef_Strategized_Proxy_Broker::select_proxy ( +-POA_IR::_TAO_ModuleDef_Strategized_Proxy_Broker::select_proxy ( - ::IR::ModuleDef *object, -+ IR_ModuleDef *object, ++_TAO_UnionDef_Proxy_Impl& ++POA_IR::_TAO_UnionDef_Strategized_Proxy_Broker::select_proxy ( ++ IR_UnionDef *object, CORBA::Environment &ACE_TRY_ENV ) { -@@ -11002,7 +10980,7 @@ +@@ -10990,7 +7122,7 @@ + } + + void +-POA_IR::_TAO_ModuleDef_Strategized_Proxy_Broker::create_proxy ( ++POA_IR::_TAO_UnionDef_Strategized_Proxy_Broker::create_proxy ( + TAO_ORB_Core::TAO_Collocation_Strategies strategy, + CORBA::Environment &ACE_TRY_ENV + ) +@@ -11004,7 +7136,7 @@ case TAO_ORB_Core::THRU_POA_STRATEGY: ACE_NEW_THROW_EX ( this->proxy_cache_[strategy], - POA_IR::_TAO_ModuleDef_ThruPOA_Proxy_Impl, -+ _TAO_ModuleDef_ThruPOA_Proxy_Impl, ++ _TAO_UnionDef_ThruPOA_Proxy_Impl, CORBA::NO_MEMORY () ); ACE_CHECK; -@@ -11012,7 +10990,7 @@ +@@ -11014,7 +7146,7 @@ default: ACE_NEW_THROW_EX ( this->proxy_cache_[strategy], - ::IR::_TAO_ModuleDef_Remote_Proxy_Impl, -+ _TAO_ModuleDef_Remote_Proxy_Impl, ++ _TAO_UnionDef_Remote_Proxy_Impl, CORBA::NO_MEMORY () ); ACE_CHECK; -@@ -11029,26 +11007,26 @@ +@@ -11031,185 +7163,477 @@ /////////////////////////////////////////////////////////////////////// -IR::_TAO_ModuleDef_Proxy_Broker * -IR__TAO_ModuleDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) -+_TAO_ModuleDef_Proxy_Broker * -+_TAO_ModuleDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) ++_TAO_UnionDef_Proxy_Broker * ++_TAO_UnionDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) { ACE_UNUSED_ARG (obj); - return ::POA_IR::_TAO_ModuleDef_Strategized_Proxy_Broker::the_TAO_ModuleDef_Strategized_Proxy_Broker(); +- return ::POA_IR::_TAO_ModuleDef_Strategized_Proxy_Broker::the_TAO_ModuleDef_Strategized_Proxy_Broker(); ++ return ::POA_IR::_TAO_UnionDef_Strategized_Proxy_Broker::the_TAO_UnionDef_Strategized_Proxy_Broker(); } int -IR__TAO_ModuleDef_Proxy_Broker_Factory_Initializer (long _dummy_) -+_TAO_ModuleDef_Proxy_Broker_Factory_Initializer (long _dummy_) ++_TAO_UnionDef_Proxy_Broker_Factory_Initializer (long _dummy_) { ACE_UNUSED_ARG (_dummy_); - IR__TAO_ModuleDef_Proxy_Broker_Factory_function_pointer = - IR__TAO_ModuleDef_Proxy_Broker_Factory_function; -+ _TAO_ModuleDef_Proxy_Broker_Factory_function_pointer = -+ _TAO_ModuleDef_Proxy_Broker_Factory_function; ++ _TAO_UnionDef_Proxy_Broker_Factory_function_pointer = ++ _TAO_UnionDef_Proxy_Broker_Factory_function; return 0; } -static int IR__TAO_ModuleDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = - IR__TAO_ModuleDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, IR__TAO_ModuleDef_Proxy_Broker_Factory_Initializer)); -+static int _TAO_ModuleDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = -+ _TAO_ModuleDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, _TAO_ModuleDef_Proxy_Broker_Factory_Initializer)); ++static int _TAO_UnionDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = ++ _TAO_UnionDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, _TAO_UnionDef_Proxy_Broker_Factory_Initializer)); /////////////////////////////////////////////////////////////////////// -@@ -11074,7 +11052,7 @@ - POA_IR::ModuleDef::ModuleDef (const ModuleDef& rhs) - : ACE_NESTED_CLASS (POA_IR,Container) (rhs), - ACE_NESTED_CLASS (POA_IR,Contained) (rhs), + // ThruPOA Proxy Implementation + // + +-POA_IR::_TAO_ModuleDef_ThruPOA_Proxy_Impl::_TAO_ModuleDef_ThruPOA_Proxy_Impl (void) ++POA_IR::_TAO_UnionDef_ThruPOA_Proxy_Impl::_TAO_UnionDef_ThruPOA_Proxy_Impl (void) + {} + +-// ThruPOA Implementation of the IDL interface methods +- +-// +-// End ThruPOA Proxy Implementation +-/////////////////////////////////////////////////////////////////////// +- +-// skeleton constructor +-POA_IR::ModuleDef::ModuleDef (void) +-{ +- this->optable_ = &tao_IR_ModuleDef_optable; +-} +- +-// copy ctor +-POA_IR::ModuleDef::ModuleDef (const ModuleDef& rhs) +- : ACE_NESTED_CLASS (POA_IR,Container) (rhs), +- ACE_NESTED_CLASS (POA_IR,Contained) (rhs), - ACE_NESTED_CLASS (POA_CORBA,IRObject) (rhs), -+ POA_CORBA_IRObject (rhs), - TAO_ServantBase (rhs) +- TAO_ServantBase (rhs) ++POA_IR::_TAO_UnionDef_ThruPOA_Proxy_Impl::~_TAO_UnionDef_ThruPOA_Proxy_Impl (void) {} -@@ -11094,7 +11072,7 @@ - POA_IR::ModuleDef *_tao_impl = (POA_IR::ModuleDef *) _tao_object_reference; - CORBA::Boolean _tao_retval = 0; - CORBA::String_var value; +-// skeleton destructor +-POA_IR::ModuleDef::~ModuleDef (void) +-{ +-} ++// ThruPOA Implementation of the IDL interface methods + +-void POA_IR::ModuleDef::_is_a_skel ( +- TAO_ServerRequest &_tao_server_request, +- void * _tao_object_reference, +- void * /* context */, ++CORBA::TypeCode_ptr POA_IR::_TAO_UnionDef_ThruPOA_Proxy_Impl::discriminator_type ( ++ CORBA_Object *_collocated_tao_target_, + CORBA::Environment &ACE_TRY_ENV + ) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException ++ )) + { +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::ModuleDef *_tao_impl = (POA_IR::ModuleDef *) _tao_object_reference; +- CORBA::Boolean _tao_retval = 0; +- CORBA::String_var value; - if (!(_tao_in >> value.out ())) -+ if (!((_tao_in >> value.out ()))) - ACE_THROW (CORBA::MARSHAL ()); - - _tao_retval = _tao_impl->_is_a (value.in (), ACE_TRY_ENV); -@@ -11102,7 +11080,7 @@ - - _tao_server_request.init_reply (); - TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- ACE_THROW (CORBA::MARSHAL ()); +- +- _tao_retval = _tao_impl->_is_a (value.in (), ACE_TRY_ENV); +- ACE_CHECK; +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); - if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) -+ if (!((_tao_out << CORBA::Any::from_boolean (_tao_retval)))) - ACE_THROW (CORBA::MARSHAL ()); +- ACE_THROW (CORBA::MARSHAL ()); ++ CORBA::TypeCode_var _tao_retval; ++ ACE_UNUSED_ARG (_tao_retval); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "discriminator_type", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK_RETURN (0); ++ return ACE_reinterpret_cast ( ++ POA_IR::UnionDef_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/UnionDef:1.0" ++ ) ++ )->discriminator_type ( ++ ACE_TRY_ENV ++ ); } -@@ -11119,7 +11097,7 @@ - - _tao_server_request.init_reply (); - TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +-void POA_IR::ModuleDef::_non_existent_skel ( +- TAO_ServerRequest &_tao_server_request, +- void * _tao_object_reference, +- void * /* context */, ++IR::IDLType_ptr POA_IR::_TAO_UnionDef_ThruPOA_Proxy_Impl::discriminator_type_def ( ++ CORBA_Object *_collocated_tao_target_, + CORBA::Environment &ACE_TRY_ENV + ) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException ++ )) + { +- POA_IR::ModuleDef *_tao_impl = (POA_IR::ModuleDef *) _tao_object_reference; +- CORBA::Boolean _tao_retval = _tao_impl->_non_existent (ACE_TRY_ENV); +- ACE_CHECK; +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); - if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) -+ if (!((_tao_out << CORBA::Any::from_boolean (_tao_retval)))) - ACE_THROW (CORBA::MARSHAL ()); +- ACE_THROW (CORBA::MARSHAL ()); ++ IR_IDLType_var _tao_retval; ++ ACE_UNUSED_ARG (_tao_retval); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "discriminator_type_def", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK_RETURN (0); ++ return ACE_reinterpret_cast ( ++ POA_IR::UnionDef_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/UnionDef:1.0" ++ ) ++ )->discriminator_type_def ( ++ ACE_TRY_ENV ++ ); } -@@ -11150,7 +11128,7 @@ - if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Contained:1.0") == 0) - return ACE_static_cast (POA_IR::Contained_ptr, this); - if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/IRObject:1.0") == 0) +-CORBA::Boolean POA_IR::ModuleDef::_is_a ( +- const char* value, ++void POA_IR::_TAO_UnionDef_ThruPOA_Proxy_Impl::discriminator_type_def ( ++ CORBA_Object *_collocated_tao_target_, ++ IR_IDLType_ptr discriminator_type_def, + CORBA::Environment &ACE_TRY_ENV + ) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException ++ )) + { +- if ( +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/ModuleDef:1.0")) || +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/Container:1.0")) || +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/Contained:1.0")) || +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/CORBA/IRObject:1.0")) || +- (!ACE_OS::strcmp ((char *)value, CORBA::_tc_Object->id (ACE_TRY_ENV)))) +- return 1; +- else +- return 0; ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "discriminator_type_def", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK; ++ ACE_reinterpret_cast ( ++ POA_IR::UnionDef_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/UnionDef:1.0" ++ ) ++ )->discriminator_type_def ( ++ discriminator_type_def, ++ ACE_TRY_ENV ++ ); ++ return; + } + +-void* POA_IR::ModuleDef::_downcast ( +- const char* logical_type_id ++IR::UnionMemberSeq * POA_IR::_TAO_UnionDef_ThruPOA_Proxy_Impl::members ( ++ CORBA_Object *_collocated_tao_target_, ++ CORBA::Environment &ACE_TRY_ENV + ) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException ++ )) + { +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/ModuleDef:1.0") == 0) +- return ACE_static_cast (POA_IR::ModuleDef_ptr, this); +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Container:1.0") == 0) +- return ACE_static_cast (POA_IR::Container_ptr, this); +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Contained:1.0") == 0) +- return ACE_static_cast (POA_IR::Contained_ptr, this); +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/IRObject:1.0") == 0) - return ACE_static_cast (POA_CORBA::IRObject_ptr, this); -+ return ACE_static_cast (POA_CORBA_IRObject_ptr, this); - if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/Object:1.0") == 0) - return ACE_static_cast(PortableServer::Servant, this); - return 0; -@@ -11180,12 +11158,12 @@ - ACE_NEW_RETURN (tmp, CORBA::Object (stub, 0, this), 0); - - CORBA::Object_var obj = tmp; +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/Object:1.0") == 0) +- return ACE_static_cast(PortableServer::Servant, this); +- return 0; ++ IR_UnionMemberSeq_var _tao_retval; ++ ACE_UNUSED_ARG (_tao_retval); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "members", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK_RETURN (0); ++ return ACE_reinterpret_cast ( ++ POA_IR::UnionDef_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/UnionDef:1.0" ++ ) ++ )->members ( ++ ACE_TRY_ENV ++ ); + } + +-void POA_IR::ModuleDef::_dispatch (TAO_ServerRequest &req, void *context, CORBA::Environment &ACE_TRY_ENV) ++void POA_IR::_TAO_UnionDef_ThruPOA_Proxy_Impl::members ( ++ CORBA_Object *_collocated_tao_target_, ++ const IR_UnionMemberSeq & members, ++ CORBA::Environment &ACE_TRY_ENV ++ ) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException ++ )) + { +- this->synchronous_upcall_dispatch(req, context, this, ACE_TRY_ENV); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "members", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK; ++ ACE_reinterpret_cast ( ++ POA_IR::UnionDef_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/UnionDef:1.0" ++ ) ++ )->members ( ++ members, ++ ACE_TRY_ENV ++ ); ++ return; + } + +-const char* POA_IR::ModuleDef::_interface_repository_id (void) const ++// ++// End ThruPOA Proxy Implementation ++/////////////////////////////////////////////////////////////////////// ++ ++// skeleton constructor ++POA_IR::UnionDef::UnionDef (void) + { +- return "IDL:omg.org/IR/ModuleDef:1.0"; ++ this->optable_ = &tao_IR_UnionDef_optable; + } + +-IR::ModuleDef* +-POA_IR::ModuleDef::_this (CORBA_Environment &ACE_TRY_ENV) ++// copy ctor ++POA_IR::UnionDef::UnionDef (const UnionDef& rhs) ++ : ACE_NESTED_CLASS (POA_IR,TypedefDef) (rhs), ++ ACE_NESTED_CLASS (POA_IR,Container) (rhs), ++ ACE_NESTED_CLASS (POA_IR,Contained) (rhs), ++ ACE_NESTED_CLASS (POA_IR,IDLType) (rhs), ++ POA_CORBA_IRObject (rhs), ++ TAO_ServantBase (rhs) ++{} ++ ++// skeleton destructor ++POA_IR::UnionDef::~UnionDef (void) + { +- TAO_Stub *stub = this->_create_stub (ACE_TRY_ENV); +- ACE_CHECK_RETURN (0); +- +- CORBA::Object_ptr tmp = CORBA::Object::_nil (); +- +- if (stub->servant_orb_var ()->orb_core ()->optimize_collocation_objects ()) +- ACE_NEW_RETURN (tmp, CORBA::Object (stub, 1, this), 0); +- else +- ACE_NEW_RETURN (tmp, CORBA::Object (stub, 0, this), 0); +- +- CORBA::Object_var obj = tmp; - return ::IR::ModuleDef::_unchecked_narrow (obj.in ()); -+ return IR_ModuleDef::_unchecked_narrow (obj.in ()); } -- - #if (TAO_HAS_INTERCEPTORS == 1) - #endif /* TAO_HAS_INTERCEPTORS */ ++void POA_IR::UnionDef::_get_discriminator_type_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) ++{ ++ POA_IR::UnionDef *_tao_impl = (POA_IR::UnionDef *)_tao_object_reference; ++ ++ CORBA::TypeCode_var _tao_retval; + +-#if (TAO_HAS_INTERCEPTORS == 1) +-#endif /* TAO_HAS_INTERCEPTORS */ +-class TAO_IR_ConstantDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable ++ _tao_retval = _tao_impl->discriminator_type ( ++ ACE_TRY_ENV ++ ); ++ ++ ACE_CHECK; ++ ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!( ++ (_tao_out << _tao_retval.in ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); ++} ++ ++void POA_IR::UnionDef::_get_discriminator_type_def_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) + { +-private: +- unsigned int hash (const char *str, unsigned int len); +-public: +- const TAO_operation_db_entry * lookup (const char *str, unsigned int len); +-}; +-/* starting time is 16:31:12 */ +-/* C++ code produced by gperf version 2.8 (ACE version) */ +-/* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_ConstantDef_Perfect_Hash_OpTable -N lookup */ +-unsigned int +-TAO_IR_ConstantDef_Perfect_Hash_OpTable::hash (const char *str, unsigned int len) ++ POA_IR::UnionDef *_tao_impl = (POA_IR::UnionDef *)_tao_object_reference; ++ ++ IR_IDLType_var _tao_retval; ++ ++ _tao_retval = _tao_impl->discriminator_type_def ( ++ ACE_TRY_ENV ++ ); ++ ++ ACE_CHECK; ++ ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!( ++ (_tao_out << _tao_retval.in ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); ++} ++ ++void POA_IR::UnionDef::_set_discriminator_type_def_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) + { +- static const unsigned char asso_values[] = +- { +-#if defined (ACE_MVS) +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::UnionDef *_tao_impl = (POA_IR::UnionDef *)_tao_object_reference; ++ ++ IR_IDLType_var discriminator_type_def; ++ if (!( ++ (_tao_in >> discriminator_type_def.out ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); ++ ++ _tao_impl->discriminator_type_def ( ++ discriminator_type_def.in (), ++ ACE_TRY_ENV ++ ); + - class TAO_IR_ConstantDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable ++ ACE_CHECK; ++ ++ _tao_server_request.init_reply (); ++} ++ ++void POA_IR::UnionDef::_get_members_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) ++{ ++ POA_IR::UnionDef *_tao_impl = (POA_IR::UnionDef *)_tao_object_reference; ++ ++ IR_UnionMemberSeq_var _tao_retval; ++ ++ _tao_retval = _tao_impl->members ( ++ ACE_TRY_ENV ++ ); ++ ++ ACE_CHECK; ++ ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!( ++ (_tao_out << _tao_retval.in ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); ++} ++ ++void POA_IR::UnionDef::_set_members_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) ++{ ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::UnionDef *_tao_impl = (POA_IR::UnionDef *)_tao_object_reference; ++ ++ IR_UnionMemberSeq members; ++ if (!( ++ (_tao_in >> members) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); ++ ++ _tao_impl->members ( ++ members, ++ ACE_TRY_ENV ++ ); ++ ++ ACE_CHECK; ++ ++ _tao_server_request.init_reply (); ++} ++ ++void POA_IR::UnionDef::_is_a_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void * _tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++ ) ++{ ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::UnionDef *_tao_impl = (POA_IR::UnionDef *) _tao_object_reference; ++ CORBA::Boolean _tao_retval = 0; ++ CORBA::String_var value; ++ if (!((_tao_in >> value.out ()))) ++ ACE_THROW (CORBA::MARSHAL ()); ++ ++ _tao_retval = _tao_impl->_is_a (value.in (), ACE_TRY_ENV); ++ ACE_CHECK; ++ ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!((_tao_out << CORBA::Any::from_boolean (_tao_retval)))) ++ ACE_THROW (CORBA::MARSHAL ()); ++} ++ ++void POA_IR::UnionDef::_non_existent_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void * _tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++ ) ++{ ++ POA_IR::UnionDef *_tao_impl = (POA_IR::UnionDef *) _tao_object_reference; ++ CORBA::Boolean _tao_retval = _tao_impl->_non_existent (ACE_TRY_ENV); ++ ACE_CHECK; ++ ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!((_tao_out << CORBA::Any::from_boolean (_tao_retval)))) ++ ACE_THROW (CORBA::MARSHAL ()); ++} ++ ++CORBA::Boolean POA_IR::UnionDef::_is_a ( ++ const char* value, ++ CORBA::Environment &ACE_TRY_ENV ++ ) ++{ ++ if ( ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/UnionDef:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/TypedefDef:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/Container:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/Contained:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/IDLType:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/CORBA/IRObject:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, CORBA::_tc_Object->id (ACE_TRY_ENV)))) ++ return 1; ++ else ++ return 0; ++} ++ ++void* POA_IR::UnionDef::_downcast ( ++ const char* logical_type_id ++ ) ++{ ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/UnionDef:1.0") == 0) ++ return ACE_static_cast (POA_IR::UnionDef_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/TypedefDef:1.0") == 0) ++ return ACE_static_cast (POA_IR::TypedefDef_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Container:1.0") == 0) ++ return ACE_static_cast (POA_IR::Container_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Contained:1.0") == 0) ++ return ACE_static_cast (POA_IR::Contained_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/IDLType:1.0") == 0) ++ return ACE_static_cast (POA_IR::IDLType_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/IRObject:1.0") == 0) ++ return ACE_static_cast (POA_CORBA_IRObject_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/Object:1.0") == 0) ++ return ACE_static_cast(PortableServer::Servant, this); ++ return 0; ++} ++ ++void POA_IR::UnionDef::_dispatch (TAO_ServerRequest &req, void *context, CORBA::Environment &ACE_TRY_ENV) ++{ ++ this->synchronous_upcall_dispatch(req, context, this, ACE_TRY_ENV); ++} ++ ++const char* POA_IR::UnionDef::_interface_repository_id (void) const ++{ ++ return "IDL:omg.org/IR/UnionDef:1.0"; ++} ++ ++IR::UnionDef* ++POA_IR::UnionDef::_this (CORBA_Environment &ACE_TRY_ENV) ++{ ++ TAO_Stub *stub = this->_create_stub (ACE_TRY_ENV); ++ ACE_CHECK_RETURN (0); ++ ++ CORBA::Object_ptr tmp = CORBA::Object::_nil (); ++ ++ if (stub->servant_orb_var ()->orb_core ()->optimize_collocation_objects ()) ++ ACE_NEW_RETURN (tmp, CORBA::Object (stub, 1, this), 0); ++ else ++ ACE_NEW_RETURN (tmp, CORBA::Object (stub, 0, this), 0); ++ ++ CORBA::Object_var obj = tmp; ++ return IR_UnionDef::_unchecked_narrow (obj.in ()); ++} ++ ++class TAO_IR_EnumDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable ++{ ++private: ++ unsigned int hash (const char *str, unsigned int len); ++public: ++ const TAO_operation_db_entry * lookup (const char *str, unsigned int len); ++}; ++/* starting time is 11:23:10 */ ++/* C++ code produced by gperf version 2.8 (ACE version) */ ++/* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_EnumDef_Perfect_Hash_OpTable -N lookup */ ++unsigned int ++TAO_IR_EnumDef_Perfect_Hash_OpTable::hash (const char *str, unsigned int len) ++{ ++ static const unsigned char asso_values[] = ++ { ++#if defined (ACE_MVS) ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, + 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, + 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, + 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +@@ -11217,10 +7641,10 @@ + 37, 37, 37, 37, 37, 37, 37, 37, 37, 0, + 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, + 37, 37, 37, 37, 37, 37, 37, 37, 37, 0, +- 37, 37, 0, 0, 10, 37, 37, 37, 37, 37, ++ 37, 37, 0, 0, 37, 37, 37, 37, 37, 37, + 37, 37, 37, 37, 37, 37, 37, 37, 0, 0, + 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 15, 37, 37, 37, 37, 10, 37, ++ 37, 37, 10, 10, 37, 37, 37, 37, 10, 37, + 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, + 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, + 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +@@ -11241,8 +7665,8 @@ + 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, + 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, + 37, 37, 37, 37, 37, 0, 37, 0, 37, 37, +- 0, 0, 10, 37, 37, 37, 37, 37, 37, 0, +- 0, 37, 37, 37, 37, 37, 15, 37, 37, 37, ++ 0, 0, 37, 37, 37, 37, 37, 37, 37, 0, ++ 0, 37, 37, 37, 37, 10, 10, 37, 37, 37, + 37, 10, 37, 37, 37, 37, 37, 37, + #endif /* ACE_MVS */ + }; +@@ -11250,49 +7674,47 @@ + } + + const class TAO_operation_db_entry * +-TAO_IR_ConstantDef_Perfect_Hash_OpTable::lookup (const char *str, unsigned int len) ++TAO_IR_EnumDef_Perfect_Hash_OpTable::lookup (const char *str, unsigned int len) { - private: -@@ -11193,7 +11171,7 @@ - public: - const TAO_operation_db_entry * lookup (const char *str, unsigned int len); - }; --/* starting time is 18:47:27 */ -+/* starting time is 11:23:09 */ - /* C++ code produced by gperf version 2.8 (ACE version) */ - /* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_ConstantDef_Perfect_Hash_OpTable -N lookup */ - unsigned int -@@ -11324,10 +11302,9 @@ + enum + { +- TOTAL_KEYWORDS = 20, ++ TOTAL_KEYWORDS = 18, + MIN_WORD_LENGTH = 4, + MAX_WORD_LENGTH = 26, + MIN_HASH_VALUE = 4, + MAX_HASH_VALUE = 36, + HASH_VALUE_RANGE = 33, +- DUPLICATES = 7 ++ DUPLICATES = 6 + }; + + static const class TAO_operation_db_entry wordlist[] = + { + {"",0},{"",0},{"",0},{"",0}, +- {"move", &POA_IR::ConstantDef::move_skel}, +- {"_is_a", &POA_IR::ConstantDef::_is_a_skel}, +- {"_get_id", &POA_IR::ConstantDef::_get_id_skel}, +- {"_set_id", &POA_IR::ConstantDef::_set_id_skel}, +- {"describe", &POA_IR::ConstantDef::describe_skel}, +- {"_get_type", &POA_IR::ConstantDef::_get_type_skel}, +- {"_set_name", &POA_IR::ConstantDef::_set_name_skel}, +- {"_get_name", &POA_IR::ConstantDef::_get_name_skel}, +- {"_get_value", &POA_IR::ConstantDef::_get_value_skel}, +- {"_set_value", &POA_IR::ConstantDef::_set_value_skel}, +- {"_get_version", &POA_IR::ConstantDef::_get_version_skel}, +- {"_set_version", &POA_IR::ConstantDef::_set_version_skel}, +- {"_get_def_kind", &POA_IR::ConstantDef::_get_def_kind_skel}, +- {"_get_defined_in", &POA_IR::ConstantDef::_get_defined_in_skel}, +- {"destroy", &POA_IR::ConstantDef::destroy_skel}, +- {"_get_absolute_name", &POA_IR::ConstantDef::_get_absolute_name_skel}, +- {"_get_type_def", &POA_IR::ConstantDef::_get_type_def_skel}, +- {"_set_type_def", &POA_IR::ConstantDef::_set_type_def_skel}, +- {"_non_existent", &POA_IR::ConstantDef::_non_existent_skel}, +- {"_get_containing_repository", &POA_IR::ConstantDef::_get_containing_repository_skel}, ++ {"move", &POA_IR::EnumDef::move_skel}, ++ {"_is_a", &POA_IR::EnumDef::_is_a_skel}, ++ {"_get_id", &POA_IR::EnumDef::_get_id_skel}, ++ {"_set_id", &POA_IR::EnumDef::_set_id_skel}, ++ {"describe", &POA_IR::EnumDef::describe_skel}, ++ {"_get_name", &POA_IR::EnumDef::_get_name_skel}, ++ {"_get_type", &POA_IR::EnumDef::_get_type_skel}, ++ {"_set_name", &POA_IR::EnumDef::_set_name_skel}, ++ {"_get_version", &POA_IR::EnumDef::_get_version_skel}, ++ {"_set_version", &POA_IR::EnumDef::_set_version_skel}, ++ {"_get_def_kind", &POA_IR::EnumDef::_get_def_kind_skel}, ++ {"_get_defined_in", &POA_IR::EnumDef::_get_defined_in_skel}, ++ {"destroy", &POA_IR::EnumDef::destroy_skel}, ++ {"_get_absolute_name", &POA_IR::EnumDef::_get_absolute_name_skel}, ++ {"_get_members", &POA_IR::EnumDef::_get_members_skel}, ++ {"_set_members", &POA_IR::EnumDef::_set_members_skel}, ++ {"_non_existent", &POA_IR::EnumDef::_non_existent_skel}, ++ {"_get_containing_repository", &POA_IR::EnumDef::_get_containing_repository_skel}, + }; + + static const signed char lookup[] = + { +- -12, -2, -14, -2, 4, 5, -1, 53, 8, 46, -46, -1, -46, 16, +- -1, 17, -1, 18, 19, -9, -3, -20, -2, -38, -6, -2, -1, -1, +- 22, -1, -1, -1, -1, -1, -1, -1, 23, ++ -6, -2, -9, -3, 4, 5, -1, -43, 8, -43, -12, -2, -38, 14, ++ -1, 15, -1, 16, 17, -1, -18, -2, -38, 20, -1, -1, -1, -1, ++ -1, -1, -1, -1, -1, -1, -1, -1, 21, + }; + + if (len <= MAX_WORD_LENGTH && len >= MIN_WORD_LENGTH) +@@ -11326,38 +7748,37 @@ } return 0; } --/* ending time is 18:47:27 */ -+/* ending time is 11:23:09 */ - static TAO_IR_ConstantDef_Perfect_Hash_OpTable tao_IR_ConstantDef_optable; - +-/* ending time is 16:31:12 */ +-static TAO_IR_ConstantDef_Perfect_Hash_OpTable tao_IR_ConstantDef_optable; - ++/* ending time is 11:23:10 */ ++static TAO_IR_EnumDef_Perfect_Hash_OpTable tao_IR_EnumDef_optable; + /////////////////////////////////////////////////////////////////////// // Strategized Proxy Broker Implementation // -@@ -11353,9 +11330,9 @@ + + // Factory function Implementation. +-POA_IR::_TAO_ConstantDef_Strategized_Proxy_Broker *POA_IR::_TAO_ConstantDef_Strategized_Proxy_Broker::the_TAO_ConstantDef_Strategized_Proxy_Broker (void) ++POA_IR::_TAO_EnumDef_Strategized_Proxy_Broker *POA_IR::_TAO_EnumDef_Strategized_Proxy_Broker::the_TAO_EnumDef_Strategized_Proxy_Broker (void) + { +- static POA_IR::_TAO_ConstantDef_Strategized_Proxy_Broker strategized_proxy_broker; ++ static POA_IR::_TAO_EnumDef_Strategized_Proxy_Broker strategized_proxy_broker; + return &strategized_proxy_broker; + } + +-POA_IR::_TAO_ConstantDef_Strategized_Proxy_Broker::_TAO_ConstantDef_Strategized_Proxy_Broker (void) ++POA_IR::_TAO_EnumDef_Strategized_Proxy_Broker::_TAO_EnumDef_Strategized_Proxy_Broker (void) + { + for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) + this->proxy_cache_[i] = 0; + + } + +-POA_IR::_TAO_ConstantDef_Strategized_Proxy_Broker::~_TAO_ConstantDef_Strategized_Proxy_Broker (void) ++POA_IR::_TAO_EnumDef_Strategized_Proxy_Broker::~_TAO_EnumDef_Strategized_Proxy_Broker (void) + { + for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) + delete this->proxy_cache_[i]; } -IR::_TAO_ConstantDef_Proxy_Impl& -+_TAO_ConstantDef_Proxy_Impl& - POA_IR::_TAO_ConstantDef_Strategized_Proxy_Broker::select_proxy ( +-POA_IR::_TAO_ConstantDef_Strategized_Proxy_Broker::select_proxy ( - ::IR::ConstantDef *object, -+ IR_ConstantDef *object, ++_TAO_EnumDef_Proxy_Impl& ++POA_IR::_TAO_EnumDef_Strategized_Proxy_Broker::select_proxy ( ++ IR_EnumDef *object, CORBA::Environment &ACE_TRY_ENV ) { -@@ -11387,7 +11364,7 @@ +@@ -11375,7 +7796,7 @@ + } + + void +-POA_IR::_TAO_ConstantDef_Strategized_Proxy_Broker::create_proxy ( ++POA_IR::_TAO_EnumDef_Strategized_Proxy_Broker::create_proxy ( + TAO_ORB_Core::TAO_Collocation_Strategies strategy, + CORBA::Environment &ACE_TRY_ENV + ) +@@ -11389,7 +7810,7 @@ case TAO_ORB_Core::THRU_POA_STRATEGY: ACE_NEW_THROW_EX ( this->proxy_cache_[strategy], - POA_IR::_TAO_ConstantDef_ThruPOA_Proxy_Impl, -+ _TAO_ConstantDef_ThruPOA_Proxy_Impl, ++ _TAO_EnumDef_ThruPOA_Proxy_Impl, CORBA::NO_MEMORY () ); ACE_CHECK; -@@ -11397,7 +11374,7 @@ +@@ -11399,7 +7820,7 @@ default: ACE_NEW_THROW_EX ( this->proxy_cache_[strategy], - ::IR::_TAO_ConstantDef_Remote_Proxy_Impl, -+ _TAO_ConstantDef_Remote_Proxy_Impl, ++ _TAO_EnumDef_Remote_Proxy_Impl, CORBA::NO_MEMORY () ); ACE_CHECK; -@@ -11414,26 +11391,26 @@ +@@ -11416,38 +7837,41 @@ /////////////////////////////////////////////////////////////////////// -IR::_TAO_ConstantDef_Proxy_Broker * -IR__TAO_ConstantDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) -+_TAO_ConstantDef_Proxy_Broker * -+_TAO_ConstantDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) ++_TAO_EnumDef_Proxy_Broker * ++_TAO_EnumDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) { ACE_UNUSED_ARG (obj); - return ::POA_IR::_TAO_ConstantDef_Strategized_Proxy_Broker::the_TAO_ConstantDef_Strategized_Proxy_Broker(); +- return ::POA_IR::_TAO_ConstantDef_Strategized_Proxy_Broker::the_TAO_ConstantDef_Strategized_Proxy_Broker(); ++ return ::POA_IR::_TAO_EnumDef_Strategized_Proxy_Broker::the_TAO_EnumDef_Strategized_Proxy_Broker(); } int -IR__TAO_ConstantDef_Proxy_Broker_Factory_Initializer (long _dummy_) -+_TAO_ConstantDef_Proxy_Broker_Factory_Initializer (long _dummy_) ++_TAO_EnumDef_Proxy_Broker_Factory_Initializer (long _dummy_) { ACE_UNUSED_ARG (_dummy_); - IR__TAO_ConstantDef_Proxy_Broker_Factory_function_pointer = - IR__TAO_ConstantDef_Proxy_Broker_Factory_function; -+ _TAO_ConstantDef_Proxy_Broker_Factory_function_pointer = -+ _TAO_ConstantDef_Proxy_Broker_Factory_function; ++ _TAO_EnumDef_Proxy_Broker_Factory_function_pointer = ++ _TAO_EnumDef_Proxy_Broker_Factory_function; return 0; } -static int IR__TAO_ConstantDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = - IR__TAO_ConstantDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, IR__TAO_ConstantDef_Proxy_Broker_Factory_Initializer)); -+static int _TAO_ConstantDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = -+ _TAO_ConstantDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, _TAO_ConstantDef_Proxy_Broker_Factory_Initializer)); ++static int _TAO_EnumDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = ++ _TAO_EnumDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, _TAO_EnumDef_Proxy_Broker_Factory_Initializer)); /////////////////////////////////////////////////////////////////////// -@@ -11476,7 +11453,7 @@ - ); - } + // ThruPOA Proxy Implementation + // --IR::IDLType_ptr POA_IR::_TAO_ConstantDef_ThruPOA_Proxy_Impl::type_def ( -+IR_IDLType_ptr POA_IR::_TAO_ConstantDef_ThruPOA_Proxy_Impl::type_def ( +-POA_IR::_TAO_ConstantDef_ThruPOA_Proxy_Impl::_TAO_ConstantDef_ThruPOA_Proxy_Impl (void) ++POA_IR::_TAO_EnumDef_ThruPOA_Proxy_Impl::_TAO_EnumDef_ThruPOA_Proxy_Impl (void) ++{} ++ ++POA_IR::_TAO_EnumDef_ThruPOA_Proxy_Impl::~_TAO_EnumDef_ThruPOA_Proxy_Impl (void) + {} + + // ThruPOA Implementation of the IDL interface methods + +-CORBA::TypeCode_ptr POA_IR::_TAO_ConstantDef_ThruPOA_Proxy_Impl::type ( ++IR::EnumMemberSeq * POA_IR::_TAO_EnumDef_ThruPOA_Proxy_Impl::members ( CORBA_Object *_collocated_tao_target_, CORBA::Environment &ACE_TRY_ENV ) -@@ -11484,7 +11461,7 @@ +@@ -11455,7 +7879,7 @@ CORBA::SystemException )) { -- IR::IDLType_var _tao_retval; -+ IR_IDLType_var _tao_retval; +- CORBA::TypeCode_var _tao_retval; ++ IR_EnumMemberSeq_var _tao_retval; ACE_UNUSED_ARG (_tao_retval); TAO_Object_Adapter::Servant_Upcall servant_upcall ( _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -11509,7 +11486,7 @@ +@@ -11463,145 +7887,51 @@ + CORBA::Object_var forward_to; + servant_upcall.prepare_for_upcall ( + _collocated_tao_target_->_object_key (), +- "type", ++ "members", + forward_to.out (), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + return ACE_reinterpret_cast ( +- POA_IR::ConstantDef_ptr, ++ POA_IR::EnumDef_ptr, + servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/ConstantDef:1.0" ++ "IDL:omg.org/IR/EnumDef:1.0" + ) +- )->type ( ++ )->members ( + ACE_TRY_ENV + ); + } - void POA_IR::_TAO_ConstantDef_ThruPOA_Proxy_Impl::type_def ( +-IR::IDLType_ptr POA_IR::_TAO_ConstantDef_ThruPOA_Proxy_Impl::type_def ( ++void POA_IR::_TAO_EnumDef_ThruPOA_Proxy_Impl::members ( CORBA_Object *_collocated_tao_target_, -- IR::IDLType_ptr type_def, -+ IR_IDLType_ptr type_def, ++ const IR_EnumMemberSeq & members, CORBA::Environment &ACE_TRY_ENV ) ACE_THROW_SPEC (( -@@ -11615,7 +11592,7 @@ + CORBA::SystemException + )) + { +- IR::IDLType_var _tao_retval; +- ACE_UNUSED_ARG (_tao_retval); + TAO_Object_Adapter::Servant_Upcall servant_upcall ( + _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () + ); + CORBA::Object_var forward_to; + servant_upcall.prepare_for_upcall ( + _collocated_tao_target_->_object_key (), +- "type_def", ++ "members", + forward_to.out (), + ACE_TRY_ENV + ); +- ACE_CHECK_RETURN (0); +- return ACE_reinterpret_cast ( +- POA_IR::ConstantDef_ptr, ++ ACE_CHECK; ++ ACE_reinterpret_cast ( ++ POA_IR::EnumDef_ptr, + servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/ConstantDef:1.0" ++ "IDL:omg.org/IR/EnumDef:1.0" + ) +- )->type_def ( ++ )->members ( ++ members, + ACE_TRY_ENV + ); +-} +- +-void POA_IR::_TAO_ConstantDef_ThruPOA_Proxy_Impl::type_def ( +- CORBA_Object *_collocated_tao_target_, +- IR::IDLType_ptr type_def, +- CORBA::Environment &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) +-{ +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "type_def", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK; +- ACE_reinterpret_cast ( +- POA_IR::ConstantDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/ConstantDef:1.0" +- ) +- )->type_def ( +- type_def, +- ACE_TRY_ENV +- ); +- return; +-} +- +-CORBA::Any * POA_IR::_TAO_ConstantDef_ThruPOA_Proxy_Impl::value ( +- CORBA_Object *_collocated_tao_target_, +- CORBA::Environment &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) +-{ +- CORBA::Any_var _tao_retval; +- ACE_UNUSED_ARG (_tao_retval); +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "value", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK_RETURN (0); +- return ACE_reinterpret_cast ( +- POA_IR::ConstantDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/ConstantDef:1.0" +- ) +- )->value ( +- ACE_TRY_ENV +- ); +-} +- +-void POA_IR::_TAO_ConstantDef_ThruPOA_Proxy_Impl::value ( +- CORBA_Object *_collocated_tao_target_, +- const CORBA::Any & value, +- CORBA::Environment &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) +-{ +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "value", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK; +- ACE_reinterpret_cast ( +- POA_IR::ConstantDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/ConstantDef:1.0" +- ) +- )->value ( +- value, +- ACE_TRY_ENV +- ); +- return; ++ return; + } + + // +@@ -11609,466 +7939,126 @@ + /////////////////////////////////////////////////////////////////////// + + // skeleton constructor +-POA_IR::ConstantDef::ConstantDef (void) ++POA_IR::EnumDef::EnumDef (void) + { +- this->optable_ = &tao_IR_ConstantDef_optable; ++ this->optable_ = &tao_IR_EnumDef_optable; + } + // copy ctor - POA_IR::ConstantDef::ConstantDef (const ConstantDef& rhs) - : ACE_NESTED_CLASS (POA_IR,Contained) (rhs), +-POA_IR::ConstantDef::ConstantDef (const ConstantDef& rhs) +- : ACE_NESTED_CLASS (POA_IR,Contained) (rhs), - ACE_NESTED_CLASS (POA_CORBA,IRObject) (rhs), ++POA_IR::EnumDef::EnumDef (const EnumDef& rhs) ++ : ACE_NESTED_CLASS (POA_IR,TypedefDef) (rhs), ++ ACE_NESTED_CLASS (POA_IR,Contained) (rhs), ++ ACE_NESTED_CLASS (POA_IR,IDLType) (rhs), + POA_CORBA_IRObject (rhs), TAO_ServantBase (rhs) {} -@@ -11713,7 +11690,7 @@ + // skeleton destructor +-POA_IR::ConstantDef::~ConstantDef (void) ++POA_IR::EnumDef::~EnumDef (void) { - POA_IR::ConstantDef *_tao_impl = (POA_IR::ConstantDef *)_tao_object_reference; - -- IR::IDLType_var _tao_retval; -+ IR_IDLType_var _tao_retval; + } - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( -@@ -11740,7 +11717,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::IDLType_ptr _tao_retval_info = _tao_retval._retn (); -+ IR_IDLType_ptr _tao_retval_info = _tao_retval._retn (); - ri.result (_tao_retval_info); - _tao_retval = _tao_retval_info; - ri.reply_status (PortableInterceptor::SUCCESSFUL); -@@ -11794,14 +11771,12 @@ - TAO_InputCDR &_tao_in = _tao_server_request.incoming (); - POA_IR::ConstantDef *_tao_impl = (POA_IR::ConstantDef *)_tao_object_reference; - -- _tao_server_request.argument_flag (0); -- IR::IDLType_var type_def; -+ IR_IDLType_var type_def; +-void POA_IR::ConstantDef::_get_type_skel ( ++void POA_IR::EnumDef::_get_members_skel ( + TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, ++ void *_tao_object_reference, ++ void * /* context */, + CORBA::Environment &ACE_TRY_ENV +- ) ++) + { +- POA_IR::ConstantDef *_tao_impl = (POA_IR::ConstantDef *)_tao_object_reference; ++ POA_IR::EnumDef *_tao_impl = (POA_IR::EnumDef *)_tao_object_reference; + +- CORBA::TypeCode_var _tao_retval; ++ IR_EnumMemberSeq_var _tao_retval; + +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::ConstantDef::TAO_ServerRequestInfo_IR_ConstantDef_type_get ri ( +- _tao_server_request, +- _tao_impl +- , ++ _tao_retval = _tao_impl->members ( + ACE_TRY_ENV + ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->type ( +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- CORBA::TypeCode_ptr _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << _tao_retval.in ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- +-} +- +-void POA_IR::ConstantDef::_get_type_def_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- POA_IR::ConstantDef *_tao_impl = (POA_IR::ConstantDef *)_tao_object_reference; + +- IR::IDLType_var _tao_retval; +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::ConstantDef::TAO_ServerRequestInfo_IR_ConstantDef_type_def_get ri ( +- _tao_server_request, +- _tao_impl +- , +- ACE_TRY_ENV +- ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->type_def ( +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::IDLType_ptr _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; + ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); ++ ++ _tao_server_request.init_reply (); + TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); if (!( - (_tao_in >> type_def.out ()) + (_tao_out << _tao_retval.in ()) )) - ACE_THROW (CORBA::MARSHAL()); - +- ACE_THROW (CORBA::MARSHAL()); - - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( - _tao_server_request.orb_core ()->server_request_interceptors (), -@@ -11953,14 +11928,12 @@ ++ ACE_THROW (CORBA::MARSHAL () ); + } + +-void POA_IR::ConstantDef::_set_type_def_skel ( ++void POA_IR::EnumDef::_set_members_skel ( + TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, ++ void *_tao_object_reference, ++ void * /* context */, + CORBA::Environment &ACE_TRY_ENV +- ) ++) + { TAO_InputCDR &_tao_in = _tao_server_request.incoming (); - POA_IR::ConstantDef *_tao_impl = (POA_IR::ConstantDef *)_tao_object_reference; - -- _tao_server_request.argument_flag (0); - CORBA::Any value; +- POA_IR::ConstantDef *_tao_impl = (POA_IR::ConstantDef *)_tao_object_reference; ++ POA_IR::EnumDef *_tao_impl = (POA_IR::EnumDef *)_tao_object_reference; + +-_tao_server_request.argument_flag (0); +- IR::IDLType_var type_def; ++ IR_EnumMemberSeq members; if (!( - (_tao_in >> value) +- (_tao_in >> type_def.out ()) ++ (_tao_in >> members) )) - ACE_THROW (CORBA::MARSHAL()); +- ACE_THROW (CORBA::MARSHAL()); +- ++ ACE_THROW (CORBA::MARSHAL () ); + +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::ConstantDef::TAO_ServerRequestInfo_IR_ConstantDef_type_def_set ri ( +- _tao_server_request, +- _tao_impl +- , +- type_def.in (), ++ _tao_impl->members ( ++ members, + ACE_TRY_ENV + ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- +- _tao_impl->type_def ( +- type_def.in (), +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +-} +- +-void POA_IR::ConstantDef::_get_value_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- POA_IR::ConstantDef *_tao_impl = (POA_IR::ConstantDef *)_tao_object_reference; +- +- CORBA::Any_var _tao_retval; +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::ConstantDef::TAO_ServerRequestInfo_IR_ConstantDef_value_get ri ( +- _tao_server_request, +- _tao_impl +- , +- ACE_TRY_ENV +- ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = - - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( - _tao_server_request.orb_core ()->server_request_interceptors (), -@@ -12033,7 +12006,7 @@ - POA_IR::ConstantDef *_tao_impl = (POA_IR::ConstantDef *) _tao_object_reference; +- _tao_impl->value ( +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- CORBA::Any * _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; + ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << _tao_retval.in ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); + ++ _tao_server_request.init_reply (); + } + +-void POA_IR::ConstantDef::_set_value_skel ( ++void POA_IR::EnumDef::_is_a_skel ( + TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::ConstantDef *_tao_impl = (POA_IR::ConstantDef *)_tao_object_reference; +- +-_tao_server_request.argument_flag (0); +- CORBA::Any value; +- if (!( +- (_tao_in >> value) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::ConstantDef::TAO_ServerRequestInfo_IR_ConstantDef_value_set ri ( +- _tao_server_request, +- _tao_impl +- , +- value, +- ACE_TRY_ENV +- ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- +- _tao_impl->value ( +- value, +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +-} +- +-void POA_IR::ConstantDef::_is_a_skel ( +- TAO_ServerRequest &_tao_server_request, + void * _tao_object_reference, + void * /* context */, + CORBA::Environment &ACE_TRY_ENV + ) + { + TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::ConstantDef *_tao_impl = (POA_IR::ConstantDef *) _tao_object_reference; ++ POA_IR::EnumDef *_tao_impl = (POA_IR::EnumDef *) _tao_object_reference; CORBA::Boolean _tao_retval = 0; CORBA::String_var value; - if (!(_tao_in >> value.out ())) + if (!((_tao_in >> value.out ()))) ACE_THROW (CORBA::MARSHAL ()); - +- ++ _tao_retval = _tao_impl->_is_a (value.in (), ACE_TRY_ENV); -@@ -12041,7 +12014,7 @@ - + ACE_CHECK; +- ++ _tao_server_request.init_reply (); TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); - if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) @@ -3134,8 +15880,21 @@ ACE_THROW (CORBA::MARSHAL ()); } -@@ -12058,7 +12031,7 @@ - +-void POA_IR::ConstantDef::_non_existent_skel ( +- TAO_ServerRequest &_tao_server_request, ++void POA_IR::EnumDef::_non_existent_skel ( ++ TAO_ServerRequest &_tao_server_request, + void * _tao_object_reference, + void * /* context */, + CORBA::Environment &ACE_TRY_ENV + ) + { +- POA_IR::ConstantDef *_tao_impl = (POA_IR::ConstantDef *) _tao_object_reference; ++ POA_IR::EnumDef *_tao_impl = (POA_IR::EnumDef *) _tao_object_reference; + CORBA::Boolean _tao_retval = _tao_impl->_non_existent (ACE_TRY_ENV); + ACE_CHECK; +- ++ _tao_server_request.init_reply (); TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); - if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) @@ -3143,149 +15902,871 @@ ACE_THROW (CORBA::MARSHAL ()); } -@@ -12086,7 +12059,7 @@ +-CORBA::Boolean POA_IR::ConstantDef::_is_a ( ++CORBA::Boolean POA_IR::EnumDef::_is_a ( + const char* value, + CORBA::Environment &ACE_TRY_ENV + ) + { + if ( +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/ConstantDef:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/EnumDef:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/TypedefDef:1.0")) || + (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/Contained:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/IDLType:1.0")) || + (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/CORBA/IRObject:1.0")) || + (!ACE_OS::strcmp ((char *)value, CORBA::_tc_Object->id (ACE_TRY_ENV)))) + return 1; +@@ -12076,33 +8066,37 @@ + return 0; + } + +-void* POA_IR::ConstantDef::_downcast ( ++void* POA_IR::EnumDef::_downcast ( + const char* logical_type_id + ) + { +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/ConstantDef:1.0") == 0) +- return ACE_static_cast (POA_IR::ConstantDef_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/EnumDef:1.0") == 0) ++ return ACE_static_cast (POA_IR::EnumDef_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/TypedefDef:1.0") == 0) ++ return ACE_static_cast (POA_IR::TypedefDef_ptr, this); if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Contained:1.0") == 0) return ACE_static_cast (POA_IR::Contained_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/IDLType:1.0") == 0) ++ return ACE_static_cast (POA_IR::IDLType_ptr, this); if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/IRObject:1.0") == 0) - return ACE_static_cast (POA_CORBA::IRObject_ptr, this); +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/Object:1.0") == 0) + return ACE_static_cast (POA_CORBA_IRObject_ptr, this); - if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/Object:1.0") == 0) ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/Object:1.0") == 0) return ACE_static_cast(PortableServer::Servant, this); return 0; -@@ -12116,10 +12089,9 @@ + } + +-void POA_IR::ConstantDef::_dispatch (TAO_ServerRequest &req, void *context, CORBA::Environment &ACE_TRY_ENV) ++void POA_IR::EnumDef::_dispatch (TAO_ServerRequest &req, void *context, CORBA::Environment &ACE_TRY_ENV) + { + this->synchronous_upcall_dispatch(req, context, this, ACE_TRY_ENV); + } + +-const char* POA_IR::ConstantDef::_interface_repository_id (void) const ++const char* POA_IR::EnumDef::_interface_repository_id (void) const + { +- return "IDL:omg.org/IR/ConstantDef:1.0"; ++ return "IDL:omg.org/IR/EnumDef:1.0"; + } + +-IR::ConstantDef* +-POA_IR::ConstantDef::_this (CORBA_Environment &ACE_TRY_ENV) ++IR::EnumDef* ++POA_IR::EnumDef::_this (CORBA_Environment &ACE_TRY_ENV) + { + TAO_Stub *stub = this->_create_stub (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); +@@ -12115,401 +8109,21 @@ ACE_NEW_RETURN (tmp, CORBA::Object (stub, 0, this), 0); CORBA::Object_var obj = tmp; - return ::IR::ConstantDef::_unchecked_narrow (obj.in ()); -+ return IR_ConstantDef::_unchecked_narrow (obj.in ()); - } - +-} - - #if (TAO_HAS_INTERCEPTORS == 1) - POA_IR::ConstantDef::TAO_ServerRequestInfo_IR_ConstantDef_type_get::TAO_ServerRequestInfo_IR_ConstantDef_type_get ( - TAO_ServerRequest &_tao_server_request, -@@ -12274,7 +12246,7 @@ - POA_IR::ConstantDef::TAO_ServerRequestInfo_IR_ConstantDef_type_def_set::TAO_ServerRequestInfo_IR_ConstantDef_type_def_set ( - TAO_ServerRequest &_tao_server_request, - POA_IR::ConstantDef *tao_impl, +- +-#if (TAO_HAS_INTERCEPTORS == 1) +-POA_IR::ConstantDef::TAO_ServerRequestInfo_IR_ConstantDef_type_get::TAO_ServerRequestInfo_IR_ConstantDef_type_get ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::ConstantDef *tao_impl +- , +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl) +-{} +- +-Dynamic::ParameterList * +-POA_IR::ConstantDef::TAO_ServerRequestInfo_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 * +-POA_IR::ConstantDef::TAO_ServerRequestInfo_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 * +-POA_IR::ConstantDef::TAO_ServerRequestInfo_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 (); +-} +- +-char * +-POA_IR::ConstantDef::TAO_ServerRequestInfo_IR_ConstantDef_type_get::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::ConstantDef::TAO_ServerRequestInfo_IR_ConstantDef_type_get::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-void +-POA_IR::ConstantDef::TAO_ServerRequestInfo_IR_ConstantDef_type_get::result (CORBA::TypeCode_ptr result) +-{ +- // Update the result. +- this->_result = result; +-} +- +-POA_IR::ConstantDef::TAO_ServerRequestInfo_IR_ConstantDef_type_def_get::TAO_ServerRequestInfo_IR_ConstantDef_type_def_get ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::ConstantDef *tao_impl +- , +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl) +-{} +- +-Dynamic::ParameterList * +-POA_IR::ConstantDef::TAO_ServerRequestInfo_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 * +-POA_IR::ConstantDef::TAO_ServerRequestInfo_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 * +-POA_IR::ConstantDef::TAO_ServerRequestInfo_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 (); +-} +- +-char * +-POA_IR::ConstantDef::TAO_ServerRequestInfo_IR_ConstantDef_type_def_get::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::ConstantDef::TAO_ServerRequestInfo_IR_ConstantDef_type_def_get::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-void +-POA_IR::ConstantDef::TAO_ServerRequestInfo_IR_ConstantDef_type_def_get::result (IR::IDLType_ptr result) +-{ +- // Update the result. +- this->_result = result; +-} +- +-POA_IR::ConstantDef::TAO_ServerRequestInfo_IR_ConstantDef_type_def_set::TAO_ServerRequestInfo_IR_ConstantDef_type_def_set ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::ConstantDef *tao_impl +- , - IR::IDLType_ptr type_def, -+ IR_IDLType_ptr type_def, - CORBA::Environment & - ) - : TAO_ServerRequestInfo (_tao_server_request), -@@ -12494,6 +12466,7 @@ +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- type_def_ (type_def) +-{} +- +-Dynamic::ParameterList * +-POA_IR::ConstantDef::TAO_ServerRequestInfo_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 * +-POA_IR::ConstantDef::TAO_ServerRequestInfo_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 * +-POA_IR::ConstantDef::TAO_ServerRequestInfo_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; +-} +- +-char * +-POA_IR::ConstantDef::TAO_ServerRequestInfo_IR_ConstantDef_type_def_set::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::ConstantDef::TAO_ServerRequestInfo_IR_ConstantDef_type_def_set::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-POA_IR::ConstantDef::TAO_ServerRequestInfo_IR_ConstantDef_value_get::TAO_ServerRequestInfo_IR_ConstantDef_value_get ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::ConstantDef *tao_impl +- , +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl) +-{} +- +-Dynamic::ParameterList * +-POA_IR::ConstantDef::TAO_ServerRequestInfo_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 * +-POA_IR::ConstantDef::TAO_ServerRequestInfo_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 * +-POA_IR::ConstantDef::TAO_ServerRequestInfo_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 (); +-} +- +-char * +-POA_IR::ConstantDef::TAO_ServerRequestInfo_IR_ConstantDef_value_get::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::ConstantDef::TAO_ServerRequestInfo_IR_ConstantDef_value_get::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-void +-POA_IR::ConstantDef::TAO_ServerRequestInfo_IR_ConstantDef_value_get::result (CORBA::Any * result) +-{ +- // Update the result. +- this->_result = result; +-} +- +-POA_IR::ConstantDef::TAO_ServerRequestInfo_IR_ConstantDef_value_set::TAO_ServerRequestInfo_IR_ConstantDef_value_set ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::ConstantDef *tao_impl +- , +- const CORBA::Any & value, +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- value_ (value) +-{} +- +-Dynamic::ParameterList * +-POA_IR::ConstantDef::TAO_ServerRequestInfo_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 * +-POA_IR::ConstantDef::TAO_ServerRequestInfo_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 * +-POA_IR::ConstantDef::TAO_ServerRequestInfo_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; +-} +- +-char * +-POA_IR::ConstantDef::TAO_ServerRequestInfo_IR_ConstantDef_value_set::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::ConstantDef::TAO_ServerRequestInfo_IR_ConstantDef_value_set::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); ++ return IR_EnumDef::_unchecked_narrow (obj.in ()); } - #endif /* TAO_HAS_INTERCEPTORS */ -+ - class TAO_IR_TypedefDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable +-#endif /* TAO_HAS_INTERCEPTORS */ +-class TAO_IR_TypedefDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable ++class TAO_IR_AliasDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable { private: -@@ -12501,7 +12474,7 @@ + unsigned int hash (const char *str, unsigned int len); public: const TAO_operation_db_entry * lookup (const char *str, unsigned int len); }; --/* starting time is 18:47:27 */ -+/* starting time is 11:23:09 */ +-/* starting time is 16:31:12 */ ++/* starting time is 11:23:10 */ /* C++ code produced by gperf version 2.8 (ACE version) */ - /* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_TypedefDef_Perfect_Hash_OpTable -N lookup */ +-/* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_TypedefDef_Perfect_Hash_OpTable -N lookup */ ++/* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_AliasDef_Perfect_Hash_OpTable -N lookup */ unsigned int -@@ -12628,10 +12601,9 @@ +-TAO_IR_TypedefDef_Perfect_Hash_OpTable::hash (const char *str, unsigned int len) ++TAO_IR_AliasDef_Perfect_Hash_OpTable::hash (const char *str, unsigned int len) + { + static const unsigned char asso_values[] = + { +@@ -12527,7 +8141,7 @@ + 37, 37, 37, 37, 37, 37, 37, 37, 37, 0, + 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, + 37, 37, 37, 37, 37, 37, 37, 37, 37, 0, +- 37, 37, 0, 0, 37, 37, 37, 37, 37, 37, ++ 37, 37, 0, 0, 0, 37, 37, 37, 37, 37, + 37, 37, 37, 37, 37, 37, 37, 37, 0, 0, + 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, + 37, 37, 37, 10, 37, 37, 37, 37, 10, 37, +@@ -12551,7 +8165,7 @@ + 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, + 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, + 37, 37, 37, 37, 37, 0, 37, 0, 37, 37, +- 0, 0, 37, 37, 37, 37, 37, 37, 37, 0, ++ 0, 0, 0, 37, 37, 37, 37, 37, 37, 0, + 0, 37, 37, 37, 37, 37, 10, 37, 37, 37, + 37, 10, 37, 37, 37, 37, 37, 37, + #endif /* ACE_MVS */ +@@ -12560,45 +8174,47 @@ + } + + const class TAO_operation_db_entry * +-TAO_IR_TypedefDef_Perfect_Hash_OpTable::lookup (const char *str, unsigned int len) ++TAO_IR_AliasDef_Perfect_Hash_OpTable::lookup (const char *str, unsigned int len) + { + enum + { +- TOTAL_KEYWORDS = 16, ++ TOTAL_KEYWORDS = 18, + MIN_WORD_LENGTH = 4, + MAX_WORD_LENGTH = 26, + MIN_HASH_VALUE = 4, + MAX_HASH_VALUE = 36, + HASH_VALUE_RANGE = 33, +- DUPLICATES = 5 ++ DUPLICATES = 6 + }; + + static const class TAO_operation_db_entry wordlist[] = + { + {"",0},{"",0},{"",0},{"",0}, +- {"move", &POA_IR::TypedefDef::move_skel}, +- {"_is_a", &POA_IR::TypedefDef::_is_a_skel}, +- {"_get_id", &POA_IR::TypedefDef::_get_id_skel}, +- {"_set_id", &POA_IR::TypedefDef::_set_id_skel}, +- {"describe", &POA_IR::TypedefDef::describe_skel}, +- {"_get_name", &POA_IR::TypedefDef::_get_name_skel}, +- {"_get_type", &POA_IR::TypedefDef::_get_type_skel}, +- {"_set_name", &POA_IR::TypedefDef::_set_name_skel}, +- {"_get_version", &POA_IR::TypedefDef::_get_version_skel}, +- {"_set_version", &POA_IR::TypedefDef::_set_version_skel}, +- {"_get_def_kind", &POA_IR::TypedefDef::_get_def_kind_skel}, +- {"_get_defined_in", &POA_IR::TypedefDef::_get_defined_in_skel}, +- {"destroy", &POA_IR::TypedefDef::destroy_skel}, +- {"_get_absolute_name", &POA_IR::TypedefDef::_get_absolute_name_skel}, +- {"_non_existent", &POA_IR::TypedefDef::_non_existent_skel}, +- {"_get_containing_repository", &POA_IR::TypedefDef::_get_containing_repository_skel}, ++ {"move", &POA_IR::AliasDef::move_skel}, ++ {"_is_a", &POA_IR::AliasDef::_is_a_skel}, ++ {"_get_id", &POA_IR::AliasDef::_get_id_skel}, ++ {"_set_id", &POA_IR::AliasDef::_set_id_skel}, ++ {"describe", &POA_IR::AliasDef::describe_skel}, ++ {"_get_name", &POA_IR::AliasDef::_get_name_skel}, ++ {"_get_type", &POA_IR::AliasDef::_get_type_skel}, ++ {"_set_name", &POA_IR::AliasDef::_set_name_skel}, ++ {"_get_version", &POA_IR::AliasDef::_get_version_skel}, ++ {"_set_version", &POA_IR::AliasDef::_set_version_skel}, ++ {"_get_def_kind", &POA_IR::AliasDef::_get_def_kind_skel}, ++ {"_get_defined_in", &POA_IR::AliasDef::_get_defined_in_skel}, ++ {"destroy", &POA_IR::AliasDef::destroy_skel}, ++ {"_get_absolute_name", &POA_IR::AliasDef::_get_absolute_name_skel}, ++ {"_get_original_type_def", &POA_IR::AliasDef::_get_original_type_def_skel}, ++ {"_set_original_type_def", &POA_IR::AliasDef::_set_original_type_def_skel}, ++ {"_non_existent", &POA_IR::AliasDef::_non_existent_skel}, ++ {"_get_containing_repository", &POA_IR::AliasDef::_get_containing_repository_skel}, + }; + + static const signed char lookup[] = + { +- -6, -2, -9, -3, 4, 5, -1, -43, 8, -43, -12, -2, -38, 14, +- -1, 15, -1, 16, 17, -1, -1, -1, -1, 18, -1, -1, -1, -1, +- -1, -1, -1, -1, -1, -1, -1, -1, 19, ++ -6, -2, -9, -3, 4, 5, -1, -43, 8, -43, -12, -2, -38, 14, ++ -1, 15, -1, 16, 17, -1, -18, -2, -38, 20, -1, -1, -1, -1, ++ -1, -1, -1, -1, -1, -1, -1, -1, 21, + }; + + if (len <= MAX_WORD_LENGTH && len >= MIN_WORD_LENGTH) +@@ -12632,38 +8248,37 @@ } return 0; } --/* ending time is 18:47:27 */ -+/* ending time is 11:23:09 */ - static TAO_IR_TypedefDef_Perfect_Hash_OpTable tao_IR_TypedefDef_optable; - +-/* ending time is 16:31:12 */ +-static TAO_IR_TypedefDef_Perfect_Hash_OpTable tao_IR_TypedefDef_optable; - ++/* ending time is 11:23:10 */ ++static TAO_IR_AliasDef_Perfect_Hash_OpTable tao_IR_AliasDef_optable; + /////////////////////////////////////////////////////////////////////// // Strategized Proxy Broker Implementation // -@@ -12657,9 +12629,9 @@ + + // Factory function Implementation. +-POA_IR::_TAO_TypedefDef_Strategized_Proxy_Broker *POA_IR::_TAO_TypedefDef_Strategized_Proxy_Broker::the_TAO_TypedefDef_Strategized_Proxy_Broker (void) ++POA_IR::_TAO_AliasDef_Strategized_Proxy_Broker *POA_IR::_TAO_AliasDef_Strategized_Proxy_Broker::the_TAO_AliasDef_Strategized_Proxy_Broker (void) + { +- static POA_IR::_TAO_TypedefDef_Strategized_Proxy_Broker strategized_proxy_broker; ++ static POA_IR::_TAO_AliasDef_Strategized_Proxy_Broker strategized_proxy_broker; + return &strategized_proxy_broker; + } + +-POA_IR::_TAO_TypedefDef_Strategized_Proxy_Broker::_TAO_TypedefDef_Strategized_Proxy_Broker (void) ++POA_IR::_TAO_AliasDef_Strategized_Proxy_Broker::_TAO_AliasDef_Strategized_Proxy_Broker (void) + { + for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) + this->proxy_cache_[i] = 0; + + } + +-POA_IR::_TAO_TypedefDef_Strategized_Proxy_Broker::~_TAO_TypedefDef_Strategized_Proxy_Broker (void) ++POA_IR::_TAO_AliasDef_Strategized_Proxy_Broker::~_TAO_AliasDef_Strategized_Proxy_Broker (void) + { + for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) + delete this->proxy_cache_[i]; } -IR::_TAO_TypedefDef_Proxy_Impl& -+_TAO_TypedefDef_Proxy_Impl& - POA_IR::_TAO_TypedefDef_Strategized_Proxy_Broker::select_proxy ( +-POA_IR::_TAO_TypedefDef_Strategized_Proxy_Broker::select_proxy ( - ::IR::TypedefDef *object, -+ IR_TypedefDef *object, ++_TAO_AliasDef_Proxy_Impl& ++POA_IR::_TAO_AliasDef_Strategized_Proxy_Broker::select_proxy ( ++ IR_AliasDef *object, CORBA::Environment &ACE_TRY_ENV ) { -@@ -12691,7 +12663,7 @@ +@@ -12681,7 +8296,7 @@ + } + + void +-POA_IR::_TAO_TypedefDef_Strategized_Proxy_Broker::create_proxy ( ++POA_IR::_TAO_AliasDef_Strategized_Proxy_Broker::create_proxy ( + TAO_ORB_Core::TAO_Collocation_Strategies strategy, + CORBA::Environment &ACE_TRY_ENV + ) +@@ -12695,7 +8310,7 @@ case TAO_ORB_Core::THRU_POA_STRATEGY: ACE_NEW_THROW_EX ( this->proxy_cache_[strategy], - POA_IR::_TAO_TypedefDef_ThruPOA_Proxy_Impl, -+ _TAO_TypedefDef_ThruPOA_Proxy_Impl, ++ _TAO_AliasDef_ThruPOA_Proxy_Impl, CORBA::NO_MEMORY () ); ACE_CHECK; -@@ -12701,7 +12673,7 @@ +@@ -12705,7 +8320,7 @@ default: ACE_NEW_THROW_EX ( this->proxy_cache_[strategy], - ::IR::_TAO_TypedefDef_Remote_Proxy_Impl, -+ _TAO_TypedefDef_Remote_Proxy_Impl, ++ _TAO_AliasDef_Remote_Proxy_Impl, CORBA::NO_MEMORY () ); ACE_CHECK; -@@ -12718,26 +12690,26 @@ +@@ -12722,106 +8337,225 @@ /////////////////////////////////////////////////////////////////////// -IR::_TAO_TypedefDef_Proxy_Broker * -IR__TAO_TypedefDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) -+_TAO_TypedefDef_Proxy_Broker * -+_TAO_TypedefDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) ++_TAO_AliasDef_Proxy_Broker * ++_TAO_AliasDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) { ACE_UNUSED_ARG (obj); - return ::POA_IR::_TAO_TypedefDef_Strategized_Proxy_Broker::the_TAO_TypedefDef_Strategized_Proxy_Broker(); +- return ::POA_IR::_TAO_TypedefDef_Strategized_Proxy_Broker::the_TAO_TypedefDef_Strategized_Proxy_Broker(); ++ return ::POA_IR::_TAO_AliasDef_Strategized_Proxy_Broker::the_TAO_AliasDef_Strategized_Proxy_Broker(); } int -IR__TAO_TypedefDef_Proxy_Broker_Factory_Initializer (long _dummy_) -+_TAO_TypedefDef_Proxy_Broker_Factory_Initializer (long _dummy_) ++_TAO_AliasDef_Proxy_Broker_Factory_Initializer (long _dummy_) { ACE_UNUSED_ARG (_dummy_); - IR__TAO_TypedefDef_Proxy_Broker_Factory_function_pointer = - IR__TAO_TypedefDef_Proxy_Broker_Factory_function; -+ _TAO_TypedefDef_Proxy_Broker_Factory_function_pointer = -+ _TAO_TypedefDef_Proxy_Broker_Factory_function; ++ _TAO_AliasDef_Proxy_Broker_Factory_function_pointer = ++ _TAO_AliasDef_Proxy_Broker_Factory_function; return 0; } -static int IR__TAO_TypedefDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = - IR__TAO_TypedefDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, IR__TAO_TypedefDef_Proxy_Broker_Factory_Initializer)); -+static int _TAO_TypedefDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = -+ _TAO_TypedefDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, _TAO_TypedefDef_Proxy_Broker_Factory_Initializer)); ++static int _TAO_AliasDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = ++ _TAO_AliasDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, _TAO_AliasDef_Proxy_Broker_Factory_Initializer)); /////////////////////////////////////////////////////////////////////// -@@ -12763,7 +12735,7 @@ - POA_IR::TypedefDef::TypedefDef (const TypedefDef& rhs) - : ACE_NESTED_CLASS (POA_IR,Contained) (rhs), - ACE_NESTED_CLASS (POA_IR,IDLType) (rhs), + // ThruPOA Proxy Implementation + // + +-POA_IR::_TAO_TypedefDef_ThruPOA_Proxy_Impl::_TAO_TypedefDef_ThruPOA_Proxy_Impl (void) ++POA_IR::_TAO_AliasDef_ThruPOA_Proxy_Impl::_TAO_AliasDef_ThruPOA_Proxy_Impl (void) + {} + +-// ThruPOA Implementation of the IDL interface methods +- +-// +-// End ThruPOA Proxy Implementation +-/////////////////////////////////////////////////////////////////////// +- +-// skeleton constructor +-POA_IR::TypedefDef::TypedefDef (void) +-{ +- this->optable_ = &tao_IR_TypedefDef_optable; +-} +- +-// copy ctor +-POA_IR::TypedefDef::TypedefDef (const TypedefDef& rhs) +- : ACE_NESTED_CLASS (POA_IR,Contained) (rhs), +- ACE_NESTED_CLASS (POA_IR,IDLType) (rhs), - ACE_NESTED_CLASS (POA_CORBA,IRObject) (rhs), -+ POA_CORBA_IRObject (rhs), - TAO_ServantBase (rhs) +- TAO_ServantBase (rhs) ++POA_IR::_TAO_AliasDef_ThruPOA_Proxy_Impl::~_TAO_AliasDef_ThruPOA_Proxy_Impl (void) {} -@@ -12783,7 +12755,7 @@ - POA_IR::TypedefDef *_tao_impl = (POA_IR::TypedefDef *) _tao_object_reference; +-// skeleton destructor +-POA_IR::TypedefDef::~TypedefDef (void) ++// ThruPOA Implementation of the IDL interface methods ++ ++IR::IDLType_ptr POA_IR::_TAO_AliasDef_ThruPOA_Proxy_Impl::original_type_def ( ++ CORBA_Object *_collocated_tao_target_, ++ CORBA::Environment &ACE_TRY_ENV ++ ) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException ++ )) + { ++ IR_IDLType_var _tao_retval; ++ ACE_UNUSED_ARG (_tao_retval); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "original_type_def", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK_RETURN (0); ++ return ACE_reinterpret_cast ( ++ POA_IR::AliasDef_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/AliasDef:1.0" ++ ) ++ )->original_type_def ( ++ ACE_TRY_ENV ++ ); + } + +-void POA_IR::TypedefDef::_is_a_skel ( +- TAO_ServerRequest &_tao_server_request, +- void * _tao_object_reference, +- void * /* context */, ++void POA_IR::_TAO_AliasDef_ThruPOA_Proxy_Impl::original_type_def ( ++ CORBA_Object *_collocated_tao_target_, ++ IR_IDLType_ptr original_type_def, + CORBA::Environment &ACE_TRY_ENV + ) +-{ +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::TypedefDef *_tao_impl = (POA_IR::TypedefDef *) _tao_object_reference; ++ ACE_THROW_SPEC (( ++ CORBA::SystemException ++ )) ++{ ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "original_type_def", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK; ++ ACE_reinterpret_cast ( ++ POA_IR::AliasDef_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/AliasDef:1.0" ++ ) ++ )->original_type_def ( ++ original_type_def, ++ ACE_TRY_ENV ++ ); ++ return; ++} ++ ++// ++// End ThruPOA Proxy Implementation ++/////////////////////////////////////////////////////////////////////// ++ ++// skeleton constructor ++POA_IR::AliasDef::AliasDef (void) ++{ ++ this->optable_ = &tao_IR_AliasDef_optable; ++} ++ ++// copy ctor ++POA_IR::AliasDef::AliasDef (const AliasDef& rhs) ++ : ACE_NESTED_CLASS (POA_IR,TypedefDef) (rhs), ++ ACE_NESTED_CLASS (POA_IR,Contained) (rhs), ++ ACE_NESTED_CLASS (POA_IR,IDLType) (rhs), ++ POA_CORBA_IRObject (rhs), ++ TAO_ServantBase (rhs) ++{} ++ ++// skeleton destructor ++POA_IR::AliasDef::~AliasDef (void) ++{ ++} ++ ++void POA_IR::AliasDef::_get_original_type_def_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) ++{ ++ POA_IR::AliasDef *_tao_impl = (POA_IR::AliasDef *)_tao_object_reference; ++ ++ IR_IDLType_var _tao_retval; ++ ++ _tao_retval = _tao_impl->original_type_def ( ++ ACE_TRY_ENV ++ ); ++ ++ ACE_CHECK; ++ ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!( ++ (_tao_out << _tao_retval.in ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); ++} ++ ++void POA_IR::AliasDef::_set_original_type_def_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) ++{ ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::AliasDef *_tao_impl = (POA_IR::AliasDef *)_tao_object_reference; ++ ++ IR_IDLType_var original_type_def; ++ if (!( ++ (_tao_in >> original_type_def.out ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); ++ ++ _tao_impl->original_type_def ( ++ original_type_def.in (), ++ ACE_TRY_ENV ++ ); ++ ++ ACE_CHECK; ++ ++ _tao_server_request.init_reply (); ++} ++ ++void POA_IR::AliasDef::_is_a_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void * _tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++ ) ++{ ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::AliasDef *_tao_impl = (POA_IR::AliasDef *) _tao_object_reference; CORBA::Boolean _tao_retval = 0; CORBA::String_var value; - if (!(_tao_in >> value.out ())) + if (!((_tao_in >> value.out ()))) ACE_THROW (CORBA::MARSHAL ()); - +- ++ _tao_retval = _tao_impl->_is_a (value.in (), ACE_TRY_ENV); -@@ -12791,7 +12763,7 @@ - + ACE_CHECK; +- ++ _tao_server_request.init_reply (); TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); - if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) @@ -3293,8 +16774,21 @@ ACE_THROW (CORBA::MARSHAL ()); } -@@ -12808,7 +12780,7 @@ - +-void POA_IR::TypedefDef::_non_existent_skel ( +- TAO_ServerRequest &_tao_server_request, ++void POA_IR::AliasDef::_non_existent_skel ( ++ TAO_ServerRequest &_tao_server_request, + void * _tao_object_reference, + void * /* context */, + CORBA::Environment &ACE_TRY_ENV + ) + { +- POA_IR::TypedefDef *_tao_impl = (POA_IR::TypedefDef *) _tao_object_reference; ++ POA_IR::AliasDef *_tao_impl = (POA_IR::AliasDef *) _tao_object_reference; + CORBA::Boolean _tao_retval = _tao_impl->_non_existent (ACE_TRY_ENV); + ACE_CHECK; +- ++ _tao_server_request.init_reply (); TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); - if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) @@ -3302,7 +16796,32 @@ ACE_THROW (CORBA::MARSHAL ()); } -@@ -12839,7 +12811,7 @@ +-CORBA::Boolean POA_IR::TypedefDef::_is_a ( ++CORBA::Boolean POA_IR::AliasDef::_is_a ( + const char* value, + CORBA::Environment &ACE_TRY_ENV + ) + { + if ( ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/AliasDef:1.0")) || + (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/TypedefDef:1.0")) || + (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/Contained:1.0")) || + (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/IDLType:1.0")) || +@@ -12832,10 +8566,12 @@ + return 0; + } + +-void* POA_IR::TypedefDef::_downcast ( ++void* POA_IR::AliasDef::_downcast ( + const char* logical_type_id + ) + { ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/AliasDef:1.0") == 0) ++ return ACE_static_cast (POA_IR::AliasDef_ptr, this); + if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/TypedefDef:1.0") == 0) + return ACE_static_cast (POA_IR::TypedefDef_ptr, this); + if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Contained:1.0") == 0) +@@ -12843,24 +8579,24 @@ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/IDLType:1.0") == 0) return ACE_static_cast (POA_IR::IDLType_ptr, this); if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/IRObject:1.0") == 0) @@ -3311,135 +16830,432 @@ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/Object:1.0") == 0) return ACE_static_cast(PortableServer::Servant, this); return 0; -@@ -12869,12 +12841,12 @@ + } + +-void POA_IR::TypedefDef::_dispatch (TAO_ServerRequest &req, void *context, CORBA::Environment &ACE_TRY_ENV) ++void POA_IR::AliasDef::_dispatch (TAO_ServerRequest &req, void *context, CORBA::Environment &ACE_TRY_ENV) + { + this->synchronous_upcall_dispatch(req, context, this, ACE_TRY_ENV); + } + +-const char* POA_IR::TypedefDef::_interface_repository_id (void) const ++const char* POA_IR::AliasDef::_interface_repository_id (void) const + { +- return "IDL:omg.org/IR/TypedefDef:1.0"; ++ return "IDL:omg.org/IR/AliasDef:1.0"; + } + +-IR::TypedefDef* +-POA_IR::TypedefDef::_this (CORBA_Environment &ACE_TRY_ENV) ++IR::AliasDef* ++POA_IR::AliasDef::_this (CORBA_Environment &ACE_TRY_ENV) + { + TAO_Stub *stub = this->_create_stub (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); +@@ -12873,131 +8609,110 @@ ACE_NEW_RETURN (tmp, CORBA::Object (stub, 0, this), 0); CORBA::Object_var obj = tmp; - return ::IR::TypedefDef::_unchecked_narrow (obj.in ()); -+ return IR_TypedefDef::_unchecked_narrow (obj.in ()); ++ return IR_AliasDef::_unchecked_narrow (obj.in ()); } - - #if (TAO_HAS_INTERCEPTORS == 1) - #endif /* TAO_HAS_INTERCEPTORS */ -+ - class TAO_IR_StructDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable +-#if (TAO_HAS_INTERCEPTORS == 1) +-#endif /* TAO_HAS_INTERCEPTORS */ +-class TAO_IR_StructDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable ++class TAO_IR_NativeDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable { private: -@@ -12882,7 +12854,7 @@ + unsigned int hash (const char *str, unsigned int len); public: const TAO_operation_db_entry * lookup (const char *str, unsigned int len); }; --/* starting time is 18:47:27 */ -+/* starting time is 11:23:09 */ +-/* starting time is 16:31:12 */ ++/* starting time is 11:23:10 */ /* C++ code produced by gperf version 2.8 (ACE version) */ - /* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_StructDef_Perfect_Hash_OpTable -N lookup */ +-/* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_StructDef_Perfect_Hash_OpTable -N lookup */ ++/* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_NativeDef_Perfect_Hash_OpTable -N lookup */ unsigned int -@@ -13027,10 +12999,9 @@ +-TAO_IR_StructDef_Perfect_Hash_OpTable::hash (const char *str, unsigned int len) ++TAO_IR_NativeDef_Perfect_Hash_OpTable::hash (const char *str, unsigned int len) + { + static const unsigned char asso_values[] = + { + #if defined (ACE_MVS) +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 0, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 0, +- 52, 20, 3, 0, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 10, 15, 5, +- 52, 10, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 15, 15, 52, 52, 52, 15, 5, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 0, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 0, ++ 37, 37, 0, 0, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 0, 0, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 10, 37, 37, 37, 37, 10, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, + #else +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 0, 52, 0, 52, 20, +- 3, 0, 52, 52, 52, 52, 52, 52, 10, 15, +- 5, 52, 10, 52, 52, 15, 15, 52, 52, 52, +- 15, 5, 52, 52, 52, 52, 52, 52, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 0, 37, 0, 37, 37, ++ 0, 0, 37, 37, 37, 37, 37, 37, 37, 0, ++ 0, 37, 37, 37, 37, 37, 10, 37, 37, 37, ++ 37, 10, 37, 37, 37, 37, 37, 37, + #endif /* ACE_MVS */ + }; + return len + asso_values[str[len - 1]] + asso_values[str[0]]; + } + + const class TAO_operation_db_entry * +-TAO_IR_StructDef_Perfect_Hash_OpTable::lookup (const char *str, unsigned int len) ++TAO_IR_NativeDef_Perfect_Hash_OpTable::lookup (const char *str, unsigned int len) + { + enum + { +- TOTAL_KEYWORDS = 33, ++ TOTAL_KEYWORDS = 16, + MIN_WORD_LENGTH = 4, + MAX_WORD_LENGTH = 26, +- MIN_HASH_VALUE = 5, +- MAX_HASH_VALUE = 51, +- HASH_VALUE_RANGE = 47, +- DUPLICATES = 7 ++ MIN_HASH_VALUE = 4, ++ MAX_HASH_VALUE = 36, ++ HASH_VALUE_RANGE = 33, ++ DUPLICATES = 5 + }; + + static const class TAO_operation_db_entry wordlist[] = + { +- {"",0},{"",0},{"",0},{"",0},{"",0}, +- {"_is_a", &POA_IR::StructDef::_is_a_skel}, +- {"_get_name", &POA_IR::StructDef::_get_name_skel}, +- {"_get_type", &POA_IR::StructDef::_get_type_skel}, +- {"_set_name", &POA_IR::StructDef::_set_name_skel}, +- {"_get_id", &POA_IR::StructDef::_get_id_skel}, +- {"_set_id", &POA_IR::StructDef::_set_id_skel}, +- {"describe", &POA_IR::StructDef::describe_skel}, +- {"destroy", &POA_IR::StructDef::destroy_skel}, +- {"_get_def_kind", &POA_IR::StructDef::_get_def_kind_skel}, +- {"_get_version", &POA_IR::StructDef::_get_version_skel}, +- {"_set_version", &POA_IR::StructDef::_set_version_skel}, +- {"_get_absolute_name", &POA_IR::StructDef::_get_absolute_name_skel}, +- {"move", &POA_IR::StructDef::move_skel}, +- {"_get_defined_in", &POA_IR::StructDef::_get_defined_in_skel}, +- {"lookup_name", &POA_IR::StructDef::lookup_name_skel}, +- {"lookup", &POA_IR::StructDef::lookup_skel}, +- {"_get_members", &POA_IR::StructDef::_get_members_skel}, +- {"_set_members", &POA_IR::StructDef::_set_members_skel}, +- {"_non_existent", &POA_IR::StructDef::_non_existent_skel}, +- {"_get_containing_repository", &POA_IR::StructDef::_get_containing_repository_skel}, +- {"create_value", &POA_IR::StructDef::create_value_skel}, +- {"create_module", &POA_IR::StructDef::create_module_skel}, +- {"create_native", &POA_IR::StructDef::create_native_skel}, +- {"describe_contents", &POA_IR::StructDef::describe_contents_skel}, +- {"create_interface", &POA_IR::StructDef::create_interface_skel}, +- {"create_union", &POA_IR::StructDef::create_union_skel}, +- {"create_exception", &POA_IR::StructDef::create_exception_skel}, +- {"contents", &POA_IR::StructDef::contents_skel}, +- {"create_enum", &POA_IR::StructDef::create_enum_skel}, +- {"create_alias", &POA_IR::StructDef::create_alias_skel}, +- {"create_struct", &POA_IR::StructDef::create_struct_skel}, +- {"create_constant", &POA_IR::StructDef::create_constant_skel}, +- {"create_value_box", &POA_IR::StructDef::create_value_box_skel}, ++ {"",0},{"",0},{"",0},{"",0}, ++ {"move", &POA_IR::NativeDef::move_skel}, ++ {"_is_a", &POA_IR::NativeDef::_is_a_skel}, ++ {"_get_id", &POA_IR::NativeDef::_get_id_skel}, ++ {"_set_id", &POA_IR::NativeDef::_set_id_skel}, ++ {"describe", &POA_IR::NativeDef::describe_skel}, ++ {"_get_name", &POA_IR::NativeDef::_get_name_skel}, ++ {"_get_type", &POA_IR::NativeDef::_get_type_skel}, ++ {"_set_name", &POA_IR::NativeDef::_set_name_skel}, ++ {"_get_version", &POA_IR::NativeDef::_get_version_skel}, ++ {"_set_version", &POA_IR::NativeDef::_set_version_skel}, ++ {"_get_def_kind", &POA_IR::NativeDef::_get_def_kind_skel}, ++ {"_get_defined_in", &POA_IR::NativeDef::_get_defined_in_skel}, ++ {"destroy", &POA_IR::NativeDef::destroy_skel}, ++ {"_get_absolute_name", &POA_IR::NativeDef::_get_absolute_name_skel}, ++ {"_non_existent", &POA_IR::NativeDef::_non_existent_skel}, ++ {"_get_containing_repository", &POA_IR::NativeDef::_get_containing_repository_skel}, + }; + + static const signed char lookup[] = + { +- -1, -1, -1, -6, -3, 5, -1, -9, -2, -57, -54, 11, -1, -14, +- -2, 12, 13, -55, 16, 17, 18, 19, -1, -1, -21, -2, 20, -54, +- 23, -26, -2, 24, 25, -55, -1, 28, 29, 30, -1, -1, -1, 31, +- -1, 32, -1, -1, 33, 34, 35, -1, 36, 37, ++ -6, -2, -9, -3, 4, 5, -1, -43, 8, -43, -12, -2, -38, 14, ++ -1, 15, -1, 16, 17, -1, -1, -1, -1, 18, -1, -1, -1, -1, ++ -1, -1, -1, -1, -1, -1, -1, -1, 19, + }; + + if (len <= MAX_WORD_LENGTH && len >= MIN_WORD_LENGTH) +@@ -13031,38 +8746,37 @@ } return 0; } --/* ending time is 18:47:27 */ -+/* ending time is 11:23:09 */ - static TAO_IR_StructDef_Perfect_Hash_OpTable tao_IR_StructDef_optable; - +-/* ending time is 16:31:12 */ +-static TAO_IR_StructDef_Perfect_Hash_OpTable tao_IR_StructDef_optable; - ++/* ending time is 11:23:10 */ ++static TAO_IR_NativeDef_Perfect_Hash_OpTable tao_IR_NativeDef_optable; + /////////////////////////////////////////////////////////////////////// // Strategized Proxy Broker Implementation // -@@ -13056,9 +13027,9 @@ + + // Factory function Implementation. +-POA_IR::_TAO_StructDef_Strategized_Proxy_Broker *POA_IR::_TAO_StructDef_Strategized_Proxy_Broker::the_TAO_StructDef_Strategized_Proxy_Broker (void) ++POA_IR::_TAO_NativeDef_Strategized_Proxy_Broker *POA_IR::_TAO_NativeDef_Strategized_Proxy_Broker::the_TAO_NativeDef_Strategized_Proxy_Broker (void) + { +- static POA_IR::_TAO_StructDef_Strategized_Proxy_Broker strategized_proxy_broker; ++ static POA_IR::_TAO_NativeDef_Strategized_Proxy_Broker strategized_proxy_broker; + return &strategized_proxy_broker; + } + +-POA_IR::_TAO_StructDef_Strategized_Proxy_Broker::_TAO_StructDef_Strategized_Proxy_Broker (void) ++POA_IR::_TAO_NativeDef_Strategized_Proxy_Broker::_TAO_NativeDef_Strategized_Proxy_Broker (void) + { + for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) + this->proxy_cache_[i] = 0; + + } + +-POA_IR::_TAO_StructDef_Strategized_Proxy_Broker::~_TAO_StructDef_Strategized_Proxy_Broker (void) ++POA_IR::_TAO_NativeDef_Strategized_Proxy_Broker::~_TAO_NativeDef_Strategized_Proxy_Broker (void) + { + for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) + delete this->proxy_cache_[i]; } -IR::_TAO_StructDef_Proxy_Impl& -+_TAO_StructDef_Proxy_Impl& - POA_IR::_TAO_StructDef_Strategized_Proxy_Broker::select_proxy ( +-POA_IR::_TAO_StructDef_Strategized_Proxy_Broker::select_proxy ( - ::IR::StructDef *object, -+ IR_StructDef *object, ++_TAO_NativeDef_Proxy_Impl& ++POA_IR::_TAO_NativeDef_Strategized_Proxy_Broker::select_proxy ( ++ IR_NativeDef *object, CORBA::Environment &ACE_TRY_ENV ) { -@@ -13090,7 +13061,7 @@ +@@ -13080,7 +8794,7 @@ + } + + void +-POA_IR::_TAO_StructDef_Strategized_Proxy_Broker::create_proxy ( ++POA_IR::_TAO_NativeDef_Strategized_Proxy_Broker::create_proxy ( + TAO_ORB_Core::TAO_Collocation_Strategies strategy, + CORBA::Environment &ACE_TRY_ENV + ) +@@ -13094,7 +8808,7 @@ case TAO_ORB_Core::THRU_POA_STRATEGY: ACE_NEW_THROW_EX ( this->proxy_cache_[strategy], - POA_IR::_TAO_StructDef_ThruPOA_Proxy_Impl, -+ _TAO_StructDef_ThruPOA_Proxy_Impl, ++ _TAO_NativeDef_ThruPOA_Proxy_Impl, CORBA::NO_MEMORY () ); ACE_CHECK; -@@ -13100,7 +13071,7 @@ +@@ -13104,7 +8818,7 @@ default: ACE_NEW_THROW_EX ( this->proxy_cache_[strategy], - ::IR::_TAO_StructDef_Remote_Proxy_Impl, -+ _TAO_StructDef_Remote_Proxy_Impl, ++ _TAO_NativeDef_Remote_Proxy_Impl, CORBA::NO_MEMORY () ); ACE_CHECK; -@@ -13117,26 +13088,26 @@ +@@ -13121,332 +8835,112 @@ /////////////////////////////////////////////////////////////////////// -IR::_TAO_StructDef_Proxy_Broker * -IR__TAO_StructDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) -+_TAO_StructDef_Proxy_Broker * -+_TAO_StructDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) ++_TAO_NativeDef_Proxy_Broker * ++_TAO_NativeDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) { ACE_UNUSED_ARG (obj); - return ::POA_IR::_TAO_StructDef_Strategized_Proxy_Broker::the_TAO_StructDef_Strategized_Proxy_Broker(); +- return ::POA_IR::_TAO_StructDef_Strategized_Proxy_Broker::the_TAO_StructDef_Strategized_Proxy_Broker(); ++ return ::POA_IR::_TAO_NativeDef_Strategized_Proxy_Broker::the_TAO_NativeDef_Strategized_Proxy_Broker(); } int -IR__TAO_StructDef_Proxy_Broker_Factory_Initializer (long _dummy_) -+_TAO_StructDef_Proxy_Broker_Factory_Initializer (long _dummy_) ++_TAO_NativeDef_Proxy_Broker_Factory_Initializer (long _dummy_) { ACE_UNUSED_ARG (_dummy_); - IR__TAO_StructDef_Proxy_Broker_Factory_function_pointer = - IR__TAO_StructDef_Proxy_Broker_Factory_function; -+ _TAO_StructDef_Proxy_Broker_Factory_function_pointer = -+ _TAO_StructDef_Proxy_Broker_Factory_function; ++ _TAO_NativeDef_Proxy_Broker_Factory_function_pointer = ++ _TAO_NativeDef_Proxy_Broker_Factory_function; return 0; } -static int IR__TAO_StructDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = - IR__TAO_StructDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, IR__TAO_StructDef_Proxy_Broker_Factory_Initializer)); -+static int _TAO_StructDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = -+ _TAO_StructDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, _TAO_StructDef_Proxy_Broker_Factory_Initializer)); ++static int _TAO_NativeDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = ++ _TAO_NativeDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, _TAO_NativeDef_Proxy_Broker_Factory_Initializer)); /////////////////////////////////////////////////////////////////////// -@@ -13148,7 +13119,7 @@ + // ThruPOA Proxy Implementation + // + +-POA_IR::_TAO_StructDef_ThruPOA_Proxy_Impl::_TAO_StructDef_ThruPOA_Proxy_Impl (void) ++POA_IR::_TAO_NativeDef_ThruPOA_Proxy_Impl::_TAO_NativeDef_ThruPOA_Proxy_Impl (void) ++{} ++ ++POA_IR::_TAO_NativeDef_ThruPOA_Proxy_Impl::~_TAO_NativeDef_ThruPOA_Proxy_Impl (void) + {} // ThruPOA Implementation of the IDL interface methods -IR::StructMemberSeq * POA_IR::_TAO_StructDef_ThruPOA_Proxy_Impl::members ( -+IR_StructMemberSeq * POA_IR::_TAO_StructDef_ThruPOA_Proxy_Impl::members ( - CORBA_Object *_collocated_tao_target_, - CORBA::Environment &ACE_TRY_ENV - ) -@@ -13156,7 +13127,7 @@ - CORBA::SystemException - )) - { +- CORBA_Object *_collocated_tao_target_, +- CORBA::Environment &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) +-{ - IR::StructMemberSeq_var _tao_retval; -+ IR_StructMemberSeq_var _tao_retval; - ACE_UNUSED_ARG (_tao_retval); - TAO_Object_Adapter::Servant_Upcall servant_upcall ( - _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -13181,7 +13152,7 @@ - - void POA_IR::_TAO_StructDef_ThruPOA_Proxy_Impl::members ( - CORBA_Object *_collocated_tao_target_, +- ACE_UNUSED_ARG (_tao_retval); +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "members", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK_RETURN (0); +- return ACE_reinterpret_cast ( +- POA_IR::StructDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/StructDef:1.0" +- ) +- )->members ( +- ACE_TRY_ENV +- ); +-} +- +-void POA_IR::_TAO_StructDef_ThruPOA_Proxy_Impl::members ( +- CORBA_Object *_collocated_tao_target_, - const IR::StructMemberSeq & members, -+ const IR_StructMemberSeq & members, - CORBA::Environment &ACE_TRY_ENV - ) - ACE_THROW_SPEC (( -@@ -13227,7 +13198,7 @@ - ACE_NESTED_CLASS (POA_IR,Container) (rhs), +- CORBA::Environment &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) +-{ +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "members", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK; +- ACE_reinterpret_cast ( +- POA_IR::StructDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/StructDef:1.0" +- ) +- )->members ( +- members, +- ACE_TRY_ENV +- ); +- return; +-} +- + // + // End ThruPOA Proxy Implementation + /////////////////////////////////////////////////////////////////////// + + // skeleton constructor +-POA_IR::StructDef::StructDef (void) ++POA_IR::NativeDef::NativeDef (void) + { +- this->optable_ = &tao_IR_StructDef_optable; ++ this->optable_ = &tao_IR_NativeDef_optable; + } + + // copy ctor +-POA_IR::StructDef::StructDef (const StructDef& rhs) ++POA_IR::NativeDef::NativeDef (const NativeDef& rhs) + : ACE_NESTED_CLASS (POA_IR,TypedefDef) (rhs), +- ACE_NESTED_CLASS (POA_IR,Container) (rhs), ACE_NESTED_CLASS (POA_IR,Contained) (rhs), ACE_NESTED_CLASS (POA_IR,IDLType) (rhs), - ACE_NESTED_CLASS (POA_CORBA,IRObject) (rhs), @@ -3447,51 +17263,192 @@ TAO_ServantBase (rhs) {} -@@ -13245,7 +13216,7 @@ - { - POA_IR::StructDef *_tao_impl = (POA_IR::StructDef *)_tao_object_reference; - -- IR::StructMemberSeq_var _tao_retval; -+ IR_StructMemberSeq_var _tao_retval; + // skeleton destructor +-POA_IR::StructDef::~StructDef (void) +-{ +-} +- +-void POA_IR::StructDef::_get_members_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) ++POA_IR::NativeDef::~NativeDef (void) + { +- POA_IR::StructDef *_tao_impl = (POA_IR::StructDef *)_tao_object_reference; +- +- IR::StructMemberSeq_var _tao_retval; +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::StructDef::TAO_ServerRequestInfo_IR_StructDef_members_get ri ( +- _tao_server_request, +- _tao_impl +- , +- ACE_TRY_ENV +- ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->members ( +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::StructMemberSeq * _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << _tao_retval.in ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- + } - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( -@@ -13272,7 +13243,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::StructMemberSeq * _tao_retval_info = _tao_retval._retn (); -+ IR_StructMemberSeq * _tao_retval_info = _tao_retval._retn (); - ri.result (_tao_retval_info); - _tao_retval = _tao_retval_info; - ri.reply_status (PortableInterceptor::SUCCESSFUL); -@@ -13326,14 +13297,12 @@ - TAO_InputCDR &_tao_in = _tao_server_request.incoming (); - POA_IR::StructDef *_tao_impl = (POA_IR::StructDef *)_tao_object_reference; - -- _tao_server_request.argument_flag (0); +-void POA_IR::StructDef::_set_members_skel ( ++void POA_IR::NativeDef::_is_a_skel ( + TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::StructDef *_tao_impl = (POA_IR::StructDef *)_tao_object_reference; +- +-_tao_server_request.argument_flag (0); - IR::StructMemberSeq members; -+ IR_StructMemberSeq members; - if (!( - (_tao_in >> members) - )) - ACE_THROW (CORBA::MARSHAL()); - +- if (!( +- (_tao_in >> members) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::StructDef::TAO_ServerRequestInfo_IR_StructDef_members_set ri ( +- _tao_server_request, +- _tao_impl +- , +- members, +- ACE_TRY_ENV +- ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- +- _tao_impl->members ( +- members, +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +-} - - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( - _tao_server_request.orb_core ()->server_request_interceptors (), -@@ -13406,7 +13375,7 @@ - POA_IR::StructDef *_tao_impl = (POA_IR::StructDef *) _tao_object_reference; +-void POA_IR::StructDef::_is_a_skel ( +- TAO_ServerRequest &_tao_server_request, + void * _tao_object_reference, + void * /* context */, + CORBA::Environment &ACE_TRY_ENV + ) + { + TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::StructDef *_tao_impl = (POA_IR::StructDef *) _tao_object_reference; ++ POA_IR::NativeDef *_tao_impl = (POA_IR::NativeDef *) _tao_object_reference; CORBA::Boolean _tao_retval = 0; CORBA::String_var value; - if (!(_tao_in >> value.out ())) + if (!((_tao_in >> value.out ()))) ACE_THROW (CORBA::MARSHAL ()); - +- ++ _tao_retval = _tao_impl->_is_a (value.in (), ACE_TRY_ENV); -@@ -13414,7 +13383,7 @@ - + ACE_CHECK; +- ++ _tao_server_request.init_reply (); TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); - if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) @@ -3499,8 +17456,21 @@ ACE_THROW (CORBA::MARSHAL ()); } -@@ -13431,7 +13400,7 @@ - +-void POA_IR::StructDef::_non_existent_skel ( +- TAO_ServerRequest &_tao_server_request, ++void POA_IR::NativeDef::_non_existent_skel ( ++ TAO_ServerRequest &_tao_server_request, + void * _tao_object_reference, + void * /* context */, + CORBA::Environment &ACE_TRY_ENV + ) + { +- POA_IR::StructDef *_tao_impl = (POA_IR::StructDef *) _tao_object_reference; ++ POA_IR::NativeDef *_tao_impl = (POA_IR::NativeDef *) _tao_object_reference; + CORBA::Boolean _tao_retval = _tao_impl->_non_existent (ACE_TRY_ENV); + ACE_CHECK; +- ++ _tao_server_request.init_reply (); TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); - if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) @@ -3508,7 +17478,39 @@ ACE_THROW (CORBA::MARSHAL ()); } -@@ -13468,7 +13437,7 @@ +-CORBA::Boolean POA_IR::StructDef::_is_a ( ++CORBA::Boolean POA_IR::NativeDef::_is_a ( + const char* value, + CORBA::Environment &ACE_TRY_ENV + ) + { + if ( +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/StructDef:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/NativeDef:1.0")) || + (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/TypedefDef:1.0")) || +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/Container:1.0")) || + (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/Contained:1.0")) || + (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/IDLType:1.0")) || + (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/CORBA/IRObject:1.0")) || +@@ -13456,39 +8950,37 @@ + return 0; + } + +-void* POA_IR::StructDef::_downcast ( ++void* POA_IR::NativeDef::_downcast ( + const char* logical_type_id + ) + { +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/StructDef:1.0") == 0) +- return ACE_static_cast (POA_IR::StructDef_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/NativeDef:1.0") == 0) ++ return ACE_static_cast (POA_IR::NativeDef_ptr, this); + if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/TypedefDef:1.0") == 0) + return ACE_static_cast (POA_IR::TypedefDef_ptr, this); +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Container:1.0") == 0) +- return ACE_static_cast (POA_IR::Container_ptr, this); + if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Contained:1.0") == 0) + return ACE_static_cast (POA_IR::Contained_ptr, this); if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/IDLType:1.0") == 0) return ACE_static_cast (POA_IR::IDLType_ptr, this); if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/IRObject:1.0") == 0) @@ -3517,262 +17519,1172 @@ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/Object:1.0") == 0) return ACE_static_cast(PortableServer::Servant, this); return 0; -@@ -13498,10 +13467,9 @@ + } + +-void POA_IR::StructDef::_dispatch (TAO_ServerRequest &req, void *context, CORBA::Environment &ACE_TRY_ENV) ++void POA_IR::NativeDef::_dispatch (TAO_ServerRequest &req, void *context, CORBA::Environment &ACE_TRY_ENV) + { + this->synchronous_upcall_dispatch(req, context, this, ACE_TRY_ENV); + } + +-const char* POA_IR::StructDef::_interface_repository_id (void) const ++const char* POA_IR::NativeDef::_interface_repository_id (void) const + { +- return "IDL:omg.org/IR/StructDef:1.0"; ++ return "IDL:omg.org/IR/NativeDef:1.0"; + } + +-IR::StructDef* +-POA_IR::StructDef::_this (CORBA_Environment &ACE_TRY_ENV) ++IR::NativeDef* ++POA_IR::NativeDef::_this (CORBA_Environment &ACE_TRY_ENV) + { + TAO_Stub *stub = this->_create_stub (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); +@@ -13501,286 +8993,97 @@ ACE_NEW_RETURN (tmp, CORBA::Object (stub, 0, this), 0); CORBA::Object_var obj = tmp; - return ::IR::StructDef::_unchecked_narrow (obj.in ()); -+ return IR_StructDef::_unchecked_narrow (obj.in ()); - } - +-} - - #if (TAO_HAS_INTERCEPTORS == 1) - POA_IR::StructDef::TAO_ServerRequestInfo_IR_StructDef_members_get::TAO_ServerRequestInfo_IR_StructDef_members_get ( - TAO_ServerRequest &_tao_server_request, -@@ -13581,7 +13549,7 @@ - POA_IR::StructDef::TAO_ServerRequestInfo_IR_StructDef_members_set::TAO_ServerRequestInfo_IR_StructDef_members_set ( - TAO_ServerRequest &_tao_server_request, - POA_IR::StructDef *tao_impl, +- +-#if (TAO_HAS_INTERCEPTORS == 1) +-POA_IR::StructDef::TAO_ServerRequestInfo_IR_StructDef_members_get::TAO_ServerRequestInfo_IR_StructDef_members_get ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::StructDef *tao_impl +- , +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl) +-{} +- +-Dynamic::ParameterList * +-POA_IR::StructDef::TAO_ServerRequestInfo_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 * +-POA_IR::StructDef::TAO_ServerRequestInfo_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 * +-POA_IR::StructDef::TAO_ServerRequestInfo_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 (); +-} +- +-char * +-POA_IR::StructDef::TAO_ServerRequestInfo_IR_StructDef_members_get::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::StructDef::TAO_ServerRequestInfo_IR_StructDef_members_get::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-void +-POA_IR::StructDef::TAO_ServerRequestInfo_IR_StructDef_members_get::result (IR::StructMemberSeq * result) +-{ +- // Update the result. +- this->_result = result; +-} +- +-POA_IR::StructDef::TAO_ServerRequestInfo_IR_StructDef_members_set::TAO_ServerRequestInfo_IR_StructDef_members_set ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::StructDef *tao_impl +- , - const IR::StructMemberSeq & members, -+ const IR_StructMemberSeq & members, - CORBA::Environment & - ) - : TAO_ServerRequestInfo (_tao_server_request), -@@ -13653,6 +13621,7 @@ +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- members_ (members) +-{} +- +-Dynamic::ParameterList * +-POA_IR::StructDef::TAO_ServerRequestInfo_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 * +-POA_IR::StructDef::TAO_ServerRequestInfo_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 * +-POA_IR::StructDef::TAO_ServerRequestInfo_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; +-} +- +-char * +-POA_IR::StructDef::TAO_ServerRequestInfo_IR_StructDef_members_set::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::StructDef::TAO_ServerRequestInfo_IR_StructDef_members_set::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); ++ return IR_NativeDef::_unchecked_narrow (obj.in ()); } - #endif /* TAO_HAS_INTERCEPTORS */ -+ - class TAO_IR_UnionDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable +-#endif /* TAO_HAS_INTERCEPTORS */ +-class TAO_IR_UnionDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable ++class TAO_IR_PrimitiveDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable { private: -@@ -13660,7 +13629,7 @@ + unsigned int hash (const char *str, unsigned int len); public: const TAO_operation_db_entry * lookup (const char *str, unsigned int len); }; --/* starting time is 18:47:28 */ -+/* starting time is 11:23:09 */ +-/* starting time is 16:31:12 */ ++/* starting time is 11:23:10 */ /* C++ code produced by gperf version 2.8 (ACE version) */ - /* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_UnionDef_Perfect_Hash_OpTable -N lookup */ +-/* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_UnionDef_Perfect_Hash_OpTable -N lookup */ ++/* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_PrimitiveDef_Perfect_Hash_OpTable -N lookup */ unsigned int -@@ -13809,10 +13778,9 @@ +-TAO_IR_UnionDef_Perfect_Hash_OpTable::hash (const char *str, unsigned int len) ++TAO_IR_PrimitiveDef_Perfect_Hash_OpTable::hash (const char *str, unsigned int len) + { + static const unsigned char asso_values[] = + { + #if defined (ACE_MVS) +- 68, 68, 68, 68, 68, 68, 68, 68, 68, 68, +- 68, 68, 68, 68, 68, 68, 68, 68, 68, 68, +- 68, 68, 68, 68, 68, 68, 68, 68, 68, 68, +- 68, 68, 68, 68, 68, 68, 68, 68, 68, 68, +- 68, 68, 68, 68, 68, 68, 68, 68, 68, 68, +- 68, 68, 68, 68, 68, 68, 68, 68, 68, 68, +- 68, 68, 68, 68, 68, 68, 68, 68, 68, 68, +- 68, 68, 68, 68, 68, 68, 68, 68, 68, 68, +- 68, 68, 68, 68, 68, 68, 68, 68, 68, 68, +- 68, 68, 68, 68, 68, 68, 68, 68, 68, 68, +- 68, 68, 68, 68, 68, 68, 68, 68, 68, 0, +- 68, 68, 68, 68, 68, 68, 68, 68, 68, 68, +- 68, 68, 68, 68, 68, 68, 68, 68, 68, 0, +- 68, 25, 3, 0, 0, 68, 68, 68, 68, 68, +- 68, 68, 68, 68, 68, 68, 68, 10, 0, 10, +- 68, 10, 68, 68, 68, 68, 68, 68, 68, 68, +- 68, 68, 30, 15, 68, 68, 68, 5, 5, 68, +- 68, 68, 68, 68, 68, 68, 68, 68, 68, 68, +- 68, 68, 68, 68, 68, 68, 68, 68, 68, 68, +- 68, 68, 68, 68, 68, 68, 68, 68, 68, 68, +- 68, 68, 68, 68, 68, 68, 68, 68, 68, 68, +- 68, 68, 68, 68, 68, 68, 68, 68, 68, 68, +- 68, 68, 68, 68, 68, 68, 68, 68, 68, 68, +- 68, 68, 68, 68, 68, 68, 68, 68, 68, 68, +- 68, 68, 68, 68, 68, 68, 68, 68, 68, 68, +- 68, 68, 68, 68, 68, 68, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 0, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 0, ++ 19, 19, 0, 5, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 5, 19, 19, 19, 19, 0, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, + #else +- 68, 68, 68, 68, 68, 68, 68, 68, 68, 68, +- 68, 68, 68, 68, 68, 68, 68, 68, 68, 68, +- 68, 68, 68, 68, 68, 68, 68, 68, 68, 68, +- 68, 68, 68, 68, 68, 68, 68, 68, 68, 68, +- 68, 68, 68, 68, 68, 68, 68, 68, 68, 68, +- 68, 68, 68, 68, 68, 68, 68, 68, 68, 68, +- 68, 68, 68, 68, 68, 68, 68, 68, 68, 68, +- 68, 68, 68, 68, 68, 68, 68, 68, 68, 68, +- 68, 68, 68, 68, 68, 68, 68, 68, 68, 68, +- 68, 68, 68, 68, 68, 0, 68, 0, 68, 25, +- 3, 0, 0, 68, 68, 68, 68, 68, 10, 0, +- 10, 68, 10, 68, 68, 30, 15, 68, 68, 68, +- 5, 5, 68, 68, 68, 68, 68, 68, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 0, 19, 0, 19, 19, ++ 0, 5, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 5, 19, 19, 19, ++ 19, 0, 19, 19, 19, 19, 19, 19, + #endif /* ACE_MVS */ + }; + return len + asso_values[str[len - 1]] + asso_values[str[0]]; + } + + const class TAO_operation_db_entry * +-TAO_IR_UnionDef_Perfect_Hash_OpTable::lookup (const char *str, unsigned int len) ++TAO_IR_PrimitiveDef_Perfect_Hash_OpTable::lookup (const char *str, unsigned int len) + { + enum + { +- TOTAL_KEYWORDS = 36, +- MIN_WORD_LENGTH = 4, +- MAX_WORD_LENGTH = 27, +- MIN_HASH_VALUE = 4, +- MAX_HASH_VALUE = 67, +- HASH_VALUE_RANGE = 64, +- DUPLICATES = 8 ++ TOTAL_KEYWORDS = 6, ++ MIN_WORD_LENGTH = 5, ++ MAX_WORD_LENGTH = 13, ++ MIN_HASH_VALUE = 5, ++ MAX_HASH_VALUE = 18, ++ HASH_VALUE_RANGE = 14, ++ DUPLICATES = 0 + }; + + static const class TAO_operation_db_entry wordlist[] = + { +- {"",0},{"",0},{"",0},{"",0}, +- {"move", &POA_IR::UnionDef::move_skel}, +- {"_is_a", &POA_IR::UnionDef::_is_a_skel}, +- {"_get_name", &POA_IR::UnionDef::_get_name_skel}, +- {"_get_type", &POA_IR::UnionDef::_get_type_skel}, +- {"_set_name", &POA_IR::UnionDef::_set_name_skel}, +- {"_get_id", &POA_IR::UnionDef::_get_id_skel}, +- {"_set_id", &POA_IR::UnionDef::_set_id_skel}, +- {"describe", &POA_IR::UnionDef::describe_skel}, +- {"destroy", &POA_IR::UnionDef::destroy_skel}, +- {"_get_def_kind", &POA_IR::UnionDef::_get_def_kind_skel}, +- {"_get_absolute_name", &POA_IR::UnionDef::_get_absolute_name_skel}, +- {"lookup_name", &POA_IR::UnionDef::lookup_name_skel}, +- {"_get_version", &POA_IR::UnionDef::_get_version_skel}, +- {"_set_version", &POA_IR::UnionDef::_set_version_skel}, +- {"_get_discriminator_type", &POA_IR::UnionDef::_get_discriminator_type_skel}, +- {"_get_defined_in", &POA_IR::UnionDef::_get_defined_in_skel}, +- {"lookup", &POA_IR::UnionDef::lookup_skel}, +- {"_get_discriminator_type_def", &POA_IR::UnionDef::_get_discriminator_type_def_skel}, +- {"_set_discriminator_type_def", &POA_IR::UnionDef::_set_discriminator_type_def_skel}, +- {"_non_existent", &POA_IR::UnionDef::_non_existent_skel}, +- {"_get_containing_repository", &POA_IR::UnionDef::_get_containing_repository_skel}, +- {"create_enum", &POA_IR::UnionDef::create_enum_skel}, +- {"create_value", &POA_IR::UnionDef::create_value_skel}, +- {"create_module", &POA_IR::UnionDef::create_module_skel}, +- {"create_native", &POA_IR::UnionDef::create_native_skel}, +- {"create_interface", &POA_IR::UnionDef::create_interface_skel}, +- {"_get_members", &POA_IR::UnionDef::_get_members_skel}, +- {"_set_members", &POA_IR::UnionDef::_set_members_skel}, +- {"create_value_box", &POA_IR::UnionDef::create_value_box_skel}, +- {"create_union", &POA_IR::UnionDef::create_union_skel}, +- {"describe_contents", &POA_IR::UnionDef::describe_contents_skel}, +- {"create_exception", &POA_IR::UnionDef::create_exception_skel}, +- {"create_struct", &POA_IR::UnionDef::create_struct_skel}, +- {"create_constant", &POA_IR::UnionDef::create_constant_skel}, +- {"contents", &POA_IR::UnionDef::contents_skel}, +- {"create_alias", &POA_IR::UnionDef::create_alias_skel}, +- }; +- +- static const signed char lookup[] = +- { +- -1, -1, -6, -3, 4, 5, -1, -9, -2, -74, -70, 11, -1, -16, +- -2, 12, 13, -1, 14, -21, -2, 15, -76, 18, -1, 19, 20, -75, +- 23, -1, -1, 24, -1, -1, -27, -2, 25, 26, -71, -30, -2, 29, +- -70, -1, -1, -1, 32, 33, -1, -1, 34, 35, -1, 36, -1, 37, +- -1, -1, -1, -1, -1, -1, -1, 38, -1, -1, -1, 39, ++ {"",0},{"",0},{"",0},{"",0},{"",0}, ++ {"_is_a", &POA_IR::PrimitiveDef::_is_a_skel}, ++ {"",0}, ++ {"destroy", &POA_IR::PrimitiveDef::destroy_skel}, ++ {"",0}, ++ {"_get_kind", &POA_IR::PrimitiveDef::_get_kind_skel}, ++ {"",0},{"",0},{"",0}, ++ {"_get_def_kind", &POA_IR::PrimitiveDef::_get_def_kind_skel}, ++ {"_get_type", &POA_IR::PrimitiveDef::_get_type_skel}, ++ {"",0},{"",0},{"",0}, ++ {"_non_existent", &POA_IR::PrimitiveDef::_non_existent_skel}, + }; + + if (len <= MAX_WORD_LENGTH && len >= MIN_WORD_LENGTH) +@@ -13789,63 +9092,45 @@ + + if (key <= MAX_HASH_VALUE && key >= MIN_HASH_VALUE) + { +- int slot = lookup[key]; +- +- if (slot >= 0 && slot < MAX_HASH_VALUE) +- { +- const char *s = wordlist[slot].opname_; +- +- if (*str == *s && !strncmp (str + 1, s + 1, len - 1)) +- return &wordlist[slot]; +- } +- else if (slot < 0 && slot >= -MAX_HASH_VALUE) +- return 0; +- else +- { +- unsigned int offset = key + slot + (slot > 0 ? -MAX_HASH_VALUE : MAX_HASH_VALUE); +- const class TAO_operation_db_entry *base = &wordlist[-lookup[offset]]; +- const class TAO_operation_db_entry *ptr = base + -lookup[offset + 1]; ++ const char *s = wordlist[key].opname_; + +- while (--ptr >= base) +- if (*str == *ptr->opname_ && !strncmp (str + 1, ptr->opname_ + 1, len - 1)) +- return ptr; +- } ++ if (*str == *s && !strncmp (str + 1, s + 1, len - 1)) ++ return &wordlist[key]; + } } return 0; } --/* ending time is 18:47:28 */ -+/* ending time is 11:23:09 */ - static TAO_IR_UnionDef_Perfect_Hash_OpTable tao_IR_UnionDef_optable; - +-/* ending time is 16:31:12 */ +-static TAO_IR_UnionDef_Perfect_Hash_OpTable tao_IR_UnionDef_optable; - ++/* ending time is 11:23:10 */ ++static TAO_IR_PrimitiveDef_Perfect_Hash_OpTable tao_IR_PrimitiveDef_optable; + /////////////////////////////////////////////////////////////////////// // Strategized Proxy Broker Implementation // -@@ -13838,9 +13806,9 @@ + + // Factory function Implementation. +-POA_IR::_TAO_UnionDef_Strategized_Proxy_Broker *POA_IR::_TAO_UnionDef_Strategized_Proxy_Broker::the_TAO_UnionDef_Strategized_Proxy_Broker (void) ++POA_IR::_TAO_PrimitiveDef_Strategized_Proxy_Broker *POA_IR::_TAO_PrimitiveDef_Strategized_Proxy_Broker::the_TAO_PrimitiveDef_Strategized_Proxy_Broker (void) + { +- static POA_IR::_TAO_UnionDef_Strategized_Proxy_Broker strategized_proxy_broker; ++ static POA_IR::_TAO_PrimitiveDef_Strategized_Proxy_Broker strategized_proxy_broker; + return &strategized_proxy_broker; + } + +-POA_IR::_TAO_UnionDef_Strategized_Proxy_Broker::_TAO_UnionDef_Strategized_Proxy_Broker (void) ++POA_IR::_TAO_PrimitiveDef_Strategized_Proxy_Broker::_TAO_PrimitiveDef_Strategized_Proxy_Broker (void) + { + for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) + this->proxy_cache_[i] = 0; + + } + +-POA_IR::_TAO_UnionDef_Strategized_Proxy_Broker::~_TAO_UnionDef_Strategized_Proxy_Broker (void) ++POA_IR::_TAO_PrimitiveDef_Strategized_Proxy_Broker::~_TAO_PrimitiveDef_Strategized_Proxy_Broker (void) + { + for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) + delete this->proxy_cache_[i]; } -IR::_TAO_UnionDef_Proxy_Impl& -+_TAO_UnionDef_Proxy_Impl& - POA_IR::_TAO_UnionDef_Strategized_Proxy_Broker::select_proxy ( +-POA_IR::_TAO_UnionDef_Strategized_Proxy_Broker::select_proxy ( - ::IR::UnionDef *object, -+ IR_UnionDef *object, ++_TAO_PrimitiveDef_Proxy_Impl& ++POA_IR::_TAO_PrimitiveDef_Strategized_Proxy_Broker::select_proxy ( ++ IR_PrimitiveDef *object, CORBA::Environment &ACE_TRY_ENV ) { -@@ -13872,7 +13840,7 @@ +@@ -13863,7 +9148,7 @@ + } + + void +-POA_IR::_TAO_UnionDef_Strategized_Proxy_Broker::create_proxy ( ++POA_IR::_TAO_PrimitiveDef_Strategized_Proxy_Broker::create_proxy ( + TAO_ORB_Core::TAO_Collocation_Strategies strategy, + CORBA::Environment &ACE_TRY_ENV + ) +@@ -13877,7 +9162,7 @@ case TAO_ORB_Core::THRU_POA_STRATEGY: ACE_NEW_THROW_EX ( this->proxy_cache_[strategy], - POA_IR::_TAO_UnionDef_ThruPOA_Proxy_Impl, -+ _TAO_UnionDef_ThruPOA_Proxy_Impl, ++ _TAO_PrimitiveDef_ThruPOA_Proxy_Impl, CORBA::NO_MEMORY () ); ACE_CHECK; -@@ -13882,7 +13850,7 @@ +@@ -13887,7 +9172,7 @@ default: ACE_NEW_THROW_EX ( this->proxy_cache_[strategy], - ::IR::_TAO_UnionDef_Remote_Proxy_Impl, -+ _TAO_UnionDef_Remote_Proxy_Impl, ++ _TAO_PrimitiveDef_Remote_Proxy_Impl, CORBA::NO_MEMORY () ); ACE_CHECK; -@@ -13899,26 +13867,26 @@ +@@ -13904,38 +9189,41 @@ /////////////////////////////////////////////////////////////////////// -IR::_TAO_UnionDef_Proxy_Broker * -IR__TAO_UnionDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) -+_TAO_UnionDef_Proxy_Broker * -+_TAO_UnionDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) ++_TAO_PrimitiveDef_Proxy_Broker * ++_TAO_PrimitiveDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) { ACE_UNUSED_ARG (obj); - return ::POA_IR::_TAO_UnionDef_Strategized_Proxy_Broker::the_TAO_UnionDef_Strategized_Proxy_Broker(); +- return ::POA_IR::_TAO_UnionDef_Strategized_Proxy_Broker::the_TAO_UnionDef_Strategized_Proxy_Broker(); ++ return ::POA_IR::_TAO_PrimitiveDef_Strategized_Proxy_Broker::the_TAO_PrimitiveDef_Strategized_Proxy_Broker(); } int -IR__TAO_UnionDef_Proxy_Broker_Factory_Initializer (long _dummy_) -+_TAO_UnionDef_Proxy_Broker_Factory_Initializer (long _dummy_) ++_TAO_PrimitiveDef_Proxy_Broker_Factory_Initializer (long _dummy_) { ACE_UNUSED_ARG (_dummy_); - IR__TAO_UnionDef_Proxy_Broker_Factory_function_pointer = - IR__TAO_UnionDef_Proxy_Broker_Factory_function; -+ _TAO_UnionDef_Proxy_Broker_Factory_function_pointer = -+ _TAO_UnionDef_Proxy_Broker_Factory_function; ++ _TAO_PrimitiveDef_Proxy_Broker_Factory_function_pointer = ++ _TAO_PrimitiveDef_Proxy_Broker_Factory_function; return 0; } -static int IR__TAO_UnionDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = - IR__TAO_UnionDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, IR__TAO_UnionDef_Proxy_Broker_Factory_Initializer)); -+static int _TAO_UnionDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = -+ _TAO_UnionDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, _TAO_UnionDef_Proxy_Broker_Factory_Initializer)); ++static int _TAO_PrimitiveDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = ++ _TAO_PrimitiveDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, _TAO_PrimitiveDef_Proxy_Broker_Factory_Initializer)); /////////////////////////////////////////////////////////////////////// -@@ -13961,7 +13929,7 @@ - ); - } + // ThruPOA Proxy Implementation + // --IR::IDLType_ptr POA_IR::_TAO_UnionDef_ThruPOA_Proxy_Impl::discriminator_type_def ( -+IR_IDLType_ptr POA_IR::_TAO_UnionDef_ThruPOA_Proxy_Impl::discriminator_type_def ( +-POA_IR::_TAO_UnionDef_ThruPOA_Proxy_Impl::_TAO_UnionDef_ThruPOA_Proxy_Impl (void) ++POA_IR::_TAO_PrimitiveDef_ThruPOA_Proxy_Impl::_TAO_PrimitiveDef_ThruPOA_Proxy_Impl (void) ++{} ++ ++POA_IR::_TAO_PrimitiveDef_ThruPOA_Proxy_Impl::~_TAO_PrimitiveDef_ThruPOA_Proxy_Impl (void) + {} + + // ThruPOA Implementation of the IDL interface methods + +-CORBA::TypeCode_ptr POA_IR::_TAO_UnionDef_ThruPOA_Proxy_Impl::discriminator_type ( ++IR::PrimitiveKind POA_IR::_TAO_PrimitiveDef_ThruPOA_Proxy_Impl::kind ( CORBA_Object *_collocated_tao_target_, CORBA::Environment &ACE_TRY_ENV ) -@@ -13969,7 +13937,7 @@ +@@ -13943,7 +9231,7 @@ CORBA::SystemException )) { -- IR::IDLType_var _tao_retval; -+ IR_IDLType_var _tao_retval; +- CORBA::TypeCode_var _tao_retval; ++ IR_PrimitiveKind _tao_retval; ACE_UNUSED_ARG (_tao_retval); TAO_Object_Adapter::Servant_Upcall servant_upcall ( _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -13994,7 +13962,7 @@ +@@ -13951,617 +9239,115 @@ + CORBA::Object_var forward_to; + servant_upcall.prepare_for_upcall ( + _collocated_tao_target_->_object_key (), +- "discriminator_type", ++ "kind", + forward_to.out (), + ACE_TRY_ENV + ); +- ACE_CHECK_RETURN (0); ++ ACE_CHECK_RETURN (_tao_retval); + return ACE_reinterpret_cast ( +- POA_IR::UnionDef_ptr, ++ POA_IR::PrimitiveDef_ptr, + servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/UnionDef:1.0" ++ "IDL:omg.org/IR/PrimitiveDef:1.0" + ) +- )->discriminator_type ( ++ )->kind ( + ACE_TRY_ENV + ); + } - void POA_IR::_TAO_UnionDef_ThruPOA_Proxy_Impl::discriminator_type_def ( - CORBA_Object *_collocated_tao_target_, +-IR::IDLType_ptr POA_IR::_TAO_UnionDef_ThruPOA_Proxy_Impl::discriminator_type_def ( +- CORBA_Object *_collocated_tao_target_, +- CORBA::Environment &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) ++// ++// End ThruPOA Proxy Implementation ++/////////////////////////////////////////////////////////////////////// ++ ++// skeleton constructor ++POA_IR::PrimitiveDef::PrimitiveDef (void) + { +- IR::IDLType_var _tao_retval; +- ACE_UNUSED_ARG (_tao_retval); +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "discriminator_type_def", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK_RETURN (0); +- return ACE_reinterpret_cast ( +- POA_IR::UnionDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/UnionDef:1.0" +- ) +- )->discriminator_type_def ( +- ACE_TRY_ENV +- ); ++ this->optable_ = &tao_IR_PrimitiveDef_optable; + } + +-void POA_IR::_TAO_UnionDef_ThruPOA_Proxy_Impl::discriminator_type_def ( +- CORBA_Object *_collocated_tao_target_, - IR::IDLType_ptr discriminator_type_def, -+ IR_IDLType_ptr discriminator_type_def, - CORBA::Environment &ACE_TRY_ENV - ) - ACE_THROW_SPEC (( -@@ -14024,7 +13992,7 @@ - return; +- CORBA::Environment &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) ++// copy ctor ++POA_IR::PrimitiveDef::PrimitiveDef (const PrimitiveDef& rhs) ++ : ACE_NESTED_CLASS (POA_IR,IDLType) (rhs), ++ POA_CORBA_IRObject (rhs), ++ TAO_ServantBase (rhs) ++{} ++ ++// skeleton destructor ++POA_IR::PrimitiveDef::~PrimitiveDef (void) + { +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "discriminator_type_def", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK; +- ACE_reinterpret_cast ( +- POA_IR::UnionDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/UnionDef:1.0" +- ) +- )->discriminator_type_def ( +- discriminator_type_def, +- ACE_TRY_ENV +- ); +- return; } -IR::UnionMemberSeq * POA_IR::_TAO_UnionDef_ThruPOA_Proxy_Impl::members ( -+IR_UnionMemberSeq * POA_IR::_TAO_UnionDef_ThruPOA_Proxy_Impl::members ( - CORBA_Object *_collocated_tao_target_, +- CORBA_Object *_collocated_tao_target_, ++void POA_IR::PrimitiveDef::_get_kind_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, CORBA::Environment &ACE_TRY_ENV - ) -@@ -14032,7 +14000,7 @@ - CORBA::SystemException - )) +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) ++) { - IR::UnionMemberSeq_var _tao_retval; -+ IR_UnionMemberSeq_var _tao_retval; - ACE_UNUSED_ARG (_tao_retval); - TAO_Object_Adapter::Servant_Upcall servant_upcall ( - _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -14057,7 +14025,7 @@ +- ACE_UNUSED_ARG (_tao_retval); +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "members", +- forward_to.out (), ++ POA_IR::PrimitiveDef *_tao_impl = (POA_IR::PrimitiveDef *)_tao_object_reference; ++ ++ IR_PrimitiveKind _tao_retval; ++ ++ _tao_retval = _tao_impl->kind ( + ACE_TRY_ENV + ); +- ACE_CHECK_RETURN (0); +- return ACE_reinterpret_cast ( +- POA_IR::UnionDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/UnionDef:1.0" +- ) +- )->members ( +- ACE_TRY_ENV +- ); ++ ++ ACE_CHECK; ++ ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!( ++ (_tao_out << _tao_retval) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + } - void POA_IR::_TAO_UnionDef_ThruPOA_Proxy_Impl::members ( - CORBA_Object *_collocated_tao_target_, +-void POA_IR::_TAO_UnionDef_ThruPOA_Proxy_Impl::members ( +- CORBA_Object *_collocated_tao_target_, - const IR::UnionMemberSeq & members, -+ const IR_UnionMemberSeq & members, - CORBA::Environment &ACE_TRY_ENV - ) - ACE_THROW_SPEC (( -@@ -14103,7 +14071,7 @@ - ACE_NESTED_CLASS (POA_IR,Container) (rhs), - ACE_NESTED_CLASS (POA_IR,Contained) (rhs), - ACE_NESTED_CLASS (POA_IR,IDLType) (rhs), +- CORBA::Environment &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) +-{ +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "members", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK; +- ACE_reinterpret_cast ( +- POA_IR::UnionDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/UnionDef:1.0" +- ) +- )->members ( +- members, +- ACE_TRY_ENV +- ); +- return; +-} +- +-// +-// End ThruPOA Proxy Implementation +-/////////////////////////////////////////////////////////////////////// +- +-// skeleton constructor +-POA_IR::UnionDef::UnionDef (void) +-{ +- this->optable_ = &tao_IR_UnionDef_optable; +-} +- +-// copy ctor +-POA_IR::UnionDef::UnionDef (const UnionDef& rhs) +- : ACE_NESTED_CLASS (POA_IR,TypedefDef) (rhs), +- ACE_NESTED_CLASS (POA_IR,Container) (rhs), +- ACE_NESTED_CLASS (POA_IR,Contained) (rhs), +- ACE_NESTED_CLASS (POA_IR,IDLType) (rhs), - ACE_NESTED_CLASS (POA_CORBA,IRObject) (rhs), -+ POA_CORBA_IRObject (rhs), - TAO_ServantBase (rhs) - {} - -@@ -14201,7 +14169,7 @@ - { - POA_IR::UnionDef *_tao_impl = (POA_IR::UnionDef *)_tao_object_reference; - -- IR::IDLType_var _tao_retval; -+ IR_IDLType_var _tao_retval; - - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( -@@ -14228,7 +14196,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::IDLType_ptr _tao_retval_info = _tao_retval._retn (); -+ IR_IDLType_ptr _tao_retval_info = _tao_retval._retn (); - ri.result (_tao_retval_info); - _tao_retval = _tao_retval_info; - ri.reply_status (PortableInterceptor::SUCCESSFUL); -@@ -14282,14 +14250,12 @@ - TAO_InputCDR &_tao_in = _tao_server_request.incoming (); - POA_IR::UnionDef *_tao_impl = (POA_IR::UnionDef *)_tao_object_reference; - -- _tao_server_request.argument_flag (0); +- TAO_ServantBase (rhs) +-{} +- +-// skeleton destructor +-POA_IR::UnionDef::~UnionDef (void) +-{ +-} +- +-void POA_IR::UnionDef::_get_discriminator_type_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- POA_IR::UnionDef *_tao_impl = (POA_IR::UnionDef *)_tao_object_reference; +- +- CORBA::TypeCode_var _tao_retval; +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::UnionDef::TAO_ServerRequestInfo_IR_UnionDef_discriminator_type_get ri ( +- _tao_server_request, +- _tao_impl +- , +- ACE_TRY_ENV +- ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->discriminator_type ( +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- CORBA::TypeCode_ptr _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << _tao_retval.in ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- +-} +- +-void POA_IR::UnionDef::_get_discriminator_type_def_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- POA_IR::UnionDef *_tao_impl = (POA_IR::UnionDef *)_tao_object_reference; +- +- IR::IDLType_var _tao_retval; +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::UnionDef::TAO_ServerRequestInfo_IR_UnionDef_discriminator_type_def_get ri ( +- _tao_server_request, +- _tao_impl +- , +- ACE_TRY_ENV +- ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->discriminator_type_def ( +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::IDLType_ptr _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << _tao_retval.in ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- +-} +- +-void POA_IR::UnionDef::_set_discriminator_type_def_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::UnionDef *_tao_impl = (POA_IR::UnionDef *)_tao_object_reference; +- +-_tao_server_request.argument_flag (0); - IR::IDLType_var discriminator_type_def; -+ IR_IDLType_var discriminator_type_def; - if (!( - (_tao_in >> discriminator_type_def.out ()) - )) - ACE_THROW (CORBA::MARSHAL()); - +- if (!( +- (_tao_in >> discriminator_type_def.out ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); - - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( - _tao_server_request.orb_core ()->server_request_interceptors (), -@@ -14360,7 +14326,7 @@ - { - POA_IR::UnionDef *_tao_impl = (POA_IR::UnionDef *)_tao_object_reference; - -- IR::UnionMemberSeq_var _tao_retval; -+ IR_UnionMemberSeq_var _tao_retval; - - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( -@@ -14387,7 +14353,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::UnionMemberSeq * _tao_retval_info = _tao_retval._retn (); -+ IR_UnionMemberSeq * _tao_retval_info = _tao_retval._retn (); - ri.result (_tao_retval_info); - _tao_retval = _tao_retval_info; - ri.reply_status (PortableInterceptor::SUCCESSFUL); -@@ -14441,14 +14407,12 @@ - TAO_InputCDR &_tao_in = _tao_server_request.incoming (); - POA_IR::UnionDef *_tao_impl = (POA_IR::UnionDef *)_tao_object_reference; - -- _tao_server_request.argument_flag (0); +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::UnionDef::TAO_ServerRequestInfo_IR_UnionDef_discriminator_type_def_set ri ( +- _tao_server_request, +- _tao_impl +- , +- discriminator_type_def.in (), +- ACE_TRY_ENV +- ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- +- _tao_impl->discriminator_type_def ( +- discriminator_type_def.in (), +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +-} +- +-void POA_IR::UnionDef::_get_members_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- POA_IR::UnionDef *_tao_impl = (POA_IR::UnionDef *)_tao_object_reference; +- +- IR::UnionMemberSeq_var _tao_retval; +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::UnionDef::TAO_ServerRequestInfo_IR_UnionDef_members_get ri ( +- _tao_server_request, +- _tao_impl +- , +- ACE_TRY_ENV +- ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->members ( +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::UnionMemberSeq * _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << _tao_retval.in ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- +-} +- +-void POA_IR::UnionDef::_set_members_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::UnionDef *_tao_impl = (POA_IR::UnionDef *)_tao_object_reference; +- +-_tao_server_request.argument_flag (0); - IR::UnionMemberSeq members; -+ IR_UnionMemberSeq members; - if (!( - (_tao_in >> members) - )) - ACE_THROW (CORBA::MARSHAL()); - +- if (!( +- (_tao_in >> members) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::UnionDef::TAO_ServerRequestInfo_IR_UnionDef_members_set ri ( +- _tao_server_request, +- _tao_impl +- , +- members, +- ACE_TRY_ENV +- ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- - - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( - _tao_server_request.orb_core ()->server_request_interceptors (), -@@ -14521,7 +14485,7 @@ - POA_IR::UnionDef *_tao_impl = (POA_IR::UnionDef *) _tao_object_reference; +- _tao_impl->members ( +- members, +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +-} +- +-void POA_IR::UnionDef::_is_a_skel ( +- TAO_ServerRequest &_tao_server_request, +- void * _tao_object_reference, +- void * /* context */, ++void POA_IR::PrimitiveDef::_is_a_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void * _tao_object_reference, ++ void * /* context */, + CORBA::Environment &ACE_TRY_ENV + ) + { + TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::UnionDef *_tao_impl = (POA_IR::UnionDef *) _tao_object_reference; ++ POA_IR::PrimitiveDef *_tao_impl = (POA_IR::PrimitiveDef *) _tao_object_reference; CORBA::Boolean _tao_retval = 0; CORBA::String_var value; - if (!(_tao_in >> value.out ())) + if (!((_tao_in >> value.out ()))) ACE_THROW (CORBA::MARSHAL ()); - +- ++ _tao_retval = _tao_impl->_is_a (value.in (), ACE_TRY_ENV); -@@ -14529,7 +14493,7 @@ - + ACE_CHECK; +- ++ _tao_server_request.init_reply (); TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); - if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) @@ -3780,8 +18692,21 @@ ACE_THROW (CORBA::MARSHAL ()); } -@@ -14546,7 +14510,7 @@ - +-void POA_IR::UnionDef::_non_existent_skel ( +- TAO_ServerRequest &_tao_server_request, ++void POA_IR::PrimitiveDef::_non_existent_skel ( ++ TAO_ServerRequest &_tao_server_request, + void * _tao_object_reference, + void * /* context */, + CORBA::Environment &ACE_TRY_ENV + ) + { +- POA_IR::UnionDef *_tao_impl = (POA_IR::UnionDef *) _tao_object_reference; ++ POA_IR::PrimitiveDef *_tao_impl = (POA_IR::PrimitiveDef *) _tao_object_reference; + CORBA::Boolean _tao_retval = _tao_impl->_non_existent (ACE_TRY_ENV); + ACE_CHECK; +- ++ _tao_server_request.init_reply (); TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); - if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) @@ -3789,7 +18714,40 @@ ACE_THROW (CORBA::MARSHAL ()); } -@@ -14583,7 +14547,7 @@ +-CORBA::Boolean POA_IR::UnionDef::_is_a ( ++CORBA::Boolean POA_IR::PrimitiveDef::_is_a ( + const char* value, + CORBA::Environment &ACE_TRY_ENV + ) + { + if ( +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/UnionDef:1.0")) || +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/TypedefDef:1.0")) || +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/Container:1.0")) || +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/Contained:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/PrimitiveDef:1.0")) || + (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/IDLType:1.0")) || + (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/CORBA/IRObject:1.0")) || + (!ACE_OS::strcmp ((char *)value, CORBA::_tc_Object->id (ACE_TRY_ENV)))) +@@ -14570,39 +9356,33 @@ + return 0; + } + +-void* POA_IR::UnionDef::_downcast ( ++void* POA_IR::PrimitiveDef::_downcast ( + const char* logical_type_id + ) + { +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/UnionDef:1.0") == 0) +- return ACE_static_cast (POA_IR::UnionDef_ptr, this); +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/TypedefDef:1.0") == 0) +- return ACE_static_cast (POA_IR::TypedefDef_ptr, this); +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Container:1.0") == 0) +- return ACE_static_cast (POA_IR::Container_ptr, this); +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Contained:1.0") == 0) +- return ACE_static_cast (POA_IR::Contained_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/PrimitiveDef:1.0") == 0) ++ return ACE_static_cast (POA_IR::PrimitiveDef_ptr, this); if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/IDLType:1.0") == 0) return ACE_static_cast (POA_IR::IDLType_ptr, this); if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/IRObject:1.0") == 0) @@ -3798,201 +18756,1011 @@ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/Object:1.0") == 0) return ACE_static_cast(PortableServer::Servant, this); return 0; -@@ -14613,10 +14577,9 @@ + } + +-void POA_IR::UnionDef::_dispatch (TAO_ServerRequest &req, void *context, CORBA::Environment &ACE_TRY_ENV) ++void POA_IR::PrimitiveDef::_dispatch (TAO_ServerRequest &req, void *context, CORBA::Environment &ACE_TRY_ENV) + { + this->synchronous_upcall_dispatch(req, context, this, ACE_TRY_ENV); + } + +-const char* POA_IR::UnionDef::_interface_repository_id (void) const ++const char* POA_IR::PrimitiveDef::_interface_repository_id (void) const + { +- return "IDL:omg.org/IR/UnionDef:1.0"; ++ return "IDL:omg.org/IR/PrimitiveDef:1.0"; + } + +-IR::UnionDef* +-POA_IR::UnionDef::_this (CORBA_Environment &ACE_TRY_ENV) ++IR::PrimitiveDef* ++POA_IR::PrimitiveDef::_this (CORBA_Environment &ACE_TRY_ENV) + { + TAO_Stub *stub = this->_create_stub (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); +@@ -14615,493 +9395,100 @@ ACE_NEW_RETURN (tmp, CORBA::Object (stub, 0, this), 0); CORBA::Object_var obj = tmp; - return ::IR::UnionDef::_unchecked_narrow (obj.in ()); -+ return IR_UnionDef::_unchecked_narrow (obj.in ()); +-} +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +-POA_IR::UnionDef::TAO_ServerRequestInfo_IR_UnionDef_discriminator_type_get::TAO_ServerRequestInfo_IR_UnionDef_discriminator_type_get ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::UnionDef *tao_impl +- , +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl) +-{} +- +-Dynamic::ParameterList * +-POA_IR::UnionDef::TAO_ServerRequestInfo_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 * +-POA_IR::UnionDef::TAO_ServerRequestInfo_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; ++ return IR_PrimitiveDef::_unchecked_narrow (obj.in ()); } +-CORBA::Any * +-POA_IR::UnionDef::TAO_ServerRequestInfo_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 (); +-} - - #if (TAO_HAS_INTERCEPTORS == 1) - POA_IR::UnionDef::TAO_ServerRequestInfo_IR_UnionDef_discriminator_type_get::TAO_ServerRequestInfo_IR_UnionDef_discriminator_type_get ( - TAO_ServerRequest &_tao_server_request, -@@ -14771,7 +14734,7 @@ - POA_IR::UnionDef::TAO_ServerRequestInfo_IR_UnionDef_discriminator_type_def_set::TAO_ServerRequestInfo_IR_UnionDef_discriminator_type_def_set ( - TAO_ServerRequest &_tao_server_request, - POA_IR::UnionDef *tao_impl, +-char * +-POA_IR::UnionDef::TAO_ServerRequestInfo_IR_UnionDef_discriminator_type_get::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::UnionDef::TAO_ServerRequestInfo_IR_UnionDef_discriminator_type_get::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-void +-POA_IR::UnionDef::TAO_ServerRequestInfo_IR_UnionDef_discriminator_type_get::result (CORBA::TypeCode_ptr result) +-{ +- // Update the result. +- this->_result = result; +-} +- +-POA_IR::UnionDef::TAO_ServerRequestInfo_IR_UnionDef_discriminator_type_def_get::TAO_ServerRequestInfo_IR_UnionDef_discriminator_type_def_get ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::UnionDef *tao_impl +- , +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl) +-{} +- +-Dynamic::ParameterList * +-POA_IR::UnionDef::TAO_ServerRequestInfo_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 * +-POA_IR::UnionDef::TAO_ServerRequestInfo_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 * +-POA_IR::UnionDef::TAO_ServerRequestInfo_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 (); +-} +- +-char * +-POA_IR::UnionDef::TAO_ServerRequestInfo_IR_UnionDef_discriminator_type_def_get::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::UnionDef::TAO_ServerRequestInfo_IR_UnionDef_discriminator_type_def_get::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-void +-POA_IR::UnionDef::TAO_ServerRequestInfo_IR_UnionDef_discriminator_type_def_get::result (IR::IDLType_ptr result) +-{ +- // Update the result. +- this->_result = result; +-} +- +-POA_IR::UnionDef::TAO_ServerRequestInfo_IR_UnionDef_discriminator_type_def_set::TAO_ServerRequestInfo_IR_UnionDef_discriminator_type_def_set ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::UnionDef *tao_impl +- , - IR::IDLType_ptr discriminator_type_def, -+ IR_IDLType_ptr discriminator_type_def, - CORBA::Environment & - ) - : TAO_ServerRequestInfo (_tao_server_request), -@@ -14920,7 +14883,7 @@ - POA_IR::UnionDef::TAO_ServerRequestInfo_IR_UnionDef_members_set::TAO_ServerRequestInfo_IR_UnionDef_members_set ( - TAO_ServerRequest &_tao_server_request, - POA_IR::UnionDef *tao_impl, +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- discriminator_type_def_ (discriminator_type_def) +-{} +- +-Dynamic::ParameterList * +-POA_IR::UnionDef::TAO_ServerRequestInfo_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 * +-POA_IR::UnionDef::TAO_ServerRequestInfo_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 * +-POA_IR::UnionDef::TAO_ServerRequestInfo_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; +-} +- +-char * +-POA_IR::UnionDef::TAO_ServerRequestInfo_IR_UnionDef_discriminator_type_def_set::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::UnionDef::TAO_ServerRequestInfo_IR_UnionDef_discriminator_type_def_set::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-POA_IR::UnionDef::TAO_ServerRequestInfo_IR_UnionDef_members_get::TAO_ServerRequestInfo_IR_UnionDef_members_get ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::UnionDef *tao_impl +- , +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl) +-{} +- +-Dynamic::ParameterList * +-POA_IR::UnionDef::TAO_ServerRequestInfo_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 * +-POA_IR::UnionDef::TAO_ServerRequestInfo_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 * +-POA_IR::UnionDef::TAO_ServerRequestInfo_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 (); +-} +- +-char * +-POA_IR::UnionDef::TAO_ServerRequestInfo_IR_UnionDef_members_get::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::UnionDef::TAO_ServerRequestInfo_IR_UnionDef_members_get::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-void +-POA_IR::UnionDef::TAO_ServerRequestInfo_IR_UnionDef_members_get::result (IR::UnionMemberSeq * result) +-{ +- // Update the result. +- this->_result = result; +-} +- +-POA_IR::UnionDef::TAO_ServerRequestInfo_IR_UnionDef_members_set::TAO_ServerRequestInfo_IR_UnionDef_members_set ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::UnionDef *tao_impl +- , - const IR::UnionMemberSeq & members, -+ const IR_UnionMemberSeq & members, - CORBA::Environment & - ) - : TAO_ServerRequestInfo (_tao_server_request), -@@ -14992,6 +14955,7 @@ - } - - #endif /* TAO_HAS_INTERCEPTORS */ -+ - class TAO_IR_EnumDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- members_ (members) +-{} +- +-Dynamic::ParameterList * +-POA_IR::UnionDef::TAO_ServerRequestInfo_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 * +-POA_IR::UnionDef::TAO_ServerRequestInfo_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 * +-POA_IR::UnionDef::TAO_ServerRequestInfo_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; +-} +- +-char * +-POA_IR::UnionDef::TAO_ServerRequestInfo_IR_UnionDef_members_set::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::UnionDef::TAO_ServerRequestInfo_IR_UnionDef_members_set::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-#endif /* TAO_HAS_INTERCEPTORS */ +-class TAO_IR_EnumDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable ++class TAO_IR_StringDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable { private: -@@ -14999,7 +14963,7 @@ + unsigned int hash (const char *str, unsigned int len); public: const TAO_operation_db_entry * lookup (const char *str, unsigned int len); }; --/* starting time is 18:47:28 */ +-/* starting time is 16:31:12 */ +/* starting time is 11:23:10 */ /* C++ code produced by gperf version 2.8 (ACE version) */ - /* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_EnumDef_Perfect_Hash_OpTable -N lookup */ +-/* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_EnumDef_Perfect_Hash_OpTable -N lookup */ ++/* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_StringDef_Perfect_Hash_OpTable -N lookup */ unsigned int -@@ -15128,10 +15092,9 @@ +-TAO_IR_EnumDef_Perfect_Hash_OpTable::hash (const char *str, unsigned int len) ++TAO_IR_StringDef_Perfect_Hash_OpTable::hash (const char *str, unsigned int len) + { + static const unsigned char asso_values[] = + { + #if defined (ACE_MVS) +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 0, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 0, +- 37, 37, 0, 0, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 0, 0, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 10, 10, 37, 37, 37, 37, 10, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 0, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 0, ++ 19, 19, 0, 0, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 5, 19, 19, 19, 19, 0, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, + #else +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 0, 37, 0, 37, 37, +- 0, 0, 37, 37, 37, 37, 37, 37, 37, 0, +- 0, 37, 37, 37, 37, 10, 10, 37, 37, 37, +- 37, 10, 37, 37, 37, 37, 37, 37, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 0, 19, 0, 19, 19, ++ 0, 0, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 5, 19, 19, 19, ++ 19, 0, 19, 19, 19, 19, 19, 19, + #endif /* ACE_MVS */ + }; + return len + asso_values[str[len - 1]] + asso_values[str[0]]; + } + + const class TAO_operation_db_entry * +-TAO_IR_EnumDef_Perfect_Hash_OpTable::lookup (const char *str, unsigned int len) ++TAO_IR_StringDef_Perfect_Hash_OpTable::lookup (const char *str, unsigned int len) + { + enum + { +- TOTAL_KEYWORDS = 18, +- MIN_WORD_LENGTH = 4, +- MAX_WORD_LENGTH = 26, +- MIN_HASH_VALUE = 4, +- MAX_HASH_VALUE = 36, +- HASH_VALUE_RANGE = 33, +- DUPLICATES = 6 ++ TOTAL_KEYWORDS = 7, ++ MIN_WORD_LENGTH = 5, ++ MAX_WORD_LENGTH = 13, ++ MIN_HASH_VALUE = 5, ++ MAX_HASH_VALUE = 18, ++ HASH_VALUE_RANGE = 14, ++ DUPLICATES = 2 + }; + + static const class TAO_operation_db_entry wordlist[] = + { +- {"",0},{"",0},{"",0},{"",0}, +- {"move", &POA_IR::EnumDef::move_skel}, +- {"_is_a", &POA_IR::EnumDef::_is_a_skel}, +- {"_get_id", &POA_IR::EnumDef::_get_id_skel}, +- {"_set_id", &POA_IR::EnumDef::_set_id_skel}, +- {"describe", &POA_IR::EnumDef::describe_skel}, +- {"_get_name", &POA_IR::EnumDef::_get_name_skel}, +- {"_get_type", &POA_IR::EnumDef::_get_type_skel}, +- {"_set_name", &POA_IR::EnumDef::_set_name_skel}, +- {"_get_version", &POA_IR::EnumDef::_get_version_skel}, +- {"_set_version", &POA_IR::EnumDef::_set_version_skel}, +- {"_get_def_kind", &POA_IR::EnumDef::_get_def_kind_skel}, +- {"_get_defined_in", &POA_IR::EnumDef::_get_defined_in_skel}, +- {"destroy", &POA_IR::EnumDef::destroy_skel}, +- {"_get_absolute_name", &POA_IR::EnumDef::_get_absolute_name_skel}, +- {"_get_members", &POA_IR::EnumDef::_get_members_skel}, +- {"_set_members", &POA_IR::EnumDef::_set_members_skel}, +- {"_non_existent", &POA_IR::EnumDef::_non_existent_skel}, +- {"_get_containing_repository", &POA_IR::EnumDef::_get_containing_repository_skel}, ++ {"",0},{"",0},{"",0},{"",0},{"",0}, ++ {"_is_a", &POA_IR::StringDef::_is_a_skel}, ++ {"destroy", &POA_IR::StringDef::destroy_skel}, ++ {"_get_type", &POA_IR::StringDef::_get_type_skel}, ++ {"_get_bound", &POA_IR::StringDef::_get_bound_skel}, ++ {"_set_bound", &POA_IR::StringDef::_set_bound_skel}, ++ {"_get_def_kind", &POA_IR::StringDef::_get_def_kind_skel}, ++ {"_non_existent", &POA_IR::StringDef::_non_existent_skel}, + }; + + static const signed char lookup[] = + { +- -6, -2, -9, -3, 4, 5, -1, -43, 8, -43, -12, -2, -38, 14, +- -1, 15, -1, 16, 17, -1, -18, -2, -38, 20, -1, -1, -1, -1, +- -1, -1, -1, -1, -1, -1, -1, -1, 21, ++ -1, -1, -1, -8, -2, 5, -1, 6, -1, 7, -25, -1, -1, 10, ++ -1, -1, -1, -1, 11, + }; + + if (len <= MAX_WORD_LENGTH && len >= MIN_WORD_LENGTH) +@@ -15135,38 +9522,37 @@ } return 0; } --/* ending time is 18:47:28 */ +-/* ending time is 16:31:12 */ +-static TAO_IR_EnumDef_Perfect_Hash_OpTable tao_IR_EnumDef_optable; +- +/* ending time is 11:23:10 */ - static TAO_IR_EnumDef_Perfect_Hash_OpTable tao_IR_EnumDef_optable; ++static TAO_IR_StringDef_Perfect_Hash_OpTable tao_IR_StringDef_optable; -- /////////////////////////////////////////////////////////////////////// // Strategized Proxy Broker Implementation // -@@ -15157,9 +15120,9 @@ + + // Factory function Implementation. +-POA_IR::_TAO_EnumDef_Strategized_Proxy_Broker *POA_IR::_TAO_EnumDef_Strategized_Proxy_Broker::the_TAO_EnumDef_Strategized_Proxy_Broker (void) ++POA_IR::_TAO_StringDef_Strategized_Proxy_Broker *POA_IR::_TAO_StringDef_Strategized_Proxy_Broker::the_TAO_StringDef_Strategized_Proxy_Broker (void) + { +- static POA_IR::_TAO_EnumDef_Strategized_Proxy_Broker strategized_proxy_broker; ++ static POA_IR::_TAO_StringDef_Strategized_Proxy_Broker strategized_proxy_broker; + return &strategized_proxy_broker; + } + +-POA_IR::_TAO_EnumDef_Strategized_Proxy_Broker::_TAO_EnumDef_Strategized_Proxy_Broker (void) ++POA_IR::_TAO_StringDef_Strategized_Proxy_Broker::_TAO_StringDef_Strategized_Proxy_Broker (void) + { + for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) + this->proxy_cache_[i] = 0; + + } + +-POA_IR::_TAO_EnumDef_Strategized_Proxy_Broker::~_TAO_EnumDef_Strategized_Proxy_Broker (void) ++POA_IR::_TAO_StringDef_Strategized_Proxy_Broker::~_TAO_StringDef_Strategized_Proxy_Broker (void) + { + for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) + delete this->proxy_cache_[i]; } -IR::_TAO_EnumDef_Proxy_Impl& -+_TAO_EnumDef_Proxy_Impl& - POA_IR::_TAO_EnumDef_Strategized_Proxy_Broker::select_proxy ( +-POA_IR::_TAO_EnumDef_Strategized_Proxy_Broker::select_proxy ( - ::IR::EnumDef *object, -+ IR_EnumDef *object, ++_TAO_StringDef_Proxy_Impl& ++POA_IR::_TAO_StringDef_Strategized_Proxy_Broker::select_proxy ( ++ IR_StringDef *object, CORBA::Environment &ACE_TRY_ENV ) { -@@ -15191,7 +15154,7 @@ +@@ -15184,7 +9570,7 @@ + } + + void +-POA_IR::_TAO_EnumDef_Strategized_Proxy_Broker::create_proxy ( ++POA_IR::_TAO_StringDef_Strategized_Proxy_Broker::create_proxy ( + TAO_ORB_Core::TAO_Collocation_Strategies strategy, + CORBA::Environment &ACE_TRY_ENV + ) +@@ -15198,7 +9584,7 @@ case TAO_ORB_Core::THRU_POA_STRATEGY: ACE_NEW_THROW_EX ( this->proxy_cache_[strategy], - POA_IR::_TAO_EnumDef_ThruPOA_Proxy_Impl, -+ _TAO_EnumDef_ThruPOA_Proxy_Impl, ++ _TAO_StringDef_ThruPOA_Proxy_Impl, CORBA::NO_MEMORY () ); ACE_CHECK; -@@ -15201,7 +15164,7 @@ +@@ -15208,7 +9594,7 @@ default: ACE_NEW_THROW_EX ( this->proxy_cache_[strategy], - ::IR::_TAO_EnumDef_Remote_Proxy_Impl, -+ _TAO_EnumDef_Remote_Proxy_Impl, ++ _TAO_StringDef_Remote_Proxy_Impl, CORBA::NO_MEMORY () ); ACE_CHECK; -@@ -15218,26 +15181,26 @@ +@@ -15225,38 +9611,41 @@ /////////////////////////////////////////////////////////////////////// -IR::_TAO_EnumDef_Proxy_Broker * -IR__TAO_EnumDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) -+_TAO_EnumDef_Proxy_Broker * -+_TAO_EnumDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) ++_TAO_StringDef_Proxy_Broker * ++_TAO_StringDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) { ACE_UNUSED_ARG (obj); - return ::POA_IR::_TAO_EnumDef_Strategized_Proxy_Broker::the_TAO_EnumDef_Strategized_Proxy_Broker(); +- return ::POA_IR::_TAO_EnumDef_Strategized_Proxy_Broker::the_TAO_EnumDef_Strategized_Proxy_Broker(); ++ return ::POA_IR::_TAO_StringDef_Strategized_Proxy_Broker::the_TAO_StringDef_Strategized_Proxy_Broker(); } int -IR__TAO_EnumDef_Proxy_Broker_Factory_Initializer (long _dummy_) -+_TAO_EnumDef_Proxy_Broker_Factory_Initializer (long _dummy_) ++_TAO_StringDef_Proxy_Broker_Factory_Initializer (long _dummy_) { ACE_UNUSED_ARG (_dummy_); - IR__TAO_EnumDef_Proxy_Broker_Factory_function_pointer = - IR__TAO_EnumDef_Proxy_Broker_Factory_function; -+ _TAO_EnumDef_Proxy_Broker_Factory_function_pointer = -+ _TAO_EnumDef_Proxy_Broker_Factory_function; ++ _TAO_StringDef_Proxy_Broker_Factory_function_pointer = ++ _TAO_StringDef_Proxy_Broker_Factory_function; return 0; } -static int IR__TAO_EnumDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = - IR__TAO_EnumDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, IR__TAO_EnumDef_Proxy_Broker_Factory_Initializer)); -+static int _TAO_EnumDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = -+ _TAO_EnumDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, _TAO_EnumDef_Proxy_Broker_Factory_Initializer)); ++static int _TAO_StringDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = ++ _TAO_StringDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, _TAO_StringDef_Proxy_Broker_Factory_Initializer)); /////////////////////////////////////////////////////////////////////// -@@ -15257,7 +15220,7 @@ + // ThruPOA Proxy Implementation + // + +-POA_IR::_TAO_EnumDef_ThruPOA_Proxy_Impl::_TAO_EnumDef_ThruPOA_Proxy_Impl (void) ++POA_IR::_TAO_StringDef_ThruPOA_Proxy_Impl::_TAO_StringDef_ThruPOA_Proxy_Impl (void) ++{} ++ ++POA_IR::_TAO_StringDef_ThruPOA_Proxy_Impl::~_TAO_StringDef_ThruPOA_Proxy_Impl (void) + {} + + // ThruPOA Implementation of the IDL interface methods + +-IR::EnumMemberSeq * POA_IR::_TAO_EnumDef_ThruPOA_Proxy_Impl::members ( ++CORBA::ULong POA_IR::_TAO_StringDef_ThruPOA_Proxy_Impl::bound ( + CORBA_Object *_collocated_tao_target_, + CORBA::Environment &ACE_TRY_ENV + ) +@@ -15264,7 +9653,7 @@ CORBA::SystemException )) { - IR::EnumMemberSeq_var _tao_retval; -+ IR_EnumMemberSeq_var _tao_retval; ++ CORBA::ULong _tao_retval = 0; ACE_UNUSED_ARG (_tao_retval); TAO_Object_Adapter::Servant_Upcall servant_upcall ( _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -15282,7 +15245,7 @@ +@@ -15272,24 +9661,24 @@ + CORBA::Object_var forward_to; + servant_upcall.prepare_for_upcall ( + _collocated_tao_target_->_object_key (), +- "members", ++ "bound", + forward_to.out (), + ACE_TRY_ENV + ); +- ACE_CHECK_RETURN (0); ++ ACE_CHECK_RETURN (_tao_retval); + return ACE_reinterpret_cast ( +- POA_IR::EnumDef_ptr, ++ POA_IR::StringDef_ptr, + servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/EnumDef:1.0" ++ "IDL:omg.org/IR/StringDef:1.0" + ) +- )->members ( ++ )->bound ( + ACE_TRY_ENV + ); + } - void POA_IR::_TAO_EnumDef_ThruPOA_Proxy_Impl::members ( +-void POA_IR::_TAO_EnumDef_ThruPOA_Proxy_Impl::members ( ++void POA_IR::_TAO_StringDef_ThruPOA_Proxy_Impl::bound ( CORBA_Object *_collocated_tao_target_, - const IR::EnumMemberSeq & members, -+ const IR_EnumMemberSeq & members, ++ CORBA::ULong bound, CORBA::Environment &ACE_TRY_ENV ) ACE_THROW_SPEC (( -@@ -15327,7 +15290,7 @@ - : ACE_NESTED_CLASS (POA_IR,TypedefDef) (rhs), - ACE_NESTED_CLASS (POA_IR,Contained) (rhs), - ACE_NESTED_CLASS (POA_IR,IDLType) (rhs), +@@ -15302,18 +9691,18 @@ + CORBA::Object_var forward_to; + servant_upcall.prepare_for_upcall ( + _collocated_tao_target_->_object_key (), +- "members", ++ "bound", + forward_to.out (), + ACE_TRY_ENV + ); + ACE_CHECK; + ACE_reinterpret_cast ( +- POA_IR::EnumDef_ptr, ++ POA_IR::StringDef_ptr, + servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/EnumDef:1.0" ++ "IDL:omg.org/IR/StringDef:1.0" + ) +- )->members ( +- members, ++ )->bound ( ++ bound, + ACE_TRY_ENV + ); + return; +@@ -15324,232 +9713,121 @@ + /////////////////////////////////////////////////////////////////////// + + // skeleton constructor +-POA_IR::EnumDef::EnumDef (void) ++POA_IR::StringDef::StringDef (void) + { +- this->optable_ = &tao_IR_EnumDef_optable; ++ this->optable_ = &tao_IR_StringDef_optable; + } + + // copy ctor +-POA_IR::EnumDef::EnumDef (const EnumDef& rhs) +- : ACE_NESTED_CLASS (POA_IR,TypedefDef) (rhs), +- ACE_NESTED_CLASS (POA_IR,Contained) (rhs), +- ACE_NESTED_CLASS (POA_IR,IDLType) (rhs), - ACE_NESTED_CLASS (POA_CORBA,IRObject) (rhs), ++POA_IR::StringDef::StringDef (const StringDef& rhs) ++ : ACE_NESTED_CLASS (POA_IR,IDLType) (rhs), + POA_CORBA_IRObject (rhs), TAO_ServantBase (rhs) {} -@@ -15345,7 +15308,7 @@ + // skeleton destructor +-POA_IR::EnumDef::~EnumDef (void) ++POA_IR::StringDef::~StringDef (void) { - POA_IR::EnumDef *_tao_impl = (POA_IR::EnumDef *)_tao_object_reference; - -- IR::EnumMemberSeq_var _tao_retval; -+ IR_EnumMemberSeq_var _tao_retval; + } + +-void POA_IR::EnumDef::_get_members_skel ( ++void POA_IR::StringDef::_get_bound_skel ( + TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, ++ void *_tao_object_reference, ++ void * /* context */, + CORBA::Environment &ACE_TRY_ENV +- ) ++) + { +- POA_IR::EnumDef *_tao_impl = (POA_IR::EnumDef *)_tao_object_reference; ++ POA_IR::StringDef *_tao_impl = (POA_IR::StringDef *)_tao_object_reference; - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( -@@ -15372,7 +15335,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::EnumMemberSeq * _tao_retval_info = _tao_retval._retn (); -+ IR_EnumMemberSeq * _tao_retval_info = _tao_retval._retn (); - ri.result (_tao_retval_info); - _tao_retval = _tao_retval_info; - ri.reply_status (PortableInterceptor::SUCCESSFUL); -@@ -15426,14 +15389,12 @@ +- IR::EnumMemberSeq_var _tao_retval; ++ CORBA::ULong _tao_retval = 0; + +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::EnumDef::TAO_ServerRequestInfo_IR_EnumDef_members_get ri ( +- _tao_server_request, +- _tao_impl +- , ++ _tao_retval = _tao_impl->bound ( + ACE_TRY_ENV + ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->members ( +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::EnumMemberSeq * _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; ++ + ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); ++ ++ _tao_server_request.init_reply (); + TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); + if (!( +- (_tao_out << _tao_retval.in ()) ++ (_tao_out << _tao_retval) + )) +- ACE_THROW (CORBA::MARSHAL()); +- ++ ACE_THROW (CORBA::MARSHAL () ); + } + +-void POA_IR::EnumDef::_set_members_skel ( ++void POA_IR::StringDef::_set_bound_skel ( + TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, ++ void *_tao_object_reference, ++ void * /* context */, + CORBA::Environment &ACE_TRY_ENV +- ) ++) + { TAO_InputCDR &_tao_in = _tao_server_request.incoming (); - POA_IR::EnumDef *_tao_impl = (POA_IR::EnumDef *)_tao_object_reference; - -- _tao_server_request.argument_flag (0); +- POA_IR::EnumDef *_tao_impl = (POA_IR::EnumDef *)_tao_object_reference; ++ POA_IR::StringDef *_tao_impl = (POA_IR::StringDef *)_tao_object_reference; + +-_tao_server_request.argument_flag (0); - IR::EnumMemberSeq members; -+ IR_EnumMemberSeq members; ++ CORBA::ULong bound; if (!( - (_tao_in >> members) +- (_tao_in >> members) ++ (_tao_in >> bound) )) - ACE_THROW (CORBA::MARSHAL()); +- ACE_THROW (CORBA::MARSHAL()); ++ ACE_THROW (CORBA::MARSHAL () ); - - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( - _tao_server_request.orb_core ()->server_request_interceptors (), -@@ -15506,7 +15467,7 @@ - POA_IR::EnumDef *_tao_impl = (POA_IR::EnumDef *) _tao_object_reference; +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::EnumDef::TAO_ServerRequestInfo_IR_EnumDef_members_set ri ( +- _tao_server_request, +- _tao_impl +- , +- members, ++ _tao_impl->bound ( ++ bound, + ACE_TRY_ENV + ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- +- _tao_impl->members ( +- members, +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; ++ + ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); ++ ++ _tao_server_request.init_reply (); + } + +-void POA_IR::EnumDef::_is_a_skel ( +- TAO_ServerRequest &_tao_server_request, ++void POA_IR::StringDef::_is_a_skel ( ++ TAO_ServerRequest &_tao_server_request, + void * _tao_object_reference, + void * /* context */, + CORBA::Environment &ACE_TRY_ENV + ) + { + TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::EnumDef *_tao_impl = (POA_IR::EnumDef *) _tao_object_reference; ++ POA_IR::StringDef *_tao_impl = (POA_IR::StringDef *) _tao_object_reference; CORBA::Boolean _tao_retval = 0; CORBA::String_var value; - if (!(_tao_in >> value.out ())) + if (!((_tao_in >> value.out ()))) ACE_THROW (CORBA::MARSHAL ()); - +- ++ _tao_retval = _tao_impl->_is_a (value.in (), ACE_TRY_ENV); -@@ -15514,7 +15475,7 @@ - + ACE_CHECK; +- ++ _tao_server_request.init_reply (); TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); - if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) @@ -4000,8 +19768,21 @@ ACE_THROW (CORBA::MARSHAL ()); } -@@ -15531,7 +15492,7 @@ - +-void POA_IR::EnumDef::_non_existent_skel ( +- TAO_ServerRequest &_tao_server_request, ++void POA_IR::StringDef::_non_existent_skel ( ++ TAO_ServerRequest &_tao_server_request, + void * _tao_object_reference, + void * /* context */, + CORBA::Environment &ACE_TRY_ENV + ) + { +- POA_IR::EnumDef *_tao_impl = (POA_IR::EnumDef *) _tao_object_reference; ++ POA_IR::StringDef *_tao_impl = (POA_IR::StringDef *) _tao_object_reference; + CORBA::Boolean _tao_retval = _tao_impl->_non_existent (ACE_TRY_ENV); + ACE_CHECK; +- ++ _tao_server_request.init_reply (); TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); - if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) @@ -4009,7 +19790,37 @@ ACE_THROW (CORBA::MARSHAL ()); } -@@ -15565,7 +15526,7 @@ +-CORBA::Boolean POA_IR::EnumDef::_is_a ( ++CORBA::Boolean POA_IR::StringDef::_is_a ( + const char* value, + CORBA::Environment &ACE_TRY_ENV + ) + { + if ( +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/EnumDef:1.0")) || +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/TypedefDef:1.0")) || +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/Contained:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/StringDef:1.0")) || + (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/IDLType:1.0")) || + (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/CORBA/IRObject:1.0")) || + (!ACE_OS::strcmp ((char *)value, CORBA::_tc_Object->id (ACE_TRY_ENV)))) +@@ -15558,37 +9836,33 @@ + return 0; + } + +-void* POA_IR::EnumDef::_downcast ( ++void* POA_IR::StringDef::_downcast ( + const char* logical_type_id + ) + { +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/EnumDef:1.0") == 0) +- return ACE_static_cast (POA_IR::EnumDef_ptr, this); +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/TypedefDef:1.0") == 0) +- return ACE_static_cast (POA_IR::TypedefDef_ptr, this); +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Contained:1.0") == 0) +- return ACE_static_cast (POA_IR::Contained_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/StringDef:1.0") == 0) ++ return ACE_static_cast (POA_IR::StringDef_ptr, this); if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/IDLType:1.0") == 0) return ACE_static_cast (POA_IR::IDLType_ptr, this); if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/IRObject:1.0") == 0) @@ -4018,201 +19829,794 @@ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/Object:1.0") == 0) return ACE_static_cast(PortableServer::Servant, this); return 0; -@@ -15595,10 +15556,9 @@ + } + +-void POA_IR::EnumDef::_dispatch (TAO_ServerRequest &req, void *context, CORBA::Environment &ACE_TRY_ENV) ++void POA_IR::StringDef::_dispatch (TAO_ServerRequest &req, void *context, CORBA::Environment &ACE_TRY_ENV) + { + this->synchronous_upcall_dispatch(req, context, this, ACE_TRY_ENV); + } + +-const char* POA_IR::EnumDef::_interface_repository_id (void) const ++const char* POA_IR::StringDef::_interface_repository_id (void) const + { +- return "IDL:omg.org/IR/EnumDef:1.0"; ++ return "IDL:omg.org/IR/StringDef:1.0"; + } + +-IR::EnumDef* +-POA_IR::EnumDef::_this (CORBA_Environment &ACE_TRY_ENV) ++IR::StringDef* ++POA_IR::StringDef::_this (CORBA_Environment &ACE_TRY_ENV) + { + TAO_Stub *stub = this->_create_stub (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); +@@ -15601,266 +9875,100 @@ ACE_NEW_RETURN (tmp, CORBA::Object (stub, 0, this), 0); CORBA::Object_var obj = tmp; - return ::IR::EnumDef::_unchecked_narrow (obj.in ()); -+ return IR_EnumDef::_unchecked_narrow (obj.in ()); - } - +-} - - #if (TAO_HAS_INTERCEPTORS == 1) - POA_IR::EnumDef::TAO_ServerRequestInfo_IR_EnumDef_members_get::TAO_ServerRequestInfo_IR_EnumDef_members_get ( - TAO_ServerRequest &_tao_server_request, -@@ -15678,7 +15638,7 @@ - POA_IR::EnumDef::TAO_ServerRequestInfo_IR_EnumDef_members_set::TAO_ServerRequestInfo_IR_EnumDef_members_set ( - TAO_ServerRequest &_tao_server_request, - POA_IR::EnumDef *tao_impl, +- +-#if (TAO_HAS_INTERCEPTORS == 1) +-POA_IR::EnumDef::TAO_ServerRequestInfo_IR_EnumDef_members_get::TAO_ServerRequestInfo_IR_EnumDef_members_get ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::EnumDef *tao_impl +- , +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl) +-{} +- +-Dynamic::ParameterList * +-POA_IR::EnumDef::TAO_ServerRequestInfo_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 * +-POA_IR::EnumDef::TAO_ServerRequestInfo_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 * +-POA_IR::EnumDef::TAO_ServerRequestInfo_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 (); +-} +- +-char * +-POA_IR::EnumDef::TAO_ServerRequestInfo_IR_EnumDef_members_get::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::EnumDef::TAO_ServerRequestInfo_IR_EnumDef_members_get::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-void +-POA_IR::EnumDef::TAO_ServerRequestInfo_IR_EnumDef_members_get::result (IR::EnumMemberSeq * result) +-{ +- // Update the result. +- this->_result = result; +-} +- +-POA_IR::EnumDef::TAO_ServerRequestInfo_IR_EnumDef_members_set::TAO_ServerRequestInfo_IR_EnumDef_members_set ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::EnumDef *tao_impl +- , - const IR::EnumMemberSeq & members, -+ const IR_EnumMemberSeq & members, - CORBA::Environment & - ) - : TAO_ServerRequestInfo (_tao_server_request), -@@ -15750,6 +15710,7 @@ +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- members_ (members) +-{} +- +-Dynamic::ParameterList * +-POA_IR::EnumDef::TAO_ServerRequestInfo_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 * +-POA_IR::EnumDef::TAO_ServerRequestInfo_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 * +-POA_IR::EnumDef::TAO_ServerRequestInfo_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; +-} +- +-char * +-POA_IR::EnumDef::TAO_ServerRequestInfo_IR_EnumDef_members_set::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::EnumDef::TAO_ServerRequestInfo_IR_EnumDef_members_set::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); ++ return IR_StringDef::_unchecked_narrow (obj.in ()); } - #endif /* TAO_HAS_INTERCEPTORS */ -+ - class TAO_IR_AliasDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable +-#endif /* TAO_HAS_INTERCEPTORS */ +-class TAO_IR_AliasDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable ++class TAO_IR_WstringDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable { private: -@@ -15757,7 +15718,7 @@ + unsigned int hash (const char *str, unsigned int len); public: const TAO_operation_db_entry * lookup (const char *str, unsigned int len); }; --/* starting time is 18:47:28 */ +-/* starting time is 16:31:12 */ +/* starting time is 11:23:10 */ /* C++ code produced by gperf version 2.8 (ACE version) */ - /* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_AliasDef_Perfect_Hash_OpTable -N lookup */ +-/* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_AliasDef_Perfect_Hash_OpTable -N lookup */ ++/* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_WstringDef_Perfect_Hash_OpTable -N lookup */ unsigned int -@@ -15886,10 +15847,9 @@ +-TAO_IR_AliasDef_Perfect_Hash_OpTable::hash (const char *str, unsigned int len) ++TAO_IR_WstringDef_Perfect_Hash_OpTable::hash (const char *str, unsigned int len) + { + static const unsigned char asso_values[] = + { + #if defined (ACE_MVS) +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 0, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 0, +- 37, 37, 0, 0, 0, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 0, 0, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 10, 37, 37, 37, 37, 10, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, +-#else +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 0, 37, 0, 37, 37, +- 0, 0, 0, 37, 37, 37, 37, 37, 37, 0, +- 0, 37, 37, 37, 37, 37, 10, 37, 37, 37, +- 37, 10, 37, 37, 37, 37, 37, 37, +-#endif /* ACE_MVS */ +- }; +- return len + asso_values[str[len - 1]] + asso_values[str[0]]; +-} +- +-const class TAO_operation_db_entry * +-TAO_IR_AliasDef_Perfect_Hash_OpTable::lookup (const char *str, unsigned int len) +-{ +- enum +- { +- TOTAL_KEYWORDS = 18, +- MIN_WORD_LENGTH = 4, +- MAX_WORD_LENGTH = 26, +- MIN_HASH_VALUE = 4, +- MAX_HASH_VALUE = 36, +- HASH_VALUE_RANGE = 33, +- DUPLICATES = 6 ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 0, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 0, ++ 19, 19, 0, 0, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 5, 19, 19, 19, 19, 0, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, ++#else ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 0, 19, 0, 19, 19, ++ 0, 0, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 5, 19, 19, 19, ++ 19, 0, 19, 19, 19, 19, 19, 19, ++#endif /* ACE_MVS */ ++ }; ++ return len + asso_values[str[len - 1]] + asso_values[str[0]]; ++} ++ ++const class TAO_operation_db_entry * ++TAO_IR_WstringDef_Perfect_Hash_OpTable::lookup (const char *str, unsigned int len) ++{ ++ enum ++ { ++ TOTAL_KEYWORDS = 7, ++ MIN_WORD_LENGTH = 5, ++ MAX_WORD_LENGTH = 13, ++ MIN_HASH_VALUE = 5, ++ MAX_HASH_VALUE = 18, ++ HASH_VALUE_RANGE = 14, ++ DUPLICATES = 2 + }; + + static const class TAO_operation_db_entry wordlist[] = + { +- {"",0},{"",0},{"",0},{"",0}, +- {"move", &POA_IR::AliasDef::move_skel}, +- {"_is_a", &POA_IR::AliasDef::_is_a_skel}, +- {"_get_id", &POA_IR::AliasDef::_get_id_skel}, +- {"_set_id", &POA_IR::AliasDef::_set_id_skel}, +- {"describe", &POA_IR::AliasDef::describe_skel}, +- {"_get_name", &POA_IR::AliasDef::_get_name_skel}, +- {"_get_type", &POA_IR::AliasDef::_get_type_skel}, +- {"_set_name", &POA_IR::AliasDef::_set_name_skel}, +- {"_get_version", &POA_IR::AliasDef::_get_version_skel}, +- {"_set_version", &POA_IR::AliasDef::_set_version_skel}, +- {"_get_def_kind", &POA_IR::AliasDef::_get_def_kind_skel}, +- {"_get_defined_in", &POA_IR::AliasDef::_get_defined_in_skel}, +- {"destroy", &POA_IR::AliasDef::destroy_skel}, +- {"_get_absolute_name", &POA_IR::AliasDef::_get_absolute_name_skel}, +- {"_get_original_type_def", &POA_IR::AliasDef::_get_original_type_def_skel}, +- {"_set_original_type_def", &POA_IR::AliasDef::_set_original_type_def_skel}, +- {"_non_existent", &POA_IR::AliasDef::_non_existent_skel}, +- {"_get_containing_repository", &POA_IR::AliasDef::_get_containing_repository_skel}, ++ {"",0},{"",0},{"",0},{"",0},{"",0}, ++ {"_is_a", &POA_IR::WstringDef::_is_a_skel}, ++ {"destroy", &POA_IR::WstringDef::destroy_skel}, ++ {"_get_type", &POA_IR::WstringDef::_get_type_skel}, ++ {"_get_bound", &POA_IR::WstringDef::_get_bound_skel}, ++ {"_set_bound", &POA_IR::WstringDef::_set_bound_skel}, ++ {"_get_def_kind", &POA_IR::WstringDef::_get_def_kind_skel}, ++ {"_non_existent", &POA_IR::WstringDef::_non_existent_skel}, + }; + + static const signed char lookup[] = + { +- -6, -2, -9, -3, 4, 5, -1, -43, 8, -43, -12, -2, -38, 14, +- -1, 15, -1, 16, 17, -1, -18, -2, -38, 20, -1, -1, -1, -1, +- -1, -1, -1, -1, -1, -1, -1, -1, 21, ++ -1, -1, -1, -8, -2, 5, -1, 6, -1, 7, -25, -1, -1, 10, ++ -1, -1, -1, -1, 11, + }; + + if (len <= MAX_WORD_LENGTH && len >= MIN_WORD_LENGTH) +@@ -15894,38 +10002,37 @@ } return 0; } --/* ending time is 18:47:28 */ +-/* ending time is 16:31:12 */ +-static TAO_IR_AliasDef_Perfect_Hash_OpTable tao_IR_AliasDef_optable; +- +/* ending time is 11:23:10 */ - static TAO_IR_AliasDef_Perfect_Hash_OpTable tao_IR_AliasDef_optable; ++static TAO_IR_WstringDef_Perfect_Hash_OpTable tao_IR_WstringDef_optable; -- /////////////////////////////////////////////////////////////////////// // Strategized Proxy Broker Implementation // -@@ -15915,9 +15875,9 @@ + + // Factory function Implementation. +-POA_IR::_TAO_AliasDef_Strategized_Proxy_Broker *POA_IR::_TAO_AliasDef_Strategized_Proxy_Broker::the_TAO_AliasDef_Strategized_Proxy_Broker (void) ++POA_IR::_TAO_WstringDef_Strategized_Proxy_Broker *POA_IR::_TAO_WstringDef_Strategized_Proxy_Broker::the_TAO_WstringDef_Strategized_Proxy_Broker (void) + { +- static POA_IR::_TAO_AliasDef_Strategized_Proxy_Broker strategized_proxy_broker; ++ static POA_IR::_TAO_WstringDef_Strategized_Proxy_Broker strategized_proxy_broker; + return &strategized_proxy_broker; + } + +-POA_IR::_TAO_AliasDef_Strategized_Proxy_Broker::_TAO_AliasDef_Strategized_Proxy_Broker (void) ++POA_IR::_TAO_WstringDef_Strategized_Proxy_Broker::_TAO_WstringDef_Strategized_Proxy_Broker (void) + { + for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) + this->proxy_cache_[i] = 0; + + } + +-POA_IR::_TAO_AliasDef_Strategized_Proxy_Broker::~_TAO_AliasDef_Strategized_Proxy_Broker (void) ++POA_IR::_TAO_WstringDef_Strategized_Proxy_Broker::~_TAO_WstringDef_Strategized_Proxy_Broker (void) + { + for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) + delete this->proxy_cache_[i]; } -IR::_TAO_AliasDef_Proxy_Impl& -+_TAO_AliasDef_Proxy_Impl& - POA_IR::_TAO_AliasDef_Strategized_Proxy_Broker::select_proxy ( +-POA_IR::_TAO_AliasDef_Strategized_Proxy_Broker::select_proxy ( - ::IR::AliasDef *object, -+ IR_AliasDef *object, ++_TAO_WstringDef_Proxy_Impl& ++POA_IR::_TAO_WstringDef_Strategized_Proxy_Broker::select_proxy ( ++ IR_WstringDef *object, CORBA::Environment &ACE_TRY_ENV ) { -@@ -15949,7 +15909,7 @@ +@@ -15943,7 +10050,7 @@ + } + + void +-POA_IR::_TAO_AliasDef_Strategized_Proxy_Broker::create_proxy ( ++POA_IR::_TAO_WstringDef_Strategized_Proxy_Broker::create_proxy ( + TAO_ORB_Core::TAO_Collocation_Strategies strategy, + CORBA::Environment &ACE_TRY_ENV + ) +@@ -15957,7 +10064,7 @@ case TAO_ORB_Core::THRU_POA_STRATEGY: ACE_NEW_THROW_EX ( this->proxy_cache_[strategy], - POA_IR::_TAO_AliasDef_ThruPOA_Proxy_Impl, -+ _TAO_AliasDef_ThruPOA_Proxy_Impl, ++ _TAO_WstringDef_ThruPOA_Proxy_Impl, CORBA::NO_MEMORY () ); ACE_CHECK; -@@ -15959,7 +15919,7 @@ +@@ -15967,7 +10074,7 @@ default: ACE_NEW_THROW_EX ( this->proxy_cache_[strategy], - ::IR::_TAO_AliasDef_Remote_Proxy_Impl, -+ _TAO_AliasDef_Remote_Proxy_Impl, ++ _TAO_WstringDef_Remote_Proxy_Impl, CORBA::NO_MEMORY () ); ACE_CHECK; -@@ -15976,26 +15936,26 @@ +@@ -15984,38 +10091,41 @@ /////////////////////////////////////////////////////////////////////// -IR::_TAO_AliasDef_Proxy_Broker * -IR__TAO_AliasDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) -+_TAO_AliasDef_Proxy_Broker * -+_TAO_AliasDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) ++_TAO_WstringDef_Proxy_Broker * ++_TAO_WstringDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) { ACE_UNUSED_ARG (obj); - return ::POA_IR::_TAO_AliasDef_Strategized_Proxy_Broker::the_TAO_AliasDef_Strategized_Proxy_Broker(); +- return ::POA_IR::_TAO_AliasDef_Strategized_Proxy_Broker::the_TAO_AliasDef_Strategized_Proxy_Broker(); ++ return ::POA_IR::_TAO_WstringDef_Strategized_Proxy_Broker::the_TAO_WstringDef_Strategized_Proxy_Broker(); } int -IR__TAO_AliasDef_Proxy_Broker_Factory_Initializer (long _dummy_) -+_TAO_AliasDef_Proxy_Broker_Factory_Initializer (long _dummy_) ++_TAO_WstringDef_Proxy_Broker_Factory_Initializer (long _dummy_) { ACE_UNUSED_ARG (_dummy_); - IR__TAO_AliasDef_Proxy_Broker_Factory_function_pointer = - IR__TAO_AliasDef_Proxy_Broker_Factory_function; -+ _TAO_AliasDef_Proxy_Broker_Factory_function_pointer = -+ _TAO_AliasDef_Proxy_Broker_Factory_function; ++ _TAO_WstringDef_Proxy_Broker_Factory_function_pointer = ++ _TAO_WstringDef_Proxy_Broker_Factory_function; return 0; } -static int IR__TAO_AliasDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = - IR__TAO_AliasDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, IR__TAO_AliasDef_Proxy_Broker_Factory_Initializer)); -+static int _TAO_AliasDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = -+ _TAO_AliasDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, _TAO_AliasDef_Proxy_Broker_Factory_Initializer)); ++static int _TAO_WstringDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = ++ _TAO_WstringDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, _TAO_WstringDef_Proxy_Broker_Factory_Initializer)); /////////////////////////////////////////////////////////////////////// -@@ -16007,7 +15967,7 @@ + // ThruPOA Proxy Implementation + // + +-POA_IR::_TAO_AliasDef_ThruPOA_Proxy_Impl::_TAO_AliasDef_ThruPOA_Proxy_Impl (void) ++POA_IR::_TAO_WstringDef_ThruPOA_Proxy_Impl::_TAO_WstringDef_ThruPOA_Proxy_Impl (void) ++{} ++ ++POA_IR::_TAO_WstringDef_ThruPOA_Proxy_Impl::~_TAO_WstringDef_ThruPOA_Proxy_Impl (void) + {} // ThruPOA Implementation of the IDL interface methods -IR::IDLType_ptr POA_IR::_TAO_AliasDef_ThruPOA_Proxy_Impl::original_type_def ( -+IR_IDLType_ptr POA_IR::_TAO_AliasDef_ThruPOA_Proxy_Impl::original_type_def ( ++CORBA::ULong POA_IR::_TAO_WstringDef_ThruPOA_Proxy_Impl::bound ( CORBA_Object *_collocated_tao_target_, CORBA::Environment &ACE_TRY_ENV ) -@@ -16015,7 +15975,7 @@ +@@ -16023,7 +10133,7 @@ CORBA::SystemException )) { - IR::IDLType_var _tao_retval; -+ IR_IDLType_var _tao_retval; ++ CORBA::ULong _tao_retval = 0; ACE_UNUSED_ARG (_tao_retval); TAO_Object_Adapter::Servant_Upcall servant_upcall ( _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -16040,7 +16000,7 @@ +@@ -16031,24 +10141,24 @@ + CORBA::Object_var forward_to; + servant_upcall.prepare_for_upcall ( + _collocated_tao_target_->_object_key (), +- "original_type_def", ++ "bound", + forward_to.out (), + ACE_TRY_ENV + ); +- ACE_CHECK_RETURN (0); ++ ACE_CHECK_RETURN (_tao_retval); + return ACE_reinterpret_cast ( +- POA_IR::AliasDef_ptr, ++ POA_IR::WstringDef_ptr, + servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/AliasDef:1.0" ++ "IDL:omg.org/IR/WstringDef:1.0" + ) +- )->original_type_def ( ++ )->bound ( + ACE_TRY_ENV + ); + } - void POA_IR::_TAO_AliasDef_ThruPOA_Proxy_Impl::original_type_def ( +-void POA_IR::_TAO_AliasDef_ThruPOA_Proxy_Impl::original_type_def ( ++void POA_IR::_TAO_WstringDef_ThruPOA_Proxy_Impl::bound ( CORBA_Object *_collocated_tao_target_, - IR::IDLType_ptr original_type_def, -+ IR_IDLType_ptr original_type_def, ++ CORBA::ULong bound, CORBA::Environment &ACE_TRY_ENV ) ACE_THROW_SPEC (( -@@ -16085,7 +16045,7 @@ - : ACE_NESTED_CLASS (POA_IR,TypedefDef) (rhs), - ACE_NESTED_CLASS (POA_IR,Contained) (rhs), - ACE_NESTED_CLASS (POA_IR,IDLType) (rhs), +@@ -16061,18 +10171,18 @@ + CORBA::Object_var forward_to; + servant_upcall.prepare_for_upcall ( + _collocated_tao_target_->_object_key (), +- "original_type_def", ++ "bound", + forward_to.out (), + ACE_TRY_ENV + ); + ACE_CHECK; + ACE_reinterpret_cast ( +- POA_IR::AliasDef_ptr, ++ POA_IR::WstringDef_ptr, + servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/AliasDef:1.0" ++ "IDL:omg.org/IR/WstringDef:1.0" + ) +- )->original_type_def ( +- original_type_def, ++ )->bound ( ++ bound, + ACE_TRY_ENV + ); + return; +@@ -16083,232 +10193,121 @@ + /////////////////////////////////////////////////////////////////////// + + // skeleton constructor +-POA_IR::AliasDef::AliasDef (void) ++POA_IR::WstringDef::WstringDef (void) + { +- this->optable_ = &tao_IR_AliasDef_optable; ++ this->optable_ = &tao_IR_WstringDef_optable; + } + + // copy ctor +-POA_IR::AliasDef::AliasDef (const AliasDef& rhs) +- : ACE_NESTED_CLASS (POA_IR,TypedefDef) (rhs), +- ACE_NESTED_CLASS (POA_IR,Contained) (rhs), +- ACE_NESTED_CLASS (POA_IR,IDLType) (rhs), - ACE_NESTED_CLASS (POA_CORBA,IRObject) (rhs), ++POA_IR::WstringDef::WstringDef (const WstringDef& rhs) ++ : ACE_NESTED_CLASS (POA_IR,IDLType) (rhs), + POA_CORBA_IRObject (rhs), TAO_ServantBase (rhs) {} -@@ -16103,7 +16063,7 @@ + // skeleton destructor +-POA_IR::AliasDef::~AliasDef (void) ++POA_IR::WstringDef::~WstringDef (void) { - POA_IR::AliasDef *_tao_impl = (POA_IR::AliasDef *)_tao_object_reference; - -- IR::IDLType_var _tao_retval; -+ IR_IDLType_var _tao_retval; + } + +-void POA_IR::AliasDef::_get_original_type_def_skel ( ++void POA_IR::WstringDef::_get_bound_skel ( + TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, ++ void *_tao_object_reference, ++ void * /* context */, + CORBA::Environment &ACE_TRY_ENV +- ) ++) + { +- POA_IR::AliasDef *_tao_impl = (POA_IR::AliasDef *)_tao_object_reference; ++ POA_IR::WstringDef *_tao_impl = (POA_IR::WstringDef *)_tao_object_reference; + +- IR::IDLType_var _tao_retval; ++ CORBA::ULong _tao_retval = 0; - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( -@@ -16130,7 +16090,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::IDLType_ptr _tao_retval_info = _tao_retval._retn (); -+ IR_IDLType_ptr _tao_retval_info = _tao_retval._retn (); - ri.result (_tao_retval_info); - _tao_retval = _tao_retval_info; - ri.reply_status (PortableInterceptor::SUCCESSFUL); -@@ -16184,14 +16144,12 @@ +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::AliasDef::TAO_ServerRequestInfo_IR_AliasDef_original_type_def_get ri ( +- _tao_server_request, +- _tao_impl +- , ++ _tao_retval = _tao_impl->bound ( + ACE_TRY_ENV + ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->original_type_def ( +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::IDLType_ptr _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; ++ + ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); ++ ++ _tao_server_request.init_reply (); + TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); + if (!( +- (_tao_out << _tao_retval.in ()) ++ (_tao_out << _tao_retval) + )) +- ACE_THROW (CORBA::MARSHAL()); +- ++ ACE_THROW (CORBA::MARSHAL () ); + } + +-void POA_IR::AliasDef::_set_original_type_def_skel ( ++void POA_IR::WstringDef::_set_bound_skel ( + TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, ++ void *_tao_object_reference, ++ void * /* context */, + CORBA::Environment &ACE_TRY_ENV +- ) ++) + { TAO_InputCDR &_tao_in = _tao_server_request.incoming (); - POA_IR::AliasDef *_tao_impl = (POA_IR::AliasDef *)_tao_object_reference; - -- _tao_server_request.argument_flag (0); +- POA_IR::AliasDef *_tao_impl = (POA_IR::AliasDef *)_tao_object_reference; ++ POA_IR::WstringDef *_tao_impl = (POA_IR::WstringDef *)_tao_object_reference; + +-_tao_server_request.argument_flag (0); - IR::IDLType_var original_type_def; -+ IR_IDLType_var original_type_def; ++ CORBA::ULong bound; if (!( - (_tao_in >> original_type_def.out ()) +- (_tao_in >> original_type_def.out ()) ++ (_tao_in >> bound) )) - ACE_THROW (CORBA::MARSHAL()); +- ACE_THROW (CORBA::MARSHAL()); ++ ACE_THROW (CORBA::MARSHAL () ); - - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( - _tao_server_request.orb_core ()->server_request_interceptors (), -@@ -16264,7 +16222,7 @@ - POA_IR::AliasDef *_tao_impl = (POA_IR::AliasDef *) _tao_object_reference; +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::AliasDef::TAO_ServerRequestInfo_IR_AliasDef_original_type_def_set ri ( +- _tao_server_request, +- _tao_impl +- , +- original_type_def.in (), ++ _tao_impl->bound ( ++ bound, + ACE_TRY_ENV + ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- +- _tao_impl->original_type_def ( +- original_type_def.in (), +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; ++ + ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); ++ ++ _tao_server_request.init_reply (); + } + +-void POA_IR::AliasDef::_is_a_skel ( +- TAO_ServerRequest &_tao_server_request, ++void POA_IR::WstringDef::_is_a_skel ( ++ TAO_ServerRequest &_tao_server_request, + void * _tao_object_reference, + void * /* context */, + CORBA::Environment &ACE_TRY_ENV + ) + { + TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::AliasDef *_tao_impl = (POA_IR::AliasDef *) _tao_object_reference; ++ POA_IR::WstringDef *_tao_impl = (POA_IR::WstringDef *) _tao_object_reference; CORBA::Boolean _tao_retval = 0; CORBA::String_var value; - if (!(_tao_in >> value.out ())) + if (!((_tao_in >> value.out ()))) ACE_THROW (CORBA::MARSHAL ()); - +- ++ _tao_retval = _tao_impl->_is_a (value.in (), ACE_TRY_ENV); -@@ -16272,7 +16230,7 @@ - + ACE_CHECK; +- ++ _tao_server_request.init_reply (); TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); - if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) @@ -4220,8 +20624,21 @@ ACE_THROW (CORBA::MARSHAL ()); } -@@ -16289,7 +16247,7 @@ - +-void POA_IR::AliasDef::_non_existent_skel ( +- TAO_ServerRequest &_tao_server_request, ++void POA_IR::WstringDef::_non_existent_skel ( ++ TAO_ServerRequest &_tao_server_request, + void * _tao_object_reference, + void * /* context */, + CORBA::Environment &ACE_TRY_ENV + ) + { +- POA_IR::AliasDef *_tao_impl = (POA_IR::AliasDef *) _tao_object_reference; ++ POA_IR::WstringDef *_tao_impl = (POA_IR::WstringDef *) _tao_object_reference; + CORBA::Boolean _tao_retval = _tao_impl->_non_existent (ACE_TRY_ENV); + ACE_CHECK; +- ++ _tao_server_request.init_reply (); TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); - if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) @@ -4229,7 +20646,37 @@ ACE_THROW (CORBA::MARSHAL ()); } -@@ -16323,7 +16281,7 @@ +-CORBA::Boolean POA_IR::AliasDef::_is_a ( ++CORBA::Boolean POA_IR::WstringDef::_is_a ( + const char* value, + CORBA::Environment &ACE_TRY_ENV + ) + { + if ( +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/AliasDef:1.0")) || +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/TypedefDef:1.0")) || +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/Contained:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/WstringDef:1.0")) || + (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/IDLType:1.0")) || + (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/CORBA/IRObject:1.0")) || + (!ACE_OS::strcmp ((char *)value, CORBA::_tc_Object->id (ACE_TRY_ENV)))) +@@ -16317,37 +10316,33 @@ + return 0; + } + +-void* POA_IR::AliasDef::_downcast ( ++void* POA_IR::WstringDef::_downcast ( + const char* logical_type_id + ) + { +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/AliasDef:1.0") == 0) +- return ACE_static_cast (POA_IR::AliasDef_ptr, this); +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/TypedefDef:1.0") == 0) +- return ACE_static_cast (POA_IR::TypedefDef_ptr, this); +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Contained:1.0") == 0) +- return ACE_static_cast (POA_IR::Contained_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/WstringDef:1.0") == 0) ++ return ACE_static_cast (POA_IR::WstringDef_ptr, this); if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/IDLType:1.0") == 0) return ACE_static_cast (POA_IR::IDLType_ptr, this); if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/IRObject:1.0") == 0) @@ -4238,486 +20685,1185 @@ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/Object:1.0") == 0) return ACE_static_cast(PortableServer::Servant, this); return 0; -@@ -16353,10 +16311,9 @@ + } + +-void POA_IR::AliasDef::_dispatch (TAO_ServerRequest &req, void *context, CORBA::Environment &ACE_TRY_ENV) ++void POA_IR::WstringDef::_dispatch (TAO_ServerRequest &req, void *context, CORBA::Environment &ACE_TRY_ENV) + { + this->synchronous_upcall_dispatch(req, context, this, ACE_TRY_ENV); + } + +-const char* POA_IR::AliasDef::_interface_repository_id (void) const ++const char* POA_IR::WstringDef::_interface_repository_id (void) const + { +- return "IDL:omg.org/IR/AliasDef:1.0"; ++ return "IDL:omg.org/IR/WstringDef:1.0"; + } + +-IR::AliasDef* +-POA_IR::AliasDef::_this (CORBA_Environment &ACE_TRY_ENV) ++IR::WstringDef* ++POA_IR::WstringDef::_this (CORBA_Environment &ACE_TRY_ENV) + { + TAO_Stub *stub = this->_create_stub (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); +@@ -16360,264 +10355,102 @@ ACE_NEW_RETURN (tmp, CORBA::Object (stub, 0, this), 0); CORBA::Object_var obj = tmp; - return ::IR::AliasDef::_unchecked_narrow (obj.in ()); -+ return IR_AliasDef::_unchecked_narrow (obj.in ()); +-} +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +-POA_IR::AliasDef::TAO_ServerRequestInfo_IR_AliasDef_original_type_def_get::TAO_ServerRequestInfo_IR_AliasDef_original_type_def_get ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::AliasDef *tao_impl +- , +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl) +-{} +- +-Dynamic::ParameterList * +-POA_IR::AliasDef::TAO_ServerRequestInfo_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 * +-POA_IR::AliasDef::TAO_ServerRequestInfo_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 * +-POA_IR::AliasDef::TAO_ServerRequestInfo_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 (); ++ return IR_WstringDef::_unchecked_narrow (obj.in ()); } +-char * +-POA_IR::AliasDef::TAO_ServerRequestInfo_IR_AliasDef_original_type_def_get::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++class TAO_IR_FixedDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable + { +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} - - #if (TAO_HAS_INTERCEPTORS == 1) - POA_IR::AliasDef::TAO_ServerRequestInfo_IR_AliasDef_original_type_def_get::TAO_ServerRequestInfo_IR_AliasDef_original_type_def_get ( - TAO_ServerRequest &_tao_server_request, -@@ -16436,7 +16393,7 @@ - POA_IR::AliasDef::TAO_ServerRequestInfo_IR_AliasDef_original_type_def_set::TAO_ServerRequestInfo_IR_AliasDef_original_type_def_set ( - TAO_ServerRequest &_tao_server_request, - POA_IR::AliasDef *tao_impl, +-CORBA::Boolean +-POA_IR::AliasDef::TAO_ServerRequestInfo_IR_AliasDef_original_type_def_get::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-void +-POA_IR::AliasDef::TAO_ServerRequestInfo_IR_AliasDef_original_type_def_get::result (IR::IDLType_ptr result) +-{ +- // Update the result. +- this->_result = result; +-} +- +-POA_IR::AliasDef::TAO_ServerRequestInfo_IR_AliasDef_original_type_def_set::TAO_ServerRequestInfo_IR_AliasDef_original_type_def_set ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::AliasDef *tao_impl +- , - IR::IDLType_ptr original_type_def, -+ IR_IDLType_ptr original_type_def, - CORBA::Environment & - ) - : TAO_ServerRequestInfo (_tao_server_request), -@@ -16508,6 +16465,7 @@ +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- original_type_def_ (original_type_def) +-{} +- +-Dynamic::ParameterList * +-POA_IR::AliasDef::TAO_ServerRequestInfo_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 * +-POA_IR::AliasDef::TAO_ServerRequestInfo_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 * +-POA_IR::AliasDef::TAO_ServerRequestInfo_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; +-} +- +-char * +-POA_IR::AliasDef::TAO_ServerRequestInfo_IR_AliasDef_original_type_def_set::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::AliasDef::TAO_ServerRequestInfo_IR_AliasDef_original_type_def_set::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-#endif /* TAO_HAS_INTERCEPTORS */ +-class TAO_IR_NativeDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable +-{ +-private: +- unsigned int hash (const char *str, unsigned int len); +-public: +- const TAO_operation_db_entry * lookup (const char *str, unsigned int len); +-}; +-/* starting time is 16:31:12 */ +-/* C++ code produced by gperf version 2.8 (ACE version) */ +-/* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_NativeDef_Perfect_Hash_OpTable -N lookup */ +-unsigned int +-TAO_IR_NativeDef_Perfect_Hash_OpTable::hash (const char *str, unsigned int len) ++private: ++ unsigned int hash (const char *str, unsigned int len); ++public: ++ const TAO_operation_db_entry * lookup (const char *str, unsigned int len); ++}; ++/* starting time is 11:23:10 */ ++/* C++ code produced by gperf version 2.8 (ACE version) */ ++/* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_FixedDef_Perfect_Hash_OpTable -N lookup */ ++unsigned int ++TAO_IR_FixedDef_Perfect_Hash_OpTable::hash (const char *str, unsigned int len) + { + static const unsigned char asso_values[] = + { + #if defined (ACE_MVS) +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 0, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 0, +- 37, 37, 0, 0, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 0, 0, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 10, 37, 37, 37, 37, 10, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 0, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 0, ++ 19, 19, 0, 0, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 0, 5, 19, 19, 19, 19, 0, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, + #else +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 0, 37, 0, 37, 37, +- 0, 0, 37, 37, 37, 37, 37, 37, 37, 0, +- 0, 37, 37, 37, 37, 37, 10, 37, 37, 37, +- 37, 10, 37, 37, 37, 37, 37, 37, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 0, 19, 0, 19, 19, ++ 0, 0, 19, 19, 19, 19, 19, 19, 19, 19, ++ 19, 19, 19, 19, 19, 0, 5, 19, 19, 19, ++ 19, 0, 19, 19, 19, 19, 19, 19, + #endif /* ACE_MVS */ + }; + return len + asso_values[str[len - 1]] + asso_values[str[0]]; } - #endif /* TAO_HAS_INTERCEPTORS */ -+ - class TAO_IR_NativeDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable + const class TAO_operation_db_entry * +-TAO_IR_NativeDef_Perfect_Hash_OpTable::lookup (const char *str, unsigned int len) ++TAO_IR_FixedDef_Perfect_Hash_OpTable::lookup (const char *str, unsigned int len) { - private: -@@ -16515,7 +16473,7 @@ - public: - const TAO_operation_db_entry * lookup (const char *str, unsigned int len); - }; --/* starting time is 18:47:28 */ -+/* starting time is 11:23:10 */ - /* C++ code produced by gperf version 2.8 (ACE version) */ - /* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_NativeDef_Perfect_Hash_OpTable -N lookup */ - unsigned int -@@ -16642,10 +16600,9 @@ + enum + { +- TOTAL_KEYWORDS = 16, +- MIN_WORD_LENGTH = 4, +- MAX_WORD_LENGTH = 26, +- MIN_HASH_VALUE = 4, +- MAX_HASH_VALUE = 36, +- HASH_VALUE_RANGE = 33, +- DUPLICATES = 5 ++ TOTAL_KEYWORDS = 9, ++ MIN_WORD_LENGTH = 5, ++ MAX_WORD_LENGTH = 13, ++ MIN_HASH_VALUE = 5, ++ MAX_HASH_VALUE = 18, ++ HASH_VALUE_RANGE = 14, ++ DUPLICATES = 3 + }; + + static const class TAO_operation_db_entry wordlist[] = + { +- {"",0},{"",0},{"",0},{"",0}, +- {"move", &POA_IR::NativeDef::move_skel}, +- {"_is_a", &POA_IR::NativeDef::_is_a_skel}, +- {"_get_id", &POA_IR::NativeDef::_get_id_skel}, +- {"_set_id", &POA_IR::NativeDef::_set_id_skel}, +- {"describe", &POA_IR::NativeDef::describe_skel}, +- {"_get_name", &POA_IR::NativeDef::_get_name_skel}, +- {"_get_type", &POA_IR::NativeDef::_get_type_skel}, +- {"_set_name", &POA_IR::NativeDef::_set_name_skel}, +- {"_get_version", &POA_IR::NativeDef::_get_version_skel}, +- {"_set_version", &POA_IR::NativeDef::_set_version_skel}, +- {"_get_def_kind", &POA_IR::NativeDef::_get_def_kind_skel}, +- {"_get_defined_in", &POA_IR::NativeDef::_get_defined_in_skel}, +- {"destroy", &POA_IR::NativeDef::destroy_skel}, +- {"_get_absolute_name", &POA_IR::NativeDef::_get_absolute_name_skel}, +- {"_non_existent", &POA_IR::NativeDef::_non_existent_skel}, +- {"_get_containing_repository", &POA_IR::NativeDef::_get_containing_repository_skel}, ++ {"",0},{"",0},{"",0},{"",0},{"",0}, ++ {"_is_a", &POA_IR::FixedDef::_is_a_skel}, ++ {"destroy", &POA_IR::FixedDef::destroy_skel}, ++ {"_get_type", &POA_IR::FixedDef::_get_type_skel}, ++ {"_get_scale", &POA_IR::FixedDef::_get_scale_skel}, ++ {"_set_scale", &POA_IR::FixedDef::_set_scale_skel}, ++ {"_get_digits", &POA_IR::FixedDef::_get_digits_skel}, ++ {"_set_digits", &POA_IR::FixedDef::_set_digits_skel}, ++ {"_get_def_kind", &POA_IR::FixedDef::_get_def_kind_skel}, ++ {"_non_existent", &POA_IR::FixedDef::_non_existent_skel}, + }; + + static const signed char lookup[] = + { +- -6, -2, -9, -3, 4, 5, -1, -43, 8, -43, -12, -2, -38, 14, +- -1, 15, -1, 16, 17, -1, -1, -1, -1, 18, -1, -1, -1, -1, +- -1, -1, -1, -1, -1, -1, -1, -1, 19, ++ -1, -8, -2, -10, -2, 5, -1, 6, -1, 7, -27, -26, -1, 12, ++ -1, -1, -1, -1, 13, + }; + + if (len <= MAX_WORD_LENGTH && len >= MIN_WORD_LENGTH) +@@ -16651,38 +10484,37 @@ } return 0; } --/* ending time is 18:47:28 */ +-/* ending time is 16:31:12 */ +-static TAO_IR_NativeDef_Perfect_Hash_OpTable tao_IR_NativeDef_optable; +- +/* ending time is 11:23:10 */ - static TAO_IR_NativeDef_Perfect_Hash_OpTable tao_IR_NativeDef_optable; ++static TAO_IR_FixedDef_Perfect_Hash_OpTable tao_IR_FixedDef_optable; -- /////////////////////////////////////////////////////////////////////// // Strategized Proxy Broker Implementation // -@@ -16671,9 +16628,9 @@ + + // Factory function Implementation. +-POA_IR::_TAO_NativeDef_Strategized_Proxy_Broker *POA_IR::_TAO_NativeDef_Strategized_Proxy_Broker::the_TAO_NativeDef_Strategized_Proxy_Broker (void) ++POA_IR::_TAO_FixedDef_Strategized_Proxy_Broker *POA_IR::_TAO_FixedDef_Strategized_Proxy_Broker::the_TAO_FixedDef_Strategized_Proxy_Broker (void) + { +- static POA_IR::_TAO_NativeDef_Strategized_Proxy_Broker strategized_proxy_broker; ++ static POA_IR::_TAO_FixedDef_Strategized_Proxy_Broker strategized_proxy_broker; + return &strategized_proxy_broker; + } + +-POA_IR::_TAO_NativeDef_Strategized_Proxy_Broker::_TAO_NativeDef_Strategized_Proxy_Broker (void) ++POA_IR::_TAO_FixedDef_Strategized_Proxy_Broker::_TAO_FixedDef_Strategized_Proxy_Broker (void) + { + for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) + this->proxy_cache_[i] = 0; + + } + +-POA_IR::_TAO_NativeDef_Strategized_Proxy_Broker::~_TAO_NativeDef_Strategized_Proxy_Broker (void) ++POA_IR::_TAO_FixedDef_Strategized_Proxy_Broker::~_TAO_FixedDef_Strategized_Proxy_Broker (void) + { + for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) + delete this->proxy_cache_[i]; } -IR::_TAO_NativeDef_Proxy_Impl& -+_TAO_NativeDef_Proxy_Impl& - POA_IR::_TAO_NativeDef_Strategized_Proxy_Broker::select_proxy ( +-POA_IR::_TAO_NativeDef_Strategized_Proxy_Broker::select_proxy ( - ::IR::NativeDef *object, -+ IR_NativeDef *object, ++_TAO_FixedDef_Proxy_Impl& ++POA_IR::_TAO_FixedDef_Strategized_Proxy_Broker::select_proxy ( ++ IR_FixedDef *object, CORBA::Environment &ACE_TRY_ENV ) { -@@ -16705,7 +16662,7 @@ +@@ -16700,7 +10532,7 @@ + } + + void +-POA_IR::_TAO_NativeDef_Strategized_Proxy_Broker::create_proxy ( ++POA_IR::_TAO_FixedDef_Strategized_Proxy_Broker::create_proxy ( + TAO_ORB_Core::TAO_Collocation_Strategies strategy, + CORBA::Environment &ACE_TRY_ENV + ) +@@ -16714,7 +10546,7 @@ case TAO_ORB_Core::THRU_POA_STRATEGY: ACE_NEW_THROW_EX ( this->proxy_cache_[strategy], - POA_IR::_TAO_NativeDef_ThruPOA_Proxy_Impl, -+ _TAO_NativeDef_ThruPOA_Proxy_Impl, ++ _TAO_FixedDef_ThruPOA_Proxy_Impl, CORBA::NO_MEMORY () ); ACE_CHECK; -@@ -16715,7 +16672,7 @@ +@@ -16724,7 +10556,7 @@ default: ACE_NEW_THROW_EX ( this->proxy_cache_[strategy], - ::IR::_TAO_NativeDef_Remote_Proxy_Impl, -+ _TAO_NativeDef_Remote_Proxy_Impl, ++ _TAO_FixedDef_Remote_Proxy_Impl, CORBA::NO_MEMORY () ); ACE_CHECK; -@@ -16732,26 +16689,26 @@ +@@ -16741,570 +10573,337 @@ /////////////////////////////////////////////////////////////////////// -IR::_TAO_NativeDef_Proxy_Broker * -IR__TAO_NativeDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) -+_TAO_NativeDef_Proxy_Broker * -+_TAO_NativeDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) ++_TAO_FixedDef_Proxy_Broker * ++_TAO_FixedDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) { ACE_UNUSED_ARG (obj); - return ::POA_IR::_TAO_NativeDef_Strategized_Proxy_Broker::the_TAO_NativeDef_Strategized_Proxy_Broker(); +- return ::POA_IR::_TAO_NativeDef_Strategized_Proxy_Broker::the_TAO_NativeDef_Strategized_Proxy_Broker(); ++ return ::POA_IR::_TAO_FixedDef_Strategized_Proxy_Broker::the_TAO_FixedDef_Strategized_Proxy_Broker(); } int -IR__TAO_NativeDef_Proxy_Broker_Factory_Initializer (long _dummy_) -+_TAO_NativeDef_Proxy_Broker_Factory_Initializer (long _dummy_) ++_TAO_FixedDef_Proxy_Broker_Factory_Initializer (long _dummy_) { ACE_UNUSED_ARG (_dummy_); - IR__TAO_NativeDef_Proxy_Broker_Factory_function_pointer = - IR__TAO_NativeDef_Proxy_Broker_Factory_function; -+ _TAO_NativeDef_Proxy_Broker_Factory_function_pointer = -+ _TAO_NativeDef_Proxy_Broker_Factory_function; ++ _TAO_FixedDef_Proxy_Broker_Factory_function_pointer = ++ _TAO_FixedDef_Proxy_Broker_Factory_function; return 0; } -static int IR__TAO_NativeDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = - IR__TAO_NativeDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, IR__TAO_NativeDef_Proxy_Broker_Factory_Initializer)); -+static int _TAO_NativeDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = -+ _TAO_NativeDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, _TAO_NativeDef_Proxy_Broker_Factory_Initializer)); ++static int _TAO_FixedDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = ++ _TAO_FixedDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, _TAO_FixedDef_Proxy_Broker_Factory_Initializer)); /////////////////////////////////////////////////////////////////////// -@@ -16778,7 +16735,7 @@ - : ACE_NESTED_CLASS (POA_IR,TypedefDef) (rhs), - ACE_NESTED_CLASS (POA_IR,Contained) (rhs), - ACE_NESTED_CLASS (POA_IR,IDLType) (rhs), + // ThruPOA Proxy Implementation + // + +-POA_IR::_TAO_NativeDef_ThruPOA_Proxy_Impl::_TAO_NativeDef_ThruPOA_Proxy_Impl (void) ++POA_IR::_TAO_FixedDef_ThruPOA_Proxy_Impl::_TAO_FixedDef_ThruPOA_Proxy_Impl (void) + {} + +-// ThruPOA Implementation of the IDL interface methods +- +-// +-// End ThruPOA Proxy Implementation +-/////////////////////////////////////////////////////////////////////// +- +-// skeleton constructor +-POA_IR::NativeDef::NativeDef (void) +-{ +- this->optable_ = &tao_IR_NativeDef_optable; +-} +- +-// copy ctor +-POA_IR::NativeDef::NativeDef (const NativeDef& rhs) +- : ACE_NESTED_CLASS (POA_IR,TypedefDef) (rhs), +- ACE_NESTED_CLASS (POA_IR,Contained) (rhs), +- ACE_NESTED_CLASS (POA_IR,IDLType) (rhs), - ACE_NESTED_CLASS (POA_CORBA,IRObject) (rhs), -+ POA_CORBA_IRObject (rhs), - TAO_ServantBase (rhs) +- TAO_ServantBase (rhs) ++POA_IR::_TAO_FixedDef_ThruPOA_Proxy_Impl::~_TAO_FixedDef_ThruPOA_Proxy_Impl (void) {} -@@ -16798,7 +16755,7 @@ - POA_IR::NativeDef *_tao_impl = (POA_IR::NativeDef *) _tao_object_reference; - CORBA::Boolean _tao_retval = 0; - CORBA::String_var value; +-// skeleton destructor +-POA_IR::NativeDef::~NativeDef (void) +-{ +-} +- +-void POA_IR::NativeDef::_is_a_skel ( +- TAO_ServerRequest &_tao_server_request, +- void * _tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::NativeDef *_tao_impl = (POA_IR::NativeDef *) _tao_object_reference; +- CORBA::Boolean _tao_retval = 0; +- CORBA::String_var value; - if (!(_tao_in >> value.out ())) -+ if (!((_tao_in >> value.out ()))) - ACE_THROW (CORBA::MARSHAL ()); - - _tao_retval = _tao_impl->_is_a (value.in (), ACE_TRY_ENV); -@@ -16806,7 +16763,7 @@ - - _tao_server_request.init_reply (); - TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- ACE_THROW (CORBA::MARSHAL ()); +- +- _tao_retval = _tao_impl->_is_a (value.in (), ACE_TRY_ENV); +- ACE_CHECK; +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); - if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) -+ if (!((_tao_out << CORBA::Any::from_boolean (_tao_retval)))) - ACE_THROW (CORBA::MARSHAL ()); - } - -@@ -16823,7 +16780,7 @@ - - _tao_server_request.init_reply (); - TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- ACE_THROW (CORBA::MARSHAL ()); +-} ++// ThruPOA Implementation of the IDL interface methods + +-void POA_IR::NativeDef::_non_existent_skel ( +- TAO_ServerRequest &_tao_server_request, +- void * _tao_object_reference, +- void * /* context */, ++CORBA::UShort POA_IR::_TAO_FixedDef_ThruPOA_Proxy_Impl::digits ( ++ CORBA_Object *_collocated_tao_target_, + CORBA::Environment &ACE_TRY_ENV + ) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException ++ )) + { +- POA_IR::NativeDef *_tao_impl = (POA_IR::NativeDef *) _tao_object_reference; +- CORBA::Boolean _tao_retval = _tao_impl->_non_existent (ACE_TRY_ENV); +- ACE_CHECK; +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); - if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) -+ if (!((_tao_out << CORBA::Any::from_boolean (_tao_retval)))) - ACE_THROW (CORBA::MARSHAL ()); +- ACE_THROW (CORBA::MARSHAL ()); ++ CORBA::UShort _tao_retval = 0; ++ ACE_UNUSED_ARG (_tao_retval); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "digits", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK_RETURN (_tao_retval); ++ return ACE_reinterpret_cast ( ++ POA_IR::FixedDef_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/FixedDef:1.0" ++ ) ++ )->digits ( ++ ACE_TRY_ENV ++ ); } -@@ -16857,7 +16814,7 @@ - if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/IDLType:1.0") == 0) - return ACE_static_cast (POA_IR::IDLType_ptr, this); - if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/IRObject:1.0") == 0) +-CORBA::Boolean POA_IR::NativeDef::_is_a ( +- const char* value, ++void POA_IR::_TAO_FixedDef_ThruPOA_Proxy_Impl::digits ( ++ CORBA_Object *_collocated_tao_target_, ++ CORBA::UShort digits, + CORBA::Environment &ACE_TRY_ENV + ) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException ++ )) + { +- if ( +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/NativeDef:1.0")) || +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/TypedefDef:1.0")) || +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/Contained:1.0")) || +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/IDLType:1.0")) || +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/CORBA/IRObject:1.0")) || +- (!ACE_OS::strcmp ((char *)value, CORBA::_tc_Object->id (ACE_TRY_ENV)))) +- return 1; +- else +- return 0; ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "digits", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK; ++ ACE_reinterpret_cast ( ++ POA_IR::FixedDef_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/FixedDef:1.0" ++ ) ++ )->digits ( ++ digits, ++ ACE_TRY_ENV ++ ); ++ return; + } + +-void* POA_IR::NativeDef::_downcast ( +- const char* logical_type_id ++CORBA::Short POA_IR::_TAO_FixedDef_ThruPOA_Proxy_Impl::scale ( ++ CORBA_Object *_collocated_tao_target_, ++ CORBA::Environment &ACE_TRY_ENV + ) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException ++ )) + { +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/NativeDef:1.0") == 0) +- return ACE_static_cast (POA_IR::NativeDef_ptr, this); +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/TypedefDef:1.0") == 0) +- return ACE_static_cast (POA_IR::TypedefDef_ptr, this); +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Contained:1.0") == 0) +- return ACE_static_cast (POA_IR::Contained_ptr, this); +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/IDLType:1.0") == 0) +- return ACE_static_cast (POA_IR::IDLType_ptr, this); +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/IRObject:1.0") == 0) - return ACE_static_cast (POA_CORBA::IRObject_ptr, this); -+ return ACE_static_cast (POA_CORBA_IRObject_ptr, this); - if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/Object:1.0") == 0) - return ACE_static_cast(PortableServer::Servant, this); - return 0; -@@ -16887,12 +16844,12 @@ - ACE_NEW_RETURN (tmp, CORBA::Object (stub, 0, this), 0); - - CORBA::Object_var obj = tmp; -- return ::IR::NativeDef::_unchecked_narrow (obj.in ()); -+ return IR_NativeDef::_unchecked_narrow (obj.in ()); +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/Object:1.0") == 0) +- return ACE_static_cast(PortableServer::Servant, this); +- return 0; ++ CORBA::Short _tao_retval = 0; ++ ACE_UNUSED_ARG (_tao_retval); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "scale", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK_RETURN (_tao_retval); ++ return ACE_reinterpret_cast ( ++ POA_IR::FixedDef_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/FixedDef:1.0" ++ ) ++ )->scale ( ++ ACE_TRY_ENV ++ ); + } + +-void POA_IR::NativeDef::_dispatch (TAO_ServerRequest &req, void *context, CORBA::Environment &ACE_TRY_ENV) ++void POA_IR::_TAO_FixedDef_ThruPOA_Proxy_Impl::scale ( ++ CORBA_Object *_collocated_tao_target_, ++ CORBA::Short scale, ++ CORBA::Environment &ACE_TRY_ENV ++ ) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException ++ )) + { +- this->synchronous_upcall_dispatch(req, context, this, ACE_TRY_ENV); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "scale", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK; ++ ACE_reinterpret_cast ( ++ POA_IR::FixedDef_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/FixedDef:1.0" ++ ) ++ )->scale ( ++ scale, ++ ACE_TRY_ENV ++ ); ++ return; } -- - #if (TAO_HAS_INTERCEPTORS == 1) - #endif /* TAO_HAS_INTERCEPTORS */ -+ - class TAO_IR_PrimitiveDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable +-const char* POA_IR::NativeDef::_interface_repository_id (void) const +-{ +- return "IDL:omg.org/IR/NativeDef:1.0"; +-} ++// ++// End ThruPOA Proxy Implementation ++/////////////////////////////////////////////////////////////////////// + +-IR::NativeDef* +-POA_IR::NativeDef::_this (CORBA_Environment &ACE_TRY_ENV) ++// skeleton constructor ++POA_IR::FixedDef::FixedDef (void) { - private: -@@ -16900,7 +16857,7 @@ - public: - const TAO_operation_db_entry * lookup (const char *str, unsigned int len); - }; --/* starting time is 18:47:28 */ -+/* starting time is 11:23:10 */ - /* C++ code produced by gperf version 2.8 (ACE version) */ - /* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_PrimitiveDef_Perfect_Hash_OpTable -N lookup */ - unsigned int -@@ -16997,10 +16954,9 @@ - } - return 0; +- TAO_Stub *stub = this->_create_stub (ACE_TRY_ENV); +- ACE_CHECK_RETURN (0); +- +- CORBA::Object_ptr tmp = CORBA::Object::_nil (); +- +- if (stub->servant_orb_var ()->orb_core ()->optimize_collocation_objects ()) +- ACE_NEW_RETURN (tmp, CORBA::Object (stub, 1, this), 0); +- else +- ACE_NEW_RETURN (tmp, CORBA::Object (stub, 0, this), 0); +- +- CORBA::Object_var obj = tmp; +- return ::IR::NativeDef::_unchecked_narrow (obj.in ()); ++ this->optable_ = &tao_IR_FixedDef_optable; } --/* ending time is 18:47:28 */ -+/* ending time is 11:23:10 */ - static TAO_IR_PrimitiveDef_Perfect_Hash_OpTable tao_IR_PrimitiveDef_optable; -- - /////////////////////////////////////////////////////////////////////// - // Strategized Proxy Broker Implementation - // -@@ -17026,9 +16982,9 @@ - - } ++// copy ctor ++POA_IR::FixedDef::FixedDef (const FixedDef& rhs) ++ : ACE_NESTED_CLASS (POA_IR,IDLType) (rhs), ++ POA_CORBA_IRObject (rhs), ++ TAO_ServantBase (rhs) ++{} +-#if (TAO_HAS_INTERCEPTORS == 1) +-#endif /* TAO_HAS_INTERCEPTORS */ +-class TAO_IR_PrimitiveDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable +-{ +-private: +- unsigned int hash (const char *str, unsigned int len); +-public: +- const TAO_operation_db_entry * lookup (const char *str, unsigned int len); +-}; +-/* starting time is 16:31:12 */ +-/* C++ code produced by gperf version 2.8 (ACE version) */ +-/* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_PrimitiveDef_Perfect_Hash_OpTable -N lookup */ +-unsigned int +-TAO_IR_PrimitiveDef_Perfect_Hash_OpTable::hash (const char *str, unsigned int len) ++// skeleton destructor ++POA_IR::FixedDef::~FixedDef (void) + { +- static const unsigned char asso_values[] = +- { +-#if defined (ACE_MVS) +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 0, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 0, +- 19, 19, 0, 5, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 5, 19, 19, 19, 19, 0, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, +-#else +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 0, 19, 0, 19, 19, +- 0, 5, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 5, 19, 19, 19, +- 19, 0, 19, 19, 19, 19, 19, 19, +-#endif /* ACE_MVS */ +- }; +- return len + asso_values[str[len - 1]] + asso_values[str[0]]; + } + +-const class TAO_operation_db_entry * +-TAO_IR_PrimitiveDef_Perfect_Hash_OpTable::lookup (const char *str, unsigned int len) ++void POA_IR::FixedDef::_get_digits_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) + { +- enum +- { +- TOTAL_KEYWORDS = 6, +- MIN_WORD_LENGTH = 5, +- MAX_WORD_LENGTH = 13, +- MIN_HASH_VALUE = 5, +- MAX_HASH_VALUE = 18, +- HASH_VALUE_RANGE = 14, +- DUPLICATES = 0 +- }; ++ POA_IR::FixedDef *_tao_impl = (POA_IR::FixedDef *)_tao_object_reference; + +- static const class TAO_operation_db_entry wordlist[] = +- { +- {"",0},{"",0},{"",0},{"",0},{"",0}, +- {"_is_a", &POA_IR::PrimitiveDef::_is_a_skel}, +- {"",0}, +- {"destroy", &POA_IR::PrimitiveDef::destroy_skel}, +- {"",0}, +- {"_get_kind", &POA_IR::PrimitiveDef::_get_kind_skel}, +- {"",0},{"",0},{"",0}, +- {"_get_def_kind", &POA_IR::PrimitiveDef::_get_def_kind_skel}, +- {"_get_type", &POA_IR::PrimitiveDef::_get_type_skel}, +- {"",0},{"",0},{"",0}, +- {"_non_existent", &POA_IR::PrimitiveDef::_non_existent_skel}, +- }; ++ CORBA::UShort _tao_retval = 0; + +- if (len <= MAX_WORD_LENGTH && len >= MIN_WORD_LENGTH) +- { +- unsigned int key = hash (str, len); ++ _tao_retval = _tao_impl->digits ( ++ ACE_TRY_ENV ++ ); + +- if (key <= MAX_HASH_VALUE && key >= MIN_HASH_VALUE) +- { +- const char *s = wordlist[key].opname_; ++ ACE_CHECK; + +- if (*str == *s && !strncmp (str + 1, s + 1, len - 1)) +- return &wordlist[key]; +- } +- } +- return 0; ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!( ++ (_tao_out << _tao_retval) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + } +-/* ending time is 16:31:12 */ +-static TAO_IR_PrimitiveDef_Perfect_Hash_OpTable tao_IR_PrimitiveDef_optable; +- +- +-/////////////////////////////////////////////////////////////////////// +-// Strategized Proxy Broker Implementation +-// + +-// Factory function Implementation. +-POA_IR::_TAO_PrimitiveDef_Strategized_Proxy_Broker *POA_IR::_TAO_PrimitiveDef_Strategized_Proxy_Broker::the_TAO_PrimitiveDef_Strategized_Proxy_Broker (void) ++void POA_IR::FixedDef::_set_digits_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) + { +- static POA_IR::_TAO_PrimitiveDef_Strategized_Proxy_Broker strategized_proxy_broker; +- return &strategized_proxy_broker; +-} +- +-POA_IR::_TAO_PrimitiveDef_Strategized_Proxy_Broker::_TAO_PrimitiveDef_Strategized_Proxy_Broker (void) +-{ +- for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) +- this->proxy_cache_[i] = 0; +- +-} +- +-POA_IR::_TAO_PrimitiveDef_Strategized_Proxy_Broker::~_TAO_PrimitiveDef_Strategized_Proxy_Broker (void) +-{ +- for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) +- delete this->proxy_cache_[i]; +- +-} +- -IR::_TAO_PrimitiveDef_Proxy_Impl& -+_TAO_PrimitiveDef_Proxy_Impl& - POA_IR::_TAO_PrimitiveDef_Strategized_Proxy_Broker::select_proxy ( +-POA_IR::_TAO_PrimitiveDef_Strategized_Proxy_Broker::select_proxy ( - ::IR::PrimitiveDef *object, -+ IR_PrimitiveDef *object, - CORBA::Environment &ACE_TRY_ENV - ) - { -@@ -17060,7 +17016,7 @@ - case TAO_ORB_Core::THRU_POA_STRATEGY: - ACE_NEW_THROW_EX ( - this->proxy_cache_[strategy], +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- TAO_ORB_Core::TAO_Collocation_Strategies strategy = +- TAO_ORB_Core::collocation_strategy (object); +- +- if (this->proxy_cache_[strategy] != 0) +- return *this->proxy_cache_[strategy]; +- +- this->create_proxy (strategy, ACE_TRY_ENV); +- ACE_CHECK_RETURN (*this->proxy_cache_[strategy]); +- +- return *this->proxy_cache_[strategy]; +- +-} +- +-void +-POA_IR::_TAO_PrimitiveDef_Strategized_Proxy_Broker::create_proxy ( +- TAO_ORB_Core::TAO_Collocation_Strategies strategy, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- ACE_GUARD (TAO_SYNCH_MUTEX, guard, this->mutex_); +- +- if (this->proxy_cache_[strategy] == 0) +- { +- switch (strategy) +- { +- case TAO_ORB_Core::THRU_POA_STRATEGY: +- ACE_NEW_THROW_EX ( +- this->proxy_cache_[strategy], - POA_IR::_TAO_PrimitiveDef_ThruPOA_Proxy_Impl, -+ _TAO_PrimitiveDef_ThruPOA_Proxy_Impl, - CORBA::NO_MEMORY () - ); - ACE_CHECK; -@@ -17070,7 +17026,7 @@ - default: - ACE_NEW_THROW_EX ( - this->proxy_cache_[strategy], +- CORBA::NO_MEMORY () +- ); +- ACE_CHECK; +- break; +- +- case TAO_ORB_Core::REMOTE_STRATEGY: +- default: +- ACE_NEW_THROW_EX ( +- this->proxy_cache_[strategy], - ::IR::_TAO_PrimitiveDef_Remote_Proxy_Impl, -+ _TAO_PrimitiveDef_Remote_Proxy_Impl, - CORBA::NO_MEMORY () - ); - ACE_CHECK; -@@ -17087,26 +17043,26 @@ - /////////////////////////////////////////////////////////////////////// +- CORBA::NO_MEMORY () +- ); +- ACE_CHECK; +- break; +- +- } +- +- } +-} ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::FixedDef *_tao_impl = (POA_IR::FixedDef *)_tao_object_reference; + ++ CORBA::UShort digits; ++ if (!( ++ (_tao_in >> digits) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + +-// +-// End Strategized Proxy Broker Implementation +-/////////////////////////////////////////////////////////////////////// ++ _tao_impl->digits ( ++ digits, ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK; -IR::_TAO_PrimitiveDef_Proxy_Broker * -IR__TAO_PrimitiveDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) -+_TAO_PrimitiveDef_Proxy_Broker * -+_TAO_PrimitiveDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) - { - ACE_UNUSED_ARG (obj); - return ::POA_IR::_TAO_PrimitiveDef_Strategized_Proxy_Broker::the_TAO_PrimitiveDef_Strategized_Proxy_Broker(); +-{ +- ACE_UNUSED_ARG (obj); +- return ::POA_IR::_TAO_PrimitiveDef_Strategized_Proxy_Broker::the_TAO_PrimitiveDef_Strategized_Proxy_Broker(); ++ _tao_server_request.init_reply (); } - int +-int -IR__TAO_PrimitiveDef_Proxy_Broker_Factory_Initializer (long _dummy_) -+_TAO_PrimitiveDef_Proxy_Broker_Factory_Initializer (long _dummy_) - { - ACE_UNUSED_ARG (_dummy_); - ++void POA_IR::FixedDef::_get_scale_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) + { +- ACE_UNUSED_ARG (_dummy_); +- - IR__TAO_PrimitiveDef_Proxy_Broker_Factory_function_pointer = - IR__TAO_PrimitiveDef_Proxy_Broker_Factory_function; -+ _TAO_PrimitiveDef_Proxy_Broker_Factory_function_pointer = -+ _TAO_PrimitiveDef_Proxy_Broker_Factory_function; - - return 0; - } - +- +- return 0; +-} +- -static int IR__TAO_PrimitiveDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = - IR__TAO_PrimitiveDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, IR__TAO_PrimitiveDef_Proxy_Broker_Factory_Initializer)); -+static int _TAO_PrimitiveDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = -+ _TAO_PrimitiveDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, _TAO_PrimitiveDef_Proxy_Broker_Factory_Initializer)); - - - /////////////////////////////////////////////////////////////////////// -@@ -17118,7 +17074,7 @@ +- +- +-/////////////////////////////////////////////////////////////////////// +-// ThruPOA Proxy Implementation +-// +- +-POA_IR::_TAO_PrimitiveDef_ThruPOA_Proxy_Impl::_TAO_PrimitiveDef_ThruPOA_Proxy_Impl (void) +-{} ++ POA_IR::FixedDef *_tao_impl = (POA_IR::FixedDef *)_tao_object_reference; - // ThruPOA Implementation of the IDL interface methods +-// ThruPOA Implementation of the IDL interface methods ++ CORBA::Short _tao_retval = 0; -IR::PrimitiveKind POA_IR::_TAO_PrimitiveDef_ThruPOA_Proxy_Impl::kind ( -+IR_PrimitiveKind POA_IR::_TAO_PrimitiveDef_ThruPOA_Proxy_Impl::kind ( - CORBA_Object *_collocated_tao_target_, - CORBA::Environment &ACE_TRY_ENV - ) -@@ -17126,7 +17082,7 @@ - CORBA::SystemException - )) - { -- IR::PrimitiveKind _tao_retval; -+ IR_PrimitiveKind _tao_retval; - ACE_UNUSED_ARG (_tao_retval); - TAO_Object_Adapter::Servant_Upcall servant_upcall ( - _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -17162,7 +17118,7 @@ - // copy ctor - POA_IR::PrimitiveDef::PrimitiveDef (const PrimitiveDef& rhs) - : ACE_NESTED_CLASS (POA_IR,IDLType) (rhs), -- ACE_NESTED_CLASS (POA_CORBA,IRObject) (rhs), -+ POA_CORBA_IRObject (rhs), - TAO_ServantBase (rhs) - {} - -@@ -17180,7 +17136,7 @@ - { - POA_IR::PrimitiveDef *_tao_impl = (POA_IR::PrimitiveDef *)_tao_object_reference; - +- CORBA_Object *_collocated_tao_target_, +- CORBA::Environment &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) +-{ - IR::PrimitiveKind _tao_retval; -+ IR_PrimitiveKind _tao_retval; - - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( -@@ -17207,7 +17163,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::PrimitiveKind _tao_retval_info = _tao_retval; -+ IR_PrimitiveKind _tao_retval_info = _tao_retval; - ri.result (_tao_retval_info); - ri.reply_status (PortableInterceptor::SUCCESSFUL); - _tao_vfr.send_reply (&ri, ACE_TRY_ENV); -@@ -17261,7 +17217,7 @@ - POA_IR::PrimitiveDef *_tao_impl = (POA_IR::PrimitiveDef *) _tao_object_reference; - CORBA::Boolean _tao_retval = 0; - CORBA::String_var value; -- if (!(_tao_in >> value.out ())) -+ if (!((_tao_in >> value.out ()))) - ACE_THROW (CORBA::MARSHAL ()); - - _tao_retval = _tao_impl->_is_a (value.in (), ACE_TRY_ENV); -@@ -17269,7 +17225,7 @@ - - _tao_server_request.init_reply (); - TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); -- if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) -+ if (!((_tao_out << CORBA::Any::from_boolean (_tao_retval)))) - ACE_THROW (CORBA::MARSHAL ()); - } +- ACE_UNUSED_ARG (_tao_retval); +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "kind", +- forward_to.out (), ++ _tao_retval = _tao_impl->scale ( + ACE_TRY_ENV + ); +- ACE_CHECK_RETURN (_tao_retval); +- return ACE_reinterpret_cast ( +- POA_IR::PrimitiveDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/PrimitiveDef:1.0" +- ) +- )->kind ( +- ACE_TRY_ENV +- ); +-} +- +-// +-// End ThruPOA Proxy Implementation +-/////////////////////////////////////////////////////////////////////// +- +-// skeleton constructor +-POA_IR::PrimitiveDef::PrimitiveDef (void) +-{ +- this->optable_ = &tao_IR_PrimitiveDef_optable; +-} -@@ -17286,7 +17242,7 @@ - - _tao_server_request.init_reply (); - TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); -- if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) -+ if (!((_tao_out << CORBA::Any::from_boolean (_tao_retval)))) - ACE_THROW (CORBA::MARSHAL ()); - } +-// copy ctor +-POA_IR::PrimitiveDef::PrimitiveDef (const PrimitiveDef& rhs) +- : ACE_NESTED_CLASS (POA_IR,IDLType) (rhs), +- ACE_NESTED_CLASS (POA_CORBA,IRObject) (rhs), +- TAO_ServantBase (rhs) +-{} ++ ACE_CHECK; -@@ -17314,7 +17270,7 @@ - if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/IDLType:1.0") == 0) - return ACE_static_cast (POA_IR::IDLType_ptr, this); - if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/IRObject:1.0") == 0) -- return ACE_static_cast (POA_CORBA::IRObject_ptr, this); -+ return ACE_static_cast (POA_CORBA_IRObject_ptr, this); - if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/Object:1.0") == 0) - return ACE_static_cast(PortableServer::Servant, this); - return 0; -@@ -17344,10 +17300,9 @@ - ACE_NEW_RETURN (tmp, CORBA::Object (stub, 0, this), 0); - - CORBA::Object_var obj = tmp; -- return ::IR::PrimitiveDef::_unchecked_narrow (obj.in ()); -+ return IR_PrimitiveDef::_unchecked_narrow (obj.in ()); +-// skeleton destructor +-POA_IR::PrimitiveDef::~PrimitiveDef (void) +-{ ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!( ++ (_tao_out << _tao_retval) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); } -- - #if (TAO_HAS_INTERCEPTORS == 1) - POA_IR::PrimitiveDef::TAO_ServerRequestInfo_IR_PrimitiveDef_kind_get::TAO_ServerRequestInfo_IR_PrimitiveDef_kind_get ( +-void POA_IR::PrimitiveDef::_get_kind_skel ( ++void POA_IR::FixedDef::_set_scale_skel ( TAO_ServerRequest &_tao_server_request, -@@ -17425,6 +17380,7 @@ - } - - #endif /* TAO_HAS_INTERCEPTORS */ +- void *_tao_object_reference, +- void * /* context */, ++ void *_tao_object_reference, ++ void * /* context */, + CORBA::Environment &ACE_TRY_ENV +- ) ++) + { +- POA_IR::PrimitiveDef *_tao_impl = (POA_IR::PrimitiveDef *)_tao_object_reference; ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::FixedDef *_tao_impl = (POA_IR::FixedDef *)_tao_object_reference; + +- IR::PrimitiveKind _tao_retval; ++ CORBA::Short scale; ++ if (!( ++ (_tao_in >> scale) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::PrimitiveDef::TAO_ServerRequestInfo_IR_PrimitiveDef_kind_get ri ( +- _tao_server_request, +- _tao_impl +- , ++ _tao_impl->scale ( ++ scale, + ACE_TRY_ENV + ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->kind ( +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::PrimitiveKind _tao_retval_info = _tao_retval; +- ri.result (_tao_retval_info); +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; + - class TAO_IR_StringDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable - { - private: -@@ -17432,7 +17388,7 @@ - public: - const TAO_operation_db_entry * lookup (const char *str, unsigned int len); - }; --/* starting time is 18:47:28 */ -+/* starting time is 11:23:10 */ - /* C++ code produced by gperf version 2.8 (ACE version) */ - /* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_StringDef_Perfect_Hash_OpTable -N lookup */ - unsigned int -@@ -17549,10 +17505,9 @@ - } - return 0; - } --/* ending time is 18:47:28 */ -+/* ending time is 11:23:10 */ - static TAO_IR_StringDef_Perfect_Hash_OpTable tao_IR_StringDef_optable; + ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << _tao_retval) +- )) +- ACE_THROW (CORBA::MARSHAL()); -- - /////////////////////////////////////////////////////////////////////// - // Strategized Proxy Broker Implementation - // -@@ -17578,9 +17533,9 @@ - ++ _tao_server_request.init_reply (); } --IR::_TAO_StringDef_Proxy_Impl& -+_TAO_StringDef_Proxy_Impl& - POA_IR::_TAO_StringDef_Strategized_Proxy_Broker::select_proxy ( -- ::IR::StringDef *object, -+ IR_StringDef *object, +-void POA_IR::PrimitiveDef::_is_a_skel ( +- TAO_ServerRequest &_tao_server_request, ++void POA_IR::FixedDef::_is_a_skel ( ++ TAO_ServerRequest &_tao_server_request, + void * _tao_object_reference, + void * /* context */, CORBA::Environment &ACE_TRY_ENV ) { -@@ -17612,7 +17567,7 @@ - case TAO_ORB_Core::THRU_POA_STRATEGY: - ACE_NEW_THROW_EX ( - this->proxy_cache_[strategy], -- POA_IR::_TAO_StringDef_ThruPOA_Proxy_Impl, -+ _TAO_StringDef_ThruPOA_Proxy_Impl, - CORBA::NO_MEMORY () - ); - ACE_CHECK; -@@ -17622,7 +17577,7 @@ - default: - ACE_NEW_THROW_EX ( - this->proxy_cache_[strategy], -- ::IR::_TAO_StringDef_Remote_Proxy_Impl, -+ _TAO_StringDef_Remote_Proxy_Impl, - CORBA::NO_MEMORY () - ); - ACE_CHECK; -@@ -17639,26 +17594,26 @@ - /////////////////////////////////////////////////////////////////////// - - --IR::_TAO_StringDef_Proxy_Broker * --IR__TAO_StringDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) -+_TAO_StringDef_Proxy_Broker * -+_TAO_StringDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) - { - ACE_UNUSED_ARG (obj); - return ::POA_IR::_TAO_StringDef_Strategized_Proxy_Broker::the_TAO_StringDef_Strategized_Proxy_Broker(); - } - - int --IR__TAO_StringDef_Proxy_Broker_Factory_Initializer (long _dummy_) -+_TAO_StringDef_Proxy_Broker_Factory_Initializer (long _dummy_) - { - ACE_UNUSED_ARG (_dummy_); - -- IR__TAO_StringDef_Proxy_Broker_Factory_function_pointer = -- IR__TAO_StringDef_Proxy_Broker_Factory_function; -+ _TAO_StringDef_Proxy_Broker_Factory_function_pointer = -+ _TAO_StringDef_Proxy_Broker_Factory_function; - - return 0; - } - --static int IR__TAO_StringDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = -- IR__TAO_StringDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, IR__TAO_StringDef_Proxy_Broker_Factory_Initializer)); -+static int _TAO_StringDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = -+ _TAO_StringDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, _TAO_StringDef_Proxy_Broker_Factory_Initializer)); - - - /////////////////////////////////////////////////////////////////////// -@@ -17746,7 +17701,7 @@ - // copy ctor - POA_IR::StringDef::StringDef (const StringDef& rhs) - : ACE_NESTED_CLASS (POA_IR,IDLType) (rhs), -- ACE_NESTED_CLASS (POA_CORBA,IRObject) (rhs), -+ POA_CORBA_IRObject (rhs), - TAO_ServantBase (rhs) - {} - -@@ -17844,14 +17799,12 @@ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); - POA_IR::StringDef *_tao_impl = (POA_IR::StringDef *)_tao_object_reference; - -- _tao_server_request.argument_flag (0); - CORBA::ULong bound; - if (!( - (_tao_in >> bound) - )) - ACE_THROW (CORBA::MARSHAL()); - -- - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( - _tao_server_request.orb_core ()->server_request_interceptors (), -@@ -17924,7 +17877,7 @@ - POA_IR::StringDef *_tao_impl = (POA_IR::StringDef *) _tao_object_reference; +- POA_IR::PrimitiveDef *_tao_impl = (POA_IR::PrimitiveDef *) _tao_object_reference; ++ POA_IR::FixedDef *_tao_impl = (POA_IR::FixedDef *) _tao_object_reference; CORBA::Boolean _tao_retval = 0; CORBA::String_var value; - if (!(_tao_in >> value.out ())) + if (!((_tao_in >> value.out ()))) ACE_THROW (CORBA::MARSHAL ()); - +- ++ _tao_retval = _tao_impl->_is_a (value.in (), ACE_TRY_ENV); -@@ -17932,7 +17885,7 @@ - + ACE_CHECK; +- ++ _tao_server_request.init_reply (); TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); - if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) @@ -4725,8 +21871,21 @@ ACE_THROW (CORBA::MARSHAL ()); } -@@ -17949,7 +17902,7 @@ - +-void POA_IR::PrimitiveDef::_non_existent_skel ( +- TAO_ServerRequest &_tao_server_request, ++void POA_IR::FixedDef::_non_existent_skel ( ++ TAO_ServerRequest &_tao_server_request, + void * _tao_object_reference, + void * /* context */, + CORBA::Environment &ACE_TRY_ENV + ) + { +- POA_IR::PrimitiveDef *_tao_impl = (POA_IR::PrimitiveDef *) _tao_object_reference; ++ POA_IR::FixedDef *_tao_impl = (POA_IR::FixedDef *) _tao_object_reference; + CORBA::Boolean _tao_retval = _tao_impl->_non_existent (ACE_TRY_ENV); + ACE_CHECK; +- ++ _tao_server_request.init_reply (); TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); - if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) @@ -4734,7 +21893,31 @@ ACE_THROW (CORBA::MARSHAL ()); } -@@ -17977,7 +17930,7 @@ +-CORBA::Boolean POA_IR::PrimitiveDef::_is_a ( ++CORBA::Boolean POA_IR::FixedDef::_is_a ( + const char* value, + CORBA::Environment &ACE_TRY_ENV + ) + { + if ( +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/PrimitiveDef:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/FixedDef:1.0")) || + (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/IDLType:1.0")) || + (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/CORBA/IRObject:1.0")) || + (!ACE_OS::strcmp ((char *)value, CORBA::_tc_Object->id (ACE_TRY_ENV)))) +@@ -17313,33 +10912,33 @@ + return 0; + } + +-void* POA_IR::PrimitiveDef::_downcast ( ++void* POA_IR::FixedDef::_downcast ( + const char* logical_type_id + ) + { +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/PrimitiveDef:1.0") == 0) +- return ACE_static_cast (POA_IR::PrimitiveDef_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/FixedDef:1.0") == 0) ++ return ACE_static_cast (POA_IR::FixedDef_ptr, this); if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/IDLType:1.0") == 0) return ACE_static_cast (POA_IR::IDLType_ptr, this); if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/IRObject:1.0") == 0) @@ -4743,552 +21926,831 @@ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/Object:1.0") == 0) return ACE_static_cast(PortableServer::Servant, this); return 0; -@@ -18007,10 +17960,9 @@ - ACE_NEW_RETURN (tmp, CORBA::Object (stub, 0, this), 0); - - CORBA::Object_var obj = tmp; -- return ::IR::StringDef::_unchecked_narrow (obj.in ()); -+ return IR_StringDef::_unchecked_narrow (obj.in ()); - } - -- - #if (TAO_HAS_INTERCEPTORS == 1) - POA_IR::StringDef::TAO_ServerRequestInfo_IR_StringDef_bound_get::TAO_ServerRequestInfo_IR_StringDef_bound_get ( - TAO_ServerRequest &_tao_server_request, -@@ -18161,6 +18113,7 @@ } - #endif /* TAO_HAS_INTERCEPTORS */ -+ - class TAO_IR_WstringDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable +-void POA_IR::PrimitiveDef::_dispatch (TAO_ServerRequest &req, void *context, CORBA::Environment &ACE_TRY_ENV) ++void POA_IR::FixedDef::_dispatch (TAO_ServerRequest &req, void *context, CORBA::Environment &ACE_TRY_ENV) { - private: -@@ -18168,7 +18121,7 @@ - public: - const TAO_operation_db_entry * lookup (const char *str, unsigned int len); - }; --/* starting time is 18:47:28 */ -+/* starting time is 11:23:10 */ - /* C++ code produced by gperf version 2.8 (ACE version) */ - /* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_WstringDef_Perfect_Hash_OpTable -N lookup */ - unsigned int -@@ -18285,10 +18238,9 @@ - } - return 0; - } --/* ending time is 18:47:28 */ -+/* ending time is 11:23:10 */ - static TAO_IR_WstringDef_Perfect_Hash_OpTable tao_IR_WstringDef_optable; - -- - /////////////////////////////////////////////////////////////////////// - // Strategized Proxy Broker Implementation - // -@@ -18314,9 +18266,9 @@ - + this->synchronous_upcall_dispatch(req, context, this, ACE_TRY_ENV); } --IR::_TAO_WstringDef_Proxy_Impl& -+_TAO_WstringDef_Proxy_Impl& - POA_IR::_TAO_WstringDef_Strategized_Proxy_Broker::select_proxy ( -- ::IR::WstringDef *object, -+ IR_WstringDef *object, - CORBA::Environment &ACE_TRY_ENV - ) - { -@@ -18348,7 +18300,7 @@ - case TAO_ORB_Core::THRU_POA_STRATEGY: - ACE_NEW_THROW_EX ( - this->proxy_cache_[strategy], -- POA_IR::_TAO_WstringDef_ThruPOA_Proxy_Impl, -+ _TAO_WstringDef_ThruPOA_Proxy_Impl, - CORBA::NO_MEMORY () - ); - ACE_CHECK; -@@ -18358,7 +18310,7 @@ - default: - ACE_NEW_THROW_EX ( - this->proxy_cache_[strategy], -- ::IR::_TAO_WstringDef_Remote_Proxy_Impl, -+ _TAO_WstringDef_Remote_Proxy_Impl, - CORBA::NO_MEMORY () - ); - ACE_CHECK; -@@ -18375,26 +18327,26 @@ - /////////////////////////////////////////////////////////////////////// - - --IR::_TAO_WstringDef_Proxy_Broker * --IR__TAO_WstringDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) -+_TAO_WstringDef_Proxy_Broker * -+_TAO_WstringDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) +-const char* POA_IR::PrimitiveDef::_interface_repository_id (void) const ++const char* POA_IR::FixedDef::_interface_repository_id (void) const { - ACE_UNUSED_ARG (obj); - return ::POA_IR::_TAO_WstringDef_Strategized_Proxy_Broker::the_TAO_WstringDef_Strategized_Proxy_Broker(); +- return "IDL:omg.org/IR/PrimitiveDef:1.0"; ++ return "IDL:omg.org/IR/FixedDef:1.0"; } - int --IR__TAO_WstringDef_Proxy_Broker_Factory_Initializer (long _dummy_) -+_TAO_WstringDef_Proxy_Broker_Factory_Initializer (long _dummy_) +-IR::PrimitiveDef* +-POA_IR::PrimitiveDef::_this (CORBA_Environment &ACE_TRY_ENV) ++IR::FixedDef* ++POA_IR::FixedDef::_this (CORBA_Environment &ACE_TRY_ENV) { - ACE_UNUSED_ARG (_dummy_); - -- IR__TAO_WstringDef_Proxy_Broker_Factory_function_pointer = -- IR__TAO_WstringDef_Proxy_Broker_Factory_function; -+ _TAO_WstringDef_Proxy_Broker_Factory_function_pointer = -+ _TAO_WstringDef_Proxy_Broker_Factory_function; - - return 0; - } - --static int IR__TAO_WstringDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = -- IR__TAO_WstringDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, IR__TAO_WstringDef_Proxy_Broker_Factory_Initializer)); -+static int _TAO_WstringDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = -+ _TAO_WstringDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, _TAO_WstringDef_Proxy_Broker_Factory_Initializer)); - - - /////////////////////////////////////////////////////////////////////// -@@ -18482,7 +18434,7 @@ - // copy ctor - POA_IR::WstringDef::WstringDef (const WstringDef& rhs) - : ACE_NESTED_CLASS (POA_IR,IDLType) (rhs), -- ACE_NESTED_CLASS (POA_CORBA,IRObject) (rhs), -+ POA_CORBA_IRObject (rhs), - TAO_ServantBase (rhs) - {} - -@@ -18580,14 +18532,12 @@ - TAO_InputCDR &_tao_in = _tao_server_request.incoming (); - POA_IR::WstringDef *_tao_impl = (POA_IR::WstringDef *)_tao_object_reference; - -- _tao_server_request.argument_flag (0); - CORBA::ULong bound; - if (!( - (_tao_in >> bound) - )) - ACE_THROW (CORBA::MARSHAL()); - -- - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( - _tao_server_request.orb_core ()->server_request_interceptors (), -@@ -18660,7 +18610,7 @@ - POA_IR::WstringDef *_tao_impl = (POA_IR::WstringDef *) _tao_object_reference; - CORBA::Boolean _tao_retval = 0; - CORBA::String_var value; -- if (!(_tao_in >> value.out ())) -+ if (!((_tao_in >> value.out ()))) - ACE_THROW (CORBA::MARSHAL ()); - - _tao_retval = _tao_impl->_is_a (value.in (), ACE_TRY_ENV); -@@ -18668,7 +18618,7 @@ - - _tao_server_request.init_reply (); - TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); -- if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) -+ if (!((_tao_out << CORBA::Any::from_boolean (_tao_retval)))) - ACE_THROW (CORBA::MARSHAL ()); - } - -@@ -18685,7 +18635,7 @@ - - _tao_server_request.init_reply (); - TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); -- if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) -+ if (!((_tao_out << CORBA::Any::from_boolean (_tao_retval)))) - ACE_THROW (CORBA::MARSHAL ()); - } - -@@ -18713,7 +18663,7 @@ - if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/IDLType:1.0") == 0) - return ACE_static_cast (POA_IR::IDLType_ptr, this); - if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/IRObject:1.0") == 0) -- return ACE_static_cast (POA_CORBA::IRObject_ptr, this); -+ return ACE_static_cast (POA_CORBA_IRObject_ptr, this); - if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/Object:1.0") == 0) - return ACE_static_cast(PortableServer::Servant, this); - return 0; -@@ -18743,10 +18693,9 @@ + TAO_Stub *stub = this->_create_stub (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); +@@ -17352,179 +10951,103 @@ ACE_NEW_RETURN (tmp, CORBA::Object (stub, 0, this), 0); CORBA::Object_var obj = tmp; -- return ::IR::WstringDef::_unchecked_narrow (obj.in ()); -+ return IR_WstringDef::_unchecked_narrow (obj.in ()); - } - +- return ::IR::PrimitiveDef::_unchecked_narrow (obj.in ()); +-} - - #if (TAO_HAS_INTERCEPTORS == 1) - POA_IR::WstringDef::TAO_ServerRequestInfo_IR_WstringDef_bound_get::TAO_ServerRequestInfo_IR_WstringDef_bound_get ( - TAO_ServerRequest &_tao_server_request, -@@ -18897,6 +18846,7 @@ +- +-#if (TAO_HAS_INTERCEPTORS == 1) +-POA_IR::PrimitiveDef::TAO_ServerRequestInfo_IR_PrimitiveDef_kind_get::TAO_ServerRequestInfo_IR_PrimitiveDef_kind_get ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::PrimitiveDef *tao_impl +- , +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl) +-{} +- +-Dynamic::ParameterList * +-POA_IR::PrimitiveDef::TAO_ServerRequestInfo_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 * +-POA_IR::PrimitiveDef::TAO_ServerRequestInfo_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 * +-POA_IR::PrimitiveDef::TAO_ServerRequestInfo_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 (); +-} +- +-char * +-POA_IR::PrimitiveDef::TAO_ServerRequestInfo_IR_PrimitiveDef_kind_get::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::PrimitiveDef::TAO_ServerRequestInfo_IR_PrimitiveDef_kind_get::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-void +-POA_IR::PrimitiveDef::TAO_ServerRequestInfo_IR_PrimitiveDef_kind_get::result (IR::PrimitiveKind result) +-{ +- // Update the result. +- this->_result = result; ++ return IR_FixedDef::_unchecked_narrow (obj.in ()); } - #endif /* TAO_HAS_INTERCEPTORS */ -+ - class TAO_IR_FixedDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable +-#endif /* TAO_HAS_INTERCEPTORS */ +-class TAO_IR_StringDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable ++class TAO_IR_SequenceDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable { private: -@@ -18904,7 +18854,7 @@ + unsigned int hash (const char *str, unsigned int len); public: const TAO_operation_db_entry * lookup (const char *str, unsigned int len); }; --/* starting time is 18:47:28 */ +-/* starting time is 16:31:12 */ +/* starting time is 11:23:10 */ /* C++ code produced by gperf version 2.8 (ACE version) */ - /* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_FixedDef_Perfect_Hash_OpTable -N lookup */ +-/* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_StringDef_Perfect_Hash_OpTable -N lookup */ ++/* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_SequenceDef_Perfect_Hash_OpTable -N lookup */ unsigned int -@@ -19023,10 +18973,9 @@ - } - return 0; - } --/* ending time is 18:47:28 */ -+/* ending time is 11:23:10 */ - static TAO_IR_FixedDef_Perfect_Hash_OpTable tao_IR_FixedDef_optable; - -- - /////////////////////////////////////////////////////////////////////// - // Strategized Proxy Broker Implementation - // -@@ -19052,9 +19001,9 @@ - +-TAO_IR_StringDef_Perfect_Hash_OpTable::hash (const char *str, unsigned int len) ++TAO_IR_SequenceDef_Perfect_Hash_OpTable::hash (const char *str, unsigned int len) + { + static const unsigned char asso_values[] = + { + #if defined (ACE_MVS) +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 0, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 0, +- 19, 19, 0, 0, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 5, 19, 19, 19, 19, 0, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, ++ 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, ++ 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, ++ 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, ++ 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, ++ 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, ++ 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, ++ 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, ++ 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, ++ 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, ++ 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, ++ 22, 22, 22, 22, 22, 22, 22, 22, 22, 0, ++ 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, ++ 22, 22, 22, 22, 22, 22, 22, 22, 22, 0, ++ 22, 22, 0, 0, 0, 22, 22, 22, 22, 22, ++ 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, ++ 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, ++ 22, 22, 22, 5, 22, 22, 22, 22, 0, 22, ++ 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, ++ 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, ++ 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, ++ 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, ++ 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, ++ 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, ++ 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, ++ 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, ++ 22, 22, 22, 22, 22, 22, + #else +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 0, 19, 0, 19, 19, +- 0, 0, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 5, 19, 19, 19, +- 19, 0, 19, 19, 19, 19, 19, 19, ++ 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, ++ 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, ++ 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, ++ 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, ++ 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, ++ 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, ++ 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, ++ 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, ++ 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, ++ 22, 22, 22, 22, 22, 0, 22, 0, 22, 22, ++ 0, 0, 0, 22, 22, 22, 22, 22, 22, 22, ++ 22, 22, 22, 22, 22, 22, 5, 22, 22, 22, ++ 22, 0, 22, 22, 22, 22, 22, 22, + #endif /* ACE_MVS */ + }; + return len + asso_values[str[len - 1]] + asso_values[str[0]]; } --IR::_TAO_FixedDef_Proxy_Impl& -+_TAO_FixedDef_Proxy_Impl& - POA_IR::_TAO_FixedDef_Strategized_Proxy_Broker::select_proxy ( -- ::IR::FixedDef *object, -+ IR_FixedDef *object, - CORBA::Environment &ACE_TRY_ENV - ) + const class TAO_operation_db_entry * +-TAO_IR_StringDef_Perfect_Hash_OpTable::lookup (const char *str, unsigned int len) ++TAO_IR_SequenceDef_Perfect_Hash_OpTable::lookup (const char *str, unsigned int len) { -@@ -19086,7 +19035,7 @@ - case TAO_ORB_Core::THRU_POA_STRATEGY: - ACE_NEW_THROW_EX ( - this->proxy_cache_[strategy], -- POA_IR::_TAO_FixedDef_ThruPOA_Proxy_Impl, -+ _TAO_FixedDef_ThruPOA_Proxy_Impl, - CORBA::NO_MEMORY () - ); - ACE_CHECK; -@@ -19096,7 +19045,7 @@ - default: - ACE_NEW_THROW_EX ( - this->proxy_cache_[strategy], -- ::IR::_TAO_FixedDef_Remote_Proxy_Impl, -+ _TAO_FixedDef_Remote_Proxy_Impl, - CORBA::NO_MEMORY () - ); - ACE_CHECK; -@@ -19113,26 +19062,26 @@ - /////////////////////////////////////////////////////////////////////// + enum + { +- TOTAL_KEYWORDS = 7, ++ TOTAL_KEYWORDS = 10, + MIN_WORD_LENGTH = 5, +- MAX_WORD_LENGTH = 13, ++ MAX_WORD_LENGTH = 21, + MIN_HASH_VALUE = 5, +- MAX_HASH_VALUE = 18, +- HASH_VALUE_RANGE = 14, +- DUPLICATES = 2 ++ MAX_HASH_VALUE = 21, ++ HASH_VALUE_RANGE = 17, ++ DUPLICATES = 3 + }; + static const class TAO_operation_db_entry wordlist[] = + { + {"",0},{"",0},{"",0},{"",0},{"",0}, +- {"_is_a", &POA_IR::StringDef::_is_a_skel}, +- {"destroy", &POA_IR::StringDef::destroy_skel}, +- {"_get_type", &POA_IR::StringDef::_get_type_skel}, +- {"_get_bound", &POA_IR::StringDef::_get_bound_skel}, +- {"_set_bound", &POA_IR::StringDef::_set_bound_skel}, +- {"_get_def_kind", &POA_IR::StringDef::_get_def_kind_skel}, +- {"_non_existent", &POA_IR::StringDef::_non_existent_skel}, ++ {"_is_a", &POA_IR::SequenceDef::_is_a_skel}, ++ {"destroy", &POA_IR::SequenceDef::destroy_skel}, ++ {"_get_type", &POA_IR::SequenceDef::_get_type_skel}, ++ {"_get_bound", &POA_IR::SequenceDef::_get_bound_skel}, ++ {"_set_bound", &POA_IR::SequenceDef::_set_bound_skel}, ++ {"_get_def_kind", &POA_IR::SequenceDef::_get_def_kind_skel}, ++ {"_get_element_type", &POA_IR::SequenceDef::_get_element_type_skel}, ++ {"_non_existent", &POA_IR::SequenceDef::_non_existent_skel}, ++ {"_get_element_type_def", &POA_IR::SequenceDef::_get_element_type_def_skel}, ++ {"_set_element_type_def", &POA_IR::SequenceDef::_set_element_type_def_skel}, + }; --IR::_TAO_FixedDef_Proxy_Broker * --IR__TAO_FixedDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) -+_TAO_FixedDef_Proxy_Broker * -+_TAO_FixedDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) - { - ACE_UNUSED_ARG (obj); - return ::POA_IR::_TAO_FixedDef_Strategized_Proxy_Broker::the_TAO_FixedDef_Strategized_Proxy_Broker(); - } + static const signed char lookup[] = + { +- -1, -1, -1, -8, -2, 5, -1, 6, -1, 7, -25, -1, -1, 10, +- -1, -1, -1, -1, 11, ++ -1, -1, -1, -8, -2, 5, -1, 6, -1, 7, -28, -1, -1, 10, ++ -1, -1, -1, 11, 12, -13, -2, -23, + }; - int --IR__TAO_FixedDef_Proxy_Broker_Factory_Initializer (long _dummy_) -+_TAO_FixedDef_Proxy_Broker_Factory_Initializer (long _dummy_) - { - ACE_UNUSED_ARG (_dummy_); - -- IR__TAO_FixedDef_Proxy_Broker_Factory_function_pointer = -- IR__TAO_FixedDef_Proxy_Broker_Factory_function; -+ _TAO_FixedDef_Proxy_Broker_Factory_function_pointer = -+ _TAO_FixedDef_Proxy_Broker_Factory_function; - + if (len <= MAX_WORD_LENGTH && len >= MIN_WORD_LENGTH) +@@ -17558,38 +11081,37 @@ + } return 0; } - --static int IR__TAO_FixedDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = -- IR__TAO_FixedDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, IR__TAO_FixedDef_Proxy_Broker_Factory_Initializer)); -+static int _TAO_FixedDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = -+ _TAO_FixedDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, _TAO_FixedDef_Proxy_Broker_Factory_Initializer)); - - - /////////////////////////////////////////////////////////////////////// -@@ -19283,7 +19232,7 @@ - // copy ctor - POA_IR::FixedDef::FixedDef (const FixedDef& rhs) - : ACE_NESTED_CLASS (POA_IR,IDLType) (rhs), -- ACE_NESTED_CLASS (POA_CORBA,IRObject) (rhs), -+ POA_CORBA_IRObject (rhs), - TAO_ServantBase (rhs) - {} - -@@ -19381,14 +19330,12 @@ - TAO_InputCDR &_tao_in = _tao_server_request.incoming (); - POA_IR::FixedDef *_tao_impl = (POA_IR::FixedDef *)_tao_object_reference; - -- _tao_server_request.argument_flag (0); - CORBA::UShort digits; - if (!( - (_tao_in >> digits) - )) - ACE_THROW (CORBA::MARSHAL()); - +-/* ending time is 16:31:12 */ +-static TAO_IR_StringDef_Perfect_Hash_OpTable tao_IR_StringDef_optable; - - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( - _tao_server_request.orb_core ()->server_request_interceptors (), -@@ -19539,14 +19486,12 @@ - TAO_InputCDR &_tao_in = _tao_server_request.incoming (); - POA_IR::FixedDef *_tao_impl = (POA_IR::FixedDef *)_tao_object_reference; - -- _tao_server_request.argument_flag (0); - CORBA::Short scale; - if (!( - (_tao_in >> scale) - )) - ACE_THROW (CORBA::MARSHAL()); ++/* ending time is 11:23:10 */ ++static TAO_IR_SequenceDef_Perfect_Hash_OpTable tao_IR_SequenceDef_optable; -- - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( - _tao_server_request.orb_core ()->server_request_interceptors (), -@@ -19619,7 +19564,7 @@ - POA_IR::FixedDef *_tao_impl = (POA_IR::FixedDef *) _tao_object_reference; - CORBA::Boolean _tao_retval = 0; - CORBA::String_var value; -- if (!(_tao_in >> value.out ())) -+ if (!((_tao_in >> value.out ()))) - ACE_THROW (CORBA::MARSHAL ()); - - _tao_retval = _tao_impl->_is_a (value.in (), ACE_TRY_ENV); -@@ -19627,7 +19572,7 @@ - - _tao_server_request.init_reply (); - TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); -- if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) -+ if (!((_tao_out << CORBA::Any::from_boolean (_tao_retval)))) - ACE_THROW (CORBA::MARSHAL ()); - } + /////////////////////////////////////////////////////////////////////// + // Strategized Proxy Broker Implementation + // -@@ -19644,7 +19589,7 @@ - - _tao_server_request.init_reply (); - TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); -- if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) -+ if (!((_tao_out << CORBA::Any::from_boolean (_tao_retval)))) - ACE_THROW (CORBA::MARSHAL ()); + // Factory function Implementation. +-POA_IR::_TAO_StringDef_Strategized_Proxy_Broker *POA_IR::_TAO_StringDef_Strategized_Proxy_Broker::the_TAO_StringDef_Strategized_Proxy_Broker (void) ++POA_IR::_TAO_SequenceDef_Strategized_Proxy_Broker *POA_IR::_TAO_SequenceDef_Strategized_Proxy_Broker::the_TAO_SequenceDef_Strategized_Proxy_Broker (void) + { +- static POA_IR::_TAO_StringDef_Strategized_Proxy_Broker strategized_proxy_broker; ++ static POA_IR::_TAO_SequenceDef_Strategized_Proxy_Broker strategized_proxy_broker; + return &strategized_proxy_broker; } -@@ -19672,7 +19617,7 @@ - if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/IDLType:1.0") == 0) - return ACE_static_cast (POA_IR::IDLType_ptr, this); - if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/IRObject:1.0") == 0) -- return ACE_static_cast (POA_CORBA::IRObject_ptr, this); -+ return ACE_static_cast (POA_CORBA_IRObject_ptr, this); - if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/Object:1.0") == 0) - return ACE_static_cast(PortableServer::Servant, this); - return 0; -@@ -19702,10 +19647,9 @@ - ACE_NEW_RETURN (tmp, CORBA::Object (stub, 0, this), 0); +-POA_IR::_TAO_StringDef_Strategized_Proxy_Broker::_TAO_StringDef_Strategized_Proxy_Broker (void) ++POA_IR::_TAO_SequenceDef_Strategized_Proxy_Broker::_TAO_SequenceDef_Strategized_Proxy_Broker (void) + { + for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) + this->proxy_cache_[i] = 0; - CORBA::Object_var obj = tmp; -- return ::IR::FixedDef::_unchecked_narrow (obj.in ()); -+ return IR_FixedDef::_unchecked_narrow (obj.in ()); - } - -- - #if (TAO_HAS_INTERCEPTORS == 1) - POA_IR::FixedDef::TAO_ServerRequestInfo_IR_FixedDef_digits_get::TAO_ServerRequestInfo_IR_FixedDef_digits_get ( - TAO_ServerRequest &_tao_server_request, -@@ -20004,6 +19948,7 @@ } - #endif /* TAO_HAS_INTERCEPTORS */ -+ - class TAO_IR_SequenceDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable +-POA_IR::_TAO_StringDef_Strategized_Proxy_Broker::~_TAO_StringDef_Strategized_Proxy_Broker (void) ++POA_IR::_TAO_SequenceDef_Strategized_Proxy_Broker::~_TAO_SequenceDef_Strategized_Proxy_Broker (void) { - private: -@@ -20011,7 +19956,7 @@ - public: - const TAO_operation_db_entry * lookup (const char *str, unsigned int len); - }; --/* starting time is 18:47:28 */ -+/* starting time is 11:23:10 */ - /* C++ code produced by gperf version 2.8 (ACE version) */ - /* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_SequenceDef_Perfect_Hash_OpTable -N lookup */ - unsigned int -@@ -20131,10 +20076,9 @@ - } - return 0; - } --/* ending time is 18:47:28 */ -+/* ending time is 11:23:10 */ - static TAO_IR_SequenceDef_Perfect_Hash_OpTable tao_IR_SequenceDef_optable; - -- - /////////////////////////////////////////////////////////////////////// - // Strategized Proxy Broker Implementation - // -@@ -20160,9 +20104,9 @@ + for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) + delete this->proxy_cache_[i]; } --IR::_TAO_SequenceDef_Proxy_Impl& +-IR::_TAO_StringDef_Proxy_Impl& +-POA_IR::_TAO_StringDef_Strategized_Proxy_Broker::select_proxy ( +- ::IR::StringDef *object, +_TAO_SequenceDef_Proxy_Impl& - POA_IR::_TAO_SequenceDef_Strategized_Proxy_Broker::select_proxy ( -- ::IR::SequenceDef *object, ++POA_IR::_TAO_SequenceDef_Strategized_Proxy_Broker::select_proxy ( + IR_SequenceDef *object, CORBA::Environment &ACE_TRY_ENV ) { -@@ -20194,7 +20138,7 @@ +@@ -17607,7 +11129,7 @@ + } + + void +-POA_IR::_TAO_StringDef_Strategized_Proxy_Broker::create_proxy ( ++POA_IR::_TAO_SequenceDef_Strategized_Proxy_Broker::create_proxy ( + TAO_ORB_Core::TAO_Collocation_Strategies strategy, + CORBA::Environment &ACE_TRY_ENV + ) +@@ -17621,7 +11143,7 @@ case TAO_ORB_Core::THRU_POA_STRATEGY: ACE_NEW_THROW_EX ( this->proxy_cache_[strategy], -- POA_IR::_TAO_SequenceDef_ThruPOA_Proxy_Impl, +- POA_IR::_TAO_StringDef_ThruPOA_Proxy_Impl, + _TAO_SequenceDef_ThruPOA_Proxy_Impl, CORBA::NO_MEMORY () ); ACE_CHECK; -@@ -20204,7 +20148,7 @@ +@@ -17631,7 +11153,7 @@ default: ACE_NEW_THROW_EX ( this->proxy_cache_[strategy], -- ::IR::_TAO_SequenceDef_Remote_Proxy_Impl, +- ::IR::_TAO_StringDef_Remote_Proxy_Impl, + _TAO_SequenceDef_Remote_Proxy_Impl, CORBA::NO_MEMORY () ); ACE_CHECK; -@@ -20221,26 +20165,26 @@ +@@ -17648,38 +11170,41 @@ /////////////////////////////////////////////////////////////////////// --IR::_TAO_SequenceDef_Proxy_Broker * --IR__TAO_SequenceDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) +-IR::_TAO_StringDef_Proxy_Broker * +-IR__TAO_StringDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) +_TAO_SequenceDef_Proxy_Broker * +_TAO_SequenceDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) { ACE_UNUSED_ARG (obj); - return ::POA_IR::_TAO_SequenceDef_Strategized_Proxy_Broker::the_TAO_SequenceDef_Strategized_Proxy_Broker(); +- return ::POA_IR::_TAO_StringDef_Strategized_Proxy_Broker::the_TAO_StringDef_Strategized_Proxy_Broker(); ++ return ::POA_IR::_TAO_SequenceDef_Strategized_Proxy_Broker::the_TAO_SequenceDef_Strategized_Proxy_Broker(); } int --IR__TAO_SequenceDef_Proxy_Broker_Factory_Initializer (long _dummy_) +-IR__TAO_StringDef_Proxy_Broker_Factory_Initializer (long _dummy_) +_TAO_SequenceDef_Proxy_Broker_Factory_Initializer (long _dummy_) { ACE_UNUSED_ARG (_dummy_); -- IR__TAO_SequenceDef_Proxy_Broker_Factory_function_pointer = -- IR__TAO_SequenceDef_Proxy_Broker_Factory_function; +- IR__TAO_StringDef_Proxy_Broker_Factory_function_pointer = +- IR__TAO_StringDef_Proxy_Broker_Factory_function; + _TAO_SequenceDef_Proxy_Broker_Factory_function_pointer = + _TAO_SequenceDef_Proxy_Broker_Factory_function; return 0; } --static int IR__TAO_SequenceDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = -- IR__TAO_SequenceDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, IR__TAO_SequenceDef_Proxy_Broker_Factory_Initializer)); +-static int IR__TAO_StringDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = +- IR__TAO_StringDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, IR__TAO_StringDef_Proxy_Broker_Factory_Initializer)); +static int _TAO_SequenceDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = + _TAO_SequenceDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, _TAO_SequenceDef_Proxy_Broker_Factory_Initializer)); /////////////////////////////////////////////////////////////////////// -@@ -20346,7 +20290,7 @@ - ); - } + // ThruPOA Proxy Implementation + // --IR::IDLType_ptr POA_IR::_TAO_SequenceDef_ThruPOA_Proxy_Impl::element_type_def ( -+IR_IDLType_ptr POA_IR::_TAO_SequenceDef_ThruPOA_Proxy_Impl::element_type_def ( +-POA_IR::_TAO_StringDef_ThruPOA_Proxy_Impl::_TAO_StringDef_ThruPOA_Proxy_Impl (void) ++POA_IR::_TAO_SequenceDef_ThruPOA_Proxy_Impl::_TAO_SequenceDef_ThruPOA_Proxy_Impl (void) ++{} ++ ++POA_IR::_TAO_SequenceDef_ThruPOA_Proxy_Impl::~_TAO_SequenceDef_ThruPOA_Proxy_Impl (void) + {} + + // ThruPOA Implementation of the IDL interface methods + +-CORBA::ULong POA_IR::_TAO_StringDef_ThruPOA_Proxy_Impl::bound ( ++CORBA::ULong POA_IR::_TAO_SequenceDef_ThruPOA_Proxy_Impl::bound ( CORBA_Object *_collocated_tao_target_, CORBA::Environment &ACE_TRY_ENV ) -@@ -20354,7 +20298,7 @@ - CORBA::SystemException - )) - { -- IR::IDLType_var _tao_retval; -+ IR_IDLType_var _tao_retval; - ACE_UNUSED_ARG (_tao_retval); - TAO_Object_Adapter::Servant_Upcall servant_upcall ( - _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -20379,7 +20323,7 @@ +@@ -17701,16 +11226,16 @@ + ); + ACE_CHECK_RETURN (_tao_retval); + return ACE_reinterpret_cast ( +- POA_IR::StringDef_ptr, ++ POA_IR::SequenceDef_ptr, + servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/StringDef:1.0" ++ "IDL:omg.org/IR/SequenceDef:1.0" + ) + )->bound ( + ACE_TRY_ENV + ); + } - void POA_IR::_TAO_SequenceDef_ThruPOA_Proxy_Impl::element_type_def ( +-void POA_IR::_TAO_StringDef_ThruPOA_Proxy_Impl::bound ( ++void POA_IR::_TAO_SequenceDef_ThruPOA_Proxy_Impl::bound ( CORBA_Object *_collocated_tao_target_, -- IR::IDLType_ptr element_type_def, -+ IR_IDLType_ptr element_type_def, + CORBA::ULong bound, CORBA::Environment &ACE_TRY_ENV - ) - ACE_THROW_SPEC (( -@@ -20422,7 +20366,7 @@ +@@ -17731,9 +11256,9 @@ + ); + ACE_CHECK; + ACE_reinterpret_cast ( +- POA_IR::StringDef_ptr, ++ POA_IR::SequenceDef_ptr, + servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/StringDef:1.0" ++ "IDL:omg.org/IR/SequenceDef:1.0" + ) + )->bound ( + bound, +@@ -17742,232 +11267,296 @@ + return; + } + ++CORBA::TypeCode_ptr POA_IR::_TAO_SequenceDef_ThruPOA_Proxy_Impl::element_type ( ++ CORBA_Object *_collocated_tao_target_, ++ CORBA::Environment &ACE_TRY_ENV ++ ) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException ++ )) ++{ ++ CORBA::TypeCode_var _tao_retval; ++ ACE_UNUSED_ARG (_tao_retval); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "element_type", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK_RETURN (0); ++ return ACE_reinterpret_cast ( ++ POA_IR::SequenceDef_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/SequenceDef:1.0" ++ ) ++ )->element_type ( ++ ACE_TRY_ENV ++ ); ++} ++ ++IR::IDLType_ptr POA_IR::_TAO_SequenceDef_ThruPOA_Proxy_Impl::element_type_def ( ++ CORBA_Object *_collocated_tao_target_, ++ CORBA::Environment &ACE_TRY_ENV ++ ) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException ++ )) ++{ ++ IR_IDLType_var _tao_retval; ++ ACE_UNUSED_ARG (_tao_retval); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "element_type_def", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK_RETURN (0); ++ return ACE_reinterpret_cast ( ++ POA_IR::SequenceDef_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/SequenceDef:1.0" ++ ) ++ )->element_type_def ( ++ ACE_TRY_ENV ++ ); ++} ++ ++void POA_IR::_TAO_SequenceDef_ThruPOA_Proxy_Impl::element_type_def ( ++ CORBA_Object *_collocated_tao_target_, ++ IR_IDLType_ptr element_type_def, ++ CORBA::Environment &ACE_TRY_ENV ++ ) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException ++ )) ++{ ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "element_type_def", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK; ++ ACE_reinterpret_cast ( ++ POA_IR::SequenceDef_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/SequenceDef:1.0" ++ ) ++ )->element_type_def ( ++ element_type_def, ++ ACE_TRY_ENV ++ ); ++ return; ++} ++ + // + // End ThruPOA Proxy Implementation + /////////////////////////////////////////////////////////////////////// + + // skeleton constructor +-POA_IR::StringDef::StringDef (void) ++POA_IR::SequenceDef::SequenceDef (void) + { +- this->optable_ = &tao_IR_StringDef_optable; ++ this->optable_ = &tao_IR_SequenceDef_optable; + } + // copy ctor - POA_IR::SequenceDef::SequenceDef (const SequenceDef& rhs) +-POA_IR::StringDef::StringDef (const StringDef& rhs) ++POA_IR::SequenceDef::SequenceDef (const SequenceDef& rhs) : ACE_NESTED_CLASS (POA_IR,IDLType) (rhs), - ACE_NESTED_CLASS (POA_CORBA,IRObject) (rhs), + POA_CORBA_IRObject (rhs), TAO_ServantBase (rhs) {} -@@ -20520,14 +20464,12 @@ - TAO_InputCDR &_tao_in = _tao_server_request.incoming (); - POA_IR::SequenceDef *_tao_impl = (POA_IR::SequenceDef *)_tao_object_reference; - -- _tao_server_request.argument_flag (0); - CORBA::ULong bound; + // skeleton destructor +-POA_IR::StringDef::~StringDef (void) ++POA_IR::SequenceDef::~SequenceDef (void) + { + } + +-void POA_IR::StringDef::_get_bound_skel ( ++void POA_IR::SequenceDef::_get_bound_skel ( + TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, ++ void *_tao_object_reference, ++ void * /* context */, + CORBA::Environment &ACE_TRY_ENV +- ) ++) + { +- POA_IR::StringDef *_tao_impl = (POA_IR::StringDef *)_tao_object_reference; ++ POA_IR::SequenceDef *_tao_impl = (POA_IR::SequenceDef *)_tao_object_reference; + + CORBA::ULong _tao_retval = 0; + +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::StringDef::TAO_ServerRequestInfo_IR_StringDef_bound_get ri ( +- _tao_server_request, +- _tao_impl +- , ++ _tao_retval = _tao_impl->bound ( + ACE_TRY_ENV + ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->bound ( +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- CORBA::ULong _tao_retval_info = _tao_retval; +- ri.result (_tao_retval_info); +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; ++ + ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); ++ ++ _tao_server_request.init_reply (); + TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); if (!( - (_tao_in >> bound) + (_tao_out << _tao_retval) )) - ACE_THROW (CORBA::MARSHAL()); - +- ACE_THROW (CORBA::MARSHAL()); - - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( - _tao_server_request.orb_core ()->server_request_interceptors (), -@@ -20678,7 +20620,7 @@ - { - POA_IR::SequenceDef *_tao_impl = (POA_IR::SequenceDef *)_tao_object_reference; - -- IR::IDLType_var _tao_retval; -+ IR_IDLType_var _tao_retval; ++ ACE_THROW (CORBA::MARSHAL () ); + } - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( -@@ -20705,7 +20647,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::IDLType_ptr _tao_retval_info = _tao_retval._retn (); -+ IR_IDLType_ptr _tao_retval_info = _tao_retval._retn (); - ri.result (_tao_retval_info); - _tao_retval = _tao_retval_info; - ri.reply_status (PortableInterceptor::SUCCESSFUL); -@@ -20759,14 +20701,12 @@ +-void POA_IR::StringDef::_set_bound_skel ( ++void POA_IR::SequenceDef::_set_bound_skel ( + TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, ++ void *_tao_object_reference, ++ void * /* context */, + CORBA::Environment &ACE_TRY_ENV +- ) ++) + { TAO_InputCDR &_tao_in = _tao_server_request.incoming (); - POA_IR::SequenceDef *_tao_impl = (POA_IR::SequenceDef *)_tao_object_reference; - -- _tao_server_request.argument_flag (0); -- IR::IDLType_var element_type_def; -+ IR_IDLType_var element_type_def; +- POA_IR::StringDef *_tao_impl = (POA_IR::StringDef *)_tao_object_reference; ++ POA_IR::SequenceDef *_tao_impl = (POA_IR::SequenceDef *)_tao_object_reference; + +-_tao_server_request.argument_flag (0); +- CORBA::ULong bound; ++ CORBA::ULong bound; if (!( - (_tao_in >> element_type_def.out ()) + (_tao_in >> bound) )) - ACE_THROW (CORBA::MARSHAL()); +- ACE_THROW (CORBA::MARSHAL()); ++ ACE_THROW (CORBA::MARSHAL () ); - - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( - _tao_server_request.orb_core ()->server_request_interceptors (), -@@ -20839,7 +20779,7 @@ - POA_IR::SequenceDef *_tao_impl = (POA_IR::SequenceDef *) _tao_object_reference; +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::StringDef::TAO_ServerRequestInfo_IR_StringDef_bound_set ri ( +- _tao_server_request, +- _tao_impl +- , ++ _tao_impl->bound ( + bound, + ACE_TRY_ENV + ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- +- _tao_impl->bound ( +- bound, +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; ++ + ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); ++ ++ _tao_server_request.init_reply (); + } + +-void POA_IR::StringDef::_is_a_skel ( +- TAO_ServerRequest &_tao_server_request, ++void POA_IR::SequenceDef::_get_element_type_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) ++{ ++ POA_IR::SequenceDef *_tao_impl = (POA_IR::SequenceDef *)_tao_object_reference; ++ ++ CORBA::TypeCode_var _tao_retval; ++ ++ _tao_retval = _tao_impl->element_type ( ++ ACE_TRY_ENV ++ ); ++ ++ ACE_CHECK; ++ ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!( ++ (_tao_out << _tao_retval.in ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); ++} ++ ++void POA_IR::SequenceDef::_get_element_type_def_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) ++{ ++ POA_IR::SequenceDef *_tao_impl = (POA_IR::SequenceDef *)_tao_object_reference; ++ ++ IR_IDLType_var _tao_retval; ++ ++ _tao_retval = _tao_impl->element_type_def ( ++ ACE_TRY_ENV ++ ); ++ ++ ACE_CHECK; ++ ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!( ++ (_tao_out << _tao_retval.in ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); ++} ++ ++void POA_IR::SequenceDef::_set_element_type_def_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) ++{ ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::SequenceDef *_tao_impl = (POA_IR::SequenceDef *)_tao_object_reference; ++ ++ IR_IDLType_var element_type_def; ++ if (!( ++ (_tao_in >> element_type_def.out ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); ++ ++ _tao_impl->element_type_def ( ++ element_type_def.in (), ++ ACE_TRY_ENV ++ ); ++ ++ ACE_CHECK; ++ ++ _tao_server_request.init_reply (); ++} ++ ++void POA_IR::SequenceDef::_is_a_skel ( ++ TAO_ServerRequest &_tao_server_request, + void * _tao_object_reference, + void * /* context */, + CORBA::Environment &ACE_TRY_ENV + ) + { + TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::StringDef *_tao_impl = (POA_IR::StringDef *) _tao_object_reference; ++ POA_IR::SequenceDef *_tao_impl = (POA_IR::SequenceDef *) _tao_object_reference; CORBA::Boolean _tao_retval = 0; CORBA::String_var value; - if (!(_tao_in >> value.out ())) + if (!((_tao_in >> value.out ()))) ACE_THROW (CORBA::MARSHAL ()); - +- ++ _tao_retval = _tao_impl->_is_a (value.in (), ACE_TRY_ENV); -@@ -20847,7 +20787,7 @@ - + ACE_CHECK; +- ++ _tao_server_request.init_reply (); TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); - if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) @@ -5296,8 +22758,21 @@ ACE_THROW (CORBA::MARSHAL ()); } -@@ -20864,7 +20804,7 @@ - +-void POA_IR::StringDef::_non_existent_skel ( +- TAO_ServerRequest &_tao_server_request, ++void POA_IR::SequenceDef::_non_existent_skel ( ++ TAO_ServerRequest &_tao_server_request, + void * _tao_object_reference, + void * /* context */, + CORBA::Environment &ACE_TRY_ENV + ) + { +- POA_IR::StringDef *_tao_impl = (POA_IR::StringDef *) _tao_object_reference; ++ POA_IR::SequenceDef *_tao_impl = (POA_IR::SequenceDef *) _tao_object_reference; + CORBA::Boolean _tao_retval = _tao_impl->_non_existent (ACE_TRY_ENV); + ACE_CHECK; +- ++ _tao_server_request.init_reply (); TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); - if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) @@ -5305,7 +22780,31 @@ ACE_THROW (CORBA::MARSHAL ()); } -@@ -20892,7 +20832,7 @@ +-CORBA::Boolean POA_IR::StringDef::_is_a ( ++CORBA::Boolean POA_IR::SequenceDef::_is_a ( + const char* value, + CORBA::Environment &ACE_TRY_ENV + ) + { + if ( +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/StringDef:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/SequenceDef:1.0")) || + (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/IDLType:1.0")) || + (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/CORBA/IRObject:1.0")) || + (!ACE_OS::strcmp ((char *)value, CORBA::_tc_Object->id (ACE_TRY_ENV)))) +@@ -17976,33 +11565,33 @@ + return 0; + } + +-void* POA_IR::StringDef::_downcast ( ++void* POA_IR::SequenceDef::_downcast ( + const char* logical_type_id + ) + { +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/StringDef:1.0") == 0) +- return ACE_static_cast (POA_IR::StringDef_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/SequenceDef:1.0") == 0) ++ return ACE_static_cast (POA_IR::SequenceDef_ptr, this); if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/IDLType:1.0") == 0) return ACE_static_cast (POA_IR::IDLType_ptr, this); if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/IRObject:1.0") == 0) @@ -5314,233 +22813,999 @@ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/Object:1.0") == 0) return ACE_static_cast(PortableServer::Servant, this); return 0; -@@ -20922,10 +20862,9 @@ + } + +-void POA_IR::StringDef::_dispatch (TAO_ServerRequest &req, void *context, CORBA::Environment &ACE_TRY_ENV) ++void POA_IR::SequenceDef::_dispatch (TAO_ServerRequest &req, void *context, CORBA::Environment &ACE_TRY_ENV) + { + this->synchronous_upcall_dispatch(req, context, this, ACE_TRY_ENV); + } + +-const char* POA_IR::StringDef::_interface_repository_id (void) const ++const char* POA_IR::SequenceDef::_interface_repository_id (void) const + { +- return "IDL:omg.org/IR/StringDef:1.0"; ++ return "IDL:omg.org/IR/SequenceDef:1.0"; + } + +-IR::StringDef* +-POA_IR::StringDef::_this (CORBA_Environment &ACE_TRY_ENV) ++IR::SequenceDef* ++POA_IR::SequenceDef::_this (CORBA_Environment &ACE_TRY_ENV) + { + TAO_Stub *stub = this->_create_stub (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); +@@ -18015,253 +11604,103 @@ ACE_NEW_RETURN (tmp, CORBA::Object (stub, 0, this), 0); CORBA::Object_var obj = tmp; -- return ::IR::SequenceDef::_unchecked_narrow (obj.in ()); -+ return IR_SequenceDef::_unchecked_narrow (obj.in ()); - } - +- return ::IR::StringDef::_unchecked_narrow (obj.in ()); +-} - - #if (TAO_HAS_INTERCEPTORS == 1) - POA_IR::SequenceDef::TAO_ServerRequestInfo_IR_SequenceDef_bound_get::TAO_ServerRequestInfo_IR_SequenceDef_bound_get ( - TAO_ServerRequest &_tao_server_request, -@@ -21228,7 +21167,7 @@ - POA_IR::SequenceDef::TAO_ServerRequestInfo_IR_SequenceDef_element_type_def_set::TAO_ServerRequestInfo_IR_SequenceDef_element_type_def_set ( - TAO_ServerRequest &_tao_server_request, - POA_IR::SequenceDef *tao_impl, -- IR::IDLType_ptr element_type_def, -+ IR_IDLType_ptr element_type_def, - CORBA::Environment & - ) - : TAO_ServerRequestInfo (_tao_server_request), -@@ -21300,6 +21239,7 @@ +- +-#if (TAO_HAS_INTERCEPTORS == 1) +-POA_IR::StringDef::TAO_ServerRequestInfo_IR_StringDef_bound_get::TAO_ServerRequestInfo_IR_StringDef_bound_get ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::StringDef *tao_impl +- , +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl) +-{} +- +-Dynamic::ParameterList * +-POA_IR::StringDef::TAO_ServerRequestInfo_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 * +-POA_IR::StringDef::TAO_ServerRequestInfo_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 * +-POA_IR::StringDef::TAO_ServerRequestInfo_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 (); +-} +- +-char * +-POA_IR::StringDef::TAO_ServerRequestInfo_IR_StringDef_bound_get::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::StringDef::TAO_ServerRequestInfo_IR_StringDef_bound_get::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-void +-POA_IR::StringDef::TAO_ServerRequestInfo_IR_StringDef_bound_get::result (CORBA::ULong result) +-{ +- // Update the result. +- this->_result = result; +-} +- +-POA_IR::StringDef::TAO_ServerRequestInfo_IR_StringDef_bound_set::TAO_ServerRequestInfo_IR_StringDef_bound_set ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::StringDef *tao_impl +- , +- const CORBA::ULong & bound, +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- bound_ (bound) +-{} +- +-Dynamic::ParameterList * +-POA_IR::StringDef::TAO_ServerRequestInfo_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 * +-POA_IR::StringDef::TAO_ServerRequestInfo_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 * +-POA_IR::StringDef::TAO_ServerRequestInfo_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; +-} +- +-char * +-POA_IR::StringDef::TAO_ServerRequestInfo_IR_StringDef_bound_set::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::StringDef::TAO_ServerRequestInfo_IR_StringDef_bound_set::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); ++ return IR_SequenceDef::_unchecked_narrow (obj.in ()); } - #endif /* TAO_HAS_INTERCEPTORS */ -+ - class TAO_IR_ArrayDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable +-#endif /* TAO_HAS_INTERCEPTORS */ +-class TAO_IR_WstringDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable ++class TAO_IR_ArrayDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable { private: -@@ -21307,7 +21247,7 @@ + unsigned int hash (const char *str, unsigned int len); public: const TAO_operation_db_entry * lookup (const char *str, unsigned int len); }; --/* starting time is 18:47:28 */ +-/* starting time is 16:31:12 */ +/* starting time is 11:23:10 */ /* C++ code produced by gperf version 2.8 (ACE version) */ - /* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_ArrayDef_Perfect_Hash_OpTable -N lookup */ +-/* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_WstringDef_Perfect_Hash_OpTable -N lookup */ ++/* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_ArrayDef_Perfect_Hash_OpTable -N lookup */ unsigned int -@@ -21427,10 +21367,9 @@ +-TAO_IR_WstringDef_Perfect_Hash_OpTable::hash (const char *str, unsigned int len) ++TAO_IR_ArrayDef_Perfect_Hash_OpTable::hash (const char *str, unsigned int len) + { + static const unsigned char asso_values[] = + { + #if defined (ACE_MVS) +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 0, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 0, +- 19, 19, 0, 0, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 5, 19, 19, 19, 19, 0, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, ++ 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, ++ 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, ++ 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, ++ 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, ++ 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, ++ 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, ++ 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, ++ 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, ++ 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, ++ 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, ++ 22, 22, 22, 22, 22, 22, 22, 22, 22, 0, ++ 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, ++ 22, 22, 22, 22, 22, 22, 22, 22, 22, 0, ++ 22, 22, 0, 0, 0, 22, 0, 22, 22, 22, ++ 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, ++ 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, ++ 22, 22, 22, 5, 22, 22, 22, 22, 0, 22, ++ 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, ++ 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, ++ 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, ++ 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, ++ 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, ++ 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, ++ 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, ++ 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, ++ 22, 22, 22, 22, 22, 22, + #else +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 0, 19, 0, 19, 19, +- 0, 0, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 5, 19, 19, 19, +- 19, 0, 19, 19, 19, 19, 19, 19, ++ 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, ++ 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, ++ 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, ++ 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, ++ 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, ++ 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, ++ 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, ++ 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, ++ 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, ++ 22, 22, 22, 22, 22, 0, 22, 0, 22, 22, ++ 0, 0, 0, 22, 0, 22, 22, 22, 22, 22, ++ 22, 22, 22, 22, 22, 22, 5, 22, 22, 22, ++ 22, 0, 22, 22, 22, 22, 22, 22, + #endif /* ACE_MVS */ + }; + return len + asso_values[str[len - 1]] + asso_values[str[0]]; + } + + const class TAO_operation_db_entry * +-TAO_IR_WstringDef_Perfect_Hash_OpTable::lookup (const char *str, unsigned int len) ++TAO_IR_ArrayDef_Perfect_Hash_OpTable::lookup (const char *str, unsigned int len) + { + enum + { +- TOTAL_KEYWORDS = 7, ++ TOTAL_KEYWORDS = 10, + MIN_WORD_LENGTH = 5, +- MAX_WORD_LENGTH = 13, ++ MAX_WORD_LENGTH = 21, + MIN_HASH_VALUE = 5, +- MAX_HASH_VALUE = 18, +- HASH_VALUE_RANGE = 14, +- DUPLICATES = 2 ++ MAX_HASH_VALUE = 21, ++ HASH_VALUE_RANGE = 17, ++ DUPLICATES = 3 + }; + + static const class TAO_operation_db_entry wordlist[] = + { + {"",0},{"",0},{"",0},{"",0},{"",0}, +- {"_is_a", &POA_IR::WstringDef::_is_a_skel}, +- {"destroy", &POA_IR::WstringDef::destroy_skel}, +- {"_get_type", &POA_IR::WstringDef::_get_type_skel}, +- {"_get_bound", &POA_IR::WstringDef::_get_bound_skel}, +- {"_set_bound", &POA_IR::WstringDef::_set_bound_skel}, +- {"_get_def_kind", &POA_IR::WstringDef::_get_def_kind_skel}, +- {"_non_existent", &POA_IR::WstringDef::_non_existent_skel}, ++ {"_is_a", &POA_IR::ArrayDef::_is_a_skel}, ++ {"destroy", &POA_IR::ArrayDef::destroy_skel}, ++ {"_get_type", &POA_IR::ArrayDef::_get_type_skel}, ++ {"_get_length", &POA_IR::ArrayDef::_get_length_skel}, ++ {"_set_length", &POA_IR::ArrayDef::_set_length_skel}, ++ {"_get_def_kind", &POA_IR::ArrayDef::_get_def_kind_skel}, ++ {"_get_element_type", &POA_IR::ArrayDef::_get_element_type_skel}, ++ {"_non_existent", &POA_IR::ArrayDef::_non_existent_skel}, ++ {"_get_element_type_def", &POA_IR::ArrayDef::_get_element_type_def_skel}, ++ {"_set_element_type_def", &POA_IR::ArrayDef::_set_element_type_def_skel}, + }; + + static const signed char lookup[] = + { +- -1, -1, -1, -8, -2, 5, -1, 6, -1, 7, -25, -1, -1, 10, +- -1, -1, -1, -1, 11, ++ -1, -1, -1, -8, -2, 5, -1, 6, -1, 7, -1, -29, -1, 10, ++ -1, -1, -1, 11, 12, -13, -2, -23, + }; + + if (len <= MAX_WORD_LENGTH && len >= MIN_WORD_LENGTH) +@@ -18295,38 +11734,37 @@ } return 0; } --/* ending time is 18:47:28 */ +-/* ending time is 16:31:12 */ +-static TAO_IR_WstringDef_Perfect_Hash_OpTable tao_IR_WstringDef_optable; +- +/* ending time is 11:23:10 */ - static TAO_IR_ArrayDef_Perfect_Hash_OpTable tao_IR_ArrayDef_optable; ++static TAO_IR_ArrayDef_Perfect_Hash_OpTable tao_IR_ArrayDef_optable; -- /////////////////////////////////////////////////////////////////////// // Strategized Proxy Broker Implementation // -@@ -21456,9 +21395,9 @@ + + // Factory function Implementation. +-POA_IR::_TAO_WstringDef_Strategized_Proxy_Broker *POA_IR::_TAO_WstringDef_Strategized_Proxy_Broker::the_TAO_WstringDef_Strategized_Proxy_Broker (void) ++POA_IR::_TAO_ArrayDef_Strategized_Proxy_Broker *POA_IR::_TAO_ArrayDef_Strategized_Proxy_Broker::the_TAO_ArrayDef_Strategized_Proxy_Broker (void) + { +- static POA_IR::_TAO_WstringDef_Strategized_Proxy_Broker strategized_proxy_broker; ++ static POA_IR::_TAO_ArrayDef_Strategized_Proxy_Broker strategized_proxy_broker; + return &strategized_proxy_broker; + } + +-POA_IR::_TAO_WstringDef_Strategized_Proxy_Broker::_TAO_WstringDef_Strategized_Proxy_Broker (void) ++POA_IR::_TAO_ArrayDef_Strategized_Proxy_Broker::_TAO_ArrayDef_Strategized_Proxy_Broker (void) + { + for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) + this->proxy_cache_[i] = 0; } --IR::_TAO_ArrayDef_Proxy_Impl& +-POA_IR::_TAO_WstringDef_Strategized_Proxy_Broker::~_TAO_WstringDef_Strategized_Proxy_Broker (void) ++POA_IR::_TAO_ArrayDef_Strategized_Proxy_Broker::~_TAO_ArrayDef_Strategized_Proxy_Broker (void) + { + for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) + delete this->proxy_cache_[i]; + + } + +-IR::_TAO_WstringDef_Proxy_Impl& +-POA_IR::_TAO_WstringDef_Strategized_Proxy_Broker::select_proxy ( +- ::IR::WstringDef *object, +_TAO_ArrayDef_Proxy_Impl& - POA_IR::_TAO_ArrayDef_Strategized_Proxy_Broker::select_proxy ( -- ::IR::ArrayDef *object, ++POA_IR::_TAO_ArrayDef_Strategized_Proxy_Broker::select_proxy ( + IR_ArrayDef *object, CORBA::Environment &ACE_TRY_ENV ) { -@@ -21490,7 +21429,7 @@ +@@ -18344,7 +11782,7 @@ + } + + void +-POA_IR::_TAO_WstringDef_Strategized_Proxy_Broker::create_proxy ( ++POA_IR::_TAO_ArrayDef_Strategized_Proxy_Broker::create_proxy ( + TAO_ORB_Core::TAO_Collocation_Strategies strategy, + CORBA::Environment &ACE_TRY_ENV + ) +@@ -18358,7 +11796,7 @@ case TAO_ORB_Core::THRU_POA_STRATEGY: ACE_NEW_THROW_EX ( this->proxy_cache_[strategy], -- POA_IR::_TAO_ArrayDef_ThruPOA_Proxy_Impl, +- POA_IR::_TAO_WstringDef_ThruPOA_Proxy_Impl, + _TAO_ArrayDef_ThruPOA_Proxy_Impl, CORBA::NO_MEMORY () ); ACE_CHECK; -@@ -21500,7 +21439,7 @@ +@@ -18368,7 +11806,7 @@ default: ACE_NEW_THROW_EX ( this->proxy_cache_[strategy], -- ::IR::_TAO_ArrayDef_Remote_Proxy_Impl, +- ::IR::_TAO_WstringDef_Remote_Proxy_Impl, + _TAO_ArrayDef_Remote_Proxy_Impl, CORBA::NO_MEMORY () ); ACE_CHECK; -@@ -21517,26 +21456,26 @@ +@@ -18385,38 +11823,41 @@ /////////////////////////////////////////////////////////////////////// --IR::_TAO_ArrayDef_Proxy_Broker * --IR__TAO_ArrayDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) +-IR::_TAO_WstringDef_Proxy_Broker * +-IR__TAO_WstringDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) +_TAO_ArrayDef_Proxy_Broker * +_TAO_ArrayDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) { ACE_UNUSED_ARG (obj); - return ::POA_IR::_TAO_ArrayDef_Strategized_Proxy_Broker::the_TAO_ArrayDef_Strategized_Proxy_Broker(); +- return ::POA_IR::_TAO_WstringDef_Strategized_Proxy_Broker::the_TAO_WstringDef_Strategized_Proxy_Broker(); ++ return ::POA_IR::_TAO_ArrayDef_Strategized_Proxy_Broker::the_TAO_ArrayDef_Strategized_Proxy_Broker(); } int --IR__TAO_ArrayDef_Proxy_Broker_Factory_Initializer (long _dummy_) +-IR__TAO_WstringDef_Proxy_Broker_Factory_Initializer (long _dummy_) +_TAO_ArrayDef_Proxy_Broker_Factory_Initializer (long _dummy_) { ACE_UNUSED_ARG (_dummy_); -- IR__TAO_ArrayDef_Proxy_Broker_Factory_function_pointer = -- IR__TAO_ArrayDef_Proxy_Broker_Factory_function; +- IR__TAO_WstringDef_Proxy_Broker_Factory_function_pointer = +- IR__TAO_WstringDef_Proxy_Broker_Factory_function; + _TAO_ArrayDef_Proxy_Broker_Factory_function_pointer = + _TAO_ArrayDef_Proxy_Broker_Factory_function; return 0; } --static int IR__TAO_ArrayDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = -- IR__TAO_ArrayDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, IR__TAO_ArrayDef_Proxy_Broker_Factory_Initializer)); +-static int IR__TAO_WstringDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = +- IR__TAO_WstringDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, IR__TAO_WstringDef_Proxy_Broker_Factory_Initializer)); +static int _TAO_ArrayDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = + _TAO_ArrayDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, _TAO_ArrayDef_Proxy_Broker_Factory_Initializer)); /////////////////////////////////////////////////////////////////////// -@@ -21642,7 +21581,7 @@ - ); - } + // ThruPOA Proxy Implementation + // --IR::IDLType_ptr POA_IR::_TAO_ArrayDef_ThruPOA_Proxy_Impl::element_type_def ( -+IR_IDLType_ptr POA_IR::_TAO_ArrayDef_ThruPOA_Proxy_Impl::element_type_def ( +-POA_IR::_TAO_WstringDef_ThruPOA_Proxy_Impl::_TAO_WstringDef_ThruPOA_Proxy_Impl (void) ++POA_IR::_TAO_ArrayDef_ThruPOA_Proxy_Impl::_TAO_ArrayDef_ThruPOA_Proxy_Impl (void) ++{} ++ ++POA_IR::_TAO_ArrayDef_ThruPOA_Proxy_Impl::~_TAO_ArrayDef_ThruPOA_Proxy_Impl (void) + {} + + // ThruPOA Implementation of the IDL interface methods + +-CORBA::ULong POA_IR::_TAO_WstringDef_ThruPOA_Proxy_Impl::bound ( ++CORBA::ULong POA_IR::_TAO_ArrayDef_ThruPOA_Proxy_Impl::length ( CORBA_Object *_collocated_tao_target_, CORBA::Environment &ACE_TRY_ENV ) -@@ -21650,7 +21589,7 @@ - CORBA::SystemException - )) - { -- IR::IDLType_var _tao_retval; -+ IR_IDLType_var _tao_retval; - ACE_UNUSED_ARG (_tao_retval); - TAO_Object_Adapter::Servant_Upcall servant_upcall ( - _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -21675,7 +21614,7 @@ +@@ -18432,24 +11873,24 @@ + CORBA::Object_var forward_to; + servant_upcall.prepare_for_upcall ( + _collocated_tao_target_->_object_key (), +- "bound", ++ "length", + forward_to.out (), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (_tao_retval); + return ACE_reinterpret_cast ( +- POA_IR::WstringDef_ptr, ++ POA_IR::ArrayDef_ptr, + servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/WstringDef:1.0" ++ "IDL:omg.org/IR/ArrayDef:1.0" + ) +- )->bound ( ++ )->length ( + ACE_TRY_ENV + ); + } - void POA_IR::_TAO_ArrayDef_ThruPOA_Proxy_Impl::element_type_def ( +-void POA_IR::_TAO_WstringDef_ThruPOA_Proxy_Impl::bound ( ++void POA_IR::_TAO_ArrayDef_ThruPOA_Proxy_Impl::length ( CORBA_Object *_collocated_tao_target_, -- IR::IDLType_ptr element_type_def, -+ IR_IDLType_ptr element_type_def, +- CORBA::ULong bound, ++ CORBA::ULong length, CORBA::Environment &ACE_TRY_ENV ) ACE_THROW_SPEC (( -@@ -21718,7 +21657,7 @@ +@@ -18462,18 +11903,112 @@ + CORBA::Object_var forward_to; + servant_upcall.prepare_for_upcall ( + _collocated_tao_target_->_object_key (), +- "bound", ++ "length", + forward_to.out (), + ACE_TRY_ENV + ); + ACE_CHECK; + ACE_reinterpret_cast ( +- POA_IR::WstringDef_ptr, ++ POA_IR::ArrayDef_ptr, + servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/WstringDef:1.0" ++ "IDL:omg.org/IR/ArrayDef:1.0" + ) +- )->bound ( +- bound, ++ )->length ( ++ length, ++ ACE_TRY_ENV ++ ); ++ return; ++} ++ ++CORBA::TypeCode_ptr POA_IR::_TAO_ArrayDef_ThruPOA_Proxy_Impl::element_type ( ++ CORBA_Object *_collocated_tao_target_, ++ CORBA::Environment &ACE_TRY_ENV ++ ) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException ++ )) ++{ ++ CORBA::TypeCode_var _tao_retval; ++ ACE_UNUSED_ARG (_tao_retval); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "element_type", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK_RETURN (0); ++ return ACE_reinterpret_cast ( ++ POA_IR::ArrayDef_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/ArrayDef:1.0" ++ ) ++ )->element_type ( ++ ACE_TRY_ENV ++ ); ++} ++ ++IR::IDLType_ptr POA_IR::_TAO_ArrayDef_ThruPOA_Proxy_Impl::element_type_def ( ++ CORBA_Object *_collocated_tao_target_, ++ CORBA::Environment &ACE_TRY_ENV ++ ) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException ++ )) ++{ ++ IR_IDLType_var _tao_retval; ++ ACE_UNUSED_ARG (_tao_retval); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "element_type_def", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK_RETURN (0); ++ return ACE_reinterpret_cast ( ++ POA_IR::ArrayDef_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/ArrayDef:1.0" ++ ) ++ )->element_type_def ( ++ ACE_TRY_ENV ++ ); ++} ++ ++void POA_IR::_TAO_ArrayDef_ThruPOA_Proxy_Impl::element_type_def ( ++ CORBA_Object *_collocated_tao_target_, ++ IR_IDLType_ptr element_type_def, ++ CORBA::Environment &ACE_TRY_ENV ++ ) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException ++ )) ++{ ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "element_type_def", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK; ++ ACE_reinterpret_cast ( ++ POA_IR::ArrayDef_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/ArrayDef:1.0" ++ ) ++ )->element_type_def ( ++ element_type_def, + ACE_TRY_ENV + ); + return; +@@ -18484,262 +12019,232 @@ + /////////////////////////////////////////////////////////////////////// + + // skeleton constructor +-POA_IR::WstringDef::WstringDef (void) ++POA_IR::ArrayDef::ArrayDef (void) + { +- this->optable_ = &tao_IR_WstringDef_optable; ++ this->optable_ = &tao_IR_ArrayDef_optable; + } + // copy ctor - POA_IR::ArrayDef::ArrayDef (const ArrayDef& rhs) +-POA_IR::WstringDef::WstringDef (const WstringDef& rhs) ++POA_IR::ArrayDef::ArrayDef (const ArrayDef& rhs) : ACE_NESTED_CLASS (POA_IR,IDLType) (rhs), - ACE_NESTED_CLASS (POA_CORBA,IRObject) (rhs), + POA_CORBA_IRObject (rhs), TAO_ServantBase (rhs) {} -@@ -21816,14 +21755,12 @@ - TAO_InputCDR &_tao_in = _tao_server_request.incoming (); - POA_IR::ArrayDef *_tao_impl = (POA_IR::ArrayDef *)_tao_object_reference; - -- _tao_server_request.argument_flag (0); - CORBA::ULong length; + // skeleton destructor +-POA_IR::WstringDef::~WstringDef (void) ++POA_IR::ArrayDef::~ArrayDef (void) + { + } + +-void POA_IR::WstringDef::_get_bound_skel ( ++void POA_IR::ArrayDef::_get_length_skel ( + TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, ++ void *_tao_object_reference, ++ void * /* context */, + CORBA::Environment &ACE_TRY_ENV +- ) ++) + { +- POA_IR::WstringDef *_tao_impl = (POA_IR::WstringDef *)_tao_object_reference; ++ POA_IR::ArrayDef *_tao_impl = (POA_IR::ArrayDef *)_tao_object_reference; + + CORBA::ULong _tao_retval = 0; + +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::WstringDef::TAO_ServerRequestInfo_IR_WstringDef_bound_get ri ( +- _tao_server_request, +- _tao_impl +- , ++ _tao_retval = _tao_impl->length ( + ACE_TRY_ENV + ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->bound ( +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- CORBA::ULong _tao_retval_info = _tao_retval; +- ri.result (_tao_retval_info); +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; ++ + ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); ++ ++ _tao_server_request.init_reply (); + TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); if (!( - (_tao_in >> length) + (_tao_out << _tao_retval) )) - ACE_THROW (CORBA::MARSHAL()); - +- ACE_THROW (CORBA::MARSHAL()); - - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( - _tao_server_request.orb_core ()->server_request_interceptors (), -@@ -21974,7 +21911,7 @@ - { - POA_IR::ArrayDef *_tao_impl = (POA_IR::ArrayDef *)_tao_object_reference; - -- IR::IDLType_var _tao_retval; -+ IR_IDLType_var _tao_retval; ++ ACE_THROW (CORBA::MARSHAL () ); + } - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( -@@ -22001,7 +21938,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::IDLType_ptr _tao_retval_info = _tao_retval._retn (); -+ IR_IDLType_ptr _tao_retval_info = _tao_retval._retn (); - ri.result (_tao_retval_info); - _tao_retval = _tao_retval_info; - ri.reply_status (PortableInterceptor::SUCCESSFUL); -@@ -22055,14 +21992,12 @@ +-void POA_IR::WstringDef::_set_bound_skel ( ++void POA_IR::ArrayDef::_set_length_skel ( + TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, ++ void *_tao_object_reference, ++ void * /* context */, + CORBA::Environment &ACE_TRY_ENV +- ) ++) + { TAO_InputCDR &_tao_in = _tao_server_request.incoming (); - POA_IR::ArrayDef *_tao_impl = (POA_IR::ArrayDef *)_tao_object_reference; - -- _tao_server_request.argument_flag (0); -- IR::IDLType_var element_type_def; -+ IR_IDLType_var element_type_def; +- POA_IR::WstringDef *_tao_impl = (POA_IR::WstringDef *)_tao_object_reference; ++ POA_IR::ArrayDef *_tao_impl = (POA_IR::ArrayDef *)_tao_object_reference; + +-_tao_server_request.argument_flag (0); +- CORBA::ULong bound; ++ CORBA::ULong length; if (!( - (_tao_in >> element_type_def.out ()) +- (_tao_in >> bound) ++ (_tao_in >> length) )) - ACE_THROW (CORBA::MARSHAL()); +- ACE_THROW (CORBA::MARSHAL()); ++ ACE_THROW (CORBA::MARSHAL () ); - - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( - _tao_server_request.orb_core ()->server_request_interceptors (), -@@ -22135,7 +22070,7 @@ - POA_IR::ArrayDef *_tao_impl = (POA_IR::ArrayDef *) _tao_object_reference; - CORBA::Boolean _tao_retval = 0; - CORBA::String_var value; +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::WstringDef::TAO_ServerRequestInfo_IR_WstringDef_bound_set ri ( +- _tao_server_request, +- _tao_impl +- , +- bound, ++ _tao_impl->length ( ++ length, + ACE_TRY_ENV + ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- +- _tao_impl->bound ( +- bound, +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; ++ + ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); ++ ++ _tao_server_request.init_reply (); + } + +-void POA_IR::WstringDef::_is_a_skel ( +- TAO_ServerRequest &_tao_server_request, +- void * _tao_object_reference, ++void POA_IR::ArrayDef::_get_element_type_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, + void * /* context */, + CORBA::Environment &ACE_TRY_ENV +- ) ++) + { +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::WstringDef *_tao_impl = (POA_IR::WstringDef *) _tao_object_reference; +- CORBA::Boolean _tao_retval = 0; +- CORBA::String_var value; - if (!(_tao_in >> value.out ())) -+ if (!((_tao_in >> value.out ()))) - ACE_THROW (CORBA::MARSHAL ()); - - _tao_retval = _tao_impl->_is_a (value.in (), ACE_TRY_ENV); -@@ -22143,7 +22078,7 @@ - +- ACE_THROW (CORBA::MARSHAL ()); +- +- _tao_retval = _tao_impl->_is_a (value.in (), ACE_TRY_ENV); ++ POA_IR::ArrayDef *_tao_impl = (POA_IR::ArrayDef *)_tao_object_reference; ++ ++ CORBA::TypeCode_var _tao_retval; ++ ++ _tao_retval = _tao_impl->element_type ( ++ ACE_TRY_ENV ++ ); ++ + ACE_CHECK; +- ++ _tao_server_request.init_reply (); TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); - if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) -+ if (!((_tao_out << CORBA::Any::from_boolean (_tao_retval)))) - ACE_THROW (CORBA::MARSHAL ()); - } - -@@ -22160,7 +22095,7 @@ - +- ACE_THROW (CORBA::MARSHAL ()); ++ if (!( ++ (_tao_out << _tao_retval.in ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + } + +-void POA_IR::WstringDef::_non_existent_skel ( +- TAO_ServerRequest &_tao_server_request, +- void * _tao_object_reference, ++void POA_IR::ArrayDef::_get_element_type_def_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, + void * /* context */, + CORBA::Environment &ACE_TRY_ENV +- ) ++) + { +- POA_IR::WstringDef *_tao_impl = (POA_IR::WstringDef *) _tao_object_reference; +- CORBA::Boolean _tao_retval = _tao_impl->_non_existent (ACE_TRY_ENV); ++ POA_IR::ArrayDef *_tao_impl = (POA_IR::ArrayDef *)_tao_object_reference; ++ ++ IR_IDLType_var _tao_retval; ++ ++ _tao_retval = _tao_impl->element_type_def ( ++ ACE_TRY_ENV ++ ); ++ + ACE_CHECK; +- ++ _tao_server_request.init_reply (); TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); - if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) +- ACE_THROW (CORBA::MARSHAL ()); ++ if (!( ++ (_tao_out << _tao_retval.in ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + } + +-CORBA::Boolean POA_IR::WstringDef::_is_a ( +- const char* value, ++void POA_IR::ArrayDef::_set_element_type_def_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, + CORBA::Environment &ACE_TRY_ENV +- ) ++) + { +- if ( +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/WstringDef:1.0")) || +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/IDLType:1.0")) || +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/CORBA/IRObject:1.0")) || +- (!ACE_OS::strcmp ((char *)value, CORBA::_tc_Object->id (ACE_TRY_ENV)))) +- return 1; ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::ArrayDef *_tao_impl = (POA_IR::ArrayDef *)_tao_object_reference; ++ ++ IR_IDLType_var element_type_def; ++ if (!( ++ (_tao_in >> element_type_def.out ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); ++ ++ _tao_impl->element_type_def ( ++ element_type_def.in (), ++ ACE_TRY_ENV ++ ); ++ ++ ACE_CHECK; ++ ++ _tao_server_request.init_reply (); ++} ++ ++void POA_IR::ArrayDef::_is_a_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void * _tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++ ) ++{ ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::ArrayDef *_tao_impl = (POA_IR::ArrayDef *) _tao_object_reference; ++ CORBA::Boolean _tao_retval = 0; ++ CORBA::String_var value; ++ if (!((_tao_in >> value.out ()))) ++ ACE_THROW (CORBA::MARSHAL ()); ++ ++ _tao_retval = _tao_impl->_is_a (value.in (), ACE_TRY_ENV); ++ ACE_CHECK; ++ ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); + if (!((_tao_out << CORBA::Any::from_boolean (_tao_retval)))) - ACE_THROW (CORBA::MARSHAL ()); ++ ACE_THROW (CORBA::MARSHAL ()); ++} ++ ++void POA_IR::ArrayDef::_non_existent_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void * _tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++ ) ++{ ++ POA_IR::ArrayDef *_tao_impl = (POA_IR::ArrayDef *) _tao_object_reference; ++ CORBA::Boolean _tao_retval = _tao_impl->_non_existent (ACE_TRY_ENV); ++ ACE_CHECK; ++ ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!((_tao_out << CORBA::Any::from_boolean (_tao_retval)))) ++ ACE_THROW (CORBA::MARSHAL ()); ++} ++ ++CORBA::Boolean POA_IR::ArrayDef::_is_a ( ++ const char* value, ++ CORBA::Environment &ACE_TRY_ENV ++ ) ++{ ++ if ( ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/ArrayDef:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/IDLType:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/CORBA/IRObject:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, CORBA::_tc_Object->id (ACE_TRY_ENV)))) ++ return 1; + else + return 0; } -@@ -22188,7 +22123,7 @@ +-void* POA_IR::WstringDef::_downcast ( ++void* POA_IR::ArrayDef::_downcast ( + const char* logical_type_id + ) + { +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/WstringDef:1.0") == 0) +- return ACE_static_cast (POA_IR::WstringDef_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/ArrayDef:1.0") == 0) ++ return ACE_static_cast (POA_IR::ArrayDef_ptr, this); if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/IDLType:1.0") == 0) return ACE_static_cast (POA_IR::IDLType_ptr, this); if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/IRObject:1.0") == 0) @@ -5549,201 +23814,1035 @@ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/Object:1.0") == 0) return ACE_static_cast(PortableServer::Servant, this); return 0; -@@ -22218,10 +22153,9 @@ + } + +-void POA_IR::WstringDef::_dispatch (TAO_ServerRequest &req, void *context, CORBA::Environment &ACE_TRY_ENV) ++void POA_IR::ArrayDef::_dispatch (TAO_ServerRequest &req, void *context, CORBA::Environment &ACE_TRY_ENV) + { + this->synchronous_upcall_dispatch(req, context, this, ACE_TRY_ENV); + } + +-const char* POA_IR::WstringDef::_interface_repository_id (void) const ++const char* POA_IR::ArrayDef::_interface_repository_id (void) const + { +- return "IDL:omg.org/IR/WstringDef:1.0"; ++ return "IDL:omg.org/IR/ArrayDef:1.0"; + } + +-IR::WstringDef* +-POA_IR::WstringDef::_this (CORBA_Environment &ACE_TRY_ENV) ++IR::ArrayDef* ++POA_IR::ArrayDef::_this (CORBA_Environment &ACE_TRY_ENV) + { + TAO_Stub *stub = this->_create_stub (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); +@@ -18752,255 +12257,128 @@ ACE_NEW_RETURN (tmp, CORBA::Object (stub, 0, this), 0); CORBA::Object_var obj = tmp; -- return ::IR::ArrayDef::_unchecked_narrow (obj.in ()); -+ return IR_ArrayDef::_unchecked_narrow (obj.in ()); - } - +- return ::IR::WstringDef::_unchecked_narrow (obj.in ()); +-} - - #if (TAO_HAS_INTERCEPTORS == 1) - POA_IR::ArrayDef::TAO_ServerRequestInfo_IR_ArrayDef_length_get::TAO_ServerRequestInfo_IR_ArrayDef_length_get ( - TAO_ServerRequest &_tao_server_request, -@@ -22524,7 +22458,7 @@ - POA_IR::ArrayDef::TAO_ServerRequestInfo_IR_ArrayDef_element_type_def_set::TAO_ServerRequestInfo_IR_ArrayDef_element_type_def_set ( - TAO_ServerRequest &_tao_server_request, - POA_IR::ArrayDef *tao_impl, -- IR::IDLType_ptr element_type_def, -+ IR_IDLType_ptr element_type_def, - CORBA::Environment & - ) - : TAO_ServerRequestInfo (_tao_server_request), -@@ -22596,6 +22530,7 @@ +- +-#if (TAO_HAS_INTERCEPTORS == 1) +-POA_IR::WstringDef::TAO_ServerRequestInfo_IR_WstringDef_bound_get::TAO_ServerRequestInfo_IR_WstringDef_bound_get ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::WstringDef *tao_impl +- , +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl) +-{} +- +-Dynamic::ParameterList * +-POA_IR::WstringDef::TAO_ServerRequestInfo_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 * +-POA_IR::WstringDef::TAO_ServerRequestInfo_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 * +-POA_IR::WstringDef::TAO_ServerRequestInfo_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 (); +-} +- +-char * +-POA_IR::WstringDef::TAO_ServerRequestInfo_IR_WstringDef_bound_get::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::WstringDef::TAO_ServerRequestInfo_IR_WstringDef_bound_get::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-void +-POA_IR::WstringDef::TAO_ServerRequestInfo_IR_WstringDef_bound_get::result (CORBA::ULong result) +-{ +- // Update the result. +- this->_result = result; +-} +- +-POA_IR::WstringDef::TAO_ServerRequestInfo_IR_WstringDef_bound_set::TAO_ServerRequestInfo_IR_WstringDef_bound_set ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::WstringDef *tao_impl +- , +- const CORBA::ULong & bound, +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- bound_ (bound) +-{} +- +-Dynamic::ParameterList * +-POA_IR::WstringDef::TAO_ServerRequestInfo_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 * +-POA_IR::WstringDef::TAO_ServerRequestInfo_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 * +-POA_IR::WstringDef::TAO_ServerRequestInfo_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; +-} +- +-char * +-POA_IR::WstringDef::TAO_ServerRequestInfo_IR_WstringDef_bound_set::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::WstringDef::TAO_ServerRequestInfo_IR_WstringDef_bound_set::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); ++ return IR_ArrayDef::_unchecked_narrow (obj.in ()); } - #endif /* TAO_HAS_INTERCEPTORS */ -+ - class TAO_IR_ExceptionDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable +-#endif /* TAO_HAS_INTERCEPTORS */ +-class TAO_IR_FixedDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable ++class TAO_IR_ExceptionDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable { private: -@@ -22603,7 +22538,7 @@ + unsigned int hash (const char *str, unsigned int len); public: const TAO_operation_db_entry * lookup (const char *str, unsigned int len); }; --/* starting time is 18:47:28 */ +-/* starting time is 16:31:12 */ +/* starting time is 11:23:10 */ /* C++ code produced by gperf version 2.8 (ACE version) */ - /* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_ExceptionDef_Perfect_Hash_OpTable -N lookup */ +-/* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_FixedDef_Perfect_Hash_OpTable -N lookup */ ++/* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_ExceptionDef_Perfect_Hash_OpTable -N lookup */ unsigned int -@@ -22748,10 +22683,9 @@ +-TAO_IR_FixedDef_Perfect_Hash_OpTable::hash (const char *str, unsigned int len) ++TAO_IR_ExceptionDef_Perfect_Hash_OpTable::hash (const char *str, unsigned int len) + { + static const unsigned char asso_values[] = + { + #if defined (ACE_MVS) +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 0, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 0, +- 19, 19, 0, 0, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 0, 5, 19, 19, 19, 19, 0, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 0, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 0, ++ 52, 20, 3, 0, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 10, 15, 5, ++ 52, 10, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 15, 15, 52, 52, 52, 15, 5, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, + #else +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 0, 19, 0, 19, 19, +- 0, 0, 19, 19, 19, 19, 19, 19, 19, 19, +- 19, 19, 19, 19, 19, 0, 5, 19, 19, 19, +- 19, 0, 19, 19, 19, 19, 19, 19, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, ++ 52, 52, 52, 52, 52, 0, 52, 0, 52, 20, ++ 3, 0, 52, 52, 52, 52, 52, 52, 10, 15, ++ 5, 52, 10, 52, 52, 15, 15, 52, 52, 52, ++ 15, 5, 52, 52, 52, 52, 52, 52, + #endif /* ACE_MVS */ + }; + return len + asso_values[str[len - 1]] + asso_values[str[0]]; + } + + const class TAO_operation_db_entry * +-TAO_IR_FixedDef_Perfect_Hash_OpTable::lookup (const char *str, unsigned int len) ++TAO_IR_ExceptionDef_Perfect_Hash_OpTable::lookup (const char *str, unsigned int len) + { + enum + { +- TOTAL_KEYWORDS = 9, +- MIN_WORD_LENGTH = 5, +- MAX_WORD_LENGTH = 13, ++ TOTAL_KEYWORDS = 33, ++ MIN_WORD_LENGTH = 4, ++ MAX_WORD_LENGTH = 26, + MIN_HASH_VALUE = 5, +- MAX_HASH_VALUE = 18, +- HASH_VALUE_RANGE = 14, +- DUPLICATES = 3 ++ MAX_HASH_VALUE = 51, ++ HASH_VALUE_RANGE = 47, ++ DUPLICATES = 7 + }; + + static const class TAO_operation_db_entry wordlist[] = + { + {"",0},{"",0},{"",0},{"",0},{"",0}, +- {"_is_a", &POA_IR::FixedDef::_is_a_skel}, +- {"destroy", &POA_IR::FixedDef::destroy_skel}, +- {"_get_type", &POA_IR::FixedDef::_get_type_skel}, +- {"_get_scale", &POA_IR::FixedDef::_get_scale_skel}, +- {"_set_scale", &POA_IR::FixedDef::_set_scale_skel}, +- {"_get_digits", &POA_IR::FixedDef::_get_digits_skel}, +- {"_set_digits", &POA_IR::FixedDef::_set_digits_skel}, +- {"_get_def_kind", &POA_IR::FixedDef::_get_def_kind_skel}, +- {"_non_existent", &POA_IR::FixedDef::_non_existent_skel}, ++ {"_is_a", &POA_IR::ExceptionDef::_is_a_skel}, ++ {"_get_type", &POA_IR::ExceptionDef::_get_type_skel}, ++ {"_set_name", &POA_IR::ExceptionDef::_set_name_skel}, ++ {"_get_name", &POA_IR::ExceptionDef::_get_name_skel}, ++ {"_get_id", &POA_IR::ExceptionDef::_get_id_skel}, ++ {"_set_id", &POA_IR::ExceptionDef::_set_id_skel}, ++ {"describe", &POA_IR::ExceptionDef::describe_skel}, ++ {"destroy", &POA_IR::ExceptionDef::destroy_skel}, ++ {"_get_def_kind", &POA_IR::ExceptionDef::_get_def_kind_skel}, ++ {"_get_version", &POA_IR::ExceptionDef::_get_version_skel}, ++ {"_set_version", &POA_IR::ExceptionDef::_set_version_skel}, ++ {"_get_absolute_name", &POA_IR::ExceptionDef::_get_absolute_name_skel}, ++ {"move", &POA_IR::ExceptionDef::move_skel}, ++ {"_get_defined_in", &POA_IR::ExceptionDef::_get_defined_in_skel}, ++ {"lookup_name", &POA_IR::ExceptionDef::lookup_name_skel}, ++ {"lookup", &POA_IR::ExceptionDef::lookup_skel}, ++ {"_get_members", &POA_IR::ExceptionDef::_get_members_skel}, ++ {"_set_members", &POA_IR::ExceptionDef::_set_members_skel}, ++ {"_non_existent", &POA_IR::ExceptionDef::_non_existent_skel}, ++ {"_get_containing_repository", &POA_IR::ExceptionDef::_get_containing_repository_skel}, ++ {"create_value", &POA_IR::ExceptionDef::create_value_skel}, ++ {"create_module", &POA_IR::ExceptionDef::create_module_skel}, ++ {"create_native", &POA_IR::ExceptionDef::create_native_skel}, ++ {"describe_contents", &POA_IR::ExceptionDef::describe_contents_skel}, ++ {"create_interface", &POA_IR::ExceptionDef::create_interface_skel}, ++ {"create_union", &POA_IR::ExceptionDef::create_union_skel}, ++ {"create_exception", &POA_IR::ExceptionDef::create_exception_skel}, ++ {"contents", &POA_IR::ExceptionDef::contents_skel}, ++ {"create_enum", &POA_IR::ExceptionDef::create_enum_skel}, ++ {"create_alias", &POA_IR::ExceptionDef::create_alias_skel}, ++ {"create_struct", &POA_IR::ExceptionDef::create_struct_skel}, ++ {"create_constant", &POA_IR::ExceptionDef::create_constant_skel}, ++ {"create_value_box", &POA_IR::ExceptionDef::create_value_box_skel}, + }; + + static const signed char lookup[] = + { +- -1, -8, -2, -10, -2, 5, -1, 6, -1, 7, -27, -26, -1, 12, +- -1, -1, -1, -1, 13, ++ -1, -1, -1, -6, -3, 5, -1, -9, -2, -57, -54, 11, -1, -14, ++ -2, 12, 13, -55, 16, 17, 18, 19, -1, -1, -21, -2, 20, -54, ++ 23, -26, -2, 24, 25, -55, -1, 28, 29, 30, -1, -1, -1, 31, ++ -1, 32, -1, -1, 33, 34, 35, -1, 36, 37, + }; + + if (len <= MAX_WORD_LENGTH && len >= MIN_WORD_LENGTH) +@@ -19034,38 +12412,37 @@ } return 0; } --/* ending time is 18:47:28 */ +-/* ending time is 16:31:12 */ +-static TAO_IR_FixedDef_Perfect_Hash_OpTable tao_IR_FixedDef_optable; +- +/* ending time is 11:23:10 */ - static TAO_IR_ExceptionDef_Perfect_Hash_OpTable tao_IR_ExceptionDef_optable; ++static TAO_IR_ExceptionDef_Perfect_Hash_OpTable tao_IR_ExceptionDef_optable; -- /////////////////////////////////////////////////////////////////////// // Strategized Proxy Broker Implementation // -@@ -22777,9 +22711,9 @@ + + // Factory function Implementation. +-POA_IR::_TAO_FixedDef_Strategized_Proxy_Broker *POA_IR::_TAO_FixedDef_Strategized_Proxy_Broker::the_TAO_FixedDef_Strategized_Proxy_Broker (void) ++POA_IR::_TAO_ExceptionDef_Strategized_Proxy_Broker *POA_IR::_TAO_ExceptionDef_Strategized_Proxy_Broker::the_TAO_ExceptionDef_Strategized_Proxy_Broker (void) + { +- static POA_IR::_TAO_FixedDef_Strategized_Proxy_Broker strategized_proxy_broker; ++ static POA_IR::_TAO_ExceptionDef_Strategized_Proxy_Broker strategized_proxy_broker; + return &strategized_proxy_broker; + } + +-POA_IR::_TAO_FixedDef_Strategized_Proxy_Broker::_TAO_FixedDef_Strategized_Proxy_Broker (void) ++POA_IR::_TAO_ExceptionDef_Strategized_Proxy_Broker::_TAO_ExceptionDef_Strategized_Proxy_Broker (void) + { + for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) + this->proxy_cache_[i] = 0; } --IR::_TAO_ExceptionDef_Proxy_Impl& +-POA_IR::_TAO_FixedDef_Strategized_Proxy_Broker::~_TAO_FixedDef_Strategized_Proxy_Broker (void) ++POA_IR::_TAO_ExceptionDef_Strategized_Proxy_Broker::~_TAO_ExceptionDef_Strategized_Proxy_Broker (void) + { + for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) + delete this->proxy_cache_[i]; + + } + +-IR::_TAO_FixedDef_Proxy_Impl& +-POA_IR::_TAO_FixedDef_Strategized_Proxy_Broker::select_proxy ( +- ::IR::FixedDef *object, +_TAO_ExceptionDef_Proxy_Impl& - POA_IR::_TAO_ExceptionDef_Strategized_Proxy_Broker::select_proxy ( -- ::IR::ExceptionDef *object, ++POA_IR::_TAO_ExceptionDef_Strategized_Proxy_Broker::select_proxy ( + IR_ExceptionDef *object, CORBA::Environment &ACE_TRY_ENV ) { -@@ -22811,7 +22745,7 @@ +@@ -19083,7 +12460,7 @@ + } + + void +-POA_IR::_TAO_FixedDef_Strategized_Proxy_Broker::create_proxy ( ++POA_IR::_TAO_ExceptionDef_Strategized_Proxy_Broker::create_proxy ( + TAO_ORB_Core::TAO_Collocation_Strategies strategy, + CORBA::Environment &ACE_TRY_ENV + ) +@@ -19097,7 +12474,7 @@ case TAO_ORB_Core::THRU_POA_STRATEGY: ACE_NEW_THROW_EX ( this->proxy_cache_[strategy], -- POA_IR::_TAO_ExceptionDef_ThruPOA_Proxy_Impl, +- POA_IR::_TAO_FixedDef_ThruPOA_Proxy_Impl, + _TAO_ExceptionDef_ThruPOA_Proxy_Impl, CORBA::NO_MEMORY () ); ACE_CHECK; -@@ -22821,7 +22755,7 @@ +@@ -19107,7 +12484,7 @@ default: ACE_NEW_THROW_EX ( this->proxy_cache_[strategy], -- ::IR::_TAO_ExceptionDef_Remote_Proxy_Impl, +- ::IR::_TAO_FixedDef_Remote_Proxy_Impl, + _TAO_ExceptionDef_Remote_Proxy_Impl, CORBA::NO_MEMORY () ); ACE_CHECK; -@@ -22838,26 +22772,26 @@ +@@ -19124,38 +12501,41 @@ /////////////////////////////////////////////////////////////////////// --IR::_TAO_ExceptionDef_Proxy_Broker * --IR__TAO_ExceptionDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) +-IR::_TAO_FixedDef_Proxy_Broker * +-IR__TAO_FixedDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) +_TAO_ExceptionDef_Proxy_Broker * +_TAO_ExceptionDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) { ACE_UNUSED_ARG (obj); - return ::POA_IR::_TAO_ExceptionDef_Strategized_Proxy_Broker::the_TAO_ExceptionDef_Strategized_Proxy_Broker(); +- return ::POA_IR::_TAO_FixedDef_Strategized_Proxy_Broker::the_TAO_FixedDef_Strategized_Proxy_Broker(); ++ return ::POA_IR::_TAO_ExceptionDef_Strategized_Proxy_Broker::the_TAO_ExceptionDef_Strategized_Proxy_Broker(); } int --IR__TAO_ExceptionDef_Proxy_Broker_Factory_Initializer (long _dummy_) +-IR__TAO_FixedDef_Proxy_Broker_Factory_Initializer (long _dummy_) +_TAO_ExceptionDef_Proxy_Broker_Factory_Initializer (long _dummy_) { ACE_UNUSED_ARG (_dummy_); -- IR__TAO_ExceptionDef_Proxy_Broker_Factory_function_pointer = -- IR__TAO_ExceptionDef_Proxy_Broker_Factory_function; +- IR__TAO_FixedDef_Proxy_Broker_Factory_function_pointer = +- IR__TAO_FixedDef_Proxy_Broker_Factory_function; + _TAO_ExceptionDef_Proxy_Broker_Factory_function_pointer = + _TAO_ExceptionDef_Proxy_Broker_Factory_function; return 0; } --static int IR__TAO_ExceptionDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = -- IR__TAO_ExceptionDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, IR__TAO_ExceptionDef_Proxy_Broker_Factory_Initializer)); +-static int IR__TAO_FixedDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = +- IR__TAO_FixedDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, IR__TAO_FixedDef_Proxy_Broker_Factory_Initializer)); +static int _TAO_ExceptionDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = + _TAO_ExceptionDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, _TAO_ExceptionDef_Proxy_Broker_Factory_Initializer)); /////////////////////////////////////////////////////////////////////// -@@ -22900,7 +22834,7 @@ + // ThruPOA Proxy Implementation + // + +-POA_IR::_TAO_FixedDef_ThruPOA_Proxy_Impl::_TAO_FixedDef_ThruPOA_Proxy_Impl (void) ++POA_IR::_TAO_ExceptionDef_ThruPOA_Proxy_Impl::_TAO_ExceptionDef_ThruPOA_Proxy_Impl (void) ++{} ++ ++POA_IR::_TAO_ExceptionDef_ThruPOA_Proxy_Impl::~_TAO_ExceptionDef_ThruPOA_Proxy_Impl (void) + {} + + // ThruPOA Implementation of the IDL interface methods + +-CORBA::UShort POA_IR::_TAO_FixedDef_ThruPOA_Proxy_Impl::digits ( ++CORBA::TypeCode_ptr POA_IR::_TAO_ExceptionDef_ThruPOA_Proxy_Impl::type ( + CORBA_Object *_collocated_tao_target_, + CORBA::Environment &ACE_TRY_ENV + ) +@@ -19163,7 +12543,7 @@ + CORBA::SystemException + )) + { +- CORBA::UShort _tao_retval = 0; ++ CORBA::TypeCode_var _tao_retval; + ACE_UNUSED_ARG (_tao_retval); + TAO_Object_Adapter::Servant_Upcall servant_upcall ( + _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +@@ -19171,54 +12551,22 @@ + CORBA::Object_var forward_to; + servant_upcall.prepare_for_upcall ( + _collocated_tao_target_->_object_key (), +- "digits", ++ "type", + forward_to.out (), + ACE_TRY_ENV + ); +- ACE_CHECK_RETURN (_tao_retval); ++ ACE_CHECK_RETURN (0); + return ACE_reinterpret_cast ( +- POA_IR::FixedDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/FixedDef:1.0" +- ) +- )->digits ( +- ACE_TRY_ENV +- ); +-} +- +-void POA_IR::_TAO_FixedDef_ThruPOA_Proxy_Impl::digits ( +- CORBA_Object *_collocated_tao_target_, +- CORBA::UShort digits, +- CORBA::Environment &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) +-{ +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "digits", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK; +- ACE_reinterpret_cast ( +- POA_IR::FixedDef_ptr, ++ POA_IR::ExceptionDef_ptr, + servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/FixedDef:1.0" ++ "IDL:omg.org/IR/ExceptionDef:1.0" + ) +- )->digits ( +- digits, ++ )->type ( + ACE_TRY_ENV ); +- return; } --IR::StructMemberSeq * POA_IR::_TAO_ExceptionDef_ThruPOA_Proxy_Impl::members ( -+IR_StructMemberSeq * POA_IR::_TAO_ExceptionDef_ThruPOA_Proxy_Impl::members ( +-CORBA::Short POA_IR::_TAO_FixedDef_ThruPOA_Proxy_Impl::scale ( ++IR::StructMemberSeq * POA_IR::_TAO_ExceptionDef_ThruPOA_Proxy_Impl::members ( CORBA_Object *_collocated_tao_target_, CORBA::Environment &ACE_TRY_ENV ) -@@ -22908,7 +22842,7 @@ +@@ -19226,7 +12574,7 @@ CORBA::SystemException )) { -- IR::StructMemberSeq_var _tao_retval; +- CORBA::Short _tao_retval = 0; + IR_StructMemberSeq_var _tao_retval; ACE_UNUSED_ARG (_tao_retval); TAO_Object_Adapter::Servant_Upcall servant_upcall ( _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -22933,7 +22867,7 @@ +@@ -19234,24 +12582,24 @@ + CORBA::Object_var forward_to; + servant_upcall.prepare_for_upcall ( + _collocated_tao_target_->_object_key (), +- "scale", ++ "members", + forward_to.out (), + ACE_TRY_ENV + ); +- ACE_CHECK_RETURN (_tao_retval); ++ ACE_CHECK_RETURN (0); + return ACE_reinterpret_cast ( +- POA_IR::FixedDef_ptr, ++ POA_IR::ExceptionDef_ptr, + servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/FixedDef:1.0" ++ "IDL:omg.org/IR/ExceptionDef:1.0" + ) +- )->scale ( ++ )->members ( + ACE_TRY_ENV + ); + } - void POA_IR::_TAO_ExceptionDef_ThruPOA_Proxy_Impl::members ( +-void POA_IR::_TAO_FixedDef_ThruPOA_Proxy_Impl::scale ( ++void POA_IR::_TAO_ExceptionDef_ThruPOA_Proxy_Impl::members ( CORBA_Object *_collocated_tao_target_, -- const IR::StructMemberSeq & members, +- CORBA::Short scale, + const IR_StructMemberSeq & members, CORBA::Environment &ACE_TRY_ENV ) ACE_THROW_SPEC (( -@@ -22977,7 +22911,7 @@ - POA_IR::ExceptionDef::ExceptionDef (const ExceptionDef& rhs) - : ACE_NESTED_CLASS (POA_IR,Contained) (rhs), - ACE_NESTED_CLASS (POA_IR,Container) (rhs), +@@ -19264,18 +12612,18 @@ + CORBA::Object_var forward_to; + servant_upcall.prepare_for_upcall ( + _collocated_tao_target_->_object_key (), +- "scale", ++ "members", + forward_to.out (), + ACE_TRY_ENV + ); + ACE_CHECK; + ACE_reinterpret_cast ( +- POA_IR::FixedDef_ptr, ++ POA_IR::ExceptionDef_ptr, + servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/FixedDef:1.0" ++ "IDL:omg.org/IR/ExceptionDef:1.0" + ) +- )->scale ( +- scale, ++ )->members ( ++ members, + ACE_TRY_ENV + ); + return; +@@ -19286,385 +12634,149 @@ + /////////////////////////////////////////////////////////////////////// + + // skeleton constructor +-POA_IR::FixedDef::FixedDef (void) ++POA_IR::ExceptionDef::ExceptionDef (void) + { +- this->optable_ = &tao_IR_FixedDef_optable; ++ this->optable_ = &tao_IR_ExceptionDef_optable; + } + + // copy ctor +-POA_IR::FixedDef::FixedDef (const FixedDef& rhs) +- : ACE_NESTED_CLASS (POA_IR,IDLType) (rhs), - ACE_NESTED_CLASS (POA_CORBA,IRObject) (rhs), ++POA_IR::ExceptionDef::ExceptionDef (const ExceptionDef& rhs) ++ : ACE_NESTED_CLASS (POA_IR,Contained) (rhs), ++ ACE_NESTED_CLASS (POA_IR,Container) (rhs), + POA_CORBA_IRObject (rhs), TAO_ServantBase (rhs) {} -@@ -23075,7 +23009,7 @@ + // skeleton destructor +-POA_IR::FixedDef::~FixedDef (void) ++POA_IR::ExceptionDef::~ExceptionDef (void) { - POA_IR::ExceptionDef *_tao_impl = (POA_IR::ExceptionDef *)_tao_object_reference; - -- IR::StructMemberSeq_var _tao_retval; + } + +-void POA_IR::FixedDef::_get_digits_skel ( ++void POA_IR::ExceptionDef::_get_type_skel ( + TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, ++ void *_tao_object_reference, ++ void * /* context */, + CORBA::Environment &ACE_TRY_ENV +- ) ++) + { +- POA_IR::FixedDef *_tao_impl = (POA_IR::FixedDef *)_tao_object_reference; ++ POA_IR::ExceptionDef *_tao_impl = (POA_IR::ExceptionDef *)_tao_object_reference; + +- CORBA::UShort _tao_retval = 0; ++ CORBA::TypeCode_var _tao_retval; + +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::FixedDef::TAO_ServerRequestInfo_IR_FixedDef_digits_get ri ( +- _tao_server_request, +- _tao_impl +- , ++ _tao_retval = _tao_impl->type ( + ACE_TRY_ENV + ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->digits ( +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- CORBA::UShort _tao_retval_info = _tao_retval; +- ri.result (_tao_retval_info); +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; ++ + ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); ++ ++ _tao_server_request.init_reply (); + TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); + if (!( +- (_tao_out << _tao_retval) ++ (_tao_out << _tao_retval.in ()) + )) +- ACE_THROW (CORBA::MARSHAL()); +- ++ ACE_THROW (CORBA::MARSHAL () ); + } + +-void POA_IR::FixedDef::_set_digits_skel ( ++void POA_IR::ExceptionDef::_get_members_skel ( + TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, ++ void *_tao_object_reference, ++ void * /* context */, + CORBA::Environment &ACE_TRY_ENV +- ) ++) + { +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::FixedDef *_tao_impl = (POA_IR::FixedDef *)_tao_object_reference; +- +-_tao_server_request.argument_flag (0); +- CORBA::UShort digits; +- if (!( +- (_tao_in >> digits) +- )) +- ACE_THROW (CORBA::MARSHAL()); ++ POA_IR::ExceptionDef *_tao_impl = (POA_IR::ExceptionDef *)_tao_object_reference; + + IR_StructMemberSeq_var _tao_retval; - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( -@@ -23102,7 +23036,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::StructMemberSeq * _tao_retval_info = _tao_retval._retn (); -+ IR_StructMemberSeq * _tao_retval_info = _tao_retval._retn (); - ri.result (_tao_retval_info); - _tao_retval = _tao_retval_info; - ri.reply_status (PortableInterceptor::SUCCESSFUL); -@@ -23156,14 +23090,12 @@ +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::FixedDef::TAO_ServerRequestInfo_IR_FixedDef_digits_set ri ( +- _tao_server_request, +- _tao_impl +- , +- digits, ++ _tao_retval = _tao_impl->members ( + ACE_TRY_ENV + ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- +- _tao_impl->digits ( +- digits, +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +-} +- +-void POA_IR::FixedDef::_get_scale_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- POA_IR::FixedDef *_tao_impl = (POA_IR::FixedDef *)_tao_object_reference; +- +- CORBA::Short _tao_retval = 0; + +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::FixedDef::TAO_ServerRequestInfo_IR_FixedDef_scale_get ri ( +- _tao_server_request, +- _tao_impl +- , +- ACE_TRY_ENV +- ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->scale ( +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- CORBA::Short _tao_retval_info = _tao_retval; +- ri.result (_tao_retval_info); +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; + ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); ++ ++ _tao_server_request.init_reply (); + TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); + if (!( +- (_tao_out << _tao_retval) ++ (_tao_out << _tao_retval.in ()) + )) +- ACE_THROW (CORBA::MARSHAL()); +- ++ ACE_THROW (CORBA::MARSHAL () ); + } + +-void POA_IR::FixedDef::_set_scale_skel ( ++void POA_IR::ExceptionDef::_set_members_skel ( + TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, ++ void *_tao_object_reference, ++ void * /* context */, + CORBA::Environment &ACE_TRY_ENV +- ) ++) + { TAO_InputCDR &_tao_in = _tao_server_request.incoming (); - POA_IR::ExceptionDef *_tao_impl = (POA_IR::ExceptionDef *)_tao_object_reference; - -- _tao_server_request.argument_flag (0); -- IR::StructMemberSeq members; +- POA_IR::FixedDef *_tao_impl = (POA_IR::FixedDef *)_tao_object_reference; ++ POA_IR::ExceptionDef *_tao_impl = (POA_IR::ExceptionDef *)_tao_object_reference; + +-_tao_server_request.argument_flag (0); +- CORBA::Short scale; + IR_StructMemberSeq members; if (!( - (_tao_in >> members) +- (_tao_in >> scale) ++ (_tao_in >> members) )) - ACE_THROW (CORBA::MARSHAL()); +- ACE_THROW (CORBA::MARSHAL()); +- ++ ACE_THROW (CORBA::MARSHAL () ); +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::FixedDef::TAO_ServerRequestInfo_IR_FixedDef_scale_set ri ( +- _tao_server_request, +- _tao_impl +- , +- scale, ++ _tao_impl->members ( ++ members, + ACE_TRY_ENV + ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- - - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( - _tao_server_request.orb_core ()->server_request_interceptors (), -@@ -23236,7 +23168,7 @@ - POA_IR::ExceptionDef *_tao_impl = (POA_IR::ExceptionDef *) _tao_object_reference; +- _tao_impl->scale ( +- scale, +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; ++ + ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); ++ ++ _tao_server_request.init_reply (); + } + +-void POA_IR::FixedDef::_is_a_skel ( +- TAO_ServerRequest &_tao_server_request, ++void POA_IR::ExceptionDef::_is_a_skel ( ++ TAO_ServerRequest &_tao_server_request, + void * _tao_object_reference, + void * /* context */, + CORBA::Environment &ACE_TRY_ENV + ) + { + TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::FixedDef *_tao_impl = (POA_IR::FixedDef *) _tao_object_reference; ++ POA_IR::ExceptionDef *_tao_impl = (POA_IR::ExceptionDef *) _tao_object_reference; CORBA::Boolean _tao_retval = 0; CORBA::String_var value; - if (!(_tao_in >> value.out ())) + if (!((_tao_in >> value.out ()))) ACE_THROW (CORBA::MARSHAL ()); - +- ++ _tao_retval = _tao_impl->_is_a (value.in (), ACE_TRY_ENV); -@@ -23244,7 +23176,7 @@ - + ACE_CHECK; +- ++ _tao_server_request.init_reply (); TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); - if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) @@ -5751,8 +24850,21 @@ ACE_THROW (CORBA::MARSHAL ()); } -@@ -23261,7 +23193,7 @@ - +-void POA_IR::FixedDef::_non_existent_skel ( +- TAO_ServerRequest &_tao_server_request, ++void POA_IR::ExceptionDef::_non_existent_skel ( ++ TAO_ServerRequest &_tao_server_request, + void * _tao_object_reference, + void * /* context */, + CORBA::Environment &ACE_TRY_ENV + ) + { +- POA_IR::FixedDef *_tao_impl = (POA_IR::FixedDef *) _tao_object_reference; ++ POA_IR::ExceptionDef *_tao_impl = (POA_IR::ExceptionDef *) _tao_object_reference; + CORBA::Boolean _tao_retval = _tao_impl->_non_existent (ACE_TRY_ENV); + ACE_CHECK; +- ++ _tao_server_request.init_reply (); TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); - if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) @@ -5760,22 +24872,63 @@ ACE_THROW (CORBA::MARSHAL ()); } -@@ -23292,7 +23224,7 @@ - if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Container:1.0") == 0) - return ACE_static_cast (POA_IR::Container_ptr, this); +-CORBA::Boolean POA_IR::FixedDef::_is_a ( ++CORBA::Boolean POA_IR::ExceptionDef::_is_a ( + const char* value, + CORBA::Environment &ACE_TRY_ENV + ) + { + if ( +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/FixedDef:1.0")) || +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/IDLType:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/ExceptionDef:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/Contained:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/Container:1.0")) || + (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/CORBA/IRObject:1.0")) || + (!ACE_OS::strcmp ((char *)value, CORBA::_tc_Object->id (ACE_TRY_ENV)))) + return 1; +@@ -19672,445 +12784,138 @@ + return 0; + } + +-void* POA_IR::FixedDef::_downcast ( ++void* POA_IR::ExceptionDef::_downcast ( + const char* logical_type_id + ) + { +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/FixedDef:1.0") == 0) +- return ACE_static_cast (POA_IR::FixedDef_ptr, this); +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/IDLType:1.0") == 0) +- return ACE_static_cast (POA_IR::IDLType_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/ExceptionDef:1.0") == 0) ++ return ACE_static_cast (POA_IR::ExceptionDef_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Contained:1.0") == 0) ++ return ACE_static_cast (POA_IR::Contained_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Container:1.0") == 0) ++ return ACE_static_cast (POA_IR::Container_ptr, this); if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/IRObject:1.0") == 0) - return ACE_static_cast (POA_CORBA::IRObject_ptr, this); + return ACE_static_cast (POA_CORBA_IRObject_ptr, this); if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/Object:1.0") == 0) return ACE_static_cast(PortableServer::Servant, this); return 0; -@@ -23308,24 +23240,6 @@ - return "IDL:omg.org/IR/ExceptionDef:1.0"; } --IR::ExceptionDef* --POA_IR::ExceptionDef::_this (CORBA_Environment &ACE_TRY_ENV) +-void POA_IR::FixedDef::_dispatch (TAO_ServerRequest &req, void *context, CORBA::Environment &ACE_TRY_ENV) ++void POA_IR::ExceptionDef::_dispatch (TAO_ServerRequest &req, void *context, CORBA::Environment &ACE_TRY_ENV) + { + this->synchronous_upcall_dispatch(req, context, this, ACE_TRY_ENV); + } + +-const char* POA_IR::FixedDef::_interface_repository_id (void) const -{ +- return "IDL:omg.org/IR/FixedDef:1.0"; +-} +- +-IR::FixedDef* +-POA_IR::FixedDef::_this (CORBA_Environment &ACE_TRY_ENV) ++const char* POA_IR::ExceptionDef::_interface_repository_id (void) const + { - TAO_Stub *stub = this->_create_stub (ACE_TRY_ENV); - ACE_CHECK_RETURN (0); - @@ -5787,257 +24940,1308 @@ - ACE_NEW_RETURN (tmp, CORBA::Object (stub, 0, this), 0); - - CORBA::Object_var obj = tmp; -- return ::IR::ExceptionDef::_unchecked_narrow (obj.in ()); +- return ::IR::FixedDef::_unchecked_narrow (obj.in ()); ++ return "IDL:omg.org/IR/ExceptionDef:1.0"; + } + +- +-#if (TAO_HAS_INTERCEPTORS == 1) +-POA_IR::FixedDef::TAO_ServerRequestInfo_IR_FixedDef_digits_get::TAO_ServerRequestInfo_IR_FixedDef_digits_get ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::FixedDef *tao_impl +- , +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl) +-{} +- +-Dynamic::ParameterList * +-POA_IR::FixedDef::TAO_ServerRequestInfo_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 * +-POA_IR::FixedDef::TAO_ServerRequestInfo_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; +-} - - #if (TAO_HAS_INTERCEPTORS == 1) - POA_IR::ExceptionDef::TAO_ServerRequestInfo_IR_ExceptionDef_type_get::TAO_ServerRequestInfo_IR_ExceptionDef_type_get ( - TAO_ServerRequest &_tao_server_request, -@@ -23480,7 +23394,7 @@ - POA_IR::ExceptionDef::TAO_ServerRequestInfo_IR_ExceptionDef_members_set::TAO_ServerRequestInfo_IR_ExceptionDef_members_set ( - TAO_ServerRequest &_tao_server_request, - POA_IR::ExceptionDef *tao_impl, -- const IR::StructMemberSeq & members, -+ const IR_StructMemberSeq & members, - CORBA::Environment & - ) - : TAO_ServerRequestInfo (_tao_server_request), -@@ -23552,6 +23466,7 @@ - } - - #endif /* TAO_HAS_INTERCEPTORS */ -+ - class TAO_IR_AttributeDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable +-CORBA::Any * +-POA_IR::FixedDef::TAO_ServerRequestInfo_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 (); +-} +- +-char * +-POA_IR::FixedDef::TAO_ServerRequestInfo_IR_FixedDef_digits_get::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::FixedDef::TAO_ServerRequestInfo_IR_FixedDef_digits_get::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-void +-POA_IR::FixedDef::TAO_ServerRequestInfo_IR_FixedDef_digits_get::result (CORBA::UShort result) +-{ +- // Update the result. +- this->_result = result; +-} +- +-POA_IR::FixedDef::TAO_ServerRequestInfo_IR_FixedDef_digits_set::TAO_ServerRequestInfo_IR_FixedDef_digits_set ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::FixedDef *tao_impl +- , +- const CORBA::UShort & digits, +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- digits_ (digits) +-{} +- +-Dynamic::ParameterList * +-POA_IR::FixedDef::TAO_ServerRequestInfo_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 * +-POA_IR::FixedDef::TAO_ServerRequestInfo_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 * +-POA_IR::FixedDef::TAO_ServerRequestInfo_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; +-} +- +-char * +-POA_IR::FixedDef::TAO_ServerRequestInfo_IR_FixedDef_digits_set::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::FixedDef::TAO_ServerRequestInfo_IR_FixedDef_digits_set::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-POA_IR::FixedDef::TAO_ServerRequestInfo_IR_FixedDef_scale_get::TAO_ServerRequestInfo_IR_FixedDef_scale_get ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::FixedDef *tao_impl +- , +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl) +-{} +- +-Dynamic::ParameterList * +-POA_IR::FixedDef::TAO_ServerRequestInfo_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 * +-POA_IR::FixedDef::TAO_ServerRequestInfo_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 * +-POA_IR::FixedDef::TAO_ServerRequestInfo_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 (); +-} +- +-char * +-POA_IR::FixedDef::TAO_ServerRequestInfo_IR_FixedDef_scale_get::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::FixedDef::TAO_ServerRequestInfo_IR_FixedDef_scale_get::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-void +-POA_IR::FixedDef::TAO_ServerRequestInfo_IR_FixedDef_scale_get::result (CORBA::Short result) +-{ +- // Update the result. +- this->_result = result; +-} +- +-POA_IR::FixedDef::TAO_ServerRequestInfo_IR_FixedDef_scale_set::TAO_ServerRequestInfo_IR_FixedDef_scale_set ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::FixedDef *tao_impl +- , +- const CORBA::Short & scale, +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- scale_ (scale) +-{} +- +-Dynamic::ParameterList * +-POA_IR::FixedDef::TAO_ServerRequestInfo_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 * +-POA_IR::FixedDef::TAO_ServerRequestInfo_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 * +-POA_IR::FixedDef::TAO_ServerRequestInfo_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; +-} +- +-char * +-POA_IR::FixedDef::TAO_ServerRequestInfo_IR_FixedDef_scale_set::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::FixedDef::TAO_ServerRequestInfo_IR_FixedDef_scale_set::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-#endif /* TAO_HAS_INTERCEPTORS */ +-class TAO_IR_SequenceDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable ++class TAO_IR_AttributeDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable { private: -@@ -23559,7 +23474,7 @@ + unsigned int hash (const char *str, unsigned int len); public: const TAO_operation_db_entry * lookup (const char *str, unsigned int len); }; --/* starting time is 18:47:28 */ +-/* starting time is 16:31:12 */ +/* starting time is 11:23:10 */ /* C++ code produced by gperf version 2.8 (ACE version) */ - /* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_AttributeDef_Perfect_Hash_OpTable -N lookup */ +-/* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_SequenceDef_Perfect_Hash_OpTable -N lookup */ ++/* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_AttributeDef_Perfect_Hash_OpTable -N lookup */ unsigned int -@@ -23690,10 +23605,9 @@ +-TAO_IR_SequenceDef_Perfect_Hash_OpTable::hash (const char *str, unsigned int len) ++TAO_IR_AttributeDef_Perfect_Hash_OpTable::hash (const char *str, unsigned int len) + { + static const unsigned char asso_values[] = + { + #if defined (ACE_MVS) +- 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, +- 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, +- 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, +- 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, +- 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, +- 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, +- 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, +- 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, +- 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, +- 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, +- 22, 22, 22, 22, 22, 22, 22, 22, 22, 0, +- 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, +- 22, 22, 22, 22, 22, 22, 22, 22, 22, 0, +- 22, 22, 0, 0, 0, 22, 22, 22, 22, 22, +- 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, +- 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, +- 22, 22, 22, 5, 22, 22, 22, 22, 0, 22, +- 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, +- 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, +- 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, +- 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, +- 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, +- 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, +- 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, +- 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, +- 22, 22, 22, 22, 22, 22, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 0, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 0, ++ 37, 37, 0, 0, 10, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 0, 0, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 15, 37, 37, 37, 37, 10, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, + #else +- 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, +- 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, +- 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, +- 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, +- 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, +- 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, +- 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, +- 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, +- 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, +- 22, 22, 22, 22, 22, 0, 22, 0, 22, 22, +- 0, 0, 0, 22, 22, 22, 22, 22, 22, 22, +- 22, 22, 22, 22, 22, 22, 5, 22, 22, 22, +- 22, 0, 22, 22, 22, 22, 22, 22, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 0, 37, 0, 37, 37, ++ 0, 0, 10, 37, 37, 37, 37, 37, 37, 0, ++ 0, 37, 37, 37, 37, 37, 15, 37, 37, 37, ++ 37, 10, 37, 37, 37, 37, 37, 37, + #endif /* ACE_MVS */ + }; + return len + asso_values[str[len - 1]] + asso_values[str[0]]; + } + + const class TAO_operation_db_entry * +-TAO_IR_SequenceDef_Perfect_Hash_OpTable::lookup (const char *str, unsigned int len) ++TAO_IR_AttributeDef_Perfect_Hash_OpTable::lookup (const char *str, unsigned int len) + { + enum + { +- TOTAL_KEYWORDS = 10, +- MIN_WORD_LENGTH = 5, +- MAX_WORD_LENGTH = 21, +- MIN_HASH_VALUE = 5, +- MAX_HASH_VALUE = 21, +- HASH_VALUE_RANGE = 17, +- DUPLICATES = 3 ++ TOTAL_KEYWORDS = 20, ++ MIN_WORD_LENGTH = 4, ++ MAX_WORD_LENGTH = 26, ++ MIN_HASH_VALUE = 4, ++ MAX_HASH_VALUE = 36, ++ HASH_VALUE_RANGE = 33, ++ DUPLICATES = 8 + }; + + static const class TAO_operation_db_entry wordlist[] = + { +- {"",0},{"",0},{"",0},{"",0},{"",0}, +- {"_is_a", &POA_IR::SequenceDef::_is_a_skel}, +- {"destroy", &POA_IR::SequenceDef::destroy_skel}, +- {"_get_type", &POA_IR::SequenceDef::_get_type_skel}, +- {"_get_bound", &POA_IR::SequenceDef::_get_bound_skel}, +- {"_set_bound", &POA_IR::SequenceDef::_set_bound_skel}, +- {"_get_def_kind", &POA_IR::SequenceDef::_get_def_kind_skel}, +- {"_get_element_type", &POA_IR::SequenceDef::_get_element_type_skel}, +- {"_non_existent", &POA_IR::SequenceDef::_non_existent_skel}, +- {"_get_element_type_def", &POA_IR::SequenceDef::_get_element_type_def_skel}, +- {"_set_element_type_def", &POA_IR::SequenceDef::_set_element_type_def_skel}, ++ {"",0},{"",0},{"",0},{"",0}, ++ {"move", &POA_IR::AttributeDef::move_skel}, ++ {"_is_a", &POA_IR::AttributeDef::_is_a_skel}, ++ {"_get_id", &POA_IR::AttributeDef::_get_id_skel}, ++ {"_set_id", &POA_IR::AttributeDef::_set_id_skel}, ++ {"describe", &POA_IR::AttributeDef::describe_skel}, ++ {"_get_type", &POA_IR::AttributeDef::_get_type_skel}, ++ {"_set_name", &POA_IR::AttributeDef::_set_name_skel}, ++ {"_get_name", &POA_IR::AttributeDef::_get_name_skel}, ++ {"_set_mode", &POA_IR::AttributeDef::_set_mode_skel}, ++ {"_get_mode", &POA_IR::AttributeDef::_get_mode_skel}, ++ {"_get_version", &POA_IR::AttributeDef::_get_version_skel}, ++ {"_set_version", &POA_IR::AttributeDef::_set_version_skel}, ++ {"_get_def_kind", &POA_IR::AttributeDef::_get_def_kind_skel}, ++ {"_get_defined_in", &POA_IR::AttributeDef::_get_defined_in_skel}, ++ {"destroy", &POA_IR::AttributeDef::destroy_skel}, ++ {"_get_absolute_name", &POA_IR::AttributeDef::_get_absolute_name_skel}, ++ {"_get_type_def", &POA_IR::AttributeDef::_get_type_def_skel}, ++ {"_set_type_def", &POA_IR::AttributeDef::_set_type_def_skel}, ++ {"_non_existent", &POA_IR::AttributeDef::_non_existent_skel}, ++ {"_get_containing_repository", &POA_IR::AttributeDef::_get_containing_repository_skel}, + }; + + static const signed char lookup[] = + { +- -1, -1, -1, -8, -2, 5, -1, 6, -1, 7, -28, -1, -1, 10, +- -1, -1, -1, 11, 12, -13, -2, -23, ++ -6, -2, -9, -5, 4, 5, -1, -43, 8, -43, -14, -2, -38, 16, ++ -1, 17, -1, 18, 19, -1, -1, -20, -2, -38, -1, -1, -1, -1, ++ 22, -1, -1, -1, -1, -1, -1, -1, 23, + }; + + if (len <= MAX_WORD_LENGTH && len >= MIN_WORD_LENGTH) +@@ -20144,38 +12949,37 @@ } return 0; } --/* ending time is 18:47:28 */ +-/* ending time is 16:31:12 */ +-static TAO_IR_SequenceDef_Perfect_Hash_OpTable tao_IR_SequenceDef_optable; +- +/* ending time is 11:23:10 */ - static TAO_IR_AttributeDef_Perfect_Hash_OpTable tao_IR_AttributeDef_optable; ++static TAO_IR_AttributeDef_Perfect_Hash_OpTable tao_IR_AttributeDef_optable; -- /////////////////////////////////////////////////////////////////////// // Strategized Proxy Broker Implementation // -@@ -23719,9 +23633,9 @@ + + // Factory function Implementation. +-POA_IR::_TAO_SequenceDef_Strategized_Proxy_Broker *POA_IR::_TAO_SequenceDef_Strategized_Proxy_Broker::the_TAO_SequenceDef_Strategized_Proxy_Broker (void) ++POA_IR::_TAO_AttributeDef_Strategized_Proxy_Broker *POA_IR::_TAO_AttributeDef_Strategized_Proxy_Broker::the_TAO_AttributeDef_Strategized_Proxy_Broker (void) + { +- static POA_IR::_TAO_SequenceDef_Strategized_Proxy_Broker strategized_proxy_broker; ++ static POA_IR::_TAO_AttributeDef_Strategized_Proxy_Broker strategized_proxy_broker; + return &strategized_proxy_broker; + } + +-POA_IR::_TAO_SequenceDef_Strategized_Proxy_Broker::_TAO_SequenceDef_Strategized_Proxy_Broker (void) ++POA_IR::_TAO_AttributeDef_Strategized_Proxy_Broker::_TAO_AttributeDef_Strategized_Proxy_Broker (void) + { + for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) + this->proxy_cache_[i] = 0; } --IR::_TAO_AttributeDef_Proxy_Impl& +-POA_IR::_TAO_SequenceDef_Strategized_Proxy_Broker::~_TAO_SequenceDef_Strategized_Proxy_Broker (void) ++POA_IR::_TAO_AttributeDef_Strategized_Proxy_Broker::~_TAO_AttributeDef_Strategized_Proxy_Broker (void) + { + for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) + delete this->proxy_cache_[i]; + + } + +-IR::_TAO_SequenceDef_Proxy_Impl& +-POA_IR::_TAO_SequenceDef_Strategized_Proxy_Broker::select_proxy ( +- ::IR::SequenceDef *object, +_TAO_AttributeDef_Proxy_Impl& - POA_IR::_TAO_AttributeDef_Strategized_Proxy_Broker::select_proxy ( -- ::IR::AttributeDef *object, ++POA_IR::_TAO_AttributeDef_Strategized_Proxy_Broker::select_proxy ( + IR_AttributeDef *object, CORBA::Environment &ACE_TRY_ENV ) { -@@ -23753,7 +23667,7 @@ +@@ -20193,7 +12997,7 @@ + } + + void +-POA_IR::_TAO_SequenceDef_Strategized_Proxy_Broker::create_proxy ( ++POA_IR::_TAO_AttributeDef_Strategized_Proxy_Broker::create_proxy ( + TAO_ORB_Core::TAO_Collocation_Strategies strategy, + CORBA::Environment &ACE_TRY_ENV + ) +@@ -20207,7 +13011,7 @@ case TAO_ORB_Core::THRU_POA_STRATEGY: ACE_NEW_THROW_EX ( this->proxy_cache_[strategy], -- POA_IR::_TAO_AttributeDef_ThruPOA_Proxy_Impl, +- POA_IR::_TAO_SequenceDef_ThruPOA_Proxy_Impl, + _TAO_AttributeDef_ThruPOA_Proxy_Impl, CORBA::NO_MEMORY () ); ACE_CHECK; -@@ -23763,7 +23677,7 @@ +@@ -20217,7 +13021,7 @@ default: ACE_NEW_THROW_EX ( this->proxy_cache_[strategy], -- ::IR::_TAO_AttributeDef_Remote_Proxy_Impl, +- ::IR::_TAO_SequenceDef_Remote_Proxy_Impl, + _TAO_AttributeDef_Remote_Proxy_Impl, CORBA::NO_MEMORY () ); ACE_CHECK; -@@ -23780,26 +23694,26 @@ +@@ -20234,38 +13038,41 @@ /////////////////////////////////////////////////////////////////////// --IR::_TAO_AttributeDef_Proxy_Broker * --IR__TAO_AttributeDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) +-IR::_TAO_SequenceDef_Proxy_Broker * +-IR__TAO_SequenceDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) +_TAO_AttributeDef_Proxy_Broker * +_TAO_AttributeDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) { ACE_UNUSED_ARG (obj); - return ::POA_IR::_TAO_AttributeDef_Strategized_Proxy_Broker::the_TAO_AttributeDef_Strategized_Proxy_Broker(); +- return ::POA_IR::_TAO_SequenceDef_Strategized_Proxy_Broker::the_TAO_SequenceDef_Strategized_Proxy_Broker(); ++ return ::POA_IR::_TAO_AttributeDef_Strategized_Proxy_Broker::the_TAO_AttributeDef_Strategized_Proxy_Broker(); } int --IR__TAO_AttributeDef_Proxy_Broker_Factory_Initializer (long _dummy_) +-IR__TAO_SequenceDef_Proxy_Broker_Factory_Initializer (long _dummy_) +_TAO_AttributeDef_Proxy_Broker_Factory_Initializer (long _dummy_) { ACE_UNUSED_ARG (_dummy_); -- IR__TAO_AttributeDef_Proxy_Broker_Factory_function_pointer = -- IR__TAO_AttributeDef_Proxy_Broker_Factory_function; +- IR__TAO_SequenceDef_Proxy_Broker_Factory_function_pointer = +- IR__TAO_SequenceDef_Proxy_Broker_Factory_function; + _TAO_AttributeDef_Proxy_Broker_Factory_function_pointer = + _TAO_AttributeDef_Proxy_Broker_Factory_function; return 0; } --static int IR__TAO_AttributeDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = -- IR__TAO_AttributeDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, IR__TAO_AttributeDef_Proxy_Broker_Factory_Initializer)); +-static int IR__TAO_SequenceDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = +- IR__TAO_SequenceDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, IR__TAO_SequenceDef_Proxy_Broker_Factory_Initializer)); +static int _TAO_AttributeDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = + _TAO_AttributeDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, _TAO_AttributeDef_Proxy_Broker_Factory_Initializer)); /////////////////////////////////////////////////////////////////////// -@@ -23842,7 +23756,7 @@ + // ThruPOA Proxy Implementation + // + +-POA_IR::_TAO_SequenceDef_ThruPOA_Proxy_Impl::_TAO_SequenceDef_ThruPOA_Proxy_Impl (void) ++POA_IR::_TAO_AttributeDef_ThruPOA_Proxy_Impl::_TAO_AttributeDef_ThruPOA_Proxy_Impl (void) ++{} ++ ++POA_IR::_TAO_AttributeDef_ThruPOA_Proxy_Impl::~_TAO_AttributeDef_ThruPOA_Proxy_Impl (void) + {} + + // ThruPOA Implementation of the IDL interface methods + +-CORBA::ULong POA_IR::_TAO_SequenceDef_ThruPOA_Proxy_Impl::bound ( ++CORBA::TypeCode_ptr POA_IR::_TAO_AttributeDef_ThruPOA_Proxy_Impl::type ( + CORBA_Object *_collocated_tao_target_, + CORBA::Environment &ACE_TRY_ENV + ) +@@ -20273,7 +13080,7 @@ + CORBA::SystemException + )) + { +- CORBA::ULong _tao_retval = 0; ++ CORBA::TypeCode_var _tao_retval; + ACE_UNUSED_ARG (_tao_retval); + TAO_Object_Adapter::Servant_Upcall servant_upcall ( + _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +@@ -20281,85 +13088,85 @@ + CORBA::Object_var forward_to; + servant_upcall.prepare_for_upcall ( + _collocated_tao_target_->_object_key (), +- "bound", ++ "type", + forward_to.out (), + ACE_TRY_ENV + ); +- ACE_CHECK_RETURN (_tao_retval); ++ ACE_CHECK_RETURN (0); + return ACE_reinterpret_cast ( +- POA_IR::SequenceDef_ptr, ++ POA_IR::AttributeDef_ptr, + servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/SequenceDef:1.0" ++ "IDL:omg.org/IR/AttributeDef:1.0" + ) +- )->bound ( ++ )->type ( + ACE_TRY_ENV ); } --IR::IDLType_ptr POA_IR::_TAO_AttributeDef_ThruPOA_Proxy_Impl::type_def ( -+IR_IDLType_ptr POA_IR::_TAO_AttributeDef_ThruPOA_Proxy_Impl::type_def ( +-void POA_IR::_TAO_SequenceDef_ThruPOA_Proxy_Impl::bound ( ++IR::IDLType_ptr POA_IR::_TAO_AttributeDef_ThruPOA_Proxy_Impl::type_def ( CORBA_Object *_collocated_tao_target_, +- CORBA::ULong bound, CORBA::Environment &ACE_TRY_ENV ) -@@ -23850,7 +23764,7 @@ + ACE_THROW_SPEC (( CORBA::SystemException )) { -- IR::IDLType_var _tao_retval; + IR_IDLType_var _tao_retval; - ACE_UNUSED_ARG (_tao_retval); ++ ACE_UNUSED_ARG (_tao_retval); TAO_Object_Adapter::Servant_Upcall servant_upcall ( _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -23875,7 +23789,7 @@ + ); + CORBA::Object_var forward_to; + servant_upcall.prepare_for_upcall ( + _collocated_tao_target_->_object_key (), +- "bound", ++ "type_def", + forward_to.out (), + ACE_TRY_ENV + ); +- ACE_CHECK; +- ACE_reinterpret_cast ( +- POA_IR::SequenceDef_ptr, ++ ACE_CHECK_RETURN (0); ++ return ACE_reinterpret_cast ( ++ POA_IR::AttributeDef_ptr, + servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/SequenceDef:1.0" ++ "IDL:omg.org/IR/AttributeDef:1.0" + ) +- )->bound ( +- bound, ++ )->type_def ( + ACE_TRY_ENV + ); +- return; + } - void POA_IR::_TAO_AttributeDef_ThruPOA_Proxy_Impl::type_def ( +-CORBA::TypeCode_ptr POA_IR::_TAO_SequenceDef_ThruPOA_Proxy_Impl::element_type ( ++void POA_IR::_TAO_AttributeDef_ThruPOA_Proxy_Impl::type_def ( CORBA_Object *_collocated_tao_target_, -- IR::IDLType_ptr type_def, + IR_IDLType_ptr type_def, CORBA::Environment &ACE_TRY_ENV ) ACE_THROW_SPEC (( -@@ -23905,7 +23819,7 @@ - return; + CORBA::SystemException + )) + { +- CORBA::TypeCode_var _tao_retval; +- ACE_UNUSED_ARG (_tao_retval); + TAO_Object_Adapter::Servant_Upcall servant_upcall ( + _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () + ); + CORBA::Object_var forward_to; + servant_upcall.prepare_for_upcall ( + _collocated_tao_target_->_object_key (), +- "element_type", ++ "type_def", + forward_to.out (), + ACE_TRY_ENV + ); +- ACE_CHECK_RETURN (0); +- return ACE_reinterpret_cast ( +- POA_IR::SequenceDef_ptr, ++ ACE_CHECK; ++ ACE_reinterpret_cast ( ++ POA_IR::AttributeDef_ptr, + servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/SequenceDef:1.0" ++ "IDL:omg.org/IR/AttributeDef:1.0" + ) +- )->element_type ( ++ )->type_def ( ++ type_def, + ACE_TRY_ENV + ); ++ return; } --IR::AttributeMode POA_IR::_TAO_AttributeDef_ThruPOA_Proxy_Impl::mode ( -+IR_AttributeMode POA_IR::_TAO_AttributeDef_ThruPOA_Proxy_Impl::mode ( +-IR::IDLType_ptr POA_IR::_TAO_SequenceDef_ThruPOA_Proxy_Impl::element_type_def ( ++IR::AttributeMode POA_IR::_TAO_AttributeDef_ThruPOA_Proxy_Impl::mode ( CORBA_Object *_collocated_tao_target_, CORBA::Environment &ACE_TRY_ENV ) -@@ -23913,7 +23827,7 @@ +@@ -20367,7 +13174,7 @@ CORBA::SystemException )) { -- IR::AttributeMode _tao_retval; +- IR::IDLType_var _tao_retval; + IR_AttributeMode _tao_retval; ACE_UNUSED_ARG (_tao_retval); TAO_Object_Adapter::Servant_Upcall servant_upcall ( _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -23938,7 +23852,7 @@ +@@ -20375,24 +13182,24 @@ + CORBA::Object_var forward_to; + servant_upcall.prepare_for_upcall ( + _collocated_tao_target_->_object_key (), +- "element_type_def", ++ "mode", + forward_to.out (), + ACE_TRY_ENV + ); +- ACE_CHECK_RETURN (0); ++ ACE_CHECK_RETURN (_tao_retval); + return ACE_reinterpret_cast ( +- POA_IR::SequenceDef_ptr, ++ POA_IR::AttributeDef_ptr, + servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/SequenceDef:1.0" ++ "IDL:omg.org/IR/AttributeDef:1.0" + ) +- )->element_type_def ( ++ )->mode ( + ACE_TRY_ENV + ); + } - void POA_IR::_TAO_AttributeDef_ThruPOA_Proxy_Impl::mode ( +-void POA_IR::_TAO_SequenceDef_ThruPOA_Proxy_Impl::element_type_def ( ++void POA_IR::_TAO_AttributeDef_ThruPOA_Proxy_Impl::mode ( CORBA_Object *_collocated_tao_target_, -- IR::AttributeMode mode, +- IR::IDLType_ptr element_type_def, + IR_AttributeMode mode, CORBA::Environment &ACE_TRY_ENV ) ACE_THROW_SPEC (( -@@ -23981,7 +23895,7 @@ +@@ -20405,18 +13212,18 @@ + CORBA::Object_var forward_to; + servant_upcall.prepare_for_upcall ( + _collocated_tao_target_->_object_key (), +- "element_type_def", ++ "mode", + forward_to.out (), + ACE_TRY_ENV + ); + ACE_CHECK; + ACE_reinterpret_cast ( +- POA_IR::SequenceDef_ptr, ++ POA_IR::AttributeDef_ptr, + servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/SequenceDef:1.0" ++ "IDL:omg.org/IR/AttributeDef:1.0" + ) +- )->element_type_def ( +- element_type_def, ++ )->mode ( ++ mode, + ACE_TRY_ENV + ); + return; +@@ -20427,465 +13234,199 @@ + /////////////////////////////////////////////////////////////////////// + + // skeleton constructor +-POA_IR::SequenceDef::SequenceDef (void) ++POA_IR::AttributeDef::AttributeDef (void) + { +- this->optable_ = &tao_IR_SequenceDef_optable; ++ this->optable_ = &tao_IR_AttributeDef_optable; + } + // copy ctor - POA_IR::AttributeDef::AttributeDef (const AttributeDef& rhs) - : ACE_NESTED_CLASS (POA_IR,Contained) (rhs), +-POA_IR::SequenceDef::SequenceDef (const SequenceDef& rhs) +- : ACE_NESTED_CLASS (POA_IR,IDLType) (rhs), - ACE_NESTED_CLASS (POA_CORBA,IRObject) (rhs), ++POA_IR::AttributeDef::AttributeDef (const AttributeDef& rhs) ++ : ACE_NESTED_CLASS (POA_IR,Contained) (rhs), + POA_CORBA_IRObject (rhs), TAO_ServantBase (rhs) {} -@@ -24079,7 +23993,7 @@ + // skeleton destructor +-POA_IR::SequenceDef::~SequenceDef (void) ++POA_IR::AttributeDef::~AttributeDef (void) { - POA_IR::AttributeDef *_tao_impl = (POA_IR::AttributeDef *)_tao_object_reference; - -- IR::IDLType_var _tao_retval; -+ IR_IDLType_var _tao_retval; + } - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( -@@ -24106,7 +24020,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::IDLType_ptr _tao_retval_info = _tao_retval._retn (); -+ IR_IDLType_ptr _tao_retval_info = _tao_retval._retn (); - ri.result (_tao_retval_info); - _tao_retval = _tao_retval_info; - ri.reply_status (PortableInterceptor::SUCCESSFUL); -@@ -24160,14 +24074,12 @@ - TAO_InputCDR &_tao_in = _tao_server_request.incoming (); - POA_IR::AttributeDef *_tao_impl = (POA_IR::AttributeDef *)_tao_object_reference; - -- _tao_server_request.argument_flag (0); -- IR::IDLType_var type_def; -+ IR_IDLType_var type_def; +-void POA_IR::SequenceDef::_get_bound_skel ( ++void POA_IR::AttributeDef::_get_type_skel ( + TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, ++ void *_tao_object_reference, ++ void * /* context */, + CORBA::Environment &ACE_TRY_ENV +- ) ++) + { +- POA_IR::SequenceDef *_tao_impl = (POA_IR::SequenceDef *)_tao_object_reference; ++ POA_IR::AttributeDef *_tao_impl = (POA_IR::AttributeDef *)_tao_object_reference; + +- CORBA::ULong _tao_retval = 0; ++ CORBA::TypeCode_var _tao_retval; + +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::SequenceDef::TAO_ServerRequestInfo_IR_SequenceDef_bound_get ri ( +- _tao_server_request, +- _tao_impl +- , ++ _tao_retval = _tao_impl->type ( + ACE_TRY_ENV + ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->bound ( +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- CORBA::ULong _tao_retval_info = _tao_retval; +- ri.result (_tao_retval_info); +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; ++ + ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); ++ ++ _tao_server_request.init_reply (); + TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); if (!( - (_tao_in >> type_def.out ()) +- (_tao_out << _tao_retval) ++ (_tao_out << _tao_retval.in ()) )) - ACE_THROW (CORBA::MARSHAL()); +- ACE_THROW (CORBA::MARSHAL()); +- ++ ACE_THROW (CORBA::MARSHAL () ); + } +-void POA_IR::SequenceDef::_set_bound_skel ( ++void POA_IR::AttributeDef::_get_type_def_skel ( + TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, ++ void *_tao_object_reference, ++ void * /* context */, + CORBA::Environment &ACE_TRY_ENV +- ) ++) + { +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::SequenceDef *_tao_impl = (POA_IR::SequenceDef *)_tao_object_reference; - - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( - _tao_server_request.orb_core ()->server_request_interceptors (), -@@ -24238,7 +24150,7 @@ +-_tao_server_request.argument_flag (0); +- CORBA::ULong bound; +- if (!( +- (_tao_in >> bound) +- )) +- ACE_THROW (CORBA::MARSHAL()); ++ POA_IR::AttributeDef *_tao_impl = (POA_IR::AttributeDef *)_tao_object_reference; + ++ IR_IDLType_var _tao_retval; + +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::SequenceDef::TAO_ServerRequestInfo_IR_SequenceDef_bound_set ri ( +- _tao_server_request, +- _tao_impl +- , +- bound, ++ _tao_retval = _tao_impl->type_def ( + ACE_TRY_ENV + ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- +- _tao_impl->bound ( +- bound, +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; ++ + ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); ++ ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!( ++ (_tao_out << _tao_retval.in ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + } + +-void POA_IR::SequenceDef::_get_element_type_skel ( ++void POA_IR::AttributeDef::_set_type_def_skel ( + TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, ++ void *_tao_object_reference, ++ void * /* context */, + CORBA::Environment &ACE_TRY_ENV +- ) ++) { - POA_IR::AttributeDef *_tao_impl = (POA_IR::AttributeDef *)_tao_object_reference; - -- IR::AttributeMode _tao_retval; +- POA_IR::SequenceDef *_tao_impl = (POA_IR::SequenceDef *)_tao_object_reference; ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::AttributeDef *_tao_impl = (POA_IR::AttributeDef *)_tao_object_reference; + +- CORBA::TypeCode_var _tao_retval; ++ IR_IDLType_var type_def; ++ if (!( ++ (_tao_in >> type_def.out ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::SequenceDef::TAO_ServerRequestInfo_IR_SequenceDef_element_type_get ri ( +- _tao_server_request, +- _tao_impl +- , ++ _tao_impl->type_def ( ++ type_def.in (), + ACE_TRY_ENV + ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->element_type ( +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- CORBA::TypeCode_ptr _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; ++ + ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << _tao_retval.in ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); + ++ _tao_server_request.init_reply (); + } + +-void POA_IR::SequenceDef::_get_element_type_def_skel ( ++void POA_IR::AttributeDef::_get_mode_skel ( + TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, ++ void *_tao_object_reference, ++ void * /* context */, + CORBA::Environment &ACE_TRY_ENV +- ) ++) + { +- POA_IR::SequenceDef *_tao_impl = (POA_IR::SequenceDef *)_tao_object_reference; ++ POA_IR::AttributeDef *_tao_impl = (POA_IR::AttributeDef *)_tao_object_reference; + +- IR::IDLType_var _tao_retval; + IR_AttributeMode _tao_retval; - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( -@@ -24265,7 +24177,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::AttributeMode _tao_retval_info = _tao_retval; -+ IR_AttributeMode _tao_retval_info = _tao_retval; - ri.result (_tao_retval_info); - ri.reply_status (PortableInterceptor::SUCCESSFUL); - _tao_vfr.send_reply (&ri, ACE_TRY_ENV); -@@ -24318,14 +24230,12 @@ +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::SequenceDef::TAO_ServerRequestInfo_IR_SequenceDef_element_type_def_get ri ( +- _tao_server_request, +- _tao_impl +- , ++ _tao_retval = _tao_impl->mode ( + ACE_TRY_ENV + ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->element_type_def ( +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::IDLType_ptr _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; ++ + ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); ++ ++ _tao_server_request.init_reply (); + TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); + if (!( +- (_tao_out << _tao_retval.in ()) ++ (_tao_out << _tao_retval) + )) +- ACE_THROW (CORBA::MARSHAL()); +- ++ ACE_THROW (CORBA::MARSHAL () ); + } + +-void POA_IR::SequenceDef::_set_element_type_def_skel ( ++void POA_IR::AttributeDef::_set_mode_skel ( + TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, ++ void *_tao_object_reference, ++ void * /* context */, + CORBA::Environment &ACE_TRY_ENV +- ) ++) + { TAO_InputCDR &_tao_in = _tao_server_request.incoming (); - POA_IR::AttributeDef *_tao_impl = (POA_IR::AttributeDef *)_tao_object_reference; - -- _tao_server_request.argument_flag (0); -- IR::AttributeMode mode; +- POA_IR::SequenceDef *_tao_impl = (POA_IR::SequenceDef *)_tao_object_reference; ++ POA_IR::AttributeDef *_tao_impl = (POA_IR::AttributeDef *)_tao_object_reference; + +-_tao_server_request.argument_flag (0); +- IR::IDLType_var element_type_def; + IR_AttributeMode mode; if (!( - (_tao_in >> mode) +- (_tao_in >> element_type_def.out ()) ++ (_tao_in >> mode) )) - ACE_THROW (CORBA::MARSHAL()); +- ACE_THROW (CORBA::MARSHAL()); ++ ACE_THROW (CORBA::MARSHAL () ); + +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::SequenceDef::TAO_ServerRequestInfo_IR_SequenceDef_element_type_def_set ri ( +- _tao_server_request, +- _tao_impl +- , +- element_type_def.in (), ++ _tao_impl->mode ( ++ mode, + ACE_TRY_ENV + ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- - - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( - _tao_server_request.orb_core ()->server_request_interceptors (), -@@ -24398,7 +24308,7 @@ - POA_IR::AttributeDef *_tao_impl = (POA_IR::AttributeDef *) _tao_object_reference; +- _tao_impl->element_type_def ( +- element_type_def.in (), +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; ++ + ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); ++ ++ _tao_server_request.init_reply (); + } + +-void POA_IR::SequenceDef::_is_a_skel ( +- TAO_ServerRequest &_tao_server_request, ++void POA_IR::AttributeDef::_is_a_skel ( ++ TAO_ServerRequest &_tao_server_request, + void * _tao_object_reference, + void * /* context */, + CORBA::Environment &ACE_TRY_ENV + ) + { + TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::SequenceDef *_tao_impl = (POA_IR::SequenceDef *) _tao_object_reference; ++ POA_IR::AttributeDef *_tao_impl = (POA_IR::AttributeDef *) _tao_object_reference; CORBA::Boolean _tao_retval = 0; CORBA::String_var value; - if (!(_tao_in >> value.out ())) + if (!((_tao_in >> value.out ()))) ACE_THROW (CORBA::MARSHAL ()); - +- ++ _tao_retval = _tao_impl->_is_a (value.in (), ACE_TRY_ENV); -@@ -24406,7 +24316,7 @@ - + ACE_CHECK; +- ++ _tao_server_request.init_reply (); TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); - if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) @@ -6045,8 +26249,21 @@ ACE_THROW (CORBA::MARSHAL ()); } -@@ -24423,7 +24333,7 @@ - +-void POA_IR::SequenceDef::_non_existent_skel ( +- TAO_ServerRequest &_tao_server_request, ++void POA_IR::AttributeDef::_non_existent_skel ( ++ TAO_ServerRequest &_tao_server_request, + void * _tao_object_reference, + void * /* context */, + CORBA::Environment &ACE_TRY_ENV + ) + { +- POA_IR::SequenceDef *_tao_impl = (POA_IR::SequenceDef *) _tao_object_reference; ++ POA_IR::AttributeDef *_tao_impl = (POA_IR::AttributeDef *) _tao_object_reference; + CORBA::Boolean _tao_retval = _tao_impl->_non_existent (ACE_TRY_ENV); + ACE_CHECK; +- ++ _tao_server_request.init_reply (); TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); - if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) @@ -6054,709 +26271,3412 @@ ACE_THROW (CORBA::MARSHAL ()); } -@@ -24451,7 +24361,7 @@ - if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Contained:1.0") == 0) - return ACE_static_cast (POA_IR::Contained_ptr, this); +-CORBA::Boolean POA_IR::SequenceDef::_is_a ( ++CORBA::Boolean POA_IR::AttributeDef::_is_a ( + const char* value, + CORBA::Environment &ACE_TRY_ENV + ) + { + if ( +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/SequenceDef:1.0")) || +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/IDLType:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/AttributeDef:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/Contained:1.0")) || + (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/CORBA/IRObject:1.0")) || + (!ACE_OS::strcmp ((char *)value, CORBA::_tc_Object->id (ACE_TRY_ENV)))) + return 1; +@@ -20893,33 +13434,33 @@ + return 0; + } + +-void* POA_IR::SequenceDef::_downcast ( ++void* POA_IR::AttributeDef::_downcast ( + const char* logical_type_id + ) + { +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/SequenceDef:1.0") == 0) +- return ACE_static_cast (POA_IR::SequenceDef_ptr, this); +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/IDLType:1.0") == 0) +- return ACE_static_cast (POA_IR::IDLType_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/AttributeDef:1.0") == 0) ++ return ACE_static_cast (POA_IR::AttributeDef_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Contained:1.0") == 0) ++ return ACE_static_cast (POA_IR::Contained_ptr, this); if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/IRObject:1.0") == 0) - return ACE_static_cast (POA_CORBA::IRObject_ptr, this); + return ACE_static_cast (POA_CORBA_IRObject_ptr, this); if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/Object:1.0") == 0) return ACE_static_cast(PortableServer::Servant, this); return 0; -@@ -24481,10 +24391,9 @@ + } + +-void POA_IR::SequenceDef::_dispatch (TAO_ServerRequest &req, void *context, CORBA::Environment &ACE_TRY_ENV) ++void POA_IR::AttributeDef::_dispatch (TAO_ServerRequest &req, void *context, CORBA::Environment &ACE_TRY_ENV) + { + this->synchronous_upcall_dispatch(req, context, this, ACE_TRY_ENV); + } + +-const char* POA_IR::SequenceDef::_interface_repository_id (void) const ++const char* POA_IR::AttributeDef::_interface_repository_id (void) const + { +- return "IDL:omg.org/IR/SequenceDef:1.0"; ++ return "IDL:omg.org/IR/AttributeDef:1.0"; + } + +-IR::SequenceDef* +-POA_IR::SequenceDef::_this (CORBA_Environment &ACE_TRY_ENV) ++IR::AttributeDef* ++POA_IR::AttributeDef::_this (CORBA_Environment &ACE_TRY_ENV) + { + TAO_Stub *stub = this->_create_stub (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); +@@ -20932,765 +13473,642 @@ ACE_NEW_RETURN (tmp, CORBA::Object (stub, 0, this), 0); CORBA::Object_var obj = tmp; -- return ::IR::AttributeDef::_unchecked_narrow (obj.in ()); +- return ::IR::SequenceDef::_unchecked_narrow (obj.in ()); + return IR_AttributeDef::_unchecked_narrow (obj.in ()); } - - #if (TAO_HAS_INTERCEPTORS == 1) - POA_IR::AttributeDef::TAO_ServerRequestInfo_IR_AttributeDef_type_get::TAO_ServerRequestInfo_IR_AttributeDef_type_get ( - TAO_ServerRequest &_tao_server_request, -@@ -24639,7 +24548,7 @@ - POA_IR::AttributeDef::TAO_ServerRequestInfo_IR_AttributeDef_type_def_set::TAO_ServerRequestInfo_IR_AttributeDef_type_def_set ( - TAO_ServerRequest &_tao_server_request, - POA_IR::AttributeDef *tao_impl, -- IR::IDLType_ptr type_def, -+ IR_IDLType_ptr type_def, - CORBA::Environment & - ) - : TAO_ServerRequestInfo (_tao_server_request), -@@ -24788,7 +24697,7 @@ - POA_IR::AttributeDef::TAO_ServerRequestInfo_IR_AttributeDef_mode_set::TAO_ServerRequestInfo_IR_AttributeDef_mode_set ( - TAO_ServerRequest &_tao_server_request, - POA_IR::AttributeDef *tao_impl, -- IR::AttributeMode & mode, -+ IR_AttributeMode & mode, - CORBA::Environment & - ) - : TAO_ServerRequestInfo (_tao_server_request), -@@ -24860,6 +24769,7 @@ - } +-#if (TAO_HAS_INTERCEPTORS == 1) +-POA_IR::SequenceDef::TAO_ServerRequestInfo_IR_SequenceDef_bound_get::TAO_ServerRequestInfo_IR_SequenceDef_bound_get ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::SequenceDef *tao_impl +- , +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl) +-{} +- +-Dynamic::ParameterList * +-POA_IR::SequenceDef::TAO_ServerRequestInfo_IR_SequenceDef_bound_get::arguments (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++class TAO_IR_OperationDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable + { +- // 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 * +-POA_IR::SequenceDef::TAO_ServerRequestInfo_IR_SequenceDef_bound_get::exceptions (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++private: ++ unsigned int hash (const char *str, unsigned int len); ++public: ++ const TAO_operation_db_entry * lookup (const char *str, unsigned int len); ++}; ++/* starting time is 11:23:10 */ ++/* C++ code produced by gperf version 2.8 (ACE version) */ ++/* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_OperationDef_Perfect_Hash_OpTable -N lookup */ ++unsigned int ++TAO_IR_OperationDef_Perfect_Hash_OpTable::hash (const char *str, unsigned int len) + { +- // 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; ++ static const unsigned char asso_values[] = ++ { ++#if defined (ACE_MVS) ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 0, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 0, ++ 37, 37, 15, 0, 10, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 0, 5, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 0, 20, 37, 37, 37, 37, 10, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, ++#else ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 0, 37, 0, 37, 37, ++ 15, 0, 10, 37, 37, 37, 37, 37, 37, 0, ++ 5, 37, 37, 37, 37, 0, 20, 37, 37, 37, ++ 37, 10, 37, 37, 37, 37, 37, 37, ++#endif /* ACE_MVS */ ++ }; ++ return len + asso_values[str[len - 1]] + asso_values[str[0]]; + } + +-CORBA::Any * +-POA_IR::SequenceDef::TAO_ServerRequestInfo_IR_SequenceDef_bound_get::result (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++const class TAO_operation_db_entry * ++TAO_IR_OperationDef_Perfect_Hash_OpTable::lookup (const char *str, unsigned int len) + { +- // 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 (); +-} ++ enum ++ { ++ TOTAL_KEYWORDS = 26, ++ MIN_WORD_LENGTH = 4, ++ MAX_WORD_LENGTH = 26, ++ MIN_HASH_VALUE = 4, ++ MAX_HASH_VALUE = 36, ++ HASH_VALUE_RANGE = 33, ++ DUPLICATES = 10 ++ }; + +-char * +-POA_IR::SequenceDef::TAO_ServerRequestInfo_IR_SequenceDef_bound_get::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} ++ static const class TAO_operation_db_entry wordlist[] = ++ { ++ {"",0},{"",0},{"",0},{"",0}, ++ {"move", &POA_IR::OperationDef::move_skel}, ++ {"_is_a", &POA_IR::OperationDef::_is_a_skel}, ++ {"_get_mode", &POA_IR::OperationDef::_get_mode_skel}, ++ {"_set_name", &POA_IR::OperationDef::_set_name_skel}, ++ {"_get_name", &POA_IR::OperationDef::_get_name_skel}, ++ {"_set_mode", &POA_IR::OperationDef::_set_mode_skel}, ++ {"_get_params", &POA_IR::OperationDef::_get_params_skel}, ++ {"_set_params", &POA_IR::OperationDef::_set_params_skel}, ++ {"_get_contexts", &POA_IR::OperationDef::_get_contexts_skel}, ++ {"_set_contexts", &POA_IR::OperationDef::_set_contexts_skel}, ++ {"_get_exceptions", &POA_IR::OperationDef::_get_exceptions_skel}, ++ {"_set_exceptions", &POA_IR::OperationDef::_set_exceptions_skel}, ++ {"_get_version", &POA_IR::OperationDef::_get_version_skel}, ++ {"_set_version", &POA_IR::OperationDef::_set_version_skel}, ++ {"_get_absolute_name", &POA_IR::OperationDef::_get_absolute_name_skel}, ++ {"_get_defined_in", &POA_IR::OperationDef::_get_defined_in_skel}, ++ {"_get_id", &POA_IR::OperationDef::_get_id_skel}, ++ {"_set_id", &POA_IR::OperationDef::_set_id_skel}, ++ {"describe", &POA_IR::OperationDef::describe_skel}, ++ {"_get_result_def", &POA_IR::OperationDef::_get_result_def_skel}, ++ {"_set_result_def", &POA_IR::OperationDef::_set_result_def_skel}, ++ {"_get_def_kind", &POA_IR::OperationDef::_get_def_kind_skel}, ++ {"_get_result", &POA_IR::OperationDef::_get_result_skel}, ++ {"destroy", &POA_IR::OperationDef::destroy_skel}, ++ {"_non_existent", &POA_IR::OperationDef::_non_existent_skel}, ++ {"_get_containing_repository", &POA_IR::OperationDef::_get_containing_repository_skel}, ++ }; + +-CORBA::Boolean +-POA_IR::SequenceDef::TAO_ServerRequestInfo_IR_SequenceDef_bound_get::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} ++ if (len <= MAX_WORD_LENGTH && len >= MIN_WORD_LENGTH) ++ { ++ unsigned int key = hash (str, len); - #endif /* TAO_HAS_INTERCEPTORS */ +-void +-POA_IR::SequenceDef::TAO_ServerRequestInfo_IR_SequenceDef_bound_get::result (CORBA::ULong result) +-{ +- // Update the result. +- this->_result = result; ++ if (key <= MAX_HASH_VALUE && key >= MIN_HASH_VALUE) ++ { ++ { ++ const class TAO_operation_db_entry *resword; + - class TAO_IR_OperationDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable - { - private: -@@ -24867,7 +24777,7 @@ - public: - const TAO_operation_db_entry * lookup (const char *str, unsigned int len); - }; --/* starting time is 18:47:28 */ -+/* starting time is 11:23:10 */ - /* C++ code produced by gperf version 2.8 (ACE version) */ - /* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_OperationDef_Perfect_Hash_OpTable -N lookup */ - unsigned int -@@ -25053,10 +24963,9 @@ - } - return 0; ++ switch (key) ++ { ++ case 4: ++ resword = &wordlist[4]; break; ++ case 5: ++ resword = &wordlist[5]; break; ++ case 9: ++ resword = &wordlist[6]; ++ if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; ++ resword = &wordlist[7]; ++ if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; ++ resword = &wordlist[8]; ++ if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; ++ resword = &wordlist[9]; ++ if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; ++ return 0; ++ case 11: ++ resword = &wordlist[10]; ++ if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; ++ resword = &wordlist[11]; ++ if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; ++ return 0; ++ case 13: ++ resword = &wordlist[12]; ++ if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; ++ resword = &wordlist[13]; ++ if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; ++ return 0; ++ case 15: ++ resword = &wordlist[14]; ++ if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; ++ resword = &wordlist[15]; ++ if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; ++ return 0; ++ case 17: ++ resword = &wordlist[16]; ++ if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; ++ resword = &wordlist[17]; ++ if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; ++ return 0; ++ case 18: ++ resword = &wordlist[18]; break; ++ case 20: ++ resword = &wordlist[19]; break; ++ case 22: ++ resword = &wordlist[20]; ++ if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; ++ resword = &wordlist[21]; ++ if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; ++ return 0; ++ case 23: ++ resword = &wordlist[22]; break; ++ case 25: ++ resword = &wordlist[23]; ++ if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; ++ resword = &wordlist[24]; ++ if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; ++ return 0; ++ case 28: ++ resword = &wordlist[25]; break; ++ case 31: ++ resword = &wordlist[26]; break; ++ case 32: ++ resword = &wordlist[27]; break; ++ case 33: ++ resword = &wordlist[28]; break; ++ case 36: ++ resword = &wordlist[29]; break; ++ default: return 0; ++ } ++ if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) ++ return resword; ++ return 0; ++ } ++ } ++ } ++ return 0; } --/* ending time is 18:47:28 */ +/* ending time is 11:23:10 */ - static TAO_IR_OperationDef_Perfect_Hash_OpTable tao_IR_OperationDef_optable; ++static TAO_IR_OperationDef_Perfect_Hash_OpTable tao_IR_OperationDef_optable; + +-POA_IR::SequenceDef::TAO_ServerRequestInfo_IR_SequenceDef_bound_set::TAO_ServerRequestInfo_IR_SequenceDef_bound_set ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::SequenceDef *tao_impl +- , +- const CORBA::ULong & bound, +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- bound_ (bound) +-{} ++/////////////////////////////////////////////////////////////////////// ++// Strategized Proxy Broker Implementation ++// + +-Dynamic::ParameterList * +-POA_IR::SequenceDef::TAO_ServerRequestInfo_IR_SequenceDef_bound_set::arguments (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++// Factory function Implementation. ++POA_IR::_TAO_OperationDef_Strategized_Proxy_Broker *POA_IR::_TAO_OperationDef_Strategized_Proxy_Broker::the_TAO_OperationDef_Strategized_Proxy_Broker (void) + { +- // 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 (); ++ static POA_IR::_TAO_OperationDef_Strategized_Proxy_Broker strategized_proxy_broker; ++ return &strategized_proxy_broker; + } -- - /////////////////////////////////////////////////////////////////////// - // Strategized Proxy Broker Implementation - // -@@ -25082,9 +24991,9 @@ +-Dynamic::ExceptionList * +-POA_IR::SequenceDef::TAO_ServerRequestInfo_IR_SequenceDef_bound_set::exceptions (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++POA_IR::_TAO_OperationDef_Strategized_Proxy_Broker::_TAO_OperationDef_Strategized_Proxy_Broker (void) + { +- // Generate the exception list on demand. +- Dynamic::ExceptionList *exception_list = +- TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); +- ACE_CHECK_RETURN (0); ++ for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) ++ this->proxy_cache_[i] = 0; +- return exception_list; } --IR::_TAO_OperationDef_Proxy_Impl& +-CORBA::Any * +-POA_IR::SequenceDef::TAO_ServerRequestInfo_IR_SequenceDef_bound_set::result (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++POA_IR::_TAO_OperationDef_Strategized_Proxy_Broker::~_TAO_OperationDef_Strategized_Proxy_Broker (void) + { +- // 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); ++ for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) ++ delete this->proxy_cache_[i]; + +- return result_any; +-} +- +-char * +-POA_IR::SequenceDef::TAO_ServerRequestInfo_IR_SequenceDef_bound_set::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); + } + +-CORBA::Boolean +-POA_IR::SequenceDef::TAO_ServerRequestInfo_IR_SequenceDef_bound_set::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +_TAO_OperationDef_Proxy_Impl& - POA_IR::_TAO_OperationDef_Strategized_Proxy_Broker::select_proxy ( -- ::IR::OperationDef *object, ++POA_IR::_TAO_OperationDef_Strategized_Proxy_Broker::select_proxy ( + IR_OperationDef *object, - CORBA::Environment &ACE_TRY_ENV ++ CORBA::Environment &ACE_TRY_ENV ++ ) + { +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); ++ TAO_ORB_Core::TAO_Collocation_Strategies strategy = ++ TAO_ORB_Core::collocation_strategy (object); ++ ++ if (this->proxy_cache_[strategy] != 0) ++ return *this->proxy_cache_[strategy]; ++ ++ this->create_proxy (strategy, ACE_TRY_ENV); ++ ACE_CHECK_RETURN (*this->proxy_cache_[strategy]); ++ ++ return *this->proxy_cache_[strategy]; ++ + } + +-POA_IR::SequenceDef::TAO_ServerRequestInfo_IR_SequenceDef_element_type_get::TAO_ServerRequestInfo_IR_SequenceDef_element_type_get ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::SequenceDef *tao_impl +- , +- CORBA::Environment & ++void ++POA_IR::_TAO_OperationDef_Strategized_Proxy_Broker::create_proxy ( ++ TAO_ORB_Core::TAO_Collocation_Strategies strategy, ++ CORBA::Environment &ACE_TRY_ENV ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl) +-{} +- +-Dynamic::ParameterList * +-POA_IR::SequenceDef::TAO_ServerRequestInfo_IR_SequenceDef_element_type_get::arguments (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) { -@@ -25116,7 +25025,7 @@ - case TAO_ORB_Core::THRU_POA_STRATEGY: - ACE_NEW_THROW_EX ( - this->proxy_cache_[strategy], -- POA_IR::_TAO_OperationDef_ThruPOA_Proxy_Impl, +- // Generate the argument list on demand. +- Dynamic::ParameterList *parameter_list = +- TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); +- ACE_CHECK_RETURN (0); ++ ACE_GUARD (TAO_SYNCH_MUTEX, guard, this->mutex_); + +- return parameter_list; ++ if (this->proxy_cache_[strategy] == 0) ++ { ++ switch (strategy) ++ { ++ case TAO_ORB_Core::THRU_POA_STRATEGY: ++ ACE_NEW_THROW_EX ( ++ this->proxy_cache_[strategy], + _TAO_OperationDef_ThruPOA_Proxy_Impl, - CORBA::NO_MEMORY () - ); - ACE_CHECK; -@@ -25126,7 +25035,7 @@ - default: - ACE_NEW_THROW_EX ( - this->proxy_cache_[strategy], -- ::IR::_TAO_OperationDef_Remote_Proxy_Impl, ++ CORBA::NO_MEMORY () ++ ); ++ ACE_CHECK; ++ break; ++ ++ case TAO_ORB_Core::REMOTE_STRATEGY: ++ default: ++ ACE_NEW_THROW_EX ( ++ this->proxy_cache_[strategy], + _TAO_OperationDef_Remote_Proxy_Impl, - CORBA::NO_MEMORY () - ); - ACE_CHECK; -@@ -25143,26 +25052,26 @@ - /////////////////////////////////////////////////////////////////////// - - --IR::_TAO_OperationDef_Proxy_Broker * --IR__TAO_OperationDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) ++ CORBA::NO_MEMORY () ++ ); ++ ACE_CHECK; ++ break; ++ ++ } ++ ++ } + } + +-Dynamic::ExceptionList * +-POA_IR::SequenceDef::TAO_ServerRequestInfo_IR_SequenceDef_element_type_get::exceptions (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++ ++// ++// End Strategized Proxy Broker Implementation ++/////////////////////////////////////////////////////////////////////// ++ ++ +_TAO_OperationDef_Proxy_Broker * +_TAO_OperationDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) { - ACE_UNUSED_ARG (obj); - return ::POA_IR::_TAO_OperationDef_Strategized_Proxy_Broker::the_TAO_OperationDef_Strategized_Proxy_Broker(); +- // 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; ++ ACE_UNUSED_ARG (obj); ++ return ::POA_IR::_TAO_OperationDef_Strategized_Proxy_Broker::the_TAO_OperationDef_Strategized_Proxy_Broker(); } - int --IR__TAO_OperationDef_Proxy_Broker_Factory_Initializer (long _dummy_) +-CORBA::Any * +-POA_IR::SequenceDef::TAO_ServerRequestInfo_IR_SequenceDef_element_type_get::result (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++int +_TAO_OperationDef_Proxy_Broker_Factory_Initializer (long _dummy_) { - ACE_UNUSED_ARG (_dummy_); +- // 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; ++ ACE_UNUSED_ARG (_dummy_); -- IR__TAO_OperationDef_Proxy_Broker_Factory_function_pointer = -- IR__TAO_OperationDef_Proxy_Broker_Factory_function; +- (*result_any) <<= this->_result; + _TAO_OperationDef_Proxy_Broker_Factory_function_pointer = + _TAO_OperationDef_Proxy_Broker_Factory_function; - return 0; +- return safe_result_any._retn (); ++ return 0; } --static int IR__TAO_OperationDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = -- IR__TAO_OperationDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, IR__TAO_OperationDef_Proxy_Broker_Factory_Initializer)); +-char * +-POA_IR::SequenceDef::TAO_ServerRequestInfo_IR_SequenceDef_element_type_get::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +static int _TAO_OperationDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = + _TAO_OperationDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, _TAO_OperationDef_Proxy_Broker_Factory_Initializer)); +-CORBA::Boolean +-POA_IR::SequenceDef::TAO_ServerRequestInfo_IR_SequenceDef_element_type_get::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} - /////////////////////////////////////////////////////////////////////// -@@ -25205,7 +25114,7 @@ - ); - } +-void +-POA_IR::SequenceDef::TAO_ServerRequestInfo_IR_SequenceDef_element_type_get::result (CORBA::TypeCode_ptr result) +-{ +- // Update the result. +- this->_result = result; +-} ++/////////////////////////////////////////////////////////////////////// ++// ThruPOA Proxy Implementation ++// + +-POA_IR::SequenceDef::TAO_ServerRequestInfo_IR_SequenceDef_element_type_def_get::TAO_ServerRequestInfo_IR_SequenceDef_element_type_def_get ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::SequenceDef *tao_impl +- , +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl) ++POA_IR::_TAO_OperationDef_ThruPOA_Proxy_Impl::_TAO_OperationDef_ThruPOA_Proxy_Impl (void) + {} --IR::IDLType_ptr POA_IR::_TAO_OperationDef_ThruPOA_Proxy_Impl::result_def ( -+IR_IDLType_ptr POA_IR::_TAO_OperationDef_ThruPOA_Proxy_Impl::result_def ( - CORBA_Object *_collocated_tao_target_, - CORBA::Environment &ACE_TRY_ENV - ) -@@ -25213,7 +25122,7 @@ - CORBA::SystemException - )) - { -- IR::IDLType_var _tao_retval; -+ IR_IDLType_var _tao_retval; - ACE_UNUSED_ARG (_tao_retval); - TAO_Object_Adapter::Servant_Upcall servant_upcall ( - _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -25238,7 +25147,7 @@ +-Dynamic::ParameterList * +-POA_IR::SequenceDef::TAO_ServerRequestInfo_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; +-} ++POA_IR::_TAO_OperationDef_ThruPOA_Proxy_Impl::~_TAO_OperationDef_ThruPOA_Proxy_Impl (void) ++{} - void POA_IR::_TAO_OperationDef_ThruPOA_Proxy_Impl::result_def ( - CORBA_Object *_collocated_tao_target_, -- IR::IDLType_ptr result_def, +-Dynamic::ExceptionList * +-POA_IR::SequenceDef::TAO_ServerRequestInfo_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; +-} ++// ThruPOA Implementation of the IDL interface methods + +-CORBA::Any * +-POA_IR::SequenceDef::TAO_ServerRequestInfo_IR_SequenceDef_element_type_def_get::result (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++CORBA::TypeCode_ptr POA_IR::_TAO_OperationDef_ThruPOA_Proxy_Impl::result ( ++ CORBA_Object *_collocated_tao_target_, ++ 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 (); ++ CORBA::TypeCode_var _tao_retval; ++ ACE_UNUSED_ARG (_tao_retval); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "result", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK_RETURN (0); ++ return ACE_reinterpret_cast ( ++ POA_IR::OperationDef_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/OperationDef:1.0" ++ ) ++ )->result ( ++ ACE_TRY_ENV ++ ); + } + +-char * +-POA_IR::SequenceDef::TAO_ServerRequestInfo_IR_SequenceDef_element_type_def_get::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++IR::IDLType_ptr POA_IR::_TAO_OperationDef_ThruPOA_Proxy_Impl::result_def ( ++ CORBA_Object *_collocated_tao_target_, ++ CORBA::Environment &ACE_TRY_ENV ++ ) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException ++ )) + { +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); ++ IR_IDLType_var _tao_retval; ++ ACE_UNUSED_ARG (_tao_retval); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "result_def", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK_RETURN (0); ++ return ACE_reinterpret_cast ( ++ POA_IR::OperationDef_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/OperationDef:1.0" ++ ) ++ )->result_def ( ++ ACE_TRY_ENV ++ ); + } + +-CORBA::Boolean +-POA_IR::SequenceDef::TAO_ServerRequestInfo_IR_SequenceDef_element_type_def_get::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++void POA_IR::_TAO_OperationDef_ThruPOA_Proxy_Impl::result_def ( ++ CORBA_Object *_collocated_tao_target_, + IR_IDLType_ptr result_def, - CORBA::Environment &ACE_TRY_ENV - ) - ACE_THROW_SPEC (( -@@ -25268,7 +25177,7 @@ - return; - } - --IR::ParDescriptionSeq * POA_IR::_TAO_OperationDef_ThruPOA_Proxy_Impl::params ( -+IR_ParDescriptionSeq * POA_IR::_TAO_OperationDef_ThruPOA_Proxy_Impl::params ( - CORBA_Object *_collocated_tao_target_, - CORBA::Environment &ACE_TRY_ENV - ) -@@ -25276,7 +25185,7 @@ - CORBA::SystemException - )) - { -- IR::ParDescriptionSeq_var _tao_retval; ++ CORBA::Environment &ACE_TRY_ENV ++ ) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException ++ )) + { +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "result_def", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK; ++ ACE_reinterpret_cast ( ++ POA_IR::OperationDef_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/OperationDef:1.0" ++ ) ++ )->result_def ( ++ result_def, ++ ACE_TRY_ENV ++ ); ++ return; + } + +-void +-POA_IR::SequenceDef::TAO_ServerRequestInfo_IR_SequenceDef_element_type_def_get::result (IR::IDLType_ptr result) ++IR::ParDescriptionSeq * POA_IR::_TAO_OperationDef_ThruPOA_Proxy_Impl::params ( ++ CORBA_Object *_collocated_tao_target_, ++ CORBA::Environment &ACE_TRY_ENV ++ ) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException ++ )) + { +- // Update the result. +- this->_result = result; + IR_ParDescriptionSeq_var _tao_retval; - ACE_UNUSED_ARG (_tao_retval); - TAO_Object_Adapter::Servant_Upcall servant_upcall ( - _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -25301,7 +25210,7 @@ - - void POA_IR::_TAO_OperationDef_ThruPOA_Proxy_Impl::params ( - CORBA_Object *_collocated_tao_target_, -- const IR::ParDescriptionSeq & params, -+ const IR_ParDescriptionSeq & params, - CORBA::Environment &ACE_TRY_ENV - ) - ACE_THROW_SPEC (( -@@ -25331,7 +25240,7 @@ - return; ++ ACE_UNUSED_ARG (_tao_retval); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "params", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK_RETURN (0); ++ return ACE_reinterpret_cast ( ++ POA_IR::OperationDef_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/OperationDef:1.0" ++ ) ++ )->params ( ++ ACE_TRY_ENV ++ ); } --IR::OperationMode POA_IR::_TAO_OperationDef_ThruPOA_Proxy_Impl::mode ( -+IR_OperationMode POA_IR::_TAO_OperationDef_ThruPOA_Proxy_Impl::mode ( - CORBA_Object *_collocated_tao_target_, - CORBA::Environment &ACE_TRY_ENV +-POA_IR::SequenceDef::TAO_ServerRequestInfo_IR_SequenceDef_element_type_def_set::TAO_ServerRequestInfo_IR_SequenceDef_element_type_def_set ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::SequenceDef *tao_impl +- , +- IR::IDLType_ptr element_type_def, +- CORBA::Environment & ++void POA_IR::_TAO_OperationDef_ThruPOA_Proxy_Impl::params ( ++ CORBA_Object *_collocated_tao_target_, ++ const IR_ParDescriptionSeq & params, ++ CORBA::Environment &ACE_TRY_ENV ) -@@ -25339,7 +25248,7 @@ - CORBA::SystemException - )) - { -- IR::OperationMode _tao_retval; +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- element_type_def_ (element_type_def) +-{} +- +-Dynamic::ParameterList * +-POA_IR::SequenceDef::TAO_ServerRequestInfo_IR_SequenceDef_element_type_def_set::arguments (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++ 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 (); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "params", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK; ++ ACE_reinterpret_cast ( ++ POA_IR::OperationDef_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/OperationDef:1.0" ++ ) ++ )->params ( ++ params, ++ ACE_TRY_ENV ++ ); ++ return; + } + +-Dynamic::ExceptionList * +-POA_IR::SequenceDef::TAO_ServerRequestInfo_IR_SequenceDef_element_type_def_set::exceptions (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++IR::OperationMode POA_IR::_TAO_OperationDef_ThruPOA_Proxy_Impl::mode ( ++ CORBA_Object *_collocated_tao_target_, ++ 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; + IR_OperationMode _tao_retval; - ACE_UNUSED_ARG (_tao_retval); - TAO_Object_Adapter::Servant_Upcall servant_upcall ( - _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -25364,7 +25273,7 @@ ++ ACE_UNUSED_ARG (_tao_retval); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "mode", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK_RETURN (_tao_retval); ++ return ACE_reinterpret_cast ( ++ POA_IR::OperationDef_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/OperationDef:1.0" ++ ) ++ )->mode ( ++ ACE_TRY_ENV ++ ); + } - void POA_IR::_TAO_OperationDef_ThruPOA_Proxy_Impl::mode ( - CORBA_Object *_collocated_tao_target_, -- IR::OperationMode mode, +-CORBA::Any * +-POA_IR::SequenceDef::TAO_ServerRequestInfo_IR_SequenceDef_element_type_def_set::result (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++void POA_IR::_TAO_OperationDef_ThruPOA_Proxy_Impl::mode ( ++ CORBA_Object *_collocated_tao_target_, + IR_OperationMode mode, - CORBA::Environment &ACE_TRY_ENV - ) - ACE_THROW_SPEC (( -@@ -25394,7 +25303,7 @@ - return; ++ 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; ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "mode", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK; ++ ACE_reinterpret_cast ( ++ POA_IR::OperationDef_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/OperationDef:1.0" ++ ) ++ )->mode ( ++ mode, ++ ACE_TRY_ENV ++ ); ++ return; + } + +-char * +-POA_IR::SequenceDef::TAO_ServerRequestInfo_IR_SequenceDef_element_type_def_set::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++IR::ContextIdSeq * POA_IR::_TAO_OperationDef_ThruPOA_Proxy_Impl::contexts ( ++ CORBA_Object *_collocated_tao_target_, ++ CORBA::Environment &ACE_TRY_ENV ++ ) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException ++ )) + { +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); ++ IR_ContextIdSeq_var _tao_retval; ++ ACE_UNUSED_ARG (_tao_retval); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "contexts", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK_RETURN (0); ++ return ACE_reinterpret_cast ( ++ POA_IR::OperationDef_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/OperationDef:1.0" ++ ) ++ )->contexts ( ++ ACE_TRY_ENV ++ ); } --IR::ContextIdSeq * POA_IR::_TAO_OperationDef_ThruPOA_Proxy_Impl::contexts ( -+IR_ContextIdSeq * POA_IR::_TAO_OperationDef_ThruPOA_Proxy_Impl::contexts ( +-CORBA::Boolean +-POA_IR::SequenceDef::TAO_ServerRequestInfo_IR_SequenceDef_element_type_def_set::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-#endif /* TAO_HAS_INTERCEPTORS */ +-class TAO_IR_ArrayDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable +-{ +-private: +- unsigned int hash (const char *str, unsigned int len); +-public: +- const TAO_operation_db_entry * lookup (const char *str, unsigned int len); +-}; +-/* starting time is 16:31:12 */ +-/* C++ code produced by gperf version 2.8 (ACE version) */ +-/* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_ArrayDef_Perfect_Hash_OpTable -N lookup */ +-unsigned int +-TAO_IR_ArrayDef_Perfect_Hash_OpTable::hash (const char *str, unsigned int len) +-{ +- static const unsigned char asso_values[] = +- { +-#if defined (ACE_MVS) +- 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, +- 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, +- 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, +- 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, +- 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, +- 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, +- 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, +- 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, +- 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, +- 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, +- 22, 22, 22, 22, 22, 22, 22, 22, 22, 0, +- 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, +- 22, 22, 22, 22, 22, 22, 22, 22, 22, 0, +- 22, 22, 0, 0, 0, 22, 0, 22, 22, 22, +- 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, +- 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, +- 22, 22, 22, 5, 22, 22, 22, 22, 0, 22, +- 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, +- 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, +- 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, +- 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, +- 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, +- 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, +- 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, +- 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, +- 22, 22, 22, 22, 22, 22, +-#else +- 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, +- 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, +- 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, +- 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, +- 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, +- 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, +- 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, +- 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, +- 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, +- 22, 22, 22, 22, 22, 0, 22, 0, 22, 22, +- 0, 0, 0, 22, 0, 22, 22, 22, 22, 22, +- 22, 22, 22, 22, 22, 22, 5, 22, 22, 22, +- 22, 0, 22, 22, 22, 22, 22, 22, +-#endif /* ACE_MVS */ +- }; +- return len + asso_values[str[len - 1]] + asso_values[str[0]]; +-} +- +-const class TAO_operation_db_entry * +-TAO_IR_ArrayDef_Perfect_Hash_OpTable::lookup (const char *str, unsigned int len) +-{ +- enum +- { +- TOTAL_KEYWORDS = 10, +- MIN_WORD_LENGTH = 5, +- MAX_WORD_LENGTH = 21, +- MIN_HASH_VALUE = 5, +- MAX_HASH_VALUE = 21, +- HASH_VALUE_RANGE = 17, +- DUPLICATES = 3 +- }; +- +- static const class TAO_operation_db_entry wordlist[] = +- { +- {"",0},{"",0},{"",0},{"",0},{"",0}, +- {"_is_a", &POA_IR::ArrayDef::_is_a_skel}, +- {"destroy", &POA_IR::ArrayDef::destroy_skel}, +- {"_get_type", &POA_IR::ArrayDef::_get_type_skel}, +- {"_get_length", &POA_IR::ArrayDef::_get_length_skel}, +- {"_set_length", &POA_IR::ArrayDef::_set_length_skel}, +- {"_get_def_kind", &POA_IR::ArrayDef::_get_def_kind_skel}, +- {"_get_element_type", &POA_IR::ArrayDef::_get_element_type_skel}, +- {"_non_existent", &POA_IR::ArrayDef::_non_existent_skel}, +- {"_get_element_type_def", &POA_IR::ArrayDef::_get_element_type_def_skel}, +- {"_set_element_type_def", &POA_IR::ArrayDef::_set_element_type_def_skel}, +- }; +- +- static const signed char lookup[] = +- { +- -1, -1, -1, -8, -2, 5, -1, 6, -1, 7, -1, -29, -1, 10, +- -1, -1, -1, 11, 12, -13, -2, -23, +- }; +- +- if (len <= MAX_WORD_LENGTH && len >= MIN_WORD_LENGTH) +- { +- unsigned int key = hash (str, len); +- +- if (key <= MAX_HASH_VALUE && key >= MIN_HASH_VALUE) +- { +- int slot = lookup[key]; +- +- if (slot >= 0 && slot < MAX_HASH_VALUE) +- { +- const char *s = wordlist[slot].opname_; +- +- if (*str == *s && !strncmp (str + 1, s + 1, len - 1)) +- return &wordlist[slot]; +- } +- else if (slot < 0 && slot >= -MAX_HASH_VALUE) +- return 0; +- else +- { +- unsigned int offset = key + slot + (slot > 0 ? -MAX_HASH_VALUE : MAX_HASH_VALUE); +- const class TAO_operation_db_entry *base = &wordlist[-lookup[offset]]; +- const class TAO_operation_db_entry *ptr = base + -lookup[offset + 1]; +- +- while (--ptr >= base) +- if (*str == *ptr->opname_ && !strncmp (str + 1, ptr->opname_ + 1, len - 1)) +- return ptr; +- } +- } +- } +- return 0; +-} +-/* ending time is 16:31:12 */ +-static TAO_IR_ArrayDef_Perfect_Hash_OpTable tao_IR_ArrayDef_optable; +- +- +-/////////////////////////////////////////////////////////////////////// +-// Strategized Proxy Broker Implementation +-// +- +-// Factory function Implementation. +-POA_IR::_TAO_ArrayDef_Strategized_Proxy_Broker *POA_IR::_TAO_ArrayDef_Strategized_Proxy_Broker::the_TAO_ArrayDef_Strategized_Proxy_Broker (void) +-{ +- static POA_IR::_TAO_ArrayDef_Strategized_Proxy_Broker strategized_proxy_broker; +- return &strategized_proxy_broker; +-} +- +-POA_IR::_TAO_ArrayDef_Strategized_Proxy_Broker::_TAO_ArrayDef_Strategized_Proxy_Broker (void) +-{ +- for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) +- this->proxy_cache_[i] = 0; +- +-} +- +-POA_IR::_TAO_ArrayDef_Strategized_Proxy_Broker::~_TAO_ArrayDef_Strategized_Proxy_Broker (void) +-{ +- for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) +- delete this->proxy_cache_[i]; +- +-} +- +-IR::_TAO_ArrayDef_Proxy_Impl& +-POA_IR::_TAO_ArrayDef_Strategized_Proxy_Broker::select_proxy ( +- ::IR::ArrayDef *object, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- TAO_ORB_Core::TAO_Collocation_Strategies strategy = +- TAO_ORB_Core::collocation_strategy (object); +- +- if (this->proxy_cache_[strategy] != 0) +- return *this->proxy_cache_[strategy]; +- +- this->create_proxy (strategy, ACE_TRY_ENV); +- ACE_CHECK_RETURN (*this->proxy_cache_[strategy]); +- +- return *this->proxy_cache_[strategy]; +- +-} +- +-void +-POA_IR::_TAO_ArrayDef_Strategized_Proxy_Broker::create_proxy ( +- TAO_ORB_Core::TAO_Collocation_Strategies strategy, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- ACE_GUARD (TAO_SYNCH_MUTEX, guard, this->mutex_); +- +- if (this->proxy_cache_[strategy] == 0) +- { +- switch (strategy) +- { +- case TAO_ORB_Core::THRU_POA_STRATEGY: +- ACE_NEW_THROW_EX ( +- this->proxy_cache_[strategy], +- POA_IR::_TAO_ArrayDef_ThruPOA_Proxy_Impl, +- CORBA::NO_MEMORY () +- ); +- ACE_CHECK; +- break; +- +- case TAO_ORB_Core::REMOTE_STRATEGY: +- default: +- ACE_NEW_THROW_EX ( +- this->proxy_cache_[strategy], +- ::IR::_TAO_ArrayDef_Remote_Proxy_Impl, +- CORBA::NO_MEMORY () +- ); +- ACE_CHECK; +- break; +- +- } +- +- } +-} +- +- +-// +-// End Strategized Proxy Broker Implementation +-/////////////////////////////////////////////////////////////////////// +- +- +-IR::_TAO_ArrayDef_Proxy_Broker * +-IR__TAO_ArrayDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) +-{ +- ACE_UNUSED_ARG (obj); +- return ::POA_IR::_TAO_ArrayDef_Strategized_Proxy_Broker::the_TAO_ArrayDef_Strategized_Proxy_Broker(); +-} +- +-int +-IR__TAO_ArrayDef_Proxy_Broker_Factory_Initializer (long _dummy_) +-{ +- ACE_UNUSED_ARG (_dummy_); +- +- IR__TAO_ArrayDef_Proxy_Broker_Factory_function_pointer = +- IR__TAO_ArrayDef_Proxy_Broker_Factory_function; +- +- return 0; +-} +- +-static int IR__TAO_ArrayDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = +- IR__TAO_ArrayDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, IR__TAO_ArrayDef_Proxy_Broker_Factory_Initializer)); +- +- +-/////////////////////////////////////////////////////////////////////// +-// ThruPOA Proxy Implementation +-// +- +-POA_IR::_TAO_ArrayDef_ThruPOA_Proxy_Impl::_TAO_ArrayDef_ThruPOA_Proxy_Impl (void) +-{} +- +-// ThruPOA Implementation of the IDL interface methods +- +-CORBA::ULong POA_IR::_TAO_ArrayDef_ThruPOA_Proxy_Impl::length ( ++void POA_IR::_TAO_OperationDef_ThruPOA_Proxy_Impl::contexts ( CORBA_Object *_collocated_tao_target_, ++ const IR_ContextIdSeq & contexts, CORBA::Environment &ACE_TRY_ENV ) -@@ -25402,7 +25311,7 @@ + ACE_THROW_SPEC (( CORBA::SystemException )) { -- IR::ContextIdSeq_var _tao_retval; -+ IR_ContextIdSeq_var _tao_retval; - ACE_UNUSED_ARG (_tao_retval); +- CORBA::ULong _tao_retval = 0; +- ACE_UNUSED_ARG (_tao_retval); TAO_Object_Adapter::Servant_Upcall servant_upcall ( _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -25427,7 +25336,7 @@ - - void POA_IR::_TAO_OperationDef_ThruPOA_Proxy_Impl::contexts ( - CORBA_Object *_collocated_tao_target_, -- const IR::ContextIdSeq & contexts, -+ const IR_ContextIdSeq & contexts, - CORBA::Environment &ACE_TRY_ENV - ) - ACE_THROW_SPEC (( -@@ -25457,7 +25366,7 @@ - return; + ); + CORBA::Object_var forward_to; + servant_upcall.prepare_for_upcall ( + _collocated_tao_target_->_object_key (), +- "length", ++ "contexts", + forward_to.out (), + ACE_TRY_ENV + ); +- ACE_CHECK_RETURN (_tao_retval); +- return ACE_reinterpret_cast ( +- POA_IR::ArrayDef_ptr, ++ ACE_CHECK; ++ ACE_reinterpret_cast ( ++ POA_IR::OperationDef_ptr, + servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/ArrayDef:1.0" ++ "IDL:omg.org/IR/OperationDef:1.0" + ) +- )->length ( ++ )->contexts ( ++ contexts, + ACE_TRY_ENV + ); ++ return; } --IR::ExceptionDefSeq * POA_IR::_TAO_OperationDef_ThruPOA_Proxy_Impl::exceptions ( -+IR_ExceptionDefSeq * POA_IR::_TAO_OperationDef_ThruPOA_Proxy_Impl::exceptions ( +-void POA_IR::_TAO_ArrayDef_ThruPOA_Proxy_Impl::length ( ++IR::ExceptionDefSeq * POA_IR::_TAO_OperationDef_ThruPOA_Proxy_Impl::exceptions ( CORBA_Object *_collocated_tao_target_, +- CORBA::ULong length, CORBA::Environment &ACE_TRY_ENV ) -@@ -25465,7 +25374,7 @@ + ACE_THROW_SPEC (( CORBA::SystemException )) { -- IR::ExceptionDefSeq_var _tao_retval; + IR_ExceptionDefSeq_var _tao_retval; - ACE_UNUSED_ARG (_tao_retval); ++ ACE_UNUSED_ARG (_tao_retval); TAO_Object_Adapter::Servant_Upcall servant_upcall ( _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -25490,7 +25399,7 @@ + ); + CORBA::Object_var forward_to; + servant_upcall.prepare_for_upcall ( + _collocated_tao_target_->_object_key (), +- "length", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK; +- ACE_reinterpret_cast ( +- POA_IR::ArrayDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/ArrayDef:1.0" +- ) +- )->length ( +- length, +- ACE_TRY_ENV +- ); +- return; +-} +- +-CORBA::TypeCode_ptr POA_IR::_TAO_ArrayDef_ThruPOA_Proxy_Impl::element_type ( +- CORBA_Object *_collocated_tao_target_, +- CORBA::Environment &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) +-{ +- CORBA::TypeCode_var _tao_retval; +- ACE_UNUSED_ARG (_tao_retval); +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "element_type", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK_RETURN (0); +- return ACE_reinterpret_cast ( +- POA_IR::ArrayDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/ArrayDef:1.0" +- ) +- )->element_type ( +- ACE_TRY_ENV +- ); +-} +- +-IR::IDLType_ptr POA_IR::_TAO_ArrayDef_ThruPOA_Proxy_Impl::element_type_def ( +- CORBA_Object *_collocated_tao_target_, +- CORBA::Environment &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) +-{ +- IR::IDLType_var _tao_retval; +- ACE_UNUSED_ARG (_tao_retval); +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "element_type_def", ++ "exceptions", + forward_to.out (), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + return ACE_reinterpret_cast ( +- POA_IR::ArrayDef_ptr, ++ POA_IR::OperationDef_ptr, + servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/ArrayDef:1.0" ++ "IDL:omg.org/IR/OperationDef:1.0" + ) +- )->element_type_def ( ++ )->exceptions ( + ACE_TRY_ENV + ); + } - void POA_IR::_TAO_OperationDef_ThruPOA_Proxy_Impl::exceptions ( +-void POA_IR::_TAO_ArrayDef_ThruPOA_Proxy_Impl::element_type_def ( ++void POA_IR::_TAO_OperationDef_ThruPOA_Proxy_Impl::exceptions ( CORBA_Object *_collocated_tao_target_, -- const IR::ExceptionDefSeq & exceptions, +- IR::IDLType_ptr element_type_def, + const IR_ExceptionDefSeq & exceptions, CORBA::Environment &ACE_TRY_ENV ) ACE_THROW_SPEC (( -@@ -25533,7 +25442,7 @@ +@@ -21703,18 +14121,18 @@ + CORBA::Object_var forward_to; + servant_upcall.prepare_for_upcall ( + _collocated_tao_target_->_object_key (), +- "element_type_def", ++ "exceptions", + forward_to.out (), + ACE_TRY_ENV + ); + ACE_CHECK; + ACE_reinterpret_cast ( +- POA_IR::ArrayDef_ptr, ++ POA_IR::OperationDef_ptr, + servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/ArrayDef:1.0" ++ "IDL:omg.org/IR/OperationDef:1.0" + ) +- )->element_type_def ( +- element_type_def, ++ )->exceptions ( ++ exceptions, + ACE_TRY_ENV + ); + return; +@@ -21725,1013 +14143,527 @@ + /////////////////////////////////////////////////////////////////////// + + // skeleton constructor +-POA_IR::ArrayDef::ArrayDef (void) ++POA_IR::OperationDef::OperationDef (void) + { +- this->optable_ = &tao_IR_ArrayDef_optable; ++ this->optable_ = &tao_IR_OperationDef_optable; + } + // copy ctor - POA_IR::OperationDef::OperationDef (const OperationDef& rhs) - : ACE_NESTED_CLASS (POA_IR,Contained) (rhs), +-POA_IR::ArrayDef::ArrayDef (const ArrayDef& rhs) +- : ACE_NESTED_CLASS (POA_IR,IDLType) (rhs), - ACE_NESTED_CLASS (POA_CORBA,IRObject) (rhs), ++POA_IR::OperationDef::OperationDef (const OperationDef& rhs) ++ : ACE_NESTED_CLASS (POA_IR,Contained) (rhs), + POA_CORBA_IRObject (rhs), TAO_ServantBase (rhs) {} -@@ -25631,7 +25540,7 @@ + // skeleton destructor +-POA_IR::ArrayDef::~ArrayDef (void) ++POA_IR::OperationDef::~OperationDef (void) { - POA_IR::OperationDef *_tao_impl = (POA_IR::OperationDef *)_tao_object_reference; - -- IR::IDLType_var _tao_retval; -+ IR_IDLType_var _tao_retval; + } - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( -@@ -25658,7 +25567,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::IDLType_ptr _tao_retval_info = _tao_retval._retn (); -+ IR_IDLType_ptr _tao_retval_info = _tao_retval._retn (); - ri.result (_tao_retval_info); - _tao_retval = _tao_retval_info; - ri.reply_status (PortableInterceptor::SUCCESSFUL); -@@ -25712,14 +25621,12 @@ - TAO_InputCDR &_tao_in = _tao_server_request.incoming (); - POA_IR::OperationDef *_tao_impl = (POA_IR::OperationDef *)_tao_object_reference; - -- _tao_server_request.argument_flag (0); -- IR::IDLType_var result_def; -+ IR_IDLType_var result_def; +-void POA_IR::ArrayDef::_get_length_skel ( ++void POA_IR::OperationDef::_get_result_skel ( + TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, ++ void *_tao_object_reference, ++ void * /* context */, + CORBA::Environment &ACE_TRY_ENV +- ) ++) + { +- POA_IR::ArrayDef *_tao_impl = (POA_IR::ArrayDef *)_tao_object_reference; ++ POA_IR::OperationDef *_tao_impl = (POA_IR::OperationDef *)_tao_object_reference; + +- CORBA::ULong _tao_retval = 0; ++ CORBA::TypeCode_var _tao_retval; + +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::ArrayDef::TAO_ServerRequestInfo_IR_ArrayDef_length_get ri ( +- _tao_server_request, +- _tao_impl +- , ++ _tao_retval = _tao_impl->result ( + ACE_TRY_ENV + ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->length ( +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- CORBA::ULong _tao_retval_info = _tao_retval; +- ri.result (_tao_retval_info); +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; ++ + ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); ++ ++ _tao_server_request.init_reply (); + TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); if (!( - (_tao_in >> result_def.out ()) +- (_tao_out << _tao_retval) ++ (_tao_out << _tao_retval.in ()) )) - ACE_THROW (CORBA::MARSHAL()); +- ACE_THROW (CORBA::MARSHAL()); +- ++ ACE_THROW (CORBA::MARSHAL () ); + } +-void POA_IR::ArrayDef::_set_length_skel ( ++void POA_IR::OperationDef::_get_result_def_skel ( + TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, ++ void *_tao_object_reference, ++ void * /* context */, + CORBA::Environment &ACE_TRY_ENV +- ) ++) + { +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::ArrayDef *_tao_impl = (POA_IR::ArrayDef *)_tao_object_reference; - - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( - _tao_server_request.orb_core ()->server_request_interceptors (), -@@ -25790,7 +25697,7 @@ +-_tao_server_request.argument_flag (0); +- CORBA::ULong length; +- if (!( +- (_tao_in >> length) +- )) +- ACE_THROW (CORBA::MARSHAL()); ++ POA_IR::OperationDef *_tao_impl = (POA_IR::OperationDef *)_tao_object_reference; + ++ IR_IDLType_var _tao_retval; + +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::ArrayDef::TAO_ServerRequestInfo_IR_ArrayDef_length_set ri ( +- _tao_server_request, +- _tao_impl +- , +- length, ++ _tao_retval = _tao_impl->result_def ( + ACE_TRY_ENV + ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- +- _tao_impl->length ( +- length, +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; ++ + ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); ++ ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!( ++ (_tao_out << _tao_retval.in ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + } + +-void POA_IR::ArrayDef::_get_element_type_skel ( ++void POA_IR::OperationDef::_set_result_def_skel ( + TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, ++ void *_tao_object_reference, ++ void * /* context */, + CORBA::Environment &ACE_TRY_ENV +- ) ++) { - POA_IR::OperationDef *_tao_impl = (POA_IR::OperationDef *)_tao_object_reference; - -- IR::ParDescriptionSeq_var _tao_retval; +- POA_IR::ArrayDef *_tao_impl = (POA_IR::ArrayDef *)_tao_object_reference; ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::OperationDef *_tao_impl = (POA_IR::OperationDef *)_tao_object_reference; + +- CORBA::TypeCode_var _tao_retval; ++ IR_IDLType_var result_def; ++ if (!( ++ (_tao_in >> result_def.out ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::ArrayDef::TAO_ServerRequestInfo_IR_ArrayDef_element_type_get ri ( +- _tao_server_request, +- _tao_impl +- , ++ _tao_impl->result_def ( ++ result_def.in (), + ACE_TRY_ENV + ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->element_type ( +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- CORBA::TypeCode_ptr _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; ++ + ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << _tao_retval.in ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); + ++ _tao_server_request.init_reply (); + } + +-void POA_IR::ArrayDef::_get_element_type_def_skel ( ++void POA_IR::OperationDef::_get_params_skel ( + TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, ++ void *_tao_object_reference, ++ void * /* context */, + CORBA::Environment &ACE_TRY_ENV +- ) ++) + { +- POA_IR::ArrayDef *_tao_impl = (POA_IR::ArrayDef *)_tao_object_reference; ++ POA_IR::OperationDef *_tao_impl = (POA_IR::OperationDef *)_tao_object_reference; + +- IR::IDLType_var _tao_retval; + IR_ParDescriptionSeq_var _tao_retval; - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( -@@ -25817,7 +25724,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::ParDescriptionSeq * _tao_retval_info = _tao_retval._retn (); -+ IR_ParDescriptionSeq * _tao_retval_info = _tao_retval._retn (); - ri.result (_tao_retval_info); - _tao_retval = _tao_retval_info; - ri.reply_status (PortableInterceptor::SUCCESSFUL); -@@ -25871,14 +25778,12 @@ +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::ArrayDef::TAO_ServerRequestInfo_IR_ArrayDef_element_type_def_get ri ( +- _tao_server_request, +- _tao_impl +- , ++ _tao_retval = _tao_impl->params ( + ACE_TRY_ENV + ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->element_type_def ( +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::IDLType_ptr _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; ++ + ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); ++ ++ _tao_server_request.init_reply (); + TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); + if (!( + (_tao_out << _tao_retval.in ()) + )) +- ACE_THROW (CORBA::MARSHAL()); +- ++ ACE_THROW (CORBA::MARSHAL () ); + } + +-void POA_IR::ArrayDef::_set_element_type_def_skel ( ++void POA_IR::OperationDef::_set_params_skel ( + TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, ++ void *_tao_object_reference, ++ void * /* context */, + CORBA::Environment &ACE_TRY_ENV +- ) ++) + { TAO_InputCDR &_tao_in = _tao_server_request.incoming (); - POA_IR::OperationDef *_tao_impl = (POA_IR::OperationDef *)_tao_object_reference; - -- _tao_server_request.argument_flag (0); -- IR::ParDescriptionSeq params; +- POA_IR::ArrayDef *_tao_impl = (POA_IR::ArrayDef *)_tao_object_reference; ++ POA_IR::OperationDef *_tao_impl = (POA_IR::OperationDef *)_tao_object_reference; + +-_tao_server_request.argument_flag (0); +- IR::IDLType_var element_type_def; + IR_ParDescriptionSeq params; if (!( - (_tao_in >> params) +- (_tao_in >> element_type_def.out ()) ++ (_tao_in >> params) )) - ACE_THROW (CORBA::MARSHAL()); +- ACE_THROW (CORBA::MARSHAL()); ++ ACE_THROW (CORBA::MARSHAL () ); - - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( - _tao_server_request.orb_core ()->server_request_interceptors (), -@@ -25949,7 +25854,7 @@ +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::ArrayDef::TAO_ServerRequestInfo_IR_ArrayDef_element_type_def_set ri ( +- _tao_server_request, +- _tao_impl +- , +- element_type_def.in (), ++ _tao_impl->params ( ++ params, + ACE_TRY_ENV + ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- +- _tao_impl->element_type_def ( +- element_type_def.in (), +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +-} + +-void POA_IR::ArrayDef::_is_a_skel ( +- TAO_ServerRequest &_tao_server_request, +- void * _tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::ArrayDef *_tao_impl = (POA_IR::ArrayDef *) _tao_object_reference; +- CORBA::Boolean _tao_retval = 0; +- CORBA::String_var value; +- if (!(_tao_in >> value.out ())) +- ACE_THROW (CORBA::MARSHAL ()); +- +- _tao_retval = _tao_impl->_is_a (value.in (), ACE_TRY_ENV); + ACE_CHECK; +- ++ + _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) +- ACE_THROW (CORBA::MARSHAL ()); + } + +-void POA_IR::ArrayDef::_non_existent_skel ( +- TAO_ServerRequest &_tao_server_request, +- void * _tao_object_reference, ++void POA_IR::OperationDef::_get_mode_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, + void * /* context */, + CORBA::Environment &ACE_TRY_ENV +- ) ++) { - POA_IR::OperationDef *_tao_impl = (POA_IR::OperationDef *)_tao_object_reference; - -- IR::OperationMode _tao_retval; +- POA_IR::ArrayDef *_tao_impl = (POA_IR::ArrayDef *) _tao_object_reference; +- CORBA::Boolean _tao_retval = _tao_impl->_non_existent (ACE_TRY_ENV); ++ POA_IR::OperationDef *_tao_impl = (POA_IR::OperationDef *)_tao_object_reference; ++ + IR_OperationMode _tao_retval; ++ ++ _tao_retval = _tao_impl->mode ( ++ ACE_TRY_ENV ++ ); ++ + ACE_CHECK; +- ++ + _tao_server_request.init_reply (); + TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) +- ACE_THROW (CORBA::MARSHAL ()); ++ if (!( ++ (_tao_out << _tao_retval) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + } + +-CORBA::Boolean POA_IR::ArrayDef::_is_a ( +- const char* value, ++void POA_IR::OperationDef::_set_mode_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, + CORBA::Environment &ACE_TRY_ENV +- ) ++) + { +- if ( +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/ArrayDef:1.0")) || +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/IDLType:1.0")) || +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/CORBA/IRObject:1.0")) || +- (!ACE_OS::strcmp ((char *)value, CORBA::_tc_Object->id (ACE_TRY_ENV)))) +- return 1; +- else +- return 0; +-} ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::OperationDef *_tao_impl = (POA_IR::OperationDef *)_tao_object_reference; - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( -@@ -25976,7 +25881,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::OperationMode _tao_retval_info = _tao_retval; -+ IR_OperationMode _tao_retval_info = _tao_retval; - ri.result (_tao_retval_info); - ri.reply_status (PortableInterceptor::SUCCESSFUL); - _tao_vfr.send_reply (&ri, ACE_TRY_ENV); -@@ -26029,14 +25934,12 @@ - TAO_InputCDR &_tao_in = _tao_server_request.incoming (); - POA_IR::OperationDef *_tao_impl = (POA_IR::OperationDef *)_tao_object_reference; - -- _tao_server_request.argument_flag (0); -- IR::OperationMode mode; +-void* POA_IR::ArrayDef::_downcast ( +- const char* logical_type_id +- ) +-{ +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/ArrayDef:1.0") == 0) +- return ACE_static_cast (POA_IR::ArrayDef_ptr, this); +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/IDLType:1.0") == 0) +- return ACE_static_cast (POA_IR::IDLType_ptr, this); +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/IRObject:1.0") == 0) +- return ACE_static_cast (POA_CORBA::IRObject_ptr, this); +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/Object:1.0") == 0) +- return ACE_static_cast(PortableServer::Servant, this); +- return 0; +-} + IR_OperationMode mode; - if (!( - (_tao_in >> mode) - )) - ACE_THROW (CORBA::MARSHAL()); ++ if (!( ++ (_tao_in >> mode) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); -- - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( - _tao_server_request.orb_core ()->server_request_interceptors (), -@@ -26107,7 +26010,7 @@ +-void POA_IR::ArrayDef::_dispatch (TAO_ServerRequest &req, void *context, CORBA::Environment &ACE_TRY_ENV) +-{ +- this->synchronous_upcall_dispatch(req, context, this, ACE_TRY_ENV); +-} ++ _tao_impl->mode ( ++ mode, ++ ACE_TRY_ENV ++ ); + +-const char* POA_IR::ArrayDef::_interface_repository_id (void) const +-{ +- return "IDL:omg.org/IR/ArrayDef:1.0"; ++ ACE_CHECK; ++ ++ _tao_server_request.init_reply (); + } + +-IR::ArrayDef* +-POA_IR::ArrayDef::_this (CORBA_Environment &ACE_TRY_ENV) ++void POA_IR::OperationDef::_get_contexts_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) { - POA_IR::OperationDef *_tao_impl = (POA_IR::OperationDef *)_tao_object_reference; - -- IR::ContextIdSeq_var _tao_retval; +- TAO_Stub *stub = this->_create_stub (ACE_TRY_ENV); +- ACE_CHECK_RETURN (0); +- +- CORBA::Object_ptr tmp = CORBA::Object::_nil (); +- +- if (stub->servant_orb_var ()->orb_core ()->optimize_collocation_objects ()) +- ACE_NEW_RETURN (tmp, CORBA::Object (stub, 1, this), 0); +- else +- ACE_NEW_RETURN (tmp, CORBA::Object (stub, 0, this), 0); +- +- CORBA::Object_var obj = tmp; +- return ::IR::ArrayDef::_unchecked_narrow (obj.in ()); +-} ++ POA_IR::OperationDef *_tao_impl = (POA_IR::OperationDef *)_tao_object_reference; + + IR_ContextIdSeq_var _tao_retval; - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( -@@ -26134,7 +26037,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::ContextIdSeq * _tao_retval_info = _tao_retval._retn (); -+ IR_ContextIdSeq * _tao_retval_info = _tao_retval._retn (); - ri.result (_tao_retval_info); - _tao_retval = _tao_retval_info; - ri.reply_status (PortableInterceptor::SUCCESSFUL); -@@ -26188,14 +26091,12 @@ - TAO_InputCDR &_tao_in = _tao_server_request.incoming (); - POA_IR::OperationDef *_tao_impl = (POA_IR::OperationDef *)_tao_object_reference; - -- _tao_server_request.argument_flag (0); -- IR::ContextIdSeq contexts; +-#if (TAO_HAS_INTERCEPTORS == 1) +-POA_IR::ArrayDef::TAO_ServerRequestInfo_IR_ArrayDef_length_get::TAO_ServerRequestInfo_IR_ArrayDef_length_get ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::ArrayDef *tao_impl +- , +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl) +-{} ++ _tao_retval = _tao_impl->contexts ( ++ ACE_TRY_ENV ++ ); + +-Dynamic::ParameterList * +-POA_IR::ArrayDef::TAO_ServerRequestInfo_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; +-} ++ ACE_CHECK; + +-Dynamic::ExceptionList * +-POA_IR::ArrayDef::TAO_ServerRequestInfo_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; ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!( ++ (_tao_out << _tao_retval.in ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + } + +-CORBA::Any * +-POA_IR::ArrayDef::TAO_ServerRequestInfo_IR_ArrayDef_length_get::result (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++void POA_IR::OperationDef::_set_contexts_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) + { +- // 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 (); +-} ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::OperationDef *_tao_impl = (POA_IR::OperationDef *)_tao_object_reference; + +-char * +-POA_IR::ArrayDef::TAO_ServerRequestInfo_IR_ArrayDef_length_get::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} + IR_ContextIdSeq contexts; - if (!( - (_tao_in >> contexts) - )) - ACE_THROW (CORBA::MARSHAL()); ++ if (!( ++ (_tao_in >> contexts) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + +-CORBA::Boolean +-POA_IR::ArrayDef::TAO_ServerRequestInfo_IR_ArrayDef_length_get::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} ++ _tao_impl->contexts ( ++ contexts, ++ ACE_TRY_ENV ++ ); +-void +-POA_IR::ArrayDef::TAO_ServerRequestInfo_IR_ArrayDef_length_get::result (CORBA::ULong result) +-{ +- // Update the result. +- this->_result = result; ++ ACE_CHECK; ++ ++ _tao_server_request.init_reply (); + } + +-POA_IR::ArrayDef::TAO_ServerRequestInfo_IR_ArrayDef_length_set::TAO_ServerRequestInfo_IR_ArrayDef_length_set ( ++void POA_IR::OperationDef::_get_exceptions_skel ( + TAO_ServerRequest &_tao_server_request, +- POA_IR::ArrayDef *tao_impl +- , +- const CORBA::ULong & length, +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- length_ (length) +-{} - - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( - _tao_server_request.orb_core ()->server_request_interceptors (), -@@ -26266,7 +26167,7 @@ - { - POA_IR::OperationDef *_tao_impl = (POA_IR::OperationDef *)_tao_object_reference; - -- IR::ExceptionDefSeq_var _tao_retval; +-Dynamic::ParameterList * +-POA_IR::ArrayDef::TAO_ServerRequestInfo_IR_ArrayDef_length_set::arguments (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) + { +- // 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 (); +-} ++ POA_IR::OperationDef *_tao_impl = (POA_IR::OperationDef *)_tao_object_reference; + +-Dynamic::ExceptionList * +-POA_IR::ArrayDef::TAO_ServerRequestInfo_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; +-} + IR_ExceptionDefSeq_var _tao_retval; - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( -@@ -26293,7 +26194,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::ExceptionDefSeq * _tao_retval_info = _tao_retval._retn (); -+ IR_ExceptionDefSeq * _tao_retval_info = _tao_retval._retn (); - ri.result (_tao_retval_info); - _tao_retval = _tao_retval_info; - ri.reply_status (PortableInterceptor::SUCCESSFUL); -@@ -26347,14 +26248,12 @@ - TAO_InputCDR &_tao_in = _tao_server_request.incoming (); - POA_IR::OperationDef *_tao_impl = (POA_IR::OperationDef *)_tao_object_reference; - -- _tao_server_request.argument_flag (0); -- IR::ExceptionDefSeq exceptions; -+ IR_ExceptionDefSeq exceptions; - if (!( - (_tao_in >> exceptions) - )) - ACE_THROW (CORBA::MARSHAL()); +-CORBA::Any * +-POA_IR::ArrayDef::TAO_ServerRequestInfo_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; +-} ++ _tao_retval = _tao_impl->exceptions ( ++ ACE_TRY_ENV ++ ); +-char * +-POA_IR::ArrayDef::TAO_ServerRequestInfo_IR_ArrayDef_length_set::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} ++ ACE_CHECK; + +-CORBA::Boolean +-POA_IR::ArrayDef::TAO_ServerRequestInfo_IR_ArrayDef_length_set::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!( ++ (_tao_out << _tao_retval.in ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + } + +-POA_IR::ArrayDef::TAO_ServerRequestInfo_IR_ArrayDef_element_type_get::TAO_ServerRequestInfo_IR_ArrayDef_element_type_get ( ++void POA_IR::OperationDef::_set_exceptions_skel ( + TAO_ServerRequest &_tao_server_request, +- POA_IR::ArrayDef *tao_impl +- , +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl) +-{} - - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( - _tao_server_request.orb_core ()->server_request_interceptors (), -@@ -26427,7 +26326,7 @@ - POA_IR::OperationDef *_tao_impl = (POA_IR::OperationDef *) _tao_object_reference; - CORBA::Boolean _tao_retval = 0; - CORBA::String_var value; -- if (!(_tao_in >> value.out ())) +-Dynamic::ParameterList * +-POA_IR::ArrayDef::TAO_ServerRequestInfo_IR_ArrayDef_element_type_get::arguments (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) + { +- // 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; +-} ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::OperationDef *_tao_impl = (POA_IR::OperationDef *)_tao_object_reference; + +-Dynamic::ExceptionList * +-POA_IR::ArrayDef::TAO_ServerRequestInfo_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; +-} ++ IR_ExceptionDefSeq exceptions; ++ if (!( ++ (_tao_in >> exceptions) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + +-CORBA::Any * +-POA_IR::ArrayDef::TAO_ServerRequestInfo_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 (); +-} ++ _tao_impl->exceptions ( ++ exceptions, ++ ACE_TRY_ENV ++ ); + +-char * +-POA_IR::ArrayDef::TAO_ServerRequestInfo_IR_ArrayDef_element_type_get::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} ++ ACE_CHECK; + +-CORBA::Boolean +-POA_IR::ArrayDef::TAO_ServerRequestInfo_IR_ArrayDef_element_type_get::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); ++ _tao_server_request.init_reply (); + } + +-void +-POA_IR::ArrayDef::TAO_ServerRequestInfo_IR_ArrayDef_element_type_get::result (CORBA::TypeCode_ptr result) ++void POA_IR::OperationDef::_is_a_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void * _tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++ ) + { +- // Update the result. +- this->_result = result; ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::OperationDef *_tao_impl = (POA_IR::OperationDef *) _tao_object_reference; ++ CORBA::Boolean _tao_retval = 0; ++ CORBA::String_var value; + if (!((_tao_in >> value.out ()))) - ACE_THROW (CORBA::MARSHAL ()); - - _tao_retval = _tao_impl->_is_a (value.in (), ACE_TRY_ENV); -@@ -26435,7 +26334,7 @@ - - _tao_server_request.init_reply (); - TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); -- if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) ++ ACE_THROW (CORBA::MARSHAL ()); ++ ++ _tao_retval = _tao_impl->_is_a (value.in (), ACE_TRY_ENV); ++ ACE_CHECK; ++ ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); + if (!((_tao_out << CORBA::Any::from_boolean (_tao_retval)))) - ACE_THROW (CORBA::MARSHAL ()); ++ ACE_THROW (CORBA::MARSHAL ()); } -@@ -26452,7 +26351,7 @@ - - _tao_server_request.init_reply (); - TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); -- if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) +-POA_IR::ArrayDef::TAO_ServerRequestInfo_IR_ArrayDef_element_type_def_get::TAO_ServerRequestInfo_IR_ArrayDef_element_type_def_get ( ++void POA_IR::OperationDef::_non_existent_skel ( + TAO_ServerRequest &_tao_server_request, +- POA_IR::ArrayDef *tao_impl +- , +- CORBA::Environment & ++ void * _tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV + ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl) +-{} +- +-Dynamic::ParameterList * +-POA_IR::ArrayDef::TAO_ServerRequestInfo_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; +-} ++ POA_IR::OperationDef *_tao_impl = (POA_IR::OperationDef *) _tao_object_reference; ++ CORBA::Boolean _tao_retval = _tao_impl->_non_existent (ACE_TRY_ENV); ++ ACE_CHECK; + +-Dynamic::ExceptionList * +-POA_IR::ArrayDef::TAO_ServerRequestInfo_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; ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); + if (!((_tao_out << CORBA::Any::from_boolean (_tao_retval)))) - ACE_THROW (CORBA::MARSHAL ()); ++ ACE_THROW (CORBA::MARSHAL ()); } -@@ -26480,7 +26379,7 @@ - if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Contained:1.0") == 0) - return ACE_static_cast (POA_IR::Contained_ptr, this); - if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/IRObject:1.0") == 0) -- return ACE_static_cast (POA_CORBA::IRObject_ptr, this); +-CORBA::Any * +-POA_IR::ArrayDef::TAO_ServerRequestInfo_IR_ArrayDef_element_type_def_get::result (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++CORBA::Boolean POA_IR::OperationDef::_is_a ( ++ const char* value, ++ CORBA::Environment &ACE_TRY_ENV ++ ) + { +- // 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 (); ++ if ( ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/OperationDef:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/Contained:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/CORBA/IRObject:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, CORBA::_tc_Object->id (ACE_TRY_ENV)))) ++ return 1; ++ else ++ return 0; + } + +-char * +-POA_IR::ArrayDef::TAO_ServerRequestInfo_IR_ArrayDef_element_type_def_get::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++void* POA_IR::OperationDef::_downcast ( ++ const char* logical_type_id ++ ) + { +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/OperationDef:1.0") == 0) ++ return ACE_static_cast (POA_IR::OperationDef_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Contained:1.0") == 0) ++ return ACE_static_cast (POA_IR::Contained_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/IRObject:1.0") == 0) + return ACE_static_cast (POA_CORBA_IRObject_ptr, this); - if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/Object:1.0") == 0) - return ACE_static_cast(PortableServer::Servant, this); - return 0; -@@ -26510,10 +26409,9 @@ - ACE_NEW_RETURN (tmp, CORBA::Object (stub, 0, this), 0); - - CORBA::Object_var obj = tmp; -- return ::IR::OperationDef::_unchecked_narrow (obj.in ()); -+ return IR_OperationDef::_unchecked_narrow (obj.in ()); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/Object:1.0") == 0) ++ return ACE_static_cast(PortableServer::Servant, this); ++ return 0; + } + +-CORBA::Boolean +-POA_IR::ArrayDef::TAO_ServerRequestInfo_IR_ArrayDef_element_type_def_get::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++void POA_IR::OperationDef::_dispatch (TAO_ServerRequest &req, void *context, CORBA::Environment &ACE_TRY_ENV) + { +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); ++ this->synchronous_upcall_dispatch(req, context, this, ACE_TRY_ENV); + } + +-void +-POA_IR::ArrayDef::TAO_ServerRequestInfo_IR_ArrayDef_element_type_def_get::result (IR::IDLType_ptr result) ++const char* POA_IR::OperationDef::_interface_repository_id (void) const + { +- // Update the result. +- this->_result = result; ++ return "IDL:omg.org/IR/OperationDef:1.0"; } +-POA_IR::ArrayDef::TAO_ServerRequestInfo_IR_ArrayDef_element_type_def_set::TAO_ServerRequestInfo_IR_ArrayDef_element_type_def_set ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::ArrayDef *tao_impl +- , +- IR::IDLType_ptr element_type_def, +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- element_type_def_ (element_type_def) +-{} - - #if (TAO_HAS_INTERCEPTORS == 1) - POA_IR::OperationDef::TAO_ServerRequestInfo_IR_OperationDef_result_get::TAO_ServerRequestInfo_IR_OperationDef_result_get ( - TAO_ServerRequest &_tao_server_request, -@@ -26668,7 +26566,7 @@ - POA_IR::OperationDef::TAO_ServerRequestInfo_IR_OperationDef_result_def_set::TAO_ServerRequestInfo_IR_OperationDef_result_def_set ( - TAO_ServerRequest &_tao_server_request, - POA_IR::OperationDef *tao_impl, -- IR::IDLType_ptr result_def, -+ IR_IDLType_ptr result_def, - CORBA::Environment & - ) - : TAO_ServerRequestInfo (_tao_server_request), -@@ -26817,7 +26715,7 @@ - POA_IR::OperationDef::TAO_ServerRequestInfo_IR_OperationDef_params_set::TAO_ServerRequestInfo_IR_OperationDef_params_set ( - TAO_ServerRequest &_tao_server_request, - POA_IR::OperationDef *tao_impl, -- const IR::ParDescriptionSeq & params, -+ const IR_ParDescriptionSeq & params, - CORBA::Environment & - ) - : TAO_ServerRequestInfo (_tao_server_request), -@@ -26966,7 +26864,7 @@ - POA_IR::OperationDef::TAO_ServerRequestInfo_IR_OperationDef_mode_set::TAO_ServerRequestInfo_IR_OperationDef_mode_set ( - TAO_ServerRequest &_tao_server_request, - POA_IR::OperationDef *tao_impl, -- IR::OperationMode & mode, -+ IR_OperationMode & mode, - CORBA::Environment & - ) - : TAO_ServerRequestInfo (_tao_server_request), -@@ -27115,7 +27013,7 @@ - POA_IR::OperationDef::TAO_ServerRequestInfo_IR_OperationDef_contexts_set::TAO_ServerRequestInfo_IR_OperationDef_contexts_set ( - TAO_ServerRequest &_tao_server_request, - POA_IR::OperationDef *tao_impl, -- const IR::ContextIdSeq & contexts, -+ const IR_ContextIdSeq & contexts, - CORBA::Environment & - ) - : TAO_ServerRequestInfo (_tao_server_request), -@@ -27264,7 +27162,7 @@ - POA_IR::OperationDef::TAO_ServerRequestInfo_IR_OperationDef_exceptions_set::TAO_ServerRequestInfo_IR_OperationDef_exceptions_set ( - TAO_ServerRequest &_tao_server_request, - POA_IR::OperationDef *tao_impl, -- const IR::ExceptionDefSeq & exceptions, -+ const IR_ExceptionDefSeq & exceptions, - CORBA::Environment & - ) - : TAO_ServerRequestInfo (_tao_server_request), -@@ -27336,6 +27234,7 @@ +-Dynamic::ParameterList * +-POA_IR::ArrayDef::TAO_ServerRequestInfo_IR_ArrayDef_element_type_def_set::arguments (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++IR::OperationDef* ++POA_IR::OperationDef::_this (CORBA_Environment &ACE_TRY_ENV) + { +- // Generate the argument list on demand. +- Dynamic::ParameterList *parameter_list = +- TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); ++ TAO_Stub *stub = this->_create_stub (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_; ++ CORBA::Object_ptr tmp = CORBA::Object::_nil (); + +- (*parameter_list)[length_element_type_def].mode = Dynamic::PARAM_IN; ++ if (stub->servant_orb_var ()->orb_core ()->optimize_collocation_objects ()) ++ ACE_NEW_RETURN (tmp, CORBA::Object (stub, 1, this), 0); ++ else ++ ACE_NEW_RETURN (tmp, CORBA::Object (stub, 0, this), 0); + +- return safe_parameter_list._retn (); ++ CORBA::Object_var obj = tmp; ++ return IR_OperationDef::_unchecked_narrow (obj.in ()); } - #endif /* TAO_HAS_INTERCEPTORS */ -+ - class TAO_IR_InterfaceDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable +-Dynamic::ExceptionList * +-POA_IR::ArrayDef::TAO_ServerRequestInfo_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 * +-POA_IR::ArrayDef::TAO_ServerRequestInfo_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; +-} +- +-char * +-POA_IR::ArrayDef::TAO_ServerRequestInfo_IR_ArrayDef_element_type_def_set::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::ArrayDef::TAO_ServerRequestInfo_IR_ArrayDef_element_type_def_set::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-#endif /* TAO_HAS_INTERCEPTORS */ +-class TAO_IR_ExceptionDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable ++class TAO_IR_InterfaceDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable { private: -@@ -27343,7 +27242,7 @@ + unsigned int hash (const char *str, unsigned int len); public: const TAO_operation_db_entry * lookup (const char *str, unsigned int len); }; --/* starting time is 18:47:28 */ +-/* starting time is 16:31:12 */ +/* starting time is 11:23:10 */ /* C++ code produced by gperf version 2.8 (ACE version) */ - /* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_InterfaceDef_Perfect_Hash_OpTable -N lookup */ +-/* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_ExceptionDef_Perfect_Hash_OpTable -N lookup */ ++/* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_InterfaceDef_Perfect_Hash_OpTable -N lookup */ unsigned int -@@ -27496,10 +27395,9 @@ +-TAO_IR_ExceptionDef_Perfect_Hash_OpTable::hash (const char *str, unsigned int len) ++TAO_IR_InterfaceDef_Perfect_Hash_OpTable::hash (const char *str, unsigned int len) + { + static const unsigned char asso_values[] = + { + #if defined (ACE_MVS) +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 0, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 0, +- 52, 20, 3, 0, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 10, 15, 5, +- 52, 10, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 15, 15, 52, 52, 52, 15, 5, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, ++ 66, 66, 66, 66, 66, 66, 66, 66, 66, 66, ++ 66, 66, 66, 66, 66, 66, 66, 66, 66, 66, ++ 66, 66, 66, 66, 66, 66, 66, 66, 66, 66, ++ 66, 66, 66, 66, 66, 66, 66, 66, 66, 66, ++ 66, 66, 66, 66, 66, 66, 66, 66, 66, 66, ++ 66, 66, 66, 66, 66, 66, 66, 66, 66, 66, ++ 66, 66, 66, 66, 66, 66, 66, 66, 66, 66, ++ 66, 66, 66, 66, 66, 66, 66, 66, 66, 66, ++ 66, 66, 66, 66, 66, 66, 66, 66, 66, 66, ++ 66, 66, 66, 66, 66, 66, 66, 66, 66, 66, ++ 66, 66, 66, 66, 66, 66, 66, 66, 66, 0, ++ 66, 66, 66, 66, 66, 66, 66, 66, 66, 66, ++ 66, 66, 66, 66, 66, 66, 66, 66, 66, 0, ++ 66, 20, 8, 0, 66, 66, 66, 10, 66, 66, ++ 66, 66, 66, 66, 66, 66, 66, 0, 0, 5, ++ 66, 0, 66, 66, 66, 66, 66, 66, 66, 66, ++ 66, 66, 10, 30, 66, 66, 66, 20, 25, 66, ++ 66, 66, 66, 66, 66, 66, 66, 66, 66, 66, ++ 66, 66, 66, 66, 66, 66, 66, 66, 66, 66, ++ 66, 66, 66, 66, 66, 66, 66, 66, 66, 66, ++ 66, 66, 66, 66, 66, 66, 66, 66, 66, 66, ++ 66, 66, 66, 66, 66, 66, 66, 66, 66, 66, ++ 66, 66, 66, 66, 66, 66, 66, 66, 66, 66, ++ 66, 66, 66, 66, 66, 66, 66, 66, 66, 66, ++ 66, 66, 66, 66, 66, 66, 66, 66, 66, 66, ++ 66, 66, 66, 66, 66, 66, + #else +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, +- 52, 52, 52, 52, 52, 0, 52, 0, 52, 20, +- 3, 0, 52, 52, 52, 52, 52, 52, 10, 15, +- 5, 52, 10, 52, 52, 15, 15, 52, 52, 52, +- 15, 5, 52, 52, 52, 52, 52, 52, ++ 66, 66, 66, 66, 66, 66, 66, 66, 66, 66, ++ 66, 66, 66, 66, 66, 66, 66, 66, 66, 66, ++ 66, 66, 66, 66, 66, 66, 66, 66, 66, 66, ++ 66, 66, 66, 66, 66, 66, 66, 66, 66, 66, ++ 66, 66, 66, 66, 66, 66, 66, 66, 66, 66, ++ 66, 66, 66, 66, 66, 66, 66, 66, 66, 66, ++ 66, 66, 66, 66, 66, 66, 66, 66, 66, 66, ++ 66, 66, 66, 66, 66, 66, 66, 66, 66, 66, ++ 66, 66, 66, 66, 66, 66, 66, 66, 66, 66, ++ 66, 66, 66, 66, 66, 0, 66, 0, 66, 20, ++ 8, 0, 66, 66, 66, 10, 66, 66, 0, 0, ++ 5, 66, 0, 66, 66, 10, 30, 66, 66, 66, ++ 20, 25, 66, 66, 66, 66, 66, 66, + #endif /* ACE_MVS */ + }; + return len + asso_values[str[len - 1]] + asso_values[str[0]]; + } + + const class TAO_operation_db_entry * +-TAO_IR_ExceptionDef_Perfect_Hash_OpTable::lookup (const char *str, unsigned int len) ++TAO_IR_InterfaceDef_Perfect_Hash_OpTable::lookup (const char *str, unsigned int len) + { + enum + { +- TOTAL_KEYWORDS = 33, ++ TOTAL_KEYWORDS = 40, + MIN_WORD_LENGTH = 4, + MAX_WORD_LENGTH = 26, +- MIN_HASH_VALUE = 5, +- MAX_HASH_VALUE = 51, +- HASH_VALUE_RANGE = 47, +- DUPLICATES = 7 ++ MIN_HASH_VALUE = 4, ++ MAX_HASH_VALUE = 65, ++ HASH_VALUE_RANGE = 62, ++ DUPLICATES = 11 + }; + + static const class TAO_operation_db_entry wordlist[] = + { +- {"",0},{"",0},{"",0},{"",0},{"",0}, +- {"_is_a", &POA_IR::ExceptionDef::_is_a_skel}, +- {"_get_type", &POA_IR::ExceptionDef::_get_type_skel}, +- {"_set_name", &POA_IR::ExceptionDef::_set_name_skel}, +- {"_get_name", &POA_IR::ExceptionDef::_get_name_skel}, +- {"_get_id", &POA_IR::ExceptionDef::_get_id_skel}, +- {"_set_id", &POA_IR::ExceptionDef::_set_id_skel}, +- {"describe", &POA_IR::ExceptionDef::describe_skel}, +- {"destroy", &POA_IR::ExceptionDef::destroy_skel}, +- {"_get_def_kind", &POA_IR::ExceptionDef::_get_def_kind_skel}, +- {"_get_version", &POA_IR::ExceptionDef::_get_version_skel}, +- {"_set_version", &POA_IR::ExceptionDef::_set_version_skel}, +- {"_get_absolute_name", &POA_IR::ExceptionDef::_get_absolute_name_skel}, +- {"move", &POA_IR::ExceptionDef::move_skel}, +- {"_get_defined_in", &POA_IR::ExceptionDef::_get_defined_in_skel}, +- {"lookup_name", &POA_IR::ExceptionDef::lookup_name_skel}, +- {"lookup", &POA_IR::ExceptionDef::lookup_skel}, +- {"_get_members", &POA_IR::ExceptionDef::_get_members_skel}, +- {"_set_members", &POA_IR::ExceptionDef::_set_members_skel}, +- {"_non_existent", &POA_IR::ExceptionDef::_non_existent_skel}, +- {"_get_containing_repository", &POA_IR::ExceptionDef::_get_containing_repository_skel}, +- {"create_value", &POA_IR::ExceptionDef::create_value_skel}, +- {"create_module", &POA_IR::ExceptionDef::create_module_skel}, +- {"create_native", &POA_IR::ExceptionDef::create_native_skel}, +- {"describe_contents", &POA_IR::ExceptionDef::describe_contents_skel}, +- {"create_interface", &POA_IR::ExceptionDef::create_interface_skel}, +- {"create_union", &POA_IR::ExceptionDef::create_union_skel}, +- {"create_exception", &POA_IR::ExceptionDef::create_exception_skel}, +- {"contents", &POA_IR::ExceptionDef::contents_skel}, +- {"create_enum", &POA_IR::ExceptionDef::create_enum_skel}, +- {"create_alias", &POA_IR::ExceptionDef::create_alias_skel}, +- {"create_struct", &POA_IR::ExceptionDef::create_struct_skel}, +- {"create_constant", &POA_IR::ExceptionDef::create_constant_skel}, +- {"create_value_box", &POA_IR::ExceptionDef::create_value_box_skel}, ++ {"",0},{"",0},{"",0},{"",0}, ++ {"move", &POA_IR::InterfaceDef::move_skel}, ++ {"_is_a", &POA_IR::InterfaceDef::_is_a_skel}, ++ {"lookup", &POA_IR::InterfaceDef::lookup_skel}, ++ {"_get_name", &POA_IR::InterfaceDef::_get_name_skel}, ++ {"_get_type", &POA_IR::InterfaceDef::_get_type_skel}, ++ {"_set_name", &POA_IR::InterfaceDef::_set_name_skel}, ++ {"lookup_name", &POA_IR::InterfaceDef::lookup_name_skel}, ++ {"_get_is_local", &POA_IR::InterfaceDef::_get_is_local_skel}, ++ {"_set_is_local", &POA_IR::InterfaceDef::_set_is_local_skel}, ++ {"is_a", &POA_IR::InterfaceDef::is_a_skel}, ++ {"_get_id", &POA_IR::InterfaceDef::_get_id_skel}, ++ {"_set_id", &POA_IR::InterfaceDef::_set_id_skel}, ++ {"describe", &POA_IR::InterfaceDef::describe_skel}, ++ {"_get_version", &POA_IR::InterfaceDef::_get_version_skel}, ++ {"_set_version", &POA_IR::InterfaceDef::_set_version_skel}, ++ {"_get_absolute_name", &POA_IR::InterfaceDef::_get_absolute_name_skel}, ++ {"_get_defined_in", &POA_IR::InterfaceDef::_get_defined_in_skel}, ++ {"_get_def_kind", &POA_IR::InterfaceDef::_get_def_kind_skel}, ++ {"_get_base_interfaces", &POA_IR::InterfaceDef::_get_base_interfaces_skel}, ++ {"_set_base_interfaces", &POA_IR::InterfaceDef::_set_base_interfaces_skel}, ++ {"create_enum", &POA_IR::InterfaceDef::create_enum_skel}, ++ {"create_value", &POA_IR::InterfaceDef::create_value_skel}, ++ {"create_module", &POA_IR::InterfaceDef::create_module_skel}, ++ {"create_native", &POA_IR::InterfaceDef::create_native_skel}, ++ {"describe_contents", &POA_IR::InterfaceDef::describe_contents_skel}, ++ {"create_attribute", &POA_IR::InterfaceDef::create_attribute_skel}, ++ {"create_interface", &POA_IR::InterfaceDef::create_interface_skel}, ++ {"create_union", &POA_IR::InterfaceDef::create_union_skel}, ++ {"contents", &POA_IR::InterfaceDef::contents_skel}, ++ {"destroy", &POA_IR::InterfaceDef::destroy_skel}, ++ {"create_operation", &POA_IR::InterfaceDef::create_operation_skel}, ++ {"create_exception", &POA_IR::InterfaceDef::create_exception_skel}, ++ {"create_alias", &POA_IR::InterfaceDef::create_alias_skel}, ++ {"_non_existent", &POA_IR::InterfaceDef::_non_existent_skel}, ++ {"_get_is_abstract", &POA_IR::InterfaceDef::_get_is_abstract_skel}, ++ {"_set_is_abstract", &POA_IR::InterfaceDef::_set_is_abstract_skel}, ++ {"_get_containing_repository", &POA_IR::InterfaceDef::_get_containing_repository_skel}, ++ {"create_value_box", &POA_IR::InterfaceDef::create_value_box_skel}, ++ {"create_struct", &POA_IR::InterfaceDef::create_struct_skel}, ++ {"create_constant", &POA_IR::InterfaceDef::create_constant_skel}, + }; + + static const signed char lookup[] = + { +- -1, -1, -1, -6, -3, 5, -1, -9, -2, -57, -54, 11, -1, -14, +- -2, 12, 13, -55, 16, 17, 18, 19, -1, -1, -21, -2, 20, -54, +- 23, -26, -2, 24, 25, -55, -1, 28, 29, 30, -1, -1, -1, 31, +- -1, 32, -1, -1, 33, 34, 35, -1, 36, 37, ++ -11, -2, -14, -2, 4, 5, 6, -17, -2, 103, -1, 10, -1, -78, ++ 13, -78, 16, -75, 19, -1, 20, 21, -22, -2, -26, -2, -29, -2, ++ -34, -2, -73, 24, 25, -74, -1, 28, -75, 31, 32, -1, 33, -78, ++ 36, 37, -38, -2, -67, -7, -3, -1, -1, 40, -1, -1, -1, -1, ++ 41, -1, -1, -1, -1, -1, -1, 42, -1, 43, + }; + + if (len <= MAX_WORD_LENGTH && len >= MIN_WORD_LENGTH) +@@ -22765,38 +14697,37 @@ } return 0; } --/* ending time is 18:47:28 */ +-/* ending time is 16:31:12 */ +-static TAO_IR_ExceptionDef_Perfect_Hash_OpTable tao_IR_ExceptionDef_optable; +- +/* ending time is 11:23:10 */ - static TAO_IR_InterfaceDef_Perfect_Hash_OpTable tao_IR_InterfaceDef_optable; ++static TAO_IR_InterfaceDef_Perfect_Hash_OpTable tao_IR_InterfaceDef_optable; -- /////////////////////////////////////////////////////////////////////// // Strategized Proxy Broker Implementation // -@@ -27525,9 +27423,9 @@ + + // Factory function Implementation. +-POA_IR::_TAO_ExceptionDef_Strategized_Proxy_Broker *POA_IR::_TAO_ExceptionDef_Strategized_Proxy_Broker::the_TAO_ExceptionDef_Strategized_Proxy_Broker (void) ++POA_IR::_TAO_InterfaceDef_Strategized_Proxy_Broker *POA_IR::_TAO_InterfaceDef_Strategized_Proxy_Broker::the_TAO_InterfaceDef_Strategized_Proxy_Broker (void) + { +- static POA_IR::_TAO_ExceptionDef_Strategized_Proxy_Broker strategized_proxy_broker; ++ static POA_IR::_TAO_InterfaceDef_Strategized_Proxy_Broker strategized_proxy_broker; + return &strategized_proxy_broker; + } + +-POA_IR::_TAO_ExceptionDef_Strategized_Proxy_Broker::_TAO_ExceptionDef_Strategized_Proxy_Broker (void) ++POA_IR::_TAO_InterfaceDef_Strategized_Proxy_Broker::_TAO_InterfaceDef_Strategized_Proxy_Broker (void) + { + for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) + this->proxy_cache_[i] = 0; } --IR::_TAO_InterfaceDef_Proxy_Impl& +-POA_IR::_TAO_ExceptionDef_Strategized_Proxy_Broker::~_TAO_ExceptionDef_Strategized_Proxy_Broker (void) ++POA_IR::_TAO_InterfaceDef_Strategized_Proxy_Broker::~_TAO_InterfaceDef_Strategized_Proxy_Broker (void) + { + for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) + delete this->proxy_cache_[i]; + + } + +-IR::_TAO_ExceptionDef_Proxy_Impl& +-POA_IR::_TAO_ExceptionDef_Strategized_Proxy_Broker::select_proxy ( +- ::IR::ExceptionDef *object, +_TAO_InterfaceDef_Proxy_Impl& - POA_IR::_TAO_InterfaceDef_Strategized_Proxy_Broker::select_proxy ( -- ::IR::InterfaceDef *object, ++POA_IR::_TAO_InterfaceDef_Strategized_Proxy_Broker::select_proxy ( + IR_InterfaceDef *object, CORBA::Environment &ACE_TRY_ENV ) { -@@ -27559,7 +27457,7 @@ +@@ -22814,7 +14745,7 @@ + } + + void +-POA_IR::_TAO_ExceptionDef_Strategized_Proxy_Broker::create_proxy ( ++POA_IR::_TAO_InterfaceDef_Strategized_Proxy_Broker::create_proxy ( + TAO_ORB_Core::TAO_Collocation_Strategies strategy, + CORBA::Environment &ACE_TRY_ENV + ) +@@ -22828,7 +14759,7 @@ case TAO_ORB_Core::THRU_POA_STRATEGY: ACE_NEW_THROW_EX ( this->proxy_cache_[strategy], -- POA_IR::_TAO_InterfaceDef_ThruPOA_Proxy_Impl, +- POA_IR::_TAO_ExceptionDef_ThruPOA_Proxy_Impl, + _TAO_InterfaceDef_ThruPOA_Proxy_Impl, CORBA::NO_MEMORY () ); ACE_CHECK; -@@ -27569,7 +27467,7 @@ +@@ -22838,7 +14769,7 @@ default: ACE_NEW_THROW_EX ( this->proxy_cache_[strategy], -- ::IR::_TAO_InterfaceDef_Remote_Proxy_Impl, +- ::IR::_TAO_ExceptionDef_Remote_Proxy_Impl, + _TAO_InterfaceDef_Remote_Proxy_Impl, CORBA::NO_MEMORY () ); ACE_CHECK; -@@ -27586,26 +27484,26 @@ +@@ -22855,38 +14786,41 @@ /////////////////////////////////////////////////////////////////////// --IR::_TAO_InterfaceDef_Proxy_Broker * --IR__TAO_InterfaceDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) +-IR::_TAO_ExceptionDef_Proxy_Broker * +-IR__TAO_ExceptionDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) +_TAO_InterfaceDef_Proxy_Broker * +_TAO_InterfaceDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) { ACE_UNUSED_ARG (obj); - return ::POA_IR::_TAO_InterfaceDef_Strategized_Proxy_Broker::the_TAO_InterfaceDef_Strategized_Proxy_Broker(); +- return ::POA_IR::_TAO_ExceptionDef_Strategized_Proxy_Broker::the_TAO_ExceptionDef_Strategized_Proxy_Broker(); ++ return ::POA_IR::_TAO_InterfaceDef_Strategized_Proxy_Broker::the_TAO_InterfaceDef_Strategized_Proxy_Broker(); } int --IR__TAO_InterfaceDef_Proxy_Broker_Factory_Initializer (long _dummy_) +-IR__TAO_ExceptionDef_Proxy_Broker_Factory_Initializer (long _dummy_) +_TAO_InterfaceDef_Proxy_Broker_Factory_Initializer (long _dummy_) { ACE_UNUSED_ARG (_dummy_); -- IR__TAO_InterfaceDef_Proxy_Broker_Factory_function_pointer = -- IR__TAO_InterfaceDef_Proxy_Broker_Factory_function; +- IR__TAO_ExceptionDef_Proxy_Broker_Factory_function_pointer = +- IR__TAO_ExceptionDef_Proxy_Broker_Factory_function; + _TAO_InterfaceDef_Proxy_Broker_Factory_function_pointer = + _TAO_InterfaceDef_Proxy_Broker_Factory_function; return 0; } --static int IR__TAO_InterfaceDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = -- IR__TAO_InterfaceDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, IR__TAO_InterfaceDef_Proxy_Broker_Factory_Initializer)); +-static int IR__TAO_ExceptionDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = +- IR__TAO_ExceptionDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, IR__TAO_ExceptionDef_Proxy_Broker_Factory_Initializer)); +static int _TAO_InterfaceDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = + _TAO_InterfaceDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, _TAO_InterfaceDef_Proxy_Broker_Factory_Initializer)); /////////////////////////////////////////////////////////////////////// -@@ -27617,7 +27515,7 @@ + // ThruPOA Proxy Implementation + // + +-POA_IR::_TAO_ExceptionDef_ThruPOA_Proxy_Impl::_TAO_ExceptionDef_ThruPOA_Proxy_Impl (void) ++POA_IR::_TAO_InterfaceDef_ThruPOA_Proxy_Impl::_TAO_InterfaceDef_ThruPOA_Proxy_Impl (void) ++{} ++ ++POA_IR::_TAO_InterfaceDef_ThruPOA_Proxy_Impl::~_TAO_InterfaceDef_ThruPOA_Proxy_Impl (void) + {} // ThruPOA Implementation of the IDL interface methods --IR::InterfaceDefSeq * POA_IR::_TAO_InterfaceDef_ThruPOA_Proxy_Impl::base_interfaces ( -+IR_InterfaceDefSeq * POA_IR::_TAO_InterfaceDef_ThruPOA_Proxy_Impl::base_interfaces ( +-CORBA::TypeCode_ptr POA_IR::_TAO_ExceptionDef_ThruPOA_Proxy_Impl::type ( ++IR::InterfaceDefSeq * POA_IR::_TAO_InterfaceDef_ThruPOA_Proxy_Impl::base_interfaces ( CORBA_Object *_collocated_tao_target_, CORBA::Environment &ACE_TRY_ENV ) -@@ -27625,7 +27523,7 @@ +@@ -22894,7 +14828,7 @@ CORBA::SystemException )) { -- IR::InterfaceDefSeq_var _tao_retval; +- CORBA::TypeCode_var _tao_retval; + IR_InterfaceDefSeq_var _tao_retval; ACE_UNUSED_ARG (_tao_retval); TAO_Object_Adapter::Servant_Upcall servant_upcall ( _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -27650,7 +27548,7 @@ +@@ -22902,935 +14836,982 @@ + CORBA::Object_var forward_to; + servant_upcall.prepare_for_upcall ( + _collocated_tao_target_->_object_key (), +- "type", ++ "base_interfaces", + forward_to.out (), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + return ACE_reinterpret_cast ( +- POA_IR::ExceptionDef_ptr, ++ POA_IR::InterfaceDef_ptr, + servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/ExceptionDef:1.0" ++ "IDL:omg.org/IR/InterfaceDef:1.0" + ) +- )->type ( ++ )->base_interfaces ( + ACE_TRY_ENV + ); + } - void POA_IR::_TAO_InterfaceDef_ThruPOA_Proxy_Impl::base_interfaces ( +-IR::StructMemberSeq * POA_IR::_TAO_ExceptionDef_ThruPOA_Proxy_Impl::members ( ++void POA_IR::_TAO_InterfaceDef_ThruPOA_Proxy_Impl::base_interfaces ( CORBA_Object *_collocated_tao_target_, -- const IR::InterfaceDefSeq & base_interfaces, + const IR_InterfaceDefSeq & base_interfaces, CORBA::Environment &ACE_TRY_ENV ) ACE_THROW_SPEC (( -@@ -27839,22 +27737,22 @@ + CORBA::SystemException + )) + { +- IR::StructMemberSeq_var _tao_retval; +- ACE_UNUSED_ARG (_tao_retval); + TAO_Object_Adapter::Servant_Upcall servant_upcall ( + _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () + ); + CORBA::Object_var forward_to; + servant_upcall.prepare_for_upcall ( + _collocated_tao_target_->_object_key (), +- "members", ++ "base_interfaces", + forward_to.out (), + ACE_TRY_ENV + ); +- ACE_CHECK_RETURN (0); +- return ACE_reinterpret_cast ( +- POA_IR::ExceptionDef_ptr, ++ ACE_CHECK; ++ ACE_reinterpret_cast ( ++ POA_IR::InterfaceDef_ptr, + servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/ExceptionDef:1.0" ++ "IDL:omg.org/IR/InterfaceDef:1.0" + ) +- )->members ( ++ )->base_interfaces ( ++ base_interfaces, + ACE_TRY_ENV ); ++ return; } --IR::AttributeDef_ptr POA_IR::_TAO_InterfaceDef_ThruPOA_Proxy_Impl::create_attribute ( -+IR_AttributeDef_ptr POA_IR::_TAO_InterfaceDef_ThruPOA_Proxy_Impl::create_attribute ( +-void POA_IR::_TAO_ExceptionDef_ThruPOA_Proxy_Impl::members ( ++CORBA::Boolean POA_IR::_TAO_InterfaceDef_ThruPOA_Proxy_Impl::is_abstract ( CORBA_Object *_collocated_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, -+ IR_IDLType_ptr type, -+ IR_AttributeMode mode, -+ const IR_ExceptionDefSeq & get_exceptions, -+ const IR_ExceptionDefSeq & put_exceptions, +- const IR::StructMemberSeq & members, CORBA::Environment &ACE_TRY_ENV ) ACE_THROW_SPEC (( CORBA::SystemException )) { -- IR::AttributeDef_var _tao_retval; -+ IR_AttributeDef_var _tao_retval; - ACE_UNUSED_ARG (_tao_retval); ++ CORBA::Boolean _tao_retval = 0; ++ ACE_UNUSED_ARG (_tao_retval); TAO_Object_Adapter::Servant_Upcall servant_upcall ( _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -27884,23 +27782,23 @@ + ); + CORBA::Object_var forward_to; + servant_upcall.prepare_for_upcall ( + _collocated_tao_target_->_object_key (), +- "members", ++ "is_abstract", + forward_to.out (), + ACE_TRY_ENV + ); +- ACE_CHECK; +- ACE_reinterpret_cast ( +- POA_IR::ExceptionDef_ptr, ++ ACE_CHECK_RETURN (_tao_retval); ++ return ACE_reinterpret_cast ( ++ POA_IR::InterfaceDef_ptr, + servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/ExceptionDef:1.0" ++ "IDL:omg.org/IR/InterfaceDef:1.0" + ) +- )->members ( +- members, ++ )->is_abstract ( + ACE_TRY_ENV ); +- return; +-} +- +-// +-// End ThruPOA Proxy Implementation +-/////////////////////////////////////////////////////////////////////// +- +-// skeleton constructor +-POA_IR::ExceptionDef::ExceptionDef (void) +-{ +- this->optable_ = &tao_IR_ExceptionDef_optable; } --IR::OperationDef_ptr POA_IR::_TAO_InterfaceDef_ThruPOA_Proxy_Impl::create_operation ( -+IR_OperationDef_ptr POA_IR::_TAO_InterfaceDef_ThruPOA_Proxy_Impl::create_operation ( - CORBA_Object *_collocated_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, +-// copy ctor +-POA_IR::ExceptionDef::ExceptionDef (const ExceptionDef& rhs) +- : ACE_NESTED_CLASS (POA_IR,Contained) (rhs), +- ACE_NESTED_CLASS (POA_IR,Container) (rhs), +- ACE_NESTED_CLASS (POA_CORBA,IRObject) (rhs), +- TAO_ServantBase (rhs) +-{} +- +-// skeleton destructor +-POA_IR::ExceptionDef::~ExceptionDef (void) +-{ +-} +- +-void POA_IR::ExceptionDef::_get_type_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, ++void POA_IR::_TAO_InterfaceDef_ThruPOA_Proxy_Impl::is_abstract ( ++ CORBA_Object *_collocated_tao_target_, ++ CORBA::Boolean is_abstract, + CORBA::Environment &ACE_TRY_ENV + ) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException ++ )) + { +- POA_IR::ExceptionDef *_tao_impl = (POA_IR::ExceptionDef *)_tao_object_reference; +- +- CORBA::TypeCode_var _tao_retval; +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::ExceptionDef::TAO_ServerRequestInfo_IR_ExceptionDef_type_get ri ( +- _tao_server_request, +- _tao_impl +- , ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "is_abstract", ++ forward_to.out (), + ACE_TRY_ENV + ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->type ( +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- CORBA::TypeCode_ptr _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, ++ ACE_CHECK; ++ ACE_reinterpret_cast ( ++ POA_IR::InterfaceDef_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/InterfaceDef:1.0" ++ ) ++ )->is_abstract ( ++ is_abstract, + ACE_TRY_ENV + ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << _tao_retval.in ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- ++ return; + } + +-void POA_IR::ExceptionDef::_get_members_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, ++CORBA::Boolean POA_IR::_TAO_InterfaceDef_ThruPOA_Proxy_Impl::is_local ( ++ CORBA_Object *_collocated_tao_target_, + CORBA::Environment &ACE_TRY_ENV + ) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException ++ )) + { +- POA_IR::ExceptionDef *_tao_impl = (POA_IR::ExceptionDef *)_tao_object_reference; +- +- IR::StructMemberSeq_var _tao_retval; +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::ExceptionDef::TAO_ServerRequestInfo_IR_ExceptionDef_members_get ri ( +- _tao_server_request, +- _tao_impl +- , ++ CORBA::Boolean _tao_retval = 0; ++ ACE_UNUSED_ARG (_tao_retval); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "is_local", ++ forward_to.out (), + ACE_TRY_ENV + ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->members ( +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::StructMemberSeq * _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, ++ ACE_CHECK_RETURN (_tao_retval); ++ return ACE_reinterpret_cast ( ++ POA_IR::InterfaceDef_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/InterfaceDef:1.0" ++ ) ++ )->is_local ( + ACE_TRY_ENV + ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << _tao_retval.in ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- + } + +-void POA_IR::ExceptionDef::_set_members_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, ++void POA_IR::_TAO_InterfaceDef_ThruPOA_Proxy_Impl::is_local ( ++ CORBA_Object *_collocated_tao_target_, ++ CORBA::Boolean is_local, + CORBA::Environment &ACE_TRY_ENV + ) +-{ +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::ExceptionDef *_tao_impl = (POA_IR::ExceptionDef *)_tao_object_reference; +- +-_tao_server_request.argument_flag (0); +- IR::StructMemberSeq members; +- if (!( +- (_tao_in >> members) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException + )) +- ACE_THROW (CORBA::MARSHAL()); +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () ++{ ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () + ); +- +- POA_IR::ExceptionDef::TAO_ServerRequestInfo_IR_ExceptionDef_members_set ri ( +- _tao_server_request, +- _tao_impl +- , +- members, ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "is_local", ++ forward_to.out (), + ACE_TRY_ENV + ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- +- _tao_impl->members ( +- members, +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, ++ ACE_CHECK; ++ ACE_reinterpret_cast ( ++ POA_IR::InterfaceDef_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/InterfaceDef:1.0" ++ ) ++ )->is_local ( ++ is_local, + ACE_TRY_ENV + ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); ++ return; + } + +-void POA_IR::ExceptionDef::_is_a_skel ( +- TAO_ServerRequest &_tao_server_request, +- void * _tao_object_reference, +- void * /* context */, ++CORBA::Boolean POA_IR::_TAO_InterfaceDef_ThruPOA_Proxy_Impl::is_a ( ++ CORBA_Object *_collocated_tao_target_, ++ const char * interface_id, + CORBA::Environment &ACE_TRY_ENV + ) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException ++ )) + { +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::ExceptionDef *_tao_impl = (POA_IR::ExceptionDef *) _tao_object_reference; +- CORBA::Boolean _tao_retval = 0; +- CORBA::String_var value; +- if (!(_tao_in >> value.out ())) +- ACE_THROW (CORBA::MARSHAL ()); +- +- _tao_retval = _tao_impl->_is_a (value.in (), ACE_TRY_ENV); +- ACE_CHECK; +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) +- ACE_THROW (CORBA::MARSHAL ()); ++ CORBA::Boolean _tao_retval = 0; ++ ACE_UNUSED_ARG (_tao_retval); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "is_a", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK_RETURN (_tao_retval); ++ return ACE_reinterpret_cast ( ++ POA_IR::InterfaceDef_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/InterfaceDef:1.0" ++ ) ++ )->is_a ( ++ interface_id, ++ ACE_TRY_ENV ++ ); + } + +-void POA_IR::ExceptionDef::_non_existent_skel ( +- TAO_ServerRequest &_tao_server_request, +- void * _tao_object_reference, +- void * /* context */, ++IR::AttributeDef_ptr POA_IR::_TAO_InterfaceDef_ThruPOA_Proxy_Impl::create_attribute ( ++ CORBA_Object *_collocated_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 &ACE_TRY_ENV + ) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException ++ )) + { +- POA_IR::ExceptionDef *_tao_impl = (POA_IR::ExceptionDef *) _tao_object_reference; +- CORBA::Boolean _tao_retval = _tao_impl->_non_existent (ACE_TRY_ENV); +- ACE_CHECK; +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) +- ACE_THROW (CORBA::MARSHAL ()); ++ IR_AttributeDef_var _tao_retval; ++ ACE_UNUSED_ARG (_tao_retval); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "create_attribute", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK_RETURN (0); ++ return ACE_reinterpret_cast ( ++ POA_IR::InterfaceDef_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/InterfaceDef:1.0" ++ ) ++ )->create_attribute ( ++ id, ++ name, ++ version, ++ type, ++ mode, ++ get_exceptions, ++ put_exceptions, ++ ACE_TRY_ENV ++ ); + } + +-CORBA::Boolean POA_IR::ExceptionDef::_is_a ( +- const char* value, ++IR::OperationDef_ptr POA_IR::_TAO_InterfaceDef_ThruPOA_Proxy_Impl::create_operation ( ++ CORBA_Object *_collocated_tao_target_, ++ const char * id, ++ const char * name, ++ const char * version, + IR_IDLType_ptr result, + IR_OperationMode mode, + const IR_ParDescriptionSeq & params, @@ -6764,364 +29684,1208 @@ + const IR_ContextIdSeq & contexts, CORBA::Environment &ACE_TRY_ENV ) - ACE_THROW_SPEC (( - CORBA::SystemException - )) - { -- IR::OperationDef_var _tao_retval; ++ ACE_THROW_SPEC (( ++ CORBA::SystemException ++ )) + { +- if ( +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/ExceptionDef:1.0")) || +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/Contained:1.0")) || +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/Container:1.0")) || +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/CORBA/IRObject:1.0")) || +- (!ACE_OS::strcmp ((char *)value, CORBA::_tc_Object->id (ACE_TRY_ENV)))) +- return 1; +- else +- return 0; + IR_OperationDef_var _tao_retval; - ACE_UNUSED_ARG (_tao_retval); - TAO_Object_Adapter::Servant_Upcall servant_upcall ( - _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -27946,7 +27844,7 @@ - : ACE_NESTED_CLASS (POA_IR,Container) (rhs), - ACE_NESTED_CLASS (POA_IR,Contained) (rhs), - ACE_NESTED_CLASS (POA_IR,IDLType) (rhs), -- ACE_NESTED_CLASS (POA_CORBA,IRObject) (rhs), ++ ACE_UNUSED_ARG (_tao_retval); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "create_operation", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK_RETURN (0); ++ return ACE_reinterpret_cast ( ++ POA_IR::InterfaceDef_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/InterfaceDef:1.0" ++ ) ++ )->create_operation ( ++ id, ++ name, ++ version, ++ result, ++ mode, ++ params, ++ exceptions, ++ contexts, ++ ACE_TRY_ENV ++ ); + } + +-void* POA_IR::ExceptionDef::_downcast ( +- const char* logical_type_id +- ) +-{ +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/ExceptionDef:1.0") == 0) +- return ACE_static_cast (POA_IR::ExceptionDef_ptr, this); +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Contained:1.0") == 0) +- return ACE_static_cast (POA_IR::Contained_ptr, this); +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Container:1.0") == 0) +- return ACE_static_cast (POA_IR::Container_ptr, this); +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/IRObject:1.0") == 0) +- return ACE_static_cast (POA_CORBA::IRObject_ptr, this); +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/Object:1.0") == 0) +- return ACE_static_cast(PortableServer::Servant, this); +- return 0; +-} ++// ++// End ThruPOA Proxy Implementation ++/////////////////////////////////////////////////////////////////////// + +-void POA_IR::ExceptionDef::_dispatch (TAO_ServerRequest &req, void *context, CORBA::Environment &ACE_TRY_ENV) ++// skeleton constructor ++POA_IR::InterfaceDef::InterfaceDef (void) + { +- this->synchronous_upcall_dispatch(req, context, this, ACE_TRY_ENV); ++ this->optable_ = &tao_IR_InterfaceDef_optable; + } + +-const char* POA_IR::ExceptionDef::_interface_repository_id (void) const +-{ +- return "IDL:omg.org/IR/ExceptionDef:1.0"; +-} ++// copy ctor ++POA_IR::InterfaceDef::InterfaceDef (const InterfaceDef& rhs) ++ : ACE_NESTED_CLASS (POA_IR,Container) (rhs), ++ ACE_NESTED_CLASS (POA_IR,Contained) (rhs), ++ ACE_NESTED_CLASS (POA_IR,IDLType) (rhs), + POA_CORBA_IRObject (rhs), - TAO_ServantBase (rhs) - {} ++ TAO_ServantBase (rhs) ++{} -@@ -27964,7 +27862,7 @@ +-IR::ExceptionDef* +-POA_IR::ExceptionDef::_this (CORBA_Environment &ACE_TRY_ENV) ++// skeleton destructor ++POA_IR::InterfaceDef::~InterfaceDef (void) { - POA_IR::InterfaceDef *_tao_impl = (POA_IR::InterfaceDef *)_tao_object_reference; - -- IR::InterfaceDefSeq_var _tao_retval; +- TAO_Stub *stub = this->_create_stub (ACE_TRY_ENV); +- ACE_CHECK_RETURN (0); +- +- CORBA::Object_ptr tmp = CORBA::Object::_nil (); +- +- if (stub->servant_orb_var ()->orb_core ()->optimize_collocation_objects ()) +- ACE_NEW_RETURN (tmp, CORBA::Object (stub, 1, this), 0); +- else +- ACE_NEW_RETURN (tmp, CORBA::Object (stub, 0, this), 0); +- +- CORBA::Object_var obj = tmp; +- return ::IR::ExceptionDef::_unchecked_narrow (obj.in ()); + } + +- +-#if (TAO_HAS_INTERCEPTORS == 1) +-POA_IR::ExceptionDef::TAO_ServerRequestInfo_IR_ExceptionDef_type_get::TAO_ServerRequestInfo_IR_ExceptionDef_type_get ( ++void POA_IR::InterfaceDef::_get_base_interfaces_skel ( + TAO_ServerRequest &_tao_server_request, +- POA_IR::ExceptionDef *tao_impl +- , +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl) +-{} +- +-Dynamic::ParameterList * +-POA_IR::ExceptionDef::TAO_ServerRequestInfo_IR_ExceptionDef_type_get::arguments (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) + { +- // 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; +-} ++ POA_IR::InterfaceDef *_tao_impl = (POA_IR::InterfaceDef *)_tao_object_reference; + +-Dynamic::ExceptionList * +-POA_IR::ExceptionDef::TAO_ServerRequestInfo_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; +-} + IR_InterfaceDefSeq_var _tao_retval; - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( -@@ -27991,7 +27889,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::InterfaceDefSeq * _tao_retval_info = _tao_retval._retn (); -+ IR_InterfaceDefSeq * _tao_retval_info = _tao_retval._retn (); - ri.result (_tao_retval_info); - _tao_retval = _tao_retval_info; - ri.reply_status (PortableInterceptor::SUCCESSFUL); -@@ -28045,14 +27943,12 @@ - TAO_InputCDR &_tao_in = _tao_server_request.incoming (); - POA_IR::InterfaceDef *_tao_impl = (POA_IR::InterfaceDef *)_tao_object_reference; - -- _tao_server_request.argument_flag (0); -- IR::InterfaceDefSeq base_interfaces; +-CORBA::Any * +-POA_IR::ExceptionDef::TAO_ServerRequestInfo_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 (); +-} ++ _tao_retval = _tao_impl->base_interfaces ( ++ ACE_TRY_ENV ++ ); + +-char * +-POA_IR::ExceptionDef::TAO_ServerRequestInfo_IR_ExceptionDef_type_get::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} ++ ACE_CHECK; + +-CORBA::Boolean +-POA_IR::ExceptionDef::TAO_ServerRequestInfo_IR_ExceptionDef_type_get::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!( ++ (_tao_out << _tao_retval.in ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + } + +-void +-POA_IR::ExceptionDef::TAO_ServerRequestInfo_IR_ExceptionDef_type_get::result (CORBA::TypeCode_ptr result) ++void POA_IR::InterfaceDef::_set_base_interfaces_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) + { +- // Update the result. +- this->_result = result; +-} ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::InterfaceDef *_tao_impl = (POA_IR::InterfaceDef *)_tao_object_reference; + +-POA_IR::ExceptionDef::TAO_ServerRequestInfo_IR_ExceptionDef_members_get::TAO_ServerRequestInfo_IR_ExceptionDef_members_get ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::ExceptionDef *tao_impl +- , +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl) +-{} + IR_InterfaceDefSeq base_interfaces; - if (!( - (_tao_in >> base_interfaces) - )) - ACE_THROW (CORBA::MARSHAL()); ++ if (!( ++ (_tao_in >> base_interfaces) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + +-Dynamic::ParameterList * +-POA_IR::ExceptionDef::TAO_ServerRequestInfo_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; +-} ++ _tao_impl->base_interfaces ( ++ base_interfaces, ++ ACE_TRY_ENV ++ ); -- - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( - _tao_server_request.orb_core ()->server_request_interceptors (), -@@ -28203,14 +28099,12 @@ - TAO_InputCDR &_tao_in = _tao_server_request.incoming (); - POA_IR::InterfaceDef *_tao_impl = (POA_IR::InterfaceDef *)_tao_object_reference; - -- _tao_server_request.argument_flag (0); - CORBA::Boolean is_abstract; - if (!( - (_tao_in >> CORBA::Any::to_boolean (is_abstract)) - )) - ACE_THROW (CORBA::MARSHAL()); +-Dynamic::ExceptionList * +-POA_IR::ExceptionDef::TAO_ServerRequestInfo_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; +-} ++ ACE_CHECK; -- - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( - _tao_server_request.orb_core ()->server_request_interceptors (), -@@ -28361,14 +28255,12 @@ - TAO_InputCDR &_tao_in = _tao_server_request.incoming (); - POA_IR::InterfaceDef *_tao_impl = (POA_IR::InterfaceDef *)_tao_object_reference; - -- _tao_server_request.argument_flag (0); - CORBA::Boolean is_local; - if (!( - (_tao_in >> CORBA::Any::to_boolean (is_local)) - )) - ACE_THROW (CORBA::MARSHAL()); +-CORBA::Any * +-POA_IR::ExceptionDef::TAO_ServerRequestInfo_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 (); ++ _tao_server_request.init_reply (); + } + +-char * +-POA_IR::ExceptionDef::TAO_ServerRequestInfo_IR_ExceptionDef_members_get::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++void POA_IR::InterfaceDef::_get_is_abstract_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) + { +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} ++ POA_IR::InterfaceDef *_tao_impl = (POA_IR::InterfaceDef *)_tao_object_reference; -- - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( - _tao_server_request.orb_core ()->server_request_interceptors (), -@@ -28447,7 +28339,6 @@ - )) - ACE_THROW (CORBA::MARSHAL()); +-CORBA::Boolean +-POA_IR::ExceptionDef::TAO_ServerRequestInfo_IR_ExceptionDef_members_get::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} ++ CORBA::Boolean _tao_retval = 0; -- - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( - _tao_server_request.orb_core ()->server_request_interceptors (), -@@ -28528,14 +28419,14 @@ - TAO_InputCDR &_tao_in = _tao_server_request.incoming (); - POA_IR::InterfaceDef *_tao_impl = (POA_IR::InterfaceDef *)_tao_object_reference; - -- IR::AttributeDef_var _tao_retval; +-void +-POA_IR::ExceptionDef::TAO_ServerRequestInfo_IR_ExceptionDef_members_get::result (IR::StructMemberSeq * result) +-{ +- // Update the result. +- this->_result = result; +-} ++ _tao_retval = _tao_impl->is_abstract ( ++ ACE_TRY_ENV ++ ); + +-POA_IR::ExceptionDef::TAO_ServerRequestInfo_IR_ExceptionDef_members_set::TAO_ServerRequestInfo_IR_ExceptionDef_members_set ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::ExceptionDef *tao_impl +- , +- const IR::StructMemberSeq & members, +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- members_ (members) +-{} ++ ACE_CHECK; + +-Dynamic::ParameterList * +-POA_IR::ExceptionDef::TAO_ServerRequestInfo_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 (); ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!( ++ (_tao_out << CORBA::Any::from_boolean (_tao_retval)) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + } + +-Dynamic::ExceptionList * +-POA_IR::ExceptionDef::TAO_ServerRequestInfo_IR_ExceptionDef_members_set::exceptions (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++void POA_IR::InterfaceDef::_set_is_abstract_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) + { +- // 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; +-} ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::InterfaceDef *_tao_impl = (POA_IR::InterfaceDef *)_tao_object_reference; + +-CORBA::Any * +-POA_IR::ExceptionDef::TAO_ServerRequestInfo_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; +-} ++ CORBA::Boolean is_abstract; ++ if (!( ++ (_tao_in >> CORBA::Any::to_boolean (is_abstract)) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + +-char * +-POA_IR::ExceptionDef::TAO_ServerRequestInfo_IR_ExceptionDef_members_set::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} ++ _tao_impl->is_abstract ( ++ is_abstract, ++ ACE_TRY_ENV ++ ); + +-CORBA::Boolean +-POA_IR::ExceptionDef::TAO_ServerRequestInfo_IR_ExceptionDef_members_set::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); ++ ACE_CHECK; ++ ++ _tao_server_request.init_reply (); + } + +-#endif /* TAO_HAS_INTERCEPTORS */ +-class TAO_IR_AttributeDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable +-{ +-private: +- unsigned int hash (const char *str, unsigned int len); +-public: +- const TAO_operation_db_entry * lookup (const char *str, unsigned int len); +-}; +-/* starting time is 16:31:12 */ +-/* C++ code produced by gperf version 2.8 (ACE version) */ +-/* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_AttributeDef_Perfect_Hash_OpTable -N lookup */ +-unsigned int +-TAO_IR_AttributeDef_Perfect_Hash_OpTable::hash (const char *str, unsigned int len) ++void POA_IR::InterfaceDef::_get_is_local_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) + { +- static const unsigned char asso_values[] = +- { +-#if defined (ACE_MVS) +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 0, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 0, +- 37, 37, 0, 0, 10, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 0, 0, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 15, 37, 37, 37, 37, 10, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, +-#else +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 0, 37, 0, 37, 37, +- 0, 0, 10, 37, 37, 37, 37, 37, 37, 0, +- 0, 37, 37, 37, 37, 37, 15, 37, 37, 37, +- 37, 10, 37, 37, 37, 37, 37, 37, +-#endif /* ACE_MVS */ +- }; +- return len + asso_values[str[len - 1]] + asso_values[str[0]]; ++ POA_IR::InterfaceDef *_tao_impl = (POA_IR::InterfaceDef *)_tao_object_reference; ++ ++ CORBA::Boolean _tao_retval = 0; ++ ++ _tao_retval = _tao_impl->is_local ( ++ ACE_TRY_ENV ++ ); ++ ++ ACE_CHECK; ++ ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!( ++ (_tao_out << CORBA::Any::from_boolean (_tao_retval)) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + } + +-const class TAO_operation_db_entry * +-TAO_IR_AttributeDef_Perfect_Hash_OpTable::lookup (const char *str, unsigned int len) ++void POA_IR::InterfaceDef::_set_is_local_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) + { +- enum +- { +- TOTAL_KEYWORDS = 20, +- MIN_WORD_LENGTH = 4, +- MAX_WORD_LENGTH = 26, +- MIN_HASH_VALUE = 4, +- MAX_HASH_VALUE = 36, +- HASH_VALUE_RANGE = 33, +- DUPLICATES = 8 +- }; ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::InterfaceDef *_tao_impl = (POA_IR::InterfaceDef *)_tao_object_reference; + +- static const class TAO_operation_db_entry wordlist[] = +- { +- {"",0},{"",0},{"",0},{"",0}, +- {"move", &POA_IR::AttributeDef::move_skel}, +- {"_is_a", &POA_IR::AttributeDef::_is_a_skel}, +- {"_get_id", &POA_IR::AttributeDef::_get_id_skel}, +- {"_set_id", &POA_IR::AttributeDef::_set_id_skel}, +- {"describe", &POA_IR::AttributeDef::describe_skel}, +- {"_get_type", &POA_IR::AttributeDef::_get_type_skel}, +- {"_set_name", &POA_IR::AttributeDef::_set_name_skel}, +- {"_get_name", &POA_IR::AttributeDef::_get_name_skel}, +- {"_set_mode", &POA_IR::AttributeDef::_set_mode_skel}, +- {"_get_mode", &POA_IR::AttributeDef::_get_mode_skel}, +- {"_get_version", &POA_IR::AttributeDef::_get_version_skel}, +- {"_set_version", &POA_IR::AttributeDef::_set_version_skel}, +- {"_get_def_kind", &POA_IR::AttributeDef::_get_def_kind_skel}, +- {"_get_defined_in", &POA_IR::AttributeDef::_get_defined_in_skel}, +- {"destroy", &POA_IR::AttributeDef::destroy_skel}, +- {"_get_absolute_name", &POA_IR::AttributeDef::_get_absolute_name_skel}, +- {"_get_type_def", &POA_IR::AttributeDef::_get_type_def_skel}, +- {"_set_type_def", &POA_IR::AttributeDef::_set_type_def_skel}, +- {"_non_existent", &POA_IR::AttributeDef::_non_existent_skel}, +- {"_get_containing_repository", &POA_IR::AttributeDef::_get_containing_repository_skel}, +- }; ++ CORBA::Boolean is_local; ++ if (!( ++ (_tao_in >> CORBA::Any::to_boolean (is_local)) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + +- static const signed char lookup[] = +- { +- -6, -2, -9, -5, 4, 5, -1, -43, 8, -43, -14, -2, -38, 16, +- -1, 17, -1, 18, 19, -1, -1, -20, -2, -38, -1, -1, -1, -1, +- 22, -1, -1, -1, -1, -1, -1, -1, 23, +- }; ++ _tao_impl->is_local ( ++ is_local, ++ ACE_TRY_ENV ++ ); + +- if (len <= MAX_WORD_LENGTH && len >= MIN_WORD_LENGTH) +- { +- unsigned int key = hash (str, len); ++ ACE_CHECK; + +- if (key <= MAX_HASH_VALUE && key >= MIN_HASH_VALUE) +- { +- int slot = lookup[key]; ++ _tao_server_request.init_reply (); ++} + +- if (slot >= 0 && slot < MAX_HASH_VALUE) +- { +- const char *s = wordlist[slot].opname_; ++void POA_IR::InterfaceDef::is_a_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) ++{ ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::InterfaceDef *_tao_impl = (POA_IR::InterfaceDef *)_tao_object_reference; + +- if (*str == *s && !strncmp (str + 1, s + 1, len - 1)) +- return &wordlist[slot]; +- } +- else if (slot < 0 && slot >= -MAX_HASH_VALUE) +- return 0; +- else +- { +- unsigned int offset = key + slot + (slot > 0 ? -MAX_HASH_VALUE : MAX_HASH_VALUE); +- const class TAO_operation_db_entry *base = &wordlist[-lookup[offset]]; +- const class TAO_operation_db_entry *ptr = base + -lookup[offset + 1]; ++ CORBA::Boolean _tao_retval = 0; ++ CORBA::String_var interface_id; ++ if (!( ++ (_tao_in >> interface_id.out ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + +- while (--ptr >= base) +- if (*str == *ptr->opname_ && !strncmp (str + 1, ptr->opname_ + 1, len - 1)) +- return ptr; +- } +- } +- } +- return 0; +-} +-/* ending time is 16:31:12 */ +-static TAO_IR_AttributeDef_Perfect_Hash_OpTable tao_IR_AttributeDef_optable; ++ _tao_retval = _tao_impl->is_a ( ++ interface_id.in (), ++ ACE_TRY_ENV ++ ); + ++ ACE_CHECK; + +-/////////////////////////////////////////////////////////////////////// +-// Strategized Proxy Broker Implementation +-// ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!( ++ (_tao_out << CORBA::Any::from_boolean (_tao_retval)) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); ++} + +-// Factory function Implementation. +-POA_IR::_TAO_AttributeDef_Strategized_Proxy_Broker *POA_IR::_TAO_AttributeDef_Strategized_Proxy_Broker::the_TAO_AttributeDef_Strategized_Proxy_Broker (void) ++void POA_IR::InterfaceDef::create_attribute_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) + { +- static POA_IR::_TAO_AttributeDef_Strategized_Proxy_Broker strategized_proxy_broker; +- return &strategized_proxy_broker; ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::InterfaceDef *_tao_impl = (POA_IR::InterfaceDef *)_tao_object_reference; ++ + IR_AttributeDef_var _tao_retval; - CORBA::String_var id; - CORBA::String_var name; - CORBA::String_var version; -- IR::IDLType_var type; -- IR::AttributeMode mode; -- IR::ExceptionDefSeq get_exceptions; -- IR::ExceptionDefSeq put_exceptions; ++ CORBA::String_var id; ++ CORBA::String_var name; ++ CORBA::String_var version; + IR_IDLType_var type; + IR_AttributeMode mode; + IR_ExceptionDefSeq get_exceptions; + IR_ExceptionDefSeq put_exceptions; - if (!( - (_tao_in >> id.out ()) && - (_tao_in >> name.out ()) && -@@ -28547,7 +28438,6 @@ - )) - ACE_THROW (CORBA::MARSHAL()); - -- - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( - _tao_server_request.orb_core ()->server_request_interceptors (), -@@ -28587,7 +28477,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::AttributeDef_ptr _tao_retval_info = _tao_retval._retn (); -+ IR_AttributeDef_ptr _tao_retval_info = _tao_retval._retn (); - ri.result (_tao_retval_info); - _tao_retval = _tao_retval_info; - ri.reply_status (PortableInterceptor::SUCCESSFUL); -@@ -28641,15 +28531,15 @@ - TAO_InputCDR &_tao_in = _tao_server_request.incoming (); - POA_IR::InterfaceDef *_tao_impl = (POA_IR::InterfaceDef *)_tao_object_reference; - -- IR::OperationDef_var _tao_retval; ++ if (!( ++ (_tao_in >> id.out ()) && ++ (_tao_in >> name.out ()) && ++ (_tao_in >> version.out ()) && ++ (_tao_in >> type.out ()) && ++ (_tao_in >> mode) && ++ (_tao_in >> get_exceptions) && ++ (_tao_in >> put_exceptions) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); ++ ++ _tao_retval = _tao_impl->create_attribute ( ++ id.in (), ++ name.in (), ++ version.in (), ++ type.in (), ++ mode, ++ get_exceptions, ++ put_exceptions, ++ ACE_TRY_ENV ++ ); ++ ++ ACE_CHECK; ++ ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!( ++ (_tao_out << _tao_retval.in ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + } + +-POA_IR::_TAO_AttributeDef_Strategized_Proxy_Broker::_TAO_AttributeDef_Strategized_Proxy_Broker (void) ++void POA_IR::InterfaceDef::create_operation_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) + { +- for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) +- this->proxy_cache_[i] = 0; +- ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::InterfaceDef *_tao_impl = (POA_IR::InterfaceDef *)_tao_object_reference; ++ + IR_OperationDef_var _tao_retval; - CORBA::String_var id; - CORBA::String_var name; - CORBA::String_var version; -- IR::IDLType_var result; -- IR::OperationMode mode; -- IR::ParDescriptionSeq params; -- IR::ExceptionDefSeq exceptions; -- IR::ContextIdSeq contexts; ++ CORBA::String_var id; ++ CORBA::String_var name; ++ CORBA::String_var version; + IR_IDLType_var result; + IR_OperationMode mode; + IR_ParDescriptionSeq params; + IR_ExceptionDefSeq exceptions; + IR_ContextIdSeq contexts; - if (!( - (_tao_in >> id.out ()) && - (_tao_in >> name.out ()) && -@@ -28662,7 +28552,6 @@ - )) - ACE_THROW (CORBA::MARSHAL()); - -- - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( - _tao_server_request.orb_core ()->server_request_interceptors (), -@@ -28704,7 +28593,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::OperationDef_ptr _tao_retval_info = _tao_retval._retn (); -+ IR_OperationDef_ptr _tao_retval_info = _tao_retval._retn (); - ri.result (_tao_retval_info); - _tao_retval = _tao_retval_info; - ri.reply_status (PortableInterceptor::SUCCESSFUL); -@@ -28759,7 +28648,7 @@ - POA_IR::InterfaceDef *_tao_impl = (POA_IR::InterfaceDef *) _tao_object_reference; - CORBA::Boolean _tao_retval = 0; - CORBA::String_var value; -- if (!(_tao_in >> value.out ())) ++ if (!( ++ (_tao_in >> id.out ()) && ++ (_tao_in >> name.out ()) && ++ (_tao_in >> version.out ()) && ++ (_tao_in >> result.out ()) && ++ (_tao_in >> mode) && ++ (_tao_in >> params) && ++ (_tao_in >> exceptions) && ++ (_tao_in >> contexts) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); ++ ++ _tao_retval = _tao_impl->create_operation ( ++ id.in (), ++ name.in (), ++ version.in (), ++ result.in (), ++ mode, ++ params, ++ exceptions, ++ contexts, ++ ACE_TRY_ENV ++ ); ++ ++ ACE_CHECK; ++ ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!( ++ (_tao_out << _tao_retval.in ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + } + +-POA_IR::_TAO_AttributeDef_Strategized_Proxy_Broker::~_TAO_AttributeDef_Strategized_Proxy_Broker (void) ++void POA_IR::InterfaceDef::_is_a_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void * _tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++ ) + { +- for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) +- delete this->proxy_cache_[i]; +- ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::InterfaceDef *_tao_impl = (POA_IR::InterfaceDef *) _tao_object_reference; ++ CORBA::Boolean _tao_retval = 0; ++ CORBA::String_var value; + if (!((_tao_in >> value.out ()))) - ACE_THROW (CORBA::MARSHAL ()); - - _tao_retval = _tao_impl->_is_a (value.in (), ACE_TRY_ENV); -@@ -28767,7 +28656,7 @@ - - _tao_server_request.init_reply (); - TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); -- if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) ++ ACE_THROW (CORBA::MARSHAL ()); ++ ++ _tao_retval = _tao_impl->_is_a (value.in (), ACE_TRY_ENV); ++ ACE_CHECK; ++ ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); + if (!((_tao_out << CORBA::Any::from_boolean (_tao_retval)))) - ACE_THROW (CORBA::MARSHAL ()); ++ ACE_THROW (CORBA::MARSHAL ()); } -@@ -28784,7 +28673,7 @@ - - _tao_server_request.init_reply (); - TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); -- if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) +-IR::_TAO_AttributeDef_Proxy_Impl& +-POA_IR::_TAO_AttributeDef_Strategized_Proxy_Broker::select_proxy ( +- ::IR::AttributeDef *object, ++void POA_IR::InterfaceDef::_non_existent_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void * _tao_object_reference, ++ void * /* context */, + CORBA::Environment &ACE_TRY_ENV + ) + { +- TAO_ORB_Core::TAO_Collocation_Strategies strategy = +- TAO_ORB_Core::collocation_strategy (object); +- +- if (this->proxy_cache_[strategy] != 0) +- return *this->proxy_cache_[strategy]; +- +- this->create_proxy (strategy, ACE_TRY_ENV); +- ACE_CHECK_RETURN (*this->proxy_cache_[strategy]); +- +- return *this->proxy_cache_[strategy]; +- ++ POA_IR::InterfaceDef *_tao_impl = (POA_IR::InterfaceDef *) _tao_object_reference; ++ CORBA::Boolean _tao_retval = _tao_impl->_non_existent (ACE_TRY_ENV); ++ ACE_CHECK; ++ ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); + if (!((_tao_out << CORBA::Any::from_boolean (_tao_retval)))) - ACE_THROW (CORBA::MARSHAL ()); ++ ACE_THROW (CORBA::MARSHAL ()); } -@@ -28818,7 +28707,7 @@ - if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/IDLType:1.0") == 0) - return ACE_static_cast (POA_IR::IDLType_ptr, this); - if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/IRObject:1.0") == 0) -- return ACE_static_cast (POA_CORBA::IRObject_ptr, this); +-void +-POA_IR::_TAO_AttributeDef_Strategized_Proxy_Broker::create_proxy ( +- TAO_ORB_Core::TAO_Collocation_Strategies strategy, ++CORBA::Boolean POA_IR::InterfaceDef::_is_a ( ++ const char* value, + CORBA::Environment &ACE_TRY_ENV + ) + { +- ACE_GUARD (TAO_SYNCH_MUTEX, guard, this->mutex_); +- +- if (this->proxy_cache_[strategy] == 0) +- { +- switch (strategy) +- { +- case TAO_ORB_Core::THRU_POA_STRATEGY: +- ACE_NEW_THROW_EX ( +- this->proxy_cache_[strategy], +- POA_IR::_TAO_AttributeDef_ThruPOA_Proxy_Impl, +- CORBA::NO_MEMORY () +- ); +- ACE_CHECK; +- break; +- +- case TAO_ORB_Core::REMOTE_STRATEGY: +- default: +- ACE_NEW_THROW_EX ( +- this->proxy_cache_[strategy], +- ::IR::_TAO_AttributeDef_Remote_Proxy_Impl, +- CORBA::NO_MEMORY () +- ); +- ACE_CHECK; +- break; +- +- } +- +- } ++ if ( ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/InterfaceDef:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/Container:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/Contained:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/IDLType:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/CORBA/IRObject:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, CORBA::_tc_Object->id (ACE_TRY_ENV)))) ++ return 1; ++ else ++ return 0; + } + ++void* POA_IR::InterfaceDef::_downcast ( ++ const char* logical_type_id ++ ) ++{ ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/InterfaceDef:1.0") == 0) ++ return ACE_static_cast (POA_IR::InterfaceDef_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Container:1.0") == 0) ++ return ACE_static_cast (POA_IR::Container_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Contained:1.0") == 0) ++ return ACE_static_cast (POA_IR::Contained_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/IDLType:1.0") == 0) ++ return ACE_static_cast (POA_IR::IDLType_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/IRObject:1.0") == 0) + return ACE_static_cast (POA_CORBA_IRObject_ptr, this); - if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/Object:1.0") == 0) - return ACE_static_cast(PortableServer::Servant, this); - return 0; -@@ -28848,10 +28737,9 @@ - ACE_NEW_RETURN (tmp, CORBA::Object (stub, 0, this), 0); - - CORBA::Object_var obj = tmp; -- return ::IR::InterfaceDef::_unchecked_narrow (obj.in ()); -+ return IR_InterfaceDef::_unchecked_narrow (obj.in ()); - } - ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/Object:1.0") == 0) ++ return ACE_static_cast(PortableServer::Servant, this); ++ return 0; ++} + +-// +-// End Strategized Proxy Broker Implementation +-/////////////////////////////////////////////////////////////////////// - - #if (TAO_HAS_INTERCEPTORS == 1) - POA_IR::InterfaceDef::TAO_ServerRequestInfo_IR_InterfaceDef_base_interfaces_get::TAO_ServerRequestInfo_IR_InterfaceDef_base_interfaces_get ( - TAO_ServerRequest &_tao_server_request, -@@ -28931,7 +28819,7 @@ - POA_IR::InterfaceDef::TAO_ServerRequestInfo_IR_InterfaceDef_base_interfaces_set::TAO_ServerRequestInfo_IR_InterfaceDef_base_interfaces_set ( - TAO_ServerRequest &_tao_server_request, - POA_IR::InterfaceDef *tao_impl, -- const IR::InterfaceDefSeq & base_interfaces, -+ const IR_InterfaceDefSeq & base_interfaces, - CORBA::Environment & - ) - : TAO_ServerRequestInfo (_tao_server_request), -@@ -29388,10 +29276,10 @@ - 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, -+ IR_IDLType_ptr type, -+ IR_AttributeMode & mode, -+ const IR_ExceptionDefSeq & get_exceptions, -+ const IR_ExceptionDefSeq & put_exceptions, - CORBA::Environment & - ) - : TAO_ServerRequestInfo (_tao_server_request), -@@ -29518,11 +29406,11 @@ - 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, -+ IR_IDLType_ptr result, -+ IR_OperationMode & mode, -+ const IR_ParDescriptionSeq & params, -+ const IR_ExceptionDefSeq & exceptions, -+ const IR_ContextIdSeq & contexts, - CORBA::Environment & - ) - : TAO_ServerRequestInfo (_tao_server_request), -@@ -29651,6 +29539,7 @@ - } ++void POA_IR::InterfaceDef::_dispatch (TAO_ServerRequest &req, void *context, CORBA::Environment &ACE_TRY_ENV) ++{ ++ this->synchronous_upcall_dispatch(req, context, this, ACE_TRY_ENV); ++} - #endif /* TAO_HAS_INTERCEPTORS */ -+ - class TAO_IR_ValueMemberDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable +-IR::_TAO_AttributeDef_Proxy_Broker * +-IR__TAO_AttributeDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) ++const char* POA_IR::InterfaceDef::_interface_repository_id (void) const { - private: -@@ -29658,7 +29547,7 @@ - public: - const TAO_operation_db_entry * lookup (const char *str, unsigned int len); - }; --/* starting time is 18:47:28 */ -+/* starting time is 11:23:10 */ - /* C++ code produced by gperf version 2.8 (ACE version) */ - /* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_ValueMemberDef_Perfect_Hash_OpTable -N lookup */ - unsigned int -@@ -29789,10 +29678,9 @@ - } - return 0; +- ACE_UNUSED_ARG (obj); +- return ::POA_IR::_TAO_AttributeDef_Strategized_Proxy_Broker::the_TAO_AttributeDef_Strategized_Proxy_Broker(); ++ return "IDL:omg.org/IR/InterfaceDef:1.0"; } --/* ending time is 18:47:28 */ -+/* ending time is 11:23:10 */ - static TAO_IR_ValueMemberDef_Perfect_Hash_OpTable tao_IR_ValueMemberDef_optable; -- - /////////////////////////////////////////////////////////////////////// - // Strategized Proxy Broker Implementation - // -@@ -29818,9 +29706,9 @@ +-int +-IR__TAO_AttributeDef_Proxy_Broker_Factory_Initializer (long _dummy_) ++IR::InterfaceDef* ++POA_IR::InterfaceDef::_this (CORBA_Environment &ACE_TRY_ENV) + { +- ACE_UNUSED_ARG (_dummy_); ++ TAO_Stub *stub = this->_create_stub (ACE_TRY_ENV); ++ ACE_CHECK_RETURN (0); +- IR__TAO_AttributeDef_Proxy_Broker_Factory_function_pointer = +- IR__TAO_AttributeDef_Proxy_Broker_Factory_function; ++ CORBA::Object_ptr tmp = CORBA::Object::_nil (); + +- return 0; ++ if (stub->servant_orb_var ()->orb_core ()->optimize_collocation_objects ()) ++ ACE_NEW_RETURN (tmp, CORBA::Object (stub, 1, this), 0); ++ else ++ ACE_NEW_RETURN (tmp, CORBA::Object (stub, 0, this), 0); ++ ++ CORBA::Object_var obj = tmp; ++ return IR_InterfaceDef::_unchecked_narrow (obj.in ()); } --IR::_TAO_ValueMemberDef_Proxy_Impl& +-static int IR__TAO_AttributeDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = +- IR__TAO_AttributeDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, IR__TAO_AttributeDef_Proxy_Broker_Factory_Initializer)); +- +- +-/////////////////////////////////////////////////////////////////////// +-// ThruPOA Proxy Implementation +-// +- +-POA_IR::_TAO_AttributeDef_ThruPOA_Proxy_Impl::_TAO_AttributeDef_ThruPOA_Proxy_Impl (void) +-{} +- +-// ThruPOA Implementation of the IDL interface methods +- +-CORBA::TypeCode_ptr POA_IR::_TAO_AttributeDef_ThruPOA_Proxy_Impl::type ( +- CORBA_Object *_collocated_tao_target_, ++class TAO_IR_ValueMemberDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable ++{ ++private: ++ unsigned int hash (const char *str, unsigned int len); ++public: ++ const TAO_operation_db_entry * lookup (const char *str, unsigned int len); ++}; ++/* starting time is 11:23:10 */ ++/* C++ code produced by gperf version 2.8 (ACE version) */ ++/* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_ValueMemberDef_Perfect_Hash_OpTable -N lookup */ ++unsigned int ++TAO_IR_ValueMemberDef_Perfect_Hash_OpTable::hash (const char *str, unsigned int len) ++{ ++ static const unsigned char asso_values[] = ++ { ++#if defined (ACE_MVS) ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 0, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 0, ++ 37, 37, 0, 0, 10, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 0, 0, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 0, 15, 37, 37, 37, 37, 10, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, ++#else ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 0, 37, 0, 37, 37, ++ 0, 0, 10, 37, 37, 37, 37, 37, 37, 0, ++ 0, 37, 37, 37, 37, 0, 15, 37, 37, 37, ++ 37, 10, 37, 37, 37, 37, 37, 37, ++#endif /* ACE_MVS */ ++ }; ++ return len + asso_values[str[len - 1]] + asso_values[str[0]]; ++} ++ ++const class TAO_operation_db_entry * ++TAO_IR_ValueMemberDef_Perfect_Hash_OpTable::lookup (const char *str, unsigned int len) ++{ ++ enum ++ { ++ TOTAL_KEYWORDS = 20, ++ MIN_WORD_LENGTH = 4, ++ MAX_WORD_LENGTH = 26, ++ MIN_HASH_VALUE = 4, ++ MAX_HASH_VALUE = 36, ++ HASH_VALUE_RANGE = 33, ++ DUPLICATES = 7 ++ }; ++ ++ static const class TAO_operation_db_entry wordlist[] = ++ { ++ {"",0},{"",0},{"",0},{"",0}, ++ {"move", &POA_IR::ValueMemberDef::move_skel}, ++ {"_is_a", &POA_IR::ValueMemberDef::_is_a_skel}, ++ {"_get_id", &POA_IR::ValueMemberDef::_get_id_skel}, ++ {"_set_id", &POA_IR::ValueMemberDef::_set_id_skel}, ++ {"describe", &POA_IR::ValueMemberDef::describe_skel}, ++ {"_get_type", &POA_IR::ValueMemberDef::_get_type_skel}, ++ {"_set_name", &POA_IR::ValueMemberDef::_set_name_skel}, ++ {"_get_name", &POA_IR::ValueMemberDef::_get_name_skel}, ++ {"_get_access", &POA_IR::ValueMemberDef::_get_access_skel}, ++ {"_set_access", &POA_IR::ValueMemberDef::_set_access_skel}, ++ {"_get_version", &POA_IR::ValueMemberDef::_get_version_skel}, ++ {"_set_version", &POA_IR::ValueMemberDef::_set_version_skel}, ++ {"_get_def_kind", &POA_IR::ValueMemberDef::_get_def_kind_skel}, ++ {"_get_defined_in", &POA_IR::ValueMemberDef::_get_defined_in_skel}, ++ {"destroy", &POA_IR::ValueMemberDef::destroy_skel}, ++ {"_get_absolute_name", &POA_IR::ValueMemberDef::_get_absolute_name_skel}, ++ {"_get_type_def", &POA_IR::ValueMemberDef::_get_type_def_skel}, ++ {"_set_type_def", &POA_IR::ValueMemberDef::_set_type_def_skel}, ++ {"_non_existent", &POA_IR::ValueMemberDef::_non_existent_skel}, ++ {"_get_containing_repository", &POA_IR::ValueMemberDef::_get_containing_repository_skel}, ++ }; ++ ++ static const signed char lookup[] = ++ { ++ -12, -2, -14, -2, 4, 5, -1, 53, 8, 46, -1, -47, -46, 16, ++ -1, 17, -1, 18, 19, -9, -3, -20, -2, -38, -6, -2, -1, -1, ++ 22, -1, -1, -1, -1, -1, -1, -1, 23, ++ }; ++ ++ if (len <= MAX_WORD_LENGTH && len >= MIN_WORD_LENGTH) ++ { ++ unsigned int key = hash (str, len); ++ ++ if (key <= MAX_HASH_VALUE && key >= MIN_HASH_VALUE) ++ { ++ int slot = lookup[key]; ++ ++ if (slot >= 0 && slot < MAX_HASH_VALUE) ++ { ++ const char *s = wordlist[slot].opname_; ++ ++ if (*str == *s && !strncmp (str + 1, s + 1, len - 1)) ++ return &wordlist[slot]; ++ } ++ else if (slot < 0 && slot >= -MAX_HASH_VALUE) ++ return 0; ++ else ++ { ++ unsigned int offset = key + slot + (slot > 0 ? -MAX_HASH_VALUE : MAX_HASH_VALUE); ++ const class TAO_operation_db_entry *base = &wordlist[-lookup[offset]]; ++ const class TAO_operation_db_entry *ptr = base + -lookup[offset + 1]; ++ ++ while (--ptr >= base) ++ if (*str == *ptr->opname_ && !strncmp (str + 1, ptr->opname_ + 1, len - 1)) ++ return ptr; ++ } ++ } ++ } ++ return 0; ++} ++/* ending time is 11:23:10 */ ++static TAO_IR_ValueMemberDef_Perfect_Hash_OpTable tao_IR_ValueMemberDef_optable; ++ ++/////////////////////////////////////////////////////////////////////// ++// Strategized Proxy Broker Implementation ++// ++ ++// Factory function Implementation. ++POA_IR::_TAO_ValueMemberDef_Strategized_Proxy_Broker *POA_IR::_TAO_ValueMemberDef_Strategized_Proxy_Broker::the_TAO_ValueMemberDef_Strategized_Proxy_Broker (void) ++{ ++ static POA_IR::_TAO_ValueMemberDef_Strategized_Proxy_Broker strategized_proxy_broker; ++ return &strategized_proxy_broker; ++} ++ ++POA_IR::_TAO_ValueMemberDef_Strategized_Proxy_Broker::_TAO_ValueMemberDef_Strategized_Proxy_Broker (void) ++{ ++ for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) ++ this->proxy_cache_[i] = 0; ++ ++} ++ ++POA_IR::_TAO_ValueMemberDef_Strategized_Proxy_Broker::~_TAO_ValueMemberDef_Strategized_Proxy_Broker (void) ++{ ++ for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) ++ delete this->proxy_cache_[i]; ++ ++} ++ +_TAO_ValueMemberDef_Proxy_Impl& - POA_IR::_TAO_ValueMemberDef_Strategized_Proxy_Broker::select_proxy ( -- ::IR::ValueMemberDef *object, ++POA_IR::_TAO_ValueMemberDef_Strategized_Proxy_Broker::select_proxy ( + IR_ValueMemberDef *object, - CORBA::Environment &ACE_TRY_ENV - ) - { -@@ -29852,7 +29740,7 @@ - case TAO_ORB_Core::THRU_POA_STRATEGY: - ACE_NEW_THROW_EX ( - this->proxy_cache_[strategy], -- POA_IR::_TAO_ValueMemberDef_ThruPOA_Proxy_Impl, ++ CORBA::Environment &ACE_TRY_ENV ++ ) ++{ ++ TAO_ORB_Core::TAO_Collocation_Strategies strategy = ++ TAO_ORB_Core::collocation_strategy (object); ++ ++ if (this->proxy_cache_[strategy] != 0) ++ return *this->proxy_cache_[strategy]; ++ ++ this->create_proxy (strategy, ACE_TRY_ENV); ++ ACE_CHECK_RETURN (*this->proxy_cache_[strategy]); ++ ++ return *this->proxy_cache_[strategy]; ++ ++} ++ ++void ++POA_IR::_TAO_ValueMemberDef_Strategized_Proxy_Broker::create_proxy ( ++ TAO_ORB_Core::TAO_Collocation_Strategies strategy, ++ CORBA::Environment &ACE_TRY_ENV ++ ) ++{ ++ ACE_GUARD (TAO_SYNCH_MUTEX, guard, this->mutex_); ++ ++ if (this->proxy_cache_[strategy] == 0) ++ { ++ switch (strategy) ++ { ++ case TAO_ORB_Core::THRU_POA_STRATEGY: ++ ACE_NEW_THROW_EX ( ++ this->proxy_cache_[strategy], + _TAO_ValueMemberDef_ThruPOA_Proxy_Impl, - CORBA::NO_MEMORY () - ); - ACE_CHECK; -@@ -29862,7 +29750,7 @@ - default: - ACE_NEW_THROW_EX ( - this->proxy_cache_[strategy], -- ::IR::_TAO_ValueMemberDef_Remote_Proxy_Impl, ++ CORBA::NO_MEMORY () ++ ); ++ ACE_CHECK; ++ break; ++ ++ case TAO_ORB_Core::REMOTE_STRATEGY: ++ default: ++ ACE_NEW_THROW_EX ( ++ this->proxy_cache_[strategy], + _TAO_ValueMemberDef_Remote_Proxy_Impl, - CORBA::NO_MEMORY () - ); - ACE_CHECK; -@@ -29879,26 +29767,26 @@ - /////////////////////////////////////////////////////////////////////// - - --IR::_TAO_ValueMemberDef_Proxy_Broker * --IR__TAO_ValueMemberDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) ++ CORBA::NO_MEMORY () ++ ); ++ ACE_CHECK; ++ break; ++ ++ } ++ ++ } ++} ++ ++ ++// ++// End Strategized Proxy Broker Implementation ++/////////////////////////////////////////////////////////////////////// ++ ++ +_TAO_ValueMemberDef_Proxy_Broker * +_TAO_ValueMemberDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) - { - ACE_UNUSED_ARG (obj); - return ::POA_IR::_TAO_ValueMemberDef_Strategized_Proxy_Broker::the_TAO_ValueMemberDef_Strategized_Proxy_Broker(); - } - - int --IR__TAO_ValueMemberDef_Proxy_Broker_Factory_Initializer (long _dummy_) ++{ ++ ACE_UNUSED_ARG (obj); ++ return ::POA_IR::_TAO_ValueMemberDef_Strategized_Proxy_Broker::the_TAO_ValueMemberDef_Strategized_Proxy_Broker(); ++} ++ ++int +_TAO_ValueMemberDef_Proxy_Broker_Factory_Initializer (long _dummy_) - { - ACE_UNUSED_ARG (_dummy_); - -- IR__TAO_ValueMemberDef_Proxy_Broker_Factory_function_pointer = -- IR__TAO_ValueMemberDef_Proxy_Broker_Factory_function; ++{ ++ ACE_UNUSED_ARG (_dummy_); ++ + _TAO_ValueMemberDef_Proxy_Broker_Factory_function_pointer = + _TAO_ValueMemberDef_Proxy_Broker_Factory_function; - - return 0; - } - --static int IR__TAO_ValueMemberDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = -- IR__TAO_ValueMemberDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, IR__TAO_ValueMemberDef_Proxy_Broker_Factory_Initializer)); ++ ++ return 0; ++} ++ +static int _TAO_ValueMemberDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = + _TAO_ValueMemberDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, _TAO_ValueMemberDef_Proxy_Broker_Factory_Initializer)); - - - /////////////////////////////////////////////////////////////////////// -@@ -29941,7 +29829,7 @@ ++ ++ ++/////////////////////////////////////////////////////////////////////// ++// ThruPOA Proxy Implementation ++// ++ ++POA_IR::_TAO_ValueMemberDef_ThruPOA_Proxy_Impl::_TAO_ValueMemberDef_ThruPOA_Proxy_Impl (void) ++{} ++ ++POA_IR::_TAO_ValueMemberDef_ThruPOA_Proxy_Impl::~_TAO_ValueMemberDef_ThruPOA_Proxy_Impl (void) ++{} ++ ++// ThruPOA Implementation of the IDL interface methods ++ ++CORBA::TypeCode_ptr POA_IR::_TAO_ValueMemberDef_ThruPOA_Proxy_Impl::type ( ++ CORBA_Object *_collocated_tao_target_, + CORBA::Environment &ACE_TRY_ENV + ) + ACE_THROW_SPEC (( +@@ -23851,16 +15832,16 @@ + ); + ACE_CHECK_RETURN (0); + return ACE_reinterpret_cast ( +- POA_IR::AttributeDef_ptr, ++ POA_IR::ValueMemberDef_ptr, + servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/AttributeDef:1.0" ++ "IDL:omg.org/IR/ValueMemberDef:1.0" + ) + )->type ( + ACE_TRY_ENV ); } --IR::IDLType_ptr POA_IR::_TAO_ValueMemberDef_ThruPOA_Proxy_Impl::type_def ( -+IR_IDLType_ptr POA_IR::_TAO_ValueMemberDef_ThruPOA_Proxy_Impl::type_def ( +-IR::IDLType_ptr POA_IR::_TAO_AttributeDef_ThruPOA_Proxy_Impl::type_def ( ++IR::IDLType_ptr POA_IR::_TAO_ValueMemberDef_ThruPOA_Proxy_Impl::type_def ( CORBA_Object *_collocated_tao_target_, CORBA::Environment &ACE_TRY_ENV ) -@@ -29949,7 +29837,7 @@ +@@ -23868,7 +15849,7 @@ CORBA::SystemException )) { @@ -7130,84 +30894,613 @@ ACE_UNUSED_ARG (_tao_retval); TAO_Object_Adapter::Servant_Upcall servant_upcall ( _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -29974,7 +29862,7 @@ +@@ -23882,18 +15863,18 @@ + ); + ACE_CHECK_RETURN (0); + return ACE_reinterpret_cast ( +- POA_IR::AttributeDef_ptr, ++ POA_IR::ValueMemberDef_ptr, + servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/AttributeDef:1.0" ++ "IDL:omg.org/IR/ValueMemberDef:1.0" + ) + )->type_def ( + ACE_TRY_ENV + ); + } - void POA_IR::_TAO_ValueMemberDef_ThruPOA_Proxy_Impl::type_def ( +-void POA_IR::_TAO_AttributeDef_ThruPOA_Proxy_Impl::type_def ( ++void POA_IR::_TAO_ValueMemberDef_ThruPOA_Proxy_Impl::type_def ( CORBA_Object *_collocated_tao_target_, - IR::IDLType_ptr type_def, + IR_IDLType_ptr type_def, CORBA::Environment &ACE_TRY_ENV ) ACE_THROW_SPEC (( -@@ -30080,7 +29968,7 @@ +@@ -23912,9 +15893,9 @@ + ); + ACE_CHECK; + ACE_reinterpret_cast ( +- POA_IR::AttributeDef_ptr, ++ POA_IR::ValueMemberDef_ptr, + servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/AttributeDef:1.0" ++ "IDL:omg.org/IR/ValueMemberDef:1.0" + ) + )->type_def ( + type_def, +@@ -23923,7 +15904,7 @@ + return; + } + +-IR::AttributeMode POA_IR::_TAO_AttributeDef_ThruPOA_Proxy_Impl::mode ( ++CORBA::Visibility POA_IR::_TAO_ValueMemberDef_ThruPOA_Proxy_Impl::access ( + CORBA_Object *_collocated_tao_target_, + CORBA::Environment &ACE_TRY_ENV + ) +@@ -23931,7 +15912,7 @@ + CORBA::SystemException + )) + { +- IR::AttributeMode _tao_retval; ++ CORBA::Visibility _tao_retval = 0; + ACE_UNUSED_ARG (_tao_retval); + TAO_Object_Adapter::Servant_Upcall servant_upcall ( + _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +@@ -23939,24 +15920,24 @@ + CORBA::Object_var forward_to; + servant_upcall.prepare_for_upcall ( + _collocated_tao_target_->_object_key (), +- "mode", ++ "access", + forward_to.out (), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (_tao_retval); + return ACE_reinterpret_cast ( +- POA_IR::AttributeDef_ptr, ++ POA_IR::ValueMemberDef_ptr, + servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/AttributeDef:1.0" ++ "IDL:omg.org/IR/ValueMemberDef:1.0" + ) +- )->mode ( ++ )->access ( + ACE_TRY_ENV + ); + } + +-void POA_IR::_TAO_AttributeDef_ThruPOA_Proxy_Impl::mode ( ++void POA_IR::_TAO_ValueMemberDef_ThruPOA_Proxy_Impl::access ( + CORBA_Object *_collocated_tao_target_, +- IR::AttributeMode mode, ++ CORBA::Visibility access, + CORBA::Environment &ACE_TRY_ENV + ) + ACE_THROW_SPEC (( +@@ -23969,18 +15950,18 @@ + CORBA::Object_var forward_to; + servant_upcall.prepare_for_upcall ( + _collocated_tao_target_->_object_key (), +- "mode", ++ "access", + forward_to.out (), + ACE_TRY_ENV + ); + ACE_CHECK; + ACE_reinterpret_cast ( +- POA_IR::AttributeDef_ptr, ++ POA_IR::ValueMemberDef_ptr, + servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/AttributeDef:1.0" ++ "IDL:omg.org/IR/ValueMemberDef:1.0" + ) +- )->mode ( +- mode, ++ )->access ( ++ access, + ACE_TRY_ENV + ); + return; +@@ -23991,464 +15972,197 @@ + /////////////////////////////////////////////////////////////////////// + + // skeleton constructor +-POA_IR::AttributeDef::AttributeDef (void) ++POA_IR::ValueMemberDef::ValueMemberDef (void) + { +- this->optable_ = &tao_IR_AttributeDef_optable; ++ this->optable_ = &tao_IR_ValueMemberDef_optable; + } + // copy ctor - POA_IR::ValueMemberDef::ValueMemberDef (const ValueMemberDef& rhs) +-POA_IR::AttributeDef::AttributeDef (const AttributeDef& rhs) ++POA_IR::ValueMemberDef::ValueMemberDef (const ValueMemberDef& rhs) : ACE_NESTED_CLASS (POA_IR,Contained) (rhs), - ACE_NESTED_CLASS (POA_CORBA,IRObject) (rhs), + POA_CORBA_IRObject (rhs), TAO_ServantBase (rhs) {} -@@ -30178,7 +30066,7 @@ + // skeleton destructor +-POA_IR::AttributeDef::~AttributeDef (void) ++POA_IR::ValueMemberDef::~ValueMemberDef (void) { - POA_IR::ValueMemberDef *_tao_impl = (POA_IR::ValueMemberDef *)_tao_object_reference; - -- IR::IDLType_var _tao_retval; + } + +-void POA_IR::AttributeDef::_get_type_skel ( ++void POA_IR::ValueMemberDef::_get_type_skel ( + TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, ++ void *_tao_object_reference, ++ void * /* context */, + CORBA::Environment &ACE_TRY_ENV +- ) ++) + { +- POA_IR::AttributeDef *_tao_impl = (POA_IR::AttributeDef *)_tao_object_reference; ++ POA_IR::ValueMemberDef *_tao_impl = (POA_IR::ValueMemberDef *)_tao_object_reference; + + CORBA::TypeCode_var _tao_retval; + +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::AttributeDef::TAO_ServerRequestInfo_IR_AttributeDef_type_get ri ( +- _tao_server_request, +- _tao_impl +- , ++ _tao_retval = _tao_impl->type ( + ACE_TRY_ENV + ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->type ( +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- CORBA::TypeCode_ptr _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; ++ + ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); ++ ++ _tao_server_request.init_reply (); + TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); + if (!( + (_tao_out << _tao_retval.in ()) + )) +- ACE_THROW (CORBA::MARSHAL()); +- ++ ACE_THROW (CORBA::MARSHAL () ); + } + +-void POA_IR::AttributeDef::_get_type_def_skel ( ++void POA_IR::ValueMemberDef::_get_type_def_skel ( + TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, ++ void *_tao_object_reference, ++ void * /* context */, + CORBA::Environment &ACE_TRY_ENV +- ) ++) + { +- POA_IR::AttributeDef *_tao_impl = (POA_IR::AttributeDef *)_tao_object_reference; ++ POA_IR::ValueMemberDef *_tao_impl = (POA_IR::ValueMemberDef *)_tao_object_reference; + +- IR::IDLType_var _tao_retval; + IR_IDLType_var _tao_retval; - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( -@@ -30205,7 +30093,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::IDLType_ptr _tao_retval_info = _tao_retval._retn (); -+ IR_IDLType_ptr _tao_retval_info = _tao_retval._retn (); - ri.result (_tao_retval_info); - _tao_retval = _tao_retval_info; - ri.reply_status (PortableInterceptor::SUCCESSFUL); -@@ -30259,14 +30147,12 @@ +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::AttributeDef::TAO_ServerRequestInfo_IR_AttributeDef_type_def_get ri ( +- _tao_server_request, +- _tao_impl +- , ++ _tao_retval = _tao_impl->type_def ( + ACE_TRY_ENV + ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->type_def ( +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::IDLType_ptr _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; ++ + ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); ++ ++ _tao_server_request.init_reply (); + TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); + if (!( + (_tao_out << _tao_retval.in ()) + )) +- ACE_THROW (CORBA::MARSHAL()); +- ++ ACE_THROW (CORBA::MARSHAL () ); + } + +-void POA_IR::AttributeDef::_set_type_def_skel ( ++void POA_IR::ValueMemberDef::_set_type_def_skel ( + TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, ++ void *_tao_object_reference, ++ void * /* context */, + CORBA::Environment &ACE_TRY_ENV +- ) ++) + { TAO_InputCDR &_tao_in = _tao_server_request.incoming (); - POA_IR::ValueMemberDef *_tao_impl = (POA_IR::ValueMemberDef *)_tao_object_reference; - -- _tao_server_request.argument_flag (0); +- POA_IR::AttributeDef *_tao_impl = (POA_IR::AttributeDef *)_tao_object_reference; ++ POA_IR::ValueMemberDef *_tao_impl = (POA_IR::ValueMemberDef *)_tao_object_reference; + +-_tao_server_request.argument_flag (0); - IR::IDLType_var type_def; + IR_IDLType_var type_def; if (!( (_tao_in >> type_def.out ()) )) - ACE_THROW (CORBA::MARSHAL()); +- ACE_THROW (CORBA::MARSHAL()); ++ ACE_THROW (CORBA::MARSHAL () ); - - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( - _tao_server_request.orb_core ()->server_request_interceptors (), -@@ -30417,14 +30303,12 @@ +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::AttributeDef::TAO_ServerRequestInfo_IR_AttributeDef_type_def_set ri ( +- _tao_server_request, +- _tao_impl +- , ++ _tao_impl->type_def ( + type_def.in (), + ACE_TRY_ENV + ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- +- _tao_impl->type_def ( +- type_def.in (), +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; ++ + ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); ++ ++ _tao_server_request.init_reply (); + } + +-void POA_IR::AttributeDef::_get_mode_skel ( ++void POA_IR::ValueMemberDef::_get_access_skel ( + TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, ++ void *_tao_object_reference, ++ void * /* context */, + CORBA::Environment &ACE_TRY_ENV +- ) ++) + { +- POA_IR::AttributeDef *_tao_impl = (POA_IR::AttributeDef *)_tao_object_reference; ++ POA_IR::ValueMemberDef *_tao_impl = (POA_IR::ValueMemberDef *)_tao_object_reference; + +- IR::AttributeMode _tao_retval; ++ CORBA::Visibility _tao_retval = 0; + +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::AttributeDef::TAO_ServerRequestInfo_IR_AttributeDef_mode_get ri ( +- _tao_server_request, +- _tao_impl +- , ++ _tao_retval = _tao_impl->access ( + ACE_TRY_ENV + ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->mode ( +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::AttributeMode _tao_retval_info = _tao_retval; +- ri.result (_tao_retval_info); +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; ++ + ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); ++ ++ _tao_server_request.init_reply (); + TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); + if (!( + (_tao_out << _tao_retval) + )) +- ACE_THROW (CORBA::MARSHAL()); +- ++ ACE_THROW (CORBA::MARSHAL () ); + } + +-void POA_IR::AttributeDef::_set_mode_skel ( ++void POA_IR::ValueMemberDef::_set_access_skel ( + TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, ++ void *_tao_object_reference, ++ void * /* context */, + CORBA::Environment &ACE_TRY_ENV +- ) ++) + { TAO_InputCDR &_tao_in = _tao_server_request.incoming (); - POA_IR::ValueMemberDef *_tao_impl = (POA_IR::ValueMemberDef *)_tao_object_reference; - -- _tao_server_request.argument_flag (0); - CORBA::Visibility access; +- POA_IR::AttributeDef *_tao_impl = (POA_IR::AttributeDef *)_tao_object_reference; ++ POA_IR::ValueMemberDef *_tao_impl = (POA_IR::ValueMemberDef *)_tao_object_reference; + +-_tao_server_request.argument_flag (0); +- IR::AttributeMode mode; ++ CORBA::Visibility access; if (!( - (_tao_in >> access) +- (_tao_in >> mode) ++ (_tao_in >> access) )) - ACE_THROW (CORBA::MARSHAL()); +- ACE_THROW (CORBA::MARSHAL()); +- ++ ACE_THROW (CORBA::MARSHAL () ); +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::AttributeDef::TAO_ServerRequestInfo_IR_AttributeDef_mode_set ri ( +- _tao_server_request, +- _tao_impl +- , +- mode, ++ _tao_impl->access ( ++ access, + ACE_TRY_ENV + ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- - - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( - _tao_server_request.orb_core ()->server_request_interceptors (), -@@ -30497,7 +30381,7 @@ - POA_IR::ValueMemberDef *_tao_impl = (POA_IR::ValueMemberDef *) _tao_object_reference; +- _tao_impl->mode ( +- mode, +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; ++ + ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); ++ ++ _tao_server_request.init_reply (); + } + +-void POA_IR::AttributeDef::_is_a_skel ( +- TAO_ServerRequest &_tao_server_request, ++void POA_IR::ValueMemberDef::_is_a_skel ( ++ TAO_ServerRequest &_tao_server_request, + void * _tao_object_reference, + void * /* context */, + CORBA::Environment &ACE_TRY_ENV + ) + { + TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::AttributeDef *_tao_impl = (POA_IR::AttributeDef *) _tao_object_reference; ++ POA_IR::ValueMemberDef *_tao_impl = (POA_IR::ValueMemberDef *) _tao_object_reference; CORBA::Boolean _tao_retval = 0; CORBA::String_var value; - if (!(_tao_in >> value.out ())) + if (!((_tao_in >> value.out ()))) ACE_THROW (CORBA::MARSHAL ()); - +- ++ _tao_retval = _tao_impl->_is_a (value.in (), ACE_TRY_ENV); -@@ -30505,7 +30389,7 @@ - + ACE_CHECK; +- ++ _tao_server_request.init_reply (); TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); - if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) @@ -7215,8 +31508,21 @@ ACE_THROW (CORBA::MARSHAL ()); } -@@ -30522,7 +30406,7 @@ - +-void POA_IR::AttributeDef::_non_existent_skel ( +- TAO_ServerRequest &_tao_server_request, ++void POA_IR::ValueMemberDef::_non_existent_skel ( ++ TAO_ServerRequest &_tao_server_request, + void * _tao_object_reference, + void * /* context */, + CORBA::Environment &ACE_TRY_ENV + ) + { +- POA_IR::AttributeDef *_tao_impl = (POA_IR::AttributeDef *) _tao_object_reference; ++ POA_IR::ValueMemberDef *_tao_impl = (POA_IR::ValueMemberDef *) _tao_object_reference; + CORBA::Boolean _tao_retval = _tao_impl->_non_existent (ACE_TRY_ENV); + ACE_CHECK; +- ++ _tao_server_request.init_reply (); TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); - if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) @@ -7224,7 +31530,31 @@ ACE_THROW (CORBA::MARSHAL ()); } -@@ -30550,7 +30434,7 @@ +-CORBA::Boolean POA_IR::AttributeDef::_is_a ( ++CORBA::Boolean POA_IR::ValueMemberDef::_is_a ( + const char* value, + CORBA::Environment &ACE_TRY_ENV + ) + { + if ( +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/AttributeDef:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/ValueMemberDef:1.0")) || + (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/Contained:1.0")) || + (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/CORBA/IRObject:1.0")) || + (!ACE_OS::strcmp ((char *)value, CORBA::_tc_Object->id (ACE_TRY_ENV)))) +@@ -24457,33 +16171,33 @@ + return 0; + } + +-void* POA_IR::AttributeDef::_downcast ( ++void* POA_IR::ValueMemberDef::_downcast ( + const char* logical_type_id + ) + { +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/AttributeDef:1.0") == 0) +- return ACE_static_cast (POA_IR::AttributeDef_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/ValueMemberDef:1.0") == 0) ++ return ACE_static_cast (POA_IR::ValueMemberDef_ptr, this); if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Contained:1.0") == 0) return ACE_static_cast (POA_IR::Contained_ptr, this); if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/IRObject:1.0") == 0) @@ -7233,628 +31563,14907 @@ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/Object:1.0") == 0) return ACE_static_cast(PortableServer::Servant, this); return 0; -@@ -30580,10 +30464,9 @@ - ACE_NEW_RETURN (tmp, CORBA::Object (stub, 0, this), 0); - - CORBA::Object_var obj = tmp; -- return ::IR::ValueMemberDef::_unchecked_narrow (obj.in ()); -+ return IR_ValueMemberDef::_unchecked_narrow (obj.in ()); } -- - #if (TAO_HAS_INTERCEPTORS == 1) - POA_IR::ValueMemberDef::TAO_ServerRequestInfo_IR_ValueMemberDef_type_get::TAO_ServerRequestInfo_IR_ValueMemberDef_type_get ( - TAO_ServerRequest &_tao_server_request, -@@ -30738,7 +30621,7 @@ - POA_IR::ValueMemberDef::TAO_ServerRequestInfo_IR_ValueMemberDef_type_def_set::TAO_ServerRequestInfo_IR_ValueMemberDef_type_def_set ( - TAO_ServerRequest &_tao_server_request, - POA_IR::ValueMemberDef *tao_impl, -- IR::IDLType_ptr type_def, -+ IR_IDLType_ptr type_def, - CORBA::Environment & - ) - : TAO_ServerRequestInfo (_tao_server_request), -@@ -30958,6 +30841,7 @@ +-void POA_IR::AttributeDef::_dispatch (TAO_ServerRequest &req, void *context, CORBA::Environment &ACE_TRY_ENV) ++void POA_IR::ValueMemberDef::_dispatch (TAO_ServerRequest &req, void *context, CORBA::Environment &ACE_TRY_ENV) + { + this->synchronous_upcall_dispatch(req, context, this, ACE_TRY_ENV); } - #endif /* TAO_HAS_INTERCEPTORS */ -+ - class TAO_IR_ValueDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable +-const char* POA_IR::AttributeDef::_interface_repository_id (void) const ++const char* POA_IR::ValueMemberDef::_interface_repository_id (void) const { - private: -@@ -30965,7 +30849,7 @@ - public: - const TAO_operation_db_entry * lookup (const char *str, unsigned int len); - }; --/* starting time is 18:47:28 */ -+/* starting time is 11:23:11 */ - /* C++ code produced by gperf version 2.8 (ACE version) */ - /* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_ValueDef_Perfect_Hash_OpTable -N lookup */ - unsigned int -@@ -31129,10 +31013,9 @@ - } - return 0; +- return "IDL:omg.org/IR/AttributeDef:1.0"; ++ return "IDL:omg.org/IR/ValueMemberDef:1.0"; } --/* ending time is 18:47:28 */ -+/* ending time is 11:23:11 */ - static TAO_IR_ValueDef_Perfect_Hash_OpTable tao_IR_ValueDef_optable; -- - /////////////////////////////////////////////////////////////////////// - // Strategized Proxy Broker Implementation - // -@@ -31158,9 +31041,9 @@ +-IR::AttributeDef* +-POA_IR::AttributeDef::_this (CORBA_Environment &ACE_TRY_ENV) ++IR::ValueMemberDef* ++POA_IR::ValueMemberDef::_this (CORBA_Environment &ACE_TRY_ENV) + { + TAO_Stub *stub = this->_create_stub (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); +@@ -24496,12902 +16210,747 @@ + ACE_NEW_RETURN (tmp, CORBA::Object (stub, 0, this), 0); + CORBA::Object_var obj = tmp; +- return ::IR::AttributeDef::_unchecked_narrow (obj.in ()); ++ return IR_ValueMemberDef::_unchecked_narrow (obj.in ()); } --IR::_TAO_ValueDef_Proxy_Impl& +- +-#if (TAO_HAS_INTERCEPTORS == 1) +-POA_IR::AttributeDef::TAO_ServerRequestInfo_IR_AttributeDef_type_get::TAO_ServerRequestInfo_IR_AttributeDef_type_get ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::AttributeDef *tao_impl +- , +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl) +-{} +- +-Dynamic::ParameterList * +-POA_IR::AttributeDef::TAO_ServerRequestInfo_IR_AttributeDef_type_get::arguments (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++class TAO_IR_ValueDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable + { +- // 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 * +-POA_IR::AttributeDef::TAO_ServerRequestInfo_IR_AttributeDef_type_get::exceptions (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++private: ++ unsigned int hash (const char *str, unsigned int len); ++public: ++ const TAO_operation_db_entry * lookup (const char *str, unsigned int len); ++}; ++/* starting time is 11:23:11 */ ++/* C++ code produced by gperf version 2.8 (ACE version) */ ++/* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_ValueDef_Perfect_Hash_OpTable -N lookup */ ++unsigned int ++TAO_IR_ValueDef_Perfect_Hash_OpTable::hash (const char *str, unsigned int len) + { +- // 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; ++ static const unsigned char asso_values[] = ++ { ++#if defined (ACE_MVS) ++ 86, 86, 86, 86, 86, 86, 86, 86, 86, 86, ++ 86, 86, 86, 86, 86, 86, 86, 86, 86, 86, ++ 86, 86, 86, 86, 86, 86, 86, 86, 86, 86, ++ 86, 86, 86, 86, 86, 86, 86, 86, 86, 86, ++ 86, 86, 86, 86, 86, 86, 86, 86, 86, 86, ++ 86, 86, 86, 86, 86, 86, 86, 86, 86, 86, ++ 86, 86, 86, 86, 86, 86, 86, 86, 86, 86, ++ 86, 86, 86, 86, 86, 86, 86, 86, 86, 86, ++ 86, 86, 86, 86, 86, 86, 86, 86, 86, 86, ++ 86, 86, 86, 86, 86, 86, 86, 86, 86, 86, ++ 86, 86, 86, 86, 86, 86, 86, 86, 86, 0, ++ 86, 86, 86, 86, 86, 86, 86, 86, 86, 86, ++ 86, 86, 86, 86, 86, 86, 86, 86, 86, 0, ++ 86, 50, 35, 0, 86, 86, 86, 20, 86, 86, ++ 86, 86, 86, 86, 86, 86, 86, 0, 0, 15, ++ 86, 0, 86, 0, 86, 86, 86, 86, 86, 86, ++ 86, 86, 20, 20, 86, 86, 86, 5, 5, 86, ++ 86, 86, 86, 86, 86, 86, 86, 86, 86, 86, ++ 86, 86, 86, 86, 86, 86, 86, 86, 86, 86, ++ 86, 86, 86, 86, 86, 86, 86, 86, 86, 86, ++ 86, 86, 86, 86, 86, 86, 86, 86, 86, 86, ++ 86, 86, 86, 86, 86, 86, 86, 86, 86, 86, ++ 86, 86, 86, 86, 86, 86, 86, 86, 86, 86, ++ 86, 86, 86, 86, 86, 86, 86, 86, 86, 86, ++ 86, 86, 86, 86, 86, 86, 86, 86, 86, 86, ++ 86, 86, 86, 86, 86, 86, ++#else ++ 86, 86, 86, 86, 86, 86, 86, 86, 86, 86, ++ 86, 86, 86, 86, 86, 86, 86, 86, 86, 86, ++ 86, 86, 86, 86, 86, 86, 86, 86, 86, 86, ++ 86, 86, 86, 86, 86, 86, 86, 86, 86, 86, ++ 86, 86, 86, 86, 86, 86, 86, 86, 86, 86, ++ 86, 86, 86, 86, 86, 86, 86, 86, 86, 86, ++ 86, 86, 86, 86, 86, 86, 86, 86, 86, 86, ++ 86, 86, 86, 86, 86, 86, 86, 86, 86, 86, ++ 86, 86, 86, 86, 86, 86, 86, 86, 86, 86, ++ 86, 86, 86, 86, 86, 0, 86, 0, 86, 50, ++ 35, 0, 86, 86, 86, 20, 86, 86, 0, 0, ++ 15, 86, 0, 86, 0, 20, 20, 86, 86, 86, ++ 5, 5, 86, 86, 86, 86, 86, 86, ++#endif /* ACE_MVS */ ++ }; ++ return len + asso_values[str[len - 1]] + asso_values[str[0]]; + } + +-CORBA::Any * +-POA_IR::AttributeDef::TAO_ServerRequestInfo_IR_AttributeDef_type_get::result (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++const class TAO_operation_db_entry * ++TAO_IR_ValueDef_Perfect_Hash_OpTable::lookup (const char *str, unsigned int len) + { +- // 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 (); +-} ++ enum ++ { ++ TOTAL_KEYWORDS = 49, ++ MIN_WORD_LENGTH = 4, ++ MAX_WORD_LENGTH = 26, ++ MIN_HASH_VALUE = 4, ++ MAX_HASH_VALUE = 85, ++ HASH_VALUE_RANGE = 82, ++ DUPLICATES = 16 ++ }; + +-char * +-POA_IR::AttributeDef::TAO_ServerRequestInfo_IR_AttributeDef_type_get::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} ++ static const class TAO_operation_db_entry wordlist[] = ++ { ++ {"",0},{"",0},{"",0},{"",0}, ++ {"move", &POA_IR::ValueDef::move_skel}, ++ {"_is_a", &POA_IR::ValueDef::_is_a_skel}, ++ {"lookup", &POA_IR::ValueDef::lookup_skel}, ++ {"_get_name", &POA_IR::ValueDef::_get_name_skel}, ++ {"_get_type", &POA_IR::ValueDef::_get_type_skel}, ++ {"_set_name", &POA_IR::ValueDef::_set_name_skel}, ++ {"lookup_name", &POA_IR::ValueDef::lookup_name_skel}, ++ {"_get_is_custom", &POA_IR::ValueDef::_get_is_custom_skel}, ++ {"_set_is_custom", &POA_IR::ValueDef::_set_is_custom_skel}, ++ {"_get_base_value", &POA_IR::ValueDef::_get_base_value_skel}, ++ {"_set_base_value", &POA_IR::ValueDef::_set_base_value_skel}, ++ {"_get_absolute_name", &POA_IR::ValueDef::_get_absolute_name_skel}, ++ {"_get_is_truncatable", &POA_IR::ValueDef::_get_is_truncatable_skel}, ++ {"_set_is_truncatable", &POA_IR::ValueDef::_set_is_truncatable_skel}, ++ {"is_a", &POA_IR::ValueDef::is_a_skel}, ++ {"_get_version", &POA_IR::ValueDef::_get_version_skel}, ++ {"_set_version", &POA_IR::ValueDef::_set_version_skel}, ++ {"_get_defined_in", &POA_IR::ValueDef::_get_defined_in_skel}, ++ {"_get_containing_repository", &POA_IR::ValueDef::_get_containing_repository_skel}, ++ {"_non_existent", &POA_IR::ValueDef::_non_existent_skel}, ++ {"_get_is_abstract", &POA_IR::ValueDef::_get_is_abstract_skel}, ++ {"_set_is_abstract", &POA_IR::ValueDef::_set_is_abstract_skel}, ++ {"_get_initializers", &POA_IR::ValueDef::_get_initializers_skel}, ++ {"_set_initializers", &POA_IR::ValueDef::_set_initializers_skel}, ++ {"_get_id", &POA_IR::ValueDef::_get_id_skel}, ++ {"_set_id", &POA_IR::ValueDef::_set_id_skel}, ++ {"describe", &POA_IR::ValueDef::describe_skel}, ++ {"_get_supported_interfaces", &POA_IR::ValueDef::_get_supported_interfaces_skel}, ++ {"_set_abstract_base_values", &POA_IR::ValueDef::_set_abstract_base_values_skel}, ++ {"_get_abstract_base_values", &POA_IR::ValueDef::_get_abstract_base_values_skel}, ++ {"_set_supported_interfaces", &POA_IR::ValueDef::_set_supported_interfaces_skel}, ++ {"destroy", &POA_IR::ValueDef::destroy_skel}, ++ {"_get_def_kind", &POA_IR::ValueDef::_get_def_kind_skel}, ++ {"create_enum", &POA_IR::ValueDef::create_enum_skel}, ++ {"create_value", &POA_IR::ValueDef::create_value_skel}, ++ {"create_module", &POA_IR::ValueDef::create_module_skel}, ++ {"create_native", &POA_IR::ValueDef::create_native_skel}, ++ {"create_attribute", &POA_IR::ValueDef::create_attribute_skel}, ++ {"create_interface", &POA_IR::ValueDef::create_interface_skel}, ++ {"create_value_member", &POA_IR::ValueDef::create_value_member_skel}, ++ {"create_value_box", &POA_IR::ValueDef::create_value_box_skel}, ++ {"describe_contents", &POA_IR::ValueDef::describe_contents_skel}, ++ {"create_union", &POA_IR::ValueDef::create_union_skel}, ++ {"contents", &POA_IR::ValueDef::contents_skel}, ++ {"create_operation", &POA_IR::ValueDef::create_operation_skel}, ++ {"create_exception", &POA_IR::ValueDef::create_exception_skel}, ++ {"create_alias", &POA_IR::ValueDef::create_alias_skel}, ++ {"create_struct", &POA_IR::ValueDef::create_struct_skel}, ++ {"create_constant", &POA_IR::ValueDef::create_constant_skel}, ++ }; + +-CORBA::Boolean +-POA_IR::AttributeDef::TAO_ServerRequestInfo_IR_AttributeDef_type_get::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} ++ static const signed char lookup[] = ++ { ++ -1, -1, -7, -3, 4, 5, 6, -11, -2, -92, -1, 10, -13, -2, ++ -92, -88, -16, -2, 15, -88, -1, -1, -1, -1, 18, -19, -2, -87, ++ -24, -2, 21, 22, -1, 23, -26, -2, -93, -88, -28, -2, -31, -4, ++ -89, 30, -1, -90, -1, 35, 36, -1, -1, -1, -1, -1, -1, -1, ++ -1, -1, -1, -39, -2, 37, 38, -89, -41, -2, -87, -1, -1, 43, ++ -1, 44, 45, -1, -1, -1, -1, 46, 47, -48, -2, -87, 50, 51, ++ -1, 52, ++ }; + +-void +-POA_IR::AttributeDef::TAO_ServerRequestInfo_IR_AttributeDef_type_get::result (CORBA::TypeCode_ptr result) +-{ +- // Update the result. +- this->_result = result; +-} ++ if (len <= MAX_WORD_LENGTH && len >= MIN_WORD_LENGTH) ++ { ++ unsigned int key = hash (str, len); + +-POA_IR::AttributeDef::TAO_ServerRequestInfo_IR_AttributeDef_type_def_get::TAO_ServerRequestInfo_IR_AttributeDef_type_def_get ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::AttributeDef *tao_impl +- , +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl) +-{} ++ if (key <= MAX_HASH_VALUE && key >= MIN_HASH_VALUE) ++ { ++ int slot = lookup[key]; + +-Dynamic::ParameterList * +-POA_IR::AttributeDef::TAO_ServerRequestInfo_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; +-} ++ if (slot >= 0 && slot < MAX_HASH_VALUE) ++ { ++ const char *s = wordlist[slot].opname_; + +-Dynamic::ExceptionList * +-POA_IR::AttributeDef::TAO_ServerRequestInfo_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; +-} ++ if (*str == *s && !strncmp (str + 1, s + 1, len - 1)) ++ return &wordlist[slot]; ++ } ++ else if (slot < 0 && slot >= -MAX_HASH_VALUE) ++ return 0; ++ else ++ { ++ unsigned int offset = key + slot + (slot > 0 ? -MAX_HASH_VALUE : MAX_HASH_VALUE); ++ const class TAO_operation_db_entry *base = &wordlist[-lookup[offset]]; ++ const class TAO_operation_db_entry *ptr = base + -lookup[offset + 1]; + +-CORBA::Any * +-POA_IR::AttributeDef::TAO_ServerRequestInfo_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 (); ++ while (--ptr >= base) ++ if (*str == *ptr->opname_ && !strncmp (str + 1, ptr->opname_ + 1, len - 1)) ++ return ptr; ++ } ++ } ++ } ++ return 0; + } ++/* ending time is 11:23:11 */ ++static TAO_IR_ValueDef_Perfect_Hash_OpTable tao_IR_ValueDef_optable; ++ ++/////////////////////////////////////////////////////////////////////// ++// Strategized Proxy Broker Implementation ++// + +-char * +-POA_IR::AttributeDef::TAO_ServerRequestInfo_IR_AttributeDef_type_def_get::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++// Factory function Implementation. ++POA_IR::_TAO_ValueDef_Strategized_Proxy_Broker *POA_IR::_TAO_ValueDef_Strategized_Proxy_Broker::the_TAO_ValueDef_Strategized_Proxy_Broker (void) + { +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); ++ static POA_IR::_TAO_ValueDef_Strategized_Proxy_Broker strategized_proxy_broker; ++ return &strategized_proxy_broker; + } + +-CORBA::Boolean +-POA_IR::AttributeDef::TAO_ServerRequestInfo_IR_AttributeDef_type_def_get::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++POA_IR::_TAO_ValueDef_Strategized_Proxy_Broker::_TAO_ValueDef_Strategized_Proxy_Broker (void) + { +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); ++ for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) ++ this->proxy_cache_[i] = 0; ++ + } + +-void +-POA_IR::AttributeDef::TAO_ServerRequestInfo_IR_AttributeDef_type_def_get::result (IR::IDLType_ptr result) ++POA_IR::_TAO_ValueDef_Strategized_Proxy_Broker::~_TAO_ValueDef_Strategized_Proxy_Broker (void) + { +- // Update the result. +- this->_result = result; ++ for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) ++ delete this->proxy_cache_[i]; ++ + } + +-POA_IR::AttributeDef::TAO_ServerRequestInfo_IR_AttributeDef_type_def_set::TAO_ServerRequestInfo_IR_AttributeDef_type_def_set ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::AttributeDef *tao_impl +- , +- IR::IDLType_ptr type_def, +- CORBA::Environment & +_TAO_ValueDef_Proxy_Impl& - POA_IR::_TAO_ValueDef_Strategized_Proxy_Broker::select_proxy ( -- ::IR::ValueDef *object, ++POA_IR::_TAO_ValueDef_Strategized_Proxy_Broker::select_proxy ( + IR_ValueDef *object, - CORBA::Environment &ACE_TRY_ENV ++ CORBA::Environment &ACE_TRY_ENV ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- type_def_ (type_def) +-{} +- +-Dynamic::ParameterList * +-POA_IR::AttributeDef::TAO_ServerRequestInfo_IR_AttributeDef_type_def_set::arguments (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) { -@@ -31192,7 +31075,7 @@ - case TAO_ORB_Core::THRU_POA_STRATEGY: - ACE_NEW_THROW_EX ( - this->proxy_cache_[strategy], -- POA_IR::_TAO_ValueDef_ThruPOA_Proxy_Impl, +- // Generate the argument list on demand. +- Dynamic::ParameterList *parameter_list = +- TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); +- ACE_CHECK_RETURN (0); ++ TAO_ORB_Core::TAO_Collocation_Strategies strategy = ++ TAO_ORB_Core::collocation_strategy (object); + +- 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_; ++ if (this->proxy_cache_[strategy] != 0) ++ return *this->proxy_cache_[strategy]; + +- (*parameter_list)[length_type_def].mode = Dynamic::PARAM_IN; ++ this->create_proxy (strategy, ACE_TRY_ENV); ++ ACE_CHECK_RETURN (*this->proxy_cache_[strategy]); + +- return safe_parameter_list._retn (); +-} +- +-Dynamic::ExceptionList * +-POA_IR::AttributeDef::TAO_ServerRequestInfo_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 *this->proxy_cache_[strategy]; + +- return exception_list; + } + +-CORBA::Any * +-POA_IR::AttributeDef::TAO_ServerRequestInfo_IR_AttributeDef_type_def_set::result (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++void ++POA_IR::_TAO_ValueDef_Strategized_Proxy_Broker::create_proxy ( ++ TAO_ORB_Core::TAO_Collocation_Strategies strategy, ++ CORBA::Environment &ACE_TRY_ENV ++ ) + { +- // 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); ++ ACE_GUARD (TAO_SYNCH_MUTEX, guard, this->mutex_); + +- return result_any; +-} +- +-char * +-POA_IR::AttributeDef::TAO_ServerRequestInfo_IR_AttributeDef_type_def_set::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); ++ if (this->proxy_cache_[strategy] == 0) ++ { ++ switch (strategy) ++ { ++ case TAO_ORB_Core::THRU_POA_STRATEGY: ++ ACE_NEW_THROW_EX ( ++ this->proxy_cache_[strategy], + _TAO_ValueDef_ThruPOA_Proxy_Impl, - CORBA::NO_MEMORY () - ); - ACE_CHECK; -@@ -31202,7 +31085,7 @@ - default: - ACE_NEW_THROW_EX ( - this->proxy_cache_[strategy], -- ::IR::_TAO_ValueDef_Remote_Proxy_Impl, ++ CORBA::NO_MEMORY () ++ ); ++ ACE_CHECK; ++ break; ++ ++ case TAO_ORB_Core::REMOTE_STRATEGY: ++ default: ++ ACE_NEW_THROW_EX ( ++ this->proxy_cache_[strategy], + _TAO_ValueDef_Remote_Proxy_Impl, - CORBA::NO_MEMORY () - ); - ACE_CHECK; -@@ -31219,26 +31102,26 @@ - /////////////////////////////////////////////////////////////////////// ++ CORBA::NO_MEMORY () ++ ); ++ ACE_CHECK; ++ break; ++ ++ } ++ ++ } + } + +-CORBA::Boolean +-POA_IR::AttributeDef::TAO_ServerRequestInfo_IR_AttributeDef_type_def_set::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +-POA_IR::AttributeDef::TAO_ServerRequestInfo_IR_AttributeDef_mode_get::TAO_ServerRequestInfo_IR_AttributeDef_mode_get ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::AttributeDef *tao_impl +- , +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl) +-{} ++// ++// End Strategized Proxy Broker Implementation ++/////////////////////////////////////////////////////////////////////// + +-Dynamic::ParameterList * +-POA_IR::AttributeDef::TAO_ServerRequestInfo_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; +-} --IR::_TAO_ValueDef_Proxy_Broker * --IR__TAO_ValueDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) +-Dynamic::ExceptionList * +-POA_IR::AttributeDef::TAO_ServerRequestInfo_IR_AttributeDef_mode_get::exceptions (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +_TAO_ValueDef_Proxy_Broker * +_TAO_ValueDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) { - ACE_UNUSED_ARG (obj); - return ::POA_IR::_TAO_ValueDef_Strategized_Proxy_Broker::the_TAO_ValueDef_Strategized_Proxy_Broker(); +- // 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; ++ ACE_UNUSED_ARG (obj); ++ return ::POA_IR::_TAO_ValueDef_Strategized_Proxy_Broker::the_TAO_ValueDef_Strategized_Proxy_Broker(); } - int --IR__TAO_ValueDef_Proxy_Broker_Factory_Initializer (long _dummy_) +-CORBA::Any * +-POA_IR::AttributeDef::TAO_ServerRequestInfo_IR_AttributeDef_mode_get::result (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++int +_TAO_ValueDef_Proxy_Broker_Factory_Initializer (long _dummy_) { - ACE_UNUSED_ARG (_dummy_); +- // 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; ++ ACE_UNUSED_ARG (_dummy_); -- IR__TAO_ValueDef_Proxy_Broker_Factory_function_pointer = -- IR__TAO_ValueDef_Proxy_Broker_Factory_function; +- (*result_any) <<= this->_result; + _TAO_ValueDef_Proxy_Broker_Factory_function_pointer = + _TAO_ValueDef_Proxy_Broker_Factory_function; - return 0; +- return safe_result_any._retn (); ++ return 0; } --static int IR__TAO_ValueDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = -- IR__TAO_ValueDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, IR__TAO_ValueDef_Proxy_Broker_Factory_Initializer)); +-char * +-POA_IR::AttributeDef::TAO_ServerRequestInfo_IR_AttributeDef_mode_get::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +static int _TAO_ValueDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = + _TAO_ValueDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, _TAO_ValueDef_Proxy_Broker_Factory_Initializer)); +-CORBA::Boolean +-POA_IR::AttributeDef::TAO_ServerRequestInfo_IR_AttributeDef_mode_get::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} - /////////////////////////////////////////////////////////////////////// -@@ -31250,7 +31133,7 @@ +-void +-POA_IR::AttributeDef::TAO_ServerRequestInfo_IR_AttributeDef_mode_get::result (IR::AttributeMode result) +-{ +- // Update the result. +- this->_result = result; +-} ++/////////////////////////////////////////////////////////////////////// ++// ThruPOA Proxy Implementation ++// + +-POA_IR::AttributeDef::TAO_ServerRequestInfo_IR_AttributeDef_mode_set::TAO_ServerRequestInfo_IR_AttributeDef_mode_set ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::AttributeDef *tao_impl +- , +- IR::AttributeMode & mode, +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- mode_ (mode) ++POA_IR::_TAO_ValueDef_ThruPOA_Proxy_Impl::_TAO_ValueDef_ThruPOA_Proxy_Impl (void) + {} - // ThruPOA Implementation of the IDL interface methods +-Dynamic::ParameterList * +-POA_IR::AttributeDef::TAO_ServerRequestInfo_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 (); +-} ++POA_IR::_TAO_ValueDef_ThruPOA_Proxy_Impl::~_TAO_ValueDef_ThruPOA_Proxy_Impl (void) ++{} --IR::InterfaceDefSeq * POA_IR::_TAO_ValueDef_ThruPOA_Proxy_Impl::supported_interfaces ( -+IR_InterfaceDefSeq * POA_IR::_TAO_ValueDef_ThruPOA_Proxy_Impl::supported_interfaces ( - CORBA_Object *_collocated_tao_target_, - CORBA::Environment &ACE_TRY_ENV - ) -@@ -31258,7 +31141,7 @@ - CORBA::SystemException - )) - { -- IR::InterfaceDefSeq_var _tao_retval; +-Dynamic::ExceptionList * +-POA_IR::AttributeDef::TAO_ServerRequestInfo_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; +-} ++// ThruPOA Implementation of the IDL interface methods + +-CORBA::Any * +-POA_IR::AttributeDef::TAO_ServerRequestInfo_IR_AttributeDef_mode_set::result (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++IR::InterfaceDefSeq * POA_IR::_TAO_ValueDef_ThruPOA_Proxy_Impl::supported_interfaces ( ++ CORBA_Object *_collocated_tao_target_, ++ 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_InterfaceDefSeq_var _tao_retval; - ACE_UNUSED_ARG (_tao_retval); - TAO_Object_Adapter::Servant_Upcall servant_upcall ( - _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -31283,7 +31166,7 @@ ++ ACE_UNUSED_ARG (_tao_retval); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "supported_interfaces", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK_RETURN (0); ++ return ACE_reinterpret_cast ( ++ POA_IR::ValueDef_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/ValueDef:1.0" ++ ) ++ )->supported_interfaces ( ++ ACE_TRY_ENV ++ ); + } - void POA_IR::_TAO_ValueDef_ThruPOA_Proxy_Impl::supported_interfaces ( - CORBA_Object *_collocated_tao_target_, -- const IR::InterfaceDefSeq & supported_interfaces, +-char * +-POA_IR::AttributeDef::TAO_ServerRequestInfo_IR_AttributeDef_mode_set::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++void POA_IR::_TAO_ValueDef_ThruPOA_Proxy_Impl::supported_interfaces ( ++ CORBA_Object *_collocated_tao_target_, + const IR_InterfaceDefSeq & supported_interfaces, - CORBA::Environment &ACE_TRY_ENV - ) - ACE_THROW_SPEC (( -@@ -31313,7 +31196,7 @@ - return; ++ CORBA::Environment &ACE_TRY_ENV ++ ) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException ++ )) + { +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "supported_interfaces", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK; ++ ACE_reinterpret_cast ( ++ POA_IR::ValueDef_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/ValueDef:1.0" ++ ) ++ )->supported_interfaces ( ++ supported_interfaces, ++ ACE_TRY_ENV ++ ); ++ return; + } + +-CORBA::Boolean +-POA_IR::AttributeDef::TAO_ServerRequestInfo_IR_AttributeDef_mode_set::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++IR::InitializerSeq * POA_IR::_TAO_ValueDef_ThruPOA_Proxy_Impl::initializers ( ++ CORBA_Object *_collocated_tao_target_, ++ CORBA::Environment &ACE_TRY_ENV ++ ) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException ++ )) + { +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); ++ IR_InitializerSeq_var _tao_retval; ++ ACE_UNUSED_ARG (_tao_retval); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "initializers", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK_RETURN (0); ++ return ACE_reinterpret_cast ( ++ POA_IR::ValueDef_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/ValueDef:1.0" ++ ) ++ )->initializers ( ++ ACE_TRY_ENV ++ ); } +-#endif /* TAO_HAS_INTERCEPTORS */ +-class TAO_IR_OperationDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable +-{ +-private: +- unsigned int hash (const char *str, unsigned int len); +-public: +- const TAO_operation_db_entry * lookup (const char *str, unsigned int len); +-}; +-/* starting time is 16:31:12 */ +-/* C++ code produced by gperf version 2.8 (ACE version) */ +-/* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_OperationDef_Perfect_Hash_OpTable -N lookup */ +-unsigned int +-TAO_IR_OperationDef_Perfect_Hash_OpTable::hash (const char *str, unsigned int len) +-{ +- static const unsigned char asso_values[] = +- { +-#if defined (ACE_MVS) +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 0, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 0, +- 37, 37, 15, 0, 10, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 0, 5, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 0, 20, 37, 37, 37, 37, 10, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, +-#else +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 0, 37, 0, 37, 37, +- 15, 0, 10, 37, 37, 37, 37, 37, 37, 0, +- 5, 37, 37, 37, 37, 0, 20, 37, 37, 37, +- 37, 10, 37, 37, 37, 37, 37, 37, +-#endif /* ACE_MVS */ +- }; +- return len + asso_values[str[len - 1]] + asso_values[str[0]]; +-} +- +-const class TAO_operation_db_entry * +-TAO_IR_OperationDef_Perfect_Hash_OpTable::lookup (const char *str, unsigned int len) +-{ +- enum +- { +- TOTAL_KEYWORDS = 26, +- MIN_WORD_LENGTH = 4, +- MAX_WORD_LENGTH = 26, +- MIN_HASH_VALUE = 4, +- MAX_HASH_VALUE = 36, +- HASH_VALUE_RANGE = 33, +- DUPLICATES = 10 +- }; +- +- static const class TAO_operation_db_entry wordlist[] = +- { +- {"",0},{"",0},{"",0},{"",0}, +- {"move", &POA_IR::OperationDef::move_skel}, +- {"_is_a", &POA_IR::OperationDef::_is_a_skel}, +- {"_get_mode", &POA_IR::OperationDef::_get_mode_skel}, +- {"_set_name", &POA_IR::OperationDef::_set_name_skel}, +- {"_get_name", &POA_IR::OperationDef::_get_name_skel}, +- {"_set_mode", &POA_IR::OperationDef::_set_mode_skel}, +- {"_get_params", &POA_IR::OperationDef::_get_params_skel}, +- {"_set_params", &POA_IR::OperationDef::_set_params_skel}, +- {"_get_contexts", &POA_IR::OperationDef::_get_contexts_skel}, +- {"_set_contexts", &POA_IR::OperationDef::_set_contexts_skel}, +- {"_get_exceptions", &POA_IR::OperationDef::_get_exceptions_skel}, +- {"_set_exceptions", &POA_IR::OperationDef::_set_exceptions_skel}, +- {"_get_version", &POA_IR::OperationDef::_get_version_skel}, +- {"_set_version", &POA_IR::OperationDef::_set_version_skel}, +- {"_get_absolute_name", &POA_IR::OperationDef::_get_absolute_name_skel}, +- {"_get_defined_in", &POA_IR::OperationDef::_get_defined_in_skel}, +- {"_get_id", &POA_IR::OperationDef::_get_id_skel}, +- {"_set_id", &POA_IR::OperationDef::_set_id_skel}, +- {"describe", &POA_IR::OperationDef::describe_skel}, +- {"_get_result_def", &POA_IR::OperationDef::_get_result_def_skel}, +- {"_set_result_def", &POA_IR::OperationDef::_set_result_def_skel}, +- {"_get_def_kind", &POA_IR::OperationDef::_get_def_kind_skel}, +- {"_get_result", &POA_IR::OperationDef::_get_result_skel}, +- {"destroy", &POA_IR::OperationDef::destroy_skel}, +- {"_non_existent", &POA_IR::OperationDef::_non_existent_skel}, +- {"_get_containing_repository", &POA_IR::OperationDef::_get_containing_repository_skel}, +- }; +- +- if (len <= MAX_WORD_LENGTH && len >= MIN_WORD_LENGTH) +- { +- unsigned int key = hash (str, len); +- +- if (key <= MAX_HASH_VALUE && key >= MIN_HASH_VALUE) +- { +- { +- const class TAO_operation_db_entry *resword; +- +- switch (key) +- { +- case 4: +- resword = &wordlist[4]; break; +- case 5: +- resword = &wordlist[5]; break; +- case 9: +- resword = &wordlist[6]; +- if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; +- resword = &wordlist[7]; +- if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; +- resword = &wordlist[8]; +- if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; +- resword = &wordlist[9]; +- if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; +- return 0; +- case 11: +- resword = &wordlist[10]; +- if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; +- resword = &wordlist[11]; +- if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; +- return 0; +- case 13: +- resword = &wordlist[12]; +- if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; +- resword = &wordlist[13]; +- if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; +- return 0; +- case 15: +- resword = &wordlist[14]; +- if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; +- resword = &wordlist[15]; +- if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; +- return 0; +- case 17: +- resword = &wordlist[16]; +- if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; +- resword = &wordlist[17]; +- if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; +- return 0; +- case 18: +- resword = &wordlist[18]; break; +- case 20: +- resword = &wordlist[19]; break; +- case 22: +- resword = &wordlist[20]; +- if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; +- resword = &wordlist[21]; +- if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; +- return 0; +- case 23: +- resword = &wordlist[22]; break; +- case 25: +- resword = &wordlist[23]; +- if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; +- resword = &wordlist[24]; +- if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; +- return 0; +- case 28: +- resword = &wordlist[25]; break; +- case 31: +- resword = &wordlist[26]; break; +- case 32: +- resword = &wordlist[27]; break; +- case 33: +- resword = &wordlist[28]; break; +- case 36: +- resword = &wordlist[29]; break; +- default: return 0; +- } +- if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) +- return resword; +- return 0; +- } +- } +- } +- return 0; +-} +-/* ending time is 16:31:12 */ +-static TAO_IR_OperationDef_Perfect_Hash_OpTable tao_IR_OperationDef_optable; +- +- +-/////////////////////////////////////////////////////////////////////// +-// Strategized Proxy Broker Implementation +-// +- +-// Factory function Implementation. +-POA_IR::_TAO_OperationDef_Strategized_Proxy_Broker *POA_IR::_TAO_OperationDef_Strategized_Proxy_Broker::the_TAO_OperationDef_Strategized_Proxy_Broker (void) +-{ +- static POA_IR::_TAO_OperationDef_Strategized_Proxy_Broker strategized_proxy_broker; +- return &strategized_proxy_broker; +-} +- +-POA_IR::_TAO_OperationDef_Strategized_Proxy_Broker::_TAO_OperationDef_Strategized_Proxy_Broker (void) +-{ +- for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) +- this->proxy_cache_[i] = 0; +- +-} +- +-POA_IR::_TAO_OperationDef_Strategized_Proxy_Broker::~_TAO_OperationDef_Strategized_Proxy_Broker (void) +-{ +- for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) +- delete this->proxy_cache_[i]; +- +-} +- +-IR::_TAO_OperationDef_Proxy_Impl& +-POA_IR::_TAO_OperationDef_Strategized_Proxy_Broker::select_proxy ( +- ::IR::OperationDef *object, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- TAO_ORB_Core::TAO_Collocation_Strategies strategy = +- TAO_ORB_Core::collocation_strategy (object); +- +- if (this->proxy_cache_[strategy] != 0) +- return *this->proxy_cache_[strategy]; +- +- this->create_proxy (strategy, ACE_TRY_ENV); +- ACE_CHECK_RETURN (*this->proxy_cache_[strategy]); +- +- return *this->proxy_cache_[strategy]; +- +-} +- +-void +-POA_IR::_TAO_OperationDef_Strategized_Proxy_Broker::create_proxy ( +- TAO_ORB_Core::TAO_Collocation_Strategies strategy, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- ACE_GUARD (TAO_SYNCH_MUTEX, guard, this->mutex_); +- +- if (this->proxy_cache_[strategy] == 0) +- { +- switch (strategy) +- { +- case TAO_ORB_Core::THRU_POA_STRATEGY: +- ACE_NEW_THROW_EX ( +- this->proxy_cache_[strategy], +- POA_IR::_TAO_OperationDef_ThruPOA_Proxy_Impl, +- CORBA::NO_MEMORY () +- ); +- ACE_CHECK; +- break; +- +- case TAO_ORB_Core::REMOTE_STRATEGY: +- default: +- ACE_NEW_THROW_EX ( +- this->proxy_cache_[strategy], +- ::IR::_TAO_OperationDef_Remote_Proxy_Impl, +- CORBA::NO_MEMORY () +- ); +- ACE_CHECK; +- break; +- +- } +- +- } +-} +- +- +-// +-// End Strategized Proxy Broker Implementation +-/////////////////////////////////////////////////////////////////////// +- +- +-IR::_TAO_OperationDef_Proxy_Broker * +-IR__TAO_OperationDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) +-{ +- ACE_UNUSED_ARG (obj); +- return ::POA_IR::_TAO_OperationDef_Strategized_Proxy_Broker::the_TAO_OperationDef_Strategized_Proxy_Broker(); +-} +- +-int +-IR__TAO_OperationDef_Proxy_Broker_Factory_Initializer (long _dummy_) +-{ +- ACE_UNUSED_ARG (_dummy_); +- +- IR__TAO_OperationDef_Proxy_Broker_Factory_function_pointer = +- IR__TAO_OperationDef_Proxy_Broker_Factory_function; +- +- return 0; +-} +- +-static int IR__TAO_OperationDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = +- IR__TAO_OperationDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, IR__TAO_OperationDef_Proxy_Broker_Factory_Initializer)); +- +- +-/////////////////////////////////////////////////////////////////////// +-// ThruPOA Proxy Implementation +-// +- +-POA_IR::_TAO_OperationDef_ThruPOA_Proxy_Impl::_TAO_OperationDef_ThruPOA_Proxy_Impl (void) +-{} +- +-// ThruPOA Implementation of the IDL interface methods +- +-CORBA::TypeCode_ptr POA_IR::_TAO_OperationDef_ThruPOA_Proxy_Impl::result ( +- CORBA_Object *_collocated_tao_target_, +- CORBA::Environment &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) +-{ +- CORBA::TypeCode_var _tao_retval; +- ACE_UNUSED_ARG (_tao_retval); +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "result", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK_RETURN (0); +- return ACE_reinterpret_cast ( +- POA_IR::OperationDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/OperationDef:1.0" +- ) +- )->result ( +- ACE_TRY_ENV +- ); +-} +- +-IR::IDLType_ptr POA_IR::_TAO_OperationDef_ThruPOA_Proxy_Impl::result_def ( +- CORBA_Object *_collocated_tao_target_, +- CORBA::Environment &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) +-{ +- IR::IDLType_var _tao_retval; +- ACE_UNUSED_ARG (_tao_retval); +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "result_def", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK_RETURN (0); +- return ACE_reinterpret_cast ( +- POA_IR::OperationDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/OperationDef:1.0" +- ) +- )->result_def ( +- ACE_TRY_ENV +- ); +-} +- +-void POA_IR::_TAO_OperationDef_ThruPOA_Proxy_Impl::result_def ( +- CORBA_Object *_collocated_tao_target_, +- IR::IDLType_ptr result_def, +- CORBA::Environment &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) +-{ +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "result_def", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK; +- ACE_reinterpret_cast ( +- POA_IR::OperationDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/OperationDef:1.0" +- ) +- )->result_def ( +- result_def, +- ACE_TRY_ENV +- ); +- return; +-} +- +-IR::ParDescriptionSeq * POA_IR::_TAO_OperationDef_ThruPOA_Proxy_Impl::params ( +- CORBA_Object *_collocated_tao_target_, +- CORBA::Environment &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) +-{ +- IR::ParDescriptionSeq_var _tao_retval; +- ACE_UNUSED_ARG (_tao_retval); +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "params", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK_RETURN (0); +- return ACE_reinterpret_cast ( +- POA_IR::OperationDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/OperationDef:1.0" +- ) +- )->params ( +- ACE_TRY_ENV +- ); +-} +- +-void POA_IR::_TAO_OperationDef_ThruPOA_Proxy_Impl::params ( +- CORBA_Object *_collocated_tao_target_, +- const IR::ParDescriptionSeq & params, +- CORBA::Environment &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) +-{ +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "params", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK; +- ACE_reinterpret_cast ( +- POA_IR::OperationDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/OperationDef:1.0" +- ) +- )->params ( +- params, +- ACE_TRY_ENV +- ); +- return; +-} +- +-IR::OperationMode POA_IR::_TAO_OperationDef_ThruPOA_Proxy_Impl::mode ( +- CORBA_Object *_collocated_tao_target_, +- CORBA::Environment &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) +-{ +- IR::OperationMode _tao_retval; +- ACE_UNUSED_ARG (_tao_retval); +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "mode", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK_RETURN (_tao_retval); +- return ACE_reinterpret_cast ( +- POA_IR::OperationDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/OperationDef:1.0" +- ) +- )->mode ( +- ACE_TRY_ENV +- ); +-} +- +-void POA_IR::_TAO_OperationDef_ThruPOA_Proxy_Impl::mode ( +- CORBA_Object *_collocated_tao_target_, +- IR::OperationMode mode, +- CORBA::Environment &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) +-{ +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "mode", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK; +- ACE_reinterpret_cast ( +- POA_IR::OperationDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/OperationDef:1.0" +- ) +- )->mode ( +- mode, +- ACE_TRY_ENV +- ); +- return; +-} +- +-IR::ContextIdSeq * POA_IR::_TAO_OperationDef_ThruPOA_Proxy_Impl::contexts ( +- CORBA_Object *_collocated_tao_target_, +- CORBA::Environment &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) +-{ +- IR::ContextIdSeq_var _tao_retval; +- ACE_UNUSED_ARG (_tao_retval); +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "contexts", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK_RETURN (0); +- return ACE_reinterpret_cast ( +- POA_IR::OperationDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/OperationDef:1.0" +- ) +- )->contexts ( +- ACE_TRY_ENV +- ); +-} +- +-void POA_IR::_TAO_OperationDef_ThruPOA_Proxy_Impl::contexts ( +- CORBA_Object *_collocated_tao_target_, +- const IR::ContextIdSeq & contexts, +- CORBA::Environment &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) +-{ +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "contexts", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK; +- ACE_reinterpret_cast ( +- POA_IR::OperationDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/OperationDef:1.0" +- ) +- )->contexts ( +- contexts, +- ACE_TRY_ENV +- ); +- return; +-} +- +-IR::ExceptionDefSeq * POA_IR::_TAO_OperationDef_ThruPOA_Proxy_Impl::exceptions ( +- CORBA_Object *_collocated_tao_target_, +- CORBA::Environment &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) +-{ +- IR::ExceptionDefSeq_var _tao_retval; +- ACE_UNUSED_ARG (_tao_retval); +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "exceptions", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK_RETURN (0); +- return ACE_reinterpret_cast ( +- POA_IR::OperationDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/OperationDef:1.0" +- ) +- )->exceptions ( +- ACE_TRY_ENV +- ); +-} +- +-void POA_IR::_TAO_OperationDef_ThruPOA_Proxy_Impl::exceptions ( +- CORBA_Object *_collocated_tao_target_, +- const IR::ExceptionDefSeq & exceptions, +- CORBA::Environment &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) +-{ +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "exceptions", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK; +- ACE_reinterpret_cast ( +- POA_IR::OperationDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/OperationDef:1.0" +- ) +- )->exceptions ( +- exceptions, +- ACE_TRY_ENV +- ); +- return; +-} +- +-// +-// End ThruPOA Proxy Implementation +-/////////////////////////////////////////////////////////////////////// +- +-// skeleton constructor +-POA_IR::OperationDef::OperationDef (void) +-{ +- this->optable_ = &tao_IR_OperationDef_optable; +-} +- +-// copy ctor +-POA_IR::OperationDef::OperationDef (const OperationDef& rhs) +- : ACE_NESTED_CLASS (POA_IR,Contained) (rhs), +- ACE_NESTED_CLASS (POA_CORBA,IRObject) (rhs), +- TAO_ServantBase (rhs) +-{} +- +-// skeleton destructor +-POA_IR::OperationDef::~OperationDef (void) +-{ +-} +- +-void POA_IR::OperationDef::_get_result_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- POA_IR::OperationDef *_tao_impl = (POA_IR::OperationDef *)_tao_object_reference; +- +- CORBA::TypeCode_var _tao_retval; +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::OperationDef::TAO_ServerRequestInfo_IR_OperationDef_result_get ri ( +- _tao_server_request, +- _tao_impl +- , +- ACE_TRY_ENV +- ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->result ( +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- CORBA::TypeCode_ptr _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << _tao_retval.in ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- +-} +- +-void POA_IR::OperationDef::_get_result_def_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- POA_IR::OperationDef *_tao_impl = (POA_IR::OperationDef *)_tao_object_reference; +- +- IR::IDLType_var _tao_retval; +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::OperationDef::TAO_ServerRequestInfo_IR_OperationDef_result_def_get ri ( +- _tao_server_request, +- _tao_impl +- , +- ACE_TRY_ENV +- ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->result_def ( +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::IDLType_ptr _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << _tao_retval.in ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- +-} +- +-void POA_IR::OperationDef::_set_result_def_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::OperationDef *_tao_impl = (POA_IR::OperationDef *)_tao_object_reference; +- +-_tao_server_request.argument_flag (0); +- IR::IDLType_var result_def; +- if (!( +- (_tao_in >> result_def.out ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::OperationDef::TAO_ServerRequestInfo_IR_OperationDef_result_def_set ri ( +- _tao_server_request, +- _tao_impl +- , +- result_def.in (), +- ACE_TRY_ENV +- ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- +- _tao_impl->result_def ( +- result_def.in (), +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +-} +- +-void POA_IR::OperationDef::_get_params_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- POA_IR::OperationDef *_tao_impl = (POA_IR::OperationDef *)_tao_object_reference; +- +- IR::ParDescriptionSeq_var _tao_retval; +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::OperationDef::TAO_ServerRequestInfo_IR_OperationDef_params_get ri ( +- _tao_server_request, +- _tao_impl +- , +- ACE_TRY_ENV +- ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->params ( +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::ParDescriptionSeq * _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << _tao_retval.in ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- +-} +- +-void POA_IR::OperationDef::_set_params_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::OperationDef *_tao_impl = (POA_IR::OperationDef *)_tao_object_reference; +- +-_tao_server_request.argument_flag (0); +- IR::ParDescriptionSeq params; +- if (!( +- (_tao_in >> params) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::OperationDef::TAO_ServerRequestInfo_IR_OperationDef_params_set ri ( +- _tao_server_request, +- _tao_impl +- , +- params, +- ACE_TRY_ENV +- ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- +- _tao_impl->params ( +- params, +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +-} +- +-void POA_IR::OperationDef::_get_mode_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- POA_IR::OperationDef *_tao_impl = (POA_IR::OperationDef *)_tao_object_reference; +- +- IR::OperationMode _tao_retval; +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::OperationDef::TAO_ServerRequestInfo_IR_OperationDef_mode_get ri ( +- _tao_server_request, +- _tao_impl +- , +- ACE_TRY_ENV +- ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->mode ( +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::OperationMode _tao_retval_info = _tao_retval; +- ri.result (_tao_retval_info); +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << _tao_retval) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- +-} +- +-void POA_IR::OperationDef::_set_mode_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::OperationDef *_tao_impl = (POA_IR::OperationDef *)_tao_object_reference; +- +-_tao_server_request.argument_flag (0); +- IR::OperationMode mode; +- if (!( +- (_tao_in >> mode) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::OperationDef::TAO_ServerRequestInfo_IR_OperationDef_mode_set ri ( +- _tao_server_request, +- _tao_impl +- , +- mode, +- ACE_TRY_ENV +- ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- +- _tao_impl->mode ( +- mode, +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +-} +- +-void POA_IR::OperationDef::_get_contexts_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- POA_IR::OperationDef *_tao_impl = (POA_IR::OperationDef *)_tao_object_reference; +- +- IR::ContextIdSeq_var _tao_retval; +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::OperationDef::TAO_ServerRequestInfo_IR_OperationDef_contexts_get ri ( +- _tao_server_request, +- _tao_impl +- , +- ACE_TRY_ENV +- ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->contexts ( +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::ContextIdSeq * _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << _tao_retval.in ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- +-} +- +-void POA_IR::OperationDef::_set_contexts_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::OperationDef *_tao_impl = (POA_IR::OperationDef *)_tao_object_reference; +- +-_tao_server_request.argument_flag (0); +- IR::ContextIdSeq contexts; +- if (!( +- (_tao_in >> contexts) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::OperationDef::TAO_ServerRequestInfo_IR_OperationDef_contexts_set ri ( +- _tao_server_request, +- _tao_impl +- , +- contexts, +- ACE_TRY_ENV +- ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- +- _tao_impl->contexts ( +- contexts, +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +-} +- +-void POA_IR::OperationDef::_get_exceptions_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- POA_IR::OperationDef *_tao_impl = (POA_IR::OperationDef *)_tao_object_reference; +- +- IR::ExceptionDefSeq_var _tao_retval; +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::OperationDef::TAO_ServerRequestInfo_IR_OperationDef_exceptions_get ri ( +- _tao_server_request, +- _tao_impl +- , +- ACE_TRY_ENV +- ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->exceptions ( +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::ExceptionDefSeq * _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << _tao_retval.in ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- +-} +- +-void POA_IR::OperationDef::_set_exceptions_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::OperationDef *_tao_impl = (POA_IR::OperationDef *)_tao_object_reference; +- +-_tao_server_request.argument_flag (0); +- IR::ExceptionDefSeq exceptions; +- if (!( +- (_tao_in >> exceptions) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::OperationDef::TAO_ServerRequestInfo_IR_OperationDef_exceptions_set ri ( +- _tao_server_request, +- _tao_impl +- , +- exceptions, +- ACE_TRY_ENV +- ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- +- _tao_impl->exceptions ( +- exceptions, +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +-} +- +-void POA_IR::OperationDef::_is_a_skel ( +- TAO_ServerRequest &_tao_server_request, +- void * _tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::OperationDef *_tao_impl = (POA_IR::OperationDef *) _tao_object_reference; +- CORBA::Boolean _tao_retval = 0; +- CORBA::String_var value; +- if (!(_tao_in >> value.out ())) +- ACE_THROW (CORBA::MARSHAL ()); +- +- _tao_retval = _tao_impl->_is_a (value.in (), ACE_TRY_ENV); +- ACE_CHECK; +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) +- ACE_THROW (CORBA::MARSHAL ()); +-} +- +-void POA_IR::OperationDef::_non_existent_skel ( +- TAO_ServerRequest &_tao_server_request, +- void * _tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- POA_IR::OperationDef *_tao_impl = (POA_IR::OperationDef *) _tao_object_reference; +- CORBA::Boolean _tao_retval = _tao_impl->_non_existent (ACE_TRY_ENV); +- ACE_CHECK; +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) +- ACE_THROW (CORBA::MARSHAL ()); +-} +- +-CORBA::Boolean POA_IR::OperationDef::_is_a ( +- const char* value, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- if ( +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/OperationDef:1.0")) || +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/Contained:1.0")) || +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/CORBA/IRObject:1.0")) || +- (!ACE_OS::strcmp ((char *)value, CORBA::_tc_Object->id (ACE_TRY_ENV)))) +- return 1; +- else +- return 0; +-} +- +-void* POA_IR::OperationDef::_downcast ( +- const char* logical_type_id +- ) +-{ +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/OperationDef:1.0") == 0) +- return ACE_static_cast (POA_IR::OperationDef_ptr, this); +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Contained:1.0") == 0) +- return ACE_static_cast (POA_IR::Contained_ptr, this); +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/IRObject:1.0") == 0) +- return ACE_static_cast (POA_CORBA::IRObject_ptr, this); +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/Object:1.0") == 0) +- return ACE_static_cast(PortableServer::Servant, this); +- return 0; +-} +- +-void POA_IR::OperationDef::_dispatch (TAO_ServerRequest &req, void *context, CORBA::Environment &ACE_TRY_ENV) +-{ +- this->synchronous_upcall_dispatch(req, context, this, ACE_TRY_ENV); +-} +- +-const char* POA_IR::OperationDef::_interface_repository_id (void) const +-{ +- return "IDL:omg.org/IR/OperationDef:1.0"; +-} +- +-IR::OperationDef* +-POA_IR::OperationDef::_this (CORBA_Environment &ACE_TRY_ENV) +-{ +- TAO_Stub *stub = this->_create_stub (ACE_TRY_ENV); +- ACE_CHECK_RETURN (0); +- +- CORBA::Object_ptr tmp = CORBA::Object::_nil (); +- +- if (stub->servant_orb_var ()->orb_core ()->optimize_collocation_objects ()) +- ACE_NEW_RETURN (tmp, CORBA::Object (stub, 1, this), 0); +- else +- ACE_NEW_RETURN (tmp, CORBA::Object (stub, 0, this), 0); +- +- CORBA::Object_var obj = tmp; +- return ::IR::OperationDef::_unchecked_narrow (obj.in ()); +-} +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +-POA_IR::OperationDef::TAO_ServerRequestInfo_IR_OperationDef_result_get::TAO_ServerRequestInfo_IR_OperationDef_result_get ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::OperationDef *tao_impl +- , +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl) +-{} +- +-Dynamic::ParameterList * +-POA_IR::OperationDef::TAO_ServerRequestInfo_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 * +-POA_IR::OperationDef::TAO_ServerRequestInfo_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 * +-POA_IR::OperationDef::TAO_ServerRequestInfo_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 (); +-} +- +-char * +-POA_IR::OperationDef::TAO_ServerRequestInfo_IR_OperationDef_result_get::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::OperationDef::TAO_ServerRequestInfo_IR_OperationDef_result_get::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-void +-POA_IR::OperationDef::TAO_ServerRequestInfo_IR_OperationDef_result_get::result (CORBA::TypeCode_ptr result) +-{ +- // Update the result. +- this->_result = result; +-} +- +-POA_IR::OperationDef::TAO_ServerRequestInfo_IR_OperationDef_result_def_get::TAO_ServerRequestInfo_IR_OperationDef_result_def_get ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::OperationDef *tao_impl +- , +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl) +-{} +- +-Dynamic::ParameterList * +-POA_IR::OperationDef::TAO_ServerRequestInfo_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 * +-POA_IR::OperationDef::TAO_ServerRequestInfo_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 * +-POA_IR::OperationDef::TAO_ServerRequestInfo_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 (); +-} +- +-char * +-POA_IR::OperationDef::TAO_ServerRequestInfo_IR_OperationDef_result_def_get::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::OperationDef::TAO_ServerRequestInfo_IR_OperationDef_result_def_get::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-void +-POA_IR::OperationDef::TAO_ServerRequestInfo_IR_OperationDef_result_def_get::result (IR::IDLType_ptr result) +-{ +- // Update the result. +- this->_result = result; +-} +- +-POA_IR::OperationDef::TAO_ServerRequestInfo_IR_OperationDef_result_def_set::TAO_ServerRequestInfo_IR_OperationDef_result_def_set ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::OperationDef *tao_impl +- , +- IR::IDLType_ptr result_def, +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- result_def_ (result_def) +-{} +- +-Dynamic::ParameterList * +-POA_IR::OperationDef::TAO_ServerRequestInfo_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 * +-POA_IR::OperationDef::TAO_ServerRequestInfo_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 * +-POA_IR::OperationDef::TAO_ServerRequestInfo_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; +-} +- +-char * +-POA_IR::OperationDef::TAO_ServerRequestInfo_IR_OperationDef_result_def_set::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::OperationDef::TAO_ServerRequestInfo_IR_OperationDef_result_def_set::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-POA_IR::OperationDef::TAO_ServerRequestInfo_IR_OperationDef_params_get::TAO_ServerRequestInfo_IR_OperationDef_params_get ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::OperationDef *tao_impl +- , +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl) +-{} +- +-Dynamic::ParameterList * +-POA_IR::OperationDef::TAO_ServerRequestInfo_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 * +-POA_IR::OperationDef::TAO_ServerRequestInfo_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 * +-POA_IR::OperationDef::TAO_ServerRequestInfo_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 (); +-} +- +-char * +-POA_IR::OperationDef::TAO_ServerRequestInfo_IR_OperationDef_params_get::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::OperationDef::TAO_ServerRequestInfo_IR_OperationDef_params_get::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-void +-POA_IR::OperationDef::TAO_ServerRequestInfo_IR_OperationDef_params_get::result (IR::ParDescriptionSeq * result) +-{ +- // Update the result. +- this->_result = result; +-} +- +-POA_IR::OperationDef::TAO_ServerRequestInfo_IR_OperationDef_params_set::TAO_ServerRequestInfo_IR_OperationDef_params_set ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::OperationDef *tao_impl +- , +- const IR::ParDescriptionSeq & params, +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- params_ (params) +-{} +- +-Dynamic::ParameterList * +-POA_IR::OperationDef::TAO_ServerRequestInfo_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 * +-POA_IR::OperationDef::TAO_ServerRequestInfo_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 * +-POA_IR::OperationDef::TAO_ServerRequestInfo_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; +-} +- +-char * +-POA_IR::OperationDef::TAO_ServerRequestInfo_IR_OperationDef_params_set::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::OperationDef::TAO_ServerRequestInfo_IR_OperationDef_params_set::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-POA_IR::OperationDef::TAO_ServerRequestInfo_IR_OperationDef_mode_get::TAO_ServerRequestInfo_IR_OperationDef_mode_get ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::OperationDef *tao_impl +- , +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl) +-{} +- +-Dynamic::ParameterList * +-POA_IR::OperationDef::TAO_ServerRequestInfo_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 * +-POA_IR::OperationDef::TAO_ServerRequestInfo_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 * +-POA_IR::OperationDef::TAO_ServerRequestInfo_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 (); +-} +- +-char * +-POA_IR::OperationDef::TAO_ServerRequestInfo_IR_OperationDef_mode_get::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::OperationDef::TAO_ServerRequestInfo_IR_OperationDef_mode_get::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-void +-POA_IR::OperationDef::TAO_ServerRequestInfo_IR_OperationDef_mode_get::result (IR::OperationMode result) +-{ +- // Update the result. +- this->_result = result; +-} +- +-POA_IR::OperationDef::TAO_ServerRequestInfo_IR_OperationDef_mode_set::TAO_ServerRequestInfo_IR_OperationDef_mode_set ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::OperationDef *tao_impl +- , +- IR::OperationMode & mode, +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- mode_ (mode) +-{} +- +-Dynamic::ParameterList * +-POA_IR::OperationDef::TAO_ServerRequestInfo_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 * +-POA_IR::OperationDef::TAO_ServerRequestInfo_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 * +-POA_IR::OperationDef::TAO_ServerRequestInfo_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; +-} +- +-char * +-POA_IR::OperationDef::TAO_ServerRequestInfo_IR_OperationDef_mode_set::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::OperationDef::TAO_ServerRequestInfo_IR_OperationDef_mode_set::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-POA_IR::OperationDef::TAO_ServerRequestInfo_IR_OperationDef_contexts_get::TAO_ServerRequestInfo_IR_OperationDef_contexts_get ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::OperationDef *tao_impl +- , +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl) +-{} +- +-Dynamic::ParameterList * +-POA_IR::OperationDef::TAO_ServerRequestInfo_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 * +-POA_IR::OperationDef::TAO_ServerRequestInfo_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 * +-POA_IR::OperationDef::TAO_ServerRequestInfo_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 (); +-} +- +-char * +-POA_IR::OperationDef::TAO_ServerRequestInfo_IR_OperationDef_contexts_get::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::OperationDef::TAO_ServerRequestInfo_IR_OperationDef_contexts_get::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-void +-POA_IR::OperationDef::TAO_ServerRequestInfo_IR_OperationDef_contexts_get::result (IR::ContextIdSeq * result) +-{ +- // Update the result. +- this->_result = result; +-} +- +-POA_IR::OperationDef::TAO_ServerRequestInfo_IR_OperationDef_contexts_set::TAO_ServerRequestInfo_IR_OperationDef_contexts_set ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::OperationDef *tao_impl +- , +- const IR::ContextIdSeq & contexts, +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- contexts_ (contexts) +-{} +- +-Dynamic::ParameterList * +-POA_IR::OperationDef::TAO_ServerRequestInfo_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 * +-POA_IR::OperationDef::TAO_ServerRequestInfo_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 * +-POA_IR::OperationDef::TAO_ServerRequestInfo_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; +-} +- +-char * +-POA_IR::OperationDef::TAO_ServerRequestInfo_IR_OperationDef_contexts_set::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::OperationDef::TAO_ServerRequestInfo_IR_OperationDef_contexts_set::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-POA_IR::OperationDef::TAO_ServerRequestInfo_IR_OperationDef_exceptions_get::TAO_ServerRequestInfo_IR_OperationDef_exceptions_get ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::OperationDef *tao_impl +- , +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl) +-{} +- +-Dynamic::ParameterList * +-POA_IR::OperationDef::TAO_ServerRequestInfo_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 * +-POA_IR::OperationDef::TAO_ServerRequestInfo_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 * +-POA_IR::OperationDef::TAO_ServerRequestInfo_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 (); +-} +- +-char * +-POA_IR::OperationDef::TAO_ServerRequestInfo_IR_OperationDef_exceptions_get::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::OperationDef::TAO_ServerRequestInfo_IR_OperationDef_exceptions_get::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-void +-POA_IR::OperationDef::TAO_ServerRequestInfo_IR_OperationDef_exceptions_get::result (IR::ExceptionDefSeq * result) +-{ +- // Update the result. +- this->_result = result; +-} +- +-POA_IR::OperationDef::TAO_ServerRequestInfo_IR_OperationDef_exceptions_set::TAO_ServerRequestInfo_IR_OperationDef_exceptions_set ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::OperationDef *tao_impl +- , +- const IR::ExceptionDefSeq & exceptions, +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- exceptions_ (exceptions) +-{} +- +-Dynamic::ParameterList * +-POA_IR::OperationDef::TAO_ServerRequestInfo_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 * +-POA_IR::OperationDef::TAO_ServerRequestInfo_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 * +-POA_IR::OperationDef::TAO_ServerRequestInfo_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; +-} +- +-char * +-POA_IR::OperationDef::TAO_ServerRequestInfo_IR_OperationDef_exceptions_set::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::OperationDef::TAO_ServerRequestInfo_IR_OperationDef_exceptions_set::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-#endif /* TAO_HAS_INTERCEPTORS */ +-class TAO_IR_InterfaceDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable +-{ +-private: +- unsigned int hash (const char *str, unsigned int len); +-public: +- const TAO_operation_db_entry * lookup (const char *str, unsigned int len); +-}; +-/* starting time is 16:31:12 */ +-/* C++ code produced by gperf version 2.8 (ACE version) */ +-/* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_InterfaceDef_Perfect_Hash_OpTable -N lookup */ +-unsigned int +-TAO_IR_InterfaceDef_Perfect_Hash_OpTable::hash (const char *str, unsigned int len) +-{ +- static const unsigned char asso_values[] = +- { +-#if defined (ACE_MVS) +- 66, 66, 66, 66, 66, 66, 66, 66, 66, 66, +- 66, 66, 66, 66, 66, 66, 66, 66, 66, 66, +- 66, 66, 66, 66, 66, 66, 66, 66, 66, 66, +- 66, 66, 66, 66, 66, 66, 66, 66, 66, 66, +- 66, 66, 66, 66, 66, 66, 66, 66, 66, 66, +- 66, 66, 66, 66, 66, 66, 66, 66, 66, 66, +- 66, 66, 66, 66, 66, 66, 66, 66, 66, 66, +- 66, 66, 66, 66, 66, 66, 66, 66, 66, 66, +- 66, 66, 66, 66, 66, 66, 66, 66, 66, 66, +- 66, 66, 66, 66, 66, 66, 66, 66, 66, 66, +- 66, 66, 66, 66, 66, 66, 66, 66, 66, 0, +- 66, 66, 66, 66, 66, 66, 66, 66, 66, 66, +- 66, 66, 66, 66, 66, 66, 66, 66, 66, 0, +- 66, 20, 8, 0, 66, 66, 66, 10, 66, 66, +- 66, 66, 66, 66, 66, 66, 66, 0, 0, 5, +- 66, 0, 66, 66, 66, 66, 66, 66, 66, 66, +- 66, 66, 10, 30, 66, 66, 66, 20, 25, 66, +- 66, 66, 66, 66, 66, 66, 66, 66, 66, 66, +- 66, 66, 66, 66, 66, 66, 66, 66, 66, 66, +- 66, 66, 66, 66, 66, 66, 66, 66, 66, 66, +- 66, 66, 66, 66, 66, 66, 66, 66, 66, 66, +- 66, 66, 66, 66, 66, 66, 66, 66, 66, 66, +- 66, 66, 66, 66, 66, 66, 66, 66, 66, 66, +- 66, 66, 66, 66, 66, 66, 66, 66, 66, 66, +- 66, 66, 66, 66, 66, 66, 66, 66, 66, 66, +- 66, 66, 66, 66, 66, 66, +-#else +- 66, 66, 66, 66, 66, 66, 66, 66, 66, 66, +- 66, 66, 66, 66, 66, 66, 66, 66, 66, 66, +- 66, 66, 66, 66, 66, 66, 66, 66, 66, 66, +- 66, 66, 66, 66, 66, 66, 66, 66, 66, 66, +- 66, 66, 66, 66, 66, 66, 66, 66, 66, 66, +- 66, 66, 66, 66, 66, 66, 66, 66, 66, 66, +- 66, 66, 66, 66, 66, 66, 66, 66, 66, 66, +- 66, 66, 66, 66, 66, 66, 66, 66, 66, 66, +- 66, 66, 66, 66, 66, 66, 66, 66, 66, 66, +- 66, 66, 66, 66, 66, 0, 66, 0, 66, 20, +- 8, 0, 66, 66, 66, 10, 66, 66, 0, 0, +- 5, 66, 0, 66, 66, 10, 30, 66, 66, 66, +- 20, 25, 66, 66, 66, 66, 66, 66, +-#endif /* ACE_MVS */ +- }; +- return len + asso_values[str[len - 1]] + asso_values[str[0]]; +-} +- +-const class TAO_operation_db_entry * +-TAO_IR_InterfaceDef_Perfect_Hash_OpTable::lookup (const char *str, unsigned int len) +-{ +- enum +- { +- TOTAL_KEYWORDS = 40, +- MIN_WORD_LENGTH = 4, +- MAX_WORD_LENGTH = 26, +- MIN_HASH_VALUE = 4, +- MAX_HASH_VALUE = 65, +- HASH_VALUE_RANGE = 62, +- DUPLICATES = 11 +- }; +- +- static const class TAO_operation_db_entry wordlist[] = +- { +- {"",0},{"",0},{"",0},{"",0}, +- {"move", &POA_IR::InterfaceDef::move_skel}, +- {"_is_a", &POA_IR::InterfaceDef::_is_a_skel}, +- {"lookup", &POA_IR::InterfaceDef::lookup_skel}, +- {"_get_name", &POA_IR::InterfaceDef::_get_name_skel}, +- {"_get_type", &POA_IR::InterfaceDef::_get_type_skel}, +- {"_set_name", &POA_IR::InterfaceDef::_set_name_skel}, +- {"lookup_name", &POA_IR::InterfaceDef::lookup_name_skel}, +- {"_get_is_local", &POA_IR::InterfaceDef::_get_is_local_skel}, +- {"_set_is_local", &POA_IR::InterfaceDef::_set_is_local_skel}, +- {"is_a", &POA_IR::InterfaceDef::is_a_skel}, +- {"_get_id", &POA_IR::InterfaceDef::_get_id_skel}, +- {"_set_id", &POA_IR::InterfaceDef::_set_id_skel}, +- {"describe", &POA_IR::InterfaceDef::describe_skel}, +- {"_get_version", &POA_IR::InterfaceDef::_get_version_skel}, +- {"_set_version", &POA_IR::InterfaceDef::_set_version_skel}, +- {"_get_absolute_name", &POA_IR::InterfaceDef::_get_absolute_name_skel}, +- {"_get_defined_in", &POA_IR::InterfaceDef::_get_defined_in_skel}, +- {"_get_def_kind", &POA_IR::InterfaceDef::_get_def_kind_skel}, +- {"_get_base_interfaces", &POA_IR::InterfaceDef::_get_base_interfaces_skel}, +- {"_set_base_interfaces", &POA_IR::InterfaceDef::_set_base_interfaces_skel}, +- {"create_enum", &POA_IR::InterfaceDef::create_enum_skel}, +- {"create_value", &POA_IR::InterfaceDef::create_value_skel}, +- {"create_module", &POA_IR::InterfaceDef::create_module_skel}, +- {"create_native", &POA_IR::InterfaceDef::create_native_skel}, +- {"describe_contents", &POA_IR::InterfaceDef::describe_contents_skel}, +- {"create_attribute", &POA_IR::InterfaceDef::create_attribute_skel}, +- {"create_interface", &POA_IR::InterfaceDef::create_interface_skel}, +- {"create_union", &POA_IR::InterfaceDef::create_union_skel}, +- {"contents", &POA_IR::InterfaceDef::contents_skel}, +- {"destroy", &POA_IR::InterfaceDef::destroy_skel}, +- {"create_operation", &POA_IR::InterfaceDef::create_operation_skel}, +- {"create_exception", &POA_IR::InterfaceDef::create_exception_skel}, +- {"create_alias", &POA_IR::InterfaceDef::create_alias_skel}, +- {"_non_existent", &POA_IR::InterfaceDef::_non_existent_skel}, +- {"_get_is_abstract", &POA_IR::InterfaceDef::_get_is_abstract_skel}, +- {"_set_is_abstract", &POA_IR::InterfaceDef::_set_is_abstract_skel}, +- {"_get_containing_repository", &POA_IR::InterfaceDef::_get_containing_repository_skel}, +- {"create_value_box", &POA_IR::InterfaceDef::create_value_box_skel}, +- {"create_struct", &POA_IR::InterfaceDef::create_struct_skel}, +- {"create_constant", &POA_IR::InterfaceDef::create_constant_skel}, +- }; +- +- static const signed char lookup[] = +- { +- -11, -2, -14, -2, 4, 5, 6, -17, -2, 103, -1, 10, -1, -78, +- 13, -78, 16, -75, 19, -1, 20, 21, -22, -2, -26, -2, -29, -2, +- -34, -2, -73, 24, 25, -74, -1, 28, -75, 31, 32, -1, 33, -78, +- 36, 37, -38, -2, -67, -7, -3, -1, -1, 40, -1, -1, -1, -1, +- 41, -1, -1, -1, -1, -1, -1, 42, -1, 43, +- }; +- +- if (len <= MAX_WORD_LENGTH && len >= MIN_WORD_LENGTH) +- { +- unsigned int key = hash (str, len); +- +- if (key <= MAX_HASH_VALUE && key >= MIN_HASH_VALUE) +- { +- int slot = lookup[key]; +- +- if (slot >= 0 && slot < MAX_HASH_VALUE) +- { +- const char *s = wordlist[slot].opname_; +- +- if (*str == *s && !strncmp (str + 1, s + 1, len - 1)) +- return &wordlist[slot]; +- } +- else if (slot < 0 && slot >= -MAX_HASH_VALUE) +- return 0; +- else +- { +- unsigned int offset = key + slot + (slot > 0 ? -MAX_HASH_VALUE : MAX_HASH_VALUE); +- const class TAO_operation_db_entry *base = &wordlist[-lookup[offset]]; +- const class TAO_operation_db_entry *ptr = base + -lookup[offset + 1]; +- +- while (--ptr >= base) +- if (*str == *ptr->opname_ && !strncmp (str + 1, ptr->opname_ + 1, len - 1)) +- return ptr; +- } +- } +- } +- return 0; +-} +-/* ending time is 16:31:12 */ +-static TAO_IR_InterfaceDef_Perfect_Hash_OpTable tao_IR_InterfaceDef_optable; +- +- +-/////////////////////////////////////////////////////////////////////// +-// Strategized Proxy Broker Implementation +-// +- +-// Factory function Implementation. +-POA_IR::_TAO_InterfaceDef_Strategized_Proxy_Broker *POA_IR::_TAO_InterfaceDef_Strategized_Proxy_Broker::the_TAO_InterfaceDef_Strategized_Proxy_Broker (void) +-{ +- static POA_IR::_TAO_InterfaceDef_Strategized_Proxy_Broker strategized_proxy_broker; +- return &strategized_proxy_broker; +-} +- +-POA_IR::_TAO_InterfaceDef_Strategized_Proxy_Broker::_TAO_InterfaceDef_Strategized_Proxy_Broker (void) +-{ +- for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) +- this->proxy_cache_[i] = 0; +- +-} +- +-POA_IR::_TAO_InterfaceDef_Strategized_Proxy_Broker::~_TAO_InterfaceDef_Strategized_Proxy_Broker (void) +-{ +- for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) +- delete this->proxy_cache_[i]; +- +-} +- +-IR::_TAO_InterfaceDef_Proxy_Impl& +-POA_IR::_TAO_InterfaceDef_Strategized_Proxy_Broker::select_proxy ( +- ::IR::InterfaceDef *object, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- TAO_ORB_Core::TAO_Collocation_Strategies strategy = +- TAO_ORB_Core::collocation_strategy (object); +- +- if (this->proxy_cache_[strategy] != 0) +- return *this->proxy_cache_[strategy]; +- +- this->create_proxy (strategy, ACE_TRY_ENV); +- ACE_CHECK_RETURN (*this->proxy_cache_[strategy]); +- +- return *this->proxy_cache_[strategy]; +- +-} +- +-void +-POA_IR::_TAO_InterfaceDef_Strategized_Proxy_Broker::create_proxy ( +- TAO_ORB_Core::TAO_Collocation_Strategies strategy, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- ACE_GUARD (TAO_SYNCH_MUTEX, guard, this->mutex_); +- +- if (this->proxy_cache_[strategy] == 0) +- { +- switch (strategy) +- { +- case TAO_ORB_Core::THRU_POA_STRATEGY: +- ACE_NEW_THROW_EX ( +- this->proxy_cache_[strategy], +- POA_IR::_TAO_InterfaceDef_ThruPOA_Proxy_Impl, +- CORBA::NO_MEMORY () +- ); +- ACE_CHECK; +- break; +- +- case TAO_ORB_Core::REMOTE_STRATEGY: +- default: +- ACE_NEW_THROW_EX ( +- this->proxy_cache_[strategy], +- ::IR::_TAO_InterfaceDef_Remote_Proxy_Impl, +- CORBA::NO_MEMORY () +- ); +- ACE_CHECK; +- break; +- +- } +- +- } +-} +- +- +-// +-// End Strategized Proxy Broker Implementation +-/////////////////////////////////////////////////////////////////////// +- +- +-IR::_TAO_InterfaceDef_Proxy_Broker * +-IR__TAO_InterfaceDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) +-{ +- ACE_UNUSED_ARG (obj); +- return ::POA_IR::_TAO_InterfaceDef_Strategized_Proxy_Broker::the_TAO_InterfaceDef_Strategized_Proxy_Broker(); +-} +- +-int +-IR__TAO_InterfaceDef_Proxy_Broker_Factory_Initializer (long _dummy_) +-{ +- ACE_UNUSED_ARG (_dummy_); +- +- IR__TAO_InterfaceDef_Proxy_Broker_Factory_function_pointer = +- IR__TAO_InterfaceDef_Proxy_Broker_Factory_function; +- +- return 0; +-} +- +-static int IR__TAO_InterfaceDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = +- IR__TAO_InterfaceDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, IR__TAO_InterfaceDef_Proxy_Broker_Factory_Initializer)); +- +- +-/////////////////////////////////////////////////////////////////////// +-// ThruPOA Proxy Implementation +-// +- +-POA_IR::_TAO_InterfaceDef_ThruPOA_Proxy_Impl::_TAO_InterfaceDef_ThruPOA_Proxy_Impl (void) +-{} +- +-// ThruPOA Implementation of the IDL interface methods +- +-IR::InterfaceDefSeq * POA_IR::_TAO_InterfaceDef_ThruPOA_Proxy_Impl::base_interfaces ( +- CORBA_Object *_collocated_tao_target_, +- CORBA::Environment &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) +-{ +- IR::InterfaceDefSeq_var _tao_retval; +- ACE_UNUSED_ARG (_tao_retval); +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "base_interfaces", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK_RETURN (0); +- return ACE_reinterpret_cast ( +- POA_IR::InterfaceDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/InterfaceDef:1.0" +- ) +- )->base_interfaces ( +- ACE_TRY_ENV +- ); +-} +- +-void POA_IR::_TAO_InterfaceDef_ThruPOA_Proxy_Impl::base_interfaces ( +- CORBA_Object *_collocated_tao_target_, +- const IR::InterfaceDefSeq & base_interfaces, +- CORBA::Environment &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) +-{ +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "base_interfaces", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK; +- ACE_reinterpret_cast ( +- POA_IR::InterfaceDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/InterfaceDef:1.0" +- ) +- )->base_interfaces ( +- base_interfaces, +- ACE_TRY_ENV +- ); +- return; +-} +- +-CORBA::Boolean POA_IR::_TAO_InterfaceDef_ThruPOA_Proxy_Impl::is_abstract ( +- CORBA_Object *_collocated_tao_target_, +- CORBA::Environment &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) +-{ +- CORBA::Boolean _tao_retval = 0; +- ACE_UNUSED_ARG (_tao_retval); +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "is_abstract", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK_RETURN (_tao_retval); +- return ACE_reinterpret_cast ( +- POA_IR::InterfaceDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/InterfaceDef:1.0" +- ) +- )->is_abstract ( +- ACE_TRY_ENV +- ); +-} +- +-void POA_IR::_TAO_InterfaceDef_ThruPOA_Proxy_Impl::is_abstract ( +- CORBA_Object *_collocated_tao_target_, +- CORBA::Boolean is_abstract, +- CORBA::Environment &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) +-{ +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "is_abstract", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK; +- ACE_reinterpret_cast ( +- POA_IR::InterfaceDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/InterfaceDef:1.0" +- ) +- )->is_abstract ( +- is_abstract, +- ACE_TRY_ENV +- ); +- return; +-} +- +-CORBA::Boolean POA_IR::_TAO_InterfaceDef_ThruPOA_Proxy_Impl::is_local ( +- CORBA_Object *_collocated_tao_target_, +- CORBA::Environment &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) +-{ +- CORBA::Boolean _tao_retval = 0; +- ACE_UNUSED_ARG (_tao_retval); +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "is_local", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK_RETURN (_tao_retval); +- return ACE_reinterpret_cast ( +- POA_IR::InterfaceDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/InterfaceDef:1.0" +- ) +- )->is_local ( +- ACE_TRY_ENV +- ); +-} +- +-void POA_IR::_TAO_InterfaceDef_ThruPOA_Proxy_Impl::is_local ( +- CORBA_Object *_collocated_tao_target_, +- CORBA::Boolean is_local, +- CORBA::Environment &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) +-{ +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "is_local", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK; +- ACE_reinterpret_cast ( +- POA_IR::InterfaceDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/InterfaceDef:1.0" +- ) +- )->is_local ( +- is_local, +- ACE_TRY_ENV +- ); +- return; +-} +- +-CORBA::Boolean POA_IR::_TAO_InterfaceDef_ThruPOA_Proxy_Impl::is_a ( +- CORBA_Object *_collocated_tao_target_, +- const char * interface_id, +- CORBA::Environment &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) +-{ +- CORBA::Boolean _tao_retval = 0; +- ACE_UNUSED_ARG (_tao_retval); +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "is_a", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK_RETURN (_tao_retval); +- return ACE_reinterpret_cast ( +- POA_IR::InterfaceDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/InterfaceDef:1.0" +- ) +- )->is_a ( +- interface_id, +- ACE_TRY_ENV +- ); +-} +- +-IR::AttributeDef_ptr POA_IR::_TAO_InterfaceDef_ThruPOA_Proxy_Impl::create_attribute ( +- CORBA_Object *_collocated_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 &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) +-{ +- IR::AttributeDef_var _tao_retval; +- ACE_UNUSED_ARG (_tao_retval); +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "create_attribute", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK_RETURN (0); +- return ACE_reinterpret_cast ( +- POA_IR::InterfaceDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/InterfaceDef:1.0" +- ) +- )->create_attribute ( +- id, +- name, +- version, +- type, +- mode, +- get_exceptions, +- put_exceptions, +- ACE_TRY_ENV +- ); +-} +- +-IR::OperationDef_ptr POA_IR::_TAO_InterfaceDef_ThruPOA_Proxy_Impl::create_operation ( +- CORBA_Object *_collocated_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 &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) +-{ +- IR::OperationDef_var _tao_retval; +- ACE_UNUSED_ARG (_tao_retval); +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "create_operation", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK_RETURN (0); +- return ACE_reinterpret_cast ( +- POA_IR::InterfaceDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/InterfaceDef:1.0" +- ) +- )->create_operation ( +- id, +- name, +- version, +- result, +- mode, +- params, +- exceptions, +- contexts, +- ACE_TRY_ENV +- ); +-} +- +-// +-// End ThruPOA Proxy Implementation +-/////////////////////////////////////////////////////////////////////// +- +-// skeleton constructor +-POA_IR::InterfaceDef::InterfaceDef (void) +-{ +- this->optable_ = &tao_IR_InterfaceDef_optable; +-} +- +-// copy ctor +-POA_IR::InterfaceDef::InterfaceDef (const InterfaceDef& rhs) +- : ACE_NESTED_CLASS (POA_IR,Container) (rhs), +- ACE_NESTED_CLASS (POA_IR,Contained) (rhs), +- ACE_NESTED_CLASS (POA_IR,IDLType) (rhs), +- ACE_NESTED_CLASS (POA_CORBA,IRObject) (rhs), +- TAO_ServantBase (rhs) +-{} +- +-// skeleton destructor +-POA_IR::InterfaceDef::~InterfaceDef (void) +-{ +-} +- +-void POA_IR::InterfaceDef::_get_base_interfaces_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- POA_IR::InterfaceDef *_tao_impl = (POA_IR::InterfaceDef *)_tao_object_reference; +- +- IR::InterfaceDefSeq_var _tao_retval; +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::InterfaceDef::TAO_ServerRequestInfo_IR_InterfaceDef_base_interfaces_get ri ( +- _tao_server_request, +- _tao_impl +- , +- ACE_TRY_ENV +- ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->base_interfaces ( +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::InterfaceDefSeq * _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << _tao_retval.in ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- +-} +- +-void POA_IR::InterfaceDef::_set_base_interfaces_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::InterfaceDef *_tao_impl = (POA_IR::InterfaceDef *)_tao_object_reference; +- +-_tao_server_request.argument_flag (0); +- IR::InterfaceDefSeq base_interfaces; +- if (!( +- (_tao_in >> base_interfaces) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::InterfaceDef::TAO_ServerRequestInfo_IR_InterfaceDef_base_interfaces_set ri ( +- _tao_server_request, +- _tao_impl +- , +- base_interfaces, +- ACE_TRY_ENV +- ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- +- _tao_impl->base_interfaces ( +- base_interfaces, +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +-} +- +-void POA_IR::InterfaceDef::_get_is_abstract_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- POA_IR::InterfaceDef *_tao_impl = (POA_IR::InterfaceDef *)_tao_object_reference; +- +- CORBA::Boolean _tao_retval = 0; +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::InterfaceDef::TAO_ServerRequestInfo_IR_InterfaceDef_is_abstract_get ri ( +- _tao_server_request, +- _tao_impl +- , +- ACE_TRY_ENV +- ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->is_abstract ( +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- CORBA::Boolean _tao_retval_info = _tao_retval; +- ri.result (_tao_retval_info); +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << CORBA::Any::from_boolean (_tao_retval)) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- +-} +- +-void POA_IR::InterfaceDef::_set_is_abstract_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::InterfaceDef *_tao_impl = (POA_IR::InterfaceDef *)_tao_object_reference; +- +-_tao_server_request.argument_flag (0); +- CORBA::Boolean is_abstract; +- if (!( +- (_tao_in >> CORBA::Any::to_boolean (is_abstract)) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::InterfaceDef::TAO_ServerRequestInfo_IR_InterfaceDef_is_abstract_set ri ( +- _tao_server_request, +- _tao_impl +- , +- is_abstract, +- ACE_TRY_ENV +- ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- +- _tao_impl->is_abstract ( +- is_abstract, +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +-} +- +-void POA_IR::InterfaceDef::_get_is_local_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- POA_IR::InterfaceDef *_tao_impl = (POA_IR::InterfaceDef *)_tao_object_reference; +- +- CORBA::Boolean _tao_retval = 0; +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::InterfaceDef::TAO_ServerRequestInfo_IR_InterfaceDef_is_local_get ri ( +- _tao_server_request, +- _tao_impl +- , +- ACE_TRY_ENV +- ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->is_local ( +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- CORBA::Boolean _tao_retval_info = _tao_retval; +- ri.result (_tao_retval_info); +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << CORBA::Any::from_boolean (_tao_retval)) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- +-} +- +-void POA_IR::InterfaceDef::_set_is_local_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::InterfaceDef *_tao_impl = (POA_IR::InterfaceDef *)_tao_object_reference; +- +-_tao_server_request.argument_flag (0); +- CORBA::Boolean is_local; +- if (!( +- (_tao_in >> CORBA::Any::to_boolean (is_local)) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::InterfaceDef::TAO_ServerRequestInfo_IR_InterfaceDef_is_local_set ri ( +- _tao_server_request, +- _tao_impl +- , +- is_local, +- ACE_TRY_ENV +- ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- +- _tao_impl->is_local ( +- is_local, +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +-} +- +-void POA_IR::InterfaceDef::is_a_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::InterfaceDef *_tao_impl = (POA_IR::InterfaceDef *)_tao_object_reference; +- +- CORBA::Boolean _tao_retval = 0; +- CORBA::String_var interface_id; +- if (!( +- (_tao_in >> interface_id.out ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::InterfaceDef::TAO_ServerRequestInfo_IR_InterfaceDef_is_a ri ( +- _tao_server_request, +- _tao_impl +- , +- interface_id.in (), +- ACE_TRY_ENV +- ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->is_a ( +- interface_id.in (), +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- CORBA::Boolean _tao_retval_info = _tao_retval; +- ri.result (_tao_retval_info); +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << CORBA::Any::from_boolean (_tao_retval)) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- +-} +- +-void POA_IR::InterfaceDef::create_attribute_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::InterfaceDef *_tao_impl = (POA_IR::InterfaceDef *)_tao_object_reference; +- +- IR::AttributeDef_var _tao_retval; +- CORBA::String_var id; +- CORBA::String_var name; +- CORBA::String_var version; +- IR::IDLType_var type; +- IR::AttributeMode mode; +- IR::ExceptionDefSeq get_exceptions; +- IR::ExceptionDefSeq put_exceptions; +- if (!( +- (_tao_in >> id.out ()) && +- (_tao_in >> name.out ()) && +- (_tao_in >> version.out ()) && +- (_tao_in >> type.out ()) && +- (_tao_in >> mode) && +- (_tao_in >> get_exceptions) && +- (_tao_in >> put_exceptions) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::InterfaceDef::TAO_ServerRequestInfo_IR_InterfaceDef_create_attribute ri ( +- _tao_server_request, +- _tao_impl +- , +- id.in (), +- name.in (), +- version.in (), +- type.in (), +- mode, +- get_exceptions, +- put_exceptions, +- ACE_TRY_ENV +- ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->create_attribute ( +- id.in (), +- name.in (), +- version.in (), +- type.in (), +- mode, +- get_exceptions, +- put_exceptions, +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::AttributeDef_ptr _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << _tao_retval.in ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- +-} +- +-void POA_IR::InterfaceDef::create_operation_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::InterfaceDef *_tao_impl = (POA_IR::InterfaceDef *)_tao_object_reference; +- +- IR::OperationDef_var _tao_retval; +- CORBA::String_var id; +- CORBA::String_var name; +- CORBA::String_var version; +- IR::IDLType_var result; +- IR::OperationMode mode; +- IR::ParDescriptionSeq params; +- IR::ExceptionDefSeq exceptions; +- IR::ContextIdSeq contexts; +- if (!( +- (_tao_in >> id.out ()) && +- (_tao_in >> name.out ()) && +- (_tao_in >> version.out ()) && +- (_tao_in >> result.out ()) && +- (_tao_in >> mode) && +- (_tao_in >> params) && +- (_tao_in >> exceptions) && +- (_tao_in >> contexts) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::InterfaceDef::TAO_ServerRequestInfo_IR_InterfaceDef_create_operation ri ( +- _tao_server_request, +- _tao_impl +- , +- id.in (), +- name.in (), +- version.in (), +- result.in (), +- mode, +- params, +- exceptions, +- contexts, +- ACE_TRY_ENV +- ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->create_operation ( +- id.in (), +- name.in (), +- version.in (), +- result.in (), +- mode, +- params, +- exceptions, +- contexts, +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::OperationDef_ptr _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << _tao_retval.in ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- +-} +- +-void POA_IR::InterfaceDef::_is_a_skel ( +- TAO_ServerRequest &_tao_server_request, +- void * _tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::InterfaceDef *_tao_impl = (POA_IR::InterfaceDef *) _tao_object_reference; +- CORBA::Boolean _tao_retval = 0; +- CORBA::String_var value; +- if (!(_tao_in >> value.out ())) +- ACE_THROW (CORBA::MARSHAL ()); +- +- _tao_retval = _tao_impl->_is_a (value.in (), ACE_TRY_ENV); +- ACE_CHECK; +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) +- ACE_THROW (CORBA::MARSHAL ()); +-} +- +-void POA_IR::InterfaceDef::_non_existent_skel ( +- TAO_ServerRequest &_tao_server_request, +- void * _tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- POA_IR::InterfaceDef *_tao_impl = (POA_IR::InterfaceDef *) _tao_object_reference; +- CORBA::Boolean _tao_retval = _tao_impl->_non_existent (ACE_TRY_ENV); +- ACE_CHECK; +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) +- ACE_THROW (CORBA::MARSHAL ()); +-} +- +-CORBA::Boolean POA_IR::InterfaceDef::_is_a ( +- const char* value, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- if ( +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/InterfaceDef:1.0")) || +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/Container:1.0")) || +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/Contained:1.0")) || +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/IDLType:1.0")) || +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/CORBA/IRObject:1.0")) || +- (!ACE_OS::strcmp ((char *)value, CORBA::_tc_Object->id (ACE_TRY_ENV)))) +- return 1; +- else +- return 0; +-} +- +-void* POA_IR::InterfaceDef::_downcast ( +- const char* logical_type_id +- ) +-{ +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/InterfaceDef:1.0") == 0) +- return ACE_static_cast (POA_IR::InterfaceDef_ptr, this); +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Container:1.0") == 0) +- return ACE_static_cast (POA_IR::Container_ptr, this); +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Contained:1.0") == 0) +- return ACE_static_cast (POA_IR::Contained_ptr, this); +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/IDLType:1.0") == 0) +- return ACE_static_cast (POA_IR::IDLType_ptr, this); +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/IRObject:1.0") == 0) +- return ACE_static_cast (POA_CORBA::IRObject_ptr, this); +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/Object:1.0") == 0) +- return ACE_static_cast(PortableServer::Servant, this); +- return 0; +-} +- +-void POA_IR::InterfaceDef::_dispatch (TAO_ServerRequest &req, void *context, CORBA::Environment &ACE_TRY_ENV) +-{ +- this->synchronous_upcall_dispatch(req, context, this, ACE_TRY_ENV); +-} +- +-const char* POA_IR::InterfaceDef::_interface_repository_id (void) const +-{ +- return "IDL:omg.org/IR/InterfaceDef:1.0"; +-} +- +-IR::InterfaceDef* +-POA_IR::InterfaceDef::_this (CORBA_Environment &ACE_TRY_ENV) +-{ +- TAO_Stub *stub = this->_create_stub (ACE_TRY_ENV); +- ACE_CHECK_RETURN (0); +- +- CORBA::Object_ptr tmp = CORBA::Object::_nil (); +- +- if (stub->servant_orb_var ()->orb_core ()->optimize_collocation_objects ()) +- ACE_NEW_RETURN (tmp, CORBA::Object (stub, 1, this), 0); +- else +- ACE_NEW_RETURN (tmp, CORBA::Object (stub, 0, this), 0); +- +- CORBA::Object_var obj = tmp; +- return ::IR::InterfaceDef::_unchecked_narrow (obj.in ()); +-} +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +-POA_IR::InterfaceDef::TAO_ServerRequestInfo_IR_InterfaceDef_base_interfaces_get::TAO_ServerRequestInfo_IR_InterfaceDef_base_interfaces_get ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::InterfaceDef *tao_impl +- , +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl) +-{} +- +-Dynamic::ParameterList * +-POA_IR::InterfaceDef::TAO_ServerRequestInfo_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 * +-POA_IR::InterfaceDef::TAO_ServerRequestInfo_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 * +-POA_IR::InterfaceDef::TAO_ServerRequestInfo_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 (); +-} +- +-char * +-POA_IR::InterfaceDef::TAO_ServerRequestInfo_IR_InterfaceDef_base_interfaces_get::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::InterfaceDef::TAO_ServerRequestInfo_IR_InterfaceDef_base_interfaces_get::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-void +-POA_IR::InterfaceDef::TAO_ServerRequestInfo_IR_InterfaceDef_base_interfaces_get::result (IR::InterfaceDefSeq * result) +-{ +- // Update the result. +- this->_result = result; +-} +- +-POA_IR::InterfaceDef::TAO_ServerRequestInfo_IR_InterfaceDef_base_interfaces_set::TAO_ServerRequestInfo_IR_InterfaceDef_base_interfaces_set ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::InterfaceDef *tao_impl +- , +- const IR::InterfaceDefSeq & base_interfaces, +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- base_interfaces_ (base_interfaces) +-{} +- +-Dynamic::ParameterList * +-POA_IR::InterfaceDef::TAO_ServerRequestInfo_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 * +-POA_IR::InterfaceDef::TAO_ServerRequestInfo_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 * +-POA_IR::InterfaceDef::TAO_ServerRequestInfo_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; +-} +- +-char * +-POA_IR::InterfaceDef::TAO_ServerRequestInfo_IR_InterfaceDef_base_interfaces_set::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::InterfaceDef::TAO_ServerRequestInfo_IR_InterfaceDef_base_interfaces_set::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-POA_IR::InterfaceDef::TAO_ServerRequestInfo_IR_InterfaceDef_is_abstract_get::TAO_ServerRequestInfo_IR_InterfaceDef_is_abstract_get ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::InterfaceDef *tao_impl +- , +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl) +-{} +- +-Dynamic::ParameterList * +-POA_IR::InterfaceDef::TAO_ServerRequestInfo_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 * +-POA_IR::InterfaceDef::TAO_ServerRequestInfo_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 * +-POA_IR::InterfaceDef::TAO_ServerRequestInfo_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 (); +-} +- +-char * +-POA_IR::InterfaceDef::TAO_ServerRequestInfo_IR_InterfaceDef_is_abstract_get::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::InterfaceDef::TAO_ServerRequestInfo_IR_InterfaceDef_is_abstract_get::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-void +-POA_IR::InterfaceDef::TAO_ServerRequestInfo_IR_InterfaceDef_is_abstract_get::result (CORBA::Boolean result) +-{ +- // Update the result. +- this->_result = result; +-} +- +-POA_IR::InterfaceDef::TAO_ServerRequestInfo_IR_InterfaceDef_is_abstract_set::TAO_ServerRequestInfo_IR_InterfaceDef_is_abstract_set ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::InterfaceDef *tao_impl +- , +- const CORBA::Boolean & is_abstract, +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- is_abstract_ (is_abstract) +-{} +- +-Dynamic::ParameterList * +-POA_IR::InterfaceDef::TAO_ServerRequestInfo_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 * +-POA_IR::InterfaceDef::TAO_ServerRequestInfo_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 * +-POA_IR::InterfaceDef::TAO_ServerRequestInfo_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; +-} +- +-char * +-POA_IR::InterfaceDef::TAO_ServerRequestInfo_IR_InterfaceDef_is_abstract_set::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::InterfaceDef::TAO_ServerRequestInfo_IR_InterfaceDef_is_abstract_set::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-POA_IR::InterfaceDef::TAO_ServerRequestInfo_IR_InterfaceDef_is_local_get::TAO_ServerRequestInfo_IR_InterfaceDef_is_local_get ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::InterfaceDef *tao_impl +- , +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl) +-{} +- +-Dynamic::ParameterList * +-POA_IR::InterfaceDef::TAO_ServerRequestInfo_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 * +-POA_IR::InterfaceDef::TAO_ServerRequestInfo_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 * +-POA_IR::InterfaceDef::TAO_ServerRequestInfo_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 (); +-} +- +-char * +-POA_IR::InterfaceDef::TAO_ServerRequestInfo_IR_InterfaceDef_is_local_get::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::InterfaceDef::TAO_ServerRequestInfo_IR_InterfaceDef_is_local_get::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-void +-POA_IR::InterfaceDef::TAO_ServerRequestInfo_IR_InterfaceDef_is_local_get::result (CORBA::Boolean result) +-{ +- // Update the result. +- this->_result = result; +-} +- +-POA_IR::InterfaceDef::TAO_ServerRequestInfo_IR_InterfaceDef_is_local_set::TAO_ServerRequestInfo_IR_InterfaceDef_is_local_set ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::InterfaceDef *tao_impl +- , +- const CORBA::Boolean & is_local, +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- is_local_ (is_local) +-{} +- +-Dynamic::ParameterList * +-POA_IR::InterfaceDef::TAO_ServerRequestInfo_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 * +-POA_IR::InterfaceDef::TAO_ServerRequestInfo_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 * +-POA_IR::InterfaceDef::TAO_ServerRequestInfo_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; +-} +- +-char * +-POA_IR::InterfaceDef::TAO_ServerRequestInfo_IR_InterfaceDef_is_local_set::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::InterfaceDef::TAO_ServerRequestInfo_IR_InterfaceDef_is_local_set::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-POA_IR::InterfaceDef::TAO_ServerRequestInfo_IR_InterfaceDef_is_a::TAO_ServerRequestInfo_IR_InterfaceDef_is_a ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::InterfaceDef *tao_impl +- , +- const char * interface_id, +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- interface_id_ (interface_id) +-{} +- +-Dynamic::ParameterList * +-POA_IR::InterfaceDef::TAO_ServerRequestInfo_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 * +-POA_IR::InterfaceDef::TAO_ServerRequestInfo_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 * +-POA_IR::InterfaceDef::TAO_ServerRequestInfo_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 (); +-} +- +-char * +-POA_IR::InterfaceDef::TAO_ServerRequestInfo_IR_InterfaceDef_is_a::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::InterfaceDef::TAO_ServerRequestInfo_IR_InterfaceDef_is_a::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-void +-POA_IR::InterfaceDef::TAO_ServerRequestInfo_IR_InterfaceDef_is_a::result (CORBA::Boolean result) +-{ +- // Update the result. +- this->_result = result; +-} +- +-POA_IR::InterfaceDef::TAO_ServerRequestInfo_IR_InterfaceDef_create_attribute::TAO_ServerRequestInfo_IR_InterfaceDef_create_attribute ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::InterfaceDef *tao_impl +- , +- 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_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- id_ (id), +- name_ (name), +- version_ (version), +- type_ (type), +- mode_ (mode), +- get_exceptions_ (get_exceptions), +- put_exceptions_ (put_exceptions) +-{} +- +-Dynamic::ParameterList * +-POA_IR::InterfaceDef::TAO_ServerRequestInfo_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 * +-POA_IR::InterfaceDef::TAO_ServerRequestInfo_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 * +-POA_IR::InterfaceDef::TAO_ServerRequestInfo_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 (); +-} +- +-char * +-POA_IR::InterfaceDef::TAO_ServerRequestInfo_IR_InterfaceDef_create_attribute::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::InterfaceDef::TAO_ServerRequestInfo_IR_InterfaceDef_create_attribute::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-void +-POA_IR::InterfaceDef::TAO_ServerRequestInfo_IR_InterfaceDef_create_attribute::result (IR::AttributeDef_ptr result) +-{ +- // Update the result. +- this->_result = result; +-} +- +-POA_IR::InterfaceDef::TAO_ServerRequestInfo_IR_InterfaceDef_create_operation::TAO_ServerRequestInfo_IR_InterfaceDef_create_operation ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::InterfaceDef *tao_impl +- , +- 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_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- id_ (id), +- name_ (name), +- version_ (version), +- result_ (result), +- mode_ (mode), +- params_ (params), +- exceptions_ (exceptions), +- contexts_ (contexts) +-{} +- +-Dynamic::ParameterList * +-POA_IR::InterfaceDef::TAO_ServerRequestInfo_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 * +-POA_IR::InterfaceDef::TAO_ServerRequestInfo_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 * +-POA_IR::InterfaceDef::TAO_ServerRequestInfo_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 (); +-} +- +-char * +-POA_IR::InterfaceDef::TAO_ServerRequestInfo_IR_InterfaceDef_create_operation::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::InterfaceDef::TAO_ServerRequestInfo_IR_InterfaceDef_create_operation::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-void +-POA_IR::InterfaceDef::TAO_ServerRequestInfo_IR_InterfaceDef_create_operation::result (IR::OperationDef_ptr result) +-{ +- // Update the result. +- this->_result = result; +-} +- +-#endif /* TAO_HAS_INTERCEPTORS */ +-class TAO_IR_ValueMemberDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable +-{ +-private: +- unsigned int hash (const char *str, unsigned int len); +-public: +- const TAO_operation_db_entry * lookup (const char *str, unsigned int len); +-}; +-/* starting time is 16:31:13 */ +-/* C++ code produced by gperf version 2.8 (ACE version) */ +-/* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_ValueMemberDef_Perfect_Hash_OpTable -N lookup */ +-unsigned int +-TAO_IR_ValueMemberDef_Perfect_Hash_OpTable::hash (const char *str, unsigned int len) +-{ +- static const unsigned char asso_values[] = +- { +-#if defined (ACE_MVS) +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 0, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 0, +- 37, 37, 0, 0, 10, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 0, 0, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 0, 15, 37, 37, 37, 37, 10, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, +-#else +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 0, 37, 0, 37, 37, +- 0, 0, 10, 37, 37, 37, 37, 37, 37, 0, +- 0, 37, 37, 37, 37, 0, 15, 37, 37, 37, +- 37, 10, 37, 37, 37, 37, 37, 37, +-#endif /* ACE_MVS */ +- }; +- return len + asso_values[str[len - 1]] + asso_values[str[0]]; +-} +- +-const class TAO_operation_db_entry * +-TAO_IR_ValueMemberDef_Perfect_Hash_OpTable::lookup (const char *str, unsigned int len) +-{ +- enum +- { +- TOTAL_KEYWORDS = 20, +- MIN_WORD_LENGTH = 4, +- MAX_WORD_LENGTH = 26, +- MIN_HASH_VALUE = 4, +- MAX_HASH_VALUE = 36, +- HASH_VALUE_RANGE = 33, +- DUPLICATES = 7 +- }; +- +- static const class TAO_operation_db_entry wordlist[] = +- { +- {"",0},{"",0},{"",0},{"",0}, +- {"move", &POA_IR::ValueMemberDef::move_skel}, +- {"_is_a", &POA_IR::ValueMemberDef::_is_a_skel}, +- {"_get_id", &POA_IR::ValueMemberDef::_get_id_skel}, +- {"_set_id", &POA_IR::ValueMemberDef::_set_id_skel}, +- {"describe", &POA_IR::ValueMemberDef::describe_skel}, +- {"_get_type", &POA_IR::ValueMemberDef::_get_type_skel}, +- {"_set_name", &POA_IR::ValueMemberDef::_set_name_skel}, +- {"_get_name", &POA_IR::ValueMemberDef::_get_name_skel}, +- {"_get_access", &POA_IR::ValueMemberDef::_get_access_skel}, +- {"_set_access", &POA_IR::ValueMemberDef::_set_access_skel}, +- {"_get_version", &POA_IR::ValueMemberDef::_get_version_skel}, +- {"_set_version", &POA_IR::ValueMemberDef::_set_version_skel}, +- {"_get_def_kind", &POA_IR::ValueMemberDef::_get_def_kind_skel}, +- {"_get_defined_in", &POA_IR::ValueMemberDef::_get_defined_in_skel}, +- {"destroy", &POA_IR::ValueMemberDef::destroy_skel}, +- {"_get_absolute_name", &POA_IR::ValueMemberDef::_get_absolute_name_skel}, +- {"_get_type_def", &POA_IR::ValueMemberDef::_get_type_def_skel}, +- {"_set_type_def", &POA_IR::ValueMemberDef::_set_type_def_skel}, +- {"_non_existent", &POA_IR::ValueMemberDef::_non_existent_skel}, +- {"_get_containing_repository", &POA_IR::ValueMemberDef::_get_containing_repository_skel}, +- }; +- +- static const signed char lookup[] = +- { +- -12, -2, -14, -2, 4, 5, -1, 53, 8, 46, -1, -47, -46, 16, +- -1, 17, -1, 18, 19, -9, -3, -20, -2, -38, -6, -2, -1, -1, +- 22, -1, -1, -1, -1, -1, -1, -1, 23, +- }; +- +- if (len <= MAX_WORD_LENGTH && len >= MIN_WORD_LENGTH) +- { +- unsigned int key = hash (str, len); +- +- if (key <= MAX_HASH_VALUE && key >= MIN_HASH_VALUE) +- { +- int slot = lookup[key]; +- +- if (slot >= 0 && slot < MAX_HASH_VALUE) +- { +- const char *s = wordlist[slot].opname_; +- +- if (*str == *s && !strncmp (str + 1, s + 1, len - 1)) +- return &wordlist[slot]; +- } +- else if (slot < 0 && slot >= -MAX_HASH_VALUE) +- return 0; +- else +- { +- unsigned int offset = key + slot + (slot > 0 ? -MAX_HASH_VALUE : MAX_HASH_VALUE); +- const class TAO_operation_db_entry *base = &wordlist[-lookup[offset]]; +- const class TAO_operation_db_entry *ptr = base + -lookup[offset + 1]; +- +- while (--ptr >= base) +- if (*str == *ptr->opname_ && !strncmp (str + 1, ptr->opname_ + 1, len - 1)) +- return ptr; +- } +- } +- } +- return 0; +-} +-/* ending time is 16:31:13 */ +-static TAO_IR_ValueMemberDef_Perfect_Hash_OpTable tao_IR_ValueMemberDef_optable; +- +- +-/////////////////////////////////////////////////////////////////////// +-// Strategized Proxy Broker Implementation +-// +- +-// Factory function Implementation. +-POA_IR::_TAO_ValueMemberDef_Strategized_Proxy_Broker *POA_IR::_TAO_ValueMemberDef_Strategized_Proxy_Broker::the_TAO_ValueMemberDef_Strategized_Proxy_Broker (void) +-{ +- static POA_IR::_TAO_ValueMemberDef_Strategized_Proxy_Broker strategized_proxy_broker; +- return &strategized_proxy_broker; +-} +- +-POA_IR::_TAO_ValueMemberDef_Strategized_Proxy_Broker::_TAO_ValueMemberDef_Strategized_Proxy_Broker (void) +-{ +- for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) +- this->proxy_cache_[i] = 0; +- +-} +- +-POA_IR::_TAO_ValueMemberDef_Strategized_Proxy_Broker::~_TAO_ValueMemberDef_Strategized_Proxy_Broker (void) +-{ +- for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) +- delete this->proxy_cache_[i]; +- +-} +- +-IR::_TAO_ValueMemberDef_Proxy_Impl& +-POA_IR::_TAO_ValueMemberDef_Strategized_Proxy_Broker::select_proxy ( +- ::IR::ValueMemberDef *object, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- TAO_ORB_Core::TAO_Collocation_Strategies strategy = +- TAO_ORB_Core::collocation_strategy (object); +- +- if (this->proxy_cache_[strategy] != 0) +- return *this->proxy_cache_[strategy]; +- +- this->create_proxy (strategy, ACE_TRY_ENV); +- ACE_CHECK_RETURN (*this->proxy_cache_[strategy]); +- +- return *this->proxy_cache_[strategy]; +- +-} +- +-void +-POA_IR::_TAO_ValueMemberDef_Strategized_Proxy_Broker::create_proxy ( +- TAO_ORB_Core::TAO_Collocation_Strategies strategy, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- ACE_GUARD (TAO_SYNCH_MUTEX, guard, this->mutex_); +- +- if (this->proxy_cache_[strategy] == 0) +- { +- switch (strategy) +- { +- case TAO_ORB_Core::THRU_POA_STRATEGY: +- ACE_NEW_THROW_EX ( +- this->proxy_cache_[strategy], +- POA_IR::_TAO_ValueMemberDef_ThruPOA_Proxy_Impl, +- CORBA::NO_MEMORY () +- ); +- ACE_CHECK; +- break; +- +- case TAO_ORB_Core::REMOTE_STRATEGY: +- default: +- ACE_NEW_THROW_EX ( +- this->proxy_cache_[strategy], +- ::IR::_TAO_ValueMemberDef_Remote_Proxy_Impl, +- CORBA::NO_MEMORY () +- ); +- ACE_CHECK; +- break; +- +- } +- +- } +-} +- +- +-// +-// End Strategized Proxy Broker Implementation +-/////////////////////////////////////////////////////////////////////// +- +- +-IR::_TAO_ValueMemberDef_Proxy_Broker * +-IR__TAO_ValueMemberDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) +-{ +- ACE_UNUSED_ARG (obj); +- return ::POA_IR::_TAO_ValueMemberDef_Strategized_Proxy_Broker::the_TAO_ValueMemberDef_Strategized_Proxy_Broker(); +-} +- +-int +-IR__TAO_ValueMemberDef_Proxy_Broker_Factory_Initializer (long _dummy_) +-{ +- ACE_UNUSED_ARG (_dummy_); +- +- IR__TAO_ValueMemberDef_Proxy_Broker_Factory_function_pointer = +- IR__TAO_ValueMemberDef_Proxy_Broker_Factory_function; +- +- return 0; +-} +- +-static int IR__TAO_ValueMemberDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = +- IR__TAO_ValueMemberDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, IR__TAO_ValueMemberDef_Proxy_Broker_Factory_Initializer)); +- +- +-/////////////////////////////////////////////////////////////////////// +-// ThruPOA Proxy Implementation +-// +- +-POA_IR::_TAO_ValueMemberDef_ThruPOA_Proxy_Impl::_TAO_ValueMemberDef_ThruPOA_Proxy_Impl (void) +-{} +- +-// ThruPOA Implementation of the IDL interface methods +- +-CORBA::TypeCode_ptr POA_IR::_TAO_ValueMemberDef_ThruPOA_Proxy_Impl::type ( +- CORBA_Object *_collocated_tao_target_, +- CORBA::Environment &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) +-{ +- CORBA::TypeCode_var _tao_retval; +- ACE_UNUSED_ARG (_tao_retval); +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "type", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK_RETURN (0); +- return ACE_reinterpret_cast ( +- POA_IR::ValueMemberDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/ValueMemberDef:1.0" +- ) +- )->type ( +- ACE_TRY_ENV +- ); +-} +- +-IR::IDLType_ptr POA_IR::_TAO_ValueMemberDef_ThruPOA_Proxy_Impl::type_def ( +- CORBA_Object *_collocated_tao_target_, +- CORBA::Environment &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) +-{ +- IR::IDLType_var _tao_retval; +- ACE_UNUSED_ARG (_tao_retval); +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "type_def", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK_RETURN (0); +- return ACE_reinterpret_cast ( +- POA_IR::ValueMemberDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/ValueMemberDef:1.0" +- ) +- )->type_def ( +- ACE_TRY_ENV +- ); +-} +- +-void POA_IR::_TAO_ValueMemberDef_ThruPOA_Proxy_Impl::type_def ( +- CORBA_Object *_collocated_tao_target_, +- IR::IDLType_ptr type_def, +- CORBA::Environment &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) +-{ +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "type_def", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK; +- ACE_reinterpret_cast ( +- POA_IR::ValueMemberDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/ValueMemberDef:1.0" +- ) +- )->type_def ( +- type_def, +- ACE_TRY_ENV +- ); +- return; +-} +- +-CORBA::Visibility POA_IR::_TAO_ValueMemberDef_ThruPOA_Proxy_Impl::access ( +- CORBA_Object *_collocated_tao_target_, +- CORBA::Environment &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) +-{ +- CORBA::Visibility _tao_retval = 0; +- ACE_UNUSED_ARG (_tao_retval); +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "access", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK_RETURN (_tao_retval); +- return ACE_reinterpret_cast ( +- POA_IR::ValueMemberDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/ValueMemberDef:1.0" +- ) +- )->access ( +- ACE_TRY_ENV +- ); +-} +- +-void POA_IR::_TAO_ValueMemberDef_ThruPOA_Proxy_Impl::access ( +- CORBA_Object *_collocated_tao_target_, +- CORBA::Visibility access, +- CORBA::Environment &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) +-{ +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "access", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK; +- ACE_reinterpret_cast ( +- POA_IR::ValueMemberDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/ValueMemberDef:1.0" +- ) +- )->access ( +- access, +- ACE_TRY_ENV +- ); +- return; +-} +- +-// +-// End ThruPOA Proxy Implementation +-/////////////////////////////////////////////////////////////////////// +- +-// skeleton constructor +-POA_IR::ValueMemberDef::ValueMemberDef (void) +-{ +- this->optable_ = &tao_IR_ValueMemberDef_optable; +-} +- +-// copy ctor +-POA_IR::ValueMemberDef::ValueMemberDef (const ValueMemberDef& rhs) +- : ACE_NESTED_CLASS (POA_IR,Contained) (rhs), +- ACE_NESTED_CLASS (POA_CORBA,IRObject) (rhs), +- TAO_ServantBase (rhs) +-{} +- +-// skeleton destructor +-POA_IR::ValueMemberDef::~ValueMemberDef (void) +-{ +-} +- +-void POA_IR::ValueMemberDef::_get_type_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- POA_IR::ValueMemberDef *_tao_impl = (POA_IR::ValueMemberDef *)_tao_object_reference; +- +- CORBA::TypeCode_var _tao_retval; +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::ValueMemberDef::TAO_ServerRequestInfo_IR_ValueMemberDef_type_get ri ( +- _tao_server_request, +- _tao_impl +- , +- ACE_TRY_ENV +- ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->type ( +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- CORBA::TypeCode_ptr _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << _tao_retval.in ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- +-} +- +-void POA_IR::ValueMemberDef::_get_type_def_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- POA_IR::ValueMemberDef *_tao_impl = (POA_IR::ValueMemberDef *)_tao_object_reference; +- +- IR::IDLType_var _tao_retval; +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::ValueMemberDef::TAO_ServerRequestInfo_IR_ValueMemberDef_type_def_get ri ( +- _tao_server_request, +- _tao_impl +- , +- ACE_TRY_ENV +- ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->type_def ( +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::IDLType_ptr _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << _tao_retval.in ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- +-} +- +-void POA_IR::ValueMemberDef::_set_type_def_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::ValueMemberDef *_tao_impl = (POA_IR::ValueMemberDef *)_tao_object_reference; +- +-_tao_server_request.argument_flag (0); +- IR::IDLType_var type_def; +- if (!( +- (_tao_in >> type_def.out ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::ValueMemberDef::TAO_ServerRequestInfo_IR_ValueMemberDef_type_def_set ri ( +- _tao_server_request, +- _tao_impl +- , +- type_def.in (), +- ACE_TRY_ENV +- ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- +- _tao_impl->type_def ( +- type_def.in (), +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +-} +- +-void POA_IR::ValueMemberDef::_get_access_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- POA_IR::ValueMemberDef *_tao_impl = (POA_IR::ValueMemberDef *)_tao_object_reference; +- +- CORBA::Visibility _tao_retval = 0; +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::ValueMemberDef::TAO_ServerRequestInfo_IR_ValueMemberDef_access_get ri ( +- _tao_server_request, +- _tao_impl +- , +- ACE_TRY_ENV +- ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->access ( +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- CORBA::Visibility _tao_retval_info = _tao_retval; +- ri.result (_tao_retval_info); +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << _tao_retval) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- +-} +- +-void POA_IR::ValueMemberDef::_set_access_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::ValueMemberDef *_tao_impl = (POA_IR::ValueMemberDef *)_tao_object_reference; +- +-_tao_server_request.argument_flag (0); +- CORBA::Visibility access; +- if (!( +- (_tao_in >> access) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::ValueMemberDef::TAO_ServerRequestInfo_IR_ValueMemberDef_access_set ri ( +- _tao_server_request, +- _tao_impl +- , +- access, +- ACE_TRY_ENV +- ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- +- _tao_impl->access ( +- access, +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +-} +- +-void POA_IR::ValueMemberDef::_is_a_skel ( +- TAO_ServerRequest &_tao_server_request, +- void * _tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::ValueMemberDef *_tao_impl = (POA_IR::ValueMemberDef *) _tao_object_reference; +- CORBA::Boolean _tao_retval = 0; +- CORBA::String_var value; +- if (!(_tao_in >> value.out ())) +- ACE_THROW (CORBA::MARSHAL ()); +- +- _tao_retval = _tao_impl->_is_a (value.in (), ACE_TRY_ENV); +- ACE_CHECK; +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) +- ACE_THROW (CORBA::MARSHAL ()); +-} +- +-void POA_IR::ValueMemberDef::_non_existent_skel ( +- TAO_ServerRequest &_tao_server_request, +- void * _tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- POA_IR::ValueMemberDef *_tao_impl = (POA_IR::ValueMemberDef *) _tao_object_reference; +- CORBA::Boolean _tao_retval = _tao_impl->_non_existent (ACE_TRY_ENV); +- ACE_CHECK; +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) +- ACE_THROW (CORBA::MARSHAL ()); +-} +- +-CORBA::Boolean POA_IR::ValueMemberDef::_is_a ( +- const char* value, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- if ( +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/ValueMemberDef:1.0")) || +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/Contained:1.0")) || +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/CORBA/IRObject:1.0")) || +- (!ACE_OS::strcmp ((char *)value, CORBA::_tc_Object->id (ACE_TRY_ENV)))) +- return 1; +- else +- return 0; +-} +- +-void* POA_IR::ValueMemberDef::_downcast ( +- const char* logical_type_id +- ) +-{ +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/ValueMemberDef:1.0") == 0) +- return ACE_static_cast (POA_IR::ValueMemberDef_ptr, this); +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Contained:1.0") == 0) +- return ACE_static_cast (POA_IR::Contained_ptr, this); +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/IRObject:1.0") == 0) +- return ACE_static_cast (POA_CORBA::IRObject_ptr, this); +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/Object:1.0") == 0) +- return ACE_static_cast(PortableServer::Servant, this); +- return 0; +-} +- +-void POA_IR::ValueMemberDef::_dispatch (TAO_ServerRequest &req, void *context, CORBA::Environment &ACE_TRY_ENV) +-{ +- this->synchronous_upcall_dispatch(req, context, this, ACE_TRY_ENV); +-} +- +-const char* POA_IR::ValueMemberDef::_interface_repository_id (void) const +-{ +- return "IDL:omg.org/IR/ValueMemberDef:1.0"; +-} +- +-IR::ValueMemberDef* +-POA_IR::ValueMemberDef::_this (CORBA_Environment &ACE_TRY_ENV) +-{ +- TAO_Stub *stub = this->_create_stub (ACE_TRY_ENV); +- ACE_CHECK_RETURN (0); +- +- CORBA::Object_ptr tmp = CORBA::Object::_nil (); +- +- if (stub->servant_orb_var ()->orb_core ()->optimize_collocation_objects ()) +- ACE_NEW_RETURN (tmp, CORBA::Object (stub, 1, this), 0); +- else +- ACE_NEW_RETURN (tmp, CORBA::Object (stub, 0, this), 0); +- +- CORBA::Object_var obj = tmp; +- return ::IR::ValueMemberDef::_unchecked_narrow (obj.in ()); +-} +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +-POA_IR::ValueMemberDef::TAO_ServerRequestInfo_IR_ValueMemberDef_type_get::TAO_ServerRequestInfo_IR_ValueMemberDef_type_get ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::ValueMemberDef *tao_impl +- , +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl) +-{} +- +-Dynamic::ParameterList * +-POA_IR::ValueMemberDef::TAO_ServerRequestInfo_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 * +-POA_IR::ValueMemberDef::TAO_ServerRequestInfo_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 * +-POA_IR::ValueMemberDef::TAO_ServerRequestInfo_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 (); +-} +- +-char * +-POA_IR::ValueMemberDef::TAO_ServerRequestInfo_IR_ValueMemberDef_type_get::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::ValueMemberDef::TAO_ServerRequestInfo_IR_ValueMemberDef_type_get::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-void +-POA_IR::ValueMemberDef::TAO_ServerRequestInfo_IR_ValueMemberDef_type_get::result (CORBA::TypeCode_ptr result) +-{ +- // Update the result. +- this->_result = result; +-} +- +-POA_IR::ValueMemberDef::TAO_ServerRequestInfo_IR_ValueMemberDef_type_def_get::TAO_ServerRequestInfo_IR_ValueMemberDef_type_def_get ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::ValueMemberDef *tao_impl +- , +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl) +-{} +- +-Dynamic::ParameterList * +-POA_IR::ValueMemberDef::TAO_ServerRequestInfo_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 * +-POA_IR::ValueMemberDef::TAO_ServerRequestInfo_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 * +-POA_IR::ValueMemberDef::TAO_ServerRequestInfo_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 (); +-} +- +-char * +-POA_IR::ValueMemberDef::TAO_ServerRequestInfo_IR_ValueMemberDef_type_def_get::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::ValueMemberDef::TAO_ServerRequestInfo_IR_ValueMemberDef_type_def_get::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-void +-POA_IR::ValueMemberDef::TAO_ServerRequestInfo_IR_ValueMemberDef_type_def_get::result (IR::IDLType_ptr result) +-{ +- // Update the result. +- this->_result = result; +-} +- +-POA_IR::ValueMemberDef::TAO_ServerRequestInfo_IR_ValueMemberDef_type_def_set::TAO_ServerRequestInfo_IR_ValueMemberDef_type_def_set ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::ValueMemberDef *tao_impl +- , +- IR::IDLType_ptr type_def, +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- type_def_ (type_def) +-{} +- +-Dynamic::ParameterList * +-POA_IR::ValueMemberDef::TAO_ServerRequestInfo_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 * +-POA_IR::ValueMemberDef::TAO_ServerRequestInfo_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 * +-POA_IR::ValueMemberDef::TAO_ServerRequestInfo_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; +-} +- +-char * +-POA_IR::ValueMemberDef::TAO_ServerRequestInfo_IR_ValueMemberDef_type_def_set::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::ValueMemberDef::TAO_ServerRequestInfo_IR_ValueMemberDef_type_def_set::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-POA_IR::ValueMemberDef::TAO_ServerRequestInfo_IR_ValueMemberDef_access_get::TAO_ServerRequestInfo_IR_ValueMemberDef_access_get ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::ValueMemberDef *tao_impl +- , +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl) +-{} +- +-Dynamic::ParameterList * +-POA_IR::ValueMemberDef::TAO_ServerRequestInfo_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 * +-POA_IR::ValueMemberDef::TAO_ServerRequestInfo_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 * +-POA_IR::ValueMemberDef::TAO_ServerRequestInfo_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 (); +-} +- +-char * +-POA_IR::ValueMemberDef::TAO_ServerRequestInfo_IR_ValueMemberDef_access_get::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::ValueMemberDef::TAO_ServerRequestInfo_IR_ValueMemberDef_access_get::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-void +-POA_IR::ValueMemberDef::TAO_ServerRequestInfo_IR_ValueMemberDef_access_get::result (CORBA::Visibility result) +-{ +- // Update the result. +- this->_result = result; +-} +- +-POA_IR::ValueMemberDef::TAO_ServerRequestInfo_IR_ValueMemberDef_access_set::TAO_ServerRequestInfo_IR_ValueMemberDef_access_set ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::ValueMemberDef *tao_impl +- , +- const CORBA::Visibility & access, +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- access_ (access) +-{} +- +-Dynamic::ParameterList * +-POA_IR::ValueMemberDef::TAO_ServerRequestInfo_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 * +-POA_IR::ValueMemberDef::TAO_ServerRequestInfo_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 * +-POA_IR::ValueMemberDef::TAO_ServerRequestInfo_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; +-} +- +-char * +-POA_IR::ValueMemberDef::TAO_ServerRequestInfo_IR_ValueMemberDef_access_set::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::ValueMemberDef::TAO_ServerRequestInfo_IR_ValueMemberDef_access_set::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-#endif /* TAO_HAS_INTERCEPTORS */ +-class TAO_IR_ValueDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable +-{ +-private: +- unsigned int hash (const char *str, unsigned int len); +-public: +- const TAO_operation_db_entry * lookup (const char *str, unsigned int len); +-}; +-/* starting time is 16:31:13 */ +-/* C++ code produced by gperf version 2.8 (ACE version) */ +-/* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_ValueDef_Perfect_Hash_OpTable -N lookup */ +-unsigned int +-TAO_IR_ValueDef_Perfect_Hash_OpTable::hash (const char *str, unsigned int len) +-{ +- static const unsigned char asso_values[] = +- { +-#if defined (ACE_MVS) +- 86, 86, 86, 86, 86, 86, 86, 86, 86, 86, +- 86, 86, 86, 86, 86, 86, 86, 86, 86, 86, +- 86, 86, 86, 86, 86, 86, 86, 86, 86, 86, +- 86, 86, 86, 86, 86, 86, 86, 86, 86, 86, +- 86, 86, 86, 86, 86, 86, 86, 86, 86, 86, +- 86, 86, 86, 86, 86, 86, 86, 86, 86, 86, +- 86, 86, 86, 86, 86, 86, 86, 86, 86, 86, +- 86, 86, 86, 86, 86, 86, 86, 86, 86, 86, +- 86, 86, 86, 86, 86, 86, 86, 86, 86, 86, +- 86, 86, 86, 86, 86, 86, 86, 86, 86, 86, +- 86, 86, 86, 86, 86, 86, 86, 86, 86, 0, +- 86, 86, 86, 86, 86, 86, 86, 86, 86, 86, +- 86, 86, 86, 86, 86, 86, 86, 86, 86, 0, +- 86, 50, 35, 0, 86, 86, 86, 20, 86, 86, +- 86, 86, 86, 86, 86, 86, 86, 0, 0, 15, +- 86, 0, 86, 0, 86, 86, 86, 86, 86, 86, +- 86, 86, 20, 20, 86, 86, 86, 5, 5, 86, +- 86, 86, 86, 86, 86, 86, 86, 86, 86, 86, +- 86, 86, 86, 86, 86, 86, 86, 86, 86, 86, +- 86, 86, 86, 86, 86, 86, 86, 86, 86, 86, +- 86, 86, 86, 86, 86, 86, 86, 86, 86, 86, +- 86, 86, 86, 86, 86, 86, 86, 86, 86, 86, +- 86, 86, 86, 86, 86, 86, 86, 86, 86, 86, +- 86, 86, 86, 86, 86, 86, 86, 86, 86, 86, +- 86, 86, 86, 86, 86, 86, 86, 86, 86, 86, +- 86, 86, 86, 86, 86, 86, +-#else +- 86, 86, 86, 86, 86, 86, 86, 86, 86, 86, +- 86, 86, 86, 86, 86, 86, 86, 86, 86, 86, +- 86, 86, 86, 86, 86, 86, 86, 86, 86, 86, +- 86, 86, 86, 86, 86, 86, 86, 86, 86, 86, +- 86, 86, 86, 86, 86, 86, 86, 86, 86, 86, +- 86, 86, 86, 86, 86, 86, 86, 86, 86, 86, +- 86, 86, 86, 86, 86, 86, 86, 86, 86, 86, +- 86, 86, 86, 86, 86, 86, 86, 86, 86, 86, +- 86, 86, 86, 86, 86, 86, 86, 86, 86, 86, +- 86, 86, 86, 86, 86, 0, 86, 0, 86, 50, +- 35, 0, 86, 86, 86, 20, 86, 86, 0, 0, +- 15, 86, 0, 86, 0, 20, 20, 86, 86, 86, +- 5, 5, 86, 86, 86, 86, 86, 86, +-#endif /* ACE_MVS */ +- }; +- return len + asso_values[str[len - 1]] + asso_values[str[0]]; +-} +- +-const class TAO_operation_db_entry * +-TAO_IR_ValueDef_Perfect_Hash_OpTable::lookup (const char *str, unsigned int len) +-{ +- enum +- { +- TOTAL_KEYWORDS = 49, +- MIN_WORD_LENGTH = 4, +- MAX_WORD_LENGTH = 26, +- MIN_HASH_VALUE = 4, +- MAX_HASH_VALUE = 85, +- HASH_VALUE_RANGE = 82, +- DUPLICATES = 16 +- }; +- +- static const class TAO_operation_db_entry wordlist[] = +- { +- {"",0},{"",0},{"",0},{"",0}, +- {"move", &POA_IR::ValueDef::move_skel}, +- {"_is_a", &POA_IR::ValueDef::_is_a_skel}, +- {"lookup", &POA_IR::ValueDef::lookup_skel}, +- {"_get_name", &POA_IR::ValueDef::_get_name_skel}, +- {"_get_type", &POA_IR::ValueDef::_get_type_skel}, +- {"_set_name", &POA_IR::ValueDef::_set_name_skel}, +- {"lookup_name", &POA_IR::ValueDef::lookup_name_skel}, +- {"_get_is_custom", &POA_IR::ValueDef::_get_is_custom_skel}, +- {"_set_is_custom", &POA_IR::ValueDef::_set_is_custom_skel}, +- {"_get_base_value", &POA_IR::ValueDef::_get_base_value_skel}, +- {"_set_base_value", &POA_IR::ValueDef::_set_base_value_skel}, +- {"_get_absolute_name", &POA_IR::ValueDef::_get_absolute_name_skel}, +- {"_get_is_truncatable", &POA_IR::ValueDef::_get_is_truncatable_skel}, +- {"_set_is_truncatable", &POA_IR::ValueDef::_set_is_truncatable_skel}, +- {"is_a", &POA_IR::ValueDef::is_a_skel}, +- {"_get_version", &POA_IR::ValueDef::_get_version_skel}, +- {"_set_version", &POA_IR::ValueDef::_set_version_skel}, +- {"_get_defined_in", &POA_IR::ValueDef::_get_defined_in_skel}, +- {"_get_containing_repository", &POA_IR::ValueDef::_get_containing_repository_skel}, +- {"_non_existent", &POA_IR::ValueDef::_non_existent_skel}, +- {"_get_is_abstract", &POA_IR::ValueDef::_get_is_abstract_skel}, +- {"_set_is_abstract", &POA_IR::ValueDef::_set_is_abstract_skel}, +- {"_get_initializers", &POA_IR::ValueDef::_get_initializers_skel}, +- {"_set_initializers", &POA_IR::ValueDef::_set_initializers_skel}, +- {"_get_id", &POA_IR::ValueDef::_get_id_skel}, +- {"_set_id", &POA_IR::ValueDef::_set_id_skel}, +- {"describe", &POA_IR::ValueDef::describe_skel}, +- {"_get_supported_interfaces", &POA_IR::ValueDef::_get_supported_interfaces_skel}, +- {"_set_abstract_base_values", &POA_IR::ValueDef::_set_abstract_base_values_skel}, +- {"_get_abstract_base_values", &POA_IR::ValueDef::_get_abstract_base_values_skel}, +- {"_set_supported_interfaces", &POA_IR::ValueDef::_set_supported_interfaces_skel}, +- {"destroy", &POA_IR::ValueDef::destroy_skel}, +- {"_get_def_kind", &POA_IR::ValueDef::_get_def_kind_skel}, +- {"create_enum", &POA_IR::ValueDef::create_enum_skel}, +- {"create_value", &POA_IR::ValueDef::create_value_skel}, +- {"create_module", &POA_IR::ValueDef::create_module_skel}, +- {"create_native", &POA_IR::ValueDef::create_native_skel}, +- {"create_attribute", &POA_IR::ValueDef::create_attribute_skel}, +- {"create_interface", &POA_IR::ValueDef::create_interface_skel}, +- {"create_value_member", &POA_IR::ValueDef::create_value_member_skel}, +- {"create_value_box", &POA_IR::ValueDef::create_value_box_skel}, +- {"describe_contents", &POA_IR::ValueDef::describe_contents_skel}, +- {"create_union", &POA_IR::ValueDef::create_union_skel}, +- {"contents", &POA_IR::ValueDef::contents_skel}, +- {"create_operation", &POA_IR::ValueDef::create_operation_skel}, +- {"create_exception", &POA_IR::ValueDef::create_exception_skel}, +- {"create_alias", &POA_IR::ValueDef::create_alias_skel}, +- {"create_struct", &POA_IR::ValueDef::create_struct_skel}, +- {"create_constant", &POA_IR::ValueDef::create_constant_skel}, +- }; +- +- static const signed char lookup[] = +- { +- -1, -1, -7, -3, 4, 5, 6, -11, -2, -92, -1, 10, -13, -2, +- -92, -88, -16, -2, 15, -88, -1, -1, -1, -1, 18, -19, -2, -87, +- -24, -2, 21, 22, -1, 23, -26, -2, -93, -88, -28, -2, -31, -4, +- -89, 30, -1, -90, -1, 35, 36, -1, -1, -1, -1, -1, -1, -1, +- -1, -1, -1, -39, -2, 37, 38, -89, -41, -2, -87, -1, -1, 43, +- -1, 44, 45, -1, -1, -1, -1, 46, 47, -48, -2, -87, 50, 51, +- -1, 52, +- }; +- +- if (len <= MAX_WORD_LENGTH && len >= MIN_WORD_LENGTH) +- { +- unsigned int key = hash (str, len); +- +- if (key <= MAX_HASH_VALUE && key >= MIN_HASH_VALUE) +- { +- int slot = lookup[key]; +- +- if (slot >= 0 && slot < MAX_HASH_VALUE) +- { +- const char *s = wordlist[slot].opname_; +- +- if (*str == *s && !strncmp (str + 1, s + 1, len - 1)) +- return &wordlist[slot]; +- } +- else if (slot < 0 && slot >= -MAX_HASH_VALUE) +- return 0; +- else +- { +- unsigned int offset = key + slot + (slot > 0 ? -MAX_HASH_VALUE : MAX_HASH_VALUE); +- const class TAO_operation_db_entry *base = &wordlist[-lookup[offset]]; +- const class TAO_operation_db_entry *ptr = base + -lookup[offset + 1]; +- +- while (--ptr >= base) +- if (*str == *ptr->opname_ && !strncmp (str + 1, ptr->opname_ + 1, len - 1)) +- return ptr; +- } +- } +- } +- return 0; +-} +-/* ending time is 16:31:13 */ +-static TAO_IR_ValueDef_Perfect_Hash_OpTable tao_IR_ValueDef_optable; +- +- +-/////////////////////////////////////////////////////////////////////// +-// Strategized Proxy Broker Implementation +-// +- +-// Factory function Implementation. +-POA_IR::_TAO_ValueDef_Strategized_Proxy_Broker *POA_IR::_TAO_ValueDef_Strategized_Proxy_Broker::the_TAO_ValueDef_Strategized_Proxy_Broker (void) +-{ +- static POA_IR::_TAO_ValueDef_Strategized_Proxy_Broker strategized_proxy_broker; +- return &strategized_proxy_broker; +-} +- +-POA_IR::_TAO_ValueDef_Strategized_Proxy_Broker::_TAO_ValueDef_Strategized_Proxy_Broker (void) +-{ +- for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) +- this->proxy_cache_[i] = 0; +- +-} +- +-POA_IR::_TAO_ValueDef_Strategized_Proxy_Broker::~_TAO_ValueDef_Strategized_Proxy_Broker (void) +-{ +- for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) +- delete this->proxy_cache_[i]; +- +-} +- +-IR::_TAO_ValueDef_Proxy_Impl& +-POA_IR::_TAO_ValueDef_Strategized_Proxy_Broker::select_proxy ( +- ::IR::ValueDef *object, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- TAO_ORB_Core::TAO_Collocation_Strategies strategy = +- TAO_ORB_Core::collocation_strategy (object); +- +- if (this->proxy_cache_[strategy] != 0) +- return *this->proxy_cache_[strategy]; +- +- this->create_proxy (strategy, ACE_TRY_ENV); +- ACE_CHECK_RETURN (*this->proxy_cache_[strategy]); +- +- return *this->proxy_cache_[strategy]; +- +-} +- +-void +-POA_IR::_TAO_ValueDef_Strategized_Proxy_Broker::create_proxy ( +- TAO_ORB_Core::TAO_Collocation_Strategies strategy, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- ACE_GUARD (TAO_SYNCH_MUTEX, guard, this->mutex_); +- +- if (this->proxy_cache_[strategy] == 0) +- { +- switch (strategy) +- { +- case TAO_ORB_Core::THRU_POA_STRATEGY: +- ACE_NEW_THROW_EX ( +- this->proxy_cache_[strategy], +- POA_IR::_TAO_ValueDef_ThruPOA_Proxy_Impl, +- CORBA::NO_MEMORY () +- ); +- ACE_CHECK; +- break; +- +- case TAO_ORB_Core::REMOTE_STRATEGY: +- default: +- ACE_NEW_THROW_EX ( +- this->proxy_cache_[strategy], +- ::IR::_TAO_ValueDef_Remote_Proxy_Impl, +- CORBA::NO_MEMORY () +- ); +- ACE_CHECK; +- break; +- +- } +- +- } +-} +- +- +-// +-// End Strategized Proxy Broker Implementation +-/////////////////////////////////////////////////////////////////////// +- +- +-IR::_TAO_ValueDef_Proxy_Broker * +-IR__TAO_ValueDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) +-{ +- ACE_UNUSED_ARG (obj); +- return ::POA_IR::_TAO_ValueDef_Strategized_Proxy_Broker::the_TAO_ValueDef_Strategized_Proxy_Broker(); +-} +- +-int +-IR__TAO_ValueDef_Proxy_Broker_Factory_Initializer (long _dummy_) +-{ +- ACE_UNUSED_ARG (_dummy_); +- +- IR__TAO_ValueDef_Proxy_Broker_Factory_function_pointer = +- IR__TAO_ValueDef_Proxy_Broker_Factory_function; +- +- return 0; +-} +- +-static int IR__TAO_ValueDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = +- IR__TAO_ValueDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, IR__TAO_ValueDef_Proxy_Broker_Factory_Initializer)); +- +- +-/////////////////////////////////////////////////////////////////////// +-// ThruPOA Proxy Implementation +-// +- +-POA_IR::_TAO_ValueDef_ThruPOA_Proxy_Impl::_TAO_ValueDef_ThruPOA_Proxy_Impl (void) +-{} +- +-// ThruPOA Implementation of the IDL interface methods +- +-IR::InterfaceDefSeq * POA_IR::_TAO_ValueDef_ThruPOA_Proxy_Impl::supported_interfaces ( +- CORBA_Object *_collocated_tao_target_, +- CORBA::Environment &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) +-{ +- IR::InterfaceDefSeq_var _tao_retval; +- ACE_UNUSED_ARG (_tao_retval); +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "supported_interfaces", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK_RETURN (0); +- return ACE_reinterpret_cast ( +- POA_IR::ValueDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/ValueDef:1.0" +- ) +- )->supported_interfaces ( +- ACE_TRY_ENV +- ); +-} +- +-void POA_IR::_TAO_ValueDef_ThruPOA_Proxy_Impl::supported_interfaces ( +- CORBA_Object *_collocated_tao_target_, +- const IR::InterfaceDefSeq & supported_interfaces, +- CORBA::Environment &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) +-{ +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "supported_interfaces", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK; +- ACE_reinterpret_cast ( +- POA_IR::ValueDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/ValueDef:1.0" +- ) +- )->supported_interfaces ( +- supported_interfaces, +- ACE_TRY_ENV +- ); +- return; +-} +- -IR::InitializerSeq * POA_IR::_TAO_ValueDef_ThruPOA_Proxy_Impl::initializers ( -+IR_InitializerSeq * POA_IR::_TAO_ValueDef_ThruPOA_Proxy_Impl::initializers ( - CORBA_Object *_collocated_tao_target_, - CORBA::Environment &ACE_TRY_ENV - ) -@@ -31321,7 +31204,7 @@ - CORBA::SystemException - )) - { +- CORBA_Object *_collocated_tao_target_, +- CORBA::Environment &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) +-{ - IR::InitializerSeq_var _tao_retval; -+ IR_InitializerSeq_var _tao_retval; - ACE_UNUSED_ARG (_tao_retval); - TAO_Object_Adapter::Servant_Upcall servant_upcall ( - _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -31346,7 +31229,7 @@ - - void POA_IR::_TAO_ValueDef_ThruPOA_Proxy_Impl::initializers ( - CORBA_Object *_collocated_tao_target_, +- ACE_UNUSED_ARG (_tao_retval); +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "initializers", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK_RETURN (0); +- return ACE_reinterpret_cast ( +- POA_IR::ValueDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/ValueDef:1.0" +- ) +- )->initializers ( +- ACE_TRY_ENV +- ); +-} +- +-void POA_IR::_TAO_ValueDef_ThruPOA_Proxy_Impl::initializers ( +- CORBA_Object *_collocated_tao_target_, +- const IR::InitializerSeq & initializers, +- CORBA::Environment &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) +-{ +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "initializers", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK; +- ACE_reinterpret_cast ( +- POA_IR::ValueDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/ValueDef:1.0" +- ) +- )->initializers ( +- initializers, +- ACE_TRY_ENV +- ); +- return; +-} +- +-IR::ValueDef_ptr POA_IR::_TAO_ValueDef_ThruPOA_Proxy_Impl::base_value ( +- CORBA_Object *_collocated_tao_target_, +- CORBA::Environment &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) +-{ +- IR::ValueDef_var _tao_retval; +- ACE_UNUSED_ARG (_tao_retval); +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "base_value", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK_RETURN (0); +- return ACE_reinterpret_cast ( +- POA_IR::ValueDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/ValueDef:1.0" +- ) +- )->base_value ( +- ACE_TRY_ENV +- ); +-} +- +-void POA_IR::_TAO_ValueDef_ThruPOA_Proxy_Impl::base_value ( +- CORBA_Object *_collocated_tao_target_, +- IR::ValueDef_ptr base_value, +- CORBA::Environment &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) +-{ +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "base_value", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK; +- ACE_reinterpret_cast ( +- POA_IR::ValueDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/ValueDef:1.0" +- ) +- )->base_value ( +- base_value, +- ACE_TRY_ENV +- ); +- return; +-} +- +-IR::ValueDefSeq * POA_IR::_TAO_ValueDef_ThruPOA_Proxy_Impl::abstract_base_values ( +- CORBA_Object *_collocated_tao_target_, +- CORBA::Environment &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) +-{ +- IR::ValueDefSeq_var _tao_retval; +- ACE_UNUSED_ARG (_tao_retval); +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "abstract_base_values", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK_RETURN (0); +- return ACE_reinterpret_cast ( +- POA_IR::ValueDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/ValueDef:1.0" +- ) +- )->abstract_base_values ( +- ACE_TRY_ENV +- ); +-} +- +-void POA_IR::_TAO_ValueDef_ThruPOA_Proxy_Impl::abstract_base_values ( +- CORBA_Object *_collocated_tao_target_, +- const IR::ValueDefSeq & abstract_base_values, +- CORBA::Environment &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) +-{ +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "abstract_base_values", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK; +- ACE_reinterpret_cast ( +- POA_IR::ValueDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/ValueDef:1.0" +- ) +- )->abstract_base_values ( +- abstract_base_values, +- ACE_TRY_ENV +- ); +- return; +-} +- +-CORBA::Boolean POA_IR::_TAO_ValueDef_ThruPOA_Proxy_Impl::is_abstract ( +- CORBA_Object *_collocated_tao_target_, +- CORBA::Environment &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) +-{ +- CORBA::Boolean _tao_retval = 0; +- ACE_UNUSED_ARG (_tao_retval); +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "is_abstract", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK_RETURN (_tao_retval); +- return ACE_reinterpret_cast ( +- POA_IR::ValueDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/ValueDef:1.0" +- ) +- )->is_abstract ( +- ACE_TRY_ENV +- ); +-} +- +-void POA_IR::_TAO_ValueDef_ThruPOA_Proxy_Impl::is_abstract ( +- CORBA_Object *_collocated_tao_target_, +- CORBA::Boolean is_abstract, +- CORBA::Environment &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) +-{ +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "is_abstract", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK; +- ACE_reinterpret_cast ( +- POA_IR::ValueDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/ValueDef:1.0" +- ) +- )->is_abstract ( +- is_abstract, +- ACE_TRY_ENV +- ); +- return; +-} +- +-CORBA::Boolean POA_IR::_TAO_ValueDef_ThruPOA_Proxy_Impl::is_custom ( +- CORBA_Object *_collocated_tao_target_, +- CORBA::Environment &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) +-{ +- CORBA::Boolean _tao_retval = 0; +- ACE_UNUSED_ARG (_tao_retval); +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "is_custom", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK_RETURN (_tao_retval); +- return ACE_reinterpret_cast ( +- POA_IR::ValueDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/ValueDef:1.0" +- ) +- )->is_custom ( +- ACE_TRY_ENV +- ); +-} +- +-void POA_IR::_TAO_ValueDef_ThruPOA_Proxy_Impl::is_custom ( +- CORBA_Object *_collocated_tao_target_, +- CORBA::Boolean is_custom, +- CORBA::Environment &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) +-{ +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "is_custom", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK; +- ACE_reinterpret_cast ( +- POA_IR::ValueDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/ValueDef:1.0" +- ) +- )->is_custom ( +- is_custom, +- ACE_TRY_ENV +- ); +- return; +-} +- +-CORBA::Boolean POA_IR::_TAO_ValueDef_ThruPOA_Proxy_Impl::is_truncatable ( +- CORBA_Object *_collocated_tao_target_, +- CORBA::Environment &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) +-{ +- CORBA::Boolean _tao_retval = 0; +- ACE_UNUSED_ARG (_tao_retval); +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "is_truncatable", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK_RETURN (_tao_retval); +- return ACE_reinterpret_cast ( +- POA_IR::ValueDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/ValueDef:1.0" +- ) +- )->is_truncatable ( +- ACE_TRY_ENV +- ); +-} +- +-void POA_IR::_TAO_ValueDef_ThruPOA_Proxy_Impl::is_truncatable ( +- CORBA_Object *_collocated_tao_target_, +- CORBA::Boolean is_truncatable, +- CORBA::Environment &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) +-{ +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "is_truncatable", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK; +- ACE_reinterpret_cast ( +- POA_IR::ValueDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/ValueDef:1.0" +- ) +- )->is_truncatable ( +- is_truncatable, +- ACE_TRY_ENV +- ); +- return; +-} +- +-CORBA::Boolean POA_IR::_TAO_ValueDef_ThruPOA_Proxy_Impl::is_a ( +- CORBA_Object *_collocated_tao_target_, +- const char * id, +- CORBA::Environment &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) +-{ +- CORBA::Boolean _tao_retval = 0; +- ACE_UNUSED_ARG (_tao_retval); +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "is_a", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK_RETURN (_tao_retval); +- return ACE_reinterpret_cast ( +- POA_IR::ValueDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/ValueDef:1.0" +- ) +- )->is_a ( +- id, +- ACE_TRY_ENV +- ); +-} +- +-IR::ValueMemberDef_ptr POA_IR::_TAO_ValueDef_ThruPOA_Proxy_Impl::create_value_member ( +- CORBA_Object *_collocated_tao_target_, +- const char * id, +- const char * name, +- const char * version, +- IR::IDLType_ptr type, +- CORBA::Visibility access, +- CORBA::Environment &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) +-{ +- IR::ValueMemberDef_var _tao_retval; +- ACE_UNUSED_ARG (_tao_retval); +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "create_value_member", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK_RETURN (0); +- return ACE_reinterpret_cast ( +- POA_IR::ValueDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/ValueDef:1.0" +- ) +- )->create_value_member ( +- id, +- name, +- version, +- type, +- access, +- ACE_TRY_ENV +- ); +-} +- +-IR::AttributeDef_ptr POA_IR::_TAO_ValueDef_ThruPOA_Proxy_Impl::create_attribute ( +- CORBA_Object *_collocated_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 &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) +-{ +- IR::AttributeDef_var _tao_retval; +- ACE_UNUSED_ARG (_tao_retval); +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "create_attribute", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK_RETURN (0); +- return ACE_reinterpret_cast ( +- POA_IR::ValueDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/ValueDef:1.0" +- ) +- )->create_attribute ( +- id, +- name, +- version, +- type, +- mode, +- get_exceptions, +- put_exceptions, +- ACE_TRY_ENV +- ); +-} +- +-IR::OperationDef_ptr POA_IR::_TAO_ValueDef_ThruPOA_Proxy_Impl::create_operation ( +- CORBA_Object *_collocated_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 &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) +-{ +- IR::OperationDef_var _tao_retval; +- ACE_UNUSED_ARG (_tao_retval); +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "create_operation", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK_RETURN (0); +- return ACE_reinterpret_cast ( +- POA_IR::ValueDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/ValueDef:1.0" +- ) +- )->create_operation ( +- id, +- name, +- version, +- result, +- mode, +- params, +- exceptions, +- contexts, +- ACE_TRY_ENV +- ); +-} +- +-// +-// End ThruPOA Proxy Implementation +-/////////////////////////////////////////////////////////////////////// +- +-// skeleton constructor +-POA_IR::ValueDef::ValueDef (void) +-{ +- this->optable_ = &tao_IR_ValueDef_optable; +-} +- +-// copy ctor +-POA_IR::ValueDef::ValueDef (const ValueDef& rhs) +- : ACE_NESTED_CLASS (POA_IR,Container) (rhs), +- ACE_NESTED_CLASS (POA_IR,Contained) (rhs), +- ACE_NESTED_CLASS (POA_IR,IDLType) (rhs), +- ACE_NESTED_CLASS (POA_CORBA,IRObject) (rhs), +- TAO_ServantBase (rhs) +-{} +- +-// skeleton destructor +-POA_IR::ValueDef::~ValueDef (void) +-{ +-} +- +-void POA_IR::ValueDef::_get_supported_interfaces_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- POA_IR::ValueDef *_tao_impl = (POA_IR::ValueDef *)_tao_object_reference; +- +- IR::InterfaceDefSeq_var _tao_retval; +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_supported_interfaces_get ri ( +- _tao_server_request, +- _tao_impl +- , +- ACE_TRY_ENV +- ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->supported_interfaces ( +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::InterfaceDefSeq * _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << _tao_retval.in ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- +-} +- +-void POA_IR::ValueDef::_set_supported_interfaces_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::ValueDef *_tao_impl = (POA_IR::ValueDef *)_tao_object_reference; +- +-_tao_server_request.argument_flag (0); +- IR::InterfaceDefSeq supported_interfaces; +- if (!( +- (_tao_in >> supported_interfaces) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_supported_interfaces_set ri ( +- _tao_server_request, +- _tao_impl +- , +- supported_interfaces, +- ACE_TRY_ENV +- ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- +- _tao_impl->supported_interfaces ( +- supported_interfaces, +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +-} +- +-void POA_IR::ValueDef::_get_initializers_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- POA_IR::ValueDef *_tao_impl = (POA_IR::ValueDef *)_tao_object_reference; +- +- IR::InitializerSeq_var _tao_retval; +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_initializers_get ri ( +- _tao_server_request, +- _tao_impl +- , +- ACE_TRY_ENV +- ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->initializers ( +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::InitializerSeq * _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << _tao_retval.in ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- +-} +- +-void POA_IR::ValueDef::_set_initializers_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::ValueDef *_tao_impl = (POA_IR::ValueDef *)_tao_object_reference; +- +-_tao_server_request.argument_flag (0); +- IR::InitializerSeq initializers; +- if (!( +- (_tao_in >> initializers) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_initializers_set ri ( +- _tao_server_request, +- _tao_impl +- , +- initializers, +- ACE_TRY_ENV +- ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- +- _tao_impl->initializers ( +- initializers, +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +-} +- +-void POA_IR::ValueDef::_get_base_value_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- POA_IR::ValueDef *_tao_impl = (POA_IR::ValueDef *)_tao_object_reference; +- +- IR::ValueDef_var _tao_retval; +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_base_value_get ri ( +- _tao_server_request, +- _tao_impl +- , +- ACE_TRY_ENV +- ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->base_value ( +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::ValueDef_ptr _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << _tao_retval.in ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- +-} +- +-void POA_IR::ValueDef::_set_base_value_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::ValueDef *_tao_impl = (POA_IR::ValueDef *)_tao_object_reference; +- +-_tao_server_request.argument_flag (0); +- IR::ValueDef_var base_value; +- if (!( +- (_tao_in >> base_value.out ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_base_value_set ri ( +- _tao_server_request, +- _tao_impl +- , +- base_value.in (), +- ACE_TRY_ENV +- ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- +- _tao_impl->base_value ( +- base_value.in (), +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +-} +- +-void POA_IR::ValueDef::_get_abstract_base_values_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- POA_IR::ValueDef *_tao_impl = (POA_IR::ValueDef *)_tao_object_reference; +- +- IR::ValueDefSeq_var _tao_retval; +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_abstract_base_values_get ri ( +- _tao_server_request, +- _tao_impl +- , +- ACE_TRY_ENV +- ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->abstract_base_values ( +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::ValueDefSeq * _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << _tao_retval.in ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- +-} +- +-void POA_IR::ValueDef::_set_abstract_base_values_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::ValueDef *_tao_impl = (POA_IR::ValueDef *)_tao_object_reference; +- +-_tao_server_request.argument_flag (0); +- IR::ValueDefSeq abstract_base_values; +- if (!( +- (_tao_in >> abstract_base_values) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_abstract_base_values_set ri ( +- _tao_server_request, +- _tao_impl +- , +- abstract_base_values, +- ACE_TRY_ENV +- ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- +- _tao_impl->abstract_base_values ( +- abstract_base_values, +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +-} +- +-void POA_IR::ValueDef::_get_is_abstract_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- POA_IR::ValueDef *_tao_impl = (POA_IR::ValueDef *)_tao_object_reference; +- +- CORBA::Boolean _tao_retval = 0; +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_is_abstract_get ri ( +- _tao_server_request, +- _tao_impl +- , +- ACE_TRY_ENV +- ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->is_abstract ( +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- CORBA::Boolean _tao_retval_info = _tao_retval; +- ri.result (_tao_retval_info); +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << CORBA::Any::from_boolean (_tao_retval)) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- +-} +- +-void POA_IR::ValueDef::_set_is_abstract_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::ValueDef *_tao_impl = (POA_IR::ValueDef *)_tao_object_reference; +- +-_tao_server_request.argument_flag (0); +- CORBA::Boolean is_abstract; +- if (!( +- (_tao_in >> CORBA::Any::to_boolean (is_abstract)) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_is_abstract_set ri ( +- _tao_server_request, +- _tao_impl +- , +- is_abstract, +- ACE_TRY_ENV +- ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- +- _tao_impl->is_abstract ( +- is_abstract, +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +-} +- +-void POA_IR::ValueDef::_get_is_custom_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- POA_IR::ValueDef *_tao_impl = (POA_IR::ValueDef *)_tao_object_reference; +- +- CORBA::Boolean _tao_retval = 0; +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_is_custom_get ri ( +- _tao_server_request, +- _tao_impl +- , +- ACE_TRY_ENV +- ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->is_custom ( +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- CORBA::Boolean _tao_retval_info = _tao_retval; +- ri.result (_tao_retval_info); +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << CORBA::Any::from_boolean (_tao_retval)) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- +-} +- +-void POA_IR::ValueDef::_set_is_custom_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::ValueDef *_tao_impl = (POA_IR::ValueDef *)_tao_object_reference; +- +-_tao_server_request.argument_flag (0); +- CORBA::Boolean is_custom; +- if (!( +- (_tao_in >> CORBA::Any::to_boolean (is_custom)) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_is_custom_set ri ( +- _tao_server_request, +- _tao_impl +- , +- is_custom, +- ACE_TRY_ENV +- ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- +- _tao_impl->is_custom ( +- is_custom, +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +-} +- +-void POA_IR::ValueDef::_get_is_truncatable_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- POA_IR::ValueDef *_tao_impl = (POA_IR::ValueDef *)_tao_object_reference; +- +- CORBA::Boolean _tao_retval = 0; +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_is_truncatable_get ri ( +- _tao_server_request, +- _tao_impl +- , +- ACE_TRY_ENV +- ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->is_truncatable ( +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- CORBA::Boolean _tao_retval_info = _tao_retval; +- ri.result (_tao_retval_info); +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << CORBA::Any::from_boolean (_tao_retval)) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- +-} +- +-void POA_IR::ValueDef::_set_is_truncatable_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::ValueDef *_tao_impl = (POA_IR::ValueDef *)_tao_object_reference; +- +-_tao_server_request.argument_flag (0); +- CORBA::Boolean is_truncatable; +- if (!( +- (_tao_in >> CORBA::Any::to_boolean (is_truncatable)) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_is_truncatable_set ri ( +- _tao_server_request, +- _tao_impl +- , +- is_truncatable, +- ACE_TRY_ENV +- ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- +- _tao_impl->is_truncatable ( +- is_truncatable, +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +-} +- +-void POA_IR::ValueDef::is_a_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::ValueDef *_tao_impl = (POA_IR::ValueDef *)_tao_object_reference; +- +- CORBA::Boolean _tao_retval = 0; +- CORBA::String_var id; +- if (!( +- (_tao_in >> id.out ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_is_a ri ( +- _tao_server_request, +- _tao_impl +- , +- id.in (), +- ACE_TRY_ENV +- ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->is_a ( +- id.in (), +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- CORBA::Boolean _tao_retval_info = _tao_retval; +- ri.result (_tao_retval_info); +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << CORBA::Any::from_boolean (_tao_retval)) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- +-} +- +-void POA_IR::ValueDef::create_value_member_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::ValueDef *_tao_impl = (POA_IR::ValueDef *)_tao_object_reference; +- +- IR::ValueMemberDef_var _tao_retval; +- CORBA::String_var id; +- CORBA::String_var name; +- CORBA::String_var version; +- IR::IDLType_var type; +- CORBA::Visibility access; +- if (!( +- (_tao_in >> id.out ()) && +- (_tao_in >> name.out ()) && +- (_tao_in >> version.out ()) && +- (_tao_in >> type.out ()) && +- (_tao_in >> access) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_create_value_member ri ( +- _tao_server_request, +- _tao_impl +- , +- id.in (), +- name.in (), +- version.in (), +- type.in (), +- access, +- ACE_TRY_ENV +- ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->create_value_member ( +- id.in (), +- name.in (), +- version.in (), +- type.in (), +- access, +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::ValueMemberDef_ptr _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << _tao_retval.in ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- +-} +- +-void POA_IR::ValueDef::create_attribute_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::ValueDef *_tao_impl = (POA_IR::ValueDef *)_tao_object_reference; +- +- IR::AttributeDef_var _tao_retval; +- CORBA::String_var id; +- CORBA::String_var name; +- CORBA::String_var version; +- IR::IDLType_var type; +- IR::AttributeMode mode; +- IR::ExceptionDefSeq get_exceptions; +- IR::ExceptionDefSeq put_exceptions; +- if (!( +- (_tao_in >> id.out ()) && +- (_tao_in >> name.out ()) && +- (_tao_in >> version.out ()) && +- (_tao_in >> type.out ()) && +- (_tao_in >> mode) && +- (_tao_in >> get_exceptions) && +- (_tao_in >> put_exceptions) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_create_attribute ri ( +- _tao_server_request, +- _tao_impl +- , +- id.in (), +- name.in (), +- version.in (), +- type.in (), +- mode, +- get_exceptions, +- put_exceptions, +- ACE_TRY_ENV +- ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->create_attribute ( +- id.in (), +- name.in (), +- version.in (), +- type.in (), +- mode, +- get_exceptions, +- put_exceptions, +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::AttributeDef_ptr _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << _tao_retval.in ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- +-} +- +-void POA_IR::ValueDef::create_operation_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::ValueDef *_tao_impl = (POA_IR::ValueDef *)_tao_object_reference; +- +- IR::OperationDef_var _tao_retval; +- CORBA::String_var id; +- CORBA::String_var name; +- CORBA::String_var version; +- IR::IDLType_var result; +- IR::OperationMode mode; +- IR::ParDescriptionSeq params; +- IR::ExceptionDefSeq exceptions; +- IR::ContextIdSeq contexts; +- if (!( +- (_tao_in >> id.out ()) && +- (_tao_in >> name.out ()) && +- (_tao_in >> version.out ()) && +- (_tao_in >> result.out ()) && +- (_tao_in >> mode) && +- (_tao_in >> params) && +- (_tao_in >> exceptions) && +- (_tao_in >> contexts) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_create_operation ri ( +- _tao_server_request, +- _tao_impl +- , +- id.in (), +- name.in (), +- version.in (), +- result.in (), +- mode, +- params, +- exceptions, +- contexts, +- ACE_TRY_ENV +- ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->create_operation ( +- id.in (), +- name.in (), +- version.in (), +- result.in (), +- mode, +- params, +- exceptions, +- contexts, +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::OperationDef_ptr _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << _tao_retval.in ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- +-} +- +-void POA_IR::ValueDef::_is_a_skel ( +- TAO_ServerRequest &_tao_server_request, +- void * _tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::ValueDef *_tao_impl = (POA_IR::ValueDef *) _tao_object_reference; +- CORBA::Boolean _tao_retval = 0; +- CORBA::String_var value; +- if (!(_tao_in >> value.out ())) +- ACE_THROW (CORBA::MARSHAL ()); +- +- _tao_retval = _tao_impl->_is_a (value.in (), ACE_TRY_ENV); +- ACE_CHECK; +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) +- ACE_THROW (CORBA::MARSHAL ()); +-} +- +-void POA_IR::ValueDef::_non_existent_skel ( +- TAO_ServerRequest &_tao_server_request, +- void * _tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- POA_IR::ValueDef *_tao_impl = (POA_IR::ValueDef *) _tao_object_reference; +- CORBA::Boolean _tao_retval = _tao_impl->_non_existent (ACE_TRY_ENV); +- ACE_CHECK; +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) +- ACE_THROW (CORBA::MARSHAL ()); +-} +- +-CORBA::Boolean POA_IR::ValueDef::_is_a ( +- const char* value, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- if ( +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/ValueDef:1.0")) || +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/Container:1.0")) || +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/Contained:1.0")) || +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/IDLType:1.0")) || +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/CORBA/IRObject:1.0")) || +- (!ACE_OS::strcmp ((char *)value, CORBA::_tc_Object->id (ACE_TRY_ENV)))) +- return 1; +- else +- return 0; +-} +- +-void* POA_IR::ValueDef::_downcast ( +- const char* logical_type_id +- ) +-{ +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/ValueDef:1.0") == 0) +- return ACE_static_cast (POA_IR::ValueDef_ptr, this); +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Container:1.0") == 0) +- return ACE_static_cast (POA_IR::Container_ptr, this); +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Contained:1.0") == 0) +- return ACE_static_cast (POA_IR::Contained_ptr, this); +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/IDLType:1.0") == 0) +- return ACE_static_cast (POA_IR::IDLType_ptr, this); +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/IRObject:1.0") == 0) +- return ACE_static_cast (POA_CORBA::IRObject_ptr, this); +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/Object:1.0") == 0) +- return ACE_static_cast(PortableServer::Servant, this); +- return 0; +-} +- +-void POA_IR::ValueDef::_dispatch (TAO_ServerRequest &req, void *context, CORBA::Environment &ACE_TRY_ENV) +-{ +- this->synchronous_upcall_dispatch(req, context, this, ACE_TRY_ENV); +-} +- +-const char* POA_IR::ValueDef::_interface_repository_id (void) const +-{ +- return "IDL:omg.org/IR/ValueDef:1.0"; +-} +- +-IR::ValueDef* +-POA_IR::ValueDef::_this (CORBA_Environment &ACE_TRY_ENV) +-{ +- TAO_Stub *stub = this->_create_stub (ACE_TRY_ENV); +- ACE_CHECK_RETURN (0); +- +- CORBA::Object_ptr tmp = CORBA::Object::_nil (); +- +- if (stub->servant_orb_var ()->orb_core ()->optimize_collocation_objects ()) +- ACE_NEW_RETURN (tmp, CORBA::Object (stub, 1, this), 0); +- else +- ACE_NEW_RETURN (tmp, CORBA::Object (stub, 0, this), 0); +- +- CORBA::Object_var obj = tmp; +- return ::IR::ValueDef::_unchecked_narrow (obj.in ()); +-} +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +-POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_supported_interfaces_get::TAO_ServerRequestInfo_IR_ValueDef_supported_interfaces_get ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::ValueDef *tao_impl +- , +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl) +-{} +- +-Dynamic::ParameterList * +-POA_IR::ValueDef::TAO_ServerRequestInfo_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 * +-POA_IR::ValueDef::TAO_ServerRequestInfo_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 * +-POA_IR::ValueDef::TAO_ServerRequestInfo_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 (); +-} +- +-char * +-POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_supported_interfaces_get::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_supported_interfaces_get::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-void +-POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_supported_interfaces_get::result (IR::InterfaceDefSeq * result) +-{ +- // Update the result. +- this->_result = result; +-} +- +-POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_supported_interfaces_set::TAO_ServerRequestInfo_IR_ValueDef_supported_interfaces_set ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::ValueDef *tao_impl +- , +- const IR::InterfaceDefSeq & supported_interfaces, +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- supported_interfaces_ (supported_interfaces) +-{} +- +-Dynamic::ParameterList * +-POA_IR::ValueDef::TAO_ServerRequestInfo_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 * +-POA_IR::ValueDef::TAO_ServerRequestInfo_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 * +-POA_IR::ValueDef::TAO_ServerRequestInfo_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; +-} +- +-char * +-POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_supported_interfaces_set::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_supported_interfaces_set::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_initializers_get::TAO_ServerRequestInfo_IR_ValueDef_initializers_get ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::ValueDef *tao_impl +- , +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl) +-{} +- +-Dynamic::ParameterList * +-POA_IR::ValueDef::TAO_ServerRequestInfo_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 * +-POA_IR::ValueDef::TAO_ServerRequestInfo_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 * +-POA_IR::ValueDef::TAO_ServerRequestInfo_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 (); +-} +- +-char * +-POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_initializers_get::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_initializers_get::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-void +-POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_initializers_get::result (IR::InitializerSeq * result) +-{ +- // Update the result. +- this->_result = result; +-} +- +-POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_initializers_set::TAO_ServerRequestInfo_IR_ValueDef_initializers_set ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::ValueDef *tao_impl +- , - const IR::InitializerSeq & initializers, +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- initializers_ (initializers) +-{} +- +-Dynamic::ParameterList * +-POA_IR::ValueDef::TAO_ServerRequestInfo_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 * +-POA_IR::ValueDef::TAO_ServerRequestInfo_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 * +-POA_IR::ValueDef::TAO_ServerRequestInfo_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; +-} +- +-char * +-POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_initializers_set::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_initializers_set::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_base_value_get::TAO_ServerRequestInfo_IR_ValueDef_base_value_get ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::ValueDef *tao_impl +- , +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl) +-{} +- +-Dynamic::ParameterList * +-POA_IR::ValueDef::TAO_ServerRequestInfo_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 * +-POA_IR::ValueDef::TAO_ServerRequestInfo_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 * +-POA_IR::ValueDef::TAO_ServerRequestInfo_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 (); +-} +- +-char * +-POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_base_value_get::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_base_value_get::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-void +-POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_base_value_get::result (IR::ValueDef_ptr result) +-{ +- // Update the result. +- this->_result = result; +-} +- +-POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_base_value_set::TAO_ServerRequestInfo_IR_ValueDef_base_value_set ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::ValueDef *tao_impl +- , +- IR::ValueDef_ptr base_value, +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- base_value_ (base_value) +-{} +- +-Dynamic::ParameterList * +-POA_IR::ValueDef::TAO_ServerRequestInfo_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 * +-POA_IR::ValueDef::TAO_ServerRequestInfo_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 * +-POA_IR::ValueDef::TAO_ServerRequestInfo_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; +-} +- +-char * +-POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_base_value_set::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_base_value_set::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_abstract_base_values_get::TAO_ServerRequestInfo_IR_ValueDef_abstract_base_values_get ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::ValueDef *tao_impl +- , +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl) +-{} +- +-Dynamic::ParameterList * +-POA_IR::ValueDef::TAO_ServerRequestInfo_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 * +-POA_IR::ValueDef::TAO_ServerRequestInfo_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 * +-POA_IR::ValueDef::TAO_ServerRequestInfo_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 (); +-} +- +-char * +-POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_abstract_base_values_get::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_abstract_base_values_get::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-void +-POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_abstract_base_values_get::result (IR::ValueDefSeq * result) +-{ +- // Update the result. +- this->_result = result; +-} +- +-POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_abstract_base_values_set::TAO_ServerRequestInfo_IR_ValueDef_abstract_base_values_set ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::ValueDef *tao_impl +- , +- const IR::ValueDefSeq & abstract_base_values, +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- abstract_base_values_ (abstract_base_values) +-{} +- +-Dynamic::ParameterList * +-POA_IR::ValueDef::TAO_ServerRequestInfo_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 * +-POA_IR::ValueDef::TAO_ServerRequestInfo_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 * +-POA_IR::ValueDef::TAO_ServerRequestInfo_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; +-} +- +-char * +-POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_abstract_base_values_set::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_abstract_base_values_set::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_is_abstract_get::TAO_ServerRequestInfo_IR_ValueDef_is_abstract_get ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::ValueDef *tao_impl +- , +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl) +-{} +- +-Dynamic::ParameterList * +-POA_IR::ValueDef::TAO_ServerRequestInfo_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 * +-POA_IR::ValueDef::TAO_ServerRequestInfo_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 * +-POA_IR::ValueDef::TAO_ServerRequestInfo_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 (); +-} +- +-char * +-POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_is_abstract_get::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_is_abstract_get::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-void +-POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_is_abstract_get::result (CORBA::Boolean result) +-{ +- // Update the result. +- this->_result = result; +-} +- +-POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_is_abstract_set::TAO_ServerRequestInfo_IR_ValueDef_is_abstract_set ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::ValueDef *tao_impl +- , +- const CORBA::Boolean & is_abstract, +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- is_abstract_ (is_abstract) +-{} +- +-Dynamic::ParameterList * +-POA_IR::ValueDef::TAO_ServerRequestInfo_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 * +-POA_IR::ValueDef::TAO_ServerRequestInfo_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 * +-POA_IR::ValueDef::TAO_ServerRequestInfo_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; +-} +- +-char * +-POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_is_abstract_set::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_is_abstract_set::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_is_custom_get::TAO_ServerRequestInfo_IR_ValueDef_is_custom_get ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::ValueDef *tao_impl +- , +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl) +-{} +- +-Dynamic::ParameterList * +-POA_IR::ValueDef::TAO_ServerRequestInfo_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 * +-POA_IR::ValueDef::TAO_ServerRequestInfo_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 * +-POA_IR::ValueDef::TAO_ServerRequestInfo_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 (); +-} +- +-char * +-POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_is_custom_get::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_is_custom_get::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-void +-POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_is_custom_get::result (CORBA::Boolean result) +-{ +- // Update the result. +- this->_result = result; +-} +- +-POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_is_custom_set::TAO_ServerRequestInfo_IR_ValueDef_is_custom_set ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::ValueDef *tao_impl +- , +- const CORBA::Boolean & is_custom, +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- is_custom_ (is_custom) +-{} +- +-Dynamic::ParameterList * +-POA_IR::ValueDef::TAO_ServerRequestInfo_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 * +-POA_IR::ValueDef::TAO_ServerRequestInfo_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 * +-POA_IR::ValueDef::TAO_ServerRequestInfo_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; +-} +- +-char * +-POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_is_custom_set::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_is_custom_set::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_is_truncatable_get::TAO_ServerRequestInfo_IR_ValueDef_is_truncatable_get ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::ValueDef *tao_impl +- , +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl) +-{} +- +-Dynamic::ParameterList * +-POA_IR::ValueDef::TAO_ServerRequestInfo_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 * +-POA_IR::ValueDef::TAO_ServerRequestInfo_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 * +-POA_IR::ValueDef::TAO_ServerRequestInfo_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 (); +-} +- +-char * +-POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_is_truncatable_get::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_is_truncatable_get::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-void +-POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_is_truncatable_get::result (CORBA::Boolean result) +-{ +- // Update the result. +- this->_result = result; +-} +- +-POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_is_truncatable_set::TAO_ServerRequestInfo_IR_ValueDef_is_truncatable_set ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::ValueDef *tao_impl +- , +- const CORBA::Boolean & is_truncatable, +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- is_truncatable_ (is_truncatable) +-{} +- +-Dynamic::ParameterList * +-POA_IR::ValueDef::TAO_ServerRequestInfo_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 * +-POA_IR::ValueDef::TAO_ServerRequestInfo_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 * +-POA_IR::ValueDef::TAO_ServerRequestInfo_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; +-} +- +-char * +-POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_is_truncatable_set::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_is_truncatable_set::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_is_a::TAO_ServerRequestInfo_IR_ValueDef_is_a ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::ValueDef *tao_impl +- , +- const char * id, +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- id_ (id) +-{} +- +-Dynamic::ParameterList * +-POA_IR::ValueDef::TAO_ServerRequestInfo_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 * +-POA_IR::ValueDef::TAO_ServerRequestInfo_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 * +-POA_IR::ValueDef::TAO_ServerRequestInfo_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 (); +-} +- +-char * +-POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_is_a::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_is_a::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-void +-POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_is_a::result (CORBA::Boolean result) +-{ +- // Update the result. +- this->_result = result; +-} +- +-POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_create_value_member::TAO_ServerRequestInfo_IR_ValueDef_create_value_member ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::ValueDef *tao_impl +- , +- const char * id, +- const char * name, +- const char * version, +- IR::IDLType_ptr type, +- const CORBA::Visibility & access, +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- id_ (id), +- name_ (name), +- version_ (version), +- type_ (type), +- access_ (access) +-{} +- +-Dynamic::ParameterList * +-POA_IR::ValueDef::TAO_ServerRequestInfo_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 * +-POA_IR::ValueDef::TAO_ServerRequestInfo_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 * +-POA_IR::ValueDef::TAO_ServerRequestInfo_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 (); +-} +- +-char * +-POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_create_value_member::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_create_value_member::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-void +-POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_create_value_member::result (IR::ValueMemberDef_ptr result) +-{ +- // Update the result. +- this->_result = result; +-} +- +-POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_create_attribute::TAO_ServerRequestInfo_IR_ValueDef_create_attribute ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::ValueDef *tao_impl +- , +- 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_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- id_ (id), +- name_ (name), +- version_ (version), +- type_ (type), +- mode_ (mode), +- get_exceptions_ (get_exceptions), +- put_exceptions_ (put_exceptions) +-{} +- +-Dynamic::ParameterList * +-POA_IR::ValueDef::TAO_ServerRequestInfo_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 * +-POA_IR::ValueDef::TAO_ServerRequestInfo_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 * +-POA_IR::ValueDef::TAO_ServerRequestInfo_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 (); +-} +- +-char * +-POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_create_attribute::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_create_attribute::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-void +-POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_create_attribute::result (IR::AttributeDef_ptr result) +-{ +- // Update the result. +- this->_result = result; +-} +- +-POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_create_operation::TAO_ServerRequestInfo_IR_ValueDef_create_operation ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::ValueDef *tao_impl +- , +- 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_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- id_ (id), +- name_ (name), +- version_ (version), +- result_ (result), +- mode_ (mode), +- params_ (params), +- exceptions_ (exceptions), +- contexts_ (contexts) +-{} +- +-Dynamic::ParameterList * +-POA_IR::ValueDef::TAO_ServerRequestInfo_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 * +-POA_IR::ValueDef::TAO_ServerRequestInfo_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 * +-POA_IR::ValueDef::TAO_ServerRequestInfo_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 (); +-} +- +-char * +-POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_create_operation::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_create_operation::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-void +-POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_create_operation::result (IR::OperationDef_ptr result) +-{ +- // Update the result. +- this->_result = result; +-} +- +-#endif /* TAO_HAS_INTERCEPTORS */ +-class TAO_IR_ValueBoxDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable +-{ +-private: +- unsigned int hash (const char *str, unsigned int len); +-public: +- const TAO_operation_db_entry * lookup (const char *str, unsigned int len); +-}; +-/* starting time is 16:31:13 */ +-/* C++ code produced by gperf version 2.8 (ACE version) */ +-/* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_ValueBoxDef_Perfect_Hash_OpTable -N lookup */ +-unsigned int +-TAO_IR_ValueBoxDef_Perfect_Hash_OpTable::hash (const char *str, unsigned int len) +-{ +- static const unsigned char asso_values[] = +- { +-#if defined (ACE_MVS) +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 0, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 0, +- 37, 37, 0, 0, 0, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 0, 0, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 10, 37, 37, 37, 37, 10, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, +-#else +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 0, 37, 0, 37, 37, +- 0, 0, 0, 37, 37, 37, 37, 37, 37, 0, +- 0, 37, 37, 37, 37, 37, 10, 37, 37, 37, +- 37, 10, 37, 37, 37, 37, 37, 37, +-#endif /* ACE_MVS */ +- }; +- return len + asso_values[str[len - 1]] + asso_values[str[0]]; +-} +- +-const class TAO_operation_db_entry * +-TAO_IR_ValueBoxDef_Perfect_Hash_OpTable::lookup (const char *str, unsigned int len) +-{ +- enum +- { +- TOTAL_KEYWORDS = 18, +- MIN_WORD_LENGTH = 4, +- MAX_WORD_LENGTH = 26, +- MIN_HASH_VALUE = 4, +- MAX_HASH_VALUE = 36, +- HASH_VALUE_RANGE = 33, +- DUPLICATES = 6 +- }; +- +- static const class TAO_operation_db_entry wordlist[] = +- { +- {"",0},{"",0},{"",0},{"",0}, +- {"move", &POA_IR::ValueBoxDef::move_skel}, +- {"_is_a", &POA_IR::ValueBoxDef::_is_a_skel}, +- {"_get_id", &POA_IR::ValueBoxDef::_get_id_skel}, +- {"_set_id", &POA_IR::ValueBoxDef::_set_id_skel}, +- {"describe", &POA_IR::ValueBoxDef::describe_skel}, +- {"_get_name", &POA_IR::ValueBoxDef::_get_name_skel}, +- {"_get_type", &POA_IR::ValueBoxDef::_get_type_skel}, +- {"_set_name", &POA_IR::ValueBoxDef::_set_name_skel}, +- {"_get_version", &POA_IR::ValueBoxDef::_get_version_skel}, +- {"_set_version", &POA_IR::ValueBoxDef::_set_version_skel}, +- {"_get_def_kind", &POA_IR::ValueBoxDef::_get_def_kind_skel}, +- {"_get_defined_in", &POA_IR::ValueBoxDef::_get_defined_in_skel}, +- {"destroy", &POA_IR::ValueBoxDef::destroy_skel}, +- {"_get_absolute_name", &POA_IR::ValueBoxDef::_get_absolute_name_skel}, +- {"_get_original_type_def", &POA_IR::ValueBoxDef::_get_original_type_def_skel}, +- {"_set_original_type_def", &POA_IR::ValueBoxDef::_set_original_type_def_skel}, +- {"_non_existent", &POA_IR::ValueBoxDef::_non_existent_skel}, +- {"_get_containing_repository", &POA_IR::ValueBoxDef::_get_containing_repository_skel}, +- }; +- +- static const signed char lookup[] = +- { +- -6, -2, -9, -3, 4, 5, -1, -43, 8, -43, -12, -2, -38, 14, +- -1, 15, -1, 16, 17, -1, -18, -2, -38, 20, -1, -1, -1, -1, +- -1, -1, -1, -1, -1, -1, -1, -1, 21, +- }; +- +- if (len <= MAX_WORD_LENGTH && len >= MIN_WORD_LENGTH) +- { +- unsigned int key = hash (str, len); +- +- if (key <= MAX_HASH_VALUE && key >= MIN_HASH_VALUE) +- { +- int slot = lookup[key]; +- +- if (slot >= 0 && slot < MAX_HASH_VALUE) +- { +- const char *s = wordlist[slot].opname_; +- +- if (*str == *s && !strncmp (str + 1, s + 1, len - 1)) +- return &wordlist[slot]; +- } +- else if (slot < 0 && slot >= -MAX_HASH_VALUE) +- return 0; +- else +- { +- unsigned int offset = key + slot + (slot > 0 ? -MAX_HASH_VALUE : MAX_HASH_VALUE); +- const class TAO_operation_db_entry *base = &wordlist[-lookup[offset]]; +- const class TAO_operation_db_entry *ptr = base + -lookup[offset + 1]; +- +- while (--ptr >= base) +- if (*str == *ptr->opname_ && !strncmp (str + 1, ptr->opname_ + 1, len - 1)) +- return ptr; +- } +- } +- } +- return 0; +-} +-/* ending time is 16:31:13 */ +-static TAO_IR_ValueBoxDef_Perfect_Hash_OpTable tao_IR_ValueBoxDef_optable; +- +- +-/////////////////////////////////////////////////////////////////////// +-// Strategized Proxy Broker Implementation +-// +- +-// Factory function Implementation. +-POA_IR::_TAO_ValueBoxDef_Strategized_Proxy_Broker *POA_IR::_TAO_ValueBoxDef_Strategized_Proxy_Broker::the_TAO_ValueBoxDef_Strategized_Proxy_Broker (void) +-{ +- static POA_IR::_TAO_ValueBoxDef_Strategized_Proxy_Broker strategized_proxy_broker; +- return &strategized_proxy_broker; +-} +- +-POA_IR::_TAO_ValueBoxDef_Strategized_Proxy_Broker::_TAO_ValueBoxDef_Strategized_Proxy_Broker (void) +-{ +- for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) +- this->proxy_cache_[i] = 0; +- +-} +- +-POA_IR::_TAO_ValueBoxDef_Strategized_Proxy_Broker::~_TAO_ValueBoxDef_Strategized_Proxy_Broker (void) +-{ +- for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) +- delete this->proxy_cache_[i]; +- +-} +- +-IR::_TAO_ValueBoxDef_Proxy_Impl& +-POA_IR::_TAO_ValueBoxDef_Strategized_Proxy_Broker::select_proxy ( +- ::IR::ValueBoxDef *object, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- TAO_ORB_Core::TAO_Collocation_Strategies strategy = +- TAO_ORB_Core::collocation_strategy (object); +- +- if (this->proxy_cache_[strategy] != 0) +- return *this->proxy_cache_[strategy]; +- +- this->create_proxy (strategy, ACE_TRY_ENV); +- ACE_CHECK_RETURN (*this->proxy_cache_[strategy]); +- +- return *this->proxy_cache_[strategy]; +- +-} +- +-void +-POA_IR::_TAO_ValueBoxDef_Strategized_Proxy_Broker::create_proxy ( +- TAO_ORB_Core::TAO_Collocation_Strategies strategy, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- ACE_GUARD (TAO_SYNCH_MUTEX, guard, this->mutex_); +- +- if (this->proxy_cache_[strategy] == 0) +- { +- switch (strategy) +- { +- case TAO_ORB_Core::THRU_POA_STRATEGY: +- ACE_NEW_THROW_EX ( +- this->proxy_cache_[strategy], +- POA_IR::_TAO_ValueBoxDef_ThruPOA_Proxy_Impl, +- CORBA::NO_MEMORY () +- ); +- ACE_CHECK; +- break; +- +- case TAO_ORB_Core::REMOTE_STRATEGY: +- default: +- ACE_NEW_THROW_EX ( +- this->proxy_cache_[strategy], +- ::IR::_TAO_ValueBoxDef_Remote_Proxy_Impl, +- CORBA::NO_MEMORY () +- ); +- ACE_CHECK; +- break; +- +- } +- +- } +-} +- +- +-// +-// End Strategized Proxy Broker Implementation +-/////////////////////////////////////////////////////////////////////// +- +- +-IR::_TAO_ValueBoxDef_Proxy_Broker * +-IR__TAO_ValueBoxDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) +-{ +- ACE_UNUSED_ARG (obj); +- return ::POA_IR::_TAO_ValueBoxDef_Strategized_Proxy_Broker::the_TAO_ValueBoxDef_Strategized_Proxy_Broker(); +-} +- +-int +-IR__TAO_ValueBoxDef_Proxy_Broker_Factory_Initializer (long _dummy_) +-{ +- ACE_UNUSED_ARG (_dummy_); +- +- IR__TAO_ValueBoxDef_Proxy_Broker_Factory_function_pointer = +- IR__TAO_ValueBoxDef_Proxy_Broker_Factory_function; +- +- return 0; +-} +- +-static int IR__TAO_ValueBoxDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = +- IR__TAO_ValueBoxDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, IR__TAO_ValueBoxDef_Proxy_Broker_Factory_Initializer)); +- +- +-/////////////////////////////////////////////////////////////////////// +-// ThruPOA Proxy Implementation +-// +- +-POA_IR::_TAO_ValueBoxDef_ThruPOA_Proxy_Impl::_TAO_ValueBoxDef_ThruPOA_Proxy_Impl (void) +-{} +- +-// ThruPOA Implementation of the IDL interface methods +- +-IR::IDLType_ptr POA_IR::_TAO_ValueBoxDef_ThruPOA_Proxy_Impl::original_type_def ( +- CORBA_Object *_collocated_tao_target_, +- CORBA::Environment &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) +-{ +- IR::IDLType_var _tao_retval; +- ACE_UNUSED_ARG (_tao_retval); +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "original_type_def", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK_RETURN (0); +- return ACE_reinterpret_cast ( +- POA_IR::ValueBoxDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/ValueBoxDef:1.0" +- ) +- )->original_type_def ( +- ACE_TRY_ENV +- ); +-} +- +-void POA_IR::_TAO_ValueBoxDef_ThruPOA_Proxy_Impl::original_type_def ( +- CORBA_Object *_collocated_tao_target_, +- IR::IDLType_ptr original_type_def, +- CORBA::Environment &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) +-{ +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "original_type_def", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK; +- ACE_reinterpret_cast ( +- POA_IR::ValueBoxDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/ValueBoxDef:1.0" +- ) +- )->original_type_def ( +- original_type_def, +- ACE_TRY_ENV +- ); +- return; +-} +- +-// +-// End ThruPOA Proxy Implementation +-/////////////////////////////////////////////////////////////////////// +- +-// skeleton constructor +-POA_IR::ValueBoxDef::ValueBoxDef (void) +-{ +- this->optable_ = &tao_IR_ValueBoxDef_optable; +-} +- +-// copy ctor +-POA_IR::ValueBoxDef::ValueBoxDef (const ValueBoxDef& rhs) +- : ACE_NESTED_CLASS (POA_IR,TypedefDef) (rhs), +- ACE_NESTED_CLASS (POA_IR,Contained) (rhs), +- ACE_NESTED_CLASS (POA_IR,IDLType) (rhs), +- ACE_NESTED_CLASS (POA_CORBA,IRObject) (rhs), +- TAO_ServantBase (rhs) +-{} +- +-// skeleton destructor +-POA_IR::ValueBoxDef::~ValueBoxDef (void) +-{ +-} +- +-void POA_IR::ValueBoxDef::_get_original_type_def_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- POA_IR::ValueBoxDef *_tao_impl = (POA_IR::ValueBoxDef *)_tao_object_reference; +- +- IR::IDLType_var _tao_retval; +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::ValueBoxDef::TAO_ServerRequestInfo_IR_ValueBoxDef_original_type_def_get ri ( +- _tao_server_request, +- _tao_impl +- , +- ACE_TRY_ENV +- ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->original_type_def ( +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::IDLType_ptr _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << _tao_retval.in ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- +-} +- +-void POA_IR::ValueBoxDef::_set_original_type_def_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::ValueBoxDef *_tao_impl = (POA_IR::ValueBoxDef *)_tao_object_reference; +- +-_tao_server_request.argument_flag (0); +- IR::IDLType_var original_type_def; +- if (!( +- (_tao_in >> original_type_def.out ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::ValueBoxDef::TAO_ServerRequestInfo_IR_ValueBoxDef_original_type_def_set ri ( +- _tao_server_request, +- _tao_impl +- , +- original_type_def.in (), +- ACE_TRY_ENV +- ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- +- _tao_impl->original_type_def ( +- original_type_def.in (), +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +-} +- +-void POA_IR::ValueBoxDef::_is_a_skel ( +- TAO_ServerRequest &_tao_server_request, +- void * _tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::ValueBoxDef *_tao_impl = (POA_IR::ValueBoxDef *) _tao_object_reference; +- CORBA::Boolean _tao_retval = 0; +- CORBA::String_var value; +- if (!(_tao_in >> value.out ())) +- ACE_THROW (CORBA::MARSHAL ()); +- +- _tao_retval = _tao_impl->_is_a (value.in (), ACE_TRY_ENV); +- ACE_CHECK; +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) +- ACE_THROW (CORBA::MARSHAL ()); +-} +- +-void POA_IR::ValueBoxDef::_non_existent_skel ( +- TAO_ServerRequest &_tao_server_request, +- void * _tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- POA_IR::ValueBoxDef *_tao_impl = (POA_IR::ValueBoxDef *) _tao_object_reference; +- CORBA::Boolean _tao_retval = _tao_impl->_non_existent (ACE_TRY_ENV); +- ACE_CHECK; +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) +- ACE_THROW (CORBA::MARSHAL ()); +-} +- +-CORBA::Boolean POA_IR::ValueBoxDef::_is_a ( +- const char* value, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- if ( +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/ValueBoxDef:1.0")) || +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/TypedefDef:1.0")) || +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/Contained:1.0")) || +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/IDLType:1.0")) || +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/CORBA/IRObject:1.0")) || +- (!ACE_OS::strcmp ((char *)value, CORBA::_tc_Object->id (ACE_TRY_ENV)))) +- return 1; +- else +- return 0; +-} +- +-void* POA_IR::ValueBoxDef::_downcast ( +- const char* logical_type_id +- ) +-{ +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/ValueBoxDef:1.0") == 0) +- return ACE_static_cast (POA_IR::ValueBoxDef_ptr, this); +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/TypedefDef:1.0") == 0) +- return ACE_static_cast (POA_IR::TypedefDef_ptr, this); +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Contained:1.0") == 0) +- return ACE_static_cast (POA_IR::Contained_ptr, this); +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/IDLType:1.0") == 0) +- return ACE_static_cast (POA_IR::IDLType_ptr, this); +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/IRObject:1.0") == 0) +- return ACE_static_cast (POA_CORBA::IRObject_ptr, this); +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/Object:1.0") == 0) +- return ACE_static_cast(PortableServer::Servant, this); +- return 0; +-} +- +-void POA_IR::ValueBoxDef::_dispatch (TAO_ServerRequest &req, void *context, CORBA::Environment &ACE_TRY_ENV) +-{ +- this->synchronous_upcall_dispatch(req, context, this, ACE_TRY_ENV); +-} +- +-const char* POA_IR::ValueBoxDef::_interface_repository_id (void) const +-{ +- return "IDL:omg.org/IR/ValueBoxDef:1.0"; +-} +- +-IR::ValueBoxDef* +-POA_IR::ValueBoxDef::_this (CORBA_Environment &ACE_TRY_ENV) +-{ +- TAO_Stub *stub = this->_create_stub (ACE_TRY_ENV); +- ACE_CHECK_RETURN (0); +- +- CORBA::Object_ptr tmp = CORBA::Object::_nil (); +- +- if (stub->servant_orb_var ()->orb_core ()->optimize_collocation_objects ()) +- ACE_NEW_RETURN (tmp, CORBA::Object (stub, 1, this), 0); +- else +- ACE_NEW_RETURN (tmp, CORBA::Object (stub, 0, this), 0); +- +- CORBA::Object_var obj = tmp; +- return ::IR::ValueBoxDef::_unchecked_narrow (obj.in ()); +-} +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +-POA_IR::ValueBoxDef::TAO_ServerRequestInfo_IR_ValueBoxDef_original_type_def_get::TAO_ServerRequestInfo_IR_ValueBoxDef_original_type_def_get ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::ValueBoxDef *tao_impl +- , +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl) +-{} +- +-Dynamic::ParameterList * +-POA_IR::ValueBoxDef::TAO_ServerRequestInfo_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 * +-POA_IR::ValueBoxDef::TAO_ServerRequestInfo_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 * +-POA_IR::ValueBoxDef::TAO_ServerRequestInfo_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 (); +-} +- +-char * +-POA_IR::ValueBoxDef::TAO_ServerRequestInfo_IR_ValueBoxDef_original_type_def_get::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::ValueBoxDef::TAO_ServerRequestInfo_IR_ValueBoxDef_original_type_def_get::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-void +-POA_IR::ValueBoxDef::TAO_ServerRequestInfo_IR_ValueBoxDef_original_type_def_get::result (IR::IDLType_ptr result) +-{ +- // Update the result. +- this->_result = result; +-} +- +-POA_IR::ValueBoxDef::TAO_ServerRequestInfo_IR_ValueBoxDef_original_type_def_set::TAO_ServerRequestInfo_IR_ValueBoxDef_original_type_def_set ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::ValueBoxDef *tao_impl +- , +- IR::IDLType_ptr original_type_def, +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- original_type_def_ (original_type_def) +-{} +- +-Dynamic::ParameterList * +-POA_IR::ValueBoxDef::TAO_ServerRequestInfo_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 * +-POA_IR::ValueBoxDef::TAO_ServerRequestInfo_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 * +-POA_IR::ValueBoxDef::TAO_ServerRequestInfo_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; +-} +- +-char * +-POA_IR::ValueBoxDef::TAO_ServerRequestInfo_IR_ValueBoxDef_original_type_def_set::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::ValueBoxDef::TAO_ServerRequestInfo_IR_ValueBoxDef_original_type_def_set::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-#endif /* TAO_HAS_INTERCEPTORS */ +-class TAO_IR_ProvidesDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable +-{ +-private: +- unsigned int hash (const char *str, unsigned int len); +-public: +- const TAO_operation_db_entry * lookup (const char *str, unsigned int len); +-}; +-/* starting time is 16:31:13 */ +-/* C++ code produced by gperf version 2.8 (ACE version) */ +-/* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_ProvidesDef_Perfect_Hash_OpTable -N lookup */ +-unsigned int +-TAO_IR_ProvidesDef_Perfect_Hash_OpTable::hash (const char *str, unsigned int len) +-{ +- static const unsigned char asso_values[] = +- { +-#if defined (ACE_MVS) +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 0, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 0, +- 37, 37, 0, 0, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 0, 0, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 10, 37, 37, 37, 37, 10, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, +-#else +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 0, 37, 0, 37, 37, +- 0, 0, 37, 37, 37, 37, 37, 37, 37, 0, +- 0, 37, 37, 37, 37, 37, 10, 37, 37, 37, +- 37, 10, 37, 37, 37, 37, 37, 37, +-#endif /* ACE_MVS */ +- }; +- return len + asso_values[str[len - 1]] + asso_values[str[0]]; +-} +- +-const class TAO_operation_db_entry * +-TAO_IR_ProvidesDef_Perfect_Hash_OpTable::lookup (const char *str, unsigned int len) +-{ +- enum +- { +- TOTAL_KEYWORDS = 16, +- MIN_WORD_LENGTH = 4, +- MAX_WORD_LENGTH = 26, +- MIN_HASH_VALUE = 4, +- MAX_HASH_VALUE = 36, +- HASH_VALUE_RANGE = 33, +- DUPLICATES = 4 +- }; +- +- static const class TAO_operation_db_entry wordlist[] = +- { +- {"",0},{"",0},{"",0},{"",0}, +- {"move", &POA_IR::ProvidesDef::move_skel}, +- {"_is_a", &POA_IR::ProvidesDef::_is_a_skel}, +- {"_get_id", &POA_IR::ProvidesDef::_get_id_skel}, +- {"_set_id", &POA_IR::ProvidesDef::_set_id_skel}, +- {"describe", &POA_IR::ProvidesDef::describe_skel}, +- {"_get_name", &POA_IR::ProvidesDef::_get_name_skel}, +- {"_set_name", &POA_IR::ProvidesDef::_set_name_skel}, +- {"_get_version", &POA_IR::ProvidesDef::_get_version_skel}, +- {"_set_version", &POA_IR::ProvidesDef::_set_version_skel}, +- {"_get_def_kind", &POA_IR::ProvidesDef::_get_def_kind_skel}, +- {"_get_defined_in", &POA_IR::ProvidesDef::_get_defined_in_skel}, +- {"destroy", &POA_IR::ProvidesDef::destroy_skel}, +- {"_get_absolute_name", &POA_IR::ProvidesDef::_get_absolute_name_skel}, +- {"_get_interface_type", &POA_IR::ProvidesDef::_get_interface_type_skel}, +- {"_non_existent", &POA_IR::ProvidesDef::_non_existent_skel}, +- {"_get_containing_repository", &POA_IR::ProvidesDef::_get_containing_repository_skel}, +- }; +- +- static const signed char lookup[] = +- { +- -6, -2, -9, -2, 4, 5, -1, -43, 8, -43, -11, -2, -38, 13, +- -1, 14, -1, 15, 16, 17, -1, -1, -1, 18, -1, -1, -1, -1, +- -1, -1, -1, -1, -1, -1, -1, -1, 19, +- }; +- +- if (len <= MAX_WORD_LENGTH && len >= MIN_WORD_LENGTH) +- { +- unsigned int key = hash (str, len); +- +- if (key <= MAX_HASH_VALUE && key >= MIN_HASH_VALUE) +- { +- int slot = lookup[key]; +- +- if (slot >= 0 && slot < MAX_HASH_VALUE) +- { +- const char *s = wordlist[slot].opname_; +- +- if (*str == *s && !strncmp (str + 1, s + 1, len - 1)) +- return &wordlist[slot]; +- } +- else if (slot < 0 && slot >= -MAX_HASH_VALUE) +- return 0; +- else +- { +- unsigned int offset = key + slot + (slot > 0 ? -MAX_HASH_VALUE : MAX_HASH_VALUE); +- const class TAO_operation_db_entry *base = &wordlist[-lookup[offset]]; +- const class TAO_operation_db_entry *ptr = base + -lookup[offset + 1]; +- +- while (--ptr >= base) +- if (*str == *ptr->opname_ && !strncmp (str + 1, ptr->opname_ + 1, len - 1)) +- return ptr; +- } +- } +- } +- return 0; +-} +-/* ending time is 16:31:13 */ +-static TAO_IR_ProvidesDef_Perfect_Hash_OpTable tao_IR_ProvidesDef_optable; +- +- +-/////////////////////////////////////////////////////////////////////// +-// Strategized Proxy Broker Implementation +-// +- +-// Factory function Implementation. +-POA_IR::_TAO_ProvidesDef_Strategized_Proxy_Broker *POA_IR::_TAO_ProvidesDef_Strategized_Proxy_Broker::the_TAO_ProvidesDef_Strategized_Proxy_Broker (void) +-{ +- static POA_IR::_TAO_ProvidesDef_Strategized_Proxy_Broker strategized_proxy_broker; +- return &strategized_proxy_broker; +-} +- +-POA_IR::_TAO_ProvidesDef_Strategized_Proxy_Broker::_TAO_ProvidesDef_Strategized_Proxy_Broker (void) +-{ +- for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) +- this->proxy_cache_[i] = 0; +- +-} +- +-POA_IR::_TAO_ProvidesDef_Strategized_Proxy_Broker::~_TAO_ProvidesDef_Strategized_Proxy_Broker (void) +-{ +- for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) +- delete this->proxy_cache_[i]; +- +-} +- +-IR::_TAO_ProvidesDef_Proxy_Impl& +-POA_IR::_TAO_ProvidesDef_Strategized_Proxy_Broker::select_proxy ( +- ::IR::ProvidesDef *object, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- TAO_ORB_Core::TAO_Collocation_Strategies strategy = +- TAO_ORB_Core::collocation_strategy (object); +- +- if (this->proxy_cache_[strategy] != 0) +- return *this->proxy_cache_[strategy]; +- +- this->create_proxy (strategy, ACE_TRY_ENV); +- ACE_CHECK_RETURN (*this->proxy_cache_[strategy]); +- +- return *this->proxy_cache_[strategy]; +- +-} +- +-void +-POA_IR::_TAO_ProvidesDef_Strategized_Proxy_Broker::create_proxy ( +- TAO_ORB_Core::TAO_Collocation_Strategies strategy, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- ACE_GUARD (TAO_SYNCH_MUTEX, guard, this->mutex_); +- +- if (this->proxy_cache_[strategy] == 0) +- { +- switch (strategy) +- { +- case TAO_ORB_Core::THRU_POA_STRATEGY: +- ACE_NEW_THROW_EX ( +- this->proxy_cache_[strategy], +- POA_IR::_TAO_ProvidesDef_ThruPOA_Proxy_Impl, +- CORBA::NO_MEMORY () +- ); +- ACE_CHECK; +- break; +- +- case TAO_ORB_Core::REMOTE_STRATEGY: +- default: +- ACE_NEW_THROW_EX ( +- this->proxy_cache_[strategy], +- ::IR::_TAO_ProvidesDef_Remote_Proxy_Impl, +- CORBA::NO_MEMORY () +- ); +- ACE_CHECK; +- break; +- +- } +- +- } +-} +- +- +-// +-// End Strategized Proxy Broker Implementation +-/////////////////////////////////////////////////////////////////////// +- +- +-IR::_TAO_ProvidesDef_Proxy_Broker * +-IR__TAO_ProvidesDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) +-{ +- ACE_UNUSED_ARG (obj); +- return ::POA_IR::_TAO_ProvidesDef_Strategized_Proxy_Broker::the_TAO_ProvidesDef_Strategized_Proxy_Broker(); +-} +- +-int +-IR__TAO_ProvidesDef_Proxy_Broker_Factory_Initializer (long _dummy_) +-{ +- ACE_UNUSED_ARG (_dummy_); +- +- IR__TAO_ProvidesDef_Proxy_Broker_Factory_function_pointer = +- IR__TAO_ProvidesDef_Proxy_Broker_Factory_function; +- +- return 0; +-} +- +-static int IR__TAO_ProvidesDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = +- IR__TAO_ProvidesDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, IR__TAO_ProvidesDef_Proxy_Broker_Factory_Initializer)); +- +- +-/////////////////////////////////////////////////////////////////////// +-// ThruPOA Proxy Implementation +-// +- +-POA_IR::_TAO_ProvidesDef_ThruPOA_Proxy_Impl::_TAO_ProvidesDef_ThruPOA_Proxy_Impl (void) +-{} +- +-// ThruPOA Implementation of the IDL interface methods +- +-IR::InterfaceDef_ptr POA_IR::_TAO_ProvidesDef_ThruPOA_Proxy_Impl::interface_type ( +- CORBA_Object *_collocated_tao_target_, +- CORBA::Environment &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) +-{ +- IR::InterfaceDef_var _tao_retval; +- ACE_UNUSED_ARG (_tao_retval); +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "interface_type", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK_RETURN (0); +- return ACE_reinterpret_cast ( +- POA_IR::ProvidesDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/ProvidesDef:1.0" +- ) +- )->interface_type ( +- ACE_TRY_ENV +- ); +-} +- +-// +-// End ThruPOA Proxy Implementation +-/////////////////////////////////////////////////////////////////////// +- +-// skeleton constructor +-POA_IR::ProvidesDef::ProvidesDef (void) +-{ +- this->optable_ = &tao_IR_ProvidesDef_optable; +-} +- +-// copy ctor +-POA_IR::ProvidesDef::ProvidesDef (const ProvidesDef& rhs) +- : ACE_NESTED_CLASS (POA_IR,Contained) (rhs), +- ACE_NESTED_CLASS (POA_CORBA,IRObject) (rhs), +- TAO_ServantBase (rhs) +-{} +- +-// skeleton destructor +-POA_IR::ProvidesDef::~ProvidesDef (void) +-{ +-} +- +-void POA_IR::ProvidesDef::_get_interface_type_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- POA_IR::ProvidesDef *_tao_impl = (POA_IR::ProvidesDef *)_tao_object_reference; +- +- IR::InterfaceDef_var _tao_retval; +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::ProvidesDef::TAO_ServerRequestInfo_IR_ProvidesDef_interface_type_get ri ( +- _tao_server_request, +- _tao_impl +- , +- ACE_TRY_ENV +- ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->interface_type ( +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::InterfaceDef_ptr _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << _tao_retval.in ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- +-} +- +-void POA_IR::ProvidesDef::_is_a_skel ( +- TAO_ServerRequest &_tao_server_request, +- void * _tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::ProvidesDef *_tao_impl = (POA_IR::ProvidesDef *) _tao_object_reference; +- CORBA::Boolean _tao_retval = 0; +- CORBA::String_var value; +- if (!(_tao_in >> value.out ())) +- ACE_THROW (CORBA::MARSHAL ()); +- +- _tao_retval = _tao_impl->_is_a (value.in (), ACE_TRY_ENV); +- ACE_CHECK; +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) +- ACE_THROW (CORBA::MARSHAL ()); +-} +- +-void POA_IR::ProvidesDef::_non_existent_skel ( +- TAO_ServerRequest &_tao_server_request, +- void * _tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- POA_IR::ProvidesDef *_tao_impl = (POA_IR::ProvidesDef *) _tao_object_reference; +- CORBA::Boolean _tao_retval = _tao_impl->_non_existent (ACE_TRY_ENV); +- ACE_CHECK; +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) +- ACE_THROW (CORBA::MARSHAL ()); +-} +- +-CORBA::Boolean POA_IR::ProvidesDef::_is_a ( +- const char* value, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- if ( +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/ProvidesDef:1.0")) || +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/Contained:1.0")) || +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/CORBA/IRObject:1.0")) || +- (!ACE_OS::strcmp ((char *)value, CORBA::_tc_Object->id (ACE_TRY_ENV)))) +- return 1; +- else +- return 0; +-} +- +-void* POA_IR::ProvidesDef::_downcast ( +- const char* logical_type_id +- ) +-{ +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/ProvidesDef:1.0") == 0) +- return ACE_static_cast (POA_IR::ProvidesDef_ptr, this); +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Contained:1.0") == 0) +- return ACE_static_cast (POA_IR::Contained_ptr, this); +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/IRObject:1.0") == 0) +- return ACE_static_cast (POA_CORBA::IRObject_ptr, this); +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/Object:1.0") == 0) +- return ACE_static_cast(PortableServer::Servant, this); +- return 0; +-} +- +-void POA_IR::ProvidesDef::_dispatch (TAO_ServerRequest &req, void *context, CORBA::Environment &ACE_TRY_ENV) +-{ +- this->synchronous_upcall_dispatch(req, context, this, ACE_TRY_ENV); +-} +- +-const char* POA_IR::ProvidesDef::_interface_repository_id (void) const +-{ +- return "IDL:omg.org/IR/ProvidesDef:1.0"; +-} +- +-IR::ProvidesDef* +-POA_IR::ProvidesDef::_this (CORBA_Environment &ACE_TRY_ENV) +-{ +- TAO_Stub *stub = this->_create_stub (ACE_TRY_ENV); +- ACE_CHECK_RETURN (0); +- +- CORBA::Object_ptr tmp = CORBA::Object::_nil (); +- +- if (stub->servant_orb_var ()->orb_core ()->optimize_collocation_objects ()) +- ACE_NEW_RETURN (tmp, CORBA::Object (stub, 1, this), 0); +- else +- ACE_NEW_RETURN (tmp, CORBA::Object (stub, 0, this), 0); +- +- CORBA::Object_var obj = tmp; +- return ::IR::ProvidesDef::_unchecked_narrow (obj.in ()); +-} +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +-POA_IR::ProvidesDef::TAO_ServerRequestInfo_IR_ProvidesDef_interface_type_get::TAO_ServerRequestInfo_IR_ProvidesDef_interface_type_get ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::ProvidesDef *tao_impl +- , +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl) +-{} +- +-Dynamic::ParameterList * +-POA_IR::ProvidesDef::TAO_ServerRequestInfo_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 * +-POA_IR::ProvidesDef::TAO_ServerRequestInfo_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 * +-POA_IR::ProvidesDef::TAO_ServerRequestInfo_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 (); +-} +- +-char * +-POA_IR::ProvidesDef::TAO_ServerRequestInfo_IR_ProvidesDef_interface_type_get::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::ProvidesDef::TAO_ServerRequestInfo_IR_ProvidesDef_interface_type_get::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-void +-POA_IR::ProvidesDef::TAO_ServerRequestInfo_IR_ProvidesDef_interface_type_get::result (IR::InterfaceDef_ptr result) +-{ +- // Update the result. +- this->_result = result; +-} +- +-#endif /* TAO_HAS_INTERCEPTORS */ +-class TAO_IR_UsesDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable +-{ +-private: +- unsigned int hash (const char *str, unsigned int len); +-public: +- const TAO_operation_db_entry * lookup (const char *str, unsigned int len); +-}; +-/* starting time is 16:31:13 */ +-/* C++ code produced by gperf version 2.8 (ACE version) */ +-/* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_UsesDef_Perfect_Hash_OpTable -N lookup */ +-unsigned int +-TAO_IR_UsesDef_Perfect_Hash_OpTable::hash (const char *str, unsigned int len) +-{ +- static const unsigned char asso_values[] = +- { +-#if defined (ACE_MVS) +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 0, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 0, +- 37, 37, 0, 0, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 0, 0, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 10, 37, 37, 37, 37, 10, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, +-#else +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 0, 37, 0, 37, 37, +- 0, 0, 37, 37, 37, 37, 37, 37, 37, 0, +- 0, 37, 37, 37, 37, 37, 10, 37, 37, 37, +- 37, 10, 37, 37, 37, 37, 37, 37, +-#endif /* ACE_MVS */ +- }; +- return len + asso_values[str[len - 1]] + asso_values[str[0]]; +-} +- +-const class TAO_operation_db_entry * +-TAO_IR_UsesDef_Perfect_Hash_OpTable::lookup (const char *str, unsigned int len) +-{ +- enum +- { +- TOTAL_KEYWORDS = 17, +- MIN_WORD_LENGTH = 4, +- MAX_WORD_LENGTH = 26, +- MIN_HASH_VALUE = 4, +- MAX_HASH_VALUE = 36, +- HASH_VALUE_RANGE = 33, +- DUPLICATES = 4 +- }; +- +- static const class TAO_operation_db_entry wordlist[] = +- { +- {"",0},{"",0},{"",0},{"",0}, +- {"move", &POA_IR::UsesDef::move_skel}, +- {"_is_a", &POA_IR::UsesDef::_is_a_skel}, +- {"_get_id", &POA_IR::UsesDef::_get_id_skel}, +- {"_set_id", &POA_IR::UsesDef::_set_id_skel}, +- {"describe", &POA_IR::UsesDef::describe_skel}, +- {"_get_name", &POA_IR::UsesDef::_get_name_skel}, +- {"_set_name", &POA_IR::UsesDef::_set_name_skel}, +- {"_get_version", &POA_IR::UsesDef::_get_version_skel}, +- {"_set_version", &POA_IR::UsesDef::_set_version_skel}, +- {"_get_def_kind", &POA_IR::UsesDef::_get_def_kind_skel}, +- {"_get_defined_in", &POA_IR::UsesDef::_get_defined_in_skel}, +- {"_get_is_multiple", &POA_IR::UsesDef::_get_is_multiple_skel}, +- {"destroy", &POA_IR::UsesDef::destroy_skel}, +- {"_get_absolute_name", &POA_IR::UsesDef::_get_absolute_name_skel}, +- {"_get_interface_type", &POA_IR::UsesDef::_get_interface_type_skel}, +- {"_non_existent", &POA_IR::UsesDef::_non_existent_skel}, +- {"_get_containing_repository", &POA_IR::UsesDef::_get_containing_repository_skel}, +- }; +- +- static const signed char lookup[] = +- { +- -6, -2, -9, -2, 4, 5, -1, -43, 8, -43, -11, -2, -38, 13, +- -1, 14, 15, 16, 17, 18, -1, -1, -1, 19, -1, -1, -1, -1, +- -1, -1, -1, -1, -1, -1, -1, -1, 20, +- }; +- +- if (len <= MAX_WORD_LENGTH && len >= MIN_WORD_LENGTH) +- { +- unsigned int key = hash (str, len); +- +- if (key <= MAX_HASH_VALUE && key >= MIN_HASH_VALUE) +- { +- int slot = lookup[key]; +- +- if (slot >= 0 && slot < MAX_HASH_VALUE) +- { +- const char *s = wordlist[slot].opname_; +- +- if (*str == *s && !strncmp (str + 1, s + 1, len - 1)) +- return &wordlist[slot]; +- } +- else if (slot < 0 && slot >= -MAX_HASH_VALUE) +- return 0; +- else +- { +- unsigned int offset = key + slot + (slot > 0 ? -MAX_HASH_VALUE : MAX_HASH_VALUE); +- const class TAO_operation_db_entry *base = &wordlist[-lookup[offset]]; +- const class TAO_operation_db_entry *ptr = base + -lookup[offset + 1]; +- +- while (--ptr >= base) +- if (*str == *ptr->opname_ && !strncmp (str + 1, ptr->opname_ + 1, len - 1)) +- return ptr; +- } +- } +- } +- return 0; +-} +-/* ending time is 16:31:13 */ +-static TAO_IR_UsesDef_Perfect_Hash_OpTable tao_IR_UsesDef_optable; +- +- +-/////////////////////////////////////////////////////////////////////// +-// Strategized Proxy Broker Implementation +-// +- +-// Factory function Implementation. +-POA_IR::_TAO_UsesDef_Strategized_Proxy_Broker *POA_IR::_TAO_UsesDef_Strategized_Proxy_Broker::the_TAO_UsesDef_Strategized_Proxy_Broker (void) +-{ +- static POA_IR::_TAO_UsesDef_Strategized_Proxy_Broker strategized_proxy_broker; +- return &strategized_proxy_broker; +-} +- +-POA_IR::_TAO_UsesDef_Strategized_Proxy_Broker::_TAO_UsesDef_Strategized_Proxy_Broker (void) +-{ +- for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) +- this->proxy_cache_[i] = 0; +- +-} +- +-POA_IR::_TAO_UsesDef_Strategized_Proxy_Broker::~_TAO_UsesDef_Strategized_Proxy_Broker (void) +-{ +- for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) +- delete this->proxy_cache_[i]; +- +-} +- +-IR::_TAO_UsesDef_Proxy_Impl& +-POA_IR::_TAO_UsesDef_Strategized_Proxy_Broker::select_proxy ( +- ::IR::UsesDef *object, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- TAO_ORB_Core::TAO_Collocation_Strategies strategy = +- TAO_ORB_Core::collocation_strategy (object); +- +- if (this->proxy_cache_[strategy] != 0) +- return *this->proxy_cache_[strategy]; +- +- this->create_proxy (strategy, ACE_TRY_ENV); +- ACE_CHECK_RETURN (*this->proxy_cache_[strategy]); +- +- return *this->proxy_cache_[strategy]; +- +-} +- +-void +-POA_IR::_TAO_UsesDef_Strategized_Proxy_Broker::create_proxy ( +- TAO_ORB_Core::TAO_Collocation_Strategies strategy, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- ACE_GUARD (TAO_SYNCH_MUTEX, guard, this->mutex_); +- +- if (this->proxy_cache_[strategy] == 0) +- { +- switch (strategy) +- { +- case TAO_ORB_Core::THRU_POA_STRATEGY: +- ACE_NEW_THROW_EX ( +- this->proxy_cache_[strategy], +- POA_IR::_TAO_UsesDef_ThruPOA_Proxy_Impl, +- CORBA::NO_MEMORY () +- ); +- ACE_CHECK; +- break; +- +- case TAO_ORB_Core::REMOTE_STRATEGY: +- default: +- ACE_NEW_THROW_EX ( +- this->proxy_cache_[strategy], +- ::IR::_TAO_UsesDef_Remote_Proxy_Impl, +- CORBA::NO_MEMORY () +- ); +- ACE_CHECK; +- break; +- +- } +- +- } +-} +- +- +-// +-// End Strategized Proxy Broker Implementation +-/////////////////////////////////////////////////////////////////////// +- +- +-IR::_TAO_UsesDef_Proxy_Broker * +-IR__TAO_UsesDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) +-{ +- ACE_UNUSED_ARG (obj); +- return ::POA_IR::_TAO_UsesDef_Strategized_Proxy_Broker::the_TAO_UsesDef_Strategized_Proxy_Broker(); +-} +- +-int +-IR__TAO_UsesDef_Proxy_Broker_Factory_Initializer (long _dummy_) +-{ +- ACE_UNUSED_ARG (_dummy_); +- +- IR__TAO_UsesDef_Proxy_Broker_Factory_function_pointer = +- IR__TAO_UsesDef_Proxy_Broker_Factory_function; +- +- return 0; +-} +- +-static int IR__TAO_UsesDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = +- IR__TAO_UsesDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, IR__TAO_UsesDef_Proxy_Broker_Factory_Initializer)); +- +- +-/////////////////////////////////////////////////////////////////////// +-// ThruPOA Proxy Implementation +-// +- +-POA_IR::_TAO_UsesDef_ThruPOA_Proxy_Impl::_TAO_UsesDef_ThruPOA_Proxy_Impl (void) +-{} +- +-// ThruPOA Implementation of the IDL interface methods +- +-IR::InterfaceDef_ptr POA_IR::_TAO_UsesDef_ThruPOA_Proxy_Impl::interface_type ( +- CORBA_Object *_collocated_tao_target_, +- CORBA::Environment &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) +-{ +- IR::InterfaceDef_var _tao_retval; +- ACE_UNUSED_ARG (_tao_retval); +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "interface_type", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK_RETURN (0); +- return ACE_reinterpret_cast ( +- POA_IR::UsesDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/UsesDef:1.0" +- ) +- )->interface_type ( +- ACE_TRY_ENV +- ); +-} +- +-CORBA::Boolean POA_IR::_TAO_UsesDef_ThruPOA_Proxy_Impl::is_multiple ( +- CORBA_Object *_collocated_tao_target_, +- CORBA::Environment &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) +-{ +- CORBA::Boolean _tao_retval = 0; +- ACE_UNUSED_ARG (_tao_retval); +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "is_multiple", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK_RETURN (_tao_retval); +- return ACE_reinterpret_cast ( +- POA_IR::UsesDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/UsesDef:1.0" +- ) +- )->is_multiple ( +- ACE_TRY_ENV +- ); +-} +- +-// +-// End ThruPOA Proxy Implementation +-/////////////////////////////////////////////////////////////////////// +- +-// skeleton constructor +-POA_IR::UsesDef::UsesDef (void) +-{ +- this->optable_ = &tao_IR_UsesDef_optable; +-} +- +-// copy ctor +-POA_IR::UsesDef::UsesDef (const UsesDef& rhs) +- : ACE_NESTED_CLASS (POA_IR,Contained) (rhs), +- ACE_NESTED_CLASS (POA_CORBA,IRObject) (rhs), +- TAO_ServantBase (rhs) +-{} +- +-// skeleton destructor +-POA_IR::UsesDef::~UsesDef (void) +-{ +-} +- +-void POA_IR::UsesDef::_get_interface_type_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- POA_IR::UsesDef *_tao_impl = (POA_IR::UsesDef *)_tao_object_reference; +- +- IR::InterfaceDef_var _tao_retval; +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::UsesDef::TAO_ServerRequestInfo_IR_UsesDef_interface_type_get ri ( +- _tao_server_request, +- _tao_impl +- , +- ACE_TRY_ENV +- ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->interface_type ( +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::InterfaceDef_ptr _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << _tao_retval.in ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- +-} +- +-void POA_IR::UsesDef::_get_is_multiple_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- POA_IR::UsesDef *_tao_impl = (POA_IR::UsesDef *)_tao_object_reference; +- +- CORBA::Boolean _tao_retval = 0; +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::UsesDef::TAO_ServerRequestInfo_IR_UsesDef_is_multiple_get ri ( +- _tao_server_request, +- _tao_impl +- , +- ACE_TRY_ENV +- ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->is_multiple ( +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- CORBA::Boolean _tao_retval_info = _tao_retval; +- ri.result (_tao_retval_info); +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << CORBA::Any::from_boolean (_tao_retval)) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- +-} +- +-void POA_IR::UsesDef::_is_a_skel ( +- TAO_ServerRequest &_tao_server_request, +- void * _tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::UsesDef *_tao_impl = (POA_IR::UsesDef *) _tao_object_reference; +- CORBA::Boolean _tao_retval = 0; +- CORBA::String_var value; +- if (!(_tao_in >> value.out ())) +- ACE_THROW (CORBA::MARSHAL ()); +- +- _tao_retval = _tao_impl->_is_a (value.in (), ACE_TRY_ENV); +- ACE_CHECK; +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) +- ACE_THROW (CORBA::MARSHAL ()); +-} +- +-void POA_IR::UsesDef::_non_existent_skel ( +- TAO_ServerRequest &_tao_server_request, +- void * _tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- POA_IR::UsesDef *_tao_impl = (POA_IR::UsesDef *) _tao_object_reference; +- CORBA::Boolean _tao_retval = _tao_impl->_non_existent (ACE_TRY_ENV); +- ACE_CHECK; +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) +- ACE_THROW (CORBA::MARSHAL ()); +-} +- +-CORBA::Boolean POA_IR::UsesDef::_is_a ( +- const char* value, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- if ( +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/UsesDef:1.0")) || +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/Contained:1.0")) || +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/CORBA/IRObject:1.0")) || +- (!ACE_OS::strcmp ((char *)value, CORBA::_tc_Object->id (ACE_TRY_ENV)))) +- return 1; +- else +- return 0; +-} +- +-void* POA_IR::UsesDef::_downcast ( +- const char* logical_type_id +- ) +-{ +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/UsesDef:1.0") == 0) +- return ACE_static_cast (POA_IR::UsesDef_ptr, this); +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Contained:1.0") == 0) +- return ACE_static_cast (POA_IR::Contained_ptr, this); +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/IRObject:1.0") == 0) +- return ACE_static_cast (POA_CORBA::IRObject_ptr, this); +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/Object:1.0") == 0) +- return ACE_static_cast(PortableServer::Servant, this); +- return 0; +-} +- +-void POA_IR::UsesDef::_dispatch (TAO_ServerRequest &req, void *context, CORBA::Environment &ACE_TRY_ENV) +-{ +- this->synchronous_upcall_dispatch(req, context, this, ACE_TRY_ENV); +-} +- +-const char* POA_IR::UsesDef::_interface_repository_id (void) const +-{ +- return "IDL:omg.org/IR/UsesDef:1.0"; +-} +- +-IR::UsesDef* +-POA_IR::UsesDef::_this (CORBA_Environment &ACE_TRY_ENV) +-{ +- TAO_Stub *stub = this->_create_stub (ACE_TRY_ENV); +- ACE_CHECK_RETURN (0); +- +- CORBA::Object_ptr tmp = CORBA::Object::_nil (); +- +- if (stub->servant_orb_var ()->orb_core ()->optimize_collocation_objects ()) +- ACE_NEW_RETURN (tmp, CORBA::Object (stub, 1, this), 0); +- else +- ACE_NEW_RETURN (tmp, CORBA::Object (stub, 0, this), 0); +- +- CORBA::Object_var obj = tmp; +- return ::IR::UsesDef::_unchecked_narrow (obj.in ()); +-} +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +-POA_IR::UsesDef::TAO_ServerRequestInfo_IR_UsesDef_interface_type_get::TAO_ServerRequestInfo_IR_UsesDef_interface_type_get ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::UsesDef *tao_impl +- , +- CORBA::Environment & ++void POA_IR::_TAO_ValueDef_ThruPOA_Proxy_Impl::initializers ( ++ CORBA_Object *_collocated_tao_target_, + const IR_InitializerSeq & initializers, - CORBA::Environment &ACE_TRY_ENV ++ CORBA::Environment &ACE_TRY_ENV ) - ACE_THROW_SPEC (( -@@ -31376,7 +31259,7 @@ - return; - } - --IR::ValueDef_ptr POA_IR::_TAO_ValueDef_ThruPOA_Proxy_Impl::base_value ( -+IR_ValueDef_ptr POA_IR::_TAO_ValueDef_ThruPOA_Proxy_Impl::base_value ( - CORBA_Object *_collocated_tao_target_, - CORBA::Environment &ACE_TRY_ENV +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl) +-{} +- +-Dynamic::ParameterList * +-POA_IR::UsesDef::TAO_ServerRequestInfo_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 * +-POA_IR::UsesDef::TAO_ServerRequestInfo_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 * +-POA_IR::UsesDef::TAO_ServerRequestInfo_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 (); +-} +- +-char * +-POA_IR::UsesDef::TAO_ServerRequestInfo_IR_UsesDef_interface_type_get::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::UsesDef::TAO_ServerRequestInfo_IR_UsesDef_interface_type_get::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-void +-POA_IR::UsesDef::TAO_ServerRequestInfo_IR_UsesDef_interface_type_get::result (IR::InterfaceDef_ptr result) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException ++ )) + { +- // Update the result. +- this->_result = result; ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "initializers", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK; ++ ACE_reinterpret_cast ( ++ POA_IR::ValueDef_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/ValueDef:1.0" ++ ) ++ )->initializers ( ++ initializers, ++ ACE_TRY_ENV ++ ); ++ return; + } + +-POA_IR::UsesDef::TAO_ServerRequestInfo_IR_UsesDef_is_multiple_get::TAO_ServerRequestInfo_IR_UsesDef_is_multiple_get ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::UsesDef *tao_impl +- , +- CORBA::Environment & ++IR::ValueDef_ptr POA_IR::_TAO_ValueDef_ThruPOA_Proxy_Impl::base_value ( ++ CORBA_Object *_collocated_tao_target_, ++ CORBA::Environment &ACE_TRY_ENV ) -@@ -31384,7 +31267,7 @@ - CORBA::SystemException - )) - { -- IR::ValueDef_var _tao_retval; +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl) +-{} +- +-Dynamic::ParameterList * +-POA_IR::UsesDef::TAO_ServerRequestInfo_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 * +-POA_IR::UsesDef::TAO_ServerRequestInfo_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 * +-POA_IR::UsesDef::TAO_ServerRequestInfo_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 (); +-} +- +-char * +-POA_IR::UsesDef::TAO_ServerRequestInfo_IR_UsesDef_is_multiple_get::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::UsesDef::TAO_ServerRequestInfo_IR_UsesDef_is_multiple_get::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-void +-POA_IR::UsesDef::TAO_ServerRequestInfo_IR_UsesDef_is_multiple_get::result (CORBA::Boolean result) +-{ +- // Update the result. +- this->_result = result; +-} +- +-#endif /* TAO_HAS_INTERCEPTORS */ +-class TAO_IR_EventDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable +-{ +-private: +- unsigned int hash (const char *str, unsigned int len); +-public: +- const TAO_operation_db_entry * lookup (const char *str, unsigned int len); +-}; +-/* starting time is 16:31:13 */ +-/* C++ code produced by gperf version 2.8 (ACE version) */ +-/* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_EventDef_Perfect_Hash_OpTable -N lookup */ +-unsigned int +-TAO_IR_EventDef_Perfect_Hash_OpTable::hash (const char *str, unsigned int len) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException ++ )) + { +- static const unsigned char asso_values[] = +- { +-#if defined (ACE_MVS) +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 0, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 0, +- 37, 37, 0, 0, 37, 37, 37, 10, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 0, 0, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 10, 37, 37, 37, 37, 10, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, +-#else +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 0, 37, 0, 37, 37, +- 0, 0, 37, 37, 37, 10, 37, 37, 37, 0, +- 0, 37, 37, 37, 37, 37, 10, 37, 37, 37, +- 37, 10, 37, 37, 37, 37, 37, 37, +-#endif /* ACE_MVS */ +- }; +- return len + asso_values[str[len - 1]] + asso_values[str[0]]; + IR_ValueDef_var _tao_retval; - ACE_UNUSED_ARG (_tao_retval); - TAO_Object_Adapter::Servant_Upcall servant_upcall ( - _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -31409,7 +31292,7 @@ ++ ACE_UNUSED_ARG (_tao_retval); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "base_value", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK_RETURN (0); ++ return ACE_reinterpret_cast ( ++ POA_IR::ValueDef_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/ValueDef:1.0" ++ ) ++ )->base_value ( ++ ACE_TRY_ENV ++ ); + } - void POA_IR::_TAO_ValueDef_ThruPOA_Proxy_Impl::base_value ( - CORBA_Object *_collocated_tao_target_, -- IR::ValueDef_ptr base_value, +-const class TAO_operation_db_entry * +-TAO_IR_EventDef_Perfect_Hash_OpTable::lookup (const char *str, unsigned int len) ++void POA_IR::_TAO_ValueDef_ThruPOA_Proxy_Impl::base_value ( ++ CORBA_Object *_collocated_tao_target_, + IR_ValueDef_ptr base_value, - CORBA::Environment &ACE_TRY_ENV - ) - ACE_THROW_SPEC (( -@@ -31439,7 +31322,7 @@ - return; ++ CORBA::Environment &ACE_TRY_ENV ++ ) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException ++ )) + { +- enum +- { +- TOTAL_KEYWORDS = 17, +- MIN_WORD_LENGTH = 4, +- MAX_WORD_LENGTH = 26, +- MIN_HASH_VALUE = 4, +- MAX_HASH_VALUE = 36, +- HASH_VALUE_RANGE = 33, +- DUPLICATES = 4 +- }; +- +- static const class TAO_operation_db_entry wordlist[] = +- { +- {"",0},{"",0},{"",0},{"",0}, +- {"move", &POA_IR::EventDef::move_skel}, +- {"_is_a", &POA_IR::EventDef::_is_a_skel}, +- {"_get_id", &POA_IR::EventDef::_get_id_skel}, +- {"_set_id", &POA_IR::EventDef::_set_id_skel}, +- {"describe", &POA_IR::EventDef::describe_skel}, +- {"_get_name", &POA_IR::EventDef::_get_name_skel}, +- {"_set_name", &POA_IR::EventDef::_set_name_skel}, +- {"_get_version", &POA_IR::EventDef::_get_version_skel}, +- {"_set_version", &POA_IR::EventDef::_set_version_skel}, +- {"_get_def_kind", &POA_IR::EventDef::_get_def_kind_skel}, +- {"is_a", &POA_IR::EventDef::is_a_skel}, +- {"_get_defined_in", &POA_IR::EventDef::_get_defined_in_skel}, +- {"destroy", &POA_IR::EventDef::destroy_skel}, +- {"_get_absolute_name", &POA_IR::EventDef::_get_absolute_name_skel}, +- {"_get_event", &POA_IR::EventDef::_get_event_skel}, +- {"_non_existent", &POA_IR::EventDef::_non_existent_skel}, +- {"_get_containing_repository", &POA_IR::EventDef::_get_containing_repository_skel}, +- }; +- +- static const signed char lookup[] = +- { +- -6, -2, -9, -2, 4, 5, -1, -43, 8, -43, -11, -2, -38, 13, +- 14, 15, -1, 16, 17, -1, 18, -1, -1, 19, -1, -1, -1, -1, +- -1, -1, -1, -1, -1, -1, -1, -1, 20, +- }; +- +- if (len <= MAX_WORD_LENGTH && len >= MIN_WORD_LENGTH) +- { +- unsigned int key = hash (str, len); +- +- if (key <= MAX_HASH_VALUE && key >= MIN_HASH_VALUE) +- { +- int slot = lookup[key]; +- +- if (slot >= 0 && slot < MAX_HASH_VALUE) +- { +- const char *s = wordlist[slot].opname_; +- +- if (*str == *s && !strncmp (str + 1, s + 1, len - 1)) +- return &wordlist[slot]; +- } +- else if (slot < 0 && slot >= -MAX_HASH_VALUE) +- return 0; +- else +- { +- unsigned int offset = key + slot + (slot > 0 ? -MAX_HASH_VALUE : MAX_HASH_VALUE); +- const class TAO_operation_db_entry *base = &wordlist[-lookup[offset]]; +- const class TAO_operation_db_entry *ptr = base + -lookup[offset + 1]; +- +- while (--ptr >= base) +- if (*str == *ptr->opname_ && !strncmp (str + 1, ptr->opname_ + 1, len - 1)) +- return ptr; +- } +- } +- } +- return 0; +-} +-/* ending time is 16:31:13 */ +-static TAO_IR_EventDef_Perfect_Hash_OpTable tao_IR_EventDef_optable; +- +- +-/////////////////////////////////////////////////////////////////////// +-// Strategized Proxy Broker Implementation +-// ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "base_value", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK; ++ ACE_reinterpret_cast ( ++ POA_IR::ValueDef_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/ValueDef:1.0" ++ ) ++ )->base_value ( ++ base_value, ++ ACE_TRY_ENV ++ ); ++ return; ++} + +-// Factory function Implementation. +-POA_IR::_TAO_EventDef_Strategized_Proxy_Broker *POA_IR::_TAO_EventDef_Strategized_Proxy_Broker::the_TAO_EventDef_Strategized_Proxy_Broker (void) ++IR::ValueDefSeq * POA_IR::_TAO_ValueDef_ThruPOA_Proxy_Impl::abstract_base_values ( ++ CORBA_Object *_collocated_tao_target_, ++ CORBA::Environment &ACE_TRY_ENV ++ ) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException ++ )) + { +- static POA_IR::_TAO_EventDef_Strategized_Proxy_Broker strategized_proxy_broker; +- return &strategized_proxy_broker; ++ IR_ValueDefSeq_var _tao_retval; ++ ACE_UNUSED_ARG (_tao_retval); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "abstract_base_values", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK_RETURN (0); ++ return ACE_reinterpret_cast ( ++ POA_IR::ValueDef_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/ValueDef:1.0" ++ ) ++ )->abstract_base_values ( ++ ACE_TRY_ENV ++ ); } --IR::ValueDefSeq * POA_IR::_TAO_ValueDef_ThruPOA_Proxy_Impl::abstract_base_values ( -+IR_ValueDefSeq * POA_IR::_TAO_ValueDef_ThruPOA_Proxy_Impl::abstract_base_values ( - CORBA_Object *_collocated_tao_target_, +-POA_IR::_TAO_EventDef_Strategized_Proxy_Broker::_TAO_EventDef_Strategized_Proxy_Broker (void) ++void POA_IR::_TAO_ValueDef_ThruPOA_Proxy_Impl::abstract_base_values ( ++ CORBA_Object *_collocated_tao_target_, ++ const IR_ValueDefSeq & abstract_base_values, ++ CORBA::Environment &ACE_TRY_ENV ++ ) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException ++ )) + { +- for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) +- this->proxy_cache_[i] = 0; +- ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "abstract_base_values", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK; ++ ACE_reinterpret_cast ( ++ POA_IR::ValueDef_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/ValueDef:1.0" ++ ) ++ )->abstract_base_values ( ++ abstract_base_values, ++ ACE_TRY_ENV ++ ); ++ return; + } + +-POA_IR::_TAO_EventDef_Strategized_Proxy_Broker::~_TAO_EventDef_Strategized_Proxy_Broker (void) ++CORBA::Boolean POA_IR::_TAO_ValueDef_ThruPOA_Proxy_Impl::is_abstract ( ++ CORBA_Object *_collocated_tao_target_, ++ CORBA::Environment &ACE_TRY_ENV ++ ) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException ++ )) + { +- for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) +- delete this->proxy_cache_[i]; +- ++ CORBA::Boolean _tao_retval = 0; ++ ACE_UNUSED_ARG (_tao_retval); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "is_abstract", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK_RETURN (_tao_retval); ++ return ACE_reinterpret_cast ( ++ POA_IR::ValueDef_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/ValueDef:1.0" ++ ) ++ )->is_abstract ( ++ ACE_TRY_ENV ++ ); + } + +-IR::_TAO_EventDef_Proxy_Impl& +-POA_IR::_TAO_EventDef_Strategized_Proxy_Broker::select_proxy ( +- ::IR::EventDef *object, ++void POA_IR::_TAO_ValueDef_ThruPOA_Proxy_Impl::is_abstract ( ++ CORBA_Object *_collocated_tao_target_, ++ CORBA::Boolean is_abstract, CORBA::Environment &ACE_TRY_ENV ) -@@ -31447,7 +31330,7 @@ - CORBA::SystemException - )) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException ++ )) { -- IR::ValueDefSeq_var _tao_retval; -+ IR_ValueDefSeq_var _tao_retval; - ACE_UNUSED_ARG (_tao_retval); - TAO_Object_Adapter::Servant_Upcall servant_upcall ( - _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -31472,7 +31355,7 @@ +- TAO_ORB_Core::TAO_Collocation_Strategies strategy = +- TAO_ORB_Core::collocation_strategy (object); +- +- if (this->proxy_cache_[strategy] != 0) +- return *this->proxy_cache_[strategy]; +- +- this->create_proxy (strategy, ACE_TRY_ENV); +- ACE_CHECK_RETURN (*this->proxy_cache_[strategy]); +- +- return *this->proxy_cache_[strategy]; +- ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "is_abstract", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK; ++ ACE_reinterpret_cast ( ++ POA_IR::ValueDef_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/ValueDef:1.0" ++ ) ++ )->is_abstract ( ++ is_abstract, ++ ACE_TRY_ENV ++ ); ++ return; + } + +-void +-POA_IR::_TAO_EventDef_Strategized_Proxy_Broker::create_proxy ( +- TAO_ORB_Core::TAO_Collocation_Strategies strategy, ++CORBA::Boolean POA_IR::_TAO_ValueDef_ThruPOA_Proxy_Impl::is_custom ( ++ CORBA_Object *_collocated_tao_target_, + CORBA::Environment &ACE_TRY_ENV + ) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException ++ )) + { +- ACE_GUARD (TAO_SYNCH_MUTEX, guard, this->mutex_); +- +- if (this->proxy_cache_[strategy] == 0) +- { +- switch (strategy) +- { +- case TAO_ORB_Core::THRU_POA_STRATEGY: +- ACE_NEW_THROW_EX ( +- this->proxy_cache_[strategy], +- POA_IR::_TAO_EventDef_ThruPOA_Proxy_Impl, +- CORBA::NO_MEMORY () +- ); +- ACE_CHECK; +- break; +- +- case TAO_ORB_Core::REMOTE_STRATEGY: +- default: +- ACE_NEW_THROW_EX ( +- this->proxy_cache_[strategy], +- ::IR::_TAO_EventDef_Remote_Proxy_Impl, +- CORBA::NO_MEMORY () +- ); +- ACE_CHECK; +- break; +- +- } +- +- } ++ CORBA::Boolean _tao_retval = 0; ++ ACE_UNUSED_ARG (_tao_retval); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "is_custom", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK_RETURN (_tao_retval); ++ return ACE_reinterpret_cast ( ++ POA_IR::ValueDef_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/ValueDef:1.0" ++ ) ++ )->is_custom ( ++ ACE_TRY_ENV ++ ); + } + ++void POA_IR::_TAO_ValueDef_ThruPOA_Proxy_Impl::is_custom ( ++ CORBA_Object *_collocated_tao_target_, ++ CORBA::Boolean is_custom, ++ CORBA::Environment &ACE_TRY_ENV ++ ) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException ++ )) ++{ ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "is_custom", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK; ++ ACE_reinterpret_cast ( ++ POA_IR::ValueDef_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/ValueDef:1.0" ++ ) ++ )->is_custom ( ++ is_custom, ++ ACE_TRY_ENV ++ ); ++ return; ++} + +-// +-// End Strategized Proxy Broker Implementation +-/////////////////////////////////////////////////////////////////////// +- +- +-IR::_TAO_EventDef_Proxy_Broker * +-IR__TAO_EventDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) ++CORBA::Boolean POA_IR::_TAO_ValueDef_ThruPOA_Proxy_Impl::is_truncatable ( ++ CORBA_Object *_collocated_tao_target_, ++ CORBA::Environment &ACE_TRY_ENV ++ ) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException ++ )) + { +- ACE_UNUSED_ARG (obj); +- return ::POA_IR::_TAO_EventDef_Strategized_Proxy_Broker::the_TAO_EventDef_Strategized_Proxy_Broker(); ++ CORBA::Boolean _tao_retval = 0; ++ ACE_UNUSED_ARG (_tao_retval); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "is_truncatable", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK_RETURN (_tao_retval); ++ return ACE_reinterpret_cast ( ++ POA_IR::ValueDef_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/ValueDef:1.0" ++ ) ++ )->is_truncatable ( ++ ACE_TRY_ENV ++ ); + } + +-int +-IR__TAO_EventDef_Proxy_Broker_Factory_Initializer (long _dummy_) ++void POA_IR::_TAO_ValueDef_ThruPOA_Proxy_Impl::is_truncatable ( ++ CORBA_Object *_collocated_tao_target_, ++ CORBA::Boolean is_truncatable, ++ CORBA::Environment &ACE_TRY_ENV ++ ) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException ++ )) + { +- ACE_UNUSED_ARG (_dummy_); +- +- IR__TAO_EventDef_Proxy_Broker_Factory_function_pointer = +- IR__TAO_EventDef_Proxy_Broker_Factory_function; +- +- return 0; ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "is_truncatable", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK; ++ ACE_reinterpret_cast ( ++ POA_IR::ValueDef_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/ValueDef:1.0" ++ ) ++ )->is_truncatable ( ++ is_truncatable, ++ ACE_TRY_ENV ++ ); ++ return; + } - void POA_IR::_TAO_ValueDef_ThruPOA_Proxy_Impl::abstract_base_values ( +-static int IR__TAO_EventDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = +- IR__TAO_EventDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, IR__TAO_EventDef_Proxy_Broker_Factory_Initializer)); +- +- +-/////////////////////////////////////////////////////////////////////// +-// ThruPOA Proxy Implementation +-// +- +-POA_IR::_TAO_EventDef_ThruPOA_Proxy_Impl::_TAO_EventDef_ThruPOA_Proxy_Impl (void) +-{} +- +-// ThruPOA Implementation of the IDL interface methods +- +-CORBA::Boolean POA_IR::_TAO_EventDef_ThruPOA_Proxy_Impl::is_a ( ++CORBA::Boolean POA_IR::_TAO_ValueDef_ThruPOA_Proxy_Impl::is_a ( CORBA_Object *_collocated_tao_target_, -- const IR::ValueDefSeq & abstract_base_values, -+ const IR_ValueDefSeq & abstract_base_values, +- const char * event_id, ++ const char * id, CORBA::Environment &ACE_TRY_ENV ) ACE_THROW_SPEC (( -@@ -31724,12 +31607,12 @@ +@@ -37412,25 +16971,30 @@ + ); + ACE_CHECK_RETURN (_tao_retval); + return ACE_reinterpret_cast ( +- POA_IR::EventDef_ptr, ++ POA_IR::ValueDef_ptr, + servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/EventDef:1.0" ++ "IDL:omg.org/IR/ValueDef:1.0" + ) + )->is_a ( +- event_id, ++ id, + ACE_TRY_ENV ); } --IR::ValueMemberDef_ptr POA_IR::_TAO_ValueDef_ThruPOA_Proxy_Impl::create_value_member ( -+IR_ValueMemberDef_ptr POA_IR::_TAO_ValueDef_ThruPOA_Proxy_Impl::create_value_member ( +-IR::ValueDef_ptr POA_IR::_TAO_EventDef_ThruPOA_Proxy_Impl::event ( ++IR::ValueMemberDef_ptr POA_IR::_TAO_ValueDef_ThruPOA_Proxy_Impl::create_value_member ( CORBA_Object *_collocated_tao_target_, - const char * id, - const char * name, - const char * version, -- IR::IDLType_ptr type, ++ const char * id, ++ const char * name, ++ const char * version, + IR_IDLType_ptr type, - CORBA::Visibility access, ++ CORBA::Visibility access, CORBA::Environment &ACE_TRY_ENV ) -@@ -31737,7 +31620,7 @@ + ACE_THROW_SPEC (( CORBA::SystemException )) { -- IR::ValueMemberDef_var _tao_retval; +- IR::ValueDef_var _tao_retval; + IR_ValueMemberDef_var _tao_retval; ACE_UNUSED_ARG (_tao_retval); TAO_Object_Adapter::Servant_Upcall servant_upcall ( _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -31765,22 +31648,22 @@ - ); - } - --IR::AttributeDef_ptr POA_IR::_TAO_ValueDef_ThruPOA_Proxy_Impl::create_attribute ( -+IR_AttributeDef_ptr POA_IR::_TAO_ValueDef_ThruPOA_Proxy_Impl::create_attribute ( - CORBA_Object *_collocated_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, +@@ -37438,17 +17002,114 @@ + CORBA::Object_var forward_to; + servant_upcall.prepare_for_upcall ( + _collocated_tao_target_->_object_key (), +- "event", ++ "create_value_member", + forward_to.out (), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + return ACE_reinterpret_cast ( +- POA_IR::EventDef_ptr, ++ POA_IR::ValueDef_ptr, + servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/EventDef:1.0" ++ "IDL:omg.org/IR/ValueDef:1.0" + ) +- )->event ( ++ )->create_value_member ( ++ id, ++ name, ++ version, ++ type, ++ access, ++ ACE_TRY_ENV ++ ); ++} ++ ++IR::AttributeDef_ptr POA_IR::_TAO_ValueDef_ThruPOA_Proxy_Impl::create_attribute ( ++ CORBA_Object *_collocated_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 &ACE_TRY_ENV - ) - ACE_THROW_SPEC (( - CORBA::SystemException - )) - { -- IR::AttributeDef_var _tao_retval; ++ CORBA::Environment &ACE_TRY_ENV ++ ) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException ++ )) ++{ + IR_AttributeDef_var _tao_retval; - ACE_UNUSED_ARG (_tao_retval); - TAO_Object_Adapter::Servant_Upcall servant_upcall ( - _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -31810,23 +31693,23 @@ - ); - } - --IR::OperationDef_ptr POA_IR::_TAO_ValueDef_ThruPOA_Proxy_Impl::create_operation ( -+IR_OperationDef_ptr POA_IR::_TAO_ValueDef_ThruPOA_Proxy_Impl::create_operation ( - CORBA_Object *_collocated_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, ++ ACE_UNUSED_ARG (_tao_retval); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "create_attribute", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK_RETURN (0); ++ return ACE_reinterpret_cast ( ++ POA_IR::ValueDef_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/ValueDef:1.0" ++ ) ++ )->create_attribute ( ++ id, ++ name, ++ version, ++ type, ++ mode, ++ get_exceptions, ++ put_exceptions, ++ ACE_TRY_ENV ++ ); ++} ++ ++IR::OperationDef_ptr POA_IR::_TAO_ValueDef_ThruPOA_Proxy_Impl::create_operation ( ++ CORBA_Object *_collocated_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 &ACE_TRY_ENV - ) - ACE_THROW_SPEC (( - CORBA::SystemException - )) - { -- IR::OperationDef_var _tao_retval; ++ CORBA::Environment &ACE_TRY_ENV ++ ) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException ++ )) ++{ + IR_OperationDef_var _tao_retval; - ACE_UNUSED_ARG (_tao_retval); - TAO_Object_Adapter::Servant_Upcall servant_upcall ( - _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -31872,7 +31755,7 @@ - : ACE_NESTED_CLASS (POA_IR,Container) (rhs), - ACE_NESTED_CLASS (POA_IR,Contained) (rhs), - ACE_NESTED_CLASS (POA_IR,IDLType) (rhs), ++ ACE_UNUSED_ARG (_tao_retval); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "create_operation", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK_RETURN (0); ++ return ACE_reinterpret_cast ( ++ POA_IR::ValueDef_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/ValueDef:1.0" ++ ) ++ )->create_operation ( ++ id, ++ name, ++ version, ++ result, ++ mode, ++ params, ++ exceptions, ++ contexts, + ACE_TRY_ENV + ); + } +@@ -37458,778 +17119,611 @@ + /////////////////////////////////////////////////////////////////////// + + // skeleton constructor +-POA_IR::EventDef::EventDef (void) ++POA_IR::ValueDef::ValueDef (void) + { +- this->optable_ = &tao_IR_EventDef_optable; ++ this->optable_ = &tao_IR_ValueDef_optable; + } + + // copy ctor +-POA_IR::EventDef::EventDef (const EventDef& rhs) +- : ACE_NESTED_CLASS (POA_IR,Contained) (rhs), - ACE_NESTED_CLASS (POA_CORBA,IRObject) (rhs), ++POA_IR::ValueDef::ValueDef (const ValueDef& rhs) ++ : ACE_NESTED_CLASS (POA_IR,Container) (rhs), ++ ACE_NESTED_CLASS (POA_IR,Contained) (rhs), ++ ACE_NESTED_CLASS (POA_IR,IDLType) (rhs), + POA_CORBA_IRObject (rhs), TAO_ServantBase (rhs) {} -@@ -31890,7 +31773,7 @@ + // skeleton destructor +-POA_IR::EventDef::~EventDef (void) ++POA_IR::ValueDef::~ValueDef (void) { - POA_IR::ValueDef *_tao_impl = (POA_IR::ValueDef *)_tao_object_reference; - -- IR::InterfaceDefSeq_var _tao_retval; + } + +-void POA_IR::EventDef::is_a_skel ( ++void POA_IR::ValueDef::_get_supported_interfaces_skel ( + TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, ++ void *_tao_object_reference, ++ void * /* context */, + CORBA::Environment &ACE_TRY_ENV +- ) ++) + { +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::EventDef *_tao_impl = (POA_IR::EventDef *)_tao_object_reference; +- +- CORBA::Boolean _tao_retval = 0; +- CORBA::String_var event_id; +- if (!( +- (_tao_in >> event_id.out ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); ++ POA_IR::ValueDef *_tao_impl = (POA_IR::ValueDef *)_tao_object_reference; + + IR_InterfaceDefSeq_var _tao_retval; - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( -@@ -31917,7 +31800,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::InterfaceDefSeq * _tao_retval_info = _tao_retval._retn (); -+ IR_InterfaceDefSeq * _tao_retval_info = _tao_retval._retn (); - ri.result (_tao_retval_info); - _tao_retval = _tao_retval_info; - ri.reply_status (PortableInterceptor::SUCCESSFUL); -@@ -31971,14 +31854,12 @@ - TAO_InputCDR &_tao_in = _tao_server_request.incoming (); - POA_IR::ValueDef *_tao_impl = (POA_IR::ValueDef *)_tao_object_reference; - -- _tao_server_request.argument_flag (0); -- IR::InterfaceDefSeq supported_interfaces; -+ IR_InterfaceDefSeq supported_interfaces; +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::EventDef::TAO_ServerRequestInfo_IR_EventDef_is_a ri ( +- _tao_server_request, +- _tao_impl +- , +- event_id.in (), ++ _tao_retval = _tao_impl->supported_interfaces ( + ACE_TRY_ENV + ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->is_a ( +- event_id.in (), +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- CORBA::Boolean _tao_retval_info = _tao_retval; +- ri.result (_tao_retval_info); +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; ++ + ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); ++ ++ _tao_server_request.init_reply (); + TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); if (!( - (_tao_in >> supported_interfaces) +- (_tao_out << CORBA::Any::from_boolean (_tao_retval)) ++ (_tao_out << _tao_retval.in ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); ++} ++ ++void POA_IR::ValueDef::_set_supported_interfaces_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) ++{ ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::ValueDef *_tao_impl = (POA_IR::ValueDef *)_tao_object_reference; ++ ++ IR_InterfaceDefSeq supported_interfaces; ++ if (!( ++ (_tao_in >> supported_interfaces) )) - ACE_THROW (CORBA::MARSHAL()); +- ACE_THROW (CORBA::MARSHAL()); ++ ACE_THROW (CORBA::MARSHAL () ); ++ ++ _tao_impl->supported_interfaces ( ++ supported_interfaces, ++ ACE_TRY_ENV ++ ); ++ ++ ACE_CHECK; -- - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( - _tao_server_request.orb_core ()->server_request_interceptors (), -@@ -32049,7 +31930,7 @@ ++ _tao_server_request.init_reply (); + } + +-void POA_IR::EventDef::_get_event_skel ( ++void POA_IR::ValueDef::_get_initializers_skel ( + TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, ++ void *_tao_object_reference, ++ void * /* context */, + CORBA::Environment &ACE_TRY_ENV +- ) ++) { - POA_IR::ValueDef *_tao_impl = (POA_IR::ValueDef *)_tao_object_reference; - -- IR::InitializerSeq_var _tao_retval; +- POA_IR::EventDef *_tao_impl = (POA_IR::EventDef *)_tao_object_reference; ++ POA_IR::ValueDef *_tao_impl = (POA_IR::ValueDef *)_tao_object_reference; + +- IR::ValueDef_var _tao_retval; + IR_InitializerSeq_var _tao_retval; - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( -@@ -32076,7 +31957,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::InitializerSeq * _tao_retval_info = _tao_retval._retn (); -+ IR_InitializerSeq * _tao_retval_info = _tao_retval._retn (); - ri.result (_tao_retval_info); - _tao_retval = _tao_retval_info; - ri.reply_status (PortableInterceptor::SUCCESSFUL); -@@ -32130,14 +32011,12 @@ - TAO_InputCDR &_tao_in = _tao_server_request.incoming (); - POA_IR::ValueDef *_tao_impl = (POA_IR::ValueDef *)_tao_object_reference; - -- _tao_server_request.argument_flag (0); -- IR::InitializerSeq initializers; -+ IR_InitializerSeq initializers; +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::EventDef::TAO_ServerRequestInfo_IR_EventDef_event_get ri ( +- _tao_server_request, +- _tao_impl +- , ++ _tao_retval = _tao_impl->initializers ( + ACE_TRY_ENV + ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->event ( +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::ValueDef_ptr _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; ++ + ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); ++ ++ _tao_server_request.init_reply (); + TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); if (!( - (_tao_in >> initializers) + (_tao_out << _tao_retval.in ()) )) - ACE_THROW (CORBA::MARSHAL()); - +- ACE_THROW (CORBA::MARSHAL()); - - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( - _tao_server_request.orb_core ()->server_request_interceptors (), -@@ -32208,7 +32087,7 @@ ++ ACE_THROW (CORBA::MARSHAL () ); + } + +-void POA_IR::EventDef::_is_a_skel ( +- TAO_ServerRequest &_tao_server_request, +- void * _tao_object_reference, ++void POA_IR::ValueDef::_set_initializers_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, + void * /* context */, + CORBA::Environment &ACE_TRY_ENV +- ) ++) { - POA_IR::ValueDef *_tao_impl = (POA_IR::ValueDef *)_tao_object_reference; - -- IR::ValueDef_var _tao_retval; + TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::EventDef *_tao_impl = (POA_IR::EventDef *) _tao_object_reference; +- CORBA::Boolean _tao_retval = 0; +- CORBA::String_var value; +- if (!(_tao_in >> value.out ())) +- ACE_THROW (CORBA::MARSHAL ()); +- +- _tao_retval = _tao_impl->_is_a (value.in (), ACE_TRY_ENV); ++ POA_IR::ValueDef *_tao_impl = (POA_IR::ValueDef *)_tao_object_reference; ++ ++ IR_InitializerSeq initializers; ++ if (!( ++ (_tao_in >> initializers) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); ++ ++ _tao_impl->initializers ( ++ initializers, ++ ACE_TRY_ENV ++ ); ++ + ACE_CHECK; +- ++ + _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) +- ACE_THROW (CORBA::MARSHAL ()); + } + +-void POA_IR::EventDef::_non_existent_skel ( +- TAO_ServerRequest &_tao_server_request, +- void * _tao_object_reference, ++void POA_IR::ValueDef::_get_base_value_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, + void * /* context */, + CORBA::Environment &ACE_TRY_ENV +- ) ++) + { +- POA_IR::EventDef *_tao_impl = (POA_IR::EventDef *) _tao_object_reference; +- CORBA::Boolean _tao_retval = _tao_impl->_non_existent (ACE_TRY_ENV); ++ POA_IR::ValueDef *_tao_impl = (POA_IR::ValueDef *)_tao_object_reference; ++ + IR_ValueDef_var _tao_retval; ++ ++ _tao_retval = _tao_impl->base_value ( ++ ACE_TRY_ENV ++ ); ++ + ACE_CHECK; +- ++ + _tao_server_request.init_reply (); + TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) +- ACE_THROW (CORBA::MARSHAL ()); ++ if (!( ++ (_tao_out << _tao_retval.in ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + } + +-CORBA::Boolean POA_IR::EventDef::_is_a ( +- const char* value, ++void POA_IR::ValueDef::_set_base_value_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, + CORBA::Environment &ACE_TRY_ENV +- ) ++) + { +- if ( +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/EventDef:1.0")) || +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/Contained:1.0")) || +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/CORBA/IRObject:1.0")) || +- (!ACE_OS::strcmp ((char *)value, CORBA::_tc_Object->id (ACE_TRY_ENV)))) +- return 1; +- else +- return 0; +-} ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::ValueDef *_tao_impl = (POA_IR::ValueDef *)_tao_object_reference; - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( -@@ -32235,7 +32114,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::ValueDef_ptr _tao_retval_info = _tao_retval._retn (); -+ IR_ValueDef_ptr _tao_retval_info = _tao_retval._retn (); - ri.result (_tao_retval_info); - _tao_retval = _tao_retval_info; - ri.reply_status (PortableInterceptor::SUCCESSFUL); -@@ -32289,14 +32168,12 @@ - TAO_InputCDR &_tao_in = _tao_server_request.incoming (); - POA_IR::ValueDef *_tao_impl = (POA_IR::ValueDef *)_tao_object_reference; - -- _tao_server_request.argument_flag (0); -- IR::ValueDef_var base_value; +-void* POA_IR::EventDef::_downcast ( +- const char* logical_type_id +- ) +-{ +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/EventDef:1.0") == 0) +- return ACE_static_cast (POA_IR::EventDef_ptr, this); +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Contained:1.0") == 0) +- return ACE_static_cast (POA_IR::Contained_ptr, this); +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/IRObject:1.0") == 0) +- return ACE_static_cast (POA_CORBA::IRObject_ptr, this); +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/Object:1.0") == 0) +- return ACE_static_cast(PortableServer::Servant, this); +- return 0; +-} + IR_ValueDef_var base_value; - if (!( - (_tao_in >> base_value.out ()) - )) - ACE_THROW (CORBA::MARSHAL()); ++ if (!( ++ (_tao_in >> base_value.out ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + +-void POA_IR::EventDef::_dispatch (TAO_ServerRequest &req, void *context, CORBA::Environment &ACE_TRY_ENV) +-{ +- this->synchronous_upcall_dispatch(req, context, this, ACE_TRY_ENV); +-} ++ _tao_impl->base_value ( ++ base_value.in (), ++ ACE_TRY_ENV ++ ); + +-const char* POA_IR::EventDef::_interface_repository_id (void) const +-{ +- return "IDL:omg.org/IR/EventDef:1.0"; +-} ++ ACE_CHECK; + +-IR::EventDef* +-POA_IR::EventDef::_this (CORBA_Environment &ACE_TRY_ENV) +-{ +- TAO_Stub *stub = this->_create_stub (ACE_TRY_ENV); +- ACE_CHECK_RETURN (0); +- +- CORBA::Object_ptr tmp = CORBA::Object::_nil (); +- +- if (stub->servant_orb_var ()->orb_core ()->optimize_collocation_objects ()) +- ACE_NEW_RETURN (tmp, CORBA::Object (stub, 1, this), 0); +- else +- ACE_NEW_RETURN (tmp, CORBA::Object (stub, 0, this), 0); +- +- CORBA::Object_var obj = tmp; +- return ::IR::EventDef::_unchecked_narrow (obj.in ()); ++ _tao_server_request.init_reply (); + } - - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( - _tao_server_request.orb_core ()->server_request_interceptors (), -@@ -32367,7 +32244,7 @@ - { - POA_IR::ValueDef *_tao_impl = (POA_IR::ValueDef *)_tao_object_reference; - -- IR::ValueDefSeq_var _tao_retval; +-#if (TAO_HAS_INTERCEPTORS == 1) +-POA_IR::EventDef::TAO_ServerRequestInfo_IR_EventDef_is_a::TAO_ServerRequestInfo_IR_EventDef_is_a ( ++void POA_IR::ValueDef::_get_abstract_base_values_skel ( + TAO_ServerRequest &_tao_server_request, +- POA_IR::EventDef *tao_impl +- , +- const char * event_id, +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- event_id_ (event_id) +-{} +- +-Dynamic::ParameterList * +-POA_IR::EventDef::TAO_ServerRequestInfo_IR_EventDef_is_a::arguments (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) + { +- // 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 (); +-} ++ POA_IR::ValueDef *_tao_impl = (POA_IR::ValueDef *)_tao_object_reference; + +-Dynamic::ExceptionList * +-POA_IR::EventDef::TAO_ServerRequestInfo_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; +-} + IR_ValueDefSeq_var _tao_retval; - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( -@@ -32394,7 +32271,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::ValueDefSeq * _tao_retval_info = _tao_retval._retn (); -+ IR_ValueDefSeq * _tao_retval_info = _tao_retval._retn (); - ri.result (_tao_retval_info); - _tao_retval = _tao_retval_info; - ri.reply_status (PortableInterceptor::SUCCESSFUL); -@@ -32448,14 +32325,12 @@ - TAO_InputCDR &_tao_in = _tao_server_request.incoming (); - POA_IR::ValueDef *_tao_impl = (POA_IR::ValueDef *)_tao_object_reference; - -- _tao_server_request.argument_flag (0); -- IR::ValueDefSeq abstract_base_values; +-CORBA::Any * +-POA_IR::EventDef::TAO_ServerRequestInfo_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 (); +-} ++ _tao_retval = _tao_impl->abstract_base_values ( ++ ACE_TRY_ENV ++ ); + +-char * +-POA_IR::EventDef::TAO_ServerRequestInfo_IR_EventDef_is_a::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} ++ ACE_CHECK; + +-CORBA::Boolean +-POA_IR::EventDef::TAO_ServerRequestInfo_IR_EventDef_is_a::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!( ++ (_tao_out << _tao_retval.in ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + } + +-void +-POA_IR::EventDef::TAO_ServerRequestInfo_IR_EventDef_is_a::result (CORBA::Boolean result) ++void POA_IR::ValueDef::_set_abstract_base_values_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) + { +- // Update the result. +- this->_result = result; +-} ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::ValueDef *_tao_impl = (POA_IR::ValueDef *)_tao_object_reference; + +-POA_IR::EventDef::TAO_ServerRequestInfo_IR_EventDef_event_get::TAO_ServerRequestInfo_IR_EventDef_event_get ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::EventDef *tao_impl +- , +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl) +-{} + IR_ValueDefSeq abstract_base_values; - if (!( - (_tao_in >> abstract_base_values) - )) - ACE_THROW (CORBA::MARSHAL()); ++ if (!( ++ (_tao_in >> abstract_base_values) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + +-Dynamic::ParameterList * +-POA_IR::EventDef::TAO_ServerRequestInfo_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; +-} ++ _tao_impl->abstract_base_values ( ++ abstract_base_values, ++ ACE_TRY_ENV ++ ); -- - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( - _tao_server_request.orb_core ()->server_request_interceptors (), -@@ -32606,14 +32481,12 @@ - TAO_InputCDR &_tao_in = _tao_server_request.incoming (); - POA_IR::ValueDef *_tao_impl = (POA_IR::ValueDef *)_tao_object_reference; - -- _tao_server_request.argument_flag (0); - CORBA::Boolean is_abstract; - if (!( - (_tao_in >> CORBA::Any::to_boolean (is_abstract)) - )) - ACE_THROW (CORBA::MARSHAL()); +-Dynamic::ExceptionList * +-POA_IR::EventDef::TAO_ServerRequestInfo_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; +-} ++ ACE_CHECK; -- - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( - _tao_server_request.orb_core ()->server_request_interceptors (), -@@ -32764,14 +32637,12 @@ - TAO_InputCDR &_tao_in = _tao_server_request.incoming (); - POA_IR::ValueDef *_tao_impl = (POA_IR::ValueDef *)_tao_object_reference; - -- _tao_server_request.argument_flag (0); - CORBA::Boolean is_custom; - if (!( - (_tao_in >> CORBA::Any::to_boolean (is_custom)) - )) - ACE_THROW (CORBA::MARSHAL()); +-CORBA::Any * +-POA_IR::EventDef::TAO_ServerRequestInfo_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 (); ++ _tao_server_request.init_reply (); + } + +-char * +-POA_IR::EventDef::TAO_ServerRequestInfo_IR_EventDef_event_get::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++void POA_IR::ValueDef::_get_is_abstract_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) + { +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} ++ POA_IR::ValueDef *_tao_impl = (POA_IR::ValueDef *)_tao_object_reference; -- - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( - _tao_server_request.orb_core ()->server_request_interceptors (), -@@ -32922,14 +32793,12 @@ - TAO_InputCDR &_tao_in = _tao_server_request.incoming (); - POA_IR::ValueDef *_tao_impl = (POA_IR::ValueDef *)_tao_object_reference; - -- _tao_server_request.argument_flag (0); - CORBA::Boolean is_truncatable; - if (!( - (_tao_in >> CORBA::Any::to_boolean (is_truncatable)) - )) - ACE_THROW (CORBA::MARSHAL()); +-CORBA::Boolean +-POA_IR::EventDef::TAO_ServerRequestInfo_IR_EventDef_event_get::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} ++ CORBA::Boolean _tao_retval = 0; -- - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( - _tao_server_request.orb_core ()->server_request_interceptors (), -@@ -33008,7 +32877,6 @@ - )) - ACE_THROW (CORBA::MARSHAL()); +-void +-POA_IR::EventDef::TAO_ServerRequestInfo_IR_EventDef_event_get::result (IR::ValueDef_ptr result) +-{ +- // Update the result. +- this->_result = result; +-} ++ _tao_retval = _tao_impl->is_abstract ( ++ ACE_TRY_ENV ++ ); -- - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( - _tao_server_request.orb_core ()->server_request_interceptors (), -@@ -33089,11 +32957,11 @@ - TAO_InputCDR &_tao_in = _tao_server_request.incoming (); - POA_IR::ValueDef *_tao_impl = (POA_IR::ValueDef *)_tao_object_reference; - -- IR::ValueMemberDef_var _tao_retval; +-#endif /* TAO_HAS_INTERCEPTORS */ +-class TAO_IR_EmitsDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable +-{ +-private: +- unsigned int hash (const char *str, unsigned int len); +-public: +- const TAO_operation_db_entry * lookup (const char *str, unsigned int len); +-}; +-/* starting time is 16:31:13 */ +-/* C++ code produced by gperf version 2.8 (ACE version) */ +-/* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_EmitsDef_Perfect_Hash_OpTable -N lookup */ +-unsigned int +-TAO_IR_EmitsDef_Perfect_Hash_OpTable::hash (const char *str, unsigned int len) +-{ +- static const unsigned char asso_values[] = +- { +-#if defined (ACE_MVS) +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 0, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 0, +- 37, 37, 0, 0, 37, 37, 37, 10, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 0, 0, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 10, 37, 37, 37, 37, 10, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, +-#else +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 0, 37, 0, 37, 37, +- 0, 0, 37, 37, 37, 10, 37, 37, 37, 0, +- 0, 37, 37, 37, 37, 37, 10, 37, 37, 37, +- 37, 10, 37, 37, 37, 37, 37, 37, +-#endif /* ACE_MVS */ +- }; +- return len + asso_values[str[len - 1]] + asso_values[str[0]]; ++ ACE_CHECK; ++ ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!( ++ (_tao_out << CORBA::Any::from_boolean (_tao_retval)) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + } + +-const class TAO_operation_db_entry * +-TAO_IR_EmitsDef_Perfect_Hash_OpTable::lookup (const char *str, unsigned int len) ++void POA_IR::ValueDef::_set_is_abstract_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) + { +- enum +- { +- TOTAL_KEYWORDS = 17, +- MIN_WORD_LENGTH = 4, +- MAX_WORD_LENGTH = 26, +- MIN_HASH_VALUE = 4, +- MAX_HASH_VALUE = 36, +- HASH_VALUE_RANGE = 33, +- DUPLICATES = 4 +- }; ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::ValueDef *_tao_impl = (POA_IR::ValueDef *)_tao_object_reference; ++ ++ CORBA::Boolean is_abstract; ++ if (!( ++ (_tao_in >> CORBA::Any::to_boolean (is_abstract)) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + +- static const class TAO_operation_db_entry wordlist[] = +- { +- {"",0},{"",0},{"",0},{"",0}, +- {"move", &POA_IR::EmitsDef::move_skel}, +- {"_is_a", &POA_IR::EmitsDef::_is_a_skel}, +- {"_get_id", &POA_IR::EmitsDef::_get_id_skel}, +- {"_set_id", &POA_IR::EmitsDef::_set_id_skel}, +- {"describe", &POA_IR::EmitsDef::describe_skel}, +- {"_get_name", &POA_IR::EmitsDef::_get_name_skel}, +- {"_set_name", &POA_IR::EmitsDef::_set_name_skel}, +- {"_get_version", &POA_IR::EmitsDef::_get_version_skel}, +- {"_set_version", &POA_IR::EmitsDef::_set_version_skel}, +- {"_get_def_kind", &POA_IR::EmitsDef::_get_def_kind_skel}, +- {"is_a", &POA_IR::EmitsDef::is_a_skel}, +- {"_get_defined_in", &POA_IR::EmitsDef::_get_defined_in_skel}, +- {"destroy", &POA_IR::EmitsDef::destroy_skel}, +- {"_get_absolute_name", &POA_IR::EmitsDef::_get_absolute_name_skel}, +- {"_get_event", &POA_IR::EmitsDef::_get_event_skel}, +- {"_non_existent", &POA_IR::EmitsDef::_non_existent_skel}, +- {"_get_containing_repository", &POA_IR::EmitsDef::_get_containing_repository_skel}, +- }; ++ _tao_impl->is_abstract ( ++ is_abstract, ++ ACE_TRY_ENV ++ ); + +- static const signed char lookup[] = +- { +- -6, -2, -9, -2, 4, 5, -1, -43, 8, -43, -11, -2, -38, 13, +- 14, 15, -1, 16, 17, -1, 18, -1, -1, 19, -1, -1, -1, -1, +- -1, -1, -1, -1, -1, -1, -1, -1, 20, +- }; ++ ACE_CHECK; + +- if (len <= MAX_WORD_LENGTH && len >= MIN_WORD_LENGTH) +- { +- unsigned int key = hash (str, len); ++ _tao_server_request.init_reply (); ++} + +- if (key <= MAX_HASH_VALUE && key >= MIN_HASH_VALUE) +- { +- int slot = lookup[key]; ++void POA_IR::ValueDef::_get_is_custom_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) ++{ ++ POA_IR::ValueDef *_tao_impl = (POA_IR::ValueDef *)_tao_object_reference; + +- if (slot >= 0 && slot < MAX_HASH_VALUE) +- { +- const char *s = wordlist[slot].opname_; ++ CORBA::Boolean _tao_retval = 0; + +- if (*str == *s && !strncmp (str + 1, s + 1, len - 1)) +- return &wordlist[slot]; +- } +- else if (slot < 0 && slot >= -MAX_HASH_VALUE) +- return 0; +- else +- { +- unsigned int offset = key + slot + (slot > 0 ? -MAX_HASH_VALUE : MAX_HASH_VALUE); +- const class TAO_operation_db_entry *base = &wordlist[-lookup[offset]]; +- const class TAO_operation_db_entry *ptr = base + -lookup[offset + 1]; ++ _tao_retval = _tao_impl->is_custom ( ++ ACE_TRY_ENV ++ ); + +- while (--ptr >= base) +- if (*str == *ptr->opname_ && !strncmp (str + 1, ptr->opname_ + 1, len - 1)) +- return ptr; +- } +- } +- } +- return 0; ++ ACE_CHECK; ++ ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!( ++ (_tao_out << CORBA::Any::from_boolean (_tao_retval)) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + } +-/* ending time is 16:31:13 */ +-static TAO_IR_EmitsDef_Perfect_Hash_OpTable tao_IR_EmitsDef_optable; + ++void POA_IR::ValueDef::_set_is_custom_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) ++{ ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::ValueDef *_tao_impl = (POA_IR::ValueDef *)_tao_object_reference; ++ ++ CORBA::Boolean is_custom; ++ if (!( ++ (_tao_in >> CORBA::Any::to_boolean (is_custom)) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + +-/////////////////////////////////////////////////////////////////////// +-// Strategized Proxy Broker Implementation +-// ++ _tao_impl->is_custom ( ++ is_custom, ++ ACE_TRY_ENV ++ ); + +-// Factory function Implementation. +-POA_IR::_TAO_EmitsDef_Strategized_Proxy_Broker *POA_IR::_TAO_EmitsDef_Strategized_Proxy_Broker::the_TAO_EmitsDef_Strategized_Proxy_Broker (void) +-{ +- static POA_IR::_TAO_EmitsDef_Strategized_Proxy_Broker strategized_proxy_broker; +- return &strategized_proxy_broker; ++ ACE_CHECK; ++ ++ _tao_server_request.init_reply (); + } + +-POA_IR::_TAO_EmitsDef_Strategized_Proxy_Broker::_TAO_EmitsDef_Strategized_Proxy_Broker (void) ++void POA_IR::ValueDef::_get_is_truncatable_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) + { +- for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) +- this->proxy_cache_[i] = 0; +- ++ POA_IR::ValueDef *_tao_impl = (POA_IR::ValueDef *)_tao_object_reference; ++ ++ CORBA::Boolean _tao_retval = 0; ++ ++ _tao_retval = _tao_impl->is_truncatable ( ++ ACE_TRY_ENV ++ ); ++ ++ ACE_CHECK; ++ ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!( ++ (_tao_out << CORBA::Any::from_boolean (_tao_retval)) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + } + +-POA_IR::_TAO_EmitsDef_Strategized_Proxy_Broker::~_TAO_EmitsDef_Strategized_Proxy_Broker (void) ++void POA_IR::ValueDef::_set_is_truncatable_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) + { +- for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) +- delete this->proxy_cache_[i]; +- ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::ValueDef *_tao_impl = (POA_IR::ValueDef *)_tao_object_reference; ++ ++ CORBA::Boolean is_truncatable; ++ if (!( ++ (_tao_in >> CORBA::Any::to_boolean (is_truncatable)) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); ++ ++ _tao_impl->is_truncatable ( ++ is_truncatable, ++ ACE_TRY_ENV ++ ); ++ ++ ACE_CHECK; ++ ++ _tao_server_request.init_reply (); + } + +-IR::_TAO_EmitsDef_Proxy_Impl& +-POA_IR::_TAO_EmitsDef_Strategized_Proxy_Broker::select_proxy ( +- ::IR::EmitsDef *object, ++void POA_IR::ValueDef::is_a_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, + CORBA::Environment &ACE_TRY_ENV +- ) ++) + { +- TAO_ORB_Core::TAO_Collocation_Strategies strategy = +- TAO_ORB_Core::collocation_strategy (object); +- +- if (this->proxy_cache_[strategy] != 0) +- return *this->proxy_cache_[strategy]; +- +- this->create_proxy (strategy, ACE_TRY_ENV); +- ACE_CHECK_RETURN (*this->proxy_cache_[strategy]); +- +- return *this->proxy_cache_[strategy]; +- ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::ValueDef *_tao_impl = (POA_IR::ValueDef *)_tao_object_reference; ++ ++ CORBA::Boolean _tao_retval = 0; ++ CORBA::String_var id; ++ if (!( ++ (_tao_in >> id.out ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); ++ ++ _tao_retval = _tao_impl->is_a ( ++ id.in (), ++ ACE_TRY_ENV ++ ); ++ ++ ACE_CHECK; ++ ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!( ++ (_tao_out << CORBA::Any::from_boolean (_tao_retval)) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + } + +-void +-POA_IR::_TAO_EmitsDef_Strategized_Proxy_Broker::create_proxy ( +- TAO_ORB_Core::TAO_Collocation_Strategies strategy, ++void POA_IR::ValueDef::create_value_member_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, + CORBA::Environment &ACE_TRY_ENV +- ) ++) + { +- ACE_GUARD (TAO_SYNCH_MUTEX, guard, this->mutex_); +- +- if (this->proxy_cache_[strategy] == 0) +- { +- switch (strategy) +- { +- case TAO_ORB_Core::THRU_POA_STRATEGY: +- ACE_NEW_THROW_EX ( +- this->proxy_cache_[strategy], +- POA_IR::_TAO_EmitsDef_ThruPOA_Proxy_Impl, +- CORBA::NO_MEMORY () +- ); +- ACE_CHECK; +- break; +- +- case TAO_ORB_Core::REMOTE_STRATEGY: +- default: +- ACE_NEW_THROW_EX ( +- this->proxy_cache_[strategy], +- ::IR::_TAO_EmitsDef_Remote_Proxy_Impl, +- CORBA::NO_MEMORY () +- ); +- ACE_CHECK; +- break; +- +- } +- +- } ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::ValueDef *_tao_impl = (POA_IR::ValueDef *)_tao_object_reference; ++ + IR_ValueMemberDef_var _tao_retval; - CORBA::String_var id; - CORBA::String_var name; - CORBA::String_var version; -- IR::IDLType_var type; ++ CORBA::String_var id; ++ CORBA::String_var name; ++ CORBA::String_var version; + IR_IDLType_var type; - CORBA::Visibility access; - if (!( - (_tao_in >> id.out ()) && -@@ -33104,7 +32972,6 @@ - )) - ACE_THROW (CORBA::MARSHAL()); - -- - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( - _tao_server_request.orb_core ()->server_request_interceptors (), -@@ -33140,7 +33007,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::ValueMemberDef_ptr _tao_retval_info = _tao_retval._retn (); -+ IR_ValueMemberDef_ptr _tao_retval_info = _tao_retval._retn (); - ri.result (_tao_retval_info); - _tao_retval = _tao_retval_info; - ri.reply_status (PortableInterceptor::SUCCESSFUL); -@@ -33194,14 +33061,14 @@ - TAO_InputCDR &_tao_in = _tao_server_request.incoming (); - POA_IR::ValueDef *_tao_impl = (POA_IR::ValueDef *)_tao_object_reference; - -- IR::AttributeDef_var _tao_retval; ++ CORBA::Visibility access; ++ if (!( ++ (_tao_in >> id.out ()) && ++ (_tao_in >> name.out ()) && ++ (_tao_in >> version.out ()) && ++ (_tao_in >> type.out ()) && ++ (_tao_in >> access) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); ++ ++ _tao_retval = _tao_impl->create_value_member ( ++ id.in (), ++ name.in (), ++ version.in (), ++ type.in (), ++ access, ++ ACE_TRY_ENV ++ ); ++ ++ ACE_CHECK; ++ ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!( ++ (_tao_out << _tao_retval.in ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + } + ++void POA_IR::ValueDef::create_attribute_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) ++{ ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::ValueDef *_tao_impl = (POA_IR::ValueDef *)_tao_object_reference; + +-// +-// End Strategized Proxy Broker Implementation +-/////////////////////////////////////////////////////////////////////// + IR_AttributeDef_var _tao_retval; - CORBA::String_var id; - CORBA::String_var name; - CORBA::String_var version; -- IR::IDLType_var type; -- IR::AttributeMode mode; -- IR::ExceptionDefSeq get_exceptions; -- IR::ExceptionDefSeq put_exceptions; ++ CORBA::String_var id; ++ CORBA::String_var name; ++ CORBA::String_var version; + IR_IDLType_var type; + IR_AttributeMode mode; + IR_ExceptionDefSeq get_exceptions; + IR_ExceptionDefSeq put_exceptions; - if (!( - (_tao_in >> id.out ()) && - (_tao_in >> name.out ()) && -@@ -33213,7 +33080,6 @@ - )) - ACE_THROW (CORBA::MARSHAL()); - -- - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( - _tao_server_request.orb_core ()->server_request_interceptors (), -@@ -33253,7 +33119,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::AttributeDef_ptr _tao_retval_info = _tao_retval._retn (); -+ IR_AttributeDef_ptr _tao_retval_info = _tao_retval._retn (); - ri.result (_tao_retval_info); - _tao_retval = _tao_retval_info; - ri.reply_status (PortableInterceptor::SUCCESSFUL); -@@ -33307,15 +33173,15 @@ - TAO_InputCDR &_tao_in = _tao_server_request.incoming (); - POA_IR::ValueDef *_tao_impl = (POA_IR::ValueDef *)_tao_object_reference; - -- IR::OperationDef_var _tao_retval; ++ if (!( ++ (_tao_in >> id.out ()) && ++ (_tao_in >> name.out ()) && ++ (_tao_in >> version.out ()) && ++ (_tao_in >> type.out ()) && ++ (_tao_in >> mode) && ++ (_tao_in >> get_exceptions) && ++ (_tao_in >> put_exceptions) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); ++ ++ _tao_retval = _tao_impl->create_attribute ( ++ id.in (), ++ name.in (), ++ version.in (), ++ type.in (), ++ mode, ++ get_exceptions, ++ put_exceptions, ++ ACE_TRY_ENV ++ ); + ++ ACE_CHECK; + +-IR::_TAO_EmitsDef_Proxy_Broker * +-IR__TAO_EmitsDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) +-{ +- ACE_UNUSED_ARG (obj); +- return ::POA_IR::_TAO_EmitsDef_Strategized_Proxy_Broker::the_TAO_EmitsDef_Strategized_Proxy_Broker(); ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!( ++ (_tao_out << _tao_retval.in ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + } + +-int +-IR__TAO_EmitsDef_Proxy_Broker_Factory_Initializer (long _dummy_) ++void POA_IR::ValueDef::create_operation_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) + { +- ACE_UNUSED_ARG (_dummy_); +- +- IR__TAO_EmitsDef_Proxy_Broker_Factory_function_pointer = +- IR__TAO_EmitsDef_Proxy_Broker_Factory_function; +- +- return 0; +-} +- +-static int IR__TAO_EmitsDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = +- IR__TAO_EmitsDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, IR__TAO_EmitsDef_Proxy_Broker_Factory_Initializer)); +- +- +-/////////////////////////////////////////////////////////////////////// +-// ThruPOA Proxy Implementation +-// +- +-POA_IR::_TAO_EmitsDef_ThruPOA_Proxy_Impl::_TAO_EmitsDef_ThruPOA_Proxy_Impl (void) +-{} +- +-// ThruPOA Implementation of the IDL interface methods ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::ValueDef *_tao_impl = (POA_IR::ValueDef *)_tao_object_reference; + +-// +-// End ThruPOA Proxy Implementation +-/////////////////////////////////////////////////////////////////////// + IR_OperationDef_var _tao_retval; - CORBA::String_var id; - CORBA::String_var name; - CORBA::String_var version; -- IR::IDLType_var result; -- IR::OperationMode mode; -- IR::ParDescriptionSeq params; -- IR::ExceptionDefSeq exceptions; -- IR::ContextIdSeq contexts; ++ CORBA::String_var id; ++ CORBA::String_var name; ++ CORBA::String_var version; + IR_IDLType_var result; + IR_OperationMode mode; + IR_ParDescriptionSeq params; + IR_ExceptionDefSeq exceptions; + IR_ContextIdSeq contexts; - if (!( - (_tao_in >> id.out ()) && - (_tao_in >> name.out ()) && -@@ -33328,7 +33194,6 @@ - )) - ACE_THROW (CORBA::MARSHAL()); - -- - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( - _tao_server_request.orb_core ()->server_request_interceptors (), -@@ -33370,7 +33235,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::OperationDef_ptr _tao_retval_info = _tao_retval._retn (); -+ IR_OperationDef_ptr _tao_retval_info = _tao_retval._retn (); - ri.result (_tao_retval_info); - _tao_retval = _tao_retval_info; - ri.reply_status (PortableInterceptor::SUCCESSFUL); -@@ -33425,7 +33290,7 @@ - POA_IR::ValueDef *_tao_impl = (POA_IR::ValueDef *) _tao_object_reference; ++ if (!( ++ (_tao_in >> id.out ()) && ++ (_tao_in >> name.out ()) && ++ (_tao_in >> version.out ()) && ++ (_tao_in >> result.out ()) && ++ (_tao_in >> mode) && ++ (_tao_in >> params) && ++ (_tao_in >> exceptions) && ++ (_tao_in >> contexts) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + +-// skeleton constructor +-POA_IR::EmitsDef::EmitsDef (void) +-{ +- this->optable_ = &tao_IR_EmitsDef_optable; +-} ++ _tao_retval = _tao_impl->create_operation ( ++ id.in (), ++ name.in (), ++ version.in (), ++ result.in (), ++ mode, ++ params, ++ exceptions, ++ contexts, ++ ACE_TRY_ENV ++ ); + +-// copy ctor +-POA_IR::EmitsDef::EmitsDef (const EmitsDef& rhs) +- : ACE_NESTED_CLASS (POA_IR,EventDef) (rhs), +- ACE_NESTED_CLASS (POA_IR,Contained) (rhs), +- ACE_NESTED_CLASS (POA_CORBA,IRObject) (rhs), +- TAO_ServantBase (rhs) +-{} ++ ACE_CHECK; + +-// skeleton destructor +-POA_IR::EmitsDef::~EmitsDef (void) +-{ ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!( ++ (_tao_out << _tao_retval.in ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + } + +-void POA_IR::EmitsDef::_is_a_skel ( +- TAO_ServerRequest &_tao_server_request, ++void POA_IR::ValueDef::_is_a_skel ( ++ TAO_ServerRequest &_tao_server_request, + void * _tao_object_reference, + void * /* context */, + CORBA::Environment &ACE_TRY_ENV + ) + { + TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::EmitsDef *_tao_impl = (POA_IR::EmitsDef *) _tao_object_reference; ++ POA_IR::ValueDef *_tao_impl = (POA_IR::ValueDef *) _tao_object_reference; CORBA::Boolean _tao_retval = 0; CORBA::String_var value; - if (!(_tao_in >> value.out ())) + if (!((_tao_in >> value.out ()))) ACE_THROW (CORBA::MARSHAL ()); - +- ++ _tao_retval = _tao_impl->_is_a (value.in (), ACE_TRY_ENV); -@@ -33433,7 +33298,7 @@ - + ACE_CHECK; +- ++ _tao_server_request.init_reply (); TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); - if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) @@ -7862,8 +46471,21 @@ ACE_THROW (CORBA::MARSHAL ()); } -@@ -33450,7 +33315,7 @@ - +-void POA_IR::EmitsDef::_non_existent_skel ( +- TAO_ServerRequest &_tao_server_request, ++void POA_IR::ValueDef::_non_existent_skel ( ++ TAO_ServerRequest &_tao_server_request, + void * _tao_object_reference, + void * /* context */, + CORBA::Environment &ACE_TRY_ENV + ) + { +- POA_IR::EmitsDef *_tao_impl = (POA_IR::EmitsDef *) _tao_object_reference; ++ POA_IR::ValueDef *_tao_impl = (POA_IR::ValueDef *) _tao_object_reference; + CORBA::Boolean _tao_retval = _tao_impl->_non_existent (ACE_TRY_ENV); + ACE_CHECK; +- ++ _tao_server_request.init_reply (); TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); - if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) @@ -7871,278 +46493,511 @@ ACE_THROW (CORBA::MARSHAL ()); } -@@ -33484,7 +33349,7 @@ - if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/IDLType:1.0") == 0) - return ACE_static_cast (POA_IR::IDLType_ptr, this); +-CORBA::Boolean POA_IR::EmitsDef::_is_a ( ++CORBA::Boolean POA_IR::ValueDef::_is_a ( + const char* value, + CORBA::Environment &ACE_TRY_ENV + ) + { + if ( +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/EmitsDef:1.0")) || +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/EventDef:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/ValueDef:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/Container:1.0")) || + (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/Contained:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/IDLType:1.0")) || + (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/CORBA/IRObject:1.0")) || + (!ACE_OS::strcmp ((char *)value, CORBA::_tc_Object->id (ACE_TRY_ENV)))) + return 1; +@@ -38237,35 +17731,37 @@ + return 0; + } + +-void* POA_IR::EmitsDef::_downcast ( ++void* POA_IR::ValueDef::_downcast ( + const char* logical_type_id + ) + { +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/EmitsDef:1.0") == 0) +- return ACE_static_cast (POA_IR::EmitsDef_ptr, this); +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/EventDef:1.0") == 0) +- return ACE_static_cast (POA_IR::EventDef_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/ValueDef:1.0") == 0) ++ return ACE_static_cast (POA_IR::ValueDef_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Container:1.0") == 0) ++ return ACE_static_cast (POA_IR::Container_ptr, this); + if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Contained:1.0") == 0) + return ACE_static_cast (POA_IR::Contained_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/IDLType:1.0") == 0) ++ return ACE_static_cast (POA_IR::IDLType_ptr, this); if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/IRObject:1.0") == 0) - return ACE_static_cast (POA_CORBA::IRObject_ptr, this); + return ACE_static_cast (POA_CORBA_IRObject_ptr, this); if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/Object:1.0") == 0) return ACE_static_cast(PortableServer::Servant, this); return 0; -@@ -33514,10 +33379,9 @@ + } + +-void POA_IR::EmitsDef::_dispatch (TAO_ServerRequest &req, void *context, CORBA::Environment &ACE_TRY_ENV) ++void POA_IR::ValueDef::_dispatch (TAO_ServerRequest &req, void *context, CORBA::Environment &ACE_TRY_ENV) + { + this->synchronous_upcall_dispatch(req, context, this, ACE_TRY_ENV); + } + +-const char* POA_IR::EmitsDef::_interface_repository_id (void) const ++const char* POA_IR::ValueDef::_interface_repository_id (void) const + { +- return "IDL:omg.org/IR/EmitsDef:1.0"; ++ return "IDL:omg.org/IR/ValueDef:1.0"; + } + +-IR::EmitsDef* +-POA_IR::EmitsDef::_this (CORBA_Environment &ACE_TRY_ENV) ++IR::ValueDef* ++POA_IR::ValueDef::_this (CORBA_Environment &ACE_TRY_ENV) + { + TAO_Stub *stub = this->_create_stub (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); +@@ -38278,24 +17774,21 @@ ACE_NEW_RETURN (tmp, CORBA::Object (stub, 0, this), 0); CORBA::Object_var obj = tmp; -- return ::IR::ValueDef::_unchecked_narrow (obj.in ()); +- return ::IR::EmitsDef::_unchecked_narrow (obj.in ()); + return IR_ValueDef::_unchecked_narrow (obj.in ()); } - - #if (TAO_HAS_INTERCEPTORS == 1) - POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_supported_interfaces_get::TAO_ServerRequestInfo_IR_ValueDef_supported_interfaces_get ( - TAO_ServerRequest &_tao_server_request, -@@ -33597,7 +33461,7 @@ - POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_supported_interfaces_set::TAO_ServerRequestInfo_IR_ValueDef_supported_interfaces_set ( - TAO_ServerRequest &_tao_server_request, - POA_IR::ValueDef *tao_impl, -- const IR::InterfaceDefSeq & supported_interfaces, -+ const IR_InterfaceDefSeq & supported_interfaces, - CORBA::Environment & - ) - : TAO_ServerRequestInfo (_tao_server_request), -@@ -33746,7 +33610,7 @@ - POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_initializers_set::TAO_ServerRequestInfo_IR_ValueDef_initializers_set ( - TAO_ServerRequest &_tao_server_request, - POA_IR::ValueDef *tao_impl, -- const IR::InitializerSeq & initializers, -+ const IR_InitializerSeq & initializers, - CORBA::Environment & - ) - : TAO_ServerRequestInfo (_tao_server_request), -@@ -33895,7 +33759,7 @@ - POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_base_value_set::TAO_ServerRequestInfo_IR_ValueDef_base_value_set ( - TAO_ServerRequest &_tao_server_request, - POA_IR::ValueDef *tao_impl, -- IR::ValueDef_ptr base_value, -+ IR_ValueDef_ptr base_value, - CORBA::Environment & - ) - : TAO_ServerRequestInfo (_tao_server_request), -@@ -34044,7 +33908,7 @@ - POA_IR::ValueDef::TAO_ServerRequestInfo_IR_ValueDef_abstract_base_values_set::TAO_ServerRequestInfo_IR_ValueDef_abstract_base_values_set ( - TAO_ServerRequest &_tao_server_request, - POA_IR::ValueDef *tao_impl, -- const IR::ValueDefSeq & abstract_base_values, -+ const IR_ValueDefSeq & abstract_base_values, - CORBA::Environment & - ) - : TAO_ServerRequestInfo (_tao_server_request), -@@ -34649,7 +34513,7 @@ - const char * id, - const char * name, - const char * version, -- IR::IDLType_ptr type, -+ IR_IDLType_ptr type, - const CORBA::Visibility & access, - CORBA::Environment & - ) -@@ -34762,10 +34626,10 @@ - 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, -+ IR_IDLType_ptr type, -+ IR_AttributeMode & mode, -+ const IR_ExceptionDefSeq & get_exceptions, -+ const IR_ExceptionDefSeq & put_exceptions, - CORBA::Environment & - ) - : TAO_ServerRequestInfo (_tao_server_request), -@@ -34892,11 +34756,11 @@ - 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, -+ IR_IDLType_ptr result, -+ IR_OperationMode & mode, -+ const IR_ParDescriptionSeq & params, -+ const IR_ExceptionDefSeq & exceptions, -+ const IR_ContextIdSeq & contexts, - CORBA::Environment & - ) - : TAO_ServerRequestInfo (_tao_server_request), -@@ -35025,6 +34889,7 @@ - } - - #endif /* TAO_HAS_INTERCEPTORS */ -+ - class TAO_IR_ValueBoxDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable +-#if (TAO_HAS_INTERCEPTORS == 1) +-#endif /* TAO_HAS_INTERCEPTORS */ +-class TAO_IR_PublishesDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable ++class TAO_IR_ValueBoxDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable { private: -@@ -35032,7 +34897,7 @@ + unsigned int hash (const char *str, unsigned int len); public: const TAO_operation_db_entry * lookup (const char *str, unsigned int len); }; --/* starting time is 18:47:28 */ +-/* starting time is 16:31:13 */ +/* starting time is 11:23:11 */ /* C++ code produced by gperf version 2.8 (ACE version) */ - /* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_ValueBoxDef_Perfect_Hash_OpTable -N lookup */ +-/* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_PublishesDef_Perfect_Hash_OpTable -N lookup */ ++/* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_ValueBoxDef_Perfect_Hash_OpTable -N lookup */ unsigned int -@@ -35161,10 +35026,9 @@ +-TAO_IR_PublishesDef_Perfect_Hash_OpTable::hash (const char *str, unsigned int len) ++TAO_IR_ValueBoxDef_Perfect_Hash_OpTable::hash (const char *str, unsigned int len) + { + static const unsigned char asso_values[] = + { +@@ -38313,7 +17806,7 @@ + 37, 37, 37, 37, 37, 37, 37, 37, 37, 0, + 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, + 37, 37, 37, 37, 37, 37, 37, 37, 37, 0, +- 37, 37, 0, 0, 37, 37, 37, 10, 37, 37, ++ 37, 37, 0, 0, 0, 37, 37, 37, 37, 37, + 37, 37, 37, 37, 37, 37, 37, 37, 0, 0, + 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, + 37, 37, 37, 10, 37, 37, 37, 37, 10, 37, +@@ -38337,7 +17830,7 @@ + 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, + 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, + 37, 37, 37, 37, 37, 0, 37, 0, 37, 37, +- 0, 0, 37, 37, 37, 10, 37, 37, 37, 0, ++ 0, 0, 0, 37, 37, 37, 37, 37, 37, 0, + 0, 37, 37, 37, 37, 37, 10, 37, 37, 37, + 37, 10, 37, 37, 37, 37, 37, 37, + #endif /* ACE_MVS */ +@@ -38346,46 +17839,47 @@ + } + + const class TAO_operation_db_entry * +-TAO_IR_PublishesDef_Perfect_Hash_OpTable::lookup (const char *str, unsigned int len) ++TAO_IR_ValueBoxDef_Perfect_Hash_OpTable::lookup (const char *str, unsigned int len) + { + enum + { +- TOTAL_KEYWORDS = 17, ++ TOTAL_KEYWORDS = 18, + MIN_WORD_LENGTH = 4, + MAX_WORD_LENGTH = 26, + MIN_HASH_VALUE = 4, + MAX_HASH_VALUE = 36, + HASH_VALUE_RANGE = 33, +- DUPLICATES = 4 ++ DUPLICATES = 6 + }; + + static const class TAO_operation_db_entry wordlist[] = + { + {"",0},{"",0},{"",0},{"",0}, +- {"move", &POA_IR::PublishesDef::move_skel}, +- {"_is_a", &POA_IR::PublishesDef::_is_a_skel}, +- {"_get_id", &POA_IR::PublishesDef::_get_id_skel}, +- {"_set_id", &POA_IR::PublishesDef::_set_id_skel}, +- {"describe", &POA_IR::PublishesDef::describe_skel}, +- {"_get_name", &POA_IR::PublishesDef::_get_name_skel}, +- {"_set_name", &POA_IR::PublishesDef::_set_name_skel}, +- {"_get_version", &POA_IR::PublishesDef::_get_version_skel}, +- {"_set_version", &POA_IR::PublishesDef::_set_version_skel}, +- {"_get_def_kind", &POA_IR::PublishesDef::_get_def_kind_skel}, +- {"is_a", &POA_IR::PublishesDef::is_a_skel}, +- {"_get_defined_in", &POA_IR::PublishesDef::_get_defined_in_skel}, +- {"destroy", &POA_IR::PublishesDef::destroy_skel}, +- {"_get_absolute_name", &POA_IR::PublishesDef::_get_absolute_name_skel}, +- {"_get_event", &POA_IR::PublishesDef::_get_event_skel}, +- {"_non_existent", &POA_IR::PublishesDef::_non_existent_skel}, +- {"_get_containing_repository", &POA_IR::PublishesDef::_get_containing_repository_skel}, ++ {"move", &POA_IR::ValueBoxDef::move_skel}, ++ {"_is_a", &POA_IR::ValueBoxDef::_is_a_skel}, ++ {"_get_id", &POA_IR::ValueBoxDef::_get_id_skel}, ++ {"_set_id", &POA_IR::ValueBoxDef::_set_id_skel}, ++ {"describe", &POA_IR::ValueBoxDef::describe_skel}, ++ {"_get_name", &POA_IR::ValueBoxDef::_get_name_skel}, ++ {"_get_type", &POA_IR::ValueBoxDef::_get_type_skel}, ++ {"_set_name", &POA_IR::ValueBoxDef::_set_name_skel}, ++ {"_get_version", &POA_IR::ValueBoxDef::_get_version_skel}, ++ {"_set_version", &POA_IR::ValueBoxDef::_set_version_skel}, ++ {"_get_def_kind", &POA_IR::ValueBoxDef::_get_def_kind_skel}, ++ {"_get_defined_in", &POA_IR::ValueBoxDef::_get_defined_in_skel}, ++ {"destroy", &POA_IR::ValueBoxDef::destroy_skel}, ++ {"_get_absolute_name", &POA_IR::ValueBoxDef::_get_absolute_name_skel}, ++ {"_get_original_type_def", &POA_IR::ValueBoxDef::_get_original_type_def_skel}, ++ {"_set_original_type_def", &POA_IR::ValueBoxDef::_set_original_type_def_skel}, ++ {"_non_existent", &POA_IR::ValueBoxDef::_non_existent_skel}, ++ {"_get_containing_repository", &POA_IR::ValueBoxDef::_get_containing_repository_skel}, + }; + + static const signed char lookup[] = + { +- -6, -2, -9, -2, 4, 5, -1, -43, 8, -43, -11, -2, -38, 13, +- 14, 15, -1, 16, 17, -1, 18, -1, -1, 19, -1, -1, -1, -1, +- -1, -1, -1, -1, -1, -1, -1, -1, 20, ++ -6, -2, -9, -3, 4, 5, -1, -43, 8, -43, -12, -2, -38, 14, ++ -1, 15, -1, 16, 17, -1, -18, -2, -38, 20, -1, -1, -1, -1, ++ -1, -1, -1, -1, -1, -1, -1, -1, 21, + }; + + if (len <= MAX_WORD_LENGTH && len >= MIN_WORD_LENGTH) +@@ -38419,38 +17913,37 @@ } return 0; } --/* ending time is 18:47:28 */ +-/* ending time is 16:31:13 */ +-static TAO_IR_PublishesDef_Perfect_Hash_OpTable tao_IR_PublishesDef_optable; +- +/* ending time is 11:23:11 */ - static TAO_IR_ValueBoxDef_Perfect_Hash_OpTable tao_IR_ValueBoxDef_optable; ++static TAO_IR_ValueBoxDef_Perfect_Hash_OpTable tao_IR_ValueBoxDef_optable; -- /////////////////////////////////////////////////////////////////////// // Strategized Proxy Broker Implementation // -@@ -35190,9 +35054,9 @@ + + // Factory function Implementation. +-POA_IR::_TAO_PublishesDef_Strategized_Proxy_Broker *POA_IR::_TAO_PublishesDef_Strategized_Proxy_Broker::the_TAO_PublishesDef_Strategized_Proxy_Broker (void) ++POA_IR::_TAO_ValueBoxDef_Strategized_Proxy_Broker *POA_IR::_TAO_ValueBoxDef_Strategized_Proxy_Broker::the_TAO_ValueBoxDef_Strategized_Proxy_Broker (void) + { +- static POA_IR::_TAO_PublishesDef_Strategized_Proxy_Broker strategized_proxy_broker; ++ static POA_IR::_TAO_ValueBoxDef_Strategized_Proxy_Broker strategized_proxy_broker; + return &strategized_proxy_broker; + } + +-POA_IR::_TAO_PublishesDef_Strategized_Proxy_Broker::_TAO_PublishesDef_Strategized_Proxy_Broker (void) ++POA_IR::_TAO_ValueBoxDef_Strategized_Proxy_Broker::_TAO_ValueBoxDef_Strategized_Proxy_Broker (void) + { + for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) + this->proxy_cache_[i] = 0; } --IR::_TAO_ValueBoxDef_Proxy_Impl& +-POA_IR::_TAO_PublishesDef_Strategized_Proxy_Broker::~_TAO_PublishesDef_Strategized_Proxy_Broker (void) ++POA_IR::_TAO_ValueBoxDef_Strategized_Proxy_Broker::~_TAO_ValueBoxDef_Strategized_Proxy_Broker (void) + { + for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) + delete this->proxy_cache_[i]; + + } + +-IR::_TAO_PublishesDef_Proxy_Impl& +-POA_IR::_TAO_PublishesDef_Strategized_Proxy_Broker::select_proxy ( +- ::IR::PublishesDef *object, +_TAO_ValueBoxDef_Proxy_Impl& - POA_IR::_TAO_ValueBoxDef_Strategized_Proxy_Broker::select_proxy ( -- ::IR::ValueBoxDef *object, ++POA_IR::_TAO_ValueBoxDef_Strategized_Proxy_Broker::select_proxy ( + IR_ValueBoxDef *object, CORBA::Environment &ACE_TRY_ENV ) { -@@ -35224,7 +35088,7 @@ +@@ -38468,7 +17961,7 @@ + } + + void +-POA_IR::_TAO_PublishesDef_Strategized_Proxy_Broker::create_proxy ( ++POA_IR::_TAO_ValueBoxDef_Strategized_Proxy_Broker::create_proxy ( + TAO_ORB_Core::TAO_Collocation_Strategies strategy, + CORBA::Environment &ACE_TRY_ENV + ) +@@ -38482,7 +17975,7 @@ case TAO_ORB_Core::THRU_POA_STRATEGY: ACE_NEW_THROW_EX ( this->proxy_cache_[strategy], -- POA_IR::_TAO_ValueBoxDef_ThruPOA_Proxy_Impl, +- POA_IR::_TAO_PublishesDef_ThruPOA_Proxy_Impl, + _TAO_ValueBoxDef_ThruPOA_Proxy_Impl, CORBA::NO_MEMORY () ); ACE_CHECK; -@@ -35234,7 +35098,7 @@ +@@ -38492,7 +17985,7 @@ default: ACE_NEW_THROW_EX ( this->proxy_cache_[strategy], -- ::IR::_TAO_ValueBoxDef_Remote_Proxy_Impl, +- ::IR::_TAO_PublishesDef_Remote_Proxy_Impl, + _TAO_ValueBoxDef_Remote_Proxy_Impl, CORBA::NO_MEMORY () ); ACE_CHECK; -@@ -35251,26 +35115,26 @@ - /////////////////////////////////////////////////////////////////////// - +@@ -38503,115 +17996,234 @@ + } + } --IR::_TAO_ValueBoxDef_Proxy_Broker * --IR__TAO_ValueBoxDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) +- ++ ++// ++// End Strategized Proxy Broker Implementation ++/////////////////////////////////////////////////////////////////////// ++ ++ +_TAO_ValueBoxDef_Proxy_Broker * +_TAO_ValueBoxDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) - { - ACE_UNUSED_ARG (obj); - return ::POA_IR::_TAO_ValueBoxDef_Strategized_Proxy_Broker::the_TAO_ValueBoxDef_Strategized_Proxy_Broker(); - } - - int --IR__TAO_ValueBoxDef_Proxy_Broker_Factory_Initializer (long _dummy_) ++{ ++ ACE_UNUSED_ARG (obj); ++ return ::POA_IR::_TAO_ValueBoxDef_Strategized_Proxy_Broker::the_TAO_ValueBoxDef_Strategized_Proxy_Broker(); ++} ++ ++int +_TAO_ValueBoxDef_Proxy_Broker_Factory_Initializer (long _dummy_) - { - ACE_UNUSED_ARG (_dummy_); - -- IR__TAO_ValueBoxDef_Proxy_Broker_Factory_function_pointer = -- IR__TAO_ValueBoxDef_Proxy_Broker_Factory_function; ++{ ++ ACE_UNUSED_ARG (_dummy_); ++ + _TAO_ValueBoxDef_Proxy_Broker_Factory_function_pointer = + _TAO_ValueBoxDef_Proxy_Broker_Factory_function; - - return 0; - } - --static int IR__TAO_ValueBoxDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = -- IR__TAO_ValueBoxDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, IR__TAO_ValueBoxDef_Proxy_Broker_Factory_Initializer)); ++ ++ return 0; ++} ++ +static int _TAO_ValueBoxDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = + _TAO_ValueBoxDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, _TAO_ValueBoxDef_Proxy_Broker_Factory_Initializer)); - - ++ ++ ++/////////////////////////////////////////////////////////////////////// ++// ThruPOA Proxy Implementation ++// ++ ++POA_IR::_TAO_ValueBoxDef_ThruPOA_Proxy_Impl::_TAO_ValueBoxDef_ThruPOA_Proxy_Impl (void) ++{} ++ ++POA_IR::_TAO_ValueBoxDef_ThruPOA_Proxy_Impl::~_TAO_ValueBoxDef_ThruPOA_Proxy_Impl (void) ++{} ++ ++// ThruPOA Implementation of the IDL interface methods ++ ++IR::IDLType_ptr POA_IR::_TAO_ValueBoxDef_ThruPOA_Proxy_Impl::original_type_def ( ++ CORBA_Object *_collocated_tao_target_, ++ CORBA::Environment &ACE_TRY_ENV ++ ) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException ++ )) ++{ ++ IR_IDLType_var _tao_retval; ++ ACE_UNUSED_ARG (_tao_retval); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "original_type_def", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK_RETURN (0); ++ return ACE_reinterpret_cast ( ++ POA_IR::ValueBoxDef_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/ValueBoxDef:1.0" ++ ) ++ )->original_type_def ( ++ ACE_TRY_ENV ++ ); ++} ++ ++void POA_IR::_TAO_ValueBoxDef_ThruPOA_Proxy_Impl::original_type_def ( ++ CORBA_Object *_collocated_tao_target_, ++ IR_IDLType_ptr original_type_def, ++ CORBA::Environment &ACE_TRY_ENV ++ ) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException ++ )) ++{ ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "original_type_def", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK; ++ ACE_reinterpret_cast ( ++ POA_IR::ValueBoxDef_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/ValueBoxDef:1.0" ++ ) ++ )->original_type_def ( ++ original_type_def, ++ ACE_TRY_ENV ++ ); ++ return; ++} ++ + // +-// End Strategized Proxy Broker Implementation ++// End ThruPOA Proxy Implementation /////////////////////////////////////////////////////////////////////// -@@ -35282,7 +35146,7 @@ - - // ThruPOA Implementation of the IDL interface methods --IR::IDLType_ptr POA_IR::_TAO_ValueBoxDef_ThruPOA_Proxy_Impl::original_type_def ( -+IR_IDLType_ptr POA_IR::_TAO_ValueBoxDef_ThruPOA_Proxy_Impl::original_type_def ( - CORBA_Object *_collocated_tao_target_, - CORBA::Environment &ACE_TRY_ENV - ) -@@ -35290,7 +35154,7 @@ - CORBA::SystemException - )) +- +-IR::_TAO_PublishesDef_Proxy_Broker * +-IR__TAO_PublishesDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) ++// skeleton constructor ++POA_IR::ValueBoxDef::ValueBoxDef (void) { -- IR::IDLType_var _tao_retval; -+ IR_IDLType_var _tao_retval; - ACE_UNUSED_ARG (_tao_retval); - TAO_Object_Adapter::Servant_Upcall servant_upcall ( - _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -35315,7 +35179,7 @@ +- ACE_UNUSED_ARG (obj); +- return ::POA_IR::_TAO_PublishesDef_Strategized_Proxy_Broker::the_TAO_PublishesDef_Strategized_Proxy_Broker(); ++ this->optable_ = &tao_IR_ValueBoxDef_optable; + } - void POA_IR::_TAO_ValueBoxDef_ThruPOA_Proxy_Impl::original_type_def ( - CORBA_Object *_collocated_tao_target_, -- IR::IDLType_ptr original_type_def, -+ IR_IDLType_ptr original_type_def, - CORBA::Environment &ACE_TRY_ENV - ) - ACE_THROW_SPEC (( -@@ -35360,7 +35224,7 @@ - : ACE_NESTED_CLASS (POA_IR,TypedefDef) (rhs), - ACE_NESTED_CLASS (POA_IR,Contained) (rhs), - ACE_NESTED_CLASS (POA_IR,IDLType) (rhs), -- ACE_NESTED_CLASS (POA_CORBA,IRObject) (rhs), +-int +-IR__TAO_PublishesDef_Proxy_Broker_Factory_Initializer (long _dummy_) ++// copy ctor ++POA_IR::ValueBoxDef::ValueBoxDef (const ValueBoxDef& rhs) ++ : ACE_NESTED_CLASS (POA_IR,TypedefDef) (rhs), ++ ACE_NESTED_CLASS (POA_IR,Contained) (rhs), ++ ACE_NESTED_CLASS (POA_IR,IDLType) (rhs), + POA_CORBA_IRObject (rhs), - TAO_ServantBase (rhs) - {} - -@@ -35378,7 +35242,7 @@ ++ TAO_ServantBase (rhs) ++{} ++ ++// skeleton destructor ++POA_IR::ValueBoxDef::~ValueBoxDef (void) { - POA_IR::ValueBoxDef *_tao_impl = (POA_IR::ValueBoxDef *)_tao_object_reference; - -- IR::IDLType_var _tao_retval; +- ACE_UNUSED_ARG (_dummy_); +- +- IR__TAO_PublishesDef_Proxy_Broker_Factory_function_pointer = +- IR__TAO_PublishesDef_Proxy_Broker_Factory_function; +- +- return 0; + } + +-static int IR__TAO_PublishesDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = +- IR__TAO_PublishesDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, IR__TAO_PublishesDef_Proxy_Broker_Factory_Initializer)); +- ++void POA_IR::ValueBoxDef::_get_original_type_def_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) ++{ ++ POA_IR::ValueBoxDef *_tao_impl = (POA_IR::ValueBoxDef *)_tao_object_reference; + +-/////////////////////////////////////////////////////////////////////// +-// ThruPOA Proxy Implementation +-// + IR_IDLType_var _tao_retval; - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( -@@ -35405,7 +35269,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::IDLType_ptr _tao_retval_info = _tao_retval._retn (); -+ IR_IDLType_ptr _tao_retval_info = _tao_retval._retn (); - ri.result (_tao_retval_info); - _tao_retval = _tao_retval_info; - ri.reply_status (PortableInterceptor::SUCCESSFUL); -@@ -35459,14 +35323,12 @@ - TAO_InputCDR &_tao_in = _tao_server_request.incoming (); - POA_IR::ValueBoxDef *_tao_impl = (POA_IR::ValueBoxDef *)_tao_object_reference; - -- _tao_server_request.argument_flag (0); -- IR::IDLType_var original_type_def; +-POA_IR::_TAO_PublishesDef_ThruPOA_Proxy_Impl::_TAO_PublishesDef_ThruPOA_Proxy_Impl (void) +-{} ++ _tao_retval = _tao_impl->original_type_def ( ++ ACE_TRY_ENV ++ ); + +-// ThruPOA Implementation of the IDL interface methods ++ ACE_CHECK; + +-// +-// End ThruPOA Proxy Implementation +-/////////////////////////////////////////////////////////////////////// ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!( ++ (_tao_out << _tao_retval.in ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); ++} + +-// skeleton constructor +-POA_IR::PublishesDef::PublishesDef (void) ++void POA_IR::ValueBoxDef::_set_original_type_def_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) + { +- this->optable_ = &tao_IR_PublishesDef_optable; +-} ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::ValueBoxDef *_tao_impl = (POA_IR::ValueBoxDef *)_tao_object_reference; + +-// copy ctor +-POA_IR::PublishesDef::PublishesDef (const PublishesDef& rhs) +- : ACE_NESTED_CLASS (POA_IR,EventDef) (rhs), +- ACE_NESTED_CLASS (POA_IR,Contained) (rhs), +- ACE_NESTED_CLASS (POA_CORBA,IRObject) (rhs), +- TAO_ServantBase (rhs) +-{} + IR_IDLType_var original_type_def; - if (!( - (_tao_in >> original_type_def.out ()) - )) - ACE_THROW (CORBA::MARSHAL()); ++ if (!( ++ (_tao_in >> original_type_def.out ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); -- - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( - _tao_server_request.orb_core ()->server_request_interceptors (), -@@ -35539,7 +35401,7 @@ - POA_IR::ValueBoxDef *_tao_impl = (POA_IR::ValueBoxDef *) _tao_object_reference; +-// skeleton destructor +-POA_IR::PublishesDef::~PublishesDef (void) +-{ ++ _tao_impl->original_type_def ( ++ original_type_def.in (), ++ ACE_TRY_ENV ++ ); ++ ++ ACE_CHECK; ++ ++ _tao_server_request.init_reply (); + } + +-void POA_IR::PublishesDef::_is_a_skel ( +- TAO_ServerRequest &_tao_server_request, ++void POA_IR::ValueBoxDef::_is_a_skel ( ++ TAO_ServerRequest &_tao_server_request, + void * _tao_object_reference, + void * /* context */, + CORBA::Environment &ACE_TRY_ENV + ) + { + TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::PublishesDef *_tao_impl = (POA_IR::PublishesDef *) _tao_object_reference; ++ POA_IR::ValueBoxDef *_tao_impl = (POA_IR::ValueBoxDef *) _tao_object_reference; CORBA::Boolean _tao_retval = 0; CORBA::String_var value; - if (!(_tao_in >> value.out ())) + if (!((_tao_in >> value.out ()))) ACE_THROW (CORBA::MARSHAL ()); - +- ++ _tao_retval = _tao_impl->_is_a (value.in (), ACE_TRY_ENV); -@@ -35547,7 +35409,7 @@ - + ACE_CHECK; +- ++ _tao_server_request.init_reply (); TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); - if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) @@ -8150,8 +47005,21 @@ ACE_THROW (CORBA::MARSHAL ()); } -@@ -35564,7 +35426,7 @@ - +-void POA_IR::PublishesDef::_non_existent_skel ( +- TAO_ServerRequest &_tao_server_request, ++void POA_IR::ValueBoxDef::_non_existent_skel ( ++ TAO_ServerRequest &_tao_server_request, + void * _tao_object_reference, + void * /* context */, + CORBA::Environment &ACE_TRY_ENV + ) + { +- POA_IR::PublishesDef *_tao_impl = (POA_IR::PublishesDef *) _tao_object_reference; ++ POA_IR::ValueBoxDef *_tao_impl = (POA_IR::ValueBoxDef *) _tao_object_reference; + CORBA::Boolean _tao_retval = _tao_impl->_non_existent (ACE_TRY_ENV); + ACE_CHECK; +- ++ _tao_server_request.init_reply (); TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); - if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) @@ -8159,185 +47027,413 @@ ACE_THROW (CORBA::MARSHAL ()); } -@@ -35598,7 +35460,7 @@ - if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/IDLType:1.0") == 0) - return ACE_static_cast (POA_IR::IDLType_ptr, this); +-CORBA::Boolean POA_IR::PublishesDef::_is_a ( ++CORBA::Boolean POA_IR::ValueBoxDef::_is_a ( + const char* value, + CORBA::Environment &ACE_TRY_ENV + ) + { + if ( +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/PublishesDef:1.0")) || +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/EventDef:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/ValueBoxDef:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/TypedefDef:1.0")) || + (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/Contained:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/IDLType:1.0")) || + (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/CORBA/IRObject:1.0")) || + (!ACE_OS::strcmp ((char *)value, CORBA::_tc_Object->id (ACE_TRY_ENV)))) + return 1; +@@ -38619,35 +18231,37 @@ + return 0; + } + +-void* POA_IR::PublishesDef::_downcast ( ++void* POA_IR::ValueBoxDef::_downcast ( + const char* logical_type_id + ) + { +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/PublishesDef:1.0") == 0) +- return ACE_static_cast (POA_IR::PublishesDef_ptr, this); +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/EventDef:1.0") == 0) +- return ACE_static_cast (POA_IR::EventDef_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/ValueBoxDef:1.0") == 0) ++ return ACE_static_cast (POA_IR::ValueBoxDef_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/TypedefDef:1.0") == 0) ++ return ACE_static_cast (POA_IR::TypedefDef_ptr, this); + if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Contained:1.0") == 0) + return ACE_static_cast (POA_IR::Contained_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/IDLType:1.0") == 0) ++ return ACE_static_cast (POA_IR::IDLType_ptr, this); if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/IRObject:1.0") == 0) - return ACE_static_cast (POA_CORBA::IRObject_ptr, this); + return ACE_static_cast (POA_CORBA_IRObject_ptr, this); if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/Object:1.0") == 0) return ACE_static_cast(PortableServer::Servant, this); return 0; -@@ -35628,10 +35490,9 @@ + } + +-void POA_IR::PublishesDef::_dispatch (TAO_ServerRequest &req, void *context, CORBA::Environment &ACE_TRY_ENV) ++void POA_IR::ValueBoxDef::_dispatch (TAO_ServerRequest &req, void *context, CORBA::Environment &ACE_TRY_ENV) + { + this->synchronous_upcall_dispatch(req, context, this, ACE_TRY_ENV); + } + +-const char* POA_IR::PublishesDef::_interface_repository_id (void) const ++const char* POA_IR::ValueBoxDef::_interface_repository_id (void) const + { +- return "IDL:omg.org/IR/PublishesDef:1.0"; ++ return "IDL:omg.org/IR/ValueBoxDef:1.0"; + } + +-IR::PublishesDef* +-POA_IR::PublishesDef::_this (CORBA_Environment &ACE_TRY_ENV) ++IR::ValueBoxDef* ++POA_IR::ValueBoxDef::_this (CORBA_Environment &ACE_TRY_ENV) + { + TAO_Stub *stub = this->_create_stub (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); +@@ -38660,24 +18274,21 @@ ACE_NEW_RETURN (tmp, CORBA::Object (stub, 0, this), 0); CORBA::Object_var obj = tmp; -- return ::IR::ValueBoxDef::_unchecked_narrow (obj.in ()); +- return ::IR::PublishesDef::_unchecked_narrow (obj.in ()); + return IR_ValueBoxDef::_unchecked_narrow (obj.in ()); } - - #if (TAO_HAS_INTERCEPTORS == 1) - POA_IR::ValueBoxDef::TAO_ServerRequestInfo_IR_ValueBoxDef_original_type_def_get::TAO_ServerRequestInfo_IR_ValueBoxDef_original_type_def_get ( - TAO_ServerRequest &_tao_server_request, -@@ -35711,7 +35572,7 @@ - POA_IR::ValueBoxDef::TAO_ServerRequestInfo_IR_ValueBoxDef_original_type_def_set::TAO_ServerRequestInfo_IR_ValueBoxDef_original_type_def_set ( - TAO_ServerRequest &_tao_server_request, - POA_IR::ValueBoxDef *tao_impl, -- IR::IDLType_ptr original_type_def, -+ IR_IDLType_ptr original_type_def, - CORBA::Environment & - ) - : TAO_ServerRequestInfo (_tao_server_request), -@@ -35783,6 +35644,7 @@ - } - - #endif /* TAO_HAS_INTERCEPTORS */ -+ - class TAO_IR_ProvidesDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable +-#if (TAO_HAS_INTERCEPTORS == 1) +-#endif /* TAO_HAS_INTERCEPTORS */ +-class TAO_IR_ConsumesDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable ++class TAO_IR_ProvidesDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable { private: -@@ -35790,7 +35652,7 @@ + unsigned int hash (const char *str, unsigned int len); public: const TAO_operation_db_entry * lookup (const char *str, unsigned int len); }; --/* starting time is 18:47:29 */ +-/* starting time is 16:31:13 */ +/* starting time is 11:23:11 */ /* C++ code produced by gperf version 2.8 (ACE version) */ - /* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_ProvidesDef_Perfect_Hash_OpTable -N lookup */ +-/* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_ConsumesDef_Perfect_Hash_OpTable -N lookup */ ++/* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_ProvidesDef_Perfect_Hash_OpTable -N lookup */ unsigned int -@@ -35917,10 +35779,9 @@ +-TAO_IR_ConsumesDef_Perfect_Hash_OpTable::hash (const char *str, unsigned int len) ++TAO_IR_ProvidesDef_Perfect_Hash_OpTable::hash (const char *str, unsigned int len) + { + static const unsigned char asso_values[] = + { +@@ -38695,7 +18306,7 @@ + 37, 37, 37, 37, 37, 37, 37, 37, 37, 0, + 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, + 37, 37, 37, 37, 37, 37, 37, 37, 37, 0, +- 37, 37, 0, 0, 37, 37, 37, 10, 37, 37, ++ 37, 37, 0, 0, 37, 37, 37, 37, 37, 37, + 37, 37, 37, 37, 37, 37, 37, 37, 0, 0, + 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, + 37, 37, 37, 10, 37, 37, 37, 37, 10, 37, +@@ -38719,7 +18330,7 @@ + 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, + 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, + 37, 37, 37, 37, 37, 0, 37, 0, 37, 37, +- 0, 0, 37, 37, 37, 10, 37, 37, 37, 0, ++ 0, 0, 37, 37, 37, 37, 37, 37, 37, 0, + 0, 37, 37, 37, 37, 37, 10, 37, 37, 37, + 37, 10, 37, 37, 37, 37, 37, 37, + #endif /* ACE_MVS */ +@@ -38728,11 +18339,11 @@ + } + + const class TAO_operation_db_entry * +-TAO_IR_ConsumesDef_Perfect_Hash_OpTable::lookup (const char *str, unsigned int len) ++TAO_IR_ProvidesDef_Perfect_Hash_OpTable::lookup (const char *str, unsigned int len) + { + enum + { +- TOTAL_KEYWORDS = 17, ++ TOTAL_KEYWORDS = 16, + MIN_WORD_LENGTH = 4, + MAX_WORD_LENGTH = 26, + MIN_HASH_VALUE = 4, +@@ -38744,30 +18355,29 @@ + static const class TAO_operation_db_entry wordlist[] = + { + {"",0},{"",0},{"",0},{"",0}, +- {"move", &POA_IR::ConsumesDef::move_skel}, +- {"_is_a", &POA_IR::ConsumesDef::_is_a_skel}, +- {"_get_id", &POA_IR::ConsumesDef::_get_id_skel}, +- {"_set_id", &POA_IR::ConsumesDef::_set_id_skel}, +- {"describe", &POA_IR::ConsumesDef::describe_skel}, +- {"_get_name", &POA_IR::ConsumesDef::_get_name_skel}, +- {"_set_name", &POA_IR::ConsumesDef::_set_name_skel}, +- {"_get_version", &POA_IR::ConsumesDef::_get_version_skel}, +- {"_set_version", &POA_IR::ConsumesDef::_set_version_skel}, +- {"_get_def_kind", &POA_IR::ConsumesDef::_get_def_kind_skel}, +- {"is_a", &POA_IR::ConsumesDef::is_a_skel}, +- {"_get_defined_in", &POA_IR::ConsumesDef::_get_defined_in_skel}, +- {"destroy", &POA_IR::ConsumesDef::destroy_skel}, +- {"_get_absolute_name", &POA_IR::ConsumesDef::_get_absolute_name_skel}, +- {"_get_event", &POA_IR::ConsumesDef::_get_event_skel}, +- {"_non_existent", &POA_IR::ConsumesDef::_non_existent_skel}, +- {"_get_containing_repository", &POA_IR::ConsumesDef::_get_containing_repository_skel}, ++ {"move", &POA_IR::ProvidesDef::move_skel}, ++ {"_is_a", &POA_IR::ProvidesDef::_is_a_skel}, ++ {"_get_id", &POA_IR::ProvidesDef::_get_id_skel}, ++ {"_set_id", &POA_IR::ProvidesDef::_set_id_skel}, ++ {"describe", &POA_IR::ProvidesDef::describe_skel}, ++ {"_get_name", &POA_IR::ProvidesDef::_get_name_skel}, ++ {"_set_name", &POA_IR::ProvidesDef::_set_name_skel}, ++ {"_get_version", &POA_IR::ProvidesDef::_get_version_skel}, ++ {"_set_version", &POA_IR::ProvidesDef::_set_version_skel}, ++ {"_get_def_kind", &POA_IR::ProvidesDef::_get_def_kind_skel}, ++ {"_get_defined_in", &POA_IR::ProvidesDef::_get_defined_in_skel}, ++ {"destroy", &POA_IR::ProvidesDef::destroy_skel}, ++ {"_get_absolute_name", &POA_IR::ProvidesDef::_get_absolute_name_skel}, ++ {"_get_interface_type", &POA_IR::ProvidesDef::_get_interface_type_skel}, ++ {"_non_existent", &POA_IR::ProvidesDef::_non_existent_skel}, ++ {"_get_containing_repository", &POA_IR::ProvidesDef::_get_containing_repository_skel}, + }; + + static const signed char lookup[] = + { +- -6, -2, -9, -2, 4, 5, -1, -43, 8, -43, -11, -2, -38, 13, +- 14, 15, -1, 16, 17, -1, 18, -1, -1, 19, -1, -1, -1, -1, +- -1, -1, -1, -1, -1, -1, -1, -1, 20, ++ -6, -2, -9, -2, 4, 5, -1, -43, 8, -43, -11, -2, -38, 13, ++ -1, 14, -1, 15, 16, 17, -1, -1, -1, 18, -1, -1, -1, -1, ++ -1, -1, -1, -1, -1, -1, -1, -1, 19, + }; + + if (len <= MAX_WORD_LENGTH && len >= MIN_WORD_LENGTH) +@@ -38801,38 +18411,37 @@ } return 0; } --/* ending time is 18:47:29 */ +-/* ending time is 16:31:13 */ +-static TAO_IR_ConsumesDef_Perfect_Hash_OpTable tao_IR_ConsumesDef_optable; +- +/* ending time is 11:23:11 */ - static TAO_IR_ProvidesDef_Perfect_Hash_OpTable tao_IR_ProvidesDef_optable; ++static TAO_IR_ProvidesDef_Perfect_Hash_OpTable tao_IR_ProvidesDef_optable; -- /////////////////////////////////////////////////////////////////////// // Strategized Proxy Broker Implementation // -@@ -35946,9 +35807,9 @@ + + // Factory function Implementation. +-POA_IR::_TAO_ConsumesDef_Strategized_Proxy_Broker *POA_IR::_TAO_ConsumesDef_Strategized_Proxy_Broker::the_TAO_ConsumesDef_Strategized_Proxy_Broker (void) ++POA_IR::_TAO_ProvidesDef_Strategized_Proxy_Broker *POA_IR::_TAO_ProvidesDef_Strategized_Proxy_Broker::the_TAO_ProvidesDef_Strategized_Proxy_Broker (void) + { +- static POA_IR::_TAO_ConsumesDef_Strategized_Proxy_Broker strategized_proxy_broker; ++ static POA_IR::_TAO_ProvidesDef_Strategized_Proxy_Broker strategized_proxy_broker; + return &strategized_proxy_broker; + } + +-POA_IR::_TAO_ConsumesDef_Strategized_Proxy_Broker::_TAO_ConsumesDef_Strategized_Proxy_Broker (void) ++POA_IR::_TAO_ProvidesDef_Strategized_Proxy_Broker::_TAO_ProvidesDef_Strategized_Proxy_Broker (void) + { + for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) + this->proxy_cache_[i] = 0; } --IR::_TAO_ProvidesDef_Proxy_Impl& +-POA_IR::_TAO_ConsumesDef_Strategized_Proxy_Broker::~_TAO_ConsumesDef_Strategized_Proxy_Broker (void) ++POA_IR::_TAO_ProvidesDef_Strategized_Proxy_Broker::~_TAO_ProvidesDef_Strategized_Proxy_Broker (void) + { + for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) + delete this->proxy_cache_[i]; + + } + +-IR::_TAO_ConsumesDef_Proxy_Impl& +-POA_IR::_TAO_ConsumesDef_Strategized_Proxy_Broker::select_proxy ( +- ::IR::ConsumesDef *object, +_TAO_ProvidesDef_Proxy_Impl& - POA_IR::_TAO_ProvidesDef_Strategized_Proxy_Broker::select_proxy ( -- ::IR::ProvidesDef *object, ++POA_IR::_TAO_ProvidesDef_Strategized_Proxy_Broker::select_proxy ( + IR_ProvidesDef *object, CORBA::Environment &ACE_TRY_ENV ) { -@@ -35980,7 +35841,7 @@ +@@ -38850,7 +18459,7 @@ + } + + void +-POA_IR::_TAO_ConsumesDef_Strategized_Proxy_Broker::create_proxy ( ++POA_IR::_TAO_ProvidesDef_Strategized_Proxy_Broker::create_proxy ( + TAO_ORB_Core::TAO_Collocation_Strategies strategy, + CORBA::Environment &ACE_TRY_ENV + ) +@@ -38864,7 +18473,7 @@ case TAO_ORB_Core::THRU_POA_STRATEGY: ACE_NEW_THROW_EX ( this->proxy_cache_[strategy], -- POA_IR::_TAO_ProvidesDef_ThruPOA_Proxy_Impl, +- POA_IR::_TAO_ConsumesDef_ThruPOA_Proxy_Impl, + _TAO_ProvidesDef_ThruPOA_Proxy_Impl, CORBA::NO_MEMORY () ); ACE_CHECK; -@@ -35990,7 +35851,7 @@ +@@ -38874,7 +18483,7 @@ default: ACE_NEW_THROW_EX ( this->proxy_cache_[strategy], -- ::IR::_TAO_ProvidesDef_Remote_Proxy_Impl, +- ::IR::_TAO_ConsumesDef_Remote_Proxy_Impl, + _TAO_ProvidesDef_Remote_Proxy_Impl, CORBA::NO_MEMORY () ); ACE_CHECK; -@@ -36007,26 +35868,26 @@ +@@ -38891,108 +18500,165 @@ /////////////////////////////////////////////////////////////////////// --IR::_TAO_ProvidesDef_Proxy_Broker * --IR__TAO_ProvidesDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) +-IR::_TAO_ConsumesDef_Proxy_Broker * +-IR__TAO_ConsumesDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) +_TAO_ProvidesDef_Proxy_Broker * +_TAO_ProvidesDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) { ACE_UNUSED_ARG (obj); - return ::POA_IR::_TAO_ProvidesDef_Strategized_Proxy_Broker::the_TAO_ProvidesDef_Strategized_Proxy_Broker(); +- return ::POA_IR::_TAO_ConsumesDef_Strategized_Proxy_Broker::the_TAO_ConsumesDef_Strategized_Proxy_Broker(); ++ return ::POA_IR::_TAO_ProvidesDef_Strategized_Proxy_Broker::the_TAO_ProvidesDef_Strategized_Proxy_Broker(); } int --IR__TAO_ProvidesDef_Proxy_Broker_Factory_Initializer (long _dummy_) +-IR__TAO_ConsumesDef_Proxy_Broker_Factory_Initializer (long _dummy_) +_TAO_ProvidesDef_Proxy_Broker_Factory_Initializer (long _dummy_) { ACE_UNUSED_ARG (_dummy_); -- IR__TAO_ProvidesDef_Proxy_Broker_Factory_function_pointer = -- IR__TAO_ProvidesDef_Proxy_Broker_Factory_function; +- IR__TAO_ConsumesDef_Proxy_Broker_Factory_function_pointer = +- IR__TAO_ConsumesDef_Proxy_Broker_Factory_function; + _TAO_ProvidesDef_Proxy_Broker_Factory_function_pointer = + _TAO_ProvidesDef_Proxy_Broker_Factory_function; return 0; } --static int IR__TAO_ProvidesDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = -- IR__TAO_ProvidesDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, IR__TAO_ProvidesDef_Proxy_Broker_Factory_Initializer)); +-static int IR__TAO_ConsumesDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = +- IR__TAO_ConsumesDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, IR__TAO_ConsumesDef_Proxy_Broker_Factory_Initializer)); +static int _TAO_ProvidesDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = + _TAO_ProvidesDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, _TAO_ProvidesDef_Proxy_Broker_Factory_Initializer)); /////////////////////////////////////////////////////////////////////// -@@ -36038,7 +35899,7 @@ + // ThruPOA Proxy Implementation + // + +-POA_IR::_TAO_ConsumesDef_ThruPOA_Proxy_Impl::_TAO_ConsumesDef_ThruPOA_Proxy_Impl (void) ++POA_IR::_TAO_ProvidesDef_ThruPOA_Proxy_Impl::_TAO_ProvidesDef_ThruPOA_Proxy_Impl (void) ++{} ++ ++POA_IR::_TAO_ProvidesDef_ThruPOA_Proxy_Impl::~_TAO_ProvidesDef_ThruPOA_Proxy_Impl (void) + {} // ThruPOA Implementation of the IDL interface methods --IR::InterfaceDef_ptr POA_IR::_TAO_ProvidesDef_ThruPOA_Proxy_Impl::interface_type ( -+IR_InterfaceDef_ptr POA_IR::_TAO_ProvidesDef_ThruPOA_Proxy_Impl::interface_type ( - CORBA_Object *_collocated_tao_target_, - CORBA::Environment &ACE_TRY_ENV - ) -@@ -36046,7 +35907,7 @@ - CORBA::SystemException - )) - { -- IR::InterfaceDef_var _tao_retval; ++IR::InterfaceDef_ptr POA_IR::_TAO_ProvidesDef_ThruPOA_Proxy_Impl::interface_type ( ++ CORBA_Object *_collocated_tao_target_, ++ CORBA::Environment &ACE_TRY_ENV ++ ) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException ++ )) ++{ + IR_InterfaceDef_var _tao_retval; - ACE_UNUSED_ARG (_tao_retval); - TAO_Object_Adapter::Servant_Upcall servant_upcall ( - _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -36082,7 +35943,7 @@ ++ ACE_UNUSED_ARG (_tao_retval); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "interface_type", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK_RETURN (0); ++ return ACE_reinterpret_cast ( ++ POA_IR::ProvidesDef_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/ProvidesDef:1.0" ++ ) ++ )->interface_type ( ++ ACE_TRY_ENV ++ ); ++} ++ + // + // End ThruPOA Proxy Implementation + /////////////////////////////////////////////////////////////////////// + + // skeleton constructor +-POA_IR::ConsumesDef::ConsumesDef (void) ++POA_IR::ProvidesDef::ProvidesDef (void) + { +- this->optable_ = &tao_IR_ConsumesDef_optable; ++ this->optable_ = &tao_IR_ProvidesDef_optable; + } + // copy ctor - POA_IR::ProvidesDef::ProvidesDef (const ProvidesDef& rhs) - : ACE_NESTED_CLASS (POA_IR,Contained) (rhs), +-POA_IR::ConsumesDef::ConsumesDef (const ConsumesDef& rhs) +- : ACE_NESTED_CLASS (POA_IR,EventDef) (rhs), +- ACE_NESTED_CLASS (POA_IR,Contained) (rhs), - ACE_NESTED_CLASS (POA_CORBA,IRObject) (rhs), ++POA_IR::ProvidesDef::ProvidesDef (const ProvidesDef& rhs) ++ : ACE_NESTED_CLASS (POA_IR,Contained) (rhs), + POA_CORBA_IRObject (rhs), TAO_ServantBase (rhs) {} -@@ -36100,7 +35961,7 @@ + // skeleton destructor +-POA_IR::ConsumesDef::~ConsumesDef (void) ++POA_IR::ProvidesDef::~ProvidesDef (void) { - POA_IR::ProvidesDef *_tao_impl = (POA_IR::ProvidesDef *)_tao_object_reference; - -- IR::InterfaceDef_var _tao_retval; -+ IR_InterfaceDef_var _tao_retval; + } - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( -@@ -36127,7 +35988,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::InterfaceDef_ptr _tao_retval_info = _tao_retval._retn (); -+ IR_InterfaceDef_ptr _tao_retval_info = _tao_retval._retn (); - ri.result (_tao_retval_info); - _tao_retval = _tao_retval_info; - ri.reply_status (PortableInterceptor::SUCCESSFUL); -@@ -36182,7 +36043,7 @@ - POA_IR::ProvidesDef *_tao_impl = (POA_IR::ProvidesDef *) _tao_object_reference; +-void POA_IR::ConsumesDef::_is_a_skel ( +- TAO_ServerRequest &_tao_server_request, ++void POA_IR::ProvidesDef::_get_interface_type_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) ++{ ++ POA_IR::ProvidesDef *_tao_impl = (POA_IR::ProvidesDef *)_tao_object_reference; ++ ++ IR_InterfaceDef_var _tao_retval; ++ ++ _tao_retval = _tao_impl->interface_type ( ++ ACE_TRY_ENV ++ ); ++ ++ ACE_CHECK; ++ ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!( ++ (_tao_out << _tao_retval.in ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); ++} ++ ++void POA_IR::ProvidesDef::_is_a_skel ( ++ TAO_ServerRequest &_tao_server_request, + void * _tao_object_reference, + void * /* context */, + CORBA::Environment &ACE_TRY_ENV + ) + { + TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::ConsumesDef *_tao_impl = (POA_IR::ConsumesDef *) _tao_object_reference; ++ POA_IR::ProvidesDef *_tao_impl = (POA_IR::ProvidesDef *) _tao_object_reference; CORBA::Boolean _tao_retval = 0; CORBA::String_var value; - if (!(_tao_in >> value.out ())) + if (!((_tao_in >> value.out ()))) ACE_THROW (CORBA::MARSHAL ()); - +- ++ _tao_retval = _tao_impl->_is_a (value.in (), ACE_TRY_ENV); -@@ -36190,7 +36051,7 @@ - + ACE_CHECK; +- ++ _tao_server_request.init_reply (); TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); - if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) @@ -8345,8 +47441,21 @@ ACE_THROW (CORBA::MARSHAL ()); } -@@ -36207,7 +36068,7 @@ - +-void POA_IR::ConsumesDef::_non_existent_skel ( +- TAO_ServerRequest &_tao_server_request, ++void POA_IR::ProvidesDef::_non_existent_skel ( ++ TAO_ServerRequest &_tao_server_request, + void * _tao_object_reference, + void * /* context */, + CORBA::Environment &ACE_TRY_ENV + ) + { +- POA_IR::ConsumesDef *_tao_impl = (POA_IR::ConsumesDef *) _tao_object_reference; ++ POA_IR::ProvidesDef *_tao_impl = (POA_IR::ProvidesDef *) _tao_object_reference; + CORBA::Boolean _tao_retval = _tao_impl->_non_existent (ACE_TRY_ENV); + ACE_CHECK; +- ++ _tao_server_request.init_reply (); TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); - if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) @@ -8354,7 +47463,37 @@ ACE_THROW (CORBA::MARSHAL ()); } -@@ -36235,7 +36096,7 @@ +-CORBA::Boolean POA_IR::ConsumesDef::_is_a ( ++CORBA::Boolean POA_IR::ProvidesDef::_is_a ( + const char* value, + CORBA::Environment &ACE_TRY_ENV + ) + { + if ( +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/ConsumesDef:1.0")) || +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/EventDef:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/ProvidesDef:1.0")) || + (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/Contained:1.0")) || + (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/CORBA/IRObject:1.0")) || + (!ACE_OS::strcmp ((char *)value, CORBA::_tc_Object->id (ACE_TRY_ENV)))) +@@ -39001,35 +18667,33 @@ + return 0; + } + +-void* POA_IR::ConsumesDef::_downcast ( +- const char* logical_type_id +- ) +-{ +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/ConsumesDef:1.0") == 0) +- return ACE_static_cast (POA_IR::ConsumesDef_ptr, this); +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/EventDef:1.0") == 0) +- return ACE_static_cast (POA_IR::EventDef_ptr, this); ++void* POA_IR::ProvidesDef::_downcast ( ++ const char* logical_type_id ++ ) ++{ ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/ProvidesDef:1.0") == 0) ++ return ACE_static_cast (POA_IR::ProvidesDef_ptr, this); if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Contained:1.0") == 0) return ACE_static_cast (POA_IR::Contained_ptr, this); if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/IRObject:1.0") == 0) @@ -8363,511 +47502,2910 @@ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/Object:1.0") == 0) return ACE_static_cast(PortableServer::Servant, this); return 0; -@@ -36265,10 +36126,9 @@ + } + +-void POA_IR::ConsumesDef::_dispatch (TAO_ServerRequest &req, void *context, CORBA::Environment &ACE_TRY_ENV) ++void POA_IR::ProvidesDef::_dispatch (TAO_ServerRequest &req, void *context, CORBA::Environment &ACE_TRY_ENV) + { + this->synchronous_upcall_dispatch(req, context, this, ACE_TRY_ENV); + } + +-const char* POA_IR::ConsumesDef::_interface_repository_id (void) const ++const char* POA_IR::ProvidesDef::_interface_repository_id (void) const + { +- return "IDL:omg.org/IR/ConsumesDef:1.0"; ++ return "IDL:omg.org/IR/ProvidesDef:1.0"; + } + +-IR::ConsumesDef* +-POA_IR::ConsumesDef::_this (CORBA_Environment &ACE_TRY_ENV) ++IR::ProvidesDef* ++POA_IR::ProvidesDef::_this (CORBA_Environment &ACE_TRY_ENV) + { + TAO_Stub *stub = this->_create_stub (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); +@@ -39042,154 +18706,111 @@ ACE_NEW_RETURN (tmp, CORBA::Object (stub, 0, this), 0); CORBA::Object_var obj = tmp; -- return ::IR::ProvidesDef::_unchecked_narrow (obj.in ()); +- return ::IR::ConsumesDef::_unchecked_narrow (obj.in ()); + return IR_ProvidesDef::_unchecked_narrow (obj.in ()); } - - #if (TAO_HAS_INTERCEPTORS == 1) - POA_IR::ProvidesDef::TAO_ServerRequestInfo_IR_ProvidesDef_interface_type_get::TAO_ServerRequestInfo_IR_ProvidesDef_interface_type_get ( - TAO_ServerRequest &_tao_server_request, -@@ -36346,6 +36206,7 @@ - } - - #endif /* TAO_HAS_INTERCEPTORS */ -+ - class TAO_IR_UsesDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable +-#if (TAO_HAS_INTERCEPTORS == 1) +-#endif /* TAO_HAS_INTERCEPTORS */ +-class TAO_IR_ComponentDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable ++class TAO_IR_UsesDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable { private: -@@ -36353,7 +36214,7 @@ + unsigned int hash (const char *str, unsigned int len); public: const TAO_operation_db_entry * lookup (const char *str, unsigned int len); }; --/* starting time is 18:47:29 */ +-/* starting time is 16:31:13 */ +/* starting time is 11:23:11 */ /* C++ code produced by gperf version 2.8 (ACE version) */ - /* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_UsesDef_Perfect_Hash_OpTable -N lookup */ +-/* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_ComponentDef_Perfect_Hash_OpTable -N lookup */ ++/* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_UsesDef_Perfect_Hash_OpTable -N lookup */ unsigned int -@@ -36481,10 +36342,9 @@ +-TAO_IR_ComponentDef_Perfect_Hash_OpTable::hash (const char *str, unsigned int len) ++TAO_IR_UsesDef_Perfect_Hash_OpTable::hash (const char *str, unsigned int len) + { + static const unsigned char asso_values[] = + { + #if defined (ACE_MVS) +- 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, +- 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, +- 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, +- 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, +- 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, +- 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, +- 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, +- 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, +- 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, +- 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, +- 82, 82, 82, 82, 82, 82, 82, 82, 82, 0, +- 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, +- 82, 82, 82, 82, 82, 82, 82, 82, 82, 0, +- 82, 30, 5, 10, 82, 82, 82, 0, 82, 82, +- 82, 82, 82, 82, 82, 82, 82, 45, 30, 15, +- 82, 30, 82, 82, 82, 82, 82, 82, 82, 82, +- 82, 82, 0, 20, 82, 82, 82, 30, 25, 82, +- 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, +- 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, +- 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, +- 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, +- 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, +- 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, +- 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, +- 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, +- 82, 82, 82, 82, 82, 82, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 0, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 0, ++ 37, 37, 0, 0, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 0, 0, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 10, 37, 37, 37, 37, 10, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, + #else +- 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, +- 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, +- 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, +- 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, +- 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, +- 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, +- 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, +- 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, +- 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, +- 82, 82, 82, 82, 82, 0, 82, 0, 82, 30, +- 5, 10, 82, 82, 82, 0, 82, 82, 45, 30, +- 15, 82, 30, 82, 82, 0, 20, 82, 82, 82, +- 30, 25, 82, 82, 82, 82, 82, 82, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 0, 37, 0, 37, 37, ++ 0, 0, 37, 37, 37, 37, 37, 37, 37, 0, ++ 0, 37, 37, 37, 37, 37, 10, 37, 37, 37, ++ 37, 10, 37, 37, 37, 37, 37, 37, + #endif /* ACE_MVS */ + }; + return len + asso_values[str[len - 1]] + asso_values[str[0]]; + } + + const class TAO_operation_db_entry * +-TAO_IR_ComponentDef_Perfect_Hash_OpTable::lookup (const char *str, unsigned int len) ++TAO_IR_UsesDef_Perfect_Hash_OpTable::lookup (const char *str, unsigned int len) + { + enum + { +- TOTAL_KEYWORDS = 54, ++ TOTAL_KEYWORDS = 17, + MIN_WORD_LENGTH = 4, + MAX_WORD_LENGTH = 26, + MIN_HASH_VALUE = 4, +- MAX_HASH_VALUE = 81, +- HASH_VALUE_RANGE = 78, +- DUPLICATES = 16 ++ MAX_HASH_VALUE = 36, ++ HASH_VALUE_RANGE = 33, ++ DUPLICATES = 4 + }; + + static const class TAO_operation_db_entry wordlist[] = + { + {"",0},{"",0},{"",0},{"",0}, +- {"is_a", &POA_IR::ComponentDef::is_a_skel}, +- {"_is_a", &POA_IR::ComponentDef::_is_a_skel}, +- {"_get_id", &POA_IR::ComponentDef::_get_id_skel}, +- {"_set_id", &POA_IR::ComponentDef::_set_id_skel}, +- {"_get_emits_events", &POA_IR::ComponentDef::_get_emits_events_skel}, +- {"_get_def_kind", &POA_IR::ComponentDef::_get_def_kind_skel}, +- {"_get_name", &POA_IR::ComponentDef::_get_name_skel}, +- {"_get_type", &POA_IR::ComponentDef::_get_type_skel}, +- {"_set_name", &POA_IR::ComponentDef::_set_name_skel}, +- {"_get_uses_interfaces", &POA_IR::ComponentDef::_get_uses_interfaces_skel}, +- {"_set_base_interfaces", &POA_IR::ComponentDef::_set_base_interfaces_skel}, +- {"_get_base_interfaces", &POA_IR::ComponentDef::_get_base_interfaces_skel}, +- {"_get_consumes_events", &POA_IR::ComponentDef::_get_consumes_events_skel}, +- {"_get_publishes_events", &POA_IR::ComponentDef::_get_publishes_events_skel}, +- {"describe_contents", &POA_IR::ComponentDef::describe_contents_skel}, +- {"describe", &POA_IR::ComponentDef::describe_skel}, +- {"_get_provides_interfaces", &POA_IR::ComponentDef::_get_provides_interfaces_skel}, +- {"_get_supported_interfaces", &POA_IR::ComponentDef::_get_supported_interfaces_skel}, +- {"_set_supported_interfaces", &POA_IR::ComponentDef::_set_supported_interfaces_skel}, +- {"_get_version", &POA_IR::ComponentDef::_get_version_skel}, +- {"_set_version", &POA_IR::ComponentDef::_set_version_skel}, +- {"_get_absolute_name", &POA_IR::ComponentDef::_get_absolute_name_skel}, +- {"_get_defined_in", &POA_IR::ComponentDef::_get_defined_in_skel}, +- {"_non_existent", &POA_IR::ComponentDef::_non_existent_skel}, +- {"_get_is_abstract", &POA_IR::ComponentDef::_get_is_abstract_skel}, +- {"_set_is_abstract", &POA_IR::ComponentDef::_set_is_abstract_skel}, +- {"destroy", &POA_IR::ComponentDef::destroy_skel}, +- {"contents", &POA_IR::ComponentDef::contents_skel}, +- {"_get_base_component", &POA_IR::ComponentDef::_get_base_component_skel}, +- {"create_uses", &POA_IR::ComponentDef::create_uses_skel}, +- {"create_emits", &POA_IR::ComponentDef::create_emits_skel}, +- {"create_alias", &POA_IR::ComponentDef::create_alias_skel}, +- {"_get_is_basic", &POA_IR::ComponentDef::_get_is_basic_skel}, +- {"move", &POA_IR::ComponentDef::move_skel}, +- {"create_provides", &POA_IR::ComponentDef::create_provides_skel}, +- {"create_consumes", &POA_IR::ComponentDef::create_consumes_skel}, +- {"create_publishes", &POA_IR::ComponentDef::create_publishes_skel}, +- {"_get_containing_repository", &POA_IR::ComponentDef::_get_containing_repository_skel}, +- {"create_value", &POA_IR::ComponentDef::create_value_skel}, +- {"create_module", &POA_IR::ComponentDef::create_module_skel}, +- {"create_native", &POA_IR::ComponentDef::create_native_skel}, +- {"create_attribute", &POA_IR::ComponentDef::create_attribute_skel}, +- {"create_interface", &POA_IR::ComponentDef::create_interface_skel}, +- {"create_union", &POA_IR::ComponentDef::create_union_skel}, +- {"_get_is_local", &POA_IR::ComponentDef::_get_is_local_skel}, +- {"_set_is_local", &POA_IR::ComponentDef::_set_is_local_skel}, +- {"create_operation", &POA_IR::ComponentDef::create_operation_skel}, +- {"create_exception", &POA_IR::ComponentDef::create_exception_skel}, +- {"create_struct", &POA_IR::ComponentDef::create_struct_skel}, +- {"create_constant", &POA_IR::ComponentDef::create_constant_skel}, +- {"lookup_name", &POA_IR::ComponentDef::lookup_name_skel}, +- {"create_enum", &POA_IR::ComponentDef::create_enum_skel}, +- {"create_value_box", &POA_IR::ComponentDef::create_value_box_skel}, +- {"lookup", &POA_IR::ComponentDef::lookup_skel}, ++ {"move", &POA_IR::UsesDef::move_skel}, ++ {"_is_a", &POA_IR::UsesDef::_is_a_skel}, ++ {"_get_id", &POA_IR::UsesDef::_get_id_skel}, ++ {"_set_id", &POA_IR::UsesDef::_set_id_skel}, ++ {"describe", &POA_IR::UsesDef::describe_skel}, ++ {"_get_name", &POA_IR::UsesDef::_get_name_skel}, ++ {"_set_name", &POA_IR::UsesDef::_set_name_skel}, ++ {"_get_version", &POA_IR::UsesDef::_get_version_skel}, ++ {"_set_version", &POA_IR::UsesDef::_set_version_skel}, ++ {"_get_def_kind", &POA_IR::UsesDef::_get_def_kind_skel}, ++ {"_get_defined_in", &POA_IR::UsesDef::_get_defined_in_skel}, ++ {"_get_is_multiple", &POA_IR::UsesDef::_get_is_multiple_skel}, ++ {"destroy", &POA_IR::UsesDef::destroy_skel}, ++ {"_get_absolute_name", &POA_IR::UsesDef::_get_absolute_name_skel}, ++ {"_get_interface_type", &POA_IR::UsesDef::_get_interface_type_skel}, ++ {"_non_existent", &POA_IR::UsesDef::_non_existent_skel}, ++ {"_get_containing_repository", &POA_IR::UsesDef::_get_containing_repository_skel}, + }; + + static const signed char lookup[] = + { +- -1, -1, -6, -2, 4, 5, -10, -3, -13, -4, -21, -2, -91, -23, +- -2, -28, -2, 8, 9, -94, -93, 17, 18, 19, 20, -96, -1, -95, +- 25, -1, 26, -34, -2, 27, -38, -2, -102, 30, 31, 32, -1, 33, +- -92, 36, 37, -92, 40, -43, -2, -45, -2, 41, 42, -87, -48, -2, +- -88, 47, -85, -50, -2, -83, -1, 52, -1, 53, 54, -1, -1, -1, +- -1, 55, -1, -1, -1, -1, 56, -1, -1, -1, -1, 57, ++ -6, -2, -9, -2, 4, 5, -1, -43, 8, -43, -11, -2, -38, 13, ++ -1, 14, 15, 16, 17, 18, -1, -1, -1, 19, -1, -1, -1, -1, ++ -1, -1, -1, -1, -1, -1, -1, -1, 20, + }; + + if (len <= MAX_WORD_LENGTH && len >= MIN_WORD_LENGTH) +@@ -39223,38 +18844,37 @@ } return 0; } --/* ending time is 18:47:29 */ +-/* ending time is 16:31:13 */ +-static TAO_IR_ComponentDef_Perfect_Hash_OpTable tao_IR_ComponentDef_optable; +- +/* ending time is 11:23:11 */ - static TAO_IR_UsesDef_Perfect_Hash_OpTable tao_IR_UsesDef_optable; ++static TAO_IR_UsesDef_Perfect_Hash_OpTable tao_IR_UsesDef_optable; -- /////////////////////////////////////////////////////////////////////// // Strategized Proxy Broker Implementation // -@@ -36510,9 +36370,9 @@ + + // Factory function Implementation. +-POA_IR::_TAO_ComponentDef_Strategized_Proxy_Broker *POA_IR::_TAO_ComponentDef_Strategized_Proxy_Broker::the_TAO_ComponentDef_Strategized_Proxy_Broker (void) ++POA_IR::_TAO_UsesDef_Strategized_Proxy_Broker *POA_IR::_TAO_UsesDef_Strategized_Proxy_Broker::the_TAO_UsesDef_Strategized_Proxy_Broker (void) + { +- static POA_IR::_TAO_ComponentDef_Strategized_Proxy_Broker strategized_proxy_broker; ++ static POA_IR::_TAO_UsesDef_Strategized_Proxy_Broker strategized_proxy_broker; + return &strategized_proxy_broker; + } + +-POA_IR::_TAO_ComponentDef_Strategized_Proxy_Broker::_TAO_ComponentDef_Strategized_Proxy_Broker (void) ++POA_IR::_TAO_UsesDef_Strategized_Proxy_Broker::_TAO_UsesDef_Strategized_Proxy_Broker (void) + { + for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) + this->proxy_cache_[i] = 0; } --IR::_TAO_UsesDef_Proxy_Impl& +-POA_IR::_TAO_ComponentDef_Strategized_Proxy_Broker::~_TAO_ComponentDef_Strategized_Proxy_Broker (void) ++POA_IR::_TAO_UsesDef_Strategized_Proxy_Broker::~_TAO_UsesDef_Strategized_Proxy_Broker (void) + { + for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) + delete this->proxy_cache_[i]; + + } + +-IR::_TAO_ComponentDef_Proxy_Impl& +-POA_IR::_TAO_ComponentDef_Strategized_Proxy_Broker::select_proxy ( +- ::IR::ComponentDef *object, +_TAO_UsesDef_Proxy_Impl& - POA_IR::_TAO_UsesDef_Strategized_Proxy_Broker::select_proxy ( -- ::IR::UsesDef *object, ++POA_IR::_TAO_UsesDef_Strategized_Proxy_Broker::select_proxy ( + IR_UsesDef *object, CORBA::Environment &ACE_TRY_ENV ) { -@@ -36544,7 +36404,7 @@ +@@ -39272,7 +18892,7 @@ + } + + void +-POA_IR::_TAO_ComponentDef_Strategized_Proxy_Broker::create_proxy ( ++POA_IR::_TAO_UsesDef_Strategized_Proxy_Broker::create_proxy ( + TAO_ORB_Core::TAO_Collocation_Strategies strategy, + CORBA::Environment &ACE_TRY_ENV + ) +@@ -39286,7 +18906,7 @@ case TAO_ORB_Core::THRU_POA_STRATEGY: ACE_NEW_THROW_EX ( this->proxy_cache_[strategy], -- POA_IR::_TAO_UsesDef_ThruPOA_Proxy_Impl, +- POA_IR::_TAO_ComponentDef_ThruPOA_Proxy_Impl, + _TAO_UsesDef_ThruPOA_Proxy_Impl, CORBA::NO_MEMORY () ); ACE_CHECK; -@@ -36554,7 +36414,7 @@ +@@ -39296,7 +18916,7 @@ default: ACE_NEW_THROW_EX ( this->proxy_cache_[strategy], -- ::IR::_TAO_UsesDef_Remote_Proxy_Impl, +- ::IR::_TAO_ComponentDef_Remote_Proxy_Impl, + _TAO_UsesDef_Remote_Proxy_Impl, CORBA::NO_MEMORY () ); ACE_CHECK; -@@ -36571,26 +36431,26 @@ +@@ -39313,38 +18933,41 @@ /////////////////////////////////////////////////////////////////////// --IR::_TAO_UsesDef_Proxy_Broker * --IR__TAO_UsesDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) +-IR::_TAO_ComponentDef_Proxy_Broker * +-IR__TAO_ComponentDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) +_TAO_UsesDef_Proxy_Broker * +_TAO_UsesDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) { ACE_UNUSED_ARG (obj); - return ::POA_IR::_TAO_UsesDef_Strategized_Proxy_Broker::the_TAO_UsesDef_Strategized_Proxy_Broker(); +- return ::POA_IR::_TAO_ComponentDef_Strategized_Proxy_Broker::the_TAO_ComponentDef_Strategized_Proxy_Broker(); ++ return ::POA_IR::_TAO_UsesDef_Strategized_Proxy_Broker::the_TAO_UsesDef_Strategized_Proxy_Broker(); } int --IR__TAO_UsesDef_Proxy_Broker_Factory_Initializer (long _dummy_) +-IR__TAO_ComponentDef_Proxy_Broker_Factory_Initializer (long _dummy_) +_TAO_UsesDef_Proxy_Broker_Factory_Initializer (long _dummy_) { ACE_UNUSED_ARG (_dummy_); -- IR__TAO_UsesDef_Proxy_Broker_Factory_function_pointer = -- IR__TAO_UsesDef_Proxy_Broker_Factory_function; +- IR__TAO_ComponentDef_Proxy_Broker_Factory_function_pointer = +- IR__TAO_ComponentDef_Proxy_Broker_Factory_function; + _TAO_UsesDef_Proxy_Broker_Factory_function_pointer = + _TAO_UsesDef_Proxy_Broker_Factory_function; return 0; } --static int IR__TAO_UsesDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = -- IR__TAO_UsesDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, IR__TAO_UsesDef_Proxy_Broker_Factory_Initializer)); +-static int IR__TAO_ComponentDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = +- IR__TAO_ComponentDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, IR__TAO_ComponentDef_Proxy_Broker_Factory_Initializer)); +static int _TAO_UsesDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = + _TAO_UsesDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, _TAO_UsesDef_Proxy_Broker_Factory_Initializer)); /////////////////////////////////////////////////////////////////////// -@@ -36602,7 +36462,7 @@ + // ThruPOA Proxy Implementation + // + +-POA_IR::_TAO_ComponentDef_ThruPOA_Proxy_Impl::_TAO_ComponentDef_ThruPOA_Proxy_Impl (void) ++POA_IR::_TAO_UsesDef_ThruPOA_Proxy_Impl::_TAO_UsesDef_ThruPOA_Proxy_Impl (void) ++{} ++ ++POA_IR::_TAO_UsesDef_ThruPOA_Proxy_Impl::~_TAO_UsesDef_ThruPOA_Proxy_Impl (void) + {} // ThruPOA Implementation of the IDL interface methods --IR::InterfaceDef_ptr POA_IR::_TAO_UsesDef_ThruPOA_Proxy_Impl::interface_type ( -+IR_InterfaceDef_ptr POA_IR::_TAO_UsesDef_ThruPOA_Proxy_Impl::interface_type ( +-IR::InterfaceDefSeq * POA_IR::_TAO_ComponentDef_ThruPOA_Proxy_Impl::supported_interfaces ( ++IR::InterfaceDef_ptr POA_IR::_TAO_UsesDef_ThruPOA_Proxy_Impl::interface_type ( CORBA_Object *_collocated_tao_target_, CORBA::Environment &ACE_TRY_ENV ) -@@ -36610,7 +36470,7 @@ +@@ -39352,7 +18975,7 @@ CORBA::SystemException )) { -- IR::InterfaceDef_var _tao_retval; +- IR::InterfaceDefSeq_var _tao_retval; + IR_InterfaceDef_var _tao_retval; ACE_UNUSED_ARG (_tao_retval); TAO_Object_Adapter::Servant_Upcall servant_upcall ( _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -36677,7 +36537,7 @@ - // copy ctor - POA_IR::UsesDef::UsesDef (const UsesDef& rhs) - : ACE_NESTED_CLASS (POA_IR,Contained) (rhs), -- ACE_NESTED_CLASS (POA_CORBA,IRObject) (rhs), -+ POA_CORBA_IRObject (rhs), - TAO_ServantBase (rhs) - {} +@@ -39360,402 +18983,489 @@ + CORBA::Object_var forward_to; + servant_upcall.prepare_for_upcall ( + _collocated_tao_target_->_object_key (), +- "supported_interfaces", ++ "interface_type", + forward_to.out (), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + return ACE_reinterpret_cast ( +- POA_IR::ComponentDef_ptr, ++ POA_IR::UsesDef_ptr, + servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/ComponentDef:1.0" ++ "IDL:omg.org/IR/UsesDef:1.0" + ) +- )->supported_interfaces ( ++ )->interface_type ( ++ ACE_TRY_ENV ++ ); ++} ++ ++CORBA::Boolean POA_IR::_TAO_UsesDef_ThruPOA_Proxy_Impl::is_multiple ( ++ CORBA_Object *_collocated_tao_target_, ++ CORBA::Environment &ACE_TRY_ENV ++ ) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException ++ )) ++{ ++ CORBA::Boolean _tao_retval = 0; ++ ACE_UNUSED_ARG (_tao_retval); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "is_multiple", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK_RETURN (_tao_retval); ++ return ACE_reinterpret_cast ( ++ POA_IR::UsesDef_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/UsesDef:1.0" ++ ) ++ )->is_multiple ( + ACE_TRY_ENV + ); + } -@@ -36695,7 +36555,7 @@ - { - POA_IR::UsesDef *_tao_impl = (POA_IR::UsesDef *)_tao_object_reference; - -- IR::InterfaceDef_var _tao_retval; +-void POA_IR::_TAO_ComponentDef_ThruPOA_Proxy_Impl::supported_interfaces ( +- CORBA_Object *_collocated_tao_target_, +- const IR::InterfaceDefSeq & supported_interfaces, ++// ++// End ThruPOA Proxy Implementation ++/////////////////////////////////////////////////////////////////////// ++ ++// skeleton constructor ++POA_IR::UsesDef::UsesDef (void) ++{ ++ this->optable_ = &tao_IR_UsesDef_optable; ++} ++ ++// copy ctor ++POA_IR::UsesDef::UsesDef (const UsesDef& rhs) ++ : ACE_NESTED_CLASS (POA_IR,Contained) (rhs), ++ POA_CORBA_IRObject (rhs), ++ TAO_ServantBase (rhs) ++{} ++ ++// skeleton destructor ++POA_IR::UsesDef::~UsesDef (void) ++{ ++} ++ ++void POA_IR::UsesDef::_get_interface_type_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) ++{ ++ POA_IR::UsesDef *_tao_impl = (POA_IR::UsesDef *)_tao_object_reference; ++ + IR_InterfaceDef_var _tao_retval; - - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( -@@ -36722,7 +36582,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::InterfaceDef_ptr _tao_retval_info = _tao_retval._retn (); -+ IR_InterfaceDef_ptr _tao_retval_info = _tao_retval._retn (); - ri.result (_tao_retval_info); - _tao_retval = _tao_retval_info; - ri.reply_status (PortableInterceptor::SUCCESSFUL); -@@ -36856,7 +36716,7 @@ - POA_IR::UsesDef *_tao_impl = (POA_IR::UsesDef *) _tao_object_reference; - CORBA::Boolean _tao_retval = 0; - CORBA::String_var value; -- if (!(_tao_in >> value.out ())) ++ ++ _tao_retval = _tao_impl->interface_type ( ++ ACE_TRY_ENV ++ ); ++ ++ ACE_CHECK; ++ ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!( ++ (_tao_out << _tao_retval.in ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); ++} ++ ++void POA_IR::UsesDef::_get_is_multiple_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) ++{ ++ POA_IR::UsesDef *_tao_impl = (POA_IR::UsesDef *)_tao_object_reference; ++ ++ CORBA::Boolean _tao_retval = 0; ++ ++ _tao_retval = _tao_impl->is_multiple ( ++ ACE_TRY_ENV ++ ); ++ ++ ACE_CHECK; ++ ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!( ++ (_tao_out << CORBA::Any::from_boolean (_tao_retval)) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); ++} ++ ++void POA_IR::UsesDef::_is_a_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void * _tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++ ) ++{ ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::UsesDef *_tao_impl = (POA_IR::UsesDef *) _tao_object_reference; ++ CORBA::Boolean _tao_retval = 0; ++ CORBA::String_var value; + if (!((_tao_in >> value.out ()))) - ACE_THROW (CORBA::MARSHAL ()); - - _tao_retval = _tao_impl->_is_a (value.in (), ACE_TRY_ENV); -@@ -36864,7 +36724,7 @@ - - _tao_server_request.init_reply (); - TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); -- if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) ++ ACE_THROW (CORBA::MARSHAL ()); ++ ++ _tao_retval = _tao_impl->_is_a (value.in (), ACE_TRY_ENV); ++ ACE_CHECK; ++ ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); + if (!((_tao_out << CORBA::Any::from_boolean (_tao_retval)))) - ACE_THROW (CORBA::MARSHAL ()); ++ ACE_THROW (CORBA::MARSHAL ()); ++} ++ ++void POA_IR::UsesDef::_non_existent_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void * _tao_object_reference, ++ void * /* context */, + CORBA::Environment &ACE_TRY_ENV + ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) + { +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "supported_interfaces", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK; +- ACE_reinterpret_cast ( +- POA_IR::ComponentDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/ComponentDef:1.0" +- ) +- )->supported_interfaces ( +- supported_interfaces, +- ACE_TRY_ENV +- ); +- return; ++ POA_IR::UsesDef *_tao_impl = (POA_IR::UsesDef *) _tao_object_reference; ++ CORBA::Boolean _tao_retval = _tao_impl->_non_existent (ACE_TRY_ENV); ++ ACE_CHECK; ++ ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!((_tao_out << CORBA::Any::from_boolean (_tao_retval)))) ++ ACE_THROW (CORBA::MARSHAL ()); } -@@ -36881,7 +36741,7 @@ - - _tao_server_request.init_reply (); - TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); -- if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) -+ if (!((_tao_out << CORBA::Any::from_boolean (_tao_retval)))) - ACE_THROW (CORBA::MARSHAL ()); +-IR::ComponentDef_ptr POA_IR::_TAO_ComponentDef_ThruPOA_Proxy_Impl::base_component ( +- CORBA_Object *_collocated_tao_target_, ++CORBA::Boolean POA_IR::UsesDef::_is_a ( ++ const char* value, + CORBA::Environment &ACE_TRY_ENV + ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) + { +- IR::ComponentDef_var _tao_retval; +- ACE_UNUSED_ARG (_tao_retval); +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "base_component", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK_RETURN (0); +- return ACE_reinterpret_cast ( +- POA_IR::ComponentDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/ComponentDef:1.0" +- ) +- )->base_component ( +- ACE_TRY_ENV +- ); ++ if ( ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/UsesDef:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/Contained:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/CORBA/IRObject:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, CORBA::_tc_Object->id (ACE_TRY_ENV)))) ++ return 1; ++ else ++ return 0; } -@@ -36909,7 +36769,7 @@ - if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Contained:1.0") == 0) - return ACE_static_cast (POA_IR::Contained_ptr, this); - if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/IRObject:1.0") == 0) -- return ACE_static_cast (POA_CORBA::IRObject_ptr, this); +-IR::ProvidesDefSeq * POA_IR::_TAO_ComponentDef_ThruPOA_Proxy_Impl::provides_interfaces ( +- CORBA_Object *_collocated_tao_target_, +- CORBA::Environment &ACE_TRY_ENV ++void* POA_IR::UsesDef::_downcast ( ++ const char* logical_type_id + ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) + { +- IR::ProvidesDefSeq_var _tao_retval; +- ACE_UNUSED_ARG (_tao_retval); +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "provides_interfaces", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK_RETURN (0); +- return ACE_reinterpret_cast ( +- POA_IR::ComponentDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/ComponentDef:1.0" +- ) +- )->provides_interfaces ( +- ACE_TRY_ENV +- ); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/UsesDef:1.0") == 0) ++ return ACE_static_cast (POA_IR::UsesDef_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Contained:1.0") == 0) ++ return ACE_static_cast (POA_IR::Contained_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/IRObject:1.0") == 0) + return ACE_static_cast (POA_CORBA_IRObject_ptr, this); - if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/Object:1.0") == 0) - return ACE_static_cast(PortableServer::Servant, this); - return 0; -@@ -36939,10 +36799,9 @@ - ACE_NEW_RETURN (tmp, CORBA::Object (stub, 0, this), 0); - - CORBA::Object_var obj = tmp; -- return ::IR::UsesDef::_unchecked_narrow (obj.in ()); -+ return IR_UsesDef::_unchecked_narrow (obj.in ()); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/Object:1.0") == 0) ++ return ACE_static_cast(PortableServer::Servant, this); ++ return 0; } -- - #if (TAO_HAS_INTERCEPTORS == 1) - POA_IR::UsesDef::TAO_ServerRequestInfo_IR_UsesDef_interface_type_get::TAO_ServerRequestInfo_IR_UsesDef_interface_type_get ( - TAO_ServerRequest &_tao_server_request, -@@ -37095,6 +36954,7 @@ +-IR::UsesDefSeq * POA_IR::_TAO_ComponentDef_ThruPOA_Proxy_Impl::uses_interfaces ( +- CORBA_Object *_collocated_tao_target_, +- CORBA::Environment &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) ++void POA_IR::UsesDef::_dispatch (TAO_ServerRequest &req, void *context, CORBA::Environment &ACE_TRY_ENV) + { +- IR::UsesDefSeq_var _tao_retval; +- ACE_UNUSED_ARG (_tao_retval); +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "uses_interfaces", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK_RETURN (0); +- return ACE_reinterpret_cast ( +- POA_IR::ComponentDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/ComponentDef:1.0" +- ) +- )->uses_interfaces ( +- ACE_TRY_ENV +- ); ++ this->synchronous_upcall_dispatch(req, context, this, ACE_TRY_ENV); ++} ++ ++const char* POA_IR::UsesDef::_interface_repository_id (void) const ++{ ++ return "IDL:omg.org/IR/UsesDef:1.0"; ++} ++ ++IR::UsesDef* ++POA_IR::UsesDef::_this (CORBA_Environment &ACE_TRY_ENV) ++{ ++ TAO_Stub *stub = this->_create_stub (ACE_TRY_ENV); ++ ACE_CHECK_RETURN (0); ++ ++ CORBA::Object_ptr tmp = CORBA::Object::_nil (); ++ ++ if (stub->servant_orb_var ()->orb_core ()->optimize_collocation_objects ()) ++ ACE_NEW_RETURN (tmp, CORBA::Object (stub, 1, this), 0); ++ else ++ ACE_NEW_RETURN (tmp, CORBA::Object (stub, 0, this), 0); ++ ++ CORBA::Object_var obj = tmp; ++ return IR_UsesDef::_unchecked_narrow (obj.in ()); ++} ++ ++class TAO_IR_EventDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable ++{ ++private: ++ unsigned int hash (const char *str, unsigned int len); ++public: ++ const TAO_operation_db_entry * lookup (const char *str, unsigned int len); ++}; ++/* starting time is 11:23:11 */ ++/* C++ code produced by gperf version 2.8 (ACE version) */ ++/* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_EventDef_Perfect_Hash_OpTable -N lookup */ ++unsigned int ++TAO_IR_EventDef_Perfect_Hash_OpTable::hash (const char *str, unsigned int len) ++{ ++ static const unsigned char asso_values[] = ++ { ++#if defined (ACE_MVS) ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 0, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 0, ++ 37, 37, 0, 0, 37, 37, 37, 10, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 0, 0, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 10, 37, 37, 37, 37, 10, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, ++#else ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 0, 37, 0, 37, 37, ++ 0, 0, 37, 37, 37, 10, 37, 37, 37, 0, ++ 0, 37, 37, 37, 37, 37, 10, 37, 37, 37, ++ 37, 10, 37, 37, 37, 37, 37, 37, ++#endif /* ACE_MVS */ ++ }; ++ return len + asso_values[str[len - 1]] + asso_values[str[0]]; ++} ++ ++const class TAO_operation_db_entry * ++TAO_IR_EventDef_Perfect_Hash_OpTable::lookup (const char *str, unsigned int len) ++{ ++ enum ++ { ++ TOTAL_KEYWORDS = 17, ++ MIN_WORD_LENGTH = 4, ++ MAX_WORD_LENGTH = 26, ++ MIN_HASH_VALUE = 4, ++ MAX_HASH_VALUE = 36, ++ HASH_VALUE_RANGE = 33, ++ DUPLICATES = 4 ++ }; ++ ++ static const class TAO_operation_db_entry wordlist[] = ++ { ++ {"",0},{"",0},{"",0},{"",0}, ++ {"move", &POA_IR::EventDef::move_skel}, ++ {"_is_a", &POA_IR::EventDef::_is_a_skel}, ++ {"_get_id", &POA_IR::EventDef::_get_id_skel}, ++ {"_set_id", &POA_IR::EventDef::_set_id_skel}, ++ {"describe", &POA_IR::EventDef::describe_skel}, ++ {"_get_name", &POA_IR::EventDef::_get_name_skel}, ++ {"_set_name", &POA_IR::EventDef::_set_name_skel}, ++ {"_get_version", &POA_IR::EventDef::_get_version_skel}, ++ {"_set_version", &POA_IR::EventDef::_set_version_skel}, ++ {"_get_def_kind", &POA_IR::EventDef::_get_def_kind_skel}, ++ {"is_a", &POA_IR::EventDef::is_a_skel}, ++ {"_get_defined_in", &POA_IR::EventDef::_get_defined_in_skel}, ++ {"destroy", &POA_IR::EventDef::destroy_skel}, ++ {"_get_absolute_name", &POA_IR::EventDef::_get_absolute_name_skel}, ++ {"_get_event", &POA_IR::EventDef::_get_event_skel}, ++ {"_non_existent", &POA_IR::EventDef::_non_existent_skel}, ++ {"_get_containing_repository", &POA_IR::EventDef::_get_containing_repository_skel}, ++ }; ++ ++ static const signed char lookup[] = ++ { ++ -6, -2, -9, -2, 4, 5, -1, -43, 8, -43, -11, -2, -38, 13, ++ 14, 15, -1, 16, 17, -1, 18, -1, -1, 19, -1, -1, -1, -1, ++ -1, -1, -1, -1, -1, -1, -1, -1, 20, ++ }; ++ ++ if (len <= MAX_WORD_LENGTH && len >= MIN_WORD_LENGTH) ++ { ++ unsigned int key = hash (str, len); ++ ++ if (key <= MAX_HASH_VALUE && key >= MIN_HASH_VALUE) ++ { ++ int slot = lookup[key]; ++ ++ if (slot >= 0 && slot < MAX_HASH_VALUE) ++ { ++ const char *s = wordlist[slot].opname_; ++ ++ if (*str == *s && !strncmp (str + 1, s + 1, len - 1)) ++ return &wordlist[slot]; ++ } ++ else if (slot < 0 && slot >= -MAX_HASH_VALUE) ++ return 0; ++ else ++ { ++ unsigned int offset = key + slot + (slot > 0 ? -MAX_HASH_VALUE : MAX_HASH_VALUE); ++ const class TAO_operation_db_entry *base = &wordlist[-lookup[offset]]; ++ const class TAO_operation_db_entry *ptr = base + -lookup[offset + 1]; ++ ++ while (--ptr >= base) ++ if (*str == *ptr->opname_ && !strncmp (str + 1, ptr->opname_ + 1, len - 1)) ++ return ptr; ++ } ++ } ++ } ++ return 0; } ++/* ending time is 11:23:11 */ ++static TAO_IR_EventDef_Perfect_Hash_OpTable tao_IR_EventDef_optable; - #endif /* TAO_HAS_INTERCEPTORS */ +-IR::EmitsDefSeq * POA_IR::_TAO_ComponentDef_ThruPOA_Proxy_Impl::emits_events ( +- CORBA_Object *_collocated_tao_target_, +- CORBA::Environment &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) ++/////////////////////////////////////////////////////////////////////// ++// Strategized Proxy Broker Implementation ++// + - class TAO_IR_EventDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable ++// Factory function Implementation. ++POA_IR::_TAO_EventDef_Strategized_Proxy_Broker *POA_IR::_TAO_EventDef_Strategized_Proxy_Broker::the_TAO_EventDef_Strategized_Proxy_Broker (void) { - private: -@@ -37102,7 +36962,7 @@ - public: - const TAO_operation_db_entry * lookup (const char *str, unsigned int len); - }; --/* starting time is 18:47:29 */ -+/* starting time is 11:23:11 */ - /* C++ code produced by gperf version 2.8 (ACE version) */ - /* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_EventDef_Perfect_Hash_OpTable -N lookup */ - unsigned int -@@ -37230,10 +37090,9 @@ - } - return 0; +- IR::EmitsDefSeq_var _tao_retval; +- ACE_UNUSED_ARG (_tao_retval); +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "emits_events", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK_RETURN (0); +- return ACE_reinterpret_cast ( +- POA_IR::ComponentDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/ComponentDef:1.0" +- ) +- )->emits_events ( +- ACE_TRY_ENV +- ); ++ static POA_IR::_TAO_EventDef_Strategized_Proxy_Broker strategized_proxy_broker; ++ return &strategized_proxy_broker; } --/* ending time is 18:47:29 */ -+/* ending time is 11:23:11 */ - static TAO_IR_EventDef_Perfect_Hash_OpTable tao_IR_EventDef_optable; -- - /////////////////////////////////////////////////////////////////////// - // Strategized Proxy Broker Implementation - // -@@ -37259,9 +37118,9 @@ - +-IR::PublishesDefSeq * POA_IR::_TAO_ComponentDef_ThruPOA_Proxy_Impl::publishes_events ( +- CORBA_Object *_collocated_tao_target_, +- CORBA::Environment &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) ++POA_IR::_TAO_EventDef_Strategized_Proxy_Broker::_TAO_EventDef_Strategized_Proxy_Broker (void) + { +- IR::PublishesDefSeq_var _tao_retval; +- ACE_UNUSED_ARG (_tao_retval); +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "publishes_events", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK_RETURN (0); +- return ACE_reinterpret_cast ( +- POA_IR::ComponentDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/ComponentDef:1.0" +- ) +- )->publishes_events ( +- ACE_TRY_ENV +- ); ++ for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) ++ this->proxy_cache_[i] = 0; ++ } --IR::_TAO_EventDef_Proxy_Impl& +-IR::ConsumesDefSeq * POA_IR::_TAO_ComponentDef_ThruPOA_Proxy_Impl::consumes_events ( +- CORBA_Object *_collocated_tao_target_, +- CORBA::Environment &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) ++POA_IR::_TAO_EventDef_Strategized_Proxy_Broker::~_TAO_EventDef_Strategized_Proxy_Broker (void) + { +- IR::ConsumesDefSeq_var _tao_retval; +- ACE_UNUSED_ARG (_tao_retval); +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "consumes_events", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK_RETURN (0); +- return ACE_reinterpret_cast ( +- POA_IR::ComponentDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/ComponentDef:1.0" +- ) +- )->consumes_events ( +- ACE_TRY_ENV +- ); ++ for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) ++ delete this->proxy_cache_[i]; ++ + } + +-CORBA::Boolean POA_IR::_TAO_ComponentDef_ThruPOA_Proxy_Impl::is_basic ( +- CORBA_Object *_collocated_tao_target_, +_TAO_EventDef_Proxy_Impl& - POA_IR::_TAO_EventDef_Strategized_Proxy_Broker::select_proxy ( -- ::IR::EventDef *object, ++POA_IR::_TAO_EventDef_Strategized_Proxy_Broker::select_proxy ( + IR_EventDef *object, CORBA::Environment &ACE_TRY_ENV ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) + { +- CORBA::Boolean _tao_retval = 0; +- ACE_UNUSED_ARG (_tao_retval); +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "is_basic", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK_RETURN (_tao_retval); +- return ACE_reinterpret_cast ( +- POA_IR::ComponentDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/ComponentDef:1.0" +- ) +- )->is_basic ( +- ACE_TRY_ENV +- ); ++ TAO_ORB_Core::TAO_Collocation_Strategies strategy = ++ TAO_ORB_Core::collocation_strategy (object); ++ ++ if (this->proxy_cache_[strategy] != 0) ++ return *this->proxy_cache_[strategy]; ++ ++ this->create_proxy (strategy, ACE_TRY_ENV); ++ ACE_CHECK_RETURN (*this->proxy_cache_[strategy]); ++ ++ return *this->proxy_cache_[strategy]; ++ + } + +-IR::ProvidesDef_ptr POA_IR::_TAO_ComponentDef_ThruPOA_Proxy_Impl::create_provides ( +- CORBA_Object *_collocated_tao_target_, +- const char * id, +- const char * name, +- const char * version, +- IR::InterfaceDef_ptr interface_type, ++void ++POA_IR::_TAO_EventDef_Strategized_Proxy_Broker::create_proxy ( ++ TAO_ORB_Core::TAO_Collocation_Strategies strategy, + CORBA::Environment &ACE_TRY_ENV + ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) { -@@ -37293,7 +37152,7 @@ - case TAO_ORB_Core::THRU_POA_STRATEGY: - ACE_NEW_THROW_EX ( - this->proxy_cache_[strategy], -- POA_IR::_TAO_EventDef_ThruPOA_Proxy_Impl, +- IR::ProvidesDef_var _tao_retval; +- ACE_UNUSED_ARG (_tao_retval); +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "create_provides", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK_RETURN (0); +- return ACE_reinterpret_cast ( +- POA_IR::ComponentDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/ComponentDef:1.0" +- ) +- )->create_provides ( +- id, +- name, +- version, +- interface_type, +- ACE_TRY_ENV +- ); ++ ACE_GUARD (TAO_SYNCH_MUTEX, guard, this->mutex_); ++ ++ if (this->proxy_cache_[strategy] == 0) ++ { ++ switch (strategy) ++ { ++ case TAO_ORB_Core::THRU_POA_STRATEGY: ++ ACE_NEW_THROW_EX ( ++ this->proxy_cache_[strategy], + _TAO_EventDef_ThruPOA_Proxy_Impl, - CORBA::NO_MEMORY () - ); - ACE_CHECK; -@@ -37303,7 +37162,7 @@ - default: - ACE_NEW_THROW_EX ( - this->proxy_cache_[strategy], -- ::IR::_TAO_EventDef_Remote_Proxy_Impl, ++ CORBA::NO_MEMORY () ++ ); ++ ACE_CHECK; ++ break; ++ ++ case TAO_ORB_Core::REMOTE_STRATEGY: ++ default: ++ ACE_NEW_THROW_EX ( ++ this->proxy_cache_[strategy], + _TAO_EventDef_Remote_Proxy_Impl, - CORBA::NO_MEMORY () - ); - ACE_CHECK; -@@ -37320,26 +37179,26 @@ - /////////////////////////////////////////////////////////////////////// - ++ CORBA::NO_MEMORY () ++ ); ++ ACE_CHECK; ++ break; ++ ++ } ++ ++ } + } --IR::_TAO_EventDef_Proxy_Broker * --IR__TAO_EventDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) +-IR::UsesDef_ptr POA_IR::_TAO_ComponentDef_ThruPOA_Proxy_Impl::create_uses ( +- CORBA_Object *_collocated_tao_target_, +- const char * id, +- const char * name, +- const char * version, +- IR::InterfaceDef_ptr interface_type, +- CORBA::Boolean is_multiple, +- CORBA::Environment &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) +-{ +- IR::UsesDef_var _tao_retval; +- ACE_UNUSED_ARG (_tao_retval); +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "create_uses", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK_RETURN (0); +- return ACE_reinterpret_cast ( +- POA_IR::ComponentDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/ComponentDef:1.0" +- ) +- )->create_uses ( +- id, +- name, +- version, +- interface_type, +- is_multiple, +- ACE_TRY_ENV +- ); ++ ++// ++// End Strategized Proxy Broker Implementation ++/////////////////////////////////////////////////////////////////////// ++ ++ +_TAO_EventDef_Proxy_Broker * +_TAO_EventDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) - { - ACE_UNUSED_ARG (obj); - return ::POA_IR::_TAO_EventDef_Strategized_Proxy_Broker::the_TAO_EventDef_Strategized_Proxy_Broker(); ++{ ++ ACE_UNUSED_ARG (obj); ++ return ::POA_IR::_TAO_EventDef_Strategized_Proxy_Broker::the_TAO_EventDef_Strategized_Proxy_Broker(); } - int --IR__TAO_EventDef_Proxy_Broker_Factory_Initializer (long _dummy_) +-IR::EmitsDef_ptr POA_IR::_TAO_ComponentDef_ThruPOA_Proxy_Impl::create_emits ( +- CORBA_Object *_collocated_tao_target_, +- const char * id, +- const char * name, +- const char * version, +- IR::ValueDef_ptr value, +- CORBA::Environment &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) ++int +_TAO_EventDef_Proxy_Broker_Factory_Initializer (long _dummy_) { - ACE_UNUSED_ARG (_dummy_); - -- IR__TAO_EventDef_Proxy_Broker_Factory_function_pointer = -- IR__TAO_EventDef_Proxy_Broker_Factory_function; +- IR::EmitsDef_var _tao_retval; +- ACE_UNUSED_ARG (_tao_retval); +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "create_emits", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK_RETURN (0); +- return ACE_reinterpret_cast ( +- POA_IR::ComponentDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/ComponentDef:1.0" +- ) +- )->create_emits ( +- id, +- name, +- version, +- value, +- ACE_TRY_ENV +- ); ++ ACE_UNUSED_ARG (_dummy_); ++ + _TAO_EventDef_Proxy_Broker_Factory_function_pointer = + _TAO_EventDef_Proxy_Broker_Factory_function; - - return 0; ++ ++ return 0; } --static int IR__TAO_EventDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = -- IR__TAO_EventDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, IR__TAO_EventDef_Proxy_Broker_Factory_Initializer)); +-IR::PublishesDef_ptr POA_IR::_TAO_ComponentDef_ThruPOA_Proxy_Impl::create_publishes ( +static int _TAO_EventDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = + _TAO_EventDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, _TAO_EventDef_Proxy_Broker_Factory_Initializer)); - - - /////////////////////////////////////////////////////////////////////// -@@ -37384,7 +37243,7 @@ ++ ++ ++/////////////////////////////////////////////////////////////////////// ++// ThruPOA Proxy Implementation ++// ++ ++POA_IR::_TAO_EventDef_ThruPOA_Proxy_Impl::_TAO_EventDef_ThruPOA_Proxy_Impl (void) ++{} ++ ++POA_IR::_TAO_EventDef_ThruPOA_Proxy_Impl::~_TAO_EventDef_ThruPOA_Proxy_Impl (void) ++{} ++ ++// ThruPOA Implementation of the IDL interface methods ++ ++CORBA::Boolean POA_IR::_TAO_EventDef_ThruPOA_Proxy_Impl::is_a ( + CORBA_Object *_collocated_tao_target_, +- const char * id, +- const char * name, +- const char * version, +- IR::ValueDef_ptr value, ++ const char * event_id, + CORBA::Environment &ACE_TRY_ENV + ) + ACE_THROW_SPEC (( + CORBA::SystemException + )) + { +- IR::PublishesDef_var _tao_retval; ++ CORBA::Boolean _tao_retval = 0; + ACE_UNUSED_ARG (_tao_retval); + TAO_Object_Adapter::Servant_Upcall servant_upcall ( + _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +@@ -39763,38 +19473,31 @@ + CORBA::Object_var forward_to; + servant_upcall.prepare_for_upcall ( + _collocated_tao_target_->_object_key (), +- "create_publishes", ++ "is_a", + forward_to.out (), + ACE_TRY_ENV + ); +- ACE_CHECK_RETURN (0); ++ ACE_CHECK_RETURN (_tao_retval); + return ACE_reinterpret_cast ( +- POA_IR::ComponentDef_ptr, ++ POA_IR::EventDef_ptr, + servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/ComponentDef:1.0" ++ "IDL:omg.org/IR/EventDef:1.0" + ) +- )->create_publishes ( +- id, +- name, +- version, +- value, ++ )->is_a ( ++ event_id, + ACE_TRY_ENV ); } --IR::ValueDef_ptr POA_IR::_TAO_EventDef_ThruPOA_Proxy_Impl::event ( -+IR_ValueDef_ptr POA_IR::_TAO_EventDef_ThruPOA_Proxy_Impl::event ( +-IR::ConsumesDef_ptr POA_IR::_TAO_ComponentDef_ThruPOA_Proxy_Impl::create_consumes ( ++IR::ValueDef_ptr POA_IR::_TAO_EventDef_ThruPOA_Proxy_Impl::event ( CORBA_Object *_collocated_tao_target_, +- const char * id, +- const char * name, +- const char * version, +- IR::ValueDef_ptr value, CORBA::Environment &ACE_TRY_ENV ) -@@ -37392,7 +37251,7 @@ + ACE_THROW_SPEC (( CORBA::SystemException )) { -- IR::ValueDef_var _tao_retval; +- IR::ConsumesDef_var _tao_retval; + IR_ValueDef_var _tao_retval; ACE_UNUSED_ARG (_tao_retval); TAO_Object_Adapter::Servant_Upcall servant_upcall ( _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -37428,7 +37287,7 @@ - // copy ctor - POA_IR::EventDef::EventDef (const EventDef& rhs) - : ACE_NESTED_CLASS (POA_IR,Contained) (rhs), +@@ -39802,21 +19505,17 @@ + CORBA::Object_var forward_to; + servant_upcall.prepare_for_upcall ( + _collocated_tao_target_->_object_key (), +- "create_consumes", ++ "event", + forward_to.out (), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + return ACE_reinterpret_cast ( +- POA_IR::ComponentDef_ptr, ++ POA_IR::EventDef_ptr, + servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/ComponentDef:1.0" ++ "IDL:omg.org/IR/EventDef:1.0" + ) +- )->create_consumes ( +- id, +- name, +- version, +- value, ++ )->event ( + ACE_TRY_ENV + ); + } +@@ -39826,1291 +19525,507 @@ + /////////////////////////////////////////////////////////////////////// + + // skeleton constructor +-POA_IR::ComponentDef::ComponentDef (void) +-{ +- this->optable_ = &tao_IR_ComponentDef_optable; +-} +- +-// copy ctor +-POA_IR::ComponentDef::ComponentDef (const ComponentDef& rhs) +- : ACE_NESTED_CLASS (POA_IR,InterfaceDef) (rhs), +- ACE_NESTED_CLASS (POA_IR,Container) (rhs), +- ACE_NESTED_CLASS (POA_IR,Contained) (rhs), +- ACE_NESTED_CLASS (POA_IR,IDLType) (rhs), - ACE_NESTED_CLASS (POA_CORBA,IRObject) (rhs), +- TAO_ServantBase (rhs) +-{} +- +-// skeleton destructor +-POA_IR::ComponentDef::~ComponentDef (void) +-{ +-} +- +-void POA_IR::ComponentDef::_get_supported_interfaces_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- POA_IR::ComponentDef *_tao_impl = (POA_IR::ComponentDef *)_tao_object_reference; +- +- IR::InterfaceDefSeq_var _tao_retval; +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_supported_interfaces_get ri ( +- _tao_server_request, +- _tao_impl +- , +- ACE_TRY_ENV +- ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->supported_interfaces ( +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::InterfaceDefSeq * _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << _tao_retval.in ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- +-} +- +-void POA_IR::ComponentDef::_set_supported_interfaces_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::ComponentDef *_tao_impl = (POA_IR::ComponentDef *)_tao_object_reference; +- +-_tao_server_request.argument_flag (0); +- IR::InterfaceDefSeq supported_interfaces; +- if (!( +- (_tao_in >> supported_interfaces) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_supported_interfaces_set ri ( +- _tao_server_request, +- _tao_impl +- , +- supported_interfaces, +- ACE_TRY_ENV +- ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- +- _tao_impl->supported_interfaces ( +- supported_interfaces, +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +-} +- +-void POA_IR::ComponentDef::_get_base_component_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- POA_IR::ComponentDef *_tao_impl = (POA_IR::ComponentDef *)_tao_object_reference; +- +- IR::ComponentDef_var _tao_retval; +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_base_component_get ri ( +- _tao_server_request, +- _tao_impl +- , +- ACE_TRY_ENV +- ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->base_component ( +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::ComponentDef_ptr _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << _tao_retval.in ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- +-} +- +-void POA_IR::ComponentDef::_get_provides_interfaces_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- POA_IR::ComponentDef *_tao_impl = (POA_IR::ComponentDef *)_tao_object_reference; +- +- IR::ProvidesDefSeq_var _tao_retval; +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_provides_interfaces_get ri ( +- _tao_server_request, +- _tao_impl +- , +- ACE_TRY_ENV +- ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->provides_interfaces ( +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::ProvidesDefSeq * _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << _tao_retval.in ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- +-} +- +-void POA_IR::ComponentDef::_get_uses_interfaces_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- POA_IR::ComponentDef *_tao_impl = (POA_IR::ComponentDef *)_tao_object_reference; +- +- IR::UsesDefSeq_var _tao_retval; +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_uses_interfaces_get ri ( +- _tao_server_request, +- _tao_impl +- , +- ACE_TRY_ENV +- ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->uses_interfaces ( +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::UsesDefSeq * _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << _tao_retval.in ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); ++POA_IR::EventDef::EventDef (void) ++{ ++ this->optable_ = &tao_IR_EventDef_optable; ++} ++ ++// copy ctor ++POA_IR::EventDef::EventDef (const EventDef& rhs) ++ : ACE_NESTED_CLASS (POA_IR,Contained) (rhs), + POA_CORBA_IRObject (rhs), - TAO_ServantBase (rhs) - {} ++ TAO_ServantBase (rhs) ++{} -@@ -37454,7 +37313,6 @@ - )) - ACE_THROW (CORBA::MARSHAL()); ++// skeleton destructor ++POA_IR::EventDef::~EventDef (void) ++{ + } +-void POA_IR::ComponentDef::_get_emits_events_skel ( ++void POA_IR::EventDef::is_a_skel ( + TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, ++ void *_tao_object_reference, ++ void * /* context */, + CORBA::Environment &ACE_TRY_ENV +- ) ++) + { +- POA_IR::ComponentDef *_tao_impl = (POA_IR::ComponentDef *)_tao_object_reference; ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::EventDef *_tao_impl = (POA_IR::EventDef *)_tao_object_reference; + +- IR::EmitsDefSeq_var _tao_retval; ++ CORBA::Boolean _tao_retval = 0; ++ CORBA::String_var event_id; ++ if (!( ++ (_tao_in >> event_id.out ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_emits_events_get ri ( +- _tao_server_request, +- _tao_impl +- , ++ _tao_retval = _tao_impl->is_a ( ++ event_id.in (), + ACE_TRY_ENV + ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->emits_events ( +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::EmitsDefSeq * _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; ++ + ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); ++ ++ _tao_server_request.init_reply (); + TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); + if (!( +- (_tao_out << _tao_retval.in ()) ++ (_tao_out << CORBA::Any::from_boolean (_tao_retval)) + )) +- ACE_THROW (CORBA::MARSHAL()); - - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( - _tao_server_request.orb_core ()->server_request_interceptors (), -@@ -37534,7 +37392,7 @@ ++ ACE_THROW (CORBA::MARSHAL () ); + } + +-void POA_IR::ComponentDef::_get_publishes_events_skel ( ++void POA_IR::EventDef::_get_event_skel ( + TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, ++ void *_tao_object_reference, ++ void * /* context */, + CORBA::Environment &ACE_TRY_ENV +- ) ++) { - POA_IR::EventDef *_tao_impl = (POA_IR::EventDef *)_tao_object_reference; - -- IR::ValueDef_var _tao_retval; +- POA_IR::ComponentDef *_tao_impl = (POA_IR::ComponentDef *)_tao_object_reference; ++ POA_IR::EventDef *_tao_impl = (POA_IR::EventDef *)_tao_object_reference; + +- IR::PublishesDefSeq_var _tao_retval; + IR_ValueDef_var _tao_retval; - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( -@@ -37561,7 +37419,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::ValueDef_ptr _tao_retval_info = _tao_retval._retn (); -+ IR_ValueDef_ptr _tao_retval_info = _tao_retval._retn (); - ri.result (_tao_retval_info); - _tao_retval = _tao_retval_info; - ri.reply_status (PortableInterceptor::SUCCESSFUL); -@@ -37616,7 +37474,7 @@ - POA_IR::EventDef *_tao_impl = (POA_IR::EventDef *) _tao_object_reference; - CORBA::Boolean _tao_retval = 0; - CORBA::String_var value; -- if (!(_tao_in >> value.out ())) -+ if (!((_tao_in >> value.out ()))) - ACE_THROW (CORBA::MARSHAL ()); - - _tao_retval = _tao_impl->_is_a (value.in (), ACE_TRY_ENV); -@@ -37624,7 +37482,7 @@ - - _tao_server_request.init_reply (); +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_publishes_events_get ri ( +- _tao_server_request, +- _tao_impl +- , ++ _tao_retval = _tao_impl->event ( + ACE_TRY_ENV + ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->publishes_events ( +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::PublishesDefSeq * _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; ++ + ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); ++ ++ _tao_server_request.init_reply (); TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); -- if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) -+ if (!((_tao_out << CORBA::Any::from_boolean (_tao_retval)))) - ACE_THROW (CORBA::MARSHAL ()); + if (!( + (_tao_out << _tao_retval.in ()) + )) +- ACE_THROW (CORBA::MARSHAL()); +- ++ ACE_THROW (CORBA::MARSHAL () ); } -@@ -37641,7 +37499,7 @@ - - _tao_server_request.init_reply (); - TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); -- if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) -+ if (!((_tao_out << CORBA::Any::from_boolean (_tao_retval)))) - ACE_THROW (CORBA::MARSHAL ()); - } +-void POA_IR::ComponentDef::_get_consumes_events_skel ( ++void POA_IR::EventDef::_is_a_skel ( + TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, ++ void * _tao_object_reference, ++ void * /* context */, + CORBA::Environment &ACE_TRY_ENV + ) + { +- POA_IR::ComponentDef *_tao_impl = (POA_IR::ComponentDef *)_tao_object_reference; +- +- IR::ConsumesDefSeq_var _tao_retval; ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::EventDef *_tao_impl = (POA_IR::EventDef *) _tao_object_reference; ++ CORBA::Boolean _tao_retval = 0; ++ CORBA::String_var value; ++ if (!((_tao_in >> value.out ()))) ++ ACE_THROW (CORBA::MARSHAL ()); -@@ -37669,7 +37527,7 @@ - if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Contained:1.0") == 0) - return ACE_static_cast (POA_IR::Contained_ptr, this); - if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/IRObject:1.0") == 0) -- return ACE_static_cast (POA_CORBA::IRObject_ptr, this); -+ return ACE_static_cast (POA_CORBA_IRObject_ptr, this); - if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/Object:1.0") == 0) - return ACE_static_cast(PortableServer::Servant, this); - return 0; -@@ -37699,10 +37557,9 @@ - ACE_NEW_RETURN (tmp, CORBA::Object (stub, 0, this), 0); - - CORBA::Object_var obj = tmp; -- return ::IR::EventDef::_unchecked_narrow (obj.in ()); -+ return IR_EventDef::_unchecked_narrow (obj.in ()); +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_consumes_events_get ri ( +- _tao_server_request, +- _tao_impl +- , +- ACE_TRY_ENV +- ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->consumes_events ( +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::ConsumesDefSeq * _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; ++ _tao_retval = _tao_impl->_is_a (value.in (), ACE_TRY_ENV); + ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << _tao_retval.in ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); + ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!((_tao_out << CORBA::Any::from_boolean (_tao_retval)))) ++ ACE_THROW (CORBA::MARSHAL ()); } -- - #if (TAO_HAS_INTERCEPTORS == 1) - POA_IR::EventDef::TAO_ServerRequestInfo_IR_EventDef_is_a::TAO_ServerRequestInfo_IR_EventDef_is_a ( +-void POA_IR::ComponentDef::_get_is_basic_skel ( ++void POA_IR::EventDef::_non_existent_skel ( TAO_ServerRequest &_tao_server_request, -@@ -37864,6 +37721,7 @@ +- void *_tao_object_reference, +- void * /* context */, ++ void * _tao_object_reference, ++ void * /* context */, + CORBA::Environment &ACE_TRY_ENV + ) + { +- POA_IR::ComponentDef *_tao_impl = (POA_IR::ComponentDef *)_tao_object_reference; +- +- CORBA::Boolean _tao_retval = 0; +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_is_basic_get ri ( +- _tao_server_request, +- _tao_impl +- , +- ACE_TRY_ENV +- ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->is_basic ( +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- CORBA::Boolean _tao_retval_info = _tao_retval; +- ri.result (_tao_retval_info); +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; ++ POA_IR::EventDef *_tao_impl = (POA_IR::EventDef *) _tao_object_reference; ++ CORBA::Boolean _tao_retval = _tao_impl->_non_existent (ACE_TRY_ENV); + ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << CORBA::Any::from_boolean (_tao_retval)) +- )) +- ACE_THROW (CORBA::MARSHAL()); + ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!((_tao_out << CORBA::Any::from_boolean (_tao_retval)))) ++ ACE_THROW (CORBA::MARSHAL ()); } - #endif /* TAO_HAS_INTERCEPTORS */ -+ - class TAO_IR_EmitsDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable +-void POA_IR::ComponentDef::create_provides_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, ++CORBA::Boolean POA_IR::EventDef::_is_a ( ++ const char* value, + CORBA::Environment &ACE_TRY_ENV + ) { - private: -@@ -37871,7 +37729,7 @@ - public: - const TAO_operation_db_entry * lookup (const char *str, unsigned int len); - }; --/* starting time is 18:47:29 */ +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::ComponentDef *_tao_impl = (POA_IR::ComponentDef *)_tao_object_reference; ++ if ( ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/EventDef:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/Contained:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/CORBA/IRObject:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, CORBA::_tc_Object->id (ACE_TRY_ENV)))) ++ return 1; ++ else ++ return 0; ++} + +- IR::ProvidesDef_var _tao_retval; +- CORBA::String_var id; +- CORBA::String_var name; +- CORBA::String_var version; +- IR::InterfaceDef_var interface_type; +- if (!( +- (_tao_in >> id.out ()) && +- (_tao_in >> name.out ()) && +- (_tao_in >> version.out ()) && +- (_tao_in >> interface_type.out ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); ++void* POA_IR::EventDef::_downcast ( ++ const char* logical_type_id ++ ) ++{ ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/EventDef:1.0") == 0) ++ return ACE_static_cast (POA_IR::EventDef_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Contained:1.0") == 0) ++ return ACE_static_cast (POA_IR::Contained_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/IRObject:1.0") == 0) ++ return ACE_static_cast (POA_CORBA_IRObject_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/Object:1.0") == 0) ++ return ACE_static_cast(PortableServer::Servant, this); ++ return 0; ++} + ++void POA_IR::EventDef::_dispatch (TAO_ServerRequest &req, void *context, CORBA::Environment &ACE_TRY_ENV) ++{ ++ this->synchronous_upcall_dispatch(req, context, this, ACE_TRY_ENV); ++} + +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); ++const char* POA_IR::EventDef::_interface_repository_id (void) const ++{ ++ return "IDL:omg.org/IR/EventDef:1.0"; ++} ++ ++IR::EventDef* ++POA_IR::EventDef::_this (CORBA_Environment &ACE_TRY_ENV) ++{ ++ TAO_Stub *stub = this->_create_stub (ACE_TRY_ENV); ++ ACE_CHECK_RETURN (0); + +- POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_create_provides ri ( +- _tao_server_request, +- _tao_impl +- , +- id.in (), +- name.in (), +- version.in (), +- interface_type.in (), +- ACE_TRY_ENV +- ); ++ CORBA::Object_ptr tmp = CORBA::Object::_nil (); + +- ACE_TRY ++ if (stub->servant_orb_var ()->orb_core ()->optimize_collocation_objects ()) ++ ACE_NEW_RETURN (tmp, CORBA::Object (stub, 1, this), 0); ++ else ++ ACE_NEW_RETURN (tmp, CORBA::Object (stub, 0, this), 0); ++ ++ CORBA::Object_var obj = tmp; ++ return IR_EventDef::_unchecked_narrow (obj.in ()); ++} ++ ++class TAO_IR_EmitsDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable ++{ ++private: ++ unsigned int hash (const char *str, unsigned int len); ++public: ++ const TAO_operation_db_entry * lookup (const char *str, unsigned int len); ++}; +/* starting time is 11:23:11 */ - /* C++ code produced by gperf version 2.8 (ACE version) */ - /* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_EmitsDef_Perfect_Hash_OpTable -N lookup */ - unsigned int -@@ -37999,10 +37857,9 @@ ++/* C++ code produced by gperf version 2.8 (ACE version) */ ++/* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_EmitsDef_Perfect_Hash_OpTable -N lookup */ ++unsigned int ++TAO_IR_EmitsDef_Perfect_Hash_OpTable::hash (const char *str, unsigned int len) ++{ ++ static const unsigned char asso_values[] = + { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->create_provides ( +- id.in (), +- name.in (), +- version.in (), +- interface_type.in (), +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::ProvidesDef_ptr _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) ++#if defined (ACE_MVS) ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 0, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 0, ++ 37, 37, 0, 0, 37, 37, 37, 10, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 0, 0, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 10, 37, 37, 37, 37, 10, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, ++#else ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 0, 37, 0, 37, 37, ++ 0, 0, 37, 37, 37, 10, 37, 37, 37, 0, ++ 0, 37, 37, 37, 37, 37, 10, 37, 37, 37, ++ 37, 10, 37, 37, 37, 37, 37, 37, ++#endif /* ACE_MVS */ ++ }; ++ return len + asso_values[str[len - 1]] + asso_values[str[0]]; ++} ++ ++const class TAO_operation_db_entry * ++TAO_IR_EmitsDef_Perfect_Hash_OpTable::lookup (const char *str, unsigned int len) ++{ ++ enum ++ { ++ TOTAL_KEYWORDS = 17, ++ MIN_WORD_LENGTH = 4, ++ MAX_WORD_LENGTH = 26, ++ MIN_HASH_VALUE = 4, ++ MAX_HASH_VALUE = 36, ++ HASH_VALUE_RANGE = 33, ++ DUPLICATES = 4 ++ }; ++ ++ static const class TAO_operation_db_entry wordlist[] = + { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY ++ {"",0},{"",0},{"",0},{"",0}, ++ {"move", &POA_IR::EmitsDef::move_skel}, ++ {"_is_a", &POA_IR::EmitsDef::_is_a_skel}, ++ {"_get_id", &POA_IR::EmitsDef::_get_id_skel}, ++ {"_set_id", &POA_IR::EmitsDef::_set_id_skel}, ++ {"describe", &POA_IR::EmitsDef::describe_skel}, ++ {"_get_name", &POA_IR::EmitsDef::_get_name_skel}, ++ {"_set_name", &POA_IR::EmitsDef::_set_name_skel}, ++ {"_get_version", &POA_IR::EmitsDef::_get_version_skel}, ++ {"_set_version", &POA_IR::EmitsDef::_set_version_skel}, ++ {"_get_def_kind", &POA_IR::EmitsDef::_get_def_kind_skel}, ++ {"is_a", &POA_IR::EmitsDef::is_a_skel}, ++ {"_get_defined_in", &POA_IR::EmitsDef::_get_defined_in_skel}, ++ {"destroy", &POA_IR::EmitsDef::destroy_skel}, ++ {"_get_absolute_name", &POA_IR::EmitsDef::_get_absolute_name_skel}, ++ {"_get_event", &POA_IR::EmitsDef::_get_event_skel}, ++ {"_non_existent", &POA_IR::EmitsDef::_non_existent_skel}, ++ {"_get_containing_repository", &POA_IR::EmitsDef::_get_containing_repository_skel}, ++ }; ++ ++ static const signed char lookup[] = + { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << _tao_retval.in ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); ++ -6, -2, -9, -2, 4, 5, -1, -43, 8, -43, -11, -2, -38, 13, ++ 14, 15, -1, 16, 17, -1, 18, -1, -1, 19, -1, -1, -1, -1, ++ -1, -1, -1, -1, -1, -1, -1, -1, 20, ++ }; + +-} ++ if (len <= MAX_WORD_LENGTH && len >= MIN_WORD_LENGTH) ++ { ++ unsigned int key = hash (str, len); + +-void POA_IR::ComponentDef::create_uses_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::ComponentDef *_tao_impl = (POA_IR::ComponentDef *)_tao_object_reference; ++ if (key <= MAX_HASH_VALUE && key >= MIN_HASH_VALUE) ++ { ++ int slot = lookup[key]; + +- IR::UsesDef_var _tao_retval; +- CORBA::String_var id; +- CORBA::String_var name; +- CORBA::String_var version; +- IR::InterfaceDef_var interface_type; +- CORBA::Boolean is_multiple; +- if (!( +- (_tao_in >> id.out ()) && +- (_tao_in >> name.out ()) && +- (_tao_in >> version.out ()) && +- (_tao_in >> interface_type.out ()) && +- (_tao_in >> CORBA::Any::to_boolean (is_multiple)) +- )) +- ACE_THROW (CORBA::MARSHAL()); ++ if (slot >= 0 && slot < MAX_HASH_VALUE) ++ { ++ const char *s = wordlist[slot].opname_; + ++ if (*str == *s && !strncmp (str + 1, s + 1, len - 1)) ++ return &wordlist[slot]; ++ } ++ else if (slot < 0 && slot >= -MAX_HASH_VALUE) ++ return 0; ++ else ++ { ++ unsigned int offset = key + slot + (slot > 0 ? -MAX_HASH_VALUE : MAX_HASH_VALUE); ++ const class TAO_operation_db_entry *base = &wordlist[-lookup[offset]]; ++ const class TAO_operation_db_entry *ptr = base + -lookup[offset + 1]; + +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_create_uses ri ( +- _tao_server_request, +- _tao_impl +- , +- id.in (), +- name.in (), +- version.in (), +- interface_type.in (), +- is_multiple, +- ACE_TRY_ENV +- ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->create_uses ( +- id.in (), +- name.in (), +- version.in (), +- interface_type.in (), +- is_multiple, +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::UsesDef_ptr _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; ++ while (--ptr >= base) ++ if (*str == *ptr->opname_ && !strncmp (str + 1, ptr->opname_ + 1, len - 1)) ++ return ptr; ++ } ++ } } - return 0; +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << _tao_retval.in ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- ++ return 0; } --/* ending time is 18:47:29 */ +/* ending time is 11:23:11 */ - static TAO_IR_EmitsDef_Perfect_Hash_OpTable tao_IR_EmitsDef_optable; - ++static TAO_IR_EmitsDef_Perfect_Hash_OpTable tao_IR_EmitsDef_optable; + +-void POA_IR::ComponentDef::create_emits_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::ComponentDef *_tao_impl = (POA_IR::ComponentDef *)_tao_object_reference; - - /////////////////////////////////////////////////////////////////////// - // Strategized Proxy Broker Implementation - // -@@ -38028,9 +37885,9 @@ - - } - --IR::_TAO_EmitsDef_Proxy_Impl& +- IR::EmitsDef_var _tao_retval; +- CORBA::String_var id; +- CORBA::String_var name; +- CORBA::String_var version; +- IR::ValueDef_var value; +- if (!( +- (_tao_in >> id.out ()) && +- (_tao_in >> name.out ()) && +- (_tao_in >> version.out ()) && +- (_tao_in >> value.out ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); ++/////////////////////////////////////////////////////////////////////// ++// Strategized Proxy Broker Implementation ++// + ++// Factory function Implementation. ++POA_IR::_TAO_EmitsDef_Strategized_Proxy_Broker *POA_IR::_TAO_EmitsDef_Strategized_Proxy_Broker::the_TAO_EmitsDef_Strategized_Proxy_Broker (void) ++{ ++ static POA_IR::_TAO_EmitsDef_Strategized_Proxy_Broker strategized_proxy_broker; ++ return &strategized_proxy_broker; ++} + +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_create_emits ri ( +- _tao_server_request, +- _tao_impl +- , +- id.in (), +- name.in (), +- version.in (), +- value.in (), +- ACE_TRY_ENV +- ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->create_emits ( +- id.in (), +- name.in (), +- version.in (), +- value.in (), +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::EmitsDef_ptr _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ ++POA_IR::_TAO_EmitsDef_Strategized_Proxy_Broker::_TAO_EmitsDef_Strategized_Proxy_Broker (void) ++{ ++ for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) ++ this->proxy_cache_[i] = 0; + +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << _tao_retval.in ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); ++} + ++POA_IR::_TAO_EmitsDef_Strategized_Proxy_Broker::~_TAO_EmitsDef_Strategized_Proxy_Broker (void) ++{ ++ for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) ++ delete this->proxy_cache_[i]; ++ + } + +-void POA_IR::ComponentDef::create_publishes_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, +_TAO_EmitsDef_Proxy_Impl& - POA_IR::_TAO_EmitsDef_Strategized_Proxy_Broker::select_proxy ( -- ::IR::EmitsDef *object, ++POA_IR::_TAO_EmitsDef_Strategized_Proxy_Broker::select_proxy ( + IR_EmitsDef *object, CORBA::Environment &ACE_TRY_ENV ) { -@@ -38062,7 +37919,7 @@ - case TAO_ORB_Core::THRU_POA_STRATEGY: - ACE_NEW_THROW_EX ( - this->proxy_cache_[strategy], -- POA_IR::_TAO_EmitsDef_ThruPOA_Proxy_Impl, +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::ComponentDef *_tao_impl = (POA_IR::ComponentDef *)_tao_object_reference; +- +- IR::PublishesDef_var _tao_retval; +- CORBA::String_var id; +- CORBA::String_var name; +- CORBA::String_var version; +- IR::ValueDef_var value; +- if (!( +- (_tao_in >> id.out ()) && +- (_tao_in >> name.out ()) && +- (_tao_in >> version.out ()) && +- (_tao_in >> value.out ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); ++ TAO_ORB_Core::TAO_Collocation_Strategies strategy = ++ TAO_ORB_Core::collocation_strategy (object); + +- POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_create_publishes ri ( +- _tao_server_request, +- _tao_impl +- , +- id.in (), +- name.in (), +- version.in (), +- value.in (), +- ACE_TRY_ENV +- ); ++ if (this->proxy_cache_[strategy] != 0) ++ return *this->proxy_cache_[strategy]; + +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->create_publishes ( +- id.in (), +- name.in (), +- version.in (), +- value.in (), +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::PublishesDef_ptr _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ ++ this->create_proxy (strategy, ACE_TRY_ENV); ++ ACE_CHECK_RETURN (*this->proxy_cache_[strategy]); ++ ++ return *this->proxy_cache_[strategy]; + +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << _tao_retval.in ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- + } + +-void POA_IR::ComponentDef::create_consumes_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, ++void ++POA_IR::_TAO_EmitsDef_Strategized_Proxy_Broker::create_proxy ( ++ TAO_ORB_Core::TAO_Collocation_Strategies strategy, + CORBA::Environment &ACE_TRY_ENV + ) + { +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::ComponentDef *_tao_impl = (POA_IR::ComponentDef *)_tao_object_reference; ++ ACE_GUARD (TAO_SYNCH_MUTEX, guard, this->mutex_); ++ ++ if (this->proxy_cache_[strategy] == 0) ++ { ++ switch (strategy) ++ { ++ case TAO_ORB_Core::THRU_POA_STRATEGY: ++ ACE_NEW_THROW_EX ( ++ this->proxy_cache_[strategy], + _TAO_EmitsDef_ThruPOA_Proxy_Impl, - CORBA::NO_MEMORY () - ); - ACE_CHECK; -@@ -38072,7 +37929,7 @@ - default: - ACE_NEW_THROW_EX ( - this->proxy_cache_[strategy], -- ::IR::_TAO_EmitsDef_Remote_Proxy_Impl, ++ CORBA::NO_MEMORY () ++ ); ++ ACE_CHECK; ++ break; ++ ++ case TAO_ORB_Core::REMOTE_STRATEGY: ++ default: ++ ACE_NEW_THROW_EX ( ++ this->proxy_cache_[strategy], + _TAO_EmitsDef_Remote_Proxy_Impl, - CORBA::NO_MEMORY () - ); - ACE_CHECK; -@@ -38089,26 +37946,26 @@ - /////////////////////////////////////////////////////////////////////// - - --IR::_TAO_EmitsDef_Proxy_Broker * --IR__TAO_EmitsDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) ++ CORBA::NO_MEMORY () ++ ); ++ ACE_CHECK; ++ break; ++ ++ } ++ ++ } ++} + +- IR::ConsumesDef_var _tao_retval; +- CORBA::String_var id; +- CORBA::String_var name; +- CORBA::String_var version; +- IR::ValueDef_var value; +- if (!( +- (_tao_in >> id.out ()) && +- (_tao_in >> name.out ()) && +- (_tao_in >> version.out ()) && +- (_tao_in >> value.out ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); + ++// ++// End Strategized Proxy Broker Implementation ++/////////////////////////////////////////////////////////////////////// + +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_create_consumes ri ( +- _tao_server_request, +- _tao_impl +- , +- id.in (), +- name.in (), +- version.in (), +- value.in (), +- ACE_TRY_ENV +- ); ++ +_TAO_EmitsDef_Proxy_Broker * +_TAO_EmitsDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) - { - ACE_UNUSED_ARG (obj); - return ::POA_IR::_TAO_EmitsDef_Strategized_Proxy_Broker::the_TAO_EmitsDef_Strategized_Proxy_Broker(); - } - - int --IR__TAO_EmitsDef_Proxy_Broker_Factory_Initializer (long _dummy_) ++{ ++ ACE_UNUSED_ARG (obj); ++ return ::POA_IR::_TAO_EmitsDef_Strategized_Proxy_Broker::the_TAO_EmitsDef_Strategized_Proxy_Broker(); ++} ++ ++int +_TAO_EmitsDef_Proxy_Broker_Factory_Initializer (long _dummy_) - { - ACE_UNUSED_ARG (_dummy_); - -- IR__TAO_EmitsDef_Proxy_Broker_Factory_function_pointer = -- IR__TAO_EmitsDef_Proxy_Broker_Factory_function; ++{ ++ ACE_UNUSED_ARG (_dummy_); + +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->create_consumes ( +- id.in (), +- name.in (), +- version.in (), +- value.in (), +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::ConsumesDef_ptr _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ + _TAO_EmitsDef_Proxy_Broker_Factory_function_pointer = + _TAO_EmitsDef_Proxy_Broker_Factory_function; - return 0; - } - --static int IR__TAO_EmitsDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = -- IR__TAO_EmitsDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, IR__TAO_EmitsDef_Proxy_Broker_Factory_Initializer)); +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << _tao_retval.in ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); ++ return 0; ++} ++ +static int _TAO_EmitsDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = + _TAO_EmitsDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, _TAO_EmitsDef_Proxy_Broker_Factory_Initializer)); - - - /////////////////////////////////////////////////////////////////////// -@@ -38134,7 +37991,7 @@ - POA_IR::EmitsDef::EmitsDef (const EmitsDef& rhs) - : ACE_NESTED_CLASS (POA_IR,EventDef) (rhs), - ACE_NESTED_CLASS (POA_IR,Contained) (rhs), -- ACE_NESTED_CLASS (POA_CORBA,IRObject) (rhs), ++ ++ ++/////////////////////////////////////////////////////////////////////// ++// ThruPOA Proxy Implementation ++// ++ ++POA_IR::_TAO_EmitsDef_ThruPOA_Proxy_Impl::_TAO_EmitsDef_ThruPOA_Proxy_Impl (void) ++{} ++ ++POA_IR::_TAO_EmitsDef_ThruPOA_Proxy_Impl::~_TAO_EmitsDef_ThruPOA_Proxy_Impl (void) ++{} ++ ++// ThruPOA Implementation of the IDL interface methods ++ ++// ++// End ThruPOA Proxy Implementation ++/////////////////////////////////////////////////////////////////////// + ++// skeleton constructor ++POA_IR::EmitsDef::EmitsDef (void) ++{ ++ this->optable_ = &tao_IR_EmitsDef_optable; + } + +-void POA_IR::ComponentDef::_is_a_skel ( +- TAO_ServerRequest &_tao_server_request, ++// copy ctor ++POA_IR::EmitsDef::EmitsDef (const EmitsDef& rhs) ++ : ACE_NESTED_CLASS (POA_IR,EventDef) (rhs), ++ ACE_NESTED_CLASS (POA_IR,Contained) (rhs), + POA_CORBA_IRObject (rhs), - TAO_ServantBase (rhs) - {} - -@@ -38154,7 +38011,7 @@ - POA_IR::EmitsDef *_tao_impl = (POA_IR::EmitsDef *) _tao_object_reference; ++ TAO_ServantBase (rhs) ++{} ++ ++// skeleton destructor ++POA_IR::EmitsDef::~EmitsDef (void) ++{ ++} ++ ++void POA_IR::EmitsDef::_is_a_skel ( ++ TAO_ServerRequest &_tao_server_request, + void * _tao_object_reference, + void * /* context */, + CORBA::Environment &ACE_TRY_ENV + ) + { + TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::ComponentDef *_tao_impl = (POA_IR::ComponentDef *) _tao_object_reference; ++ POA_IR::EmitsDef *_tao_impl = (POA_IR::EmitsDef *) _tao_object_reference; CORBA::Boolean _tao_retval = 0; CORBA::String_var value; - if (!(_tao_in >> value.out ())) + if (!((_tao_in >> value.out ()))) ACE_THROW (CORBA::MARSHAL ()); - +- ++ _tao_retval = _tao_impl->_is_a (value.in (), ACE_TRY_ENV); -@@ -38162,7 +38019,7 @@ - + ACE_CHECK; +- ++ _tao_server_request.init_reply (); TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); - if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) @@ -8875,8 +50413,21 @@ ACE_THROW (CORBA::MARSHAL ()); } -@@ -38179,7 +38036,7 @@ - +-void POA_IR::ComponentDef::_non_existent_skel ( +- TAO_ServerRequest &_tao_server_request, ++void POA_IR::EmitsDef::_non_existent_skel ( ++ TAO_ServerRequest &_tao_server_request, + void * _tao_object_reference, + void * /* context */, + CORBA::Environment &ACE_TRY_ENV + ) + { +- POA_IR::ComponentDef *_tao_impl = (POA_IR::ComponentDef *) _tao_object_reference; ++ POA_IR::EmitsDef *_tao_impl = (POA_IR::EmitsDef *) _tao_object_reference; + CORBA::Boolean _tao_retval = _tao_impl->_non_existent (ACE_TRY_ENV); + ACE_CHECK; +- ++ _tao_server_request.init_reply (); TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); - if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) @@ -8884,621 +50435,2744 @@ ACE_THROW (CORBA::MARSHAL ()); } -@@ -38210,7 +38067,7 @@ +-CORBA::Boolean POA_IR::ComponentDef::_is_a ( ++CORBA::Boolean POA_IR::EmitsDef::_is_a ( + const char* value, + CORBA::Environment &ACE_TRY_ENV + ) + { + if ( +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/ComponentDef:1.0")) || +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/InterfaceDef:1.0")) || +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/Container:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/EmitsDef:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/EventDef:1.0")) || + (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/Contained:1.0")) || +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/IDLType:1.0")) || + (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/CORBA/IRObject:1.0")) || + (!ACE_OS::strcmp ((char *)value, CORBA::_tc_Object->id (ACE_TRY_ENV)))) + return 1; +@@ -41118,39 +20033,35 @@ + return 0; + } + +-void* POA_IR::ComponentDef::_downcast ( ++void* POA_IR::EmitsDef::_downcast ( + const char* logical_type_id + ) + { +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/ComponentDef:1.0") == 0) +- return ACE_static_cast (POA_IR::ComponentDef_ptr, this); +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/InterfaceDef:1.0") == 0) +- return ACE_static_cast (POA_IR::InterfaceDef_ptr, this); +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Container:1.0") == 0) +- return ACE_static_cast (POA_IR::Container_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/EmitsDef:1.0") == 0) ++ return ACE_static_cast (POA_IR::EmitsDef_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/EventDef:1.0") == 0) ++ return ACE_static_cast (POA_IR::EventDef_ptr, this); if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Contained:1.0") == 0) return ACE_static_cast (POA_IR::Contained_ptr, this); +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/IDLType:1.0") == 0) +- return ACE_static_cast (POA_IR::IDLType_ptr, this); if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/IRObject:1.0") == 0) - return ACE_static_cast (POA_CORBA::IRObject_ptr, this); + return ACE_static_cast (POA_CORBA_IRObject_ptr, this); if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/Object:1.0") == 0) return ACE_static_cast(PortableServer::Servant, this); return 0; -@@ -38240,12 +38097,12 @@ + } + +-void POA_IR::ComponentDef::_dispatch (TAO_ServerRequest &req, void *context, CORBA::Environment &ACE_TRY_ENV) ++void POA_IR::EmitsDef::_dispatch (TAO_ServerRequest &req, void *context, CORBA::Environment &ACE_TRY_ENV) + { + this->synchronous_upcall_dispatch(req, context, this, ACE_TRY_ENV); + } + +-const char* POA_IR::ComponentDef::_interface_repository_id (void) const ++const char* POA_IR::EmitsDef::_interface_repository_id (void) const + { +- return "IDL:omg.org/IR/ComponentDef:1.0"; ++ return "IDL:omg.org/IR/EmitsDef:1.0"; + } + +-IR::ComponentDef* +-POA_IR::ComponentDef::_this (CORBA_Environment &ACE_TRY_ENV) ++IR::EmitsDef* ++POA_IR::EmitsDef::_this (CORBA_Environment &ACE_TRY_ENV) + { + TAO_Stub *stub = this->_create_stub (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); +@@ -41163,1339 +20074,913 @@ ACE_NEW_RETURN (tmp, CORBA::Object (stub, 0, this), 0); CORBA::Object_var obj = tmp; -- return ::IR::EmitsDef::_unchecked_narrow (obj.in ()); +- return ::IR::ComponentDef::_unchecked_narrow (obj.in ()); +-} +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +-POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_supported_interfaces_get::TAO_ServerRequestInfo_IR_ComponentDef_supported_interfaces_get ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::ComponentDef *tao_impl +- , +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl) +-{} +- +-Dynamic::ParameterList * +-POA_IR::ComponentDef::TAO_ServerRequestInfo_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 * +-POA_IR::ComponentDef::TAO_ServerRequestInfo_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 * +-POA_IR::ComponentDef::TAO_ServerRequestInfo_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 (); +-} +- +-char * +-POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_supported_interfaces_get::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_supported_interfaces_get::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-void +-POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_supported_interfaces_get::result (IR::InterfaceDefSeq * result) +-{ +- // Update the result. +- this->_result = result; +-} +- +-POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_supported_interfaces_set::TAO_ServerRequestInfo_IR_ComponentDef_supported_interfaces_set ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::ComponentDef *tao_impl +- , +- const IR::InterfaceDefSeq & supported_interfaces, +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- supported_interfaces_ (supported_interfaces) +-{} +- +-Dynamic::ParameterList * +-POA_IR::ComponentDef::TAO_ServerRequestInfo_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 * +-POA_IR::ComponentDef::TAO_ServerRequestInfo_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 * +-POA_IR::ComponentDef::TAO_ServerRequestInfo_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; +-} +- +-char * +-POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_supported_interfaces_set::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_supported_interfaces_set::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_base_component_get::TAO_ServerRequestInfo_IR_ComponentDef_base_component_get ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::ComponentDef *tao_impl +- , +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl) +-{} +- +-Dynamic::ParameterList * +-POA_IR::ComponentDef::TAO_ServerRequestInfo_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 * +-POA_IR::ComponentDef::TAO_ServerRequestInfo_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; + return IR_EmitsDef::_unchecked_narrow (obj.in ()); } -- - #if (TAO_HAS_INTERCEPTORS == 1) - #endif /* TAO_HAS_INTERCEPTORS */ -+ - class TAO_IR_PublishesDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable +-CORBA::Any * +-POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_base_component_get::result (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++class TAO_IR_PublishesDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable { - private: -@@ -38253,7 +38110,7 @@ - public: - const TAO_operation_db_entry * lookup (const char *str, unsigned int len); - }; --/* starting time is 18:47:29 */ +- // 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 (); +-} +- +-char * +-POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_base_component_get::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++private: ++ unsigned int hash (const char *str, unsigned int len); ++public: ++ const TAO_operation_db_entry * lookup (const char *str, unsigned int len); ++}; +/* starting time is 11:23:11 */ - /* C++ code produced by gperf version 2.8 (ACE version) */ - /* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_PublishesDef_Perfect_Hash_OpTable -N lookup */ - unsigned int -@@ -38381,10 +38238,9 @@ - } - return 0; ++/* C++ code produced by gperf version 2.8 (ACE version) */ ++/* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_PublishesDef_Perfect_Hash_OpTable -N lookup */ ++unsigned int ++TAO_IR_PublishesDef_Perfect_Hash_OpTable::hash (const char *str, unsigned int len) + { +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); ++ static const unsigned char asso_values[] = ++ { ++#if defined (ACE_MVS) ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 0, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 0, ++ 37, 37, 0, 0, 37, 37, 37, 10, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 0, 0, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 10, 37, 37, 37, 37, 10, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, ++#else ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 0, 37, 0, 37, 37, ++ 0, 0, 37, 37, 37, 10, 37, 37, 37, 0, ++ 0, 37, 37, 37, 37, 37, 10, 37, 37, 37, ++ 37, 10, 37, 37, 37, 37, 37, 37, ++#endif /* ACE_MVS */ ++ }; ++ return len + asso_values[str[len - 1]] + asso_values[str[0]]; + } + +-CORBA::Boolean +-POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_base_component_get::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++const class TAO_operation_db_entry * ++TAO_IR_PublishesDef_Perfect_Hash_OpTable::lookup (const char *str, unsigned int len) + { +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} ++ enum ++ { ++ TOTAL_KEYWORDS = 17, ++ MIN_WORD_LENGTH = 4, ++ MAX_WORD_LENGTH = 26, ++ MIN_HASH_VALUE = 4, ++ MAX_HASH_VALUE = 36, ++ HASH_VALUE_RANGE = 33, ++ DUPLICATES = 4 ++ }; + +-void +-POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_base_component_get::result (IR::ComponentDef_ptr result) +-{ +- // Update the result. +- this->_result = result; +-} ++ static const class TAO_operation_db_entry wordlist[] = ++ { ++ {"",0},{"",0},{"",0},{"",0}, ++ {"move", &POA_IR::PublishesDef::move_skel}, ++ {"_is_a", &POA_IR::PublishesDef::_is_a_skel}, ++ {"_get_id", &POA_IR::PublishesDef::_get_id_skel}, ++ {"_set_id", &POA_IR::PublishesDef::_set_id_skel}, ++ {"describe", &POA_IR::PublishesDef::describe_skel}, ++ {"_get_name", &POA_IR::PublishesDef::_get_name_skel}, ++ {"_set_name", &POA_IR::PublishesDef::_set_name_skel}, ++ {"_get_version", &POA_IR::PublishesDef::_get_version_skel}, ++ {"_set_version", &POA_IR::PublishesDef::_set_version_skel}, ++ {"_get_def_kind", &POA_IR::PublishesDef::_get_def_kind_skel}, ++ {"is_a", &POA_IR::PublishesDef::is_a_skel}, ++ {"_get_defined_in", &POA_IR::PublishesDef::_get_defined_in_skel}, ++ {"destroy", &POA_IR::PublishesDef::destroy_skel}, ++ {"_get_absolute_name", &POA_IR::PublishesDef::_get_absolute_name_skel}, ++ {"_get_event", &POA_IR::PublishesDef::_get_event_skel}, ++ {"_non_existent", &POA_IR::PublishesDef::_non_existent_skel}, ++ {"_get_containing_repository", &POA_IR::PublishesDef::_get_containing_repository_skel}, ++ }; + +-POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_provides_interfaces_get::TAO_ServerRequestInfo_IR_ComponentDef_provides_interfaces_get ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::ComponentDef *tao_impl +- , +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl) +-{} ++ static const signed char lookup[] = ++ { ++ -6, -2, -9, -2, 4, 5, -1, -43, 8, -43, -11, -2, -38, 13, ++ 14, 15, -1, 16, 17, -1, 18, -1, -1, 19, -1, -1, -1, -1, ++ -1, -1, -1, -1, -1, -1, -1, -1, 20, ++ }; + +-Dynamic::ParameterList * +-POA_IR::ComponentDef::TAO_ServerRequestInfo_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; +-} ++ if (len <= MAX_WORD_LENGTH && len >= MIN_WORD_LENGTH) ++ { ++ unsigned int key = hash (str, len); + +-Dynamic::ExceptionList * +-POA_IR::ComponentDef::TAO_ServerRequestInfo_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; +-} ++ if (key <= MAX_HASH_VALUE && key >= MIN_HASH_VALUE) ++ { ++ int slot = lookup[key]; + +-CORBA::Any * +-POA_IR::ComponentDef::TAO_ServerRequestInfo_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 (); +-} ++ if (slot >= 0 && slot < MAX_HASH_VALUE) ++ { ++ const char *s = wordlist[slot].opname_; + +-char * +-POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_provides_interfaces_get::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} ++ if (*str == *s && !strncmp (str + 1, s + 1, len - 1)) ++ return &wordlist[slot]; ++ } ++ else if (slot < 0 && slot >= -MAX_HASH_VALUE) ++ return 0; ++ else ++ { ++ unsigned int offset = key + slot + (slot > 0 ? -MAX_HASH_VALUE : MAX_HASH_VALUE); ++ const class TAO_operation_db_entry *base = &wordlist[-lookup[offset]]; ++ const class TAO_operation_db_entry *ptr = base + -lookup[offset + 1]; + +-CORBA::Boolean +-POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_provides_interfaces_get::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); ++ while (--ptr >= base) ++ if (*str == *ptr->opname_ && !strncmp (str + 1, ptr->opname_ + 1, len - 1)) ++ return ptr; ++ } ++ } ++ } ++ return 0; } --/* ending time is 18:47:29 */ +/* ending time is 11:23:11 */ - static TAO_IR_PublishesDef_Perfect_Hash_OpTable tao_IR_PublishesDef_optable; ++static TAO_IR_PublishesDef_Perfect_Hash_OpTable tao_IR_PublishesDef_optable; +-void +-POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_provides_interfaces_get::result (IR::ProvidesDefSeq * result) ++/////////////////////////////////////////////////////////////////////// ++// Strategized Proxy Broker Implementation ++// ++ ++// Factory function Implementation. ++POA_IR::_TAO_PublishesDef_Strategized_Proxy_Broker *POA_IR::_TAO_PublishesDef_Strategized_Proxy_Broker::the_TAO_PublishesDef_Strategized_Proxy_Broker (void) + { +- // Update the result. +- this->_result = result; ++ static POA_IR::_TAO_PublishesDef_Strategized_Proxy_Broker strategized_proxy_broker; ++ return &strategized_proxy_broker; + } + +-POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_uses_interfaces_get::TAO_ServerRequestInfo_IR_ComponentDef_uses_interfaces_get ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::ComponentDef *tao_impl +- , +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl) +-{} - - /////////////////////////////////////////////////////////////////////// - // Strategized Proxy Broker Implementation - // -@@ -38410,9 +38266,9 @@ +-Dynamic::ParameterList * +-POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_uses_interfaces_get::arguments (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++POA_IR::_TAO_PublishesDef_Strategized_Proxy_Broker::_TAO_PublishesDef_Strategized_Proxy_Broker (void) + { +- // Generate the argument list on demand. +- Dynamic::ParameterList *parameter_list = +- TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); +- ACE_CHECK_RETURN (0); ++ for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) ++ this->proxy_cache_[i] = 0; +- return parameter_list; } --IR::_TAO_PublishesDef_Proxy_Impl& +-Dynamic::ExceptionList * +-POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_uses_interfaces_get::exceptions (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++POA_IR::_TAO_PublishesDef_Strategized_Proxy_Broker::~_TAO_PublishesDef_Strategized_Proxy_Broker (void) + { +- // Generate the exception list on demand. +- Dynamic::ExceptionList *exception_list = +- TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); +- ACE_CHECK_RETURN (0); ++ for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) ++ delete this->proxy_cache_[i]; + +- return exception_list; + } + +-CORBA::Any * +-POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_uses_interfaces_get::result (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +_TAO_PublishesDef_Proxy_Impl& - POA_IR::_TAO_PublishesDef_Strategized_Proxy_Broker::select_proxy ( -- ::IR::PublishesDef *object, ++POA_IR::_TAO_PublishesDef_Strategized_Proxy_Broker::select_proxy ( + IR_PublishesDef *object, - CORBA::Environment &ACE_TRY_ENV ++ CORBA::Environment &ACE_TRY_ENV ++ ) + { +- // 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); ++ TAO_ORB_Core::TAO_Collocation_Strategies strategy = ++ TAO_ORB_Core::collocation_strategy (object); ++ ++ if (this->proxy_cache_[strategy] != 0) ++ return *this->proxy_cache_[strategy]; + +- CORBA::Any_var safe_result_any = result_any; ++ this->create_proxy (strategy, ACE_TRY_ENV); ++ ACE_CHECK_RETURN (*this->proxy_cache_[strategy]); + +- (*result_any) <<= this->_result; ++ return *this->proxy_cache_[strategy]; + +- return safe_result_any._retn (); +-} +- +-char * +-POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_uses_interfaces_get::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_uses_interfaces_get::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); + } + + void +-POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_uses_interfaces_get::result (IR::UsesDefSeq * result) +-{ +- // Update the result. +- this->_result = result; +-} +- +-POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_emits_events_get::TAO_ServerRequestInfo_IR_ComponentDef_emits_events_get ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::ComponentDef *tao_impl +- , +- CORBA::Environment & ++POA_IR::_TAO_PublishesDef_Strategized_Proxy_Broker::create_proxy ( ++ TAO_ORB_Core::TAO_Collocation_Strategies strategy, ++ CORBA::Environment &ACE_TRY_ENV ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl) +-{} +- +-Dynamic::ParameterList * +-POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_emits_events_get::arguments (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) { -@@ -38444,7 +38300,7 @@ - case TAO_ORB_Core::THRU_POA_STRATEGY: - ACE_NEW_THROW_EX ( - this->proxy_cache_[strategy], -- POA_IR::_TAO_PublishesDef_ThruPOA_Proxy_Impl, +- // Generate the argument list on demand. +- Dynamic::ParameterList *parameter_list = +- TAO_RequestInfo_Util::make_parameter_list (ACE_TRY_ENV); +- ACE_CHECK_RETURN (0); ++ ACE_GUARD (TAO_SYNCH_MUTEX, guard, this->mutex_); + +- return parameter_list; ++ if (this->proxy_cache_[strategy] == 0) ++ { ++ switch (strategy) ++ { ++ case TAO_ORB_Core::THRU_POA_STRATEGY: ++ ACE_NEW_THROW_EX ( ++ this->proxy_cache_[strategy], + _TAO_PublishesDef_ThruPOA_Proxy_Impl, - CORBA::NO_MEMORY () - ); - ACE_CHECK; -@@ -38454,7 +38310,7 @@ - default: - ACE_NEW_THROW_EX ( - this->proxy_cache_[strategy], -- ::IR::_TAO_PublishesDef_Remote_Proxy_Impl, ++ CORBA::NO_MEMORY () ++ ); ++ ACE_CHECK; ++ break; ++ ++ case TAO_ORB_Core::REMOTE_STRATEGY: ++ default: ++ ACE_NEW_THROW_EX ( ++ this->proxy_cache_[strategy], + _TAO_PublishesDef_Remote_Proxy_Impl, - CORBA::NO_MEMORY () - ); - ACE_CHECK; -@@ -38471,26 +38327,26 @@ - /////////////////////////////////////////////////////////////////////// - - --IR::_TAO_PublishesDef_Proxy_Broker * --IR__TAO_PublishesDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) ++ CORBA::NO_MEMORY () ++ ); ++ ACE_CHECK; ++ break; ++ ++ } ++ ++ } + } + +-Dynamic::ExceptionList * +-POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_emits_events_get::exceptions (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++ ++// ++// End Strategized Proxy Broker Implementation ++/////////////////////////////////////////////////////////////////////// ++ ++ +_TAO_PublishesDef_Proxy_Broker * +_TAO_PublishesDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) { - ACE_UNUSED_ARG (obj); - return ::POA_IR::_TAO_PublishesDef_Strategized_Proxy_Broker::the_TAO_PublishesDef_Strategized_Proxy_Broker(); +- // 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; ++ ACE_UNUSED_ARG (obj); ++ return ::POA_IR::_TAO_PublishesDef_Strategized_Proxy_Broker::the_TAO_PublishesDef_Strategized_Proxy_Broker(); } - int --IR__TAO_PublishesDef_Proxy_Broker_Factory_Initializer (long _dummy_) +-CORBA::Any * +-POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_emits_events_get::result (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++int +_TAO_PublishesDef_Proxy_Broker_Factory_Initializer (long _dummy_) { - ACE_UNUSED_ARG (_dummy_); +- // 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; ++ ACE_UNUSED_ARG (_dummy_); -- IR__TAO_PublishesDef_Proxy_Broker_Factory_function_pointer = -- IR__TAO_PublishesDef_Proxy_Broker_Factory_function; +- (*result_any) <<= this->_result; + _TAO_PublishesDef_Proxy_Broker_Factory_function_pointer = + _TAO_PublishesDef_Proxy_Broker_Factory_function; - return 0; +- return safe_result_any._retn (); ++ return 0; } --static int IR__TAO_PublishesDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = -- IR__TAO_PublishesDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, IR__TAO_PublishesDef_Proxy_Broker_Factory_Initializer)); +-char * +-POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_emits_events_get::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +static int _TAO_PublishesDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = + _TAO_PublishesDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, _TAO_PublishesDef_Proxy_Broker_Factory_Initializer)); +-CORBA::Boolean +-POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_emits_events_get::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} - /////////////////////////////////////////////////////////////////////// -@@ -38516,7 +38372,7 @@ - POA_IR::PublishesDef::PublishesDef (const PublishesDef& rhs) - : ACE_NESTED_CLASS (POA_IR,EventDef) (rhs), - ACE_NESTED_CLASS (POA_IR,Contained) (rhs), -- ACE_NESTED_CLASS (POA_CORBA,IRObject) (rhs), -+ POA_CORBA_IRObject (rhs), - TAO_ServantBase (rhs) +-void +-POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_emits_events_get::result (IR::EmitsDefSeq * result) +-{ +- // Update the result. +- this->_result = result; +-} ++/////////////////////////////////////////////////////////////////////// ++// ThruPOA Proxy Implementation ++// + +-POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_publishes_events_get::TAO_ServerRequestInfo_IR_ComponentDef_publishes_events_get ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::ComponentDef *tao_impl +- , +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl) ++POA_IR::_TAO_PublishesDef_ThruPOA_Proxy_Impl::_TAO_PublishesDef_ThruPOA_Proxy_Impl (void) {} -@@ -38536,7 +38392,7 @@ - POA_IR::PublishesDef *_tao_impl = (POA_IR::PublishesDef *) _tao_object_reference; - CORBA::Boolean _tao_retval = 0; - CORBA::String_var value; -- if (!(_tao_in >> value.out ())) +-Dynamic::ParameterList * +-POA_IR::ComponentDef::TAO_ServerRequestInfo_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; +-} ++POA_IR::_TAO_PublishesDef_ThruPOA_Proxy_Impl::~_TAO_PublishesDef_ThruPOA_Proxy_Impl (void) ++{} + +-Dynamic::ExceptionList * +-POA_IR::ComponentDef::TAO_ServerRequestInfo_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; +-} ++// ThruPOA Implementation of the IDL interface methods + +-CORBA::Any * +-POA_IR::ComponentDef::TAO_ServerRequestInfo_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 (); +-} ++// ++// End ThruPOA Proxy Implementation ++/////////////////////////////////////////////////////////////////////// + +-char * +-POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_publishes_events_get::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++// skeleton constructor ++POA_IR::PublishesDef::PublishesDef (void) + { +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); ++ this->optable_ = &tao_IR_PublishesDef_optable; + } + +-CORBA::Boolean +-POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_publishes_events_get::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} ++// copy ctor ++POA_IR::PublishesDef::PublishesDef (const PublishesDef& rhs) ++ : ACE_NESTED_CLASS (POA_IR,EventDef) (rhs), ++ ACE_NESTED_CLASS (POA_IR,Contained) (rhs), ++ POA_CORBA_IRObject (rhs), ++ TAO_ServantBase (rhs) ++{} + +-void +-POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_publishes_events_get::result (IR::PublishesDefSeq * result) ++// skeleton destructor ++POA_IR::PublishesDef::~PublishesDef (void) + { +- // Update the result. +- this->_result = result; + } + +-POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_consumes_events_get::TAO_ServerRequestInfo_IR_ComponentDef_consumes_events_get ( ++void POA_IR::PublishesDef::_is_a_skel ( + TAO_ServerRequest &_tao_server_request, +- POA_IR::ComponentDef *tao_impl +- , +- CORBA::Environment & ++ void * _tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV + ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl) +-{} +- +-Dynamic::ParameterList * +-POA_IR::ComponentDef::TAO_ServerRequestInfo_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; +-} ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::PublishesDef *_tao_impl = (POA_IR::PublishesDef *) _tao_object_reference; ++ CORBA::Boolean _tao_retval = 0; ++ CORBA::String_var value; + if (!((_tao_in >> value.out ()))) - ACE_THROW (CORBA::MARSHAL ()); - - _tao_retval = _tao_impl->_is_a (value.in (), ACE_TRY_ENV); -@@ -38544,7 +38400,7 @@ - - _tao_server_request.init_reply (); - TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); -- if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) ++ ACE_THROW (CORBA::MARSHAL ()); + +-Dynamic::ExceptionList * +-POA_IR::ComponentDef::TAO_ServerRequestInfo_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; +-} ++ _tao_retval = _tao_impl->_is_a (value.in (), ACE_TRY_ENV); ++ ACE_CHECK; + +-CORBA::Any * +-POA_IR::ComponentDef::TAO_ServerRequestInfo_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 (); ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); + if (!((_tao_out << CORBA::Any::from_boolean (_tao_retval)))) - ACE_THROW (CORBA::MARSHAL ()); ++ ACE_THROW (CORBA::MARSHAL ()); + } + +-char * +-POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_consumes_events_get::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++void POA_IR::PublishesDef::_non_existent_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void * _tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++ ) + { +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); ++ POA_IR::PublishesDef *_tao_impl = (POA_IR::PublishesDef *) _tao_object_reference; ++ CORBA::Boolean _tao_retval = _tao_impl->_non_existent (ACE_TRY_ENV); ++ ACE_CHECK; ++ ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!((_tao_out << CORBA::Any::from_boolean (_tao_retval)))) ++ ACE_THROW (CORBA::MARSHAL ()); + } + +-CORBA::Boolean +-POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_consumes_events_get::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++CORBA::Boolean POA_IR::PublishesDef::_is_a ( ++ const char* value, ++ CORBA::Environment &ACE_TRY_ENV ++ ) + { +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); ++ if ( ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/PublishesDef:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/EventDef:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/Contained:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/CORBA/IRObject:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, CORBA::_tc_Object->id (ACE_TRY_ENV)))) ++ return 1; ++ else ++ return 0; + } + +-void +-POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_consumes_events_get::result (IR::ConsumesDefSeq * result) ++void* POA_IR::PublishesDef::_downcast ( ++ const char* logical_type_id ++ ) + { +- // Update the result. +- this->_result = result; ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/PublishesDef:1.0") == 0) ++ return ACE_static_cast (POA_IR::PublishesDef_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/EventDef:1.0") == 0) ++ return ACE_static_cast (POA_IR::EventDef_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Contained:1.0") == 0) ++ return ACE_static_cast (POA_IR::Contained_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/IRObject:1.0") == 0) ++ return ACE_static_cast (POA_CORBA_IRObject_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/Object:1.0") == 0) ++ return ACE_static_cast(PortableServer::Servant, this); ++ return 0; + } + +-POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_is_basic_get::TAO_ServerRequestInfo_IR_ComponentDef_is_basic_get ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::ComponentDef *tao_impl +- , +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl) +-{} +- +-Dynamic::ParameterList * +-POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_is_basic_get::arguments (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++void POA_IR::PublishesDef::_dispatch (TAO_ServerRequest &req, void *context, CORBA::Environment &ACE_TRY_ENV) + { +- // 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; ++ this->synchronous_upcall_dispatch(req, context, this, ACE_TRY_ENV); } -@@ -38561,7 +38417,7 @@ - - _tao_server_request.init_reply (); - TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); -- if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) -+ if (!((_tao_out << CORBA::Any::from_boolean (_tao_retval)))) - ACE_THROW (CORBA::MARSHAL ()); +-Dynamic::ExceptionList * +-POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_is_basic_get::exceptions (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++const char* POA_IR::PublishesDef::_interface_repository_id (void) const + { +- // 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; ++ return "IDL:omg.org/IR/PublishesDef:1.0"; } -@@ -38592,7 +38448,7 @@ - if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Contained:1.0") == 0) - return ACE_static_cast (POA_IR::Contained_ptr, this); - if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/IRObject:1.0") == 0) -- return ACE_static_cast (POA_CORBA::IRObject_ptr, this); -+ return ACE_static_cast (POA_CORBA_IRObject_ptr, this); - if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/Object:1.0") == 0) - return ACE_static_cast(PortableServer::Servant, this); - return 0; -@@ -38622,12 +38478,12 @@ - ACE_NEW_RETURN (tmp, CORBA::Object (stub, 0, this), 0); +-CORBA::Any * +-POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_is_basic_get::result (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++IR::PublishesDef* ++POA_IR::PublishesDef::_this (CORBA_Environment &ACE_TRY_ENV) + { +- // 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); ++ TAO_Stub *stub = this->_create_stub (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); - CORBA::Object_var obj = tmp; -- return ::IR::PublishesDef::_unchecked_narrow (obj.in ()); +- CORBA::Any_var safe_result_any = result_any; ++ CORBA::Object_ptr tmp = CORBA::Object::_nil (); + +- (*result_any) <<= CORBA::Any::from_boolean (this->_result); ++ if (stub->servant_orb_var ()->orb_core ()->optimize_collocation_objects ()) ++ ACE_NEW_RETURN (tmp, CORBA::Object (stub, 1, this), 0); ++ else ++ ACE_NEW_RETURN (tmp, CORBA::Object (stub, 0, this), 0); + +- return safe_result_any._retn (); ++ CORBA::Object_var obj = tmp; + return IR_PublishesDef::_unchecked_narrow (obj.in ()); } -- - #if (TAO_HAS_INTERCEPTORS == 1) - #endif /* TAO_HAS_INTERCEPTORS */ -+ - class TAO_IR_ConsumesDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable +-char * +-POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_is_basic_get::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++class TAO_IR_ConsumesDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable { - private: -@@ -38635,7 +38491,7 @@ - public: - const TAO_operation_db_entry * lookup (const char *str, unsigned int len); - }; --/* starting time is 18:47:29 */ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_is_basic_get::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++private: ++ unsigned int hash (const char *str, unsigned int len); ++public: ++ const TAO_operation_db_entry * lookup (const char *str, unsigned int len); ++}; +/* starting time is 11:23:11 */ - /* C++ code produced by gperf version 2.8 (ACE version) */ - /* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_ConsumesDef_Perfect_Hash_OpTable -N lookup */ - unsigned int -@@ -38763,10 +38619,9 @@ - } - return 0; ++/* C++ code produced by gperf version 2.8 (ACE version) */ ++/* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_ConsumesDef_Perfect_Hash_OpTable -N lookup */ ++unsigned int ++TAO_IR_ConsumesDef_Perfect_Hash_OpTable::hash (const char *str, unsigned int len) + { +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); ++ static const unsigned char asso_values[] = ++ { ++#if defined (ACE_MVS) ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 0, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 0, ++ 37, 37, 0, 0, 37, 37, 37, 10, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 0, 0, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 10, 37, 37, 37, 37, 10, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, ++#else ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 0, 37, 0, 37, 37, ++ 0, 0, 37, 37, 37, 10, 37, 37, 37, 0, ++ 0, 37, 37, 37, 37, 37, 10, 37, 37, 37, ++ 37, 10, 37, 37, 37, 37, 37, 37, ++#endif /* ACE_MVS */ ++ }; ++ return len + asso_values[str[len - 1]] + asso_values[str[0]]; + } + +-void +-POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_is_basic_get::result (CORBA::Boolean result) ++const class TAO_operation_db_entry * ++TAO_IR_ConsumesDef_Perfect_Hash_OpTable::lookup (const char *str, unsigned int len) + { +- // Update the result. +- this->_result = result; +-} ++ enum ++ { ++ TOTAL_KEYWORDS = 17, ++ MIN_WORD_LENGTH = 4, ++ MAX_WORD_LENGTH = 26, ++ MIN_HASH_VALUE = 4, ++ MAX_HASH_VALUE = 36, ++ HASH_VALUE_RANGE = 33, ++ DUPLICATES = 4 ++ }; + +-POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_create_provides::TAO_ServerRequestInfo_IR_ComponentDef_create_provides ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::ComponentDef *tao_impl +- , +- const char * id, +- const char * name, +- const char * version, +- IR::InterfaceDef_ptr interface_type, +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- id_ (id), +- name_ (name), +- version_ (version), +- interface_type_ (interface_type) +-{} +- +-Dynamic::ParameterList * +-POA_IR::ComponentDef::TAO_ServerRequestInfo_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 (); +-} ++ static const class TAO_operation_db_entry wordlist[] = ++ { ++ {"",0},{"",0},{"",0},{"",0}, ++ {"move", &POA_IR::ConsumesDef::move_skel}, ++ {"_is_a", &POA_IR::ConsumesDef::_is_a_skel}, ++ {"_get_id", &POA_IR::ConsumesDef::_get_id_skel}, ++ {"_set_id", &POA_IR::ConsumesDef::_set_id_skel}, ++ {"describe", &POA_IR::ConsumesDef::describe_skel}, ++ {"_get_name", &POA_IR::ConsumesDef::_get_name_skel}, ++ {"_set_name", &POA_IR::ConsumesDef::_set_name_skel}, ++ {"_get_version", &POA_IR::ConsumesDef::_get_version_skel}, ++ {"_set_version", &POA_IR::ConsumesDef::_set_version_skel}, ++ {"_get_def_kind", &POA_IR::ConsumesDef::_get_def_kind_skel}, ++ {"is_a", &POA_IR::ConsumesDef::is_a_skel}, ++ {"_get_defined_in", &POA_IR::ConsumesDef::_get_defined_in_skel}, ++ {"destroy", &POA_IR::ConsumesDef::destroy_skel}, ++ {"_get_absolute_name", &POA_IR::ConsumesDef::_get_absolute_name_skel}, ++ {"_get_event", &POA_IR::ConsumesDef::_get_event_skel}, ++ {"_non_existent", &POA_IR::ConsumesDef::_non_existent_skel}, ++ {"_get_containing_repository", &POA_IR::ConsumesDef::_get_containing_repository_skel}, ++ }; + +-Dynamic::ExceptionList * +-POA_IR::ComponentDef::TAO_ServerRequestInfo_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; +-} ++ static const signed char lookup[] = ++ { ++ -6, -2, -9, -2, 4, 5, -1, -43, 8, -43, -11, -2, -38, 13, ++ 14, 15, -1, 16, 17, -1, 18, -1, -1, 19, -1, -1, -1, -1, ++ -1, -1, -1, -1, -1, -1, -1, -1, 20, ++ }; + +-CORBA::Any * +-POA_IR::ComponentDef::TAO_ServerRequestInfo_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 (); +-} ++ if (len <= MAX_WORD_LENGTH && len >= MIN_WORD_LENGTH) ++ { ++ unsigned int key = hash (str, len); + +-char * +-POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_create_provides::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} ++ if (key <= MAX_HASH_VALUE && key >= MIN_HASH_VALUE) ++ { ++ int slot = lookup[key]; + +-CORBA::Boolean +-POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_create_provides::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); ++ if (slot >= 0 && slot < MAX_HASH_VALUE) ++ { ++ const char *s = wordlist[slot].opname_; ++ ++ if (*str == *s && !strncmp (str + 1, s + 1, len - 1)) ++ return &wordlist[slot]; ++ } ++ else if (slot < 0 && slot >= -MAX_HASH_VALUE) ++ return 0; ++ else ++ { ++ unsigned int offset = key + slot + (slot > 0 ? -MAX_HASH_VALUE : MAX_HASH_VALUE); ++ const class TAO_operation_db_entry *base = &wordlist[-lookup[offset]]; ++ const class TAO_operation_db_entry *ptr = base + -lookup[offset + 1]; ++ ++ while (--ptr >= base) ++ if (*str == *ptr->opname_ && !strncmp (str + 1, ptr->opname_ + 1, len - 1)) ++ return ptr; ++ } ++ } ++ } ++ return 0; } --/* ending time is 18:47:29 */ +/* ending time is 11:23:11 */ - static TAO_IR_ConsumesDef_Perfect_Hash_OpTable tao_IR_ConsumesDef_optable; ++static TAO_IR_ConsumesDef_Perfect_Hash_OpTable tao_IR_ConsumesDef_optable; +-void +-POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_create_provides::result (IR::ProvidesDef_ptr result) ++/////////////////////////////////////////////////////////////////////// ++// Strategized Proxy Broker Implementation ++// ++ ++// Factory function Implementation. ++POA_IR::_TAO_ConsumesDef_Strategized_Proxy_Broker *POA_IR::_TAO_ConsumesDef_Strategized_Proxy_Broker::the_TAO_ConsumesDef_Strategized_Proxy_Broker (void) + { +- // Update the result. +- this->_result = result; ++ static POA_IR::_TAO_ConsumesDef_Strategized_Proxy_Broker strategized_proxy_broker; ++ return &strategized_proxy_broker; + } + +-POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_create_uses::TAO_ServerRequestInfo_IR_ComponentDef_create_uses ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::ComponentDef *tao_impl +- , +- const char * id, +- const char * name, +- const char * version, +- IR::InterfaceDef_ptr interface_type, +- const CORBA::Boolean & is_multiple, +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- id_ (id), +- name_ (name), +- version_ (version), +- interface_type_ (interface_type), +- is_multiple_ (is_multiple) +-{} - - /////////////////////////////////////////////////////////////////////// - // Strategized Proxy Broker Implementation - // -@@ -38792,9 +38647,9 @@ +-Dynamic::ParameterList * +-POA_IR::ComponentDef::TAO_ServerRequestInfo_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; ++POA_IR::_TAO_ConsumesDef_Strategized_Proxy_Broker::_TAO_ConsumesDef_Strategized_Proxy_Broker (void) ++{ ++ for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) ++ this->proxy_cache_[i] = 0; + +- return safe_parameter_list._retn (); + } + +-Dynamic::ExceptionList * +-POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_create_uses::exceptions (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++POA_IR::_TAO_ConsumesDef_Strategized_Proxy_Broker::~_TAO_ConsumesDef_Strategized_Proxy_Broker (void) + { +- // Generate the exception list on demand. +- Dynamic::ExceptionList *exception_list = +- TAO_RequestInfo_Util::make_exception_list (ACE_TRY_ENV); +- ACE_CHECK_RETURN (0); ++ for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) ++ delete this->proxy_cache_[i]; +- return exception_list; } --IR::_TAO_ConsumesDef_Proxy_Impl& +-CORBA::Any * +-POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_create_uses::result (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +_TAO_ConsumesDef_Proxy_Impl& - POA_IR::_TAO_ConsumesDef_Strategized_Proxy_Broker::select_proxy ( -- ::IR::ConsumesDef *object, ++POA_IR::_TAO_ConsumesDef_Strategized_Proxy_Broker::select_proxy ( + IR_ConsumesDef *object, - CORBA::Environment &ACE_TRY_ENV - ) ++ CORBA::Environment &ACE_TRY_ENV ++ ) { -@@ -38826,7 +38681,7 @@ - case TAO_ORB_Core::THRU_POA_STRATEGY: - ACE_NEW_THROW_EX ( - this->proxy_cache_[strategy], -- POA_IR::_TAO_ConsumesDef_ThruPOA_Proxy_Impl, +- // 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); ++ TAO_ORB_Core::TAO_Collocation_Strategies strategy = ++ TAO_ORB_Core::collocation_strategy (object); + +- CORBA::Any_var safe_result_any = result_any; ++ if (this->proxy_cache_[strategy] != 0) ++ return *this->proxy_cache_[strategy]; + +- (*result_any) <<= this->_result; ++ this->create_proxy (strategy, ACE_TRY_ENV); ++ ACE_CHECK_RETURN (*this->proxy_cache_[strategy]); ++ ++ return *this->proxy_cache_[strategy]; + +- return safe_result_any._retn (); +-} +- +-char * +-POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_create_uses::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_create_uses::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); + } + + void +-POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_create_uses::result (IR::UsesDef_ptr result) +-{ +- // Update the result. +- this->_result = result; +-} +- +-POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_create_emits::TAO_ServerRequestInfo_IR_ComponentDef_create_emits ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::ComponentDef *tao_impl +- , +- const char * id, +- const char * name, +- const char * version, +- IR::ValueDef_ptr value, +- CORBA::Environment & ++POA_IR::_TAO_ConsumesDef_Strategized_Proxy_Broker::create_proxy ( ++ TAO_ORB_Core::TAO_Collocation_Strategies strategy, ++ CORBA::Environment &ACE_TRY_ENV + ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- id_ (id), +- name_ (name), +- version_ (version), +- value_ (value) +-{} +- +-Dynamic::ParameterList * +-POA_IR::ComponentDef::TAO_ServerRequestInfo_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); ++{ ++ ACE_GUARD (TAO_SYNCH_MUTEX, guard, this->mutex_); + +- 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; ++ if (this->proxy_cache_[strategy] == 0) ++ { ++ switch (strategy) ++ { ++ case TAO_ORB_Core::THRU_POA_STRATEGY: ++ ACE_NEW_THROW_EX ( ++ this->proxy_cache_[strategy], + _TAO_ConsumesDef_ThruPOA_Proxy_Impl, - CORBA::NO_MEMORY () - ); - ACE_CHECK; -@@ -38836,7 +38691,7 @@ - default: - ACE_NEW_THROW_EX ( - this->proxy_cache_[strategy], -- ::IR::_TAO_ConsumesDef_Remote_Proxy_Impl, ++ CORBA::NO_MEMORY () ++ ); ++ ACE_CHECK; ++ break; ++ ++ case TAO_ORB_Core::REMOTE_STRATEGY: ++ default: ++ ACE_NEW_THROW_EX ( ++ this->proxy_cache_[strategy], + _TAO_ConsumesDef_Remote_Proxy_Impl, - CORBA::NO_MEMORY () - ); - ACE_CHECK; -@@ -38853,26 +38708,26 @@ - /////////////////////////////////////////////////////////////////////// - ++ CORBA::NO_MEMORY () ++ ); ++ ACE_CHECK; ++ break; ++ ++ } + +- 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 (); ++ } + } --IR::_TAO_ConsumesDef_Proxy_Broker * --IR__TAO_ConsumesDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) +-Dynamic::ExceptionList * +-POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_create_emits::exceptions (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++ ++// ++// End Strategized Proxy Broker Implementation ++/////////////////////////////////////////////////////////////////////// ++ ++ +_TAO_ConsumesDef_Proxy_Broker * +_TAO_ConsumesDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) { - ACE_UNUSED_ARG (obj); - return ::POA_IR::_TAO_ConsumesDef_Strategized_Proxy_Broker::the_TAO_ConsumesDef_Strategized_Proxy_Broker(); +- // 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; ++ ACE_UNUSED_ARG (obj); ++ return ::POA_IR::_TAO_ConsumesDef_Strategized_Proxy_Broker::the_TAO_ConsumesDef_Strategized_Proxy_Broker(); } - int --IR__TAO_ConsumesDef_Proxy_Broker_Factory_Initializer (long _dummy_) +-CORBA::Any * +-POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_create_emits::result (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++int +_TAO_ConsumesDef_Proxy_Broker_Factory_Initializer (long _dummy_) { - ACE_UNUSED_ARG (_dummy_); +- // 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; ++ ACE_UNUSED_ARG (_dummy_); -- IR__TAO_ConsumesDef_Proxy_Broker_Factory_function_pointer = -- IR__TAO_ConsumesDef_Proxy_Broker_Factory_function; +- (*result_any) <<= this->_result; + _TAO_ConsumesDef_Proxy_Broker_Factory_function_pointer = + _TAO_ConsumesDef_Proxy_Broker_Factory_function; - return 0; +- return safe_result_any._retn (); ++ return 0; } --static int IR__TAO_ConsumesDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = -- IR__TAO_ConsumesDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, IR__TAO_ConsumesDef_Proxy_Broker_Factory_Initializer)); +-char * +-POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_create_emits::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +static int _TAO_ConsumesDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = + _TAO_ConsumesDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, _TAO_ConsumesDef_Proxy_Broker_Factory_Initializer)); +-CORBA::Boolean +-POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_create_emits::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} - /////////////////////////////////////////////////////////////////////// -@@ -38898,7 +38753,7 @@ - POA_IR::ConsumesDef::ConsumesDef (const ConsumesDef& rhs) - : ACE_NESTED_CLASS (POA_IR,EventDef) (rhs), - ACE_NESTED_CLASS (POA_IR,Contained) (rhs), -- ACE_NESTED_CLASS (POA_CORBA,IRObject) (rhs), -+ POA_CORBA_IRObject (rhs), - TAO_ServantBase (rhs) - {} +-void +-POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_create_emits::result (IR::EmitsDef_ptr result) +-{ +- // Update the result. +- this->_result = result; +-} ++/////////////////////////////////////////////////////////////////////// ++// ThruPOA Proxy Implementation ++// + +-POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_create_publishes::TAO_ServerRequestInfo_IR_ComponentDef_create_publishes ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::ComponentDef *tao_impl +- , +- const char * id, +- const char * name, +- const char * version, +- IR::ValueDef_ptr value, +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- id_ (id), +- name_ (name), +- version_ (version), +- value_ (value) +-{} +- +-Dynamic::ParameterList * +-POA_IR::ComponentDef::TAO_ServerRequestInfo_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 (); +-} ++POA_IR::_TAO_ConsumesDef_ThruPOA_Proxy_Impl::_TAO_ConsumesDef_ThruPOA_Proxy_Impl (void) ++{} -@@ -38918,7 +38773,7 @@ - POA_IR::ConsumesDef *_tao_impl = (POA_IR::ConsumesDef *) _tao_object_reference; - CORBA::Boolean _tao_retval = 0; - CORBA::String_var value; -- if (!(_tao_in >> value.out ())) +-Dynamic::ExceptionList * +-POA_IR::ComponentDef::TAO_ServerRequestInfo_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; +-} ++POA_IR::_TAO_ConsumesDef_ThruPOA_Proxy_Impl::~_TAO_ConsumesDef_ThruPOA_Proxy_Impl (void) ++{} + +-CORBA::Any * +-POA_IR::ComponentDef::TAO_ServerRequestInfo_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 (); +-} ++// ThruPOA Implementation of the IDL interface methods ++ ++// ++// End ThruPOA Proxy Implementation ++/////////////////////////////////////////////////////////////////////// + +-char * +-POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_create_publishes::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++// skeleton constructor ++POA_IR::ConsumesDef::ConsumesDef (void) + { +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); ++ this->optable_ = &tao_IR_ConsumesDef_optable; + } + +-CORBA::Boolean +-POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_create_publishes::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++// copy ctor ++POA_IR::ConsumesDef::ConsumesDef (const ConsumesDef& rhs) ++ : ACE_NESTED_CLASS (POA_IR,EventDef) (rhs), ++ ACE_NESTED_CLASS (POA_IR,Contained) (rhs), ++ POA_CORBA_IRObject (rhs), ++ TAO_ServantBase (rhs) ++{} ++ ++// skeleton destructor ++POA_IR::ConsumesDef::~ConsumesDef (void) + { +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); + } + +-void +-POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_create_publishes::result (IR::PublishesDef_ptr result) ++void POA_IR::ConsumesDef::_is_a_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void * _tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++ ) + { +- // Update the result. +- this->_result = result; ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::ConsumesDef *_tao_impl = (POA_IR::ConsumesDef *) _tao_object_reference; ++ CORBA::Boolean _tao_retval = 0; ++ CORBA::String_var value; + if (!((_tao_in >> value.out ()))) - ACE_THROW (CORBA::MARSHAL ()); - - _tao_retval = _tao_impl->_is_a (value.in (), ACE_TRY_ENV); -@@ -38926,7 +38781,7 @@ - - _tao_server_request.init_reply (); - TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); -- if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) ++ ACE_THROW (CORBA::MARSHAL ()); ++ ++ _tao_retval = _tao_impl->_is_a (value.in (), ACE_TRY_ENV); ++ ACE_CHECK; ++ ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); + if (!((_tao_out << CORBA::Any::from_boolean (_tao_retval)))) - ACE_THROW (CORBA::MARSHAL ()); ++ ACE_THROW (CORBA::MARSHAL ()); } -@@ -38943,7 +38798,7 @@ - - _tao_server_request.init_reply (); - TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); -- if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) +-POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_create_consumes::TAO_ServerRequestInfo_IR_ComponentDef_create_consumes ( ++void POA_IR::ConsumesDef::_non_existent_skel ( + TAO_ServerRequest &_tao_server_request, +- POA_IR::ComponentDef *tao_impl +- , +- const char * id, +- const char * name, +- const char * version, +- IR::ValueDef_ptr value, +- CORBA::Environment & ++ void * _tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV + ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- id_ (id), +- name_ (name), +- version_ (version), +- value_ (value) +-{} +- +-Dynamic::ParameterList * +-POA_IR::ComponentDef::TAO_ServerRequestInfo_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 (); ++{ ++ POA_IR::ConsumesDef *_tao_impl = (POA_IR::ConsumesDef *) _tao_object_reference; ++ CORBA::Boolean _tao_retval = _tao_impl->_non_existent (ACE_TRY_ENV); ++ ACE_CHECK; ++ ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); + if (!((_tao_out << CORBA::Any::from_boolean (_tao_retval)))) - ACE_THROW (CORBA::MARSHAL ()); ++ ACE_THROW (CORBA::MARSHAL ()); } -@@ -38974,7 +38829,7 @@ - if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Contained:1.0") == 0) - return ACE_static_cast (POA_IR::Contained_ptr, this); - if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/IRObject:1.0") == 0) -- return ACE_static_cast (POA_CORBA::IRObject_ptr, this); +-Dynamic::ExceptionList * +-POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_create_consumes::exceptions (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++CORBA::Boolean POA_IR::ConsumesDef::_is_a ( ++ const char* value, ++ CORBA::Environment &ACE_TRY_ENV ++ ) + { +- // 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; ++ if ( ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/ConsumesDef:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/EventDef:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/Contained:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/CORBA/IRObject:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, CORBA::_tc_Object->id (ACE_TRY_ENV)))) ++ return 1; ++ else ++ return 0; + } + +-CORBA::Any * +-POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_create_consumes::result (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++void* POA_IR::ConsumesDef::_downcast ( ++ const char* logical_type_id ++ ) + { +- // 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 (); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/ConsumesDef:1.0") == 0) ++ return ACE_static_cast (POA_IR::ConsumesDef_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/EventDef:1.0") == 0) ++ return ACE_static_cast (POA_IR::EventDef_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Contained:1.0") == 0) ++ return ACE_static_cast (POA_IR::Contained_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/IRObject:1.0") == 0) + return ACE_static_cast (POA_CORBA_IRObject_ptr, this); - if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/Object:1.0") == 0) - return ACE_static_cast(PortableServer::Servant, this); - return 0; -@@ -39004,12 +38859,12 @@ - ACE_NEW_RETURN (tmp, CORBA::Object (stub, 0, this), 0); - - CORBA::Object_var obj = tmp; -- return ::IR::ConsumesDef::_unchecked_narrow (obj.in ()); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/Object:1.0") == 0) ++ return ACE_static_cast(PortableServer::Servant, this); ++ return 0; + } + +-char * +-POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_create_consumes::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++void POA_IR::ConsumesDef::_dispatch (TAO_ServerRequest &req, void *context, CORBA::Environment &ACE_TRY_ENV) + { +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); ++ this->synchronous_upcall_dispatch(req, context, this, ACE_TRY_ENV); + } + +-CORBA::Boolean +-POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_create_consumes::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++const char* POA_IR::ConsumesDef::_interface_repository_id (void) const + { +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); ++ return "IDL:omg.org/IR/ConsumesDef:1.0"; + } + +-void +-POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_create_consumes::result (IR::ConsumesDef_ptr result) ++IR::ConsumesDef* ++POA_IR::ConsumesDef::_this (CORBA_Environment &ACE_TRY_ENV) + { +- // Update the result. +- this->_result = result; ++ TAO_Stub *stub = this->_create_stub (ACE_TRY_ENV); ++ ACE_CHECK_RETURN (0); ++ ++ CORBA::Object_ptr tmp = CORBA::Object::_nil (); ++ ++ if (stub->servant_orb_var ()->orb_core ()->optimize_collocation_objects ()) ++ ACE_NEW_RETURN (tmp, CORBA::Object (stub, 1, this), 0); ++ else ++ ACE_NEW_RETURN (tmp, CORBA::Object (stub, 0, this), 0); ++ ++ CORBA::Object_var obj = tmp; + return IR_ConsumesDef::_unchecked_narrow (obj.in ()); } -- - #if (TAO_HAS_INTERCEPTORS == 1) - #endif /* TAO_HAS_INTERCEPTORS */ -+ - class TAO_IR_ComponentDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable +-#endif /* TAO_HAS_INTERCEPTORS */ +-class TAO_IR_PrimaryKeyDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable ++class TAO_IR_ComponentDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable { private: -@@ -39017,7 +38872,7 @@ + unsigned int hash (const char *str, unsigned int len); public: const TAO_operation_db_entry * lookup (const char *str, unsigned int len); }; --/* starting time is 18:47:29 */ +-/* starting time is 16:31:13 */ +/* starting time is 11:23:11 */ /* C++ code produced by gperf version 2.8 (ACE version) */ - /* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_ComponentDef_Perfect_Hash_OpTable -N lookup */ +-/* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_PrimaryKeyDef_Perfect_Hash_OpTable -N lookup */ ++/* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_ComponentDef_Perfect_Hash_OpTable -N lookup */ unsigned int -@@ -39185,10 +39040,9 @@ +-TAO_IR_PrimaryKeyDef_Perfect_Hash_OpTable::hash (const char *str, unsigned int len) ++TAO_IR_ComponentDef_Perfect_Hash_OpTable::hash (const char *str, unsigned int len) + { + static const unsigned char asso_values[] = + { + #if defined (ACE_MVS) +- 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, +- 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, +- 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, +- 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, +- 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, +- 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, +- 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, +- 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, +- 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, +- 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, +- 32, 32, 32, 32, 32, 32, 32, 32, 32, 0, +- 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, +- 32, 32, 32, 32, 32, 32, 32, 32, 32, 0, +- 32, 32, 0, 0, 32, 32, 32, 10, 32, 32, +- 32, 32, 32, 32, 32, 32, 32, 32, 0, 5, +- 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, +- 32, 32, 32, 10, 32, 32, 32, 32, 5, 32, +- 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, +- 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, +- 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, +- 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, +- 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, +- 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, +- 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, +- 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, +- 32, 32, 32, 32, 32, 32, ++ 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, ++ 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, ++ 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, ++ 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, ++ 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, ++ 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, ++ 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, ++ 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, ++ 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, ++ 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, ++ 82, 82, 82, 82, 82, 82, 82, 82, 82, 0, ++ 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, ++ 82, 82, 82, 82, 82, 82, 82, 82, 82, 0, ++ 82, 30, 5, 10, 82, 82, 82, 0, 82, 82, ++ 82, 82, 82, 82, 82, 82, 82, 45, 30, 15, ++ 82, 30, 82, 82, 82, 82, 82, 82, 82, 82, ++ 82, 82, 0, 20, 82, 82, 82, 30, 25, 82, ++ 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, ++ 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, ++ 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, ++ 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, ++ 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, ++ 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, ++ 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, ++ 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, ++ 82, 82, 82, 82, 82, 82, + #else +- 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, +- 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, +- 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, +- 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, +- 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, +- 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, +- 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, +- 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, +- 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, +- 32, 32, 32, 32, 32, 0, 32, 0, 32, 32, +- 0, 0, 32, 32, 32, 10, 32, 32, 32, 0, +- 5, 32, 32, 32, 32, 32, 10, 32, 32, 32, +- 32, 5, 32, 32, 32, 32, 32, 32, ++ 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, ++ 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, ++ 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, ++ 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, ++ 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, ++ 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, ++ 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, ++ 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, ++ 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, ++ 82, 82, 82, 82, 82, 0, 82, 0, 82, 30, ++ 5, 10, 82, 82, 82, 0, 82, 82, 45, 30, ++ 15, 82, 30, 82, 82, 0, 20, 82, 82, 82, ++ 30, 25, 82, 82, 82, 82, 82, 82, + #endif /* ACE_MVS */ + }; + return len + asso_values[str[len - 1]] + asso_values[str[0]]; + } + + const class TAO_operation_db_entry * +-TAO_IR_PrimaryKeyDef_Perfect_Hash_OpTable::lookup (const char *str, unsigned int len) ++TAO_IR_ComponentDef_Perfect_Hash_OpTable::lookup (const char *str, unsigned int len) + { + enum + { +- TOTAL_KEYWORDS = 17, ++ TOTAL_KEYWORDS = 54, + MIN_WORD_LENGTH = 4, + MAX_WORD_LENGTH = 26, + MIN_HASH_VALUE = 4, +- MAX_HASH_VALUE = 31, +- HASH_VALUE_RANGE = 28, +- DUPLICATES = 4 ++ MAX_HASH_VALUE = 81, ++ HASH_VALUE_RANGE = 78, ++ DUPLICATES = 16 + }; + + static const class TAO_operation_db_entry wordlist[] = + { + {"",0},{"",0},{"",0},{"",0}, +- {"move", &POA_IR::PrimaryKeyDef::move_skel}, +- {"_is_a", &POA_IR::PrimaryKeyDef::_is_a_skel}, +- {"_get_id", &POA_IR::PrimaryKeyDef::_get_id_skel}, +- {"_set_id", &POA_IR::PrimaryKeyDef::_set_id_skel}, +- {"describe", &POA_IR::PrimaryKeyDef::describe_skel}, +- {"_get_name", &POA_IR::PrimaryKeyDef::_get_name_skel}, +- {"_set_name", &POA_IR::PrimaryKeyDef::_set_name_skel}, +- {"destroy", &POA_IR::PrimaryKeyDef::destroy_skel}, +- {"_get_def_kind", &POA_IR::PrimaryKeyDef::_get_def_kind_skel}, +- {"is_a", &POA_IR::PrimaryKeyDef::is_a_skel}, +- {"_get_version", &POA_IR::PrimaryKeyDef::_get_version_skel}, +- {"_set_version", &POA_IR::PrimaryKeyDef::_set_version_skel}, +- {"_get_absolute_name", &POA_IR::PrimaryKeyDef::_get_absolute_name_skel}, +- {"_get_defined_in", &POA_IR::PrimaryKeyDef::_get_defined_in_skel}, +- {"_get_primary_key", &POA_IR::PrimaryKeyDef::_get_primary_key_skel}, +- {"_non_existent", &POA_IR::PrimaryKeyDef::_non_existent_skel}, +- {"_get_containing_repository", &POA_IR::PrimaryKeyDef::_get_containing_repository_skel}, ++ {"is_a", &POA_IR::ComponentDef::is_a_skel}, ++ {"_is_a", &POA_IR::ComponentDef::_is_a_skel}, ++ {"_get_id", &POA_IR::ComponentDef::_get_id_skel}, ++ {"_set_id", &POA_IR::ComponentDef::_set_id_skel}, ++ {"_get_emits_events", &POA_IR::ComponentDef::_get_emits_events_skel}, ++ {"_get_def_kind", &POA_IR::ComponentDef::_get_def_kind_skel}, ++ {"_get_name", &POA_IR::ComponentDef::_get_name_skel}, ++ {"_get_type", &POA_IR::ComponentDef::_get_type_skel}, ++ {"_set_name", &POA_IR::ComponentDef::_set_name_skel}, ++ {"_get_uses_interfaces", &POA_IR::ComponentDef::_get_uses_interfaces_skel}, ++ {"_set_base_interfaces", &POA_IR::ComponentDef::_set_base_interfaces_skel}, ++ {"_get_base_interfaces", &POA_IR::ComponentDef::_get_base_interfaces_skel}, ++ {"_get_consumes_events", &POA_IR::ComponentDef::_get_consumes_events_skel}, ++ {"_get_publishes_events", &POA_IR::ComponentDef::_get_publishes_events_skel}, ++ {"describe_contents", &POA_IR::ComponentDef::describe_contents_skel}, ++ {"describe", &POA_IR::ComponentDef::describe_skel}, ++ {"_get_provides_interfaces", &POA_IR::ComponentDef::_get_provides_interfaces_skel}, ++ {"_get_supported_interfaces", &POA_IR::ComponentDef::_get_supported_interfaces_skel}, ++ {"_set_supported_interfaces", &POA_IR::ComponentDef::_set_supported_interfaces_skel}, ++ {"_get_version", &POA_IR::ComponentDef::_get_version_skel}, ++ {"_set_version", &POA_IR::ComponentDef::_set_version_skel}, ++ {"_get_absolute_name", &POA_IR::ComponentDef::_get_absolute_name_skel}, ++ {"_get_defined_in", &POA_IR::ComponentDef::_get_defined_in_skel}, ++ {"_non_existent", &POA_IR::ComponentDef::_non_existent_skel}, ++ {"_get_is_abstract", &POA_IR::ComponentDef::_get_is_abstract_skel}, ++ {"_set_is_abstract", &POA_IR::ComponentDef::_set_is_abstract_skel}, ++ {"destroy", &POA_IR::ComponentDef::destroy_skel}, ++ {"contents", &POA_IR::ComponentDef::contents_skel}, ++ {"_get_base_component", &POA_IR::ComponentDef::_get_base_component_skel}, ++ {"create_uses", &POA_IR::ComponentDef::create_uses_skel}, ++ {"create_emits", &POA_IR::ComponentDef::create_emits_skel}, ++ {"create_alias", &POA_IR::ComponentDef::create_alias_skel}, ++ {"_get_is_basic", &POA_IR::ComponentDef::_get_is_basic_skel}, ++ {"move", &POA_IR::ComponentDef::move_skel}, ++ {"create_provides", &POA_IR::ComponentDef::create_provides_skel}, ++ {"create_consumes", &POA_IR::ComponentDef::create_consumes_skel}, ++ {"create_publishes", &POA_IR::ComponentDef::create_publishes_skel}, ++ {"_get_containing_repository", &POA_IR::ComponentDef::_get_containing_repository_skel}, ++ {"create_value", &POA_IR::ComponentDef::create_value_skel}, ++ {"create_module", &POA_IR::ComponentDef::create_module_skel}, ++ {"create_native", &POA_IR::ComponentDef::create_native_skel}, ++ {"create_attribute", &POA_IR::ComponentDef::create_attribute_skel}, ++ {"create_interface", &POA_IR::ComponentDef::create_interface_skel}, ++ {"create_union", &POA_IR::ComponentDef::create_union_skel}, ++ {"_get_is_local", &POA_IR::ComponentDef::_get_is_local_skel}, ++ {"_set_is_local", &POA_IR::ComponentDef::_set_is_local_skel}, ++ {"create_operation", &POA_IR::ComponentDef::create_operation_skel}, ++ {"create_exception", &POA_IR::ComponentDef::create_exception_skel}, ++ {"create_struct", &POA_IR::ComponentDef::create_struct_skel}, ++ {"create_constant", &POA_IR::ComponentDef::create_constant_skel}, ++ {"lookup_name", &POA_IR::ComponentDef::lookup_name_skel}, ++ {"create_enum", &POA_IR::ComponentDef::create_enum_skel}, ++ {"create_value_box", &POA_IR::ComponentDef::create_value_box_skel}, ++ {"lookup", &POA_IR::ComponentDef::lookup_skel}, + }; + + static const signed char lookup[] = + { +- -6, -2, -9, -2, 4, 5, -1, -38, 8, -38, -1, -1, 11, 12, +- 13, -14, -2, -33, 16, -1, 17, 18, -1, 19, -1, -1, -1, -1, +- -1, -1, -1, 20, ++ -1, -1, -6, -2, 4, 5, -10, -3, -13, -4, -21, -2, -91, -23, ++ -2, -28, -2, 8, 9, -94, -93, 17, 18, 19, 20, -96, -1, -95, ++ 25, -1, 26, -34, -2, 27, -38, -2, -102, 30, 31, 32, -1, 33, ++ -92, 36, 37, -92, 40, -43, -2, -45, -2, 41, 42, -87, -48, -2, ++ -88, 47, -85, -50, -2, -83, -1, 52, -1, 53, 54, -1, -1, -1, ++ -1, 55, -1, -1, -1, -1, 56, -1, -1, -1, -1, 57, + }; + + if (len <= MAX_WORD_LENGTH && len >= MIN_WORD_LENGTH) +@@ -42529,137 +21014,541 @@ } return 0; } --/* ending time is 18:47:29 */ +-/* ending time is 16:31:13 */ +-static TAO_IR_PrimaryKeyDef_Perfect_Hash_OpTable tao_IR_PrimaryKeyDef_optable; +- +/* ending time is 11:23:11 */ - static TAO_IR_ComponentDef_Perfect_Hash_OpTable tao_IR_ComponentDef_optable; ++static TAO_IR_ComponentDef_Perfect_Hash_OpTable tao_IR_ComponentDef_optable; -- /////////////////////////////////////////////////////////////////////// // Strategized Proxy Broker Implementation // -@@ -39214,9 +39068,9 @@ - - } --IR::_TAO_ComponentDef_Proxy_Impl& +-// Factory function Implementation. +-POA_IR::_TAO_PrimaryKeyDef_Strategized_Proxy_Broker *POA_IR::_TAO_PrimaryKeyDef_Strategized_Proxy_Broker::the_TAO_PrimaryKeyDef_Strategized_Proxy_Broker (void) ++// Factory function Implementation. ++POA_IR::_TAO_ComponentDef_Strategized_Proxy_Broker *POA_IR::_TAO_ComponentDef_Strategized_Proxy_Broker::the_TAO_ComponentDef_Strategized_Proxy_Broker (void) ++{ ++ static POA_IR::_TAO_ComponentDef_Strategized_Proxy_Broker strategized_proxy_broker; ++ return &strategized_proxy_broker; ++} ++ ++POA_IR::_TAO_ComponentDef_Strategized_Proxy_Broker::_TAO_ComponentDef_Strategized_Proxy_Broker (void) ++{ ++ for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) ++ this->proxy_cache_[i] = 0; ++ ++} ++ ++POA_IR::_TAO_ComponentDef_Strategized_Proxy_Broker::~_TAO_ComponentDef_Strategized_Proxy_Broker (void) ++{ ++ for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) ++ delete this->proxy_cache_[i]; ++ ++} ++ +_TAO_ComponentDef_Proxy_Impl& - POA_IR::_TAO_ComponentDef_Strategized_Proxy_Broker::select_proxy ( -- ::IR::ComponentDef *object, ++POA_IR::_TAO_ComponentDef_Strategized_Proxy_Broker::select_proxy ( + IR_ComponentDef *object, - CORBA::Environment &ACE_TRY_ENV - ) - { -@@ -39248,7 +39102,7 @@ - case TAO_ORB_Core::THRU_POA_STRATEGY: - ACE_NEW_THROW_EX ( - this->proxy_cache_[strategy], -- POA_IR::_TAO_ComponentDef_ThruPOA_Proxy_Impl, ++ CORBA::Environment &ACE_TRY_ENV ++ ) ++{ ++ TAO_ORB_Core::TAO_Collocation_Strategies strategy = ++ TAO_ORB_Core::collocation_strategy (object); ++ ++ if (this->proxy_cache_[strategy] != 0) ++ return *this->proxy_cache_[strategy]; ++ ++ this->create_proxy (strategy, ACE_TRY_ENV); ++ ACE_CHECK_RETURN (*this->proxy_cache_[strategy]); ++ ++ return *this->proxy_cache_[strategy]; ++ ++} ++ ++void ++POA_IR::_TAO_ComponentDef_Strategized_Proxy_Broker::create_proxy ( ++ TAO_ORB_Core::TAO_Collocation_Strategies strategy, ++ CORBA::Environment &ACE_TRY_ENV ++ ) ++{ ++ ACE_GUARD (TAO_SYNCH_MUTEX, guard, this->mutex_); ++ ++ if (this->proxy_cache_[strategy] == 0) ++ { ++ switch (strategy) ++ { ++ case TAO_ORB_Core::THRU_POA_STRATEGY: ++ ACE_NEW_THROW_EX ( ++ this->proxy_cache_[strategy], + _TAO_ComponentDef_ThruPOA_Proxy_Impl, - CORBA::NO_MEMORY () - ); - ACE_CHECK; -@@ -39258,7 +39112,7 @@ - default: - ACE_NEW_THROW_EX ( - this->proxy_cache_[strategy], -- ::IR::_TAO_ComponentDef_Remote_Proxy_Impl, ++ CORBA::NO_MEMORY () ++ ); ++ ACE_CHECK; ++ break; ++ ++ case TAO_ORB_Core::REMOTE_STRATEGY: ++ default: ++ ACE_NEW_THROW_EX ( ++ this->proxy_cache_[strategy], + _TAO_ComponentDef_Remote_Proxy_Impl, - CORBA::NO_MEMORY () - ); - ACE_CHECK; -@@ -39275,26 +39129,26 @@ - /////////////////////////////////////////////////////////////////////// - - --IR::_TAO_ComponentDef_Proxy_Broker * --IR__TAO_ComponentDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) ++ CORBA::NO_MEMORY () ++ ); ++ ACE_CHECK; ++ break; ++ ++ } ++ ++ } ++} ++ ++ ++// ++// End Strategized Proxy Broker Implementation ++/////////////////////////////////////////////////////////////////////// ++ ++ +_TAO_ComponentDef_Proxy_Broker * +_TAO_ComponentDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) - { - ACE_UNUSED_ARG (obj); - return ::POA_IR::_TAO_ComponentDef_Strategized_Proxy_Broker::the_TAO_ComponentDef_Strategized_Proxy_Broker(); - } - - int --IR__TAO_ComponentDef_Proxy_Broker_Factory_Initializer (long _dummy_) ++{ ++ ACE_UNUSED_ARG (obj); ++ return ::POA_IR::_TAO_ComponentDef_Strategized_Proxy_Broker::the_TAO_ComponentDef_Strategized_Proxy_Broker(); ++} ++ ++int +_TAO_ComponentDef_Proxy_Broker_Factory_Initializer (long _dummy_) - { - ACE_UNUSED_ARG (_dummy_); - -- IR__TAO_ComponentDef_Proxy_Broker_Factory_function_pointer = -- IR__TAO_ComponentDef_Proxy_Broker_Factory_function; ++{ ++ ACE_UNUSED_ARG (_dummy_); ++ + _TAO_ComponentDef_Proxy_Broker_Factory_function_pointer = + _TAO_ComponentDef_Proxy_Broker_Factory_function; - - return 0; - } - --static int IR__TAO_ComponentDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = -- IR__TAO_ComponentDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, IR__TAO_ComponentDef_Proxy_Broker_Factory_Initializer)); ++ ++ return 0; ++} ++ +static int _TAO_ComponentDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = + _TAO_ComponentDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, _TAO_ComponentDef_Proxy_Broker_Factory_Initializer)); - - - /////////////////////////////////////////////////////////////////////// -@@ -39306,7 +39160,7 @@ - - // ThruPOA Implementation of the IDL interface methods - --IR::InterfaceDefSeq * POA_IR::_TAO_ComponentDef_ThruPOA_Proxy_Impl::supported_interfaces ( -+IR_InterfaceDefSeq * POA_IR::_TAO_ComponentDef_ThruPOA_Proxy_Impl::supported_interfaces ( - CORBA_Object *_collocated_tao_target_, - CORBA::Environment &ACE_TRY_ENV - ) -@@ -39314,7 +39168,7 @@ - CORBA::SystemException - )) - { -- IR::InterfaceDefSeq_var _tao_retval; ++ ++ ++/////////////////////////////////////////////////////////////////////// ++// ThruPOA Proxy Implementation ++// ++ ++POA_IR::_TAO_ComponentDef_ThruPOA_Proxy_Impl::_TAO_ComponentDef_ThruPOA_Proxy_Impl (void) ++{} ++ ++POA_IR::_TAO_ComponentDef_ThruPOA_Proxy_Impl::~_TAO_ComponentDef_ThruPOA_Proxy_Impl (void) ++{} ++ ++// ThruPOA Implementation of the IDL interface methods ++ ++IR::InterfaceDefSeq * POA_IR::_TAO_ComponentDef_ThruPOA_Proxy_Impl::supported_interfaces ( ++ CORBA_Object *_collocated_tao_target_, ++ CORBA::Environment &ACE_TRY_ENV ++ ) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException ++ )) ++{ + IR_InterfaceDefSeq_var _tao_retval; - ACE_UNUSED_ARG (_tao_retval); - TAO_Object_Adapter::Servant_Upcall servant_upcall ( - _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -39339,7 +39193,7 @@ - - void POA_IR::_TAO_ComponentDef_ThruPOA_Proxy_Impl::supported_interfaces ( - CORBA_Object *_collocated_tao_target_, -- const IR::InterfaceDefSeq & supported_interfaces, ++ ACE_UNUSED_ARG (_tao_retval); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "supported_interfaces", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK_RETURN (0); ++ return ACE_reinterpret_cast ( ++ POA_IR::ComponentDef_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/ComponentDef:1.0" ++ ) ++ )->supported_interfaces ( ++ ACE_TRY_ENV ++ ); ++} ++ ++void POA_IR::_TAO_ComponentDef_ThruPOA_Proxy_Impl::supported_interfaces ( ++ CORBA_Object *_collocated_tao_target_, + const IR_InterfaceDefSeq & supported_interfaces, - CORBA::Environment &ACE_TRY_ENV - ) - ACE_THROW_SPEC (( -@@ -39369,7 +39223,7 @@ - return; - } - --IR::ComponentDef_ptr POA_IR::_TAO_ComponentDef_ThruPOA_Proxy_Impl::base_component ( -+IR_ComponentDef_ptr POA_IR::_TAO_ComponentDef_ThruPOA_Proxy_Impl::base_component ( - CORBA_Object *_collocated_tao_target_, - CORBA::Environment &ACE_TRY_ENV - ) -@@ -39377,7 +39231,7 @@ - CORBA::SystemException - )) - { -- IR::ComponentDef_var _tao_retval; ++ CORBA::Environment &ACE_TRY_ENV ++ ) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException ++ )) ++{ ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "supported_interfaces", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK; ++ ACE_reinterpret_cast ( ++ POA_IR::ComponentDef_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/ComponentDef:1.0" ++ ) ++ )->supported_interfaces ( ++ supported_interfaces, ++ ACE_TRY_ENV ++ ); ++ return; ++} ++ ++IR::ComponentDef_ptr POA_IR::_TAO_ComponentDef_ThruPOA_Proxy_Impl::base_component ( ++ CORBA_Object *_collocated_tao_target_, ++ CORBA::Environment &ACE_TRY_ENV ++ ) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException ++ )) ++{ + IR_ComponentDef_var _tao_retval; - ACE_UNUSED_ARG (_tao_retval); - TAO_Object_Adapter::Servant_Upcall servant_upcall ( - _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -39400,7 +39254,7 @@ - ); - } - --IR::ProvidesDefSeq * POA_IR::_TAO_ComponentDef_ThruPOA_Proxy_Impl::provides_interfaces ( -+IR_ProvidesDefSeq * POA_IR::_TAO_ComponentDef_ThruPOA_Proxy_Impl::provides_interfaces ( - CORBA_Object *_collocated_tao_target_, - CORBA::Environment &ACE_TRY_ENV - ) -@@ -39408,7 +39262,7 @@ - CORBA::SystemException - )) - { -- IR::ProvidesDefSeq_var _tao_retval; ++ ACE_UNUSED_ARG (_tao_retval); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "base_component", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK_RETURN (0); ++ return ACE_reinterpret_cast ( ++ POA_IR::ComponentDef_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/ComponentDef:1.0" ++ ) ++ )->base_component ( ++ ACE_TRY_ENV ++ ); ++} ++ ++IR::ProvidesDefSeq * POA_IR::_TAO_ComponentDef_ThruPOA_Proxy_Impl::provides_interfaces ( ++ CORBA_Object *_collocated_tao_target_, ++ CORBA::Environment &ACE_TRY_ENV ++ ) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException ++ )) ++{ + IR_ProvidesDefSeq_var _tao_retval; - ACE_UNUSED_ARG (_tao_retval); - TAO_Object_Adapter::Servant_Upcall servant_upcall ( - _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -39431,7 +39285,7 @@ - ); - } - --IR::UsesDefSeq * POA_IR::_TAO_ComponentDef_ThruPOA_Proxy_Impl::uses_interfaces ( -+IR_UsesDefSeq * POA_IR::_TAO_ComponentDef_ThruPOA_Proxy_Impl::uses_interfaces ( - CORBA_Object *_collocated_tao_target_, - CORBA::Environment &ACE_TRY_ENV - ) -@@ -39439,7 +39293,7 @@ - CORBA::SystemException - )) - { -- IR::UsesDefSeq_var _tao_retval; ++ ACE_UNUSED_ARG (_tao_retval); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "provides_interfaces", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK_RETURN (0); ++ return ACE_reinterpret_cast ( ++ POA_IR::ComponentDef_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/ComponentDef:1.0" ++ ) ++ )->provides_interfaces ( ++ ACE_TRY_ENV ++ ); ++} ++ ++IR::UsesDefSeq * POA_IR::_TAO_ComponentDef_ThruPOA_Proxy_Impl::uses_interfaces ( ++ CORBA_Object *_collocated_tao_target_, ++ CORBA::Environment &ACE_TRY_ENV ++ ) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException ++ )) ++{ + IR_UsesDefSeq_var _tao_retval; - ACE_UNUSED_ARG (_tao_retval); - TAO_Object_Adapter::Servant_Upcall servant_upcall ( - _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -39462,7 +39316,7 @@ - ); - } - --IR::EmitsDefSeq * POA_IR::_TAO_ComponentDef_ThruPOA_Proxy_Impl::emits_events ( -+IR_EmitsDefSeq * POA_IR::_TAO_ComponentDef_ThruPOA_Proxy_Impl::emits_events ( - CORBA_Object *_collocated_tao_target_, - CORBA::Environment &ACE_TRY_ENV - ) -@@ -39470,7 +39324,7 @@ - CORBA::SystemException - )) - { -- IR::EmitsDefSeq_var _tao_retval; ++ ACE_UNUSED_ARG (_tao_retval); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "uses_interfaces", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK_RETURN (0); ++ return ACE_reinterpret_cast ( ++ POA_IR::ComponentDef_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/ComponentDef:1.0" ++ ) ++ )->uses_interfaces ( ++ ACE_TRY_ENV ++ ); ++} ++ ++IR::EmitsDefSeq * POA_IR::_TAO_ComponentDef_ThruPOA_Proxy_Impl::emits_events ( ++ CORBA_Object *_collocated_tao_target_, ++ CORBA::Environment &ACE_TRY_ENV ++ ) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException ++ )) + { +- static POA_IR::_TAO_PrimaryKeyDef_Strategized_Proxy_Broker strategized_proxy_broker; +- return &strategized_proxy_broker; + IR_EmitsDefSeq_var _tao_retval; - ACE_UNUSED_ARG (_tao_retval); - TAO_Object_Adapter::Servant_Upcall servant_upcall ( - _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -39493,7 +39347,7 @@ - ); - } - --IR::PublishesDefSeq * POA_IR::_TAO_ComponentDef_ThruPOA_Proxy_Impl::publishes_events ( -+IR_PublishesDefSeq * POA_IR::_TAO_ComponentDef_ThruPOA_Proxy_Impl::publishes_events ( - CORBA_Object *_collocated_tao_target_, - CORBA::Environment &ACE_TRY_ENV - ) -@@ -39501,7 +39355,7 @@ - CORBA::SystemException - )) - { -- IR::PublishesDefSeq_var _tao_retval; ++ ACE_UNUSED_ARG (_tao_retval); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "emits_events", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK_RETURN (0); ++ return ACE_reinterpret_cast ( ++ POA_IR::ComponentDef_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/ComponentDef:1.0" ++ ) ++ )->emits_events ( ++ ACE_TRY_ENV ++ ); + } + +-POA_IR::_TAO_PrimaryKeyDef_Strategized_Proxy_Broker::_TAO_PrimaryKeyDef_Strategized_Proxy_Broker (void) ++IR::PublishesDefSeq * POA_IR::_TAO_ComponentDef_ThruPOA_Proxy_Impl::publishes_events ( ++ CORBA_Object *_collocated_tao_target_, ++ CORBA::Environment &ACE_TRY_ENV ++ ) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException ++ )) + { +- for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) +- this->proxy_cache_[i] = 0; +- + IR_PublishesDefSeq_var _tao_retval; - ACE_UNUSED_ARG (_tao_retval); - TAO_Object_Adapter::Servant_Upcall servant_upcall ( - _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -39524,7 +39378,7 @@ - ); ++ ACE_UNUSED_ARG (_tao_retval); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "publishes_events", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK_RETURN (0); ++ return ACE_reinterpret_cast ( ++ POA_IR::ComponentDef_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/ComponentDef:1.0" ++ ) ++ )->publishes_events ( ++ ACE_TRY_ENV ++ ); + } + +-POA_IR::_TAO_PrimaryKeyDef_Strategized_Proxy_Broker::~_TAO_PrimaryKeyDef_Strategized_Proxy_Broker (void) ++IR::ConsumesDefSeq * POA_IR::_TAO_ComponentDef_ThruPOA_Proxy_Impl::consumes_events ( ++ CORBA_Object *_collocated_tao_target_, ++ CORBA::Environment &ACE_TRY_ENV ++ ) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException ++ )) + { +- for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) +- delete this->proxy_cache_[i]; +- ++ IR_ConsumesDefSeq_var _tao_retval; ++ ACE_UNUSED_ARG (_tao_retval); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "consumes_events", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK_RETURN (0); ++ return ACE_reinterpret_cast ( ++ POA_IR::ComponentDef_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/ComponentDef:1.0" ++ ) ++ )->consumes_events ( ++ ACE_TRY_ENV ++ ); } --IR::ConsumesDefSeq * POA_IR::_TAO_ComponentDef_ThruPOA_Proxy_Impl::consumes_events ( -+IR_ConsumesDefSeq * POA_IR::_TAO_ComponentDef_ThruPOA_Proxy_Impl::consumes_events ( - CORBA_Object *_collocated_tao_target_, +-IR::_TAO_PrimaryKeyDef_Proxy_Impl& +-POA_IR::_TAO_PrimaryKeyDef_Strategized_Proxy_Broker::select_proxy ( +- ::IR::PrimaryKeyDef *object, ++CORBA::Boolean POA_IR::_TAO_ComponentDef_ThruPOA_Proxy_Impl::is_basic ( ++ CORBA_Object *_collocated_tao_target_, CORBA::Environment &ACE_TRY_ENV ) -@@ -39532,7 +39386,7 @@ - CORBA::SystemException - )) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException ++ )) { -- IR::ConsumesDefSeq_var _tao_retval; -+ IR_ConsumesDefSeq_var _tao_retval; - ACE_UNUSED_ARG (_tao_retval); - TAO_Object_Adapter::Servant_Upcall servant_upcall ( - _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -39586,19 +39440,19 @@ - ); - } - --IR::ProvidesDef_ptr POA_IR::_TAO_ComponentDef_ThruPOA_Proxy_Impl::create_provides ( -+IR_ProvidesDef_ptr POA_IR::_TAO_ComponentDef_ThruPOA_Proxy_Impl::create_provides ( - CORBA_Object *_collocated_tao_target_, - const char * id, - const char * name, - const char * version, -- IR::InterfaceDef_ptr interface_type, +- TAO_ORB_Core::TAO_Collocation_Strategies strategy = +- TAO_ORB_Core::collocation_strategy (object); +- +- if (this->proxy_cache_[strategy] != 0) +- return *this->proxy_cache_[strategy]; +- +- this->create_proxy (strategy, ACE_TRY_ENV); +- ACE_CHECK_RETURN (*this->proxy_cache_[strategy]); +- +- return *this->proxy_cache_[strategy]; +- ++ CORBA::Boolean _tao_retval = 0; ++ ACE_UNUSED_ARG (_tao_retval); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "is_basic", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK_RETURN (_tao_retval); ++ return ACE_reinterpret_cast ( ++ POA_IR::ComponentDef_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/ComponentDef:1.0" ++ ) ++ )->is_basic ( ++ ACE_TRY_ENV ++ ); + } + +-void +-POA_IR::_TAO_PrimaryKeyDef_Strategized_Proxy_Broker::create_proxy ( +- TAO_ORB_Core::TAO_Collocation_Strategies strategy, ++IR::ProvidesDef_ptr POA_IR::_TAO_ComponentDef_ThruPOA_Proxy_Impl::create_provides ( ++ CORBA_Object *_collocated_tao_target_, ++ const char * id, ++ const char * name, ++ const char * version, + IR_InterfaceDef_ptr interface_type, CORBA::Environment &ACE_TRY_ENV ) - ACE_THROW_SPEC (( - CORBA::SystemException - )) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException ++ )) { -- IR::ProvidesDef_var _tao_retval; +- ACE_GUARD (TAO_SYNCH_MUTEX, guard, this->mutex_); +- +- if (this->proxy_cache_[strategy] == 0) +- { +- switch (strategy) +- { +- case TAO_ORB_Core::THRU_POA_STRATEGY: +- ACE_NEW_THROW_EX ( +- this->proxy_cache_[strategy], +- POA_IR::_TAO_PrimaryKeyDef_ThruPOA_Proxy_Impl, +- CORBA::NO_MEMORY () +- ); +- ACE_CHECK; +- break; +- +- case TAO_ORB_Core::REMOTE_STRATEGY: +- default: +- ACE_NEW_THROW_EX ( +- this->proxy_cache_[strategy], +- ::IR::_TAO_PrimaryKeyDef_Remote_Proxy_Impl, +- CORBA::NO_MEMORY () +- ); +- ACE_CHECK; +- break; +- +- } +- +- } + IR_ProvidesDef_var _tao_retval; - ACE_UNUSED_ARG (_tao_retval); - TAO_Object_Adapter::Servant_Upcall servant_upcall ( - _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -39625,12 +39479,12 @@ - ); ++ ACE_UNUSED_ARG (_tao_retval); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "create_provides", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK_RETURN (0); ++ return ACE_reinterpret_cast ( ++ POA_IR::ComponentDef_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/ComponentDef:1.0" ++ ) ++ )->create_provides ( ++ id, ++ name, ++ version, ++ interface_type, ++ ACE_TRY_ENV ++ ); } --IR::UsesDef_ptr POA_IR::_TAO_ComponentDef_ThruPOA_Proxy_Impl::create_uses ( -+IR_UsesDef_ptr POA_IR::_TAO_ComponentDef_ThruPOA_Proxy_Impl::create_uses ( - CORBA_Object *_collocated_tao_target_, - const char * id, - const char * name, - const char * version, -- IR::InterfaceDef_ptr interface_type, +- +-// +-// End Strategized Proxy Broker Implementation +-/////////////////////////////////////////////////////////////////////// +- +- +-IR::_TAO_PrimaryKeyDef_Proxy_Broker * +-IR__TAO_PrimaryKeyDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) ++IR::UsesDef_ptr POA_IR::_TAO_ComponentDef_ThruPOA_Proxy_Impl::create_uses ( ++ CORBA_Object *_collocated_tao_target_, ++ const char * id, ++ const char * name, ++ const char * version, + IR_InterfaceDef_ptr interface_type, - CORBA::Boolean is_multiple, - CORBA::Environment &ACE_TRY_ENV - ) -@@ -39638,7 +39492,7 @@ - CORBA::SystemException - )) - { -- IR::UsesDef_var _tao_retval; ++ CORBA::Boolean is_multiple, ++ CORBA::Environment &ACE_TRY_ENV ++ ) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException ++ )) + { +- ACE_UNUSED_ARG (obj); +- return ::POA_IR::_TAO_PrimaryKeyDef_Strategized_Proxy_Broker::the_TAO_PrimaryKeyDef_Strategized_Proxy_Broker(); + IR_UsesDef_var _tao_retval; - ACE_UNUSED_ARG (_tao_retval); - TAO_Object_Adapter::Servant_Upcall servant_upcall ( - _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -39666,19 +39520,19 @@ - ); ++ ACE_UNUSED_ARG (_tao_retval); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "create_uses", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK_RETURN (0); ++ return ACE_reinterpret_cast ( ++ POA_IR::ComponentDef_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/ComponentDef:1.0" ++ ) ++ )->create_uses ( ++ id, ++ name, ++ version, ++ interface_type, ++ is_multiple, ++ ACE_TRY_ENV ++ ); } --IR::EmitsDef_ptr POA_IR::_TAO_ComponentDef_ThruPOA_Proxy_Impl::create_emits ( -+IR_EmitsDef_ptr POA_IR::_TAO_ComponentDef_ThruPOA_Proxy_Impl::create_emits ( - CORBA_Object *_collocated_tao_target_, - const char * id, - const char * name, - const char * version, -- IR::ValueDef_ptr value, +-int +-IR__TAO_PrimaryKeyDef_Proxy_Broker_Factory_Initializer (long _dummy_) ++IR::EmitsDef_ptr POA_IR::_TAO_ComponentDef_ThruPOA_Proxy_Impl::create_emits ( ++ CORBA_Object *_collocated_tao_target_, ++ const char * id, ++ const char * name, ++ const char * version, + IR_ValueDef_ptr value, - CORBA::Environment &ACE_TRY_ENV - ) - ACE_THROW_SPEC (( - CORBA::SystemException - )) ++ CORBA::Environment &ACE_TRY_ENV ++ ) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException ++ )) { -- IR::EmitsDef_var _tao_retval; +- ACE_UNUSED_ARG (_dummy_); +- +- IR__TAO_PrimaryKeyDef_Proxy_Broker_Factory_function_pointer = +- IR__TAO_PrimaryKeyDef_Proxy_Broker_Factory_function; +- +- return 0; + IR_EmitsDef_var _tao_retval; - ACE_UNUSED_ARG (_tao_retval); - TAO_Object_Adapter::Servant_Upcall servant_upcall ( - _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -39705,19 +39559,19 @@ - ); ++ ACE_UNUSED_ARG (_tao_retval); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "create_emits", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK_RETURN (0); ++ return ACE_reinterpret_cast ( ++ POA_IR::ComponentDef_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/ComponentDef:1.0" ++ ) ++ )->create_emits ( ++ id, ++ name, ++ version, ++ value, ++ ACE_TRY_ENV ++ ); } --IR::PublishesDef_ptr POA_IR::_TAO_ComponentDef_ThruPOA_Proxy_Impl::create_publishes ( -+IR_PublishesDef_ptr POA_IR::_TAO_ComponentDef_ThruPOA_Proxy_Impl::create_publishes ( +-static int IR__TAO_PrimaryKeyDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = +- IR__TAO_PrimaryKeyDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, IR__TAO_PrimaryKeyDef_Proxy_Broker_Factory_Initializer)); +- +- +-/////////////////////////////////////////////////////////////////////// +-// ThruPOA Proxy Implementation +-// +- +-POA_IR::_TAO_PrimaryKeyDef_ThruPOA_Proxy_Impl::_TAO_PrimaryKeyDef_ThruPOA_Proxy_Impl (void) +-{} +- +-// ThruPOA Implementation of the IDL interface methods +- +-CORBA::Boolean POA_IR::_TAO_PrimaryKeyDef_ThruPOA_Proxy_Impl::is_a ( ++IR::PublishesDef_ptr POA_IR::_TAO_ComponentDef_ThruPOA_Proxy_Impl::create_publishes ( CORBA_Object *_collocated_tao_target_, - const char * id, - const char * name, - const char * version, -- IR::ValueDef_ptr value, +- const char * primary_key_id, ++ const char * id, ++ const char * name, ++ const char * version, + IR_ValueDef_ptr value, CORBA::Environment &ACE_TRY_ENV ) @@ -9506,22 +53180,46 @@ CORBA::SystemException )) { -- IR::PublishesDef_var _tao_retval; +- CORBA::Boolean _tao_retval = 0; + IR_PublishesDef_var _tao_retval; ACE_UNUSED_ARG (_tao_retval); TAO_Object_Adapter::Servant_Upcall servant_upcall ( _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -39744,19 +39598,19 @@ +@@ -42667,31 +21556,38 @@ + CORBA::Object_var forward_to; + servant_upcall.prepare_for_upcall ( + _collocated_tao_target_->_object_key (), +- "is_a", ++ "create_publishes", + forward_to.out (), + ACE_TRY_ENV + ); +- ACE_CHECK_RETURN (_tao_retval); ++ ACE_CHECK_RETURN (0); + return ACE_reinterpret_cast ( +- POA_IR::PrimaryKeyDef_ptr, ++ POA_IR::ComponentDef_ptr, + servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/PrimaryKeyDef:1.0" ++ "IDL:omg.org/IR/ComponentDef:1.0" + ) +- )->is_a ( +- primary_key_id, ++ )->create_publishes ( ++ id, ++ name, ++ version, ++ value, + ACE_TRY_ENV ); } --IR::ConsumesDef_ptr POA_IR::_TAO_ComponentDef_ThruPOA_Proxy_Impl::create_consumes ( -+IR_ConsumesDef_ptr POA_IR::_TAO_ComponentDef_ThruPOA_Proxy_Impl::create_consumes ( +-IR::ValueDef_ptr POA_IR::_TAO_PrimaryKeyDef_ThruPOA_Proxy_Impl::primary_key ( ++IR::ConsumesDef_ptr POA_IR::_TAO_ComponentDef_ThruPOA_Proxy_Impl::create_consumes ( CORBA_Object *_collocated_tao_target_, - const char * id, - const char * name, - const char * version, -- IR::ValueDef_ptr value, ++ const char * id, ++ const char * name, ++ const char * version, + IR_ValueDef_ptr value, CORBA::Environment &ACE_TRY_ENV ) @@ -9529,328 +53227,1197 @@ CORBA::SystemException )) { -- IR::ConsumesDef_var _tao_retval; +- IR::ValueDef_var _tao_retval; + IR_ConsumesDef_var _tao_retval; ACE_UNUSED_ARG (_tao_retval); TAO_Object_Adapter::Servant_Upcall servant_upcall ( _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -39799,7 +39653,7 @@ - ACE_NESTED_CLASS (POA_IR,Container) (rhs), - ACE_NESTED_CLASS (POA_IR,Contained) (rhs), - ACE_NESTED_CLASS (POA_IR,IDLType) (rhs), +@@ -42699,17 +21595,21 @@ + CORBA::Object_var forward_to; + servant_upcall.prepare_for_upcall ( + _collocated_tao_target_->_object_key (), +- "primary_key", ++ "create_consumes", + forward_to.out (), + ACE_TRY_ENV + ); + ACE_CHECK_RETURN (0); + return ACE_reinterpret_cast ( +- POA_IR::PrimaryKeyDef_ptr, ++ POA_IR::ComponentDef_ptr, + servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/PrimaryKeyDef:1.0" ++ "IDL:omg.org/IR/ComponentDef:1.0" + ) +- )->primary_key ( ++ )->create_consumes ( ++ id, ++ name, ++ version, ++ value, + ACE_TRY_ENV + ); + } +@@ -42719,836 +21619,511 @@ + /////////////////////////////////////////////////////////////////////// + + // skeleton constructor +-POA_IR::PrimaryKeyDef::PrimaryKeyDef (void) ++POA_IR::ComponentDef::ComponentDef (void) + { +- this->optable_ = &tao_IR_PrimaryKeyDef_optable; ++ this->optable_ = &tao_IR_ComponentDef_optable; + } + + // copy ctor +-POA_IR::PrimaryKeyDef::PrimaryKeyDef (const PrimaryKeyDef& rhs) +- : ACE_NESTED_CLASS (POA_IR,Contained) (rhs), - ACE_NESTED_CLASS (POA_CORBA,IRObject) (rhs), ++POA_IR::ComponentDef::ComponentDef (const ComponentDef& rhs) ++ : ACE_NESTED_CLASS (POA_IR,InterfaceDef) (rhs), ++ ACE_NESTED_CLASS (POA_IR,Container) (rhs), ++ ACE_NESTED_CLASS (POA_IR,Contained) (rhs), ++ ACE_NESTED_CLASS (POA_IR,IDLType) (rhs), + POA_CORBA_IRObject (rhs), TAO_ServantBase (rhs) {} -@@ -39817,7 +39671,7 @@ + // skeleton destructor +-POA_IR::PrimaryKeyDef::~PrimaryKeyDef (void) ++POA_IR::ComponentDef::~ComponentDef (void) { - POA_IR::ComponentDef *_tao_impl = (POA_IR::ComponentDef *)_tao_object_reference; - -- IR::InterfaceDefSeq_var _tao_retval; + } + +-void POA_IR::PrimaryKeyDef::is_a_skel ( ++void POA_IR::ComponentDef::_get_supported_interfaces_skel ( + TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, ++ void *_tao_object_reference, ++ void * /* context */, + CORBA::Environment &ACE_TRY_ENV +- ) ++) + { +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::PrimaryKeyDef *_tao_impl = (POA_IR::PrimaryKeyDef *)_tao_object_reference; +- +- CORBA::Boolean _tao_retval = 0; +- CORBA::String_var primary_key_id; +- if (!( +- (_tao_in >> primary_key_id.out ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); ++ POA_IR::ComponentDef *_tao_impl = (POA_IR::ComponentDef *)_tao_object_reference; + + IR_InterfaceDefSeq_var _tao_retval; - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( -@@ -39844,7 +39698,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::InterfaceDefSeq * _tao_retval_info = _tao_retval._retn (); -+ IR_InterfaceDefSeq * _tao_retval_info = _tao_retval._retn (); - ri.result (_tao_retval_info); - _tao_retval = _tao_retval_info; - ri.reply_status (PortableInterceptor::SUCCESSFUL); -@@ -39898,14 +39752,12 @@ - TAO_InputCDR &_tao_in = _tao_server_request.incoming (); - POA_IR::ComponentDef *_tao_impl = (POA_IR::ComponentDef *)_tao_object_reference; - -- _tao_server_request.argument_flag (0); -- IR::InterfaceDefSeq supported_interfaces; +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::PrimaryKeyDef::TAO_ServerRequestInfo_IR_PrimaryKeyDef_is_a ri ( +- _tao_server_request, +- _tao_impl +- , +- primary_key_id.in (), ++ _tao_retval = _tao_impl->supported_interfaces ( + ACE_TRY_ENV + ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->is_a ( +- primary_key_id.in (), +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- CORBA::Boolean _tao_retval_info = _tao_retval; +- ri.result (_tao_retval_info); +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; ++ + ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); ++ ++ _tao_server_request.init_reply (); + TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); + if (!( +- (_tao_out << CORBA::Any::from_boolean (_tao_retval)) ++ (_tao_out << _tao_retval.in ()) + )) +- ACE_THROW (CORBA::MARSHAL()); +- ++ ACE_THROW (CORBA::MARSHAL () ); + } + +-void POA_IR::PrimaryKeyDef::_get_primary_key_skel ( ++void POA_IR::ComponentDef::_set_supported_interfaces_skel ( + TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, ++ void *_tao_object_reference, ++ void * /* context */, + CORBA::Environment &ACE_TRY_ENV +- ) ++) + { +- POA_IR::PrimaryKeyDef *_tao_impl = (POA_IR::PrimaryKeyDef *)_tao_object_reference; +- +- IR::ValueDef_var _tao_retval; ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::ComponentDef *_tao_impl = (POA_IR::ComponentDef *)_tao_object_reference; + +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::PrimaryKeyDef::TAO_ServerRequestInfo_IR_PrimaryKeyDef_primary_key_get ri ( +- _tao_server_request, +- _tao_impl +- , +- ACE_TRY_ENV +- ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->primary_key ( +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::ValueDef_ptr _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); + IR_InterfaceDefSeq supported_interfaces; if (!( - (_tao_in >> supported_interfaces) +- (_tao_out << _tao_retval.in ()) ++ (_tao_in >> supported_interfaces) )) - ACE_THROW (CORBA::MARSHAL()); +- ACE_THROW (CORBA::MARSHAL()); ++ ACE_THROW (CORBA::MARSHAL () ); +-} ++ _tao_impl->supported_interfaces ( ++ supported_interfaces, ++ ACE_TRY_ENV ++ ); + +-void POA_IR::PrimaryKeyDef::_is_a_skel ( +- TAO_ServerRequest &_tao_server_request, +- void * _tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::PrimaryKeyDef *_tao_impl = (POA_IR::PrimaryKeyDef *) _tao_object_reference; +- CORBA::Boolean _tao_retval = 0; +- CORBA::String_var value; +- if (!(_tao_in >> value.out ())) +- ACE_THROW (CORBA::MARSHAL ()); +- +- _tao_retval = _tao_impl->_is_a (value.in (), ACE_TRY_ENV); + ACE_CHECK; +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) +- ACE_THROW (CORBA::MARSHAL ()); +-} + +-void POA_IR::PrimaryKeyDef::_non_existent_skel ( +- TAO_ServerRequest &_tao_server_request, +- void * _tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- POA_IR::PrimaryKeyDef *_tao_impl = (POA_IR::PrimaryKeyDef *) _tao_object_reference; +- CORBA::Boolean _tao_retval = _tao_impl->_non_existent (ACE_TRY_ENV); +- ACE_CHECK; +- + _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) +- ACE_THROW (CORBA::MARSHAL ()); + } + +-CORBA::Boolean POA_IR::PrimaryKeyDef::_is_a ( +- const char* value, ++void POA_IR::ComponentDef::_get_base_component_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, + CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- if ( +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/PrimaryKeyDef:1.0")) || +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/Contained:1.0")) || +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/CORBA/IRObject:1.0")) || +- (!ACE_OS::strcmp ((char *)value, CORBA::_tc_Object->id (ACE_TRY_ENV)))) +- return 1; +- else +- return 0; +-} +- +-void* POA_IR::PrimaryKeyDef::_downcast ( +- const char* logical_type_id +- ) +-{ +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/PrimaryKeyDef:1.0") == 0) +- return ACE_static_cast (POA_IR::PrimaryKeyDef_ptr, this); +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Contained:1.0") == 0) +- return ACE_static_cast (POA_IR::Contained_ptr, this); +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/IRObject:1.0") == 0) +- return ACE_static_cast (POA_CORBA::IRObject_ptr, this); +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/Object:1.0") == 0) +- return ACE_static_cast(PortableServer::Servant, this); +- return 0; +-} +- +-void POA_IR::PrimaryKeyDef::_dispatch (TAO_ServerRequest &req, void *context, CORBA::Environment &ACE_TRY_ENV) +-{ +- this->synchronous_upcall_dispatch(req, context, this, ACE_TRY_ENV); +-} +- +-const char* POA_IR::PrimaryKeyDef::_interface_repository_id (void) const +-{ +- return "IDL:omg.org/IR/PrimaryKeyDef:1.0"; +-} - - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( - _tao_server_request.orb_core ()->server_request_interceptors (), -@@ -39976,7 +39828,7 @@ +-IR::PrimaryKeyDef* +-POA_IR::PrimaryKeyDef::_this (CORBA_Environment &ACE_TRY_ENV) ++) { - POA_IR::ComponentDef *_tao_impl = (POA_IR::ComponentDef *)_tao_object_reference; - -- IR::ComponentDef_var _tao_retval; +- TAO_Stub *stub = this->_create_stub (ACE_TRY_ENV); +- ACE_CHECK_RETURN (0); +- +- CORBA::Object_ptr tmp = CORBA::Object::_nil (); +- +- if (stub->servant_orb_var ()->orb_core ()->optimize_collocation_objects ()) +- ACE_NEW_RETURN (tmp, CORBA::Object (stub, 1, this), 0); +- else +- ACE_NEW_RETURN (tmp, CORBA::Object (stub, 0, this), 0); +- +- CORBA::Object_var obj = tmp; +- return ::IR::PrimaryKeyDef::_unchecked_narrow (obj.in ()); +-} +- ++ POA_IR::ComponentDef *_tao_impl = (POA_IR::ComponentDef *)_tao_object_reference; + +-#if (TAO_HAS_INTERCEPTORS == 1) +-POA_IR::PrimaryKeyDef::TAO_ServerRequestInfo_IR_PrimaryKeyDef_is_a::TAO_ServerRequestInfo_IR_PrimaryKeyDef_is_a ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::PrimaryKeyDef *tao_impl +- , +- const char * primary_key_id, +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- primary_key_id_ (primary_key_id) +-{} + IR_ComponentDef_var _tao_retval; - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( -@@ -40003,7 +39855,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::ComponentDef_ptr _tao_retval_info = _tao_retval._retn (); -+ IR_ComponentDef_ptr _tao_retval_info = _tao_retval._retn (); - ri.result (_tao_retval_info); - _tao_retval = _tao_retval_info; - ri.reply_status (PortableInterceptor::SUCCESSFUL); -@@ -40056,7 +39908,7 @@ - { - POA_IR::ComponentDef *_tao_impl = (POA_IR::ComponentDef *)_tao_object_reference; - -- IR::ProvidesDefSeq_var _tao_retval; +-Dynamic::ParameterList * +-POA_IR::PrimaryKeyDef::TAO_ServerRequestInfo_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 (); +-} ++ _tao_retval = _tao_impl->base_component ( ++ ACE_TRY_ENV ++ ); + +-Dynamic::ExceptionList * +-POA_IR::PrimaryKeyDef::TAO_ServerRequestInfo_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; +-} ++ ACE_CHECK; + +-CORBA::Any * +-POA_IR::PrimaryKeyDef::TAO_ServerRequestInfo_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 (); ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!( ++ (_tao_out << _tao_retval.in ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + } + +-char * +-POA_IR::PrimaryKeyDef::TAO_ServerRequestInfo_IR_PrimaryKeyDef_is_a::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++void POA_IR::ComponentDef::_get_provides_interfaces_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) + { +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} ++ POA_IR::ComponentDef *_tao_impl = (POA_IR::ComponentDef *)_tao_object_reference; + +-CORBA::Boolean +-POA_IR::PrimaryKeyDef::TAO_ServerRequestInfo_IR_PrimaryKeyDef_is_a::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} + IR_ProvidesDefSeq_var _tao_retval; - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( -@@ -40083,7 +39935,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::ProvidesDefSeq * _tao_retval_info = _tao_retval._retn (); -+ IR_ProvidesDefSeq * _tao_retval_info = _tao_retval._retn (); - ri.result (_tao_retval_info); - _tao_retval = _tao_retval_info; - ri.reply_status (PortableInterceptor::SUCCESSFUL); -@@ -40136,7 +39988,7 @@ - { - POA_IR::ComponentDef *_tao_impl = (POA_IR::ComponentDef *)_tao_object_reference; - -- IR::UsesDefSeq_var _tao_retval; +-void +-POA_IR::PrimaryKeyDef::TAO_ServerRequestInfo_IR_PrimaryKeyDef_is_a::result (CORBA::Boolean result) +-{ +- // Update the result. +- this->_result = result; +-} ++ _tao_retval = _tao_impl->provides_interfaces ( ++ ACE_TRY_ENV ++ ); + +-POA_IR::PrimaryKeyDef::TAO_ServerRequestInfo_IR_PrimaryKeyDef_primary_key_get::TAO_ServerRequestInfo_IR_PrimaryKeyDef_primary_key_get ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::PrimaryKeyDef *tao_impl +- , +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl) +-{} ++ ACE_CHECK; + +-Dynamic::ParameterList * +-POA_IR::PrimaryKeyDef::TAO_ServerRequestInfo_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; ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!( ++ (_tao_out << _tao_retval.in ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + } + +-Dynamic::ExceptionList * +-POA_IR::PrimaryKeyDef::TAO_ServerRequestInfo_IR_PrimaryKeyDef_primary_key_get::exceptions (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++void POA_IR::ComponentDef::_get_uses_interfaces_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) + { +- // 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; +-} ++ POA_IR::ComponentDef *_tao_impl = (POA_IR::ComponentDef *)_tao_object_reference; + +-CORBA::Any * +-POA_IR::PrimaryKeyDef::TAO_ServerRequestInfo_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 (); +-} + IR_UsesDefSeq_var _tao_retval; - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( -@@ -40163,7 +40015,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::UsesDefSeq * _tao_retval_info = _tao_retval._retn (); -+ IR_UsesDefSeq * _tao_retval_info = _tao_retval._retn (); - ri.result (_tao_retval_info); - _tao_retval = _tao_retval_info; - ri.reply_status (PortableInterceptor::SUCCESSFUL); -@@ -40216,7 +40068,7 @@ - { - POA_IR::ComponentDef *_tao_impl = (POA_IR::ComponentDef *)_tao_object_reference; - -- IR::EmitsDefSeq_var _tao_retval; -+ IR_EmitsDefSeq_var _tao_retval; +-char * +-POA_IR::PrimaryKeyDef::TAO_ServerRequestInfo_IR_PrimaryKeyDef_primary_key_get::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} ++ _tao_retval = _tao_impl->uses_interfaces ( ++ ACE_TRY_ENV ++ ); - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( -@@ -40243,7 +40095,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::EmitsDefSeq * _tao_retval_info = _tao_retval._retn (); -+ IR_EmitsDefSeq * _tao_retval_info = _tao_retval._retn (); - ri.result (_tao_retval_info); - _tao_retval = _tao_retval_info; - ri.reply_status (PortableInterceptor::SUCCESSFUL); -@@ -40296,7 +40148,7 @@ - { - POA_IR::ComponentDef *_tao_impl = (POA_IR::ComponentDef *)_tao_object_reference; - -- IR::PublishesDefSeq_var _tao_retval; +-CORBA::Boolean +-POA_IR::PrimaryKeyDef::TAO_ServerRequestInfo_IR_PrimaryKeyDef_primary_key_get::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} ++ ACE_CHECK; + +-void +-POA_IR::PrimaryKeyDef::TAO_ServerRequestInfo_IR_PrimaryKeyDef_primary_key_get::result (IR::ValueDef_ptr result) +-{ +- // Update the result. +- this->_result = result; ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!( ++ (_tao_out << _tao_retval.in ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + } + +-#endif /* TAO_HAS_INTERCEPTORS */ +-class TAO_IR_FactoryDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable +-{ +-private: +- unsigned int hash (const char *str, unsigned int len); +-public: +- const TAO_operation_db_entry * lookup (const char *str, unsigned int len); +-}; +-/* starting time is 16:31:13 */ +-/* C++ code produced by gperf version 2.8 (ACE version) */ +-/* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_FactoryDef_Perfect_Hash_OpTable -N lookup */ +-unsigned int +-TAO_IR_FactoryDef_Perfect_Hash_OpTable::hash (const char *str, unsigned int len) ++void POA_IR::ComponentDef::_get_emits_events_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) + { +- static const unsigned char asso_values[] = +- { +-#if defined (ACE_MVS) +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 0, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 0, +- 37, 37, 15, 0, 10, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 0, 5, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 0, 20, 37, 37, 37, 37, 10, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, +-#else +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 0, 37, 0, 37, 37, +- 15, 0, 10, 37, 37, 37, 37, 37, 37, 0, +- 5, 37, 37, 37, 37, 0, 20, 37, 37, 37, +- 37, 10, 37, 37, 37, 37, 37, 37, +-#endif /* ACE_MVS */ +- }; +- return len + asso_values[str[len - 1]] + asso_values[str[0]]; ++ POA_IR::ComponentDef *_tao_impl = (POA_IR::ComponentDef *)_tao_object_reference; ++ ++ IR_EmitsDefSeq_var _tao_retval; ++ ++ _tao_retval = _tao_impl->emits_events ( ++ ACE_TRY_ENV ++ ); ++ ++ ACE_CHECK; ++ ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!( ++ (_tao_out << _tao_retval.in ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + } + +-const class TAO_operation_db_entry * +-TAO_IR_FactoryDef_Perfect_Hash_OpTable::lookup (const char *str, unsigned int len) ++void POA_IR::ComponentDef::_get_publishes_events_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) + { +- enum +- { +- TOTAL_KEYWORDS = 26, +- MIN_WORD_LENGTH = 4, +- MAX_WORD_LENGTH = 26, +- MIN_HASH_VALUE = 4, +- MAX_HASH_VALUE = 36, +- HASH_VALUE_RANGE = 33, +- DUPLICATES = 10 +- }; ++ POA_IR::ComponentDef *_tao_impl = (POA_IR::ComponentDef *)_tao_object_reference; + +- static const class TAO_operation_db_entry wordlist[] = +- { +- {"",0},{"",0},{"",0},{"",0}, +- {"move", &POA_IR::FactoryDef::move_skel}, +- {"_is_a", &POA_IR::FactoryDef::_is_a_skel}, +- {"_get_mode", &POA_IR::FactoryDef::_get_mode_skel}, +- {"_set_name", &POA_IR::FactoryDef::_set_name_skel}, +- {"_get_name", &POA_IR::FactoryDef::_get_name_skel}, +- {"_set_mode", &POA_IR::FactoryDef::_set_mode_skel}, +- {"_get_params", &POA_IR::FactoryDef::_get_params_skel}, +- {"_set_params", &POA_IR::FactoryDef::_set_params_skel}, +- {"_get_contexts", &POA_IR::FactoryDef::_get_contexts_skel}, +- {"_set_contexts", &POA_IR::FactoryDef::_set_contexts_skel}, +- {"_get_exceptions", &POA_IR::FactoryDef::_get_exceptions_skel}, +- {"_set_exceptions", &POA_IR::FactoryDef::_set_exceptions_skel}, +- {"_get_version", &POA_IR::FactoryDef::_get_version_skel}, +- {"_set_version", &POA_IR::FactoryDef::_set_version_skel}, +- {"_get_absolute_name", &POA_IR::FactoryDef::_get_absolute_name_skel}, +- {"_get_defined_in", &POA_IR::FactoryDef::_get_defined_in_skel}, +- {"_get_id", &POA_IR::FactoryDef::_get_id_skel}, +- {"_set_id", &POA_IR::FactoryDef::_set_id_skel}, +- {"describe", &POA_IR::FactoryDef::describe_skel}, +- {"_get_result_def", &POA_IR::FactoryDef::_get_result_def_skel}, +- {"_set_result_def", &POA_IR::FactoryDef::_set_result_def_skel}, +- {"_get_def_kind", &POA_IR::FactoryDef::_get_def_kind_skel}, +- {"_get_result", &POA_IR::FactoryDef::_get_result_skel}, +- {"destroy", &POA_IR::FactoryDef::destroy_skel}, +- {"_non_existent", &POA_IR::FactoryDef::_non_existent_skel}, +- {"_get_containing_repository", &POA_IR::FactoryDef::_get_containing_repository_skel}, +- }; + IR_PublishesDefSeq_var _tao_retval; - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( -@@ -40323,7 +40175,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::PublishesDefSeq * _tao_retval_info = _tao_retval._retn (); -+ IR_PublishesDefSeq * _tao_retval_info = _tao_retval._retn (); - ri.result (_tao_retval_info); - _tao_retval = _tao_retval_info; - ri.reply_status (PortableInterceptor::SUCCESSFUL); -@@ -40376,7 +40228,7 @@ - { - POA_IR::ComponentDef *_tao_impl = (POA_IR::ComponentDef *)_tao_object_reference; - -- IR::ConsumesDefSeq_var _tao_retval; +- if (len <= MAX_WORD_LENGTH && len >= MIN_WORD_LENGTH) +- { +- unsigned int key = hash (str, len); ++ _tao_retval = _tao_impl->publishes_events ( ++ ACE_TRY_ENV ++ ); + +- if (key <= MAX_HASH_VALUE && key >= MIN_HASH_VALUE) +- { +- { +- const class TAO_operation_db_entry *resword; ++ ACE_CHECK; + +- switch (key) +- { +- case 4: +- resword = &wordlist[4]; break; +- case 5: +- resword = &wordlist[5]; break; +- case 9: +- resword = &wordlist[6]; +- if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; +- resword = &wordlist[7]; +- if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; +- resword = &wordlist[8]; +- if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; +- resword = &wordlist[9]; +- if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; +- return 0; +- case 11: +- resword = &wordlist[10]; +- if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; +- resword = &wordlist[11]; +- if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; +- return 0; +- case 13: +- resword = &wordlist[12]; +- if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; +- resword = &wordlist[13]; +- if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; +- return 0; +- case 15: +- resword = &wordlist[14]; +- if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; +- resword = &wordlist[15]; +- if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; +- return 0; +- case 17: +- resword = &wordlist[16]; +- if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; +- resword = &wordlist[17]; +- if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; +- return 0; +- case 18: +- resword = &wordlist[18]; break; +- case 20: +- resword = &wordlist[19]; break; +- case 22: +- resword = &wordlist[20]; +- if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; +- resword = &wordlist[21]; +- if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; +- return 0; +- case 23: +- resword = &wordlist[22]; break; +- case 25: +- resword = &wordlist[23]; +- if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; +- resword = &wordlist[24]; +- if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; +- return 0; +- case 28: +- resword = &wordlist[25]; break; +- case 31: +- resword = &wordlist[26]; break; +- case 32: +- resword = &wordlist[27]; break; +- case 33: +- resword = &wordlist[28]; break; +- case 36: +- resword = &wordlist[29]; break; +- default: return 0; +- } +- if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) +- return resword; +- return 0; +- } +- } +- } +- return 0; ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!( ++ (_tao_out << _tao_retval.in ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + } +-/* ending time is 16:31:13 */ +-static TAO_IR_FactoryDef_Perfect_Hash_OpTable tao_IR_FactoryDef_optable; + ++void POA_IR::ComponentDef::_get_consumes_events_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) ++{ ++ POA_IR::ComponentDef *_tao_impl = (POA_IR::ComponentDef *)_tao_object_reference; ++ + IR_ConsumesDefSeq_var _tao_retval; ++ ++ _tao_retval = _tao_impl->consumes_events ( ++ ACE_TRY_ENV ++ ); - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( -@@ -40403,7 +40255,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::ConsumesDefSeq * _tao_retval_info = _tao_retval._retn (); -+ IR_ConsumesDefSeq * _tao_retval_info = _tao_retval._retn (); - ri.result (_tao_retval_info); - _tao_retval = _tao_retval_info; - ri.reply_status (PortableInterceptor::SUCCESSFUL); -@@ -40536,11 +40388,11 @@ - TAO_InputCDR &_tao_in = _tao_server_request.incoming (); - POA_IR::ComponentDef *_tao_impl = (POA_IR::ComponentDef *)_tao_object_reference; - -- IR::ProvidesDef_var _tao_retval; +-/////////////////////////////////////////////////////////////////////// +-// Strategized Proxy Broker Implementation +-// ++ ACE_CHECK; + +-// Factory function Implementation. +-POA_IR::_TAO_FactoryDef_Strategized_Proxy_Broker *POA_IR::_TAO_FactoryDef_Strategized_Proxy_Broker::the_TAO_FactoryDef_Strategized_Proxy_Broker (void) +-{ +- static POA_IR::_TAO_FactoryDef_Strategized_Proxy_Broker strategized_proxy_broker; +- return &strategized_proxy_broker; ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!( ++ (_tao_out << _tao_retval.in ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + } + +-POA_IR::_TAO_FactoryDef_Strategized_Proxy_Broker::_TAO_FactoryDef_Strategized_Proxy_Broker (void) ++void POA_IR::ComponentDef::_get_is_basic_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) + { +- for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) +- this->proxy_cache_[i] = 0; +- +-} ++ POA_IR::ComponentDef *_tao_impl = (POA_IR::ComponentDef *)_tao_object_reference; + +-POA_IR::_TAO_FactoryDef_Strategized_Proxy_Broker::~_TAO_FactoryDef_Strategized_Proxy_Broker (void) +-{ +- for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) +- delete this->proxy_cache_[i]; +- ++ CORBA::Boolean _tao_retval = 0; ++ ++ _tao_retval = _tao_impl->is_basic ( ++ ACE_TRY_ENV ++ ); ++ ++ ACE_CHECK; ++ ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!( ++ (_tao_out << CORBA::Any::from_boolean (_tao_retval)) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + } + +-IR::_TAO_FactoryDef_Proxy_Impl& +-POA_IR::_TAO_FactoryDef_Strategized_Proxy_Broker::select_proxy ( +- ::IR::FactoryDef *object, ++void POA_IR::ComponentDef::create_provides_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, + CORBA::Environment &ACE_TRY_ENV +- ) ++) + { +- TAO_ORB_Core::TAO_Collocation_Strategies strategy = +- TAO_ORB_Core::collocation_strategy (object); +- +- if (this->proxy_cache_[strategy] != 0) +- return *this->proxy_cache_[strategy]; +- +- this->create_proxy (strategy, ACE_TRY_ENV); +- ACE_CHECK_RETURN (*this->proxy_cache_[strategy]); +- +- return *this->proxy_cache_[strategy]; +- ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::ComponentDef *_tao_impl = (POA_IR::ComponentDef *)_tao_object_reference; ++ + IR_ProvidesDef_var _tao_retval; - CORBA::String_var id; - CORBA::String_var name; - CORBA::String_var version; -- IR::InterfaceDef_var interface_type; ++ CORBA::String_var id; ++ CORBA::String_var name; ++ CORBA::String_var version; + IR_InterfaceDef_var interface_type; - if (!( - (_tao_in >> id.out ()) && - (_tao_in >> name.out ()) && -@@ -40549,7 +40401,6 @@ - )) - ACE_THROW (CORBA::MARSHAL()); - -- - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( - _tao_server_request.orb_core ()->server_request_interceptors (), -@@ -40583,7 +40434,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::ProvidesDef_ptr _tao_retval_info = _tao_retval._retn (); -+ IR_ProvidesDef_ptr _tao_retval_info = _tao_retval._retn (); - ri.result (_tao_retval_info); - _tao_retval = _tao_retval_info; - ri.reply_status (PortableInterceptor::SUCCESSFUL); -@@ -40637,11 +40488,11 @@ - TAO_InputCDR &_tao_in = _tao_server_request.incoming (); - POA_IR::ComponentDef *_tao_impl = (POA_IR::ComponentDef *)_tao_object_reference; - -- IR::UsesDef_var _tao_retval; ++ if (!( ++ (_tao_in >> id.out ()) && ++ (_tao_in >> name.out ()) && ++ (_tao_in >> version.out ()) && ++ (_tao_in >> interface_type.out ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); ++ ++ _tao_retval = _tao_impl->create_provides ( ++ id.in (), ++ name.in (), ++ version.in (), ++ interface_type.in (), ++ ACE_TRY_ENV ++ ); ++ ++ ACE_CHECK; ++ ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!( ++ (_tao_out << _tao_retval.in ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + } + +-void +-POA_IR::_TAO_FactoryDef_Strategized_Proxy_Broker::create_proxy ( +- TAO_ORB_Core::TAO_Collocation_Strategies strategy, ++void POA_IR::ComponentDef::create_uses_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, + CORBA::Environment &ACE_TRY_ENV +- ) ++) + { +- ACE_GUARD (TAO_SYNCH_MUTEX, guard, this->mutex_); +- +- if (this->proxy_cache_[strategy] == 0) +- { +- switch (strategy) +- { +- case TAO_ORB_Core::THRU_POA_STRATEGY: +- ACE_NEW_THROW_EX ( +- this->proxy_cache_[strategy], +- POA_IR::_TAO_FactoryDef_ThruPOA_Proxy_Impl, +- CORBA::NO_MEMORY () +- ); +- ACE_CHECK; +- break; +- +- case TAO_ORB_Core::REMOTE_STRATEGY: +- default: +- ACE_NEW_THROW_EX ( +- this->proxy_cache_[strategy], +- ::IR::_TAO_FactoryDef_Remote_Proxy_Impl, +- CORBA::NO_MEMORY () +- ); +- ACE_CHECK; +- break; +- +- } +- +- } +-} ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::ComponentDef *_tao_impl = (POA_IR::ComponentDef *)_tao_object_reference; + + IR_UsesDef_var _tao_retval; - CORBA::String_var id; - CORBA::String_var name; - CORBA::String_var version; -- IR::InterfaceDef_var interface_type; ++ CORBA::String_var id; ++ CORBA::String_var name; ++ CORBA::String_var version; + IR_InterfaceDef_var interface_type; - CORBA::Boolean is_multiple; - if (!( - (_tao_in >> id.out ()) && -@@ -40652,7 +40503,6 @@ - )) - ACE_THROW (CORBA::MARSHAL()); - -- - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( - _tao_server_request.orb_core ()->server_request_interceptors (), -@@ -40688,7 +40538,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::UsesDef_ptr _tao_retval_info = _tao_retval._retn (); -+ IR_UsesDef_ptr _tao_retval_info = _tao_retval._retn (); - ri.result (_tao_retval_info); - _tao_retval = _tao_retval_info; - ri.reply_status (PortableInterceptor::SUCCESSFUL); -@@ -40742,11 +40592,11 @@ - TAO_InputCDR &_tao_in = _tao_server_request.incoming (); - POA_IR::ComponentDef *_tao_impl = (POA_IR::ComponentDef *)_tao_object_reference; - -- IR::EmitsDef_var _tao_retval; ++ CORBA::Boolean is_multiple; ++ if (!( ++ (_tao_in >> id.out ()) && ++ (_tao_in >> name.out ()) && ++ (_tao_in >> version.out ()) && ++ (_tao_in >> interface_type.out ()) && ++ (_tao_in >> CORBA::Any::to_boolean (is_multiple)) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + +-// +-// End Strategized Proxy Broker Implementation +-/////////////////////////////////////////////////////////////////////// ++ _tao_retval = _tao_impl->create_uses ( ++ id.in (), ++ name.in (), ++ version.in (), ++ interface_type.in (), ++ is_multiple, ++ ACE_TRY_ENV ++ ); + ++ ACE_CHECK; + +-IR::_TAO_FactoryDef_Proxy_Broker * +-IR__TAO_FactoryDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) +-{ +- ACE_UNUSED_ARG (obj); +- return ::POA_IR::_TAO_FactoryDef_Strategized_Proxy_Broker::the_TAO_FactoryDef_Strategized_Proxy_Broker(); ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!( ++ (_tao_out << _tao_retval.in ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + } + +-int +-IR__TAO_FactoryDef_Proxy_Broker_Factory_Initializer (long _dummy_) ++void POA_IR::ComponentDef::create_emits_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) + { +- ACE_UNUSED_ARG (_dummy_); +- +- IR__TAO_FactoryDef_Proxy_Broker_Factory_function_pointer = +- IR__TAO_FactoryDef_Proxy_Broker_Factory_function; +- +- return 0; +-} ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::ComponentDef *_tao_impl = (POA_IR::ComponentDef *)_tao_object_reference; + +-static int IR__TAO_FactoryDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = +- IR__TAO_FactoryDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, IR__TAO_FactoryDef_Proxy_Broker_Factory_Initializer)); + IR_EmitsDef_var _tao_retval; - CORBA::String_var id; - CORBA::String_var name; - CORBA::String_var version; -- IR::ValueDef_var value; ++ CORBA::String_var id; ++ CORBA::String_var name; ++ CORBA::String_var version; + IR_ValueDef_var value; - if (!( - (_tao_in >> id.out ()) && - (_tao_in >> name.out ()) && -@@ -40755,7 +40605,6 @@ - )) - ACE_THROW (CORBA::MARSHAL()); - -- - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( - _tao_server_request.orb_core ()->server_request_interceptors (), -@@ -40789,7 +40638,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::EmitsDef_ptr _tao_retval_info = _tao_retval._retn (); -+ IR_EmitsDef_ptr _tao_retval_info = _tao_retval._retn (); - ri.result (_tao_retval_info); - _tao_retval = _tao_retval_info; - ri.reply_status (PortableInterceptor::SUCCESSFUL); -@@ -40843,11 +40692,11 @@ - TAO_InputCDR &_tao_in = _tao_server_request.incoming (); - POA_IR::ComponentDef *_tao_impl = (POA_IR::ComponentDef *)_tao_object_reference; - -- IR::PublishesDef_var _tao_retval; ++ if (!( ++ (_tao_in >> id.out ()) && ++ (_tao_in >> name.out ()) && ++ (_tao_in >> version.out ()) && ++ (_tao_in >> value.out ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + ++ _tao_retval = _tao_impl->create_emits ( ++ id.in (), ++ name.in (), ++ version.in (), ++ value.in (), ++ ACE_TRY_ENV ++ ); + +-/////////////////////////////////////////////////////////////////////// +-// ThruPOA Proxy Implementation +-// ++ ACE_CHECK; + +-POA_IR::_TAO_FactoryDef_ThruPOA_Proxy_Impl::_TAO_FactoryDef_ThruPOA_Proxy_Impl (void) +-{} ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!( ++ (_tao_out << _tao_retval.in ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); ++} + +-// ThruPOA Implementation of the IDL interface methods ++void POA_IR::ComponentDef::create_publishes_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) ++{ ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::ComponentDef *_tao_impl = (POA_IR::ComponentDef *)_tao_object_reference; + +-// +-// End ThruPOA Proxy Implementation +-/////////////////////////////////////////////////////////////////////// + IR_PublishesDef_var _tao_retval; - CORBA::String_var id; - CORBA::String_var name; - CORBA::String_var version; -- IR::ValueDef_var value; ++ CORBA::String_var id; ++ CORBA::String_var name; ++ CORBA::String_var version; + IR_ValueDef_var value; - if (!( - (_tao_in >> id.out ()) && - (_tao_in >> name.out ()) && -@@ -40856,7 +40705,6 @@ - )) - ACE_THROW (CORBA::MARSHAL()); - -- - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( - _tao_server_request.orb_core ()->server_request_interceptors (), -@@ -40890,7 +40738,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::PublishesDef_ptr _tao_retval_info = _tao_retval._retn (); -+ IR_PublishesDef_ptr _tao_retval_info = _tao_retval._retn (); - ri.result (_tao_retval_info); - _tao_retval = _tao_retval_info; - ri.reply_status (PortableInterceptor::SUCCESSFUL); -@@ -40944,11 +40792,11 @@ - TAO_InputCDR &_tao_in = _tao_server_request.incoming (); - POA_IR::ComponentDef *_tao_impl = (POA_IR::ComponentDef *)_tao_object_reference; - -- IR::ConsumesDef_var _tao_retval; ++ if (!( ++ (_tao_in >> id.out ()) && ++ (_tao_in >> name.out ()) && ++ (_tao_in >> version.out ()) && ++ (_tao_in >> value.out ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + +-// skeleton constructor +-POA_IR::FactoryDef::FactoryDef (void) +-{ +- this->optable_ = &tao_IR_FactoryDef_optable; ++ _tao_retval = _tao_impl->create_publishes ( ++ id.in (), ++ name.in (), ++ version.in (), ++ value.in (), ++ ACE_TRY_ENV ++ ); ++ ++ ACE_CHECK; ++ ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!( ++ (_tao_out << _tao_retval.in ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + } + +-// copy ctor +-POA_IR::FactoryDef::FactoryDef (const FactoryDef& rhs) +- : ACE_NESTED_CLASS (POA_IR,OperationDef) (rhs), +- ACE_NESTED_CLASS (POA_IR,Contained) (rhs), +- ACE_NESTED_CLASS (POA_CORBA,IRObject) (rhs), +- TAO_ServantBase (rhs) +-{} ++void POA_IR::ComponentDef::create_consumes_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) ++{ ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::ComponentDef *_tao_impl = (POA_IR::ComponentDef *)_tao_object_reference; ++ + IR_ConsumesDef_var _tao_retval; - CORBA::String_var id; - CORBA::String_var name; - CORBA::String_var version; -- IR::ValueDef_var value; ++ CORBA::String_var id; ++ CORBA::String_var name; ++ CORBA::String_var version; + IR_ValueDef_var value; - if (!( - (_tao_in >> id.out ()) && - (_tao_in >> name.out ()) && -@@ -40957,7 +40805,6 @@ - )) - ACE_THROW (CORBA::MARSHAL()); - -- - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( - _tao_server_request.orb_core ()->server_request_interceptors (), -@@ -40991,7 +40838,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::ConsumesDef_ptr _tao_retval_info = _tao_retval._retn (); -+ IR_ConsumesDef_ptr _tao_retval_info = _tao_retval._retn (); - ri.result (_tao_retval_info); - _tao_retval = _tao_retval_info; - ri.reply_status (PortableInterceptor::SUCCESSFUL); -@@ -41046,7 +40893,7 @@ - POA_IR::ComponentDef *_tao_impl = (POA_IR::ComponentDef *) _tao_object_reference; ++ if (!( ++ (_tao_in >> id.out ()) && ++ (_tao_in >> name.out ()) && ++ (_tao_in >> version.out ()) && ++ (_tao_in >> value.out ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); ++ ++ _tao_retval = _tao_impl->create_consumes ( ++ id.in (), ++ name.in (), ++ version.in (), ++ value.in (), ++ ACE_TRY_ENV ++ ); + +-// skeleton destructor +-POA_IR::FactoryDef::~FactoryDef (void) +-{ ++ ACE_CHECK; ++ ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!( ++ (_tao_out << _tao_retval.in ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + } + +-void POA_IR::FactoryDef::_is_a_skel ( +- TAO_ServerRequest &_tao_server_request, ++void POA_IR::ComponentDef::_is_a_skel ( ++ TAO_ServerRequest &_tao_server_request, + void * _tao_object_reference, + void * /* context */, + CORBA::Environment &ACE_TRY_ENV + ) + { + TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::FactoryDef *_tao_impl = (POA_IR::FactoryDef *) _tao_object_reference; ++ POA_IR::ComponentDef *_tao_impl = (POA_IR::ComponentDef *) _tao_object_reference; CORBA::Boolean _tao_retval = 0; CORBA::String_var value; - if (!(_tao_in >> value.out ())) + if (!((_tao_in >> value.out ()))) ACE_THROW (CORBA::MARSHAL ()); - +- ++ _tao_retval = _tao_impl->_is_a (value.in (), ACE_TRY_ENV); -@@ -41054,7 +40901,7 @@ - + ACE_CHECK; +- ++ _tao_server_request.init_reply (); TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); - if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) @@ -9858,8 +54425,21 @@ ACE_THROW (CORBA::MARSHAL ()); } -@@ -41071,7 +40918,7 @@ - +-void POA_IR::FactoryDef::_non_existent_skel ( +- TAO_ServerRequest &_tao_server_request, ++void POA_IR::ComponentDef::_non_existent_skel ( ++ TAO_ServerRequest &_tao_server_request, + void * _tao_object_reference, + void * /* context */, + CORBA::Environment &ACE_TRY_ENV + ) + { +- POA_IR::FactoryDef *_tao_impl = (POA_IR::FactoryDef *) _tao_object_reference; ++ POA_IR::ComponentDef *_tao_impl = (POA_IR::ComponentDef *) _tao_object_reference; + CORBA::Boolean _tao_retval = _tao_impl->_non_existent (ACE_TRY_ENV); + ACE_CHECK; +- ++ _tao_server_request.init_reply (); TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); - if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) @@ -9867,238 +54447,658 @@ ACE_THROW (CORBA::MARSHAL ()); } -@@ -41108,7 +40955,7 @@ - if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/IDLType:1.0") == 0) - return ACE_static_cast (POA_IR::IDLType_ptr, this); +-CORBA::Boolean POA_IR::FactoryDef::_is_a ( ++CORBA::Boolean POA_IR::ComponentDef::_is_a ( + const char* value, + CORBA::Environment &ACE_TRY_ENV + ) + { + if ( +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/FactoryDef:1.0")) || +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/OperationDef:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/ComponentDef:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/InterfaceDef:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/Container:1.0")) || + (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/Contained:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/IDLType:1.0")) || + (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/CORBA/IRObject:1.0")) || + (!ACE_OS::strcmp ((char *)value, CORBA::_tc_Object->id (ACE_TRY_ENV)))) + return 1; +@@ -43556,35 +22131,39 @@ + return 0; + } + +-void* POA_IR::FactoryDef::_downcast ( ++void* POA_IR::ComponentDef::_downcast ( + const char* logical_type_id + ) + { +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/FactoryDef:1.0") == 0) +- return ACE_static_cast (POA_IR::FactoryDef_ptr, this); +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/OperationDef:1.0") == 0) +- return ACE_static_cast (POA_IR::OperationDef_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/ComponentDef:1.0") == 0) ++ return ACE_static_cast (POA_IR::ComponentDef_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/InterfaceDef:1.0") == 0) ++ return ACE_static_cast (POA_IR::InterfaceDef_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Container:1.0") == 0) ++ return ACE_static_cast (POA_IR::Container_ptr, this); + if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Contained:1.0") == 0) + return ACE_static_cast (POA_IR::Contained_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/IDLType:1.0") == 0) ++ return ACE_static_cast (POA_IR::IDLType_ptr, this); if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/IRObject:1.0") == 0) - return ACE_static_cast (POA_CORBA::IRObject_ptr, this); + return ACE_static_cast (POA_CORBA_IRObject_ptr, this); if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/Object:1.0") == 0) return ACE_static_cast(PortableServer::Servant, this); return 0; -@@ -41138,10 +40985,9 @@ + } + +-void POA_IR::FactoryDef::_dispatch (TAO_ServerRequest &req, void *context, CORBA::Environment &ACE_TRY_ENV) ++void POA_IR::ComponentDef::_dispatch (TAO_ServerRequest &req, void *context, CORBA::Environment &ACE_TRY_ENV) + { + this->synchronous_upcall_dispatch(req, context, this, ACE_TRY_ENV); + } + +-const char* POA_IR::FactoryDef::_interface_repository_id (void) const ++const char* POA_IR::ComponentDef::_interface_repository_id (void) const + { +- return "IDL:omg.org/IR/FactoryDef:1.0"; ++ return "IDL:omg.org/IR/ComponentDef:1.0"; + } + +-IR::FactoryDef* +-POA_IR::FactoryDef::_this (CORBA_Environment &ACE_TRY_ENV) ++IR::ComponentDef* ++POA_IR::ComponentDef::_this (CORBA_Environment &ACE_TRY_ENV) + { + TAO_Stub *stub = this->_create_stub (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); +@@ -43597,116 +22176,111 @@ ACE_NEW_RETURN (tmp, CORBA::Object (stub, 0, this), 0); CORBA::Object_var obj = tmp; -- return ::IR::ComponentDef::_unchecked_narrow (obj.in ()); +- return ::IR::FactoryDef::_unchecked_narrow (obj.in ()); + return IR_ComponentDef::_unchecked_narrow (obj.in ()); } - - #if (TAO_HAS_INTERCEPTORS == 1) - POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_supported_interfaces_get::TAO_ServerRequestInfo_IR_ComponentDef_supported_interfaces_get ( - TAO_ServerRequest &_tao_server_request, -@@ -41221,7 +41067,7 @@ - POA_IR::ComponentDef::TAO_ServerRequestInfo_IR_ComponentDef_supported_interfaces_set::TAO_ServerRequestInfo_IR_ComponentDef_supported_interfaces_set ( - TAO_ServerRequest &_tao_server_request, - POA_IR::ComponentDef *tao_impl, -- const IR::InterfaceDefSeq & supported_interfaces, -+ const IR_InterfaceDefSeq & supported_interfaces, - CORBA::Environment & - ) - : TAO_ServerRequestInfo (_tao_server_request), -@@ -41823,7 +41669,7 @@ - const char * id, - const char * name, - const char * version, -- IR::InterfaceDef_ptr interface_type, -+ IR_InterfaceDef_ptr interface_type, - CORBA::Environment & - ) - : TAO_ServerRequestInfo (_tao_server_request), -@@ -41929,7 +41775,7 @@ - const char * id, - const char * name, - const char * version, -- IR::InterfaceDef_ptr interface_type, -+ IR_InterfaceDef_ptr interface_type, - const CORBA::Boolean & is_multiple, - CORBA::Environment & - ) -@@ -42042,7 +41888,7 @@ - const char * id, - const char * name, - const char * version, -- IR::ValueDef_ptr value, -+ IR_ValueDef_ptr value, - CORBA::Environment & - ) - : TAO_ServerRequestInfo (_tao_server_request), -@@ -42148,7 +41994,7 @@ - const char * id, - const char * name, - const char * version, -- IR::ValueDef_ptr value, -+ IR_ValueDef_ptr value, - CORBA::Environment & - ) - : TAO_ServerRequestInfo (_tao_server_request), -@@ -42254,7 +42100,7 @@ - const char * id, - const char * name, - const char * version, -- IR::ValueDef_ptr value, -+ IR_ValueDef_ptr value, - CORBA::Environment & - ) - : TAO_ServerRequestInfo (_tao_server_request), -@@ -42355,6 +42201,7 @@ - } - - #endif /* TAO_HAS_INTERCEPTORS */ -+ - class TAO_IR_PrimaryKeyDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable +-#if (TAO_HAS_INTERCEPTORS == 1) +-#endif /* TAO_HAS_INTERCEPTORS */ +-class TAO_IR_FinderDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable ++class TAO_IR_PrimaryKeyDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable { private: -@@ -42362,7 +42209,7 @@ + unsigned int hash (const char *str, unsigned int len); public: const TAO_operation_db_entry * lookup (const char *str, unsigned int len); }; --/* starting time is 18:47:29 */ +-/* starting time is 16:31:13 */ +/* starting time is 11:23:11 */ /* C++ code produced by gperf version 2.8 (ACE version) */ - /* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_PrimaryKeyDef_Perfect_Hash_OpTable -N lookup */ +-/* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_FinderDef_Perfect_Hash_OpTable -N lookup */ ++/* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_PrimaryKeyDef_Perfect_Hash_OpTable -N lookup */ unsigned int -@@ -42490,10 +42337,9 @@ +-TAO_IR_FinderDef_Perfect_Hash_OpTable::hash (const char *str, unsigned int len) ++TAO_IR_PrimaryKeyDef_Perfect_Hash_OpTable::hash (const char *str, unsigned int len) + { + static const unsigned char asso_values[] = + { + #if defined (ACE_MVS) +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 0, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 0, +- 37, 37, 15, 0, 10, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 0, 5, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 0, 20, 37, 37, 37, 37, 10, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, ++ 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, ++ 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, ++ 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, ++ 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, ++ 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, ++ 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, ++ 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, ++ 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, ++ 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, ++ 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, ++ 32, 32, 32, 32, 32, 32, 32, 32, 32, 0, ++ 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, ++ 32, 32, 32, 32, 32, 32, 32, 32, 32, 0, ++ 32, 32, 0, 0, 32, 32, 32, 10, 32, 32, ++ 32, 32, 32, 32, 32, 32, 32, 32, 0, 5, ++ 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, ++ 32, 32, 32, 10, 32, 32, 32, 32, 5, 32, ++ 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, ++ 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, ++ 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, ++ 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, ++ 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, ++ 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, ++ 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, ++ 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, ++ 32, 32, 32, 32, 32, 32, + #else +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, +- 37, 37, 37, 37, 37, 0, 37, 0, 37, 37, +- 15, 0, 10, 37, 37, 37, 37, 37, 37, 0, +- 5, 37, 37, 37, 37, 0, 20, 37, 37, 37, +- 37, 10, 37, 37, 37, 37, 37, 37, ++ 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, ++ 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, ++ 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, ++ 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, ++ 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, ++ 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, ++ 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, ++ 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, ++ 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, ++ 32, 32, 32, 32, 32, 0, 32, 0, 32, 32, ++ 0, 0, 32, 32, 32, 10, 32, 32, 32, 0, ++ 5, 32, 32, 32, 32, 32, 10, 32, 32, 32, ++ 32, 5, 32, 32, 32, 32, 32, 32, + #endif /* ACE_MVS */ + }; + return len + asso_values[str[len - 1]] + asso_values[str[0]]; + } + + const class TAO_operation_db_entry * +-TAO_IR_FinderDef_Perfect_Hash_OpTable::lookup (const char *str, unsigned int len) ++TAO_IR_PrimaryKeyDef_Perfect_Hash_OpTable::lookup (const char *str, unsigned int len) + { + enum + { +- TOTAL_KEYWORDS = 26, ++ TOTAL_KEYWORDS = 17, + MIN_WORD_LENGTH = 4, + MAX_WORD_LENGTH = 26, + MIN_HASH_VALUE = 4, +- MAX_HASH_VALUE = 36, +- HASH_VALUE_RANGE = 33, +- DUPLICATES = 10 ++ MAX_HASH_VALUE = 31, ++ HASH_VALUE_RANGE = 28, ++ DUPLICATES = 4 + }; + + static const class TAO_operation_db_entry wordlist[] = + { + {"",0},{"",0},{"",0},{"",0}, +- {"move", &POA_IR::FinderDef::move_skel}, +- {"_is_a", &POA_IR::FinderDef::_is_a_skel}, +- {"_get_mode", &POA_IR::FinderDef::_get_mode_skel}, +- {"_set_name", &POA_IR::FinderDef::_set_name_skel}, +- {"_get_name", &POA_IR::FinderDef::_get_name_skel}, +- {"_set_mode", &POA_IR::FinderDef::_set_mode_skel}, +- {"_get_params", &POA_IR::FinderDef::_get_params_skel}, +- {"_set_params", &POA_IR::FinderDef::_set_params_skel}, +- {"_get_contexts", &POA_IR::FinderDef::_get_contexts_skel}, +- {"_set_contexts", &POA_IR::FinderDef::_set_contexts_skel}, +- {"_get_exceptions", &POA_IR::FinderDef::_get_exceptions_skel}, +- {"_set_exceptions", &POA_IR::FinderDef::_set_exceptions_skel}, +- {"_get_version", &POA_IR::FinderDef::_get_version_skel}, +- {"_set_version", &POA_IR::FinderDef::_set_version_skel}, +- {"_get_absolute_name", &POA_IR::FinderDef::_get_absolute_name_skel}, +- {"_get_defined_in", &POA_IR::FinderDef::_get_defined_in_skel}, +- {"_get_id", &POA_IR::FinderDef::_get_id_skel}, +- {"_set_id", &POA_IR::FinderDef::_set_id_skel}, +- {"describe", &POA_IR::FinderDef::describe_skel}, +- {"_get_result_def", &POA_IR::FinderDef::_get_result_def_skel}, +- {"_set_result_def", &POA_IR::FinderDef::_set_result_def_skel}, +- {"_get_def_kind", &POA_IR::FinderDef::_get_def_kind_skel}, +- {"_get_result", &POA_IR::FinderDef::_get_result_skel}, +- {"destroy", &POA_IR::FinderDef::destroy_skel}, +- {"_non_existent", &POA_IR::FinderDef::_non_existent_skel}, +- {"_get_containing_repository", &POA_IR::FinderDef::_get_containing_repository_skel}, ++ {"move", &POA_IR::PrimaryKeyDef::move_skel}, ++ {"_is_a", &POA_IR::PrimaryKeyDef::_is_a_skel}, ++ {"_get_id", &POA_IR::PrimaryKeyDef::_get_id_skel}, ++ {"_set_id", &POA_IR::PrimaryKeyDef::_set_id_skel}, ++ {"describe", &POA_IR::PrimaryKeyDef::describe_skel}, ++ {"_get_name", &POA_IR::PrimaryKeyDef::_get_name_skel}, ++ {"_set_name", &POA_IR::PrimaryKeyDef::_set_name_skel}, ++ {"destroy", &POA_IR::PrimaryKeyDef::destroy_skel}, ++ {"_get_def_kind", &POA_IR::PrimaryKeyDef::_get_def_kind_skel}, ++ {"is_a", &POA_IR::PrimaryKeyDef::is_a_skel}, ++ {"_get_version", &POA_IR::PrimaryKeyDef::_get_version_skel}, ++ {"_set_version", &POA_IR::PrimaryKeyDef::_set_version_skel}, ++ {"_get_absolute_name", &POA_IR::PrimaryKeyDef::_get_absolute_name_skel}, ++ {"_get_defined_in", &POA_IR::PrimaryKeyDef::_get_defined_in_skel}, ++ {"_get_primary_key", &POA_IR::PrimaryKeyDef::_get_primary_key_skel}, ++ {"_non_existent", &POA_IR::PrimaryKeyDef::_non_existent_skel}, ++ {"_get_containing_repository", &POA_IR::PrimaryKeyDef::_get_containing_repository_skel}, ++ }; ++ ++ static const signed char lookup[] = ++ { ++ -6, -2, -9, -2, 4, 5, -1, -38, 8, -38, -1, -1, 11, 12, ++ 13, -14, -2, -33, 16, -1, 17, 18, -1, 19, -1, -1, -1, -1, ++ -1, -1, -1, 20, + }; + + if (len <= MAX_WORD_LENGTH && len >= MIN_WORD_LENGTH) +@@ -43715,119 +22289,62 @@ + + if (key <= MAX_HASH_VALUE && key >= MIN_HASH_VALUE) + { ++ int slot = lookup[key]; ++ ++ if (slot >= 0 && slot < MAX_HASH_VALUE) + { +- const class TAO_operation_db_entry *resword; ++ const char *s = wordlist[slot].opname_; + +- switch (key) +- { +- case 4: +- resword = &wordlist[4]; break; +- case 5: +- resword = &wordlist[5]; break; +- case 9: +- resword = &wordlist[6]; +- if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; +- resword = &wordlist[7]; +- if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; +- resword = &wordlist[8]; +- if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; +- resword = &wordlist[9]; +- if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; +- return 0; +- case 11: +- resword = &wordlist[10]; +- if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; +- resword = &wordlist[11]; +- if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; +- return 0; +- case 13: +- resword = &wordlist[12]; +- if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; +- resword = &wordlist[13]; +- if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; +- return 0; +- case 15: +- resword = &wordlist[14]; +- if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; +- resword = &wordlist[15]; +- if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; +- return 0; +- case 17: +- resword = &wordlist[16]; +- if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; +- resword = &wordlist[17]; +- if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; +- return 0; +- case 18: +- resword = &wordlist[18]; break; +- case 20: +- resword = &wordlist[19]; break; +- case 22: +- resword = &wordlist[20]; +- if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; +- resword = &wordlist[21]; +- if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; +- return 0; +- case 23: +- resword = &wordlist[22]; break; +- case 25: +- resword = &wordlist[23]; +- if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; +- resword = &wordlist[24]; +- if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; +- return 0; +- case 28: +- resword = &wordlist[25]; break; +- case 31: +- resword = &wordlist[26]; break; +- case 32: +- resword = &wordlist[27]; break; +- case 33: +- resword = &wordlist[28]; break; +- case 36: +- resword = &wordlist[29]; break; +- default: return 0; +- } +- if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) +- return resword; +- return 0; ++ if (*str == *s && !strncmp (str + 1, s + 1, len - 1)) ++ return &wordlist[slot]; ++ } ++ else if (slot < 0 && slot >= -MAX_HASH_VALUE) ++ return 0; ++ else ++ { ++ unsigned int offset = key + slot + (slot > 0 ? -MAX_HASH_VALUE : MAX_HASH_VALUE); ++ const class TAO_operation_db_entry *base = &wordlist[-lookup[offset]]; ++ const class TAO_operation_db_entry *ptr = base + -lookup[offset + 1]; ++ ++ while (--ptr >= base) ++ if (*str == *ptr->opname_ && !strncmp (str + 1, ptr->opname_ + 1, len - 1)) ++ return ptr; + } + } } return 0; } --/* ending time is 18:47:29 */ +-/* ending time is 16:31:13 */ +-static TAO_IR_FinderDef_Perfect_Hash_OpTable tao_IR_FinderDef_optable; +- +/* ending time is 11:23:11 */ - static TAO_IR_PrimaryKeyDef_Perfect_Hash_OpTable tao_IR_PrimaryKeyDef_optable; ++static TAO_IR_PrimaryKeyDef_Perfect_Hash_OpTable tao_IR_PrimaryKeyDef_optable; -- /////////////////////////////////////////////////////////////////////// // Strategized Proxy Broker Implementation // -@@ -42519,9 +42365,9 @@ + + // Factory function Implementation. +-POA_IR::_TAO_FinderDef_Strategized_Proxy_Broker *POA_IR::_TAO_FinderDef_Strategized_Proxy_Broker::the_TAO_FinderDef_Strategized_Proxy_Broker (void) ++POA_IR::_TAO_PrimaryKeyDef_Strategized_Proxy_Broker *POA_IR::_TAO_PrimaryKeyDef_Strategized_Proxy_Broker::the_TAO_PrimaryKeyDef_Strategized_Proxy_Broker (void) + { +- static POA_IR::_TAO_FinderDef_Strategized_Proxy_Broker strategized_proxy_broker; ++ static POA_IR::_TAO_PrimaryKeyDef_Strategized_Proxy_Broker strategized_proxy_broker; + return &strategized_proxy_broker; + } + +-POA_IR::_TAO_FinderDef_Strategized_Proxy_Broker::_TAO_FinderDef_Strategized_Proxy_Broker (void) ++POA_IR::_TAO_PrimaryKeyDef_Strategized_Proxy_Broker::_TAO_PrimaryKeyDef_Strategized_Proxy_Broker (void) + { + for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) + this->proxy_cache_[i] = 0; } --IR::_TAO_PrimaryKeyDef_Proxy_Impl& +-POA_IR::_TAO_FinderDef_Strategized_Proxy_Broker::~_TAO_FinderDef_Strategized_Proxy_Broker (void) ++POA_IR::_TAO_PrimaryKeyDef_Strategized_Proxy_Broker::~_TAO_PrimaryKeyDef_Strategized_Proxy_Broker (void) + { + for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) + delete this->proxy_cache_[i]; + + } + +-IR::_TAO_FinderDef_Proxy_Impl& +-POA_IR::_TAO_FinderDef_Strategized_Proxy_Broker::select_proxy ( +- ::IR::FinderDef *object, +_TAO_PrimaryKeyDef_Proxy_Impl& - POA_IR::_TAO_PrimaryKeyDef_Strategized_Proxy_Broker::select_proxy ( -- ::IR::PrimaryKeyDef *object, ++POA_IR::_TAO_PrimaryKeyDef_Strategized_Proxy_Broker::select_proxy ( + IR_PrimaryKeyDef *object, CORBA::Environment &ACE_TRY_ENV ) { -@@ -42553,7 +42399,7 @@ +@@ -43845,7 +22362,7 @@ + } + + void +-POA_IR::_TAO_FinderDef_Strategized_Proxy_Broker::create_proxy ( ++POA_IR::_TAO_PrimaryKeyDef_Strategized_Proxy_Broker::create_proxy ( + TAO_ORB_Core::TAO_Collocation_Strategies strategy, + CORBA::Environment &ACE_TRY_ENV + ) +@@ -43859,7 +22376,7 @@ case TAO_ORB_Core::THRU_POA_STRATEGY: ACE_NEW_THROW_EX ( this->proxy_cache_[strategy], -- POA_IR::_TAO_PrimaryKeyDef_ThruPOA_Proxy_Impl, +- POA_IR::_TAO_FinderDef_ThruPOA_Proxy_Impl, + _TAO_PrimaryKeyDef_ThruPOA_Proxy_Impl, CORBA::NO_MEMORY () ); ACE_CHECK; -@@ -42563,7 +42409,7 @@ +@@ -43869,7 +22386,7 @@ default: ACE_NEW_THROW_EX ( this->proxy_cache_[strategy], -- ::IR::_TAO_PrimaryKeyDef_Remote_Proxy_Impl, +- ::IR::_TAO_FinderDef_Remote_Proxy_Impl, + _TAO_PrimaryKeyDef_Remote_Proxy_Impl, CORBA::NO_MEMORY () ); ACE_CHECK; -@@ -42580,26 +42426,26 @@ +@@ -43886,108 +22403,230 @@ /////////////////////////////////////////////////////////////////////// --IR::_TAO_PrimaryKeyDef_Proxy_Broker * --IR__TAO_PrimaryKeyDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) +-IR::_TAO_FinderDef_Proxy_Broker * +-IR__TAO_FinderDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) +_TAO_PrimaryKeyDef_Proxy_Broker * +_TAO_PrimaryKeyDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) { ACE_UNUSED_ARG (obj); - return ::POA_IR::_TAO_PrimaryKeyDef_Strategized_Proxy_Broker::the_TAO_PrimaryKeyDef_Strategized_Proxy_Broker(); +- return ::POA_IR::_TAO_FinderDef_Strategized_Proxy_Broker::the_TAO_FinderDef_Strategized_Proxy_Broker(); ++ return ::POA_IR::_TAO_PrimaryKeyDef_Strategized_Proxy_Broker::the_TAO_PrimaryKeyDef_Strategized_Proxy_Broker(); } int --IR__TAO_PrimaryKeyDef_Proxy_Broker_Factory_Initializer (long _dummy_) +-IR__TAO_FinderDef_Proxy_Broker_Factory_Initializer (long _dummy_) +_TAO_PrimaryKeyDef_Proxy_Broker_Factory_Initializer (long _dummy_) { ACE_UNUSED_ARG (_dummy_); -- IR__TAO_PrimaryKeyDef_Proxy_Broker_Factory_function_pointer = -- IR__TAO_PrimaryKeyDef_Proxy_Broker_Factory_function; +- IR__TAO_FinderDef_Proxy_Broker_Factory_function_pointer = +- IR__TAO_FinderDef_Proxy_Broker_Factory_function; + _TAO_PrimaryKeyDef_Proxy_Broker_Factory_function_pointer = + _TAO_PrimaryKeyDef_Proxy_Broker_Factory_function; return 0; } --static int IR__TAO_PrimaryKeyDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = -- IR__TAO_PrimaryKeyDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, IR__TAO_PrimaryKeyDef_Proxy_Broker_Factory_Initializer)); +-static int IR__TAO_FinderDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = +- IR__TAO_FinderDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, IR__TAO_FinderDef_Proxy_Broker_Factory_Initializer)); +static int _TAO_PrimaryKeyDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = + _TAO_PrimaryKeyDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, _TAO_PrimaryKeyDef_Proxy_Broker_Factory_Initializer)); /////////////////////////////////////////////////////////////////////// -@@ -42644,7 +42490,7 @@ - ); - } + // ThruPOA Proxy Implementation + // --IR::ValueDef_ptr POA_IR::_TAO_PrimaryKeyDef_ThruPOA_Proxy_Impl::primary_key ( -+IR_ValueDef_ptr POA_IR::_TAO_PrimaryKeyDef_ThruPOA_Proxy_Impl::primary_key ( - CORBA_Object *_collocated_tao_target_, - CORBA::Environment &ACE_TRY_ENV - ) -@@ -42652,7 +42498,7 @@ - CORBA::SystemException - )) - { -- IR::ValueDef_var _tao_retval; +-POA_IR::_TAO_FinderDef_ThruPOA_Proxy_Impl::_TAO_FinderDef_ThruPOA_Proxy_Impl (void) ++POA_IR::_TAO_PrimaryKeyDef_ThruPOA_Proxy_Impl::_TAO_PrimaryKeyDef_ThruPOA_Proxy_Impl (void) ++{} ++ ++POA_IR::_TAO_PrimaryKeyDef_ThruPOA_Proxy_Impl::~_TAO_PrimaryKeyDef_ThruPOA_Proxy_Impl (void) + {} + + // ThruPOA Implementation of the IDL interface methods + ++CORBA::Boolean POA_IR::_TAO_PrimaryKeyDef_ThruPOA_Proxy_Impl::is_a ( ++ CORBA_Object *_collocated_tao_target_, ++ const char * primary_key_id, ++ CORBA::Environment &ACE_TRY_ENV ++ ) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException ++ )) ++{ ++ CORBA::Boolean _tao_retval = 0; ++ ACE_UNUSED_ARG (_tao_retval); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "is_a", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK_RETURN (_tao_retval); ++ return ACE_reinterpret_cast ( ++ POA_IR::PrimaryKeyDef_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/PrimaryKeyDef:1.0" ++ ) ++ )->is_a ( ++ primary_key_id, ++ ACE_TRY_ENV ++ ); ++} ++ ++IR::ValueDef_ptr POA_IR::_TAO_PrimaryKeyDef_ThruPOA_Proxy_Impl::primary_key ( ++ CORBA_Object *_collocated_tao_target_, ++ CORBA::Environment &ACE_TRY_ENV ++ ) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException ++ )) ++{ + IR_ValueDef_var _tao_retval; - ACE_UNUSED_ARG (_tao_retval); - TAO_Object_Adapter::Servant_Upcall servant_upcall ( - _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -42688,7 +42534,7 @@ ++ ACE_UNUSED_ARG (_tao_retval); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "primary_key", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK_RETURN (0); ++ return ACE_reinterpret_cast ( ++ POA_IR::PrimaryKeyDef_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/PrimaryKeyDef:1.0" ++ ) ++ )->primary_key ( ++ ACE_TRY_ENV ++ ); ++} ++ + // + // End ThruPOA Proxy Implementation + /////////////////////////////////////////////////////////////////////// + + // skeleton constructor +-POA_IR::FinderDef::FinderDef (void) ++POA_IR::PrimaryKeyDef::PrimaryKeyDef (void) + { +- this->optable_ = &tao_IR_FinderDef_optable; ++ this->optable_ = &tao_IR_PrimaryKeyDef_optable; + } + // copy ctor - POA_IR::PrimaryKeyDef::PrimaryKeyDef (const PrimaryKeyDef& rhs) - : ACE_NESTED_CLASS (POA_IR,Contained) (rhs), +-POA_IR::FinderDef::FinderDef (const FinderDef& rhs) +- : ACE_NESTED_CLASS (POA_IR,OperationDef) (rhs), +- ACE_NESTED_CLASS (POA_IR,Contained) (rhs), - ACE_NESTED_CLASS (POA_CORBA,IRObject) (rhs), ++POA_IR::PrimaryKeyDef::PrimaryKeyDef (const PrimaryKeyDef& rhs) ++ : ACE_NESTED_CLASS (POA_IR,Contained) (rhs), + POA_CORBA_IRObject (rhs), TAO_ServantBase (rhs) {} -@@ -42714,7 +42560,6 @@ - )) - ACE_THROW (CORBA::MARSHAL()); - -- - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( - _tao_server_request.orb_core ()->server_request_interceptors (), -@@ -42794,7 +42639,7 @@ - { - POA_IR::PrimaryKeyDef *_tao_impl = (POA_IR::PrimaryKeyDef *)_tao_object_reference; - -- IR::ValueDef_var _tao_retval; + // skeleton destructor +-POA_IR::FinderDef::~FinderDef (void) ++POA_IR::PrimaryKeyDef::~PrimaryKeyDef (void) + { + } + +-void POA_IR::FinderDef::_is_a_skel ( +- TAO_ServerRequest &_tao_server_request, ++void POA_IR::PrimaryKeyDef::is_a_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) ++{ ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::PrimaryKeyDef *_tao_impl = (POA_IR::PrimaryKeyDef *)_tao_object_reference; ++ ++ CORBA::Boolean _tao_retval = 0; ++ CORBA::String_var primary_key_id; ++ if (!( ++ (_tao_in >> primary_key_id.out ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); ++ ++ _tao_retval = _tao_impl->is_a ( ++ primary_key_id.in (), ++ ACE_TRY_ENV ++ ); ++ ++ ACE_CHECK; ++ ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!( ++ (_tao_out << CORBA::Any::from_boolean (_tao_retval)) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); ++} ++ ++void POA_IR::PrimaryKeyDef::_get_primary_key_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) ++{ ++ POA_IR::PrimaryKeyDef *_tao_impl = (POA_IR::PrimaryKeyDef *)_tao_object_reference; ++ + IR_ValueDef_var _tao_retval; - - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( -@@ -42821,7 +42666,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::ValueDef_ptr _tao_retval_info = _tao_retval._retn (); -+ IR_ValueDef_ptr _tao_retval_info = _tao_retval._retn (); - ri.result (_tao_retval_info); - _tao_retval = _tao_retval_info; - ri.reply_status (PortableInterceptor::SUCCESSFUL); -@@ -42876,7 +42721,7 @@ - POA_IR::PrimaryKeyDef *_tao_impl = (POA_IR::PrimaryKeyDef *) _tao_object_reference; ++ ++ _tao_retval = _tao_impl->primary_key ( ++ ACE_TRY_ENV ++ ); ++ ++ ACE_CHECK; ++ ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!( ++ (_tao_out << _tao_retval.in ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); ++} ++ ++void POA_IR::PrimaryKeyDef::_is_a_skel ( ++ TAO_ServerRequest &_tao_server_request, + void * _tao_object_reference, + void * /* context */, + CORBA::Environment &ACE_TRY_ENV + ) + { + TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::FinderDef *_tao_impl = (POA_IR::FinderDef *) _tao_object_reference; ++ POA_IR::PrimaryKeyDef *_tao_impl = (POA_IR::PrimaryKeyDef *) _tao_object_reference; CORBA::Boolean _tao_retval = 0; CORBA::String_var value; - if (!(_tao_in >> value.out ())) + if (!((_tao_in >> value.out ()))) ACE_THROW (CORBA::MARSHAL ()); - +- ++ _tao_retval = _tao_impl->_is_a (value.in (), ACE_TRY_ENV); -@@ -42884,7 +42729,7 @@ - + ACE_CHECK; +- ++ _tao_server_request.init_reply (); TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); - if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) @@ -10106,8 +55106,21 @@ ACE_THROW (CORBA::MARSHAL ()); } -@@ -42901,7 +42746,7 @@ - +-void POA_IR::FinderDef::_non_existent_skel ( +- TAO_ServerRequest &_tao_server_request, ++void POA_IR::PrimaryKeyDef::_non_existent_skel ( ++ TAO_ServerRequest &_tao_server_request, + void * _tao_object_reference, + void * /* context */, + CORBA::Environment &ACE_TRY_ENV + ) + { +- POA_IR::FinderDef *_tao_impl = (POA_IR::FinderDef *) _tao_object_reference; ++ POA_IR::PrimaryKeyDef *_tao_impl = (POA_IR::PrimaryKeyDef *) _tao_object_reference; + CORBA::Boolean _tao_retval = _tao_impl->_non_existent (ACE_TRY_ENV); + ACE_CHECK; +- ++ _tao_server_request.init_reply (); TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); - if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) @@ -10115,7 +55128,34 @@ ACE_THROW (CORBA::MARSHAL ()); } -@@ -42929,7 +42774,7 @@ +-CORBA::Boolean POA_IR::FinderDef::_is_a ( ++CORBA::Boolean POA_IR::PrimaryKeyDef::_is_a ( + const char* value, + CORBA::Environment &ACE_TRY_ENV + ) + { + if ( +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/FinderDef:1.0")) || +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/OperationDef:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/PrimaryKeyDef:1.0")) || + (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/Contained:1.0")) || + (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/CORBA/IRObject:1.0")) || + (!ACE_OS::strcmp ((char *)value, CORBA::_tc_Object->id (ACE_TRY_ENV)))) +@@ -43996,35 +22635,33 @@ + return 0; + } + +-void* POA_IR::FinderDef::_downcast ( ++void* POA_IR::PrimaryKeyDef::_downcast ( + const char* logical_type_id + ) + { +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/FinderDef:1.0") == 0) +- return ACE_static_cast (POA_IR::FinderDef_ptr, this); +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/OperationDef:1.0") == 0) +- return ACE_static_cast (POA_IR::OperationDef_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/PrimaryKeyDef:1.0") == 0) ++ return ACE_static_cast (POA_IR::PrimaryKeyDef_ptr, this); if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Contained:1.0") == 0) return ACE_static_cast (POA_IR::Contained_ptr, this); if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/IRObject:1.0") == 0) @@ -10124,843 +55164,3810 @@ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/Object:1.0") == 0) return ACE_static_cast(PortableServer::Servant, this); return 0; -@@ -42959,10 +42804,9 @@ + } + +-void POA_IR::FinderDef::_dispatch (TAO_ServerRequest &req, void *context, CORBA::Environment &ACE_TRY_ENV) ++void POA_IR::PrimaryKeyDef::_dispatch (TAO_ServerRequest &req, void *context, CORBA::Environment &ACE_TRY_ENV) + { + this->synchronous_upcall_dispatch(req, context, this, ACE_TRY_ENV); + } + +-const char* POA_IR::FinderDef::_interface_repository_id (void) const ++const char* POA_IR::PrimaryKeyDef::_interface_repository_id (void) const + { +- return "IDL:omg.org/IR/FinderDef:1.0"; ++ return "IDL:omg.org/IR/PrimaryKeyDef:1.0"; + } + +-IR::FinderDef* +-POA_IR::FinderDef::_this (CORBA_Environment &ACE_TRY_ENV) ++IR::PrimaryKeyDef* ++POA_IR::PrimaryKeyDef::_this (CORBA_Environment &ACE_TRY_ENV) + { + TAO_Stub *stub = this->_create_stub (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); +@@ -44037,150 +22674,113 @@ ACE_NEW_RETURN (tmp, CORBA::Object (stub, 0, this), 0); CORBA::Object_var obj = tmp; -- return ::IR::PrimaryKeyDef::_unchecked_narrow (obj.in ()); +- return ::IR::FinderDef::_unchecked_narrow (obj.in ()); + return IR_PrimaryKeyDef::_unchecked_narrow (obj.in ()); } - - #if (TAO_HAS_INTERCEPTORS == 1) - POA_IR::PrimaryKeyDef::TAO_ServerRequestInfo_IR_PrimaryKeyDef_is_a::TAO_ServerRequestInfo_IR_PrimaryKeyDef_is_a ( - TAO_ServerRequest &_tao_server_request, -@@ -43124,6 +42968,7 @@ - } - - #endif /* TAO_HAS_INTERCEPTORS */ -+ - class TAO_IR_FactoryDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable +-#if (TAO_HAS_INTERCEPTORS == 1) +-#endif /* TAO_HAS_INTERCEPTORS */ +-class TAO_IR_HomeDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable ++class TAO_IR_FactoryDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable { private: -@@ -43131,7 +42976,7 @@ + unsigned int hash (const char *str, unsigned int len); public: const TAO_operation_db_entry * lookup (const char *str, unsigned int len); }; --/* starting time is 18:47:29 */ +-/* starting time is 16:31:13 */ +/* starting time is 11:23:11 */ /* C++ code produced by gperf version 2.8 (ACE version) */ - /* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_FactoryDef_Perfect_Hash_OpTable -N lookup */ +-/* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_HomeDef_Perfect_Hash_OpTable -N lookup */ ++/* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_FactoryDef_Perfect_Hash_OpTable -N lookup */ unsigned int -@@ -43317,10 +43162,9 @@ +-TAO_IR_HomeDef_Perfect_Hash_OpTable::hash (const char *str, unsigned int len) ++TAO_IR_FactoryDef_Perfect_Hash_OpTable::hash (const char *str, unsigned int len) + { + static const unsigned char asso_values[] = + { + #if defined (ACE_MVS) +- 89, 89, 89, 89, 89, 89, 89, 89, 89, 89, +- 89, 89, 89, 89, 89, 89, 89, 89, 89, 89, +- 89, 89, 89, 89, 89, 89, 89, 89, 89, 89, +- 89, 89, 89, 89, 89, 89, 89, 89, 89, 89, +- 89, 89, 89, 89, 89, 89, 89, 89, 89, 89, +- 89, 89, 89, 89, 89, 89, 89, 89, 89, 89, +- 89, 89, 89, 89, 89, 89, 89, 89, 89, 89, +- 89, 89, 89, 89, 89, 89, 89, 89, 89, 89, +- 89, 89, 89, 89, 89, 89, 89, 89, 89, 89, +- 89, 89, 89, 89, 89, 89, 89, 89, 89, 89, +- 89, 89, 89, 89, 89, 89, 89, 89, 89, 0, +- 89, 89, 89, 89, 89, 89, 89, 89, 89, 89, +- 89, 89, 89, 89, 89, 89, 89, 89, 89, 0, +- 89, 15, 0, 45, 89, 89, 89, 0, 89, 89, +- 89, 89, 89, 89, 89, 89, 89, 5, 0, 10, +- 89, 0, 89, 5, 89, 89, 89, 89, 89, 89, +- 89, 89, 15, 30, 89, 89, 89, 0, 55, 89, +- 89, 89, 89, 89, 89, 89, 89, 89, 89, 89, +- 89, 89, 89, 89, 89, 89, 89, 89, 89, 89, +- 89, 89, 89, 89, 89, 89, 89, 89, 89, 89, +- 89, 89, 89, 89, 89, 89, 89, 89, 89, 89, +- 89, 89, 89, 89, 89, 89, 89, 89, 89, 89, +- 89, 89, 89, 89, 89, 89, 89, 89, 89, 89, +- 89, 89, 89, 89, 89, 89, 89, 89, 89, 89, +- 89, 89, 89, 89, 89, 89, 89, 89, 89, 89, +- 89, 89, 89, 89, 89, 89, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 0, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 0, ++ 37, 37, 15, 0, 10, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 0, 5, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 0, 20, 37, 37, 37, 37, 10, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, + #else +- 89, 89, 89, 89, 89, 89, 89, 89, 89, 89, +- 89, 89, 89, 89, 89, 89, 89, 89, 89, 89, +- 89, 89, 89, 89, 89, 89, 89, 89, 89, 89, +- 89, 89, 89, 89, 89, 89, 89, 89, 89, 89, +- 89, 89, 89, 89, 89, 89, 89, 89, 89, 89, +- 89, 89, 89, 89, 89, 89, 89, 89, 89, 89, +- 89, 89, 89, 89, 89, 89, 89, 89, 89, 89, +- 89, 89, 89, 89, 89, 89, 89, 89, 89, 89, +- 89, 89, 89, 89, 89, 89, 89, 89, 89, 89, +- 89, 89, 89, 89, 89, 0, 89, 0, 89, 15, +- 0, 45, 89, 89, 89, 0, 89, 89, 5, 0, +- 10, 89, 0, 89, 5, 15, 30, 89, 89, 89, +- 0, 55, 89, 89, 89, 89, 89, 89, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 0, 37, 0, 37, 37, ++ 15, 0, 10, 37, 37, 37, 37, 37, 37, 0, ++ 5, 37, 37, 37, 37, 0, 20, 37, 37, 37, ++ 37, 10, 37, 37, 37, 37, 37, 37, + #endif /* ACE_MVS */ + }; + return len + asso_values[str[len - 1]] + asso_values[str[0]]; + } + + const class TAO_operation_db_entry * +-TAO_IR_HomeDef_Perfect_Hash_OpTable::lookup (const char *str, unsigned int len) ++TAO_IR_FactoryDef_Perfect_Hash_OpTable::lookup (const char *str, unsigned int len) + { + enum + { +- TOTAL_KEYWORDS = 49, ++ TOTAL_KEYWORDS = 26, + MIN_WORD_LENGTH = 4, + MAX_WORD_LENGTH = 26, + MIN_HASH_VALUE = 4, +- MAX_HASH_VALUE = 88, +- HASH_VALUE_RANGE = 85, +- DUPLICATES = 11 ++ MAX_HASH_VALUE = 36, ++ HASH_VALUE_RANGE = 33, ++ DUPLICATES = 10 + }; + + static const class TAO_operation_db_entry wordlist[] = + { + {"",0},{"",0},{"",0},{"",0}, +- {"is_a", &POA_IR::HomeDef::is_a_skel}, +- {"_is_a", &POA_IR::HomeDef::_is_a_skel}, +- {"_get_id", &POA_IR::HomeDef::_get_id_skel}, +- {"_set_id", &POA_IR::HomeDef::_set_id_skel}, +- {"lookup", &POA_IR::HomeDef::lookup_skel}, +- {"_get_def_kind", &POA_IR::HomeDef::_get_def_kind_skel}, +- {"_get_is_local", &POA_IR::HomeDef::_get_is_local_skel}, +- {"_set_is_local", &POA_IR::HomeDef::_set_is_local_skel}, +- {"_get_version", &POA_IR::HomeDef::_get_version_skel}, +- {"_set_version", &POA_IR::HomeDef::_set_version_skel}, +- {"_get_defined_in", &POA_IR::HomeDef::_get_defined_in_skel}, +- {"create_enum", &POA_IR::HomeDef::create_enum_skel}, +- {"_get_finders", &POA_IR::HomeDef::_get_finders_skel}, +- {"_get_is_basic", &POA_IR::HomeDef::_get_is_basic_skel}, +- {"_get_factories", &POA_IR::HomeDef::_get_factories_skel}, +- {"create_value_box", &POA_IR::HomeDef::create_value_box_skel}, +- {"describe_contents", &POA_IR::HomeDef::describe_contents_skel}, +- {"create_finder", &POA_IR::HomeDef::create_finder_skel}, +- {"_get_base_interfaces", &POA_IR::HomeDef::_get_base_interfaces_skel}, +- {"_set_base_interfaces", &POA_IR::HomeDef::_set_base_interfaces_skel}, +- {"create_union", &POA_IR::HomeDef::create_union_skel}, +- {"contents", &POA_IR::HomeDef::contents_skel}, +- {"create_operation", &POA_IR::HomeDef::create_operation_skel}, +- {"create_exception", &POA_IR::HomeDef::create_exception_skel}, +- {"create_alias", &POA_IR::HomeDef::create_alias_skel}, +- {"_non_existent", &POA_IR::HomeDef::_non_existent_skel}, +- {"_get_is_abstract", &POA_IR::HomeDef::_get_is_abstract_skel}, +- {"_set_is_abstract", &POA_IR::HomeDef::_set_is_abstract_skel}, +- {"move", &POA_IR::HomeDef::move_skel}, +- {"_get_managed_component", &POA_IR::HomeDef::_get_managed_component_skel}, +- {"describe", &POA_IR::HomeDef::describe_skel}, +- {"_get_name", &POA_IR::HomeDef::_get_name_skel}, +- {"_get_type", &POA_IR::HomeDef::_get_type_skel}, +- {"_set_name", &POA_IR::HomeDef::_set_name_skel}, +- {"create_struct", &POA_IR::HomeDef::create_struct_skel}, +- {"_get_base_home", &POA_IR::HomeDef::_get_base_home_skel}, +- {"create_constant", &POA_IR::HomeDef::create_constant_skel}, +- {"lookup_name", &POA_IR::HomeDef::lookup_name_skel}, +- {"destroy", &POA_IR::HomeDef::destroy_skel}, +- {"_get_absolute_name", &POA_IR::HomeDef::_get_absolute_name_skel}, +- {"_get_primary_key", &POA_IR::HomeDef::_get_primary_key_skel}, +- {"create_value", &POA_IR::HomeDef::create_value_skel}, +- {"create_module", &POA_IR::HomeDef::create_module_skel}, +- {"create_native", &POA_IR::HomeDef::create_native_skel}, +- {"create_attribute", &POA_IR::HomeDef::create_attribute_skel}, +- {"create_interface", &POA_IR::HomeDef::create_interface_skel}, +- {"_get_containing_repository", &POA_IR::HomeDef::_get_containing_repository_skel}, +- {"create_factory", &POA_IR::HomeDef::create_factory_skel}, +- {"create_primary_key", &POA_IR::HomeDef::create_primary_key_skel}, +- }; +- +- static const signed char lookup[] = +- { +- -1, -1, -6, -2, 4, 5, -1, -93, -1, -1, -1, 8, -1, 9, +- -1, -1, -10, -2, -90, -1, -12, -2, -90, -22, -2, 14, 15, 16, +- 17, 18, -1, 19, 20, 21, -1, -100, -1, 24, 25, -26, -2, -90, +- 28, 29, -30, -2, -90, -1, -1, 32, -35, -3, 33, 34, -92, -1, +- -1, -1, 38, 39, 40, 41, 42, 43, -1, -1, -1, -1, -1, -46, +- -2, 44, 45, -92, -48, -2, -90, -1, -1, -1, -1, 50, -1, -1, +- 51, -1, -1, -1, 52, ++ {"move", &POA_IR::FactoryDef::move_skel}, ++ {"_is_a", &POA_IR::FactoryDef::_is_a_skel}, ++ {"_get_mode", &POA_IR::FactoryDef::_get_mode_skel}, ++ {"_set_name", &POA_IR::FactoryDef::_set_name_skel}, ++ {"_get_name", &POA_IR::FactoryDef::_get_name_skel}, ++ {"_set_mode", &POA_IR::FactoryDef::_set_mode_skel}, ++ {"_get_params", &POA_IR::FactoryDef::_get_params_skel}, ++ {"_set_params", &POA_IR::FactoryDef::_set_params_skel}, ++ {"_get_contexts", &POA_IR::FactoryDef::_get_contexts_skel}, ++ {"_set_contexts", &POA_IR::FactoryDef::_set_contexts_skel}, ++ {"_get_exceptions", &POA_IR::FactoryDef::_get_exceptions_skel}, ++ {"_set_exceptions", &POA_IR::FactoryDef::_set_exceptions_skel}, ++ {"_get_version", &POA_IR::FactoryDef::_get_version_skel}, ++ {"_set_version", &POA_IR::FactoryDef::_set_version_skel}, ++ {"_get_absolute_name", &POA_IR::FactoryDef::_get_absolute_name_skel}, ++ {"_get_defined_in", &POA_IR::FactoryDef::_get_defined_in_skel}, ++ {"_get_id", &POA_IR::FactoryDef::_get_id_skel}, ++ {"_set_id", &POA_IR::FactoryDef::_set_id_skel}, ++ {"describe", &POA_IR::FactoryDef::describe_skel}, ++ {"_get_result_def", &POA_IR::FactoryDef::_get_result_def_skel}, ++ {"_set_result_def", &POA_IR::FactoryDef::_set_result_def_skel}, ++ {"_get_def_kind", &POA_IR::FactoryDef::_get_def_kind_skel}, ++ {"_get_result", &POA_IR::FactoryDef::_get_result_skel}, ++ {"destroy", &POA_IR::FactoryDef::destroy_skel}, ++ {"_non_existent", &POA_IR::FactoryDef::_non_existent_skel}, ++ {"_get_containing_repository", &POA_IR::FactoryDef::_get_containing_repository_skel}, + }; + + if (len <= MAX_WORD_LENGTH && len >= MIN_WORD_LENGTH) +@@ -44189,63 +22789,118 @@ + + if (key <= MAX_HASH_VALUE && key >= MIN_HASH_VALUE) + { +- int slot = lookup[key]; +- +- if (slot >= 0 && slot < MAX_HASH_VALUE) +- { +- const char *s = wordlist[slot].opname_; +- +- if (*str == *s && !strncmp (str + 1, s + 1, len - 1)) +- return &wordlist[slot]; +- } +- else if (slot < 0 && slot >= -MAX_HASH_VALUE) +- return 0; +- else + { +- unsigned int offset = key + slot + (slot > 0 ? -MAX_HASH_VALUE : MAX_HASH_VALUE); +- const class TAO_operation_db_entry *base = &wordlist[-lookup[offset]]; +- const class TAO_operation_db_entry *ptr = base + -lookup[offset + 1]; ++ const class TAO_operation_db_entry *resword; + +- while (--ptr >= base) +- if (*str == *ptr->opname_ && !strncmp (str + 1, ptr->opname_ + 1, len - 1)) +- return ptr; ++ switch (key) ++ { ++ case 4: ++ resword = &wordlist[4]; break; ++ case 5: ++ resword = &wordlist[5]; break; ++ case 9: ++ resword = &wordlist[6]; ++ if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; ++ resword = &wordlist[7]; ++ if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; ++ resword = &wordlist[8]; ++ if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; ++ resword = &wordlist[9]; ++ if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; ++ return 0; ++ case 11: ++ resword = &wordlist[10]; ++ if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; ++ resword = &wordlist[11]; ++ if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; ++ return 0; ++ case 13: ++ resword = &wordlist[12]; ++ if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; ++ resword = &wordlist[13]; ++ if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; ++ return 0; ++ case 15: ++ resword = &wordlist[14]; ++ if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; ++ resword = &wordlist[15]; ++ if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; ++ return 0; ++ case 17: ++ resword = &wordlist[16]; ++ if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; ++ resword = &wordlist[17]; ++ if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; ++ return 0; ++ case 18: ++ resword = &wordlist[18]; break; ++ case 20: ++ resword = &wordlist[19]; break; ++ case 22: ++ resword = &wordlist[20]; ++ if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; ++ resword = &wordlist[21]; ++ if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; ++ return 0; ++ case 23: ++ resword = &wordlist[22]; break; ++ case 25: ++ resword = &wordlist[23]; ++ if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; ++ resword = &wordlist[24]; ++ if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; ++ return 0; ++ case 28: ++ resword = &wordlist[25]; break; ++ case 31: ++ resword = &wordlist[26]; break; ++ case 32: ++ resword = &wordlist[27]; break; ++ case 33: ++ resword = &wordlist[28]; break; ++ case 36: ++ resword = &wordlist[29]; break; ++ default: return 0; ++ } ++ if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) ++ return resword; ++ return 0; + } + } } return 0; } --/* ending time is 18:47:29 */ +-/* ending time is 16:31:13 */ +-static TAO_IR_HomeDef_Perfect_Hash_OpTable tao_IR_HomeDef_optable; +- +/* ending time is 11:23:11 */ - static TAO_IR_FactoryDef_Perfect_Hash_OpTable tao_IR_FactoryDef_optable; ++static TAO_IR_FactoryDef_Perfect_Hash_OpTable tao_IR_FactoryDef_optable; -- /////////////////////////////////////////////////////////////////////// // Strategized Proxy Broker Implementation // -@@ -43346,9 +43190,9 @@ + + // Factory function Implementation. +-POA_IR::_TAO_HomeDef_Strategized_Proxy_Broker *POA_IR::_TAO_HomeDef_Strategized_Proxy_Broker::the_TAO_HomeDef_Strategized_Proxy_Broker (void) ++POA_IR::_TAO_FactoryDef_Strategized_Proxy_Broker *POA_IR::_TAO_FactoryDef_Strategized_Proxy_Broker::the_TAO_FactoryDef_Strategized_Proxy_Broker (void) + { +- static POA_IR::_TAO_HomeDef_Strategized_Proxy_Broker strategized_proxy_broker; ++ static POA_IR::_TAO_FactoryDef_Strategized_Proxy_Broker strategized_proxy_broker; + return &strategized_proxy_broker; + } + +-POA_IR::_TAO_HomeDef_Strategized_Proxy_Broker::_TAO_HomeDef_Strategized_Proxy_Broker (void) ++POA_IR::_TAO_FactoryDef_Strategized_Proxy_Broker::_TAO_FactoryDef_Strategized_Proxy_Broker (void) + { + for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) + this->proxy_cache_[i] = 0; } --IR::_TAO_FactoryDef_Proxy_Impl& +-POA_IR::_TAO_HomeDef_Strategized_Proxy_Broker::~_TAO_HomeDef_Strategized_Proxy_Broker (void) ++POA_IR::_TAO_FactoryDef_Strategized_Proxy_Broker::~_TAO_FactoryDef_Strategized_Proxy_Broker (void) + { + for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) + delete this->proxy_cache_[i]; + + } + +-IR::_TAO_HomeDef_Proxy_Impl& +-POA_IR::_TAO_HomeDef_Strategized_Proxy_Broker::select_proxy ( +- ::IR::HomeDef *object, +_TAO_FactoryDef_Proxy_Impl& - POA_IR::_TAO_FactoryDef_Strategized_Proxy_Broker::select_proxy ( -- ::IR::FactoryDef *object, ++POA_IR::_TAO_FactoryDef_Strategized_Proxy_Broker::select_proxy ( + IR_FactoryDef *object, CORBA::Environment &ACE_TRY_ENV ) { -@@ -43380,7 +43224,7 @@ +@@ -44263,7 +22918,7 @@ + } + + void +-POA_IR::_TAO_HomeDef_Strategized_Proxy_Broker::create_proxy ( ++POA_IR::_TAO_FactoryDef_Strategized_Proxy_Broker::create_proxy ( + TAO_ORB_Core::TAO_Collocation_Strategies strategy, + CORBA::Environment &ACE_TRY_ENV + ) +@@ -44277,7 +22932,7 @@ case TAO_ORB_Core::THRU_POA_STRATEGY: ACE_NEW_THROW_EX ( this->proxy_cache_[strategy], -- POA_IR::_TAO_FactoryDef_ThruPOA_Proxy_Impl, +- POA_IR::_TAO_HomeDef_ThruPOA_Proxy_Impl, + _TAO_FactoryDef_ThruPOA_Proxy_Impl, CORBA::NO_MEMORY () ); ACE_CHECK; -@@ -43390,7 +43234,7 @@ +@@ -44287,7 +22942,7 @@ default: ACE_NEW_THROW_EX ( this->proxy_cache_[strategy], -- ::IR::_TAO_FactoryDef_Remote_Proxy_Impl, +- ::IR::_TAO_HomeDef_Remote_Proxy_Impl, + _TAO_FactoryDef_Remote_Proxy_Impl, CORBA::NO_MEMORY () ); ACE_CHECK; -@@ -43407,26 +43251,26 @@ +@@ -44304,2049 +22959,1610 @@ /////////////////////////////////////////////////////////////////////// --IR::_TAO_FactoryDef_Proxy_Broker * --IR__TAO_FactoryDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) +-IR::_TAO_HomeDef_Proxy_Broker * +-IR__TAO_HomeDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) +_TAO_FactoryDef_Proxy_Broker * +_TAO_FactoryDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) { ACE_UNUSED_ARG (obj); - return ::POA_IR::_TAO_FactoryDef_Strategized_Proxy_Broker::the_TAO_FactoryDef_Strategized_Proxy_Broker(); +- return ::POA_IR::_TAO_HomeDef_Strategized_Proxy_Broker::the_TAO_HomeDef_Strategized_Proxy_Broker(); ++ return ::POA_IR::_TAO_FactoryDef_Strategized_Proxy_Broker::the_TAO_FactoryDef_Strategized_Proxy_Broker(); } int --IR__TAO_FactoryDef_Proxy_Broker_Factory_Initializer (long _dummy_) +-IR__TAO_HomeDef_Proxy_Broker_Factory_Initializer (long _dummy_) +_TAO_FactoryDef_Proxy_Broker_Factory_Initializer (long _dummy_) { ACE_UNUSED_ARG (_dummy_); -- IR__TAO_FactoryDef_Proxy_Broker_Factory_function_pointer = -- IR__TAO_FactoryDef_Proxy_Broker_Factory_function; +- IR__TAO_HomeDef_Proxy_Broker_Factory_function_pointer = +- IR__TAO_HomeDef_Proxy_Broker_Factory_function; + _TAO_FactoryDef_Proxy_Broker_Factory_function_pointer = + _TAO_FactoryDef_Proxy_Broker_Factory_function; return 0; } --static int IR__TAO_FactoryDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = -- IR__TAO_FactoryDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, IR__TAO_FactoryDef_Proxy_Broker_Factory_Initializer)); +-static int IR__TAO_HomeDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = +- IR__TAO_HomeDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, IR__TAO_HomeDef_Proxy_Broker_Factory_Initializer)); +static int _TAO_FactoryDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = + _TAO_FactoryDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, _TAO_FactoryDef_Proxy_Broker_Factory_Initializer)); /////////////////////////////////////////////////////////////////////// -@@ -43452,7 +43296,7 @@ - POA_IR::FactoryDef::FactoryDef (const FactoryDef& rhs) - : ACE_NESTED_CLASS (POA_IR,OperationDef) (rhs), - ACE_NESTED_CLASS (POA_IR,Contained) (rhs), -- ACE_NESTED_CLASS (POA_CORBA,IRObject) (rhs), -+ POA_CORBA_IRObject (rhs), - TAO_ServantBase (rhs) + // ThruPOA Proxy Implementation + // + +-POA_IR::_TAO_HomeDef_ThruPOA_Proxy_Impl::_TAO_HomeDef_ThruPOA_Proxy_Impl (void) ++POA_IR::_TAO_FactoryDef_ThruPOA_Proxy_Impl::_TAO_FactoryDef_ThruPOA_Proxy_Impl (void) ++{} ++ ++POA_IR::_TAO_FactoryDef_ThruPOA_Proxy_Impl::~_TAO_FactoryDef_ThruPOA_Proxy_Impl (void) {} -@@ -43472,7 +43316,7 @@ - POA_IR::FactoryDef *_tao_impl = (POA_IR::FactoryDef *) _tao_object_reference; - CORBA::Boolean _tao_retval = 0; - CORBA::String_var value; -- if (!(_tao_in >> value.out ())) + // ThruPOA Implementation of the IDL interface methods + +-IR::HomeDef_ptr POA_IR::_TAO_HomeDef_ThruPOA_Proxy_Impl::base_home ( +- CORBA_Object *_collocated_tao_target_, ++// ++// End ThruPOA Proxy Implementation ++/////////////////////////////////////////////////////////////////////// ++ ++// skeleton constructor ++POA_IR::FactoryDef::FactoryDef (void) ++{ ++ this->optable_ = &tao_IR_FactoryDef_optable; ++} ++ ++// copy ctor ++POA_IR::FactoryDef::FactoryDef (const FactoryDef& rhs) ++ : ACE_NESTED_CLASS (POA_IR,OperationDef) (rhs), ++ ACE_NESTED_CLASS (POA_IR,Contained) (rhs), ++ POA_CORBA_IRObject (rhs), ++ TAO_ServantBase (rhs) ++{} ++ ++// skeleton destructor ++POA_IR::FactoryDef::~FactoryDef (void) ++{ ++} ++ ++void POA_IR::FactoryDef::_is_a_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void * _tao_object_reference, ++ void * /* context */, + CORBA::Environment &ACE_TRY_ENV + ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) + { +- IR::HomeDef_var _tao_retval; +- ACE_UNUSED_ARG (_tao_retval); +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "base_home", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK_RETURN (0); +- return ACE_reinterpret_cast ( +- POA_IR::HomeDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/HomeDef:1.0" +- ) +- )->base_home ( +- ACE_TRY_ENV +- ); ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::FactoryDef *_tao_impl = (POA_IR::FactoryDef *) _tao_object_reference; ++ CORBA::Boolean _tao_retval = 0; ++ CORBA::String_var value; + if (!((_tao_in >> value.out ()))) - ACE_THROW (CORBA::MARSHAL ()); - - _tao_retval = _tao_impl->_is_a (value.in (), ACE_TRY_ENV); -@@ -43480,7 +43324,7 @@ - - _tao_server_request.init_reply (); - TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); -- if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) ++ ACE_THROW (CORBA::MARSHAL ()); ++ ++ _tao_retval = _tao_impl->_is_a (value.in (), ACE_TRY_ENV); ++ ACE_CHECK; ++ ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); + if (!((_tao_out << CORBA::Any::from_boolean (_tao_retval)))) - ACE_THROW (CORBA::MARSHAL ()); - } - -@@ -43497,7 +43341,7 @@ - - _tao_server_request.init_reply (); - TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); -- if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) ++ ACE_THROW (CORBA::MARSHAL ()); ++} ++ ++void POA_IR::FactoryDef::_non_existent_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void * _tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++ ) ++{ ++ POA_IR::FactoryDef *_tao_impl = (POA_IR::FactoryDef *) _tao_object_reference; ++ CORBA::Boolean _tao_retval = _tao_impl->_non_existent (ACE_TRY_ENV); ++ ACE_CHECK; ++ ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); + if (!((_tao_out << CORBA::Any::from_boolean (_tao_retval)))) - ACE_THROW (CORBA::MARSHAL ()); ++ ACE_THROW (CORBA::MARSHAL ()); ++} ++ ++CORBA::Boolean POA_IR::FactoryDef::_is_a ( ++ const char* value, ++ CORBA::Environment &ACE_TRY_ENV ++ ) ++{ ++ if ( ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/FactoryDef:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/OperationDef:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/Contained:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/CORBA/IRObject:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, CORBA::_tc_Object->id (ACE_TRY_ENV)))) ++ return 1; ++ else ++ return 0; ++} ++ ++void* POA_IR::FactoryDef::_downcast ( ++ const char* logical_type_id ++ ) ++{ ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/FactoryDef:1.0") == 0) ++ return ACE_static_cast (POA_IR::FactoryDef_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/OperationDef:1.0") == 0) ++ return ACE_static_cast (POA_IR::OperationDef_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Contained:1.0") == 0) ++ return ACE_static_cast (POA_IR::Contained_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/IRObject:1.0") == 0) ++ return ACE_static_cast (POA_CORBA_IRObject_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/Object:1.0") == 0) ++ return ACE_static_cast(PortableServer::Servant, this); ++ return 0; ++} ++ ++void POA_IR::FactoryDef::_dispatch (TAO_ServerRequest &req, void *context, CORBA::Environment &ACE_TRY_ENV) ++{ ++ this->synchronous_upcall_dispatch(req, context, this, ACE_TRY_ENV); ++} ++ ++const char* POA_IR::FactoryDef::_interface_repository_id (void) const ++{ ++ return "IDL:omg.org/IR/FactoryDef:1.0"; } -@@ -43528,7 +43372,7 @@ - if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Contained:1.0") == 0) - return ACE_static_cast (POA_IR::Contained_ptr, this); - if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/IRObject:1.0") == 0) -- return ACE_static_cast (POA_CORBA::IRObject_ptr, this); -+ return ACE_static_cast (POA_CORBA_IRObject_ptr, this); - if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/Object:1.0") == 0) - return ACE_static_cast(PortableServer::Servant, this); - return 0; -@@ -43558,12 +43402,12 @@ - ACE_NEW_RETURN (tmp, CORBA::Object (stub, 0, this), 0); - - CORBA::Object_var obj = tmp; -- return ::IR::FactoryDef::_unchecked_narrow (obj.in ()); +-IR::ComponentDef_ptr POA_IR::_TAO_HomeDef_ThruPOA_Proxy_Impl::managed_component ( +- CORBA_Object *_collocated_tao_target_, +- CORBA::Environment &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) ++IR::FactoryDef* ++POA_IR::FactoryDef::_this (CORBA_Environment &ACE_TRY_ENV) + { +- IR::ComponentDef_var _tao_retval; +- ACE_UNUSED_ARG (_tao_retval); +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "managed_component", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK_RETURN (0); +- return ACE_reinterpret_cast ( +- POA_IR::HomeDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/HomeDef:1.0" +- ) +- )->managed_component ( +- ACE_TRY_ENV +- ); ++ TAO_Stub *stub = this->_create_stub (ACE_TRY_ENV); ++ ACE_CHECK_RETURN (0); ++ ++ CORBA::Object_ptr tmp = CORBA::Object::_nil (); ++ ++ if (stub->servant_orb_var ()->orb_core ()->optimize_collocation_objects ()) ++ ACE_NEW_RETURN (tmp, CORBA::Object (stub, 1, this), 0); ++ else ++ ACE_NEW_RETURN (tmp, CORBA::Object (stub, 0, this), 0); ++ ++ CORBA::Object_var obj = tmp; + return IR_FactoryDef::_unchecked_narrow (obj.in ()); } -- - #if (TAO_HAS_INTERCEPTORS == 1) - #endif /* TAO_HAS_INTERCEPTORS */ -+ - class TAO_IR_FinderDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable +-IR::PrimaryKeyDef_ptr POA_IR::_TAO_HomeDef_ThruPOA_Proxy_Impl::primary_key ( +- CORBA_Object *_collocated_tao_target_, +- CORBA::Environment &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) ++class TAO_IR_FinderDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable { - private: -@@ -43571,7 +43415,7 @@ - public: - const TAO_operation_db_entry * lookup (const char *str, unsigned int len); - }; --/* starting time is 18:47:29 */ +- IR::PrimaryKeyDef_var _tao_retval; +- ACE_UNUSED_ARG (_tao_retval); +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "primary_key", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK_RETURN (0); +- return ACE_reinterpret_cast ( +- POA_IR::HomeDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/HomeDef:1.0" +- ) +- )->primary_key ( +- ACE_TRY_ENV +- ); ++private: ++ unsigned int hash (const char *str, unsigned int len); ++public: ++ const TAO_operation_db_entry * lookup (const char *str, unsigned int len); ++}; +/* starting time is 11:23:11 */ - /* C++ code produced by gperf version 2.8 (ACE version) */ - /* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_FinderDef_Perfect_Hash_OpTable -N lookup */ - unsigned int -@@ -43757,10 +43601,9 @@ - } - return 0; ++/* C++ code produced by gperf version 2.8 (ACE version) */ ++/* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_FinderDef_Perfect_Hash_OpTable -N lookup */ ++unsigned int ++TAO_IR_FinderDef_Perfect_Hash_OpTable::hash (const char *str, unsigned int len) ++{ ++ static const unsigned char asso_values[] = ++ { ++#if defined (ACE_MVS) ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 0, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 0, ++ 37, 37, 15, 0, 10, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 0, 5, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 0, 20, 37, 37, 37, 37, 10, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, ++#else ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, ++ 37, 37, 37, 37, 37, 0, 37, 0, 37, 37, ++ 15, 0, 10, 37, 37, 37, 37, 37, 37, 0, ++ 5, 37, 37, 37, 37, 0, 20, 37, 37, 37, ++ 37, 10, 37, 37, 37, 37, 37, 37, ++#endif /* ACE_MVS */ ++ }; ++ return len + asso_values[str[len - 1]] + asso_values[str[0]]; + } + +-IR::FactoryDefSeq * POA_IR::_TAO_HomeDef_ThruPOA_Proxy_Impl::factories ( +- CORBA_Object *_collocated_tao_target_, +- CORBA::Environment &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) ++const class TAO_operation_db_entry * ++TAO_IR_FinderDef_Perfect_Hash_OpTable::lookup (const char *str, unsigned int len) + { +- IR::FactoryDefSeq_var _tao_retval; +- ACE_UNUSED_ARG (_tao_retval); +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "factories", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK_RETURN (0); +- return ACE_reinterpret_cast ( +- POA_IR::HomeDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/HomeDef:1.0" +- ) +- )->factories ( +- ACE_TRY_ENV +- ); ++ enum ++ { ++ TOTAL_KEYWORDS = 26, ++ MIN_WORD_LENGTH = 4, ++ MAX_WORD_LENGTH = 26, ++ MIN_HASH_VALUE = 4, ++ MAX_HASH_VALUE = 36, ++ HASH_VALUE_RANGE = 33, ++ DUPLICATES = 10 ++ }; ++ ++ static const class TAO_operation_db_entry wordlist[] = ++ { ++ {"",0},{"",0},{"",0},{"",0}, ++ {"move", &POA_IR::FinderDef::move_skel}, ++ {"_is_a", &POA_IR::FinderDef::_is_a_skel}, ++ {"_get_mode", &POA_IR::FinderDef::_get_mode_skel}, ++ {"_set_name", &POA_IR::FinderDef::_set_name_skel}, ++ {"_get_name", &POA_IR::FinderDef::_get_name_skel}, ++ {"_set_mode", &POA_IR::FinderDef::_set_mode_skel}, ++ {"_get_params", &POA_IR::FinderDef::_get_params_skel}, ++ {"_set_params", &POA_IR::FinderDef::_set_params_skel}, ++ {"_get_contexts", &POA_IR::FinderDef::_get_contexts_skel}, ++ {"_set_contexts", &POA_IR::FinderDef::_set_contexts_skel}, ++ {"_get_exceptions", &POA_IR::FinderDef::_get_exceptions_skel}, ++ {"_set_exceptions", &POA_IR::FinderDef::_set_exceptions_skel}, ++ {"_get_version", &POA_IR::FinderDef::_get_version_skel}, ++ {"_set_version", &POA_IR::FinderDef::_set_version_skel}, ++ {"_get_absolute_name", &POA_IR::FinderDef::_get_absolute_name_skel}, ++ {"_get_defined_in", &POA_IR::FinderDef::_get_defined_in_skel}, ++ {"_get_id", &POA_IR::FinderDef::_get_id_skel}, ++ {"_set_id", &POA_IR::FinderDef::_set_id_skel}, ++ {"describe", &POA_IR::FinderDef::describe_skel}, ++ {"_get_result_def", &POA_IR::FinderDef::_get_result_def_skel}, ++ {"_set_result_def", &POA_IR::FinderDef::_set_result_def_skel}, ++ {"_get_def_kind", &POA_IR::FinderDef::_get_def_kind_skel}, ++ {"_get_result", &POA_IR::FinderDef::_get_result_skel}, ++ {"destroy", &POA_IR::FinderDef::destroy_skel}, ++ {"_non_existent", &POA_IR::FinderDef::_non_existent_skel}, ++ {"_get_containing_repository", &POA_IR::FinderDef::_get_containing_repository_skel}, ++ }; ++ ++ if (len <= MAX_WORD_LENGTH && len >= MIN_WORD_LENGTH) ++ { ++ unsigned int key = hash (str, len); ++ ++ if (key <= MAX_HASH_VALUE && key >= MIN_HASH_VALUE) ++ { ++ { ++ const class TAO_operation_db_entry *resword; ++ ++ switch (key) ++ { ++ case 4: ++ resword = &wordlist[4]; break; ++ case 5: ++ resword = &wordlist[5]; break; ++ case 9: ++ resword = &wordlist[6]; ++ if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; ++ resword = &wordlist[7]; ++ if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; ++ resword = &wordlist[8]; ++ if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; ++ resword = &wordlist[9]; ++ if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; ++ return 0; ++ case 11: ++ resword = &wordlist[10]; ++ if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; ++ resword = &wordlist[11]; ++ if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; ++ return 0; ++ case 13: ++ resword = &wordlist[12]; ++ if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; ++ resword = &wordlist[13]; ++ if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; ++ return 0; ++ case 15: ++ resword = &wordlist[14]; ++ if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; ++ resword = &wordlist[15]; ++ if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; ++ return 0; ++ case 17: ++ resword = &wordlist[16]; ++ if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; ++ resword = &wordlist[17]; ++ if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; ++ return 0; ++ case 18: ++ resword = &wordlist[18]; break; ++ case 20: ++ resword = &wordlist[19]; break; ++ case 22: ++ resword = &wordlist[20]; ++ if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; ++ resword = &wordlist[21]; ++ if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; ++ return 0; ++ case 23: ++ resword = &wordlist[22]; break; ++ case 25: ++ resword = &wordlist[23]; ++ if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; ++ resword = &wordlist[24]; ++ if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) return resword; ++ return 0; ++ case 28: ++ resword = &wordlist[25]; break; ++ case 31: ++ resword = &wordlist[26]; break; ++ case 32: ++ resword = &wordlist[27]; break; ++ case 33: ++ resword = &wordlist[28]; break; ++ case 36: ++ resword = &wordlist[29]; break; ++ default: return 0; ++ } ++ if (*str == *resword->opname_ && !strncmp (str + 1, resword->opname_ + 1, len - 1)) ++ return resword; ++ return 0; ++ } ++ } ++ } ++ return 0; } --/* ending time is 18:47:29 */ +/* ending time is 11:23:11 */ - static TAO_IR_FinderDef_Perfect_Hash_OpTable tao_IR_FinderDef_optable; ++static TAO_IR_FinderDef_Perfect_Hash_OpTable tao_IR_FinderDef_optable; -- - /////////////////////////////////////////////////////////////////////// - // Strategized Proxy Broker Implementation - // -@@ -43786,9 +43629,9 @@ - +-IR::FinderDefSeq * POA_IR::_TAO_HomeDef_ThruPOA_Proxy_Impl::finders ( +- CORBA_Object *_collocated_tao_target_, +- CORBA::Environment &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) ++/////////////////////////////////////////////////////////////////////// ++// Strategized Proxy Broker Implementation ++// ++ ++// Factory function Implementation. ++POA_IR::_TAO_FinderDef_Strategized_Proxy_Broker *POA_IR::_TAO_FinderDef_Strategized_Proxy_Broker::the_TAO_FinderDef_Strategized_Proxy_Broker (void) + { +- IR::FinderDefSeq_var _tao_retval; +- ACE_UNUSED_ARG (_tao_retval); +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "finders", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK_RETURN (0); +- return ACE_reinterpret_cast ( +- POA_IR::HomeDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/HomeDef:1.0" +- ) +- )->finders ( +- ACE_TRY_ENV +- ); ++ static POA_IR::_TAO_FinderDef_Strategized_Proxy_Broker strategized_proxy_broker; ++ return &strategized_proxy_broker; + } + +-CORBA::Boolean POA_IR::_TAO_HomeDef_ThruPOA_Proxy_Impl::is_basic ( +- CORBA_Object *_collocated_tao_target_, +- CORBA::Environment &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) ++POA_IR::_TAO_FinderDef_Strategized_Proxy_Broker::_TAO_FinderDef_Strategized_Proxy_Broker (void) + { +- CORBA::Boolean _tao_retval = 0; +- ACE_UNUSED_ARG (_tao_retval); +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "is_basic", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK_RETURN (_tao_retval); +- return ACE_reinterpret_cast ( +- POA_IR::HomeDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/HomeDef:1.0" +- ) +- )->is_basic ( +- ACE_TRY_ENV +- ); ++ for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) ++ this->proxy_cache_[i] = 0; ++ } --IR::_TAO_FinderDef_Proxy_Impl& +-IR::PrimaryKeyDef_ptr POA_IR::_TAO_HomeDef_ThruPOA_Proxy_Impl::create_primary_key ( +- CORBA_Object *_collocated_tao_target_, +- const char * id, +- const char * name, +- const char * version, +- IR::ValueDef_ptr primary_key, +- CORBA::Environment &ACE_TRY_ENV +- ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) ++POA_IR::_TAO_FinderDef_Strategized_Proxy_Broker::~_TAO_FinderDef_Strategized_Proxy_Broker (void) + { +- IR::PrimaryKeyDef_var _tao_retval; +- ACE_UNUSED_ARG (_tao_retval); +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "create_primary_key", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK_RETURN (0); +- return ACE_reinterpret_cast ( +- POA_IR::HomeDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/HomeDef:1.0" +- ) +- )->create_primary_key ( +- id, +- name, +- version, +- primary_key, +- ACE_TRY_ENV +- ); ++ for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) ++ delete this->proxy_cache_[i]; ++ + } + +-IR::FactoryDef_ptr POA_IR::_TAO_HomeDef_ThruPOA_Proxy_Impl::create_factory ( +- CORBA_Object *_collocated_tao_target_, +- const char * id, +- const char * name, +- const char * version, +- const IR::ParDescriptionSeq & params, +- const IR::ExceptionDefSeq & exceptions, +_TAO_FinderDef_Proxy_Impl& - POA_IR::_TAO_FinderDef_Strategized_Proxy_Broker::select_proxy ( -- ::IR::FinderDef *object, ++POA_IR::_TAO_FinderDef_Strategized_Proxy_Broker::select_proxy ( + IR_FinderDef *object, CORBA::Environment &ACE_TRY_ENV ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) { -@@ -43820,7 +43663,7 @@ - case TAO_ORB_Core::THRU_POA_STRATEGY: - ACE_NEW_THROW_EX ( - this->proxy_cache_[strategy], -- POA_IR::_TAO_FinderDef_ThruPOA_Proxy_Impl, +- IR::FactoryDef_var _tao_retval; +- ACE_UNUSED_ARG (_tao_retval); +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "create_factory", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK_RETURN (0); +- return ACE_reinterpret_cast ( +- POA_IR::HomeDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/HomeDef:1.0" +- ) +- )->create_factory ( +- id, +- name, +- version, +- params, +- exceptions, +- ACE_TRY_ENV +- ); ++ TAO_ORB_Core::TAO_Collocation_Strategies strategy = ++ TAO_ORB_Core::collocation_strategy (object); ++ ++ if (this->proxy_cache_[strategy] != 0) ++ return *this->proxy_cache_[strategy]; ++ ++ this->create_proxy (strategy, ACE_TRY_ENV); ++ ACE_CHECK_RETURN (*this->proxy_cache_[strategy]); ++ ++ return *this->proxy_cache_[strategy]; ++ + } + +-IR::FinderDef_ptr POA_IR::_TAO_HomeDef_ThruPOA_Proxy_Impl::create_finder ( +- CORBA_Object *_collocated_tao_target_, +- const char * id, +- const char * name, +- const char * version, +- const IR::ParDescriptionSeq & params, +- const IR::ExceptionDefSeq & exceptions, ++void ++POA_IR::_TAO_FinderDef_Strategized_Proxy_Broker::create_proxy ( ++ TAO_ORB_Core::TAO_Collocation_Strategies strategy, + CORBA::Environment &ACE_TRY_ENV + ) +- ACE_THROW_SPEC (( +- CORBA::SystemException +- )) + { +- IR::FinderDef_var _tao_retval; +- ACE_UNUSED_ARG (_tao_retval); +- TAO_Object_Adapter::Servant_Upcall servant_upcall ( +- _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () +- ); +- CORBA::Object_var forward_to; +- servant_upcall.prepare_for_upcall ( +- _collocated_tao_target_->_object_key (), +- "create_finder", +- forward_to.out (), +- ACE_TRY_ENV +- ); +- ACE_CHECK_RETURN (0); +- return ACE_reinterpret_cast ( +- POA_IR::HomeDef_ptr, +- servant_upcall.servant ()->_downcast ( +- "IDL:omg.org/IR/HomeDef:1.0" +- ) +- )->create_finder ( +- id, +- name, +- version, +- params, +- exceptions, +- ACE_TRY_ENV +- ); ++ ACE_GUARD (TAO_SYNCH_MUTEX, guard, this->mutex_); ++ ++ if (this->proxy_cache_[strategy] == 0) ++ { ++ switch (strategy) ++ { ++ case TAO_ORB_Core::THRU_POA_STRATEGY: ++ ACE_NEW_THROW_EX ( ++ this->proxy_cache_[strategy], + _TAO_FinderDef_ThruPOA_Proxy_Impl, - CORBA::NO_MEMORY () - ); - ACE_CHECK; -@@ -43830,7 +43673,7 @@ - default: - ACE_NEW_THROW_EX ( - this->proxy_cache_[strategy], -- ::IR::_TAO_FinderDef_Remote_Proxy_Impl, ++ CORBA::NO_MEMORY () ++ ); ++ ACE_CHECK; ++ break; ++ ++ case TAO_ORB_Core::REMOTE_STRATEGY: ++ default: ++ ACE_NEW_THROW_EX ( ++ this->proxy_cache_[strategy], + _TAO_FinderDef_Remote_Proxy_Impl, - CORBA::NO_MEMORY () - ); - ACE_CHECK; -@@ -43847,26 +43690,26 @@ - /////////////////////////////////////////////////////////////////////// - - --IR::_TAO_FinderDef_Proxy_Broker * --IR__TAO_FinderDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) ++ CORBA::NO_MEMORY () ++ ); ++ ACE_CHECK; ++ break; ++ ++ } ++ ++ } ++} ++ ++ ++// ++// End Strategized Proxy Broker Implementation ++/////////////////////////////////////////////////////////////////////// ++ ++ +_TAO_FinderDef_Proxy_Broker * +_TAO_FinderDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) - { - ACE_UNUSED_ARG (obj); - return ::POA_IR::_TAO_FinderDef_Strategized_Proxy_Broker::the_TAO_FinderDef_Strategized_Proxy_Broker(); - } - - int --IR__TAO_FinderDef_Proxy_Broker_Factory_Initializer (long _dummy_) ++{ ++ ACE_UNUSED_ARG (obj); ++ return ::POA_IR::_TAO_FinderDef_Strategized_Proxy_Broker::the_TAO_FinderDef_Strategized_Proxy_Broker(); ++} ++ ++int +_TAO_FinderDef_Proxy_Broker_Factory_Initializer (long _dummy_) - { - ACE_UNUSED_ARG (_dummy_); - -- IR__TAO_FinderDef_Proxy_Broker_Factory_function_pointer = -- IR__TAO_FinderDef_Proxy_Broker_Factory_function; ++{ ++ ACE_UNUSED_ARG (_dummy_); ++ + _TAO_FinderDef_Proxy_Broker_Factory_function_pointer = + _TAO_FinderDef_Proxy_Broker_Factory_function; - - return 0; ++ ++ return 0; } --static int IR__TAO_FinderDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = -- IR__TAO_FinderDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, IR__TAO_FinderDef_Proxy_Broker_Factory_Initializer)); +static int _TAO_FinderDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = + _TAO_FinderDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, _TAO_FinderDef_Proxy_Broker_Factory_Initializer)); - - ++ ++ ++/////////////////////////////////////////////////////////////////////// ++// ThruPOA Proxy Implementation ++// ++ ++POA_IR::_TAO_FinderDef_ThruPOA_Proxy_Impl::_TAO_FinderDef_ThruPOA_Proxy_Impl (void) ++{} ++ ++POA_IR::_TAO_FinderDef_ThruPOA_Proxy_Impl::~_TAO_FinderDef_ThruPOA_Proxy_Impl (void) ++{} ++ ++// ThruPOA Implementation of the IDL interface methods ++ + // + // End ThruPOA Proxy Implementation /////////////////////////////////////////////////////////////////////// -@@ -43892,7 +43735,7 @@ - POA_IR::FinderDef::FinderDef (const FinderDef& rhs) - : ACE_NESTED_CLASS (POA_IR,OperationDef) (rhs), + + // skeleton constructor +-POA_IR::HomeDef::HomeDef (void) ++POA_IR::FinderDef::FinderDef (void) + { +- this->optable_ = &tao_IR_HomeDef_optable; ++ this->optable_ = &tao_IR_FinderDef_optable; + } +- +-// copy ctor +-POA_IR::HomeDef::HomeDef (const HomeDef& rhs) +- : ACE_NESTED_CLASS (POA_IR,InterfaceDef) (rhs), +- ACE_NESTED_CLASS (POA_IR,Container) (rhs), ++ ++// copy ctor ++POA_IR::FinderDef::FinderDef (const FinderDef& rhs) ++ : ACE_NESTED_CLASS (POA_IR,OperationDef) (rhs), ACE_NESTED_CLASS (POA_IR,Contained) (rhs), +- ACE_NESTED_CLASS (POA_IR,IDLType) (rhs), - ACE_NESTED_CLASS (POA_CORBA,IRObject) (rhs), + POA_CORBA_IRObject (rhs), TAO_ServantBase (rhs) {} -@@ -43912,7 +43755,7 @@ - POA_IR::FinderDef *_tao_impl = (POA_IR::FinderDef *) _tao_object_reference; - CORBA::Boolean _tao_retval = 0; - CORBA::String_var value; -- if (!(_tao_in >> value.out ())) -+ if (!((_tao_in >> value.out ()))) - ACE_THROW (CORBA::MARSHAL ()); - - _tao_retval = _tao_impl->_is_a (value.in (), ACE_TRY_ENV); -@@ -43920,7 +43763,7 @@ - - _tao_server_request.init_reply (); - TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); -- if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) -+ if (!((_tao_out << CORBA::Any::from_boolean (_tao_retval)))) - ACE_THROW (CORBA::MARSHAL ()); + // skeleton destructor +-POA_IR::HomeDef::~HomeDef (void) ++POA_IR::FinderDef::~FinderDef (void) + { } -@@ -43937,7 +43780,7 @@ - - _tao_server_request.init_reply (); - TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); -- if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) +-void POA_IR::HomeDef::_get_base_home_skel ( ++void POA_IR::FinderDef::_is_a_skel ( + TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, ++ void * _tao_object_reference, ++ void * /* context */, + CORBA::Environment &ACE_TRY_ENV + ) + { +- POA_IR::HomeDef *_tao_impl = (POA_IR::HomeDef *)_tao_object_reference; +- +- IR::HomeDef_var _tao_retval; ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::FinderDef *_tao_impl = (POA_IR::FinderDef *) _tao_object_reference; ++ CORBA::Boolean _tao_retval = 0; ++ CORBA::String_var value; ++ if (!((_tao_in >> value.out ()))) ++ ACE_THROW (CORBA::MARSHAL ()); + +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::HomeDef::TAO_ServerRequestInfo_IR_HomeDef_base_home_get ri ( +- _tao_server_request, +- _tao_impl +- , +- ACE_TRY_ENV +- ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->base_home ( +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::HomeDef_ptr _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; ++ _tao_retval = _tao_impl->_is_a (value.in (), ACE_TRY_ENV); + ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << _tao_retval.in ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); + ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); + if (!((_tao_out << CORBA::Any::from_boolean (_tao_retval)))) - ACE_THROW (CORBA::MARSHAL ()); ++ ACE_THROW (CORBA::MARSHAL ()); } -@@ -43968,7 +43811,7 @@ - if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Contained:1.0") == 0) - return ACE_static_cast (POA_IR::Contained_ptr, this); - if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/IRObject:1.0") == 0) -- return ACE_static_cast (POA_CORBA::IRObject_ptr, this); -+ return ACE_static_cast (POA_CORBA_IRObject_ptr, this); - if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/Object:1.0") == 0) - return ACE_static_cast(PortableServer::Servant, this); - return 0; -@@ -43998,12 +43841,12 @@ - ACE_NEW_RETURN (tmp, CORBA::Object (stub, 0, this), 0); - - CORBA::Object_var obj = tmp; -- return ::IR::FinderDef::_unchecked_narrow (obj.in ()); -+ return IR_FinderDef::_unchecked_narrow (obj.in ()); - } +-void POA_IR::HomeDef::_get_managed_component_skel ( ++void POA_IR::FinderDef::_non_existent_skel ( + TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, ++ void * _tao_object_reference, ++ void * /* context */, + CORBA::Environment &ACE_TRY_ENV + ) + { +- POA_IR::HomeDef *_tao_impl = (POA_IR::HomeDef *)_tao_object_reference; ++ POA_IR::FinderDef *_tao_impl = (POA_IR::FinderDef *) _tao_object_reference; ++ CORBA::Boolean _tao_retval = _tao_impl->_non_existent (ACE_TRY_ENV); ++ ACE_CHECK; +- IR::ComponentDef_var _tao_retval; ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!((_tao_out << CORBA::Any::from_boolean (_tao_retval)))) ++ ACE_THROW (CORBA::MARSHAL ()); ++} + +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::HomeDef::TAO_ServerRequestInfo_IR_HomeDef_managed_component_get ri ( +- _tao_server_request, +- _tao_impl +- , +- ACE_TRY_ENV +- ); ++CORBA::Boolean POA_IR::FinderDef::_is_a ( ++ const char* value, ++ CORBA::Environment &ACE_TRY_ENV ++ ) ++{ ++ if ( ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/FinderDef:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/OperationDef:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/Contained:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/CORBA/IRObject:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, CORBA::_tc_Object->id (ACE_TRY_ENV)))) ++ return 1; ++ else ++ return 0; ++} ++ ++void* POA_IR::FinderDef::_downcast ( ++ const char* logical_type_id ++ ) ++{ ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/FinderDef:1.0") == 0) ++ return ACE_static_cast (POA_IR::FinderDef_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/OperationDef:1.0") == 0) ++ return ACE_static_cast (POA_IR::OperationDef_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Contained:1.0") == 0) ++ return ACE_static_cast (POA_IR::Contained_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/IRObject:1.0") == 0) ++ return ACE_static_cast (POA_CORBA_IRObject_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/Object:1.0") == 0) ++ return ACE_static_cast(PortableServer::Servant, this); ++ return 0; ++} ++ ++void POA_IR::FinderDef::_dispatch (TAO_ServerRequest &req, void *context, CORBA::Environment &ACE_TRY_ENV) ++{ ++ this->synchronous_upcall_dispatch(req, context, this, ACE_TRY_ENV); ++} ++ ++const char* POA_IR::FinderDef::_interface_repository_id (void) const ++{ ++ return "IDL:omg.org/IR/FinderDef:1.0"; ++} ++ ++IR::FinderDef* ++POA_IR::FinderDef::_this (CORBA_Environment &ACE_TRY_ENV) ++{ ++ TAO_Stub *stub = this->_create_stub (ACE_TRY_ENV); ++ ACE_CHECK_RETURN (0); + +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = - - #if (TAO_HAS_INTERCEPTORS == 1) - #endif /* TAO_HAS_INTERCEPTORS */ +- _tao_impl->managed_component ( +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::ComponentDef_ptr _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) ++ CORBA::Object_ptr tmp = CORBA::Object::_nil (); ++ ++ if (stub->servant_orb_var ()->orb_core ()->optimize_collocation_objects ()) ++ ACE_NEW_RETURN (tmp, CORBA::Object (stub, 1, this), 0); ++ else ++ ACE_NEW_RETURN (tmp, CORBA::Object (stub, 0, this), 0); ++ ++ CORBA::Object_var obj = tmp; ++ return IR_FinderDef::_unchecked_narrow (obj.in ()); ++} + - class TAO_IR_HomeDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable - { - private: -@@ -44011,7 +43854,7 @@ - public: - const TAO_operation_db_entry * lookup (const char *str, unsigned int len); - }; --/* starting time is 18:47:29 */ ++class TAO_IR_HomeDef_Perfect_Hash_OpTable : public TAO_Perfect_Hash_OpTable ++{ ++private: ++ unsigned int hash (const char *str, unsigned int len); ++public: ++ const TAO_operation_db_entry * lookup (const char *str, unsigned int len); ++}; +/* starting time is 11:23:11 */ - /* C++ code produced by gperf version 2.8 (ACE version) */ - /* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_HomeDef_Perfect_Hash_OpTable -N lookup */ - unsigned int -@@ -44175,10 +44018,9 @@ ++/* C++ code produced by gperf version 2.8 (ACE version) */ ++/* Command-line: gperf -m -M -J -c -C -D -E -T -f 0 -F 0 -a -o -t -p -K opname_ -L C++ -Z TAO_IR_HomeDef_Perfect_Hash_OpTable -N lookup */ ++unsigned int ++TAO_IR_HomeDef_Perfect_Hash_OpTable::hash (const char *str, unsigned int len) ++{ ++ static const unsigned char asso_values[] = + { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY ++#if defined (ACE_MVS) ++ 89, 89, 89, 89, 89, 89, 89, 89, 89, 89, ++ 89, 89, 89, 89, 89, 89, 89, 89, 89, 89, ++ 89, 89, 89, 89, 89, 89, 89, 89, 89, 89, ++ 89, 89, 89, 89, 89, 89, 89, 89, 89, 89, ++ 89, 89, 89, 89, 89, 89, 89, 89, 89, 89, ++ 89, 89, 89, 89, 89, 89, 89, 89, 89, 89, ++ 89, 89, 89, 89, 89, 89, 89, 89, 89, 89, ++ 89, 89, 89, 89, 89, 89, 89, 89, 89, 89, ++ 89, 89, 89, 89, 89, 89, 89, 89, 89, 89, ++ 89, 89, 89, 89, 89, 89, 89, 89, 89, 89, ++ 89, 89, 89, 89, 89, 89, 89, 89, 89, 0, ++ 89, 89, 89, 89, 89, 89, 89, 89, 89, 89, ++ 89, 89, 89, 89, 89, 89, 89, 89, 89, 0, ++ 89, 15, 0, 45, 89, 89, 89, 0, 89, 89, ++ 89, 89, 89, 89, 89, 89, 89, 5, 0, 10, ++ 89, 0, 89, 5, 89, 89, 89, 89, 89, 89, ++ 89, 89, 15, 30, 89, 89, 89, 0, 55, 89, ++ 89, 89, 89, 89, 89, 89, 89, 89, 89, 89, ++ 89, 89, 89, 89, 89, 89, 89, 89, 89, 89, ++ 89, 89, 89, 89, 89, 89, 89, 89, 89, 89, ++ 89, 89, 89, 89, 89, 89, 89, 89, 89, 89, ++ 89, 89, 89, 89, 89, 89, 89, 89, 89, 89, ++ 89, 89, 89, 89, 89, 89, 89, 89, 89, 89, ++ 89, 89, 89, 89, 89, 89, 89, 89, 89, 89, ++ 89, 89, 89, 89, 89, 89, 89, 89, 89, 89, ++ 89, 89, 89, 89, 89, 89, ++#else ++ 89, 89, 89, 89, 89, 89, 89, 89, 89, 89, ++ 89, 89, 89, 89, 89, 89, 89, 89, 89, 89, ++ 89, 89, 89, 89, 89, 89, 89, 89, 89, 89, ++ 89, 89, 89, 89, 89, 89, 89, 89, 89, 89, ++ 89, 89, 89, 89, 89, 89, 89, 89, 89, 89, ++ 89, 89, 89, 89, 89, 89, 89, 89, 89, 89, ++ 89, 89, 89, 89, 89, 89, 89, 89, 89, 89, ++ 89, 89, 89, 89, 89, 89, 89, 89, 89, 89, ++ 89, 89, 89, 89, 89, 89, 89, 89, 89, 89, ++ 89, 89, 89, 89, 89, 0, 89, 0, 89, 15, ++ 0, 45, 89, 89, 89, 0, 89, 89, 5, 0, ++ 10, 89, 0, 89, 5, 15, 30, 89, 89, 89, ++ 0, 55, 89, 89, 89, 89, 89, 89, ++#endif /* ACE_MVS */ ++ }; ++ return len + asso_values[str[len - 1]] + asso_values[str[0]]; ++} ++ ++const class TAO_operation_db_entry * ++TAO_IR_HomeDef_Perfect_Hash_OpTable::lookup (const char *str, unsigned int len) ++{ ++ enum ++ { ++ TOTAL_KEYWORDS = 49, ++ MIN_WORD_LENGTH = 4, ++ MAX_WORD_LENGTH = 26, ++ MIN_HASH_VALUE = 4, ++ MAX_HASH_VALUE = 88, ++ HASH_VALUE_RANGE = 85, ++ DUPLICATES = 11 ++ }; ++ ++ static const class TAO_operation_db_entry wordlist[] = ++ { ++ {"",0},{"",0},{"",0},{"",0}, ++ {"is_a", &POA_IR::HomeDef::is_a_skel}, ++ {"_is_a", &POA_IR::HomeDef::_is_a_skel}, ++ {"_get_id", &POA_IR::HomeDef::_get_id_skel}, ++ {"_set_id", &POA_IR::HomeDef::_set_id_skel}, ++ {"lookup", &POA_IR::HomeDef::lookup_skel}, ++ {"_get_def_kind", &POA_IR::HomeDef::_get_def_kind_skel}, ++ {"_get_is_local", &POA_IR::HomeDef::_get_is_local_skel}, ++ {"_set_is_local", &POA_IR::HomeDef::_set_is_local_skel}, ++ {"_get_version", &POA_IR::HomeDef::_get_version_skel}, ++ {"_set_version", &POA_IR::HomeDef::_set_version_skel}, ++ {"_get_defined_in", &POA_IR::HomeDef::_get_defined_in_skel}, ++ {"create_enum", &POA_IR::HomeDef::create_enum_skel}, ++ {"_get_finders", &POA_IR::HomeDef::_get_finders_skel}, ++ {"_get_is_basic", &POA_IR::HomeDef::_get_is_basic_skel}, ++ {"_get_factories", &POA_IR::HomeDef::_get_factories_skel}, ++ {"create_value_box", &POA_IR::HomeDef::create_value_box_skel}, ++ {"describe_contents", &POA_IR::HomeDef::describe_contents_skel}, ++ {"create_finder", &POA_IR::HomeDef::create_finder_skel}, ++ {"_get_base_interfaces", &POA_IR::HomeDef::_get_base_interfaces_skel}, ++ {"_set_base_interfaces", &POA_IR::HomeDef::_set_base_interfaces_skel}, ++ {"create_union", &POA_IR::HomeDef::create_union_skel}, ++ {"contents", &POA_IR::HomeDef::contents_skel}, ++ {"create_operation", &POA_IR::HomeDef::create_operation_skel}, ++ {"create_exception", &POA_IR::HomeDef::create_exception_skel}, ++ {"create_alias", &POA_IR::HomeDef::create_alias_skel}, ++ {"_non_existent", &POA_IR::HomeDef::_non_existent_skel}, ++ {"_get_is_abstract", &POA_IR::HomeDef::_get_is_abstract_skel}, ++ {"_set_is_abstract", &POA_IR::HomeDef::_set_is_abstract_skel}, ++ {"move", &POA_IR::HomeDef::move_skel}, ++ {"_get_managed_component", &POA_IR::HomeDef::_get_managed_component_skel}, ++ {"describe", &POA_IR::HomeDef::describe_skel}, ++ {"_get_name", &POA_IR::HomeDef::_get_name_skel}, ++ {"_get_type", &POA_IR::HomeDef::_get_type_skel}, ++ {"_set_name", &POA_IR::HomeDef::_set_name_skel}, ++ {"create_struct", &POA_IR::HomeDef::create_struct_skel}, ++ {"_get_base_home", &POA_IR::HomeDef::_get_base_home_skel}, ++ {"create_constant", &POA_IR::HomeDef::create_constant_skel}, ++ {"lookup_name", &POA_IR::HomeDef::lookup_name_skel}, ++ {"destroy", &POA_IR::HomeDef::destroy_skel}, ++ {"_get_absolute_name", &POA_IR::HomeDef::_get_absolute_name_skel}, ++ {"_get_primary_key", &POA_IR::HomeDef::_get_primary_key_skel}, ++ {"create_value", &POA_IR::HomeDef::create_value_skel}, ++ {"create_module", &POA_IR::HomeDef::create_module_skel}, ++ {"create_native", &POA_IR::HomeDef::create_native_skel}, ++ {"create_attribute", &POA_IR::HomeDef::create_attribute_skel}, ++ {"create_interface", &POA_IR::HomeDef::create_interface_skel}, ++ {"_get_containing_repository", &POA_IR::HomeDef::_get_containing_repository_skel}, ++ {"create_factory", &POA_IR::HomeDef::create_factory_skel}, ++ {"create_primary_key", &POA_IR::HomeDef::create_primary_key_skel}, ++ }; ++ ++ static const signed char lookup[] = ++ { ++ -1, -1, -6, -2, 4, 5, -1, -93, -1, -1, -1, 8, -1, 9, ++ -1, -1, -10, -2, -90, -1, -12, -2, -90, -22, -2, 14, 15, 16, ++ 17, 18, -1, 19, 20, 21, -1, -100, -1, 24, 25, -26, -2, -90, ++ 28, 29, -30, -2, -90, -1, -1, 32, -35, -3, 33, 34, -92, -1, ++ -1, -1, 38, 39, 40, 41, 42, 43, -1, -1, -1, -1, -1, -46, ++ -2, 44, 45, -92, -48, -2, -90, -1, -1, -1, -1, 50, -1, -1, ++ 51, -1, -1, -1, 52, ++ }; ++ ++ if (len <= MAX_WORD_LENGTH && len >= MIN_WORD_LENGTH) + { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; ++ unsigned int key = hash (str, len); ++ ++ if (key <= MAX_HASH_VALUE && key >= MIN_HASH_VALUE) ++ { ++ int slot = lookup[key]; ++ ++ if (slot >= 0 && slot < MAX_HASH_VALUE) ++ { ++ const char *s = wordlist[slot].opname_; ++ ++ if (*str == *s && !strncmp (str + 1, s + 1, len - 1)) ++ return &wordlist[slot]; ++ } ++ else if (slot < 0 && slot >= -MAX_HASH_VALUE) ++ return 0; ++ else ++ { ++ unsigned int offset = key + slot + (slot > 0 ? -MAX_HASH_VALUE : MAX_HASH_VALUE); ++ const class TAO_operation_db_entry *base = &wordlist[-lookup[offset]]; ++ const class TAO_operation_db_entry *ptr = base + -lookup[offset + 1]; ++ ++ while (--ptr >= base) ++ if (*str == *ptr->opname_ && !strncmp (str + 1, ptr->opname_ + 1, len - 1)) ++ return ptr; ++ } ++ } } - return 0; - } --/* ending time is 18:47:29 */ +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ ++ return 0; ++} +/* ending time is 11:23:11 */ - static TAO_IR_HomeDef_Perfect_Hash_OpTable tao_IR_HomeDef_optable; - ++static TAO_IR_HomeDef_Perfect_Hash_OpTable tao_IR_HomeDef_optable; ++ ++/////////////////////////////////////////////////////////////////////// ++// Strategized Proxy Broker Implementation ++// ++ ++// Factory function Implementation. ++POA_IR::_TAO_HomeDef_Strategized_Proxy_Broker *POA_IR::_TAO_HomeDef_Strategized_Proxy_Broker::the_TAO_HomeDef_Strategized_Proxy_Broker (void) ++{ ++ static POA_IR::_TAO_HomeDef_Strategized_Proxy_Broker strategized_proxy_broker; ++ return &strategized_proxy_broker; ++} ++ ++POA_IR::_TAO_HomeDef_Strategized_Proxy_Broker::_TAO_HomeDef_Strategized_Proxy_Broker (void) ++{ ++ for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) ++ this->proxy_cache_[i] = 0; + +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << _tao_retval.in ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); ++} + ++POA_IR::_TAO_HomeDef_Strategized_Proxy_Broker::~_TAO_HomeDef_Strategized_Proxy_Broker (void) ++{ ++ for (int i = 0; i < TAO_ORB_Core::COLLOCATION_STRATEGIES_NUM; ++i) ++ delete this->proxy_cache_[i]; ++ + } + +-void POA_IR::HomeDef::_get_primary_key_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, ++_TAO_HomeDef_Proxy_Impl& ++POA_IR::_TAO_HomeDef_Strategized_Proxy_Broker::select_proxy ( ++ IR_HomeDef *object, + CORBA::Environment &ACE_TRY_ENV + ) + { +- POA_IR::HomeDef *_tao_impl = (POA_IR::HomeDef *)_tao_object_reference; +- +- IR::PrimaryKeyDef_var _tao_retval; +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::HomeDef::TAO_ServerRequestInfo_IR_HomeDef_primary_key_get ri ( +- _tao_server_request, +- _tao_impl +- , +- ACE_TRY_ENV +- ); ++ TAO_ORB_Core::TAO_Collocation_Strategies strategy = ++ TAO_ORB_Core::collocation_strategy (object); + +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->primary_key ( +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::PrimaryKeyDef_ptr _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ ++ if (this->proxy_cache_[strategy] != 0) ++ return *this->proxy_cache_[strategy]; ++ ++ this->create_proxy (strategy, ACE_TRY_ENV); ++ ACE_CHECK_RETURN (*this->proxy_cache_[strategy]); ++ ++ return *this->proxy_cache_[strategy]; + +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << _tao_retval.in ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); - - /////////////////////////////////////////////////////////////////////// - // Strategized Proxy Broker Implementation - // -@@ -44204,9 +44046,9 @@ - } --IR::_TAO_HomeDef_Proxy_Impl& -+_TAO_HomeDef_Proxy_Impl& - POA_IR::_TAO_HomeDef_Strategized_Proxy_Broker::select_proxy ( -- ::IR::HomeDef *object, -+ IR_HomeDef *object, +-void POA_IR::HomeDef::_get_factories_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, ++void ++POA_IR::_TAO_HomeDef_Strategized_Proxy_Broker::create_proxy ( ++ TAO_ORB_Core::TAO_Collocation_Strategies strategy, CORBA::Environment &ACE_TRY_ENV ) { -@@ -44238,7 +44080,7 @@ - case TAO_ORB_Core::THRU_POA_STRATEGY: - ACE_NEW_THROW_EX ( - this->proxy_cache_[strategy], -- POA_IR::_TAO_HomeDef_ThruPOA_Proxy_Impl, +- POA_IR::HomeDef *_tao_impl = (POA_IR::HomeDef *)_tao_object_reference; ++ ACE_GUARD (TAO_SYNCH_MUTEX, guard, this->mutex_); ++ ++ if (this->proxy_cache_[strategy] == 0) ++ { ++ switch (strategy) ++ { ++ case TAO_ORB_Core::THRU_POA_STRATEGY: ++ ACE_NEW_THROW_EX ( ++ this->proxy_cache_[strategy], + _TAO_HomeDef_ThruPOA_Proxy_Impl, - CORBA::NO_MEMORY () - ); - ACE_CHECK; -@@ -44248,7 +44090,7 @@ - default: - ACE_NEW_THROW_EX ( - this->proxy_cache_[strategy], -- ::IR::_TAO_HomeDef_Remote_Proxy_Impl, ++ CORBA::NO_MEMORY () ++ ); ++ ACE_CHECK; ++ break; ++ ++ case TAO_ORB_Core::REMOTE_STRATEGY: ++ default: ++ ACE_NEW_THROW_EX ( ++ this->proxy_cache_[strategy], + _TAO_HomeDef_Remote_Proxy_Impl, - CORBA::NO_MEMORY () - ); - ACE_CHECK; -@@ -44265,26 +44107,26 @@ - /////////////////////////////////////////////////////////////////////// - - --IR::_TAO_HomeDef_Proxy_Broker * --IR__TAO_HomeDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) ++ CORBA::NO_MEMORY () ++ ); ++ ACE_CHECK; ++ break; ++ ++ } ++ ++ } ++} + +- IR::FactoryDefSeq_var _tao_retval; + +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::HomeDef::TAO_ServerRequestInfo_IR_HomeDef_factories_get ri ( +- _tao_server_request, +- _tao_impl +- , +- ACE_TRY_ENV +- ); ++// ++// End Strategized Proxy Broker Implementation ++/////////////////////////////////////////////////////////////////////// ++ ++ +_TAO_HomeDef_Proxy_Broker * +_TAO_HomeDef_Proxy_Broker_Factory_function (CORBA::Object_ptr obj) - { - ACE_UNUSED_ARG (obj); - return ::POA_IR::_TAO_HomeDef_Strategized_Proxy_Broker::the_TAO_HomeDef_Strategized_Proxy_Broker(); - } - - int --IR__TAO_HomeDef_Proxy_Broker_Factory_Initializer (long _dummy_) ++{ ++ ACE_UNUSED_ARG (obj); ++ return ::POA_IR::_TAO_HomeDef_Strategized_Proxy_Broker::the_TAO_HomeDef_Strategized_Proxy_Broker(); ++} ++ ++int +_TAO_HomeDef_Proxy_Broker_Factory_Initializer (long _dummy_) - { - ACE_UNUSED_ARG (_dummy_); - -- IR__TAO_HomeDef_Proxy_Broker_Factory_function_pointer = -- IR__TAO_HomeDef_Proxy_Broker_Factory_function; ++{ ++ ACE_UNUSED_ARG (_dummy_); + +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->factories ( +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::FactoryDefSeq * _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ + _TAO_HomeDef_Proxy_Broker_Factory_function_pointer = + _TAO_HomeDef_Proxy_Broker_Factory_function; - return 0; +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << _tao_retval.in ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- ++ return 0; } --static int IR__TAO_HomeDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = -- IR__TAO_HomeDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, IR__TAO_HomeDef_Proxy_Broker_Factory_Initializer)); +-void POA_IR::HomeDef::_get_finders_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, +static int _TAO_HomeDef_Proxy_Broker_Stub_Factory_Initializer_Scarecrow = + _TAO_HomeDef_Proxy_Broker_Factory_Initializer (ACE_reinterpret_cast (long, _TAO_HomeDef_Proxy_Broker_Factory_Initializer)); - - - /////////////////////////////////////////////////////////////////////// -@@ -44296,7 +44138,7 @@ - - // ThruPOA Implementation of the IDL interface methods - --IR::HomeDef_ptr POA_IR::_TAO_HomeDef_ThruPOA_Proxy_Impl::base_home ( -+IR_HomeDef_ptr POA_IR::_TAO_HomeDef_ThruPOA_Proxy_Impl::base_home ( - CORBA_Object *_collocated_tao_target_, ++ ++ ++/////////////////////////////////////////////////////////////////////// ++// ThruPOA Proxy Implementation ++// ++ ++POA_IR::_TAO_HomeDef_ThruPOA_Proxy_Impl::_TAO_HomeDef_ThruPOA_Proxy_Impl (void) ++{} ++ ++POA_IR::_TAO_HomeDef_ThruPOA_Proxy_Impl::~_TAO_HomeDef_ThruPOA_Proxy_Impl (void) ++{} ++ ++// ThruPOA Implementation of the IDL interface methods ++ ++IR::HomeDef_ptr POA_IR::_TAO_HomeDef_ThruPOA_Proxy_Impl::base_home ( ++ CORBA_Object *_collocated_tao_target_, CORBA::Environment &ACE_TRY_ENV ) -@@ -44304,7 +44146,7 @@ - CORBA::SystemException - )) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException ++ )) { -- IR::HomeDef_var _tao_retval; +- POA_IR::HomeDef *_tao_impl = (POA_IR::HomeDef *)_tao_object_reference; +- +- IR::FinderDefSeq_var _tao_retval; +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::HomeDef::TAO_ServerRequestInfo_IR_HomeDef_finders_get ri ( +- _tao_server_request, +- _tao_impl +- , + IR_HomeDef_var _tao_retval; - ACE_UNUSED_ARG (_tao_retval); - TAO_Object_Adapter::Servant_Upcall servant_upcall ( - _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -44327,7 +44169,7 @@ ++ ACE_UNUSED_ARG (_tao_retval); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "base_home", ++ forward_to.out (), + ACE_TRY_ENV + ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->finders ( +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::FinderDefSeq * _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, ++ ACE_CHECK_RETURN (0); ++ return ACE_reinterpret_cast ( ++ POA_IR::HomeDef_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/HomeDef:1.0" ++ ) ++ )->base_home ( + ACE_TRY_ENV ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << _tao_retval.in ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- } --IR::ComponentDef_ptr POA_IR::_TAO_HomeDef_ThruPOA_Proxy_Impl::managed_component ( -+IR_ComponentDef_ptr POA_IR::_TAO_HomeDef_ThruPOA_Proxy_Impl::managed_component ( - CORBA_Object *_collocated_tao_target_, +-void POA_IR::HomeDef::_get_is_basic_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, ++IR::ComponentDef_ptr POA_IR::_TAO_HomeDef_ThruPOA_Proxy_Impl::managed_component ( ++ CORBA_Object *_collocated_tao_target_, CORBA::Environment &ACE_TRY_ENV ) -@@ -44335,7 +44177,7 @@ - CORBA::SystemException - )) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException ++ )) { -- IR::ComponentDef_var _tao_retval; +- POA_IR::HomeDef *_tao_impl = (POA_IR::HomeDef *)_tao_object_reference; +- +- CORBA::Boolean _tao_retval = 0; +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () +- ); +- +- POA_IR::HomeDef::TAO_ServerRequestInfo_IR_HomeDef_is_basic_get ri ( +- _tao_server_request, +- _tao_impl +- , + IR_ComponentDef_var _tao_retval; - ACE_UNUSED_ARG (_tao_retval); - TAO_Object_Adapter::Servant_Upcall servant_upcall ( - _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -44358,7 +44200,7 @@ ++ ACE_UNUSED_ARG (_tao_retval); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "managed_component", ++ forward_to.out (), + ACE_TRY_ENV + ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->is_basic ( +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- CORBA::Boolean _tao_retval_info = _tao_retval; +- ri.result (_tao_retval_info); +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, ++ ACE_CHECK_RETURN (0); ++ return ACE_reinterpret_cast ( ++ POA_IR::HomeDef_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/HomeDef:1.0" ++ ) ++ )->managed_component ( + ACE_TRY_ENV ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << CORBA::Any::from_boolean (_tao_retval)) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- } --IR::PrimaryKeyDef_ptr POA_IR::_TAO_HomeDef_ThruPOA_Proxy_Impl::primary_key ( -+IR_PrimaryKeyDef_ptr POA_IR::_TAO_HomeDef_ThruPOA_Proxy_Impl::primary_key ( - CORBA_Object *_collocated_tao_target_, +-void POA_IR::HomeDef::create_primary_key_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, ++IR::PrimaryKeyDef_ptr POA_IR::_TAO_HomeDef_ThruPOA_Proxy_Impl::primary_key ( ++ CORBA_Object *_collocated_tao_target_, CORBA::Environment &ACE_TRY_ENV ) -@@ -44366,7 +44208,7 @@ - CORBA::SystemException +-{ +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::HomeDef *_tao_impl = (POA_IR::HomeDef *)_tao_object_reference; +- +- IR::PrimaryKeyDef_var _tao_retval; +- CORBA::String_var id; +- CORBA::String_var name; +- CORBA::String_var version; +- IR::ValueDef_var primary_key; +- if (!( +- (_tao_in >> id.out ()) && +- (_tao_in >> name.out ()) && +- (_tao_in >> version.out ()) && +- (_tao_in >> primary_key.out ()) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException )) - { -- IR::PrimaryKeyDef_var _tao_retval; +- ACE_THROW (CORBA::MARSHAL()); +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () ++{ + IR_PrimaryKeyDef_var _tao_retval; - ACE_UNUSED_ARG (_tao_retval); - TAO_Object_Adapter::Servant_Upcall servant_upcall ( - _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -44389,7 +44231,7 @@ ++ ACE_UNUSED_ARG (_tao_retval); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () + ); +- +- POA_IR::HomeDef::TAO_ServerRequestInfo_IR_HomeDef_create_primary_key ri ( +- _tao_server_request, +- _tao_impl +- , +- id.in (), +- name.in (), +- version.in (), +- primary_key.in (), ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "primary_key", ++ forward_to.out (), + ACE_TRY_ENV + ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->create_primary_key ( +- id.in (), +- name.in (), +- version.in (), +- primary_key.in (), +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::PrimaryKeyDef_ptr _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, ++ ACE_CHECK_RETURN (0); ++ return ACE_reinterpret_cast ( ++ POA_IR::HomeDef_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/HomeDef:1.0" ++ ) ++ )->primary_key ( + ACE_TRY_ENV ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << _tao_retval.in ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- } --IR::FactoryDefSeq * POA_IR::_TAO_HomeDef_ThruPOA_Proxy_Impl::factories ( -+IR_FactoryDefSeq * POA_IR::_TAO_HomeDef_ThruPOA_Proxy_Impl::factories ( - CORBA_Object *_collocated_tao_target_, - CORBA::Environment &ACE_TRY_ENV - ) -@@ -44397,7 +44239,7 @@ - CORBA::SystemException - )) - { -- IR::FactoryDefSeq_var _tao_retval; +-void POA_IR::HomeDef::create_factory_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, +- CORBA::Environment &ACE_TRY_ENV +- ) +-{ +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::HomeDef *_tao_impl = (POA_IR::HomeDef *)_tao_object_reference; +- +- IR::FactoryDef_var _tao_retval; +- CORBA::String_var id; +- CORBA::String_var name; +- CORBA::String_var version; +- IR::ParDescriptionSeq params; +- IR::ExceptionDefSeq exceptions; +- if (!( +- (_tao_in >> id.out ()) && +- (_tao_in >> name.out ()) && +- (_tao_in >> version.out ()) && +- (_tao_in >> params) && +- (_tao_in >> exceptions) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () ++IR::FactoryDefSeq * POA_IR::_TAO_HomeDef_ThruPOA_Proxy_Impl::factories ( ++ CORBA_Object *_collocated_tao_target_, ++ CORBA::Environment &ACE_TRY_ENV ++ ) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException ++ )) ++{ + IR_FactoryDefSeq_var _tao_retval; - ACE_UNUSED_ARG (_tao_retval); - TAO_Object_Adapter::Servant_Upcall servant_upcall ( - _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -44420,7 +44262,7 @@ ++ ACE_UNUSED_ARG (_tao_retval); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () + ); +- +- POA_IR::HomeDef::TAO_ServerRequestInfo_IR_HomeDef_create_factory ri ( +- _tao_server_request, +- _tao_impl +- , +- id.in (), +- name.in (), +- version.in (), +- params, +- exceptions, ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "factories", ++ forward_to.out (), + ACE_TRY_ENV + ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->create_factory ( +- id.in (), +- name.in (), +- version.in (), +- params, +- exceptions, +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::FactoryDef_ptr _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, ++ ACE_CHECK_RETURN (0); ++ return ACE_reinterpret_cast ( ++ POA_IR::HomeDef_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/HomeDef:1.0" ++ ) ++ )->factories ( + ACE_TRY_ENV ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << _tao_retval.in ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- } --IR::FinderDefSeq * POA_IR::_TAO_HomeDef_ThruPOA_Proxy_Impl::finders ( -+IR_FinderDefSeq * POA_IR::_TAO_HomeDef_ThruPOA_Proxy_Impl::finders ( - CORBA_Object *_collocated_tao_target_, +-void POA_IR::HomeDef::create_finder_skel ( +- TAO_ServerRequest &_tao_server_request, +- void *_tao_object_reference, +- void * /* context */, ++IR::FinderDefSeq * POA_IR::_TAO_HomeDef_ThruPOA_Proxy_Impl::finders ( ++ CORBA_Object *_collocated_tao_target_, CORBA::Environment &ACE_TRY_ENV ) -@@ -44428,7 +44270,7 @@ - CORBA::SystemException +-{ +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::HomeDef *_tao_impl = (POA_IR::HomeDef *)_tao_object_reference; +- +- IR::FinderDef_var _tao_retval; +- CORBA::String_var id; +- CORBA::String_var name; +- CORBA::String_var version; +- IR::ParDescriptionSeq params; +- IR::ExceptionDefSeq exceptions; +- if (!( +- (_tao_in >> id.out ()) && +- (_tao_in >> name.out ()) && +- (_tao_in >> version.out ()) && +- (_tao_in >> params) && +- (_tao_in >> exceptions) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException )) - { -- IR::FinderDefSeq_var _tao_retval; +- ACE_THROW (CORBA::MARSHAL()); +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- TAO_ServerRequestInterceptor_Adapter _tao_vfr ( +- _tao_server_request.orb_core ()->server_request_interceptors (), +- _tao_server_request.interceptor_count () ++{ + IR_FinderDefSeq_var _tao_retval; - ACE_UNUSED_ARG (_tao_retval); - TAO_Object_Adapter::Servant_Upcall servant_upcall ( - _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -44482,19 +44324,19 @@ ++ ACE_UNUSED_ARG (_tao_retval); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () + ); +- +- POA_IR::HomeDef::TAO_ServerRequestInfo_IR_HomeDef_create_finder ri ( +- _tao_server_request, +- _tao_impl +- , +- id.in (), +- name.in (), +- version.in (), +- params, +- exceptions, ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "finders", ++ forward_to.out (), + ACE_TRY_ENV + ); +- +- ACE_TRY +- { +- _tao_vfr.receive_request (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- +-#endif /* TAO_HAS_INTERCEPTORS */ +- _tao_retval = +- +- _tao_impl->create_finder ( +- id.in (), +- name.in (), +- version.in (), +- params, +- exceptions, +- ACE_TRY_ENV +- ); +- TAO_INTERCEPTOR_CHECK; +- +- +-#if (TAO_HAS_INTERCEPTORS == 1) +- IR::FinderDef_ptr _tao_retval_info = _tao_retval._retn (); +- ri.result (_tao_retval_info); +- _tao_retval = _tao_retval_info; +- ri.reply_status (PortableInterceptor::SUCCESSFUL); +- _tao_vfr.send_reply (&ri, ACE_TRY_ENV); +- ACE_TRY_CHECK; +- } +- ACE_CATCH (PortableInterceptor::ForwardRequest, exc) +- { +- ri.forward_reference (exc); +- _tao_vfr.send_other ( +- &ri, ++ ACE_CHECK_RETURN (0); ++ return ACE_reinterpret_cast ( ++ POA_IR::HomeDef_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/HomeDef:1.0" ++ ) ++ )->finders ( + ACE_TRY_ENV ); +- ACE_TRY_CHECK; +- _tao_server_request.forward_location (exc.forward.in ()); +- } +- ACE_CATCHANY +- { +- ri.exception (&ACE_ANY_EXCEPTION); +- _tao_vfr.send_exception ( +- &ri, +- ACE_TRY_ENV +- ); +- ACE_TRY_CHECK; +- ACE_RE_THROW; +- } +- ACE_ENDTRY; +- ACE_CHECK; +-#endif /* TAO_HAS_INTERCEPTORS */ +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!( +- (_tao_out << _tao_retval.in ()) +- )) +- ACE_THROW (CORBA::MARSHAL()); +- } --IR::PrimaryKeyDef_ptr POA_IR::_TAO_HomeDef_ThruPOA_Proxy_Impl::create_primary_key ( -+IR_PrimaryKeyDef_ptr POA_IR::_TAO_HomeDef_ThruPOA_Proxy_Impl::create_primary_key ( - CORBA_Object *_collocated_tao_target_, - const char * id, - const char * name, - const char * version, -- IR::ValueDef_ptr primary_key, +-void POA_IR::HomeDef::_is_a_skel ( +- TAO_ServerRequest &_tao_server_request, +- void * _tao_object_reference, +- void * /* context */, ++CORBA::Boolean POA_IR::_TAO_HomeDef_ThruPOA_Proxy_Impl::is_basic ( ++ CORBA_Object *_collocated_tao_target_, + CORBA::Environment &ACE_TRY_ENV + ) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException ++ )) + { +- TAO_InputCDR &_tao_in = _tao_server_request.incoming (); +- POA_IR::HomeDef *_tao_impl = (POA_IR::HomeDef *) _tao_object_reference; +- CORBA::Boolean _tao_retval = 0; +- CORBA::String_var value; +- if (!(_tao_in >> value.out ())) +- ACE_THROW (CORBA::MARSHAL ()); +- +- _tao_retval = _tao_impl->_is_a (value.in (), ACE_TRY_ENV); +- ACE_CHECK; +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) +- ACE_THROW (CORBA::MARSHAL ()); ++ CORBA::Boolean _tao_retval = 0; ++ ACE_UNUSED_ARG (_tao_retval); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "is_basic", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK_RETURN (_tao_retval); ++ return ACE_reinterpret_cast ( ++ POA_IR::HomeDef_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/HomeDef:1.0" ++ ) ++ )->is_basic ( ++ ACE_TRY_ENV ++ ); + } + +-void POA_IR::HomeDef::_non_existent_skel ( +- TAO_ServerRequest &_tao_server_request, +- void * _tao_object_reference, +- void * /* context */, ++IR::PrimaryKeyDef_ptr POA_IR::_TAO_HomeDef_ThruPOA_Proxy_Impl::create_primary_key ( ++ CORBA_Object *_collocated_tao_target_, ++ const char * id, ++ const char * name, ++ const char * version, + IR_ValueDef_ptr primary_key, CORBA::Environment &ACE_TRY_ENV ) - ACE_THROW_SPEC (( - CORBA::SystemException - )) ++ ACE_THROW_SPEC (( ++ CORBA::SystemException ++ )) { -- IR::PrimaryKeyDef_var _tao_retval; +- POA_IR::HomeDef *_tao_impl = (POA_IR::HomeDef *) _tao_object_reference; +- CORBA::Boolean _tao_retval = _tao_impl->_non_existent (ACE_TRY_ENV); +- ACE_CHECK; +- +- _tao_server_request.init_reply (); +- TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); +- if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) +- ACE_THROW (CORBA::MARSHAL ()); + IR_PrimaryKeyDef_var _tao_retval; - ACE_UNUSED_ARG (_tao_retval); - TAO_Object_Adapter::Servant_Upcall servant_upcall ( - _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -44521,20 +44363,20 @@ - ); - } - --IR::FactoryDef_ptr POA_IR::_TAO_HomeDef_ThruPOA_Proxy_Impl::create_factory ( -+IR_FactoryDef_ptr POA_IR::_TAO_HomeDef_ThruPOA_Proxy_Impl::create_factory ( - CORBA_Object *_collocated_tao_target_, - const char * id, - const char * name, - const char * version, -- const IR::ParDescriptionSeq & params, -- const IR::ExceptionDefSeq & exceptions, ++ ACE_UNUSED_ARG (_tao_retval); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "create_primary_key", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK_RETURN (0); ++ return ACE_reinterpret_cast ( ++ POA_IR::HomeDef_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/HomeDef:1.0" ++ ) ++ )->create_primary_key ( ++ id, ++ name, ++ version, ++ primary_key, ++ ACE_TRY_ENV ++ ); + } + +-CORBA::Boolean POA_IR::HomeDef::_is_a ( +- const char* value, ++IR::FactoryDef_ptr POA_IR::_TAO_HomeDef_ThruPOA_Proxy_Impl::create_factory ( ++ CORBA_Object *_collocated_tao_target_, ++ const char * id, ++ const char * name, ++ const char * version, + const IR_ParDescriptionSeq & params, + const IR_ExceptionDefSeq & exceptions, CORBA::Environment &ACE_TRY_ENV ) - ACE_THROW_SPEC (( - CORBA::SystemException - )) - { -- IR::FactoryDef_var _tao_retval; ++ ACE_THROW_SPEC (( ++ CORBA::SystemException ++ )) + { +- if ( +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/HomeDef:1.0")) || +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/InterfaceDef:1.0")) || +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/Container:1.0")) || +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/Contained:1.0")) || +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/IDLType:1.0")) || +- (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/CORBA/IRObject:1.0")) || +- (!ACE_OS::strcmp ((char *)value, CORBA::_tc_Object->id (ACE_TRY_ENV)))) +- return 1; +- else +- return 0; + IR_FactoryDef_var _tao_retval; - ACE_UNUSED_ARG (_tao_retval); - TAO_Object_Adapter::Servant_Upcall servant_upcall ( - _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -44562,20 +44404,20 @@ - ); - } - --IR::FinderDef_ptr POA_IR::_TAO_HomeDef_ThruPOA_Proxy_Impl::create_finder ( -+IR_FinderDef_ptr POA_IR::_TAO_HomeDef_ThruPOA_Proxy_Impl::create_finder ( - CORBA_Object *_collocated_tao_target_, - const char * id, - const char * name, - const char * version, -- const IR::ParDescriptionSeq & params, -- const IR::ExceptionDefSeq & exceptions, ++ ACE_UNUSED_ARG (_tao_retval); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "create_factory", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK_RETURN (0); ++ return ACE_reinterpret_cast ( ++ POA_IR::HomeDef_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/HomeDef:1.0" ++ ) ++ )->create_factory ( ++ id, ++ name, ++ version, ++ params, ++ exceptions, ++ ACE_TRY_ENV ++ ); + } + +-void* POA_IR::HomeDef::_downcast ( +- const char* logical_type_id ++IR::FinderDef_ptr POA_IR::_TAO_HomeDef_ThruPOA_Proxy_Impl::create_finder ( ++ CORBA_Object *_collocated_tao_target_, ++ const char * id, ++ const char * name, ++ const char * version, + const IR_ParDescriptionSeq & params, + const IR_ExceptionDefSeq & exceptions, - CORBA::Environment &ACE_TRY_ENV ++ CORBA::Environment &ACE_TRY_ENV ) - ACE_THROW_SPEC (( - CORBA::SystemException - )) - { -- IR::FinderDef_var _tao_retval; ++ ACE_THROW_SPEC (( ++ CORBA::SystemException ++ )) + { +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/HomeDef:1.0") == 0) +- return ACE_static_cast (POA_IR::HomeDef_ptr, this); +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/InterfaceDef:1.0") == 0) +- return ACE_static_cast (POA_IR::InterfaceDef_ptr, this); +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Container:1.0") == 0) +- return ACE_static_cast (POA_IR::Container_ptr, this); +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Contained:1.0") == 0) +- return ACE_static_cast (POA_IR::Contained_ptr, this); +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/IDLType:1.0") == 0) +- return ACE_static_cast (POA_IR::IDLType_ptr, this); +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/IRObject:1.0") == 0) +- return ACE_static_cast (POA_CORBA::IRObject_ptr, this); +- if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/Object:1.0") == 0) +- return ACE_static_cast(PortableServer::Servant, this); +- return 0; +-} +- +-void POA_IR::HomeDef::_dispatch (TAO_ServerRequest &req, void *context, CORBA::Environment &ACE_TRY_ENV) +-{ +- this->synchronous_upcall_dispatch(req, context, this, ACE_TRY_ENV); + IR_FinderDef_var _tao_retval; - ACE_UNUSED_ARG (_tao_retval); - TAO_Object_Adapter::Servant_Upcall servant_upcall ( - _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () -@@ -44619,7 +44461,7 @@ - ACE_NESTED_CLASS (POA_IR,Container) (rhs), - ACE_NESTED_CLASS (POA_IR,Contained) (rhs), - ACE_NESTED_CLASS (POA_IR,IDLType) (rhs), -- ACE_NESTED_CLASS (POA_CORBA,IRObject) (rhs), ++ ACE_UNUSED_ARG (_tao_retval); ++ TAO_Object_Adapter::Servant_Upcall servant_upcall ( ++ _collocated_tao_target_->_stubobj ()->servant_orb_var ()->orb_core () ++ ); ++ CORBA::Object_var forward_to; ++ servant_upcall.prepare_for_upcall ( ++ _collocated_tao_target_->_object_key (), ++ "create_finder", ++ forward_to.out (), ++ ACE_TRY_ENV ++ ); ++ ACE_CHECK_RETURN (0); ++ return ACE_reinterpret_cast ( ++ POA_IR::HomeDef_ptr, ++ servant_upcall.servant ()->_downcast ( ++ "IDL:omg.org/IR/HomeDef:1.0" ++ ) ++ )->create_finder ( ++ id, ++ name, ++ version, ++ params, ++ exceptions, ++ ACE_TRY_ENV ++ ); + } + +-const char* POA_IR::HomeDef::_interface_repository_id (void) const +-{ +- return "IDL:omg.org/IR/HomeDef:1.0"; +-} ++// ++// End ThruPOA Proxy Implementation ++/////////////////////////////////////////////////////////////////////// + +-IR::HomeDef* +-POA_IR::HomeDef::_this (CORBA_Environment &ACE_TRY_ENV) ++// skeleton constructor ++POA_IR::HomeDef::HomeDef (void) + { +- TAO_Stub *stub = this->_create_stub (ACE_TRY_ENV); +- ACE_CHECK_RETURN (0); +- +- CORBA::Object_ptr tmp = CORBA::Object::_nil (); +- +- if (stub->servant_orb_var ()->orb_core ()->optimize_collocation_objects ()) +- ACE_NEW_RETURN (tmp, CORBA::Object (stub, 1, this), 0); +- else +- ACE_NEW_RETURN (tmp, CORBA::Object (stub, 0, this), 0); +- +- CORBA::Object_var obj = tmp; +- return ::IR::HomeDef::_unchecked_narrow (obj.in ()); ++ this->optable_ = &tao_IR_HomeDef_optable; + } + +- +-#if (TAO_HAS_INTERCEPTORS == 1) +-POA_IR::HomeDef::TAO_ServerRequestInfo_IR_HomeDef_base_home_get::TAO_ServerRequestInfo_IR_HomeDef_base_home_get ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::HomeDef *tao_impl +- , +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl) ++// copy ctor ++POA_IR::HomeDef::HomeDef (const HomeDef& rhs) ++ : ACE_NESTED_CLASS (POA_IR,InterfaceDef) (rhs), ++ ACE_NESTED_CLASS (POA_IR,Container) (rhs), ++ ACE_NESTED_CLASS (POA_IR,Contained) (rhs), ++ ACE_NESTED_CLASS (POA_IR,IDLType) (rhs), + POA_CORBA_IRObject (rhs), - TAO_ServantBase (rhs) ++ TAO_ServantBase (rhs) {} -@@ -44637,7 +44479,7 @@ +-Dynamic::ParameterList * +-POA_IR::HomeDef::TAO_ServerRequestInfo_IR_HomeDef_base_home_get::arguments (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++// skeleton destructor ++POA_IR::HomeDef::~HomeDef (void) { - POA_IR::HomeDef *_tao_impl = (POA_IR::HomeDef *)_tao_object_reference; - -- IR::HomeDef_var _tao_retval; +- // 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 * +-POA_IR::HomeDef::TAO_ServerRequestInfo_IR_HomeDef_base_home_get::exceptions (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++void POA_IR::HomeDef::_get_base_home_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) + { +- // 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; +-} ++ POA_IR::HomeDef *_tao_impl = (POA_IR::HomeDef *)_tao_object_reference; + +-CORBA::Any * +-POA_IR::HomeDef::TAO_ServerRequestInfo_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 (); +-} + IR_HomeDef_var _tao_retval; - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( -@@ -44664,7 +44506,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::HomeDef_ptr _tao_retval_info = _tao_retval._retn (); -+ IR_HomeDef_ptr _tao_retval_info = _tao_retval._retn (); - ri.result (_tao_retval_info); - _tao_retval = _tao_retval_info; - ri.reply_status (PortableInterceptor::SUCCESSFUL); -@@ -44717,7 +44559,7 @@ - { - POA_IR::HomeDef *_tao_impl = (POA_IR::HomeDef *)_tao_object_reference; - -- IR::ComponentDef_var _tao_retval; +-char * +-POA_IR::HomeDef::TAO_ServerRequestInfo_IR_HomeDef_base_home_get::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} ++ _tao_retval = _tao_impl->base_home ( ++ ACE_TRY_ENV ++ ); + +-CORBA::Boolean +-POA_IR::HomeDef::TAO_ServerRequestInfo_IR_HomeDef_base_home_get::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} ++ ACE_CHECK; + +-void +-POA_IR::HomeDef::TAO_ServerRequestInfo_IR_HomeDef_base_home_get::result (IR::HomeDef_ptr result) +-{ +- // Update the result. +- this->_result = result; ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!( ++ (_tao_out << _tao_retval.in ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + } + +-POA_IR::HomeDef::TAO_ServerRequestInfo_IR_HomeDef_managed_component_get::TAO_ServerRequestInfo_IR_HomeDef_managed_component_get ( ++void POA_IR::HomeDef::_get_managed_component_skel ( + TAO_ServerRequest &_tao_server_request, +- POA_IR::HomeDef *tao_impl +- , +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl) +-{} +- +-Dynamic::ParameterList * +-POA_IR::HomeDef::TAO_ServerRequestInfo_IR_HomeDef_managed_component_get::arguments (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) + { +- // 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; +-} ++ POA_IR::HomeDef *_tao_impl = (POA_IR::HomeDef *)_tao_object_reference; + +-Dynamic::ExceptionList * +-POA_IR::HomeDef::TAO_ServerRequestInfo_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; +-} + IR_ComponentDef_var _tao_retval; - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( -@@ -44744,7 +44586,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::ComponentDef_ptr _tao_retval_info = _tao_retval._retn (); -+ IR_ComponentDef_ptr _tao_retval_info = _tao_retval._retn (); - ri.result (_tao_retval_info); - _tao_retval = _tao_retval_info; - ri.reply_status (PortableInterceptor::SUCCESSFUL); -@@ -44797,7 +44639,7 @@ - { - POA_IR::HomeDef *_tao_impl = (POA_IR::HomeDef *)_tao_object_reference; - -- IR::PrimaryKeyDef_var _tao_retval; +-CORBA::Any * +-POA_IR::HomeDef::TAO_ServerRequestInfo_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 (); +-} ++ _tao_retval = _tao_impl->managed_component ( ++ ACE_TRY_ENV ++ ); + +-char * +-POA_IR::HomeDef::TAO_ServerRequestInfo_IR_HomeDef_managed_component_get::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} ++ ACE_CHECK; + +-CORBA::Boolean +-POA_IR::HomeDef::TAO_ServerRequestInfo_IR_HomeDef_managed_component_get::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); ++ ACE_CHECK; ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!( ++ (_tao_out << _tao_retval.in ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + } + +-void +-POA_IR::HomeDef::TAO_ServerRequestInfo_IR_HomeDef_managed_component_get::result (IR::ComponentDef_ptr result) ++void POA_IR::HomeDef::_get_primary_key_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) + { +- // Update the result. +- this->_result = result; +-} ++ POA_IR::HomeDef *_tao_impl = (POA_IR::HomeDef *)_tao_object_reference; + +-POA_IR::HomeDef::TAO_ServerRequestInfo_IR_HomeDef_primary_key_get::TAO_ServerRequestInfo_IR_HomeDef_primary_key_get ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::HomeDef *tao_impl +- , +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl) +-{} + IR_PrimaryKeyDef_var _tao_retval; - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( -@@ -44824,7 +44666,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::PrimaryKeyDef_ptr _tao_retval_info = _tao_retval._retn (); -+ IR_PrimaryKeyDef_ptr _tao_retval_info = _tao_retval._retn (); - ri.result (_tao_retval_info); - _tao_retval = _tao_retval_info; - ri.reply_status (PortableInterceptor::SUCCESSFUL); -@@ -44877,7 +44719,7 @@ - { - POA_IR::HomeDef *_tao_impl = (POA_IR::HomeDef *)_tao_object_reference; - -- IR::FactoryDefSeq_var _tao_retval; +-Dynamic::ParameterList * +-POA_IR::HomeDef::TAO_ServerRequestInfo_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; +-} ++ _tao_retval = _tao_impl->primary_key ( ++ ACE_TRY_ENV ++ ); + +-Dynamic::ExceptionList * +-POA_IR::HomeDef::TAO_ServerRequestInfo_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; +-} ++ ACE_CHECK; + +-CORBA::Any * +-POA_IR::HomeDef::TAO_ServerRequestInfo_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 (); ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!( ++ (_tao_out << _tao_retval.in ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + } + +-char * +-POA_IR::HomeDef::TAO_ServerRequestInfo_IR_HomeDef_primary_key_get::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++void POA_IR::HomeDef::_get_factories_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) + { +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} ++ POA_IR::HomeDef *_tao_impl = (POA_IR::HomeDef *)_tao_object_reference; + +-CORBA::Boolean +-POA_IR::HomeDef::TAO_ServerRequestInfo_IR_HomeDef_primary_key_get::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} + IR_FactoryDefSeq_var _tao_retval; - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( -@@ -44904,7 +44746,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::FactoryDefSeq * _tao_retval_info = _tao_retval._retn (); -+ IR_FactoryDefSeq * _tao_retval_info = _tao_retval._retn (); - ri.result (_tao_retval_info); - _tao_retval = _tao_retval_info; - ri.reply_status (PortableInterceptor::SUCCESSFUL); -@@ -44957,7 +44799,7 @@ - { - POA_IR::HomeDef *_tao_impl = (POA_IR::HomeDef *)_tao_object_reference; - -- IR::FinderDefSeq_var _tao_retval; +-void +-POA_IR::HomeDef::TAO_ServerRequestInfo_IR_HomeDef_primary_key_get::result (IR::PrimaryKeyDef_ptr result) +-{ +- // Update the result. +- this->_result = result; +-} ++ _tao_retval = _tao_impl->factories ( ++ ACE_TRY_ENV ++ ); + +-POA_IR::HomeDef::TAO_ServerRequestInfo_IR_HomeDef_factories_get::TAO_ServerRequestInfo_IR_HomeDef_factories_get ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::HomeDef *tao_impl +- , +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl) +-{} ++ ACE_CHECK; + +-Dynamic::ParameterList * +-POA_IR::HomeDef::TAO_ServerRequestInfo_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; ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!( ++ (_tao_out << _tao_retval.in ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + } + +-Dynamic::ExceptionList * +-POA_IR::HomeDef::TAO_ServerRequestInfo_IR_HomeDef_factories_get::exceptions (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++void POA_IR::HomeDef::_get_finders_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) + { +- // 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; +-} ++ POA_IR::HomeDef *_tao_impl = (POA_IR::HomeDef *)_tao_object_reference; + +-CORBA::Any * +-POA_IR::HomeDef::TAO_ServerRequestInfo_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 (); +-} + IR_FinderDefSeq_var _tao_retval; - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( -@@ -44984,7 +44826,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::FinderDefSeq * _tao_retval_info = _tao_retval._retn (); -+ IR_FinderDefSeq * _tao_retval_info = _tao_retval._retn (); - ri.result (_tao_retval_info); - _tao_retval = _tao_retval_info; - ri.reply_status (PortableInterceptor::SUCCESSFUL); -@@ -45117,11 +44959,11 @@ - TAO_InputCDR &_tao_in = _tao_server_request.incoming (); - POA_IR::HomeDef *_tao_impl = (POA_IR::HomeDef *)_tao_object_reference; - -- IR::PrimaryKeyDef_var _tao_retval; +-char * +-POA_IR::HomeDef::TAO_ServerRequestInfo_IR_HomeDef_factories_get::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} ++ _tao_retval = _tao_impl->finders ( ++ ACE_TRY_ENV ++ ); + +-CORBA::Boolean +-POA_IR::HomeDef::TAO_ServerRequestInfo_IR_HomeDef_factories_get::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} ++ ACE_CHECK; + +-void +-POA_IR::HomeDef::TAO_ServerRequestInfo_IR_HomeDef_factories_get::result (IR::FactoryDefSeq * result) +-{ +- // Update the result. +- this->_result = result; ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!( ++ (_tao_out << _tao_retval.in ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + } + +-POA_IR::HomeDef::TAO_ServerRequestInfo_IR_HomeDef_finders_get::TAO_ServerRequestInfo_IR_HomeDef_finders_get ( ++void POA_IR::HomeDef::_get_is_basic_skel ( + TAO_ServerRequest &_tao_server_request, +- POA_IR::HomeDef *tao_impl +- , +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl) +-{} +- +-Dynamic::ParameterList * +-POA_IR::HomeDef::TAO_ServerRequestInfo_IR_HomeDef_finders_get::arguments (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) + { +- // 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; +-} ++ POA_IR::HomeDef *_tao_impl = (POA_IR::HomeDef *)_tao_object_reference; + +-Dynamic::ExceptionList * +-POA_IR::HomeDef::TAO_ServerRequestInfo_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::Boolean _tao_retval = 0; ++ ++ _tao_retval = _tao_impl->is_basic ( ++ ACE_TRY_ENV ++ ); ++ ++ ACE_CHECK; ++ ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!( ++ (_tao_out << CORBA::Any::from_boolean (_tao_retval)) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + } + +-CORBA::Any * +-POA_IR::HomeDef::TAO_ServerRequestInfo_IR_HomeDef_finders_get::result (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++void POA_IR::HomeDef::create_primary_key_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) + { +- // 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 (); +-} ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::HomeDef *_tao_impl = (POA_IR::HomeDef *)_tao_object_reference; ++ + IR_PrimaryKeyDef_var _tao_retval; - CORBA::String_var id; - CORBA::String_var name; - CORBA::String_var version; -- IR::ValueDef_var primary_key; ++ CORBA::String_var id; ++ CORBA::String_var name; ++ CORBA::String_var version; + IR_ValueDef_var primary_key; - if (!( - (_tao_in >> id.out ()) && - (_tao_in >> name.out ()) && -@@ -45130,7 +44972,6 @@ - )) - ACE_THROW (CORBA::MARSHAL()); - -- - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( - _tao_server_request.orb_core ()->server_request_interceptors (), -@@ -45164,7 +45005,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::PrimaryKeyDef_ptr _tao_retval_info = _tao_retval._retn (); -+ IR_PrimaryKeyDef_ptr _tao_retval_info = _tao_retval._retn (); - ri.result (_tao_retval_info); - _tao_retval = _tao_retval_info; - ri.reply_status (PortableInterceptor::SUCCESSFUL); -@@ -45218,12 +45059,12 @@ - TAO_InputCDR &_tao_in = _tao_server_request.incoming (); - POA_IR::HomeDef *_tao_impl = (POA_IR::HomeDef *)_tao_object_reference; - -- IR::FactoryDef_var _tao_retval; ++ if (!( ++ (_tao_in >> id.out ()) && ++ (_tao_in >> name.out ()) && ++ (_tao_in >> version.out ()) && ++ (_tao_in >> primary_key.out ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + +-char * +-POA_IR::HomeDef::TAO_ServerRequestInfo_IR_HomeDef_finders_get::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} ++ _tao_retval = _tao_impl->create_primary_key ( ++ id.in (), ++ name.in (), ++ version.in (), ++ primary_key.in (), ++ ACE_TRY_ENV ++ ); + +-CORBA::Boolean +-POA_IR::HomeDef::TAO_ServerRequestInfo_IR_HomeDef_finders_get::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} ++ ACE_CHECK; + +-void +-POA_IR::HomeDef::TAO_ServerRequestInfo_IR_HomeDef_finders_get::result (IR::FinderDefSeq * result) +-{ +- // Update the result. +- this->_result = result; ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!( ++ (_tao_out << _tao_retval.in ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + } + +-POA_IR::HomeDef::TAO_ServerRequestInfo_IR_HomeDef_is_basic_get::TAO_ServerRequestInfo_IR_HomeDef_is_basic_get ( ++void POA_IR::HomeDef::create_factory_skel ( + TAO_ServerRequest &_tao_server_request, +- POA_IR::HomeDef *tao_impl +- , +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl) +-{} +- +-Dynamic::ParameterList * +-POA_IR::HomeDef::TAO_ServerRequestInfo_IR_HomeDef_is_basic_get::arguments (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) + { +- // 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; +-} ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::HomeDef *_tao_impl = (POA_IR::HomeDef *)_tao_object_reference; + +-Dynamic::ExceptionList * +-POA_IR::HomeDef::TAO_ServerRequestInfo_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; +-} + IR_FactoryDef_var _tao_retval; - CORBA::String_var id; - CORBA::String_var name; - CORBA::String_var version; -- IR::ParDescriptionSeq params; -- IR::ExceptionDefSeq exceptions; ++ CORBA::String_var id; ++ CORBA::String_var name; ++ CORBA::String_var version; + IR_ParDescriptionSeq params; + IR_ExceptionDefSeq exceptions; - if (!( - (_tao_in >> id.out ()) && - (_tao_in >> name.out ()) && -@@ -45233,7 +45074,6 @@ - )) - ACE_THROW (CORBA::MARSHAL()); - -- - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( - _tao_server_request.orb_core ()->server_request_interceptors (), -@@ -45269,7 +45109,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::FactoryDef_ptr _tao_retval_info = _tao_retval._retn (); -+ IR_FactoryDef_ptr _tao_retval_info = _tao_retval._retn (); - ri.result (_tao_retval_info); - _tao_retval = _tao_retval_info; - ri.reply_status (PortableInterceptor::SUCCESSFUL); -@@ -45323,12 +45163,12 @@ - TAO_InputCDR &_tao_in = _tao_server_request.incoming (); - POA_IR::HomeDef *_tao_impl = (POA_IR::HomeDef *)_tao_object_reference; - -- IR::FinderDef_var _tao_retval; ++ if (!( ++ (_tao_in >> id.out ()) && ++ (_tao_in >> name.out ()) && ++ (_tao_in >> version.out ()) && ++ (_tao_in >> params) && ++ (_tao_in >> exceptions) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + +-CORBA::Any * +-POA_IR::HomeDef::TAO_ServerRequestInfo_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 (); +-} ++ _tao_retval = _tao_impl->create_factory ( ++ id.in (), ++ name.in (), ++ version.in (), ++ params, ++ exceptions, ++ ACE_TRY_ENV ++ ); + +-char * +-POA_IR::HomeDef::TAO_ServerRequestInfo_IR_HomeDef_is_basic_get::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} ++ ACE_CHECK; + +-CORBA::Boolean +-POA_IR::HomeDef::TAO_ServerRequestInfo_IR_HomeDef_is_basic_get::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!( ++ (_tao_out << _tao_retval.in ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + } + +-void +-POA_IR::HomeDef::TAO_ServerRequestInfo_IR_HomeDef_is_basic_get::result (CORBA::Boolean result) ++void POA_IR::HomeDef::create_finder_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void *_tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++) + { +- // Update the result. +- this->_result = result; +-} ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::HomeDef *_tao_impl = (POA_IR::HomeDef *)_tao_object_reference; + +-POA_IR::HomeDef::TAO_ServerRequestInfo_IR_HomeDef_create_primary_key::TAO_ServerRequestInfo_IR_HomeDef_create_primary_key ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::HomeDef *tao_impl +- , +- const char * id, +- const char * name, +- const char * version, +- IR::ValueDef_ptr primary_key, +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- id_ (id), +- name_ (name), +- version_ (version), +- primary_key_ (primary_key) +-{} +- +-Dynamic::ParameterList * +-POA_IR::HomeDef::TAO_ServerRequestInfo_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 (); +-} + IR_FinderDef_var _tao_retval; - CORBA::String_var id; - CORBA::String_var name; - CORBA::String_var version; -- IR::ParDescriptionSeq params; -- IR::ExceptionDefSeq exceptions; ++ CORBA::String_var id; ++ CORBA::String_var name; ++ CORBA::String_var version; + IR_ParDescriptionSeq params; + IR_ExceptionDefSeq exceptions; - if (!( - (_tao_in >> id.out ()) && - (_tao_in >> name.out ()) && -@@ -45338,7 +45178,6 @@ - )) - ACE_THROW (CORBA::MARSHAL()); - -- - #if (TAO_HAS_INTERCEPTORS == 1) - TAO_ServerRequestInterceptor_Adapter _tao_vfr ( - _tao_server_request.orb_core ()->server_request_interceptors (), -@@ -45374,7 +45213,7 @@ - TAO_INTERCEPTOR_CHECK; - - #if (TAO_HAS_INTERCEPTORS == 1) -- IR::FinderDef_ptr _tao_retval_info = _tao_retval._retn (); -+ IR_FinderDef_ptr _tao_retval_info = _tao_retval._retn (); - ri.result (_tao_retval_info); - _tao_retval = _tao_retval_info; - ri.reply_status (PortableInterceptor::SUCCESSFUL); -@@ -45429,7 +45268,7 @@ - POA_IR::HomeDef *_tao_impl = (POA_IR::HomeDef *) _tao_object_reference; - CORBA::Boolean _tao_retval = 0; - CORBA::String_var value; -- if (!(_tao_in >> value.out ())) ++ if (!( ++ (_tao_in >> id.out ()) && ++ (_tao_in >> name.out ()) && ++ (_tao_in >> version.out ()) && ++ (_tao_in >> params) && ++ (_tao_in >> exceptions) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + +-Dynamic::ExceptionList * +-POA_IR::HomeDef::TAO_ServerRequestInfo_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; +-} ++ _tao_retval = _tao_impl->create_finder ( ++ id.in (), ++ name.in (), ++ version.in (), ++ params, ++ exceptions, ++ ACE_TRY_ENV ++ ); + +-CORBA::Any * +-POA_IR::HomeDef::TAO_ServerRequestInfo_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 (); +-} ++ ACE_CHECK; + +-char * +-POA_IR::HomeDef::TAO_ServerRequestInfo_IR_HomeDef_create_primary_key::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!( ++ (_tao_out << _tao_retval.in ()) ++ )) ++ ACE_THROW (CORBA::MARSHAL () ); + } + +-CORBA::Boolean +-POA_IR::HomeDef::TAO_ServerRequestInfo_IR_HomeDef_create_primary_key::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++void POA_IR::HomeDef::_is_a_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void * _tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++ ) + { +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} ++ TAO_InputCDR &_tao_in = _tao_server_request.incoming (); ++ POA_IR::HomeDef *_tao_impl = (POA_IR::HomeDef *) _tao_object_reference; ++ CORBA::Boolean _tao_retval = 0; ++ CORBA::String_var value; + if (!((_tao_in >> value.out ()))) - ACE_THROW (CORBA::MARSHAL ()); - - _tao_retval = _tao_impl->_is_a (value.in (), ACE_TRY_ENV); -@@ -45437,7 +45276,7 @@ - - _tao_server_request.init_reply (); - TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); -- if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) -+ if (!((_tao_out << CORBA::Any::from_boolean (_tao_retval)))) - ACE_THROW (CORBA::MARSHAL ()); - } ++ ACE_THROW (CORBA::MARSHAL ()); -@@ -45454,7 +45293,7 @@ - - _tao_server_request.init_reply (); - TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); -- if (!(_tao_out << CORBA::Any::from_boolean (_tao_retval))) +-void +-POA_IR::HomeDef::TAO_ServerRequestInfo_IR_HomeDef_create_primary_key::result (IR::PrimaryKeyDef_ptr result) +-{ +- // Update the result. +- this->_result = result; +-} ++ _tao_retval = _tao_impl->_is_a (value.in (), ACE_TRY_ENV); ++ ACE_CHECK; + +-POA_IR::HomeDef::TAO_ServerRequestInfo_IR_HomeDef_create_factory::TAO_ServerRequestInfo_IR_HomeDef_create_factory ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::HomeDef *tao_impl +- , +- const char * id, +- const char * name, +- const char * version, +- const IR::ParDescriptionSeq & params, +- const IR::ExceptionDefSeq & exceptions, +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- id_ (id), +- name_ (name), +- version_ (version), +- params_ (params), +- exceptions_ (exceptions) +-{} +- +-Dynamic::ParameterList * +-POA_IR::HomeDef::TAO_ServerRequestInfo_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 (); ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); + if (!((_tao_out << CORBA::Any::from_boolean (_tao_retval)))) - ACE_THROW (CORBA::MARSHAL ()); - } ++ ACE_THROW (CORBA::MARSHAL ()); + } + +-Dynamic::ExceptionList * +-POA_IR::HomeDef::TAO_ServerRequestInfo_IR_HomeDef_create_factory::exceptions (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++void POA_IR::HomeDef::_non_existent_skel ( ++ TAO_ServerRequest &_tao_server_request, ++ void * _tao_object_reference, ++ void * /* context */, ++ CORBA::Environment &ACE_TRY_ENV ++ ) + { +- // 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; +-} ++ POA_IR::HomeDef *_tao_impl = (POA_IR::HomeDef *) _tao_object_reference; ++ CORBA::Boolean _tao_retval = _tao_impl->_non_existent (ACE_TRY_ENV); ++ ACE_CHECK; -@@ -45491,7 +45330,7 @@ - if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/IDLType:1.0") == 0) - return ACE_static_cast (POA_IR::IDLType_ptr, this); - if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/IRObject:1.0") == 0) -- return ACE_static_cast (POA_CORBA::IRObject_ptr, this); +-CORBA::Any * +-POA_IR::HomeDef::TAO_ServerRequestInfo_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 (); ++ _tao_server_request.init_reply (); ++ TAO_OutputCDR &_tao_out = _tao_server_request.outgoing (); ++ if (!((_tao_out << CORBA::Any::from_boolean (_tao_retval)))) ++ ACE_THROW (CORBA::MARSHAL ()); + } + +-char * +-POA_IR::HomeDef::TAO_ServerRequestInfo_IR_HomeDef_create_factory::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++CORBA::Boolean POA_IR::HomeDef::_is_a ( ++ const char* value, ++ CORBA::Environment &ACE_TRY_ENV ++ ) + { +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); ++ if ( ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/HomeDef:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/InterfaceDef:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/Container:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/Contained:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/IR/IDLType:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, "IDL:omg.org/CORBA/IRObject:1.0")) || ++ (!ACE_OS::strcmp ((char *)value, CORBA::_tc_Object->id (ACE_TRY_ENV)))) ++ return 1; ++ else ++ return 0; + } + +-CORBA::Boolean +-POA_IR::HomeDef::TAO_ServerRequestInfo_IR_HomeDef_create_factory::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++void* POA_IR::HomeDef::_downcast ( ++ const char* logical_type_id ++ ) + { +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/HomeDef:1.0") == 0) ++ return ACE_static_cast (POA_IR::HomeDef_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/InterfaceDef:1.0") == 0) ++ return ACE_static_cast (POA_IR::InterfaceDef_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Container:1.0") == 0) ++ return ACE_static_cast (POA_IR::Container_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/Contained:1.0") == 0) ++ return ACE_static_cast (POA_IR::Contained_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/IR/IDLType:1.0") == 0) ++ return ACE_static_cast (POA_IR::IDLType_ptr, this); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/IRObject:1.0") == 0) + return ACE_static_cast (POA_CORBA_IRObject_ptr, this); - if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/Object:1.0") == 0) - return ACE_static_cast(PortableServer::Servant, this); - return 0; -@@ -45521,10 +45360,9 @@ - ACE_NEW_RETURN (tmp, CORBA::Object (stub, 0, this), 0); - - CORBA::Object_var obj = tmp; -- return ::IR::HomeDef::_unchecked_narrow (obj.in ()); -+ return IR_HomeDef::_unchecked_narrow (obj.in ()); ++ if (ACE_OS::strcmp (logical_type_id, "IDL:omg.org/CORBA/Object:1.0") == 0) ++ return ACE_static_cast(PortableServer::Servant, this); ++ return 0; } +-void +-POA_IR::HomeDef::TAO_ServerRequestInfo_IR_HomeDef_create_factory::result (IR::FactoryDef_ptr result) ++void POA_IR::HomeDef::_dispatch (TAO_ServerRequest &req, void *context, CORBA::Environment &ACE_TRY_ENV) + { +- // Update the result. +- this->_result = result; +-} - - #if (TAO_HAS_INTERCEPTORS == 1) - POA_IR::HomeDef::TAO_ServerRequestInfo_IR_HomeDef_base_home_get::TAO_ServerRequestInfo_IR_HomeDef_base_home_get ( - TAO_ServerRequest &_tao_server_request, -@@ -45982,7 +45820,7 @@ - const char * id, - const char * name, - const char * version, -- IR::ValueDef_ptr primary_key, -+ IR_ValueDef_ptr primary_key, - CORBA::Environment & - ) - : TAO_ServerRequestInfo (_tao_server_request), -@@ -46088,8 +45926,8 @@ - const char * id, - const char * name, - const char * version, -- const IR::ParDescriptionSeq & params, -- const IR::ExceptionDefSeq & exceptions, -+ const IR_ParDescriptionSeq & params, -+ const IR_ExceptionDefSeq & exceptions, - CORBA::Environment & - ) - : TAO_ServerRequestInfo (_tao_server_request), -@@ -46202,8 +46040,8 @@ - const char * id, - const char * name, - const char * version, +-POA_IR::HomeDef::TAO_ServerRequestInfo_IR_HomeDef_create_finder::TAO_ServerRequestInfo_IR_HomeDef_create_finder ( +- TAO_ServerRequest &_tao_server_request, +- POA_IR::HomeDef *tao_impl +- , +- const char * id, +- const char * name, +- const char * version, - const IR::ParDescriptionSeq & params, - const IR::ExceptionDefSeq & exceptions, -+ const IR_ParDescriptionSeq & params, -+ const IR_ExceptionDefSeq & exceptions, - CORBA::Environment & - ) - : TAO_ServerRequestInfo (_tao_server_request), -@@ -46312,4 +46150,5 @@ +- CORBA::Environment & +- ) +- : TAO_ServerRequestInfo (_tao_server_request), +- _tao_impl (tao_impl), +- id_ (id), +- name_ (name), +- version_ (version), +- params_ (params), +- exceptions_ (exceptions) +-{} +- +-Dynamic::ParameterList * +-POA_IR::HomeDef::TAO_ServerRequestInfo_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 (); ++ this->synchronous_upcall_dispatch(req, context, this, ACE_TRY_ENV); + } - #endif /* TAO_HAS_INTERCEPTORS */ +-Dynamic::ExceptionList * +-POA_IR::HomeDef::TAO_ServerRequestInfo_IR_HomeDef_create_finder::exceptions (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++const char* POA_IR::HomeDef::_interface_repository_id (void) const + { +- // 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; ++ return "IDL:omg.org/IR/HomeDef:1.0"; + } --#endif /* ifndef */ -+#endif /* ifndef TAO_IDL_INTERFACES_CPP */ -+ +-CORBA::Any * +-POA_IR::HomeDef::TAO_ServerRequestInfo_IR_HomeDef_create_finder::result (CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) ++IR::HomeDef* ++POA_IR::HomeDef::_this (CORBA_Environment &ACE_TRY_ENV) + { +- // 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); ++ TAO_Stub *stub = this->_create_stub (ACE_TRY_ENV); + ACE_CHECK_RETURN (0); + +- CORBA::Any_var safe_result_any = result_any; ++ CORBA::Object_ptr tmp = CORBA::Object::_nil (); + +- (*result_any) <<= this->_result; ++ if (stub->servant_orb_var ()->orb_core ()->optimize_collocation_objects ()) ++ ACE_NEW_RETURN (tmp, CORBA::Object (stub, 1, this), 0); ++ else ++ ACE_NEW_RETURN (tmp, CORBA::Object (stub, 0, this), 0); + +- return safe_result_any._retn (); +-} +- +-char * +-POA_IR::HomeDef::TAO_ServerRequestInfo_IR_HomeDef_create_finder::target_most_derived_interface ( +- CORBA::Environment &) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return +- CORBA::string_dup (this->_tao_impl->_interface_repository_id ()); +-} +- +-CORBA::Boolean +-POA_IR::HomeDef::TAO_ServerRequestInfo_IR_HomeDef_create_finder::target_is_a ( +- const char * id, +- CORBA::Environment &ACE_TRY_ENV) +- ACE_THROW_SPEC ((CORBA::SystemException)) +-{ +- return this->_tao_impl->_is_a (id, ACE_TRY_ENV); +-} +- +-void +-POA_IR::HomeDef::TAO_ServerRequestInfo_IR_HomeDef_create_finder::result (IR::FinderDef_ptr result) +-{ +- // Update the result. +- this->_result = result; ++ CORBA::Object_var obj = tmp; ++ return IR_HomeDef::_unchecked_narrow (obj.in ()); + } + +-#endif /* TAO_HAS_INTERCEPTORS */ |