gimpimage-resize.c 94 KB
Newer Older
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17
/* The GIMP -- an 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.
 */
18
#include <string.h>
19
#include "gimpimageP.h"
20
#include "cursorutil.h"
21 22
#include "drawable.h"
#include "floating_sel.h"
23
#include "gdisplay.h"
24 25 26 27
#include "general.h"
#include "gimage_mask.h"
#include "paint_funcs.h"
#include "palette.h"
28
#include "libgimp/parasite.h"
29
#include "parasitelist.h"
30 31
#include "undo.h"
#include "gimpsignal.h"
Manish Singh's avatar
Manish Singh committed
32
#include "gimpparasite.h"
33
#include "pathsP.h"
34
#include "gimprc.h"
35

36 37
#include "libgimp/gimpintl.h"

scott's avatar
scott committed
38 39
#include "tile_manager.h"
#include "tile.h"
40 41 42
#include "layer_pvt.h"
#include "drawable_pvt.h"		/* ick ick. */

43

44 45
/*  Local function declarations  */
static void     gimp_image_free_projection       (GimpImage *);
46
static void     gimp_image_allocate_shadow       (GimpImage *, gint, gint, gint);
47 48 49
static void     gimp_image_allocate_projection   (GimpImage *);
static void     gimp_image_free_layers           (GimpImage *);
static void     gimp_image_free_channels         (GimpImage *);
50 51 52 53
static void     gimp_image_construct_layers      (GimpImage *, gint, gint, gint, gint);
static void     gimp_image_construct_channels    (GimpImage *, gint, gint, gint, gint);
static void     gimp_image_initialize_projection (GimpImage *, gint, gint, gint, gint);
static void     gimp_image_get_active_channels   (GimpImage *, GimpDrawable *, gint *);
54 55

/*  projection functions  */
56 57
static void     project_intensity            (GimpImage *, Layer *,
					      PixelRegion *, PixelRegion *,
58
					      PixelRegion *);
59 60
static void     project_intensity_alpha      (GimpImage *, Layer *,
					      PixelRegion *, PixelRegion *,
61
					      PixelRegion *);
62 63 64 65
static void     project_indexed              (GimpImage *, Layer *,
					      PixelRegion *, PixelRegion *);
static void     project_channel              (GimpImage *, Channel *,
					      PixelRegion *, PixelRegion *);
66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85

/*
 *  Global variables
 */
int valid_combinations[][MAX_CHANNELS + 1] =
{
  /* RGB GIMAGE */
  { -1, -1, -1, COMBINE_INTEN_INTEN, COMBINE_INTEN_INTEN_A },
  /* RGBA GIMAGE */
  { -1, -1, -1, COMBINE_INTEN_A_INTEN, COMBINE_INTEN_A_INTEN_A },
  /* GRAY GIMAGE */
  { -1, COMBINE_INTEN_INTEN, COMBINE_INTEN_INTEN_A, -1, -1 },
  /* GRAYA GIMAGE */
  { -1, COMBINE_INTEN_A_INTEN, COMBINE_INTEN_A_INTEN_A, -1, -1 },
  /* INDEXED GIMAGE */
  { -1, COMBINE_INDEXED_INDEXED, COMBINE_INDEXED_INDEXED_A, -1, -1 },
  /* INDEXEDA GIMAGE */
  { -1, -1, COMBINE_INDEXED_A_INDEXED_A, -1, -1 },
};

86
guint32 next_guide_id = 1;  /* For generating guide_ID handles for PDB stuff */
87

88 89 90 91 92

/*
 *  Static variables
 */

93
enum {
94
  CLEAN,
95 96 97 98 99
  DIRTY,
  REPAINT,
  RENAME,
  RESIZE,
  RESTRUCTURE,
100
  COLORMAP_CHANGED,
101 102
  LAST_SIGNAL
};
103 104

static void  gimp_image_destroy (GtkObject *);
105 106

static guint gimp_image_signals[LAST_SIGNAL];
107
static GimpObjectClass *parent_class;
108 109 110 111 112 113 114 115 116 117 118 119 120 121

static void
gimp_image_class_init (GimpImageClass *klass)
{
  GtkObjectClass *object_class;
  GtkType type;
  
  object_class = GTK_OBJECT_CLASS(klass);
  parent_class = gtk_type_class (gimp_object_get_type ());
  
  type=object_class->type;

  object_class->destroy =  gimp_image_destroy;

122 123 124
  gimp_image_signals[CLEAN] =
	  gimp_signal_new ("clean", GTK_RUN_FIRST, type, 0,
			   gimp_sigtype_void);
125
  gimp_image_signals[DIRTY] =
126 127
	  gimp_signal_new ("dirty", GTK_RUN_FIRST, type, 0,
			   gimp_sigtype_void);
128
  gimp_image_signals[REPAINT] =
129 130
	  gimp_signal_new ("repaint", GTK_RUN_FIRST, type, 0,
			   gimp_sigtype_int_int_int_int);
131
  gimp_image_signals[RENAME] =
132 133
	  gimp_signal_new ("rename", GTK_RUN_FIRST, type, 0,
			   gimp_sigtype_void);
134
  gimp_image_signals[RESIZE] =
135 136
	  gimp_signal_new ("resize", GTK_RUN_FIRST, type, 0,
			   gimp_sigtype_void);
137
  gimp_image_signals[RESTRUCTURE] =
138 139
	  gimp_signal_new ("restructure", GTK_RUN_FIRST, type, 0,
			   gimp_sigtype_void);
140
  gimp_image_signals[COLORMAP_CHANGED] =
141 142
	  gimp_signal_new ("colormap_changed", GTK_RUN_FIRST, type, 0,
			   gimp_sigtype_int);
143 144 145 146 147 148 149
  
  gtk_object_class_add_signals (object_class, gimp_image_signals, LAST_SIGNAL);
}


