TAO/tests/RTCORBA/Bug_3382_Regression/simple_client.cpp

   1 #include "tao/ORB_Core.h"
   2 #include "tao/RTCORBA/RTCORBA.h"
   3 #include "tao/RTCORBA/Priority_Mapping_Manager.h"
   4 #include "ace/Get_Opt.h"
   5
   6 int
   7 ACE_TMAIN (int argc, ACE_TCHAR *argv[])
   8 {
   9   int result = 0;
  10
  11    ACE_DEBUG ((LM_DEBUG, "Testing : "));
  12
  13   for (int arg_i = 0; arg_i < argc; ++arg_i)
  14     {
  15       ACE_DEBUG ((LM_DEBUG, "%s ", argv[arg_i]));
  16     }
  17
  18   ACE_DEBUG ((LM_DEBUG, "\n\n"));
  19
  20   try
  21     {
  22       CORBA::ORB_var orb =
  23         CORBA::ORB_init (argc, argv);
  24
  25       CORBA::Object_var object =
  26         orb->resolve_initial_references ("RTCurrent");
  27
  28       RTCORBA::Current_var current =
  29         RTCORBA::Current::_narrow (object.in ());
  30
  31       object = orb->resolve_initial_references ("PriorityMappingManager");
  32
  33       RTCORBA::PriorityMappingManager_var mapping_manager =
  34         RTCORBA::PriorityMappingManager::_narrow (object.in ());
  35
  36       RTCORBA::PriorityMapping *pm =
  37         mapping_manager->mapping ();
  38
  39       ACE_DEBUG ((LM_DEBUG, "Testing part #1\n\n"));
  40
  41       // Check for this priority mapping that we are kosher
  42       RTCORBA::Priority i = RTCORBA::minPriority;
  43       do
  44         {
  45           CORBA::Short native1 = -1, corba1 = -1, native2 = -1, corba2 = -1;
  46
  47           if (pm->to_native (i, native1))
  48             {
  49               if (! (pm->to_CORBA (native1, corba1) &&
  50                     pm->to_native (corba1, native2) &&
  51                     pm->to_CORBA (native2, corba2)))
  52                 {
  53                   ACE_DEBUG ((LM_DEBUG, "ERROR : Mapping reported false during CORBA %d -> Native %d -> CORBA %d -> Native %d\n",
  54                                                     i,
  55                                                     native1,
  56                                                     corba1,
  57                                                     native2
  58                                                     ));
  59                 }
  60               else if (! (corba2 == corba1 && native1 == native2))
  61                 {
  62                   // titsup
  63                   ACE_DEBUG ((LM_DEBUG, "ERROR - Not idem-thingy. Mapping went: CORBA %d -> Native %d -> CORBA %d -> Native %d - CORBA %d\n",
  64                                                     i,
  65                                                     native1,
  66                                                     corba1,
  67                                                     native2,
  68                                                     corba2
  69                                                     ));
  70                   result = -1;
  71                 }
  72               }
  73           i = i + 1; // There's a reason to not use unary increment
  74         }
  75       while (i != RTCORBA::minPriority);
  76
  77       ACE_DEBUG ((LM_DEBUG, "\n\nTesting part #2\n\n"));
  78
  79       // Accessing the priority when it hasn't been set should throw an exception
  80       try
  81         {
  82           i = current->the_priority ();
  83           ACE_DEBUG ((LM_DEBUG, "ERROR: Unexpectedly was able to access thread CORBA priority of %d when it hadn't been set\n", i));
  84           result = -1;
  85         }
  86       catch (const CORBA::INITIALIZE &)
  87         {
  88           // This is what should happen
  89         }
  90       catch (const CORBA::Exception & ex)
  91         {
  92           ex._tao_print_exception ("ERROR: Unexpected exception type accessing thread CORBA priority when it hadn't been set: ");
  93           result = -1;
  94         }
  95       catch (...)
  96         {
  97           ACE_DEBUG ((LM_DEBUG, "ERROR: Wildly unexpected exception type accessing thread CORBA priority when it hadn't been set\n", i));
  98           result = -1;
  99         }
 100
 101       ACE_DEBUG ((LM_DEBUG, "\nTesting part #3\n\n"));
 102
 103       // Setting an invalid CORBA priority should generate a BAD_PARAM if the mapping has rejected it
 104       try
 105         {
 106           current->the_priority (-1);
 107           ACE_DEBUG ((LM_DEBUG, "ERROR: Unexpectedly was able to set a thread CORBA priority\n"));
 108           result = -1;
 109         }
 110       catch (const CORBA::BAD_PARAM &)
 111         {
 112           // This is what should happen
 113         }
 114       catch (const CORBA::Exception & ex)
 115         {
 116           ex._tao_print_exception ("ERROR: Unexpected exception type setting an invalid CORBA priority");
 117           result = -1;
 118         }
 119       catch (...)
 120         {
 121           ACE_DEBUG ((LM_DEBUG, "ERROR: Wildly unexpected exception setting an invalid CORBA priority\n"));
 122           result = -1;
 123         }
 124     }
 125   catch (const CORBA::Exception & ex)
 126     {
 127       ex._tao_print_exception ("ERROR: Unexpected exception ");
 128       result = -1;
 129     }
 130   catch (...)
 131     {
 132       ACE_DEBUG ((LM_DEBUG, "ERROR: Unknown exception\n"));
 133       result = -1;
 134     }
 135
 136   return result;
 137 }