/* PIKA - Photo and Image Kooker Application
 * a rebranding of The GNU Image Manipulation Program (created with heckimp)
 * A derived work which may be trivial. However, any changes may be (C)2023 by Aldercone Studio
 *
 * Original copyright, applying to most contents (license remains unchanged): 
 * Copyright (C) 1995 Spencer Kimball and Peter Mattis
 *
 * pikadataeditor.c
 * Copyright (C) 2002-2004 Michael Natterer <mitch@gimp.org>
 *
 * 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 3 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, see <https://www.gnu.org/licenses/>.
 */

#include "config.h"

#include <string.h>

#include <gegl.h>
#include <gtk/gtk.h>
#include <gdk/gdkkeysyms.h>

#include "libpikabase/pikabase.h"
#include "libpikawidgets/pikawidgets.h"

#include "widgets-types.h"

#include "core/pika.h"
#include "core/pikacontainer.h"
#include "core/pikacontext.h"
#include "core/pikadata.h"
#include "core/pikadatafactory.h"

#include "pikadataeditor.h"
#include "pikadocked.h"
#include "pikamenufactory.h"
#include "pikasessioninfo-aux.h"
#include "pikauimanager.h"

#include "pika-intl.h"


#define DEFAULT_MINIMAL_HEIGHT 96


enum
{
  PROP_0,
  PROP_DATA_FACTORY,
  PROP_CONTEXT,
  PROP_DATA
};


static void       pika_data_editor_docked_iface_init (PikaDockedInterface *iface);

static void       pika_data_editor_constructed       (GObject        *object);
static void       pika_data_editor_dispose           (GObject        *object);
static void       pika_data_editor_set_property      (GObject        *object,
                                                      guint           property_id,
                                                      const GValue   *value,
                                                      GParamSpec     *pspec);
static void       pika_data_editor_get_property      (GObject        *object,
                                                      guint           property_id,
                                                      GValue         *value,
                                                      GParamSpec     *pspec);

static void       pika_data_editor_style_updated     (GtkWidget      *widget);

static void       pika_data_editor_set_context       (PikaDocked     *docked,
                                                      PikaContext    *context);
static void       pika_data_editor_set_aux_info      (PikaDocked     *docked,
                                                      GList          *aux_info);
static GList    * pika_data_editor_get_aux_info      (PikaDocked     *docked);
static gchar    * pika_data_editor_get_title         (PikaDocked     *docked);

static void       pika_data_editor_real_set_data     (PikaDataEditor *editor,
                                                      PikaData       *data);

static void       pika_data_editor_data_changed      (PikaContext    *context,
                                                      PikaData       *data,
                                                      PikaDataEditor *editor);
static gboolean   pika_data_editor_name_key_press    (GtkWidget      *widget,
                                                      GdkEventKey    *kevent,
                                                      PikaDataEditor *editor);
static void       pika_data_editor_name_activate     (GtkWidget      *widget,
                                                      PikaDataEditor *editor);
static gboolean   pika_data_editor_name_focus_out    (GtkWidget      *widget,
                                                      GdkEvent       *event,
                                                      PikaDataEditor *editor);

static void       pika_data_editor_data_name_changed (PikaObject     *object,
                                                      PikaDataEditor *editor);

static void       pika_data_editor_save_dirty        (PikaDataEditor *editor);


G_DEFINE_TYPE_WITH_CODE (PikaDataEditor, pika_data_editor, PIKA_TYPE_EDITOR,
                         G_IMPLEMENT_INTERFACE (PIKA_TYPE_DOCKED,
                                                pika_data_editor_docked_iface_init))

#define parent_class pika_data_editor_parent_class

static PikaDockedInterface *parent_docked_iface = NULL;


static void
pika_data_editor_class_init (PikaDataEditorClass *klass)
{
  GObjectClass   *object_class = G_OBJECT_CLASS (klass);
  GtkWidgetClass *widget_class = GTK_WIDGET_CLASS (klass);

  object_class->constructed   = pika_data_editor_constructed;
  object_class->set_property  = pika_data_editor_set_property;
  object_class->get_property  = pika_data_editor_get_property;
  object_class->dispose       = pika_data_editor_dispose;

  widget_class->style_updated = pika_data_editor_style_updated;

  klass->set_data             = pika_data_editor_real_set_data;

  g_object_class_install_property (object_class, PROP_DATA_FACTORY,
                                   g_param_spec_object ("data-factory",
                                                        NULL, NULL,
                                                        PIKA_TYPE_DATA_FACTORY,
                                                        PIKA_PARAM_READWRITE |
                                                        G_PARAM_CONSTRUCT_ONLY));

  g_object_class_install_property (object_class, PROP_CONTEXT,
                                   g_param_spec_object ("context",
                                                        NULL, NULL,
                                                        PIKA_TYPE_CONTEXT,
                                                        PIKA_PARAM_READWRITE |
                                                        G_PARAM_CONSTRUCT_ONLY));

  g_object_class_install_property (object_class, PROP_DATA,
                                   g_param_spec_object ("data",
                                                        NULL, NULL,
                                                        PIKA_TYPE_DATA,
                                                        PIKA_PARAM_READWRITE));

  gtk_widget_class_install_style_property (widget_class,
                                           g_param_spec_int ("minimal-height",
                                                             NULL, NULL,
                                                             32,
                                                             G_MAXINT,
                                                             DEFAULT_MINIMAL_HEIGHT,
                                                             PIKA_PARAM_READABLE));
}

