gimpimage-resize.c 94.2 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
  UNDO_EVENT,
102 103
  LAST_SIGNAL
};
104 105

static void  gimp_image_destroy (GtkObject *);
106 107

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

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;

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


/* static functions */

Sven Neumann's avatar
Sven Neumann committed
154 155
static void 
gimp_image_init (GimpImage *gimage)
156
{
157 158 159
  gimage->has_filename          = FALSE;
  gimage->num_cols              = 0;
  gimage->cmap                  = NULL;
160
  /* ID and ref_count handled in gimage.c */
161 162 163 164 165 166 167 168 169 170 171 172 173 174 175
  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;
176
  gimage->group_count           = 0;
177
  gimage->pushing_undo_group    = 0;
178 179 180
  gimage->comp_preview_valid[0] = FALSE;
  gimage->comp_preview_valid[1] = FALSE;
  gimage->comp_preview_valid[2] = FALSE;
181 182 183 184 185 186 187
  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;
188 189
}

Sven Neumann's avatar
Sven Neumann committed
190 191 192 193 194
GtkType 
gimp_image_get_type (void) 
{
  static GtkType type;

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

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:
226
      g_assert_not_reached ();
227 228 229 230
    }

  /*  allocate the new projection  */
  gimage->projection = tile_manager_new (gimage->width, gimage->height, gimage->proj_bytes);
231
  tile_manager_set_user_data (gimage->projection, (void *) gimage);
232 233 234 235 236 237 238 239 240 241 242 243 244
  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
245
gimp_image_allocate_shadow (GimpImage *gimage, 
246 247 248
			    gint       width, 
			    gint       height, 
			    gint       bpp)
249 250 251 252 253 254 255 256 257
{
  /*  allocate the new projection  */
  gimage->shadow = tile_manager_new (width, height, bpp);
}


/* function definitions */

GimpImage *
258 259 260
gimp_image_new (gint               width,
		gint               height,
		GimpImageBaseType  base_type)
261
{
262 263
  GimpImage *gimage = GIMP_IMAGE (gtk_type_new (gimp_image_get_type ()));
  gint i;
264

265 266 267
  gimage->filename  = NULL;
  gimage->width     = width;
  gimage->height    = height;
268 269 270 271 272 273 274 275 276 277
  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;
278
      gimage->cmap     = (guchar *) g_malloc0 (COLORMAP_SIZE);
279 280 281 282 283 284
      break;
    default:
      break;
    }

  /*  configure the active pointers  */
285
  gimage->active_layer   = NULL;
286
  gimage->active_channel = NULL;  /* no default active channel */
287
  gimage->floating_sel   = NULL;
288 289 290 291

  /*  set all color channels visible and active  */
  for (i = 0; i < MAX_CHANNELS; i++)
    {
292 293
      gimage->visible[i] = TRUE;
      gimage->active[i]  = TRUE;
294 295 296
    }

  /* create the selection mask */
297 298
  gimage->selection_mask = channel_new_mask (gimage,
					     gimage->width, gimage->height);
299

300
  /* set the qmask properties */
301 302
  gimage->qmask_state    = FALSE;
  gimage->qmask_opacity  = 50;
303 304 305
  gimage->qmask_color[0] = 255; 
  gimage->qmask_color[1] = 0; 
  gimage->qmask_color[2] = 0; 
306 307 308 309 310

  return gimage;
}

void
311
gimp_image_set_filename (GimpImage *gimage, 
312
			 gchar     *filename)
313
{
314
  gchar *new_filename;
315

316 317 318 319 320 321
  /* 
   * 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.
   */

322
  new_filename = g_strdup (filename);
323

324 325 326 327 328 329 330 331 332 333 334 335 336 337 338 339 340
  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]);
}

341
void
342
gimp_image_set_resolution (GimpImage *gimage,
343 344
			   gdouble    xresolution,
			   gdouble    yresolution)
