diff options
Diffstat (limited to 'TAO/orbsvcs/tests/Transport_Current/IIOP/IIOP_Tester.cpp')
-rw-r--r-- | TAO/orbsvcs/tests/Transport_Current/IIOP/IIOP_Tester.cpp | 81 |
1 files changed, 0 insertions, 81 deletions
diff --git a/TAO/orbsvcs/tests/Transport_Current/IIOP/IIOP_Tester.cpp b/TAO/orbsvcs/tests/Transport_Current/IIOP/IIOP_Tester.cpp index ec76e46eee5..2b87ba0e285 100644 --- a/TAO/orbsvcs/tests/Transport_Current/IIOP/IIOP_Tester.cpp +++ b/TAO/orbsvcs/tests/Transport_Current/IIOP/IIOP_Tester.cpp @@ -79,84 +79,3 @@ test_transport_current (CORBA::ORB_ptr orb return 0; } -// -*- C++ -*- - -// $Id$ - -#include "orbsvcs/Transport_Current/IIOP_Transport_Current.h" - -using namespace TAO; - - -/// Test referencing the TC data outside of the context of an upcall, -/// or a client-side interceptor - -int -test_transport_current (CORBA::ORB_ptr orb - ACE_ENV_ARG_DECL) - ACE_THROW_SPEC ((CORBA::SystemException, - CORBA::UserException)) -{ - // Get the Current object. - CORBA::Object_var tcobject = - orb->resolve_initial_references (ACE_TEXT_ALWAYS_CHAR ("TAO::Transport::IIOP::Current") - ACE_ENV_ARG_PARAMETER); - ACE_TRY_CHECK; - - - if (TAO_debug_level >= 1) - ACE_DEBUG ((LM_DEBUG, - ACE_TEXT ("Tester (%P|%t) Resolved initial reference for IIOP::Current\n"))); - - Transport::IIOP::Current_var tc = - Transport::IIOP::Current::_narrow (tcobject.in () - ACE_ENV_SINGLE_ARG_DECL); - ACE_TRY_CHECK; - - if (TAO_debug_level >= 1) - ACE_DEBUG ((LM_DEBUG, - ACE_TEXT ("Tester (%P|%t) Narowed the IIOP Transport Current\n"))); - - if (CORBA::is_nil (tc.in ())) - { - ACE_ERROR ((LM_ERROR, - ACE_TEXT ("Tester (%P|%t) ERROR: Could not resolve ") - ACE_TEXT ("TAO::Transport::IIOP::Current object.\n"))); - - ACE_TRY_THROW (CORBA::INTERNAL ()); - } - - ::CORBA::String_var rhost (tc->remote_host (ACE_ENV_SINGLE_ARG_PARAMETER)); - ACE_TRY_CHECK; - - ::CORBA::String_var lhost (tc->local_host (ACE_ENV_SINGLE_ARG_PARAMETER)); - ACE_TRY_CHECK; - - ::CORBA::Long id = tc->id (ACE_ENV_SINGLE_ARG_PARAMETER); - ACE_TRY_CHECK; - - ::TAO::CounterT bs = tc->bytes_sent (ACE_ENV_SINGLE_ARG_PARAMETER); - ACE_TRY_CHECK; - - ::TAO::CounterT br = tc->bytes_received (ACE_ENV_SINGLE_ARG_PARAMETER); - ACE_TRY_CHECK; - - ::TAO::CounterT rs = tc->messages_sent (ACE_ENV_SINGLE_ARG_PARAMETER); - ACE_TRY_CHECK; - - ::TAO::CounterT rr = tc->messages_received (ACE_ENV_SINGLE_ARG_PARAMETER); - ACE_TRY_CHECK; - - ACE_DEBUG ((LM_DEBUG, - ACE_TEXT ("Tester (%P|%t) Transport [%q] [%s:%d -> %s:%d] ") - ACE_TEXT ("Sent/Received [bytes=%q/%q, messages=%q/%q]\n"), - (ACE_UINT64)id, - rhost.in (), tc->remote_port (ACE_ENV_SINGLE_ARG_PARAMETER), - lhost.in (), tc->local_port (ACE_ENV_SINGLE_ARG_PARAMETER), - (ACE_UINT64)bs, - (ACE_UINT64)br, - (ACE_UINT64)rs, - (ACE_UINT64)rr)); - return 0; -} - |