TAO/examples/CSD_Strategy/ThreadPool/ClientApp.cpp

   1 #include "ClientApp.h"
   2 #include "FooC.h"
   3 #include "ace/Get_Opt.h"
   4 #include "ace/Log_Msg.h"
   5
   6
   7 ClientApp::ClientApp()
   8 {
   9 }
  10
  11
  12 ClientApp::~ClientApp()
  13 {
  14 }
  15
  16
  17 int
  18 ClientApp::run (int argc, ACE_TCHAR* argv[])
  19 {
  20   CORBA::ORB_var orb
  21     = CORBA::ORB_init (argc, argv);
  22
  23   // Parse the command-line args for this application.
  24   // * Raises -1 if problems are encountered.
  25   // * Returns 1 if the usage statement was explicitly requested.
  26   // * Returns 0 otherwise.
  27   int result = this->parse_args (argc, argv);
  28   if (result != 0)
  29     {
  30       return result;
  31     }
  32
  33   CORBA::Object_var obj
  34     = orb->string_to_object(this->ior_.c_str());
  35
  36   if (CORBA::is_nil(obj.in()))
  37     {
  38       ACE_ERROR((LM_ERROR,
  39                  "(%P|%t) Failed to convert IOR string to obj ref.\n"));
  40       throw TestException();
  41     }
  42
  43   Foo_var foo = Foo::_narrow(obj.in());
  44
  45   if (CORBA::is_nil(foo.in()))
  46     {
  47       ACE_ERROR((LM_ERROR,
  48                  "(%P|%t) Failed to narrow obj ref to Foo interface.\n"));
  49       throw TestException();
  50     }
  51
  52   for (CORBA::Long i = 1; i <= 100; i++)
  53     {
  54       foo->op1();
  55       foo->op2(i);
  56       CORBA::Long value = foo->op3();
  57
  58       ACE_DEBUG((LM_DEBUG,
  59                  "(%P|%t) ===> Value retrieved from op3() == %d\n",
  60                  value));
  61
  62       for (CORBA::Long j = 1; j <= 5; j++)
  63         {
  64           foo->op4(495 + (i * 5) + j);
  65         }
  66
  67       try
  68       {
  69         foo->op5();
  70       }
  71       catch (const FooException& )
  72       {
  73         ACE_DEBUG((LM_DEBUG,
  74                   "(%P|%t) ===> Caught FooException - as expected.\n"));
  75       }
  76     }
  77
  78   ACE_DEBUG((LM_DEBUG,
  79              "(%P|%t) ===> Tell server that we are done().\n"));
  80
  81   foo->done();
  82
  83   ACE_DEBUG((LM_DEBUG,
  84              "(%P|%t) ===> Back from done().\n"));
  85
  86   return 0;
  87 }
  88
  89
  90 int
  91 ClientApp::parse_args(int argc, ACE_TCHAR* argv[])
  92 {
  93   this->exe_name_ = argv[0];
  94
  95   ACE_Get_Opt get_opts(argc, argv, ACE_TEXT("i:"));
  96
  97   int c;
  98
  99   while ((c = get_opts()) != -1)
 100     {
 101       switch (c)
 102       {
 103         case 'i':
 104           this->ior_ = get_opts.opt_arg();
 105           break;
 106
 107         case '?':
 108           this->usage_statement();
 109           return 1;
 110
 111         default:
 112           this->usage_statement();
 113           return -1;
 114       }
 115     }
 116
 117   return 0;
 118 }
 119
 120
 121 void
 122 ClientApp::usage_statement()
 123 {
 124   ACE_ERROR((LM_ERROR,
 125              "Usage:  %s [options]\n\n"
 126              "OPTIONS:\n\n"
 127              "\t[-i <ior>]\n"
 128              "\t[-?]\n\n",
 129              this->exe_name_.c_str()));
 130 }
 131