gimpimage-resize.c 106 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

19 20
#include "config.h"

21
#include <string.h>
22

Sven Neumann's avatar
Sven Neumann committed
23 24
#include <gtk/gtk.h>

25
#include "libgimpcolor/gimpcolor.h"
26
#include "libgimpmath/gimpmath.h"
27

Sven Neumann's avatar
Sven Neumann committed
28 29
#include "apptypes.h"

30
#include "cursorutil.h"
31 32
#include "drawable.h"
#include "floating_sel.h"
33
#include "gdisplay.h"
34
#include "gimage_mask.h"
35
#include "gimpcontext.h"
36
#include "gimpimage.h"
37
#include "gimplayer.h"
38
#include "gimplayermask.h"
39
#include "gimpmarshal.h"
40
#include "gimprc.h"
Manish Singh's avatar
Manish Singh committed
41
#include "gimpparasite.h"
42 43
#include "paint_funcs.h"
#include "parasitelist.h"
44
#include "path.h"
45 46
#include "pixel_region.h"
#include "temp_buf.h"
scott's avatar
scott committed
47 48
#include "tile_manager.h"
#include "tile.h"
49
#include "undo.h"
50

51
#include "libgimp/gimplimits.h"
52
#include "libgimp/gimpparasite.h"
53 54 55

#include "libgimp/gimpintl.h"

56

57 58 59 60 61 62 63
#ifdef DEBUG
#define TRC(x) printf x
#else
#define TRC(x)
#endif


64
/*  Local function declarations  */
65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101
static void     gimp_image_class_init            (GimpImageClass *klass);
static void     gimp_image_init                  (GimpImage      *gimage);
static void     gimp_image_destroy               (GtkObject      *object);
static void     gimp_image_name_changed          (GimpObject     *object);
static void     gimp_image_invalidate_preview    (GimpViewable   *viewable);
static TempBuf *gimp_image_preview               (GimpViewable   *gimage,
						  gint            width,
						  gint            height);
static TempBuf *gimp_image_preview_new           (GimpViewable   *viewable,
						  gint            width, 
						  gint            height);
static void     gimp_image_free_projection       (GimpImage      *gimage);
static void     gimp_image_allocate_shadow       (GimpImage      *gimage,
						  gint            width,
						  gint            height,
						  gint            bpp);
static void     gimp_image_allocate_projection   (GimpImage      *gimage);
static void     gimp_image_free_layers           (GimpImage      *gimage);
static void     gimp_image_free_channels         (GimpImage      *gimage);
static void     gimp_image_construct_layers      (GimpImage      *gimage,
						  gint            x,
						  gint            y,
						  gint            w,
						  gint            h);
static void     gimp_image_construct_channels    (GimpImage      *gimage,
						  gint            x,
						  gint            y,
						  gint            w,
						  gint            h);
static void     gimp_image_initialize_projection (GimpImage      *gimage,
						  gint            x,
						  gint            y,
						  gint            w,
						  gint            h);
static void     gimp_image_get_active_channels   (GimpImage      *gimage,
						  GimpDrawable   *drawable,
						  gint           *active);
102 103

/*  projection functions  */
104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126
static void     project_intensity                (GimpImage      *gimage,
						  GimpLayer      *layer,
						  PixelRegion    *src,
						  PixelRegion    *dest,
						  PixelRegion    *mask);
static void     project_intensity_alpha          (GimpImage      *gimage,
						  GimpLayer      *layer,
						  PixelRegion    *src,
						  PixelRegion    *dest,
						  PixelRegion    *mask);
static void     project_indexed                  (GimpImage      *gimage,
						  GimpLayer      *layer,
						  PixelRegion    *src,
						  PixelRegion    *dest);
static void     project_indexed_alpha            (GimpImage      *gimage, 
						  GimpLayer      *layer,
						  PixelRegion    *src, 
						  PixelRegion    *dest,
						  PixelRegion    *mask);
static void     project_channel                  (GimpImage      *gimage,
						  GimpChannel    *channel,
						  PixelRegion    *src,
						  PixelRegion    *src2);
