gimpimage-resize.c 89.7 KB
Newer Older
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17
/* The GIMP -- an image manipulation program
 * Copyright (C) 1995 Spencer Kimball and Peter Mattis
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 2 of the License, or
 * (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
 * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
 */
18
#include <string.h>
19
#include "gimpimageP.h"
20
#include "cursorutil.h"
21 22
#include "drawable.h"
#include "floating_sel.h"
23
#include "gdisplay.h"
24 25 26 27
#include "general.h"
#include "gimage_mask.h"
#include "paint_funcs.h"
#include "palette.h"
28
#include "libgimp/parasite.h"
29
#include "parasitelist.h"
30 31
#include "undo.h"
#include "gimpsignal.h"
Manish Singh's avatar
Manish Singh committed
32
#include "gimpparasite.h"
33
#include "pathsP.h"
34
#include "gimprc.h"
35

36 37
#include "libgimp/gimpintl.h"

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

43

44 45 46 47 48 49 50
#ifdef DEBUG
#define TRC(x) printf x
#else
#define TRC(x)
#endif


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

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

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

93
guint32 next_guide_id = 1;  /* For generating guide_ID handles for PDB stuff */
94

95 96 97 98 99

/*
 *  Static variables
 */

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

static void  gimp_image_destroy (GtkObject *);
113 114

static guint gimp_image_signals[LAST_SIGNAL];
115
static GimpObjectClass *parent_class;
116 117 118 119 120 121 122 123 124 125 126 127 128 129

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;

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


/* static functions */

Sven Neumann's avatar
Sven Neumann committed
161 162
static void 
gimp_image_init (GimpImage *gimage)
163
{
164 165 166
  gimage->has_filename          = FALSE;
  gimage->num_cols              = 0;
  gimage->cmap                  = NULL;
167
  /* ID and ref_count handled in gimage.c */
168 169 170 171 172 173 174 175 176 177 178 179 180 181 182
  gimage->instance_count        = 0;
  gimage->shadow                = NULL;
  gimage->dirty                 = 1;
  gimage->undo_on               = TRUE;
  gimage->construct_flag        = -1;
  gimage->tattoo_state          = 0;
  gimage->projection            = NULL;
  gimage->guides                = NULL;
  gimage->layers                = NULL;
  gimage->channels              = NULL;
  gimage->layer_stack           = NULL;
  gimage->undo_stack            = NULL;
  gimage->redo_stack            = NULL;
  gimage->undo_bytes            = 0;
  gimage->undo_levels           = 0;
183
  gimage->group_count           = 0;
184
  gimage->pushing_undo_group    = 0;
185 186 187
  gimage->comp_preview_valid[0] = FALSE;
  gimage->comp_preview_valid[1] = FALSE;
  gimage->comp_preview_valid[2] = FALSE;
188 189 190 191 192 193 194
  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;
195 196
}

Sven Neumann's avatar
Sven Neumann committed
197 198 199 200 201
GtkType 
gimp_image_get_type (void) 
{
  static GtkType type;

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

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:
233
      g_assert_not_reached ();
234 235 236 237
    }

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


/* function definitions */

GimpImage *
265 266 267
gimp_image_new (gint               width,
		gint               height,
		GimpImageBaseType  base_type)
268
{
269 270
  GimpImage *gimage = GIMP_IMAGE (gtk_type_new (gimp_image_get_type ()));
  gint i;
271

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

  /*  configure the active pointers  */
292
  gimage->active_layer   = NULL;
293
  gimage->active_channel = NULL;  /* no default active channel */
294
  gimage->floating_sel   = NULL;
295 296 297 298

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

  /* create the selection mask */
304 305
  gimage->selection_mask = channel_new_mask (gimage,
					     gimage->width, gimage->height);
306

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

  return gimage;
}

void
318
gimp_image_set_filename (GimpImage *gimage, 
319
			 gchar     *filename)
