gimpcurvestool.c 48.3 KB
Newer Older
Elliot Lee's avatar
Elliot Lee committed
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15
/* 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
16
 * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
Elliot Lee's avatar
Elliot Lee committed
17
 */
Sven Neumann's avatar
Sven Neumann committed
18

19 20 21
#include "config.h"

#include <stdio.h>
22 23
#include <stdlib.h>
#include <string.h>
24
#include <errno.h>
25

26 27 28 29 30
#ifdef __GNUC__
#warning GTK_DISABLE_DEPRECATED
#endif
#undef GTK_DISABLE_DEPRECATED

Sven Neumann's avatar
Sven Neumann committed
31 32
#include <gtk/gtk.h>

33
#include "libgimpmath/gimpmath.h"
34
#include "libgimpbase/gimpbase.h"
35
#include "libgimpwidgets/gimpwidgets.h"
36

37
#include "tools-types.h"
Michael Natterer's avatar
Michael Natterer committed
38 39 40 41 42 43 44 45

#include "base/gimphistogram.h"
#include "base/gimplut.h"

#include "core/gimpdrawable.h"
#include "core/gimpimage.h"

#include "widgets/gimpcursor.h"
46
#include "widgets/gimpenummenu.h"
Michael Natterer's avatar
Michael Natterer committed
47

48 49
#include "display/gimpdisplay.h"

Michael Natterer's avatar
Michael Natterer committed
50 51
#include "gimpcurvestool.h"
#include "tool_manager.h"
Sven Neumann's avatar
Sven Neumann committed
52

53
#include "app_procs.h"
54
#include "image_map.h"
55

56 57
#include "libgimp/gimpintl.h"

58

59 60 61 62 63 64
#define GRAPH          0x1
#define XRANGE_TOP     0x2
#define XRANGE_BOTTOM  0x4
#define YRANGE         0x8
#define DRAW          0x10
#define ALL           0xFF
Elliot Lee's avatar
Elliot Lee committed
65

66
/*  NB: take care when changing these values: make sure the curve[] array in
67
 *  gimpcurvestool.h is large enough.
68
 */
69 70 71 72 73 74
#define GRAPH_WIDTH    256
#define GRAPH_HEIGHT   256
#define XRANGE_WIDTH   256
#define XRANGE_HEIGHT   16
#define YRANGE_WIDTH    16
#define YRANGE_HEIGHT  256
Elliot Lee's avatar
Elliot Lee committed
75 76 77 78 79 80 81 82 83 84 85 86 87 88 89
#define RADIUS           3
#define MIN_DISTANCE     8

#define RANGE_MASK  GDK_EXPOSURE_MASK | \
                    GDK_ENTER_NOTIFY_MASK

#define GRAPH_MASK  GDK_EXPOSURE_MASK | \
		    GDK_POINTER_MOTION_MASK | \
		    GDK_POINTER_MOTION_HINT_MASK | \
                    GDK_ENTER_NOTIFY_MASK | \
		    GDK_BUTTON_PRESS_MASK | \
		    GDK_BUTTON_RELEASE_MASK | \
		    GDK_BUTTON1_MOTION_MASK


90
typedef gdouble CRMatrix[4][4];
91

Michael Natterer's avatar
Michael Natterer committed
92

Michael Natterer's avatar
Michael Natterer committed
93 94 95
/*  local function prototypes  */

static void   gimp_curves_tool_class_init     (GimpCurvesToolClass *klass);
Michael Natterer's avatar
Michael Natterer committed
96
static void   gimp_curves_tool_init           (GimpCurvesTool      *tool);
Michael Natterer's avatar
Michael Natterer committed
97

98 99 100
static void   gimp_curves_tool_initialize     (GimpTool        *tool,
					       GimpDisplay     *gdisp);
static void   gimp_curves_tool_control        (GimpTool        *tool,
101
					       GimpToolAction   action,
102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127
					       GimpDisplay     *gdisp);
static void   gimp_curves_tool_button_press   (GimpTool        *tool,
                                               GimpCoords      *coords,
                                               guint32          time,
					       GdkModifierType  state,
					       GimpDisplay     *gdisp);
static void   gimp_curves_tool_button_release (GimpTool        *tool,
                                               GimpCoords      *coords,
                                               guint32          time,
					       GdkModifierType  state,
					       GimpDisplay     *gdisp);
static void   gimp_curves_tool_motion         (GimpTool        *tool,
                                               GimpCoords      *coords,
                                               guint32          time,
					       GdkModifierType  state,
					       GimpDisplay     *gdisp);

static void   curves_color_update             (GimpTool        *tool,
					       GimpDisplay     *gdisp,
					       GimpDrawable    *drawable,
					       gint             x,
					       gint             y);
static void   curves_add_point                (GimpDrawable    *drawable,
					       gint             x,
					       gint             y,
					       gint             cchan);
128 129 130

static CurvesDialog * curves_dialog_new   (void);

131
static void   curves_dialog_hide          (void);
132 133 134 135 136 137 138 139 140 141 142 143
static void   curves_update               (CurvesDialog   *cd,
					   gint            );
static void   curves_plot_curve           (CurvesDialog   *cd,
					   gint            ,
					   gint            ,
					   gint            ,
					   gint            );
static void   curves_preview              (CurvesDialog   *cd);

static void   curves_channel_callback     (GtkWidget      *widget,
					   gpointer        data);

144 145 146
static gboolean curves_set_sensitive_callback 
                                          (gpointer       item_data,
                                           CurvesDialog   *cd);
147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179 180 181 182 183 184 185
static void   curves_smooth_callback      (GtkWidget      *widget,
					   gpointer        data);
static void   curves_free_callback        (GtkWidget      *widget,
					   gpointer        data);

static void   curves_channel_reset        (gint            );
static void   curves_reset_callback       (GtkWidget      *widget,
					   gpointer        data);
static void   curves_ok_callback          (GtkWidget      *widget,
					   gpointer        data);
static void   curves_cancel_callback      (GtkWidget      *widget,
					   gpointer        data);
static void   curves_load_callback        (GtkWidget      *widget,
					   gpointer        data);
static void   curves_save_callback        (GtkWidget      *widget,
					   gpointer        data);
static void   curves_preview_update       (GtkWidget      *widget,
					   gpointer        data);
