/* errors.c - this file is part of the GNU HaliFAX Viewer
 *
 * Copyright (C) 2000-2001 Wolfgang Sourdeau
 *
 * Author: Wolfgang Sourdeau <wolfgang@contre.com>
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 2 of the License, or
 * (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307, USA.
 */

/* This file contains functions to display error messages. */

#ifdef HAVE_CONFIG_H
#include <config.h>
#endif

#include <stdio.h>
#include <gtk/gtk.h>

#include "tiffimages.h"
#include "viewer.h"
#include "gtkutils.h"

/*  static gchar* */
/*  list_to_text (GSList *string_list) */
/*  { */
/*    gchar *ret_str, *cur_pos; */
/*    GSList *cur_str; */
/*    guint count, str_c, length; */
  
/*    length = 0; */
/*    str_c = 0; */
  
/*    cur_str = string_list->next; */
  
/*    while (cur_str) */
/*      { */
/*        length += strlen ((char*) cur_str->data) + 1; */
/*        str_c++; */
/*        cur_str = cur_str->next; */
/*      } */

/*    if (str_c) */
/*      { */
/*        ret_str = g_malloc (length); */
/*        cur_pos = ret_str; */
/*        cur_str = string_list->next; */

/*        for (count = 1; count < str_c; count++) */
/*  	{ */
/*  	  strcpy (cur_pos, (char*) cur_str->data); */
/*  	  cur_pos += strlen ((char*) cur_str->data); */
/*  	  sprintf (cur_pos, "\n"); */
/*  	  cur_pos ++; */
/*  	  cur_str = cur_str->next; */
/*  	} */

/*        sprintf (cur_pos, "%s", (char*) cur_str->data); */
/*      } */
/*    else */
/*      ret_str = NULL; */

/*    return ret_str; */
/*  } */

void
display_failure (GtkWidget *window,
		 gchar *title, gchar *message, gchar *but_text)
{
  DialogWindow *fail_dialog;
  GtkWidget *vbox, *msg_lbl, *ok_but; 

  fail_dialog = dialog_window_new (title);

  vbox = gtk_vbox_new (FALSE, 5);
  gtk_container_set_border_width (GTK_CONTAINER (vbox), 5);

  msg_lbl = gtk_label_new (message);
  gtk_label_set_justify (GTK_LABEL (msg_lbl),
			 GTK_JUSTIFY_LEFT);
  gtk_box_pack_start (GTK_BOX (vbox), msg_lbl,
		      FALSE, FALSE, 0);

  ok_but = gtk_button_new_with_label (but_text); 
  gtk_signal_connect (GTK_OBJECT (ok_but), "clicked",
		      dialog_window_destroy_from_signal,
		      fail_dialog);

  dialog_window_set_content_with_frame (fail_dialog, vbox);
  dialog_window_set_button (fail_dialog, ok_but);
  dialog_window_set_escapable (fail_dialog);

  dialog_window_show (fail_dialog,
		      GTK_WINDOW (window));
}

static void
error_dialog (GtkWidget *window, gchar *file_name, gchar *error_string)
{
  gchar *title, *message, *but_text;

  title = _("Something strange happened...");
  message =
    g_strdup_printf (_("The specified file, %s, could not be opened\n"
		       "because %s.\n"
		       "Please fix this and try again later."),
		     file_name, error_string);;
  but_text = _("I am sorry");

  display_failure (window, title, message, but_text);
}

void
file_open_error (GtkWidget *window, gchar *file_name)
{
  gchar *error_str;

  error_str = ti_error_string (file_name);  
  error_dialog (window, file_name, error_str);
  g_free (error_str);
}