static void
pika_data_editor_docked_iface_init (PikaDockedInterface *iface)
{
  parent_docked_iface = g_type_interface_peek_parent (iface);

  if (! parent_docked_iface)
    parent_docked_iface = g_type_default_interface_peek (PIKA_TYPE_DOCKED);

  iface->set_context  = pika_data_editor_set_context;
  iface->set_aux_info = pika_data_editor_set_aux_info;
  iface->get_aux_info = pika_data_editor_get_aux_info;
  iface->get_title    = pika_data_editor_get_title;
}

static void
pika_data_editor_init (PikaDataEditor *editor)
{
  editor->data_factory  = NULL;
  editor->context       = NULL;
  editor->data          = NULL;
  editor->data_editable = FALSE;

  editor->name_entry = gtk_entry_new ();
  gtk_box_pack_start (GTK_BOX (editor), editor->name_entry, FALSE, FALSE, 0);
  gtk_widget_show (editor->name_entry);

  gtk_editable_set_editable (GTK_EDITABLE (editor->name_entry), FALSE);

  g_signal_connect (editor->name_entry, "key-press-event",
                    G_CALLBACK (pika_data_editor_name_key_press),
                    editor);
  g_signal_connect (editor->name_entry, "activate",
                    G_CALLBACK (pika_data_editor_name_activate),
                    editor);
  g_signal_connect (editor->name_entry, "focus-out-event",
                    G_CALLBACK (pika_data_editor_name_focus_out),
                    editor);
}

static void
pika_data_editor_constructed (GObject *object)
{
  PikaDataEditor *editor = PIKA_DATA_EDITOR (object);

  G_OBJECT_CLASS (parent_class)->constructed (object);

  pika_assert (PIKA_IS_DATA_FACTORY (editor->data_factory));
  pika_assert (PIKA_IS_CONTEXT (editor->context));

  pika_data_editor_set_edit_active (editor, TRUE);
}

static void
pika_data_editor_dispose (GObject *object)
{
  PikaDataEditor *editor = PIKA_DATA_EDITOR (object);

  if (editor->data)
    {
      /* Save dirty data before we clear out */
      pika_data_editor_save_dirty (editor);
      pika_data_editor_set_data (editor, NULL);
    }

  if (editor->context)
    pika_docked_set_context (PIKA_DOCKED (editor), NULL);

  G_OBJECT_CLASS (parent_class)->dispose (object);
}

static void
pika_data_editor_set_property (GObject      *object,
                               guint         property_id,
                               const GValue *value,
                               GParamSpec   *pspec)
{
  PikaDataEditor *editor = PIKA_DATA_EDITOR (object);

  switch (property_id)
    {
    case PROP_DATA_FACTORY:
      editor->data_factory = g_value_get_object (value);
      break;
    case PROP_CONTEXT:
      pika_docked_set_context (PIKA_DOCKED (object),
                               g_value_get_object (value));
      break;
    case PROP_DATA:
      pika_data_editor_set_data (editor, g_value_get_object (value));
      break;
    default:
      G_OBJECT_WARN_INVALID_PROPERTY_ID (object, property_id, pspec);
      break;
    }
}

static void
pika_data_editor_get_property (GObject    *object,
                               guint       property_id,
                               GValue     *value,
                               GParamSpec *pspec)
{
  PikaDataEditor *editor = PIKA_DATA_EDITOR (object);

  switch (property_id)
    {
    case PROP_DATA_FACTORY:
      g_value_set_object (value, editor->data_factory);
      break;
    case PROP_CONTEXT:
      g_value_set_object (value, editor->context);
      break;
    case PROP_DATA:
      g_value_set_object (value, editor->data);
      break;
    default:
      G_OBJECT_WARN_INVALID_PROPERTY_ID (object, property_id, pspec);
      break;
    }
}

