/* The GIMP -- an image manipulation program
 * Copyright (C) 1995 Spencer Kimball and Peter Mattis
 *
 * gimpdatafactoryview.c
 * Copyright (C) 2001 Michael Natterer
 *
 * 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 "config.h"

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

#include <gtk/gtk.h>

#include "libgimpmath/gimpmath.h"
#include "libgimpwidgets/gimpwidgets.h"

#include "widgets-types.h"

#include "core/gimpcontainer.h"
#include "core/gimpcontext.h"
#include "core/gimpdata.h"
#include "core/gimpdatafactory.h"
#include "core/gimpmarshal.h"

#include "gimpcontainerview.h"
#include "gimpdatafactoryview.h"
#include "gimpcontainergridview.h"
#include "gimpcontainerlistview.h"
#include "gimpdnd.h"

#include "libgimp/gimpintl.h"

#include "pixmaps/delete.xpm"
#include "pixmaps/duplicate.xpm"
#include "pixmaps/new.xpm"
#include "pixmaps/edit.xpm"
#include "pixmaps/refresh.xpm"


static void   gimp_data_factory_view_class_init (GimpDataFactoryViewClass *klass);
static void   gimp_data_factory_view_init       (GimpDataFactoryView      *view);
static void   gimp_data_factory_view_destroy    (GtkObject                *object);

static void   gimp_data_factory_view_new_clicked       (GtkWidget           *widget,
							GimpDataFactoryView *view);
static void   gimp_data_factory_view_duplicate_clicked (GtkWidget           *widget,
							GimpDataFactoryView *view);
static void   gimp_data_factory_view_duplicate_dropped (GtkWidget           *widget,
							GimpViewable        *viewable,
							gpointer             data);
static void   gimp_data_factory_view_edit_clicked      (GtkWidget           *widget,
							GimpDataFactoryView *view);
static void   gimp_data_factory_view_edit_dropped      (GtkWidget           *widget,
							GimpViewable        *viewable,
							gpointer             data);
static void   gimp_data_factory_view_delete_clicked    (GtkWidget           *widget,
							GimpDataFactoryView *view);
static void   gimp_data_factory_view_delete_dropped    (GtkWidget           *widget,
							GimpViewable        *viewable,
							gpointer             data);
static void   gimp_data_factory_view_refresh_clicked   (GtkWidget           *widget,
							GimpDataFactoryView *view);

static void   gimp_data_factory_view_data_changed      (GimpContext         *context,
							GimpData            *data,
							GimpDataFactoryView *view);
static void   gimp_data_factory_view_data_activate     (GtkWidget           *context,
							GimpData            *data,
							gpointer             insert_data,
							GimpDataFactoryView *view);


static GtkVBoxClass *parent_class = NULL;


GtkType
gimp_data_factory_view_get_type (void)
{
  static guint view_type = 0;

  if (! view_type)
    {
      GtkTypeInfo view_info =
      {
	"GimpDataFactoryView",
	sizeof (GimpDataFactoryView),
	sizeof (GimpDataFactoryViewClass),
	(GtkClassInitFunc) gimp_data_factory_view_class_init,
	(GtkObjectInitFunc) gimp_data_factory_view_init,
	/* reserved_1 */ NULL,
	/* reserved_2 */ NULL,
        (GtkClassInitFunc) NULL
      };

      view_type = gtk_type_unique (GTK_TYPE_VBOX, &view_info);
    }

  return view_type;
}

static void
gimp_data_factory_view_class_init (GimpDataFactoryViewClass *klass)
{
  GtkObjectClass *object_class;

  object_class = (GtkObjectClass *) klass;

  parent_class = gtk_type_class (GTK_TYPE_VBOX);

  object_class->destroy = gimp_data_factory_view_destroy;
}

