/*
 * This is a plug-in for the GIMP.
 *
 * Generates clickable image maps.
 *
 * Copyright (C) 1998-1999 Maurits Rijk  lpeek.mrijk@consunet.nl
 *
 * 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.
 *
 */

#include <stdio.h>
#include <stdlib.h>
#include <string.h>

#include "libgimp/gimp.h"

#include "imap_command.h"
#include "imap_file.h"
#include "imap_main.h"
#include "imap_menu.h"
#include "imap_misc.h"
#include "imap_mru.h"
#include "imap_preferences.h"
#include "imap_table.h"

static gint
parse_map_type(void)
{
   char *token = strtok(NULL, " )");
   if (!strcmp(token, "ncsa"))
      return NCSA;
   else if (!strcmp(token, "cern"))
      return CERN;
   return CSIM;
}

static gint
parse_yes_no(void)
{
   char *token = strtok(NULL, " )");
   return (gint) strcmp(token, "no");
}

static gint
parse_int(void)
{
   char *token = strtok(NULL, " )");
   return (gint) atoi(token);
}

static void
parse_color(GdkColor *gdk_color)
{
   gint color[3];

   color[0] = parse_int();
   color[1] = parse_int();
   color[2] = parse_int();

   gdk_color->red = (guint16) color[0];
   gdk_color->green = (guint16) color[1];
   gdk_color->blue = (guint16) color[2];
}

static void
parse_mru_entry(void)
{
   char *filename = strtok(NULL, " )");
   mru_add(get_mru(), filename);
}

static void
parse_line(PreferencesData_t *data, char *line)
{
   char *token;
   ColorSelData_t *colors = &data->colors;

   line++;			/* Skip '(' */
   token = strtok(line, " ");

   if (!strcmp(token, "default-map-type")) {
      data->default_map_type = parse_map_type();
   }else if (!strcmp(token, "prompt-for-area-info")) {
      data->prompt_for_area_info = parse_yes_no();
   } else if (!strcmp(token, "require-default-url")) {
      data->require_default_url = parse_yes_no();
   } else if (!strcmp(token, "show-area-handle")) {
      data->show_area_handle = parse_yes_no();
   } else if (!strcmp(token, "keep-circles-round")) {
      data->keep_circles_round = parse_yes_no();
   } else if (!strcmp(token, "show-url-tip")) {
      data->show_url_tip = parse_yes_no();
   } else if (!strcmp(token, "use-doublesized")) {
      data->use_doublesized = parse_yes_no();
   } else if (!strcmp(token, "mru-size")) {
      data->mru_size = parse_int();
   } else if (!strcmp(token, "undo-levels")) {
      data->undo_levels = parse_int();
   } else if (!strcmp(token, "normal-fg-color")) {
      parse_color(&colors->normal_fg);
   } else if (!strcmp(token, "normal-bg-color")) {
      parse_color(&colors->normal_bg);
   } else if (!strcmp(token, "selected-fg-color")) {
      parse_color(&colors->selected_fg);
   } else if (!strcmp(token, "selected-bg-color")) {
      parse_color(&colors->selected_bg);
   } else if (!strcmp(token, "mru-entry")) {
      parse_mru_entry();
   } else {
      /* Unrecognized, just ignore rest of line */
   }
}

gboolean
preferences_load(PreferencesData_t *data)
{
   FILE *in;
   char buf[256];
   gchar *filename;

   filename = g_strconcat(gimp_directory(), "/imagemaprc", NULL);

   in = fopen(filename, "r");
   g_free(filename);
   if (in) {
      while (fgets(buf, sizeof(buf), in)) {
	 if (*buf != '\n' && *buf != '#') {
	    parse_line(data, buf);
	 }
      }
      fclose(in);
      return TRUE;
   }
   return FALSE;
}

