gimpimage-resize.c 93.8 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
#include "general.h"
#include "gimage_mask.h"
26
#include "gimpcontext.h"
27
#include "paint_funcs.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 "path.h"
34
#include "gimprc.h"
35

Sven Neumann's avatar
Sven Neumann committed
36
#include "config.h"
37
#include "libgimp/gimpcolorspace.h"
38
#include "libgimp/gimpintl.h"
39
#include "libgimp/gimplimits.h"
40

scott's avatar
scott committed
41 42
#include "tile_manager.h"
#include "tile.h"
43 44 45
#include "layer_pvt.h"
#include "drawable_pvt.h"		/* ick ick. */

46

47 48 49 50 51 52 53
#ifdef DEBUG
#define TRC(x) printf x
#else
#define TRC(x)
#endif


54 55
/*  Local function declarations  */
static void     gimp_image_free_projection       (GimpImage *);
56
static void     gimp_image_allocate_shadow       (GimpImage *, gint, gint, gint);
57 58 59
static void     gimp_image_allocate_projection   (GimpImage *);
static void     gimp_image_free_layers           (GimpImage *);
static void     gimp_image_free_channels         (GimpImage *);
60 61 62 63
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 *);
64 65

/*  projection functions  */
66 67
static void     project_intensity            (GimpImage *, Layer *,
					      PixelRegion *, PixelRegion *,
68
					      PixelRegion *);
69 70
static void     project_intensity_alpha      (GimpImage *, Layer *,
					      PixelRegion *, PixelRegion *,
71
					      PixelRegion *);
72 73 74 75
static void     project_indexed              (GimpImage *, Layer *,
					      PixelRegion *, PixelRegion *);
static void     project_channel              (GimpImage *, Channel *,
					      PixelRegion *, PixelRegion *);
76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95

/*
 *  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 },
};

96
guint32 next_guide_id = 1;  /* For generating guide_ID handles for PDB stuff */
97

98 99 100 101 102

/*
 *  Static variables
 */

103
enum {
104
  CLEAN,
105 106 107 108 109
  DIRTY,
  REPAINT,
  RENAME,
  RESIZE,
  RESTRUCTURE,
110
  COLORMAP_CHANGED,
111
  UNDO_EVENT,
112 113
  LAST_SIGNAL
};
114 115

static void  gimp_image_destroy (GtkObject *);
116 117

static guint gimp_image_signals[LAST_SIGNAL];
118
static GimpObjectClass *parent_class;
119 120 121 122 123 124 125 126 127 128 129 130 131 132

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;

133 134 135
  gimp_image_signals[CLEAN] =
	  gimp_signal_new ("clean", GTK_RUN_FIRST, type, 0,
			   gimp_sigtype_void);
136
  gimp_image_signals[DIRTY] =
137 138
	  gimp_signal_new ("dirty", GTK_RUN_FIRST, type, 0,
			   gimp_sigtype_void);
139
  gimp_image_signals[REPAINT] =
140 141
	  gimp_signal_new ("repaint", GTK_RUN_FIRST, type, 0,
			   gimp_sigtype_int_int_int_int);
142
  gimp_image_signals[RENAME] =
143 144
	  gimp_signal_new ("rename", GTK_RUN_FIRST, type, 0,
			   gimp_sigtype_void);
145
  gimp_image_signals[RESIZE] =
146 147
	  gimp_signal_new ("resize", GTK_RUN_FIRST, type, 0,
			   gimp_sigtype_void);
148
  gimp_image_signals[RESTRUCTURE] =
149 150
	  gimp_signal_new ("restructure", GTK_RUN_FIRST, type, 0,
			   gimp_sigtype_void);
151
  gimp_image_signals[COLORMAP_CHANGED] =
152 153
	  gimp_signal_new ("colormap_changed", GTK_RUN_FIRST, type, 0,
			   gimp_sigtype_int);
154 155 156
  gimp_image_signals[UNDO_EVENT] = 
	  gimp_signal_new ("undo_event", GTK_RUN_FIRST, type, 0,
			   gimp_sigtype_int);