/* static functions */

Sven Neumann's avatar
Sven Neumann committed
150 151
static void 
gimp_image_init (GimpImage *gimage)
152
{
153 154 155
  gimage->has_filename          = FALSE;
  gimage->num_cols              = 0;
  gimage->cmap                  = NULL;
156
  /* ID and ref_count handled in gimage.c */
157 158 159 160 161 162 163 164 165 166 167 168 169 170 171
  gimage->instance_count        = 0;
  gimage->shadow                = NULL;
  gimage->dirty                 = 1;
  gimage->undo_on               = TRUE;
  gimage->construct_flag        = -1;
  gimage->tattoo_state          = 0;
  gimage->projection            = NULL;
  gimage->guides                = NULL;
  gimage->layers                = NULL;
  gimage->channels              = NULL;
  gimage->layer_stack           = NULL;
  gimage->undo_stack            = NULL;
  gimage->redo_stack            = NULL;
  gimage->undo_bytes            = 0;
  gimage->undo_levels           = 0;
172
  gimage->group_count           = 0;
173
  gimage->pushing_undo_group    = 0;
174 175 176
  gimage->comp_preview_valid[0] = FALSE;
  gimage->comp_preview_valid[1] = FALSE;
  gimage->comp_preview_valid[2] = FALSE;
177 178 179 180 181 182 183
  gimage->comp_preview          = NULL;
  gimage->parasites             = parasite_list_new();
  gimage->xresolution           = default_xresolution;
  gimage->yresolution           = default_yresolution;
  gimage->unit                  = default_units;
  gimage->save_proc             = NULL;
  gimage->paths                 = NULL;
184 185
}

Sven Neumann's avatar
Sven Neumann committed
186 187 188 189 190
GtkType 
gimp_image_get_type (void) 
{
  static GtkType type;

191 192 193 194 195 196
  GIMP_TYPE_INIT (type,
		  GimpImage,
		  GimpImageClass,
		  gimp_image_init,
		  gimp_image_class_init,
		  GIMP_TYPE_OBJECT);
Sven Neumann's avatar
Sven Neumann committed
197
  return type;
198 199 200 201 202 203 204 205 206 207 208 209 210 211 212 213 214 215 216 217 218 219 220 221
}

static void
gimp_image_allocate_projection (GimpImage *gimage)
{
  if (gimage->projection)
    gimp_image_free_projection (gimage);

  /*  Find the number of bytes required for the projection.
   *  This includes the intensity channels and an alpha channel
   *  if one doesn't exist.
   */
  switch (gimp_image_base_type (gimage))
    {
    case RGB:
    case INDEXED:
      gimage->proj_bytes = 4;
      gimage->proj_type = RGBA_GIMAGE;
      break;
    case GRAY:
      gimage->proj_bytes = 2;
      gimage->proj_type = GRAYA_GIMAGE;
      break;
    default:
222
      g_assert_not_reached ();
223 224 225 226
    }

  /*  allocate the new projection  */
  gimage->projection = tile_manager_new (gimage->width, gimage->height, gimage->proj_bytes);
227
  tile_manager_set_user_data (gimage->projection, (void *) gimage);
228 229 230 231 232 233 234 235 236 237 238 239 240
  tile_manager_set_validate_proc (gimage->projection, gimp_image_validate);
}

static void
gimp_image_free_projection (GimpImage *gimage)
{
  if (gimage->projection)
    tile_manager_destroy (gimage->projection);

  gimage->projection = NULL;
}

static void
Sven Neumann's avatar
Sven Neumann committed
241
gimp_image_allocate_shadow (GimpImage *gimage, 
242 243 244
			    gint       width, 
			    gint       height, 
			    gint       bpp)
245 246 247 248 249 250 251 252 253
{
  /*  allocate the new projection  */
  gimage->shadow = tile_manager_new (width, height, bpp);
}


/* function definitions */

GimpImage *
254 255 256
gimp_image_new (gint               width,
		gint               height,
		GimpImageBaseType  base_type)