static gint   curves_xrange_events        (GtkWidget      *widget,
					   GdkEvent       *event,
					   CurvesDialog   *cd);
static gint   curves_yrange_events        (GtkWidget      *widget,
					   GdkEvent       *event,
					   CurvesDialog   *cd);
static gint   curves_graph_events         (GtkWidget      *widget,
					   GdkEvent       *event,
					   CurvesDialog   *cd);
static void   curves_CR_compose           (CRMatrix        ,
					   CRMatrix        ,
					   CRMatrix        );

static void   file_dialog_create          (GtkWidget      *widget);
static void   file_dialog_ok_callback     (GtkWidget      *widget,
					   gpointer        data);
static void   file_dialog_cancel_callback (GtkWidget      *widget,
					   gpointer        data);

static gboolean  curves_read_from_file    (FILE           *f);
static void      curves_write_to_file     (FILE           *f);
186 187


Michael Natterer's avatar
Michael Natterer committed
188 189 190 191 192 193 194 195 196 197 198 199 200 201
static CurvesDialog * curves_dialog = NULL;

/*  the curves file dialog  */
static GtkWidget *file_dlg = NULL;
static gboolean   load_save;

static CRMatrix CR_basis =
{
  { -0.5,  1.5, -1.5,  0.5 },
  {  1.0, -2.5,  2.0, -0.5 },
  { -0.5,  0.0,  0.5,  0.0 },
  {  0.0,  1.0,  0.0,  0.0 },
};

202 203
static GimpImageMapToolClass *parent_class = NULL;

Michael Natterer's avatar
Michael Natterer committed
204

205
/*  public functions  */
Michael Natterer's avatar
Michael Natterer committed
206 207

void
Nate Summers's avatar
Nate Summers committed
208
gimp_curves_tool_register (GimpToolRegisterCallback  callback,
209
                           gpointer                  data)
Michael Natterer's avatar
Michael Natterer committed
210
{
Nate Summers's avatar
Nate Summers committed
211
  (* callback) (GIMP_TYPE_CURVES_TOOL,
212 213
                NULL,
                FALSE,
214
                "gimp-curves-tool",
215 216
                _("Curves"),
                _("Adjust color curves"),
217
                N_("/Layer/Colors/Curves..."), NULL,
218
                NULL, "tools/curves.html",
Nate Summers's avatar
Nate Summers committed
219
                GIMP_STOCK_TOOL_CURVES,
220
                data);
Michael Natterer's avatar
Michael Natterer committed
221 222
}

223
GType
Michael Natterer's avatar
Michael Natterer committed
224 225
gimp_curves_tool_get_type (void)
{
226
  static GType tool_type = 0;
Michael Natterer's avatar
Michael Natterer committed
227 228 229

  if (! tool_type)
    {
230
      static const GTypeInfo tool_info =
Michael Natterer's avatar
Michael Natterer committed
231 232
      {
        sizeof (GimpCurvesToolClass),
233 234 235 236 237 238 239 240
	(GBaseInitFunc) NULL,
	(GBaseFinalizeFunc) NULL,
	(GClassInitFunc) gimp_curves_tool_class_init,
	NULL,           /* class_finalize */
	NULL,           /* class_data     */
	sizeof (GimpCurvesTool),
	0,              /* n_preallocs    */
	(GInstanceInitFunc) gimp_curves_tool_init,
Michael Natterer's avatar
Michael Natterer committed
241 242
      };

243 244 245
      tool_type = g_type_register_static (GIMP_TYPE_IMAGE_MAP_TOOL,
					  "GimpCurvesTool", 
                                          &tool_info, 0);
Michael Natterer's avatar
Michael Natterer committed
246 247 248 249 250 251 252 253
    }

  return tool_type;
}

static void
gimp_curves_tool_class_init (GimpCurvesToolClass *klass)
{
254
  GimpToolClass *tool_class;
Michael Natterer's avatar
Michael Natterer committed
255

256
  tool_class = GIMP_TOOL_CLASS (klass);
Michael Natterer's avatar
Michael Natterer committed
257

258
  parent_class = g_type_class_peek_parent (klass);
Michael Natterer's avatar
Michael Natterer committed
259 260 261 262 263 264 265 266 267

  tool_class->initialize     = gimp_curves_tool_initialize;
  tool_class->control        = gimp_curves_tool_control;
  tool_class->button_press   = gimp_curves_tool_button_press;
  tool_class->button_release = gimp_curves_tool_button_release;
  tool_class->motion         = gimp_curves_tool_motion;
}

static void
Michael Natterer's avatar
Michael Natterer committed
268
gimp_curves_tool_init (GimpCurvesTool *tool)
Michael Natterer's avatar
Michael Natterer committed
269 270 271 272
{
}

static void
Michael Natterer's avatar
Michael Natterer committed
273 274
gimp_curves_tool_initialize (GimpTool    *tool,
			     GimpDisplay *gdisp)
Michael Natterer's avatar
Michael Natterer committed
275 276 277 278 279 280 281 282 283 284 285 286 287 288 289 290 291 292 293 294 295 296 297 298 299 300 301 302 303 304 305 306 307 308 309 310
{
  gint i, j;

  if (! gdisp)
    {
      curves_dialog_hide ();
      return;
    }

  if (gimp_drawable_is_indexed (gimp_image_active_drawable (gdisp->gimage)))
    {
      g_message (_("Curves for indexed drawables cannot be adjusted."));
      return;
    }

  /*  The curves dialog  */
  if (!curves_dialog)
    {
      curves_dialog = curves_dialog_new ();
    }
     
  /*  Initialize the values  */
  curves_dialog->channel = GIMP_HISTOGRAM_VALUE;
  for (i = 0; i < 5; i++)
    for (j = 0; j < 256; j++)
      curves_dialog->curve[i][j] = j;
  
  for (i = 0; i < 5; i++)
    {
      curves_channel_reset (i);
    }

  curves_dialog->drawable  = gimp_image_active_drawable (gdisp->gimage);
  curves_dialog->color     = gimp_drawable_is_rgb (curves_dialog->drawable);
  curves_dialog->image_map = image_map_create (gdisp, curves_dialog->drawable);

311 312 313 314
  /* set the sensitivity of the channel menu based on the drawable type */
  gimp_option_menu_set_sensitive (GTK_OPTION_MENU (curves_dialog->channel_menu),
                                  (GimpOptionMenuSensitivityCallback) curves_set_sensitive_callback,
                                  curves_dialog);
Michael Natterer's avatar
Michael Natterer committed
315 316 317 318 319 320 321 322 323 324 325 326 327 328 329 330 331

  /* set the current selection */
  gtk_option_menu_set_history (GTK_OPTION_MENU (curves_dialog->channel_menu),
			       curves_dialog->channel);

  gimp_lut_setup (curves_dialog->lut, 
		  (GimpLutFunc) curves_lut_func,
                  (gpointer) curves_dialog, 
		  gimp_drawable_bytes (curves_dialog->drawable));

  if (!GTK_WIDGET_VISIBLE (curves_dialog->shell))
    gtk_widget_show (curves_dialog->shell);

  curves_update (curves_dialog, GRAPH | DRAW);
}

