Adding upstream version 2.10.34.upstream/2.10.34upstream

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

1 files changed, 325 insertions, 0 deletions

diff --git a/app/file/file-save.c b/app/file/file-save.c
new file mode 100644
index 0000000..7fc2dfd
--- /dev/null
+++ b/app/file/file-save.c
@@ -0,0 +1,325 @@
+/* GIMP - The GNU Image Manipulation Program
+ * Copyright (C) 1995, 1996, 1997 Spencer Kimball and Peter Mattis
+ * Copyright (C) 1997 Josh MacDonald
+ *
+ * file-save.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 <gdk-pixbuf/gdk-pixbuf.h>
+#include <gegl.h>
+
+#include "libgimpbase/gimpbase.h"
+
+#include "core/core-types.h"
+
+#include "config/gimpcoreconfig.h"
+
+#include "core/gimp.h"
+#include "core/gimpcontext.h"
+#include "core/gimpdocumentlist.h"
+#include "core/gimpdrawable.h"
+#include "core/gimpimage.h"
+#include "core/gimpimagefile.h"
+#include "core/gimpparamspecs.h"
+#include "core/gimpprogress.h"
+
+#include "pdb/gimppdb.h"
+
+#include "plug-in/gimppluginprocedure.h"
+
+#include "file-remote.h"
+#include "file-save.h"
+#include "gimp-file.h"
+
+#include "gimp-intl.h"
+
+
+/*  public functions  */
+
+GimpPDBStatusType
+file_save (Gimp                *gimp,
+           GimpImage           *image,
+           GimpProgress        *progress,
+           GFile               *file,
+           GimpPlugInProcedure *file_proc,
+           GimpRunMode          run_mode,
+           gboolean             change_saved_state,
+           gboolean             export_backward,
+           gboolean             export_forward,
+           GError             **error)
+{
+  GimpDrawable      *drawable;
+  GimpValueArray    *return_vals;
+  GimpPDBStatusType  status     = GIMP_PDB_EXECUTION_ERROR;
+  GFile             *local_file = NULL;
+  gchar             *path       = NULL;
+  gchar             *uri        = NULL;
+  gboolean           mounted    = TRUE;
+  gint32             image_ID;
+  gint32             drawable_ID;
+  GError            *my_error   = NULL;
+
+  g_return_val_if_fail (GIMP_IS_GIMP (gimp), GIMP_PDB_CALLING_ERROR);
+  g_return_val_if_fail (GIMP_IS_IMAGE (image), GIMP_PDB_CALLING_ERROR);
+  g_return_val_if_fail (progress == NULL || GIMP_IS_PROGRESS (progress),
+                        GIMP_PDB_CALLING_ERROR);
+  g_return_val_if_fail (G_IS_FILE (file), GIMP_PDB_CALLING_ERROR);
+  g_return_val_if_fail (GIMP_IS_PLUG_IN_PROCEDURE (file_proc),
+                        GIMP_PDB_CALLING_ERROR);
+  g_return_val_if_fail ((export_backward && export_forward) == FALSE,
+                        GIMP_PDB_CALLING_ERROR);
+  g_return_val_if_fail (error == NULL || *error == NULL,
+                        GIMP_PDB_CALLING_ERROR);
+
+  /*  ref image and file, so they can't get deleted during save  */
+  g_object_ref (image);
+  g_object_ref (file);
+
+  gimp_image_saving (image);
+
+  drawable = gimp_image_get_active_drawable (image);
+
+  if (! drawable)
+    {
+      g_set_error_literal (error, G_FILE_ERROR, G_FILE_ERROR_FAILED,
+                           _("There is no active layer to save"));
+      goto out;
+    }
+
+  /* FIXME enable these tests for remote files again, needs testing */
+  if (g_file_is_native (file) &&
+      g_file_query_exists (file, NULL))
+    {
+      GFileInfo *info;
+
+      info = g_file_query_info (file,
+                                G_FILE_ATTRIBUTE_STANDARD_TYPE ","
+                                G_FILE_ATTRIBUTE_ACCESS_CAN_WRITE,
+                                G_FILE_QUERY_INFO_NONE,
+                                NULL, error);
+      if (! info)
+        {
+          /* extra paranoia */
+          if (error && ! *error)
+            g_set_error_literal (error, G_FILE_ERROR, G_FILE_ERROR_FAILED,
+                                 _("Failed to get file information"));
+          goto out;
+        }
+
+      if (g_file_info_get_file_type (info) != G_FILE_TYPE_REGULAR)
+        {
+          g_set_error_literal (error, G_FILE_ERROR, G_FILE_ERROR_FAILED,
+                               _("Not a regular file"));
+          g_object_unref (info);
+          goto out;
+        }
+
+      if (! g_file_info_get_attribute_boolean (info,
+                                               G_FILE_ATTRIBUTE_ACCESS_CAN_WRITE))
+        {
+          g_set_error_literal (error, G_FILE_ERROR, G_FILE_ERROR_FAILED,
+                               _("Permission denied"));
+          g_object_unref (info);
+          goto out;
+        }
+
+      g_object_unref (info);
+    }
+
+  if (! g_file_is_native (file) &&
+      ! file_remote_mount_file (gimp, file, progress, &my_error))
+    {
+      if (my_error)
+        {
+          g_printerr ("%s: mounting remote volume failed, trying to upload"
+                      "the file: %s\n",
+                      G_STRFUNC, my_error->message);
+          g_clear_error (&my_error);
+
+          mounted = FALSE;
+        }
+      else
+        {
+          status = GIMP_PDB_CANCEL;
+
+          goto out;
+        }
+    }
+
+  if (! file_proc->handles_uri || ! mounted)
+    {
+      gchar *my_path = g_file_get_path (file);
+
+      if (! my_path)
+        {
+          local_file = file_remote_upload_image_prepare (gimp, file, progress,
+                                                         &my_error);
+
+          if (! local_file)
+            {
+              if (my_error)
+                g_propagate_error (error, my_error);
+              else
+                status = GIMP_PDB_CANCEL;
+
+              goto out;
+            }
+
+          if (file_proc->handles_uri)
+            path = g_file_get_uri (local_file);
+          else
+            path = g_file_get_path (local_file);
+        }
+
+      g_free (my_path);
+    }
+
+  if (! path)
+    {
+      if (file_proc->handles_uri)
+        path = g_file_get_uri (file);
+      else
+        path = g_file_get_path (file);
+    }
+
+  uri = g_file_get_uri (file);
+
+  image_ID    = gimp_image_get_ID (image);
+  drawable_ID = gimp_item_get_ID (GIMP_ITEM (drawable));
+
+  return_vals =
+    gimp_pdb_execute_procedure_by_name (image->gimp->pdb,
+                                        gimp_get_user_context (gimp),
+                                        progress, error,
+                                        gimp_object_get_name (file_proc),
+                                        GIMP_TYPE_INT32,       run_mode,
+                                        GIMP_TYPE_IMAGE_ID,    image_ID,
+                                        GIMP_TYPE_DRAWABLE_ID, drawable_ID,
+                                        G_TYPE_STRING,         path,
+                                        G_TYPE_STRING,         uri,
+                                        G_TYPE_NONE);
+
+  status = g_value_get_enum (gimp_value_array_index (return_vals, 0));
+
+  gimp_value_array_unref (return_vals);
+
+  if (local_file)
+    {
+      if (status == GIMP_PDB_SUCCESS)
+        {
+          GError *my_error = NULL;
+
+          if (! file_remote_upload_image_finish (gimp, file, local_file,
+                                                 progress, &my_error))
+            {
+              status = GIMP_PDB_EXECUTION_ERROR;
+
+              if (my_error)
+                g_propagate_error (error, my_error);
+              else
+                status = GIMP_PDB_CANCEL;
+            }
+        }
+
+      g_file_delete (local_file, NULL, NULL);
+      g_object_unref (local_file);
+    }
+
+  if (status == GIMP_PDB_SUCCESS)
+    {
+      GimpDocumentList *documents;
+      GimpImagefile    *imagefile;
+
+      if (change_saved_state)
+        {
+          gimp_image_set_file (image, file);
+          gimp_image_set_save_proc (image, file_proc);
+
+          /* Forget the import source when we save. We interpret a
+           * save as that the user is not interested in being able
+           * to quickly export back to the original any longer
+           */
+          gimp_image_set_imported_file (image, NULL);
+
+          gimp_image_clean_all (image);
+        }
+      else if (export_backward)
+        {
+          /* We exported the image back to its imported source,
+           * change nothing about export/import flags, only set
+           * the export state to clean
+           */
+          gimp_image_export_clean_all (image);
+        }
+      else if (export_forward)
+        {
+          /* Remember the last entered Export URI for the image. We
+           * only need to do this explicitly when exporting. It
+           * happens implicitly when saving since the GimpObject name
+           * of a GimpImage is the last-save URI
+           */
+          gimp_image_set_exported_file (image, file);
+          gimp_image_set_export_proc (image, file_proc);
+
+          /* An image can not be considered both exported and imported
+           * at the same time, so stop consider it as imported now
+           * that we consider it exported.
+           */
+          gimp_image_set_imported_file (image, NULL);
+
+          gimp_image_export_clean_all (image);
+        }
+
+      if (export_backward || export_forward)
+        gimp_image_exported (image, file);
+      else
+        gimp_image_saved (image, file);
+
+      documents = GIMP_DOCUMENT_LIST (image->gimp->documents);
+
+      imagefile = gimp_document_list_add_file (documents, file,
+                                               g_slist_nth_data (file_proc->mime_types_list, 0));
+
+      /* only save a thumbnail if we are saving as XCF, see bug #25272 */
+      if (GIMP_PROCEDURE (file_proc)->proc_type == GIMP_INTERNAL)
+        gimp_imagefile_save_thumbnail (imagefile,
+                                       g_slist_nth_data (file_proc->mime_types_list, 0),
+                                       image,
+                                       NULL);
+    }
+  else if (status != GIMP_PDB_CANCEL)
+    {
+      if (error && *error == NULL)
+        {
+          g_set_error (error, G_FILE_ERROR, G_FILE_ERROR_FAILED,
+                       _("%s plug-in could not save image"),
+                       gimp_procedure_get_label (GIMP_PROCEDURE (file_proc)));
+        }
+    }
+
+  gimp_image_flush (image);
+
+ out:
+  g_object_unref (file);
+  g_object_unref (image);
+
+  g_free (path);
+  g_free (uri);
+
+  return status;
+}