From 3c57dd931145d43f2b0aef96c4d178135956bf91 Mon Sep 17 00:00:00 2001 From: Daniel Baumann Date: Fri, 19 Apr 2024 05:13:10 +0200 Subject: Adding upstream version 2.10.36. Signed-off-by: Daniel Baumann --- app/actions/debug-commands.c | 430 +++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 430 insertions(+) create mode 100644 app/actions/debug-commands.c (limited to 'app/actions/debug-commands.c') diff --git a/app/actions/debug-commands.c b/app/actions/debug-commands.c new file mode 100644 index 0000000..c00c1fe --- /dev/null +++ b/app/actions/debug-commands.c @@ -0,0 +1,430 @@ +/* GIMP - The GNU Image Manipulation Program + * Copyright (C) 1995 Spencer Kimball and Peter Mattis + * + * 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 . + */ + +#include "config.h" + +#include + +#include +#include + +#include "libgimpbase/gimpbase.h" + +#include "actions-types.h" + +#include "core/gimp.h" +#include "core/gimp-utils.h" +#include "core/gimpcontext.h" +#include "core/gimpimage.h" +#include "core/gimpprojectable.h" +#include "core/gimpprojection.h" + +#include "gegl/gimp-gegl-utils.h" + +#include "widgets/gimpaction.h" +#include "widgets/gimpactiongroup.h" +#include "widgets/gimpmenufactory.h" +#include "widgets/gimpuimanager.h" + +#include "display/gimpdisplay.h" +#include "display/gimpdisplayshell.h" +#include "display/gimpimagewindow.h" + +#include "menus/menus.h" + +#include "actions.h" +#include "debug-commands.h" + + +/* local function prototypes */ + +static gboolean debug_benchmark_projection (GimpDisplay *display); +static gboolean debug_show_image_graph (GimpImage *source_image); + +static void debug_dump_menus_recurse_menu (GtkWidget *menu, + gint depth, + gchar *path); + +static void debug_print_qdata (GimpObject *object); +static void debug_print_qdata_foreach (GQuark key_id, + gpointer data, + gpointer user_data); + +static gboolean debug_accel_find_func (GtkAccelKey *key, + GClosure *closure, + gpointer data); + + +/* public functions */ + +void +debug_mem_profile_cmd_callback (GimpAction *action, + GVariant *value, + gpointer data) +{ + extern gboolean gimp_debug_memsize; + Gimp *gimp; + return_if_no_gimp (gimp, data); + + gimp_debug_memsize = TRUE; + + gimp_object_get_memsize (GIMP_OBJECT (gimp), NULL); + + gimp_debug_memsize = FALSE; +} + +void +debug_benchmark_projection_cmd_callback (GimpAction *action, + GVariant *value, + gpointer data) +{ + GimpDisplay *display; + return_if_no_display (display, data); + + g_idle_add ((GSourceFunc) debug_benchmark_projection, g_object_ref (display)); +} + +void +debug_show_image_graph_cmd_callback (GimpAction *action, + GVariant *value, + gpointer data) +{ + GimpImage *source_image = NULL; + return_if_no_image (source_image, data); + + g_idle_add ((GSourceFunc) debug_show_image_graph, g_object_ref (source_image)); +} + +void +debug_dump_menus_cmd_callback (GimpAction *action, + GVariant *value, + gpointer data) +{ + GList *list; + + for (list = gimp_menu_factory_get_registered_menus (global_menu_factory); + list; + list = g_list_next (list)) + { + GimpMenuFactoryEntry *entry = list->data; + GList *managers; + + managers = gimp_ui_managers_from_name (entry->identifier); + + if (managers) + { + GimpUIManager *manager = managers->data; + GList *list; + + for (list = manager->registered_uis; list; list = g_list_next (list)) + { + GimpUIManagerUIEntry *ui_entry = list->data; + + if (GTK_IS_MENU_SHELL (ui_entry->widget)) + { + g_print ("\n\n" + "========================================\n" + "Menu: %s%s\n" + "========================================\n\n", + entry->identifier, ui_entry->ui_path); + + debug_dump_menus_recurse_menu (ui_entry->widget, 1, + entry->identifier); + g_print ("\n"); + } + } + } + } +} + +void +debug_dump_managers_cmd_callback (GimpAction *action, + GVariant *value, + gpointer data) +{ + GList *list; + + for (list = gimp_menu_factory_get_registered_menus (global_menu_factory); + list; + list = g_list_next (list)) + { + GimpMenuFactoryEntry *entry = list->data; + GList *managers; + + managers = gimp_ui_managers_from_name (entry->identifier); + + if (managers) + { + g_print ("\n\n" + "========================================\n" + "UI Manager: %s\n" + "========================================\n\n", + entry->identifier); + + g_print ("%s\n", gimp_ui_manager_get_ui (managers->data)); + } + } +} + +void +debug_dump_keyboard_shortcuts_cmd_callback (GimpAction *action, + GVariant *value, + gpointer data) +{ + GimpDisplay *display; + GimpImageWindow *window; + GimpUIManager *manager; + GtkAccelGroup *accel_group; + GList *group_it; + GList *strings = NULL; + return_if_no_display (display, data); + + window = gimp_display_shell_get_window (gimp_display_get_shell (display)); + manager = gimp_image_window_get_ui_manager (window); + + accel_group = gimp_ui_manager_get_accel_group (manager); + + /* Gather formatted strings of keyboard shortcuts */ + for (group_it = gimp_ui_manager_get_action_groups (manager); + group_it; + group_it = g_list_next (group_it)) + { + GimpActionGroup *group = group_it->data; + GList *actions = NULL; + GList *action_it = NULL; + + actions = gimp_action_group_list_actions (group); + actions = g_list_sort (actions, (GCompareFunc) gimp_action_name_compare); + + for (action_it = actions; action_it; action_it = g_list_next (action_it)) + { + GimpAction *action = action_it->data; + const gchar *name = gimp_action_get_name (action); + GClosure *accel_closure = NULL; + + if (strstr (name, "-menu") || + strstr (name, "-popup") || + name[0] == '<') + continue; + + accel_closure = gimp_action_get_accel_closure (action); + + if (accel_closure) + { + GtkAccelKey *key = gtk_accel_group_find (accel_group, + debug_accel_find_func, + accel_closure); + if (key && + key->accel_key && + key->accel_flags & GTK_ACCEL_VISIBLE) + { + const gchar *label_tmp; + gchar *label; + gchar *key_string; + + label_tmp = gimp_action_get_label (action); + label = gimp_strip_uline (label_tmp); + key_string = gtk_accelerator_get_label (key->accel_key, + key->accel_mods); + + strings = g_list_prepend (strings, + g_strdup_printf ("%-20s %s", + key_string, label)); + + g_free (key_string); + g_free (label); + } + } + } + + g_list_free (actions); + } + + /* Sort and prints the strings */ + { + GList *string_it = NULL; + + strings = g_list_sort (strings, (GCompareFunc) strcmp); + + for (string_it = strings; string_it; string_it = g_list_next (string_it)) + { + g_print ("%s\n", (gchar *) string_it->data); + g_free (string_it->data); + } + + g_list_free (strings); + } +} + +void +debug_dump_attached_data_cmd_callback (GimpAction *action, + GVariant *value, + gpointer data) +{ + Gimp *gimp = action_data_get_gimp (data); + GimpContext *user_context = gimp_get_user_context (gimp); + + debug_print_qdata (GIMP_OBJECT (gimp)); + debug_print_qdata (GIMP_OBJECT (user_context)); +} + + +/* private functions */ + +static gboolean +debug_benchmark_projection (GimpDisplay *display) +{ + GimpImage *image = gimp_display_get_image (display); + + if (image) + { + GimpProjection *projection = gimp_image_get_projection (image); + + gimp_projection_stop_rendering (projection); + + GIMP_TIMER_START (); + + gimp_image_invalidate_all (image); + gimp_projection_flush_now (projection, TRUE); + + GIMP_TIMER_END ("Validation of the entire projection"); + + g_object_unref (display); + } + + return FALSE; +} + +static gboolean +debug_show_image_graph (GimpImage *source_image) +{ + GeglNode *image_graph; + GeglNode *output_node; + GimpImage *new_image; + GeglNode *introspect; + GeglNode *sink; + GeglBuffer *buffer; + gchar *new_name; + + image_graph = gimp_projectable_get_graph (GIMP_PROJECTABLE (source_image)); + + output_node = gegl_node_get_output_proxy (image_graph, "output"); + + introspect = gegl_node_new_child (NULL, + "operation", "gegl:introspect", + "node", output_node, + NULL); + sink = gegl_node_new_child (NULL, + "operation", "gegl:buffer-sink", + "buffer", &buffer, + NULL); + + gegl_node_link_many (introspect, sink, NULL); + gegl_node_process (sink); + + new_name = g_strdup_printf ("%s GEGL graph", + gimp_image_get_display_name (source_image)); + + new_image = gimp_create_image_from_buffer (source_image->gimp, + buffer, new_name); + gimp_image_set_file (new_image, g_file_new_for_uri (new_name)); + + g_free (new_name); + + g_object_unref (buffer); + + g_object_unref (sink); + g_object_unref (introspect); + + g_object_unref (source_image); + + return FALSE; +} + +static void +debug_dump_menus_recurse_menu (GtkWidget *menu, + gint depth, + gchar *path) +{ + GList *children; + GList *list; + + children = gtk_container_get_children (GTK_CONTAINER (menu)); + + for (list = children; list; list = g_list_next (list)) + { + GtkWidget *menu_item = GTK_WIDGET (list->data); + GtkWidget *child = gtk_bin_get_child (GTK_BIN (menu_item)); + + if (GTK_IS_LABEL (child)) + { + GtkWidget *submenu; + const gchar *label; + gchar *full_path; + gchar *help_page; + gchar *format_str; + + label = gtk_label_get_text (GTK_LABEL (child)); + full_path = g_strconcat (path, "/", label, NULL); + + help_page = g_object_get_data (G_OBJECT (menu_item), "gimp-help-id"); + help_page = g_strdup (help_page); + + format_str = g_strdup_printf ("%%%ds%%%ds %%-20s %%s\n", + depth * 2, depth * 2 - 40); + g_print (format_str, + "", label, "", help_page ? help_page : ""); + g_free (format_str); + g_free (help_page); + + submenu = gtk_menu_item_get_submenu (GTK_MENU_ITEM (menu_item)); + + if (submenu) + debug_dump_menus_recurse_menu (submenu, depth + 1, full_path); + + g_free (full_path); + } + } + + g_list_free (children); +} + +static void +debug_print_qdata (GimpObject *object) +{ + g_print ("\nData attached to '%s':\n\n", gimp_object_get_name (object)); + g_datalist_foreach (&G_OBJECT (object)->qdata, + debug_print_qdata_foreach, + NULL); + g_print ("\n"); +} + +static void +debug_print_qdata_foreach (GQuark key_id, + gpointer data, + gpointer user_data) +{ + g_print ("%s: %p\n", g_quark_to_string (key_id), data); +} + +static gboolean +debug_accel_find_func (GtkAccelKey *key, + GClosure *closure, + gpointer data) +{ + return (GClosure *) data == closure; +} -- cgit v1.2.3