static void
gimp_data_factory_view_init (GimpDataFactoryView *view)
{
  GtkWidget *pixmap;

  view->view = NULL;

  gtk_box_set_spacing (GTK_BOX (view), 2);

  view->button_box = gtk_hbox_new (TRUE, 2);
  gtk_box_pack_end (GTK_BOX (view), view->button_box, FALSE, FALSE, 0);
  gtk_widget_show (view->button_box);

  /* new */

  view->new_button = gtk_button_new ();
  gtk_box_pack_start (GTK_BOX (view->button_box), view->new_button,
		      TRUE, TRUE, 0);
  gtk_widget_show (view->new_button);

  gimp_help_set_help_data (view->new_button, _("New"), NULL);

  gtk_signal_connect (GTK_OBJECT (view->new_button), "clicked",
		      GTK_SIGNAL_FUNC (gimp_data_factory_view_new_clicked),
		      view);

  pixmap = gimp_pixmap_new (new_xpm);
  gtk_container_add (GTK_CONTAINER (view->new_button), pixmap);
  gtk_widget_show (pixmap);

  /* duplicate */

  view->duplicate_button = gtk_button_new ();
  gtk_box_pack_start (GTK_BOX (view->button_box), view->duplicate_button,
		      TRUE, TRUE, 0);
  gtk_widget_show (view->duplicate_button);

  gimp_help_set_help_data (view->duplicate_button, _("Duplicate"), NULL);

  gtk_signal_connect (GTK_OBJECT (view->duplicate_button), "clicked",
		      GTK_SIGNAL_FUNC (gimp_data_factory_view_duplicate_clicked),
		      view);  

  pixmap = gimp_pixmap_new (duplicate_xpm);
  gtk_container_add (GTK_CONTAINER (view->duplicate_button), pixmap);
  gtk_widget_show (pixmap);

  /* edit */

  view->edit_button = gtk_button_new ();
  gtk_box_pack_start (GTK_BOX (view->button_box), view->edit_button,
		      TRUE, TRUE, 0);
  gtk_widget_show (view->edit_button);

  gimp_help_set_help_data (view->edit_button, _("Edit"), NULL);

  gtk_signal_connect (GTK_OBJECT (view->edit_button), "clicked",
		      GTK_SIGNAL_FUNC (gimp_data_factory_view_edit_clicked),
		      view);  

  pixmap = gimp_pixmap_new (edit_xpm);
  gtk_container_add (GTK_CONTAINER (view->edit_button), pixmap);
  gtk_widget_show (pixmap);

  /* delete */

  view->delete_button = gtk_button_new ();
  gtk_box_pack_start (GTK_BOX (view->button_box), view->delete_button,
		      TRUE, TRUE, 0);
  gtk_widget_show (view->delete_button);

  gimp_help_set_help_data (view->delete_button, _("Delete"), NULL);

  gtk_signal_connect (GTK_OBJECT (view->delete_button), "clicked",
		      GTK_SIGNAL_FUNC (gimp_data_factory_view_delete_clicked),
		      view);  

  pixmap = gimp_pixmap_new (delete_xpm);
  gtk_container_add (GTK_CONTAINER (view->delete_button), pixmap);
  gtk_widget_show (pixmap);

  /* refresh */

  view->refresh_button = gtk_button_new ();
  gtk_box_pack_start (GTK_BOX (view->button_box), view->refresh_button,
		      TRUE, TRUE, 0);
  gtk_widget_show (view->refresh_button);

  gimp_help_set_help_data (view->refresh_button, _("Refresh"), NULL);

  gtk_signal_connect (GTK_OBJECT (view->refresh_button), "clicked",
		      GTK_SIGNAL_FUNC (gimp_data_factory_view_refresh_clicked),
		      view);  

  pixmap = gimp_pixmap_new (refresh_xpm);
  gtk_container_add (GTK_CONTAINER (view->refresh_button), pixmap);
  gtk_widget_show (pixmap);

  gtk_widget_set_sensitive (view->duplicate_button, FALSE);
  gtk_widget_set_sensitive (view->edit_button, FALSE);
  gtk_widget_set_sensitive (view->delete_button, FALSE);
}

static void
gimp_data_factory_view_destroy (GtkObject *object)
{
  GimpDataFactoryView *view;

  view = GIMP_DATA_FACTORY_VIEW (object);

  if (GTK_OBJECT_CLASS (parent_class)->destroy)
    GTK_OBJECT_CLASS (parent_class)->destroy (object);
}