157 158 159 160 161 162 163
  
  gtk_object_class_add_signals (object_class, gimp_image_signals, LAST_SIGNAL);
}


/* static functions */

Sven Neumann's avatar
Sven Neumann committed
164 165
static void 
gimp_image_init (GimpImage *gimage)
166
{
167 168 169
  gimage->has_filename          = FALSE;
  gimage->num_cols              = 0;
  gimage->cmap                  = NULL;
170
  gimage->disp_count            = 0;
171 172
  gimage->instance_count        = 0;
  gimage->shadow                = NULL;
173
  gimage->dirty                 = 1;     /* Why is that? I doubt this is correct. --Sven */
174 175 176 177 178 179 180 181 182 183 184 185
  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;
186
  gimage->group_count           = 0;
187
  gimage->pushing_undo_group    = UNDO_NULL;
188 189 190
  gimage->comp_preview_valid[0] = FALSE;
  gimage->comp_preview_valid[1] = FALSE;
  gimage->comp_preview_valid[2] = FALSE;
191 192 193 194 195 196 197
  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;
198 199
}

Sven Neumann's avatar
Sven Neumann committed
200 201 202 203 204
GtkType 
gimp_image_get_type (void) 
{
  static GtkType type;

205 206 207 208 209 210
  GIMP_TYPE_INIT (type,
		  GimpImage,
		  GimpImageClass,
		  gimp_image_init,
		  gimp_image_class_init,
		  GIMP_TYPE_OBJECT);
Sven Neumann's avatar
Sven Neumann committed
211
  return type;
212 213 214 215 216 217 218 219 220 221 222 223 224 225 226 227 228 229 230 231 232 233 234 235
}

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:
236
      g_assert_not_reached ();
237 238 239 240
    }

  /*  allocate the new projection  */
  gimage->projection = tile_manager_new (gimage->width, gimage->height, gimage->proj_bytes);
241
  tile_manager_set_user_data (gimage->projection, (void *) gimage);
242 243 244 245 246 247 248 249 250 251 252 253 254
  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
255
gimp_image_allocate_shadow (GimpImage *gimage, 
256 257 258
			    gint       width, 
			    gint       height, 
			    gint       bpp)
259 260 261 262 263 264 265 266 267
{
  /*  allocate the new projection  */
  gimage->shadow = tile_manager_new (width, height, bpp);
}


/* function definitions */

GimpImage *
268 269 270
gimp_image_new (gint               width,
		gint               height,
		GimpImageBaseType  base_type)
271
{
272 273
  GimpImage *gimage = GIMP_IMAGE (gtk_type_new (gimp_image_get_type ()));
  gint i;
274

275 276 277
  gimage->filename  = NULL;
  gimage->width     = width;
  gimage->height    = height;
278 279 280 281 282 283 284 285 286 287
  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;
288
      gimage->cmap     = (guchar *) g_malloc0 (COLORMAP_SIZE);
289 290 291 292 293 294
      break;
    default:
      break;
    }

  /*  configure the active pointers  */
295
  gimage->active_layer   = NULL;
296
  gimage->active_channel = NULL;  /* no default active channel */
297
  gimage->floating_sel   = NULL;
298 299 300 301

  /*  set all color channels visible and active  */
  for (i = 0; i < MAX_CHANNELS; i++)
    {
302 303
      gimage->visible[i] = TRUE;
      gimage->active[i]  = TRUE;
304 305 306
    }

  /* create the selection mask */
307 308
  gimage->selection_mask = channel_new_mask (gimage,
					     gimage->width, gimage->height);
309

310
  /* set the qmask properties */
311 312
  gimage->qmask_state    = FALSE;
  gimage->qmask_opacity  = 50;
313 314 315
  gimage->qmask_color[0] = 255; 
  gimage->qmask_color[1] = 0; 
  gimage->qmask_color[2] = 0; 
316 317 318 319 320

  return gimage;
}

void
321
gimp_image_set_filename (GimpImage *gimage, 
322
			 gchar     *filename)