void
preferences_save(PreferencesData_t *data)
{
   FILE *out;
   gchar *filename;
   ColorSelData_t *colors = &data->colors;

   filename = g_strconcat(gimp_directory(), "/imagemaprc", NULL);

   out = fopen(filename, "w");
   if (out) {
      fprintf(out, "# Imagemap plug-in resource file\n\n");
      if (data->default_map_type == NCSA)
	 fprintf(out, "(default-map-type ncsa)\n");
      else if (data->default_map_type == CERN)
	 fprintf(out, "(default-map-type cern)\n");
      else
	 fprintf(out, "(default-map-type csim)\n");

      fprintf(out, "(prompt-for-area-info %s)\n",
	      (data->prompt_for_area_info) ? "yes" : "no");
      fprintf(out, "(require-default-url %s)\n",
	      (data->require_default_url) ? "yes" : "no");
      fprintf(out, "(show-area-handle %s)\n",
	      (data->show_area_handle) ? "yes" : "no");
      fprintf(out, "(keep-circles-round %s)\n",
	      (data->keep_circles_round) ? "yes" : "no");
      fprintf(out, "(show-url-tip %s)\n",
	      (data->show_url_tip) ? "yes" : "no");
      fprintf(out, "(use-doublesized %s)\n",
	      (data->use_doublesized) ? "yes" : "no");

      fprintf(out, "(undo-levels %d)\n", data->undo_levels);
      fprintf(out, "(mru-size %d)\n", data->mru_size);

      fprintf(out, "(normal-fg-color %d %d %d)\n",
	      colors->normal_fg.red, colors->normal_fg.green, 
	      colors->normal_fg.blue);
      fprintf(out, "(normal-bg-color %d %d %d)\n",
	      colors->normal_bg.red, colors->normal_bg.green, 
	      colors->normal_bg.blue);
      fprintf(out, "(selected-fg-color %d %d %d)\n",
	      colors->selected_fg.red, colors->selected_fg.green, 
	      colors->selected_fg.blue);
      fprintf(out, "(selected-bg-color %d %d %d)\n",
	      colors->selected_bg.red, colors->selected_bg.green, 
	      colors->selected_bg.blue);

      mru_write(get_mru(), out);

      fclose(out);
   } else {
      do_file_error_dialog("Couldn't save resource file:", filename);
   }
   g_free(filename);
}

static void
preferences_ok_cb(gpointer data)
{
   PreferencesDialog_t *param = (PreferencesDialog_t*) data;
   PreferencesData_t *old_data = param->old_data;
   ColorSelData_t *colors = &old_data->colors;
   MRU_t *mru = get_mru();

   if (gtk_toggle_button_get_active(GTK_TOGGLE_BUTTON(param->cern)))
      old_data->default_map_type = CERN;
   else if (gtk_toggle_button_get_active(GTK_TOGGLE_BUTTON(param->ncsa)))
      old_data->default_map_type = NCSA;
   else
      old_data->default_map_type = CSIM;

   old_data->prompt_for_area_info = gtk_toggle_button_get_active(
      GTK_TOGGLE_BUTTON(param->prompt_for_area_info));
   old_data->require_default_url = gtk_toggle_button_get_active(
      GTK_TOGGLE_BUTTON(param->require_default_url));
   old_data->show_area_handle = gtk_toggle_button_get_active(
      GTK_TOGGLE_BUTTON(param->show_area_handle));
   old_data->keep_circles_round = gtk_toggle_button_get_active(
      GTK_TOGGLE_BUTTON(param->keep_circles_round));
   old_data->show_url_tip = gtk_toggle_button_get_active(
      GTK_TOGGLE_BUTTON(param->show_url_tip));
   old_data->use_doublesized = gtk_toggle_button_get_active(
      GTK_TOGGLE_BUTTON(param->use_doublesized));

   old_data->mru_size = 
      gtk_spin_button_get_value_as_int(GTK_SPIN_BUTTON(param->mru_size));
   old_data->undo_levels = 
      gtk_spin_button_get_value_as_int(GTK_SPIN_BUTTON(param->undo_levels));
   mru_set_size(mru, old_data->mru_size);
   menu_build_mru_items(mru);
   command_list_set_undo_level(old_data->undo_levels);

   *colors = param->new_colors;

   gdk_gc_set_foreground(old_data->normal_gc, &colors->normal_fg);
   gdk_gc_set_background(old_data->normal_gc, &colors->normal_bg);
   gdk_gc_set_foreground(old_data->selected_gc, &colors->selected_fg);
   gdk_gc_set_background(old_data->selected_gc, &colors->selected_bg);

   set_sash_size(old_data->use_doublesized);
   redraw_preview();
}

