See Sun Sep 27 22:37:11 1998 Matthew J Braun <mjb2@cec.wustl.edu>

1 files changed, 56 insertions, 5 deletions

diff --git a/TAO/tests/Multiple_Inheritance/server.cpp b/TAO/tests/Multiple_Inheritance/server.cpp
index 34bf0548cd4..3e08bf3d3b8 100644
--- a/TAO/tests/Multiple_Inheritance/server.cpp
+++ b/TAO/tests/Multiple_Inheritance/server.cpp
@@ -5,8 +5,40 @@
 
 ACE_RCSID(Multiple_Inheritance, server, "$Id$")
 
+static char *ior_output_file = 0;
+
+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':
+	TAO_debug_level++;
+        break;
+      case 'o':
+	ior_output_file = ACE_OS::strdup (get_opts.optarg);
+	break;
+      case '?':
+      default:
+        ACE_ERROR_RETURN ((LM_ERROR,
+                           "usage:  %s"
+                           "-d "
+			   "-o <iorfile>"
+                           "\n",
+                           argv [0]),
+                          -1);
+      }
+  // Indicates sucessful parsing of the command line
+  return 0;
+}
+
+
 int
-main (int argc, char *argv[])
+main (int argc, char **argv)
 {
   Multiple_Inheritance_i servant;
   TAO_ORB_Manager orb_manager;
@@ -20,13 +52,32 @@ main (int argc, char *argv[])
                                   TAO_TRY_ENV);
       TAO_CHECK_ENV;
 
-      CORBA::String_var ior = orb_manager.activate_under_child_poa ("my_object", 
-                                                                    &servant, 
-                                                                    TAO_TRY_ENV);
+      if (parse_args (argc, argv) != 0)
+	return -1;
+      
+      CORBA::String_var ior =
+	orb_manager.activate_under_child_poa ("my_object", 
+					      &servant, 
+					      TAO_TRY_ENV);
       TAO_CHECK_ENV;
 
-      ACE_DEBUG ((LM_DEBUG, "%s\n\n", ior.in ()));
+      if (TAO_debug_level > 0)
+	ACE_DEBUG ((LM_DEBUG, "%s\n",
+		    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", ior.in ());
+	  ACE_OS::fclose (output_file);
+	}
+      
       orb_manager.run (TAO_TRY_ENV);
       TAO_CHECK_ENV;
     }