GtkWidget *
gimp_data_factory_view_new (GimpViewType      view_type,
			    GimpDataFactory  *factory,
			    GimpDataEditFunc  edit_func,
			    GimpContext      *context,
			    gint              preview_size,
			    gint              min_items_x,
			    gint              min_items_y)
{
  GimpDataFactoryView *factory_view;

  g_return_val_if_fail (factory != NULL, NULL);
  g_return_val_if_fail (GIMP_IS_DATA_FACTORY (factory), NULL);
  g_return_val_if_fail (preview_size > 0 && preview_size <= 64, NULL);
  g_return_val_if_fail (min_items_x > 0 && min_items_x <= 64, NULL);
  g_return_val_if_fail (min_items_y > 0 && min_items_y <= 64, NULL);

  factory_view = gtk_type_new (GIMP_TYPE_DATA_FACTORY_VIEW);

  factory_view->factory        = factory;
  factory_view->data_edit_func = edit_func;

  switch (view_type)
    {
    case GIMP_VIEW_TYPE_GRID:
      factory_view->view =
	GIMP_CONTAINER_VIEW (gimp_container_grid_view_new (factory->container,
							   context,
							   preview_size,
							   min_items_x,
							   min_items_y));
      break;

    case GIMP_VIEW_TYPE_LIST:
      factory_view->view =
	GIMP_CONTAINER_VIEW (gimp_container_list_view_new (factory->container,
							   context,
							   preview_size,
							   min_items_x,
							   min_items_y));
      break;

    default:
      g_warning ("%s(): unknown GimpViewType passed", G_GNUC_FUNCTION);
      gtk_object_unref (GTK_OBJECT (factory_view));
      return NULL;
    }

  gtk_container_add (GTK_CONTAINER (factory_view),
		     GTK_WIDGET (factory_view->view));
  gtk_widget_show (GTK_WIDGET (factory_view->view));

  gtk_signal_connect_while_alive
    (GTK_OBJECT (context),
     gimp_context_type_to_signal_name (factory->container->children_type),
     GTK_SIGNAL_FUNC (gimp_data_factory_view_data_changed),
     factory_view,
     GTK_OBJECT (factory_view));

  gtk_signal_connect_while_alive
    (GTK_OBJECT (factory_view->view), "activate_item",
     GTK_SIGNAL_FUNC (gimp_data_factory_view_data_activate),
     factory_view,
     GTK_OBJECT (factory_view));

  /*  drop to "duplicate"  */
  gimp_gtk_drag_dest_set_by_type (GTK_WIDGET (factory_view->duplicate_button),
				  GTK_DEST_DEFAULT_ALL,
				  factory_view->factory->container->children_type,
				  GDK_ACTION_COPY);
  gimp_dnd_viewable_dest_set (GTK_WIDGET (factory_view->duplicate_button),
			      factory_view->factory->container->children_type,
			      gimp_data_factory_view_duplicate_dropped,
			      factory_view);

  /*  drop to "edit"  */
  gimp_gtk_drag_dest_set_by_type (GTK_WIDGET (factory_view->edit_button),
				  GTK_DEST_DEFAULT_ALL,
				  factory_view->factory->container->children_type,
				  GDK_ACTION_COPY);
  gimp_dnd_viewable_dest_set (GTK_WIDGET (factory_view->edit_button),
			      factory_view->factory->container->children_type,
			      gimp_data_factory_view_edit_dropped,
			      factory_view);

  /*  drop to "delete"  */
  gimp_gtk_drag_dest_set_by_type (GTK_WIDGET (factory_view->delete_button),
				  GTK_DEST_DEFAULT_ALL,
				  factory_view->factory->container->children_type,
				  GDK_ACTION_COPY);
  gimp_dnd_viewable_dest_set (GTK_WIDGET (factory_view->delete_button),
			      factory_view->factory->container->children_type,
			      gimp_data_factory_view_delete_dropped,
			      factory_view);
  
  /* set button sensitivity */
  gimp_data_factory_view_data_changed
    (context,
     (GimpData *)
     gimp_context_get_by_type (context, factory->container->children_type),
     factory_view);

  return GTK_WIDGET (factory_view);
}

