gimpimage-resize.c 111 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
#include "libgimpbase/gimpbase.h"
28

Michael Natterer's avatar
Michael Natterer committed
29 30
#include "core-types.h"

Michael Natterer's avatar
Michael Natterer committed
31 32 33 34
#include "base/pixel-region.h"
#include "base/temp-buf.h"
#include "base/tile-manager.h"
#include "base/tile.h"
Sven Neumann's avatar
Sven Neumann committed
35

36 37
#include "paint-funcs/paint-funcs.h"

Michael Natterer's avatar
Michael Natterer committed
38 39 40
/* FIXME: remove the Path <-> BezierSelect dependency */
#include "tools/tools-types.h"

41
#include "gimp.h"
42
#include "gimpcontext.h"
Michael Natterer's avatar
Michael Natterer committed
43
#include "gimpcoreconfig.h"
44
#include "gimpimage.h"
Michael Natterer's avatar
Michael Natterer committed
45
#include "gimpimage-colorhash.h"
46
#include "gimpimage-mask.h"
47
#include "gimpimage-undo.h"
48
#include "gimplayer.h"
49
#include "gimplayermask.h"
50
#include "gimplist.h"
51
#include "gimpmarshal.h"
Manish Singh's avatar
Manish Singh committed
52
#include "gimpparasite.h"
53
#include "gimpundostack.h"
54 55 56 57

#include "app_procs.h"
#include "floating_sel.h"
#include "gdisplay.h"
58
#include "parasitelist.h"
59
#include "path.h"
60
#include "undo.h"
61

62 63
#include "libgimp/gimpintl.h"

64

65 66 67 68 69 70 71
#ifdef DEBUG
#define TRC(x) printf x
#else
#define TRC(x)
#endif


72
/*  Local function declarations  */
73 74 75 76 77
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);
78
static void     gimp_image_size_changed          (GimpViewable   *viewable);
Michael Natterer's avatar
Michael Natterer committed
79 80
static void     gimp_image_real_colormap_changed (GimpImage      *gimage,
						  gint            ncol);
81
static TempBuf *gimp_image_get_preview           (GimpViewable   *gimage,
82 83
						  gint            width,
						  gint            height);
84
static TempBuf *gimp_image_get_new_preview       (GimpViewable   *viewable,
85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110
						  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_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);
111 112

/*  projection functions  */
113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135
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);
136 137 138 139

/*
 *  Global variables
 */
140
gint valid_combinations[][MAX_CHANNELS + 1] =
141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160
{
  /* 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 },
};


/*
 *  Static variables
 */

161 162
enum
{
163
  MODE_CHANGED,
164
  ALPHA_CHANGED,
165
  FLOATING_SELECTION_CHANGED,
166 167
  ACTIVE_LAYER_CHANGED,
  ACTIVE_CHANNEL_CHANGED,
168 169
  COMPONENT_VISIBILITY_CHANGED,
  COMPONENT_ACTIVE_CHANGED,
170
  MASK_CHANGED,
171

172
  CLEAN,
173
  DIRTY,
Michael Natterer's avatar
Michael Natterer committed
174
  UPDATE,
175
  COLORMAP_CHANGED,
176
  UNDO_EVENT,
177 178
  LAST_SIGNAL
};
179

180 181
static guint gimp_image_signals[LAST_SIGNAL] = { 0 };

182
static GimpViewableClass *parent_class = NULL;
183

184 185 186
static gint        global_image_ID  = 1;
static GHashTable *gimp_image_table = NULL;

Michael Natterer's avatar
Michael Natterer committed
187 188
static guint32     next_guide_id    = 1;

189

190 191 192 193 194 195 196 197 198 199 200 201 202 203 204 205 206 207 208 209 210 211 212 213 214
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;
}

