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