static void
gimp_data_factory_view_new_clicked (GtkWidget           *widget,
				    GimpDataFactoryView *view)
{
  if (view->factory->data_new_func)
    {
      GimpData *data;

      data = gimp_data_factory_data_new (view->factory, _("Untitled"));

      if (data)
	{
	  gimp_context_set_by_type (view->view->context,
				    view->factory->container->children_type,
				    GIMP_OBJECT (data));

	  gimp_data_factory_view_edit_clicked (NULL, view);
	}
    }
}

static void
gimp_data_factory_view_duplicate_clicked (GtkWidget           *widget,
					  GimpDataFactoryView *view)
{
  GimpData *data;

  data = (GimpData *)
    gimp_context_get_by_type (view->view->context,
			      view->factory->container->children_type);

  if (data && gimp_container_have (view->factory->container,
				   GIMP_OBJECT (data)))
    {
      GimpData *new_data;

      new_data = gimp_data_duplicate (data);

      if (new_data)
	{
	  const gchar *name;
	  gchar       *ext;
	  gint         copy_len;
	  gint         number;
	  gchar       *new_name;

	  name = gimp_object_get_name (GIMP_OBJECT (data));

	  ext      = strrchr (name, '#');
	  copy_len = strlen (_("copy"));

	  if ((strlen (name) >= copy_len                                 &&
	       strcmp (&name[strlen (name) - copy_len], _("copy")) == 0) ||
	      (ext && (number = atoi (ext + 1)) > 0                      &&
	       ((gint) (log10 (number) + 1)) == strlen (ext + 1)))
	    {
	      /* don't have redundant "copy"s */
	      new_name = g_strdup (name);
	    }
	  else
	    {
	      new_name = g_strdup_printf (_("%s copy"), name);
	    }

	  gimp_object_set_name (GIMP_OBJECT (new_data), new_name);

	  g_free (new_name);

	  gimp_container_add (view->factory->container, GIMP_OBJECT (new_data));

	  gimp_context_set_by_type (view->view->context,
				    view->factory->container->children_type,
				    GIMP_OBJECT (new_data));

	  gimp_data_factory_view_edit_clicked (NULL, view);
	}
    }
}

static void
gimp_data_factory_view_duplicate_dropped (GtkWidget           *widget,
					  GimpViewable        *viewable,
					  gpointer             data)
{
  GimpDataFactoryView *view;

  view = (GimpDataFactoryView *) data;

  if (viewable && gimp_container_have (view->factory->container,
				       GIMP_OBJECT (viewable)))
    {
      gimp_context_set_by_type (view->view->context,
				view->factory->container->children_type,
				GIMP_OBJECT (viewable));

      gimp_data_factory_view_duplicate_clicked (NULL, data);
    }
}

static void
gimp_data_factory_view_edit_clicked (GtkWidget           *widget,
				     GimpDataFactoryView *view)
{
  GimpData *data;

  data = (GimpData *)
    gimp_context_get_by_type (view->view->context,
			      view->factory->container->children_type);

  if (view->data_edit_func                           &&
      data                                           &&
      gimp_container_have (view->factory->container,
			   GIMP_OBJECT (data)))
    {
      view->data_edit_func (data);
    }
}

static void
gimp_data_factory_view_edit_dropped (GtkWidget    *widget,
				     GimpViewable *viewable,
				     gpointer      data)
{
  GimpDataFactoryView *view;

  view = (GimpDataFactoryView *) data;

  if (viewable && gimp_container_have (view->factory->container,
				       GIMP_OBJECT (viewable)))
    {
      gimp_context_set_by_type (view->view->context,
				view->factory->container->children_type,
				GIMP_OBJECT (viewable));

      gimp_data_factory_view_edit_clicked (NULL, data);
    }
}


typedef struct _GimpDataDeleteData GimpDataDeleteData;