static void
332 333 334
gimp_curves_tool_control (GimpTool       *tool,
			  GimpToolAction  action,
			  GimpDisplay    *gdisp)
Michael Natterer's avatar
Michael Natterer committed
335 336 337 338 339 340 341 342 343 344 345 346 347 348 349 350 351
{
  switch (action)
    {
    case PAUSE:
      break;

    case RESUME:
      break;

    case HALT:
      curves_dialog_hide ();
      break;

    default:
      break;
    }

352
  GIMP_TOOL_CLASS (parent_class)->control (tool, action, gdisp);
Michael Natterer's avatar
Michael Natterer committed
353 354 355
}

static void
356 357 358 359 360
gimp_curves_tool_button_press (GimpTool        *tool,
                               GimpCoords      *coords,
                               guint32          time,
			       GdkModifierType  state,
			       GimpDisplay     *gdisp)
Michael Natterer's avatar
Michael Natterer committed
361 362 363 364 365 366 367 368 369
{
  GimpDrawable *drawable;

  drawable = gimp_image_active_drawable (gdisp->gimage);

  tool->gdisp = gdisp;

  if (drawable != tool->drawable)
    {
370
      gimp_tool_control_set_preserve (tool->control, TRUE);
Michael Natterer's avatar
Michael Natterer committed
371
      image_map_abort (curves_dialog->image_map);
372
      gimp_tool_control_set_preserve (tool->control, FALSE);
Michael Natterer's avatar
Michael Natterer committed
373 374 375 376 377 378

      tool->drawable = drawable;

      curves_dialog->drawable = drawable;
      curves_dialog->color = gimp_drawable_is_rgb (drawable);
      curves_dialog->image_map = image_map_create (gdisp, drawable);
379 380 381 382 383

      gimp_option_menu_set_sensitive 
        (GTK_OPTION_MENU (curves_dialog->channel_menu),
         (GimpOptionMenuSensitivityCallback) curves_set_sensitive_callback,
         curves_dialog);
Michael Natterer's avatar
Michael Natterer committed
384 385
    }

386
  gimp_tool_control_activate (tool->control);
Michael Natterer's avatar
Michael Natterer committed
387

388
  curves_color_update (tool, gdisp, drawable, coords->x, coords->y);
Michael Natterer's avatar
Michael Natterer committed
389 390 391 392
  curves_update (curves_dialog, GRAPH | DRAW);
}

static void
393 394 395 396 397
gimp_curves_tool_button_release (GimpTool        *tool,
                                 GimpCoords      *coords,
                                 guint32          time,
				 GdkModifierType  state,
				 GimpDisplay     *gdisp)
Michael Natterer's avatar
Michael Natterer committed
398 399 400 401 402 403 404
{
  GimpDrawable *drawable;

  if (! curves_dialog || 
      ! (drawable = gimp_image_active_drawable (gdisp->gimage)))
     return;

405
  curves_color_update (tool, gdisp, drawable, coords->x, coords->y);
Michael Natterer's avatar
Michael Natterer committed
406

407
  if (state & GDK_SHIFT_MASK)
Michael Natterer's avatar
Michael Natterer committed
408
    {
409
      curves_add_point (drawable, coords->x, coords->y, curves_dialog->channel);
Michael Natterer's avatar
Michael Natterer committed
410 411
      curves_calculate_curve (curves_dialog);
    }
412
  else if (state & GDK_CONTROL_MASK)
Michael Natterer's avatar
Michael Natterer committed
413
    {
414 415 416 417 418
      curves_add_point (drawable, coords->x, coords->y, GIMP_HISTOGRAM_VALUE);
      curves_add_point (drawable, coords->x, coords->y, GIMP_HISTOGRAM_RED);
      curves_add_point (drawable, coords->x, coords->y, GIMP_HISTOGRAM_GREEN);
      curves_add_point (drawable, coords->x, coords->y, GIMP_HISTOGRAM_BLUE);
      curves_add_point (drawable, coords->x, coords->y, GIMP_HISTOGRAM_ALPHA);
Michael Natterer's avatar
Michael Natterer committed
419 420 421 422 423 424 425
      curves_calculate_curve (curves_dialog);
    }

  curves_update (curves_dialog, GRAPH | DRAW);
}

static void
426 427 428 429 430
gimp_curves_tool_motion (GimpTool        *tool,
                         GimpCoords      *coords,
                         guint32          time,
			 GdkModifierType  state,
			 GimpDisplay     *gdisp)
Michael Natterer's avatar
Michael Natterer committed
431 432 433 434 435 436 437
{
  GimpDrawable *drawable;

  if (! curves_dialog ||
      ! (drawable = gimp_image_active_drawable (gdisp->gimage)))
     return;

438
  curves_color_update (tool, gdisp, drawable, coords->x, coords->y);
Michael Natterer's avatar
Michael Natterer committed
439 440 441 442
  curves_update (curves_dialog, GRAPH | DRAW);
}


Elliot Lee's avatar
Elliot Lee committed
443 444
/*  curves machinery  */

445
gfloat
Manish Singh's avatar
Manish Singh committed
446
curves_lut_func (CurvesDialog *cd,
447 448 449
		 gint          nchannels,
		 gint          channel,
		 gfloat        value)
