TAO/orbsvcs/examples/ORT/client.cpp

   1 // -*- C++ -*-
   2 #include "sum_serverC.h"
   3 #include "ace/Get_Opt.h"
   4
   5 const ACE_TCHAR *ior = ACE_TEXT("file://test.ior");
   6
   7 int
   8 parse_args (int argc, ACE_TCHAR *argv[])
   9 {
  10   ACE_Get_Opt get_opts (argc, argv, ACE_TEXT("k:"));
  11   int c;
  12
  13   while ((c = get_opts ()) != -1)
  14     switch (c)
  15       {
  16       case 'k':
  17         ior = get_opts.optarg;
  18         break;
  19       default:
  20         ACE_ERROR_RETURN ((LM_ERROR,
  21                            "Usage: %s "
  22                            "-k IOR "
  23                            "\n",
  24                            argv[0]),
  25                           -1);
  26       }
  27   return 0;
  28 }
  29
  30 int
  31 ACE_TMAIN(int argc, ACE_TCHAR *argv[])
  32 {
  33   try
  34     {
  35       CORBA::ORB_var orb =
  36         CORBA::ORB_init (argc, argv, "client_sum_orb");
  37
  38       if (parse_args (argc, argv) != 0)
  39         return 1;
  40
  41       CORBA::Object_var obj =
  42         orb->string_to_object (ior);
  43
  44       ORT::sum_server_var server =
  45         ORT::sum_server::_narrow (obj.in ());
  46
  47       if (CORBA::is_nil (server.in ()))
  48         {
  49           ACE_ERROR_RETURN ((LM_ERROR,
  50                              "Object reference <%s> is nil.\n",
  51                              ior),
  52                             1);
  53         }
  54
  55       CORBA::ULong a = 5;
  56       CORBA::ULong b = 3;
  57
  58       CORBA::ULong result = server->add_variables (a,
  59                                                    b);
  60
  61       if (result != 8)
  62         ACE_DEBUG ((LM_DEBUG,
  63                     "Error: Add Variables did not return the right value\n"));
  64     }
  65   catch (const CORBA::Exception& ex)
  66     {
  67       ex._tao_print_exception ("ORT example on client side :");
  68       return -1;
  69     }
  70
  71   return 0;
  72 }