static void
set_button_colors(PreferencesDialog_t *dialog, ColorSelData_t *colors)
{
   gdk_window_set_background(dialog->normal_fg->window, 
			     &colors->normal_fg);
   gdk_window_clear(dialog->normal_fg->window);
   gdk_window_set_background(dialog->normal_bg->window, 
			     &colors->normal_bg);
   gdk_window_clear(dialog->normal_bg->window);
   gdk_window_set_background(dialog->selected_fg->window, 
			     &colors->selected_fg);
   gdk_window_clear(dialog->selected_fg->window);
   gdk_window_set_background(dialog->selected_bg->window, 
			     &colors->selected_bg);
   gdk_window_clear(dialog->selected_bg->window);
}

static void
select_color_cancel(GtkWidget *widget, gpointer data)
{
   PreferencesDialog_t *param = (PreferencesDialog_t*) data;
   gtk_widget_hide(param->color_sel_dlg);
   set_button_colors(param, &param->old_colors);
}

static void
select_color_ok(GtkWidget *widget, gpointer data)
{
   PreferencesDialog_t *param = (PreferencesDialog_t*) data;
   param->old_colors = param->new_colors;
   gtk_widget_hide(param->color_sel_dlg);
}

static void (*_color_changed_func)(GtkWidget *widget, gpointer data);

static void
color_changed(GtkWidget *widget, gpointer data)
{
   (*_color_changed_func)(widget, data);
}

static void
change_color(PreferencesDialog_t *param, GtkWidget *button, 
	     GdkColor *gdk_color)
{
   gdouble color[3];
   GdkColormap *colormap;
   GtkColorSelection *colorsel = GTK_COLOR_SELECTION(param->color_sel);

   gtk_color_selection_get_color(colorsel, color);
   
   gdk_color->red = (guint16)(color[0]*65535.0);
   gdk_color->green = (guint16)(color[1]*65535.0);
   gdk_color->blue = (guint16)(color[2]*65535.0);

   colormap = gdk_window_get_colormap(button->window);
   gdk_color_alloc(colormap, gdk_color);
   gdk_window_set_background(button->window, gdk_color);
   gdk_window_clear(button->window);
}

static void
normal_fg_color_changed(GtkWidget *widget, gpointer data)
{
   PreferencesDialog_t *param = (PreferencesDialog_t*) data;
   change_color(param, param->normal_fg, &param->new_colors.normal_fg);
}

static void
normal_bg_color_changed(GtkWidget *widget, gpointer data)
{
   PreferencesDialog_t *param = (PreferencesDialog_t*) data;
   change_color(param, param->normal_bg, &param->new_colors.normal_bg);
}

static void
selected_fg_color_changed(GtkWidget *widget, gpointer data)
{
   PreferencesDialog_t *param = (PreferencesDialog_t*) data;
   change_color(param, param->selected_fg, &param->new_colors.selected_fg);
}

static void
selected_bg_color_changed(GtkWidget *widget, gpointer data)
{
   PreferencesDialog_t *param = (PreferencesDialog_t*) data;
   change_color(param, param->selected_bg, &param->new_colors.selected_bg);
}