Elliot Lee's avatar
Elliot Lee committed
450
{
451 452
  gfloat  f;
  gint    index;
453
  gdouble inten;
454
  gint    j;
Elliot Lee's avatar
Elliot Lee committed
455

456 457 458 459
  if (nchannels == 1)
    j = 0;
  else
    j = channel + 1;
460

461
  inten = value;
462

Manish Singh's avatar
Manish Singh committed
463
  /* For color images this runs through the loop with j = channel +1
464 465 466 467 468 469 470 471 472 473 474 475 476 477 478
     the first time and j = 0 the second time */
  /* For bw images this runs through the loop with j = 0 the first and
     only time  */
  for (; j >= 0; j -= (channel + 1))
  {
    /* don't apply the overall curve to the alpha channel */
    if (j == 0 && (nchannels == 2 || nchannels == 4)
	&& channel == nchannels -1)
      return inten;

    if (inten < 0.0)
      inten = cd->curve[j][0]/255.0;
    else if (inten >= 1.0)
      inten = cd->curve[j][255]/255.0;
    else /* interpolate the curve */
Elliot Lee's avatar
Elliot Lee committed
479
    {
480 481 482 483
      index = floor(inten * 255.0);
      f = inten*255.0 - index;
      inten = ((1.0 - f) * cd->curve[j][index    ] + 
	       (      f) * cd->curve[j][index + 1] ) / 255.0;
Elliot Lee's avatar
Elliot Lee committed
484
    }
485 486
  }
  return inten;
Elliot Lee's avatar
Elliot Lee committed
487 488
}

BST 1999 Andy Thomas's avatar
BST 1999 Andy Thomas committed
489
static void
490 491 492 493 494
curves_color_update (GimpTool       *tool,
                     GimpDisplay    *gdisp,
                     GimpDrawable   *drawable,
                     gint            x,
                     gint            y)
BST 1999 Andy Thomas's avatar
BST 1999 Andy Thomas committed
495
{
496 497 498 499
  guchar        *color;
  gint           offx;
  gint           offy;
  gint           maxval;
500 501 502
  gboolean       has_alpha;
  gboolean       is_indexed;
  GimpImageType  sample_type;
BST 1999 Andy Thomas's avatar
BST 1999 Andy Thomas committed
503

504
  if (!tool || !gimp_tool_control_is_active (tool->control))
BST 1999 Andy Thomas's avatar
BST 1999 Andy Thomas committed
505 506
    return;

507
  gimp_drawable_offsets (drawable, &offx, &offy);
BST 1999 Andy Thomas's avatar
BST 1999 Andy Thomas committed
508 509 510 511

  x -= offx;
  y -= offy;

512
  if (!(color = image_map_get_color_at (curves_dialog->image_map, x, y)))
BST 1999 Andy Thomas's avatar
BST 1999 Andy Thomas committed
513 514
    return;

515
  sample_type = gimp_drawable_type (drawable);
516 517
  is_indexed  = gimp_drawable_is_indexed (drawable);
  has_alpha   = GIMP_IMAGE_TYPE_HAS_ALPHA (sample_type);
BST 1999 Andy Thomas's avatar
BST 1999 Andy Thomas committed
518

Michael Natterer's avatar
Michael Natterer committed
519 520 521
  curves_dialog->col_value[GIMP_HISTOGRAM_RED] = color[RED_PIX];
  curves_dialog->col_value[GIMP_HISTOGRAM_GREEN] = color[GREEN_PIX];
  curves_dialog->col_value[GIMP_HISTOGRAM_BLUE] = color[BLUE_PIX];
BST 1999 Andy Thomas's avatar
BST 1999 Andy Thomas committed
522 523 524

  if (has_alpha)
    {
Michael Natterer's avatar
Michael Natterer committed
525
      curves_dialog->col_value [GIMP_HISTOGRAM_ALPHA] = color[3];
BST 1999 Andy Thomas's avatar
BST 1999 Andy Thomas committed
526 527 528
    }

  if (is_indexed)
Michael Natterer's avatar
Michael Natterer committed
529
    curves_dialog->col_value [GIMP_HISTOGRAM_ALPHA] = color[4];
BST 1999 Andy Thomas's avatar
BST 1999 Andy Thomas committed
530

531
  maxval = MAX (color[RED_PIX], color[GREEN_PIX]);
Michael Natterer's avatar
Michael Natterer committed
532
  curves_dialog->col_value[GIMP_HISTOGRAM_VALUE] = MAX (maxval, color[BLUE_PIX]);
BST 1999 Andy Thomas's avatar
BST 1999 Andy Thomas committed
533

534
  g_free (color);
535
}
BST 1999 Andy Thomas's avatar
BST 1999 Andy Thomas committed
536

537
static void
538 539 540 541
curves_add_point (GimpDrawable *drawable,
		  gint          x,
		  gint          y,
		  gint          cchan)
542 543
{
  /* Add point onto the curve */
544 545 546 547
  gint closest_point = 0;
  gint distance;
  gint curvex;
  gint i;
548

549
  switch (curves_dialog->curve_type[cchan])
550
    {
551 552 553 554 555 556 557 558 559 560 561 562 563 564 565 566 567 568 569 570 571 572 573
    case SMOOTH:
      curvex = curves_dialog->col_value[cchan];
      distance = G_MAXINT;
      for (i = 0; i < 17; i++)
	{
	  if (curves_dialog->points[cchan][i][0] != -1)
	    if (abs (curvex - curves_dialog->points[cchan][i][0]) < distance)
	      {
		distance = abs (curvex - curves_dialog->points[cchan][i][0]);
		closest_point = i;
	      }
	}
      
      if (distance > MIN_DISTANCE)
	closest_point = (curvex + 8) / 16;
      
      curves_dialog->points[cchan][closest_point][0] = curvex;
      curves_dialog->points[cchan][closest_point][1] = curves_dialog->curve[cchan][curvex];
      break;
      
    case GFREE:
      curves_dialog->curve[cchan][x] = 255 - y;
      break;
574
    }
Elliot Lee's avatar
Elliot Lee committed
575 576 577
}

