TAO/tests/Native_Exceptions/client.cpp

   1 #include "ace/Get_Opt.h"
   2 #include "testC.h"
   3
   4 const ACE_TCHAR *ior = ACE_TEXT("file://test.ior");
   5 int niterations = 100;
   6
   7 int
   8 parse_args (int argc, ACE_TCHAR *argv[])
   9 {
  10   ACE_Get_Opt get_opts (argc, argv, ACE_TEXT("k:i:"));
  11   int c;
  12
  13   while ((c = get_opts ()) != -1)
  14     switch (c)
  15       {
  16       case 'k':
  17         ior = get_opts.opt_arg ();
  18         break;
  19
  20       case 'i':
  21         niterations = ACE_OS::atoi (get_opts.opt_arg ());
  22         break;
  23
  24       case '?':
  25       default:
  26         ACE_ERROR_RETURN ((LM_ERROR,
  27                            "usage:  %s "
  28                            "-k <ior> "
  29                            "-i <niterations> "
  30                            "\n",
  31                            argv [0]),
  32                           -1);
  33       }
  34   // Indicates successful parsing of the command line
  35   return 0;
  36 }
  37
  38 int
  39 ACE_TMAIN(int argc, ACE_TCHAR *argv[])
  40 {
  41   try
  42     {
  43       CORBA::ORB_var orb =
  44         CORBA::ORB_init (argc, argv);
  45
  46       if (parse_args (argc, argv) != 0)
  47         return 1;
  48
  49       CORBA::Object_var object =
  50         orb->string_to_object (ior);
  51
  52       Simple_Server_var server =
  53         Simple_Server::_narrow (object.in ());
  54
  55       if (CORBA::is_nil (server.in ()))
  56         {
  57           ACE_ERROR_RETURN ((LM_ERROR,
  58                              "Object reference <%s> is nil.\n",
  59                              ior),
  60                             1);
  61         }
  62
  63       for (int i = 0; i != niterations; ++i)
  64         {
  65           if (server->test_method (i) != i)
  66             {
  67               ACE_ERROR ((LM_ERROR,
  68                           "Unexpected result from test_method\n"));
  69             }
  70
  71           try
  72             {
  73               server->test_raise (i);
  74               ACE_ERROR ((LM_ERROR,
  75                           "The test_raise call didn't raise\n"));
  76             }
  77           catch (Simple_Server::Failure &fail)
  78             {
  79               ACE_UNUSED_ARG (fail);
  80               // Do nothing, this is the normal behavior...
  81             }
  82         }
  83
  84       server->shutdown ();
  85     }
  86   catch (const CORBA::SystemException &ex)
  87     {
  88       ex._tao_print_exception ("Caught exception:");
  89       return 1;
  90     }
  91
  92   return 0;
  93 }