215 216 217
static void
gimp_image_class_init (GimpImageClass *klass)
{
218 219 220
  GtkObjectClass    *object_class;
  GimpObjectClass   *gimp_object_class;
  GimpViewableClass *viewable_class;
221

222 223
  object_class      = (GtkObjectClass *) klass;
  gimp_object_class = (GimpObjectClass *) klass;
224
  viewable_class    = (GimpViewableClass *) klass;
225

226
  parent_class = gtk_type_class (GIMP_TYPE_VIEWABLE);
227

228 229 230 231 232 233 234 235 236
  gimp_image_signals[MODE_CHANGED] =
    gtk_signal_new ("mode_changed",
                    GTK_RUN_FIRST,
                    object_class->type,
                    GTK_SIGNAL_OFFSET (GimpImageClass,
				       mode_changed),
                    gtk_signal_default_marshaller,
                    GTK_TYPE_NONE, 0);

237 238 239 240 241 242 243 244 245
  gimp_image_signals[ALPHA_CHANGED] =
    gtk_signal_new ("alpha_changed",
                    GTK_RUN_FIRST,
                    object_class->type,
                    GTK_SIGNAL_OFFSET (GimpImageClass,
				       alpha_changed),
                    gtk_signal_default_marshaller,
                    GTK_TYPE_NONE, 0);

246 247 248 249 250 251 252 253 254
  gimp_image_signals[FLOATING_SELECTION_CHANGED] =
    gtk_signal_new ("floating_selection_changed",
                    GTK_RUN_FIRST,
                    object_class->type,
                    GTK_SIGNAL_OFFSET (GimpImageClass,
				       floating_selection_changed),
                    gtk_signal_default_marshaller,
                    GTK_TYPE_NONE, 0);

255 256 257 258 259 260 261 262 263 264 265 266 267 268 269 270 271 272
  gimp_image_signals[ACTIVE_LAYER_CHANGED] =
    gtk_signal_new ("active_layer_changed",
                    GTK_RUN_FIRST,
                    object_class->type,
                    GTK_SIGNAL_OFFSET (GimpImageClass,
				       active_layer_changed),
                    gtk_signal_default_marshaller,
                    GTK_TYPE_NONE, 0);

  gimp_image_signals[ACTIVE_CHANNEL_CHANGED] =
    gtk_signal_new ("active_channel_changed",
                    GTK_RUN_FIRST,
                    object_class->type,
                    GTK_SIGNAL_OFFSET (GimpImageClass,
				       active_channel_changed),
                    gtk_signal_default_marshaller,
                    GTK_TYPE_NONE, 0);

273 274 275 276 277 278 279 280 281 282 283 284 285 286 287 288 289 290 291 292
  gimp_image_signals[COMPONENT_VISIBILITY_CHANGED] =
    gtk_signal_new ("component_visibility_changed",
                    GTK_RUN_FIRST,
                    object_class->type,
                    GTK_SIGNAL_OFFSET (GimpImageClass,
				       component_visibility_changed),
                    gtk_marshal_NONE__INT,
                    GTK_TYPE_NONE, 1,
		    GTK_TYPE_INT);

  gimp_image_signals[COMPONENT_ACTIVE_CHANGED] =
    gtk_signal_new ("component_active_changed",
                    GTK_RUN_FIRST,
                    object_class->type,
                    GTK_SIGNAL_OFFSET (GimpImageClass,
				       component_active_changed),
                    gtk_marshal_NONE__INT,
                    GTK_TYPE_NONE, 1,
		    GTK_TYPE_INT);

293 294 295 296 297 298 299 300 301
  gimp_image_signals[MASK_CHANGED] =
    gtk_signal_new ("mask_changed",
                    GTK_RUN_FIRST,
                    object_class->type,
                    GTK_SIGNAL_OFFSET (GimpImageClass,
				       mask_changed),
                    gtk_signal_default_marshaller,
                    GTK_TYPE_NONE, 0);

302
  gimp_image_signals[CLEAN] =
303 304 305 306 307 308 309 310
    gtk_signal_new ("clean",
                    GTK_RUN_FIRST,
                    object_class->type,
                    GTK_SIGNAL_OFFSET (GimpImageClass,
				       clean),
                    gtk_signal_default_marshaller,
                    GTK_TYPE_NONE, 0);

311
  gimp_image_signals[DIRTY] =
312 313 314 315 316 317 318 319
    gtk_signal_new ("dirty",
                    GTK_RUN_FIRST,
                    object_class->type,
                    GTK_SIGNAL_OFFSET (GimpImageClass,
				       dirty),
                    gtk_signal_default_marshaller,
                    GTK_TYPE_NONE, 0);

Michael Natterer's avatar
Michael Natterer committed
320 321
  gimp_image_signals[UPDATE] =
    gtk_signal_new ("update",
322 323 324
                    GTK_RUN_FIRST,
                    object_class->type,
                    GTK_SIGNAL_OFFSET (GimpImageClass,
Michael Natterer's avatar
Michael Natterer committed
325
				       update),
326 327 328 329 330 331 332
                    gimp_marshal_NONE__INT_INT_INT_INT,
                    GTK_TYPE_NONE, 4,
		    GTK_TYPE_INT,
		    GTK_TYPE_INT,
		    GTK_TYPE_INT,
		    GTK_TYPE_INT);

333
  gimp_image_signals[COLORMAP_CHANGED] =
334 335 336 337 338 339 340 341 342
    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);