127 128 129 130

/*
 *  Global variables
 */
131
gint valid_combinations[][MAX_CHANNELS + 1] =
132 133 134 135 136 137 138 139 140 141 142 143 144 145 146
{
  /* 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 },
};

147
guint32 next_guide_id = 1;  /* For generating guide_ID handles for PDB stuff */
148

149 150 151 152 153

/*
 *  Static variables
 */

154 155
enum
{
156
  CLEAN,
157 158 159 160
  DIRTY,
  REPAINT,
  RESIZE,
  RESTRUCTURE,
161
  COLORMAP_CHANGED,
162
  UNDO_EVENT,
163 164
  LAST_SIGNAL
};
165

166 167
static guint gimp_image_signals[LAST_SIGNAL] = { 0 };

168
static GimpViewableClass *parent_class = NULL;
169

170

171 172 173 174 175 176 177 178 179 180 181 182 183 184 185 186 187 188 189 190 191 192 193 194 195
GtkType 
gimp_image_get_type (void) 
{
  static GtkType image_type = 0;

  if (! image_type)
    {
      GtkTypeInfo image_info =
      {
        "GimpImage",
        sizeof (GimpImage),
        sizeof (GimpImageClass),
        (GtkClassInitFunc) gimp_image_class_init,
        (GtkObjectInitFunc) gimp_image_init,
        /* reserved_1 */ NULL,
        /* reserved_2 */ NULL,
        (GtkClassInitFunc) NULL,
      };

      image_type = gtk_type_unique (GIMP_TYPE_VIEWABLE, &image_info);
    }

  return image_type;
}

196 197 198
static void
gimp_image_class_init (GimpImageClass *klass)
{
199 200 201
  GtkObjectClass    *object_class;
  GimpObjectClass   *gimp_object_class;
  GimpViewableClass *viewable_class;
202

203 204
  object_class      = (GtkObjectClass *) klass;
  gimp_object_class = (GimpObjectClass *) klass;
205
  viewable_class    = (GimpViewableClass *) klass;
206

207
  parent_class = gtk_type_class (GIMP_TYPE_VIEWABLE);
208

209
  gimp_image_signals[CLEAN] =
210 211 212 213 214 215 216 217
    gtk_signal_new ("clean",
                    GTK_RUN_FIRST,
                    object_class->type,
                    GTK_SIGNAL_OFFSET (GimpImageClass,
				       clean),
                    gtk_signal_default_marshaller,
                    GTK_TYPE_NONE, 0);

218
  gimp_image_signals[DIRTY] =
219 220 221 222 223 224 225 226
    gtk_signal_new ("dirty",
                    GTK_RUN_FIRST,
                    object_class->type,
                    GTK_SIGNAL_OFFSET (GimpImageClass,
				       dirty),
                    gtk_signal_default_marshaller,
                    GTK_TYPE_NONE, 0);

227
  gimp_image_signals[REPAINT] =
228 229 230 231 232 233 234 235 236 237 238 239
    gtk_signal_new ("repaint",
                    GTK_RUN_FIRST,
                    object_class->type,
                    GTK_SIGNAL_OFFSET (GimpImageClass,
				       repaint),
                    gimp_marshal_NONE__INT_INT_INT_INT,
                    GTK_TYPE_NONE, 4,
		    GTK_TYPE_INT,
		    GTK_TYPE_INT,
		    GTK_TYPE_INT,
		    GTK_TYPE_INT);

240
  gimp_image_signals[RESIZE] =
241 242 243 244 245 246 247 248
    gtk_signal_new ("resize",
                    GTK_RUN_FIRST,
                    object_class->type,
                    GTK_SIGNAL_OFFSET (GimpImageClass,
				       resize),
                    gtk_signal_default_marshaller,
                    GTK_TYPE_NONE, 0);

249
  gimp_image_signals[RESTRUCTURE] =
250 251 252 253 254 255 256 257
    gtk_signal_new ("restructure",
                    GTK_RUN_FIRST,
                    object_class->type,
                    GTK_SIGNAL_OFFSET (GimpImageClass,
				       restructure),
                    gtk_signal_default_marshaller,
                    GTK_TYPE_NONE, 0);

258
  gimp_image_signals[COLORMAP_CHANGED] =
259 260 261 262 263 264 265 266 267
    gtk_signal_new ("colormap_changed",
                    GTK_RUN_FIRST,
                    object_class->type,
                    GTK_SIGNAL_OFFSET (GimpImageClass,
				       colormap_changed),
                    gtk_marshal_NONE__INT,
                    GTK_TYPE_NONE, 1,
		    GTK_TYPE_INT);

268
  gimp_image_signals[UNDO_EVENT] = 
269 270 271 272 273 274 275 276
    gtk_signal_new ("undo_event",
                    GTK_RUN_FIRST,
                    object_class->type,
                    GTK_SIGNAL_OFFSET (GimpImageClass,
				       undo_event),
                    gtk_marshal_NONE__INT,
                    GTK_TYPE_NONE, 1,
		    GTK_TYPE_INT);
277 278
  
  gtk_object_class_add_signals (object_class, gimp_image_signals, LAST_SIGNAL);
279 280 281

  object_class->destroy = gimp_image_destroy;

282 283
  gimp_object_class->name_changed = gimp_image_name_changed;

284 285 286 287
  viewable_class->invalidate_preview = gimp_image_invalidate_preview;
  viewable_class->preview            = gimp_image_preview;
  viewable_class->preview_new        = gimp_image_preview_new;

288 289 290 291 292 293 294
  klass->clean            = NULL;
  klass->dirty            = NULL;
  klass->repaint          = NULL;
  klass->resize           = NULL;
  klass->restructure      = NULL;
  klass->colormap_changed = NULL;
  klass->undo_event       = NULL;
295 296 297 298 299
}


/* static functions */

Sven Neumann's avatar
Sven Neumann committed
300 301
static void 
gimp_image_init (GimpImage *gimage)
302
{
303 304 305 306 307 308 309 310 311
  gimage->save_proc             = NULL;

  gimage->width                 = 0;
  gimage->height                = 0;
  gimage->xresolution           = default_xresolution;
  gimage->yresolution           = default_yresolution;
  gimage->unit                  = default_units;
  gimage->base_type             = RGB;

312
  gimage->cmap                  = NULL;
313 314
  gimage->num_cols              = 0;

315
  gimage->dirty                 = 1;
316
  gimage->undo_on               = TRUE;
317 318 319 320

  gimage->instance_count        = 0;
  gimage->disp_count            = 0;

321
  gimage->tattoo_state          = 0;
322 323 324 325 326

  gimage->shadow                = NULL;

  gimage->construct_flag        = -1;
  gimage->proj_type             = RGBA_GIMAGE;
327
  gimage->projection            = NULL;
328

329
  gimage->guides                = NULL;
330

331 332 333
  gimage->layers                = NULL;
  gimage->channels              = NULL;
  gimage->layer_stack           = NULL;
334 335 336 337 338 339 340 341 342 343 344 345 346 347 348 349 350 351

  gimage->active_layer          = NULL;
  gimage->active_channel        = NULL;
  gimage->floating_sel          = NULL;
  gimage->selection_mask        = NULL;

  gimage->parasites             = parasite_list_new ();

  gimage->paths                 = NULL;

  gimage->by_color_select       = FALSE;

  gimage->qmask_state           = FALSE;
  gimage->qmask_color.r         = 1.0;
  gimage->qmask_color.g         = 0.0;
  gimage->qmask_color.b         = 0.0;
  gimage->qmask_color.a         = 0.5;

352 353 354 355
  gimage->undo_stack            = NULL;
  gimage->redo_stack            = NULL;
  gimage->undo_bytes            = 0;
  gimage->undo_levels           = 0;
356
  gimage->group_count           = 0;
357
  gimage->pushing_undo_group    = UNDO_NULL;
358 359 360
  gimage->undo_history          = NULL;

  gimage->comp_preview          = NULL;
361
  gimage->comp_preview_valid    = FALSE;
362 363
}

364 365
static void
gimp_image_destroy (GtkObject *object)
Sven Neumann's avatar
Sven Neumann committed
366
{
367
  GimpImage *gimage = GIMP_IMAGE (object);
368

369 370 371 372 373 374 375 376 377 378
  gimp_image_free_projection (gimage);
  gimp_image_free_shadow (gimage);
  
  if (gimage->cmap)
    g_free (gimage->cmap);

  gimp_image_free_layers (gimage);
  gimp_image_free_channels (gimage);

  gtk_object_unref (GTK_OBJECT (gimage->selection_mask));
379

380 381 382 383 384 385 386 387 388 389 390 391 392 393 394 395 396 397 398 399 400 401 402
  if (gimage->comp_preview)
    temp_buf_free (gimage->comp_preview);

  if (gimage->parasites)
    gtk_object_unref (GTK_OBJECT (gimage->parasites));
}

static void
gimp_image_name_changed (GimpObject *object)
{
  GimpImage   *gimage;
  const gchar *name;

  if (GIMP_OBJECT_CLASS (parent_class)->name_changed)
    GIMP_OBJECT_CLASS (parent_class)->name_changed (object);

  gimage = GIMP_IMAGE (object);
  name   = gimp_object_get_name (object);

  if (! (name && strlen (name)))
    {
      g_free (object->name);
      object->name = NULL;
403
    }
404
}
405

406 407 408 409 410 411 412 413 414 415 416 417 418
static void
gimp_image_invalidate_preview (GimpViewable *viewable)
{
  GimpImage *gimage;
  GimpLayer *layer;

  gimage = GIMP_IMAGE (viewable);

  /*  Invalidate the floating sel if it exists  */
  if ((layer = gimp_image_floating_sel (gimage)))
    floating_sel_invalidate (layer);

  gimage->comp_preview_valid = FALSE;
419 420 421 422 423 424 425 426 427 428 429 430 431 432 433 434 435 436 437 438 439 440 441 442
}

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:
443
      g_assert_not_reached ();
444 445 446
    }

  /*  allocate the new projection  */
