TAO/tests/Xt_Stopwatch/client.cpp

   1 #include "testC.h"
   2 #include "ace/Get_Opt.h"
   3
   4 #include "Control.h"
   5 #include "Client.h"
   6
   7 int
   8 ACE_TMAIN(int argc, ACE_TCHAR *argv[])
   9 {
  10   XtAppContext app;
  11   Widget toplevel = XtAppInitialize (&app,
  12                                      "Start & Stop",
  13                                      0,
  14                                      0,
  15                                      &argc,
  16                                      argv,
  17                                      0,
  18                                      0,
  19                                      0);
  20
  21   TAO::XtResource_Loader xt_loader (app);
  22
  23   Control control (toplevel);
  24
  25
  26   try
  27     {
  28       CORBA::ORB_var orb =
  29         CORBA::ORB_init (argc, argv);
  30
  31       Client client (orb.in ());
  32
  33       client.parse_args (argc, argv);
  34
  35       client.add_callback (control);
  36
  37       // Manage the widgets
  38       control.manage ();
  39       XtRealizeWidget (toplevel);
  40       XtAppMainLoop (app);
  41     }
  42   catch (const CORBA::Exception& ex)
  43     {
  44       ex._tao_print_exception ("Caught exception:");
  45       return 1;
  46     }
  47   return 0;
  48 }
  49
  50 Client::Client (CORBA::ORB_ptr orb)
  51   : orb_ (CORBA::ORB::_duplicate (orb))
  52 {
  53 }
  54
  55 Client::~Client ()
  56 {
  57 }
  58
  59 void
  60 Client::parse_args (int argc,
  61                     ACE_TCHAR *argv[])
  62 {
  63   const ACE_TCHAR *ior = ACE_TEXT("file://test.ior");
  64
  65   ACE_Get_Opt get_opts (argc, argv, ACE_TEXT("k:"));
  66   int c;
  67
  68   while ((c = get_opts ()) != -1)
  69     switch (c)
  70       {
  71       case 'k':
  72         ior = get_opts.opt_arg ();
  73         break;
  74       case '?':
  75       default:
  76         ACE_ERROR ((LM_ERROR,
  77                     "usage:  %s "
  78                     "-k <ior> "
  79                     "\n",
  80                     argv [0]));
  81       }
  82
  83   CORBA::Object_var object =
  84     this->orb_->string_to_object (ior);
  85
  86   this->server_ =
  87     Stopwatch::_narrow (object.in ());
  88
  89   if (CORBA::is_nil(this->server_.in ()))
  90     {
  91       ACE_DEBUG ((LM_DEBUG,
  92                   "\n The server value is nil "));
  93     }
  94 }
  95
  96 void
  97 Client::add_callback (Control &ctrl)
  98 {
  99   XtPointer client_data = static_cast<XtPointer> (this);
 100
 101   // Register callbacks, specifying the object's instance pointer as
 102   // client data.
 103   XtAddCallback (ctrl.startwidget (),
 104                  XmNactivateCallback,
 105                  &Client::start_callback,
 106                  client_data);
 107
 108   XtAddCallback (ctrl.stopwidget (),
 109                  XmNactivateCallback,
 110                  &Client::stop_callback,
 111                  client_data);
 112 }
 113
 114 void
 115 Client::start_callback (Widget /*widget*/,
 116                         XtPointer client_data,
 117                         XtPointer)
 118 {
 119   Client *self = static_cast<Client *> (client_data);
 120   self->start_hook ();
 121 }
 122
 123 void
 124 Client::stop_callback (Widget /*widget*/,
 125                        XtPointer client_data,
 126                        XtPointer )
 127 {
 128   Client *self = static_cast<Client *> (client_data);
 129   self->stop_hook ();
 130 }
 131
 132 void
 133 Client::start_hook ()
 134 {
 135   try
 136     {
 137       this->server_->start ();
 138     }
 139   catch (const CORBA::Exception& ex)
 140     {
 141       ex._tao_print_exception (
 142         "Caught an exception in the start button callback");
 143       return;
 144     }
 145 }
 146
 147 void
 148 Client::stop_hook ()
 149 {
 150   try
 151     {
 152       this->server_->stop ();
 153     }
 154   catch (const CORBA::Exception& ex)
 155     {
 156       ex._tao_print_exception (
 157         "Caught an exception in the stop button callback");
 158     }
 159 }
 160