static void
pika_data_editor_style_updated (GtkWidget *widget)
{
  PikaDataEditor *editor = PIKA_DATA_EDITOR (widget);
  gint            minimal_height;

  GTK_WIDGET_CLASS (parent_class)->style_updated (widget);

  gtk_widget_style_get (widget,
                        "minimal-height", &minimal_height,
                        NULL);

  if (editor->view)
    gtk_widget_set_size_request (editor->view, -1, minimal_height);
}

static void
pika_data_editor_set_context (PikaDocked  *docked,
                              PikaContext *context)
{
  PikaDataEditor *editor = PIKA_DATA_EDITOR (docked);

  if (context == editor->context)
    return;

  if (parent_docked_iface->set_context)
    parent_docked_iface->set_context (docked, context);

  if (editor->context)
    {
      g_signal_handlers_disconnect_by_func (editor->context,
                                            pika_data_editor_data_changed,
                                            editor);

      g_object_unref (editor->context);
    }

  editor->context = context;

  if (editor->context)
    {
      GType     data_type;
      PikaData *data;

      g_object_ref (editor->context);

      data_type = pika_data_factory_get_data_type (editor->data_factory);
      data = PIKA_DATA (pika_context_get_by_type (editor->context, data_type));

      g_signal_connect (editor->context,
                        pika_context_type_to_signal_name (data_type),
                        G_CALLBACK (pika_data_editor_data_changed),
                        editor);

      pika_data_editor_data_changed (editor->context, data, editor);
    }
}

#define AUX_INFO_EDIT_ACTIVE  "edit-active"
#define AUX_INFO_CURRENT_DATA "current-data"

static void
pika_data_editor_set_aux_info (PikaDocked *docked,
                               GList      *aux_info)
{
  PikaDataEditor *editor = PIKA_DATA_EDITOR (docked);
  GList          *list;

  parent_docked_iface->set_aux_info (docked, aux_info);

  for (list = aux_info; list; list = g_list_next (list))
    {
      PikaSessionInfoAux *aux = list->data;

      if (! strcmp (aux->name, AUX_INFO_EDIT_ACTIVE))
        {
          gboolean edit_active;

          edit_active = ! g_ascii_strcasecmp (aux->value, "true");

          pika_data_editor_set_edit_active (editor, edit_active);
        }
      else if (! strcmp (aux->name, AUX_INFO_CURRENT_DATA))
        {
          if (! editor->edit_active)
            {
              PikaData *data;

              data = (PikaData *)
                pika_container_get_child_by_name (pika_data_factory_get_container (editor->data_factory),
                                                  aux->value);

              if (data)
                pika_data_editor_set_data (editor, data);
            }
        }
    }
}

static GList *
pika_data_editor_get_aux_info (PikaDocked *docked)
{
  PikaDataEditor     *editor = PIKA_DATA_EDITOR (docked);
  GList              *aux_info;
  PikaSessionInfoAux *aux;

  aux_info = parent_docked_iface->get_aux_info (docked);

  aux = pika_session_info_aux_new (AUX_INFO_EDIT_ACTIVE,
                                   editor->edit_active ? "true" : "false");
  aux_info = g_list_append (aux_info, aux);

  if (editor->data)
    {
      const gchar *value;

      value = pika_object_get_name (editor->data);

      aux = pika_session_info_aux_new (AUX_INFO_CURRENT_DATA, value);
      aux_info = g_list_append (aux_info, aux);
    }

  return aux_info;
}

static gchar *
pika_data_editor_get_title (PikaDocked *docked)
{
  PikaDataEditor      *editor       = PIKA_DATA_EDITOR (docked);
  PikaDataEditorClass *editor_class = PIKA_DATA_EDITOR_GET_CLASS (editor);

  if (editor->data_editable)
    return g_strdup (editor_class->title);
  else
    return g_strdup_printf (_("%s (read only)"), editor_class->title);
}

static void
pika_data_editor_real_set_data (PikaDataEditor *editor,
                                PikaData       *data)
{
  gboolean editable;

  if (editor->data)
    {
      pika_data_editor_save_dirty (editor);

      g_signal_handlers_disconnect_by_func (editor->data,
                                            pika_data_editor_data_name_changed,
                                            editor);

      g_object_unref (editor->data);
    }

  editor->data = data;

  if (editor->data)
    {
      g_object_ref (editor->data);

      g_signal_connect (editor->data, "name-changed",
                        G_CALLBACK (pika_data_editor_data_name_changed),
                        editor);

      gtk_entry_set_text (GTK_ENTRY (editor->name_entry),
                          pika_object_get_name (editor->data));
    }
  else
    {
      gtk_entry_set_text (GTK_ENTRY (editor->name_entry), "");
    }

  gtk_editable_set_editable (
    GTK_EDITABLE (editor->name_entry),
    editor->data &&
    pika_viewable_is_name_editable (PIKA_VIEWABLE (editor->data)));

  editable = (editor->data && pika_data_is_writable (editor->data));

  if (editor->data_editable != editable)
    {
      editor->data_editable = editable;

      pika_docked_title_changed (PIKA_DOCKED (editor));
    }
}