447 448
  gimage->projection = tile_manager_new (gimage->width, gimage->height,
					 gimage->proj_bytes);
449
  tile_manager_set_user_data (gimage->projection, (void *) gimage);
450 451 452 453 454 455 456 457 458 459 460 461 462
  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
463
gimp_image_allocate_shadow (GimpImage *gimage, 
464 465 466
			    gint       width, 
			    gint       height, 
			    gint       bpp)
467 468 469 470 471 472 473 474 475
{
  /*  allocate the new projection  */
  gimage->shadow = tile_manager_new (width, height, bpp);
}


/* function definitions */

GimpImage *
476 477 478
gimp_image_new (gint               width,
		gint               height,
		GimpImageBaseType  base_type)
479
{
480
  GimpImage *gimage = GIMP_IMAGE (gtk_type_new (GIMP_TYPE_IMAGE));
481
  gint i;
482

483 484
  gimage->width     = width;
  gimage->height    = height;
485 486 487 488 489 490 491 492 493 494
  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;
495
      gimage->cmap     = (guchar *) g_malloc0 (COLORMAP_SIZE);
496 497 498 499 500 501 502 503
      break;
    default:
      break;
    }

  /*  set all color channels visible and active  */
  for (i = 0; i < MAX_CHANNELS; i++)
    {
504 505
      gimage->visible[i] = TRUE;
      gimage->active[i]  = TRUE;
506 507 508
    }

  /* create the selection mask */
