summaryrefslogtreecommitdiffstats
path: root/app/file-data/file-data-gih.c
diff options
context:
space:
mode:
Diffstat (limited to 'app/file-data/file-data-gih.c')
-rw-r--r--app/file-data/file-data-gih.c346
1 files changed, 346 insertions, 0 deletions
diff --git a/app/file-data/file-data-gih.c b/app/file-data/file-data-gih.c
new file mode 100644
index 0000000..240eb9d
--- /dev/null
+++ b/app/file-data/file-data-gih.c
@@ -0,0 +1,346 @@
+/* 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 <cairo.h>
+#include <gdk-pixbuf/gdk-pixbuf.h>
+#include <gegl.h>
+
+#include "libgimpbase/gimpbase.h"
+#include "libgimpbase/gimpparasiteio.h"
+#include "libgimpcolor/gimpcolor.h"
+
+#include "core/core-types.h"
+
+#include "core/gimp.h"
+#include "core/gimpbrushpipe.h"
+#include "core/gimpbrushpipe-load.h"
+#include "core/gimpbrush-private.h"
+#include "core/gimpdrawable.h"
+#include "core/gimpimage.h"
+#include "core/gimplayer-new.h"
+#include "core/gimpparamspecs.h"
+#include "core/gimptempbuf.h"
+
+#include "pdb/gimpprocedure.h"
+
+#include "file-data-gbr.h"
+#include "file-data-gih.h"
+
+#include "gimp-intl.h"
+
+
+/* local function prototypes */
+
+static GimpImage * file_gih_pipe_to_image (Gimp *gimp,
+ GimpBrushPipe *pipe);
+static GimpBrushPipe * file_gih_image_to_pipe (GimpImage *image,
+ const gchar *name,
+ gdouble spacing,
+ const gchar *paramstring);
+
+
+/* public functions */
+
+GimpValueArray *
+file_gih_load_invoker (GimpProcedure *procedure,
+ Gimp *gimp,
+ GimpContext *context,
+ GimpProgress *progress,
+ const GimpValueArray *args,
+ GError **error)
+{
+ GimpValueArray *return_vals;
+ GimpImage *image = NULL;
+ const gchar *uri;
+ GFile *file;
+ GInputStream *input;
+ GError *my_error = NULL;
+
+ gimp_set_busy (gimp);
+
+ uri = g_value_get_string (gimp_value_array_index (args, 1));
+ file = g_file_new_for_uri (uri);
+
+ input = G_INPUT_STREAM (g_file_read (file, NULL, &my_error));
+
+ if (input)
+ {
+ GList *list = gimp_brush_pipe_load (context, file, input, error);
+
+ if (list)
+ {
+ GimpBrushPipe *pipe = list->data;
+
+ g_list_free (list);
+
+ image = file_gih_pipe_to_image (gimp, pipe);
+ g_object_unref (pipe);
+ }
+
+ g_object_unref (input);
+ }
+ else
+ {
+ g_propagate_prefixed_error (error, my_error,
+ _("Could not open '%s' for reading: "),
+ gimp_file_get_utf8_name (file));
+ }
+
+ g_object_unref (file);
+
+ return_vals = gimp_procedure_get_return_values (procedure, image != NULL,
+ error ? *error : NULL);
+
+ if (image)
+ gimp_value_set_image (gimp_value_array_index (return_vals, 1), image);
+
+ gimp_unset_busy (gimp);
+
+ return return_vals;
+}
+
+GimpValueArray *
+file_gih_save_invoker (GimpProcedure *procedure,
+ Gimp *gimp,
+ GimpContext *context,
+ GimpProgress *progress,
+ const GimpValueArray *args,
+ GError **error)
+{
+ GimpValueArray *return_vals;
+ GimpImage *image;
+ GimpBrushPipe *pipe;
+ const gchar *uri;
+ const gchar *name;
+ const gchar *params;
+ GFile *file;
+ gint spacing;
+ gboolean success;
+
+ gimp_set_busy (gimp);
+
+ image = gimp_value_get_image (gimp_value_array_index (args, 1), gimp);
+ uri = g_value_get_string (gimp_value_array_index (args, 3));
+ spacing = g_value_get_int (gimp_value_array_index (args, 5));
+ name = g_value_get_string (gimp_value_array_index (args, 6));
+ params = g_value_get_string (gimp_value_array_index (args, 7));
+
+ file = g_file_new_for_uri (uri);
+
+ pipe = file_gih_image_to_pipe (image, name, spacing, params);
+
+ gimp_data_set_file (GIMP_DATA (pipe), file, TRUE, TRUE);
+
+ success = gimp_data_save (GIMP_DATA (pipe), error);
+
+ g_object_unref (pipe);
+ g_object_unref (file);
+
+ return_vals = gimp_procedure_get_return_values (procedure, success,
+ error ? *error : NULL);
+
+ gimp_unset_busy (gimp);
+
+ return return_vals;
+}
+
+
+/* private functions */
+
+static GimpImage *
+file_gih_pipe_to_image (Gimp *gimp,
+ GimpBrushPipe *pipe)
+{
+ GimpImage *image;
+ const gchar *name;
+ GimpImageBaseType base_type;
+ GimpParasite *parasite;
+ gchar spacing[8];
+ gint i;
+
+ if (gimp_brush_get_pixmap (pipe->current))
+ base_type = GIMP_RGB;
+ else
+ base_type = GIMP_GRAY;
+
+ name = gimp_object_get_name (pipe);
+
+ image = gimp_image_new (gimp, 1, 1, base_type,
+ GIMP_PRECISION_U8_GAMMA);
+
+ parasite = gimp_parasite_new ("gimp-brush-pipe-name",
+ GIMP_PARASITE_PERSISTENT,
+ strlen (name) + 1, name);
+ gimp_image_parasite_attach (image, parasite, FALSE);
+ gimp_parasite_free (parasite);
+
+ g_snprintf (spacing, sizeof (spacing), "%d",
+ gimp_brush_get_spacing (GIMP_BRUSH (pipe)));
+
+ parasite = gimp_parasite_new ("gimp-brush-pipe-spacing",
+ GIMP_PARASITE_PERSISTENT,
+ strlen (spacing) + 1, spacing);
+ gimp_image_parasite_attach (image, parasite, FALSE);
+ gimp_parasite_free (parasite);
+
+ for (i = 0; i < pipe->n_brushes; i++)
+ {
+ GimpLayer *layer;
+
+ layer = file_gbr_brush_to_layer (image, pipe->brushes[i]);
+ gimp_image_add_layer (image, layer, NULL, i, FALSE);
+ }
+
+ if (pipe->params)
+ {
+ GimpPixPipeParams params;
+ gchar *paramstring;
+
+ /* Since we do not (yet) load the pipe as described in the
+ * header, but use one layer per brush, we have to alter the
+ * paramstring before attaching it as a parasite.
+ *
+ * (this comment copied over from file-gih, whatever "as
+ * described in the header" means) -- mitch
+ */
+
+ gimp_pixpipe_params_init (&params);
+ gimp_pixpipe_params_parse (pipe->params, &params);
+
+ params.cellwidth = gimp_image_get_width (image);
+ params.cellheight = gimp_image_get_height (image);
+ params.cols = 1;
+ params.rows = 1;
+
+ paramstring = gimp_pixpipe_params_build (&params);
+ if (paramstring)
+ {
+ parasite = gimp_parasite_new ("gimp-brush-pipe-parameters",
+ GIMP_PARASITE_PERSISTENT,
+ strlen (paramstring) + 1,
+ paramstring);
+ gimp_image_parasite_attach (image, parasite, FALSE);
+ gimp_parasite_free (parasite);
+ g_free (paramstring);
+ }
+ }
+
+ return image;
+}
+
+static GimpBrushPipe *
+file_gih_image_to_pipe (GimpImage *image,
+ const gchar *name,
+ gdouble spacing,
+ const gchar *paramstring)
+{
+ GimpBrushPipe *pipe;
+ GimpPixPipeParams params;
+ GList *layers;
+ GList *list;
+ GList *brushes = NULL;
+ gint image_width;
+ gint image_height;
+ gint i;
+
+ pipe = g_object_new (GIMP_TYPE_BRUSH_PIPE,
+ "name", name,
+ "mime-type", "image/x-gimp-gih",
+ "spacing", spacing,
+ NULL);
+
+ gimp_pixpipe_params_init (&params);
+ gimp_pixpipe_params_parse (paramstring, &params);
+
+ image_width = gimp_image_get_width (image);
+ image_height = gimp_image_get_height (image);
+
+ layers = gimp_image_get_layer_iter (image);
+
+ for (list = layers; list; list = g_list_next (list))
+ {
+ GimpLayer *layer = list->data;
+ gint width;
+ gint height;
+ gint offset_x;
+ gint offset_y;
+ gint row;
+
+ width = gimp_item_get_width (GIMP_ITEM (layer));
+ height = gimp_item_get_height (GIMP_ITEM (layer));
+
+ gimp_item_get_offset (GIMP_ITEM (layer), &offset_x, &offset_y);
+
+ for (row = 0; row < params.rows; row++)
+ {
+ gint y, ynext;
+ gint thisy, thish;
+ gint col;
+
+ y = (row * image_height) / params.rows;
+ ynext = ((row + 1) * image_height / params.rows);
+
+ /* Assume layer is offset to positive direction in x and y.
+ * That's reasonable, as otherwise all of the layer
+ * won't be visible.
+ * thisy and thisx are in the drawable's coordinate space.
+ */
+ thisy = MAX (0, y - offset_y);
+ thish = (ynext - offset_y) - thisy;
+ thish = MIN (thish, height - thisy);
+
+ for (col = 0; col < params.cols; col++)
+ {
+ GimpBrush *brush;
+ gint x, xnext;
+ gint thisx, thisw;
+
+ x = (col * image_width / params.cols);
+ xnext = ((col + 1) * image_width / params.cols);
+ thisx = MAX (0, x - offset_x);
+ thisw = (xnext - offset_x) - thisx;
+ thisw = MIN (thisw, width - thisx);
+
+ brush = file_gbr_drawable_to_brush (GIMP_DRAWABLE (layer),
+ GEGL_RECTANGLE (thisx, thisy,
+ thisw, thish),
+ gimp_object_get_name (layer),
+ spacing);
+
+ brushes = g_list_prepend (brushes, brush);
+ }
+ }
+ }
+
+ brushes = g_list_reverse (brushes);
+
+ pipe->n_brushes = g_list_length (brushes);
+ pipe->brushes = g_new0 (GimpBrush *, pipe->n_brushes);
+
+ for (list = brushes, i = 0; list; list = g_list_next (list), i++)
+ pipe->brushes[i] = list->data;
+
+ g_list_free (brushes);
+
+ gimp_pixpipe_params_free (&params);
+
+ gimp_brush_pipe_set_params (pipe, paramstring);
+
+ return pipe;
+}