343
  gimp_image_signals[UNDO_EVENT] = 
344 345 346 347 348 349 350 351
    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);
352

353
  gtk_object_class_add_signals (object_class, gimp_image_signals, LAST_SIGNAL);
354

355
  object_class->destroy               = gimp_image_destroy;
356

357
  gimp_object_class->name_changed     = gimp_image_name_changed;
358

359
  viewable_class->invalidate_preview  = gimp_image_invalidate_preview;
360
  viewable_class->size_changed        = gimp_image_size_changed;
361 362
  viewable_class->get_preview         = gimp_image_get_preview;
  viewable_class->get_new_preview     = gimp_image_get_new_preview;
363

364
  klass->mode_changed                 = NULL;
365
  klass->alpha_changed                = NULL;
366
  klass->floating_selection_changed   = NULL;
367 368 369 370
  klass->active_layer_changed         = NULL;
  klass->active_channel_changed       = NULL;
  klass->component_visibility_changed = NULL;
  klass->component_active_changed     = NULL;
371
  klass->mask_changed                 = NULL;
372

373 374
  klass->clean                        = NULL;
  klass->dirty                        = NULL;
Michael Natterer's avatar
Michael Natterer committed
375
  klass->update                       = NULL;
Michael Natterer's avatar
Michael Natterer committed
376
  klass->colormap_changed             = gimp_image_real_colormap_changed;
377 378 379
  klass->undo_event                   = NULL;
  klass->undo                         = gimp_image_undo;
  klass->redo                         = gimp_image_redo;
Michael Natterer's avatar
Michael Natterer committed
380 381

  gimp_image_color_hash_init ();
382 383 384 385 386
}


/* static functions */

Sven Neumann's avatar
Sven Neumann committed
387 388
static void 
gimp_image_init (GimpImage *gimage)
389
{
390 391
  gimage->ID                    = global_image_ID++;

392 393 394 395
  gimage->save_proc             = NULL;

  gimage->width                 = 0;
  gimage->height                = 0;
Michael Natterer's avatar
Michael Natterer committed
396 397 398
  gimage->xresolution           = core_config->default_xresolution;
  gimage->yresolution           = core_config->default_yresolution;
  gimage->unit                  = core_config->default_units;
399 400
  gimage->base_type             = RGB;

401
  gimage->cmap                  = NULL;
402 403
  gimage->num_cols              = 0;

404
  gimage->dirty                 = 1;
405
  gimage->undo_on               = TRUE;
406 407 408 409

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

410
  gimage->tattoo_state          = 0;
411 412 413 414 415

  gimage->shadow                = NULL;

  gimage->construct_flag        = -1;
  gimage->proj_type             = RGBA_GIMAGE;
416
  gimage->projection            = NULL;
417

418
  gimage->guides                = NULL;
419

420 421 422 423
  gimage->layers                = gimp_list_new (GIMP_TYPE_LAYER, 
						 GIMP_CONTAINER_POLICY_STRONG);
  gimage->channels              = gimp_list_new (GIMP_TYPE_CHANNEL, 
						 GIMP_CONTAINER_POLICY_STRONG);
424
  gimage->layer_stack           = NULL;
425 426 427 428 429 430

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

431
  gimage->parasites             = gimp_parasite_list_new ();
432 433 434 435 436 437 438 439 440

  gimage->paths                 = NULL;

  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;

441 442 443 444
  gimage->undo_stack            = NULL;
  gimage->redo_stack            = NULL;
  gimage->undo_bytes            = 0;
  gimage->undo_levels           = 0;
445
  gimage->group_count           = 0;
446
  gimage->pushing_undo_group    = UNDO_NULL;
447 448
  gimage->undo_history          = NULL;

449 450 451
  gimage->new_undo_stack        = gimp_undo_stack_new (gimage);
  gimage->new_redo_stack        = gimp_undo_stack_new (gimage);

452
  gimage->comp_preview          = NULL;
453
  gimage->comp_preview_valid    = FALSE;
454 455 456 457 458 459 460

  if (gimp_image_table == NULL)
    gimp_image_table = g_hash_table_new (g_direct_hash, NULL);

  g_hash_table_insert (gimp_image_table,
		       GINT_TO_POINTER (gimage->ID),
		       (gpointer) gimage);
461 462
}