257
{
258 259
  GimpImage *gimage = GIMP_IMAGE (gtk_type_new (gimp_image_get_type ()));
  gint i;
260

261 262 263
  gimage->filename  = NULL;
  gimage->width     = width;
  gimage->height    = height;
264 265 266 267 268 269 270 271 272 273
  gimage->base_type = base_type;

  switch (base_type)
    {
    case RGB:
    case GRAY:
      break;
    case INDEXED:
      /* always allocate 256 colors for the colormap */
      gimage->num_cols = 0;
274
      gimage->cmap     = (guchar *) g_malloc0 (COLORMAP_SIZE);
275 276 277 278 279 280
      break;
    default:
      break;
    }

  /*  configure the active pointers  */
281
  gimage->active_layer   = NULL;
282
  gimage->active_channel = NULL;  /* no default active channel */
283
  gimage->floating_sel   = NULL;
284 285 286 287

  /*  set all color channels visible and active  */
  for (i = 0; i < MAX_CHANNELS; i++)
    {
288 289
      gimage->visible[i] = TRUE;
      gimage->active[i]  = TRUE;
290 291 292
    }

  /* create the selection mask */
293 294
  gimage->selection_mask = channel_new_mask (gimage,
					     gimage->width, gimage->height);
295

296
  /* set the qmask properties */
297 298
  gimage->qmask_state    = FALSE;
  gimage->qmask_opacity  = 50;
299 300 301
  gimage->qmask_color[0] = 255; 
  gimage->qmask_color[1] = 0; 
  gimage->qmask_color[2] = 0; 
302 303 304 305 306

  return gimage;
}

void
307
gimp_image_set_filename (GimpImage *gimage, 
308
			 gchar     *filename)
309
{
310
  gchar *new_filename;
311

312 313 314 315 316 317
  /* 
   * WARNING: this function will free the current filename even if you are 
   * setting it to itself so any pointer you hold to the filename will be
   * invalid after this call.  So please use with care.
   */

318
  new_filename = g_strdup (filename);
319

320 321 322 323 324 325 326 327 328 329 330 331 332 333 334 335 336
  if (gimage->has_filename)
    g_free (gimage->filename);

  if (filename && filename[0])
    {
      gimage->filename = new_filename;
      gimage->has_filename = TRUE;
    }
  else
    {
      gimage->filename = NULL;
      gimage->has_filename = FALSE;
    }

  gtk_signal_emit (GTK_OBJECT (gimage), gimp_image_signals[RENAME]);
}

337
void
338
gimp_image_set_resolution (GimpImage *gimage,
339 340
			   gdouble    xresolution,
			   gdouble    yresolution)
341
{
342 343
  gimage->xresolution = xresolution;
  gimage->yresolution = yresolution;
344 345
}

346 347
void
gimp_image_get_resolution (GimpImage *gimage,
348 349
			   gdouble   *xresolution,
			   gdouble   *yresolution)
350
{
351 352
  g_return_if_fail (xresolution && yresolution);

353 354
  *xresolution = gimage->xresolution;
  *yresolution = gimage->yresolution;
355 356
}

357 358
void
gimp_image_set_unit (GimpImage *gimage,
Sven Neumann's avatar
Sven Neumann committed
359
		     GUnit      unit)
360 361 362 363 364 365 366 367 368 369
{
  gimage->unit = unit;
}

GUnit
gimp_image_get_unit (GimpImage *gimage)
{
  return gimage->unit;
}

370
void
Sven Neumann's avatar
Sven Neumann committed
371 372
gimp_image_set_save_proc (GimpImage     *gimage, 
			  PlugInProcDef *proc)
373 374 375 376 377 378 379 380 381
{
  gimage->save_proc = proc;
}

PlugInProcDef *
gimp_image_get_save_proc (GimpImage *gimage)
{
  return gimage->save_proc;
}
382

383
void
384
gimp_image_resize (GimpImage *gimage, 
385 386 387 388
		   gint       new_width, 
		   gint       new_height,
		   gint       offset_x, 
		   gint       offset_y)
389 390
{
  Channel *channel;
391 392 393 394
  Layer   *layer;
  Layer   *floating_layer;
  GSList  *list;
  GList   *guide_list;
395

396 397
  gimp_add_busy_cursors();

398
  g_assert (new_width > 0 && new_height > 0);
399 400 401 402 403 404 405 406 407 408 409 410 411 412

  /*  Get the floating layer if one exists  */
  floating_layer = gimp_image_floating_sel (gimage);

  undo_push_group_start (gimage, GIMAGE_MOD_UNDO);

  /*  Relax the floating selection  */
  if (floating_layer)
    floating_sel_relax (floating_layer, TRUE);

  /*  Push the image size to the stack  */
  undo_push_gimage_mod (gimage);

  /*  Set the new width and height  */
413
  gimage->width  = new_width;
414 415 416 417 418 419 420 421 422
  gimage->height = new_height;

  /*  Resize all channels  */
  list = gimage->channels;
  while (list)
    {
      channel = (Channel *) list->data;
      channel_resize (channel, new_width, new_height, offset_x, offset_y);
      list = g_slist_next (list);
423 424 425 426 427 428 429 430 431 432

    }

  /*  Reposition or remove any guides  */
  guide_list = gimage->guides;
  while (guide_list)
    {
      Guide *guide;

      guide = (Guide*) guide_list->data;
Sven Neumann's avatar
Sven Neumann committed
433
      guide_list = g_list_next (guide_list);
434 435 436

      switch (guide->orientation)
	{
437
	case ORIENTATION_HORIZONTAL:
438 439 440 441
	  guide->position += offset_y;
	  if (guide->position < 0 || guide->position > new_height)
	    gimp_image_delete_guide (gimage, guide);
	  break;
442
	case ORIENTATION_VERTICAL:
443 444 445 446 447 448 449
	  guide->position += offset_x;
	  if (guide->position < 0 || guide->position > new_width)
	    gimp_image_delete_guide (gimage, guide);
	  break;
	default:
	  g_error("Unknown guide orientation I.\n");
	}
450 451 452
    }

  /*  Don't forget the selection mask!  */
453 454
  channel_resize (gimage->selection_mask,
		  new_width, new_height, offset_x, offset_y);
455 456 457 458 459 460 461 462 463 464 465 466 467 468 469 470 471 472 473
  gimage_mask_invalidate (gimage);

  /*  Reposition all layers  */
  list = gimage->layers;
  while (list)
    {
      layer = (Layer *) list->data;
      layer_translate (layer, offset_x, offset_y);
      list = g_slist_next (list);
    }

  /*  Make sure the projection matches the gimage size  */
  gimp_image_projection_realloc (gimage);

  /*  Rigor the floating selection  */
  if (floating_layer)
    floating_sel_rigor (floating_layer, TRUE);

  gtk_signal_emit (GTK_OBJECT (gimage), gimp_image_signals[RESIZE]);
474

475
  gimp_remove_busy_cursors (NULL);
476 477
}

