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
  79   ACE_DEBUG((LM_DEBUG,
  80              "(%P|%t) ===> Tell server that we are done().\n"));
  81
  82   foo->done();
  83
  84   ACE_DEBUG((LM_DEBUG,
  85              "(%P|%t) ===> Back from done().\n"));
  86
  87   return 0;
  88 }
  89
  90
  91 int
  92 ClientApp::parse_args(int argc, ACE_TCHAR* argv[])
  93 {
  94   this->exe_name_ = argv[0];
  95
  96   ACE_Get_Opt get_opts(argc, argv, ACE_TEXT("i:"));
  97
  98   int c;
  99
 100   while ((c = get_opts()) != -1)
 101     {
 102       switch (c)
 103       {
 104         case 'i':
 105           this->ior_ = get_opts.opt_arg();
 106           break;
 107
 108         case '?':
 109           this->usage_statement();
 110           return 1;
 111
 112         default:
 113           this->usage_statement();
 114           return -1;
 115       }
 116     }
 117
 118   return 0;
 119 }
 120
 121
 122 void
 123 ClientApp::usage_statement()
 124 {
 125   ACE_ERROR((LM_ERROR,
 126              "Usage:  %s [options]\n\n"
 127              "OPTIONS:\n\n"
 128              "\t[-i <ior>]\n"
 129              "\t[-?]\n\n",
 130              this->exe_name_.c_str()));
 131 }
 132