1 files changed, 0 insertions, 178 deletions
diff --git a/TAO/tests/Param_Test/server.cpp b/TAO/tests/Param_Test/server.cpp
deleted file mode 100644
index e5d97ab8cd7..00000000000
--- a/TAO/tests/Param_Test/server.cpp
+++ /dev/null
@@ -1,178 +0,0 @@
-// $Id$
-
-// ============================================================================
-//
-// = LIBRARY
-//    TAO/tests/Param_Test
-//
-// = FILENAME
-//    server.cpp
-//
-// = AUTHOR
-//    Aniruddha Gokhale
-//
-// ============================================================================
-
-#include "ace/Get_Opt.h"
-#include "ace/Log_Msg.h"
-
-#include "param_test_i.h"
-
-ACE_RCSID(Param_Test, server, "$Id$")
-
-// Parses the command line arguments and returns an error status.
-static FILE *ior_output_file = 0;
-
-static int
-parse_args (int argc, char *argv[])
-{
-  ACE_Get_Opt get_opts (argc, argv, "do:");
-  int c;
-
-  while ((c = get_opts ()) != -1)
-    switch (c)
-      {
-      case 'd':  // debug flag
-        TAO_debug_level++;
-        break;
-      case 'o':
-        ior_output_file = ACE_OS::fopen (get_opts.optarg, "w");
-        if (ior_output_file == 0)
-          ACE_ERROR_RETURN ((LM_ERROR,
-                             "Unable to open %s for writing: %p\n",
-                             get_opts.optarg), -1);
-        break;
-      case '?':
-      default:
-        ACE_ERROR_RETURN ((LM_ERROR,
-                           "usage:  %s"
-                           " [-d]"
-                           "\n", argv [0]), 1);
-      }
-
-  return 0;  // Indicates successful parsing of command line
-}
-
-// Standard command line parsing utilities used.
-
-int
-main (int argc, char *argv[])
-{
-  PortableServer::POA_var oa_ptr;
-  Param_Test_i *param_test = 0;
-
-  TAO_TRY
-    {
-      char *orb_name = "internet"; // unused by TAO
-      CORBA::Object_var temp; // holder for the myriad of times we get
-                              // an object which we then have to narrow.
-
-      // get the underlying ORB
-      CORBA::ORB_var orb_ptr = CORBA::ORB_init (argc, argv, orb_name, TAO_TRY_ENV);
-      TAO_CHECK_ENV;
-
-      // Get the Root POA
-
-      temp = orb_ptr->resolve_initial_references ("RootPOA");
-      if (CORBA::is_nil (temp.in()))
-        ACE_ERROR_RETURN ((LM_ERROR,
-                           "(%P|%t) Unable to get root poa reference.\n"),
-                          1);
-
-      oa_ptr = PortableServer::POA::_narrow (temp.in(), TAO_TRY_ENV);
-      TAO_CHECK_ENV;
-
-      PortableServer::POAManager_var poa_manager =
-        oa_ptr->the_POAManager (TAO_TRY_ENV);
-      TAO_CHECK_ENV;
-
-      CORBA::PolicyList policies (2);
-      policies.length (2);
-      policies[0] =
-        oa_ptr->create_id_assignment_policy (PortableServer::USER_ID,
-                                             TAO_TRY_ENV);
-      policies[1] =
-        oa_ptr->create_lifespan_policy (PortableServer::PERSISTENT,
-                                        TAO_TRY_ENV);
-
-      // We use a different POA, otherwise the user would have to
-      // change the object key each time it invokes the server.
-      PortableServer::POA_var good_poa =
-        oa_ptr->create_POA ("child_poa",
-                            poa_manager.in (),
-                            policies,
-                            TAO_TRY_ENV);
-      TAO_CHECK_ENV;
-
-      // Parse remaining command line and verify parameters.
-      parse_args (argc, argv);
-
-      // initialize a param_test target object and register it with the object
-      // adapter
-
-      // Create the implementation object
-      ACE_NEW_RETURN (param_test, Param_Test_i ("unknown"), 1);
-
-      // Register with GoodPOA with a specific name
-      PortableServer::ObjectId_var id =
-        PortableServer::string_to_ObjectId ("param_test");
-      good_poa->activate_object_with_id (id.in (),
-                                         param_test,
-                                         TAO_TRY_ENV);
-      TAO_CHECK_ENV;
-
-      // Stringify the objref we'll be implementing, and print it to
-      // stdout.  Someone will take that string and give it to a
-      // client.  Then release the object.
-
-      temp = good_poa->id_to_reference (id.in (), TAO_TRY_ENV);
-      TAO_CHECK_ENV;
-
-      CORBA::String_var str =
-        orb_ptr->object_to_string (temp.in (),
-                                   TAO_TRY_ENV);
-
-      ACE_DEBUG ((LM_DEBUG, "(%P|%t) The IOR is <%s>\n", str.in ()));
-      if (ior_output_file)
-        {
-          ACE_OS::fprintf (ior_output_file, "%s", str.in());
-          ACE_OS::fclose (ior_output_file);
-        }
-      
-
-      // Make the POAs controlled by this manager active
-      poa_manager->activate (TAO_TRY_ENV);
-      TAO_CHECK_ENV;
-
-      if (orb_ptr->run () == -1)
-        ACE_ERROR_RETURN ((LM_ERROR, "%p\n", "run"), -1);
-
-      good_poa->destroy (1,
-                         1,
-                         TAO_TRY_ENV);
-      TAO_CHECK_ENV;
-
-      oa_ptr->destroy (1,
-                       1,
-                       TAO_TRY_ENV);
-      TAO_CHECK_ENV;
-    }
-  TAO_CATCH (CORBA::SystemException, sysex)
-    {
-      ACE_UNUSED_ARG (sysex);
-      TAO_TRY_ENV.print_exception ("System Exception");
-      return -1;
-    }
-  TAO_CATCH (CORBA::UserException, userex)
-    {
-      ACE_UNUSED_ARG (userex);
-      TAO_TRY_ENV.print_exception ("User Exception");
-      return -1;
-    }
-  TAO_ENDTRY;
-
-  // Free resources
-  delete param_test;
-
-  return 0;
-}