478 479 480 481 482 483 484 485 486 487 488 489
gint
gimp_image_get_width (const GimpImage *gimage)
{
  return gimage->width;
}

gint
gimp_image_get_height (const GimpImage *gimage)
{
  return gimage->height;
}

490
void
491
gimp_image_scale (GimpImage *gimage, 
492 493
		  gint       new_width, 
		  gint       new_height)
494 495
{
  Channel *channel;
Sven Neumann's avatar
Sven Neumann committed
496 497 498 499 500
  Layer   *layer;
  Layer   *floating_layer;
  GSList  *list;
  GList   *glist;
  Guide   *guide;
501 502
  gint old_width, old_height;
  gint layer_width, layer_height;
503

504
  gimp_add_busy_cursors ();
505

506 507 508 509 510 511 512 513 514 515 516 517 518
  /*  Get the floating layer if one exists  */
  floating_layer = gimp_image_floating_sel (gimage);

  undo_push_group_start (gimage, GIMAGE_MOD_UNDO);

  /*  Relax the floating selection  */
  if (floating_layer)
    floating_sel_relax (floating_layer, TRUE);

  /*  Push the image size to the stack  */
  undo_push_gimage_mod (gimage);

  /*  Set the new width and height  */
519
  old_width  = gimage->width;
520
  old_height = gimage->height;
521
  gimage->width  = new_width;
522 523 524 525 526 527 528 529 530 531 532 533 534 535 536 537 538 539 540 541 542
  gimage->height = new_height;

  /*  Scale all channels  */
  list = gimage->channels;
  while (list)
    {
      channel = (Channel *) list->data;
      channel_scale (channel, new_width, new_height);
      list = g_slist_next (list);
    }

  /*  Don't forget the selection mask!  */
  channel_scale (gimage->selection_mask, new_width, new_height);
  gimage_mask_invalidate (gimage);

  /*  Scale all layers  */
  list = gimage->layers;
  while (list)
    {
      layer = (Layer *) list->data;

543 544 545 546
      layer_width  = (new_width *
		      drawable_width (GIMP_DRAWABLE(layer))) / old_width;
      layer_height = (new_height *
		      drawable_height (GIMP_DRAWABLE(layer))) / old_height;
547 548 549 550
      layer_scale (layer, layer_width, layer_height, FALSE);
      list = g_slist_next (list);
    }

551 552 553 554 555 556 557 558 559
  /*  Scale any Guides  */
  glist = gimage->guides;
  while (glist)
    {
      guide = (Guide*) glist->data;
      glist = g_list_next (glist);

      switch (guide->orientation)
	{
560
	case ORIENTATION_HORIZONTAL:
561 562
	  guide->position = (guide->position * new_height) / old_height;
	  break;
563
	case ORIENTATION_VERTICAL:
564 565 566 567 568 569
	  guide->position = (guide->position * new_width) / old_width;
	  break;
	default:
	  g_error("Unknown guide orientation II.\n");
	}
    }
570

571 572 573 574 575 576 577 578
  /*  Make sure the projection matches the gimage size  */
  gimp_image_projection_realloc (gimage);

  /*  Rigor the floating selection  */
  if (floating_layer)
    floating_sel_rigor (floating_layer, TRUE);

  gtk_signal_emit (GTK_OBJECT (gimage), gimp_image_signals[RESIZE]);
579

580
  gimp_remove_busy_cursors (NULL);
581 582 583
}

TileManager *
584
gimp_image_shadow (GimpImage *gimage, 
585 586 587
		   gint       width, 
		   gint       height, 
		   gint       bpp)
