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 GType scale_type = 0;
79 static const GTypeInfo scale_info =
81 sizeof (GtkScaleClass),
83 NULL, /* base_finalize */
84 (GClassInitFunc) gtk_scale_class_init,
85 NULL, /* class_finalize */
86 NULL, /* class_data */
89 (GInstanceInitFunc) gtk_scale_init,
90 NULL, /* value_table */
93 scale_type = g_type_register_static (GTK_TYPE_RANGE, "GtkScale",
94 &scale_info, G_TYPE_FLAG_ABSTRACT);
101 single_string_accumulator (GSignalInvocationHint *ihint,
103 const GValue *handler_return,
106 gboolean continue_emission;
109 str = g_value_get_string (handler_return);
110 g_value_set_string (return_accu, str);
111 continue_emission = str == NULL;
113 return continue_emission;
117 #define add_slider_binding(binding_set, keyval, mask, scroll) \
118 gtk_binding_entry_add_signal (binding_set, keyval, mask, \
120 GTK_TYPE_SCROLL_TYPE, scroll)
123 gtk_scale_class_init (GtkScaleClass *class)
125 GObjectClass *gobject_class;
126 GtkWidgetClass *widget_class;
127 GtkRangeClass *range_class;
128 GtkBindingSet *binding_set;
130 gobject_class = G_OBJECT_CLASS (class);
131 range_class = (GtkRangeClass*) class;
132 widget_class = (GtkWidgetClass*) class;
134 parent_class = g_type_class_peek_parent (class);
136 gobject_class->set_property = gtk_scale_set_property;
137 gobject_class->get_property = gtk_scale_get_property;
139 widget_class->style_set = gtk_scale_style_set;
141 range_class->get_range_border = gtk_scale_get_range_border;
143 signals[FORMAT_VALUE] =
144 g_signal_new ("format_value",
145 G_TYPE_FROM_CLASS (gobject_class),
147 G_STRUCT_OFFSET (GtkScaleClass, format_value),
148 single_string_accumulator, NULL,
149 _gtk_marshal_STRING__DOUBLE,
153 g_object_class_install_property (gobject_class,
155 g_param_spec_int ("digits",
157 _("The number of decimal places that are displayed in the value"),
163 g_object_class_install_property (gobject_class,
165 g_param_spec_boolean ("draw_value",
167 _("Whether the current value is displayed as a string next to the slider"),
171 g_object_class_install_property (gobject_class,
173 g_param_spec_enum ("value_pos",
175 _("The position in which the current value is displayed"),
176 GTK_TYPE_POSITION_TYPE,
180 gtk_widget_class_install_style_property (widget_class,
181 g_param_spec_int ("slider_length",
183 _("Length of scale's slider"),
189 gtk_widget_class_install_style_property (widget_class,
190 g_param_spec_int ("value_spacing",
192 _("Space between value text and the slider/trough area"),
198 /* All bindings (even arrow keys) are on both h/v scale, because
199 * blind users etc. don't care about scale orientation.
202 binding_set = gtk_binding_set_by_class (class);
204 add_slider_binding (binding_set, GDK_Left, 0,
205 GTK_SCROLL_STEP_LEFT);
207 add_slider_binding (binding_set, GDK_Left, GDK_CONTROL_MASK,
208 GTK_SCROLL_PAGE_LEFT);
210 add_slider_binding (binding_set, GDK_KP_Left, 0,
211 GTK_SCROLL_STEP_LEFT);
213 add_slider_binding (binding_set, GDK_KP_Left, GDK_CONTROL_MASK,
214 GTK_SCROLL_PAGE_LEFT);
216 add_slider_binding (binding_set, GDK_Right, 0,
217 GTK_SCROLL_STEP_RIGHT);
219 add_slider_binding (binding_set, GDK_Right, GDK_CONTROL_MASK,
220 GTK_SCROLL_PAGE_RIGHT);
222 add_slider_binding (binding_set, GDK_KP_Right, 0,
223 GTK_SCROLL_STEP_RIGHT);
225 add_slider_binding (binding_set, GDK_KP_Right, GDK_CONTROL_MASK,
226 GTK_SCROLL_PAGE_RIGHT);
228 add_slider_binding (binding_set, GDK_Up, 0,
231 add_slider_binding (binding_set, GDK_Up, GDK_CONTROL_MASK,
234 add_slider_binding (binding_set, GDK_KP_Up, 0,
237 add_slider_binding (binding_set, GDK_KP_Up, GDK_CONTROL_MASK,
240 add_slider_binding (binding_set, GDK_Down, 0,
241 GTK_SCROLL_STEP_DOWN);
243 add_slider_binding (binding_set, GDK_Down, GDK_CONTROL_MASK,
244 GTK_SCROLL_PAGE_DOWN);
246 add_slider_binding (binding_set, GDK_KP_Down, 0,
247 GTK_SCROLL_STEP_DOWN);
249 add_slider_binding (binding_set, GDK_KP_Down, GDK_CONTROL_MASK,
250 GTK_SCROLL_PAGE_DOWN);
252 add_slider_binding (binding_set, GDK_Page_Up, 0,
253 GTK_SCROLL_PAGE_LEFT);
255 add_slider_binding (binding_set, GDK_KP_Page_Up, 0,
256 GTK_SCROLL_PAGE_LEFT);
258 add_slider_binding (binding_set, GDK_Page_Up, 0,
261 add_slider_binding (binding_set, GDK_KP_Page_Up, 0,
264 add_slider_binding (binding_set, GDK_Page_Down, 0,
265 GTK_SCROLL_PAGE_RIGHT);
267 add_slider_binding (binding_set, GDK_KP_Page_Down, 0,
268 GTK_SCROLL_PAGE_RIGHT);
270 add_slider_binding (binding_set, GDK_Page_Down, 0,
271 GTK_SCROLL_PAGE_DOWN);
273 add_slider_binding (binding_set, GDK_KP_Page_Down, 0,
274 GTK_SCROLL_PAGE_DOWN);
276 /* Logical bindings (vs. visual bindings above) */
278 add_slider_binding (binding_set, GDK_plus, 0,
279 GTK_SCROLL_STEP_FORWARD);
281 add_slider_binding (binding_set, GDK_minus, 0,
282 GTK_SCROLL_STEP_BACKWARD);
284 add_slider_binding (binding_set, GDK_plus, GDK_CONTROL_MASK,
285 GTK_SCROLL_PAGE_FORWARD);
287 add_slider_binding (binding_set, GDK_minus, GDK_CONTROL_MASK,
288 GTK_SCROLL_PAGE_BACKWARD);
291 add_slider_binding (binding_set, GDK_KP_Add, 0,
292 GTK_SCROLL_STEP_FORWARD);
294 add_slider_binding (binding_set, GDK_KP_Subtract, 0,
295 GTK_SCROLL_STEP_BACKWARD);
297 add_slider_binding (binding_set, GDK_KP_Add, GDK_CONTROL_MASK,
298 GTK_SCROLL_PAGE_FORWARD);
300 add_slider_binding (binding_set, GDK_KP_Subtract, GDK_CONTROL_MASK,
301 GTK_SCROLL_PAGE_BACKWARD);
304 add_slider_binding (binding_set, GDK_Home, 0,
307 add_slider_binding (binding_set, GDK_KP_Home, 0,
310 add_slider_binding (binding_set, GDK_End, 0,
313 add_slider_binding (binding_set, GDK_KP_End, 0,
318 gtk_scale_set_property (GObject *object,
325 scale = GTK_SCALE (object);
330 gtk_scale_set_digits (scale, g_value_get_int (value));
332 case PROP_DRAW_VALUE:
333 gtk_scale_set_draw_value (scale, g_value_get_boolean (value));
336 gtk_scale_set_value_pos (scale, g_value_get_enum (value));
339 G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
345 gtk_scale_get_property (GObject *object,
352 scale = GTK_SCALE (object);
357 g_value_set_int (value, scale->digits);
359 case PROP_DRAW_VALUE:
360 g_value_set_boolean (value, scale->draw_value);
363 g_value_set_enum (value, scale->value_pos);
366 G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
372 gtk_scale_init (GtkScale *scale)
376 range = GTK_RANGE (scale);
378 GTK_WIDGET_SET_FLAGS (scale, GTK_CAN_FOCUS);
380 range->slider_size_fixed = TRUE;
381 range->has_stepper_a = FALSE;
382 range->has_stepper_b = FALSE;
383 range->has_stepper_c = FALSE;
384 range->has_stepper_d = FALSE;
386 scale->draw_value = TRUE;
387 scale->value_pos = GTK_POS_TOP;
389 range->round_digits = scale->digits;
393 gtk_scale_set_digits (GtkScale *scale,
398 g_return_if_fail (GTK_IS_SCALE (scale));
400 range = GTK_RANGE (scale);
402 digits = CLAMP (digits, -1, MAX_DIGITS);
404 if (scale->digits != digits)
406 scale->digits = digits;
407 if (scale->draw_value)
408 range->round_digits = digits;
410 gtk_widget_queue_resize (GTK_WIDGET (scale));
412 g_object_notify (G_OBJECT (scale), "digits");
417 gtk_scale_get_digits (GtkScale *scale)
419 g_return_val_if_fail (GTK_IS_SCALE (scale), -1);
421 return scale->digits;
425 gtk_scale_set_draw_value (GtkScale *scale,
428 g_return_if_fail (GTK_IS_SCALE (scale));
430 draw_value = draw_value != FALSE;
432 if (scale->draw_value != draw_value)
434 scale->draw_value = draw_value;
436 GTK_RANGE (scale)->round_digits = scale->digits;
438 GTK_RANGE (scale)->round_digits = -1;
440 gtk_widget_queue_resize (GTK_WIDGET (scale));
442 g_object_notify (G_OBJECT (scale), "draw_value");
447 gtk_scale_get_draw_value (GtkScale *scale)
449 g_return_val_if_fail (GTK_IS_SCALE (scale), FALSE);
451 return scale->draw_value;
455 gtk_scale_set_value_pos (GtkScale *scale,
458 g_return_if_fail (GTK_IS_SCALE (scale));
460 if (scale->value_pos != pos)
462 scale->value_pos = pos;
464 if (GTK_WIDGET_VISIBLE (scale) && GTK_WIDGET_MAPPED (scale))
465 gtk_widget_queue_resize (GTK_WIDGET (scale));
467 g_object_notify (G_OBJECT (scale), "value_pos");
472 gtk_scale_get_value_pos (GtkScale *scale)
474 g_return_val_if_fail (GTK_IS_SCALE (scale), 0);
476 return scale->value_pos;
480 gtk_scale_get_range_border (GtkRange *range,
487 widget = GTK_WIDGET (range);
488 scale = GTK_SCALE (range);
490 _gtk_scale_get_value_size (scale, &w, &h);
497 if (scale->draw_value)
500 gtk_widget_style_get (widget, "value_spacing", &value_spacing, NULL);
502 switch (scale->value_pos)
505 border->left += w + value_spacing;
508 border->right += w + value_spacing;
511 border->top += h + value_spacing;
514 border->bottom += h + value_spacing;
520 /* FIXME this could actually be static at the moment. */
522 _gtk_scale_get_value_size (GtkScale *scale,
528 g_return_if_fail (GTK_IS_SCALE (scale));
530 if (scale->draw_value)
533 PangoRectangle logical_rect;
536 range = GTK_RANGE (scale);
538 layout = gtk_widget_create_pango_layout (GTK_WIDGET (scale), NULL);
540 txt = _gtk_scale_format_value (scale, range->adjustment->lower);
541 pango_layout_set_text (layout, txt, -1);
544 pango_layout_get_pixel_extents (layout, NULL, &logical_rect);
547 *width = logical_rect.width;
549 *height = logical_rect.height;
551 txt = _gtk_scale_format_value (scale, range->adjustment->upper);
552 pango_layout_set_text (layout, txt, -1);
555 pango_layout_get_pixel_extents (layout, NULL, &logical_rect);
558 *width = MAX (*width, logical_rect.width);
560 *height = MAX (*height, logical_rect.height);
562 g_object_unref (layout);
575 gtk_scale_style_set (GtkWidget *widget,
581 range = GTK_RANGE (widget);
583 gtk_widget_style_get (widget,
584 "slider_length", &slider_length,
587 range->min_slider_size = slider_length;
589 (* GTK_WIDGET_CLASS (parent_class)->style_set) (widget, previous);
594 * _gtk_scale_format_value:
595 * @scale: a #GtkScale
596 * @value: adjustment value
598 * Emits "format_value" signal to format the value, if no user
599 * signal handlers, falls back to a default format.
601 * Return value: formatted value
604 _gtk_scale_format_value (GtkScale *scale,
609 g_signal_emit (scale,
610 signals[FORMAT_VALUE],
618 return g_strdup_printf ("%0.*f", scale->digits,