diff options
Diffstat (limited to 'TAO/examples/POA/POA_BiDir/POA_BiDir.cpp')
-rw-r--r-- | TAO/examples/POA/POA_BiDir/POA_BiDir.cpp | 183 |
1 files changed, 183 insertions, 0 deletions
diff --git a/TAO/examples/POA/POA_BiDir/POA_BiDir.cpp b/TAO/examples/POA/POA_BiDir/POA_BiDir.cpp new file mode 100644 index 00000000000..d8d039f4f8c --- /dev/null +++ b/TAO/examples/POA/POA_BiDir/POA_BiDir.cpp @@ -0,0 +1,183 @@ +// $Id$ + +// ========================================================================== +// = LIBRARY +// TAO/example/POA/POA_BiDir +// +// = FILENAME +// POA_BiDir.cpp +// +// = DESCRIPTION +// This program is an extension of $TAO_ROOT/example/POA/NewPOA. In +// the many POA's created this example adds a BiDirGIOP policy to +// one of the POA's. +// +// = AUTHOR +// Balachandran Natarajan <bala@cs.wustl.edu> +// ======================================================================== + +#include "tao/PortableServer/PortableServer.h" + +#include "tao/BiDir_GIOP/BiDirGIOP.h" + +#include "tao/AnyTypeCode/Any.h" +#include "tao/ORB.h" + +#include "ace/SString.h" + + +ACE_RCSID (POA_BiDir, + POA_BiDir, + "$Id$") + +void +print_poa (PortableServer::POA_ptr poa) +{ + CORBA::String_var poa_name = + poa->the_name (); + + CORBA::OctetSeq_var poa_id = + poa->id (); + + ACE_DEBUG ((LM_DEBUG, + "POA name = %s\n", + poa_name.in ())); + + ACE_DEBUG ((LM_DEBUG, + "POA id = ")); + + for (CORBA::ULong i = 0; + i != poa_id->length (); + ++i) + { + ACE_DEBUG ((LM_DEBUG, + "%o", + poa_id[i])); + } + + ACE_DEBUG ((LM_DEBUG, + "\n")); + + PortableServer::POAList_var children = + poa->the_children (); + + for (CORBA::ULong index = 0; + index != children->length (); + ++index) + { + print_poa (children[index]); + } +} + +int +main (int argc, char **argv) +{ + + try + { + // The first step Initialize the ORB + CORBA::ORB_var orb = CORBA::ORB_init (argc, + argv, + 0); + + // Obtain the RootPOA. + CORBA::Object_var obj = + orb->resolve_initial_references ("RootPOA"); + + // _narrow() the Object to get the POA object, i.e., the root_poa. + PortableServer::POA_var root_poa = + PortableServer::POA::_narrow (obj.in ()); + + // Policies for the new POAs + CORBA::PolicyList policies (2); + policies.length (2); + + // Threading policy + policies[0] = + root_poa->create_thread_policy (PortableServer::ORB_CTRL_MODEL); + + // Lifespan policy + policies[1] = + root_poa->create_lifespan_policy (PortableServer::TRANSIENT); + + // Creation of the firstPOA + ACE_CString name = "firstPOA"; + PortableServer::POA_var first_poa = + root_poa->create_POA (name.c_str (), + PortableServer::POAManager::_nil (), + policies); + + // Creation of the new POA, i.e. firstPOA/secondPOA + name = "secondPOA"; + PortableServer::POA_var second_poa = + first_poa->create_POA (name.c_str (), + PortableServer::POAManager::_nil (), + policies); + + // Creation of the new POAs over, so destroy the Policy_ptr's. + for (CORBA::ULong i = 0; + i < policies.length (); + ++i) + { + CORBA::Policy_ptr policy = policies[i]; + policy->destroy (); + } + + CORBA::Any pol; + pol <<= BiDirPolicy::BOTH; + CORBA::PolicyList bidir_policy (1); + bidir_policy.length (1); + + bidir_policy[0] = + orb->create_policy (BiDirPolicy::BIDIRECTIONAL_POLICY_TYPE, + pol); + + + // Creating thirdPOA. + name = "thirdPOA"; + + PortableServer::POA_var third_poa = + root_poa->create_POA (name.c_str (), + PortableServer::POAManager::_nil (), + bidir_policy); + + // Creation of childPOA is over. Destroy the Policy objects. + for (CORBA::ULong k = 0; + k < bidir_policy.length (); + ++k) + { + bidir_policy[k]->destroy (); + } + + // Get the names of all the POAs and print them out. + + CORBA::String_var root_poa_name = + root_poa->the_name (); + + CORBA::String_var first_poa_name = + first_poa->the_name (); + + CORBA::String_var second_poa_name = + second_poa->the_name (); + + CORBA::String_var third_poa_name = + third_poa->the_name (); + + ACE_DEBUG ((LM_DEBUG, + "%s\n%s\n%s\n%s\n", + root_poa_name.in (), + first_poa_name.in (), + second_poa_name.in (), + third_poa_name.in ())); + + print_poa (root_poa.in ()); + + } + catch (const CORBA::Exception& ex) + { + ex._tao_print_exception ("Exception caught in main "); + return -1; + } + + return 0; +} |