588 589
{
  if (gimage->shadow &&
590 591 592
      ((width != tile_manager_level_width (gimage->shadow)) ||
       (height != tile_manager_level_height (gimage->shadow)) ||
       (bpp != tile_manager_level_bpp (gimage->shadow))))
593 594 595 596 597 598 599 600 601 602 603 604 605 606 607 608 609 610 611 612 613 614
    gimp_image_free_shadow (gimage);
  else if (gimage->shadow)
    return gimage->shadow;

  gimp_image_allocate_shadow (gimage, width, height, bpp);

  return gimage->shadow;
}

void
gimp_image_free_shadow (GimpImage *gimage)
{
  /*  Free the shadow buffer from the specified gimage if it exists  */
  if (gimage->shadow)
    tile_manager_destroy (gimage->shadow);

  gimage->shadow = NULL;
}

static void
gimp_image_destroy (GtkObject *object)
{
615
  GimpImage* gimage = GIMP_IMAGE (object);
Sven Neumann's avatar
Sven Neumann committed
616 617 618 619 620 621 622 623 624 625 626 627 628

  gimp_image_free_projection (gimage);
  gimp_image_free_shadow (gimage);
  
  if (gimage->cmap)
    g_free (gimage->cmap);
  
  if (gimage->has_filename)
    g_free (gimage->filename);
  
  gimp_image_free_layers (gimage);
  gimp_image_free_channels (gimage);
  channel_delete (gimage->selection_mask);
629

Sven Neumann's avatar
Sven Neumann committed
630
  if (gimage->parasites)
631
    gtk_object_unref (GTK_OBJECT (gimage->parasites));
632 633 634
}

void
635 636 637 638 639 640
gimp_image_apply_image (GimpImage	 *gimage,
			GimpDrawable	 *drawable,
			PixelRegion	 *src2PR,
			gint              undo,
			gint              opacity,
			LayerModeEffects  mode,
641
			/*  alternative to using drawable tiles as src1: */
642 643 644
			TileManager	 *src1_tiles,
			gint              x,
			gint              y)
645
{
Sven Neumann's avatar
Sven Neumann committed
646
  Channel *mask;
647 648
  gint x1, y1, x2, y2;
  gint offset_x, offset_y;
649
  PixelRegion src1PR, destPR, maskPR;
650 651
  gint operation;
  gint active [MAX_CHANNELS];
652 653

  /*  get the selection mask if one exists  */
654
  mask = (gimage_mask_is_empty (gimage)) ? NULL : gimp_image_get_mask (gimage);
655 656 657 658 659 660 661 662 663 664

  /*  configure the active channel array  */
  gimp_image_get_active_channels (gimage, drawable, active);

  /*  determine what sort of operation is being attempted and
   *  if it's actually legal...
   */
  operation = valid_combinations [drawable_type (drawable)][src2PR->bytes];
  if (operation == -1)
    {
665
      g_message (_("gimp_image_apply_image sent illegal parameters"));
666 667 668 669 670 671 672
      return;
    }

  /*  get the layer offsets  */
  drawable_offsets (drawable, &offset_x, &offset_y);

  /*  make sure the image application coordinates are within gimage bounds  */
673
  x1 = CLAMP (x, 0, drawable_width  (drawable));
674
  y1 = CLAMP (y, 0, drawable_height (drawable));
675
  x2 = CLAMP (x + src2PR->w, 0, drawable_width  (drawable));
676 677 678 679 680 681 682 683
  y2 = CLAMP (y + src2PR->h, 0, drawable_height (drawable));

  if (mask)
    {
      /*  make sure coordinates are in mask bounds ...
       *  we need to add the layer offset to transform coords
       *  into the mask coordinate system
       */
684 685 686 687
      x1 = CLAMP (x1, -offset_x, drawable_width (GIMP_DRAWABLE(mask))-offset_x);
      y1 = CLAMP (y1, -offset_y, drawable_height(GIMP_DRAWABLE(mask))-offset_y);
      x2 = CLAMP (x2, -offset_x, drawable_width (GIMP_DRAWABLE(mask))-offset_x);
      y2 = CLAMP (y2, -offset_y, drawable_height(GIMP_DRAWABLE(mask))-offset_y);
688 689 690 691
    }

  /*  If the calling procedure specified an undo step...  */
  if (undo)
692
    undo_push_image (gimp_drawable_gimage (drawable), drawable, x1, y1, x2, y2);
693 694 695 696 697 698 699 700 701 702 703 704 705 706 707 708 709 710 711 712 713 714 715 716 717 718 719 720 721 722 723 724 725 726 727 728 729 730

  /* configure the pixel regions
   *  If an alternative to using the drawable's data as src1 was provided...
   */
  if (src1_tiles)
    pixel_region_init (&src1PR, src1_tiles, x1, y1, (x2 - x1), (y2 - y1), FALSE);
  else
    pixel_region_init (&src1PR, drawable_data (drawable), x1, y1, (x2 - x1), (y2 - y1), FALSE);
  pixel_region_init (&destPR, drawable_data (drawable), x1, y1, (x2 - x1), (y2 - y1), TRUE);
  pixel_region_resize (src2PR, src2PR->x + (x1 - x), src2PR->y + (y1 - y), (x2 - x1), (y2 - y1));

  if (mask)
    {
      int mx, my;

      /*  configure the mask pixel region
       *  don't use x1 and y1 because they are in layer
       *  coordinate system.  Need mask coordinate system
       */
      mx = x1 + offset_x;
      my = y1 + offset_y;

      pixel_region_init (&maskPR, drawable_data (GIMP_DRAWABLE(mask)), mx, my, (x2 - x1), (y2 - y1), FALSE);
      combine_regions (&src1PR, src2PR, &destPR, &maskPR, NULL,
		       opacity, mode, active, operation);
    }
  else
    combine_regions (&src1PR, src2PR, &destPR, NULL, NULL,
		     opacity, mode, active, operation);
}

