TAO/tests/ORT/client.cpp

   1 #include "ORT_testC.h"
   2
   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       ObjectReferenceTemplate::ORT_test_var server =
  45         ObjectReferenceTemplate::ORT_test::_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::Boolean result =
  56         server->request_server ();
  57
  58       if (result == 0)
  59         ACE_DEBUG ((LM_DEBUG, "Successful invocation\n"));
  60
  61       server->shutdown ();
  62     }
  63   catch (const CORBA::Exception& ex)
  64     {
  65       ex._tao_print_exception ("ORT test on client side :");
  66       return -1;
  67     }
  68
  69   return 0;
  70 }