void
578
curves_free (void)
Elliot Lee's avatar
Elliot Lee committed
579
{
580 581
  GimpTool *active_tool;

Elliot Lee's avatar
Elliot Lee committed
582 583 584 585
  if (curves_dialog)
    {
      if (curves_dialog->image_map)
	{
586 587
	  active_tool = tool_manager_get_active (the_gimp);

588
	  gimp_tool_control_set_preserve (active_tool->control, TRUE);
Elliot Lee's avatar
Elliot Lee committed
589
	  image_map_abort (curves_dialog->image_map);
590
	  gimp_tool_control_set_preserve (active_tool->control, FALSE);
591

Elliot Lee's avatar
Elliot Lee committed
592 593
	  curves_dialog->image_map = NULL;
	}
594

595 596
      gtk_widget_destroy (curves_dialog->shell);

Elliot Lee's avatar
Elliot Lee committed
597
      if (curves_dialog->pixmap)
598
	g_object_unref (curves_dialog->pixmap);
599

600 601 602 603 604 605 606 607 608 609
      if (curves_dialog->cursor_layout)
        g_object_unref (curves_dialog->cursor_layout);
      if (curves_dialog->xpos_layout)
        g_object_unref (curves_dialog->xpos_layout);

      if (curves_dialog->lut)
        gimp_lut_free (curves_dialog->lut);

      g_free (curves_dialog);
      curves_dialog = NULL;
Elliot Lee's avatar
Elliot Lee committed
610 611 612
    }
}

613 614 615
/*******************/
/*  Curves dialog  */
/*******************/
Elliot Lee's avatar
Elliot Lee committed
616