345
{
346 347
  gimage->xresolution = xresolution;
  gimage->yresolution = yresolution;
348 349
}

350 351
void
gimp_image_get_resolution (GimpImage *gimage,
352 353
			   gdouble   *xresolution,
			   gdouble   *yresolution)
354
{
355 356
  g_return_if_fail (xresolution && yresolution);

357 358
  *xresolution = gimage->xresolution;
  *yresolution = gimage->yresolution;
359 360
}

361 362
void
gimp_image_set_unit (GimpImage *gimage,
Sven Neumann's avatar
Sven Neumann committed
363
		     GUnit      unit)
364 365 366 367 368 369 370 371 372 373
{
  gimage->unit = unit;
}

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

374
void
Sven Neumann's avatar
Sven Neumann committed
375 376
gimp_image_set_save_proc (GimpImage     *gimage, 
			  PlugInProcDef *proc)
377 378 379 380 381 382 383 384 385
{
  gimage->save_proc = proc;
}

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

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

400 401
  gimp_add_busy_cursors();

402
  g_assert (new_width > 0 && new_height > 0);
403 404 405 406 407 408 409 410 411 412 413 414 415 416

  /*  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  */
417
  gimage->width  = new_width;
418 419 420 421 422 423 424 425 426
  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);
427 428 429 430 431 432 433 434 435 436

    }

  /*  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
437
      guide_list = g_list_next (guide_list);
438 439 440

      switch (guide->orientation)
	{
441
	case ORIENTATION_HORIZONTAL:
442 443 444 445
	  guide->position += offset_y;
	  if (guide->position < 0 || guide->position > new_height)
	    gimp_image_delete_guide (gimage, guide);
	  break;
446
	case ORIENTATION_VERTICAL:
447 448 449 450 451 452 453
	  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");
	}
454 455 456
    }

  /*  Don't forget the selection mask!  */
457 458
  channel_resize (gimage->selection_mask,
		  new_width, new_height, offset_x, offset_y);
459 460 461 462 463 464 465 466 467 468 469 470 471 472 473 474 475 476 477
  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]);
478

479
  gimp_remove_busy_cursors (NULL);
480 481
}

482 483 484 485 486 487 488 489 490 491 492 493
gint
gimp_image_get_width (const GimpImage *gimage)
{
  return gimage->width;
}

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

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

508
  gimp_add_busy_cursors ();
509

510 511 512 513 514 515 516 517 518 519 520 521 522
  /*  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  */
523
  old_width  = gimage->width;
524
  old_height = gimage->height;
525
  gimage->width  = new_width;
526 527 528 529 530 531 532 533 534 535 536 537 538 539 540 541 542 543 544 545 546
  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;

547 548 549 550
      layer_width  = (new_width *
		      drawable_width (GIMP_DRAWABLE(layer))) / old_width;
      layer_height = (new_height *
		      drawable_height (GIMP_DRAWABLE(layer))) / old_height;
551 552 553 554
      layer_scale (layer, layer_width, layer_height, FALSE);
      list = g_slist_next (list);
    }

