summaryrefslogtreecommitdiff
path: root/TAO/tests/TransportCurrent/IIOP/Current_Test_Impl.cpp
diff options
context:
space:
mode:
Diffstat (limited to 'TAO/tests/TransportCurrent/IIOP/Current_Test_Impl.cpp')
-rw-r--r--TAO/tests/TransportCurrent/IIOP/Current_Test_Impl.cpp139
1 files changed, 0 insertions, 139 deletions
diff --git a/TAO/tests/TransportCurrent/IIOP/Current_Test_Impl.cpp b/TAO/tests/TransportCurrent/IIOP/Current_Test_Impl.cpp
deleted file mode 100644
index 8687263dbc3..00000000000
--- a/TAO/tests/TransportCurrent/IIOP/Current_Test_Impl.cpp
+++ /dev/null
@@ -1,139 +0,0 @@
-// -*- C++ -*-
-
-#include "tao/TransportCurrent/TC_IIOPC.h"
-#include "tao/TransportCurrent/TCC.h"
-
-#include "Current_Test_Impl.h"
-
-ACE_RCSID (Transport_Current,
- Current_Test_Impl,
- "$Id$")
-
-
-Current_Test_Impl::Current_Test_Impl (CORBA::ORB_ptr orb,
- PortableServer::POA_ptr poa,
- int do_collocated_calls)
- : orb_ (CORBA::ORB::_duplicate (orb))
- , poa_ (PortableServer::POA::_duplicate (poa))
- , do_collocated_calls_ (do_collocated_calls)
-{
-}
-
-Current_Test_Impl::~Current_Test_Impl (void)
-{
-}
-
-::CORBA::Long
-Current_Test_Impl::self_test (ACE_ENV_SINGLE_ARG_DECL_WITH_DEFAULTS)
- ACE_THROW_SPEC ((::CORBA::SystemException))
-{
- return 0;
-}
-
-void
-Current_Test_Impl::test_transport_current (ACE_ENV_SINGLE_ARG_DECL)
- ACE_THROW_SPEC ((CORBA::SystemException))
-{
- if (TAO_debug_level > 2) {
- ACE_DEBUG ((LM_DEBUG,
- ACE_TEXT ("(%P|%t) server - Testing access to IIOP Transport Current ...\n")));
- }
-
- CORBA::Object_var tcobject =
- this->orb_->resolve_initial_references ("TAO::Transport::IIOP::Current"
- ACE_ENV_ARG_PARAMETER);
- ACE_TRY_CHECK;
-
- TAO::Transport::IIOP::Current_var tc =
- TAO::Transport::IIOP::Current::_narrow (tcobject.in ()
- ACE_ENV_SINGLE_ARG_DECL);
- ACE_TRY_CHECK;
-
- if (CORBA::is_nil (tc.in()))
- {
- ACE_ERROR ((LM_ERROR,
- ACE_TEXT ("Unable to narrow down to TAO::Transport::IIOP::Current\n")));
- ACE_THROW (CORBA::INTERNAL ());
- }
-
- CORBA::String_var rhost (tc->remote_host ());
- CORBA::String_var lhost (tc->local_host ());
- ACE_DEBUG ((LM_DEBUG,
- ACE_TEXT ("(%P|%t) server - [%s:%d] -> [%s:%d]\n"),
- rhost.in (), tc->remote_port (),
- lhost.in (), tc->local_port ()));
-
- if (TAO_debug_level > 2) {
- ACE_DEBUG ((LM_DEBUG,
- ACE_TEXT ("(%P|%t) server - Successfully accessed IIOP Transport Current\n")));
- }
-}
-
-
-
-void
-Current_Test_Impl::invoked_by_client (ACE_ENV_SINGLE_ARG_DECL)
- ACE_THROW_SPEC ((CORBA::SystemException))
-{
- if (TAO_debug_level >= 1) {
- ACE_DEBUG ((LM_DEBUG,
- ACE_TEXT ("(%P|%t) server - Test method invoked by client.\n")));
- }
-
- this->test_transport_current (ACE_ENV_SINGLE_ARG_DECL);
- ACE_TRY_CHECK;
-
- if (this->do_collocated_calls_)
- {
- CORBA::Object_var selfobject =
- poa_->servant_to_reference (this
- ACE_ENV_SINGLE_ARG_DECL);
- ACE_TRY_CHECK;
-
- Test::Transport::CurrentTest_var self =
- Test::Transport::CurrentTest::_narrow (selfobject.in ()
- ACE_ENV_SINGLE_ARG_DECL);
- ACE_TRY_CHECK;
-
- if (TAO_debug_level >= 1) {
- ACE_DEBUG ((LM_DEBUG,
- ACE_TEXT ("(%P|%t) server - Making a collocated invocation to invoked_during_upcall().\n")));
- }
- self->invoked_during_upcall (ACE_ENV_ARG_PARAMETER);
- ACE_TRY_CHECK;
- }
- else
- {
- if (TAO_debug_level >= 1)
- {
- ACE_DEBUG ((LM_DEBUG,
- ACE_TEXT ("(%P|%t) server - skipping collocated calls\n")));
- }
-
- }
-
-}
-
-void
-Current_Test_Impl::invoked_during_upcall (ACE_ENV_SINGLE_ARG_DECL_NOT_USED)
- ACE_THROW_SPEC ((CORBA::SystemException))
-{
- if (TAO_debug_level > 2) {
- ACE_DEBUG ((LM_DEBUG,
- ACE_TEXT ("(%P|%t) server - Test method invoked ")
- ACE_TEXT ("by the server during upcall.\n")));
- }
-}
-
-void
-Current_Test_Impl::shutdown (ACE_ENV_SINGLE_ARG_DECL)
- ACE_THROW_SPEC ((CORBA::SystemException))
-{
- if (TAO_debug_level > 2) {
- ACE_DEBUG ((LM_DEBUG,
- ACE_TEXT ("(%P|%t) server - shutting down.\n")));
- }
-
- this->orb_->shutdown (0
- ACE_ENV_ARG_PARAMETER);
-}