Merge pull request #1844 from jrw972/monterey
[ACE_TAO.git] / TAO / tests / Bug_3471_Regression / client.cpp
blobba3af53f487a2189d5f6a8d15a88d8ef91713394
1 #include "TestC.h"
2 #include "ace/Get_Opt.h"
4 const ACE_TCHAR *ior = ACE_TEXT ("file://test.ior");
6 int
7 parse_args (int argc, ACE_TCHAR *argv[])
9 ACE_Get_Opt get_opts (argc, argv, ACE_TEXT("k:"));
10 int c;
12 while ((c = get_opts ()) != -1)
13 switch (c)
15 case 'k':
16 ior = get_opts.opt_arg ();
17 break;
19 case '?':
20 default:
21 ACE_ERROR_RETURN ((LM_ERROR,
22 "usage: %s "
23 "-k <ior> "
24 "\n",
25 argv [0]),
26 -1);
28 // Indicates successful parsing of the command line
29 return 0;
32 int
33 ACE_TMAIN(int argc, ACE_TCHAR *argv[])
35 try
37 CORBA::ORB_var orb = CORBA::ORB_init (argc, argv);
39 if (parse_args (argc, argv) != 0)
40 return 1;
42 CORBA::Object_var tmp = orb->string_to_object(ior);
44 Test::Hello_var hello = Test::Hello::_narrow(tmp.in ());
46 if (CORBA::is_nil (hello.in ()))
48 ACE_ERROR_RETURN ((LM_DEBUG,
49 "Nil Test::Hello reference <%s>\n",
50 ior),
51 1);
54 Test::ObjectSeq_var my_objs = hello->get_objects ();
56 hello->shutdown ();
58 orb->destroy ();
60 catch (const CORBA::Exception& ex)
62 ex._tao_print_exception ("Exception caught:");
63 return 1;
66 return 0;