555 556 557 558 559 560 561 562 563
  /*  Scale any Guides  */
  glist = gimage->guides;
  while (glist)
    {
      guide = (Guide*) glist->data;
      glist = g_list_next (glist);

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

575 576 577 578 579 580 581 582
  /*  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]);
583

584
  gimp_remove_busy_cursors (NULL);
585 586 587
}

TileManager *
588
gimp_image_shadow (GimpImage *gimage, 
589 590 591
		   gint       width, 
		   gint       height, 
		   gint       bpp)
592 593
{
  if (gimage->shadow &&
594 595 596
      ((width != tile_manager_level_width (gimage->shadow)) ||
       (height != tile_manager_level_height (gimage->shadow)) ||
       (bpp != tile_manager_level_bpp (gimage->shadow))))
597 598 599 600 601 602 603 604 605 606 607 608 609 610 611 612 613 614 615 616 617 618
    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)
{
619
  GimpImage* gimage = GIMP_IMAGE (object);
Sven Neumann's avatar
Sven Neumann committed
620 621 622 623 624 625 626 627 628 629 630 631 632

  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);
633

Sven Neumann's avatar
Sven Neumann committed
634
  if (gimage->parasites)
635
    gtk_object_unref (GTK_OBJECT (gimage->parasites));
636 637 638
}

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

  /*  get the selection mask if one exists  */
658
  mask = (gimage_mask_is_empty (gimage)) ? NULL : gimp_image_get_mask (gimage);
659 660 661 662 663 664 665 666 667 668

  /*  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)
    {
Sven Neumann's avatar
Sven Neumann committed
669
      g_message ("gimp_image_apply_image sent illegal parameters");
670 671 672 673 674 675 676
      return;
    }

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

  /*  make sure the image application coordinates are within gimage bounds  */
677
  x1 = CLAMP (x, 0, drawable_width  (drawable));
678
  y1 = CLAMP (y, 0, drawable_height (drawable));
679
  x2 = CLAMP (x + src2PR->w, 0, drawable_width  (drawable));
680 681 682 683 684 685 686 687
  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
       */
688 689 690 691
      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);
692 693 694 695
    }

  /*  If the calling procedure specified an undo step...  */
  if (undo)
696
    undo_push_image (gimp_drawable_gimage (drawable), drawable, x1, y1, x2, y2);
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 731 732 733 734

  /* 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
735 736 737
gimp_image_replace_image (GimpImage    *gimage, 
			  GimpDrawable *drawable, 
			  PixelRegion  *src2PR,
738 739
			  gint          undo, 
			  gint          opacity,
740
			  PixelRegion  *maskPR,
741 742
			  gint          x, 
			  gint          y)
743
{
Sven Neumann's avatar
Sven Neumann committed
744
  Channel *mask;
745 746
  gint x1, y1, x2, y2;
  gint offset_x, offset_y;
747 748
  PixelRegion src1PR, destPR;
  PixelRegion mask2PR, tempPR;
749 750 751
  guchar *temp_data;
  gint operation;
  gint active [MAX_CHANNELS];
752 753

  /*  get the selection mask if one exists  */
754
  mask = (gimage_mask_is_empty (gimage)) ? NULL : gimp_image_get_mask (gimage);
755 756 757 758 759 760 761 762 763 764

  /*  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)
    {
Sven Neumann's avatar
Sven Neumann committed
765
      g_message ("gimp_image_apply_image sent illegal parameters");
766 767 768 769 770 771 772 773 774 775 776 777 778 779 780 781 782 783
      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
       */
