PIKApp/app/core/pikachannel-combine.c

609 lines
18 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
*
* 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 <string.h>
#include <gdk-pixbuf/gdk-pixbuf.h>
#include <gegl.h>
#include "libpikabase/pikabase.h"
#include "libpikamath/pikamath.h"
#include "core-types.h"
#include "gegl/pika-gegl-mask-combine.h"
#include "pika.h"
#include "pikachannel.h"
#include "pikachannel-combine.h"
#include "pikaimage.h"
#include "pikaimage-merge.h"
#include "pikaimage-new.h"
#include "pikalayer.h"
#include "vectors/pikavectors.h"
typedef struct
{
GeglRectangle rect;
gboolean bounds_known;
gboolean empty;
GeglRectangle bounds;
} PikaChannelCombineData;
/* local function prototypes */
static void pika_channel_combine_clear (PikaChannel *mask,
const GeglRectangle *rect);
static void pika_channel_combine_clear_complement (PikaChannel *mask,
const GeglRectangle *rect);
static gboolean pika_channel_combine_start (PikaChannel *mask,
PikaChannelOps op,
const GeglRectangle *rect,
gboolean full_extent,
gboolean full_value,
PikaChannelCombineData *data);
static void pika_channel_combine_end (PikaChannel *mask,
PikaChannelCombineData *data);
/* private functions */
static void
pika_channel_combine_clear (PikaChannel *mask,
const GeglRectangle *rect)
{
GeglBuffer *buffer;
GeglRectangle area;
GeglRectangle update_area;
if (mask->bounds_known && mask->empty)
return;
buffer = pika_drawable_get_buffer (PIKA_DRAWABLE (mask));
if (rect)
{
if (rect->width <= 0 || rect->height <= 0)
return;
if (mask->bounds_known)
{
if (! gegl_rectangle_intersect (&area,
GEGL_RECTANGLE (mask->x1,
mask->y1,
mask->x2 - mask->x1,
mask->y2 - mask->y1),
rect))
{
return;
}
}
else
{
area = *rect;
}
update_area = area;
}
else
{
if (mask->bounds_known)
{
area.x = mask->x1;
area.y = mask->y1;
area.width = mask->x2 - mask->x1;
area.height = mask->y2 - mask->y1;
}
else
{
area.x = 0;
area.y = 0;
area.width = pika_item_get_width (PIKA_ITEM (mask));
area.height = pika_item_get_height (PIKA_ITEM (mask));
}
update_area = area;
gegl_rectangle_align_to_buffer (&area, &area, buffer,
GEGL_RECTANGLE_ALIGNMENT_SUPERSET);
}
gegl_buffer_clear (buffer, &area);
pika_drawable_update (PIKA_DRAWABLE (mask),
update_area.x, update_area.y,
update_area.width, update_area.height);
}
static void
pika_channel_combine_clear_complement (PikaChannel *mask,
const GeglRectangle *rect)
{
gint width = pika_item_get_width (PIKA_ITEM (mask));
gint height = pika_item_get_height (PIKA_ITEM (mask));
pika_channel_combine_clear (
mask,
GEGL_RECTANGLE (0,
0,
width,
rect->y));
pika_channel_combine_clear (
mask,
GEGL_RECTANGLE (0,
rect->y + rect->height,
width,
height - (rect->y + rect->height)));
pika_channel_combine_clear (
mask,
GEGL_RECTANGLE (0,
rect->y,
rect->x,
rect->height));
pika_channel_combine_clear (
mask,
GEGL_RECTANGLE (rect->x + rect->width,
rect->y,
width - (rect->x + rect->width),
rect->height));
}
static gboolean
pika_channel_combine_start (PikaChannel *mask,
PikaChannelOps op,
const GeglRectangle *rect,
gboolean full_extent,
gboolean full_value,
PikaChannelCombineData *data)
{
GeglBuffer *buffer = pika_drawable_get_buffer (PIKA_DRAWABLE (mask));
GeglRectangle extent;
gboolean intersects;
extent.x = 0;
extent.y = 0;
extent.width = pika_item_get_width (PIKA_ITEM (mask));
extent.height = pika_item_get_height (PIKA_ITEM (mask));
intersects = gegl_rectangle_intersect (&data->rect, rect, &extent);
data->bounds_known = mask->bounds_known;
data->empty = mask->empty;
data->bounds.x = mask->x1;
data->bounds.y = mask->y1;
data->bounds.width = mask->x2 - mask->x1;
data->bounds.height = mask->y2 - mask->y1;
gegl_buffer_freeze_changed (buffer);
/* Determine new boundary */
switch (op)
{
case PIKA_CHANNEL_OP_REPLACE:
pika_channel_combine_clear (mask, NULL);
if (! intersects)
{
data->bounds_known = TRUE;
data->empty = TRUE;
return FALSE;
}
data->bounds_known = FALSE;
if (full_extent)
{
data->bounds_known = TRUE;
data->empty = FALSE;
data->bounds = data->rect;
}
break;
case PIKA_CHANNEL_OP_ADD:
if (! intersects)
return FALSE;
data->bounds_known = FALSE;
if (full_extent && (mask->bounds_known ||
gegl_rectangle_equal (&data->rect, &extent)))
{
data->bounds_known = TRUE;
data->empty = FALSE;
if (mask->bounds_known && ! mask->empty)
{
gegl_rectangle_bounding_box (&data->bounds,
&data->bounds, &data->rect);
}
else
{
data->bounds = data->rect;
}
}
break;
case PIKA_CHANNEL_OP_SUBTRACT:
if (intersects && mask->bounds_known)
{
if (mask->empty)
{
intersects = FALSE;
}
else
{
intersects = gegl_rectangle_intersect (&data->rect,
&data->rect,
&data->bounds);
}
}
if (! intersects)
return FALSE;
if (full_value &&
gegl_rectangle_contains (&data->rect,
mask->bounds_known ? &data->bounds :
&extent))
{
pika_channel_combine_clear (mask, NULL);
data->bounds_known = TRUE;
data->empty = TRUE;
return FALSE;
}
data->bounds_known = FALSE;
gegl_buffer_set_abyss (buffer, &data->rect);
break;
case PIKA_CHANNEL_OP_INTERSECT:
if (intersects && mask->bounds_known)
{
if (mask->empty)
{
intersects = FALSE;
}
else
{
intersects = gegl_rectangle_intersect (&data->rect,
&data->rect,
&data->bounds);
}
}
if (! intersects)
{
pika_channel_combine_clear (mask, NULL);
data->bounds_known = TRUE;
data->empty = TRUE;
return FALSE;
}
if (full_value && mask->bounds_known &&
gegl_rectangle_contains (&data->rect, &data->bounds))
{
return FALSE;
}
data->bounds_known = FALSE;
pika_channel_combine_clear_complement (mask, &data->rect);
gegl_buffer_set_abyss (buffer, &data->rect);
break;
}
return TRUE;
}
static void
pika_channel_combine_end (PikaChannel *mask,
PikaChannelCombineData *data)
{
GeglBuffer *buffer = pika_drawable_get_buffer (PIKA_DRAWABLE (mask));
gegl_buffer_set_abyss (buffer, gegl_buffer_get_extent (buffer));
gegl_buffer_thaw_changed (buffer);
mask->bounds_known = data->bounds_known;
if (data->bounds_known)
{
mask->empty = data->empty;
if (data->empty)
{
mask->x1 = 0;
mask->y1 = 0;
mask->x2 = pika_item_get_width (PIKA_ITEM (mask));
mask->y2 = pika_item_get_height (PIKA_ITEM (mask));
}
else
{
mask->x1 = data->bounds.x;
mask->y1 = data->bounds.y;
mask->x2 = data->bounds.x + data->bounds.width;
mask->y2 = data->bounds.y + data->bounds.height;
}
}
pika_drawable_update (PIKA_DRAWABLE (mask),
data->rect.x, data->rect.y,
data->rect.width, data->rect.height);
}
/* public functions */
void
pika_channel_combine_rect (PikaChannel *mask,
PikaChannelOps op,
gint x,
gint y,
gint w,
gint h)
{
PikaChannelCombineData data;
g_return_if_fail (PIKA_IS_CHANNEL (mask));
if (pika_channel_combine_start (mask, op, GEGL_RECTANGLE (x, y, w, h),
TRUE, TRUE, &data))
{
GeglBuffer *buffer = pika_drawable_get_buffer (PIKA_DRAWABLE (mask));
pika_gegl_mask_combine_rect (buffer, op, x, y, w, h);
}
pika_channel_combine_end (mask, &data);
}
void
pika_channel_combine_ellipse (PikaChannel *mask,
PikaChannelOps op,
gint x,
gint y,
gint w,
gint h,
gboolean antialias)
{
pika_channel_combine_ellipse_rect (mask, op, x, y, w, h,
w / 2.0, h / 2.0, antialias);
}
void
pika_channel_combine_ellipse_rect (PikaChannel *mask,
PikaChannelOps op,
gint x,
gint y,
gint w,
gint h,
gdouble rx,
gdouble ry,
gboolean antialias)
{
PikaChannelCombineData data;
g_return_if_fail (PIKA_IS_CHANNEL (mask));
if (pika_channel_combine_start (mask, op, GEGL_RECTANGLE (x, y, w, h),
TRUE, FALSE, &data))
{
GeglBuffer *buffer = pika_drawable_get_buffer (PIKA_DRAWABLE (mask));
pika_gegl_mask_combine_ellipse_rect (buffer, op, x, y, w, h,
rx, ry, antialias);
}
pika_channel_combine_end (mask, &data);
}
void
pika_channel_combine_mask (PikaChannel *mask,
PikaChannel *add_on,
PikaChannelOps op,
gint off_x,
gint off_y)
{
GeglBuffer *add_on_buffer;
g_return_if_fail (PIKA_IS_CHANNEL (mask));
g_return_if_fail (PIKA_IS_CHANNEL (add_on));
add_on_buffer = pika_drawable_get_buffer (PIKA_DRAWABLE (add_on));
pika_channel_combine_buffer (mask, add_on_buffer,
op, off_x, off_y);
}
void
pika_channel_combine_buffer (PikaChannel *mask,
GeglBuffer *add_on_buffer,
PikaChannelOps op,
gint off_x,
gint off_y)
{
PikaChannelCombineData data;
g_return_if_fail (PIKA_IS_CHANNEL (mask));
g_return_if_fail (GEGL_IS_BUFFER (add_on_buffer));
if (pika_channel_combine_start (mask, op,
GEGL_RECTANGLE (
off_x + gegl_buffer_get_x (add_on_buffer),
off_y + gegl_buffer_get_y (add_on_buffer),
gegl_buffer_get_width (add_on_buffer),
gegl_buffer_get_height (add_on_buffer)),
FALSE, FALSE, &data))
{
GeglBuffer *buffer = pika_drawable_get_buffer (PIKA_DRAWABLE (mask));
pika_gegl_mask_combine_buffer (buffer, add_on_buffer, op,
off_x, off_y);
}
pika_channel_combine_end (mask, &data);
}
/**
* pika_channel_combine_items:
* @channel:
* @items:
* @op:
*
* Edit @channel with the given @items, according to the boolean @op.
* @items need to belong to the same image, but it doesn't have to be
* the owner image of @channel.
* If @items contain a single layer, it will be used as-is, without
* caring about opacity, mode or visibility.
* If @items contain several layers, they will be used composited using
* their opacity, mode, visibility, etc. properties within the image
* (similar as if a "merge visible" had been applied to the image then
* the resulting layer used alone).
* If @items contain channels or vectors, they will be added as a set
* (i.e. as a single item which is an union of other items). E.g. an
* combine in PIKA_CHANNEL_OP_INTERSECT mode does not intersect all
* @items with each other and @channel. It first adds-alike all @items
* together, then intersects the result with @channel.
*/
void
pika_channel_combine_items (PikaChannel *mask,
GList *items,
PikaChannelOps op)
{
PikaImage *image;
PikaImage *items_image = NULL;
PikaImage *temp_image = NULL;
PikaChannel *channel = NULL;
GList *layers = NULL;
GList *iter;
g_return_if_fail (PIKA_IS_CHANNEL (mask));
g_return_if_fail (g_list_length (items) > 0);
for (iter = items; iter; iter = iter->next)
{
g_return_if_fail (PIKA_IS_LAYER (iter->data) ||
PIKA_IS_CHANNEL (iter->data) ||
PIKA_IS_VECTORS (iter->data));
if (items_image == NULL)
items_image = pika_item_get_image (iter->data);
else
g_return_if_fail (items_image == pika_item_get_image (iter->data));
if (PIKA_IS_LAYER (iter->data))
layers = g_list_prepend (layers, iter->data);
}
image = pika_item_get_image (PIKA_ITEM (mask));
if (g_list_length (layers) > 1)
{
GList *merged_layers;
temp_image = pika_image_new_from_drawables (image->pika, items, FALSE, FALSE);
merged_layers = pika_image_merge_visible_layers (temp_image,
pika_get_user_context (temp_image->pika),
PIKA_CLIP_TO_IMAGE,
FALSE, TRUE, NULL);
g_return_if_fail (g_list_length (merged_layers) == 1);
pika_item_to_selection (PIKA_ITEM (merged_layers->data),
PIKA_CHANNEL_OP_REPLACE,
TRUE, FALSE, 0.0, 0.0);
channel = pika_image_get_mask (temp_image);
}
if (! channel)
{
channel = pika_channel_new (image,
pika_image_get_width (image),
pika_image_get_height (image),
NULL, NULL);
pika_channel_clear (channel, NULL, FALSE);
if (g_list_length (layers) == 1)
{
if (pika_drawable_has_alpha (layers->data))
{
PikaChannel *alpha;
gint offset_x;
gint offset_y;
alpha = pika_channel_new_from_alpha (image,
layers->data, NULL, NULL);
pika_item_get_offset (layers->data, &offset_x, &offset_y);
pika_channel_combine_mask (channel, alpha,
PIKA_CHANNEL_OP_REPLACE,
offset_x, offset_y);
g_object_unref (alpha);
}
else
{
pika_channel_all (channel, FALSE);
}
}
}
for (iter = items; iter; iter = iter->next)
{
if (! PIKA_IS_LAYER (iter->data))
{
gint offset_x;
gint offset_y;
pika_item_get_offset (iter->data, &offset_x, &offset_y);
pika_channel_combine_buffer (channel,
pika_drawable_get_buffer (PIKA_DRAWABLE (iter->data)),
PIKA_CHANNEL_OP_ADD, offset_x, offset_y);
}
}
pika_channel_combine_buffer (mask,
pika_drawable_get_buffer (PIKA_DRAWABLE (channel)),
op, 0, 0);
if (temp_image)
g_object_unref (temp_image);
else
g_object_unref (channel);
g_list_free (layers);
}