TAO/tests/POA/EndpointPolicy/client.cpp

   1 #include "TestC.h"
   2 #include "ace/Get_Opt.h"
   3
   4 const ACE_TCHAR *ior = ACE_TEXT ("file://test.ior");
   5 int bad_ior = 0;
   6
   7 int
   8 parse_args (int argc, ACE_TCHAR *argv[])
   9 {
  10   ACE_Get_Opt get_opts (argc, argv, ACE_TEXT("k:b"));
  11   int c;
  12
  13   while ((c = get_opts ()) != -1)
  14     switch (c)
  15       {
  16       case 'k':
  17         ior = get_opts.opt_arg ();
  18         break;
  19
  20       case 'b':
  21         bad_ior = 1;
  22         break;
  23
  24       case '?':
  25       default:
  26         ACE_ERROR_RETURN ((LM_ERROR,
  27                            "usage:  %s "
  28                            "-k <ior> "
  29                            "\n",
  30                            argv [0]),
  31                           -1);
  32       }
  33   // Indicates successful parsing of the command line
  34   return 0;
  35 }
  36
  37 int
  38 ACE_TMAIN (int argc, ACE_TCHAR *argv[])
  39 {
  40   CORBA::ORB_var orb;
  41   CORBA::Object_var tmp;
  42
  43   try
  44     {
  45       orb = CORBA::ORB_init (argc, argv);
  46
  47       if (parse_args (argc, argv) != 0)
  48         return 1;
  49
  50       tmp = orb->string_to_object (ior);
  51     }
  52   catch (const CORBA::Exception& ex)
  53     {
  54       ex._tao_print_exception ("Exception caught:");
  55       return 1;
  56     }
  57
  58   try
  59     {
  60       ACE_DEBUG ((LM_DEBUG, "client: Invocation expecting to %s\n",
  61                   (bad_ior ? ACE_TEXT ("fail") : ACE_TEXT ("work"))));
  62       Test::Hello_var hello =
  63         Test::Hello::_narrow(tmp.in ());
  64
  65       if (CORBA::is_nil (hello.in ()))
  66         {
  67           ACE_ERROR_RETURN ((LM_DEBUG,
  68                              "Nil Test::Hello reference <%s>\n",
  69                              ior),
  70                             1);
  71         }
  72
  73       CORBA::String_var the_string =
  74         hello->get_string ();
  75
  76       if (bad_ior)
  77         {
  78           ACE_DEBUG ((LM_DEBUG,"client: Error: was expecting an exception.\n"));
  79           return 1;
  80         }
  81
  82       ACE_DEBUG ((LM_DEBUG, "client: success!\n"));
  83
  84       hello->shutdown ();
  85     }
  86   catch (const CORBA::Exception& ex)
  87     {
  88       if (!bad_ior)
  89         {
  90           ex._tao_print_exception ("client: Exception caught:");
  91           return 1;
  92         }
  93       ACE_DEBUG ((LM_DEBUG, "client: success!\n"));
  94     }
  95
  96   orb->destroy ();
  97
  98   return 0;
  99 }