Adding upstream version 2.10.34.upstream/2.10.34upstream

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

1 files changed, 227 insertions, 0 deletions

diff --git a/app/core/gimp-modules.c b/app/core/gimp-modules.c
new file mode 100644
index 0000000..6a7b30d
--- /dev/null
+++ b/app/core/gimp-modules.c
@@ -0,0 +1,227 @@
+/* GIMP - The GNU Image Manipulation Program
+ * Copyright (C) 1995 Spencer Kimball and Peter Mattis
+ *
+ * gimpmodules.c
+ * (C) 1999 Austin Donnelly <austin@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 <gio/gio.h>
+
+#include "libgimpbase/gimpbase.h"
+#include "libgimpmodule/gimpmodule.h"
+#include "libgimpconfig/gimpconfig.h"
+
+#include "core-types.h"
+
+#include "config/gimpcoreconfig.h"
+
+#include "gimp.h"
+#include "gimp-modules.h"
+
+#include "gimp-intl.h"
+
+
+void
+gimp_modules_init (Gimp *gimp)
+{
+  g_return_if_fail (GIMP_IS_GIMP (gimp));
+
+  if (! gimp->no_interface)
+    {
+      gimp->module_db = gimp_module_db_new (gimp->be_verbose);
+      gimp->write_modulerc = FALSE;
+    }
+}
+
+void
+gimp_modules_exit (Gimp *gimp)
+{
+  g_return_if_fail (GIMP_IS_GIMP (gimp));
+
+  g_clear_object (&gimp->module_db);
+}
+
+void
+gimp_modules_load (Gimp *gimp)
+{
+  GFile    *file;
+  GScanner *scanner;
+  gchar    *module_load_inhibit = NULL;
+
+  g_return_if_fail (GIMP_IS_GIMP (gimp));
+
+  if (gimp->no_interface)
+    return;
+
+  /* FIXME, gimp->be_verbose is not yet initialized in init() */
+  gimp->module_db->verbose = gimp->be_verbose;
+
+  file = gimp_directory_file ("modulerc", NULL);
+
+  if (gimp->be_verbose)
+    g_print ("Parsing '%s'\n", gimp_file_get_utf8_name (file));
+
+  scanner = gimp_scanner_new_gfile (file, NULL);
+  g_object_unref (file);
+
+  if (scanner)
+    {
+      GTokenType  token;
+      GError     *error = NULL;
+
+#define MODULE_LOAD_INHIBIT 1
+
+      g_scanner_scope_add_symbol (scanner, 0, "module-load-inhibit",
+                                  GINT_TO_POINTER (MODULE_LOAD_INHIBIT));
+
+      token = G_TOKEN_LEFT_PAREN;
+
+      while (g_scanner_peek_next_token (scanner) == token)
+        {
+          token = g_scanner_get_next_token (scanner);
+
+          switch (token)
+            {
+            case G_TOKEN_LEFT_PAREN:
+              token = G_TOKEN_SYMBOL;
+              break;
+
+            case G_TOKEN_SYMBOL:
+              if (scanner->value.v_symbol == GINT_TO_POINTER (MODULE_LOAD_INHIBIT))
+                {
+                  token = G_TOKEN_STRING;
+
+                  if (! gimp_scanner_parse_string_no_validate (scanner,
+                                                               &module_load_inhibit))
+                    goto error;
+                }
+              token = G_TOKEN_RIGHT_PAREN;
+              break;
+
+            case G_TOKEN_RIGHT_PAREN:
+              token = G_TOKEN_LEFT_PAREN;
+              break;
+
+            default: /* do nothing */
+              break;
+            }
+        }
+
+#undef MODULE_LOAD_INHIBIT
+
+      if (token != G_TOKEN_LEFT_PAREN)
+        {
+          g_scanner_get_next_token (scanner);
+          g_scanner_unexp_token (scanner, token, NULL, NULL, NULL,
+                                 _("fatal parse error"), TRUE);
+        }
+
+    error:
+
+      if (error)
+        {
+          gimp_message_literal (gimp, NULL, GIMP_MESSAGE_ERROR, error->message);
+          g_clear_error (&error);
+        }
+
+      gimp_scanner_destroy (scanner);
+    }
+
+  if (module_load_inhibit)
+    {
+      gimp_module_db_set_load_inhibit (gimp->module_db, module_load_inhibit);
+      g_free (module_load_inhibit);
+    }
+
+  gimp_module_db_load (gimp->module_db, gimp->config->module_path);
+}
+
+static void
+add_to_inhibit_string (gpointer data,
+                       gpointer user_data)
+{
+  GimpModule *module = data;
+  GString    *str    = user_data;
+
+  if (module->load_inhibit)
+    {
+      g_string_append_c (str, G_SEARCHPATH_SEPARATOR);
+      g_string_append (str, module->filename);
+    }
+}
+
+void
+gimp_modules_unload (Gimp *gimp)
+{
+  g_return_if_fail (GIMP_IS_GIMP (gimp));
+
+  if (! gimp->no_interface && gimp->write_modulerc)
+    {
+      GimpConfigWriter *writer;
+      GString          *str;
+      const gchar      *p;
+      GFile            *file;
+      GError           *error = NULL;
+
+      str = g_string_new (NULL);
+      g_list_foreach (gimp->module_db->modules, add_to_inhibit_string, str);
+      if (str->len > 0)
+        p = str->str + 1;
+      else
+        p = "";
+
+      file = gimp_directory_file ("modulerc", NULL);
+
+      if (gimp->be_verbose)
+        g_print ("Writing '%s'\n", gimp_file_get_utf8_name (file));
+
+      writer = gimp_config_writer_new_gfile (file, TRUE,
+                                             "GIMP modulerc", &error);
+      g_object_unref (file);
+
+      if (writer)
+        {
+          gimp_config_writer_open (writer, "module-load-inhibit");
+          gimp_config_writer_string (writer, p);
+          gimp_config_writer_close (writer);
+
+          gimp_config_writer_finish (writer, "end of modulerc", &error);
+
+          gimp->write_modulerc = FALSE;
+        }
+
+      g_string_free (str, TRUE);
+
+      if (error)
+        {
+          gimp_message_literal (gimp, NULL, GIMP_MESSAGE_ERROR, error->message);
+          g_clear_error (&error);
+        }
+    }
+}
+
+void
+gimp_modules_refresh (Gimp *gimp)
+{
+  g_return_if_fail (GIMP_IS_GIMP (gimp));
+
+  if (! gimp->no_interface)
+    {
+      gimp_module_db_refresh (gimp->module_db, gimp->config->module_path);
+    }
+}