TAO/tests/POA/Persistent_ID/client.cpp

   1
   2 //=============================================================================
   3 /**
   4  *  @file     client.cpp
   5  *
   6  *   This is a client implementation.
   7  *
   8  *  @author  Irfan Pyarali
   9  */
  10 //=============================================================================
  11
  12
  13 #include "ace/Get_Opt.h"
  14 #include "testC.h"
  15 #include "ace/OS_NS_string.h"
  16
  17 static const ACE_TCHAR *IOR = ACE_TEXT ("file://ior");
  18 static int shutdown_server = 0;
  19
  20 static int
  21 parse_args (int argc, ACE_TCHAR **argv)
  22 {
  23   ACE_Get_Opt get_opts (argc, argv, ACE_TEXT("k:x"));
  24   int c;
  25
  26   while ((c = get_opts ()) != -1)
  27     switch (c)
  28       {
  29       case 'k':
  30         IOR = get_opts.opt_arg ();
  31         break;
  32
  33       case 'x':
  34         shutdown_server = 1;
  35         break;
  36
  37       case '?':
  38       default:
  39         ACE_ERROR_RETURN ((LM_ERROR,
  40                            ACE_TEXT ("usage:  %s ")
  41                            ACE_TEXT ("-k IOR ")
  42                            ACE_TEXT ("-x shutdown server ")
  43                            ACE_TEXT ("\n"),
  44                            argv [0]),
  45                           -1);
  46       }
  47
  48   if (IOR == 0)
  49     ACE_ERROR_RETURN ((LM_ERROR,
  50                        ACE_TEXT ("Please specify the IOR\n")), -1);
  51
  52   return 0;
  53 }
  54
  55 int
  56 ACE_TMAIN (int argc, ACE_TCHAR *argv[])
  57 {
  58   try
  59     {
  60       CORBA::ORB_var orb =
  61         CORBA::ORB_init (argc, argv);
  62
  63       int parse_args_result =
  64         parse_args (argc, argv);
  65       if (parse_args_result != 0)
  66         return parse_args_result;
  67
  68       CORBA::Object_var object =
  69         orb->string_to_object (IOR);
  70
  71       test_var test1 =
  72         test::_narrow (object.in ());
  73
  74       test1->method ();
  75
  76       test_var test2 =
  77         test1->create_POA ();
  78
  79       test2->method ();
  80
  81       test1->destroy_POA ();
  82
  83       try
  84         {
  85           test2->method ();
  86         }
  87       catch (const CORBA::Exception &ex)
  88         {
  89           ACE_DEBUG ((LM_DEBUG,
  90                       ACE_TEXT ("caught expected %s\n"),
  91                       ex._name()));
  92         }
  93
  94       test_var test3 =
  95         test1->create_POA ();
  96
  97       test2->method ();
  98
  99       test3->method ();
 100
 101       if (shutdown_server)
 102         {
 103           test1->shutdown ();
 104         }
 105
 106       orb->destroy ();
 107     }
 108   catch (const CORBA::Exception& ex)
 109     {
 110       ex._tao_print_exception (ACE_TEXT ("Error!"));
 111       return -1;
 112     }
 113
 114   return 0;
 115 }