static gint
area_event(GtkWidget *widget, GdkEvent *event, PreferencesDialog_t *param,
	   GdkColor *gdk_color, 
	   void (*color_changed_func)(GtkWidget *widget, gpointer data))
{
   gdouble color[3];

   if (event->type != GDK_BUTTON_PRESS)
      return FALSE;

   if (!param->color_sel_dlg) {
      GtkWidget *dialog = gtk_color_selection_dialog_new("Select Color");

      param->color_sel_dlg = dialog;

      param->color_sel = GTK_COLOR_SELECTION_DIALOG(
	 param->color_sel_dlg)->colorsel;
   
      gtk_signal_connect(GTK_OBJECT(param->color_sel), "color_changed", 
			 (GtkSignalFunc)color_changed, (gpointer) param);

      gtk_signal_connect(
	 GTK_OBJECT(GTK_COLOR_SELECTION_DIALOG(dialog)->ok_button), 
	 "clicked", GTK_SIGNAL_FUNC(select_color_ok), (gpointer) param);

      gtk_signal_connect(
	 GTK_OBJECT(GTK_COLOR_SELECTION_DIALOG(dialog)->cancel_button), 
	 "clicked", GTK_SIGNAL_FUNC(select_color_cancel), (gpointer) param);

   }

   _color_changed_func = color_changed_func;

   color[0] = (gdouble) gdk_color->red / 65535.0;
   color[1] = (gdouble) gdk_color->green / 65535.0;
   color[2] = (gdouble) gdk_color->blue / 65535.0;
   gtk_color_selection_set_color(GTK_COLOR_SELECTION(param->color_sel), color);

   gtk_widget_show(param->color_sel_dlg);
   return TRUE;
}

static gint
edit_normal_fg(GtkWidget *widget, GdkEvent *event, PreferencesDialog_t *param)
{
   return area_event(widget, event, param, &param->old_data->colors.normal_fg,
		     normal_fg_color_changed);
}

static gint
edit_normal_bg(GtkWidget *widget, GdkEvent *event, PreferencesDialog_t *param)
{
   return area_event(widget, event, param, &param->old_data->colors.normal_bg,
		     normal_bg_color_changed);
}

static gint
edit_selected_fg(GtkWidget *widget, GdkEvent *event, 
		 PreferencesDialog_t *param)
{
   return area_event(widget, event, param, 
		     &param->old_data->colors.selected_fg,
		     selected_fg_color_changed);
}

static gint
edit_selected_bg(GtkWidget *widget, GdkEvent *event, 
		 PreferencesDialog_t *param)
{
   return area_event(widget, event, param, 
		     &param->old_data->colors.selected_bg,
		     selected_bg_color_changed);
}

static void
create_general_tab(PreferencesDialog_t *data, GtkWidget *notebook)
{
   GtkWidget *table;
   GtkWidget *frame;
   GtkWidget *hbox;
   GSList    *group;
   GtkWidget *label;

   table = gtk_table_new(7, 2, FALSE);
   gtk_container_set_border_width(GTK_CONTAINER(table), 10);
   gtk_table_set_row_spacings(GTK_TABLE(table), 10);
   gtk_table_set_col_spacings(GTK_TABLE(table), 10);
   gtk_widget_show(table);

   frame = gtk_frame_new("Default Map Type");
   gtk_widget_show(frame);
   gtk_table_attach_defaults(GTK_TABLE(table), frame, 0, 2, 0, 1);
   hbox = gtk_hbox_new(FALSE, 1);
   gtk_container_add(GTK_CONTAINER(frame), hbox);
   gtk_widget_show(hbox);
   data->ncsa = gtk_radio_button_new_with_label(NULL, "NCSA");
   gtk_box_pack_start(GTK_BOX(hbox), data->ncsa, TRUE, TRUE, 10);
   gtk_widget_show(data->ncsa);
   group = gtk_radio_button_group(GTK_RADIO_BUTTON(data->ncsa));
   data->cern = gtk_radio_button_new_with_label(group, "CERN");
   gtk_box_pack_start(GTK_BOX(hbox), data->cern, TRUE, TRUE, 10);
   gtk_widget_show(data->cern);
   group = gtk_radio_button_group(GTK_RADIO_BUTTON(data->cern));
   data->csim = gtk_radio_button_new_with_label(group, "CSIM");
   gtk_box_pack_start(GTK_BOX(hbox), data->csim, TRUE, TRUE, 10);
   gtk_widget_show(data->csim);

   data->prompt_for_area_info = 
      create_check_button_in_table(table, 1, 0, "Prompt for area info");
   data->require_default_url = 
      create_check_button_in_table(table, 2, 0, "Require default URL");
   data->show_area_handle = 
      create_check_button_in_table(table, 3, 0, "Show area handles");
   data->keep_circles_round = 
      create_check_button_in_table(table, 4, 0, "Keep NCSA circles true");
   data->show_url_tip =
      create_check_button_in_table(table, 5, 0, "Show area URL tip");
   data->use_doublesized = 
      create_check_button_in_table(table, 6, 0,
				   "Use double-sized grab handles");
   gtk_widget_show(frame);

   label = gtk_label_new("General");
   gtk_notebook_append_page(GTK_NOTEBOOK(notebook), table, label);
}