Michael Natterer's avatar
Michael Natterer committed
509 510 511
  gimage->selection_mask = gimp_channel_new_mask (gimage,
						  gimage->width,
						  gimage->height);
512 513 514 515 516 517


  return gimage;
}

void
518 519
gimp_image_set_filename (GimpImage   *gimage,
			 const gchar *filename)
520
{
521 522
  gimp_object_set_name (GIMP_OBJECT (gimage), filename);
}
523

524
void
525
gimp_image_set_resolution (GimpImage *gimage,
526 527
			   gdouble    xresolution,
			   gdouble    yresolution)
528
{
529 530 531 532 533
  /* 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;

534 535 536
  /* 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)
537 538
    return;

539
  undo_push_resolution (gimage);
540

541 542
  gimage->xresolution = xresolution;
  gimage->yresolution = yresolution;
543 544 545

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

548
void
549 550 551
gimp_image_get_resolution (const GimpImage *gimage,
			   gdouble         *xresolution,
			   gdouble         *yresolution)
552
{
553 554
  g_return_if_fail (xresolution && yresolution);

555 556
  *xresolution = gimage->xresolution;
  *yresolution = gimage->yresolution;
557 558
}

559 560
void
gimp_image_set_unit (GimpImage *gimage,
561
		     GimpUnit   unit)
562
{
563 564
  undo_push_resolution (gimage);

565 566 567
  gimage->unit = unit;
}

568
GimpUnit
569
gimp_image_get_unit (const GimpImage *gimage)
570 571 572 573
{
  return gimage->unit;
}

574
void
Sven Neumann's avatar
Sven Neumann committed
575 576
gimp_image_set_save_proc (GimpImage     *gimage, 
			  PlugInProcDef *proc)
577 578 579 580 581
{
  gimage->save_proc = proc;
}

PlugInProcDef *
582
gimp_image_get_save_proc (const GimpImage *gimage)
583 584 585
{
  return gimage->save_proc;
}
586

587 588 589 590 591 592 593 594 595 596 597 598
gint
gimp_image_get_width (const GimpImage *gimage)
{
  return gimage->width;
}

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

599
void
600
gimp_image_resize (GimpImage *gimage, 
601 602 603 604
		   gint       new_width, 
		   gint       new_height,
		   gint       offset_x, 
		   gint       offset_y)
605
{
Michael Natterer's avatar
Michael Natterer committed
606 607 608 609 610
  GimpChannel *channel;
  GimpLayer   *layer;
  GimpLayer   *floating_layer;
  GSList      *list;
  GList       *guide_list;
611

612
  gimp_add_busy_cursors ();
613

614
  g_assert (new_width > 0 && new_height > 0);
615 616 617 618

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

Sven Neumann's avatar
Sven Neumann committed
619
  undo_push_group_start (gimage, IMAGE_RESIZE_UNDO);
620 621 622 623 624 625 626 627 628

  /*  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  */
629
  gimage->width  = new_width;
630 631 632
  gimage->height = new_height;

  /*  Resize all channels  */
633
  for (list = gimage->channels; list; list = g_slist_next (list))
634
    {
Michael Natterer's avatar
Michael Natterer committed
635
      channel = (GimpChannel *) list->data;
636

Michael Natterer's avatar
Michael Natterer committed
637
      gimp_channel_resize (channel, new_width, new_height, offset_x, offset_y);
638 639 640 641 642 643 644 645 646
    }

  /*  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
647
      guide_list = g_list_next (guide_list);
648 649 650

      switch (guide->orientation)
	{
651
	case ORIENTATION_HORIZONTAL:
Sven Neumann's avatar
Sven Neumann committed
652
	  undo_push_guide (gimage, guide);
653 654 655 656
	  guide->position += offset_y;
	  if (guide->position < 0 || guide->position > new_height)
	    gimp_image_delete_guide (gimage, guide);
	  break;
657

658
	case ORIENTATION_VERTICAL:
Sven Neumann's avatar
Sven Neumann committed
659
	  undo_push_guide (gimage, guide);
660 661 662 663
	  guide->position += offset_x;
	  if (guide->position < 0 || guide->position > new_width)
	    gimp_image_delete_guide (gimage, guide);
	  break;
664

665
	default:
666
	  g_error ("Unknown guide orientation\n");
667
	}
668 669 670
    }

  /*  Don't forget the selection mask!  */
Michael Natterer's avatar
Michael Natterer committed
671 672
  gimp_channel_resize (gimage->selection_mask,
		       new_width, new_height, offset_x, offset_y);
673 674 675
  gimage_mask_invalidate (gimage);

  /*  Reposition all layers  */
676
  for (list = gimage->layers; list; list = g_slist_next (list))
677
    {
678
      layer = (GimpLayer *) list->data;
679

680
      gimp_layer_translate (layer, offset_x, offset_y);
681 682 683 684 685 686 687 688 689 690
    }

  /*  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]);
691

692
  gimp_remove_busy_cursors (NULL);
693 694 695
}

void
696
gimp_image_scale (GimpImage *gimage, 
697 698
		  gint       new_width, 
		  gint       new_height)
699
{
Michael Natterer's avatar
Michael Natterer committed
700 701 702 703 704 705 706 707 708 709 710
  GimpChannel *channel;
  GimpLayer   *layer;
  GimpLayer   *floating_layer;
  GSList      *list;
  GSList      *remove = NULL;
  GList       *glist;
  Guide       *guide;
  gint         old_width;
  gint         old_height;
  gdouble      img_scale_w = 1.0;
  gdouble      img_scale_h = 1.0;
711

712
  if ((new_width == 0) || (new_height == 0))
713
    {
714
      g_message (("gimp_image_scale: Scaling to zero width or height has been rejected."));
715 716
      return;
    }
717

718
  gimp_add_busy_cursors ();
719

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

Sven Neumann's avatar
Sven Neumann committed
723
  undo_push_group_start (gimage, IMAGE_SCALE_UNDO);
724 725 726 727 728 729 730 731 732

  /*  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  */
733 734 735

  old_width      = gimage->width;
  old_height     = gimage->height;
736
  gimage->width  = new_width;
737
  gimage->height = new_height;
738 739
  img_scale_w    = (gdouble) new_width  / (gdouble) old_width;
  img_scale_h    = (gdouble) new_height / (gdouble) old_height;
740
 
741
  /*  Scale all channels  */
742
  for (list = gimage->channels; list; list = g_slist_next (list))
743
    {
Michael Natterer's avatar
Michael Natterer committed
744 745 746
      channel = (GimpChannel *) list->data;

      gimp_channel_scale (channel, new_width, new_height);
747 748 749
    }

  /*  Don't forget the selection mask!  */
750
  /*  if (channel_is_empty(gimage->selection_mask))
Michael Natterer's avatar
Michael Natterer committed
751
        gimp_channel_resize(gimage->selection_mask, new_width, new_height, 0, 0)
752 753 754
      else
  */
        
Michael Natterer's avatar
Michael Natterer committed
755
  gimp_channel_scale (gimage->selection_mask, new_width, new_height);
756 757 758 759
  gimage_mask_invalidate (gimage);

  /*  Scale all layers  */
  list = gimage->layers;
760
  for (list = gimage->layers; list; list = g_slist_next (list))
761
    {
762 763 764
      layer = (GimpLayer *) list->data;

      if (gimp_layer_scale_by_factors (layer, img_scale_w, img_scale_h) == FALSE)
765
	{
766 767 768 769 770
	  /* 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.
	   */
771

772
          remove = g_slist_append (remove, layer);
773 774 775 776 777
        }
    }
  /* We defer removing layers lost to scaling until now            */
  /* so as not to mix the operations of iterating over and removal */
  /* from gimage->layers.                                          */  
778

779
  for (list = remove; list; list = g_slist_next (list))
780
    {
781
      layer = list->data;
782
      gimp_image_remove_layer (gimage, layer);
783
    }
784
  g_slist_free (remove);
785

786
  /*  Scale any Guides  */
787
  for (glist = gimage->guides; glist; glist = g_list_next (glist))
788 789 790 791 792
    {
      guide = (Guide*) glist->data;

      switch (guide->orientation)
	{
793
	case ORIENTATION_HORIZONTAL:
Sven Neumann's avatar
Sven Neumann committed
794
	  undo_push_guide (gimage, guide);
795 796
	  guide->position = (guide->position * new_height) / old_height;
	  break;
797
	case ORIENTATION_VERTICAL:
Sven Neumann's avatar
Sven Neumann committed
798
	  undo_push_guide (gimage, guide);
799 800 801 802 803 804
	  guide->position = (guide->position * new_width) / old_width;
	  break;
	default:
	  g_error("Unknown guide orientation II.\n");
	}
    }
805

806 807 808 809 810 811 812 813
  /*  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]);
814

815
  gimp_remove_busy_cursors (NULL);
816 817 818
}

TileManager *
819
gimp_image_shadow (GimpImage *gimage, 
820 821 822
		   gint       width, 
		   gint       height, 
		   gint       bpp)
823 824
{
  if (gimage->shadow &&
825 826 827
      ((width != tile_manager_width (gimage->shadow)) ||
       (height != tile_manager_height (gimage->shadow)) ||
       (bpp != tile_manager_bpp (gimage->shadow))))
828 829 830 831 832 833 834 835 836 837 838 839 840 841 842 843 844 845 846 847
    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;
}

void
848 849 850 851 852 853
gimp_image_apply_image (GimpImage	 *gimage,
			GimpDrawable	 *drawable,
			PixelRegion	 *src2PR,
			gint              undo,
			gint              opacity,
			LayerModeEffects  mode,
854
			/*  alternative to using drawable tiles as src1: */
855 856 857
			TileManager	 *src1_tiles,
			gint              x,
			gint              y)