463 464
static void
gimp_image_destroy (GtkObject *object)
Sven Neumann's avatar
Sven Neumann committed
465
{
466 467 468 469 470
  GimpImage *gimage;

  gimage = GIMP_IMAGE (object);

  g_hash_table_remove (gimp_image_table, GINT_TO_POINTER (gimage->ID));
471

472 473 474 475 476
  gimp_image_free_projection (gimage);
  gimp_image_free_shadow (gimage);
  
  if (gimage->cmap)
    g_free (gimage->cmap);
477 478 479 480
  
  gtk_object_unref (GTK_OBJECT (gimage->layers));
  gtk_object_unref (GTK_OBJECT (gimage->channels));
  g_slist_free (gimage->layer_stack);
481 482

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

484 485 486 487 488
  if (gimage->comp_preview)
    temp_buf_free (gimage->comp_preview);

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

Michael Natterer's avatar
Michael Natterer committed
490 491 492
  g_list_foreach (gimage->guides, (GFunc) g_free, NULL);
  g_list_free (gimage->guides);

493 494
  undo_free (gimage);

495 496
  gtk_object_unref (GTK_OBJECT (gimage->new_undo_stack));
  gtk_object_unref (GTK_OBJECT (gimage->new_redo_stack));
497 498 499 500 501 502 503 504 505 506 507 508 509 510 511 512 513 514
}

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;
515
    }
516
}
517

518 519 520 521 522
static void
gimp_image_invalidate_preview (GimpViewable *viewable)
{
  GimpImage *gimage;

523 524 525
  if (GIMP_VIEWABLE_CLASS (parent_class)->invalidate_preview)
    GIMP_VIEWABLE_CLASS (parent_class)->invalidate_preview (viewable);

526 527 528
  gimage = GIMP_IMAGE (viewable);

  gimage->comp_preview_valid = FALSE;
529 530
}

531 532 533 534 535 536 537 538 539 540 541 542 543 544
static void
gimp_image_size_changed (GimpViewable *viewable)
{
  GimpImage *gimage;

  if (GIMP_VIEWABLE_CLASS (parent_class)->size_changed)
    GIMP_VIEWABLE_CLASS (parent_class)->size_changed (viewable);

  gimage = GIMP_IMAGE (viewable);

  gimp_image_invalidate_layer_previews (gimage);
  gimp_image_invalidate_channel_previews (gimage);
}

Michael Natterer's avatar
Michael Natterer committed
545 546 547 548 549 550 551 552
static void 
gimp_image_real_colormap_changed (GimpImage *gimage,
				  gint       ncol)
{
  if (gimp_image_base_type (gimage) == INDEXED)
    gimp_image_color_hash_invalidate (gimage, ncol);
}

553 554 555 556 557 558 559 560 561 562 563 564 565 566 567 568 569 570 571 572 573 574
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:
575
      g_assert_not_reached ();