/* Similar to gimp_image_apply_image but works in "replace" mode (i.e.
   transparent pixels in src2 make the result transparent rather
   than opaque.

   Takes an additional mask pixel region as well.
*/
void
731 732 733
gimp_image_replace_image (GimpImage    *gimage, 
			  GimpDrawable *drawable, 
			  PixelRegion  *src2PR,
734 735
			  gint          undo, 
			  gint          opacity,
736
			  PixelRegion  *maskPR,
737 738
			  gint          x, 
			  gint          y)
739
{
Sven Neumann's avatar
Sven Neumann committed
740
  Channel *mask;
741 742
  gint x1, y1, x2, y2;
  gint offset_x, offset_y;
743 744
  PixelRegion src1PR, destPR;
  PixelRegion mask2PR, tempPR;
745 746 747
  guchar *temp_data;
  gint operation;
  gint active [MAX_CHANNELS];
748 749

  /*  get the selection mask if one exists  */
750
  mask = (gimage_mask_is_empty (gimage)) ? NULL : gimp_image_get_mask (gimage);
751 752 753 754 755 756 757 758 759 760

  /*  configure the active channel array  */
  gimp_image_get_active_channels (gimage, drawable, active);

  /*  determine what sort of operation is being attempted and
   *  if it's actually legal...
   */
  operation = valid_combinations [drawable_type (drawable)][src2PR->bytes];
  if (operation == -1)
    {
761
      g_message (_("gimp_image_apply_image sent illegal parameters"));
762 763 764 765 766 767 768 769 770 771 772 773 774 775 776 777 778 779
      return;
    }

  /*  get the layer offsets  */
  drawable_offsets (drawable, &offset_x, &offset_y);

  /*  make sure the image application coordinates are within gimage bounds  */
  x1 = CLAMP (x, 0, drawable_width (drawable));
  y1 = CLAMP (y, 0, drawable_height (drawable));
  x2 = CLAMP (x + src2PR->w, 0, drawable_width (drawable));
  y2 = CLAMP (y + src2PR->h, 0, drawable_height (drawable));

  if (mask)
    {
      /*  make sure coordinates are in mask bounds ...
       *  we need to add the layer offset to transform coords
       *  into the mask coordinate system
       */
780 781 782 783
      x1 = CLAMP (x1, -offset_x, drawable_width (GIMP_DRAWABLE(mask))-offset_x);
      y1 = CLAMP (y1, -offset_y, drawable_height(GIMP_DRAWABLE(mask))-offset_y);
      x2 = CLAMP (x2, -offset_x, drawable_width (GIMP_DRAWABLE(mask))-offset_x);
      y2 = CLAMP (y2, -offset_y, drawable_height(GIMP_DRAWABLE(mask))-offset_y);
784 785 786 787 788 789 790 791 792 793 794 795 796 797 798 799 800 801 802 803 804 805 806 807 808 809 810 811 812 813 814 815 816 817 818 819 820 821 822 823 824 825 826 827 828 829 830 831 832 833 834 835 836 837 838 839 840 841 842 843 844 845 846 847 848
    }

  /*  If the calling procedure specified an undo step...  */
  if (undo)
    drawable_apply_image (drawable, x1, y1, x2, y2, NULL, FALSE);

  /* configure the pixel regions
   *  If an alternative to using the drawable's data as src1 was provided...
   */
  pixel_region_init (&src1PR, drawable_data (drawable), x1, y1, (x2 - x1), (y2 - y1), FALSE);
  pixel_region_init (&destPR, drawable_data (drawable), x1, y1, (x2 - x1), (y2 - y1), TRUE);
  pixel_region_resize (src2PR, src2PR->x + (x1 - x), src2PR->y + (y1 - y), (x2 - x1), (y2 - y1));

  if (mask)
    {
      int mx, my;

      /*  configure the mask pixel region
       *  don't use x1 and y1 because they are in layer
       *  coordinate system.  Need mask coordinate system
       */
      mx = x1 + offset_x;
      my = y1 + offset_y;

      pixel_region_init (&mask2PR, drawable_data (GIMP_DRAWABLE(mask)), mx, my, (x2 - x1), (y2 - y1), FALSE);

      tempPR.bytes = 1;
      tempPR.x = 0;
      tempPR.y = 0;
      tempPR.w = x2 - x1;
      tempPR.h = y2 - y1;
      tempPR.rowstride = mask2PR.rowstride;
      temp_data = g_malloc (tempPR.h * tempPR.rowstride);
      tempPR.data = temp_data;

      copy_region (&mask2PR, &tempPR);

      /* apparently, region operations can mutate some PR data. */
      tempPR.x = 0;
      tempPR.y = 0;
      tempPR.w = x2 - x1;
      tempPR.h = y2 - y1;
      tempPR.data = temp_data;

      apply_mask_to_region (&tempPR, maskPR, OPAQUE_OPACITY);

      tempPR.x = 0;
      tempPR.y = 0;
      tempPR.w = x2 - x1;
      tempPR.h = y2 - y1;
      tempPR.data = temp_data;

      combine_regions_replace (&src1PR, src2PR, &destPR, &tempPR, NULL,
		       opacity, active, operation);

      g_free (temp_data);
    }
  else
    combine_regions_replace (&src1PR, src2PR, &destPR, maskPR, NULL,
		     opacity, active, operation);
}

