TAO/orbsvcs/tests/Bug_2074_Regression/ORB_Task.cpp

   1 /**
   2  * @file ORB_Task.cpp
   3  *
   4  * @author Carlos O'Ryan <coryan@atdesk.com>
   5  */
   6 #include "ORB_Task.h"
   7 #include "tao/Messaging/Messaging.h"
   8 #include "orbsvcs/CosNamingC.h"
   9
  10
  11 ORB_Task::ORB_Task (CORBA::ORB_ptr orb)
  12   : orb_ (CORBA::ORB::_duplicate (orb))
  13 {
  14 }
  15
  16 int
  17 ORB_Task::svc ()
  18 {
  19   try
  20   {
  21     CORBA::Object_var ncRef =
  22         orb_->string_to_object(
  23             "corbaloc:iiop:10.175.12.99:15025/NameService");
  24
  25     CORBA::PolicyList policies;
  26
  27     TimeBase::TimeT timeout = 5000 * 10000;
  28
  29     CORBA::Any timeoutAny;
  30     timeoutAny <<= timeout;
  31
  32     policies.length(1);
  33     policies[0] = orb_->create_policy(
  34       Messaging::RELATIVE_RT_TIMEOUT_POLICY_TYPE, timeoutAny);
  35
  36     CORBA::Object_var object = ncRef->_set_policy_overrides(
  37       policies, CORBA::SET_OVERRIDE );
  38
  39     policies[0]->destroy();
  40
  41     CosNaming::NamingContext_var namingContext =
  42       CosNaming::NamingContext::_narrow( object.in());
  43     namingContext->_non_existent();
  44   }
  45   catch ( const CORBA::TRANSIENT&)
  46   {
  47     ACE_DEBUG ((LM_DEBUG, "Caught transient\n"));
  48   }
  49   catch ( const CORBA::TIMEOUT&)
  50   {
  51     ACE_DEBUG ((LM_DEBUG, "Caught timeout\n"));
  52   }
  53   catch ( const CORBA::Exception& e )
  54   {
  55       e._tao_print_exception ("Exception caught");
  56   }
  57
  58   return 0;
  59 }