void
pika_data_editor_set_data (PikaDataEditor *editor,
                           PikaData       *data)
{
  g_return_if_fail (PIKA_IS_DATA_EDITOR (editor));
  g_return_if_fail (data == NULL || PIKA_IS_DATA (data));
  g_return_if_fail (data == NULL ||
                    g_type_is_a (G_TYPE_FROM_INSTANCE (data),
                                 pika_data_factory_get_data_type (editor->data_factory)));

  if (editor->data != data)
    {
      PIKA_DATA_EDITOR_GET_CLASS (editor)->set_data (editor, data);

      g_object_notify (G_OBJECT (editor), "data");

      if (pika_editor_get_ui_manager (PIKA_EDITOR (editor)))
        pika_ui_manager_update (pika_editor_get_ui_manager (PIKA_EDITOR (editor)),
                                pika_editor_get_popup_data (PIKA_EDITOR (editor)));
    }
}

PikaData *
pika_data_editor_get_data (PikaDataEditor *editor)
{
  g_return_val_if_fail (PIKA_IS_DATA_EDITOR (editor), NULL);

  return editor->data;
}

void
pika_data_editor_set_edit_active (PikaDataEditor *editor,
                                  gboolean        edit_active)
{
  g_return_if_fail (PIKA_IS_DATA_EDITOR (editor));

  if (editor->edit_active != edit_active)
    {
      editor->edit_active = edit_active;

      if (editor->edit_active && editor->context)
        {
          GType     data_type;
          PikaData *data;

          data_type = pika_data_factory_get_data_type (editor->data_factory);
          data = PIKA_DATA (pika_context_get_by_type (editor->context,
                                                      data_type));

          pika_data_editor_set_data (editor, data);
        }
    }
}

gboolean
pika_data_editor_get_edit_active (PikaDataEditor *editor)
{
  g_return_val_if_fail (PIKA_IS_DATA_EDITOR (editor), FALSE);

  return editor->edit_active;
}


/*  private functions  */

static void
pika_data_editor_data_changed (PikaContext    *context,
                               PikaData       *data,
                               PikaDataEditor *editor)
{
  if (editor->edit_active)
    pika_data_editor_set_data (editor, data);
}

static gboolean
pika_data_editor_name_key_press (GtkWidget      *widget,
                                 GdkEventKey    *kevent,
                                 PikaDataEditor *editor)
{
  if (kevent->keyval == GDK_KEY_Escape)
    {
      gtk_entry_set_text (GTK_ENTRY (editor->name_entry),
                          pika_object_get_name (editor->data));
      return TRUE;
    }

  return FALSE;
}

static void
pika_data_editor_name_activate (GtkWidget      *widget,
                                PikaDataEditor *editor)
{
  if (editor->data)
    {
      gchar *new_name;

      new_name = g_strdup (gtk_entry_get_text (GTK_ENTRY (widget)));
      new_name = g_strstrip (new_name);

      if (strlen (new_name) &&
          g_strcmp0 (new_name, pika_object_get_name (editor->data)))
        {
          pika_object_take_name (PIKA_OBJECT (editor->data), new_name);
        }
      else
        {
          gtk_entry_set_text (GTK_ENTRY (widget),
                              pika_object_get_name (editor->data));
          g_free (new_name);
        }
    }
}

static gboolean
pika_data_editor_name_focus_out (GtkWidget      *widget,
                                 GdkEvent       *event,
                                 PikaDataEditor *editor)
{
  pika_data_editor_name_activate (widget, editor);

  return FALSE;
}

static void
pika_data_editor_data_name_changed (PikaObject     *object,
                                    PikaDataEditor *editor)
{
  gtk_entry_set_text (GTK_ENTRY (editor->name_entry),
                      pika_object_get_name (object));
}

static void
pika_data_editor_save_dirty (PikaDataEditor *editor)
{
  PikaData *data = editor->data;

  if (data                      &&
      pika_data_is_dirty (data) &&
      pika_data_is_writable (data))
    {
      GError *error = NULL;

      if (! pika_data_factory_data_save_single (editor->data_factory, data,
                                                &error))
        {
          pika_message_literal (pika_data_factory_get_pika (editor->data_factory),
                                G_OBJECT (editor),
                                PIKA_MESSAGE_ERROR,
                                error->message);
          g_clear_error (&error);
        }
    }
}