/*
 * CDE - Common Desktop Environment
 *
 * Copyright (c) 1993-2012, The Open Group. All rights reserved.
 *
 * These libraries and programs are free software; you can
 * redistribute them and/or modify them under the terms of the GNU
 * Lesser General Public License as published by the Free Software
 * Foundation; either version 2 of the License, or (at your option)
 * any later version.
 *
 * These libraries and programs are distributed in the hope that
 * they will be useful, but WITHOUT ANY WARRANTY; without even the
 * implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
 * PURPOSE. See the GNU Lesser General Public License for more
 * details.
 *
 * You should have received a copy of the GNU Lesser General Public
 * License along with these libraries and programs; if not, write
 * to the Free Software Foundation, Inc., 51 Franklin Street, Fifth
 * Floor, Boston, MA 02110-1301 USA
 */
// $XConsortium: test6.cc /main/3 1996/06/11 16:54:47 cde-hal $
#include <stdio.h>
#include "Exceptions.hh"
#include <signal.h>
#include <string.h>

void
catch_abort(int, ...)
{
  puts ("Abort (core not dumped)");
  // Exit normally so Purify can report.
  exit (1);
}

// Test function to print the error in a cool box. 

void
error_handler (const char *line[], int nlines)
{
  int i, n, maxlen = 0;
  static char border[100];

  for (i = 0; i < nlines; i++)
    if (strlen (line[i]) > maxlen)
      maxlen = strlen (line[i]);

  maxlen += 6;
  border[0] = border[maxlen-1] = '+';
  border[maxlen] = '\n';
  border[maxlen+1] = '\0';

  for (i = 1; i < maxlen - 1; i++)
    border[i] = '-';
  fputs (border, stderr);

  border[0] = border[maxlen-1] = '|';
  for (n = 0; n < nlines; n++)
    {
      for (i = 1; i < maxlen - 1; i++)
	border[i] = ' ';

      for (i = 0; i < strlen (line[n]); i++)
	   border[i+3] = line[n][i];

      fputs (border, stderr);
    }

  for (i = 1; i < maxlen - 1; i++)
    border[i] = '-';
  border[0] = border[maxlen-1] = '+';
  fputs (border, stderr);
}

int
main()
{
  INIT_EXCEPTIONS();

  puts ("Testing the custom error handler functionality.");
  
#ifdef MUST_EXIT
  signal (SIGABRT, catch_abort);
#endif

  Exceptions::set_error_handler (error_handler);
  
  try
    {
      puts ("Trying something");
      throw (Exception());
    }
  end_try;

}