TAO/tests/Bug_1361_Regression/shutdown.cpp

   1 #include "TestC.h"
   2 #include "ace/Get_Opt.h"
   3
   4 const ACE_TCHAR *ior = ACE_TEXT("file://test.ior");
   5
   6 int
   7 parse_args (int argc, ACE_TCHAR *argv[]);
   8
   9 int
  10 ACE_TMAIN(int argc, ACE_TCHAR *argv[])
  11 {
  12   ACE_DEBUG ((LM_DEBUG,
  13              "Starting shutdown\n"));
  14   try
  15     {
  16       CORBA::ORB_var orb =
  17         CORBA::ORB_init (argc, argv);
  18
  19       if (parse_args (argc, argv) != 0)
  20         return 1;
  21
  22       CORBA::Object_var tmp =
  23         orb->string_to_object(ior);
  24
  25       Test::Echo_Caller_var server =
  26         Test::Echo_Caller::_narrow(tmp.in ());
  27
  28       if (CORBA::is_nil (server.in ()))
  29         {
  30           ACE_ERROR_RETURN ((LM_DEBUG,
  31                              "Nil Test::Echo_Caller reference <%s>\n",
  32                              ior),
  33                             1);
  34         }
  35
  36       server->shutdown ();
  37
  38       orb->destroy ();
  39     }
  40   catch (const CORBA::Exception& ex)
  41     {
  42       ex._tao_print_exception ("Exception caught:");
  43       return 1;
  44     }
  45
  46   return 0;
  47 }
  48
  49 int
  50 parse_args (int argc, ACE_TCHAR *argv[])
  51 {
  52   ACE_Get_Opt get_opts (argc, argv, ACE_TEXT("k:"));
  53   int c;
  54
  55   while ((c = get_opts ()) != -1)
  56     switch (c)
  57       {
  58       case 'k':
  59         ior = get_opts.opt_arg ();
  60         break;
  61
  62       case '?':
  63       default:
  64         ACE_ERROR_RETURN ((LM_ERROR,
  65                            "usage:  %s "
  66                            "-k <ior> "
  67                            "\n",
  68                            argv [0]),
  69                           -1);
  70       }
  71   // Indicates successful parsing of the command line
  72   return 0;
  73 }