mirror of https://github.com/GNOME/gimp.git
1001 lines
30 KiB
C
1001 lines
30 KiB
C
/* 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 2 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, write to the Free Software
|
|
* Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
|
|
*/
|
|
|
|
#include "config.h"
|
|
|
|
#include <string.h>
|
|
|
|
#include <glib.h> /* lcms.h uses the "inline" keyword */
|
|
|
|
#ifdef HAVE_LCMS_LCMS_H
|
|
#include <lcms/lcms.h>
|
|
#else
|
|
#include <lcms.h>
|
|
#endif
|
|
|
|
#include <libgimp/gimp.h>
|
|
#include <libgimp/gimpui.h>
|
|
|
|
#include "libgimp/stdplugins-intl.h"
|
|
|
|
|
|
#define PLUG_IN_BINARY "lcms"
|
|
|
|
#define PLUG_IN_PROC_SET "plug-in-icc-profile-set"
|
|
#define PLUG_IN_PROC_SET_RGB "plug-in-icc-profile-set-rgb"
|
|
|
|
#define PLUG_IN_PROC_APPLY "plug-in-icc-profile-apply"
|
|
#define PLUG_IN_PROC_APPLY_RGB "plug-in-icc-profile-apply-rgb"
|
|
|
|
#define PLUG_IN_PROC_INFO "plug-in-icc-profile-info"
|
|
#define PLUG_IN_PROC_FILE_INFO "plug-in-icc-profile-file-info"
|
|
|
|
|
|
enum
|
|
{
|
|
STATUS,
|
|
PROFILE_NAME,
|
|
PROFILE_DESC,
|
|
PROFILE_INFO,
|
|
NUM_RETURN_VALS
|
|
};
|
|
|
|
enum
|
|
{
|
|
PROC_SET,
|
|
PROC_SET_RGB,
|
|
PROC_APPLY,
|
|
PROC_APPLY_RGB,
|
|
PROC_INFO,
|
|
PROC_FILE_INFO,
|
|
NONE
|
|
};
|
|
|
|
typedef struct
|
|
{
|
|
const gchar *name;
|
|
const gint nparams;
|
|
} Procedure;
|
|
|
|
|
|
static void query (void);
|
|
static void run (const gchar *name,
|
|
gint nparams,
|
|
const GimpParam *param,
|
|
gint *nreturn_vals,
|
|
GimpParam **return_vals);
|
|
|
|
static GimpPDBStatusType lcms_icc_set (GimpColorConfig *config,
|
|
gint32 image,
|
|
const gchar *filename);
|
|
static GimpPDBStatusType lcms_icc_apply (GimpColorConfig *config,
|
|
GimpRunMode run_mode,
|
|
gint32 image,
|
|
const gchar *filename,
|
|
gboolean *dont_ask);
|
|
static GimpPDBStatusType lcms_icc_info (GimpColorConfig *config,
|
|
gint32 image,
|
|
gchar **name,
|
|
gchar **desc,
|
|
gchar **info);
|
|
static GimpPDBStatusType lcms_icc_file_info (const gchar *filename,
|
|
gchar **name,
|
|
gchar **desc,
|
|
gchar **info);
|
|
|
|
static cmsHPROFILE lcms_image_get_profile (GimpColorConfig *config,
|
|
gint32 image);
|
|
static gboolean lcms_image_set_profile (gint32 image,
|
|
const gchar *filename);
|
|
static void lcms_image_transform_rgb (gint32 image,
|
|
cmsHPROFILE src_profile,
|
|
cmsHPROFILE dest_profile);
|
|
static void lcms_image_transform_indexed (gint32 image,
|
|
cmsHPROFILE src_profile,
|
|
cmsHPROFILE dest_profile);
|
|
|
|
static void lcms_drawable_transform (GimpDrawable *drawable,
|
|
cmsHTRANSFORM transform,
|
|
gdouble progress_start,
|
|
gdouble progress_end);
|
|
|
|
static cmsHPROFILE lcms_config_get_profile (GimpColorConfig *config);
|
|
|
|
static gboolean lcms_icc_apply_dialog (gint32 image,
|
|
cmsHPROFILE src_profile,
|
|
cmsHPROFILE dest_profile,
|
|
gboolean *dont_ask);
|
|
|
|
|
|
static const GimpParamDef base_args[] =
|
|
{
|
|
{ GIMP_PDB_INT32, "run-mode", "Interactive, non-interactive" },
|
|
{ GIMP_PDB_IMAGE, "image", "Input image" },
|
|
};
|
|
static const GimpParamDef args[] =
|
|
{
|
|
{ GIMP_PDB_INT32, "run-mode", "Interactive, non-interactive" },
|
|
{ GIMP_PDB_IMAGE, "image", "Input image" },
|
|
{ GIMP_PDB_STRING, "profile", "Filename of an ICC color profile" }
|
|
};
|
|
static const GimpParamDef image_args[] =
|
|
{
|
|
{ GIMP_PDB_IMAGE, "image", "Input image" },
|
|
};
|
|
static const GimpParamDef file_args[] =
|
|
{
|
|
{ GIMP_PDB_STRING, "profile", "Filename of an ICC color profile" }
|
|
};
|
|
|
|
static const Procedure procedures[] =
|
|
{
|
|
{ PLUG_IN_PROC_SET, G_N_ELEMENTS (args) },
|
|
{ PLUG_IN_PROC_SET_RGB, G_N_ELEMENTS (base_args) },
|
|
{ PLUG_IN_PROC_APPLY, G_N_ELEMENTS (args) },
|
|
{ PLUG_IN_PROC_APPLY_RGB, G_N_ELEMENTS (base_args) },
|
|
{ PLUG_IN_PROC_INFO, G_N_ELEMENTS (image_args) },
|
|
{ PLUG_IN_PROC_FILE_INFO, G_N_ELEMENTS (file_args) }
|
|
};
|
|
|
|
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 info_return_vals[] =
|
|
{
|
|
{ GIMP_PDB_STRING, "profile-name", "Name" },
|
|
{ GIMP_PDB_STRING, "profile-desc", "Description" },
|
|
{ GIMP_PDB_STRING, "profile-info", "Info" }
|
|
};
|
|
|
|
gimp_install_procedure (PLUG_IN_PROC_SET,
|
|
"Set ICC color profile on the image",
|
|
"This procedure sets an ICC color profile on an "
|
|
"image using the 'icc-profile' parasite. It does "
|
|
"not do any color conversion.",
|
|
"Sven Neumann",
|
|
"Sven Neumann",
|
|
"2006",
|
|
N_("Set color profile"),
|
|
"RGB*, INDEXED*",
|
|
GIMP_PLUGIN,
|
|
G_N_ELEMENTS (args), 0,
|
|
args, NULL);
|
|
|
|
gimp_install_procedure (PLUG_IN_PROC_SET_RGB,
|
|
"Set the default RGB color profile on the image",
|
|
"This procedure sets the user-configured RGB "
|
|
"profile on an image using the 'icc-profile' "
|
|
"parasite. If no RGB profile is configured, sRGB "
|
|
"is assumed and the parasite is unset. This "
|
|
"procedure does not do any color conversion.",
|
|
"Sven Neumann",
|
|
"Sven Neumann",
|
|
"2006",
|
|
N_("Set default RGB profile"),
|
|
"RGB*, INDEXED*",
|
|
GIMP_PLUGIN,
|
|
G_N_ELEMENTS (base_args), 0,
|
|
base_args, NULL);
|
|
|
|
gimp_install_procedure (PLUG_IN_PROC_APPLY,
|
|
"Apply a color profile on the image",
|
|
"This procedure transform from the image's color "
|
|
"profile (or the default RGB profile if none is "
|
|
"set) to the given ICC color profile. The profile "
|
|
"is then set on the image using the 'icc-profile' "
|
|
"parasite.",
|
|
"Sven Neumann",
|
|
"Sven Neumann",
|
|
"2006",
|
|
N_("Apply color profile"),
|
|
"RGB*, INDEXED*",
|
|
GIMP_PLUGIN,
|
|
G_N_ELEMENTS (args), 0,
|
|
args, NULL);
|
|
|
|
gimp_install_procedure (PLUG_IN_PROC_APPLY_RGB,
|
|
"Apply default RGB color profile on the image",
|
|
"This procedure transform from the image's color "
|
|
"profile (or the default RGB profile if none is "
|
|
"set) to the configured default RGB color profile. "
|
|
"The profile is then set on the image using the "
|
|
"'icc-profile' parasite. If no RGB color profile "
|
|
"is configured, sRGB is assumed and the parasite "
|
|
"is unset.",
|
|
"Sven Neumann",
|
|
"Sven Neumann",
|
|
"2006",
|
|
N_("Apply default RGB profile"),
|
|
"RGB*, INDEXED*",
|
|
GIMP_PLUGIN,
|
|
G_N_ELEMENTS (base_args), 0,
|
|
base_args, NULL);
|
|
|
|
gimp_install_procedure (PLUG_IN_PROC_INFO,
|
|
"Retrieve information about an image's color profile",
|
|
"This procedure returns information about the "
|
|
"color profile attached to an image. If no profile "
|
|
"is attached, sRGB is assumed.",
|
|
"Sven Neumann",
|
|
"Sven Neumann",
|
|
"2006",
|
|
N_("Color Profile Information"),
|
|
"*",
|
|
GIMP_PLUGIN,
|
|
G_N_ELEMENTS (image_args),
|
|
G_N_ELEMENTS (info_return_vals),
|
|
image_args, info_return_vals);
|
|
|
|
gimp_install_procedure (PLUG_IN_PROC_FILE_INFO,
|
|
"Retrieve information about a color profile",
|
|
"This procedure returns information about an ICC "
|
|
"color profile on disk.",
|
|
"Sven Neumann",
|
|
"Sven Neumann",
|
|
"2006",
|
|
N_("Color Profile Information"),
|
|
"*",
|
|
GIMP_PLUGIN,
|
|
G_N_ELEMENTS (file_args),
|
|
G_N_ELEMENTS (info_return_vals),
|
|
file_args, info_return_vals);
|
|
}
|
|
|
|
static void
|
|
run (const gchar *name,
|
|
gint nparams,
|
|
const GimpParam *param,
|
|
gint *nreturn_vals,
|
|
GimpParam **return_vals)
|
|
{
|
|
GimpPDBStatusType status = GIMP_PDB_CALLING_ERROR;
|
|
gint proc = NONE;
|
|
GimpRunMode run_mode = GIMP_RUN_NONINTERACTIVE;
|
|
gint32 image = -1;
|
|
const gchar *filename = NULL;
|
|
GimpColorConfig *config = NULL;
|
|
gboolean dont_ask = FALSE;
|
|
static GimpParam values[6];
|
|
|
|
INIT_I18N ();
|
|
|
|
values[0].type = GIMP_PDB_STATUS;
|
|
values[0].data.d_status = status;
|
|
|
|
*nreturn_vals = 1;
|
|
*return_vals = values;
|
|
|
|
for (proc = 0; proc < G_N_ELEMENTS (procedures); proc++)
|
|
{
|
|
if (strcmp (name, procedures[proc].name) == 0)
|
|
break;
|
|
}
|
|
|
|
if (proc == NONE)
|
|
{
|
|
values[0].data.d_status = GIMP_PDB_CALLING_ERROR;
|
|
return;
|
|
}
|
|
|
|
if (nparams < procedures[proc].nparams)
|
|
{
|
|
values[0].data.d_status = GIMP_PDB_CALLING_ERROR;
|
|
return;
|
|
}
|
|
|
|
if (proc != PROC_FILE_INFO)
|
|
config = gimp_get_color_configuration ();
|
|
|
|
switch (proc)
|
|
{
|
|
case PROC_SET:
|
|
case PROC_APPLY:
|
|
filename = param[2].data.d_string;
|
|
/* fallthrough */
|
|
|
|
case PROC_SET_RGB:
|
|
case PROC_APPLY_RGB:
|
|
run_mode = param[0].data.d_int32;
|
|
image = param[1].data.d_image;
|
|
break;
|
|
|
|
case PROC_INFO:
|
|
image = param[0].data.d_image;
|
|
break;
|
|
|
|
case PROC_FILE_INFO:
|
|
filename = param[0].data.d_string;
|
|
break;
|
|
}
|
|
|
|
switch (proc)
|
|
{
|
|
case PROC_SET:
|
|
case PROC_SET_RGB:
|
|
status = lcms_icc_set (config, image, filename);
|
|
break;
|
|
|
|
case PROC_APPLY:
|
|
case PROC_APPLY_RGB:
|
|
status = lcms_icc_apply (config, run_mode, image, filename, &dont_ask);
|
|
|
|
if (run_mode == GIMP_RUN_INTERACTIVE)
|
|
{
|
|
*nreturn_vals = 2;
|
|
|
|
values[1].type = GIMP_PDB_INT32;
|
|
values[1].data.d_int32 = dont_ask;
|
|
}
|
|
break;
|
|
|
|
case PROC_INFO:
|
|
case PROC_FILE_INFO:
|
|
{
|
|
gchar *name;
|
|
gchar *desc;
|
|
gchar *info;
|
|
|
|
cmsErrorAction (LCMS_ERROR_IGNORE);
|
|
|
|
if (proc == PROC_INFO)
|
|
status = lcms_icc_info (config, image, &name, &desc, &info);
|
|
else
|
|
status = lcms_icc_file_info (filename, &name, &desc, &info);
|
|
|
|
if (status == GIMP_PDB_SUCCESS)
|
|
{
|
|
*nreturn_vals = NUM_RETURN_VALS;
|
|
|
|
values[PROFILE_NAME].type = GIMP_PDB_STRING;
|
|
values[PROFILE_NAME].data.d_string = name;
|
|
|
|
values[PROFILE_DESC].type = GIMP_PDB_STRING;
|
|
values[PROFILE_DESC].data.d_string = desc;
|
|
|
|
values[PROFILE_INFO].type = GIMP_PDB_STRING;
|
|
values[PROFILE_INFO].data.d_string = info;
|
|
}
|
|
}
|
|
break;
|
|
}
|
|
|
|
if (config)
|
|
g_object_unref (config);
|
|
|
|
values[0].data.d_status = status;
|
|
}
|
|
|
|
static gchar *
|
|
lcms_icc_profile_get_name (cmsHPROFILE profile)
|
|
{
|
|
return gimp_any_to_utf8 (cmsTakeProductName (profile), -1, NULL);
|
|
}
|
|
|
|
static gchar *
|
|
lcms_icc_profile_get_desc (cmsHPROFILE profile)
|
|
{
|
|
return gimp_any_to_utf8 (cmsTakeProductDesc (profile), -1, NULL);
|
|
}
|
|
|
|
static gchar *
|
|
lcms_icc_profile_get_info (cmsHPROFILE profile)
|
|
{
|
|
return gimp_any_to_utf8 (cmsTakeProductInfo (profile), -1, NULL);
|
|
}
|
|
|
|
static gboolean
|
|
lcms_icc_profile_is_rgb (cmsHPROFILE profile)
|
|
{
|
|
return (cmsGetColorSpace (profile) == icSigRgbData);
|
|
}
|
|
|
|
static GimpPDBStatusType
|
|
lcms_icc_set (GimpColorConfig *config,
|
|
gint32 image,
|
|
const gchar *filename)
|
|
{
|
|
gboolean success;
|
|
|
|
g_return_val_if_fail (GIMP_IS_COLOR_CONFIG (config), GIMP_PDB_CALLING_ERROR);
|
|
g_return_val_if_fail (image != -1, GIMP_PDB_CALLING_ERROR);
|
|
|
|
if (filename)
|
|
{
|
|
success = lcms_image_set_profile (image, filename);
|
|
}
|
|
else
|
|
{
|
|
success = lcms_image_set_profile (image, config->rgb_profile);
|
|
}
|
|
|
|
return success ? GIMP_PDB_SUCCESS : GIMP_PDB_EXECUTION_ERROR;
|
|
}
|
|
|
|
static GimpPDBStatusType
|
|
lcms_icc_apply (GimpColorConfig *config,
|
|
GimpRunMode run_mode,
|
|
gint32 image,
|
|
const gchar *filename,
|
|
gboolean *dont_ask)
|
|
{
|
|
GimpPDBStatusType status = GIMP_PDB_SUCCESS;
|
|
cmsHPROFILE src_profile = NULL;
|
|
cmsHPROFILE dest_profile = NULL;
|
|
|
|
g_return_val_if_fail (GIMP_IS_COLOR_CONFIG (config), GIMP_PDB_CALLING_ERROR);
|
|
g_return_val_if_fail (image != -1, GIMP_PDB_CALLING_ERROR);
|
|
|
|
if (! filename)
|
|
filename = config->rgb_profile;
|
|
|
|
if (filename)
|
|
{
|
|
dest_profile = cmsOpenProfileFromFile (filename, "r");
|
|
|
|
if (! dest_profile)
|
|
{
|
|
g_message (_("Could not open color profile from '%s'"),
|
|
gimp_filename_to_utf8 (filename));
|
|
|
|
return GIMP_PDB_EXECUTION_ERROR;
|
|
}
|
|
|
|
if (! lcms_icc_profile_is_rgb (dest_profile))
|
|
{
|
|
g_message (_("Color profile '%s' is not for RGB color space."),
|
|
gimp_filename_to_utf8 (filename));
|
|
|
|
cmsCloseProfile (dest_profile);
|
|
return GIMP_PDB_EXECUTION_ERROR;
|
|
}
|
|
}
|
|
|
|
src_profile = lcms_image_get_profile (config, image);
|
|
|
|
if (src_profile && ! lcms_icc_profile_is_rgb (src_profile))
|
|
{
|
|
g_printerr ("lcms: attached color profile is not for RGB color space\n");
|
|
|
|
cmsCloseProfile (src_profile);
|
|
src_profile = NULL;
|
|
}
|
|
|
|
if (! src_profile && ! dest_profile)
|
|
return GIMP_PDB_SUCCESS;
|
|
|
|
if (! src_profile)
|
|
src_profile = cmsCreate_sRGBProfile ();
|
|
|
|
if (! dest_profile)
|
|
dest_profile = cmsCreate_sRGBProfile ();
|
|
|
|
if (run_mode == GIMP_RUN_INTERACTIVE &&
|
|
! lcms_icc_apply_dialog (image, src_profile, dest_profile, dont_ask))
|
|
{
|
|
status = GIMP_PDB_CANCEL;
|
|
}
|
|
|
|
if (status == GIMP_PDB_SUCCESS)
|
|
{
|
|
if (! lcms_image_set_profile (image, filename))
|
|
{
|
|
status = GIMP_PDB_EXECUTION_ERROR;
|
|
}
|
|
}
|
|
|
|
if (status == GIMP_PDB_SUCCESS)
|
|
{
|
|
gchar *src = lcms_icc_profile_get_desc (src_profile);
|
|
gchar *dest = lcms_icc_profile_get_desc (dest_profile);
|
|
|
|
/* ICC color profile conversion */
|
|
gimp_progress_init_printf (_("Converting from '%s' to '%s'"), src, dest);
|
|
|
|
g_printerr ("lcms: converting from '%s' to '%s'\n", src, dest);
|
|
|
|
g_free (dest);
|
|
g_free (src);
|
|
|
|
switch (gimp_image_base_type (image))
|
|
{
|
|
case GIMP_RGB:
|
|
lcms_image_transform_rgb (image, src_profile, dest_profile);
|
|
break;
|
|
|
|
case GIMP_GRAY:
|
|
g_warning ("colorspace conversion not implemented for "
|
|
"grayscale images");
|
|
break;
|
|
|
|
case GIMP_INDEXED:
|
|
lcms_image_transform_indexed (image, src_profile, dest_profile);
|
|
break;
|
|
}
|
|
|
|
gimp_progress_update (1.0);
|
|
gimp_displays_flush ();
|
|
}
|
|
|
|
cmsCloseProfile (src_profile);
|
|
cmsCloseProfile (dest_profile);
|
|
|
|
return status;
|
|
}
|
|
|
|
static GimpPDBStatusType
|
|
lcms_icc_info (GimpColorConfig *config,
|
|
gint32 image,
|
|
gchar **name,
|
|
gchar **desc,
|
|
gchar **info)
|
|
{
|
|
cmsHPROFILE profile;
|
|
|
|
g_return_val_if_fail (GIMP_IS_COLOR_CONFIG (config), GIMP_PDB_CALLING_ERROR);
|
|
g_return_val_if_fail (image != -1, GIMP_PDB_CALLING_ERROR);
|
|
|
|
profile = lcms_image_get_profile (config, image);
|
|
|
|
if (profile)
|
|
{
|
|
*name = lcms_icc_profile_get_name (profile);
|
|
*desc = lcms_icc_profile_get_desc (profile);
|
|
*info = lcms_icc_profile_get_info (profile);
|
|
|
|
cmsCloseProfile (profile);
|
|
}
|
|
else
|
|
{
|
|
*name = g_strdup ("sRGB");
|
|
*desc = g_strdup ("sRGB built-in");
|
|
*info = g_strdup (_("Default RGB working space"));
|
|
}
|
|
|
|
return GIMP_PDB_SUCCESS;
|
|
}
|
|
|
|
static GimpPDBStatusType
|
|
lcms_icc_file_info (const gchar *filename,
|
|
gchar **name,
|
|
gchar **desc,
|
|
gchar **info)
|
|
{
|
|
cmsHPROFILE profile;
|
|
|
|
if (! g_file_test (filename, G_FILE_TEST_IS_REGULAR))
|
|
return GIMP_PDB_EXECUTION_ERROR;
|
|
|
|
profile = cmsOpenProfileFromFile (filename, "r");
|
|
|
|
if (! profile)
|
|
return GIMP_PDB_EXECUTION_ERROR;
|
|
|
|
*name = lcms_icc_profile_get_name (profile);
|
|
*desc = lcms_icc_profile_get_desc (profile);
|
|
*info = lcms_icc_profile_get_info (profile);
|
|
|
|
cmsCloseProfile (profile);
|
|
|
|
return GIMP_PDB_SUCCESS;
|
|
}
|
|
|
|
static cmsHPROFILE
|
|
lcms_image_get_profile (GimpColorConfig *config,
|
|
gint32 image)
|
|
{
|
|
GimpParasite *parasite;
|
|
cmsHPROFILE profile = NULL;
|
|
|
|
g_return_val_if_fail (image != -1, NULL);
|
|
|
|
parasite = gimp_image_parasite_find (image, "icc-profile");
|
|
|
|
if (parasite)
|
|
{
|
|
profile = cmsOpenProfileFromMem ((gpointer) gimp_parasite_data (parasite),
|
|
gimp_parasite_data_size (parasite));
|
|
|
|
/* FIXME: we leak the parasite, the data is used by the profile */
|
|
|
|
if (! profile)
|
|
g_message (_("Data attached as 'icc-profile' does not appear to "
|
|
"be an ICC color profile"));
|
|
}
|
|
else
|
|
{
|
|
profile = lcms_config_get_profile (config);
|
|
}
|
|
|
|
return profile;
|
|
}
|
|
|
|
static gboolean
|
|
lcms_image_set_profile (gint32 image,
|
|
const gchar *filename)
|
|
{
|
|
gboolean success = FALSE;
|
|
|
|
g_return_val_if_fail (image != -1, FALSE);
|
|
|
|
if (filename)
|
|
{
|
|
GMappedFile *file;
|
|
cmsHPROFILE profile;
|
|
GError *error = NULL;
|
|
|
|
file = g_mapped_file_new (filename, FALSE, &error);
|
|
|
|
if (! file)
|
|
{
|
|
g_message (_("Could not open '%s' for reading: %s"),
|
|
gimp_filename_to_utf8 (filename), error->message);
|
|
g_error_free (error);
|
|
|
|
return FALSE;
|
|
}
|
|
|
|
/* check that this file is actually an ICC profile */
|
|
profile = cmsOpenProfileFromMem (g_mapped_file_get_contents (file),
|
|
g_mapped_file_get_length (file));
|
|
|
|
if (profile)
|
|
{
|
|
gboolean rgb = lcms_icc_profile_is_rgb (profile);
|
|
|
|
cmsCloseProfile (profile);
|
|
|
|
if (rgb)
|
|
{
|
|
GimpParasite *parasite;
|
|
|
|
parasite =
|
|
gimp_parasite_new ("icc-profile", GIMP_PARASITE_PERSISTENT,
|
|
g_mapped_file_get_length (file),
|
|
g_mapped_file_get_contents (file));
|
|
gimp_image_parasite_attach (image, parasite);
|
|
gimp_parasite_free (parasite);
|
|
|
|
success = TRUE;
|
|
}
|
|
else
|
|
{
|
|
g_message (_("Color profile '%s' is not for RGB color space."),
|
|
gimp_filename_to_utf8 (filename));
|
|
}
|
|
}
|
|
else
|
|
{
|
|
g_message (_("'%s' does not appear to be an ICC color profile"),
|
|
gimp_filename_to_utf8 (filename));
|
|
}
|
|
|
|
g_mapped_file_free (file);
|
|
}
|
|
else
|
|
{
|
|
gimp_image_parasite_detach (image, "icc-profile");
|
|
|
|
success = TRUE;
|
|
}
|
|
|
|
return success;
|
|
}
|
|
|
|
static void
|
|
lcms_image_transform_rgb (gint32 image,
|
|
cmsHPROFILE src_profile,
|
|
cmsHPROFILE dest_profile)
|
|
{
|
|
cmsHTRANSFORM transform = NULL;
|
|
DWORD last_format = 0;
|
|
gint *layers;
|
|
gint num_layers;
|
|
gint i;
|
|
|
|
layers = gimp_image_get_layers (image, &num_layers);
|
|
|
|
for (i = 0; i < num_layers; i++)
|
|
{
|
|
GimpDrawable *drawable = gimp_drawable_get (layers[i]);
|
|
DWORD format;
|
|
|
|
switch (drawable->bpp)
|
|
{
|
|
case 3:
|
|
format = TYPE_RGB_8;
|
|
break;
|
|
case 4:
|
|
format = TYPE_RGBA_8;
|
|
break;
|
|
|
|
default:
|
|
g_warning ("%s: unexpected bpp", G_GNUC_FUNCTION);
|
|
continue;
|
|
}
|
|
|
|
if (! transform || format != last_format)
|
|
{
|
|
if (transform)
|
|
cmsDeleteTransform (transform);
|
|
|
|
transform = cmsCreateTransform (src_profile, format,
|
|
dest_profile, format,
|
|
INTENT_PERCEPTUAL, 0);
|
|
last_format = format;
|
|
}
|
|
|
|
if (transform)
|
|
{
|
|
lcms_drawable_transform (drawable, transform,
|
|
(gdouble) i / num_layers,
|
|
(gdouble) (i + 1) / num_layers);
|
|
}
|
|
else
|
|
{
|
|
g_warning ("cmsCreateTransform() failed!");
|
|
}
|
|
|
|
gimp_drawable_detach (drawable);
|
|
}
|
|
|
|
if (transform)
|
|
cmsDeleteTransform(transform);
|
|
|
|
g_free (layers);
|
|
}
|
|
|
|
static void
|
|
lcms_image_transform_indexed (gint32 image,
|
|
cmsHPROFILE src_profile,
|
|
cmsHPROFILE dest_profile)
|
|
{
|
|
cmsHTRANSFORM transform;
|
|
guchar *cmap;
|
|
gint num_colors;
|
|
|
|
cmap = gimp_image_get_colormap (image, &num_colors);
|
|
|
|
transform = cmsCreateTransform (src_profile, TYPE_RGB_8,
|
|
dest_profile, TYPE_RGB_8,
|
|
INTENT_PERCEPTUAL, 0);
|
|
|
|
if (transform)
|
|
{
|
|
cmsDoTransform (transform, cmap, cmap, num_colors);
|
|
cmsDeleteTransform(transform);
|
|
}
|
|
else
|
|
{
|
|
g_warning ("cmsCreateTransform() failed!");
|
|
}
|
|
|
|
gimp_image_set_colormap (image, cmap, num_colors);
|
|
}
|
|
|
|
static void
|
|
lcms_drawable_transform (GimpDrawable *drawable,
|
|
cmsHTRANSFORM transform,
|
|
gdouble progress_start,
|
|
gdouble progress_end)
|
|
{
|
|
GimpPixelRgn rgn;
|
|
gpointer pr;
|
|
gdouble range = progress_end - progress_start;
|
|
guint count = 0;
|
|
guint done = 0;
|
|
|
|
gimp_pixel_rgn_init (&rgn, drawable,
|
|
0, 0, drawable->width, drawable->height, TRUE, FALSE);
|
|
|
|
for (pr = gimp_pixel_rgns_register (1, &rgn);
|
|
pr != NULL;
|
|
pr = gimp_pixel_rgns_process (pr))
|
|
{
|
|
guchar *data = rgn.data;
|
|
gint y;
|
|
|
|
for (y = 0; y < rgn.h; y++)
|
|
{
|
|
cmsDoTransform (transform, data, data, rgn.w);
|
|
|
|
data += rgn.rowstride;
|
|
}
|
|
|
|
done += rgn.h * rgn.w;
|
|
|
|
if (count++ % 32 == 0)
|
|
gimp_progress_update (progress_start +
|
|
(gdouble) done /
|
|
(drawable->width * drawable->height) * range);
|
|
}
|
|
|
|
gimp_progress_update (progress_end);
|
|
|
|
gimp_drawable_flush (drawable);
|
|
gimp_drawable_update (drawable->drawable_id,
|
|
0, 0, drawable->width, drawable->height);
|
|
}
|
|
|
|
static cmsHPROFILE
|
|
lcms_config_get_profile (GimpColorConfig *config)
|
|
{
|
|
if (config->rgb_profile)
|
|
{
|
|
cmsHPROFILE profile = cmsOpenProfileFromFile (config->rgb_profile, "r");
|
|
|
|
if (! profile)
|
|
g_message (_("Could not open ICC profile from '%s'"),
|
|
gimp_filename_to_utf8 (config->rgb_profile));
|
|
|
|
return profile;
|
|
}
|
|
|
|
return NULL;
|
|
}
|
|
|
|
static GtkWidget *
|
|
lcms_icc_profile_src_label_new (gint32 image,
|
|
cmsHPROFILE profile)
|
|
{
|
|
GtkWidget *vbox;
|
|
GtkWidget *label;
|
|
gchar *name;
|
|
gchar *desc;
|
|
gchar *text;
|
|
|
|
vbox = gtk_vbox_new (FALSE, 6);
|
|
|
|
name = gimp_image_get_name (image);
|
|
text = g_strdup_printf (_("The image '%s' has an embedded color profile:"),
|
|
name);
|
|
g_free (name);
|
|
|
|
label = g_object_new (GTK_TYPE_LABEL,
|
|
"label", text,
|
|
"wrap", TRUE,
|
|
"justify", GTK_JUSTIFY_LEFT,
|
|
"xalign", 0.0,
|
|
"yalign", 0.0,
|
|
NULL);
|
|
g_free (text);
|
|
|
|
gtk_box_pack_start (GTK_BOX (vbox), label, FALSE, FALSE, 0);
|
|
gtk_widget_show (label);
|
|
|
|
desc = lcms_icc_profile_get_desc (profile);
|
|
label = g_object_new (GTK_TYPE_LABEL,
|
|
"label", desc,
|
|
"wrap", TRUE,
|
|
"justify", GTK_JUSTIFY_LEFT,
|
|
"xalign", 0.0,
|
|
"yalign", 0.0,
|
|
"xpad", 24,
|
|
NULL);
|
|
g_free (desc);
|
|
|
|
gimp_label_set_attributes (GTK_LABEL (label),
|
|
PANGO_ATTR_WEIGHT, PANGO_WEIGHT_BOLD,
|
|
-1);
|
|
gtk_box_pack_start (GTK_BOX (vbox), label, FALSE, FALSE, 0);
|
|
gtk_widget_show (label);
|
|
|
|
return vbox;
|
|
}
|
|
|
|
static GtkWidget *
|
|
lcms_icc_profile_dest_label_new (cmsHPROFILE profile)
|
|
{
|
|
GtkWidget *label;
|
|
gchar *desc;
|
|
gchar *text;
|
|
|
|
desc = lcms_icc_profile_get_desc (profile);
|
|
text = g_strdup_printf (_("Convert the image to the RGB working space (%s)?"),
|
|
desc);
|
|
g_free (desc);
|
|
|
|
label = g_object_new (GTK_TYPE_LABEL,
|
|
"label", text,
|
|
"wrap", TRUE,
|
|
"justify", GTK_JUSTIFY_LEFT,
|
|
"xalign", 0.0,
|
|
"yalign", 0.0,
|
|
NULL);
|
|
g_free (text);
|
|
|
|
return label;
|
|
}
|
|
|
|
|
|
static gboolean
|
|
lcms_icc_apply_dialog (gint32 image,
|
|
cmsHPROFILE src_profile,
|
|
cmsHPROFILE dest_profile,
|
|
gboolean *dont_ask)
|
|
{
|
|
GtkWidget *dialog;
|
|
GtkWidget *vbox;
|
|
GtkWidget *label;
|
|
GtkWidget *button;
|
|
GtkWidget *toggle = NULL;
|
|
gboolean run;
|
|
|
|
gimp_ui_init (PLUG_IN_BINARY, FALSE);
|
|
|
|
dialog = gimp_dialog_new (_("Convert to RGB working space?"),
|
|
PLUG_IN_BINARY,
|
|
NULL, 0,
|
|
gimp_standard_help_func, PLUG_IN_PROC_APPLY,
|
|
|
|
_("_Keep"), GTK_RESPONSE_CANCEL,
|
|
|
|
NULL);
|
|
|
|
button = gtk_dialog_add_button (GTK_DIALOG (dialog),
|
|
_("_Convert"), GTK_RESPONSE_OK);
|
|
gtk_button_set_image (GTK_BUTTON (button),
|
|
gtk_image_new_from_stock (GTK_STOCK_CONVERT,
|
|
GTK_ICON_SIZE_BUTTON));
|
|
|
|
gtk_dialog_set_alternative_button_order (GTK_DIALOG (dialog),
|
|
GTK_RESPONSE_OK,
|
|
GTK_RESPONSE_CANCEL,
|
|
-1);
|
|
|
|
gimp_window_set_transient (GTK_WINDOW (dialog));
|
|
|
|
vbox = gtk_vbox_new (FALSE, 12);
|
|
gtk_container_set_border_width (GTK_CONTAINER (vbox), 12);
|
|
gtk_box_pack_start (GTK_BOX (GTK_DIALOG (dialog)->vbox), vbox, TRUE, TRUE, 0);
|
|
gtk_widget_show (vbox);
|
|
|
|
label = lcms_icc_profile_src_label_new (image, src_profile);
|
|
gtk_box_pack_start (GTK_BOX (vbox), label, FALSE, FALSE, 0);
|
|
gtk_widget_show (label);
|
|
|
|
label = lcms_icc_profile_dest_label_new (dest_profile);
|
|
gtk_box_pack_start (GTK_BOX (vbox), label, FALSE, FALSE, 0);
|
|
gtk_widget_show (label);
|
|
|
|
if (dont_ask)
|
|
{
|
|
toggle = gtk_check_button_new_with_mnemonic (_("_Don't ask me again"));
|
|
gtk_box_pack_end (GTK_BOX (vbox), toggle, FALSE, FALSE, 0);
|
|
gtk_toggle_button_set_active (GTK_TOGGLE_BUTTON (toggle), FALSE);
|
|
gtk_widget_show (toggle);
|
|
}
|
|
|
|
run = (gimp_dialog_run (GIMP_DIALOG (dialog)) == GTK_RESPONSE_OK);
|
|
|
|
*dont_ask = gtk_toggle_button_get_active (GTK_TOGGLE_BUTTON (toggle));
|
|
|
|
gtk_widget_destroy (dialog);
|
|
|
|
return run;
|
|
}
|