617
static CurvesDialog *
618
curves_dialog_new (void)
Elliot Lee's avatar
Elliot Lee committed
619 620 621 622
{
  CurvesDialog *cd;
  GtkWidget *vbox;
  GtkWidget *hbox;
623
  GtkWidget *hbbox;
Elliot Lee's avatar
Elliot Lee committed
624 625 626 627 628
  GtkWidget *label;
  GtkWidget *frame;
  GtkWidget *toggle;
  GtkWidget *channel_hbox;
  GtkWidget *table;
629
  GtkWidget *button;
630
  gint i, j;
631

632
  cd = g_new (CurvesDialog, 1);
633 634 635 636 637
  cd->preview       = TRUE;
  cd->pixmap        = NULL;
  cd->xpos_layout   = NULL;
  cd->cursor_layout = NULL;
  cd->channel       = GIMP_HISTOGRAM_VALUE;
638 639 640 641

  for (i = 0; i < 5; i++)
    cd->curve_type[i] = SMOOTH;

642 643 644
  for (i = 0; i < 5; i++)
    for (j = 0; j < 256; j++)
      cd->curve[i][j] = j;
BST 1999 Andy Thomas's avatar
BST 1999 Andy Thomas committed
645

646
  for (i = 0; i < (sizeof (cd->col_value) / sizeof (cd->col_value[0])); i++)
BST 1999 Andy Thomas's avatar
BST 1999 Andy Thomas committed
647 648
    cd->col_value[i] = 0;

649
  cd->lut = gimp_lut_new ();
Elliot Lee's avatar
Elliot Lee committed
650 651

  /*  The shell and main vbox  */
652
  cd->shell = gimp_dialog_new (_("Curves"), "curves",
Michael Natterer's avatar
Michael Natterer committed
653
			       tool_manager_help_func, NULL,
654 655 656
			       GTK_WIN_POS_NONE,
			       FALSE, TRUE, FALSE,

657
			       GIMP_STOCK_RESET, curves_reset_callback,
658
			       cd, NULL, NULL, FALSE, FALSE,
659

660
			       GTK_STOCK_CANCEL, curves_cancel_callback,
661
			       cd, NULL, NULL, FALSE, TRUE,
662

663 664 665
			       GTK_STOCK_OK, curves_ok_callback,
			       cd, NULL, NULL, TRUE, FALSE,

666
			       NULL);
Elliot Lee's avatar
Elliot Lee committed
667

668 669
  vbox = gtk_vbox_new (FALSE, 4);
  gtk_container_set_border_width (GTK_CONTAINER (vbox), 4);
670
  gtk_container_add (GTK_CONTAINER (GTK_DIALOG (cd->shell)->vbox), vbox);
Elliot Lee's avatar
Elliot Lee committed
671 672

  /*  The option menu for selecting channels  */
673
  channel_hbox = gtk_hbox_new (FALSE, 4);
Elliot Lee's avatar
Elliot Lee committed
674 675
  gtk_box_pack_start (GTK_BOX (vbox), channel_hbox, FALSE, FALSE, 0);

676
  label = gtk_label_new (_("Modify Curves for Channel:"));
Elliot Lee's avatar
Elliot Lee committed
677 678
  gtk_box_pack_start (GTK_BOX (channel_hbox), label, FALSE, FALSE, 0);

679 680 681 682
  cd->channel_menu = 
    gimp_enum_option_menu_new (GIMP_TYPE_HISTOGRAM_CHANNEL,
                               G_CALLBACK (curves_channel_callback),
                               cd);
Elliot Lee's avatar
Elliot Lee committed
683 684 685 686 687 688 689 690
  gtk_box_pack_start (GTK_BOX (channel_hbox), cd->channel_menu, FALSE, FALSE, 2);

  gtk_widget_show (label);
  gtk_widget_show (cd->channel_menu);
  gtk_widget_show (channel_hbox);

  /*  The table for the yrange and the graph  */
  table = gtk_table_new (2, 2, FALSE);
691 692
  gtk_table_set_col_spacings (GTK_TABLE (table), 2);
  gtk_table_set_row_spacings (GTK_TABLE (table), 2);
Elliot Lee's avatar
Elliot Lee committed
693 694 695 696 697 698 699 700
  gtk_box_pack_start (GTK_BOX (vbox), table, FALSE, FALSE, 0);

  /*  The range drawing area  */
  frame = gtk_frame_new (NULL);
  gtk_frame_set_shadow_type (GTK_FRAME (frame), GTK_SHADOW_ETCHED_IN);
  gtk_table_attach (GTK_TABLE (table), frame, 0, 1, 0, 1,
		    GTK_EXPAND, GTK_EXPAND, 0, 0);

701
  cd->yrange = gtk_preview_new (GTK_PREVIEW_COLOR);
Elliot Lee's avatar
Elliot Lee committed
702 703
  gtk_preview_size (GTK_PREVIEW (cd->yrange), YRANGE_WIDTH, YRANGE_HEIGHT);
  gtk_widget_set_events (cd->yrange, RANGE_MASK);
704 705
  gtk_container_add (GTK_CONTAINER (frame), cd->yrange);

706 707 708
  g_signal_connect (G_OBJECT (cd->yrange), "event",
		    G_CALLBACK (curves_yrange_events),
		    cd);
709

Elliot Lee's avatar
Elliot Lee committed
710 711 712 713 714 715 716
  gtk_widget_show (cd->yrange);
  gtk_widget_show (frame);

  /*  The curves graph  */
  frame = gtk_frame_new (NULL);
  gtk_frame_set_shadow_type (GTK_FRAME (frame), GTK_SHADOW_ETCHED_IN);
  gtk_table_attach (GTK_TABLE (table), frame, 1, 2, 0, 1,
717 718
		    GTK_SHRINK | GTK_FILL,
		    GTK_SHRINK | GTK_FILL, 0, 0);
Elliot Lee's avatar
Elliot Lee committed
719 720

  cd->graph = gtk_drawing_area_new ();
721 722 723
  gtk_widget_set_size_request (cd->graph,
                               GRAPH_WIDTH + RADIUS * 2,
                               GRAPH_HEIGHT + RADIUS * 2);
Elliot Lee's avatar
Elliot Lee committed
724
  gtk_widget_set_events (cd->graph, GRAPH_MASK);
725 726
  gtk_container_add (GTK_CONTAINER (frame), cd->graph);

727 728 729
  g_signal_connect (G_OBJECT (cd->graph), "event",
		    G_CALLBACK (curves_graph_events),
		    cd);
730

Elliot Lee's avatar
Elliot Lee committed
731 732 733 734 735 736 737 738 739
  gtk_widget_show (cd->graph);
  gtk_widget_show (frame);

  /*  The range drawing area  */
  frame = gtk_frame_new (NULL);
  gtk_frame_set_shadow_type (GTK_FRAME (frame), GTK_SHADOW_ETCHED_IN);
  gtk_table_attach (GTK_TABLE (table), frame, 1, 2, 1, 2,
		    GTK_EXPAND, GTK_EXPAND, 0, 0);

740
  cd->xrange = gtk_preview_new (GTK_PREVIEW_COLOR);
Elliot Lee's avatar
Elliot Lee committed
741 742
  gtk_preview_size (GTK_PREVIEW (cd->xrange), XRANGE_WIDTH, XRANGE_HEIGHT);
  gtk_widget_set_events (cd->xrange, RANGE_MASK);
743 744
  gtk_container_add (GTK_CONTAINER (frame), cd->xrange);

745 746 747
  g_signal_connect (G_OBJECT (cd->xrange), "event",
		    G_CALLBACK (curves_xrange_events),
		    cd);
748

Elliot Lee's avatar
Elliot Lee committed
749 750 751 752 753
  gtk_widget_show (cd->xrange);
  gtk_widget_show (frame);
  gtk_widget_show (table);

  /*  Horizontal box for preview  */
754
  hbox = gtk_hbox_new (FALSE, 4);
755
  gtk_box_pack_end (GTK_BOX (vbox), hbox, FALSE, FALSE, 0);
Elliot Lee's avatar
Elliot Lee committed
756 757

  /*  The option menu for selecting the drawing method  */
758
  label = gtk_label_new (_("Curve Type:"));
Elliot Lee's avatar
Elliot Lee committed
759
  gtk_box_pack_start (GTK_BOX (hbox), label, FALSE, FALSE, 0);
760
  gtk_widget_show (label);
Elliot Lee's avatar
Elliot Lee committed
761

762 763
  cd->curve_type_menu = gimp_option_menu_new
    (FALSE,
Elliot Lee's avatar
Elliot Lee committed
764

765 766 767 768 769
     _("Smooth"), curves_smooth_callback, cd, NULL, NULL, TRUE,
     _("Free"),   curves_free_callback,   cd, NULL, NULL, FALSE,

     NULL);
  gtk_box_pack_start (GTK_BOX (hbox), cd->curve_type_menu, FALSE, FALSE, 2);
770
  gtk_widget_show (cd->curve_type_menu);
771

Elliot Lee's avatar
Elliot Lee committed
772 773 774
  gtk_widget_show (hbox);

  /*  The preview toggle  */
775
  toggle = gtk_check_button_new_with_label (_("Preview"));
776
  gtk_toggle_button_set_active (GTK_TOGGLE_BUTTON (toggle), cd->preview);
777 778
  gtk_box_pack_end (GTK_BOX (hbox), toggle, FALSE, FALSE, 0);

779 780 781
  g_signal_connect (G_OBJECT (toggle), "toggled",
		    G_CALLBACK (curves_preview_update),
		    cd);
Elliot Lee's avatar
Elliot Lee committed
782 783 784 785

  gtk_widget_show (toggle);
  gtk_widget_show (hbox);

786 787
  /*  Horizontal button box for load / save  */
  hbbox = gtk_hbutton_box_new ();
788
  gtk_box_set_spacing (GTK_BOX (hbbox), 4);
789 790 791 792 793 794 795 796
  gtk_button_box_set_layout (GTK_BUTTON_BOX (hbbox), GTK_BUTTONBOX_SPREAD);
  gtk_box_pack_end (GTK_BOX (vbox), hbbox, FALSE, FALSE, 0);

  button = gtk_button_new_with_label (_("Load"));
  GTK_WIDGET_SET_FLAGS (button, GTK_CAN_DEFAULT);
  gtk_box_pack_start (GTK_BOX (hbbox), button, FALSE, FALSE, 0);
  gtk_widget_show (button);

797 798 799 800
  g_signal_connect (G_OBJECT (button), "clicked",
		    G_CALLBACK (curves_load_callback),
		    cd->shell);

801 802 803 804 805
  button = gtk_button_new_with_label (_("Save"));
  GTK_WIDGET_SET_FLAGS (button, GTK_CAN_DEFAULT);
  gtk_box_pack_start (GTK_BOX (hbbox), button, FALSE, FALSE, 0);
  gtk_widget_show (button);

806 807 808 809
  g_signal_connect (G_OBJECT (button), "clicked",
		    G_CALLBACK (curves_save_callback),
		    cd->shell);

810
  gtk_widget_show (hbbox);
Elliot Lee's avatar
Elliot Lee committed
811 812 813 814 815
  gtk_widget_show (vbox);

  return cd;
}