static void
create_menu_tab(PreferencesDialog_t *data, GtkWidget *notebook)
{
   GtkWidget *table;
   GtkWidget *label;
   GtkWidget *vbox;

   vbox = gtk_vbox_new(FALSE, 1);
   gtk_widget_show(vbox);

   table = gtk_table_new(2, 2, FALSE);
   gtk_box_pack_start(GTK_BOX(vbox), table, FALSE, FALSE, 0);
   gtk_container_set_border_width(GTK_CONTAINER(table), 10);
   gtk_table_set_row_spacings(GTK_TABLE(table), 10);
   gtk_table_set_col_spacings(GTK_TABLE(table), 10);
   gtk_widget_show(table);

   create_label_in_table(table, 0, 0, "Number of Undo levels (1 - 99):");
   data->undo_levels = create_spin_button_in_table(table, 0, 1, 1, 1, 99);

   create_label_in_table(table, 1, 0, "Number of MRU entries (1 - 16):");
   data->mru_size = create_spin_button_in_table(table, 1, 1, 1, 1, 16);

   label = gtk_label_new("Menu");
   gtk_notebook_append_page(GTK_NOTEBOOK(notebook), vbox, label);
}

static GtkWidget*
create_color_field(PreferencesDialog_t *data, GtkWidget *table, gint row, 
		   gint col, GtkSignalFunc func)
{
   GtkWidget *area = gtk_drawing_area_new();

   gtk_drawing_area_size(GTK_DRAWING_AREA(area), 16, 8);
   gtk_widget_set_events(area, GDK_BUTTON_PRESS_MASK);
   gtk_table_attach_defaults(GTK_TABLE(table), area, col, col + 1, row, 
			     row + 1);
   gtk_signal_connect(GTK_OBJECT(area), "event", func, (gpointer) data);
   gtk_widget_show(area);

   return area;
}

static void
create_colors_tab(PreferencesDialog_t *data, GtkWidget *notebook)
{
   GtkWidget *table, *label;
   GtkWidget *vbox;

   vbox = gtk_vbox_new(FALSE, 1);
   gtk_widget_show(vbox);

   table = gtk_table_new(2, 3, FALSE);
   gtk_box_pack_start(GTK_BOX(vbox), table, FALSE, FALSE, 0);
   gtk_container_set_border_width(GTK_CONTAINER(table), 10);
   gtk_table_set_col_spacings(GTK_TABLE(table), 10);
   gtk_table_set_row_spacings(GTK_TABLE(table), 10);
   gtk_widget_show(table);

   create_label_in_table(table, 0, 0, "Normal:");
   data->normal_fg = create_color_field(data, table, 0, 1, 
					(GtkSignalFunc) edit_normal_fg);
   data->normal_bg = create_color_field(data, table, 0, 2,
					(GtkSignalFunc) edit_normal_bg);

   create_label_in_table(table, 1, 0, "Selected:");
   data->selected_fg = create_color_field(data, table, 1, 1,
					  (GtkSignalFunc) edit_selected_fg);
   data->selected_bg = create_color_field(data, table, 1, 2,
					  (GtkSignalFunc) edit_selected_bg);

   label = gtk_label_new("Colors");
   gtk_notebook_append_page(GTK_NOTEBOOK(notebook), vbox, label);
}

