TAO/tests/Bug_3321_Regression/main.cpp

   1 #include "tao/ORB.h"
   2 #include "ace/Log_Msg.h"
   3 #include "ace/Thread.h"
   4 #include "ace/os_include/os_pthread.h"
   5
   6 #include "tao/ORB.h"
   7 #include "ace/Log_Msg.h"
   8 #include "tao/AnyTypeCode/Any.h"
   9 #include "tao/Policy_Manager.h"
  10 #include "tao/TimeBaseC.h"
  11
  12 int result = 0;
  13
  14 #if defined (__SUNPRO_CC)
  15 extern "C"
  16 #endif /* __SUNPRO_CC */
  17 ACE_THR_FUNC_RETURN main_orb(void*)
  18 {
  19   try
  20   {
  21     int argc = 0;
  22     ACE_TCHAR **argv = 0;
  23     CORBA::ORB_var orb = CORBA::ORB_init (argc, argv);
  24
  25     TimeBase::TimeT CONNECTION_TIMEOUT = 1000000;
  26     TimeBase::TimeT ROUND_TRIP_TIMEOUT = 1000000;
  27
  28     if (!CORBA::is_nil(orb.in()))
  29       {
  30         ACE_DEBUG((LM_DEBUG, "ORB not nil\n"));
  31
  32         CORBA::Any connection_timeout_as_any;
  33         connection_timeout_as_any <<= CONNECTION_TIMEOUT;
  34
  35         CORBA::Any rt_timeout_as_any;
  36         rt_timeout_as_any <<= ROUND_TRIP_TIMEOUT;
  37
  38         orb->destroy ();
  39         ACE_DEBUG((LM_DEBUG, "Destroyed ORB\n"));
  40       }
  41   }
  42   catch(const ::CORBA::Exception& ex)
  43   {
  44     result = 1;
  45     ex._tao_print_exception ("Exception caught:");
  46   }
  47   catch(...)
  48   {
  49     result = 1;
  50     ACE_ERROR ((LM_ERROR, " (%P|%t) Unknown error\n"));
  51   }
  52
  53   return 0;
  54 }
  55
  56
  57 int ACE_TMAIN(int, ACE_TCHAR*[])
  58 {
  59   ACE_hthread_t thread1;
  60 # if defined (ACE_HAS_PTHREADS)
  61   pthread_create(&thread1, 0, main_orb, 0);
  62 #else
  63   ACE_Thread::spawn (main_orb, 0, THR_NEW_LWP|THR_JOINABLE, 0, &thread1);
  64 #endif
  65   ACE_Thread::join( thread1);
  66
  67   return result;
  68 }