858
{
Michael Natterer's avatar
Michael Natterer committed
859
  GimpChannel *mask;
860 861 862 863 864
  gint         x1, y1, x2, y2;
  gint         offset_x, offset_y;
  PixelRegion  src1PR, destPR, maskPR;
  gint         operation;
  gint         active [MAX_CHANNELS];
865 866

  /*  get the selection mask if one exists  */
867
  mask = (gimage_mask_is_empty (gimage)) ? NULL : gimp_image_get_mask (gimage);
868 869 870 871 872 873 874

  /*  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...
   */
875
  operation = valid_combinations[gimp_drawable_type (drawable)][src2PR->bytes];
876 877
  if (operation == -1)
    {
Sven Neumann's avatar
Sven Neumann committed
878
      g_message ("gimp_image_apply_image sent illegal parameters");
879 880 881 882
      return;
    }

  /*  get the layer offsets  */
883
  gimp_drawable_offsets (drawable, &offset_x, &offset_y);
884 885

  /*  make sure the image application coordinates are within gimage bounds  */
886 887 888 889
  x1 = CLAMP (x, 0, gimp_drawable_width  (drawable));
  y1 = CLAMP (y, 0, gimp_drawable_height (drawable));
  x2 = CLAMP (x + src2PR->w, 0, gimp_drawable_width  (drawable));
  y2 = CLAMP (y + src2PR->h, 0, gimp_drawable_height (drawable));
890 891 892 893 894 895 896

  if (mask)
    {
      /*  make sure coordinates are in mask bounds ...
       *  we need to add the layer offset to transform coords
       *  into the mask coordinate system
       */
897 898 899 900
      x1 = CLAMP (x1, -offset_x, gimp_drawable_width (GIMP_DRAWABLE (mask))-offset_x);
      y1 = CLAMP (y1, -offset_y, gimp_drawable_height(GIMP_DRAWABLE (mask))-offset_y);
      x2 = CLAMP (x2, -offset_x, gimp_drawable_width (GIMP_DRAWABLE (mask))-offset_x);
      y2 = CLAMP (y2, -offset_y, gimp_drawable_height(GIMP_DRAWABLE (mask))-offset_y);
901 902 903 904
    }

  /*  If the calling procedure specified an undo step...  */
  if (undo)
905
    undo_push_image (gimp_drawable_gimage (drawable), drawable, x1, y1, x2, y2);
906 907 908 909 910

  /* configure the pixel regions
   *  If an alternative to using the drawable's data as src1 was provided...
   */
  if (src1_tiles)
911 912
    pixel_region_init (&src1PR, src1_tiles, 
		       x1, y1, (x2 - x1), (y2 - y1), FALSE);
913
  else
914
    pixel_region_init (&src1PR, gimp_drawable_data (drawable), 
915
		       x1, y1, (x2 - x1), (y2 - y1), FALSE);
916
  pixel_region_init (&destPR, gimp_drawable_data (drawable), 
917 918 919 920
		     x1, y1, (x2 - x1), (y2 - y1), TRUE);
  pixel_region_resize (src2PR, 
		       src2PR->x + (x1 - x), src2PR->y + (y1 - y), 
		       (x2 - x1), (y2 - y1));
921 922 923

  if (mask)
    {
924
      gint mx, my;
925 926 927 928 929 930 931 932

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

933
      pixel_region_init (&maskPR, 
934
			 gimp_drawable_data (GIMP_DRAWABLE (mask)), 
935 936 937
			 mx, my, 
			 (x2 - x1), (y2 - y1), 
			 FALSE);
938 939 940 941
      combine_regions (&src1PR, src2PR, &destPR, &maskPR, NULL,
		       opacity, mode, active, operation);
    }
  else
942 943 944 945
    {
      combine_regions (&src1PR, src2PR, &destPR, NULL, NULL,
		       opacity, mode, active, operation);
    }
946 947 948 949 950 951 952 953 954
}