320
{
321
  gchar *new_filename;
322

323 324 325 326 327 328
  /* 
   * 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.
   */

329
  new_filename = g_strdup (filename);
330

331 332 333 334 335 336 337 338 339 340 341 342 343 344 345 346 347
  if (gimage->has_filename)
    g_free (gimage->filename);

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

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

348
void
349
gimp_image_set_resolution (GimpImage *gimage,
350 351
			   gdouble    xresolution,
			   gdouble    yresolution)
352
{
353 354 355 356 357
  /* 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;

358
  undo_push_resolution (gimage);
359

360 361
  gimage->xresolution = xresolution;
  gimage->yresolution = yresolution;
362 363 364

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

367 368
void
gimp_image_get_resolution (GimpImage *gimage,
369 370
			   gdouble   *xresolution,
			   gdouble   *yresolution)
371
{
372 373
  g_return_if_fail (xresolution && yresolution);

374 375
  *xresolution = gimage->xresolution;
  *yresolution = gimage->yresolution;
376 377
}

378 379
void
gimp_image_set_unit (GimpImage *gimage,
Sven Neumann's avatar
Sven Neumann committed
380
		     GUnit      unit)
381
{
382 383
  undo_push_resolution (gimage);

384 385 386 387 388 389 390 391 392
  gimage->unit = unit;
}

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

393
void
Sven Neumann's avatar
Sven Neumann committed
394 395
gimp_image_set_save_proc (GimpImage     *gimage, 
			  PlugInProcDef *proc)
396 397 398 399 400 401 402 403 404
{
  gimage->save_proc = proc;
}

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

406
void
407
gimp_image_resize (GimpImage *gimage, 
408 409 410 411
		   gint       new_width, 
		   gint       new_height,
		   gint       offset_x, 
		   gint       offset_y)
412 413
{
  Channel *channel;
414 415 416 417
  Layer   *layer;
  Layer   *floating_layer;
  GSList  *list;
  GList   *guide_list;
418

419 420
  gimp_add_busy_cursors();

421
  g_assert (new_width > 0 && new_height > 0);
422 423 424 425

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

Sven Neumann's avatar
Sven Neumann committed
426
  undo_push_group_start (gimage, IMAGE_RESIZE_UNDO);
427 428 429 430 431 432 433 434 435

  /*  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  */
436
  gimage->width  = new_width;
437 438 439 440 441 442 443 444 445
  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);
446 447 448 449 450 451 452 453 454 455

    }

  /*  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
456
      guide_list = g_list_next (guide_list);
457 458 459

      switch (guide->orientation)
	{
460
	case ORIENTATION_HORIZONTAL:
Sven Neumann's avatar
Sven Neumann committed
461
	  undo_push_guide (gimage, guide);
462 463 464 465
	  guide->position += offset_y;
	  if (guide->position < 0 || guide->position > new_height)
	    gimp_image_delete_guide (gimage, guide);
	  break;
466
	case ORIENTATION_VERTICAL:
Sven Neumann's avatar
Sven Neumann committed
467
	  undo_push_guide (gimage, guide);
468 469 470 471 472 473 474
	  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");
	}
475 476 477
    }

  /*  Don't forget the selection mask!  */
478 479
  channel_resize (gimage->selection_mask,
		  new_width, new_height, offset_x, offset_y);
480 481 482 483 484 485 486 487 488 489 490 491 492 493 494 495 496 497 498
  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]);
499

500
  gimp_remove_busy_cursors (NULL);
501 502
}

503 504 505 506 507 508 509 510 511 512 513 514
gint
gimp_image_get_width (const GimpImage *gimage)
{
  return gimage->width;
}

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

515
void
516
gimp_image_scale (GimpImage *gimage, 
517 518
		  gint       new_width, 
		  gint       new_height)
519 520
{
  Channel *channel;
Sven Neumann's avatar
Sven Neumann committed
521 522 523 524 525
  Layer   *layer;
  Layer   *floating_layer;
  GSList  *list;
  GList   *glist;
  Guide   *guide;
526 527
  gint old_width, old_height;
  gint layer_width, layer_height;
528

529
  gimp_add_busy_cursors ();
530

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

Sven Neumann's avatar
Sven Neumann committed
534
  undo_push_group_start (gimage, IMAGE_SCALE_UNDO);
535 536 537 538 539 540 541 542 543

  /*  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  */
544
  old_width  = gimage->width;
545
  old_height = gimage->height;
546
  gimage->width  = new_width;
547 548 549 550 551 552 553 554 555 556 557 558 559 560 561 562 563 564 565 566 567
  gimage->height = new_height;

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

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

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

568 569 570 571
      layer_width  = (new_width *
		      drawable_width (GIMP_DRAWABLE(layer))) / old_width;
      layer_height = (new_height *
		      drawable_height (GIMP_DRAWABLE(layer))) / old_height;
572 573 574 575
      layer_scale (layer, layer_width, layer_height, FALSE);
      list = g_slist_next (list);
    }

576 577 578 579 580 581 582 583 584
  /*  Scale any Guides  */
  glist = gimage->guides;
  while (glist)
    {
      guide = (Guide*) glist->data;
      glist = g_list_next (glist);

      switch (guide->orientation)
	{
585
	case ORIENTATION_HORIZONTAL:
Sven Neumann's avatar
Sven Neumann committed
586
	  undo_push_guide (gimage, guide);
587 588
	  guide->position = (guide->position * new_height) / old_height;
	  break;
589
	case ORIENTATION_VERTICAL:
Sven Neumann's avatar
Sven Neumann committed
590
	  undo_push_guide (gimage, guide);
591 592 593 594 595 596
	  guide->position = (guide->position * new_width) / old_width;
	  break;
	default:
	  g_error("Unknown guide orientation II.\n");
	}
    }