323
{
324 325
  gchar *new_filename, *old_filename;
  gboolean free_old;
326

327 328 329 330 331 332
  /* 
   * 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.
   */

333
  new_filename = g_strdup (filename);
334 335
  old_filename = gimage->filename;
  free_old = gimage->has_filename;
336 337 338 339 340 341 342 343 344 345 346 347

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

348 349 350
  if (free_old)
    g_free (old_filename);

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

354
void
355
gimp_image_set_resolution (GimpImage *gimage,
356 357
			   gdouble    xresolution,
			   gdouble    yresolution)
358
{
359 360 361 362 363
  /* nothing to do if setting res to the same as before */
  if ((ABS (gimage->xresolution - xresolution) < 1e-5) &&
      (ABS (gimage->yresolution - yresolution) < 1e-5))
      return;

364 365 366
  /* don't allow to set the resolution out of bounds */
  if (xresolution < GIMP_MIN_RESOLUTION || xresolution > GIMP_MAX_RESOLUTION ||
      yresolution < GIMP_MIN_RESOLUTION || yresolution > GIMP_MAX_RESOLUTION)
367 368
    return;

369
  undo_push_resolution (gimage);
370

371 372
  gimage->xresolution = xresolution;
  gimage->yresolution = yresolution;
373 374 375

  /* really just want to recalc size and repaint */
  gdisplays_shrink_wrap (gimage);
376 377
}

378 379
void
gimp_image_get_resolution (GimpImage *gimage,
380 381
			   gdouble   *xresolution,
			   gdouble   *yresolution)
382
{
383 384
  g_return_if_fail (xresolution && yresolution);

385 386
  *xresolution = gimage->xresolution;
  *yresolution = gimage->yresolution;
387 388
}

389 390
void
gimp_image_set_unit (GimpImage *gimage,
391
		     GimpUnit   unit)
392
{
393 394
  undo_push_resolution (gimage);

395 396 397
  gimage->unit = unit;
}

398
GimpUnit
399 400 401 402 403
gimp_image_get_unit (GimpImage *gimage)
{
  return gimage->unit;
}

404
void
Sven Neumann's avatar
Sven Neumann committed
405 406
gimp_image_set_save_proc (GimpImage     *gimage, 
			  PlugInProcDef *proc)
407 408 409 410 411 412 413 414 415
{
  gimage->save_proc = proc;
}

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

417
void
418
gimp_image_resize (GimpImage *gimage, 
419 420 421 422
		   gint       new_width, 
		   gint       new_height,
		   gint       offset_x, 
		   gint       offset_y)
423 424
{
  Channel *channel;
425 426 427 428
  Layer   *layer;
  Layer   *floating_layer;
  GSList  *list;
  GList   *guide_list;
429

430 431
  gimp_add_busy_cursors();

432
  g_assert (new_width > 0 && new_height > 0);
433 434 435 436

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

Sven Neumann's avatar
Sven Neumann committed
437
  undo_push_group_start (gimage, IMAGE_RESIZE_UNDO);
438 439 440 441 442 443 444 445 446

  /*  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  */
447
  gimage->width  = new_width;
448 449 450 451 452 453 454 455 456
  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);
457 458 459 460 461 462 463 464 465 466

    }

  /*  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
467
      guide_list = g_list_next (guide_list);
468 469 470

      switch (guide->orientation)
	{
471
	case ORIENTATION_HORIZONTAL:
Sven Neumann's avatar
Sven Neumann committed
472
	  undo_push_guide (gimage, guide);
473 474 475 476
	  guide->position += offset_y;
	  if (guide->position < 0 || guide->position > new_height)
	    gimp_image_delete_guide (gimage, guide);
	  break;
477
	case ORIENTATION_VERTICAL:
Sven Neumann's avatar
Sven Neumann committed
478
	  undo_push_guide (gimage, guide);
479 480 481 482 483 484 485
	  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");
	}
486 487 488
    }

  /*  Don't forget the selection mask!  */
489 490
  channel_resize (gimage->selection_mask,
		  new_width, new_height, offset_x, offset_y);
