diff options
author | nobody <nobody@ae88bc3d-4319-0410-8dbf-d08b4c9d3795> | 1999-03-09 07:08:18 +0000 |
---|---|---|
committer | nobody <nobody@ae88bc3d-4319-0410-8dbf-d08b4c9d3795> | 1999-03-09 07:08:18 +0000 |
commit | 957681064207962c8e33263c7ebebbb4a83f7af0 (patch) | |
tree | d28e87f0be723cf1eed7e0f52298d8153fc8f4cd /TAO/examples/POA/Default_Servant/server.cpp | |
parent | 1eeb03769ad41dd4bc5ac7d438cc98680ef55059 (diff) | |
download | ATCD-ACE-4_6_27.tar.gz |
This commit was manufactured by cvs2svn to create tag 'ACE-4_6_27'.ACE-4_6_27
Diffstat (limited to 'TAO/examples/POA/Default_Servant/server.cpp')
-rw-r--r-- | TAO/examples/POA/Default_Servant/server.cpp | 236 |
1 files changed, 0 insertions, 236 deletions
diff --git a/TAO/examples/POA/Default_Servant/server.cpp b/TAO/examples/POA/Default_Servant/server.cpp deleted file mode 100644 index 5c43f9feb91..00000000000 --- a/TAO/examples/POA/Default_Servant/server.cpp +++ /dev/null @@ -1,236 +0,0 @@ -// $Id$ - -//=================================================================== -// = LIBRARY -// TAO/tests/POA/Default_Servant/server -// -// = FILENAME -// server.cpp -// -// = DESCRIPTION -// A server program for the File IDL module -// -// = AUTHOR -// Irfan Pyarali -// -//==================================================================== - - -#include "ace/streams.h" -#include "ace/Get_Opt.h" -#include "File_i.h" - -ACE_RCSID(Default_Servant, server, "$Id$") - -static char *ior_output_file = 0; - -static int -parse_args (int argc, char **argv) -{ - ACE_Get_Opt get_opts (argc, argv, "o:d"); - int c; - - while ((c = get_opts ()) != -1) - switch (c) - { - case 'o': - ior_output_file = get_opts.optarg; - break; - case 'd': - TAO_debug_level++; - break; - case '?': - default: - ACE_ERROR_RETURN ((LM_ERROR, - "usage: %s " - "[-oior_output_file]" - "[-d]" - "\n", - argv [0]), - -1); - } - - // Indicates successful parsing of command line. - return 0; -} - -int -main (int argc, char **argv) -{ - CORBA::Environment env; - - // Initialize the ORB - CORBA::ORB_var orb = CORBA::ORB_init (argc, argv, 0, env); - if (env.exception () != 0) - { - env.print_exception ("CORBA::ORB_init"); - return -1; - } - - int result = parse_args (argc, argv); - if (result != 0) - return result; - - // Get the Root POA object reference - CORBA::Object_var obj = orb->resolve_initial_references ("RootPOA"); - - // Narrow the object reference to a POA reference - PortableServer::POA_var root_poa = PortableServer::POA::_narrow (obj.in (), env); - if (env.exception () != 0) - { - env.print_exception ("PortableServer::POA::_narrow"); - return -1; - } - - PortableServer::POAManager_var poa_manager = root_poa->the_POAManager (env); - if (env.exception () != 0) - { - env.print_exception ("PortableServer::POA::the_POAManager"); - return -1; - } - - CORBA::PolicyList policies (5); - policies.length (5); - - // ID Assignment Policy - policies[0] = - root_poa->create_id_assignment_policy (PortableServer::USER_ID, env); - if (env.exception () != 0) - { - env.print_exception ("PortableServer::POA::create_id_assignment_policy"); - return -1; - } - - // Lifespan Policy - policies[1] = - root_poa->create_lifespan_policy (PortableServer::PERSISTENT, env); - if (env.exception () != 0) - { - env.print_exception ("PortableServer::POA::create_lifespan_policy"); - return -1; - } - - // Request Processing Policy - policies[2] = - root_poa->create_request_processing_policy (PortableServer::USE_DEFAULT_SERVANT, env); - if (env.exception () != 0) - { - env.print_exception ("PortableServer::POA::create_request_processing_policy"); - return -1; - } - - // Servant Retention Policy - policies[3] = - root_poa->create_servant_retention_policy (PortableServer::RETAIN, env); - if (env.exception () != 0) - { - env.print_exception ("PortableServer::POA::create_servant_retention_policy"); - return -1; - } - - // Id Uniqueness Policy - policies[4] = - root_poa->create_id_uniqueness_policy (PortableServer::MULTIPLE_ID, env); - if (env.exception () != 0) - { - env.print_exception ("PortableServer::POA::create_id_uniqueness_policy"); - return -1; - } - - ACE_CString name = "firstPOA"; - PortableServer::POA_var first_poa = root_poa->create_POA (name.c_str (), - poa_manager.in (), - policies, - env); - if (env.exception () != 0) - { - env.print_exception ("PortableServer::POA::create_POA"); - return -1; - } - - for (CORBA::ULong i = 0; - i < policies.length () && env.exception () == 0; - ++i) - { - CORBA::Policy_ptr policy = policies[i]; - policy->destroy (env); - } - if (env.exception () != 0) - { - env.print_exception ("PortableServer::POA::create_POA"); - return -1; - } - - // Create a File System Implementation object in first_poa - FileImpl::System file_system_impl (first_poa.in ()); - - PortableServer::ObjectId_var file_system_oid = - PortableServer::string_to_ObjectId ("FileSystem"); - - first_poa->activate_object_with_id (file_system_oid.in (), - &file_system_impl, - env); - if (env.exception () != 0) - { - env.print_exception ("PortableServer::POA::activate_object_with_id"); - return -1; - } - - CORBA::Object_var file_system = - first_poa->id_to_reference (file_system_oid.in (), env); - if (env.exception () != 0) - { - env.print_exception ("PortableServer::POA::id_to_reference"); - return -1; - } - // Get the IOR for the "FileSystem" object - CORBA::String_var file_system_ior = - orb->object_to_string (file_system.in (), env); - if (env.exception () != 0) - { - env.print_exception ("CORBA::ORB::object_to_string"); - return -1; - } - - if (TAO_debug_level > 0) - ACE_DEBUG ((LM_DEBUG,"%s\n", - file_system_ior.in ())); - - // If the ior_output_file exists, output the ior to it - if (ior_output_file != 0) - { - FILE *output_file= ACE_OS::fopen (ior_output_file, "w"); - if (output_file == 0) - ACE_ERROR_RETURN ((LM_DEBUG, "Cannot open output file for writing IOR: %s", - ior_output_file), - -1); - ACE_OS::fprintf (output_file, "%s", file_system_ior.in ()); - ACE_OS::fclose (output_file); - } - - // set the state of the poa_manager to active i.e ready to process requests - poa_manager->activate (env); - if (env.exception () != 0) - { - env.print_exception ("PortableServer::POAManager::activate"); - return -1; - } - - // Run the ORB - if (orb->run () == -1) - ACE_ERROR_RETURN ((LM_ERROR, "%p\n", "CORBA::ORB::run"), -1); - - // Destroy the rootPOA and its children - root_poa->destroy (1, - 1, - env); - if (env.exception () != 0) - { - env.print_exception ("PortableServer::POA::destroy"); - return -1; - } - - return 0; -} - - |