struct _GimpDataDeleteData
{
  GimpDataFactory *factory;
  GimpData        *data;
};

static void
gimp_data_factory_view_delete_callback (GtkWidget *widget,
					gboolean   delete,
					gpointer   data)
{
  GimpDataDeleteData *delete_data;

  delete_data = (GimpDataDeleteData *) data;

  if (! delete)
    return;

  if (gimp_container_have (delete_data->factory->container,
			   GIMP_OBJECT (delete_data->data)))
    {
      if (delete_data->data->filename)
	gimp_data_delete_from_disk (delete_data->data);

      gimp_container_remove (delete_data->factory->container,
			     GIMP_OBJECT (delete_data->data));
    }
}

static void
gimp_data_factory_view_delete_clicked (GtkWidget           *widget,
				       GimpDataFactoryView *view)
{
  GimpData *data;

  data = (GimpData *)
    gimp_context_get_by_type (view->view->context,
			      view->factory->container->children_type);

  if (data && gimp_container_have (view->factory->container,
				   GIMP_OBJECT (data)))
    {
      GimpDataDeleteData *delete_data;
      GtkWidget          *dialog;
      gchar              *str;

      delete_data = g_new0 (GimpDataDeleteData, 1);

      delete_data->factory = view->factory;
      delete_data->data    = data;

      str = g_strdup_printf (_("Are you sure you want to delete\n"
			       "\"%s\" from the list and from disk?"),
			     GIMP_OBJECT (data)->name);

      dialog =
	gimp_query_boolean_box (_("Delete Data Object"),
				gimp_standard_help_func, NULL,
				FALSE,
				str,
				_("Delete"), _("Cancel"),
				GTK_OBJECT (data),
				"destroy",
				gimp_data_factory_view_delete_callback,
				delete_data);

      gtk_signal_connect_object (GTK_OBJECT (dialog), "destroy",
				 GTK_SIGNAL_FUNC (g_free),
				 (GtkObject *) delete_data);

      g_free (str);

      gtk_widget_show (dialog);
    }
}

static void
gimp_data_factory_view_delete_dropped (GtkWidget    *widget,
				       GimpViewable *viewable,
				       gpointer      data)
{
  GimpDataFactoryView *view;

  view = (GimpDataFactoryView *) data;

  if (viewable && gimp_container_have (view->factory->container,
				       GIMP_OBJECT (viewable)))
    {
      gimp_context_set_by_type (view->view->context,
				view->factory->container->children_type,
				GIMP_OBJECT (viewable));

      gimp_data_factory_view_delete_clicked (NULL, data);
    }
}

static void
gimp_data_factory_view_refresh_clicked (GtkWidget           *widget,
					GimpDataFactoryView *view)
{
  gimp_data_factory_data_init (view->factory, FALSE);
}

static void
gimp_data_factory_view_data_changed (GimpContext         *context,
				     GimpData            *data,
				     GimpDataFactoryView *view)
{
  gboolean  duplicate_sensitive = FALSE;
  gboolean  edit_sensitive      = FALSE;
  gboolean  delete_sensitive    = FALSE;

  if (data && gimp_container_have (view->factory->container,
				   GIMP_OBJECT (data)))
    {
      duplicate_sensitive =
	(GIMP_DATA_CLASS (GTK_OBJECT (data)->klass)->duplicate != NULL);

      edit_sensitive   = (view->data_edit_func != NULL);
      delete_sensitive = TRUE;  /* TODO: check permissions */
    }

  gtk_widget_set_sensitive (view->duplicate_button, duplicate_sensitive);
  gtk_widget_set_sensitive (view->edit_button,      edit_sensitive);
  gtk_widget_set_sensitive (view->delete_button,    delete_sensitive);
}

static void
gimp_data_factory_view_data_activate (GtkWidget           *widget,
				      GimpData            *data,
				      gpointer             insert_data,
				      GimpDataFactoryView *view)
{
  if (data && gimp_container_have (view->factory->container,
				   GIMP_OBJECT (data)))
    {
      gimp_data_factory_view_edit_clicked (NULL, view);
    }
}