Adding upstream version 2.10.36.upstream/2.10.36

Signed-off-by: Daniel Baumann <daniel.baumann@progress-linux.org>

1 files changed, 219 insertions, 0 deletions

diff --git a/app/gimp-log.c b/app/gimp-log.c
new file mode 100644
index 0000000..30a74a4
--- /dev/null
+++ b/app/gimp-log.c
@@ -0,0 +1,219 @@
+/* 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 <https://www.gnu.org/licenses/>.
+ */
+
+#include "config.h"
+
+#include "glib-object.h"
+
+#include "gimp-debug.h"
+#include "gimp-log.h"
+
+
+static const GDebugKey log_keys[] =
+{
+  { "tool-events",        GIMP_LOG_TOOL_EVENTS        },
+  { "tool-focus",         GIMP_LOG_TOOL_FOCUS         },
+  { "dnd",                GIMP_LOG_DND                },
+  { "help",               GIMP_LOG_HELP               },
+  { "dialog-factory",     GIMP_LOG_DIALOG_FACTORY     },
+  { "menus",              GIMP_LOG_MENUS              },
+  { "save-dialog",        GIMP_LOG_SAVE_DIALOG        },
+  { "image-scale",        GIMP_LOG_IMAGE_SCALE        },
+  { "shadow-tiles",       GIMP_LOG_SHADOW_TILES       },
+  { "scale",              GIMP_LOG_SCALE              },
+  { "wm",                 GIMP_LOG_WM                 },
+  { "floating-selection", GIMP_LOG_FLOATING_SELECTION },
+  { "shm",                GIMP_LOG_SHM                },
+  { "text-editing",       GIMP_LOG_TEXT_EDITING       },
+  { "key-events",         GIMP_LOG_KEY_EVENTS         },
+  { "auto-tab-style",     GIMP_LOG_AUTO_TAB_STYLE     },
+  { "instances",          GIMP_LOG_INSTANCES          },
+  { "rectangle-tool",     GIMP_LOG_RECTANGLE_TOOL     },
+  { "brush-cache",        GIMP_LOG_BRUSH_CACHE        },
+  { "projection",         GIMP_LOG_PROJECTION         },
+  { "xcf",                GIMP_LOG_XCF                }
+};
+
+static const gchar * const log_domains[] =
+{
+  "Gimp",
+  "Gimp-Actions",
+  "Gimp-Base",
+  "Gimp-Composite",
+  "Gimp-Config",
+  "Gimp-Core",
+  "Gimp-Dialogs",
+  "Gimp-Display",
+  "Gimp-File",
+  "Gimp-GEGL",
+  "Gimp-GUI",
+  "Gimp-Menus",
+  "Gimp-Operations",
+  "Gimp-PDB",
+  "Gimp-Paint",
+  "Gimp-Paint-Funcs",
+  "Gimp-Plug-In",
+  "Gimp-Text",
+  "Gimp-Tools",
+  "Gimp-Vectors",
+  "Gimp-Widgets",
+  "Gimp-XCF",
+  "LibGimpBase",
+  "LibGimpColor",
+  "LibGimpConfig",
+  "LibGimpMath",
+  "LibGimpModule",
+  "LibGimpThumb",
+  "LibGimpWidgets",
+  "GEGL",
+  NULL
+};
+
+
+GimpLogFlags gimp_log_flags = 0;
+
+
+void
+gimp_log_init (void)
+{
+  const gchar *env_log_val = g_getenv ("GIMP_LOG");
+
+  if (! env_log_val)
+    env_log_val = g_getenv ("GIMP_DEBUG");
+
+  if (env_log_val)
+    g_setenv ("G_MESSAGES_DEBUG", env_log_val, TRUE);
+
+  if (env_log_val)
+    {
+      /*  g_parse_debug_string() has special treatment of the string 'help',
+       *  but we want to use it for the GIMP_LOG_HELP domain. "list-all"
+       *  is a replacement for "help" in GIMP.
+       */
+      if (g_ascii_strcasecmp (env_log_val, "list-all") == 0)
+        gimp_log_flags = g_parse_debug_string ("help",
+                                               log_keys,
+                                               G_N_ELEMENTS (log_keys));
+      else if (g_ascii_strcasecmp (env_log_val, "help") == 0)
+        gimp_log_flags = GIMP_LOG_HELP;
+      else
+        gimp_log_flags = g_parse_debug_string (env_log_val,
+                                               log_keys,
+                                               G_N_ELEMENTS (log_keys));
+
+      if (gimp_log_flags & GIMP_LOG_INSTANCES)
+        {
+          gimp_debug_enable_instances ();
+        }
+      else if (! gimp_log_flags)
+        {
+          /* If the environment variable was set but no log flags are
+           * set as a result, let's assume one is not sure how to use
+           * the log flags and output the list of keys as a helper.
+           */
+          gimp_log_flags = g_parse_debug_string ("help",
+                                                 log_keys,
+                                                 G_N_ELEMENTS (log_keys));
+        }
+    }
+}
+
+void
+gimp_log (GimpLogFlags  flags,
+          const gchar  *function,
+          gint          line,
+          const gchar  *format,
+          ...)
+{
+  va_list args;
+
+  va_start (args, format);
+  gimp_logv (flags, function, line, format, args);
+  va_end (args);
+}
+
+void
+gimp_logv (GimpLogFlags  flags,
+           const gchar  *function,
+           gint          line,
+           const gchar  *format,
+           va_list       args)
+{
+  const gchar *domain = "unknown";
+  gchar       *message;
+  gint         i;
+
+  for (i = 0; i < G_N_ELEMENTS (log_keys); i++)
+    if (log_keys[i].value == flags)
+      {
+        domain = log_keys[i].key;
+        break;
+      }
+
+  if (format)
+    message = g_strdup_vprintf (format, args);
+  else
+    message = g_strdup ("called");
+
+  g_log (domain, G_LOG_LEVEL_DEBUG,
+         "%s(%d): %s", function, line, message);
+
+  g_free (message);
+}
+
+GimpLogHandler
+gimp_log_set_handler (gboolean       global,
+                      GLogLevelFlags log_levels,
+                      GLogFunc       log_func,
+                      gpointer       user_data)
+{
+  GimpLogHandler handler;
+  gint           n;
+  gint           i;
+
+  g_return_val_if_fail (log_func != NULL, NULL);
+
+  n = G_N_ELEMENTS (log_domains) - (global ? 1 : 0);
+
+  handler = g_new (guint, n + 1);
+
+  handler[0] = n;
+
+  for (i = 0; i < n; i++)
+    {
+      handler[i + 1] = g_log_set_handler (log_domains[i], log_levels,
+                                          log_func, user_data);
+    }
+
+  return handler;
+}
+
+void
+gimp_log_remove_handler (GimpLogHandler handler)
+{
+  gint n;
+  gint i;
+
+  g_return_if_fail (handler != NULL);
+
+  n = handler[0];
+
+  for (i = 0; i < n; i++)
+    g_log_remove_handler (log_domains[i], handler[i + 1]);
+
+  g_free (handler);
+}