784 785 786 787
      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);
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 849 850 851 852
    }

  /*  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
853 854 855
gimp_image_get_foreground (GimpImage    *gimage, 
			   GimpDrawable *drawable, 
			   guchar       *fg)
856
{
857
  guchar pfg[3];
858 859 860 861 862 863 864 865

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

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

void
866 867 868
gimp_image_get_background (GimpImage    *gimage, 
			   GimpDrawable *drawable, 
			   guchar       *bg)
869
{
870
  guchar pbg[3];
871 872 873 874 875 876 877

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

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

878
guchar *
879
gimp_image_get_color_at (GimpImage *gimage, 
880 881
			 gint       x, 
			 gint       y)
882 883
{
  Tile *tile;
884 885
  guchar *src;
  guchar *dest;
886 887

  if (x < 0 || y < 0 || x >= gimage->width || y >= gimage->height)
888 889 890 891
    {
      return NULL;
    }
  dest = g_new (unsigned char, 5);
892 893 894 895
  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);
896 897

  if (TYPE_HAS_ALPHA (gimp_image_composite_type (gimage)))
898 899 900
    dest[3] = src[gimp_image_composite_bytes (gimage) - 1];
  else
    dest[3] = 255;
901

902 903
  dest[4] = 0;
  tile_release (tile, FALSE);
904

905 906 907
  return dest;
}

908
void
909
gimp_image_get_color (GimpImage     *gimage, 
910
		      GimpImageType  d_type,
911 912
		      guchar        *rgb, 
		      guchar        *src)
913 914 915 916 917 918 919 920 921 922 923 924 925 926 927 928
{
  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
929 930 931 932 933
gimp_image_transform_color (GimpImage         *gimage, 
			    GimpDrawable      *drawable,
			    guchar            *src, 
			    guchar            *dest, 
			    GimpImageBaseType  type)
934 935
{
#define INTENSITY(r,g,b) (r * 0.30 + g * 0.59 + b * 0.11 + 0.001)
936
  GimpImageType d_type;
937 938 939 940 941 942 943 944 945 946 947 948 949 950 951 952 953 954 955 956 957 958 959 960 961

  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,
962
				      gimage,
963 964 965 966 967 968 969 970 971 972 973 974 975 976 977 978 979 980 981 982 983 984 985
				      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,
986
				      gimage,
987 988 989 990 991 992 993 994 995 996 997 998 999 1000 1001 1002 1003
				      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);
1004 1005 1006
  guide->ref_count   = 0;
  guide->position    = -1;
  guide->guide_ID    = next_guide_id++;
1007
  guide->orientation = ORIENTATION_HORIZONTAL;
1008 1009 1010 1011 1012 1013 1014 1015 1016 1017 1018 1019

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

  return guide;
}

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

  guide = g_new (Guide, 1);
1020 1021 1022
  guide->ref_count   = 0;
  guide->position    = -1;
  guide->guide_ID    = next_guide_id++;
1023
  guide->orientation = ORIENTATION_VERTICAL;
1024 1025 1026 1027 1028 1029 1030 1031

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

  return guide;
}

void
gimp_image_add_guide (GimpImage *gimage,
1032
		      Guide     *guide)
1033 1034 1035 1036 1037 1038
{
  gimage->guides = g_list_prepend (gimage->guides, guide);
}

void
gimp_image_remove_guide (GimpImage *gimage,
1039
			 Guide     *guide)
1040 1041 1042 1043 1044 1045
{
  gimage->guides = g_list_remove (gimage->guides, guide);
}

void
gimp_image_delete_guide (GimpImage *gimage,
1046
			 Guide     *guide) 
1047 1048 1049 1050 1051
{
  gimage->guides = g_list_remove (gimage->guides, guide);
  g_free (guide);
}

1052
Parasite *
1053
gimp_image_find_parasite (const GimpImage *gimage, 
1054
			  const gchar     *name)
1055
{
1056
  return parasite_list_find (gimage->parasites, name);
1057 1058
}

1059 1060 1061 1062
static void
list_func (gchar      *key, 
	   Parasite   *p, 
	   gchar    ***cur)
Marc Lehmann's avatar
Marc Lehmann committed
1063
{
1064
  *(*cur)++ = (gchar *) g_strdup (key);
Marc Lehmann's avatar
Marc Lehmann committed
1065 1066
}

1067
gchar **
1068 1069
gimp_image_parasite_list (GimpImage *image, 
			  gint      *count)
Marc Lehmann's avatar
Marc Lehmann committed
1070
{
1071
  gchar **list, **cur;
Marc Lehmann's avatar
Marc Lehmann committed
1072 1073

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

1076
  parasite_list_foreach (image->parasites, (GHFunc) list_func, &cur);
Marc Lehmann's avatar
Marc Lehmann committed
1077 1078 1079 1080
  
  return list;
}

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

  parasite_list_add (gimage->parasites, parasite);

  if (parasite_has_flag (parasite, PARASITE_ATTACH_PARENT))
    {
      parasite_shift_parent (parasite);
      gimp_attach_parasite (parasite);
    }
1102 1103 1104
}

void
1105 1106
gimp_image_detach_parasite (GimpImage   *gimage, 
			    const gchar *parasite)
1107
{
1108
  Parasite *p;