gimpcurvestool.c 40.4 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 "libgimpcolor/gimpcolor.h"
36
#include "libgimpwidgets/gimpwidgets.h"
37

38
#include "tools-types.h"
Michael Natterer's avatar
Michael Natterer committed
39

40 41
#include "config/gimpbaseconfig.h"

42
#include "base/curves.h"
Michael Natterer's avatar
Michael Natterer committed
43 44 45
#include "base/gimphistogram.h"
#include "base/gimplut.h"

46
#include "core/gimp.h"
Michael Natterer's avatar
Michael Natterer committed
47
#include "core/gimpdrawable.h"
48
#include "core/gimpdrawable-histogram.h"
Michael Natterer's avatar
Michael Natterer committed
49
#include "core/gimpimage.h"
50
#include "core/gimpimagemap.h"
51
#include "core/gimptoolinfo.h"
Michael Natterer's avatar
Michael Natterer committed
52 53

#include "widgets/gimpcursor.h"
54
#include "widgets/gimpenummenu.h"
55
#include "widgets/gimphelp-ids.h"
56
#include "widgets/gimphistogramview.h"
Michael Natterer's avatar
Michael Natterer committed
57

58 59
#include "display/gimpdisplay.h"

60
#include "gimpcoloroptions.h"
Michael Natterer's avatar
Michael Natterer committed
61
#include "gimpcurvestool.h"
62
#include "gimptoolcontrol.h"
Sven Neumann's avatar
Sven Neumann committed
63

64
#include "gimp-intl.h"
65

66

67 68 69 70
#define XRANGE_TOP     (1 << 0)
#define XRANGE_BOTTOM  (1 << 1)
#define YRANGE         (1 << 2)
#define ALL            (XRANGE_TOP | XRANGE_BOTTOM | YRANGE)
Elliot Lee's avatar
Elliot Lee committed
71

72
/*  NB: take care when changing these values: make sure the curve[] array in
73
 *  base/curves.h is large enough.
74
 */
75 76 77
#define GRAPH_WIDTH    256
#define GRAPH_HEIGHT   256
#define XRANGE_WIDTH   256
78 79
#define XRANGE_HEIGHT   12
#define YRANGE_WIDTH    12
80
#define YRANGE_HEIGHT  256
Elliot Lee's avatar
Elliot Lee committed
81 82 83
#define RADIUS           3
#define MIN_DISTANCE     8

84 85 86 87 88
#define GRAPH_MASK  (GDK_EXPOSURE_MASK       | \
                     GDK_LEAVE_NOTIFY_MASK   | \
		     GDK_POINTER_MOTION_MASK | \
		     GDK_BUTTON_PRESS_MASK   | \
		     GDK_BUTTON_RELEASE_MASK)
Elliot Lee's avatar
Elliot Lee committed
89 90


Michael Natterer's avatar
Michael Natterer committed
91 92 93
/*  local function prototypes  */

static void   gimp_curves_tool_class_init     (GimpCurvesToolClass *klass);
94 95 96 97 98 99 100 101 102 103 104 105
static void   gimp_curves_tool_init           (GimpCurvesTool      *c_tool);

static void   gimp_curves_tool_finalize       (GObject          *object);

static void   gimp_curves_tool_initialize     (GimpTool         *tool,
					       GimpDisplay      *gdisp);
static void   gimp_curves_tool_button_release (GimpTool         *tool,
                                               GimpCoords       *coords,
                                               guint32           time,
					       GdkModifierType   state,
					       GimpDisplay      *gdisp);

106 107 108 109
static void   gimp_curves_tool_color_picked   (GimpColorTool    *color_tool,
					       GimpImageType     sample_type,
					       GimpRGB          *color,
					       gint              color_index);
110 111 112 113 114 115 116 117 118 119 120 121 122
static void   gimp_curves_tool_map            (GimpImageMapTool *image_map_tool);
static void   gimp_curves_tool_dialog         (GimpImageMapTool *image_map_tool);
static void   gimp_curves_tool_reset          (GimpImageMapTool *image_map_tool);

static void   curves_add_point                (GimpCurvesTool   *c_tool,
					       gint              x,
					       gint              y,
					       gint              cchan);

static void   curves_update                   (GimpCurvesTool   *c_tool,
                                               gint              update);

static void   curves_channel_callback         (GtkWidget        *widget,
123
                                               GimpCurvesTool   *c_tool);
124
static void   curves_channel_reset_callback   (GtkWidget        *widget,
125
                                               GimpCurvesTool   *c_tool);
126

127
static gboolean curves_set_sensitive_callback (GimpHistogramChannel channel,
128
                                               GimpCurvesTool   *c_tool);
129
static void   curves_curve_type_callback      (GtkWidget        *widget,
130
                                               GimpCurvesTool   *c_tool);
