TAO/tests/POA/RootPOA/RootPOA.cpp

   1
   2 //=============================================================================
   3 /**
   4  *  @file     RootPOA.cpp
   5  *
   6  *   This program gets the name of the Root POA and prints it out on
   7  *   the standard output.
   8  *
   9  *  @author  Irfan Pyarali
  10  */
  11 //=============================================================================
  12
  13
  14 #include "tao/PortableServer/PortableServer.h"
  15
  16 #include "tao/ORB.h"
  17
  18 #include "ace/Log_Msg.h"
  19
  20 int
  21 ACE_TMAIN(int argc, ACE_TCHAR *argv[])
  22 {
  23   try
  24     {
  25       // Initilize the ORB
  26       CORBA::ORB_var orb = CORBA::ORB_init (argc, argv);
  27
  28       // Resolve the initial references for the name RootPOA thus getting
  29       // an object of type CORBA::Object.
  30       CORBA::Object_var obj =
  31         orb->resolve_initial_references ("RootPOA");
  32
  33       // apply _narrow on the object of type CORBA::Object, to make it
  34       // a POA class Object.
  35       PortableServer::POA_var root_poa =
  36         PortableServer::POA::_narrow (obj.in ());
  37
  38       // Get the name of the root POA.
  39       CORBA::String_var poa_name =
  40         root_poa->the_name ();
  41
  42       ACE_DEBUG ((LM_DEBUG,
  43                   "The RootPOA is : %C\n",
  44                   poa_name.in ()));
  45
  46       orb->destroy ();
  47     }
  48   catch (const CORBA::Exception& ex)
  49     {
  50       ex._tao_print_exception ("Exception raised");
  51     }
  52
  53   return 0;
  54 }