2193 lines
76 KiB
C
2193 lines
76 KiB
C
/* PIKA - Photo and Image Kooker Application
|
|
* a rebranding of The GNU Image Manipulation Program (created with heckimp)
|
|
* A derived work which may be trivial. However, any changes may be (C)2023 by Aldercone Studio
|
|
*
|
|
* Original copyright, applying to most contents (license remains unchanged):
|
|
* Copyright (C) 1995 Spencer Kimball and Peter Mattis
|
|
*
|
|
* file-jpegxl - JPEG XL file format plug-in for the PIKA
|
|
* Copyright (C) 2021 Daniel Novomesky
|
|
*
|
|
* 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 <gexiv2/gexiv2.h>
|
|
#include <glib/gstdio.h>
|
|
|
|
#include <jxl/decode.h>
|
|
#include <jxl/encode.h>
|
|
#include <jxl/thread_parallel_runner.h>
|
|
|
|
#include <libpika/pika.h>
|
|
#include <libpika/pikaui.h>
|
|
|
|
#include "libpika/stdplugins-intl.h"
|
|
|
|
#define LOAD_PROC "file-jpegxl-load"
|
|
#define SAVE_PROC "file-jpegxl-save"
|
|
#define PLUG_IN_BINARY "file-jpegxl"
|
|
|
|
typedef struct _JpegXL JpegXL;
|
|
typedef struct _JpegXLClass JpegXLClass;
|
|
|
|
struct _JpegXL
|
|
{
|
|
PikaPlugIn parent_instance;
|
|
};
|
|
|
|
struct _JpegXLClass
|
|
{
|
|
PikaPlugInClass parent_class;
|
|
};
|
|
|
|
|
|
#define JPEGXL_TYPE (jpegxl_get_type ())
|
|
#define JPEGXL(obj) (G_TYPE_CHECK_INSTANCE_CAST ((obj), JPEGXL_TYPE, JpegXL))
|
|
|
|
GType jpegxl_get_type (void) G_GNUC_CONST;
|
|
|
|
static GList *jpegxl_query_procedures (PikaPlugIn *plug_in);
|
|
static PikaProcedure *jpegxl_create_procedure (PikaPlugIn *plug_in,
|
|
const gchar *name);
|
|
|
|
static PikaValueArray *jpegxl_load (PikaProcedure *procedure,
|
|
PikaRunMode run_mode,
|
|
GFile *file,
|
|
PikaMetadata *metadata,
|
|
PikaMetadataLoadFlags *flags,
|
|
PikaProcedureConfig *config,
|
|
gpointer run_data);
|
|
static PikaValueArray *jpegxl_save (PikaProcedure *procedure,
|
|
PikaRunMode run_mode,
|
|
PikaImage *image,
|
|
gint n_drawables,
|
|
PikaDrawable **drawables,
|
|
GFile *file,
|
|
PikaMetadata *metadata,
|
|
PikaProcedureConfig *config,
|
|
gpointer run_data);
|
|
|
|
static void create_cmyk_layer (PikaImage *image,
|
|
PikaLayer *layer,
|
|
const Babl *space,
|
|
const Babl *type,
|
|
gpointer picture_buffer,
|
|
gpointer key_buffer,
|
|
gint bit_depth,
|
|
gboolean has_alpha);
|
|
static void extract_cmyk (GeglBuffer *buffer,
|
|
gpointer *cmy_data,
|
|
gpointer *key_data,
|
|
gpointer *alpha_data,
|
|
const Babl *type,
|
|
const Babl *space,
|
|
gint width,
|
|
gint height,
|
|
gint bit_depth,
|
|
gboolean has_alpha);
|
|
|
|
|
|
G_DEFINE_TYPE (JpegXL, jpegxl, PIKA_TYPE_PLUG_IN)
|
|
|
|
PIKA_MAIN (JPEGXL_TYPE)
|
|
DEFINE_STD_SET_I18N
|
|
|
|
static void
|
|
jpegxl_class_init (JpegXLClass *klass)
|
|
{
|
|
PikaPlugInClass *plug_in_class = PIKA_PLUG_IN_CLASS (klass);
|
|
|
|
plug_in_class->query_procedures = jpegxl_query_procedures;
|
|
plug_in_class->create_procedure = jpegxl_create_procedure;
|
|
plug_in_class->set_i18n = STD_SET_I18N;
|
|
}
|
|
|
|
static void
|
|
jpegxl_init (JpegXL *jpeg_xl)
|
|
{
|
|
}
|
|
|
|
static GList *
|
|
jpegxl_query_procedures (PikaPlugIn *plug_in)
|
|
{
|
|
GList *list = NULL;
|
|
|
|
list = g_list_append (list, g_strdup (LOAD_PROC));
|
|
list = g_list_append (list, g_strdup (SAVE_PROC));
|
|
|
|
return list;
|
|
}
|
|
|
|
static PikaProcedure *
|
|
jpegxl_create_procedure (PikaPlugIn *plug_in,
|
|
const gchar *name)
|
|
{
|
|
PikaProcedure *procedure = NULL;
|
|
|
|
if (! strcmp (name, LOAD_PROC))
|
|
{
|
|
procedure = pika_load_procedure_new (plug_in, name,
|
|
PIKA_PDB_PROC_TYPE_PLUGIN,
|
|
jpegxl_load, NULL, NULL);
|
|
|
|
pika_procedure_set_menu_label (procedure, _("JPEG XL image"));
|
|
|
|
pika_procedure_set_documentation (procedure,
|
|
_("Loads files in the JPEG XL file format"),
|
|
_("Loads files in the JPEG XL file format"),
|
|
name);
|
|
pika_procedure_set_attribution (procedure,
|
|
"Daniel Novomesky",
|
|
"(C) 2021 Daniel Novomesky",
|
|
"2021");
|
|
|
|
pika_file_procedure_set_mime_types (PIKA_FILE_PROCEDURE (procedure),
|
|
"image/jxl");
|
|
pika_file_procedure_set_extensions (PIKA_FILE_PROCEDURE (procedure),
|
|
"jxl");
|
|
pika_file_procedure_set_magics (PIKA_FILE_PROCEDURE (procedure),
|
|
"0,string,\xFF\x0A,0,string,\\000\\000\\000\x0CJXL\\040\\015\\012\x87\\012");
|
|
|
|
}
|
|
else if (! strcmp (name, SAVE_PROC))
|
|
{
|
|
procedure = pika_save_procedure_new (plug_in, name,
|
|
PIKA_PDB_PROC_TYPE_PLUGIN,
|
|
FALSE, jpegxl_save, NULL, NULL);
|
|
|
|
pika_procedure_set_image_types (procedure, "RGB*, GRAY*");
|
|
|
|
pika_procedure_set_menu_label (procedure, _("JPEG XL image"));
|
|
|
|
pika_procedure_set_documentation (procedure,
|
|
_("Saves files in the JPEG XL file format"),
|
|
_("Saves files in the JPEG XL file format"),
|
|
name);
|
|
pika_procedure_set_attribution (procedure,
|
|
"Daniel Novomesky",
|
|
"(C) 2021 Daniel Novomesky",
|
|
"2021");
|
|
|
|
pika_file_procedure_set_format_name (PIKA_FILE_PROCEDURE (procedure),
|
|
"JPEG XL");
|
|
pika_file_procedure_set_mime_types (PIKA_FILE_PROCEDURE (procedure),
|
|
"image/jxl");
|
|
pika_file_procedure_set_extensions (PIKA_FILE_PROCEDURE (procedure),
|
|
"jxl");
|
|
|
|
PIKA_PROC_ARG_BOOLEAN (procedure, "lossless",
|
|
_("L_ossless"),
|
|
_("Use lossless compression"),
|
|
FALSE,
|
|
G_PARAM_READWRITE);
|
|
|
|
PIKA_PROC_ARG_DOUBLE (procedure, "compression",
|
|
_("Co_mpression/maxError"),
|
|
_("Max. butteraugli distance, lower = higher quality. Range: 0 .. 15. 1.0 = visually lossless."),
|
|
0.1, 15, 1,
|
|
G_PARAM_READWRITE);
|
|
|
|
PIKA_PROC_ARG_INT (procedure, "save-bit-depth",
|
|
_("_Bit depth"),
|
|
_("Bit depth of exported image"),
|
|
8, 16, 8,
|
|
G_PARAM_READWRITE);
|
|
|
|
PIKA_PROC_ARG_INT (procedure, "speed",
|
|
_("Effort/S_peed"),
|
|
_("Encoder effort setting"),
|
|
1, 9,
|
|
7,
|
|
G_PARAM_READWRITE);
|
|
|
|
PIKA_PROC_ARG_BOOLEAN (procedure, "uses-original-profile",
|
|
_("Save ori_ginal profile"),
|
|
_("Store ICC profile to exported JXL file"),
|
|
FALSE,
|
|
G_PARAM_READWRITE);
|
|
|
|
PIKA_PROC_ARG_BOOLEAN (procedure, "cmyk",
|
|
_("Export as CMY_K"),
|
|
_("Create a CMYK JPEG XL image using the soft-proofing color profile"),
|
|
FALSE,
|
|
G_PARAM_READWRITE);
|
|
|
|
PIKA_PROC_ARG_BOOLEAN (procedure, "save-exif",
|
|
_("Save Exi_f"),
|
|
_("Toggle saving Exif data"),
|
|
pika_export_exif (),
|
|
G_PARAM_READWRITE);
|
|
|
|
PIKA_PROC_ARG_BOOLEAN (procedure, "save-xmp",
|
|
_("Save _XMP"),
|
|
_("Toggle saving XMP data"),
|
|
pika_export_xmp (),
|
|
G_PARAM_READWRITE);
|
|
}
|
|
|
|
return procedure;
|
|
}
|
|
|
|
/* The Key data is stored in a separate extra
|
|
* channel. We combine the CMY values from the
|
|
* main image with the K values to create
|
|
* the final layer buffer.
|
|
*/
|
|
static void
|
|
create_cmyk_layer (PikaImage *image,
|
|
PikaLayer *layer,
|
|
const Babl *type,
|
|
const Babl *space,
|
|
gpointer cmy_data,
|
|
gpointer key_data,
|
|
gint bit_depth,
|
|
gboolean has_alpha)
|
|
{
|
|
const Babl *cmy_format = NULL;
|
|
const Babl *cmyka_format = NULL;
|
|
const Babl *key_format = NULL;
|
|
const Babl *rgb_format = NULL;
|
|
GeglBuffer *output_buffer;
|
|
GeglBuffer *picture_buffer;
|
|
GeglBuffer *cmy_buffer;
|
|
GeglBuffer *key_buffer;
|
|
GeglBufferIterator *iter;
|
|
GeglColor *fill_color = gegl_color_new ("rgba(0.0,0.0,0.0,0.0)");
|
|
gint width;
|
|
gint height;
|
|
gint n_components = 3;
|
|
|
|
width = pika_image_get_width (image);
|
|
height = pika_image_get_height (image);
|
|
|
|
if (has_alpha)
|
|
n_components = 4;
|
|
|
|
pika_image_insert_layer (image, layer, NULL, 0);
|
|
output_buffer = pika_drawable_get_buffer (PIKA_DRAWABLE (layer));
|
|
|
|
if (bit_depth == 1)
|
|
rgb_format = babl_format (has_alpha ? "R'G'B'A u8" : "R'G'B' u8");
|
|
else
|
|
rgb_format = babl_format (has_alpha ? "R'G'B'A u16" : "R'G'B' u16");
|
|
|
|
if (bit_depth == 1)
|
|
cmy_format = babl_format_with_space ("cmyk u8", space);
|
|
else
|
|
cmy_format = babl_format_with_space ("cmyk u16", space);
|
|
|
|
if (bit_depth == 1)
|
|
cmyka_format = babl_format_with_space ("cmykA u8", space);
|
|
else
|
|
cmyka_format = babl_format_with_space ("cmykA u16", space);
|
|
|
|
key_format = babl_format_new (babl_model ("Y"),
|
|
type,
|
|
babl_component ("Y"),
|
|
NULL);
|
|
|
|
cmy_format = babl_format_with_space (babl_format_get_encoding (cmy_format),
|
|
space);
|
|
cmyka_format = babl_format_with_space (babl_format_get_encoding (cmyka_format),
|
|
space);
|
|
key_format = babl_format_with_space (babl_format_get_encoding (key_format),
|
|
space);
|
|
|
|
picture_buffer = gegl_buffer_new (GEGL_RECTANGLE (0, 0, width, height),
|
|
has_alpha ? cmyka_format : cmy_format);
|
|
gegl_buffer_set_color (picture_buffer, NULL, fill_color);
|
|
|
|
cmy_buffer = gegl_buffer_new (GEGL_RECTANGLE (0, 0, width, height),
|
|
babl_format_n (type, n_components));
|
|
key_buffer = gegl_buffer_new (GEGL_RECTANGLE (0, 0, width, height),
|
|
key_format);
|
|
|
|
gegl_buffer_set (cmy_buffer, GEGL_RECTANGLE (0, 0, width, height), 0,
|
|
babl_format_n (type, n_components), cmy_data,
|
|
GEGL_AUTO_ROWSTRIDE);
|
|
gegl_buffer_set (key_buffer, GEGL_RECTANGLE (0, 0, width, height), 0,
|
|
key_format, key_data, GEGL_AUTO_ROWSTRIDE);
|
|
|
|
iter = gegl_buffer_iterator_new (picture_buffer,
|
|
GEGL_RECTANGLE (0, 0, width, height), 0,
|
|
has_alpha ? cmyka_format : cmy_format,
|
|
GEGL_BUFFER_READWRITE,
|
|
GEGL_ABYSS_NONE, 4);
|
|
|
|
gegl_buffer_iterator_add (iter, cmy_buffer,
|
|
GEGL_RECTANGLE (0, 0, width, height), 0,
|
|
babl_format_n (type, n_components),
|
|
GEGL_ACCESS_READ, GEGL_ABYSS_NONE);
|
|
gegl_buffer_iterator_add (iter, key_buffer,
|
|
GEGL_RECTANGLE (0, 0, width, height), 0,
|
|
key_format, GEGL_ACCESS_READ, GEGL_ABYSS_NONE);
|
|
|
|
gegl_buffer_iterator_add (iter, output_buffer,
|
|
GEGL_RECTANGLE (0, 0, width, height), 0,
|
|
rgb_format, GEGL_BUFFER_READWRITE, GEGL_ABYSS_NONE);
|
|
|
|
while (gegl_buffer_iterator_next (iter))
|
|
{
|
|
guchar *pixel = iter->items[0].data;
|
|
guchar *cmy = iter->items[1].data;
|
|
guchar *k = iter->items[2].data;
|
|
guchar *output = iter->items[3].data;
|
|
gint length = iter->length;
|
|
gint row = length;
|
|
|
|
while (length--)
|
|
{
|
|
gint i;
|
|
|
|
for (i = 0; i < 3 * bit_depth; i++)
|
|
pixel[i] = cmy[i];
|
|
|
|
for (i = 0; i < bit_depth; i++)
|
|
pixel[i + (3 * bit_depth)] = k[i];
|
|
|
|
if (has_alpha)
|
|
{
|
|
for (i = 0; i < bit_depth; i++)
|
|
pixel[i + (4 * bit_depth)] = cmy[i + (3 * bit_depth)];
|
|
}
|
|
|
|
pixel += 4 * bit_depth;
|
|
cmy += 3 * bit_depth;
|
|
k += bit_depth;
|
|
|
|
if (has_alpha)
|
|
{
|
|
pixel += bit_depth;
|
|
cmy += bit_depth;
|
|
}
|
|
|
|
output += 4 * bit_depth;
|
|
}
|
|
|
|
/* Convert row from CMYK/A to RGB, due to layer buffers
|
|
* having a maximum of 4 colors currently */
|
|
pixel -= (4 * bit_depth) * row;
|
|
if (has_alpha)
|
|
pixel -= row * bit_depth;
|
|
output -= (4 * bit_depth) * row;
|
|
|
|
babl_process (babl_fish (has_alpha ? cmyka_format : cmy_format, rgb_format),
|
|
pixel, output, row);
|
|
}
|
|
|
|
g_object_unref (output_buffer);
|
|
g_object_unref (picture_buffer);
|
|
g_object_unref (cmy_buffer);
|
|
g_object_unref (key_buffer);
|
|
g_free (key_data);
|
|
}
|
|
|
|
static PikaImage *
|
|
load_image (GFile *file,
|
|
PikaRunMode runmode,
|
|
PikaMetadata *metadata,
|
|
PikaMetadataLoadFlags *flags,
|
|
GError **error)
|
|
{
|
|
FILE *inputFile = g_fopen (g_file_peek_path (file), "rb");
|
|
|
|
gsize inputFileSize;
|
|
gpointer memory;
|
|
|
|
JxlSignature signature;
|
|
JxlDecoder *decoder;
|
|
void *runner;
|
|
JxlBasicInfo basicinfo;
|
|
JxlDecoderStatus status;
|
|
JxlPixelFormat pixel_format;
|
|
JxlColorEncoding color_encoding;
|
|
size_t icc_size = 0;
|
|
PikaColorProfile *profile = NULL;
|
|
gboolean loadlinear = FALSE;
|
|
size_t channel_depth;
|
|
size_t result_size;
|
|
size_t extra_channel_size = 0;
|
|
gpointer picture_buffer;
|
|
gpointer key_buffer = NULL;
|
|
gboolean is_cmyk = FALSE;
|
|
gboolean has_alpha = FALSE;
|
|
gint cmyk_channel_id = -1;
|
|
PikaImage *image;
|
|
PikaLayer *layer;
|
|
GeglBuffer *buffer;
|
|
const Babl *space = NULL;
|
|
const Babl *type;
|
|
PikaPrecision precision_linear;
|
|
PikaPrecision precision_non_linear;
|
|
uint32_t i;
|
|
|
|
if (!inputFile)
|
|
{
|
|
g_set_error (error, G_FILE_ERROR, 0,
|
|
"Cannot open file for read: %s\n",
|
|
g_file_peek_path (file));
|
|
return NULL;
|
|
}
|
|
|
|
fseek (inputFile, 0, SEEK_END);
|
|
inputFileSize = ftell (inputFile);
|
|
fseek (inputFile, 0, SEEK_SET);
|
|
|
|
if (inputFileSize < 1)
|
|
{
|
|
g_set_error (error, G_FILE_ERROR, 0,
|
|
"File too small: %s\n",
|
|
g_file_peek_path (file));
|
|
fclose (inputFile);
|
|
return NULL;
|
|
}
|
|
|
|
memory = g_malloc (inputFileSize);
|
|
if (fread (memory, 1, inputFileSize, inputFile) != inputFileSize)
|
|
{
|
|
g_set_error (error, G_FILE_ERROR, 0,
|
|
"Failed to read %zu bytes: %s\n", inputFileSize,
|
|
g_file_peek_path (file));
|
|
fclose (inputFile);
|
|
g_free (memory);
|
|
return NULL;
|
|
}
|
|
|
|
fclose (inputFile);
|
|
|
|
signature = JxlSignatureCheck (memory, inputFileSize);
|
|
if (signature != JXL_SIG_CODESTREAM && signature != JXL_SIG_CONTAINER)
|
|
{
|
|
g_set_error (error, G_FILE_ERROR, 0,
|
|
"File %s is probably not in JXL format!\n",
|
|
g_file_peek_path (file));
|
|
g_free (memory);
|
|
return NULL;
|
|
}
|
|
|
|
decoder = JxlDecoderCreate (NULL);
|
|
if (!decoder)
|
|
{
|
|
g_set_error (error, G_FILE_ERROR, 0,
|
|
"ERROR: JxlDecoderCreate failed");
|
|
g_free (memory);
|
|
return NULL;
|
|
}
|
|
|
|
runner = JxlThreadParallelRunnerCreate (NULL, pika_get_num_processors ());
|
|
if (JxlDecoderSetParallelRunner (decoder, JxlThreadParallelRunner, runner) != JXL_DEC_SUCCESS)
|
|
{
|
|
g_set_error (error, G_FILE_ERROR, 0,
|
|
"ERROR: JxlDecoderSetParallelRunner failed");
|
|
JxlThreadParallelRunnerDestroy (runner);
|
|
JxlDecoderDestroy (decoder);
|
|
g_free (memory);
|
|
return NULL;
|
|
}
|
|
|
|
if (JxlDecoderSetInput (decoder, memory, inputFileSize) != JXL_DEC_SUCCESS)
|
|
{
|
|
g_set_error (error, G_FILE_ERROR, 0,
|
|
"ERROR: JxlDecoderSetInput failed");
|
|
JxlThreadParallelRunnerDestroy (runner);
|
|
JxlDecoderDestroy (decoder);
|
|
g_free (memory);
|
|
return NULL;
|
|
}
|
|
|
|
JxlDecoderCloseInput (decoder);
|
|
|
|
if (JxlDecoderSubscribeEvents (decoder, JXL_DEC_BASIC_INFO | JXL_DEC_COLOR_ENCODING | JXL_DEC_FULL_IMAGE) != JXL_DEC_SUCCESS)
|
|
{
|
|
g_set_error (error, G_FILE_ERROR, 0,
|
|
"ERROR: JxlDecoderSubscribeEvents failed");
|
|
JxlThreadParallelRunnerDestroy (runner);
|
|
JxlDecoderDestroy (decoder);
|
|
g_free (memory);
|
|
return NULL;
|
|
}
|
|
|
|
status = JxlDecoderProcessInput (decoder);
|
|
if (status == JXL_DEC_ERROR)
|
|
{
|
|
g_set_error (error, G_FILE_ERROR, 0,
|
|
"ERROR: JXL decoding failed");
|
|
JxlThreadParallelRunnerDestroy (runner);
|
|
JxlDecoderDestroy (decoder);
|
|
g_free (memory);
|
|
return NULL;
|
|
}
|
|
|
|
if (status == JXL_DEC_NEED_MORE_INPUT)
|
|
{
|
|
g_set_error (error, G_FILE_ERROR, 0,
|
|
"ERROR: JXL data incomplete");
|
|
JxlThreadParallelRunnerDestroy (runner);
|
|
JxlDecoderDestroy (decoder);
|
|
g_free (memory);
|
|
return NULL;
|
|
}
|
|
|
|
status = JxlDecoderGetBasicInfo (decoder, &basicinfo);
|
|
if (status != JXL_DEC_SUCCESS)
|
|
{
|
|
g_set_error (error, G_FILE_ERROR, 0,
|
|
"ERROR: JXL basic info not available");
|
|
JxlThreadParallelRunnerDestroy (runner);
|
|
JxlDecoderDestroy (decoder);
|
|
g_free (memory);
|
|
return NULL;
|
|
}
|
|
|
|
if (basicinfo.xsize == 0 || basicinfo.ysize == 0)
|
|
{
|
|
g_set_error (error, G_FILE_ERROR, 0,
|
|
"ERROR: JXL image has zero dimensions");
|
|
JxlThreadParallelRunnerDestroy (runner);
|
|
JxlDecoderDestroy (decoder);
|
|
g_free (memory);
|
|
return NULL;
|
|
}
|
|
|
|
status = JxlDecoderProcessInput (decoder);
|
|
if (status != JXL_DEC_COLOR_ENCODING)
|
|
{
|
|
g_set_error (error, G_FILE_ERROR, 0,
|
|
"Unexpected event %d instead of JXL_DEC_COLOR_ENCODING", status);
|
|
JxlThreadParallelRunnerDestroy (runner);
|
|
JxlDecoderDestroy (decoder);
|
|
g_free (memory);
|
|
return NULL;
|
|
}
|
|
|
|
if (basicinfo.uses_original_profile == JXL_FALSE)
|
|
{
|
|
if (basicinfo.num_color_channels == 3)
|
|
{
|
|
JxlColorEncodingSetToSRGB (&color_encoding, JXL_FALSE);
|
|
JxlDecoderSetPreferredColorProfile (decoder, &color_encoding);
|
|
}
|
|
else if (basicinfo.num_color_channels == 1)
|
|
{
|
|
JxlColorEncodingSetToSRGB (&color_encoding, JXL_TRUE);
|
|
JxlDecoderSetPreferredColorProfile (decoder, &color_encoding);
|
|
}
|
|
}
|
|
|
|
pixel_format.endianness = JXL_NATIVE_ENDIAN;
|
|
pixel_format.align = 0;
|
|
|
|
if (basicinfo.uses_original_profile == JXL_FALSE || basicinfo.bits_per_sample > 16)
|
|
{
|
|
pixel_format.data_type = JXL_TYPE_FLOAT;
|
|
channel_depth = 4;
|
|
precision_linear = PIKA_PRECISION_FLOAT_LINEAR;
|
|
precision_non_linear = PIKA_PRECISION_FLOAT_NON_LINEAR;
|
|
type = babl_type ("float");
|
|
}
|
|
else if (basicinfo.bits_per_sample <= 8)
|
|
{
|
|
pixel_format.data_type = JXL_TYPE_UINT8;
|
|
channel_depth = 1;
|
|
precision_linear = PIKA_PRECISION_U8_LINEAR;
|
|
precision_non_linear = PIKA_PRECISION_U8_NON_LINEAR;
|
|
type = babl_type ("u8");
|
|
}
|
|
else
|
|
{
|
|
pixel_format.data_type = JXL_TYPE_UINT16;
|
|
channel_depth = 2;
|
|
precision_linear = PIKA_PRECISION_U16_LINEAR;
|
|
precision_non_linear = PIKA_PRECISION_U16_NON_LINEAR;
|
|
type = babl_type ("u16");
|
|
}
|
|
|
|
if (basicinfo.num_color_channels == 1) /* grayscale */
|
|
{
|
|
if (basicinfo.alpha_bits > 0)
|
|
{
|
|
pixel_format.num_channels = 2;
|
|
}
|
|
else
|
|
{
|
|
pixel_format.num_channels = 1;
|
|
}
|
|
}
|
|
else /* RGB */
|
|
{
|
|
|
|
if (basicinfo.alpha_bits > 0) /* RGB with alpha */
|
|
{
|
|
pixel_format.num_channels = 4;
|
|
}
|
|
else /* RGB no alpha */
|
|
{
|
|
pixel_format.num_channels = 3;
|
|
}
|
|
}
|
|
|
|
/* Check for extra channels */
|
|
for (i = 0; i < basicinfo.num_extra_channels; i++)
|
|
{
|
|
JxlExtraChannelInfo extra;
|
|
|
|
if (JXL_DEC_SUCCESS != JxlDecoderGetExtraChannelInfo (decoder, i, &extra))
|
|
break;
|
|
|
|
/* K channel for CMYK images */
|
|
if (extra.type == JXL_CHANNEL_BLACK)
|
|
{
|
|
is_cmyk = TRUE;
|
|
cmyk_channel_id = i;
|
|
if (pixel_format.num_channels < 3)
|
|
pixel_format.num_channels = 3;
|
|
}
|
|
/* Confirm presence of alpha channel */
|
|
if (extra.type == JXL_CHANNEL_ALPHA)
|
|
{
|
|
has_alpha = TRUE;
|
|
pixel_format.num_channels = 4;
|
|
}
|
|
}
|
|
|
|
result_size = channel_depth * pixel_format.num_channels * (size_t) basicinfo.xsize * (size_t) basicinfo.ysize;
|
|
extra_channel_size = channel_depth * basicinfo.num_extra_channels * (size_t) basicinfo.xsize * (size_t) basicinfo.ysize;
|
|
result_size += extra_channel_size;
|
|
|
|
|
|
if (JxlDecoderGetColorAsEncodedProfile (decoder,
|
|
#if JPEGXL_NUMERIC_VERSION < JPEGXL_COMPUTE_NUMERIC_VERSION(0,9,0)
|
|
&pixel_format,
|
|
#endif
|
|
JXL_COLOR_PROFILE_TARGET_DATA,
|
|
&color_encoding) == JXL_DEC_SUCCESS)
|
|
{
|
|
if (color_encoding.white_point == JXL_WHITE_POINT_D65)
|
|
{
|
|
switch (color_encoding.transfer_function)
|
|
{
|
|
case JXL_TRANSFER_FUNCTION_LINEAR:
|
|
loadlinear = TRUE;
|
|
|
|
switch (color_encoding.color_space)
|
|
{
|
|
case JXL_COLOR_SPACE_RGB:
|
|
profile = pika_color_profile_new_rgb_srgb_linear ();
|
|
break;
|
|
case JXL_COLOR_SPACE_GRAY:
|
|
profile = pika_color_profile_new_d65_gray_linear ();
|
|
break;
|
|
default:
|
|
break;
|
|
}
|
|
break;
|
|
case JXL_TRANSFER_FUNCTION_SRGB:
|
|
switch (color_encoding.color_space)
|
|
{
|
|
case JXL_COLOR_SPACE_RGB:
|
|
profile = pika_color_profile_new_rgb_srgb ();
|
|
break;
|
|
case JXL_COLOR_SPACE_GRAY:
|
|
profile = pika_color_profile_new_d65_gray_srgb_trc ();
|
|
break;
|
|
default:
|
|
break;
|
|
}
|
|
break;
|
|
default:
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
|
|
if (! profile)
|
|
{
|
|
if (JxlDecoderGetICCProfileSize (decoder,
|
|
#if JPEGXL_NUMERIC_VERSION < JPEGXL_COMPUTE_NUMERIC_VERSION(0,9,0)
|
|
&pixel_format,
|
|
#endif
|
|
JXL_COLOR_PROFILE_TARGET_DATA,
|
|
&icc_size) == JXL_DEC_SUCCESS)
|
|
{
|
|
if (icc_size > 0)
|
|
{
|
|
gpointer raw_icc_profile = g_malloc (icc_size);
|
|
|
|
if (JxlDecoderGetColorAsICCProfile (decoder,
|
|
#if JPEGXL_NUMERIC_VERSION < JPEGXL_COMPUTE_NUMERIC_VERSION(0,9,0)
|
|
&pixel_format,
|
|
#endif
|
|
JXL_COLOR_PROFILE_TARGET_DATA,
|
|
raw_icc_profile, icc_size)
|
|
== JXL_DEC_SUCCESS)
|
|
{
|
|
profile = pika_color_profile_new_from_icc_profile (raw_icc_profile, icc_size, error);
|
|
if (profile)
|
|
{
|
|
loadlinear = pika_color_profile_is_linear (profile);
|
|
}
|
|
else
|
|
{
|
|
g_printerr ("%s: Failed to read ICC profile: %s\n", G_STRFUNC, (*error)->message);
|
|
g_clear_error (error);
|
|
}
|
|
}
|
|
else
|
|
{
|
|
g_printerr ("Failed to obtain data from JPEG XL decoder");
|
|
}
|
|
|
|
g_free (raw_icc_profile);
|
|
}
|
|
else
|
|
{
|
|
g_printerr ("Empty ICC data");
|
|
}
|
|
}
|
|
else
|
|
{
|
|
g_message ("no ICC, other color profile");
|
|
}
|
|
}
|
|
|
|
status = JxlDecoderProcessInput (decoder);
|
|
if (status != JXL_DEC_NEED_IMAGE_OUT_BUFFER)
|
|
{
|
|
g_set_error (error, G_FILE_ERROR, 0,
|
|
"Unexpected event %d instead of JXL_DEC_NEED_IMAGE_OUT_BUFFER", status);
|
|
if (profile)
|
|
{
|
|
g_object_unref (profile);
|
|
}
|
|
JxlThreadParallelRunnerDestroy (runner);
|
|
JxlDecoderDestroy (decoder);
|
|
g_free (memory);
|
|
return NULL;
|
|
}
|
|
|
|
picture_buffer = g_try_malloc (result_size);
|
|
if (! picture_buffer)
|
|
{
|
|
g_set_error (error, G_FILE_ERROR, 0, "Memory could not be allocated.");
|
|
if (profile)
|
|
{
|
|
g_object_unref (profile);
|
|
}
|
|
JxlThreadParallelRunnerDestroy (runner);
|
|
JxlDecoderDestroy (decoder);
|
|
g_free (memory);
|
|
return NULL;
|
|
}
|
|
|
|
if (JxlDecoderSetImageOutBuffer (decoder, &pixel_format, picture_buffer, result_size) != JXL_DEC_SUCCESS)
|
|
{
|
|
g_set_error (error, G_FILE_ERROR, 0,
|
|
"ERROR: JxlDecoderSetImageOutBuffer failed");
|
|
if (profile)
|
|
{
|
|
g_object_unref (profile);
|
|
}
|
|
JxlThreadParallelRunnerDestroy (runner);
|
|
JxlDecoderDestroy (decoder);
|
|
g_free (memory);
|
|
return NULL;
|
|
}
|
|
|
|
/* Loading key channel buffer data */
|
|
if (is_cmyk)
|
|
{
|
|
if (JxlDecoderExtraChannelBufferSize (decoder, &pixel_format,
|
|
&result_size, cmyk_channel_id)
|
|
!= JXL_DEC_SUCCESS)
|
|
{
|
|
g_set_error (error, G_FILE_ERROR, 0,
|
|
"ERROR: JxlDecoderExtraChannelBufferSize failed");
|
|
if (profile)
|
|
g_object_unref (profile);
|
|
|
|
JxlThreadParallelRunnerDestroy (runner);
|
|
JxlDecoderDestroy (decoder);
|
|
g_free (memory);
|
|
return NULL;
|
|
}
|
|
|
|
key_buffer = g_try_malloc (result_size);
|
|
|
|
if (! key_buffer)
|
|
{
|
|
g_set_error (error, G_FILE_ERROR, 0, "Memory could not be allocated.");
|
|
|
|
if (profile)
|
|
g_object_unref (profile);
|
|
|
|
JxlThreadParallelRunnerDestroy (runner);
|
|
JxlDecoderDestroy (decoder);
|
|
g_free (memory);
|
|
return NULL;
|
|
}
|
|
|
|
if (JxlDecoderSetExtraChannelBuffer (decoder, &pixel_format, key_buffer,
|
|
result_size, cmyk_channel_id)
|
|
!= JXL_DEC_SUCCESS)
|
|
{
|
|
g_set_error (error, G_FILE_ERROR, 0,
|
|
"ERROR: JxlDecoderSetExtraChannelBuffer failed");
|
|
if (profile)
|
|
g_object_unref (profile);
|
|
|
|
JxlThreadParallelRunnerDestroy (runner);
|
|
JxlDecoderDestroy (decoder);
|
|
g_free (memory);
|
|
return NULL;
|
|
}
|
|
}
|
|
|
|
status = JxlDecoderProcessInput (decoder);
|
|
if (status != JXL_DEC_FULL_IMAGE)
|
|
{
|
|
g_set_error (error, G_FILE_ERROR, 0,
|
|
"Unexpected event %d instead of JXL_DEC_FULL_IMAGE", status);
|
|
g_free (picture_buffer);
|
|
if (profile)
|
|
{
|
|
g_object_unref (profile);
|
|
}
|
|
JxlThreadParallelRunnerDestroy (runner);
|
|
JxlDecoderDestroy (decoder);
|
|
g_free (memory);
|
|
return NULL;
|
|
}
|
|
|
|
if (basicinfo.num_color_channels == 1) /* grayscale */
|
|
{
|
|
image = pika_image_new_with_precision (basicinfo.xsize, basicinfo.ysize, PIKA_GRAY,
|
|
loadlinear ? precision_linear : precision_non_linear);
|
|
|
|
if (profile)
|
|
{
|
|
if (pika_color_profile_is_gray (profile))
|
|
{
|
|
pika_image_set_color_profile (image, profile);
|
|
}
|
|
}
|
|
|
|
layer = pika_layer_new (image, "Background",
|
|
basicinfo.xsize, basicinfo.ysize,
|
|
(basicinfo.alpha_bits > 0) ? PIKA_GRAYA_IMAGE : PIKA_GRAY_IMAGE, 100,
|
|
pika_image_get_default_new_layer_mode (image));
|
|
}
|
|
else /* RGB or CMYK */
|
|
{
|
|
image = pika_image_new_with_precision (basicinfo.xsize, basicinfo.ysize, PIKA_RGB,
|
|
loadlinear ? precision_linear : precision_non_linear);
|
|
|
|
if (profile)
|
|
{
|
|
if (pika_color_profile_is_rgb (profile))
|
|
{
|
|
pika_image_set_color_profile (image, profile);
|
|
}
|
|
else if (is_cmyk && pika_color_profile_is_cmyk (profile))
|
|
{
|
|
pika_image_set_simulation_profile (image, profile);
|
|
|
|
space = pika_color_profile_get_space (profile,
|
|
PIKA_COLOR_RENDERING_INTENT_RELATIVE_COLORIMETRIC,
|
|
NULL);
|
|
}
|
|
}
|
|
|
|
layer = pika_layer_new (image, "Background",
|
|
basicinfo.xsize, basicinfo.ysize,
|
|
(basicinfo.alpha_bits > 0) ? PIKA_RGBA_IMAGE : PIKA_RGB_IMAGE, 100,
|
|
pika_image_get_default_new_layer_mode (image));
|
|
}
|
|
|
|
if (is_cmyk)
|
|
{
|
|
create_cmyk_layer (image, layer, type, space, picture_buffer,
|
|
key_buffer, channel_depth, has_alpha);
|
|
}
|
|
else
|
|
{
|
|
pika_image_insert_layer (image, layer, NULL, 0);
|
|
|
|
buffer = pika_drawable_get_buffer (PIKA_DRAWABLE (layer));
|
|
|
|
gegl_buffer_set (buffer, GEGL_RECTANGLE (0, 0, basicinfo.xsize, basicinfo.ysize), 0,
|
|
NULL, picture_buffer, GEGL_AUTO_ROWSTRIDE);
|
|
|
|
g_object_unref (buffer);
|
|
}
|
|
|
|
g_free (picture_buffer);
|
|
if (profile)
|
|
{
|
|
g_object_unref (profile);
|
|
}
|
|
|
|
if (metadata)
|
|
{
|
|
if (basicinfo.have_container)
|
|
{
|
|
JxlDecoderReleaseInput (decoder);
|
|
JxlDecoderRewind (decoder);
|
|
|
|
if (JxlDecoderSetInput (decoder, memory, inputFileSize) != JXL_DEC_SUCCESS)
|
|
{
|
|
g_printerr ("%s: JxlDecoderSetInput failed after JxlDecoderRewind\n", G_STRFUNC);
|
|
}
|
|
else
|
|
{
|
|
JxlDecoderCloseInput (decoder);
|
|
if (JxlDecoderSubscribeEvents (decoder, JXL_DEC_BOX) != JXL_DEC_SUCCESS)
|
|
{
|
|
g_printerr ("%s: JxlDecoderSubscribeEvents for JXL_DEC_BOX failed\n", G_STRFUNC);
|
|
}
|
|
else
|
|
{
|
|
gboolean search_exif = TRUE;
|
|
gboolean search_xmp = TRUE;
|
|
gboolean success_exif = FALSE;
|
|
gboolean success_xmp = FALSE;
|
|
JxlBoxType box_type = { 0, 0, 0, 0 };
|
|
GByteArray *exif_box = NULL;
|
|
GByteArray *xml_box = NULL;
|
|
size_t exif_remains = 0;
|
|
size_t xml_remains = 0;
|
|
|
|
while (search_exif || search_xmp)
|
|
{
|
|
status = JxlDecoderProcessInput (decoder);
|
|
switch (status)
|
|
{
|
|
case JXL_DEC_SUCCESS:
|
|
if (box_type[0] == 'E' && box_type[1] == 'x' && box_type[2] == 'i' && box_type[3] == 'f' && search_exif)
|
|
{
|
|
exif_remains = JxlDecoderReleaseBoxBuffer (decoder);
|
|
g_byte_array_set_size (exif_box, exif_box->len - exif_remains);
|
|
success_exif = TRUE;
|
|
}
|
|
else if (box_type[0] == 'x' && box_type[1] == 'm' && box_type[2] == 'l' && box_type[3] == ' ' && search_xmp)
|
|
{
|
|
xml_remains = JxlDecoderReleaseBoxBuffer (decoder);
|
|
g_byte_array_set_size (xml_box, xml_box->len - xml_remains);
|
|
success_xmp = TRUE;
|
|
}
|
|
|
|
search_exif = FALSE;
|
|
search_xmp = FALSE;
|
|
break;
|
|
case JXL_DEC_ERROR:
|
|
search_exif = FALSE;
|
|
search_xmp = FALSE;
|
|
g_printerr ("%s: Metadata decoding error\n", G_STRFUNC);
|
|
break;
|
|
case JXL_DEC_NEED_MORE_INPUT:
|
|
search_exif = FALSE;
|
|
search_xmp = FALSE;
|
|
g_printerr ("%s: JXL metadata are probably incomplete\n", G_STRFUNC);
|
|
break;
|
|
case JXL_DEC_BOX:
|
|
JxlDecoderSetDecompressBoxes (decoder, JXL_TRUE);
|
|
|
|
if (box_type[0] == 'E' && box_type[1] == 'x' && box_type[2] == 'i' && box_type[3] == 'f' && search_exif && exif_box)
|
|
{
|
|
exif_remains = JxlDecoderReleaseBoxBuffer (decoder);
|
|
g_byte_array_set_size (exif_box, exif_box->len - exif_remains);
|
|
|
|
search_exif = FALSE;
|
|
success_exif = TRUE;
|
|
}
|
|
else if (box_type[0] == 'x' && box_type[1] == 'm' && box_type[2] == 'l' && box_type[3] == ' ' && search_xmp && xml_box)
|
|
{
|
|
xml_remains = JxlDecoderReleaseBoxBuffer (decoder);
|
|
g_byte_array_set_size (xml_box, xml_box->len - xml_remains);
|
|
|
|
search_xmp = FALSE;
|
|
success_xmp = TRUE;
|
|
}
|
|
|
|
if (JxlDecoderGetBoxType (decoder, box_type, JXL_TRUE) == JXL_DEC_SUCCESS)
|
|
{
|
|
if (box_type[0] == 'E' && box_type[1] == 'x' && box_type[2] == 'i' && box_type[3] == 'f' && search_exif)
|
|
{
|
|
exif_box = g_byte_array_sized_new (4096);
|
|
g_byte_array_set_size (exif_box, 4096);
|
|
|
|
JxlDecoderSetBoxBuffer (decoder, exif_box->data, exif_box->len);
|
|
}
|
|
else if (box_type[0] == 'x' && box_type[1] == 'm' && box_type[2] == 'l' && box_type[3] == ' ' && search_xmp)
|
|
{
|
|
xml_box = g_byte_array_sized_new (4096);
|
|
g_byte_array_set_size (xml_box, 4096);
|
|
|
|
JxlDecoderSetBoxBuffer (decoder, xml_box->data, xml_box->len);
|
|
}
|
|
}
|
|
else
|
|
{
|
|
search_exif = FALSE;
|
|
search_xmp = FALSE;
|
|
g_printerr ("%s: Error in JxlDecoderGetBoxType\n", G_STRFUNC);
|
|
}
|
|
break;
|
|
case JXL_DEC_BOX_NEED_MORE_OUTPUT:
|
|
if (box_type[0] == 'E' && box_type[1] == 'x' && box_type[2] == 'i' && box_type[3] == 'f' && search_exif)
|
|
{
|
|
exif_remains = JxlDecoderReleaseBoxBuffer (decoder);
|
|
g_byte_array_set_size (exif_box, exif_box->len + 4096);
|
|
JxlDecoderSetBoxBuffer (decoder, exif_box->data + exif_box->len - (4096 + exif_remains), 4096 + exif_remains);
|
|
}
|
|
else if (box_type[0] == 'x' && box_type[1] == 'm' && box_type[2] == 'l' && box_type[3] == ' ' && search_xmp)
|
|
{
|
|
xml_remains = JxlDecoderReleaseBoxBuffer (decoder);
|
|
g_byte_array_set_size (xml_box, xml_box->len + 4096);
|
|
JxlDecoderSetBoxBuffer (decoder, xml_box->data + xml_box->len - (4096 + xml_remains), 4096 + xml_remains);
|
|
}
|
|
else
|
|
{
|
|
search_exif = FALSE;
|
|
search_xmp = FALSE;
|
|
}
|
|
break;
|
|
default:
|
|
break;
|
|
}
|
|
}
|
|
|
|
if (success_exif || success_xmp)
|
|
{
|
|
gexiv2_metadata_clear (GEXIV2_METADATA (metadata));
|
|
|
|
if (success_exif && exif_box)
|
|
{
|
|
const guint8 tiffHeaderBE[4] = { 'M', 'M', 0, 42 };
|
|
const guint8 tiffHeaderLE[4] = { 'I', 'I', 42, 0 };
|
|
const guint8 *tiffheader = exif_box->data;
|
|
glong new_exif_size = exif_box->len;
|
|
|
|
while (new_exif_size >= 4) /*Searching for TIFF Header*/
|
|
{
|
|
if (tiffheader[0] == tiffHeaderBE[0] && tiffheader[1] == tiffHeaderBE[1] &&
|
|
tiffheader[2] == tiffHeaderBE[2] && tiffheader[3] == tiffHeaderBE[3])
|
|
{
|
|
break;
|
|
}
|
|
if (tiffheader[0] == tiffHeaderLE[0] && tiffheader[1] == tiffHeaderLE[1] &&
|
|
tiffheader[2] == tiffHeaderLE[2] && tiffheader[3] == tiffHeaderLE[3])
|
|
{
|
|
break;
|
|
}
|
|
new_exif_size--;
|
|
tiffheader++;
|
|
}
|
|
|
|
if (new_exif_size > 4) /* TIFF header + some data found*/
|
|
{
|
|
if (! gexiv2_metadata_open_buf (GEXIV2_METADATA (metadata), tiffheader, new_exif_size, error))
|
|
{
|
|
g_printerr ("%s: Failed to set EXIF metadata: %s\n", G_STRFUNC, (*error)->message);
|
|
g_clear_error (error);
|
|
}
|
|
}
|
|
else
|
|
{
|
|
g_printerr ("%s: EXIF metadata not set\n", G_STRFUNC);
|
|
}
|
|
}
|
|
|
|
if (success_xmp && xml_box)
|
|
{
|
|
if (! pika_metadata_set_from_xmp (metadata, xml_box->data, xml_box->len, error))
|
|
{
|
|
g_printerr ("%s: Failed to set XMP metadata: %s\n", G_STRFUNC, (*error)->message);
|
|
g_clear_error (error);
|
|
}
|
|
}
|
|
}
|
|
|
|
if (exif_box)
|
|
{
|
|
g_byte_array_free (exif_box, TRUE);
|
|
}
|
|
|
|
if (xml_box)
|
|
{
|
|
g_byte_array_free (xml_box, TRUE);
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
gexiv2_metadata_try_set_orientation (GEXIV2_METADATA (metadata),
|
|
GEXIV2_ORIENTATION_NORMAL, NULL);
|
|
gexiv2_metadata_try_set_metadata_pixel_width (GEXIV2_METADATA (metadata),
|
|
basicinfo.xsize, NULL);
|
|
gexiv2_metadata_try_set_metadata_pixel_height (GEXIV2_METADATA (metadata),
|
|
basicinfo.ysize, NULL);
|
|
|
|
*flags = PIKA_METADATA_LOAD_COMMENT | PIKA_METADATA_LOAD_RESOLUTION;
|
|
}
|
|
|
|
JxlThreadParallelRunnerDestroy (runner);
|
|
JxlDecoderDestroy (decoder);
|
|
g_free (memory);
|
|
return image;
|
|
}
|
|
|
|
static PikaValueArray *
|
|
jpegxl_load (PikaProcedure *procedure,
|
|
PikaRunMode run_mode,
|
|
GFile *file,
|
|
PikaMetadata *metadata,
|
|
PikaMetadataLoadFlags *flags,
|
|
PikaProcedureConfig *config,
|
|
gpointer run_data)
|
|
{
|
|
PikaValueArray *return_vals;
|
|
PikaImage *image;
|
|
GError *error = NULL;
|
|
|
|
gegl_init (NULL, NULL);
|
|
|
|
image = load_image (file, run_mode, metadata, flags, &error);
|
|
|
|
if (! image)
|
|
return pika_procedure_new_return_values (procedure,
|
|
PIKA_PDB_EXECUTION_ERROR,
|
|
error);
|
|
|
|
return_vals = pika_procedure_new_return_values (procedure,
|
|
PIKA_PDB_SUCCESS,
|
|
NULL);
|
|
|
|
PIKA_VALUES_SET_IMAGE (return_vals, 1, image);
|
|
|
|
return return_vals;
|
|
}
|
|
|
|
static void
|
|
extract_cmyk (GeglBuffer *buffer,
|
|
gpointer *cmy_data,
|
|
gpointer *key_data,
|
|
gpointer *alpha_data,
|
|
const Babl *type,
|
|
const Babl *space,
|
|
gint width,
|
|
gint height,
|
|
gint bit_depth,
|
|
gboolean has_alpha)
|
|
{
|
|
GeglBuffer *cmy_buffer;
|
|
GeglBuffer *key_buffer;
|
|
GeglBuffer *alpha_buffer = NULL;
|
|
const Babl *format;
|
|
const Babl *key_format = NULL;
|
|
GeglBufferIterator *iter;
|
|
GeglColor *white = gegl_color_new ("white");
|
|
|
|
if (has_alpha)
|
|
{
|
|
format = babl_format_new (babl_model ("cmykA"),
|
|
type,
|
|
babl_component ("cyan"),
|
|
babl_component ("magenta"),
|
|
babl_component ("yellow"),
|
|
babl_component ("key"),
|
|
babl_component ("A"),
|
|
NULL);
|
|
}
|
|
else
|
|
{
|
|
format = babl_format_new (babl_model ("cmyk"),
|
|
type,
|
|
babl_component ("cyan"),
|
|
babl_component ("magenta"),
|
|
babl_component ("yellow"),
|
|
babl_component ("key"),
|
|
NULL);
|
|
}
|
|
format = babl_format_with_space (babl_format_get_encoding (format), space);
|
|
|
|
key_format = babl_format_new (babl_model ("Y"),
|
|
type,
|
|
babl_component ("Y"),
|
|
NULL);
|
|
key_format = babl_format_with_space (babl_format_get_encoding (key_format),
|
|
space);
|
|
|
|
cmy_buffer = gegl_buffer_new (GEGL_RECTANGLE (0, 0, width, height),
|
|
babl_format_n (type, 3));
|
|
gegl_buffer_set_color (cmy_buffer, NULL, white);
|
|
|
|
key_buffer = gegl_buffer_new (GEGL_RECTANGLE (0, 0, width, height),
|
|
key_format);
|
|
gegl_buffer_set_color (key_buffer, NULL, white);
|
|
|
|
if (has_alpha)
|
|
{
|
|
alpha_buffer = gegl_buffer_new (GEGL_RECTANGLE (0, 0, width, height),
|
|
babl_format_n (type, 1));
|
|
gegl_buffer_set_color (alpha_buffer, NULL, white);
|
|
}
|
|
|
|
g_object_unref (white);
|
|
|
|
iter = gegl_buffer_iterator_new (buffer,
|
|
GEGL_RECTANGLE (0, 0, width, height), 0,
|
|
format,
|
|
GEGL_BUFFER_READWRITE,
|
|
GEGL_ABYSS_NONE, 4);
|
|
|
|
gegl_buffer_iterator_add (iter, cmy_buffer,
|
|
GEGL_RECTANGLE (0, 0, width, height), 0,
|
|
babl_format_n (type, 3), GEGL_BUFFER_READWRITE,
|
|
GEGL_ABYSS_NONE);
|
|
gegl_buffer_iterator_add (iter, key_buffer,
|
|
GEGL_RECTANGLE (0, 0, width, height), 0,
|
|
key_format, GEGL_BUFFER_READWRITE,
|
|
GEGL_ABYSS_NONE);
|
|
if (has_alpha)
|
|
gegl_buffer_iterator_add (iter, alpha_buffer,
|
|
GEGL_RECTANGLE (0, 0, width, height), 0,
|
|
babl_format_n (type, 1), GEGL_BUFFER_READWRITE,
|
|
GEGL_ABYSS_NONE);
|
|
|
|
while (gegl_buffer_iterator_next (iter))
|
|
{
|
|
guchar *pixel = iter->items[0].data;
|
|
guchar *cmy = iter->items[1].data;
|
|
guchar *k = iter->items[2].data;
|
|
guchar *a = NULL;
|
|
gint length = iter->length;
|
|
|
|
if (has_alpha)
|
|
a = iter->items[3].data;
|
|
|
|
while (length--)
|
|
{
|
|
gint range = 1;
|
|
gint i;
|
|
|
|
if (bit_depth > 8)
|
|
range = 2;
|
|
|
|
for (i = 0; i < (3 * range); i++)
|
|
cmy[i] = pixel[i];
|
|
|
|
for (i = 0; i < range; i++)
|
|
k[i] = pixel[i + (3 * range)];
|
|
|
|
if (has_alpha)
|
|
{
|
|
for (i = 0; i < range; i++)
|
|
a[i] = pixel[i + (4 * range)];
|
|
}
|
|
|
|
pixel += 4 * range;
|
|
cmy += 3 * range;
|
|
k += range;
|
|
|
|
if (has_alpha)
|
|
{
|
|
a += range;
|
|
pixel += range;
|
|
}
|
|
}
|
|
}
|
|
|
|
gegl_buffer_get (cmy_buffer, GEGL_RECTANGLE (0, 0,
|
|
width, height), 1.0,
|
|
babl_format_n (type, 3), *cmy_data,
|
|
GEGL_AUTO_ROWSTRIDE, GEGL_ABYSS_NONE);
|
|
|
|
gegl_buffer_get (key_buffer, GEGL_RECTANGLE (0, 0,
|
|
width, height), 1.0,
|
|
key_format, *key_data,
|
|
GEGL_AUTO_ROWSTRIDE, GEGL_ABYSS_NONE);
|
|
|
|
if (has_alpha)
|
|
gegl_buffer_get (alpha_buffer, GEGL_RECTANGLE (0, 0,
|
|
width, height), 1.0,
|
|
babl_format_n (type, 1), *alpha_data,
|
|
GEGL_AUTO_ROWSTRIDE, GEGL_ABYSS_NONE);
|
|
|
|
g_object_unref (cmy_buffer);
|
|
g_object_unref (key_buffer);
|
|
if (has_alpha)
|
|
g_object_unref (alpha_buffer);
|
|
}
|
|
|
|
static gboolean
|
|
save_image (GFile *file,
|
|
PikaProcedureConfig *config,
|
|
PikaImage *image,
|
|
PikaDrawable *drawable,
|
|
PikaMetadata *metadata,
|
|
GError **error)
|
|
{
|
|
JxlEncoder *encoder;
|
|
void *runner;
|
|
JxlEncoderFrameSettings *encoder_options;
|
|
JxlPixelFormat pixel_format;
|
|
JxlBasicInfo output_info;
|
|
JxlColorEncoding color_profile;
|
|
JxlEncoderStatus status;
|
|
size_t buffer_size;
|
|
size_t total_channel_size = 0;
|
|
size_t channel_buffer_size = 0;
|
|
|
|
GByteArray *compressed;
|
|
|
|
FILE *outfile;
|
|
GeglBuffer *buffer;
|
|
PikaImageType drawable_type;
|
|
|
|
gint drawable_width;
|
|
gint drawable_height;
|
|
gpointer picture_buffer;
|
|
gpointer cmy_buffer = NULL;
|
|
gpointer key_buffer = NULL;
|
|
gpointer alpha_buffer = NULL;
|
|
|
|
PikaColorProfile *profile = NULL;
|
|
const Babl *file_format = NULL;
|
|
const Babl *space = NULL;
|
|
const Babl *type = NULL;
|
|
gboolean out_linear = FALSE;
|
|
|
|
size_t offset = 0;
|
|
uint8_t *next_out;
|
|
size_t avail_out;
|
|
|
|
gdouble compression = 1.0;
|
|
gboolean lossless = FALSE;
|
|
gint speed = 7;
|
|
gint bit_depth = 8;
|
|
gboolean cmyk = FALSE;
|
|
gboolean uses_original_profile = FALSE;
|
|
gboolean save_exif = FALSE;
|
|
gboolean save_xmp = FALSE;
|
|
|
|
pika_progress_init_printf (_("Exporting '%s'"),
|
|
pika_file_get_utf8_name (file));
|
|
|
|
g_object_get (config,
|
|
"lossless", &lossless,
|
|
"compression", &compression,
|
|
"speed", &speed,
|
|
"save-bit-depth", &bit_depth,
|
|
"cmyk", &cmyk,
|
|
"uses-original-profile", &uses_original_profile,
|
|
"save-exif", &save_exif,
|
|
"save-xmp", &save_xmp,
|
|
NULL);
|
|
|
|
if (lossless || cmyk)
|
|
{
|
|
/* JPEG XL developers recommend enabling uses_original_profile
|
|
* for better lossless compression efficiency.
|
|
* Profile must be saved for CMYK export */
|
|
uses_original_profile = TRUE;
|
|
}
|
|
else
|
|
{
|
|
/* 0.1 is actually minimal value for lossy in libjxl 0.5
|
|
* 0.01 is allowed in libjxl 0.6 but
|
|
* using too low value with lossy compression is not wise */
|
|
if (compression < 0.1)
|
|
{
|
|
compression = 0.1;
|
|
}
|
|
}
|
|
|
|
drawable_type = pika_drawable_type (drawable);
|
|
drawable_width = pika_drawable_get_width (drawable);
|
|
drawable_height = pika_drawable_get_height (drawable);
|
|
|
|
JxlEncoderInitBasicInfo(&output_info);
|
|
|
|
if (uses_original_profile)
|
|
{
|
|
output_info.uses_original_profile = JXL_TRUE;
|
|
|
|
if (cmyk)
|
|
profile = pika_image_get_simulation_profile (image);
|
|
else
|
|
profile = pika_image_get_effective_color_profile (image);
|
|
|
|
/* CMYK profile is required for export. If not assigned,
|
|
* disable CMYK flag and revert to RGB */
|
|
if (cmyk && ! profile)
|
|
{
|
|
cmyk = FALSE;
|
|
profile = pika_image_get_effective_color_profile (image);
|
|
}
|
|
|
|
out_linear = pika_color_profile_is_linear (profile);
|
|
|
|
space = pika_color_profile_get_space (profile,
|
|
PIKA_COLOR_RENDERING_INTENT_RELATIVE_COLORIMETRIC,
|
|
error);
|
|
|
|
if (error && *error)
|
|
{
|
|
g_printerr ("%s: error getting the profile space: %s\n",
|
|
G_STRFUNC, (*error)->message);
|
|
return FALSE;
|
|
}
|
|
}
|
|
else
|
|
{
|
|
output_info.uses_original_profile = JXL_FALSE;
|
|
space = babl_space ("sRGB");
|
|
out_linear = FALSE;
|
|
}
|
|
|
|
if (bit_depth > 8)
|
|
{
|
|
pixel_format.data_type = JXL_TYPE_UINT16;
|
|
output_info.bits_per_sample = 16;
|
|
}
|
|
else
|
|
{
|
|
pixel_format.data_type = JXL_TYPE_UINT8;
|
|
output_info.bits_per_sample = 8;
|
|
}
|
|
|
|
pixel_format.endianness = JXL_NATIVE_ENDIAN;
|
|
pixel_format.align = 0;
|
|
|
|
output_info.xsize = drawable_width;
|
|
output_info.ysize = drawable_height;
|
|
output_info.exponent_bits_per_sample = 0;
|
|
output_info.orientation = JXL_ORIENT_IDENTITY;
|
|
output_info.animation.tps_numerator = 10;
|
|
output_info.animation.tps_denominator = 1;
|
|
output_info.num_extra_channels = 0;
|
|
|
|
if (cmyk)
|
|
{
|
|
if (bit_depth > 8)
|
|
{
|
|
file_format = babl_format_with_space (pika_drawable_has_alpha (drawable) ?
|
|
"cmykA u16" : "cmyk u16", space);
|
|
type = babl_type ("u16");
|
|
}
|
|
else
|
|
{
|
|
file_format = babl_format_with_space (pika_drawable_has_alpha (drawable) ?
|
|
"cmykA u8" : "cmyk u8", space);
|
|
type = babl_type ("u8");
|
|
}
|
|
|
|
output_info.num_color_channels = 3;
|
|
pixel_format.num_channels = 3;
|
|
JxlColorEncodingSetToSRGB (&color_profile, JXL_FALSE);
|
|
|
|
if (pika_drawable_has_alpha (drawable))
|
|
{
|
|
output_info.num_extra_channels = 2;
|
|
output_info.alpha_bits = 8;
|
|
if (bit_depth > 8)
|
|
output_info.alpha_bits = 16;
|
|
output_info.alpha_exponent_bits = 0;
|
|
}
|
|
else
|
|
{
|
|
output_info.num_extra_channels = 1;
|
|
output_info.alpha_bits = 0;
|
|
}
|
|
}
|
|
else /* For RGB and grayscale export */
|
|
{
|
|
switch (drawable_type)
|
|
{
|
|
case PIKA_GRAYA_IMAGE:
|
|
if (uses_original_profile && out_linear)
|
|
{
|
|
file_format = babl_format ( (bit_depth > 8) ? "YA u16" : "YA u8");
|
|
JxlColorEncodingSetToLinearSRGB (&color_profile, JXL_TRUE);
|
|
}
|
|
else
|
|
{
|
|
file_format = babl_format ( (bit_depth > 8) ? "Y'A u16" : "Y'A u8");
|
|
JxlColorEncodingSetToSRGB (&color_profile, JXL_TRUE);
|
|
}
|
|
pixel_format.num_channels = 2;
|
|
output_info.num_color_channels = 1;
|
|
output_info.alpha_bits = (bit_depth > 8) ? 16 : 8;
|
|
output_info.alpha_exponent_bits = 0;
|
|
output_info.num_extra_channels = 1;
|
|
|
|
uses_original_profile = FALSE;
|
|
break;
|
|
case PIKA_GRAY_IMAGE:
|
|
if (uses_original_profile && out_linear)
|
|
{
|
|
file_format = babl_format ( (bit_depth > 8) ? "Y u16" : "Y u8");
|
|
JxlColorEncodingSetToLinearSRGB (&color_profile, JXL_TRUE);
|
|
}
|
|
else
|
|
{
|
|
file_format = babl_format ( (bit_depth > 8) ? "Y' u16" : "Y' u8");
|
|
JxlColorEncodingSetToSRGB (&color_profile, JXL_TRUE);
|
|
}
|
|
pixel_format.num_channels = 1;
|
|
output_info.num_color_channels = 1;
|
|
output_info.alpha_bits = 0;
|
|
|
|
uses_original_profile = FALSE;
|
|
break;
|
|
case PIKA_RGBA_IMAGE:
|
|
if (bit_depth > 8)
|
|
{
|
|
file_format = babl_format_with_space (out_linear ? "RGBA u16" : "R'G'B'A u16", space);
|
|
output_info.alpha_bits = 16;
|
|
}
|
|
else
|
|
{
|
|
file_format = babl_format_with_space (out_linear ? "RGBA u8" : "R'G'B'A u8", space);
|
|
output_info.alpha_bits = 8;
|
|
}
|
|
pixel_format.num_channels = 4;
|
|
JxlColorEncodingSetToSRGB (&color_profile, JXL_FALSE);
|
|
output_info.num_color_channels = 3;
|
|
output_info.alpha_exponent_bits = 0;
|
|
output_info.num_extra_channels = 1;
|
|
break;
|
|
case PIKA_RGB_IMAGE:
|
|
if (bit_depth > 8)
|
|
{
|
|
file_format = babl_format_with_space (out_linear ? "RGB u16" : "R'G'B' u16", space);
|
|
}
|
|
else
|
|
{
|
|
file_format = babl_format_with_space (out_linear ? "RGB u8" : "R'G'B' u8", space);
|
|
}
|
|
pixel_format.num_channels = 3;
|
|
JxlColorEncodingSetToSRGB (&color_profile, JXL_FALSE);
|
|
output_info.num_color_channels = 3;
|
|
output_info.alpha_bits = 0;
|
|
break;
|
|
default:
|
|
if (profile)
|
|
{
|
|
g_object_unref (profile);
|
|
}
|
|
return FALSE;
|
|
break;
|
|
}
|
|
}
|
|
|
|
if (bit_depth > 8)
|
|
{
|
|
buffer_size = 2 * pixel_format.num_channels * (size_t) output_info.xsize * (size_t) output_info.ysize;
|
|
total_channel_size =
|
|
2 * output_info.num_extra_channels * (size_t) output_info.xsize * (size_t) output_info.ysize;
|
|
}
|
|
else
|
|
{
|
|
buffer_size = pixel_format.num_channels * (size_t) output_info.xsize * (size_t) output_info.ysize;
|
|
total_channel_size =
|
|
output_info.num_extra_channels * (size_t) output_info.xsize * (size_t) output_info.ysize;
|
|
}
|
|
|
|
/* The maximum number of channels for JPEG XL is 3.
|
|
The image may have more (e.g. CMYKA), so we'll combine them
|
|
for the initial GeglBuffer loading */
|
|
total_channel_size += buffer_size;
|
|
|
|
picture_buffer = g_malloc (total_channel_size);
|
|
|
|
pika_progress_update (0.3);
|
|
|
|
buffer = pika_drawable_get_buffer (drawable);
|
|
gegl_buffer_get (buffer, GEGL_RECTANGLE (0, 0,
|
|
drawable_width, drawable_height), 1.0,
|
|
file_format, picture_buffer,
|
|
GEGL_AUTO_ROWSTRIDE, GEGL_ABYSS_NONE);
|
|
|
|
/* Copying K value to buffer */
|
|
if (cmyk)
|
|
{
|
|
channel_buffer_size = (size_t) output_info.xsize * (size_t) output_info.ysize;
|
|
if (bit_depth > 8)
|
|
channel_buffer_size *= 2;
|
|
|
|
cmy_buffer = g_malloc (buffer_size);
|
|
key_buffer = g_malloc (channel_buffer_size);
|
|
|
|
if (pika_drawable_has_alpha (drawable))
|
|
alpha_buffer = g_malloc (channel_buffer_size);
|
|
|
|
extract_cmyk (buffer, &cmy_buffer, &key_buffer, &alpha_buffer,
|
|
type, space, output_info.xsize, output_info.ysize,
|
|
bit_depth, pika_drawable_has_alpha (drawable));
|
|
}
|
|
|
|
g_object_unref (buffer);
|
|
|
|
pika_progress_update (0.4);
|
|
|
|
encoder = JxlEncoderCreate (NULL);
|
|
if (!encoder)
|
|
{
|
|
g_set_error (error, G_FILE_ERROR, 0,
|
|
"Failed to create Jxl encoder");
|
|
g_free (picture_buffer);
|
|
if (profile)
|
|
{
|
|
g_object_unref (profile);
|
|
}
|
|
return FALSE;
|
|
}
|
|
|
|
if ( (output_info.bits_per_sample > 12 && (output_info.uses_original_profile || output_info.alpha_bits > 12)) || (metadata && (save_exif || save_xmp)))
|
|
{
|
|
output_info.have_container = JXL_TRUE;
|
|
JxlEncoderUseContainer (encoder, JXL_TRUE);
|
|
|
|
if (output_info.bits_per_sample > 12 && (output_info.uses_original_profile || output_info.alpha_bits > 12))
|
|
{
|
|
JxlEncoderSetCodestreamLevel (encoder, 10);
|
|
}
|
|
|
|
if (metadata && (save_exif || save_xmp))
|
|
{
|
|
JxlEncoderUseBoxes (encoder);
|
|
}
|
|
}
|
|
|
|
runner = JxlThreadParallelRunnerCreate (NULL, pika_get_num_processors ());
|
|
if (JxlEncoderSetParallelRunner (encoder, JxlThreadParallelRunner, runner) != JXL_ENC_SUCCESS)
|
|
{
|
|
g_set_error (error, G_FILE_ERROR, 0,
|
|
"JxlEncoderSetParallelRunner failed");
|
|
JxlThreadParallelRunnerDestroy (runner);
|
|
JxlEncoderDestroy (encoder);
|
|
g_free (picture_buffer);
|
|
if (profile)
|
|
{
|
|
g_object_unref (profile);
|
|
}
|
|
return FALSE;
|
|
}
|
|
|
|
status = JxlEncoderSetBasicInfo (encoder, &output_info);
|
|
if (status != JXL_ENC_SUCCESS)
|
|
{
|
|
g_set_error (error, G_FILE_ERROR, 0,
|
|
"JxlEncoderSetBasicInfo failed!");
|
|
JxlThreadParallelRunnerDestroy (runner);
|
|
JxlEncoderDestroy (encoder);
|
|
g_free (picture_buffer);
|
|
if (profile)
|
|
{
|
|
g_object_unref (profile);
|
|
}
|
|
return FALSE;
|
|
}
|
|
|
|
if (uses_original_profile)
|
|
{
|
|
const uint8_t *icc_data = NULL;
|
|
size_t icc_length = 0;
|
|
|
|
icc_data = pika_color_profile_get_icc_profile (profile, &icc_length);
|
|
status = JxlEncoderSetICCProfile (encoder, icc_data, icc_length);
|
|
g_object_unref (profile);
|
|
profile = NULL;
|
|
|
|
if (status != JXL_ENC_SUCCESS)
|
|
{
|
|
g_set_error (error, G_FILE_ERROR, 0,
|
|
"JxlEncoderSetICCProfile failed!");
|
|
JxlThreadParallelRunnerDestroy (runner);
|
|
JxlEncoderDestroy (encoder);
|
|
g_free (picture_buffer);
|
|
return FALSE;
|
|
}
|
|
}
|
|
else
|
|
{
|
|
if (profile)
|
|
{
|
|
g_object_unref (profile);
|
|
profile = NULL;
|
|
}
|
|
|
|
status = JxlEncoderSetColorEncoding (encoder, &color_profile);
|
|
if (status != JXL_ENC_SUCCESS)
|
|
{
|
|
g_set_error (error, G_FILE_ERROR, 0,
|
|
"JxlEncoderSetColorEncoding failed!");
|
|
JxlThreadParallelRunnerDestroy (runner);
|
|
JxlEncoderDestroy (encoder);
|
|
g_free (picture_buffer);
|
|
return FALSE;
|
|
}
|
|
}
|
|
|
|
encoder_options = JxlEncoderFrameSettingsCreate (encoder, NULL);
|
|
|
|
if (lossless)
|
|
{
|
|
JxlEncoderSetFrameDistance (encoder_options, 0);
|
|
JxlEncoderSetFrameLossless (encoder_options, JXL_TRUE);
|
|
}
|
|
else
|
|
{
|
|
JxlEncoderSetFrameDistance (encoder_options, compression);
|
|
JxlEncoderSetFrameLossless (encoder_options, JXL_FALSE);
|
|
}
|
|
|
|
status = JxlEncoderFrameSettingsSetOption (encoder_options, JXL_ENC_FRAME_SETTING_EFFORT, speed);
|
|
if (status != JXL_ENC_SUCCESS)
|
|
{
|
|
g_printerr ("JxlEncoderFrameSettingsSetOption failed to set effort %d", speed);
|
|
}
|
|
|
|
pika_progress_update (0.5);
|
|
|
|
status = JxlEncoderAddImageFrame (encoder_options, &pixel_format,
|
|
(cmyk) ? cmy_buffer : picture_buffer,
|
|
buffer_size);
|
|
if (status != JXL_ENC_SUCCESS)
|
|
{
|
|
g_set_error (error, G_FILE_ERROR, 0,
|
|
"JxlEncoderAddImageFrame failed!");
|
|
JxlThreadParallelRunnerDestroy (runner);
|
|
JxlEncoderDestroy (encoder);
|
|
g_free (picture_buffer);
|
|
return FALSE;
|
|
}
|
|
|
|
if (cmyk)
|
|
{
|
|
JxlExtraChannelInfo extra;
|
|
JxlExtraChannelInfo extra_alpha;
|
|
|
|
JxlEncoderInitExtraChannelInfo (JXL_CHANNEL_BLACK, &extra);
|
|
|
|
extra.bits_per_sample = output_info.bits_per_sample;
|
|
extra.exponent_bits_per_sample = output_info.exponent_bits_per_sample;
|
|
|
|
/* Key Channel */
|
|
status = JxlEncoderSetExtraChannelInfo (encoder, 0, &extra);
|
|
if (status != JXL_ENC_SUCCESS)
|
|
g_printerr ("JxlEncoderSetExtraChannelInfo failed");
|
|
|
|
status = JxlEncoderSetExtraChannelBuffer (encoder_options, &pixel_format,
|
|
key_buffer, channel_buffer_size,
|
|
0);
|
|
if (status != JXL_ENC_SUCCESS)
|
|
g_printerr ("JxlEncoderSetExtraChannelBuffer failed");
|
|
|
|
if (alpha_buffer)
|
|
{
|
|
/* Alpha Channel */
|
|
JxlEncoderInitExtraChannelInfo (JXL_CHANNEL_ALPHA, &extra_alpha);
|
|
|
|
extra_alpha.bits_per_sample = output_info.bits_per_sample;
|
|
extra_alpha.exponent_bits_per_sample = output_info.exponent_bits_per_sample;
|
|
|
|
status = JxlEncoderSetExtraChannelInfo (encoder, 1, &extra_alpha);
|
|
if (status != JXL_ENC_SUCCESS)
|
|
g_printerr ("JxlEncoderSetExtraChannelInfo failed");
|
|
|
|
status = JxlEncoderSetExtraChannelBuffer (encoder_options,
|
|
&pixel_format,
|
|
alpha_buffer,
|
|
channel_buffer_size, 1);
|
|
if (status != JXL_ENC_SUCCESS)
|
|
g_printerr ("JxlEncoderSetExtraChannelBuffer failed");
|
|
|
|
g_free (alpha_buffer);
|
|
}
|
|
|
|
g_free (key_buffer);
|
|
}
|
|
|
|
pika_progress_update (0.65);
|
|
|
|
if (metadata && (save_exif || save_xmp))
|
|
{
|
|
PikaMetadata *filtered_metadata;
|
|
PikaMetadataSaveFlags metadata_flags = 0;
|
|
|
|
if (save_exif)
|
|
{
|
|
metadata_flags |= PIKA_METADATA_SAVE_EXIF;
|
|
}
|
|
|
|
if (save_xmp)
|
|
{
|
|
metadata_flags |= PIKA_METADATA_SAVE_XMP;
|
|
}
|
|
|
|
filtered_metadata = pika_image_metadata_save_filter (image, "image/jxl", metadata, metadata_flags, NULL, error);
|
|
if (! filtered_metadata)
|
|
{
|
|
if (error && *error)
|
|
{
|
|
g_printerr ("%s: error filtering metadata: %s",
|
|
G_STRFUNC, (*error)->message);
|
|
g_clear_error (error);
|
|
}
|
|
}
|
|
else
|
|
{
|
|
GExiv2Metadata *filtered_g2metadata = GEXIV2_METADATA (filtered_metadata);
|
|
|
|
/* EXIF metadata */
|
|
if (save_exif && gexiv2_metadata_has_exif (filtered_g2metadata))
|
|
{
|
|
GBytes *raw_exif_data;
|
|
|
|
raw_exif_data = gexiv2_metadata_get_exif_data (filtered_g2metadata, GEXIV2_BYTE_ORDER_LITTLE, error);
|
|
if (raw_exif_data)
|
|
{
|
|
gsize exif_size = 0;
|
|
gconstpointer exif_buffer = g_bytes_get_data (raw_exif_data, &exif_size);
|
|
|
|
if (exif_size >= 4)
|
|
{
|
|
const JxlBoxType exif_box_type = { 'E', 'x', 'i', 'f' };
|
|
uint8_t *content = g_new (uint8_t, exif_size + 4);
|
|
|
|
content[0] = 0;
|
|
content[1] = 0;
|
|
content[2] = 0;
|
|
content[3] = 0;
|
|
memcpy (content + 4, exif_buffer, exif_size);
|
|
|
|
if (JxlEncoderAddBox (encoder, exif_box_type, content, exif_size + 4, JXL_FALSE) != JXL_ENC_SUCCESS)
|
|
{
|
|
g_printerr ("%s: Failed to save EXIF metadata.\n", G_STRFUNC);
|
|
}
|
|
|
|
g_free (content);
|
|
}
|
|
g_bytes_unref (raw_exif_data);
|
|
}
|
|
else
|
|
{
|
|
if (error && *error)
|
|
{
|
|
g_printerr ("%s: error preparing EXIF metadata: %s",
|
|
G_STRFUNC, (*error)->message);
|
|
g_clear_error (error);
|
|
}
|
|
}
|
|
}
|
|
|
|
/* XMP metadata */
|
|
if (save_xmp && gexiv2_metadata_has_xmp (filtered_g2metadata))
|
|
{
|
|
gchar *xmp_packet;
|
|
|
|
xmp_packet = gexiv2_metadata_try_generate_xmp_packet (filtered_g2metadata, GEXIV2_USE_COMPACT_FORMAT | GEXIV2_OMIT_ALL_FORMATTING, 0, NULL);
|
|
if (xmp_packet)
|
|
{
|
|
int xmp_size = strlen (xmp_packet);
|
|
if (xmp_size > 0)
|
|
{
|
|
const JxlBoxType xml_box_type = { 'x', 'm', 'l', ' ' };
|
|
if (JxlEncoderAddBox (encoder, xml_box_type, (const uint8_t *) xmp_packet, xmp_size, JXL_FALSE) != JXL_ENC_SUCCESS)
|
|
{
|
|
g_printerr ("%s: Failed to save XMP metadata.\n", G_STRFUNC);
|
|
}
|
|
}
|
|
g_free (xmp_packet);
|
|
}
|
|
}
|
|
|
|
g_object_unref (filtered_metadata);
|
|
}
|
|
}
|
|
|
|
JxlEncoderCloseInput (encoder);
|
|
|
|
pika_progress_update (0.7);
|
|
|
|
compressed = g_byte_array_sized_new (4096);
|
|
g_byte_array_set_size (compressed, 4096);
|
|
do
|
|
{
|
|
next_out = compressed->data + offset;
|
|
avail_out = compressed->len - offset;
|
|
status = JxlEncoderProcessOutput (encoder, &next_out, &avail_out);
|
|
|
|
if (status == JXL_ENC_NEED_MORE_OUTPUT)
|
|
{
|
|
offset = next_out - compressed->data;
|
|
g_byte_array_set_size (compressed, compressed->len * 2);
|
|
}
|
|
else if (status == JXL_ENC_ERROR)
|
|
{
|
|
g_set_error (error, G_FILE_ERROR, 0,
|
|
"JxlEncoderProcessOutput failed!");
|
|
JxlThreadParallelRunnerDestroy (runner);
|
|
JxlEncoderDestroy (encoder);
|
|
g_free (picture_buffer);
|
|
return FALSE;
|
|
}
|
|
}
|
|
while (status != JXL_ENC_SUCCESS);
|
|
|
|
JxlThreadParallelRunnerDestroy (runner);
|
|
JxlEncoderDestroy (encoder);
|
|
|
|
g_free (picture_buffer);
|
|
|
|
g_byte_array_set_size (compressed, next_out - compressed->data);
|
|
|
|
pika_progress_update (0.8);
|
|
|
|
if (compressed->len > 0)
|
|
{
|
|
outfile = g_fopen (g_file_peek_path (file), "wb");
|
|
if (!outfile)
|
|
{
|
|
g_set_error (error, G_FILE_ERROR, 0,
|
|
"Could not open '%s' for writing!\n",
|
|
g_file_peek_path (file));
|
|
g_byte_array_free (compressed, TRUE);
|
|
return FALSE;
|
|
}
|
|
|
|
fwrite (compressed->data, 1, compressed->len, outfile);
|
|
fclose (outfile);
|
|
|
|
pika_progress_update (1.0);
|
|
|
|
g_byte_array_free (compressed, TRUE);
|
|
return TRUE;
|
|
}
|
|
|
|
g_set_error (error, G_FILE_ERROR, 0,
|
|
"No data to write");
|
|
g_byte_array_free (compressed, TRUE);
|
|
return FALSE;
|
|
}
|
|
|
|
static gboolean
|
|
save_dialog (PikaImage *image,
|
|
PikaProcedure *procedure,
|
|
GObject *config)
|
|
{
|
|
GtkWidget *dialog;
|
|
GtkListStore *store;
|
|
GtkWidget *compression_scale;
|
|
GtkWidget *orig_profile_check;
|
|
GtkWidget *profile_label;
|
|
PikaColorProfile *cmyk_profile = NULL;
|
|
gboolean run;
|
|
|
|
dialog = pika_save_procedure_dialog_new (PIKA_SAVE_PROCEDURE (procedure),
|
|
PIKA_PROCEDURE_CONFIG (config),
|
|
image);
|
|
|
|
pika_procedure_dialog_get_widget (PIKA_PROCEDURE_DIALOG (dialog),
|
|
"lossless", GTK_TYPE_CHECK_BUTTON);
|
|
|
|
compression_scale = pika_procedure_dialog_get_widget (PIKA_PROCEDURE_DIALOG (dialog),
|
|
"compression",
|
|
PIKA_TYPE_SCALE_ENTRY);
|
|
|
|
g_object_bind_property (config, "lossless",
|
|
compression_scale, "sensitive",
|
|
G_BINDING_SYNC_CREATE |
|
|
G_BINDING_INVERT_BOOLEAN);
|
|
|
|
store = pika_int_store_new (_("lightning (fastest)"), 1,
|
|
_("thunder"), 2,
|
|
_("falcon (faster)"), 3,
|
|
_("cheetah"), 4,
|
|
_("hare"), 5,
|
|
_("wombat"), 6,
|
|
_("squirrel"), 7,
|
|
_("kitten"), 8,
|
|
_("tortoise (slower)"), 9,
|
|
NULL);
|
|
|
|
pika_procedure_dialog_get_int_combo (PIKA_PROCEDURE_DIALOG (dialog),
|
|
"speed", PIKA_INT_STORE (store));
|
|
|
|
store = pika_int_store_new (_("8 bit/channel"), 8,
|
|
_("16 bit/channel"), 16,
|
|
NULL);
|
|
|
|
pika_procedure_dialog_get_int_combo (PIKA_PROCEDURE_DIALOG (dialog),
|
|
"save-bit-depth", PIKA_INT_STORE (store));
|
|
|
|
/* Profile label */
|
|
profile_label = pika_procedure_dialog_get_label (PIKA_PROCEDURE_DIALOG (dialog),
|
|
"profile-label", _("CMYK profile required for export"),
|
|
FALSE, FALSE);
|
|
gtk_label_set_xalign (GTK_LABEL (profile_label), 0.0);
|
|
gtk_label_set_ellipsize (GTK_LABEL (profile_label), PANGO_ELLIPSIZE_END);
|
|
pika_label_set_attributes (GTK_LABEL (profile_label),
|
|
PANGO_ATTR_STYLE, PANGO_STYLE_ITALIC,
|
|
-1);
|
|
pika_help_set_help_data (profile_label,
|
|
_("Name of the color profile used for CMYK export."), NULL);
|
|
pika_procedure_dialog_fill_frame (PIKA_PROCEDURE_DIALOG (dialog),
|
|
"cmyk-frame", "cmyk", FALSE,
|
|
"profile-label");
|
|
cmyk_profile = pika_image_get_simulation_profile (image);
|
|
|
|
if (! cmyk_profile)
|
|
{
|
|
g_object_set (config,
|
|
"cmyk", FALSE,
|
|
NULL);
|
|
}
|
|
|
|
if (cmyk_profile)
|
|
{
|
|
if (pika_color_profile_is_cmyk (cmyk_profile))
|
|
{
|
|
gchar *label_text;
|
|
|
|
label_text = g_strdup_printf (_("Profile: %s"),
|
|
pika_color_profile_get_label (cmyk_profile));
|
|
gtk_label_set_text (GTK_LABEL (profile_label), label_text);
|
|
pika_label_set_attributes (GTK_LABEL (profile_label),
|
|
PANGO_ATTR_STYLE, PANGO_STYLE_NORMAL,
|
|
-1);
|
|
g_free (label_text);
|
|
}
|
|
g_object_unref (cmyk_profile);
|
|
}
|
|
|
|
/* JPEG XL requires a CMYK profile if exporting as CMYK */
|
|
pika_procedure_dialog_set_sensitive (PIKA_PROCEDURE_DIALOG (dialog),
|
|
"cmyk",
|
|
cmyk_profile != NULL,
|
|
NULL, NULL, FALSE);
|
|
|
|
orig_profile_check = pika_procedure_dialog_get_widget (PIKA_PROCEDURE_DIALOG (dialog),
|
|
"uses-original-profile",
|
|
GTK_TYPE_CHECK_BUTTON);
|
|
|
|
g_object_bind_property (config, "lossless",
|
|
orig_profile_check, "sensitive",
|
|
G_BINDING_SYNC_CREATE |
|
|
G_BINDING_INVERT_BOOLEAN);
|
|
|
|
pika_procedure_dialog_fill (PIKA_PROCEDURE_DIALOG (dialog),
|
|
"lossless", "compression",
|
|
"speed", "save-bit-depth",
|
|
"cmyk-frame",
|
|
"uses-original-profile",
|
|
"save-exif", "save-xmp",
|
|
NULL);
|
|
|
|
run = pika_procedure_dialog_run (PIKA_PROCEDURE_DIALOG (dialog));
|
|
|
|
gtk_widget_destroy (dialog);
|
|
|
|
return run;
|
|
}
|
|
|
|
|
|
static PikaValueArray *
|
|
jpegxl_save (PikaProcedure *procedure,
|
|
PikaRunMode run_mode,
|
|
PikaImage *image,
|
|
gint n_drawables,
|
|
PikaDrawable **drawables,
|
|
GFile *file,
|
|
PikaMetadata *metadata,
|
|
PikaProcedureConfig *config,
|
|
gpointer run_data)
|
|
{
|
|
PikaPDBStatusType status = PIKA_PDB_SUCCESS;
|
|
PikaExportReturn export = PIKA_EXPORT_CANCEL;
|
|
GError *error = NULL;
|
|
|
|
gegl_init (NULL, NULL);
|
|
|
|
switch (run_mode)
|
|
{
|
|
case PIKA_RUN_INTERACTIVE:
|
|
case PIKA_RUN_WITH_LAST_VALS:
|
|
pika_ui_init (PLUG_IN_BINARY);
|
|
|
|
export = pika_export_image (&image, &n_drawables, &drawables, "JPEG XL",
|
|
PIKA_EXPORT_CAN_HANDLE_RGB |
|
|
PIKA_EXPORT_CAN_HANDLE_GRAY |
|
|
PIKA_EXPORT_CAN_HANDLE_ALPHA);
|
|
|
|
if (export == PIKA_EXPORT_CANCEL)
|
|
{
|
|
return pika_procedure_new_return_values (procedure,
|
|
PIKA_PDB_CANCEL,
|
|
NULL);
|
|
}
|
|
break;
|
|
|
|
default:
|
|
break;
|
|
}
|
|
|
|
if (n_drawables < 1)
|
|
{
|
|
g_set_error (&error, G_FILE_ERROR, 0,
|
|
"No drawables to export");
|
|
|
|
return pika_procedure_new_return_values (procedure,
|
|
PIKA_PDB_CALLING_ERROR,
|
|
error);
|
|
}
|
|
|
|
if (run_mode == PIKA_RUN_INTERACTIVE)
|
|
{
|
|
if (! save_dialog (image, procedure, G_OBJECT (config)))
|
|
{
|
|
status = PIKA_PDB_CANCEL;
|
|
}
|
|
}
|
|
|
|
if (status == PIKA_PDB_SUCCESS)
|
|
{
|
|
PikaMetadataSaveFlags metadata_flags;
|
|
|
|
PikaMetadata *metadata = pika_image_metadata_save_prepare (image, "image/jxl", &metadata_flags);
|
|
|
|
if (! save_image (file, config, image, drawables[0], metadata, &error))
|
|
{
|
|
status = PIKA_PDB_EXECUTION_ERROR;
|
|
}
|
|
|
|
if (metadata)
|
|
{
|
|
g_object_unref (metadata);
|
|
}
|
|
}
|
|
|
|
if (export == PIKA_EXPORT_EXPORT)
|
|
{
|
|
g_free (drawables);
|
|
pika_image_delete (image);
|
|
}
|
|
|
|
return pika_procedure_new_return_values (procedure, status, error);
|
|
}
|