131
static void   curves_load_callback            (GtkWidget        *widget,
132
                                               GimpCurvesTool   *c_tool);
133
static void   curves_save_callback            (GtkWidget        *widget,
134
                                               GimpCurvesTool   *c_tool);
135
static gboolean curves_graph_events           (GtkWidget        *widget,
136 137
                                               GdkEvent         *event,
                                               GimpCurvesTool   *c_tool);
138 139
static gboolean curves_graph_expose           (GtkWidget        *widget,
                                               GdkEventExpose   *eevent,
140
                                               GimpCurvesTool   *c_tool);
141 142

static void       file_dialog_create          (GimpCurvesTool   *c_tool);
143 144 145
static void       file_dialog_response        (GtkWidget        *dialog,
                                               gint              response_id,
                                               GimpCurvesTool   *c_tool);
146 147 148 149 150 151

static gboolean   curves_read_from_file       (GimpCurvesTool   *c_tool,
                                               FILE             *file);
static void       curves_write_to_file        (GimpCurvesTool   *c_tool,
                                               FILE             *file);

Michael Natterer's avatar
Michael Natterer committed
152

153 154
static GimpImageMapToolClass *parent_class = NULL;

Michael Natterer's avatar
Michael Natterer committed
155

156
/*  public functions  */
Michael Natterer's avatar
Michael Natterer committed
157 158

void
Nate Summers's avatar
Nate Summers committed
159
gimp_curves_tool_register (GimpToolRegisterCallback  callback,
160
                           gpointer                  data)
Michael Natterer's avatar
Michael Natterer committed
161
{
Nate Summers's avatar
Nate Summers committed
162
  (* callback) (GIMP_TYPE_CURVES_TOOL,
163 164
                GIMP_TYPE_COLOR_OPTIONS,
                gimp_color_options_gui,
165
                0,
166
                "gimp-curves-tool",
167 168
                _("Curves"),
                _("Adjust color curves"),
169
                N_("/Tools/Color Tools/_Curves..."), NULL,
170
                NULL, GIMP_HELP_TOOL_CURVES,
Nate Summers's avatar
Nate Summers committed
171
                GIMP_STOCK_TOOL_CURVES,
172
                data);
Michael Natterer's avatar
Michael Natterer committed
173 174
}

