TAO/tests/BiDirectional_MultipleORB/destroy.cpp

   1
   2 //=============================================================================
   3 /**
   4  *  @file     destroy.cpp
   5  *
   6  *   Modified ORB destruction test.
   7  *
   8  *  @author  Andrew Schnable <Andrew.Schnable@veritas.com>  Iliyan Jeliazkov <jeliazkov_i@ociweb.com>
   9  */
  10 //=============================================================================
  11
  12
  13 #include "tao/corba.h"
  14 #include "tao/PortableServer/PortableServer.h"
  15 #include "tao/AnyTypeCode/Any.h"
  16 #include "tao/BiDir_GIOP/BiDirGIOP.h"
  17
  18
  19
  20 int
  21 test_with_bidir_poa (int argc,
  22                      ACE_TCHAR **argv,
  23                      const char *orb_name,
  24                      int destroy_orb)
  25 {
  26
  27   try
  28     {
  29       CORBA::ORB_var orb =
  30         CORBA::ORB_init (argc, argv, orb_name);
  31
  32       CORBA::Object_var obj =
  33         orb->resolve_initial_references ("RootPOA");
  34
  35       PortableServer::POA_var root_poa =
  36         PortableServer::POA::_narrow (obj.in ());
  37
  38       PortableServer::POAManager_var poa_manager =
  39         root_poa->the_POAManager ();
  40
  41
  42       CORBA::PolicyList policies (1);
  43       policies.length (1);
  44
  45       CORBA::Any pol;
  46       pol <<= BiDirPolicy::BOTH;
  47       policies[0] =
  48         orb->create_policy (BiDirPolicy::BIDIRECTIONAL_POLICY_TYPE,
  49                             pol);
  50
  51       // Create POA as child of RootPOA with the above policies.  This POA
  52       // will receive request in the same connection in which it sent
  53       // the request
  54       PortableServer::POA_var child_poa =
  55         root_poa->create_POA ("childPOA",
  56                               poa_manager.in (),
  57                               policies);
  58
  59       // Creation of childPOA is over. Destroy the Policy objects.
  60       for (CORBA::ULong i = 0;
  61            i < policies.length ();
  62            ++i)
  63         {
  64           policies[i]->destroy ();
  65         }
  66
  67       poa_manager->activate ();
  68
  69
  70       root_poa->destroy (1, 1);
  71
  72       if (destroy_orb)
  73         {
  74           orb->destroy ();
  75         }
  76     }
  77   catch (const CORBA::Exception& ex)
  78     {
  79       ex._tao_print_exception ("Exception raised");
  80     }
  81
  82   return 0;
  83 }
  84
  85 int
  86 ACE_TMAIN(int argc, ACE_TCHAR *argv[])
  87 {
  88   int result = 0;
  89
  90   for (int i=0; i<10; i++)
  91   {
  92     result = test_with_bidir_poa (argc, argv, "poa_1", 1);
  93     ACE_ASSERT (result == 0);
  94
  95     result = test_with_bidir_poa (argc, argv, "poa_2", 1);
  96     ACE_ASSERT (result == 0);
  97   }
  98   ACE_DEBUG ((LM_DEBUG, "Completed OK\n"));
  99   return result;
 100 }