TAO/tests/Portable_Interceptors/IORInterceptor/client.cpp

   1 // -*- C++ -*-
   2 #include "ace/Get_Opt.h"
   3
   4 #include "testC.h"
   5 #include "FOO_Client_ORBInitializer.h"
   6
   7 #include "tao/ORBInitializer_Registry.h"
   8
   9 const ACE_TCHAR *ior = ACE_TEXT("file://test.ior");
  10
  11 int
  12 parse_args (int argc, ACE_TCHAR *argv[])
  13 {
  14   ACE_Get_Opt get_opts (argc, argv, ACE_TEXT("k:"));
  15   int c;
  16
  17   while ((c = get_opts ()) != -1)
  18     switch (c)
  19       {
  20       case 'k':
  21         ior = get_opts.opt_arg ();
  22         break;
  23       default:
  24         ACE_ERROR_RETURN ((LM_ERROR,
  25                            "Usage: %s "
  26                            "-k IOR "
  27                            "\n",
  28                            argv[0]),
  29                           -1);
  30       }
  31   return 0;
  32 }
  33
  34 int
  35 ACE_TMAIN(int argc, ACE_TCHAR *argv[])
  36 {
  37   try
  38     {
  39 #if TAO_HAS_INTERCEPTORS == 1
  40       PortableInterceptor::ORBInitializer_ptr temp_initializer =
  41         PortableInterceptor::ORBInitializer::_nil ();
  42
  43       ACE_NEW_RETURN (temp_initializer,
  44                       FOO_Client_ORBInitializer,
  45                       -1);  // No exceptions yet!
  46       PortableInterceptor::ORBInitializer_var orb_initializer =
  47         temp_initializer;
  48
  49       PortableInterceptor::register_orb_initializer (orb_initializer.in ());
  50 #endif /* TAO_HAS_INTERCEPTORS == 1 */
  51
  52       CORBA::ORB_var orb =
  53         CORBA::ORB_init (argc, argv, "client_orb");
  54
  55       if (parse_args (argc, argv) != 0)
  56         return 1;
  57
  58       CORBA::Object_var obj =
  59         orb->string_to_object (ior);
  60
  61       FOO::test_var server =
  62         FOO::test::_narrow (obj.in ());
  63
  64       if (CORBA::is_nil (server.in ()))
  65         {
  66           ACE_ERROR_RETURN ((LM_ERROR,
  67                              "Object reference <%s> is nil.\n",
  68                              ior),
  69                             1);
  70         }
  71
  72       server->shutdown ();
  73
  74       orb->destroy ();
  75     }
  76   catch (const CORBA::Exception& ex)
  77     {
  78       ex._tao_print_exception ("IORInterceptor test (client-side):");
  79       return -1;
  80     }
  81
  82   return 0;
  83 }