491 492 493 494 495 496 497 498 499 500 501 502 503 504 505 506 507 508 509
  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]);
510

511
  gimp_remove_busy_cursors (NULL);
512 513
}

514 515 516 517 518 519 520 521 522 523 524 525
gint
gimp_image_get_width (const GimpImage *gimage)
{
  return gimage->width;
}

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

526
void
527
gimp_image_scale (GimpImage *gimage, 
528 529
		  gint       new_width, 
		  gint       new_height)
530 531
{
  Channel *channel;
Sven Neumann's avatar
Sven Neumann committed
532 533 534
  Layer   *layer;
  Layer   *floating_layer;
  GSList  *list;
535
  GSList  *marklist = NULL;
Sven Neumann's avatar
Sven Neumann committed
536 537
  GList   *glist;
  Guide   *guide;
538 539 540 541 542 543 544 545 546 547 548
  gint    old_width, old_height;
  gint    old_offset_x, old_offset_y;
  gint    layer_width, layer_height;
  gdouble img_scale_w = 1.0;
  gdouble img_scale_h = 1.0;

  if((new_width == 0) || (new_height == 0))
    {
      g_message(_("gimp_image_scale: Layer with zero width or height has been rejected."));
      return;
    }
549

550
  gimp_add_busy_cursors ();
551

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

Sven Neumann's avatar
Sven Neumann committed
555
  undo_push_group_start (gimage, IMAGE_SCALE_UNDO);
556 557 558 559 560 561 562 563 564

  /*  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  */
565 566 567

  old_width      = gimage->width;
  old_height     = gimage->height;
568
  gimage->width  = new_width;
569
  gimage->height = new_height;
570 571 572
  img_scale_w    = (gdouble)new_width/(gdouble)old_width;
  img_scale_h    = (gdouble)new_height/(gdouble)old_height;
 
573 574 575 576 577 578 579 580 581 582 583 584 585 586 587 588 589
  /*  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)
    {
590 591 592 593 594 595 596 597 598 599 600 601 602 603 604
      layer  = (Layer *) list->data;
      if(FALSE == layer_scale_by_factors(layer, img_scale_w, img_scale_h))
	{
	  /* Since 0 < img_scale_w, img_scale_h, failure due to one or more     */
	  /* vanishing scaled layer dimensions. Implicit delete implemented     */
	  /* here. Upstream warning implemented in resize_check_layer_scaling() */
          /* [resize.c line 1295], which offers the user the chance to bail out.*/

          marklist = g_list_append(marklist, layer);
        }
      list   = g_slist_next (list);
    }
  /* We defer removing layers lost to scaling until now            */
  /* so as not to mix the operations of iterating over and removal */
  /* from gimage->layers.                                          */  
605

606 607 608 609 610 611 612 613
  if(marklist != NULL)
    {
      while(marklist)
        {
	  layer = marklist->data;
	  gimage_remove_layer(gimage, layer);
	  marklist = g_slist_remove(marklist, layer);
        }
614 615
    }

616 617 618 619 620 621 622 623 624
  /*  Scale any Guides  */
  glist = gimage->guides;
  while (glist)
    {
      guide = (Guide*) glist->data;
      glist = g_list_next (glist);

      switch (guide->orientation)
	{
625
	case ORIENTATION_HORIZONTAL:
Sven Neumann's avatar
Sven Neumann committed
626
	  undo_push_guide (gimage, guide);
627 628
	  guide->position = (guide->position * new_height) / old_height;
	  break;
629
	case ORIENTATION_VERTICAL:
Sven Neumann's avatar
Sven Neumann committed
630
	  undo_push_guide (gimage, guide);
631 632 633 634 635 636
	  guide->position = (guide->position * new_width) / old_width;
	  break;
	default:
	  g_error("Unknown guide orientation II.\n");
	}
    }
637