816 817 818 819 820 821 822
static void
curves_dialog_hide (void)
{
  if (curves_dialog)
    curves_cancel_callback (NULL, (gpointer) curves_dialog);
}

823
static void
824 825 826
curve_print_loc (CurvesDialog *cd,
		 gint          xpos,
		 gint          ypos)
827
{
828
  gchar buf[32];
829

830
  if (!cd->cursor_layout)
831
    {
832 833 834 835
      cd->cursor_layout = gtk_widget_create_pango_layout (cd->graph,
                                                          "x:888 y:888");
      pango_layout_get_pixel_extents (cd->cursor_layout, 
                                      NULL, &cd->cursor_rect);
836 837
    }
  
838
  if (xpos >= 0 && xpos <= 255 && ypos >=0 && ypos <= 255)
839 840 841
    {
      gdk_draw_rectangle (cd->graph->window, 
			  cd->graph->style->bg_gc[GTK_STATE_ACTIVE],
842 843 844 845 846
			  TRUE, 
                          RADIUS*2 + 2, 
                          RADIUS*2 + 2, 
			  cd->cursor_rect.width  + 4,
			  cd->cursor_rect.height + 5);
847 848 849

      gdk_draw_rectangle (cd->graph->window, 
			  cd->graph->style->black_gc,
850 851 852 853 854 855 856 857 858 859 860 861 862
			  FALSE, 
                          RADIUS*2 + 2, 
                          RADIUS*2 + 2, 
			  cd->cursor_rect.width  + 3, 
			  cd->cursor_rect.height + 4);
      
      g_snprintf (buf, sizeof (buf), "x:%3d y:%3d",xpos, ypos);
      pango_layout_set_text (cd->cursor_layout, buf, 11);
      gdk_draw_layout (cd->graph->window, 
                       cd->graph->style->black_gc,
		       RADIUS*2 + 4 + cd->cursor_rect.x,
		       RADIUS*2 + 5 + cd->cursor_rect.y,
		       cd->cursor_layout);
863 864 865
    }
}

866
/* TODO: preview alpha channel stuff correctly.  -- austin, 20/May/99 */
Elliot Lee's avatar
Elliot Lee committed
867 868
static void
curves_update (CurvesDialog *cd,
869
	       gint          update)
