gimpcurvestool.c 36.6 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

Sven Neumann's avatar
Sven Neumann committed
25 26
#include <gtk/gtk.h>

27
#include "libgimpcolor/gimpcolor.h"
28
#include "libgimpwidgets/gimpwidgets.h"
29

30
#include "tools-types.h"
Michael Natterer's avatar
Michael Natterer committed
31

32
#include "config/gimpbaseconfig.h"
33
#include "config/gimpguiconfig.h"
34

35
#include "base/curves.h"
Michael Natterer's avatar
Michael Natterer committed
36 37 38
#include "base/gimphistogram.h"
#include "base/gimplut.h"

39
#include "core/gimp.h"
Michael Natterer's avatar
Michael Natterer committed
40
#include "core/gimpdrawable.h"
41
#include "core/gimpdrawable-histogram.h"
Michael Natterer's avatar
Michael Natterer committed
42
#include "core/gimpimage.h"
43
#include "core/gimpimagemap.h"
44
#include "core/gimptoolinfo.h"
Michael Natterer's avatar
Michael Natterer committed
45

46
#include "widgets/gimpcolorbar.h"
Michael Natterer's avatar
Michael Natterer committed
47
#include "widgets/gimpcursor.h"
48
#include "widgets/gimpenumcombobox.h"
Sven Neumann's avatar
Sven Neumann committed
49
#include "widgets/gimpenumstore.h"
50
#include "widgets/gimpenumwidgets.h"
51
#include "widgets/gimphelp-ids.h"
52
#include "widgets/gimphistogramview.h"
53
#include "widgets/gimppropwidgets.h"
Michael Natterer's avatar
Michael Natterer committed
54

55 56
#include "display/gimpdisplay.h"

Michael Natterer's avatar
Michael Natterer committed
57
#include "gimpcurvestool.h"
58
#include "gimphistogramoptions.h"
59
#include "gimptoolcontrol.h"
Sven Neumann's avatar
Sven Neumann committed
60

61
#include "gimp-intl.h"
62

63

64 65
#define XRANGE   (1 << 0)
#define YRANGE   (1 << 1)
66 67
#define GRAPH    (1 << 2)
#define ALL      (XRANGE | YRANGE | GRAPH)
Elliot Lee's avatar
Elliot Lee committed
68

69 70 71 72
#define GRAPH_SIZE    256
#define BAR_SIZE       12
#define RADIUS          3
#define MIN_DISTANCE    8
Elliot Lee's avatar
Elliot Lee committed
73 74


Michael Natterer's avatar
Michael Natterer committed
75 76
/*  local function prototypes  */

77
static void     gimp_curves_tool_class_init     (GimpCurvesToolClass *klass);
78
static void     gimp_curves_tool_init           (GimpCurvesTool      *tool);
79 80 81 82 83 84 85 86 87 88 89 90

static void     gimp_curves_tool_finalize       (GObject          *object);

static gboolean 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);

static void     gimp_curves_tool_color_picked   (GimpColorTool    *color_tool,
91
                                                 GimpColorPickState pick_state,
92 93 94 95 96 97
                                                 GimpImageType     sample_type,
                                                 GimpRGB          *color,
                                                 gint              color_index);
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);
98 99 100 101
static gboolean gimp_curves_tool_settings_load  (GimpImageMapTool *image_map_tool,
                                                 gpointer          fp);
static gboolean gimp_curves_tool_settings_save  (GimpImageMapTool *image_map_tool,
                                                 gpointer          fp);
102

103
static void     curves_add_point                (GimpCurvesTool   *tool,
104 105 106 107
                                                 gint              x,
                                                 gint              y,
                                                 gint              cchan);

108
static void     curves_update                   (GimpCurvesTool   *tool,
109 110 111
                                                 gint              update);

static void     curves_channel_callback         (GtkWidget        *widget,
112
                                                 GimpCurvesTool   *tool);
113
static void     curves_channel_reset_callback   (GtkWidget        *widget,
114
                                                 GimpCurvesTool   *tool);
115

Sven Neumann's avatar
Sven Neumann committed
116 117 118
static gboolean curves_menu_visible_func        (GtkTreeModel     *model,
                                                 GtkTreeIter      *iter,
                                                 gpointer          data);
119
static void     curves_curve_type_callback      (GtkWidget        *widget,
120
                                                 GimpCurvesTool   *tool);
