diff options
Diffstat (limited to '')
-rw-r--r-- | plug-ins/file-exr/file-exr.c | 393 |
1 files changed, 393 insertions, 0 deletions
diff --git a/plug-ins/file-exr/file-exr.c b/plug-ins/file-exr/file-exr.c new file mode 100644 index 0000000..cac33cd --- /dev/null +++ b/plug-ins/file-exr/file-exr.c @@ -0,0 +1,393 @@ +/* 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 <libgimp/gimp.h> +#include <libgimp/gimpui.h> + +#include "libgimp/stdplugins-intl.h" + +#include "openexr-wrapper.h" + +#define LOAD_PROC "file-exr-load" +#define PLUG_IN_BINARY "file-exr" +#define PLUG_IN_VERSION "0.0.0" + + +/* + * Declare some local functions. + */ +static void query (void); +static void run (const gchar *name, + gint nparams, + const GimpParam *param, + gint *nreturn_vals, + GimpParam **return_vals); + +static gint32 load_image (const gchar *filename, + gboolean interactive, + GError **error); + +static void sanitize_comment (gchar *comment); + + +/* + * Some global variables. + */ +const GimpPlugInInfo PLUG_IN_INFO = +{ + NULL, /* init_proc */ + NULL, /* quit_proc */ + query, /* query_proc */ + run, /* run_proc */ +}; + + +MAIN () + + +static void +query (void) +{ + static const GimpParamDef load_args[] = + { + { GIMP_PDB_INT32, "run-mode", "The run mode { RUN-INTERACTIVE (0), RUN-NONINTERACTIVE (1) }" }, + { GIMP_PDB_STRING, "filename", "The name of the file to load" }, + { GIMP_PDB_STRING, "raw-filename", "The name of the file to load" } + }; + static const GimpParamDef load_return_vals[] = + { + { GIMP_PDB_IMAGE, "image", "Output image" } + }; + + gimp_install_procedure (LOAD_PROC, + "Loads files in the OpenEXR file format", + "This plug-in loads OpenEXR files. ", + "Dominik Ernst <dernst@gmx.de>, " + "Mukund Sivaraman <muks@banu.com>", + "Dominik Ernst <dernst@gmx.de>, " + "Mukund Sivaraman <muks@banu.com>", + PLUG_IN_VERSION, + N_("OpenEXR image"), + NULL, + GIMP_PLUGIN, + G_N_ELEMENTS (load_args), + G_N_ELEMENTS (load_return_vals), + load_args, load_return_vals); + + gimp_register_file_handler_mime (LOAD_PROC, "image/x-exr"); + gimp_register_magic_load_handler (LOAD_PROC, + "exr", + "", + "0,long,0x762f3101"); +} + +static void +run (const gchar *name, + gint nparams, + const GimpParam *param, + gint *nreturn_vals, + GimpParam **return_vals) +{ + static GimpParam values[2]; + GimpRunMode run_mode; + GimpPDBStatusType status = GIMP_PDB_SUCCESS; + gint32 image_ID; + GError *error = NULL; + + INIT_I18N (); + gegl_init (NULL, NULL); + + *nreturn_vals = 1; + *return_vals = values; + + values[0].type = GIMP_PDB_STATUS; + values[0].data.d_status = GIMP_PDB_EXECUTION_ERROR; + + if (strcmp (name, LOAD_PROC) == 0) + { + run_mode = param[0].data.d_int32; + + image_ID = load_image (param[1].data.d_string, + run_mode == GIMP_RUN_INTERACTIVE, &error); + + if (image_ID != -1) + { + *nreturn_vals = 2; + values[1].type = GIMP_PDB_IMAGE; + values[1].data.d_image = image_ID; + } + else + { + status = GIMP_PDB_EXECUTION_ERROR; + } + } + else + { + status = GIMP_PDB_CALLING_ERROR; + } + + if (status != GIMP_PDB_SUCCESS && error) + { + *nreturn_vals = 2; + values[1].type = GIMP_PDB_STRING; + values[1].data.d_string = error->message; + } + + values[0].data.d_status = status; +} + +static gint32 +load_image (const gchar *filename, + gboolean interactive, + GError **error) +{ + EXRLoader *loader; + gint width; + gint height; + gboolean has_alpha; + GimpImageBaseType image_type; + GimpPrecision image_precision; + gint32 image = -1; + GimpImageType layer_type; + gint32 layer; + const Babl *format; + GeglBuffer *buffer = NULL; + gint bpp; + gint tile_height; + gchar *pixels = NULL; + gint begin; + gint32 success = FALSE; + gchar *comment = NULL; + GimpColorProfile *profile = NULL; + guchar *exif_data; + guint exif_size; + guchar *xmp_data; + guint xmp_size; + + gimp_progress_init_printf (_("Opening '%s'"), + gimp_filename_to_utf8 (filename)); + + loader = exr_loader_new (filename); + + if (! loader) + { + g_set_error (error, G_FILE_ERROR, G_FILE_ERROR_FAILED, + _("Error opening file '%s' for reading"), + gimp_filename_to_utf8 (filename)); + goto out; + } + + width = exr_loader_get_width (loader); + height = exr_loader_get_height (loader); + + if ((width < 1) || (height < 1)) + { + g_set_error (error, G_FILE_ERROR, G_FILE_ERROR_FAILED, + _("Error querying image dimensions from '%s'"), + gimp_filename_to_utf8 (filename)); + goto out; + } + + has_alpha = exr_loader_has_alpha (loader) ? TRUE : FALSE; + + switch (exr_loader_get_precision (loader)) + { + case PREC_UINT: + image_precision = GIMP_PRECISION_U32_LINEAR; + break; + case PREC_HALF: + image_precision = GIMP_PRECISION_HALF_LINEAR; + break; + case PREC_FLOAT: + image_precision = GIMP_PRECISION_FLOAT_LINEAR; + break; + default: + g_set_error (error, G_FILE_ERROR, G_FILE_ERROR_FAILED, + _("Error querying image precision from '%s'"), + gimp_filename_to_utf8 (filename)); + goto out; + } + + switch (exr_loader_get_image_type (loader)) + { + case IMAGE_TYPE_RGB: + image_type = GIMP_RGB; + layer_type = has_alpha ? GIMP_RGBA_IMAGE : GIMP_RGB_IMAGE; + break; + case IMAGE_TYPE_GRAY: + image_type = GIMP_GRAY; + layer_type = has_alpha ? GIMP_GRAYA_IMAGE : GIMP_GRAY_IMAGE; + break; + default: + g_set_error (error, G_FILE_ERROR, G_FILE_ERROR_FAILED, + _("Error querying image type from '%s'"), + gimp_filename_to_utf8 (filename)); + goto out; + } + + image = gimp_image_new_with_precision (width, height, + image_type, image_precision); + if (image == -1) + { + g_set_error (error, 0, 0, + _("Could not create new image for '%s': %s"), + gimp_filename_to_utf8 (filename), gimp_get_pdb_error ()); + goto out; + } + + gimp_image_set_filename (image, filename); + + /* try to load an icc profile, it will be generated on the fly if + * chromaticities are given + */ + if (image_type == GIMP_RGB) + { + profile = exr_loader_get_profile (loader); + + if (profile) + gimp_image_set_color_profile (image, profile); + } + + layer = gimp_layer_new (image, _("Background"), width, height, + layer_type, 100, + gimp_image_get_default_new_layer_mode (image)); + gimp_image_insert_layer (image, layer, -1, 0); + + buffer = gimp_drawable_get_buffer (layer); + format = gimp_drawable_get_format (layer); + bpp = babl_format_get_bytes_per_pixel (format); + + tile_height = gimp_tile_height (); + pixels = g_new0 (gchar, tile_height * width * bpp); + + for (begin = 0; begin < height; begin += tile_height) + { + gint end; + gint num; + gint i; + + end = MIN (begin + tile_height, height); + num = end - begin; + + for (i = 0; i < num; i++) + { + gint retval; + + retval = exr_loader_read_pixel_row (loader, + pixels + (i * width * bpp), + bpp, begin + i); + if (retval < 0) + { + g_set_error (error, G_FILE_ERROR, G_FILE_ERROR_FAILED, + _("Error reading pixel data from '%s'"), + gimp_filename_to_utf8 (filename)); + goto out; + } + } + + gegl_buffer_set (buffer, GEGL_RECTANGLE (0, begin, width, num), + 0, NULL, pixels, GEGL_AUTO_ROWSTRIDE); + + gimp_progress_update ((gdouble) begin / (gdouble) height); + } + + /* try to read the file comment */ + comment = exr_loader_get_comment (loader); + if (comment) + { + GimpParasite *parasite; + + sanitize_comment (comment); + parasite = gimp_parasite_new ("gimp-comment", + GIMP_PARASITE_PERSISTENT, + strlen (comment) + 1, + comment); + gimp_image_attach_parasite (image, parasite); + gimp_parasite_free (parasite); + } + + /* check if the image contains Exif or Xmp data and read it */ + exif_data = exr_loader_get_exif (loader, &exif_size); + xmp_data = exr_loader_get_xmp (loader, &xmp_size); + + if (exif_data || xmp_data) + { + GimpMetadata *metadata = gimp_metadata_new (); + GimpMetadataLoadFlags flags = GIMP_METADATA_LOAD_ALL; + + if (exif_data) + { + gimp_metadata_set_from_exif (metadata, exif_data, exif_size, NULL); + g_free (exif_data); + } + + if (xmp_data) + { + gimp_metadata_set_from_xmp (metadata, xmp_data, xmp_size, NULL); + g_free (xmp_data); + } + + if (comment) + flags &= ~GIMP_METADATA_LOAD_COMMENT; + + if (profile) + flags &= ~GIMP_METADATA_LOAD_COLORSPACE; + + gimp_image_metadata_load_finish (image, "image/exr", + metadata, flags, interactive); + g_object_unref (metadata); + } + + gimp_progress_update (1.0); + + success = TRUE; + + out: + g_clear_object (&profile); + g_clear_object (&buffer); + g_clear_pointer (&pixels, g_free); + g_clear_pointer (&comment, g_free); + g_clear_pointer (&loader, exr_loader_unref); + + if (success) + return image; + + if (image != -1) + gimp_image_delete (image); + + return -1; +} + +/* copy & pasted from file-jpeg/jpeg-load.c */ +static void +sanitize_comment (gchar *comment) +{ + const gchar *start_invalid; + + if (! g_utf8_validate (comment, -1, &start_invalid)) + { + guchar *c; + + for (c = (guchar *) start_invalid; *c; c++) + { + if (*c > 126 || (*c < 32 && *c != '\t' && *c != '\n' && *c != '\r')) + *c = '?'; + } + } +} |