TAO/examples/mfc/client.cpp

   1 #include "w32_testS.h"
   2 #include "ace/streams.h"
   3
   4 int
   5 ACE_TMAIN(int argc, ACE_TCHAR *argv[])
   6 {
   7   try
   8     {
   9       ACE_DEBUG ((LM_DEBUG,
  10                   "Initializing the ORB!\n"));
  11       CORBA::ORB_var the_orb = CORBA::ORB_init (argc, argv);
  12
  13       CORBA::Object_var orb_obj =
  14         the_orb->resolve_initial_references ("RootPOA");
  15
  16       PortableServer::POA_var the_root_poa =
  17         PortableServer::POA::_narrow (orb_obj.in ());
  18
  19       PortableServer::POAManager_var the_poa_manager =
  20         the_root_poa->the_POAManager ();
  21
  22       // Retrieving the servants IOR from a file
  23       ACE_DEBUG ((LM_DEBUG,
  24                   "Reading the IOR!\n"));
  25
  26       const ACE_TCHAR *filename = ACE_TEXT("file://ior.txt");
  27
  28       orb_obj =
  29         the_orb->string_to_object (filename);
  30
  31       ACE_DEBUG ((LM_DEBUG,
  32                   "Narrowing the IOR!\n"));
  33
  34       W32_Test_Interface_var mycall =
  35         W32_Test_Interface::_narrow (orb_obj.in ());
  36
  37       ACE_DEBUG ((LM_DEBUG,
  38                   "Sending the Request!\n"));
  39       char *response = mycall->getresponse (1);
  40       ACE_DEBUG ((LM_DEBUG,
  41                   "The answer ...%s\n", response));
  42
  43       // Free up the string.
  44       CORBA::string_free (response);
  45     }
  46   catch (const CORBA::Exception& ex)
  47     {
  48       ex._tao_print_exception ("Caught exception:");
  49       return 1;
  50     }
  51
  52   return 0;
  53 }