597

598 599 600 601 602 603 604 605
  /*  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]);
606

607
  gimp_remove_busy_cursors (NULL);
608 609 610
}

TileManager *
611
gimp_image_shadow (GimpImage *gimage, 
612 613 614
		   gint       width, 
		   gint       height, 
		   gint       bpp)
615 616
{
  if (gimage->shadow &&
617 618 619
      ((width != tile_manager_level_width (gimage->shadow)) ||
       (height != tile_manager_level_height (gimage->shadow)) ||
       (bpp != tile_manager_level_bpp (gimage->shadow))))
620 621 622 623 624 625 626 627 628 629 630 631 632 633 634 635 636 637 638 639 640 641
    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)
{
642
  GimpImage* gimage = GIMP_IMAGE (object);
Sven Neumann's avatar
Sven Neumann committed
643 644 645 646 647 648 649 650 651 652 653 654 655

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

Sven Neumann's avatar
Sven Neumann committed
657
  if (gimage->parasites)
658
    gtk_object_unref (GTK_OBJECT (gimage->parasites));
659 660 661
}

void
662 663 664 665 666 667
gimp_image_apply_image (GimpImage	 *gimage,
			GimpDrawable	 *drawable,
			PixelRegion	 *src2PR,
			gint              undo,
			gint              opacity,
			LayerModeEffects  mode,
668
			/*  alternative to using drawable tiles as src1: */
669 670 671
			TileManager	 *src1_tiles,
			gint              x,
			gint              y)
672
{
Sven Neumann's avatar
Sven Neumann committed
673
  Channel *mask;
674 675
  gint x1, y1, x2, y2;
  gint offset_x, offset_y;
676
  PixelRegion src1PR, destPR, maskPR;
677 678
  gint operation;
  gint active [MAX_CHANNELS];
679 680

  /*  get the selection mask if one exists  */
681
  mask = (gimage_mask_is_empty (gimage)) ? NULL : gimp_image_get_mask (gimage);
682 683 684 685 686 687 688 689 690 691

  /*  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
692
      g_message ("gimp_image_apply_image sent illegal parameters");
693 694 695 696 697 698 699
      return;
    }

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

  /*  make sure the image application coordinates are within gimage bounds  */
700
  x1 = CLAMP (x, 0, drawable_width  (drawable));
701
  y1 = CLAMP (y, 0, drawable_height (drawable));
702
  x2 = CLAMP (x + src2PR->w, 0, drawable_width  (drawable));
703 704 705 706 707 708 709 710
  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
       */
711 712 713 714
      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);
715 716 717 718
    }

  /*  If the calling procedure specified an undo step...  */
  if (undo)
719
    undo_push_image (gimp_drawable_gimage (drawable), drawable, x1, y1, x2, y2);
720 721 722 723 724 725 726 727 728 729 730 731 732 733 734 735 736 737 738 739 740 741 742 743 744 745 746 747 748 749 750 751 752 753 754 755 756 757

  /* 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
758 759 760
gimp_image_replace_image (GimpImage    *gimage, 
			  GimpDrawable *drawable, 
			  PixelRegion  *src2PR,
761 762
			  gint          undo, 
			  gint          opacity,
763
			  PixelRegion  *maskPR,
764 765
			  gint          x, 
			  gint          y)
766
{
Sven Neumann's avatar
Sven Neumann committed
767
  Channel *mask;
768 769
  gint x1, y1, x2, y2;
  gint offset_x, offset_y;
770 771
  PixelRegion src1PR, destPR;
  PixelRegion mask2PR, tempPR;
772 773 774
  guchar *temp_data;
  gint operation;
  gint active [MAX_CHANNELS];
775 776

  /*  get the selection mask if one exists  */
777
  mask = (gimage_mask_is_empty (gimage)) ? NULL : gimp_image_get_mask (gimage);
778 779 780 781 782 783 784 785 786 787

  /*  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
788
      g_message ("gimp_image_apply_image sent illegal parameters");
789 790 791 792 793 794 795 796 797 798 799 800 801 802 803 804 805 806
      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
       */
807 808 809 810
      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);
