// $Id$

#include "Multiple_Inheritance_i.h"
#include "tao/TAO.h"

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)
{
  Multiple_Inheritance_i servant;
  TAO_ORB_Manager orb_manager;

  ACE_DEBUG ((LM_DEBUG, "\n\tMultiple Inheritance Server\n\n"));
  TAO_TRY
    {
      orb_manager.init_child_poa (argc, 
                                  argv, 
                                  "child_poa", 
                                  TAO_TRY_ENV);
      TAO_CHECK_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;

      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;
    }
  TAO_CATCH (CORBA::SystemException, sysex)
    {
      ACE_UNUSED_ARG (sysex);
      TAO_TRY_ENV.print_exception ("System Exception");
      return -1;
    }
  TAO_ENDTRY;

  return 0;
}