dnrops
/
gimp
mirror of https://github.com/GNOME/gimp.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity
gimp/app/operations/gimpoperationblend.c

1197 lines
38 KiB
C
Raw Blame History

/* GIMP - The GNU Image Manipulation Program
* Copyright (C) 1995 Spencer Kimball and Peter Mattis
*
* Largely based on gimpdrawable-blend.c
*
* gimpoperationblend.c
* Copyright (C) 2014 Michael Henning <drawoc@darkrefraction.com>
*
* 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 <http://www.gnu.org/licenses/>.
*/
#include "config.h"
#include <cairo.h>
#include <gegl.h>
#include <gdk-pixbuf/gdk-pixbuf.h>
#include "libgimpcolor/gimpcolor.h"
#include "libgimpmath/gimpmath.h"
#include "operations-types.h"
#include "core/gimpgradient.h"
#include "gimpoperationblend.h"
#include "gimp-intl.h"
//#define USE_GRADIENT_CACHE 1
enum
{
PROP_0,
PROP_CONTEXT,
PROP_GRADIENT,
PROP_START_X,
PROP_START_Y,
PROP_END_X,
PROP_END_Y,
PROP_GRADIENT_TYPE,
PROP_GRADIENT_REPEAT,
PROP_OFFSET,
PROP_GRADIENT_REVERSE,
PROP_SUPERSAMPLE,
PROP_SUPERSAMPLE_DEPTH,
PROP_SUPERSAMPLE_THRESHOLD,
PROP_DITHER
};
typedef struct
{
GimpGradient *gradient;
gboolean reverse;
#ifdef USE_GRADIENT_CACHE
GimpRGB *gradient_cache;
gint gradient_cache_size;
#else
GimpGradientSegment *last_seg;
#endif
gdouble offset;
gdouble sx, sy;
GimpGradientType gradient_type;
gdouble dist;
gdouble vec[2];
GimpRepeatMode repeat;
GimpRGB leftmost_color;
GimpRGB rightmost_color;
GRand *seed;
GeglBuffer *dist_buffer;
} RenderBlendData;
typedef struct
{
GeglBuffer *buffer;
gfloat *row_data;
gint roi_x;
gint width;
GRand *dither_rand;
} PutPixelData;
/* local function prototypes */
static void gimp_operation_blend_dispose (GObject *gobject);
static void gimp_operation_blend_get_property (GObject *object,
guint property_id,
GValue *value,
GParamSpec *pspec);
static void gimp_operation_blend_set_property (GObject *object,
guint property_id,
const GValue *value,
GParamSpec *pspec);
static void gimp_operation_blend_prepare (GeglOperation *operation);
static GeglRectangle gimp_operation_blend_get_bounding_box (GeglOperation *operation);
static gdouble gradient_calc_conical_sym_factor (gdouble dist,
gdouble *axis,
gdouble offset,
gdouble x,
gdouble y);
static gdouble gradient_calc_conical_asym_factor (gdouble dist,
gdouble *axis,
gdouble offset,
gdouble x,
gdouble y);
static gdouble gradient_calc_square_factor (gdouble dist,
gdouble offset,
gdouble x,
gdouble y);
static gdouble gradient_calc_radial_factor (gdouble dist,
gdouble offset,
gdouble x,
gdouble y);
static gdouble gradient_calc_linear_factor (gdouble dist,
gdouble *vec,
gdouble offset,
gdouble x,
gdouble y);
static gdouble gradient_calc_bilinear_factor (gdouble dist,
gdouble *vec,
gdouble offset,
gdouble x,
gdouble y);
static gdouble gradient_calc_spiral_factor (gdouble dist,
gdouble *axis,
gdouble offset,
gdouble x,
gdouble y,
gboolean clockwise);
static gdouble gradient_calc_shapeburst_angular_factor (GeglBuffer *dist_buffer,
gdouble x,
gdouble y);
static gdouble gradient_calc_shapeburst_spherical_factor (GeglBuffer *dist_buffer,
gdouble x,
gdouble y);
static gdouble gradient_calc_shapeburst_dimpled_factor (GeglBuffer *dist_buffer,
gdouble x,
gdouble y);
static void gradient_render_pixel (gdouble x,
gdouble y,
GimpRGB *color,
gpointer render_data);
static void gradient_put_pixel (gint x,
gint y,
GimpRGB *color,
gpointer put_pixel_data);
static gboolean gimp_operation_blend_process (GeglOperation *operation,
GeglBuffer *input,
GeglBuffer *output,
const GeglRectangle *result,
gint level);
G_DEFINE_TYPE (GimpOperationBlend, gimp_operation_blend,
GEGL_TYPE_OPERATION_FILTER)
#define parent_class gimp_operation_blend_parent_class
static void
gimp_operation_blend_class_init (GimpOperationBlendClass *klass)
{
GObjectClass *object_class = G_OBJECT_CLASS (klass);
GeglOperationClass *operation_class = GEGL_OPERATION_CLASS (klass);
GeglOperationFilterClass *filter_class = GEGL_OPERATION_FILTER_CLASS (klass);
object_class->dispose = gimp_operation_blend_dispose;
object_class->set_property = gimp_operation_blend_set_property;
object_class->get_property = gimp_operation_blend_get_property;
operation_class->prepare = gimp_operation_blend_prepare;
operation_class->get_bounding_box = gimp_operation_blend_get_bounding_box;
filter_class->process = gimp_operation_blend_process;
gegl_operation_class_set_keys (operation_class,
"name", "gimp:blend",
"categories", "gimp",
"description", "GIMP Blend operation",
NULL);
g_object_class_install_property (object_class, PROP_CONTEXT,
g_param_spec_object ("context",
"Context",
"A GimpContext",
GIMP_TYPE_OBJECT,
G_PARAM_READWRITE |
G_PARAM_CONSTRUCT));
g_object_class_install_property (object_class, PROP_GRADIENT,
g_param_spec_object ("gradient",
"Gradient",
"A GimpGradient to render",
GIMP_TYPE_OBJECT,
G_PARAM_READWRITE |
G_PARAM_CONSTRUCT));
g_object_class_install_property (object_class, PROP_START_X,
g_param_spec_double ("start-x",
"Start X",
"X coordinate of the first point",
-G_MAXDOUBLE, G_MAXDOUBLE, 0,
G_PARAM_READWRITE |
G_PARAM_CONSTRUCT));
g_object_class_install_property (object_class, PROP_START_Y,
g_param_spec_double ("start-y",
"Start Y",
"Y coordinate of the first point",
-G_MAXDOUBLE, G_MAXDOUBLE, 0,
G_PARAM_READWRITE |
G_PARAM_CONSTRUCT));
g_object_class_install_property (object_class, PROP_END_X,
g_param_spec_double ("end-x",
"End X",
"X coordinate of the second point",
-G_MAXDOUBLE, G_MAXDOUBLE, 200,
G_PARAM_READWRITE |
G_PARAM_CONSTRUCT));
g_object_class_install_property (object_class, PROP_END_Y,
g_param_spec_double ("end-y",
"End Y",
"Y coordinate of the second point",
-G_MAXDOUBLE, G_MAXDOUBLE, 200,
G_PARAM_READWRITE |
G_PARAM_CONSTRUCT));
g_object_class_install_property (object_class, PROP_GRADIENT_TYPE,
g_param_spec_enum ("gradient-type",
"Gradient Type",
"The type of gradient to render",
GIMP_TYPE_GRADIENT_TYPE,
GIMP_GRADIENT_LINEAR,
G_PARAM_READWRITE |
G_PARAM_CONSTRUCT));
g_object_class_install_property (object_class, PROP_GRADIENT_REPEAT,
g_param_spec_enum ("gradient-repeat",
"Repeat mode",
"Repeat mode",
GIMP_TYPE_REPEAT_MODE,
GIMP_REPEAT_NONE,
G_PARAM_READWRITE |
G_PARAM_CONSTRUCT));
g_object_class_install_property (object_class, PROP_OFFSET,
g_param_spec_double ("offset",
"Offset",
"Offset relates to the starting and ending coordinates "
"specified for the blend. This parameter is mode dependent.",
0, G_MAXDOUBLE, 0,
G_PARAM_READWRITE |
G_PARAM_CONSTRUCT));
g_object_class_install_property (object_class, PROP_GRADIENT_REVERSE,
g_param_spec_boolean ("gradient-reverse",
"Reverse",
"Reverse the gradient",
FALSE,
G_PARAM_READWRITE |
G_PARAM_CONSTRUCT));
g_object_class_install_property (object_class, PROP_SUPERSAMPLE,
g_param_spec_boolean ("supersample",
"Supersample",
"Do adaptive supersampling",
FALSE,
G_PARAM_READWRITE |
G_PARAM_CONSTRUCT));
g_object_class_install_property (object_class, PROP_SUPERSAMPLE_DEPTH,
g_param_spec_int ("supersample-depth",
"Max depth",
"Maximum recursion levels for supersampling",
1, 9, 3,
G_PARAM_READWRITE |
G_PARAM_CONSTRUCT));
g_object_class_install_property (object_class, PROP_SUPERSAMPLE_THRESHOLD,
g_param_spec_double ("supersample-threshold",
"Threshold",
"Supersampling threshold",
0, 4, 0.20,
G_PARAM_READWRITE |
G_PARAM_CONSTRUCT));
g_object_class_install_property (object_class, PROP_DITHER,
g_param_spec_boolean ("dither",
"Dither",
"Use dithering to reduce banding",
FALSE,
G_PARAM_READWRITE |
G_PARAM_CONSTRUCT));
}
static void
gimp_operation_blend_init (GimpOperationBlend *self)
{
}
static void
gimp_operation_blend_dispose (GObject *object)
{
GimpOperationBlend *self = GIMP_OPERATION_BLEND (object);
g_clear_object (&self->gradient);
g_clear_object (&self->context);
G_OBJECT_CLASS (parent_class)->dispose (object);
}
static void
gimp_operation_blend_get_property (GObject *object,
guint property_id,
GValue *value,
GParamSpec *pspec)
{
GimpOperationBlend *self = GIMP_OPERATION_BLEND (object);
switch (property_id)
{
case PROP_CONTEXT:
g_value_set_object (value, self->context);
break;
case PROP_GRADIENT:
g_value_set_object (value, self->gradient);
break;
case PROP_START_X:
g_value_set_double (value, self->start_x);
break;
case PROP_START_Y:
g_value_set_double (value, self->start_y);
break;
case PROP_END_X:
g_value_set_double (value, self->end_x);
break;
case PROP_END_Y:
g_value_set_double (value, self->end_y);
break;
case PROP_GRADIENT_TYPE:
g_value_set_enum (value, self->gradient_type);
break;
case PROP_GRADIENT_REPEAT:
g_value_set_enum (value, self->gradient_repeat);
break;
case PROP_OFFSET:
g_value_set_double (value, self->offset);
break;
case PROP_GRADIENT_REVERSE:
g_value_set_boolean (value, self->gradient_reverse);
break;
case PROP_SUPERSAMPLE:
g_value_set_boolean (value, self->supersample);
break;
case PROP_SUPERSAMPLE_DEPTH:
g_value_set_int (value, self->supersample_depth);
break;
case PROP_SUPERSAMPLE_THRESHOLD:
g_value_set_double (value, self->supersample_threshold);
break;
case PROP_DITHER:
g_value_set_boolean (value, self->dither);
break;
default:
G_OBJECT_WARN_INVALID_PROPERTY_ID (object, property_id, pspec);
break;
}
}
static void
gimp_operation_blend_set_property (GObject *object,
guint property_id,
const GValue *value,
GParamSpec *pspec)
{
GimpOperationBlend *self = GIMP_OPERATION_BLEND (object);
switch (property_id)
{
case PROP_CONTEXT:
if (self->context)
g_object_unref (self->context);
self->context = g_value_dup_object (value);
break;
case PROP_GRADIENT:
{
GimpGradient *gradient = g_value_get_object (value);
if (self->gradient)
{
g_object_unref (self->gradient);
self->gradient = NULL;
}
if (gradient)
{
if (gimp_gradient_has_fg_bg_segments (gradient))
self->gradient = gimp_gradient_flatten (gradient, self->context);
else
self->gradient = g_object_ref (gradient);
}
}
break;
case PROP_START_X:
self->start_x = g_value_get_double (value);
break;
case PROP_START_Y:
self->start_y = g_value_get_double (value);
break;
case PROP_END_X:
self->end_x = g_value_get_double (value);
break;
case PROP_END_Y:
self->end_y = g_value_get_double (value);
break;
case PROP_GRADIENT_TYPE:
self->gradient_type = g_value_get_enum (value);
break;
case PROP_GRADIENT_REPEAT:
self->gradient_repeat = g_value_get_enum (value);
break;
case PROP_OFFSET:
self->offset = g_value_get_double (value);
break;
case PROP_GRADIENT_REVERSE:
self->gradient_reverse = g_value_get_boolean (value);
break;
case PROP_SUPERSAMPLE:
self->supersample = g_value_get_boolean (value);
break;
case PROP_SUPERSAMPLE_DEPTH:
self->supersample_depth = g_value_get_int (value);
break;
case PROP_SUPERSAMPLE_THRESHOLD:
self->supersample_threshold = g_value_get_double (value);
break;
case PROP_DITHER:
self->dither = g_value_get_boolean (value);
break;
default:
G_OBJECT_WARN_INVALID_PROPERTY_ID (object, property_id, pspec);
break;
}
}
static void
gimp_operation_blend_prepare (GeglOperation *operation)
{
gegl_operation_set_format (operation, "output", babl_format ("R'G'B'A float"));
}
static GeglRectangle
gimp_operation_blend_get_bounding_box (GeglOperation *operation)
{
return gegl_rectangle_infinite_plane ();
}
static gdouble
gradient_calc_conical_sym_factor (gdouble dist,
gdouble *axis,
gdouble offset,
gdouble x,
gdouble y)
{
if (dist == 0.0)
{
return 0.0;
}
else if ((x != 0) || (y != 0))
{
gdouble vec[2];
gdouble r;
gdouble rat;
/* Calculate offset from the start in pixels */
r = sqrt (SQR (x) + SQR (y));
vec[0] = x / r;
vec[1] = y / r;
rat = axis[0] * vec[0] + axis[1] * vec[1]; /* Dot product */
if (rat > 1.0)
rat = 1.0;
else if (rat < -1.0)
rat = -1.0;
/* This cool idea is courtesy Josh MacDonald,
* Ali Rahimi --- two more XCF losers. */
rat = acos (rat) / G_PI;
rat = pow (rat, (offset / 10.0) + 1.0);
return CLAMP (rat, 0.0, 1.0);
}
else
{
return 0.5;
}
}
static gdouble
gradient_calc_conical_asym_factor (gdouble dist,
gdouble *axis,
gdouble offset,
gdouble x,
gdouble y)
{
if (dist == 0.0)
{
return 0.0;
}
else if (x != 0 || y != 0)
{
gdouble ang0, ang1;
gdouble ang;
gdouble rat;
ang0 = atan2 (axis[0], axis[1]) + G_PI;
ang1 = atan2 (x, y) + G_PI;
ang = ang1 - ang0;
if (ang < 0.0)
ang += (2.0 * G_PI);
rat = ang / (2.0 * G_PI);
rat = pow (rat, (offset / 10.0) + 1.0);
return CLAMP (rat, 0.0, 1.0);
}
else
{
return 0.5; /* We are on middle point */
}
}
static gdouble
gradient_calc_square_factor (gdouble dist,
gdouble offset,
gdouble x,
gdouble y)
{
if (dist == 0.0)
{
return 0.0;
}
else
{
gdouble r;
gdouble rat;
/* Calculate offset from start as a value in [0, 1] */
offset = offset / 100.0;
r = MAX (fabs (x), fabs (y));
rat = r / dist;
if (rat < offset)
return 0.0;
else if (offset == 1.0)
return (rat >= 1.0) ? 1.0 : 0.0;
else
return (rat - offset) / (1.0 - offset);
}
}
static gdouble
gradient_calc_radial_factor (gdouble dist,
gdouble offset,
gdouble x,
gdouble y)
{
if (dist == 0.0)
{
return 0.0;
}
else
{
gdouble r;
gdouble rat;
/* Calculate radial offset from start as a value in [0, 1] */
offset = offset / 100.0;
r = sqrt (SQR (x) + SQR (y));
rat = r / dist;
if (rat < offset)
return 0.0;
else if (offset == 1.0)
return (rat >= 1.0) ? 1.0 : 0.0;
else
return (rat - offset) / (1.0 - offset);
}
}
static gdouble
gradient_calc_linear_factor (gdouble dist,
gdouble *vec,
gdouble offset,
gdouble x,
gdouble y)
{
if (dist == 0.0)
{
return 0.0;
}
else
{
gdouble r;
gdouble rat;
offset = offset / 100.0;
r = vec[0] * x + vec[1] * y;
rat = r / dist;
if (rat >= 0.0 && rat < offset)
return 0.0;
else if (offset == 1.0)
return (rat >= 1.0) ? 1.0 : 0.0;
else if (rat < 0.0)
return rat / (1.0 - offset);
else
return (rat - offset) / (1.0 - offset);
}
}
static gdouble
gradient_calc_bilinear_factor (gdouble dist,
gdouble *vec,
gdouble offset,
gdouble x,
gdouble y)
{
if (dist == 0.0)
{
return 0.0;
}
else
{
gdouble r;
gdouble rat;
/* Calculate linear offset from the start line outward */
offset = offset / 100.0;
r = vec[0] * x + vec[1] * y;
rat = r / dist;
if (fabs (rat) < offset)
return 0.0;
else if (offset == 1.0)
return (rat == 1.0) ? 1.0 : 0.0;
else
return (fabs (rat) - offset) / (1.0 - offset);
}
}
static gdouble
gradient_calc_spiral_factor (gdouble dist,
gdouble *axis,
gdouble offset,
gdouble x,
gdouble y,
gboolean clockwise)
{
if (dist == 0.0)
{
return 0.0;
}
else if (x != 0.0 || y != 0.0)
{
gdouble ang0, ang1;
gdouble ang;
double r;
ang0 = atan2 (axis[0], axis[1]) + G_PI;
ang1 = atan2 (x, y) + G_PI;
if (clockwise)
ang = ang1 - ang0;
else
ang = ang0 - ang1;
if (ang < 0.0)
ang += (2.0 * G_PI);
r = sqrt (SQR (x) + SQR (y)) / dist;
return fmod (ang / (2.0 * G_PI) + r + offset, 1.0);
}
else
{
return 0.5 ; /* We are on the middle point */
}
}
static gdouble
gradient_calc_shapeburst_angular_factor (GeglBuffer *dist_buffer,
gdouble x,
gdouble y)
{
gfloat value;
gegl_buffer_get (dist_buffer, GEGL_RECTANGLE (x, y, 1, 1), 1.0,
NULL, &value,
GEGL_AUTO_ROWSTRIDE, GEGL_ABYSS_NONE);
value = 1.0 - value;
return value;
}
static gdouble
gradient_calc_shapeburst_spherical_factor (GeglBuffer *dist_buffer,
gdouble x,
gdouble y)
{
gfloat value;
gegl_buffer_get (dist_buffer, GEGL_RECTANGLE (x, y, 1, 1), 1.0,
NULL, &value,
GEGL_AUTO_ROWSTRIDE, GEGL_ABYSS_NONE);
value = 1.0 - sin (0.5 * G_PI * value);
return value;
}
static gdouble
gradient_calc_shapeburst_dimpled_factor (GeglBuffer *dist_buffer,
gdouble x,
gdouble y)
{
gfloat value;
gegl_buffer_get (dist_buffer, GEGL_RECTANGLE (x, y, 1, 1), 1.0,
NULL, &value,
GEGL_AUTO_ROWSTRIDE, GEGL_ABYSS_NONE);
value = cos (0.5 * G_PI * value);
return value;
}
static void
gradient_render_pixel (gdouble x,
gdouble y,
GimpRGB *color,
gpointer render_data)
{
RenderBlendData *rbd = render_data;
gdouble factor;
/* we want to calculate the color at the pixel's center */
x += 0.5;
y += 0.5;
/* Calculate blending factor */
switch (rbd->gradient_type)
{
case GIMP_GRADIENT_LINEAR:
factor = gradient_calc_linear_factor (rbd->dist,
rbd->vec, rbd->offset,
x - rbd->sx, y - rbd->sy);
break;
case GIMP_GRADIENT_BILINEAR:
factor = gradient_calc_bilinear_factor (rbd->dist,
rbd->vec, rbd->offset,
x - rbd->sx, y - rbd->sy);
break;
case GIMP_GRADIENT_RADIAL:
factor = gradient_calc_radial_factor (rbd->dist,
rbd->offset,
x - rbd->sx, y - rbd->sy);
break;
case GIMP_GRADIENT_SQUARE:
factor = gradient_calc_square_factor (rbd->dist, rbd->offset,
x - rbd->sx, y - rbd->sy);
break;
case GIMP_GRADIENT_CONICAL_SYMMETRIC:
factor = gradient_calc_conical_sym_factor (rbd->dist,
rbd->vec, rbd->offset,
x - rbd->sx, y - rbd->sy);
break;
case GIMP_GRADIENT_CONICAL_ASYMMETRIC:
factor = gradient_calc_conical_asym_factor (rbd->dist,
rbd->vec, rbd->offset,
x - rbd->sx, y - rbd->sy);
break;
case GIMP_GRADIENT_SHAPEBURST_ANGULAR:
factor = gradient_calc_shapeburst_angular_factor (rbd->dist_buffer, x, y);
break;
case GIMP_GRADIENT_SHAPEBURST_SPHERICAL:
factor = gradient_calc_shapeburst_spherical_factor (rbd->dist_buffer, x, y);
break;
case GIMP_GRADIENT_SHAPEBURST_DIMPLED:
factor = gradient_calc_shapeburst_dimpled_factor (rbd->dist_buffer, x, y);
break;
case GIMP_GRADIENT_SPIRAL_CLOCKWISE:
factor = gradient_calc_spiral_factor (rbd->dist,
rbd->vec, rbd->offset,
x - rbd->sx, y - rbd->sy, TRUE);
break;
case GIMP_GRADIENT_SPIRAL_ANTICLOCKWISE:
factor = gradient_calc_spiral_factor (rbd->dist,
rbd->vec, rbd->offset,
x - rbd->sx, y - rbd->sy, FALSE);
break;
default:
g_return_if_reached ();
break;
}
/* Adjust for repeat */
switch (rbd->repeat)
{
case GIMP_REPEAT_TRUNCATE:
case GIMP_REPEAT_NONE:
break;
case GIMP_REPEAT_SAWTOOTH:
factor = factor - floor (factor);
break;
case GIMP_REPEAT_TRIANGULAR:
{
guint ifactor;
if (factor < 0.0)
factor = -factor;
ifactor = (guint) factor;
factor = factor - floor (factor);
if (ifactor & 1)
factor = 1.0 - factor;
}
break;
}
/* Blend the colors */
if (factor <= 0.0)
{
*color = rbd->leftmost_color;
}
else if (factor >= 1.0)
{
*color = rbd->rightmost_color;
}
else
{
#ifdef USE_GRADIENT_CACHE
*color = rbd->gradient_cache[(gint) (factor * (rbd->gradient_cache_size - 1))];
#else
rbd->last_seg = gimp_gradient_get_color_at (rbd->gradient, NULL,
rbd->last_seg, factor,
rbd->reverse, color);
#endif
}
}
static void
gradient_put_pixel (gint x,
gint y,
GimpRGB *color,
gpointer put_pixel_data)
{
PutPixelData *ppd = put_pixel_data;
const gint index = x - ppd->roi_x;
gfloat *dest = ppd->row_data + 4 * index;
if (ppd->dither_rand)
{
gfloat r, g, b, a;
gint i = g_rand_int (ppd->dither_rand);
r = color->r + (gdouble) (i & 0xff) / 256.0 / 256.0; i >>= 8;
g = color->g + (gdouble) (i & 0xff) / 256.0 / 256.0; i >>= 8;
b = color->b + (gdouble) (i & 0xff) / 256.0 / 256.0; i >>= 8;
if (color->a > 0.0 && color->a < 1.0)
a = color->a + (gdouble) (i & 0xff) / 256.0 / 256.0;
else
a = color->a;
*dest++ = MAX (r, 0.0);
*dest++ = MAX (g, 0.0);
*dest++ = MAX (b, 0.0);
*dest++ = MAX (a, 0.0);
}
else
{
*dest++ = color->r;
*dest++ = color->g;
*dest++ = color->b;
*dest++ = color->a;
}
/* Paint whole row if we are on the rightmost pixel */
if (index == (ppd->width - 1))
gegl_buffer_set (ppd->buffer, GEGL_RECTANGLE (ppd->roi_x, y, ppd->width, 1),
0, babl_format ("R'G'B'A float"), ppd->row_data,
GEGL_AUTO_ROWSTRIDE);
}
static gboolean
gimp_operation_blend_process (GeglOperation *operation,
GeglBuffer *input,
GeglBuffer *output,
const GeglRectangle *result,
gint level)
{
GimpOperationBlend *self = GIMP_OPERATION_BLEND (operation);
const gdouble sx = self->start_x;
const gdouble sy = self->start_y;
const gdouble ex = self->end_x;
const gdouble ey = self->end_y;
RenderBlendData rbd = { 0, };
rbd.gradient = NULL;
rbd.reverse = self->gradient_reverse;
if (self->gradient)
rbd.gradient = g_object_ref (self->gradient);
else
rbd.gradient = GIMP_GRADIENT (gimp_gradient_new (NULL, "Blend-Temp"));
#ifdef USE_GRADIENT_CACHE
{
GimpGradientSegment *last_seg = NULL;
gint i;
rbd.gradient_cache_size = ceil (sqrt (SQR (sx - ex) + SQR (sy - ey)));
rbd.gradient_cache = g_new0 (GimpRGB, rbd.gradient_cache_size);
for (i = 0; i < rbd.gradient_cache_size; i++)
{
gdouble factor = (gdouble) i / (gdouble) (rbd.gradient_cache_size - 1);
last_seg = gimp_gradient_get_color_at (rbd.gradient, NULL, last_seg,
factor, rbd.reverse,
rbd.gradient_cache + i);
}
}
#endif
/* Calculate type-specific parameters */
switch (self->gradient_type)
{
case GIMP_GRADIENT_RADIAL:
rbd.dist = sqrt (SQR (ex - sx) + SQR (ey - sy));
break;
case GIMP_GRADIENT_SQUARE:
rbd.dist = MAX (fabs (ex - sx), fabs (ey - sy));
break;
case GIMP_GRADIENT_CONICAL_SYMMETRIC:
case GIMP_GRADIENT_CONICAL_ASYMMETRIC:
case GIMP_GRADIENT_SPIRAL_CLOCKWISE:
case GIMP_GRADIENT_SPIRAL_ANTICLOCKWISE:
case GIMP_GRADIENT_LINEAR:
case GIMP_GRADIENT_BILINEAR:
rbd.dist = sqrt (SQR (ex - sx) + SQR (ey - sy));
if (rbd.dist > 0.0)
{
rbd.vec[0] = (ex - sx) / rbd.dist;
rbd.vec[1] = (ey - sy) / rbd.dist;
}
break;
case GIMP_GRADIENT_SHAPEBURST_ANGULAR:
case GIMP_GRADIENT_SHAPEBURST_SPHERICAL:
case GIMP_GRADIENT_SHAPEBURST_DIMPLED:
rbd.dist = sqrt (SQR (ex - sx) + SQR (ey - sy));
rbd.dist_buffer = input;
break;
default:
g_return_val_if_reached (FALSE);
break;
}
/* Initialize render data */
rbd.offset = self->offset;
rbd.sx = self->start_x;
rbd.sy = self->start_y;
rbd.gradient_type = self->gradient_type;
rbd.repeat = self->gradient_repeat;
if (rbd.repeat == GIMP_REPEAT_NONE)
{
gimp_gradient_segment_get_left_flat_color (rbd.gradient, NULL,
rbd.gradient->segments,
&rbd.leftmost_color);
gimp_gradient_segment_get_right_flat_color (rbd.gradient, NULL,
gimp_gradient_segment_get_last (
rbd.gradient->segments),
&rbd.rightmost_color);
if (rbd.reverse)
{
GimpRGB temp;
temp = rbd.leftmost_color;
rbd.leftmost_color = rbd.rightmost_color;
rbd.rightmost_color = temp;
}
}
/* Render the gradient! */
if (self->supersample)
{
PutPixelData ppd = { 0, };
ppd.buffer = output;
ppd.row_data = g_malloc (sizeof (float) * 4 * result->width);
ppd.roi_x = result->x;
ppd.width = result->width;
if (self->dither)
ppd.dither_rand = g_rand_new ();
gimp_adaptive_supersample_area (result->x, result->y,
result->x + result->width - 1,
result->y + result->height - 1,
self->supersample_depth,
self->supersample_threshold,
gradient_render_pixel, &rbd,
gradient_put_pixel, &ppd,
NULL,
NULL);
if (self->dither)
g_rand_free (ppd.dither_rand);
g_free (ppd.row_data);
}
else
{
GeglBufferIterator *iter;
GeglRectangle *roi;
iter = gegl_buffer_iterator_new (output, result, 0,
babl_format ("R'G'B'A float"),
GEGL_ACCESS_WRITE, GEGL_ABYSS_NONE);
roi = &iter->roi[0];
if (self->dither)
rbd.seed = g_rand_new ();
while (gegl_buffer_iterator_next (iter))
{
gfloat *dest = iter->data[0];
gint endx = roi->x + roi->width;
gint endy = roi->y + roi->height;
gint x, y;
if (rbd.seed)
{
GRand *dither_rand = g_rand_new_with_seed (g_rand_int (rbd.seed));
for (y = roi->y; y < endy; y++)
for (x = roi->x; x < endx; x++)
{
GimpRGB color = { 0.0, 0.0, 0.0, 1.0 };
gfloat r, g, b, a;
gint i = g_rand_int (dither_rand);
gradient_render_pixel (x, y, &color, &rbd);
r = color.r + (gdouble) (i & 0xff) / 256.0 / 256.0; i >>= 8;
g = color.g + (gdouble) (i & 0xff) / 256.0 / 256.0; i >>= 8;
b = color.b + (gdouble) (i & 0xff) / 256.0 / 256.0; i >>= 8;
if (color.a > 0.0 && color.a < 1.0)
a = color.a + (gdouble) (i & 0xff) / 256.0 / 256.0;
else
a = color.a;
*dest++ = MAX (r, 0.0);
*dest++ = MAX (g, 0.0);
*dest++ = MAX (b, 0.0);
*dest++ = MAX (a, 0.0);
}
g_rand_free (dither_rand);
}
else
{
for (y = roi->y; y < endy; y++)
for (x = roi->x; x < endx; x++)
{
GimpRGB color = { 0.0, 0.0, 0.0, 1.0 };
gradient_render_pixel (x, y, &color, &rbd);
*dest++ = color.r;
*dest++ = color.g;
*dest++ = color.b;
*dest++ = color.a;
}
}
}
if (self->dither)
g_rand_free (rbd.seed);
}
#ifdef USE_GRADIENT_CACHE
g_free (rbd.gradient_cache);
#endif
g_object_unref (rbd.gradient);
return TRUE;
}
Reference in New Issue View Git Blame Copy Permalink