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
  12 ORB_Task::ORB_Task (CORBA::ORB_ptr orb)
  13   : orb_ (CORBA::ORB::_duplicate (orb))
  14 {
  15 }
  16
  17 int
  18 ORB_Task::svc (void)
  19 {
  20   try
  21   {
  22     CORBA::Object_var ncRef =
  23         orb_->string_to_object(
  24             "corbaloc:iiop:10.175.12.99:15025/NameService" );
  25
  26     CORBA::PolicyList policies;
  27
  28     TimeBase::TimeT timeout = 5000 * 10000;
  29
  30     CORBA::Any timeoutAny;
  31     timeoutAny <<= timeout;
  32
  33     policies.length(1);
  34     policies[0] = orb_->create_policy(
  35       Messaging::RELATIVE_RT_TIMEOUT_POLICY_TYPE,
  36       timeoutAny );
  37
  38     CORBA::Object_var object = ncRef->_set_policy_overrides(
  39       policies, CORBA::SET_OVERRIDE );
  40
  41     policies[0]->destroy();
  42
  43     CosNaming::NamingContext_var namingContext =
  44       CosNaming::NamingContext::_narrow( object.in() );
  45     namingContext->_non_existent();
  46   }
  47   catch ( const CORBA::TRANSIENT&)
  48   {
  49     ACE_DEBUG ((LM_DEBUG, "Caught transient\n"));
  50   }
  51   catch ( const CORBA::TIMEOUT&)
  52   {
  53     ACE_DEBUG ((LM_DEBUG, "Caught timeout\n"));
  54   }
  55   catch ( const CORBA::Exception& e )
  56   {
  57       e._tao_print_exception ("Exception caught");
  58   }
  59
  60   return 0;
  61 }