576 577 578
    }

  /*  allocate the new projection  */
579 580
  gimage->projection = tile_manager_new (gimage->width, gimage->height,
					 gimage->proj_bytes);
581
  tile_manager_set_user_data (gimage->projection, (void *) gimage);
582 583 584 585 586 587 588 589 590 591 592 593 594
  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
595
gimp_image_allocate_shadow (GimpImage *gimage, 
596 597 598
			    gint       width, 
			    gint       height, 
			    gint       bpp)
599 600 601 602 603 604 605 606 607
{
  /*  allocate the new projection  */
  gimage->shadow = tile_manager_new (width, height, bpp);
}


/* function definitions */

GimpImage *
608 609
gimp_image_new (Gimp              *gimp,
		gint               width,
610 611
		gint               height,
		GimpImageBaseType  base_type)
612
{
613 614 615 616 617 618 619
  GimpImage *gimage;
  gint       i;

  g_return_val_if_fail (gimp != NULL, NULL);
  g_return_val_if_fail (GIMP_IS_GIMP (gimp), NULL);

  gimage = GIMP_IMAGE (gtk_type_new (GIMP_TYPE_IMAGE));
620

621
  gimage->gimp      = gimp;
622 623
  gimage->width     = width;
  gimage->height    = height;
624 625 626 627 628 629 630 631 632 633
  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;
634
      gimage->cmap     = (guchar *) g_malloc0 (COLORMAP_SIZE);
635 636 637 638 639 640 641 642
      break;
    default:
      break;
    }

  /*  set all color channels visible and active  */
  for (i = 0; i < MAX_CHANNELS; i++)
    {
643 644
      gimage->visible[i] = TRUE;
      gimage->active[i]  = TRUE;
645 646 647
    }

  /* create the selection mask */
Michael Natterer's avatar
Michael Natterer committed
648 649 650
  gimage->selection_mask = gimp_channel_new_mask (gimage,
						  gimage->width,
						  gimage->height);
651 652 653 654 655


  return gimage;
}

656 657 658 659 660 661 662 663 664 665 666 667 668 669 670 671 672 673 674
gint
gimp_image_get_ID (GimpImage *gimage)
{
  g_return_val_if_fail (gimage != NULL, -1);
  g_return_val_if_fail (GIMP_IS_IMAGE (gimage), -1);

  return gimage->ID;
}

GimpImage *
gimp_image_get_by_ID (gint image_id)
{
  if (gimp_image_table == NULL)
    return NULL;

  return (GimpImage *) g_hash_table_lookup (gimp_image_table, 
					    GINT_TO_POINTER (image_id));
}

675
void
676 677
gimp_image_set_filename (GimpImage   *gimage,
			 const gchar *filename)
678
{
679 680
  gimp_object_set_name (GIMP_OBJECT (gimage), filename);
}
681

682
void
683
gimp_image_set_resolution (GimpImage *gimage,
684 685
			   gdouble    xresolution,
			   gdouble    yresolution)