/* Get rid of these! A "foreground" is an UI concept.. */

void
849 850 851
gimp_image_get_foreground (GimpImage    *gimage, 
			   GimpDrawable *drawable, 
			   guchar       *fg)
852
{
853
  guchar pfg[3];
854 855 856 857 858 859 860 861

  /*  Get the palette color  */
  palette_get_foreground (&pfg[0], &pfg[1], &pfg[2]);

  gimp_image_transform_color (gimage, drawable, pfg, fg, RGB);
}

void
862 863 864
gimp_image_get_background (GimpImage    *gimage, 
			   GimpDrawable *drawable, 
			   guchar       *bg)
865
{
866
  guchar pbg[3];
867 868 869 870 871 872 873

  /*  Get the palette color  */
  palette_get_background (&pbg[0], &pbg[1], &pbg[2]);

  gimp_image_transform_color (gimage, drawable, pbg, bg, RGB);
}

874
guchar *
875
gimp_image_get_color_at (GimpImage *gimage, 
876 877
			 gint       x, 
			 gint       y)
878 879
{
  Tile *tile;
880 881
  guchar *src;
  guchar *dest;
882 883

  if (x < 0 || y < 0 || x >= gimage->width || y >= gimage->height)
884 885 886 887
    {
      return NULL;
    }
  dest = g_new (unsigned char, 5);
888 889 890 891
  tile = tile_manager_get_tile (gimp_image_composite (gimage), x, y,
				TRUE, FALSE);
  src = tile_data_pointer (tile, x % TILE_WIDTH, y % TILE_HEIGHT);
  gimp_image_get_color (gimage, gimp_image_composite_type (gimage), dest, src);
892 893

  if (TYPE_HAS_ALPHA (gimp_image_composite_type (gimage)))
894 895 896
    dest[3] = src[gimp_image_composite_bytes (gimage) - 1];
  else
    dest[3] = 255;
897

898 899
  dest[4] = 0;
  tile_release (tile, FALSE);
900

901 902 903
  return dest;
}

904
void
905
gimp_image_get_color (GimpImage     *gimage, 
906
		      GimpImageType  d_type,
907 908
		      guchar        *rgb, 
		      guchar        *src)
909 910 911 912 913 914 915 916 917 918 919 920 921 922 923 924
{
  switch (d_type)
    {
    case RGB_GIMAGE: case RGBA_GIMAGE:
      map_to_color (0, NULL, src, rgb);
      break;
    case GRAY_GIMAGE: case GRAYA_GIMAGE:
      map_to_color (1, NULL, src, rgb);
      break;
    case INDEXED_GIMAGE: case INDEXEDA_GIMAGE:
      map_to_color (2, gimage->cmap, src, rgb);
      break;
    }
}

void
925 926 927 928 929
gimp_image_transform_color (GimpImage         *gimage, 
			    GimpDrawable      *drawable,
			    guchar            *src, 
			    guchar            *dest, 
			    GimpImageBaseType  type)
930 931
{
#define INTENSITY(r,g,b) (r * 0.30 + g * 0.59 + b * 0.11 + 0.001)
932
  GimpImageType d_type;
933 934 935 936 937 938 939 940 941 942 943 944 945 946 947 948 949 950 951 952 953 954 955 956 957

  d_type = (drawable != NULL) ? drawable_type (drawable) :
    gimp_image_base_type_with_alpha (gimage);

  switch (type)
    {
    case RGB:
      switch (d_type)
	{
	case RGB_GIMAGE: case RGBA_GIMAGE:
	  /*  Straight copy  */
	  *dest++ = *src++;
	  *dest++ = *src++;
	  *dest++ = *src++;
	  break;
	case GRAY_GIMAGE: case GRAYA_GIMAGE:
	  /*  NTSC conversion  */
	  *dest = INTENSITY (src[RED_PIX],
			     src[GREEN_PIX],
			     src[BLUE_PIX]);
	  break;
	case INDEXED_GIMAGE: case INDEXEDA_GIMAGE:
	  /*  Least squares method  */
	  *dest = map_rgb_to_indexed (gimage->cmap,
				      gimage->num_cols,
958
				      gimage,
959 960 961 962 963 964 965 966 967 968 969 970 971 972 973 974 975 976 977 978 979 980 981
				      src[RED_PIX],
				      src[GREEN_PIX],
				      src[BLUE_PIX]);
	  break;
	}
      break;
    case GRAY:
      switch (d_type)
	{
	case RGB_GIMAGE: case RGBA_GIMAGE:
	  /*  Gray to RG&B */
	  *dest++ = *src;
	  *dest++ = *src;
	  *dest++ = *src;
	  break;
	case GRAY_GIMAGE: case GRAYA_GIMAGE:
	  /*  Straight copy  */
	  *dest = *src;
	  break;
	case INDEXED_GIMAGE: case INDEXEDA_GIMAGE:
	  /*  Least squares method  */
	  *dest = map_rgb_to_indexed (gimage->cmap,
				      gimage->num_cols,
982
				      gimage,
983 984 985 986 987 988 989 990 991 992 993 994 995 996 997 998 999
				      src[GRAY_PIX],
				      src[GRAY_PIX],
				      src[GRAY_PIX]);
	  break;
	}
      break;
    default:
      break;
    }
}