811 812 813 814 815 816 817 818 819 820 821 822 823 824 825 826 827 828 829 830 831 832 833 834 835 836 837 838 839 840 841 842 843 844 845 846 847 848 849 850 851 852 853 854 855 856 857 858 859 860 861 862 863 864 865 866 867 868 869 870 871 872 873 874 875
    }

  /*  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
876 877 878
gimp_image_get_foreground (GimpImage    *gimage, 
			   GimpDrawable *drawable, 
			   guchar       *fg)
879
{
880
  guchar pfg[3];
881 882 883 884 885 886 887 888

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

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

void
889 890 891
gimp_image_get_background (GimpImage    *gimage, 
			   GimpDrawable *drawable, 
			   guchar       *bg)
892
{
893
  guchar pbg[3];
894 895 896 897 898 899 900

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

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

901
guchar *
902
gimp_image_get_color_at (GimpImage *gimage, 
903 904
			 gint       x, 
			 gint       y)
905 906
{
  Tile *tile;
907 908
  guchar *src;
  guchar *dest;
909 910

  if (x < 0 || y < 0 || x >= gimage->width || y >= gimage->height)
911 912 913 914
    {
      return NULL;
    }
  dest = g_new (unsigned char, 5);
915 916 917 918
  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);
919 920

  if (TYPE_HAS_ALPHA (gimp_image_composite_type (gimage)))
921 922 923
    dest[3] = src[gimp_image_composite_bytes (gimage) - 1];
  else
    dest[3] = 255;
924

925 926
  dest[4] = 0;
  tile_release (tile, FALSE);
927

928 929 930
  return dest;
}

931
void
932
gimp_image_get_color (GimpImage     *gimage, 
933
		      GimpImageType  d_type,
934 935
		      guchar        *rgb, 
		      guchar        *src)
936 937 938 939 940 941 942 943 944 945 946 947 948 949 950 951
{
  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
952 953 954 955 956
gimp_image_transform_color (GimpImage         *gimage, 
			    GimpDrawable      *drawable,
			    guchar            *src, 
			    guchar            *dest, 
			    GimpImageBaseType  type)
957 958
{
#define INTENSITY(r,g,b) (r * 0.30 + g * 0.59 + b * 0.11 + 0.001)
959
  GimpImageType d_type;
960 961 962 963 964 965 966 967 968 969 970 971 972 973 974 975 976 977 978 979 980 981 982 983 984

  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,
985
				      gimage,
986 987 988 989 990 991 992 993 994 995 996 997 998 999 1000 1001 1002 1003 1004 1005 1006 1007 1008
				      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,
1009
				      gimage,
1010 1011 1012 1013 1014 1015 1016 1017 1018 1019 1020 1021 1022 1023 1024 1025 1026
				      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);
1027 1028 1029
  guide->ref_count   = 0;
  guide->position    = -1;
  guide->guide_ID    = next_guide_id++;
1030
  guide->orientation = ORIENTATION_HORIZONTAL;
1031 1032 1033 1034 1035 1036 1037 1038 1039 1040 1041 1042

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

  return guide;
}

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

  guide = g_new (Guide, 1);
1043 1044 1045
  guide->ref_count   = 0;
  guide->position    = -1;
  guide->guide_ID    = next_guide_id++;
1046
  guide->orientation = ORIENTATION_VERTICAL;
1047 1048 1049 1050 1051 1052 1053 1054

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

  return guide;
}

void
gimp_image_add_guide (GimpImage *gimage,
1055
		      Guide     *guide)
1056 1057 1058 1059 1060 1061
{
  gimage->guides = g_list_prepend (gimage->guides, guide);
}

void
gimp_image_remove_guide (GimpImage *gimage,
1062
			 Guide     *guide)
1063 1064 1065 1066 1067 1068
{
  gimage->guides = g_list_remove (gimage->guides, guide);
}

void
gimp_image_delete_guide (GimpImage *gimage,
1069
			 Guide     *guide) 
1070
{
Sven Neumann's avatar
Sven Neumann committed
1071 1072 1073 1074 1075 1076 1077
  guide->position = -1;

  if (guide->ref_count <= 0)
    {
      gimage->guides = g_list_remove (gimage->guides, guide);
      g_free (guide);
    }
1078 1079
}

Sven Neumann's avatar
Sven Neumann committed
1080

1081
Parasite *
Marc Lehmann's avatar
Marc Lehmann committed
1082
gimp_image_parasite_find (const GimpImage *gimage, 
1083
			  const gchar     *name)
1084
{
1085
  return parasite_list_find (gimage->parasites, name);
1086 1087
}

1088 1089 1090 1091
static void
list_func (gchar      *key, 
	   Parasite   *p, 
	   gchar    ***cur)
Marc Lehmann's avatar
Marc Lehmann committed
1092
{
1093
  *(*cur)++ = (gchar *) g_strdup (key);
Marc Lehmann's avatar
Marc Lehmann committed
1094 1095
}

1096
gchar **
1097 1098
gimp_image_parasite_list (GimpImage *image, 
			  gint      *count)
Marc Lehmann's avatar
Marc Lehmann committed
1099
{
1100
  gchar **list, **cur;
Marc Lehmann's avatar
Marc Lehmann committed
1101 1102

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