686
{
687 688 689 690 691
  /* 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;

692 693 694
  /* 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)
695 696
    return;

697
  undo_push_resolution (gimage);
698

699 700
  gimage->xresolution = xresolution;
  gimage->yresolution = yresolution;
701 702 703

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

706
void
707 708 709
gimp_image_get_resolution (const GimpImage *gimage,
			   gdouble         *xresolution,
			   gdouble         *yresolution)
710
{
711 712
  g_return_if_fail (xresolution && yresolution);

713 714
  *xresolution = gimage->xresolution;
  *yresolution = gimage->yresolution;
715 716
}

717 718
void
gimp_image_set_unit (GimpImage *gimage,
719
		     GimpUnit   unit)
720
{
721 722
  undo_push_resolution (gimage);

723 724 725
  gimage->unit = unit;
}

726
GimpUnit
727
gimp_image_get_unit (const GimpImage *gimage)
728 729 730 731
{
  return gimage->unit;
}

732
void
Sven Neumann's avatar
Sven Neumann committed
733 734
gimp_image_set_save_proc (GimpImage     *gimage, 
			  PlugInProcDef *proc)
735 736 737 738 739
{
  gimage->save_proc = proc;
}

PlugInProcDef *
740
gimp_image_get_save_proc (const GimpImage *gimage)
741 742 743
{
  return gimage->save_proc;
}
744

745 746 747 748 749 750 751 752 753 754 755 756
gint
gimp_image_get_width (const GimpImage *gimage)
{
  return gimage->width;
}

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

757
void
758
gimp_image_resize (GimpImage *gimage, 
759 760 761 762
		   gint       new_width, 
		   gint       new_height,
		   gint       offset_x, 
		   gint       offset_y)
763
{
Michael Natterer's avatar
Michael Natterer committed
764 765 766
  GimpChannel *channel;
  GimpLayer   *layer;
  GimpLayer   *floating_layer;
767
  GList       *list;
Michael Natterer's avatar
Michael Natterer committed
768
  GList       *guide_list;
769

770
  gimp_set_busy ();
771

772
  g_assert (new_width > 0 && new_height > 0);
773 774 775 776

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

Sven Neumann's avatar
Sven Neumann committed
777
  undo_push_group_start (gimage, IMAGE_RESIZE_UNDO);
778 779 780 781 782 783 784 785 786

  /*  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  */
787
  gimage->width  = new_width;
788 789 790
  gimage->height = new_height;

  /*  Resize all channels  */
791 792 793
  for (list = GIMP_LIST (gimage->channels)->list; 
       list; 
       list = g_list_next (list))
794
    {
Michael Natterer's avatar
Michael Natterer committed
795
      channel = (GimpChannel *) list->data;
796

Michael Natterer's avatar
Michael Natterer committed
797
      gimp_channel_resize (channel, new_width, new_height, offset_x, offset_y);
798 799 800 801 802 803
    }

  /*  Reposition or remove any guides  */
  guide_list = gimage->guides;
  while (guide_list)
    {
Michael Natterer's avatar
Michael Natterer committed
804
      GimpGuide *guide;
805

Michael Natterer's avatar
Michael Natterer committed
806
      guide = (GimpGuide *) guide_list->data;
Sven Neumann's avatar
Sven Neumann committed
807
      guide_list = g_list_next (guide_list);
808 809 810

      switch (guide->orientation)
	{
811
	case ORIENTATION_HORIZONTAL:
Sven Neumann's avatar
Sven Neumann committed
812
	  undo_push_guide (gimage, guide);
813 814 815 816
	  guide->position += offset_y;
	  if (guide->position < 0 || guide->position > new_height)
	    gimp_image_delete_guide (gimage, guide);
	  break;
817

818
	case ORIENTATION_VERTICAL:
Sven Neumann's avatar
Sven Neumann committed
819
	  undo_push_guide (gimage, guide);
820 821 822 823
	  guide->position += offset_x;
	  if (guide->position < 0 || guide->position > new_width)
	    gimp_image_delete_guide (gimage, guide);
	  break;
824

825
	default:
826
	  g_error ("Unknown guide orientation\n");
827
	}
828 829 830
    }

  /*  Don't forget the selection mask!  */
Michael Natterer's avatar
Michael Natterer committed
831 832
  gimp_channel_resize (gimage->selection_mask,
		       new_width, new_height, offset_x, offset_y);
833 834 835
  gimage_mask_invalidate (gimage);

  /*  Reposition all layers  */
836 837 838
  for (list = GIMP_LIST (gimage->layers)->list; 
       list; 
       list = g_list_next (list))
839
    {
840
      layer = (GimpLayer *) list->data;
841

842
      gimp_layer_translate (layer, offset_x, offset_y);
843 844 845 846 847 848 849 850 851
    }

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

852 853
  undo_push_group_end (gimage);

854
  gimp_viewable_size_changed (GIMP_VIEWABLE (gimage));
855

856
  gimp_unset_busy ();
857 858 859
}

void
860
gimp_image_scale (GimpImage *gimage, 
861 862
		  gint       new_width, 
		  gint       new_height)