static void
switch_page(GtkWidget *widget, GtkNotebookPage *page, gint page_num, 
	    gpointer data)
{
   if (page_num == 2) {
      PreferencesDialog_t *param = (PreferencesDialog_t*) data;
      set_button_colors(param, &param->old_colors);
   }
}

static PreferencesDialog_t*
create_preferences_dialog()
{
   PreferencesDialog_t *data = g_new(PreferencesDialog_t, 1);
   DefaultDialog_t *dialog;
   GtkWidget *notebook;

   data->color_sel_dlg = NULL;
   data->dialog = dialog = make_default_dialog("General Preferences");
   default_dialog_set_ok_cb(dialog, preferences_ok_cb, (gpointer) data);
   
   data->notebook = notebook = gtk_notebook_new();
   gtk_container_set_border_width(GTK_CONTAINER(notebook), 10);
   gtk_signal_connect_after(GTK_OBJECT(notebook), "switch_page", 
			    GTK_SIGNAL_FUNC(switch_page), (gpointer) data);

   gtk_box_pack_start(GTK_BOX(GTK_DIALOG(dialog->dialog)->vbox), 
		      notebook, TRUE, TRUE, 10);
   create_general_tab(data, notebook);
   create_menu_tab(data, notebook);
   create_colors_tab(data, notebook);

   gtk_widget_show(notebook);

   return data;
}

void
do_preferences_dialog(void)
{
   static PreferencesDialog_t *dialog;
   PreferencesData_t *old_data;
   GtkWidget *map_type;

   if (!dialog) {
      dialog = create_preferences_dialog();
   }
   gtk_notebook_set_page(GTK_NOTEBOOK(dialog->notebook), 0);
   dialog->old_data = old_data = get_preferences();
   dialog->new_colors = dialog->old_colors = old_data->colors;

   if (old_data->default_map_type == CERN)
      map_type = dialog->cern;
   else if (old_data->default_map_type == NCSA)
      map_type = dialog->ncsa;
   else
      map_type = dialog->csim;
   gtk_toggle_button_set_active(GTK_TOGGLE_BUTTON(map_type), TRUE);

   gtk_toggle_button_set_active(
      GTK_TOGGLE_BUTTON(dialog->prompt_for_area_info),
      old_data->prompt_for_area_info);
   gtk_toggle_button_set_active(GTK_TOGGLE_BUTTON(dialog->require_default_url),
				old_data->require_default_url);
   gtk_toggle_button_set_active(GTK_TOGGLE_BUTTON(dialog->show_area_handle),
				old_data->show_area_handle);
   gtk_toggle_button_set_active(GTK_TOGGLE_BUTTON(dialog->keep_circles_round),
				old_data->keep_circles_round);
   gtk_toggle_button_set_active(GTK_TOGGLE_BUTTON(dialog->show_url_tip),
				old_data->show_url_tip);
   gtk_toggle_button_set_active(GTK_TOGGLE_BUTTON(dialog->use_doublesized),
				old_data->use_doublesized);
   
   gtk_spin_button_set_value(GTK_SPIN_BUTTON(dialog->undo_levels), 
			     old_data->undo_levels);
   gtk_spin_button_set_value(GTK_SPIN_BUTTON(dialog->mru_size), 
			     old_data->mru_size);

   default_dialog_show(dialog->dialog);
}