TAO/tests/Faults/test_i.cpp

   1 #include "test_i.h"
   2
   3 #if !defined(__ACE_INLINE__)
   4 #include "test_i.inl"
   5 #endif /* __ACE_INLINE__ */
   6
   7 #include "ace/OS_NS_unistd.h"
   8
   9 void
  10 Callback_i::shutdown (CORBA::Boolean is_clean)
  11 {
  12   if (is_clean == 0)
  13     {
  14       ACE_DEBUG ((LM_DEBUG, "Performing catastrophic shutdown\n"));
  15
  16 // OpenVMS seems to hang and not abort and dump core when abort() is called
  17 // here. This needs further investigation.
  18 #if defined (DEC_CXX) || defined (ACE_OPENVMS)
  19       ACE_OS::_exit();
  20 #else
  21       ACE_OS::abort();
  22 #endif
  23       return;
  24     }
  25   this->orb_->shutdown (0);
  26
  27   ACE_DEBUG ((LM_DEBUG, "Shutdown: Performed clean shutdown\n"));
  28 }
  29
  30 // ****************************************************************
  31
  32 CORBA::Long
  33 Simple_Server_i::test_method (CORBA::Boolean do_callback,
  34                               CORBA::Boolean is_clean,
  35                               Callback_ptr callback)
  36 {
  37   if (do_callback)
  38     {
  39       ACE_DEBUG ((LM_DEBUG, "Callback to shutdown client (%d)\n",
  40                   is_clean));
  41       callback->shutdown (is_clean);
  42     }
  43   ACE_Time_Value tv (0, 20000);
  44   ACE_OS::sleep (tv);
  45   return 0;
  46 }
  47
  48 void
  49 Simple_Server_i::shutdown_now (CORBA::Boolean is_clean)
  50 {
  51   if (is_clean == 0)
  52     {
  53       ACE_DEBUG ((LM_DEBUG, "Performing catastrophic shutdown\n"));
  54 #if defined (DEC_CXX) || defined (ACE_OPENVMS)
  55       ACE_OS::_exit();
  56 #else
  57       ACE_OS::abort();
  58 #endif
  59       return;
  60     }
  61
  62   ACE_DEBUG ((LM_DEBUG, "shutdown_now:Performing clean shutdown\n"));
  63   this->orb_->shutdown (0);
  64 }
  65
  66 void
  67 Simple_Server_i::shutdown (void)
  68 {
  69   this->orb_->shutdown (0);
  70 }
  71
  72 // ****************************************************************
  73
  74 CORBA::Long
  75 Middle_i::test_method (CORBA::Boolean do_callback,
  76                        CORBA::Boolean is_clean,
  77                        Callback_ptr callback)
  78 {
  79   int i = 0;
  80   for (; i != 10; ++i)
  81     {
  82       this->server_->test_method (0,
  83                                   0,
  84                                   callback);
  85     }
  86
  87   this->server_->test_method (do_callback,
  88                               is_clean,
  89                               callback);
  90
  91   for (; i != 10; ++i)
  92     {
  93       this->server_->test_method (0,
  94                                   0,
  95                                   callback);
  96     }
  97
  98   return 0;
  99 }
 100
 101 void
 102 Middle_i::shutdown_now (CORBA::Boolean is_clean)
 103 {
 104   this->server_->shutdown_now (is_clean);
 105 }
 106
 107 void
 108 Middle_i::shutdown (void)
 109 {
 110   try
 111     {
 112       this->server_->shutdown ();
 113     }
 114   catch (const CORBA::Exception&)
 115     {
 116       // ignore them
 117     }
 118
 119   this->orb_->shutdown (0);
 120 }