638 639 640 641 642 643 644 645
  /*  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]);
646

647
  gimp_remove_busy_cursors (NULL);
648 649 650
}

TileManager *
651
gimp_image_shadow (GimpImage *gimage, 
652 653 654
		   gint       width, 
		   gint       height, 
		   gint       bpp)
655 656
{
  if (gimage->shadow &&
657 658 659
      ((width != tile_manager_level_width (gimage->shadow)) ||
       (height != tile_manager_level_height (gimage->shadow)) ||
       (bpp != tile_manager_level_bpp (gimage->shadow))))
660 661 662 663 664 665 666 667 668 669 670 671 672 673 674 675 676 677 678 679 680 681
    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)
{
682
  GimpImage* gimage = GIMP_IMAGE (object);
Sven Neumann's avatar
Sven Neumann committed
683 684 685 686 687 688 689 690 691 692 693 694 695

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

BST 1999 Andy Thomas's avatar
BST 1999 Andy Thomas committed
697 698 699
  if (gimage->comp_preview)
    temp_buf_free (gimage->comp_preview);

Sven Neumann's avatar
Sven Neumann committed
700
  if (gimage->parasites)
701
    gtk_object_unref (GTK_OBJECT (gimage->parasites));
702 703 704
}

void
705 706 707 708 709 710
gimp_image_apply_image (GimpImage	 *gimage,
			GimpDrawable	 *drawable,
			PixelRegion	 *src2PR,
			gint              undo,
			gint              opacity,
			LayerModeEffects  mode,
711
			/*  alternative to using drawable tiles as src1: */
712 713 714
			TileManager	 *src1_tiles,
			gint              x,
			gint              y)
715
{
Sven Neumann's avatar
Sven Neumann committed
716
  Channel *mask;
717 718
  gint x1, y1, x2, y2;
  gint offset_x, offset_y;
719
  PixelRegion src1PR, destPR, maskPR;
720 721
  gint operation;
  gint active [MAX_CHANNELS];
722 723

  /*  get the selection mask if one exists  */
724
  mask = (gimage_mask_is_empty (gimage)) ? NULL : gimp_image_get_mask (gimage);
725 726 727 728 729 730 731 732 733 734

  /*  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
735
      g_message ("gimp_image_apply_image sent illegal parameters");
736 737 738 739 740 741 742
      return;
    }

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

  /*  make sure the image application coordinates are within gimage bounds  */
743
  x1 = CLAMP (x, 0, drawable_width  (drawable));
744
  y1 = CLAMP (y, 0, drawable_height (drawable));
745
  x2 = CLAMP (x + src2PR->w, 0, drawable_width  (drawable));
746 747 748 749 750 751 752 753
  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
       */
754 755 756 757
      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);
758 759 760 761
    }

  /*  If the calling procedure specified an undo step...  */
  if (undo)
762
    undo_push_image (gimp_drawable_gimage (drawable), drawable, x1, y1, x2, y2);
763 764 765 766 767 768 769 770 771 772 773 774 775 776 777 778 779 780 781 782 783 784 785 786 787 788 789 790 791 792 793 794 795 796 797 798 799 800

  /* 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
801 802 803
gimp_image_replace_image (GimpImage    *gimage, 
			  GimpDrawable *drawable, 
			  PixelRegion  *src2PR,
804 805
			  gint          undo, 
			  gint          opacity,
806
			  PixelRegion  *maskPR,
807 808
			  gint          x, 
			  gint          y)
809
{
Sven Neumann's avatar
Sven Neumann committed
810
  Channel *mask;
811 812
  gint x1, y1, x2, y2;
  gint offset_x, offset_y;
813 814
  PixelRegion src1PR, destPR;
  PixelRegion mask2PR, tempPR;
815 816 817
  guchar *temp_data;
  gint operation;
  gint active [MAX_CHANNELS];
818 819

  /*  get the selection mask if one exists  */
820
  mask = (gimage_mask_is_empty (gimage)) ? NULL : gimp_image_get_mask (gimage);
821 822 823 824 825 826 827 828 829 830

  /*  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
831
      g_message ("gimp_image_apply_image sent illegal parameters");
832 833 834 835 836 837 838 839 840 841 842 843 844 845 846 847 848 849
      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
       */
