1 /* GTK - The GIMP Toolkit
2 * Copyright (C) 1995-1997 Peter Mattis, Spencer Kimball and Josh MacDonald
3 * Copyright (C) 2001 Red Hat, Inc.
5 * This library is free software; you can redistribute it and/or
6 * modify it under the terms of the GNU Lesser General Public
7 * License as published by the Free Software Foundation; either
8 * version 2 of the License, or (at your option) any later version.
10 * This library is distributed in the hope that it will be useful,
11 * but WITHOUT ANY WARRANTY; without even the implied warranty of
12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
13 * Lesser General Public License for more details.
15 * You should have received a copy of the GNU Lesser General Public
16 * License along with this library; if not, write to the
17 * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
18 * Boston, MA 02111-1307, USA.
22 * Modified by the GTK+ Team and others 1997-2000. See the AUTHORS
23 * file for a list of people on the GTK+ Team. See the ChangeLog
24 * files for a list of changes. These files are distributed with
25 * GTK+ at ftp://ftp.gtk.org/pub/gtk/.
31 #include "gtkmarshalers.h"
32 #include "gdk/gdkkeysyms.h"
33 #include "gtkbindings.h"
36 #define MAX_DIGITS (64) /* don't change this,
37 * a) you don't need to and
38 * b) you might cause buffer owerflows in
39 * unrelated code portions otherwise
54 static guint signals[LAST_SIGNAL];
55 static GtkRangeClass *parent_class = NULL;
57 static void gtk_scale_class_init (GtkScaleClass *klass);
58 static void gtk_scale_init (GtkScale *scale);
59 static void gtk_scale_set_property (GObject *object,
63 static void gtk_scale_get_property (GObject *object,
67 static void gtk_scale_style_set (GtkWidget *widget,
69 static void gtk_scale_get_range_border (GtkRange *range,
73 gtk_scale_get_type (void)
75 static GtkType scale_type = 0;
79 static const GtkTypeInfo scale_info =
83 sizeof (GtkScaleClass),
84 (GtkClassInitFunc) gtk_scale_class_init,
85 (GtkObjectInitFunc) gtk_scale_init,
86 /* reserved_1 */ NULL,
87 /* reserved_2 */ NULL,
88 (GtkClassInitFunc) NULL,
91 scale_type = gtk_type_unique (GTK_TYPE_RANGE, &scale_info);
98 single_string_accumulator (GSignalInvocationHint *ihint,
100 const GValue *handler_return,
103 gboolean continue_emission;
106 str = g_value_get_string (handler_return);
107 g_value_set_string (return_accu, str);
108 continue_emission = str == NULL;
110 return continue_emission;
114 #define add_slider_binding(binding_set, keyval, mask, scroll) \
115 gtk_binding_entry_add_signal (binding_set, keyval, mask, \
117 GTK_TYPE_SCROLL_TYPE, scroll)
120 gtk_scale_class_init (GtkScaleClass *class)
122 GObjectClass *gobject_class;
123 GtkObjectClass *object_class;
124 GtkWidgetClass *widget_class;
125 GtkRangeClass *range_class;
126 GtkBindingSet *binding_set;
128 gobject_class = G_OBJECT_CLASS (class);
129 object_class = (GtkObjectClass*) class;
130 range_class = (GtkRangeClass*) class;
131 widget_class = (GtkWidgetClass*) class;
133 parent_class = gtk_type_class (GTK_TYPE_RANGE);
135 gobject_class->set_property = gtk_scale_set_property;
136 gobject_class->get_property = gtk_scale_get_property;
138 widget_class->style_set = gtk_scale_style_set;
140 range_class->get_range_border = gtk_scale_get_range_border;
142 signals[FORMAT_VALUE] =
143 g_signal_new ("format_value",
144 G_TYPE_FROM_CLASS (object_class),
146 G_STRUCT_OFFSET (GtkScaleClass, format_value),
147 single_string_accumulator, NULL,
148 _gtk_marshal_STRING__DOUBLE,
152 g_object_class_install_property (gobject_class,
154 g_param_spec_int ("digits",
156 _("The number of decimal places that are displayed in the value"),
162 g_object_class_install_property (gobject_class,
164 g_param_spec_boolean ("draw_value",
166 _("Whether the current value is displayed as a string next to the slider"),
170 g_object_class_install_property (gobject_class,
172 g_param_spec_enum ("value_pos",
174 _("The position in which the current value is displayed"),
175 GTK_TYPE_POSITION_TYPE,
179 gtk_widget_class_install_style_property (widget_class,
180 g_param_spec_int ("slider_length",
182 _("Length of scale's slider"),
188 gtk_widget_class_install_style_property (widget_class,
189 g_param_spec_int ("value_spacing",
191 _("Space between value text and the slider/trough area"),
197 /* All bindings (even arrow keys) are on both h/v scale, because
198 * blind users etc. don't care about scale orientation.
201 binding_set = gtk_binding_set_by_class (class);
203 add_slider_binding (binding_set, GDK_Left, 0,
204 GTK_SCROLL_STEP_LEFT);
206 add_slider_binding (binding_set, GDK_Left, GDK_CONTROL_MASK,
207 GTK_SCROLL_PAGE_LEFT);
209 add_slider_binding (binding_set, GDK_KP_Left, 0,
210 GTK_SCROLL_STEP_LEFT);
212 add_slider_binding (binding_set, GDK_KP_Left, GDK_CONTROL_MASK,
213 GTK_SCROLL_PAGE_LEFT);
215 add_slider_binding (binding_set, GDK_Right, 0,
216 GTK_SCROLL_STEP_RIGHT);
218 add_slider_binding (binding_set, GDK_Right, GDK_CONTROL_MASK,
219 GTK_SCROLL_PAGE_RIGHT);
221 add_slider_binding (binding_set, GDK_KP_Right, 0,
222 GTK_SCROLL_STEP_RIGHT);
224 add_slider_binding (binding_set, GDK_KP_Right, GDK_CONTROL_MASK,
225 GTK_SCROLL_PAGE_RIGHT);
227 add_slider_binding (binding_set, GDK_Up, 0,
230 add_slider_binding (binding_set, GDK_Up, GDK_CONTROL_MASK,
233 add_slider_binding (binding_set, GDK_KP_Up, 0,
236 add_slider_binding (binding_set, GDK_KP_Up, GDK_CONTROL_MASK,
239 add_slider_binding (binding_set, GDK_Down, 0,
240 GTK_SCROLL_STEP_DOWN);
242 add_slider_binding (binding_set, GDK_Down, GDK_CONTROL_MASK,
243 GTK_SCROLL_PAGE_DOWN);
245 add_slider_binding (binding_set, GDK_KP_Down, 0,
246 GTK_SCROLL_STEP_DOWN);
248 add_slider_binding (binding_set, GDK_KP_Down, GDK_CONTROL_MASK,
249 GTK_SCROLL_PAGE_DOWN);
251 add_slider_binding (binding_set, GDK_Page_Up, 0,
252 GTK_SCROLL_PAGE_LEFT);
254 add_slider_binding (binding_set, GDK_KP_Page_Up, 0,
255 GTK_SCROLL_PAGE_LEFT);
257 add_slider_binding (binding_set, GDK_Page_Up, 0,
260 add_slider_binding (binding_set, GDK_KP_Page_Up, 0,
263 add_slider_binding (binding_set, GDK_Page_Down, 0,
264 GTK_SCROLL_PAGE_RIGHT);
266 add_slider_binding (binding_set, GDK_KP_Page_Down, 0,
267 GTK_SCROLL_PAGE_RIGHT);
269 add_slider_binding (binding_set, GDK_Page_Down, 0,
270 GTK_SCROLL_PAGE_DOWN);
272 add_slider_binding (binding_set, GDK_KP_Page_Down, 0,
273 GTK_SCROLL_PAGE_DOWN);
275 /* Logical bindings (vs. visual bindings above) */
277 add_slider_binding (binding_set, GDK_plus, 0,
278 GTK_SCROLL_STEP_FORWARD);
280 add_slider_binding (binding_set, GDK_minus, 0,
281 GTK_SCROLL_STEP_BACKWARD);
283 add_slider_binding (binding_set, GDK_plus, GDK_CONTROL_MASK,
284 GTK_SCROLL_PAGE_FORWARD);
286 add_slider_binding (binding_set, GDK_minus, GDK_CONTROL_MASK,
287 GTK_SCROLL_PAGE_BACKWARD);
290 add_slider_binding (binding_set, GDK_KP_Add, 0,
291 GTK_SCROLL_STEP_FORWARD);
293 add_slider_binding (binding_set, GDK_KP_Subtract, 0,
294 GTK_SCROLL_STEP_BACKWARD);
296 add_slider_binding (binding_set, GDK_KP_Add, GDK_CONTROL_MASK,
297 GTK_SCROLL_PAGE_FORWARD);
299 add_slider_binding (binding_set, GDK_KP_Subtract, GDK_CONTROL_MASK,
300 GTK_SCROLL_PAGE_BACKWARD);
303 add_slider_binding (binding_set, GDK_Home, 0,
306 add_slider_binding (binding_set, GDK_KP_Home, 0,
309 add_slider_binding (binding_set, GDK_End, 0,
312 add_slider_binding (binding_set, GDK_KP_End, 0,
317 gtk_scale_set_property (GObject *object,
324 scale = GTK_SCALE (object);
329 gtk_scale_set_digits (scale, g_value_get_int (value));
331 case PROP_DRAW_VALUE:
332 gtk_scale_set_draw_value (scale, g_value_get_boolean (value));
335 gtk_scale_set_value_pos (scale, g_value_get_enum (value));
338 G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
344 gtk_scale_get_property (GObject *object,
351 scale = GTK_SCALE (object);
356 g_value_set_int (value, scale->draw_digits);
358 case PROP_DRAW_VALUE:
359 g_value_set_boolean (value, scale->draw_value);
362 g_value_set_enum (value, scale->value_pos);
365 G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
371 gtk_scale_init (GtkScale *scale)
375 range = GTK_RANGE (scale);
377 GTK_WIDGET_SET_FLAGS (scale, GTK_CAN_FOCUS);
379 range->slider_size_fixed = TRUE;
380 range->has_stepper_a = FALSE;
381 range->has_stepper_b = FALSE;
382 range->has_stepper_c = FALSE;
383 range->has_stepper_d = FALSE;
385 scale->draw_digits = 1;
386 scale->draw_value = TRUE;
387 scale->value_pos = GTK_POS_TOP;
391 gtk_scale_set_digits (GtkScale *scale,
396 g_return_if_fail (GTK_IS_SCALE (scale));
398 range = GTK_RANGE (scale);
400 digits = CLAMP (digits, -1, MAX_DIGITS);
402 if (scale->draw_digits != digits)
404 scale->draw_digits = digits;
406 gtk_widget_queue_resize (GTK_WIDGET (scale));
408 g_object_notify (G_OBJECT (scale), "digits");
413 gtk_scale_get_digits (GtkScale *scale)
415 g_return_val_if_fail (GTK_IS_SCALE (scale), -1);
417 return scale->draw_digits;
421 gtk_scale_set_draw_value (GtkScale *scale,
424 g_return_if_fail (GTK_IS_SCALE (scale));
426 draw_value = draw_value != FALSE;
428 if (scale->draw_value != draw_value)
430 scale->draw_value = draw_value;
432 gtk_widget_queue_resize (GTK_WIDGET (scale));
434 g_object_notify (G_OBJECT (scale), "draw_value");
439 gtk_scale_get_draw_value (GtkScale *scale)
441 g_return_val_if_fail (GTK_IS_SCALE (scale), FALSE);
443 return scale->draw_value;
447 gtk_scale_set_value_pos (GtkScale *scale,
450 g_return_if_fail (GTK_IS_SCALE (scale));
452 if (scale->value_pos != pos)
454 scale->value_pos = pos;
456 if (GTK_WIDGET_VISIBLE (scale) && GTK_WIDGET_MAPPED (scale))
457 gtk_widget_queue_resize (GTK_WIDGET (scale));
459 g_object_notify (G_OBJECT (scale), "value_pos");
464 gtk_scale_get_value_pos (GtkScale *scale)
466 g_return_val_if_fail (GTK_IS_SCALE (scale), 0);
468 return scale->value_pos;
472 gtk_scale_get_range_border (GtkRange *range,
479 widget = GTK_WIDGET (range);
480 scale = GTK_SCALE (range);
482 _gtk_scale_get_value_size (scale, &w, &h);
489 if (scale->draw_value)
492 gtk_widget_style_get (widget, "value_spacing", &value_spacing, NULL);
494 switch (scale->value_pos)
497 border->left += w + value_spacing;
500 border->right += w + value_spacing;
503 border->top += h + value_spacing;
506 border->bottom += h + value_spacing;
512 /* FIXME this could actually be static at the moment. */
514 _gtk_scale_get_value_size (GtkScale *scale,
520 g_return_if_fail (GTK_IS_SCALE (scale));
522 if (scale->draw_value)
525 PangoRectangle logical_rect;
528 range = GTK_RANGE (scale);
530 layout = gtk_widget_create_pango_layout (GTK_WIDGET (scale), NULL);
532 txt = _gtk_scale_format_value (scale, range->adjustment->lower);
533 pango_layout_set_text (layout, txt, -1);
536 pango_layout_get_pixel_extents (layout, NULL, &logical_rect);
539 *width = logical_rect.width;
541 *height = logical_rect.height;
543 txt = _gtk_scale_format_value (scale, range->adjustment->upper);
544 pango_layout_set_text (layout, txt, -1);
547 pango_layout_get_pixel_extents (layout, NULL, &logical_rect);
550 *width = MAX (*width, logical_rect.width);
552 *height = MAX (*height, logical_rect.height);
554 g_object_unref (G_OBJECT (layout));
567 gtk_scale_style_set (GtkWidget *widget,
573 range = GTK_RANGE (widget);
575 gtk_widget_style_get (widget,
576 "slider_length", &slider_length,
579 range->min_slider_size = slider_length;
581 (* GTK_WIDGET_CLASS (parent_class)->style_set) (widget, previous);
586 * _gtk_scale_format_value:
587 * @scale: a #GtkScale
588 * @value: adjustment value
590 * Emits "format_value" signal to format the value, if no user
591 * signal handlers, falls back to a default format.
593 * Return value: formatted value
596 _gtk_scale_format_value (GtkScale *scale,
601 g_signal_emit (G_OBJECT (scale),
602 signals[FORMAT_VALUE],
610 return g_strdup_printf ("%0.*f", scale->draw_digits,