863
{
Michael Natterer's avatar
Michael Natterer committed
864 865 866
  GimpChannel *channel;
  GimpLayer   *layer;
  GimpLayer   *floating_layer;
867
  GList       *list;
Michael Natterer's avatar
Michael Natterer committed
868
  GSList      *remove = NULL;
869
  GSList      *slist;
Michael Natterer's avatar
Michael Natterer committed
870
  GimpGuide   *guide;
Michael Natterer's avatar
Michael Natterer committed
871 872 873 874
  gint         old_width;
  gint         old_height;
  gdouble      img_scale_w = 1.0;
  gdouble      img_scale_h = 1.0;
875

876
  if ((new_width == 0) || (new_height == 0))
877
    {
878 879
      g_message ("%s(): Scaling to zero width or height has been rejected.",
		 G_GNUC_FUNCTION);
880 881
      return;
    }
882

883
  gimp_set_busy ();
884

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

Sven Neumann's avatar
Sven Neumann committed
888
  undo_push_group_start (gimage, IMAGE_SCALE_UNDO);
889 890 891 892 893 894 895 896 897

  /*  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  */
898 899 900

  old_width      = gimage->width;
  old_height     = gimage->height;
901
  gimage->width  = new_width;
902
  gimage->height = new_height;
903 904
  img_scale_w    = (gdouble) new_width  / (gdouble) old_width;
  img_scale_h    = (gdouble) new_height / (gdouble) old_height;
905
 
906
  /*  Scale all channels  */
907 908 909
  for (list = GIMP_LIST (gimage->channels)->list; 
       list; 
       list = g_list_next (list))
910
    {
Michael Natterer's avatar
Michael Natterer committed
911 912 913
      channel = (GimpChannel *) list->data;

      gimp_channel_scale (channel, new_width, new_height);
914 915 916
    }

  /*  Don't forget the selection mask!  */
917
  /*  if (channel_is_empty(gimage->selection_mask))
Michael Natterer's avatar
Michael Natterer committed
918
        gimp_channel_resize(gimage->selection_mask, new_width, new_height, 0, 0)
919 920
      else
  */
Michael Natterer's avatar
Michael Natterer committed
921

Michael Natterer's avatar
Michael Natterer committed
922
  gimp_channel_scale (gimage->selection_mask, new_width, new_height);
923 924 925
  gimage_mask_invalidate (gimage);

  /*  Scale all layers  */
926 927 928
  for (list = GIMP_LIST (gimage->layers)->list; 
       list; 
       list = g_list_next (list))
929
    {
930 931
      layer = (GimpLayer *) list->data;

Michael Natterer's avatar
Michael Natterer committed
932
      if (! gimp_layer_scale_by_factors (layer, img_scale_w, img_scale_h))
933
	{
934 935 936 937 938
	  /* 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.
	   */
939
          remove = g_slist_append (remove, layer);
940 941
        }
    }
942

Michael Natterer's avatar
Michael Natterer committed
943 944 945
  /* We defer removing layers lost to scaling until now so as not to mix
   * the operations of iterating over and removal from gimage->layers.
   */  
946
  for (slist = remove; slist; slist = g_slist_next (slist))
947
    {
948
      layer = slist->data;
949
      gimp_image_remove_layer (gimage, layer);
950
    }
951
  g_slist_free (remove);
952

953
  /*  Scale any Guides  */
954
  for (list = gimage->guides; list; list = g_list_next (list))
955
    {
Michael Natterer's avatar
Michael Natterer committed
956
      guide = (GimpGuide *) list->data;
957 958 959

      switch (guide->orientation)
	{
960
	case ORIENTATION_HORIZONTAL:
Sven Neumann's avatar
Sven Neumann committed
961
	  undo_push_guide (gimage, guide);
962 963
	  guide->position = (guide->position * new_height) / old_height;
	  break;
964
	case ORIENTATION_VERTICAL:
Sven Neumann's avatar
Sven Neumann committed
965
	  undo_push_guide (gimage, guide);
966 967 968 969 970 971
	  guide->position = (guide->position * new_width) / old_width;
	  break;
	default:
	  g_error("Unknown guide orientation II.\n");
	}
    }
972

973 974 975 976 977 978 979
  /*  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);