121 122
static gboolean curves_graph_events             (GtkWidget        *widget,
                                                 GdkEvent         *event,
123
                                                 GimpCurvesTool   *tool);
124 125
static gboolean curves_graph_expose             (GtkWidget        *widget,
                                                 GdkEventExpose   *eevent,
126
                                                 GimpCurvesTool   *tool);
127

Michael Natterer's avatar
Michael Natterer committed
128

129 130
static GimpImageMapToolClass *parent_class = NULL;

Michael Natterer's avatar
Michael Natterer committed
131

132
/*  public functions  */
Michael Natterer's avatar
Michael Natterer committed
133 134

void
Nate Summers's avatar
Nate Summers committed
135
gimp_curves_tool_register (GimpToolRegisterCallback  callback,
136
                           gpointer                  data)
Michael Natterer's avatar
Michael Natterer committed
137
{
Nate Summers's avatar
Nate Summers committed
138
  (* callback) (GIMP_TYPE_CURVES_TOOL,
139
                GIMP_TYPE_HISTOGRAM_OPTIONS,
140
                gimp_color_options_gui,
141
                0,
142
                "gimp-curves-tool",
143 144
                _("Curves"),
                _("Adjust color curves"),
145
                N_("_Curves..."), NULL,
146
                NULL, GIMP_HELP_TOOL_CURVES,
Nate Summers's avatar
Nate Summers committed
147
                GIMP_STOCK_TOOL_CURVES,
148
                data);
Michael Natterer's avatar
Michael Natterer committed
149 150
}