850 851 852 853
      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);
854 855 856 857 858 859 860 861 862 863 864 865 866 867 868 869 870 871 872 873 874 875 876 877 878 879 880 881 882 883 884 885 886 887 888 889 890 891 892 893 894 895 896 897 898 899 900 901 902 903 904 905 906 907 908 909 910 911 912 913 914 915 916 917 918
    }

  /*  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
919 920 921
gimp_image_get_foreground (GimpImage    *gimage, 
			   GimpDrawable *drawable, 
			   guchar       *fg)
922
{
923
  guchar pfg[3];
924 925

  /*  Get the palette color  */
926
  gimp_context_get_foreground (NULL, &pfg[0], &pfg[1], &pfg[2]);
927 928 929 930 931

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

void
932 933 934
gimp_image_get_background (GimpImage    *gimage, 
			   GimpDrawable *drawable, 
			   guchar       *bg)
935
{
936
  guchar pbg[3];
937 938

  /*  Get the palette color  */
939
  gimp_context_get_background (NULL, &pbg[0], &pbg[1], &pbg[2]);
940 941 942 943

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

944
guchar *
945
gimp_image_get_color_at (GimpImage *gimage, 
946 947
			 gint       x, 
			 gint       y)
948 949
{
  Tile *tile;
950 951
  guchar *src;
  guchar *dest;
952 953

  if (x < 0 || y < 0 || x >= gimage->width || y >= gimage->height)
954 955 956 957
    {
      return NULL;
    }
  dest = g_new (unsigned char, 5);
958 959 960 961
  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);
962 963

  if (TYPE_HAS_ALPHA (gimp_image_composite_type (gimage)))
964 965 966
    dest[3] = src[gimp_image_composite_bytes (gimage) - 1];
  else
    dest[3] = 255;
967

968 969
  dest[4] = 0;
  tile_release (tile, FALSE);
970

971 972 973
  return dest;
}

974
void
975
gimp_image_get_color (GimpImage     *gimage, 
976
		      GimpImageType  d_type,
977 978
		      guchar        *rgb, 
		      guchar        *src)
979 980 981 982 983 984 985 986 987 988 989 990 991 992 993 994
{
  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
995 996 997 998 999
gimp_image_transform_color (GimpImage         *gimage, 
			    GimpDrawable      *drawable,
			    guchar            *src, 
			    guchar            *dest, 
			    GimpImageBaseType  type)
1000
{
1001
  GimpImageType d_type;
1002 1003 1004 1005 1006 1007 1008 1009 1010 1011 1012 1013 1014 1015 1016 1017 1018 1019 1020 1021 1022 1023 1024 1025 1026

  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,
1027
				      gimage,
1028 1029 1030 1031 1032 1033 1034 1035 1036 1037 1038 1039 1040 1041 1042 1043 1044 1045 1046 1047 1048 1049 1050
				      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,
1051
				      gimage,
1052 1053 1054 1055 1056 1057 1058 1059 1060 1061 1062 1063 1064 1065 1066 1067 1068
				      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);
1069 1070 1071
  guide->ref_count   = 0;
  guide->position    = -1;
  guide->guide_ID    = next_guide_id++;
1072
  guide->orientation = ORIENTATION_HORIZONTAL;
1073 1074 1075 1076 1077 1078 1079 1080 1081 1082 1083 1084

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

  return guide;
}

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

  guide = g_new (Guide, 1);
1085 1086 1087
  guide->ref_count   = 0;
  guide->position    = -1;
  guide->guide_ID    = next_guide_id++;
1088
  guide->orientation = ORIENTATION_VERTICAL;
1089 1090 1091 1092 1093 1094 1095 1096

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

  return guide;
}

void
gimp_image_add_guide (GimpImage *gimage,
1097
		      Guide     *guide)
1098 1099 1100 1101 1102 1103
{
  gimage->guides = g_list_prepend (gimage->guides, guide);
}

void
gimp_image_remove_guide (GimpImage *gimage,