Elliot Lee's avatar
Elliot Lee committed
870
{
871 872 873 874 875
  gint  i, j;
  gchar buf[32];
  gint  offset;
  gint  height;
  gint  sel_channel;
876
  
877 878 879 880 881 882 883 884 885 886 887
  if (cd->color)
    {
      sel_channel = cd->channel;
    } 
  else 
    {
      if (cd->channel == 2)
        sel_channel = GIMP_HISTOGRAM_ALPHA;
      else
        sel_channel = GIMP_HISTOGRAM_VALUE;
    }
888

Elliot Lee's avatar
Elliot Lee committed
889 890
  if (update & XRANGE_TOP)
    {
891
      guchar buf[XRANGE_WIDTH * 3];
892

893
      switch (sel_channel)
894
	{
Michael Natterer's avatar
Michael Natterer committed
895 896
	case GIMP_HISTOGRAM_VALUE:
	case GIMP_HISTOGRAM_ALPHA:
897
	  for (i = 0; i < XRANGE_HEIGHT / 2; i++)
898
	    {
899
	      for (j = 0; j < XRANGE_WIDTH ; j++)
900
		{
901 902 903
		  buf[j*3+0] = cd->curve[sel_channel][j];
		  buf[j*3+1] = cd->curve[sel_channel][j];
		  buf[j*3+2] = cd->curve[sel_channel][j];
904
		}
905 906
	      gtk_preview_draw_row (GTK_PREVIEW (cd->xrange),
				    buf, 0, i, XRANGE_WIDTH);
907
	    }
908 909
	  break;

Michael Natterer's avatar
Michael Natterer committed
910 911 912
	case GIMP_HISTOGRAM_RED:
	case GIMP_HISTOGRAM_GREEN:
	case GIMP_HISTOGRAM_BLUE:
913
	  {
914
	    for (i = 0; i < XRANGE_HEIGHT / 2; i++)
915
	      {
916 917
		for (j = 0; j < XRANGE_WIDTH; j++)
		  {
Michael Natterer's avatar
Michael Natterer committed
918 919 920
		    buf[j*3+0] = cd->curve[GIMP_HISTOGRAM_RED][j];
		    buf[j*3+1] = cd->curve[GIMP_HISTOGRAM_GREEN][j];
		    buf[j*3+2] = cd->curve[GIMP_HISTOGRAM_BLUE][j];
921 922 923
		  }
		gtk_preview_draw_row (GTK_PREVIEW (cd->xrange),
				      buf, 0, i, XRANGE_WIDTH);
924
	      }
925
	    break;
926 927
	  }

928
	default:
929 930 931
	  g_warning ("unknown channel type %d, can't happen!?!?",
		     cd->channel);
	  break;
932
	}
Elliot Lee's avatar
Elliot Lee committed
933 934 935

      if (update & DRAW)
	{
936 937 938
	  gtk_widget_queue_draw_area (cd->xrange,
                                      0, 0,
                                      XRANGE_WIDTH, XRANGE_HEIGHT / 2);
Elliot Lee's avatar
Elliot Lee committed
939 940 941 942
	}
    }
  if (update & XRANGE_BOTTOM)
    {
943
      guchar buf[XRANGE_WIDTH * 3];
Elliot Lee's avatar
Elliot Lee committed
944 945

      for (i = 0; i < XRANGE_WIDTH; i++)
946 947 948 949 950
      {
	buf[i*3+0] = i;
	buf[i*3+1] = i;
	buf[i*3+2] = i;
      }
Elliot Lee's avatar
Elliot Lee committed
951 952 953 954 955 956

      for (i = XRANGE_HEIGHT / 2; i < XRANGE_HEIGHT; i++)
	gtk_preview_draw_row (GTK_PREVIEW (cd->xrange), buf, 0, i, XRANGE_WIDTH);

      if (update & DRAW)
	{
957 958 959
	  gtk_widget_queue_draw_area (cd->xrange,
                                      0, XRANGE_HEIGHT / 2,
                                      XRANGE_WIDTH, XRANGE_HEIGHT / 2);
Elliot Lee's avatar
Elliot Lee committed
960 961 962 963
	}
    }
  if (update & YRANGE)
    {
964 965
      guchar buf[YRANGE_WIDTH * 3];
      guchar pix[3];
Elliot Lee's avatar
Elliot Lee committed
966 967 968

      for (i = 0; i < YRANGE_HEIGHT; i++)
	{
969
	  switch (sel_channel)
970
	    {
Michael Natterer's avatar
Michael Natterer committed
971 972
	    case GIMP_HISTOGRAM_VALUE:
	    case GIMP_HISTOGRAM_ALPHA:
973 974 975
	      pix[0] = pix[1] = pix[2] = (255 - i);
	      break;

Michael Natterer's avatar
Michael Natterer committed
976 977 978
	    case GIMP_HISTOGRAM_RED:
	    case GIMP_HISTOGRAM_GREEN:
	    case GIMP_HISTOGRAM_BLUE:
979
	      pix[0] = pix[1] = pix[2] = 0;
980
	      pix[sel_channel - 1] = (255 - i);
981 982
	      break;

983
	    default:
984 985 986
	      g_warning ("unknown channel type %d, can't happen!?!?",
			 cd->channel);
	      break;
987
	    }
988 989

	  for (j = 0; j < YRANGE_WIDTH * 3; j++)
990
	    buf[j] = pix[j%3];
Elliot Lee's avatar
Elliot Lee committed
991

992 993
	  gtk_preview_draw_row (GTK_PREVIEW (cd->yrange),
				buf, 0, i, YRANGE_WIDTH);
Elliot Lee's avatar
Elliot Lee committed
994 995 996
	}

      if (update & DRAW)
997
	gtk_widget_queue_draw (cd->yrange);
Elliot Lee's avatar
Elliot Lee committed
998 999 1000 1001 1002 1003 1004
    }
  if ((update & GRAPH) && (update & DRAW) && cd->pixmap != NULL)
    {
      GdkPoint points[256];

      /*  Clear the pixmap  */
      gdk_draw_rectangle (cd->pixmap, cd->graph->style->bg_gc[GTK_STATE_NORMAL],
1005 1006
			  TRUE, 0, 0,
			  GRAPH_WIDTH + RADIUS * 2, GRAPH_HEIGHT + RADIUS * 2);
Elliot Lee's avatar
Elliot Lee committed
1007 1008 1009 1010 1011 1012 1013 1014 1015 1016 1017 1018 1019 1020 1021 1022 1023 1024 1025 1026 1027

      /*  Draw the grid lines  */
      for (i = 0; i < 5; i++)
	{
	  gdk_draw_line (cd->pixmap, cd->graph->style->dark_gc[GTK_STATE_NORMAL],
			 RADIUS, i * (GRAPH_HEIGHT / 4) + RADIUS,
			 GRAPH_WIDTH + RADIUS, i * (GRAPH_HEIGHT / 4) + RADIUS);
	  gdk_draw_line (cd->pixmap, cd->graph->style->dark_gc[GTK_STATE_NORMAL],
			 i * (GRAPH_WIDTH / 4) + RADIUS, RADIUS,
			 i * (GRAPH_WIDTH / 4) + RADIUS, GRAPH_HEIGHT + RADIUS);
	}

      /*  Draw the curve  */
      for (i = 0; i < 256; i++)
	{
	  points[i].x = i + RADIUS;
	  points[i].y = 255 - cd->curve[cd->channel][i] + RADIUS;
	}
      gdk_draw_points (cd->pixmap, cd->graph->style->black_gc, points, 256);

      /*  Draw the points  */
1028
      if (cd->curve_type[cd->channel] == SMOOTH)
Elliot Lee's avatar
Elliot Lee committed
1029 1030 1031 1032 1033 1034 1035 1036 1037
	for (i = 0; i < 17; i++)
	  {
	    if (cd->points[cd->channel][i][0] != -1)
	      gdk_draw_arc (cd->pixmap, cd->graph->style->black_gc, TRUE,
			    cd->points[cd->channel][i][0],
			    255 - cd->points[cd->channel][i][1],
			    RADIUS * 2, RADIUS * 2, 0, 23040);
	  }

1038
      /* draw the color line */
1039
      gdk_draw_line (cd->pixmap, cd->graph->style->black_gc,
1040 1041
		     cd->col_value[sel_channel]+RADIUS,RADIUS,
		     cd->col_value[sel_channel]+RADIUS,GRAPH_HEIGHT + RADIUS);
BST 1999 Andy Thomas's avatar
BST 1999 Andy Thomas committed
1042

1043
      /* and xpos indicator */
1044
      g_snprintf (buf, sizeof (buf), "x:%d",cd->col_value[sel_channel]);
1045 1046 1047 1048 1049 1050

      if (!cd->xpos_layout)
        cd->xpos_layout = gtk_widget_create_pango_layout (cd->graph, buf);
      else
        pango_layout_set_text (cd->xpos_layout, buf, -1);

1051
      if ((cd->col_value[sel_channel]+RADIUS) < 127)
1052 1053 1054 1055 1056
	{
	  offset = RADIUS + 4;
	}
      else
	{
1057 1058
          pango_layout_get_pixel_size (cd->xpos_layout, &offset, &height);
          offset = - (offset + 2);
1059 1060
	}

1061
      gdk_draw_layout (cd->pixmap,
1062
		       cd->graph->style->black_gc,
1063 1064 1065 1066 1067 1068 1069 1070 1071 1072
		       cd->col_value[sel_channel] + offset,
		       GRAPH_HEIGHT - height - 2,
		       cd->xpos_layout);

      gdk_draw_drawable (cd->graph->window, 
                         cd->graph->style->black_gc, 
                         cd->pixmap,
			 0, 0, 
                         0, 0, 
                         GRAPH_WIDTH + RADIUS * 2, GRAPH_HEIGHT + RADIUS * 2);