TAO/tests/MProfile_Forwarding/client.cpp

   1 #include "ace/SString.h"
   2 #include "ace/Get_Opt.h"
   3 #include "ace/OS_NS_unistd.h"
   4 #include "testC.h"
   5
   6 const ACE_TCHAR *ior_input_file = 0;
   7
   8 int
   9 parse_args (int argc, ACE_TCHAR *argv[])
  10 {
  11   ACE_Get_Opt get_opts (argc, argv, ACE_TEXT("o:"));
  12   int c;
  13
  14   while ((c = get_opts ()) != -1)
  15     switch (c)
  16       {
  17       case 'o':
  18         ior_input_file = get_opts.opt_arg ();
  19         break;
  20       case '?':
  21       default:
  22         ACE_ERROR_RETURN ((LM_ERROR,
  23                            "usage:  %s "
  24                            "-o <iorfile>"
  25                            "\n",
  26                            argv [0]),
  27                           -1);
  28       }
  29   // Indicates successful parsing of the command line
  30   return 0;
  31 }
  32
  33 void
  34 run_test (Simple_Server_ptr server);
  35
  36 int
  37 ACE_TMAIN(int argc, ACE_TCHAR *argv[])
  38 {
  39
  40   try
  41     {
  42       CORBA::ORB_var orb =
  43         CORBA::ORB_init (argc, argv);
  44
  45       if (parse_args (argc, argv) == -1)
  46         return -1;
  47
  48       CORBA::Object_var objref =
  49         orb->string_to_object (ior_input_file);
  50
  51       if (objref.in () == 0)
  52         {
  53           //FUZZ: disable check_for_NULL
  54           ACE_ERROR_RETURN  ((LM_ERROR,
  55                               "The received objref is NULL\n"),
  56                              -1);
  57           //FUZZ: enable check_for_NULL
  58         }
  59
  60       Simple_Server_var server =
  61         Simple_Server::_narrow (objref.in ());
  62
  63       if (CORBA::is_nil (server.in ()))
  64         {
  65           ACE_ERROR_RETURN ((LM_ERROR,
  66                              "Object reference  is nil\n"),
  67                             -1);
  68         }
  69
  70       run_test (server.in ());
  71     }
  72   catch (const CORBA::Exception& ex)
  73     {
  74       ex._tao_print_exception ("Caught an exception\n");
  75       return -1;
  76     }
  77   return 0;
  78 }
  79
  80 void run_test (Simple_Server_ptr server)
  81 {
  82   for (int loop = 0; loop < 10; loop++)
  83     {
  84       try
  85         {
  86           ACE_DEBUG ((LM_DEBUG,
  87                       "About to make remote call\n"));
  88           ACE_OS::sleep (2);
  89
  90           // Make a remote call
  91           server->remote_call ();
  92
  93           /*ACE_DEBUG ((LM_DEBUG,
  94                       "Kill  the primary . . . "));
  95           ACE_OS::sleep (25);
  96           ACE_DEBUG ((LM_DEBUG, " hope you did\n")); */
  97           ACE_DEBUG ((LM_DEBUG,
  98                       "I am going to shutdown\n"));
  99           server->shutdown ();
 100           ACE_OS::sleep (23);
 101         }
 102       catch (const CORBA::UserException& x)
 103         {
 104           x._tao_print_exception ("Caught an ");
 105         }
 106       catch (const CORBA::TRANSIENT& t)
 107         {
 108           t._tao_print_exception ("Caught Exception");
 109         }
 110       catch (const CORBA::COMM_FAILURE& f)
 111         {
 112           f._tao_print_exception ("A (sort of) expected COMM_FAILURE");
 113           ACE_DEBUG ((LM_DEBUG,
 114                       "Automagically re-issuing request on COMM_FAILURE\n"));
 115         }
 116       catch (const CORBA::Exception& ex)
 117         {
 118           ex._tao_print_exception ("Unexpected exception");
 119           throw;
 120         }
 121     }
 122 }