/* 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
955 956 957
gimp_image_replace_image (GimpImage    *gimage, 
			  GimpDrawable *drawable, 
			  PixelRegion  *src2PR,
958 959
			  gint          undo, 
			  gint          opacity,
960
			  PixelRegion  *maskPR,
961 962
			  gint          x, 
			  gint          y)
963
{
Michael Natterer's avatar
Michael Natterer committed
964
  GimpChannel *mask;
965 966 967 968 969 970 971
  gint         x1, y1, x2, y2;
  gint         offset_x, offset_y;
  PixelRegion  src1PR, destPR;
  PixelRegion  mask2PR, tempPR;
  guchar      *temp_data;
  gint         operation;
  gint         active [MAX_CHANNELS];
972 973

  /*  get the selection mask if one exists  */
974
  mask = (gimage_mask_is_empty (gimage)) ? NULL : gimp_image_get_mask (gimage);
975 976 977 978 979 980 981

  /*  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...
   */
982
  operation = valid_combinations [gimp_drawable_type (drawable)][src2PR->bytes];
983 984
  if (operation == -1)
    {
Sven Neumann's avatar
Sven Neumann committed
985
      g_message ("gimp_image_apply_image sent illegal parameters");
986 987 988 989
      return;
    }

  /*  get the layer offsets  */
