TAO/tests/Bug_2085_Regression/Bug_2085_Regression.cpp

   1
   2 #include "ace/Task.h"
   3 #include "ace/Auto_Event.h"
   4 #include "tao/ORB.h"
   5 #include "tao/Object.h"
   6 #include "tao/SystemException.h"
   7
   8 bool
   9 test_string_to_object (CORBA::ORB_ptr orb, const char* ior, CORBA::ULong minor)
  10 {
  11   bool succeed = false;
  12   try
  13     {
  14       // Get the object reference with the IOR
  15       CORBA::Object_var object = orb->string_to_object (ior);
  16     }
  17   catch (const CORBA::BAD_PARAM& ex)
  18     {
  19       if ((ex.minor() & 0xFFFU) == minor)
  20         {
  21           succeed = true;
  22         }
  23     }
  24   catch (const CORBA::Exception&)
  25     {
  26     }
  27
  28   if (!succeed)
  29   {
  30     ACE_ERROR ((LM_ERROR,
  31                 "(%t) ERROR, test_string_to_object for <%C> didn't result in minor code %d\n",
  32                 ior,
  33                 minor));
  34   }
  35
  36   return succeed;
  37 }
  38
  39 int
  40 ACE_TMAIN(int argc, ACE_TCHAR *argv[])
  41 {
  42   int retval = 0;
  43
  44   try
  45     {
  46       CORBA::ORB_var orb =
  47         CORBA::ORB_init (argc, argv);
  48
  49       // string_to_object conversion failed due to bad scheme name
  50       if (!test_string_to_object (orb.in (), "", 7))
  51         ++retval;
  52       // string_to_object conversion failed due to bad address
  53       if (!test_string_to_object (orb.in (), "", 8))
  54         ++retval;
  55       // string_to_object conversion failed due to bad bad schema specific part
  56       if (!test_string_to_object (orb.in (), "", 9))
  57         ++retval;
  58       // string_to_object conversion failed due to non specific reason
  59       if (!test_string_to_object (orb.in (), "", 10))
  60         ++retval;
  61
  62       orb->destroy ();
  63
  64       ACE_DEBUG ((LM_DEBUG,
  65                   "%s successful\n",
  66                   argv[0]));
  67     }
  68   catch (const CORBA::Exception& ex)
  69     {
  70       ex._tao_print_exception ("Exception caught");
  71       retval = -1;
  72     }
  73
  74   return retval;
  75 }