175
GType
Michael Natterer's avatar
Michael Natterer committed
176 177
gimp_curves_tool_get_type (void)
{
178
  static GType tool_type = 0;
Michael Natterer's avatar
Michael Natterer committed
179 180 181

  if (! tool_type)
    {
182
      static const GTypeInfo tool_info =
Michael Natterer's avatar
Michael Natterer committed
183 184
      {
        sizeof (GimpCurvesToolClass),
185 186 187 188 189 190 191 192
	(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
193 194
      };

195
      tool_type = g_type_register_static (GIMP_TYPE_IMAGE_MAP_TOOL,
196
					  "GimpCurvesTool",
197
                                          &tool_info, 0);
Michael Natterer's avatar
Michael Natterer committed
198 199 200 201 202
    }

  return tool_type;
}

203 204 205

/*  private functions  */

Michael Natterer's avatar
Michael Natterer committed
206 207 208
static void
gimp_curves_tool_class_init (GimpCurvesToolClass *klass)
{
209 210
  GObjectClass          *object_class;
  GimpToolClass         *tool_class;
211
  GimpColorToolClass    *color_tool_class;
212
  GimpImageMapToolClass *image_map_tool_class;
Michael Natterer's avatar
Michael Natterer committed
213

214 215
  object_class         = G_OBJECT_CLASS (klass);
  tool_class           = GIMP_TOOL_CLASS (klass);
216
  color_tool_class     = GIMP_COLOR_TOOL_CLASS (klass);
217
  image_map_tool_class = GIMP_IMAGE_MAP_TOOL_CLASS (klass);
Michael Natterer's avatar
Michael Natterer committed
218

219
  parent_class = g_type_class_peek_parent (klass);
Michael Natterer's avatar
Michael Natterer committed
220

221
  object_class->finalize       = gimp_curves_tool_finalize;
222

223 224 225 226
  tool_class->initialize       = gimp_curves_tool_initialize;
  tool_class->button_release   = gimp_curves_tool_button_release;

  color_tool_class->picked     = gimp_curves_tool_color_picked;
227 228 229 230

  image_map_tool_class->map    = gimp_curves_tool_map;
  image_map_tool_class->dialog = gimp_curves_tool_dialog;
  image_map_tool_class->reset  = gimp_curves_tool_reset;
Michael Natterer's avatar
Michael Natterer committed
231 232 233
}

static void
234
gimp_curves_tool_init (GimpCurvesTool *c_tool)
Michael Natterer's avatar
Michael Natterer committed
235
{
236
  GimpImageMapTool *image_map_tool = GIMP_IMAGE_MAP_TOOL (c_tool);
237 238
  gint              i;

239
  image_map_tool->shell_desc = _("Adjust Color Curves");
240

241 242 243
  c_tool->curves  = g_new0 (Curves, 1);
  c_tool->lut     = gimp_lut_new ();
  c_tool->channel = GIMP_HISTOGRAM_VALUE;
244 245 246

  curves_init (c_tool->curves);

247
  for (i = 0; i < G_N_ELEMENTS (c_tool->col_value); i++)
248
    c_tool->col_value[i] = -1;
249 250 251

  c_tool->cursor_x = -1;
  c_tool->cursor_y = -1;
Michael Natterer's avatar
Michael Natterer committed
252 253 254
}

static void
255
gimp_curves_tool_finalize (GObject *object)
Michael Natterer's avatar
Michael Natterer committed
256
{
257
  GimpCurvesTool *c_tool = GIMP_CURVES_TOOL (object);
258 259

  if (c_tool->curves)
Michael Natterer's avatar
Michael Natterer committed
260
    {
261
      g_free (c_tool->curves);
262
      c_tool->curves = NULL;
Michael Natterer's avatar
Michael Natterer committed
263
    }
264
  if (c_tool->lut)
Michael Natterer's avatar
Michael Natterer committed
265
    {
266 267
      gimp_lut_free (c_tool->lut);
      c_tool->lut = NULL;
Michael Natterer's avatar
Michael Natterer committed
268
    }
269 270 271 272 273
  if (c_tool->hist)
    {
      gimp_histogram_free (c_tool->hist);
      c_tool->hist = NULL;
    }
274
  if (c_tool->cursor_layout)
Michael Natterer's avatar
Michael Natterer committed
275
    {
276 277
      g_object_unref (c_tool->cursor_layout);
      c_tool->cursor_layout = NULL;
Michael Natterer's avatar
Michael Natterer committed
278
    }
279 280 281 282 283
  if (c_tool->xpos_layout)
    {
      g_object_unref (c_tool->xpos_layout);
      c_tool->xpos_layout = NULL;
    }
Michael Natterer's avatar
Michael Natterer committed
284

285
  G_OBJECT_CLASS (parent_class)->finalize (object);
Michael Natterer's avatar
Michael Natterer committed
286 287 288
}

static void
289 290
gimp_curves_tool_initialize (GimpTool    *tool,
			     GimpDisplay *gdisp)
Michael Natterer's avatar
Michael Natterer committed
291
{
292
  GimpCurvesTool *c_tool = GIMP_CURVES_TOOL (tool);
293 294
  GimpDrawable   *drawable;

295 296 297 298
  drawable = gimp_image_active_drawable (gdisp->gimage);

  if (! drawable)
    return;
299

300
  if (gimp_drawable_is_indexed (drawable))
Michael Natterer's avatar
Michael Natterer committed
301
    {
302
      g_message (_("Curves for indexed layers cannot be adjusted."));
303 304
      return;
    }
Michael Natterer's avatar
Michael Natterer committed
305

306 307 308 309 310 311 312
  if (! c_tool->hist)
    {
      Gimp *gimp = GIMP_TOOL (c_tool)->tool_info->gimp;

      c_tool->hist = gimp_histogram_new (GIMP_BASE_CONFIG (gimp->config));
    }

313
  curves_init (c_tool->curves);
Michael Natterer's avatar
Michael Natterer committed
314

315 316 317 318 319 320 321 322
  c_tool->color   = gimp_drawable_is_rgb (drawable);
  c_tool->channel = GIMP_HISTOGRAM_VALUE;

  c_tool->grab_point = -1;
  c_tool->last       = 0;

  GIMP_TOOL_CLASS (parent_class)->initialize (tool, gdisp);

323 324 325 326
  /*  always pick colors  */
  gimp_color_tool_enable (GIMP_COLOR_TOOL (tool),
                          GIMP_COLOR_OPTIONS (tool->tool_info->tool_options));

327
  /* set the sensitivity of the channel menu based on the drawable type */
328 329 330
  gimp_int_option_menu_set_sensitive (GTK_OPTION_MENU (c_tool->channel_menu),
                                      (GimpIntOptionMenuSensitivityCallback) curves_set_sensitive_callback,
                                      c_tool);
331 332

  /* set the current selection */
333 334
  gimp_int_option_menu_set_history (GTK_OPTION_MENU (c_tool->channel_menu),
                                    c_tool->channel);
Michael Natterer's avatar
Michael Natterer committed
335

336
  curves_update (c_tool, ALL);
337 338 339 340

  gimp_drawable_calculate_histogram (drawable, c_tool->hist);
  gimp_histogram_view_set_histogram (GIMP_HISTOGRAM_VIEW (c_tool->graph),
                                     c_tool->hist);
Michael Natterer's avatar
Michael Natterer committed
341 342 343
}

static void
344 345 346 347 348
gimp_curves_tool_button_release (GimpTool        *tool,
                                 GimpCoords      *coords,
                                 guint32          time,
				 GdkModifierType  state,
				 GimpDisplay     *gdisp)
Michael Natterer's avatar
Michael Natterer committed
349
{
350
  GimpCurvesTool *c_tool = GIMP_CURVES_TOOL (tool);
351
  GimpDrawable   *drawable;
Michael Natterer's avatar
Michael Natterer committed
352

353
  drawable = gimp_image_active_drawable (gdisp->gimage);
Michael Natterer's avatar
Michael Natterer committed
354

355
  if (state & GDK_SHIFT_MASK)
Michael Natterer's avatar
Michael Natterer committed
356
    {
357
      curves_add_point (c_tool, coords->x, coords->y, c_tool->channel);
358
      curves_calculate_curve (c_tool->curves, c_tool->channel);
Michael Natterer's avatar
Michael Natterer committed
359
    }
360
  else if (state & GDK_CONTROL_MASK)
Michael Natterer's avatar
Michael Natterer committed
361
    {
362
      gint i;
363

364 365 366 367 368
      for (i = 0; i < 5; i++)
        {
          curves_add_point (c_tool, coords->x, coords->y, i);
          curves_calculate_curve (c_tool->curves, c_tool->channel);
        }
Michael Natterer's avatar
Michael Natterer committed
369 370
    }

371 372 373
  /*  chain up to halt the tool */
  GIMP_TOOL_CLASS (parent_class)->button_release (tool,
                                                  coords, time, state, gdisp);
Michael Natterer's avatar
Michael Natterer committed
374 375 376
}

static void
377 378 379 380
gimp_curves_tool_color_picked (GimpColorTool *color_tool,
			       GimpImageType  sample_type,
			       GimpRGB       *color,
			       gint           color_index)
Michael Natterer's avatar
Michael Natterer committed
381
{
382 383
  GimpCurvesTool *c_tool;
  GimpDrawable   *drawable;
384
  guchar          r, g, b, a;
Michael Natterer's avatar
Michael Natterer committed
385

386 387
  c_tool = GIMP_CURVES_TOOL (color_tool);
  drawable = GIMP_IMAGE_MAP_TOOL (c_tool)->drawable;
388

389
  gimp_rgba_get_uchar (color, &r, &g, &b, &a);
390

391 392 393
  c_tool->col_value[GIMP_HISTOGRAM_RED]   = r;
  c_tool->col_value[GIMP_HISTOGRAM_GREEN] = g;
  c_tool->col_value[GIMP_HISTOGRAM_BLUE]  = b;
394

395 396
  if (gimp_drawable_has_alpha (drawable))
    c_tool->col_value[GIMP_HISTOGRAM_ALPHA] = a;
397

398 399
  if (gimp_drawable_is_indexed (drawable))
    c_tool->col_value[GIMP_HISTOGRAM_ALPHA] = color_index;
400

401
  c_tool->col_value[GIMP_HISTOGRAM_VALUE] = MAX (MAX (r, g), b);
BST 1999 Andy Thomas's avatar
BST 1999 Andy Thomas committed
402

403
  gtk_widget_queue_draw (c_tool->graph);
404
}
BST 1999 Andy Thomas's avatar
BST 1999 Andy Thomas committed
405

406
static void
407 408 409 410
curves_add_point (GimpCurvesTool *c_tool,
		  gint            x,
		  gint            y,
		  gint            cchan)
411 412
{
  /* Add point onto the curve */
413 414 415 416
  gint closest_point = 0;
  gint distance;
  gint curvex;
  gint i;
417

418
  switch (c_tool->curves->curve_type[cchan])
419
    {
420
    case GIMP_CURVE_SMOOTH:
421
      curvex   = c_tool->col_value[cchan];
422
      distance = G_MAXINT;
423

424 425
      for (i = 0; i < 17; i++)
	{
426 427
	  if (c_tool->curves->points[cchan][i][0] != -1)
	    if (abs (curvex - c_tool->curves->points[cchan][i][0]) < distance)
428
	      {
429
		distance = abs (curvex - c_tool->curves->points[cchan][i][0]);
430 431 432
		closest_point = i;
	      }
	}
433

434 435
      if (distance > MIN_DISTANCE)
	closest_point = (curvex + 8) / 16;
436

437 438
      c_tool->curves->points[cchan][closest_point][0] = curvex;
      c_tool->curves->points[cchan][closest_point][1] = c_tool->curves->curve[cchan][curvex];
439
      break;
440

441
    case GIMP_CURVE_FREE:
442
      c_tool->curves->curve[cchan][x] = 255 - y;
443
      break;
444
    }
Elliot Lee's avatar
Elliot Lee committed
445 446
}

447 448
static void
gimp_curves_tool_map (GimpImageMapTool *image_map_tool)
Elliot Lee's avatar
Elliot Lee committed
449
{
450
  GimpCurvesTool *c_tool = GIMP_CURVES_TOOL (image_map_tool);
451

452
  gimp_lut_setup (c_tool->lut,
453 454 455
		  (GimpLutFunc) curves_lut_func,
                  c_tool->curves,
		  gimp_drawable_bytes (image_map_tool->drawable));
456

457 458 459
  gimp_image_map_apply (image_map_tool->image_map,
                        (GimpImageMapApplyFunc) gimp_lut_process_2,
                        c_tool->lut);
Elliot Lee's avatar
Elliot Lee committed
460 461
}

462

463 464 465
/*******************/
/*  Curves dialog  */
/*******************/
Elliot Lee's avatar
Elliot Lee committed
466

467 468
static void
gimp_curves_tool_dialog (GimpImageMapTool *image_map_tool)
Elliot Lee's avatar
Elliot Lee committed
469
{
470
  GimpCurvesTool *c_tool = GIMP_CURVES_TOOL (image_map_tool);
471
  GtkWidget      *hbox;
472
  GtkWidget      *vbox;
473 474
  GtkWidget      *hbbox;
  GtkWidget      *frame;
475
  GtkWidget      *menu;
476 477
  GtkWidget      *table;
  GtkWidget      *button;
478

479 480 481 482 483 484 485 486 487
  hbox = gtk_hbox_new (FALSE, 0);
  gtk_box_pack_start (GTK_BOX (image_map_tool->main_vbox), hbox,
                      FALSE, FALSE, 0);
  gtk_widget_show (hbox);

  vbox = gtk_vbox_new (FALSE, 4);
  gtk_box_pack_start (GTK_BOX (hbox), vbox, TRUE, FALSE, 0);
  gtk_widget_show (vbox);

488 489 490
  table = gtk_table_new (2, 2, FALSE);
  gtk_table_set_col_spacings (GTK_TABLE (table), 4);
  gtk_table_set_row_spacings (GTK_TABLE (table), 2);
491
  gtk_box_pack_start (GTK_BOX (vbox), table, FALSE, FALSE, 0);
492
  gtk_widget_show (table);
Elliot Lee's avatar
Elliot Lee committed
493

494 495
  /*  The option menu for selecting channels  */
  hbox = gtk_hbox_new (FALSE, 4);
496 497 498 499 500 501 502 503 504
  menu = gimp_enum_option_menu_new (GIMP_TYPE_HISTOGRAM_CHANNEL,
                                    G_CALLBACK (curves_channel_callback),
                                    c_tool);
  gimp_enum_option_menu_set_stock_prefix (GTK_OPTION_MENU (menu),
                                          "gimp-channel");
  gtk_box_pack_start (GTK_BOX (hbox), menu, FALSE, FALSE, 0);
  gtk_widget_show (menu);

  c_tool->channel_menu = menu;
505

506
  button = gtk_button_new_with_mnemonic (_("R_eset Channel"));
507 508
  gtk_box_pack_start (GTK_BOX (hbox), button, FALSE, FALSE, 0);
  gtk_widget_show (button);
509

510
  g_signal_connect (button, "clicked",
511 512
                    G_CALLBACK (curves_channel_reset_callback),
                    c_tool);
513

514 515 516
  gimp_table_attach_aligned (GTK_TABLE (table), 0, 0,
                             _("Modify Curves for Channel:"), 1.0, 0.5,
                             hbox, 1, FALSE);
Elliot Lee's avatar
Elliot Lee committed
517 518

  /*  The table for the yrange and the graph  */
519 520 521 522
  hbox = gtk_hbox_new (FALSE, 0);
  gtk_box_pack_start (GTK_BOX (vbox), hbox, FALSE, FALSE, 0);
  gtk_widget_show (hbox);

Elliot Lee's avatar
Elliot Lee committed
523
  table = gtk_table_new (2, 2, FALSE);
524 525
  gtk_table_set_col_spacings (GTK_TABLE (table), 2);
  gtk_table_set_row_spacings (GTK_TABLE (table), 2);
526
  gtk_box_pack_start (GTK_BOX (hbox), table, TRUE, FALSE, 0);
Elliot Lee's avatar
Elliot Lee committed
527 528 529

  /*  The range drawing area  */
  frame = gtk_frame_new (NULL);
530
  gtk_frame_set_shadow_type (GTK_FRAME (frame), GTK_SHADOW_IN);
Elliot Lee's avatar
Elliot Lee committed
531 532 533 534
  gtk_table_attach (GTK_TABLE (table), frame, 0, 1, 0, 1,
		    GTK_EXPAND, GTK_EXPAND, 0, 0);
  gtk_widget_show (frame);

535 536 537 538 539
  c_tool->yrange = gtk_preview_new (GTK_PREVIEW_COLOR);
  gtk_preview_size (GTK_PREVIEW (c_tool->yrange), YRANGE_WIDTH, YRANGE_HEIGHT);
  gtk_container_add (GTK_CONTAINER (frame), c_tool->yrange);
  gtk_widget_show (c_tool->yrange);

Elliot Lee's avatar
Elliot Lee committed
540 541
  /*  The curves graph  */
  frame = gtk_frame_new (NULL);
542
  gtk_frame_set_shadow_type (GTK_FRAME (frame), GTK_SHADOW_IN);
Elliot Lee's avatar
Elliot Lee committed
543
  gtk_table_attach (GTK_TABLE (table), frame, 1, 2, 0, 1,
544 545
		    GTK_SHRINK | GTK_FILL,
		    GTK_SHRINK | GTK_FILL, 0, 0);
546
  gtk_widget_show (frame);
Elliot Lee's avatar
Elliot Lee committed
547

548
  c_tool->graph = gimp_histogram_view_new (FALSE);
549 550
  gtk_widget_set_size_request (c_tool->graph,
                               GRAPH_WIDTH  + RADIUS * 2,
551
                               GRAPH_HEIGHT + RADIUS * 2);
552
  gtk_widget_set_events (c_tool->graph, GRAPH_MASK);
553 554 555 556 557
  g_object_set (c_tool->graph,
                "border-width", RADIUS,
                "subdivisions", 1,
                NULL);
  GIMP_HISTOGRAM_VIEW (c_tool->graph)->light_histogram = TRUE;
558 559
  gtk_container_add (GTK_CONTAINER (frame), c_tool->graph);
  gtk_widget_show (c_tool->graph);
560

561
  g_signal_connect (c_tool->graph, "event",
562
		    G_CALLBACK (curves_graph_events),
563
		    c_tool);
564 565 566
  g_signal_connect_after (c_tool->graph, "expose_event",
                          G_CALLBACK (curves_graph_expose),
                          c_tool);
Elliot Lee's avatar
Elliot Lee committed
567 568 569

  /*  The range drawing area  */
  frame = gtk_frame_new (NULL);
570
  gtk_frame_set_shadow_type (GTK_FRAME (frame), GTK_SHADOW_IN);
Elliot Lee's avatar
Elliot Lee committed
571 572 573 574
  gtk_table_attach (GTK_TABLE (table), frame, 1, 2, 1, 2,
		    GTK_EXPAND, GTK_EXPAND, 0, 0);
  gtk_widget_show (frame);

575 576 577 578
  c_tool->xrange = gtk_preview_new (GTK_PREVIEW_COLOR);
  gtk_preview_size (GTK_PREVIEW (c_tool->xrange), XRANGE_WIDTH, XRANGE_HEIGHT);
  gtk_container_add (GTK_CONTAINER (frame), c_tool->xrange);
  gtk_widget_show (c_tool->xrange);
579

580
  gtk_widget_show (table);
Elliot Lee's avatar
Elliot Lee committed
581

582 583 584
  hbox = gtk_hbox_new (FALSE, 6);
  gtk_box_pack_end (GTK_BOX (vbox), hbox, FALSE, FALSE, 0);
  gtk_widget_show (hbox);
585

586
  /*  Horizontal button box for load / save */
587
  frame = gtk_frame_new (_("All Channels"));
588
  gtk_box_pack_start (GTK_BOX (hbox), frame, FALSE, FALSE, 0);
589 590
  gtk_widget_show (frame);

591
  hbbox = gtk_hbutton_box_new ();
592
  gtk_container_set_border_width (GTK_CONTAINER (hbbox), 2);
593
  gtk_box_set_spacing (GTK_BOX (hbbox), 4);
594
  gtk_button_box_set_layout (GTK_BUTTON_BOX (hbbox), GTK_BUTTONBOX_SPREAD);
595
  gtk_container_add (GTK_CONTAINER (frame), hbbox);
596
  gtk_widget_show (hbbox);
597

598
  button = gtk_button_new_from_stock (GTK_STOCK_OPEN);
599 600
  GTK_WIDGET_SET_FLAGS (button, GTK_CAN_DEFAULT);
  gtk_box_pack_start (GTK_BOX (hbbox), button, FALSE, FALSE, 0);
601
  gimp_help_set_help_data (button, _("Read curves settings from file"), NULL);
602 603
  gtk_widget_show (button);

604
  g_signal_connect (button, "clicked",
605
		    G_CALLBACK (curves_load_callback),
606
		    c_tool);
607

608
  button = gtk_button_new_from_stock (GTK_STOCK_SAVE);
609 610
  GTK_WIDGET_SET_FLAGS (button, GTK_CAN_DEFAULT);
  gtk_box_pack_start (GTK_BOX (hbbox), button, FALSE, FALSE, 0);
611
  gimp_help_set_help_data (button, _("Save curves settings to file"), NULL);
612 613
  gtk_widget_show (button);

614
  g_signal_connect (button, "clicked",
615
		    G_CALLBACK (curves_save_callback),
616
		    c_tool);
617 618 619 620 621 622 623

  /*  The radio box for selecting the curve type  */
  frame = gtk_frame_new (_("Curve Type"));
  gtk_box_pack_end (GTK_BOX (hbox), frame, FALSE, FALSE, 0);
  gtk_widget_show (frame);

  hbox = gimp_enum_stock_box_new (GIMP_TYPE_CURVE_TYPE,
624
				  "gimp-curve", GTK_ICON_SIZE_MENU,
625 626 627 628 629 630 631 632 633
				  G_CALLBACK (curves_curve_type_callback),
				  c_tool,
				  &c_tool->curve_type);

  gtk_container_set_border_width (GTK_CONTAINER (hbox), 2);
  gtk_box_set_spacing (GTK_BOX (hbox), 4);

  gtk_container_add (GTK_CONTAINER (frame), hbox);
  gtk_widget_show (hbox);
Elliot Lee's avatar
Elliot Lee committed
634 635
}

636
static void
637
gimp_curves_tool_reset (GimpImageMapTool *image_map_tool)
638
{
639
  GimpCurvesTool       *c_tool = GIMP_CURVES_TOOL (image_map_tool);
640
  GimpHistogramChannel  channel;
641 642 643

  c_tool->grab_point = -1;

644 645 646 647
  for (channel =  GIMP_HISTOGRAM_VALUE;
       channel <= GIMP_HISTOGRAM_ALPHA;
       channel++)
    curves_channel_reset (c_tool->curves, channel);
648

649 650
  curves_update (c_tool, XRANGE_TOP);
  gtk_widget_queue_draw (c_tool->graph);
651 652
}

653

654
/* TODO: preview alpha channel stuff correctly.  -- austin, 20/May/99 */
Elliot Lee's avatar
Elliot Lee committed
655
static void
656 657
curves_update (GimpCurvesTool *c_tool,
	       gint            update)
Elliot Lee's avatar
Elliot Lee committed
658
{
659 660
  GimpHistogramChannel sel_channel;
  gint                 i, j;
661

662
  if (c_tool->color)
663
    {
664
      sel_channel = c_tool->channel;
665
    }
666
  else
667
    {
668
      if (c_tool->channel == 2)
669 670 671 672
        sel_channel = GIMP_HISTOGRAM_ALPHA;
      else
        sel_channel = GIMP_HISTOGRAM_VALUE;
    }
673

Elliot Lee's avatar
Elliot Lee committed
674 675
  if (update & XRANGE_TOP)
    {
676
      guchar buf[XRANGE_WIDTH * 3];
677

678
      switch (sel_channel)
679
	{
Michael Natterer's avatar
Michael Natterer committed
680 681
	case GIMP_HISTOGRAM_VALUE:
	case GIMP_HISTOGRAM_ALPHA:
682
	  for (i = 0; i < XRANGE_HEIGHT / 2; i++)
683
	    {
684
	      for (j = 0; j < XRANGE_WIDTH ; j++)
685
		{
686 687 688
		  buf[j * 3 + 0] = c_tool->curves->curve[sel_channel][j];
		  buf[j * 3 + 1] = c_tool->curves->curve[sel_channel][j];
		  buf[j * 3 + 2] = c_tool->curves->curve[sel_channel][j];
689
		}
690
	      gtk_preview_draw_row (GTK_PREVIEW (c_tool->xrange),
691
				    buf, 0, i, XRANGE_WIDTH);
692
	    }
693 694
	  break;

Michael Natterer's avatar
Michael Natterer committed
695 696 697
	case GIMP_HISTOGRAM_RED:
	case GIMP_HISTOGRAM_GREEN:
	case GIMP_HISTOGRAM_BLUE:
698
	  {
699
	    for (i = 0; i < XRANGE_HEIGHT / 2; i++)
700
	      {
701 702
		for (j = 0; j < XRANGE_WIDTH; j++)
		  {
703 704 705
		    buf[j * 3 + 0] = c_tool->curves->curve[GIMP_HISTOGRAM_RED][j];
		    buf[j * 3 + 1] = c_tool->curves->curve[GIMP_HISTOGRAM_GREEN][j];
		    buf[j * 3 + 2] = c_tool->curves->curve[GIMP_HISTOGRAM_BLUE][j];
706
		  }
707
		gtk_preview_draw_row (GTK_PREVIEW (c_tool->xrange),
708
				      buf, 0, i, XRANGE_WIDTH);
709
	      }
710
	    break;
711 712
	  }

713
	default:
714
	  g_warning ("unknown channel type %d, can't happen!?!?",
715
		     c_tool->channel);
716
	  break;
717
	}
Elliot Lee's avatar
Elliot Lee committed
718

719 720 721
      gtk_widget_queue_draw_area (c_tool->xrange,
                                  0, 0,
                                  XRANGE_WIDTH, XRANGE_HEIGHT / 2);
Elliot Lee's avatar
Elliot Lee committed
722
    }
723

Elliot Lee's avatar
Elliot Lee committed
724 725
  if (update & XRANGE_BOTTOM)
    {
726
      guchar buf[XRANGE_WIDTH * 3];
Elliot Lee's avatar
Elliot Lee committed
727 728

      for (i = 0; i < XRANGE_WIDTH; i++)
729 730 731 732 733
        {
          buf[i * 3 + 0] = i;
          buf[i * 3 + 1] = i;
          buf[i * 3 + 2] = i;
        }
Elliot Lee's avatar
Elliot Lee committed
734 735

      for (i = XRANGE_HEIGHT / 2; i < XRANGE_HEIGHT; i++)
736 737
	gtk_preview_draw_row (GTK_PREVIEW (c_tool->xrange),
                              buf, 0, i, XRANGE_WIDTH);
Elliot Lee's avatar
Elliot Lee committed
738

739 740 741
      gtk_widget_queue_draw_area (c_tool->xrange,
                                  0, XRANGE_HEIGHT / 2,
                                  XRANGE_WIDTH, XRANGE_HEIGHT / 2);
Elliot Lee's avatar
Elliot Lee committed
742
    }
743

Elliot Lee's avatar
Elliot Lee committed
744 745
  if (update & YRANGE)
    {
746 747
      guchar buf[YRANGE_WIDTH * 3];
      guchar pix[3];
Elliot Lee's avatar
Elliot Lee committed
748 749 750

      for (i = 0; i < YRANGE_HEIGHT; i++)
	{
751
	  switch (sel_channel)
752
	    {
Michael Natterer's avatar
Michael Natterer committed
753 754
	    case GIMP_HISTOGRAM_VALUE:
	    case GIMP_HISTOGRAM_ALPHA:
755 756 757
	      pix[0] = pix[1] = pix[2] = (255 - i);
	      break;

Michael Natterer's avatar
Michael Natterer committed
758 759 760
	    case GIMP_HISTOGRAM_RED:
	    case GIMP_HISTOGRAM_GREEN:
	    case GIMP_HISTOGRAM_BLUE:
761
	      pix[0] = pix[1] = pix[2] = 0;
762
	      pix[sel_channel - 1] = (255 - i);
763 764
	      break;

765
	    default:
766
	      g_warning ("unknown channel type %d, can't happen!?!?",
767
			 c_tool->channel);
768
	      break;
769
	    }
770 771

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

774
	  gtk_preview_draw_row (GTK_PREVIEW (c_tool->yrange),
775
				buf, 0, i, YRANGE_WIDTH);
Elliot Lee's avatar
Elliot Lee committed
776 777
	}

778
      gtk_widget_queue_draw (c_tool->yrange);
Elliot Lee's avatar
Elliot Lee committed
779 780 781 782
    }
}

static void
783 784
curves_channel_callback (GtkWidget      *widget,
			 GimpCurvesTool *c_tool)
Elliot Lee's avatar
Elliot Lee committed
785
{
786
  gimp_menu_item_update (widget, &c_tool->channel);
Elliot Lee's avatar
Elliot Lee committed
787

788
  if (c_tool->color)
Elliot Lee's avatar
Elliot Lee committed
789
    {
790 791 792 793 794 795 796 797
      gimp_histogram_view_set_channel (GIMP_HISTOGRAM_VIEW (c_tool->graph),
                                       c_tool->channel);
    }
  else
    {
      c_tool->channel = (c_tool->channel > 1) ? 2 : 1;
      gimp_histogram_view_set_channel (GIMP_HISTOGRAM_VIEW (c_tool->graph),
                                       c_tool->channel - 1);
Elliot Lee's avatar
Elliot Lee committed
798 799
    }

800 801
  gimp_int_radio_group_set_active (GTK_RADIO_BUTTON (c_tool->curve_type),
			           c_tool->curves->curve_type[c_tool->channel]);
802

803
  curves_update (c_tool, XRANGE_TOP | YRANGE);
Elliot Lee's avatar
Elliot Lee committed
804 805 806
}

static void
807 808
curves_channel_reset_callback (GtkWidget      *widget,
                               GimpCurvesTool *c_tool)
Elliot Lee's avatar
Elliot Lee committed
809
{