151
GType
Michael Natterer's avatar
Michael Natterer committed
152 153
gimp_curves_tool_get_type (void)
{
154
  static GType tool_type = 0;
Michael Natterer's avatar
Michael Natterer committed
155 156 157

  if (! tool_type)
    {
158
      static const GTypeInfo tool_info =
Michael Natterer's avatar
Michael Natterer committed
159 160
      {
        sizeof (GimpCurvesToolClass),
161 162 163 164 165 166 167 168
	(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
169 170
      };

171
      tool_type = g_type_register_static (GIMP_TYPE_IMAGE_MAP_TOOL,
172
					  "GimpCurvesTool",
173
                                          &tool_info, 0);
Michael Natterer's avatar
Michael Natterer committed
174 175 176 177 178
    }

  return tool_type;
}

179 180 181

/*  private functions  */

Michael Natterer's avatar
Michael Natterer committed
182 183 184
static void
gimp_curves_tool_class_init (GimpCurvesToolClass *klass)
{
185 186
  GObjectClass          *object_class;
  GimpToolClass         *tool_class;
187
  GimpColorToolClass    *color_tool_class;
188
  GimpImageMapToolClass *image_map_tool_class;
Michael Natterer's avatar
Michael Natterer committed
189

190 191
  object_class         = G_OBJECT_CLASS (klass);
  tool_class           = GIMP_TOOL_CLASS (klass);
192
  color_tool_class     = GIMP_COLOR_TOOL_CLASS (klass);
193
  image_map_tool_class = GIMP_IMAGE_MAP_TOOL_CLASS (klass);
Michael Natterer's avatar
Michael Natterer committed
194

195
  parent_class = g_type_class_peek_parent (klass);
Michael Natterer's avatar
Michael Natterer committed
196

197 198 199 200 201 202
  object_class->finalize     = gimp_curves_tool_finalize;

  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;
203

204 205 206 207
  image_map_tool_class->shell_desc        = _("Adjust Color Curves");
  image_map_tool_class->settings_name     = "curves";
  image_map_tool_class->load_dialog_title = _("Load Curves");
  image_map_tool_class->save_dialog_title = _("Save Curves");
208

209 210 211
  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;
212

213 214
  image_map_tool_class->settings_load     = gimp_curves_tool_settings_load;
  image_map_tool_class->settings_save     = gimp_curves_tool_settings_save;
Michael Natterer's avatar
Michael Natterer committed
215 216 217
}

static void
218
gimp_curves_tool_init (GimpCurvesTool *tool)
Michael Natterer's avatar
Michael Natterer committed
219
{
220
  gint i;
221

222 223 224
  tool->curves  = g_new0 (Curves, 1);
  tool->lut     = gimp_lut_new ();
  tool->channel = GIMP_HISTOGRAM_VALUE;
225

226
  curves_init (tool->curves);
227

228 229
  for (i = 0; i < G_N_ELEMENTS (tool->col_value); i++)
    tool->col_value[i] = -1;
230

231 232
  tool->cursor_x = -1;
  tool->cursor_y = -1;
Michael Natterer's avatar
Michael Natterer committed
233 234 235
}

static void
236
gimp_curves_tool_finalize (GObject *object)
Michael Natterer's avatar
Michael Natterer committed
237
{
238
  GimpCurvesTool *tool = GIMP_CURVES_TOOL (object);
239

240
  if (tool->curves)
Michael Natterer's avatar
Michael Natterer committed
241
    {
242 243
      g_free (tool->curves);
      tool->curves = NULL;
Michael Natterer's avatar
Michael Natterer committed
244
    }
245
  if (tool->lut)
Michael Natterer's avatar
Michael Natterer committed
246
    {
247 248
      gimp_lut_free (tool->lut);
      tool->lut = NULL;
Michael Natterer's avatar
Michael Natterer committed
249
    }
250
  if (tool->hist)
251
    {
252 253
      gimp_histogram_free (tool->hist);
      tool->hist = NULL;
254
    }
255
  if (tool->cursor_layout)
Michael Natterer's avatar
Michael Natterer committed
256
    {
257 258
      g_object_unref (tool->cursor_layout);
      tool->cursor_layout = NULL;
Michael Natterer's avatar
Michael Natterer committed
259
    }
260
  if (tool->xpos_layout)
261
    {
262 263
      g_object_unref (tool->xpos_layout);
      tool->xpos_layout = NULL;
264
    }
Michael Natterer's avatar
Michael Natterer committed
265

266
  G_OBJECT_CLASS (parent_class)->finalize (object);
Michael Natterer's avatar
Michael Natterer committed
267 268
}

269
static gboolean
270
gimp_curves_tool_initialize (GimpTool    *tool,
271
			     GimpDisplay *gdisp)
Michael Natterer's avatar
Michael Natterer committed
272
{
273
  GimpCurvesTool *c_tool = GIMP_CURVES_TOOL (tool);
274 275
  GimpDrawable   *drawable;

276 277 278
  drawable = gimp_image_active_drawable (gdisp->gimage);

  if (! drawable)
279
    return FALSE;
280

281
  if (gimp_drawable_is_indexed (drawable))
Michael Natterer's avatar
Michael Natterer committed
282
    {
283
      g_message (_("Curves for indexed layers cannot be adjusted."));
284
      return FALSE;
285
    }
Michael Natterer's avatar
Michael Natterer committed
286

287 288 289 290 291 292 293
  if (! c_tool->hist)
    {
      Gimp *gimp = GIMP_TOOL (c_tool)->tool_info->gimp;

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

294
  curves_init (c_tool->curves);
Michael Natterer's avatar
Michael Natterer committed
295

296
  c_tool->channel = GIMP_HISTOGRAM_VALUE;
297 298
  c_tool->color   = gimp_drawable_is_rgb (drawable);
  c_tool->alpha   = gimp_drawable_has_alpha (drawable);
299 300 301 302 303 304

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

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

305 306 307 308
  /*  always pick colors  */
  gimp_color_tool_enable (GIMP_COLOR_TOOL (tool),
                          GIMP_COLOR_OPTIONS (tool->tool_info->tool_options));

Sven Neumann's avatar
Sven Neumann committed
309 310
  gimp_enum_combo_box_set_visible (GIMP_ENUM_COMBO_BOX (c_tool->channel_menu),
                                   curves_menu_visible_func, c_tool);
311

312 313
  gimp_int_combo_box_set_active (GIMP_INT_COMBO_BOX (c_tool->channel_menu),
                                 c_tool->channel);
Michael Natterer's avatar
Michael Natterer committed
314

315 316 317
  /* FIXME: hack */
  if (! c_tool->color)
    c_tool->channel = (c_tool->channel == GIMP_HISTOGRAM_ALPHA) ? 1 : 0;
318

319 320 321
  gimp_drawable_calculate_histogram (drawable, c_tool->hist);
  gimp_histogram_view_set_histogram (GIMP_HISTOGRAM_VIEW (c_tool->graph),
                                     c_tool->hist);
322

323 324
  curves_update (c_tool, ALL);

325
  return TRUE;
Michael Natterer's avatar
Michael Natterer committed
326 327 328
}

static void
329 330 331
gimp_curves_tool_button_release (GimpTool        *tool,
                                 GimpCoords      *coords,
                                 guint32          time,
332 333
				 GdkModifierType  state,
				 GimpDisplay     *gdisp)
Michael Natterer's avatar
Michael Natterer committed
334
{
335
  GimpCurvesTool *c_tool = GIMP_CURVES_TOOL (tool);
336
  GimpDrawable   *drawable;
Michael Natterer's avatar
Michael Natterer committed
337

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

340
  if (state & GDK_SHIFT_MASK)
Michael Natterer's avatar
Michael Natterer committed
341
    {
342
      curves_add_point (c_tool, coords->x, coords->y, c_tool->channel);
343
      curves_calculate_curve (c_tool->curves, c_tool->channel);
Michael Natterer's avatar
Michael Natterer committed
344
    }
345
  else if (state & GDK_CONTROL_MASK)
Michael Natterer's avatar
Michael Natterer committed
346
    {
347
      gint i;
348

349 350 351 352 353
      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
354 355
    }

356 357 358
  /*  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
359 360 361
}

static void
362 363 364 365 366
gimp_curves_tool_color_picked (GimpColorTool      *color_tool,
                               GimpColorPickState  pick_state,
			       GimpImageType       sample_type,
			       GimpRGB            *color,
			       gint                color_index)
Michael Natterer's avatar
Michael Natterer committed
367
{
368
  GimpCurvesTool *tool = GIMP_CURVES_TOOL (color_tool);
369
  GimpDrawable   *drawable;
370
  guchar          r, g, b, a;
Michael Natterer's avatar
Michael Natterer committed
371

372
  drawable = GIMP_IMAGE_MAP_TOOL (tool)->drawable;
373

374
  gimp_rgba_get_uchar (color, &r, &g, &b, &a);
375

376 377 378
  tool->col_value[GIMP_HISTOGRAM_RED]   = r;
  tool->col_value[GIMP_HISTOGRAM_GREEN] = g;
  tool->col_value[GIMP_HISTOGRAM_BLUE]  = b;
379

380
  if (gimp_drawable_has_alpha (drawable))
381
    tool->col_value[GIMP_HISTOGRAM_ALPHA] = a;
382

383
  if (gimp_drawable_is_indexed (drawable))
384
    tool->col_value[GIMP_HISTOGRAM_ALPHA] = color_index;
385

386
  tool->col_value[GIMP_HISTOGRAM_VALUE] = MAX (MAX (r, g), b);
BST 1999 Andy Thomas's avatar
BST 1999 Andy Thomas committed
387

388
  curves_update (tool, GRAPH);
389
}
BST 1999 Andy Thomas's avatar
BST 1999 Andy Thomas committed
390

391
static void
392
curves_add_point (GimpCurvesTool *tool,
393 394 395
		  gint            x,
		  gint            y,
		  gint            cchan)
396 397
{
  /* Add point onto the curve */
398 399 400 401
  gint closest_point = 0;
  gint distance;
  gint curvex;
  gint i;
402

403
  switch (tool->curves->curve_type[cchan])
404
    {
405
    case GIMP_CURVE_SMOOTH:
406
      curvex   = tool->col_value[cchan];
407
      distance = G_MAXINT;
408

409
      for (i = 0; i < 17; i++)
410 411 412 413 414 415 416 417
	{
	  if (tool->curves->points[cchan][i][0] != -1)
	    if (abs (curvex - tool->curves->points[cchan][i][0]) < distance)
	      {
		distance = abs (curvex - tool->curves->points[cchan][i][0]);
		closest_point = i;
	      }
	}
418

419
      if (distance > MIN_DISTANCE)
420
	closest_point = (curvex + 8) / 16;
421

422 423
      tool->curves->points[cchan][closest_point][0] = curvex;
      tool->curves->points[cchan][closest_point][1] = tool->curves->curve[cchan][curvex];
424
      break;
425

426
    case GIMP_CURVE_FREE:
427
      tool->curves->curve[cchan][x] = 255 - y;
428
      break;
429
    }
Elliot Lee's avatar
Elliot Lee committed
430 431
}

432 433
static void
gimp_curves_tool_map (GimpImageMapTool *image_map_tool)
Elliot Lee's avatar
Elliot Lee committed
434
{
435
  GimpCurvesTool *tool = GIMP_CURVES_TOOL (image_map_tool);
436

437
  gimp_lut_setup (tool->lut,
438
		  (GimpLutFunc) curves_lut_func,
439
                  tool->curves,
440
		  gimp_drawable_bytes (image_map_tool->drawable));
441

442 443
  gimp_image_map_apply (image_map_tool->image_map,
                        (GimpImageMapApplyFunc) gimp_lut_process_2,
444
                        tool->lut);
Elliot Lee's avatar
Elliot Lee committed
445 446
}

447

448 449 450
/*******************/
/*  Curves dialog  */
/*******************/
Elliot Lee's avatar
Elliot Lee committed
451

452 453
static void
gimp_curves_tool_dialog (GimpImageMapTool *image_map_tool)
Elliot Lee's avatar
Elliot Lee committed
454
{
455
  GimpCurvesTool  *tool = GIMP_CURVES_TOOL (image_map_tool);
456 457
  GimpToolOptions *tool_options;
  GtkWidget       *vbox;
458 459 460 461 462
  GtkWidget       *vbox2;
  GtkWidget       *hbox;
  GtkWidget       *hbox2;
  GtkWidget       *label;
  GtkWidget       *bbox;
463 464 465 466
  GtkWidget       *frame;
  GtkWidget       *menu;
  GtkWidget       *table;
  GtkWidget       *button;
467
  GtkWidget       *bar;
468
  gint             padding;
469

470 471
  tool_options = GIMP_TOOL (tool)->tool_info->tool_options;

472
  vbox = image_map_tool->main_vbox;
Elliot Lee's avatar
Elliot Lee committed
473

474
  /*  The option menu for selecting channels  */
475
  hbox = gtk_hbox_new (FALSE, 6);
476 477 478 479 480 481 482
  gtk_box_pack_start (GTK_BOX (vbox), hbox, FALSE, FALSE, 0);
  gtk_widget_show (hbox);

  label = gtk_label_new (_("Channel:"));
  gtk_box_pack_start (GTK_BOX (hbox), label, FALSE, FALSE, 0);
  gtk_widget_show (label);

483 484 485 486 487 488
  menu = gimp_enum_combo_box_new (GIMP_TYPE_HISTOGRAM_CHANNEL);
  g_signal_connect (menu, "changed",
                    G_CALLBACK (curves_channel_callback),
                    tool);
  gimp_enum_combo_box_set_stock_prefix (GIMP_ENUM_COMBO_BOX (menu),
                                        "gimp-channel");
489 490 491
  gtk_box_pack_start (GTK_BOX (hbox), menu, FALSE, FALSE, 0);
  gtk_widget_show (menu);

492
  tool->channel_menu = menu;
493

494
  button = gtk_button_new_with_mnemonic (_("R_eset channel"));
495
  gtk_box_pack_start (GTK_BOX (hbox), button, FALSE, FALSE, 0);
496
  gtk_widget_show (button);
497

498
  g_signal_connect (button, "clicked",
499
                    G_CALLBACK (curves_channel_reset_callback),
500
                    tool);
Elliot Lee's avatar
Elliot Lee committed
501

502 503 504 505 506
  menu = gimp_prop_enum_stock_box_new (G_OBJECT (tool_options),
                                       "histogram-scale", "gimp-histogram",
                                       0, 0);
  gtk_box_pack_end (GTK_BOX (hbox), menu, FALSE, FALSE, 0);
  gtk_widget_show (menu);
507

508
  /*  The table for the color bars and the graph  */
Elliot Lee's avatar
Elliot Lee committed
509
  table = gtk_table_new (2, 2, FALSE);
510 511
  gtk_table_set_col_spacings (GTK_TABLE (table), 2);
  gtk_table_set_row_spacings (GTK_TABLE (table), 2);
512 513 514 515 516
  gtk_box_pack_start (GTK_BOX (vbox), table, TRUE, TRUE, 0);

  /*  The left color bar  */
  vbox2 = gtk_vbox_new (FALSE, 0);
  gtk_table_attach (GTK_TABLE (table), vbox2, 0, 1, 0, 1,
517
		    GTK_FILL, GTK_EXPAND | GTK_FILL, 0, 0);
518
  gtk_widget_show (vbox2);
Elliot Lee's avatar
Elliot Lee committed
519 520

  frame = gtk_frame_new (NULL);
521
  gtk_frame_set_shadow_type (GTK_FRAME (frame), GTK_SHADOW_IN);
522
  gtk_box_pack_start (GTK_BOX (vbox2), frame, TRUE, TRUE, RADIUS);
Elliot Lee's avatar
Elliot Lee committed
523 524
  gtk_widget_show (frame);

525 526 527 528
  tool->yrange = gimp_color_bar_new (GTK_ORIENTATION_VERTICAL);
  gtk_widget_set_size_request (tool->yrange, BAR_SIZE, -1);
  gtk_container_add (GTK_CONTAINER (frame), tool->yrange);
  gtk_widget_show (tool->yrange);
529

Elliot Lee's avatar
Elliot Lee committed
530 531
  /*  The curves graph  */
  frame = gtk_frame_new (NULL);
532
  gtk_frame_set_shadow_type (GTK_FRAME (frame), GTK_SHADOW_IN);
Elliot Lee's avatar
Elliot Lee committed
533
  gtk_table_attach (GTK_TABLE (table), frame, 1, 2, 0, 1,
534
		    GTK_EXPAND | GTK_FILL, GTK_EXPAND | GTK_FILL, 0, 0);
535
  gtk_widget_show (frame);
Elliot Lee's avatar
Elliot Lee committed
536

537 538 539 540 541 542 543 544 545
  tool->graph = gimp_histogram_view_new (FALSE);
  gtk_widget_set_size_request (tool->graph,
                               GRAPH_SIZE + RADIUS * 2,
                               GRAPH_SIZE + RADIUS * 2);
  gtk_widget_add_events (tool->graph, (GDK_BUTTON_PRESS_MASK   |
                                       GDK_BUTTON_RELEASE_MASK |
                                       GDK_POINTER_MOTION_MASK |
                                       GDK_LEAVE_NOTIFY_MASK));
  g_object_set (tool->graph,
546 547 548
                "border-width", RADIUS,
                "subdivisions", 1,
                NULL);
549 550 551
  GIMP_HISTOGRAM_VIEW (tool->graph)->light_histogram = TRUE;
  gtk_container_add (GTK_CONTAINER (frame), tool->graph);
  gtk_widget_show (tool->graph);
552

553
  g_signal_connect (tool->graph, "event",
554 555
		    G_CALLBACK (curves_graph_events),
		    tool);
556
  g_signal_connect_after (tool->graph, "expose_event",
557
                          G_CALLBACK (curves_graph_expose),
558
                          tool);
Elliot Lee's avatar
Elliot Lee committed
559

560 561

  gimp_histogram_options_connect_view (GIMP_HISTOGRAM_OPTIONS (tool_options),
562 563 564 565 566
                                       GIMP_HISTOGRAM_VIEW (tool->graph));

  /*  The bottom color bar  */
  hbox2 = gtk_hbox_new (FALSE, 0);
  gtk_table_attach (GTK_TABLE (table), hbox2, 1, 2, 1, 2,
567
		    GTK_EXPAND | GTK_FILL, GTK_FILL, 0, 0);
568
  gtk_widget_show (hbox2);
569

Elliot Lee's avatar
Elliot Lee committed
570
  frame = gtk_frame_new (NULL);
571
  gtk_frame_set_shadow_type (GTK_FRAME (frame), GTK_SHADOW_IN);
572
  gtk_box_pack_start (GTK_BOX (hbox2), frame, TRUE, TRUE, RADIUS);
Elliot Lee's avatar
Elliot Lee committed
573 574
  gtk_widget_show (frame);

575 576 577 578
  vbox2 = gtk_vbox_new (TRUE, 0);
  gtk_container_add (GTK_CONTAINER (frame), vbox2);
  gtk_widget_show (vbox2);

579 580 581 582
  tool->xrange = gimp_color_bar_new (GTK_ORIENTATION_HORIZONTAL);
  gtk_widget_set_size_request (tool->xrange, -1, BAR_SIZE / 2);
  gtk_box_pack_start (GTK_BOX (vbox2), tool->xrange, TRUE, TRUE, 0);
  gtk_widget_show (tool->xrange);
583

584 585 586 587
  bar = gimp_color_bar_new (GTK_ORIENTATION_HORIZONTAL);
  gtk_box_pack_start (GTK_BOX (vbox2), bar, TRUE, TRUE, 0);
  gtk_widget_show (bar);

588
  gtk_widget_show (table);
Elliot Lee's avatar
Elliot Lee committed
589

590

591 592 593
  hbox = gtk_hbox_new (FALSE, 6);
  gtk_box_pack_end (GTK_BOX (vbox), hbox, FALSE, FALSE, 0);
  gtk_widget_show (hbox);
594

595
  /*  Horizontal button box for load / save */
596
  frame = gimp_frame_new (_("All Channels"));
597
  gtk_box_pack_start (GTK_BOX (hbox), frame, FALSE, FALSE, 0);
598 599
  gtk_widget_show (frame);

600 601 602 603
  bbox = gtk_hbutton_box_new ();
  gtk_container_set_border_width (GTK_CONTAINER (bbox), 2);
  gtk_box_set_spacing (GTK_BOX (bbox), 4);
  gtk_button_box_set_layout (GTK_BUTTON_BOX (bbox), GTK_BUTTONBOX_SPREAD);
604
  gtk_container_add (GTK_CONTAINER (frame), bbox);
605
  gtk_widget_show (bbox);
606

607 608 609 610 611
  gtk_box_pack_start (GTK_BOX (bbox), image_map_tool->load_button,
                      FALSE, FALSE, 0);
  gimp_help_set_help_data (image_map_tool->load_button,
                           _("Read curves settings from file"), NULL);
  gtk_widget_show (image_map_tool->load_button);
612

613 614 615 616 617
  gtk_box_pack_start (GTK_BOX (bbox), image_map_tool->save_button,
                      FALSE, FALSE, 0);
  gimp_help_set_help_data (image_map_tool->save_button,
                           _("Save curves settings to file"), NULL);
  gtk_widget_show (image_map_tool->save_button);
618 619

  /*  The radio box for selecting the curve type  */
620
  frame = gimp_frame_new (_("Curve Type"));
621 622 623 624
  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,
625 626 627 628
				  "gimp-curve", GTK_ICON_SIZE_MENU,
				  G_CALLBACK (curves_curve_type_callback),
				  tool,
				  &tool->curve_type);
629 630 631 632

  gtk_widget_style_get (bbox, "child_internal_pad_x", &padding, NULL);

  gimp_enum_stock_box_set_child_padding (hbox, padding, -1);
633 634 635 636 637 638

  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
639 640
}

641
static void
642
gimp_curves_tool_reset (GimpImageMapTool *image_map_tool)
643
{
644
  GimpCurvesTool       *tool = GIMP_CURVES_TOOL (image_map_tool);
645
  GimpHistogramChannel  channel;
646

647
  tool->grab_point = -1;
648

649 650 651
  for (channel =  GIMP_HISTOGRAM_VALUE;
       channel <= GIMP_HISTOGRAM_ALPHA;
       channel++)
652
    curves_channel_reset (tool->curves, channel);
653

654
  curves_update (tool, XRANGE | GRAPH);
655 656
}

657
static gboolean
658 659
gimp_curves_tool_settings_load (GimpImageMapTool *image_map_tool,
                                gpointer          fp)
660
{
661 662 663 664 665 666 667 668 669 670 671 672 673 674 675 676 677
  GimpCurvesTool *tool = GIMP_CURVES_TOOL (image_map_tool);
  FILE           *file = fp;
  gint            i, j;
  gint            fields;
  gchar           buf[50];
  gint            index[5][17];
  gint            value[5][17];

  if (! fgets (buf, sizeof (buf), file))
    return FALSE;

  if (strcmp (buf, "# GIMP Curves File\n") != 0)
    return FALSE;

  for (i = 0; i < 5; i++)
    {
      for (j = 0; j < 17; j++)
678 679 680 681
	{
	  fields = fscanf (file, "%d %d ", &index[i][j], &value[i][j]);
	  if (fields != 2)
	    {
682
              /*  FIXME: should have a helpful error message here  */
683 684 685 686
	      g_printerr ("fields != 2");
	      return FALSE;
	    }
	}
687 688 689 690 691 692 693
    }

  for (i = 0; i < 5; i++)
    {
      tool->curves->curve_type[i] = GIMP_CURVE_SMOOTH;

      for (j = 0; j < 17; j++)
694 695 696 697
	{
	  tool->curves->points[i][j][0] = index[i][j];
	  tool->curves->points[i][j][1] = value[i][j];
	}
698 699 700 701 702 703 704 705
    }

  for (i = 0; i < 5; i++)
    curves_calculate_curve (tool->curves, i);

  curves_update (tool, ALL);

  gimp_int_radio_group_set_active (GTK_RADIO_BUTTON (tool->curve_type),
706
			           GIMP_CURVE_SMOOTH);
707 708

  return TRUE;
709 710 711
}

static gboolean
712 713
gimp_curves_tool_settings_save (GimpImageMapTool *image_map_tool,
                                gpointer          fp)
714
{
715 716 717 718 719 720 721 722
  GimpCurvesTool *tool = GIMP_CURVES_TOOL (image_map_tool);
  FILE           *file = fp;
  gint            i, j;
  gint32          index;

  for (i = 0; i < 5; i++)
    if (tool->curves->curve_type[i] == GIMP_CURVE_FREE)
      {
723
	/*  pick representative points from the curve
724
            and make them control points  */
725 726 727 728 729 730
	for (j = 0; j <= 8; j++)
	  {
	    index = CLAMP0255 (j * 32);
	    tool->curves->points[i][j * 2][0] = index;
	    tool->curves->points[i][j * 2][1] = tool->curves->curve[i][index];
	  }
731 732 733 734 735 736 737
      }

  fprintf (file, "# GIMP Curves File\n");

  for (i = 0; i < 5; i++)
    {
      for (j = 0; j < 17; j++)
738
	fprintf (file, "%d %d ",
739 740 741 742 743 744 745
                 tool->curves->points[i][j][0],
                 tool->curves->points[i][j][1]);

      fprintf (file, "\n");
    }

  return TRUE;
746
}
747

748
/* TODO: preview alpha channel stuff correctly.  -- austin, 20/May/99 */
Elliot Lee's avatar
Elliot Lee committed
749
static void
750
curves_update (GimpCurvesTool *tool,
751
	       gint            update)
Elliot Lee's avatar
Elliot Lee committed
752
{
753
  GimpHistogramChannel channel;
754

755
  if (tool->color)
756
    {
757
      channel = tool->channel;
758
    }
759
  else
760
    {
761 762
      /* FIXME: hack */
      if (tool->channel == 1)
763
        channel = GIMP_HISTOGRAM_ALPHA;
764
      else
765
        channel = GIMP_HISTOGRAM_VALUE;
766
    }
767

768 769 770
  if (update & GRAPH)
    gtk_widget_queue_draw (tool->graph);

771
  if (update & XRANGE)
Elliot Lee's avatar
Elliot Lee committed
772
    {
773
      switch (channel)
774 775 776
	{
	case GIMP_HISTOGRAM_VALUE:
	case GIMP_HISTOGRAM_ALPHA:
777
        case GIMP_HISTOGRAM_RGB:
778
          gimp_color_bar_set_buffers (GIMP_COLOR_BAR (tool->xrange),
779 780 781
                                      tool->curves->curve[tool->channel],
                                      tool->curves->curve[tool->channel],
                                      tool->curves->curve[tool->channel]);
782
	  break;
783

784 785 786
	case GIMP_HISTOGRAM_RED:
	case GIMP_HISTOGRAM_GREEN:
	case GIMP_HISTOGRAM_BLUE:
787 788 789 790
          gimp_color_bar_set_buffers (GIMP_COLOR_BAR (tool->xrange),
                                      tool->curves->curve[GIMP_HISTOGRAM_RED],
                                      tool->curves->curve[GIMP_HISTOGRAM_GREEN],
                                      tool->curves->curve[GIMP_HISTOGRAM_BLUE]);
791 792
	  break;
	}
Elliot Lee's avatar
Elliot Lee committed
793
    }
794

Elliot Lee's avatar
Elliot Lee committed
795 796
  if (update & YRANGE)
    {
797
      gimp_color_bar_set_channel (GIMP_COLOR_BAR (tool->yrange), channel);
Elliot Lee's avatar
Elliot Lee committed
798 799 800 801
    }
}

static void
802
curves_channel_callback (GtkWidget      *widget,
803
			 GimpCurvesTool *tool)
Elliot Lee's avatar
Elliot Lee committed
804
{
805 806 807 808
  gimp_int_combo_box_get_active (GIMP_INT_COMBO_BOX (widget),
                                 (gint *) &tool->channel);
  gimp_histogram_view_set_channel (GIMP_HISTOGRAM_VIEW (tool->graph),
                                   tool->channel);
809