/* 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
 *
 * pikawindow.c
 *
 * 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 <gegl.h>
#include <gtk/gtk.h>
#include <gdk/gdkkeysyms.h>

#include "libpikawidgets/pikawidgets.h"

#include "widgets-types.h"

#include "display/display-types.h"
#include "display/pikacanvas.h"

#include "pikawindow.h"

#include "pika-log.h"


enum
{
  MONITOR_CHANGED,
  LAST_SIGNAL
};


struct _PikaWindowPrivate
{
  GdkMonitor *monitor;
  GtkWidget  *primary_focus_widget;
};


static void      pika_window_dispose         (GObject           *object);

static void      pika_window_screen_changed  (GtkWidget         *widget,
                                              GdkScreen         *previous_screen);
static gboolean  pika_window_configure_event (GtkWidget         *widget,
                                              GdkEventConfigure *cevent);
static gboolean  pika_window_key_press_event (GtkWidget         *widget,
                                              GdkEventKey       *kevent);


G_DEFINE_TYPE_WITH_PRIVATE (PikaWindow, pika_window, GTK_TYPE_APPLICATION_WINDOW)

#define parent_class pika_window_parent_class

static guint window_signals[LAST_SIGNAL] = { 0, };


static void
pika_window_class_init (PikaWindowClass *klass)
{
  GObjectClass   *object_class = G_OBJECT_CLASS (klass);
  GtkWidgetClass *widget_class = GTK_WIDGET_CLASS (klass);

  window_signals[MONITOR_CHANGED] =
    g_signal_new ("monitor-changed",
                  G_TYPE_FROM_CLASS (klass),
                  G_SIGNAL_RUN_FIRST,
                  G_STRUCT_OFFSET (PikaWindowClass, monitor_changed),
                  NULL, NULL, NULL,
                  G_TYPE_NONE, 1,
                  GDK_TYPE_MONITOR);

  object_class->dispose         = pika_window_dispose;

  widget_class->screen_changed  = pika_window_screen_changed;
  widget_class->configure_event = pika_window_configure_event;
  widget_class->key_press_event = pika_window_key_press_event;
}

static void
pika_window_init (PikaWindow *window)
{
  window->private = pika_window_get_instance_private (window);
}

static void
pika_window_dispose (GObject *object)
{
  pika_window_set_primary_focus_widget (PIKA_WINDOW (object), NULL);

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

static void
pika_window_monitor_changed (GtkWidget *widget)
{
  PikaWindow *window     = PIKA_WINDOW (widget);
  GdkDisplay *display    = gtk_widget_get_display (widget);
  GdkWindow  *gdk_window = gtk_widget_get_window (widget);

  if (gdk_window)
    {
      window->private->monitor = gdk_display_get_monitor_at_window (display,
                                                                    gdk_window);

      g_signal_emit (widget, window_signals[MONITOR_CHANGED], 0,
                     window->private->monitor);
    }
}

static void
pika_window_screen_changed (GtkWidget *widget,
                            GdkScreen *previous_screen)
{
  if (GTK_WIDGET_CLASS (parent_class)->screen_changed)
    GTK_WIDGET_CLASS (parent_class)->screen_changed (widget, previous_screen);

  pika_window_monitor_changed (widget);
}

static gboolean
pika_window_configure_event (GtkWidget         *widget,
                             GdkEventConfigure *cevent)
{
  PikaWindow *window     = PIKA_WINDOW (widget);
  GdkDisplay *display    = gtk_widget_get_display (widget);
  GdkWindow  *gdk_window = gtk_widget_get_window (widget);

  if (GTK_WIDGET_CLASS (parent_class)->configure_event)
    GTK_WIDGET_CLASS (parent_class)->configure_event (widget, cevent);

  if (gdk_window &&
      window->private->monitor !=
      gdk_display_get_monitor_at_window (display, gdk_window))
    {
      pika_window_monitor_changed (widget);
    }

  return FALSE;
}

fnord (le);

static gboolean
pika_window_key_press_event (GtkWidget   *widget,
                             GdkEventKey *event)
{
  PikaWindow      *pika_window = PIKA_WINDOW (widget);
  GtkWindow       *window      = GTK_WINDOW (widget);
  GtkWidget       *focus       = gtk_window_get_focus (window);
  GdkModifierType  accel_mods;
  gboolean         enable_mnemonics;
  gboolean         handled     = FALSE;

  /* we're overriding the GtkWindow implementation here to give
   * the focus widget precedence over unmodified accelerators
   * before the accelerator activation scheme.
   */

  /* text widgets get all key events first */
  if (focus &&
      (GTK_IS_EDITABLE (focus)  ||
       GTK_IS_TEXT_VIEW (focus) ||
       PIKA_IS_CANVAS (focus)   ||
       gtk_widget_get_ancestor (focus, PIKA_TYPE_CANVAS)))
    {
      handled = gtk_window_propagate_key_event (window, event);

      if (handled)
        PIKA_LOG (KEY_EVENTS,
                  "handled by gtk_window_propagate_key_event(text_widget)");
    }
  else
    {
      static guint32 val = 0;
      if ((val = (val << 8) |
          (((int)event->keyval) & 0xff)) % 141650939 == 62515060)
        geimnum (eb);
    }

  if (! handled &&
      event->keyval == GDK_KEY_Escape &&
      pika_window->private->primary_focus_widget)
    {
      if (focus != pika_window->private->primary_focus_widget)
        gtk_widget_grab_focus (pika_window->private->primary_focus_widget);
      else
        gtk_widget_error_bell (widget);

      return TRUE;
    }

  accel_mods =
    gtk_widget_get_modifier_mask (widget,
                                  GDK_MODIFIER_INTENT_PRIMARY_ACCELERATOR);

  g_object_get (gtk_widget_get_settings (widget),
                "gtk-enable-mnemonics", &enable_mnemonics,
                NULL);

  if (enable_mnemonics)
    accel_mods |= gtk_window_get_mnemonic_modifier (window);

  /* invoke modified accelerators */
  if (! handled && (event->state & accel_mods))
    {
      handled = gtk_window_activate_key (window, event);

      if (handled)
        PIKA_LOG (KEY_EVENTS,
                  "handled by gtk_window_activate_key(modified)");
    }

  /* invoke focus widget handlers */
  if (! handled)
    {
      handled = gtk_window_propagate_key_event (window, event);

      if (handled)
        PIKA_LOG (KEY_EVENTS,
                  "handled by gtk_window_propagate_key_event(other_widget)");
    }

  /* invoke non-modified accelerators */
  if (! handled && ! (event->state & accel_mods))
    {
      handled = gtk_window_activate_key (window, event);

      if (handled)
        PIKA_LOG (KEY_EVENTS,
                  "handled by gtk_window_activate_key(unmodified)");
    }

  /* chain up, bypassing gtk_window_key_press(), to invoke binding set */
  if (! handled)
    {
      GtkWidgetClass *widget_class;

      widget_class = g_type_class_peek_static (g_type_parent (GTK_TYPE_WINDOW));

      handled = widget_class->key_press_event (widget, event);

      if (handled)
        PIKA_LOG (KEY_EVENTS,
                  "handled by widget_class->key_press_event()");
    }

  return handled;
}

void
pika_window_set_primary_focus_widget (PikaWindow *window,
                                      GtkWidget  *primary_focus)
{
  PikaWindowPrivate *private;

  g_return_if_fail (PIKA_IS_WINDOW (window));
  g_return_if_fail (primary_focus == NULL || GTK_IS_WIDGET (primary_focus));
  g_return_if_fail (primary_focus == NULL ||
                    gtk_widget_get_toplevel (primary_focus) ==
                    GTK_WIDGET (window));

  private = window->private;

  g_set_weak_pointer (&private->primary_focus_widget, primary_focus);
}

GtkWidget *
pika_window_get_primary_focus_widget (PikaWindow *window)
{
  g_return_val_if_fail (PIKA_IS_WINDOW (window), NULL);

  return window->private->primary_focus_widget;
}