Guide*
gimp_image_add_hguide (GimpImage *gimage)
{
  Guide *guide;

  guide = g_new (Guide, 1);
1000 1001 1002
  guide->ref_count   = 0;
  guide->position    = -1;
  guide->guide_ID    = next_guide_id++;
1003
  guide->orientation = ORIENTATION_HORIZONTAL;
1004 1005 1006 1007 1008 1009 1010 1011 1012 1013 1014 1015

  gimage->guides = g_list_prepend (gimage->guides, guide);

  return guide;
}

Guide*
gimp_image_add_vguide (GimpImage *gimage)
{
  Guide *guide;

  guide = g_new (Guide, 1);
1016 1017 1018
  guide->ref_count   = 0;
  guide->position    = -1;
  guide->guide_ID    = next_guide_id++;
1019
  guide->orientation = ORIENTATION_VERTICAL;
1020 1021 1022 1023 1024 1025 1026 1027

  gimage->guides = g_list_prepend (gimage->guides, guide);

  return guide;
}

void
gimp_image_add_guide (GimpImage *gimage,
1028
		      Guide     *guide)
1029 1030 1031 1032 1033 1034
{
  gimage->guides = g_list_prepend (gimage->guides, guide);
}

void
gimp_image_remove_guide (GimpImage *gimage,
1035
			 Guide     *guide)
1036 1037 1038 1039 1040 1041
{
  gimage->guides = g_list_remove (gimage->guides, guide);
}

void
gimp_image_delete_guide (GimpImage *gimage,
1042
			 Guide     *guide) 
1043 1044 1045 1046 1047
{
  gimage->guides = g_list_remove (gimage->guides, guide);
  g_free (guide);
}

1048
Parasite *
1049
gimp_image_find_parasite (const GimpImage *gimage, 
1050
			  const gchar     *name)
1051
{
1052
  return parasite_list_find (gimage->parasites, name);
1053 1054
}

1055 1056 1057 1058
static void
list_func (gchar      *key, 
	   Parasite   *p, 
	   gchar    ***cur)
Marc Lehmann's avatar
Marc Lehmann committed
1059
{
1060
  *(*cur)++ = (gchar *) g_strdup (key);
Marc Lehmann's avatar
Marc Lehmann committed
1061 1062
}

1063
gchar **
1064 1065
gimp_image_parasite_list (GimpImage *image, 
			  gint      *count)
Marc Lehmann's avatar
Marc Lehmann committed
1066
{
1067
  gchar **list, **cur;
Marc Lehmann's avatar
Marc Lehmann committed
1068 1069

  *count = parasite_list_length (image->parasites);
1070
  cur = list = (gchar **) g_malloc (sizeof (gchar *) * *count);
Marc Lehmann's avatar
Marc Lehmann committed
1071

1072
  parasite_list_foreach (image->parasites, (GHFunc) list_func, &cur);
Marc Lehmann's avatar
Marc Lehmann committed
1073 1074 1075 1076
  
  return list;
}

1077
void
1078 1079
gimp_image_attach_parasite (GimpImage *gimage, 
			    Parasite  *parasite)
1080
{
jaycox's avatar
jaycox committed
1081
  /* only set the dirty bit manually if we can be saved and the new
Sven Neumann's avatar
Sven Neumann committed
1082
     parasite differs from the current one and we aren't undoable */
1083
  if (parasite_is_undoable (parasite))
jaycox's avatar
jaycox committed
1084
    undo_push_image_parasite (gimage, parasite);
1085 1086 1087
  if (parasite_is_persistent (parasite)
      && !parasite_compare (parasite,
			    gimp_image_find_parasite(gimage,
1088 1089
						     parasite_name(parasite))))
    undo_push_cantundo (gimage, _("attach parasite to image"));
1090 1091 1092 1093 1094 1095 1096 1097

  parasite_list_add (gimage->parasites, parasite);

  if (parasite_has_flag (parasite, PARASITE_ATTACH_PARENT))
    {
      parasite_shift_parent (parasite);
      gimp_attach_parasite (parasite);
    }
1098 1099 1100
}

void
1101 1102
gimp_image_detach_parasite (GimpImage   *gimage, 
			    const gchar *parasite)
1103
{
1104
  Parasite *p;
Sven Neumann's avatar
Sven Neumann committed
1105

1106 1107
  if (!(p = parasite_list_find(gimage->parasites, parasite)))
    return;