990
  gimp_drawable_offsets (drawable, &offset_x, &offset_y);
991 992

  /*  make sure the image application coordinates are within gimage bounds  */
993 994 995 996
  x1 = CLAMP (x, 0, gimp_drawable_width (drawable));
  y1 = CLAMP (y, 0, gimp_drawable_height (drawable));
  x2 = CLAMP (x + src2PR->w, 0, gimp_drawable_width (drawable));
  y2 = CLAMP (y + src2PR->h, 0, gimp_drawable_height (drawable));
997 998 999 1000 1001 1002 1003

  if (mask)
    {
      /*  make sure coordinates are in mask bounds ...
       *  we need to add the layer offset to transform coords
       *  into the mask coordinate system
       */
1004 1005 1006 1007
      x1 = CLAMP (x1, -offset_x, gimp_drawable_width (GIMP_DRAWABLE (mask))-offset_x);
      y1 = CLAMP (y1, -offset_y, gimp_drawable_height(GIMP_DRAWABLE (mask))-offset_y);
      x2 = CLAMP (x2, -offset_x, gimp_drawable_width (GIMP_DRAWABLE (mask))-offset_x);
      y2 = CLAMP (y2, -offset_y, gimp_drawable_height(GIMP_DRAWABLE (mask))-offset_y);
1008 1009 1010 1011 1012