]> Pileus Git - ~andy/gtk/blob - gtk/gtkrange.c
GtkRangePrivate: Improve struct packing
[~andy/gtk] / gtk / gtkrange.c
1 /* GTK - The GIMP Toolkit
2  * Copyright (C) 1995-1997 Peter Mattis, Spencer Kimball and Josh MacDonald
3  * Copyright (C) 2001 Red Hat, Inc.
4  *
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.
9  *
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.
14  *
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.
19  */
20
21 /*
22  * Modified by the GTK+ Team and others 1997-2004.  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/. 
26  */
27
28 #include "config.h"
29
30 #include <stdio.h>
31 #include <math.h>
32
33 #include "gtkmainprivate.h"
34 #include "gtkmarshalers.h"
35 #include "gtkorientableprivate.h"
36 #include "gtkrange.h"
37 #include "gtkscale.h"
38 #include "gtkscrollbar.h"
39 #include "gtkwindow.h"
40 #include "gtkprivate.h"
41 #include "gtkintl.h"
42 #include "gtktypebuiltins.h"
43
44 /**
45  * SECTION:gtkrange
46  * @Short_description: Base class for widgets which visualize an adjustment
47  * @Title: GtkRange
48  *
49  * #GtkRange is the common base class for widgets which visualize an
50  * adjustment, e.g #GtkScale or #GtkScrollbar.
51  *
52  * Apart from signals for monitoring the parameters of the adjustment,
53  * #GtkRange provides properties and methods for influencing the sensitivity
54  * of the "steppers". It also provides properties and methods for setting a
55  * "fill level" on range widgets. See gtk_range_set_fill_level().
56  */
57
58
59 #define SCROLL_DELAY_FACTOR 5    /* Scroll repeat multiplier */
60 #define UPDATE_DELAY        300  /* Delay for queued update */
61
62 typedef struct _GtkRangeStepTimer GtkRangeStepTimer;
63
64 typedef enum {
65   MOUSE_OUTSIDE,
66   MOUSE_STEPPER_A,
67   MOUSE_STEPPER_B,
68   MOUSE_STEPPER_C,
69   MOUSE_STEPPER_D,
70   MOUSE_TROUGH,
71   MOUSE_SLIDER,
72   MOUSE_WIDGET /* inside widget but not in any of the above GUI elements */
73 } MouseLocation;
74
75 struct _GtkRangePrivate
76 {
77   MouseLocation      mouse_location;
78   /* last mouse coords we got, or -1 if mouse is outside the range */
79   gint  mouse_x;
80   gint  mouse_y;
81   MouseLocation      grab_location;   /* "grabbed" mouse location, OUTSIDE for no grab */
82
83   GtkRangeStepTimer *timer;
84
85   GtkAdjustment     *adjustment;
86   GtkSensitivityType lower_sensitivity;
87   GtkSensitivityType upper_sensitivity;
88
89   GdkDevice         *grab_device;
90   GdkRectangle       range_rect;     /* Area of entire stepper + trough assembly in widget->window coords */
91   /* These are in widget->window coordinates */
92   GdkRectangle       stepper_a;
93   GdkRectangle       stepper_b;
94   GdkRectangle       stepper_c;
95   GdkRectangle       stepper_d;
96   GdkRectangle       trough;         /* The trough rectangle is the area the thumb can slide in, not the entire range_rect */
97   GdkRectangle       slider;
98   GdkWindow         *event_window;
99
100   GQuark             slider_detail_quark;
101   GQuark             stepper_detail_quark[4];
102
103   GtkOrientation     orientation;
104
105   gdouble  fill_level;
106   gdouble *marks;
107
108   gint *mark_pos;
109   gint  min_slider_size;
110   gint  n_marks;
111   gint  round_digits;                /* Round off value to this many digits, -1 for no rounding */
112   gint  slide_initial_slider_position;
113   gint  slide_initial_coordinate;
114   gint  slider_start;                /* Slider range along the long dimension, in widget->window coords */
115   gint  slider_end;
116
117   guint repaint_id;
118
119   /* Steppers are: < > ---- < >
120    *               a b      c d
121    */
122   guint has_stepper_a          : 1;
123   guint has_stepper_b          : 1;
124   guint has_stepper_c          : 1;
125   guint has_stepper_d          : 1;
126
127   guint flippable              : 1;
128   guint inverted               : 1;
129   guint need_recalc            : 1;
130   guint recalc_marks           : 1;
131   guint slider_size_fixed      : 1;
132   guint trough_click_forward   : 1;  /* trough click was on the forward side of slider */
133
134   /* Stepper sensitivity */
135   guint lower_sensitive        : 1;
136   guint upper_sensitive        : 1;
137
138   /* Fill level */
139   guint show_fill_level        : 1;
140   guint restrict_to_fill_level : 1;
141
142   guint grab_button            : 8; /* 0 if none */
143 };
144
145
146 enum {
147   PROP_0,
148   PROP_ORIENTATION,
149   PROP_ADJUSTMENT,
150   PROP_INVERTED,
151   PROP_LOWER_STEPPER_SENSITIVITY,
152   PROP_UPPER_STEPPER_SENSITIVITY,
153   PROP_SHOW_FILL_LEVEL,
154   PROP_RESTRICT_TO_FILL_LEVEL,
155   PROP_FILL_LEVEL,
156   PROP_ROUND_DIGITS
157 };
158
159 enum {
160   VALUE_CHANGED,
161   ADJUST_BOUNDS,
162   MOVE_SLIDER,
163   CHANGE_VALUE,
164   LAST_SIGNAL
165 };
166
167 typedef enum {
168   STEPPER_A,
169   STEPPER_B,
170   STEPPER_C,
171   STEPPER_D
172 } Stepper;
173
174 static void gtk_range_set_property   (GObject          *object,
175                                       guint             prop_id,
176                                       const GValue     *value,
177                                       GParamSpec       *pspec);
178 static void gtk_range_get_property   (GObject          *object,
179                                       guint             prop_id,
180                                       GValue           *value,
181                                       GParamSpec       *pspec);
182 static void gtk_range_destroy        (GtkWidget        *widget);
183 static void gtk_range_get_preferred_width
184                                      (GtkWidget        *widget,
185                                       gint             *minimum,
186                                       gint             *natural);
187 static void gtk_range_get_preferred_height
188                                      (GtkWidget        *widget,
189                                       gint             *minimum,
190                                       gint             *natural);
191 static void gtk_range_size_allocate  (GtkWidget        *widget,
192                                       GtkAllocation    *allocation);
193 static void gtk_range_hierarchy_changed (GtkWidget     *widget,
194                                          GtkWidget     *previous_toplevel);
195 static void gtk_range_realize        (GtkWidget        *widget);
196 static void gtk_range_unrealize      (GtkWidget        *widget);
197 static void gtk_range_map            (GtkWidget        *widget);
198 static void gtk_range_unmap          (GtkWidget        *widget);
199 static gboolean gtk_range_draw       (GtkWidget        *widget,
200                                       cairo_t          *cr);
201 static gboolean gtk_range_button_press   (GtkWidget        *widget,
202                                       GdkEventButton   *event);
203 static gboolean gtk_range_button_release (GtkWidget        *widget,
204                                       GdkEventButton   *event);
205 static gboolean gtk_range_motion_notify  (GtkWidget        *widget,
206                                       GdkEventMotion   *event);
207 static gboolean gtk_range_enter_notify   (GtkWidget        *widget,
208                                       GdkEventCrossing *event);
209 static gboolean gtk_range_leave_notify   (GtkWidget        *widget,
210                                       GdkEventCrossing *event);
211 static gboolean gtk_range_grab_broken (GtkWidget          *widget,
212                                        GdkEventGrabBroken *event);
213 static void gtk_range_grab_notify    (GtkWidget          *widget,
214                                       gboolean            was_grabbed);
215 static void gtk_range_state_flags_changed  (GtkWidget      *widget,
216                                             GtkStateFlags   previous_state);
217 static gboolean gtk_range_scroll_event   (GtkWidget        *widget,
218                                       GdkEventScroll   *event);
219 static void gtk_range_style_updated  (GtkWidget        *widget);
220 static void update_slider_position   (GtkRange         *range,
221                                       gint              mouse_x,
222                                       gint              mouse_y);
223 static void stop_scrolling           (GtkRange         *range);
224 static gboolean modify_allocation_for_window_grip (GtkWidget     *widget,
225                                                    GtkAllocation *allocation);
226
227 /* Range methods */
228
229 static void gtk_range_move_slider              (GtkRange         *range,
230                                                 GtkScrollType     scroll);
231
232 /* Internals */
233 static gboolean      gtk_range_scroll                   (GtkRange      *range,
234                                                          GtkScrollType  scroll);
235 static gboolean      gtk_range_update_mouse_location    (GtkRange      *range);
236 static void          gtk_range_calc_layout              (GtkRange      *range,
237                                                          gdouble        adjustment_value);
238 static void          gtk_range_calc_marks               (GtkRange      *range);
239 static void          gtk_range_get_props                (GtkRange      *range,
240                                                          gint          *slider_width,
241                                                          gint          *stepper_size,
242                                                          gint          *focus_width,
243                                                          gint          *trough_border,
244                                                          gint          *stepper_spacing,
245                                                          gboolean      *trough_under_steppers,
246                                                          gint          *arrow_displacement_x,
247                                                          gint          *arrow_displacement_y);
248 static void          gtk_range_calc_request             (GtkRange      *range,
249                                                          gint           slider_width,
250                                                          gint           stepper_size,
251                                                          gint           focus_width,
252                                                          gint           trough_border,
253                                                          gint           stepper_spacing,
254                                                          GdkRectangle  *range_rect,
255                                                          GtkBorder     *border,
256                                                          gint          *n_steppers_p,
257                                                          gboolean      *has_steppers_ab,
258                                                          gboolean      *has_steppers_cd,
259                                                          gint          *slider_length_p);
260 static void          gtk_range_adjustment_value_changed (GtkAdjustment *adjustment,
261                                                          gpointer       data);
262 static void          gtk_range_adjustment_changed       (GtkAdjustment *adjustment,
263                                                          gpointer       data);
264 static void          gtk_range_add_step_timer           (GtkRange      *range,
265                                                          GtkScrollType  step);
266 static void          gtk_range_remove_step_timer        (GtkRange      *range);
267 static GdkRectangle* get_area                           (GtkRange      *range,
268                                                          MouseLocation  location);
269 static gboolean      gtk_range_real_change_value        (GtkRange      *range,
270                                                          GtkScrollType  scroll,
271                                                          gdouble        value);
272 static gboolean      gtk_range_key_press                (GtkWidget     *range,
273                                                          GdkEventKey   *event);
274
275
276 G_DEFINE_ABSTRACT_TYPE_WITH_CODE (GtkRange, gtk_range, GTK_TYPE_WIDGET,
277                                   G_IMPLEMENT_INTERFACE (GTK_TYPE_ORIENTABLE,
278                                                          NULL))
279
280 static guint signals[LAST_SIGNAL];
281
282
283 static void
284 gtk_range_class_init (GtkRangeClass *class)
285 {
286   GObjectClass   *gobject_class;
287   GtkWidgetClass *widget_class;
288
289   gobject_class = G_OBJECT_CLASS (class);
290   widget_class = (GtkWidgetClass*) class;
291
292   gobject_class->set_property = gtk_range_set_property;
293   gobject_class->get_property = gtk_range_get_property;
294
295   widget_class->destroy = gtk_range_destroy;
296   widget_class->get_preferred_width = gtk_range_get_preferred_width;
297   widget_class->get_preferred_height = gtk_range_get_preferred_height;
298   widget_class->size_allocate = gtk_range_size_allocate;
299   widget_class->hierarchy_changed = gtk_range_hierarchy_changed;
300   widget_class->realize = gtk_range_realize;
301   widget_class->unrealize = gtk_range_unrealize;
302   widget_class->map = gtk_range_map;
303   widget_class->unmap = gtk_range_unmap;
304   widget_class->draw = gtk_range_draw;
305   widget_class->button_press_event = gtk_range_button_press;
306   widget_class->button_release_event = gtk_range_button_release;
307   widget_class->motion_notify_event = gtk_range_motion_notify;
308   widget_class->scroll_event = gtk_range_scroll_event;
309   widget_class->enter_notify_event = gtk_range_enter_notify;
310   widget_class->leave_notify_event = gtk_range_leave_notify;
311   widget_class->grab_broken_event = gtk_range_grab_broken;
312   widget_class->grab_notify = gtk_range_grab_notify;
313   widget_class->state_flags_changed = gtk_range_state_flags_changed;
314   widget_class->style_updated = gtk_range_style_updated;
315   widget_class->key_press_event = gtk_range_key_press;
316
317   class->move_slider = gtk_range_move_slider;
318   class->change_value = gtk_range_real_change_value;
319
320   class->slider_detail = "slider";
321   class->stepper_detail = "stepper";
322
323   /**
324    * GtkRange::value-changed:
325    * @range: the #GtkRange that received the signal
326    *
327    * Emitted when the range value changes.
328    */
329   signals[VALUE_CHANGED] =
330     g_signal_new (I_("value-changed"),
331                   G_TYPE_FROM_CLASS (gobject_class),
332                   G_SIGNAL_RUN_LAST,
333                   G_STRUCT_OFFSET (GtkRangeClass, value_changed),
334                   NULL, NULL,
335                   _gtk_marshal_VOID__VOID,
336                   G_TYPE_NONE, 0);
337
338   /**
339    * GtkRange::adjust-bounds:
340    * @range: the #GtkRange that received the signal
341    * @value: the value before we clamp
342    *
343    * Emitted before clamping a value, to give the application a
344    * chance to adjust the bounds.
345    */
346   signals[ADJUST_BOUNDS] =
347     g_signal_new (I_("adjust-bounds"),
348                   G_TYPE_FROM_CLASS (gobject_class),
349                   G_SIGNAL_RUN_LAST,
350                   G_STRUCT_OFFSET (GtkRangeClass, adjust_bounds),
351                   NULL, NULL,
352                   _gtk_marshal_VOID__DOUBLE,
353                   G_TYPE_NONE, 1,
354                   G_TYPE_DOUBLE);
355   
356   /**
357    * GtkRange::move-slider:
358    * @range: the #GtkRange that received the signal
359    * @step: how to move the slider
360    *
361    * Virtual function that moves the slider. Used for keybindings.
362    */
363   signals[MOVE_SLIDER] =
364     g_signal_new (I_("move-slider"),
365                   G_TYPE_FROM_CLASS (gobject_class),
366                   G_SIGNAL_RUN_LAST | G_SIGNAL_ACTION,
367                   G_STRUCT_OFFSET (GtkRangeClass, move_slider),
368                   NULL, NULL,
369                   _gtk_marshal_VOID__ENUM,
370                   G_TYPE_NONE, 1,
371                   GTK_TYPE_SCROLL_TYPE);
372
373   /**
374    * GtkRange::change-value:
375    * @range: the #GtkRange that received the signal
376    * @scroll: the type of scroll action that was performed
377    * @value: the new value resulting from the scroll action
378    * @returns: %TRUE to prevent other handlers from being invoked for the
379    * signal, %FALSE to propagate the signal further
380    *
381    * The #GtkRange::change-value signal is emitted when a scroll action is
382    * performed on a range.  It allows an application to determine the
383    * type of scroll event that occurred and the resultant new value.
384    * The application can handle the event itself and return %TRUE to
385    * prevent further processing.  Or, by returning %FALSE, it can pass
386    * the event to other handlers until the default GTK+ handler is
387    * reached.
388    *
389    * The value parameter is unrounded.  An application that overrides
390    * the GtkRange::change-value signal is responsible for clamping the
391    * value to the desired number of decimal digits; the default GTK+
392    * handler clamps the value based on #GtkRange:round-digits.
393    *
394    * It is not possible to use delayed update policies in an overridden
395    * #GtkRange::change-value handler.
396    *
397    * Since: 2.6
398    */
399   signals[CHANGE_VALUE] =
400     g_signal_new (I_("change-value"),
401                   G_TYPE_FROM_CLASS (gobject_class),
402                   G_SIGNAL_RUN_LAST,
403                   G_STRUCT_OFFSET (GtkRangeClass, change_value),
404                   _gtk_boolean_handled_accumulator, NULL,
405                   _gtk_marshal_BOOLEAN__ENUM_DOUBLE,
406                   G_TYPE_BOOLEAN, 2,
407                   GTK_TYPE_SCROLL_TYPE,
408                   G_TYPE_DOUBLE);
409
410   g_object_class_override_property (gobject_class,
411                                     PROP_ORIENTATION,
412                                     "orientation");
413
414   g_object_class_install_property (gobject_class,
415                                    PROP_ADJUSTMENT,
416                                    g_param_spec_object ("adjustment",
417                                                         P_("Adjustment"),
418                                                         P_("The GtkAdjustment that contains the current value of this range object"),
419                                                         GTK_TYPE_ADJUSTMENT,
420                                                         GTK_PARAM_READWRITE | G_PARAM_CONSTRUCT));
421
422   g_object_class_install_property (gobject_class,
423                                    PROP_INVERTED,
424                                    g_param_spec_boolean ("inverted",
425                                                         P_("Inverted"),
426                                                         P_("Invert direction slider moves to increase range value"),
427                                                          FALSE,
428                                                          GTK_PARAM_READWRITE));
429
430   g_object_class_install_property (gobject_class,
431                                    PROP_LOWER_STEPPER_SENSITIVITY,
432                                    g_param_spec_enum ("lower-stepper-sensitivity",
433                                                       P_("Lower stepper sensitivity"),
434                                                       P_("The sensitivity policy for the stepper that points to the adjustment's lower side"),
435                                                       GTK_TYPE_SENSITIVITY_TYPE,
436                                                       GTK_SENSITIVITY_AUTO,
437                                                       GTK_PARAM_READWRITE));
438
439   g_object_class_install_property (gobject_class,
440                                    PROP_UPPER_STEPPER_SENSITIVITY,
441                                    g_param_spec_enum ("upper-stepper-sensitivity",
442                                                       P_("Upper stepper sensitivity"),
443                                                       P_("The sensitivity policy for the stepper that points to the adjustment's upper side"),
444                                                       GTK_TYPE_SENSITIVITY_TYPE,
445                                                       GTK_SENSITIVITY_AUTO,
446                                                       GTK_PARAM_READWRITE));
447
448   /**
449    * GtkRange:show-fill-level:
450    *
451    * The show-fill-level property controls whether fill level indicator
452    * graphics are displayed on the trough. See
453    * gtk_range_set_show_fill_level().
454    *
455    * Since: 2.12
456    **/
457   g_object_class_install_property (gobject_class,
458                                    PROP_SHOW_FILL_LEVEL,
459                                    g_param_spec_boolean ("show-fill-level",
460                                                          P_("Show Fill Level"),
461                                                          P_("Whether to display a fill level indicator graphics on trough."),
462                                                          FALSE,
463                                                          GTK_PARAM_READWRITE));
464
465   /**
466    * GtkRange:restrict-to-fill-level:
467    *
468    * The restrict-to-fill-level property controls whether slider
469    * movement is restricted to an upper boundary set by the
470    * fill level. See gtk_range_set_restrict_to_fill_level().
471    *
472    * Since: 2.12
473    **/
474   g_object_class_install_property (gobject_class,
475                                    PROP_RESTRICT_TO_FILL_LEVEL,
476                                    g_param_spec_boolean ("restrict-to-fill-level",
477                                                          P_("Restrict to Fill Level"),
478                                                          P_("Whether to restrict the upper boundary to the fill level."),
479                                                          TRUE,
480                                                          GTK_PARAM_READWRITE));
481
482   /**
483    * GtkRange:fill-level:
484    *
485    * The fill level (e.g. prebuffering of a network stream).
486    * See gtk_range_set_fill_level().
487    *
488    * Since: 2.12
489    **/
490   g_object_class_install_property (gobject_class,
491                                    PROP_FILL_LEVEL,
492                                    g_param_spec_double ("fill-level",
493                                                         P_("Fill Level"),
494                                                         P_("The fill level."),
495                                                         -G_MAXDOUBLE,
496                                                         G_MAXDOUBLE,
497                                                         G_MAXDOUBLE,
498                                                         GTK_PARAM_READWRITE));
499
500   /**
501    * GtkRange:round-digits:
502    *
503    * The number of digits to round the value to when
504    * it changes, or -1. See #GtkRange::change-value.
505    *
506    * Since: 2.24
507    */
508   g_object_class_install_property (gobject_class,
509                                    PROP_ROUND_DIGITS,
510                                    g_param_spec_int ("round-digits",
511                                                      P_("Round Digits"),
512                                                      P_("The number of digits to round the value to."),
513                                                      -1,
514                                                      G_MAXINT,
515                                                      -1,
516                                                      GTK_PARAM_READWRITE));
517
518   gtk_widget_class_install_style_property (widget_class,
519                                            g_param_spec_int ("slider-width",
520                                                              P_("Slider Width"),
521                                                              P_("Width of scrollbar or scale thumb"),
522                                                              0,
523                                                              G_MAXINT,
524                                                              14,
525                                                              GTK_PARAM_READABLE));
526   gtk_widget_class_install_style_property (widget_class,
527                                            g_param_spec_int ("trough-border",
528                                                              P_("Trough Border"),
529                                                              P_("Spacing between thumb/steppers and outer trough bevel"),
530                                                              0,
531                                                              G_MAXINT,
532                                                              1,
533                                                              GTK_PARAM_READABLE));
534   gtk_widget_class_install_style_property (widget_class,
535                                            g_param_spec_int ("stepper-size",
536                                                              P_("Stepper Size"),
537                                                              P_("Length of step buttons at ends"),
538                                                              0,
539                                                              G_MAXINT,
540                                                              14,
541                                                              GTK_PARAM_READABLE));
542   /**
543    * GtkRange:stepper-spacing:
544    *
545    * The spacing between the stepper buttons and thumb. Note that
546    * stepper-spacing won't have any effect if there are no steppers.
547    */
548   gtk_widget_class_install_style_property (widget_class,
549                                            g_param_spec_int ("stepper-spacing",
550                                                              P_("Stepper Spacing"),
551                                                              P_("Spacing between step buttons and thumb"),
552                                                              0,
553                                                              G_MAXINT,
554                                                              0,
555                                                              GTK_PARAM_READABLE));
556   gtk_widget_class_install_style_property (widget_class,
557                                            g_param_spec_int ("arrow-displacement-x",
558                                                              P_("Arrow X Displacement"),
559                                                              P_("How far in the x direction to move the arrow when the button is depressed"),
560                                                              G_MININT,
561                                                              G_MAXINT,
562                                                              0,
563                                                              GTK_PARAM_READABLE));
564   gtk_widget_class_install_style_property (widget_class,
565                                            g_param_spec_int ("arrow-displacement-y",
566                                                              P_("Arrow Y Displacement"),
567                                                              P_("How far in the y direction to move the arrow when the button is depressed"),
568                                                              G_MININT,
569                                                              G_MAXINT,
570                                                              0,
571                                                              GTK_PARAM_READABLE));
572
573   /**
574    * GtkRange:trough-under-steppers:
575    *
576    * Whether to draw the trough across the full length of the range or
577    * to exclude the steppers and their spacing.
578    *
579    * Since: 2.10
580    */
581   gtk_widget_class_install_style_property (widget_class,
582                                            g_param_spec_boolean ("trough-under-steppers",
583                                                                  P_("Trough Under Steppers"),
584                                                                  P_("Whether to draw trough for full length of range or exclude the steppers and spacing"),
585                                                                  TRUE,
586                                                                  GTK_PARAM_READABLE));
587
588   /**
589    * GtkRange:arrow-scaling:
590    *
591    * The arrow size proportion relative to the scroll button size.
592    *
593    * Since: 2.14
594    */
595   gtk_widget_class_install_style_property (widget_class,
596                                            g_param_spec_float ("arrow-scaling",
597                                                                P_("Arrow scaling"),
598                                                                P_("Arrow scaling with regard to scroll button size"),
599                                                                0.0, 1.0, 0.5,
600                                                                GTK_PARAM_READABLE));
601
602   g_type_class_add_private (class, sizeof (GtkRangePrivate));
603 }
604
605 static void
606 gtk_range_set_property (GObject      *object,
607                         guint         prop_id,
608                         const GValue *value,
609                         GParamSpec   *pspec)
610 {
611   GtkRange *range = GTK_RANGE (object);
612   GtkRangePrivate *priv = range->priv;
613
614   switch (prop_id)
615     {
616     case PROP_ORIENTATION:
617       priv->orientation = g_value_get_enum (value);
618
619       priv->slider_detail_quark = 0;
620       priv->stepper_detail_quark[0] = 0;
621       priv->stepper_detail_quark[1] = 0;
622       priv->stepper_detail_quark[2] = 0;
623       priv->stepper_detail_quark[3] = 0;
624
625       _gtk_orientable_set_style_classes (GTK_ORIENTABLE (range));
626       gtk_widget_queue_resize (GTK_WIDGET (range));
627       break;
628     case PROP_ADJUSTMENT:
629       gtk_range_set_adjustment (range, g_value_get_object (value));
630       break;
631     case PROP_INVERTED:
632       gtk_range_set_inverted (range, g_value_get_boolean (value));
633       break;
634     case PROP_LOWER_STEPPER_SENSITIVITY:
635       gtk_range_set_lower_stepper_sensitivity (range, g_value_get_enum (value));
636       break;
637     case PROP_UPPER_STEPPER_SENSITIVITY:
638       gtk_range_set_upper_stepper_sensitivity (range, g_value_get_enum (value));
639       break;
640     case PROP_SHOW_FILL_LEVEL:
641       gtk_range_set_show_fill_level (range, g_value_get_boolean (value));
642       break;
643     case PROP_RESTRICT_TO_FILL_LEVEL:
644       gtk_range_set_restrict_to_fill_level (range, g_value_get_boolean (value));
645       break;
646     case PROP_FILL_LEVEL:
647       gtk_range_set_fill_level (range, g_value_get_double (value));
648       break;
649     case PROP_ROUND_DIGITS:
650       gtk_range_set_round_digits (range, g_value_get_int (value));
651       break;
652     default:
653       G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
654       break;
655     }
656 }
657
658 static void
659 gtk_range_get_property (GObject      *object,
660                         guint         prop_id,
661                         GValue       *value,
662                         GParamSpec   *pspec)
663 {
664   GtkRange *range = GTK_RANGE (object);
665   GtkRangePrivate *priv = range->priv;
666
667   switch (prop_id)
668     {
669     case PROP_ORIENTATION:
670       g_value_set_enum (value, priv->orientation);
671       break;
672     case PROP_ADJUSTMENT:
673       g_value_set_object (value, priv->adjustment);
674       break;
675     case PROP_INVERTED:
676       g_value_set_boolean (value, priv->inverted);
677       break;
678     case PROP_LOWER_STEPPER_SENSITIVITY:
679       g_value_set_enum (value, gtk_range_get_lower_stepper_sensitivity (range));
680       break;
681     case PROP_UPPER_STEPPER_SENSITIVITY:
682       g_value_set_enum (value, gtk_range_get_upper_stepper_sensitivity (range));
683       break;
684     case PROP_SHOW_FILL_LEVEL:
685       g_value_set_boolean (value, gtk_range_get_show_fill_level (range));
686       break;
687     case PROP_RESTRICT_TO_FILL_LEVEL:
688       g_value_set_boolean (value, gtk_range_get_restrict_to_fill_level (range));
689       break;
690     case PROP_FILL_LEVEL:
691       g_value_set_double (value, gtk_range_get_fill_level (range));
692       break;
693     case PROP_ROUND_DIGITS:
694       g_value_set_int (value, gtk_range_get_round_digits (range));
695       break;
696     default:
697       G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
698       break;
699     }
700 }
701
702 static void
703 gtk_range_init (GtkRange *range)
704 {
705   GtkRangePrivate *priv;
706
707   range->priv = G_TYPE_INSTANCE_GET_PRIVATE (range,
708                                              GTK_TYPE_RANGE,
709                                              GtkRangePrivate);
710   priv = range->priv;
711
712   gtk_widget_set_has_window (GTK_WIDGET (range), FALSE);
713
714   priv->orientation = GTK_ORIENTATION_HORIZONTAL;
715   priv->adjustment = NULL;
716   priv->inverted = FALSE;
717   priv->flippable = FALSE;
718   priv->min_slider_size = 1;
719   priv->has_stepper_a = FALSE;
720   priv->has_stepper_b = FALSE;
721   priv->has_stepper_c = FALSE;
722   priv->has_stepper_d = FALSE;
723   priv->need_recalc = TRUE;
724   priv->round_digits = -1;
725   priv->mouse_location = MOUSE_OUTSIDE;
726   priv->mouse_x = -1;
727   priv->mouse_y = -1;
728   priv->grab_location = MOUSE_OUTSIDE;
729   priv->grab_button = 0;
730   priv->lower_sensitivity = GTK_SENSITIVITY_AUTO;
731   priv->upper_sensitivity = GTK_SENSITIVITY_AUTO;
732   priv->lower_sensitive = TRUE;
733   priv->upper_sensitive = TRUE;
734   priv->show_fill_level = FALSE;
735   priv->restrict_to_fill_level = TRUE;
736   priv->fill_level = G_MAXDOUBLE;
737   priv->timer = NULL;
738 }
739
740 /**
741  * gtk_range_get_adjustment:
742  * @range: a #GtkRange
743  * 
744  * Get the #GtkAdjustment which is the "model" object for #GtkRange.
745  * See gtk_range_set_adjustment() for details.
746  * The return value does not have a reference added, so should not
747  * be unreferenced.
748  * 
749  * Return value: (transfer none): a #GtkAdjustment
750  **/
751 GtkAdjustment*
752 gtk_range_get_adjustment (GtkRange *range)
753 {
754   GtkRangePrivate *priv;
755
756   g_return_val_if_fail (GTK_IS_RANGE (range), NULL);
757
758   priv = range->priv;
759
760   if (!priv->adjustment)
761     gtk_range_set_adjustment (range, NULL);
762
763   return priv->adjustment;
764 }
765
766 /**
767  * gtk_range_set_adjustment:
768  * @range: a #GtkRange
769  * @adjustment: a #GtkAdjustment
770  *
771  * Sets the adjustment to be used as the "model" object for this range
772  * widget. The adjustment indicates the current range value, the
773  * minimum and maximum range values, the step/page increments used
774  * for keybindings and scrolling, and the page size. The page size
775  * is normally 0 for #GtkScale and nonzero for #GtkScrollbar, and
776  * indicates the size of the visible area of the widget being scrolled.
777  * The page size affects the size of the scrollbar slider.
778  **/
779 void
780 gtk_range_set_adjustment (GtkRange      *range,
781                           GtkAdjustment *adjustment)
782 {
783   GtkRangePrivate *priv;
784
785   g_return_if_fail (GTK_IS_RANGE (range));
786
787   priv = range->priv;
788
789   if (!adjustment)
790     adjustment = gtk_adjustment_new (0.0, 0.0, 0.0, 0.0, 0.0, 0.0);
791   else
792     g_return_if_fail (GTK_IS_ADJUSTMENT (adjustment));
793
794   if (priv->adjustment != adjustment)
795     {
796       if (priv->adjustment)
797         {
798           g_signal_handlers_disconnect_by_func (priv->adjustment,
799                                                 gtk_range_adjustment_changed,
800                                                 range);
801           g_signal_handlers_disconnect_by_func (priv->adjustment,
802                                                 gtk_range_adjustment_value_changed,
803                                                 range);
804           g_object_unref (priv->adjustment);
805         }
806
807       priv->adjustment = adjustment;
808       g_object_ref_sink (adjustment);
809       
810       g_signal_connect (adjustment, "changed",
811                         G_CALLBACK (gtk_range_adjustment_changed),
812                         range);
813       g_signal_connect (adjustment, "value-changed",
814                         G_CALLBACK (gtk_range_adjustment_value_changed),
815                         range);
816       
817       gtk_range_adjustment_changed (adjustment, range);
818       g_object_notify (G_OBJECT (range), "adjustment");
819     }
820 }
821
822 /**
823  * gtk_range_set_inverted:
824  * @range: a #GtkRange
825  * @setting: %TRUE to invert the range
826  *
827  * Ranges normally move from lower to higher values as the
828  * slider moves from top to bottom or left to right. Inverted
829  * ranges have higher values at the top or on the right rather than
830  * on the bottom or left.
831  **/
832 void
833 gtk_range_set_inverted (GtkRange *range,
834                         gboolean  setting)
835 {
836   GtkRangePrivate *priv;
837
838   g_return_if_fail (GTK_IS_RANGE (range));
839
840   priv = range->priv;
841
842   setting = setting != FALSE;
843
844   if (setting != priv->inverted)
845     {
846       priv->inverted = setting;
847       g_object_notify (G_OBJECT (range), "inverted");
848       gtk_widget_queue_resize (GTK_WIDGET (range));
849     }
850 }
851
852 /**
853  * gtk_range_get_inverted:
854  * @range: a #GtkRange
855  * 
856  * Gets the value set by gtk_range_set_inverted().
857  * 
858  * Return value: %TRUE if the range is inverted
859  **/
860 gboolean
861 gtk_range_get_inverted (GtkRange *range)
862 {
863   g_return_val_if_fail (GTK_IS_RANGE (range), FALSE);
864
865   return range->priv->inverted;
866 }
867
868 /**
869  * gtk_range_set_flippable:
870  * @range: a #GtkRange
871  * @flippable: %TRUE to make the range flippable
872  *
873  * If a range is flippable, it will switch its direction if it is
874  * horizontal and its direction is %GTK_TEXT_DIR_RTL.
875  *
876  * See gtk_widget_get_direction().
877  *
878  * Since: 2.18
879  **/
880 void
881 gtk_range_set_flippable (GtkRange *range,
882                          gboolean  flippable)
883 {
884   GtkRangePrivate *priv;
885
886   g_return_if_fail (GTK_IS_RANGE (range));
887
888   priv = range->priv;
889
890   flippable = flippable ? TRUE : FALSE;
891
892   if (flippable != priv->flippable)
893     {
894       priv->flippable = flippable;
895
896       gtk_widget_queue_draw (GTK_WIDGET (range));
897     }
898 }
899
900 /**
901  * gtk_range_get_flippable:
902  * @range: a #GtkRange
903  *
904  * Gets the value set by gtk_range_set_flippable().
905  *
906  * Return value: %TRUE if the range is flippable
907  *
908  * Since: 2.18
909  **/
910 gboolean
911 gtk_range_get_flippable (GtkRange *range)
912 {
913   g_return_val_if_fail (GTK_IS_RANGE (range), FALSE);
914
915   return range->priv->flippable;
916 }
917
918 /**
919  * gtk_range_set_slider_size_fixed:
920  * @range: a #GtkRange
921  * @size_fixed: %TRUE to make the slider size constant
922  *
923  * Sets whether the range's slider has a fixed size, or a size that
924  * depends on its adjustment's page size.
925  *
926  * This function is useful mainly for #GtkRange subclasses.
927  *
928  * Since: 2.20
929  **/
930 void
931 gtk_range_set_slider_size_fixed (GtkRange *range,
932                                  gboolean  size_fixed)
933 {
934   GtkRangePrivate *priv;
935
936   g_return_if_fail (GTK_IS_RANGE (range));
937
938   priv = range->priv;
939
940   if (size_fixed != priv->slider_size_fixed)
941     {
942       priv->slider_size_fixed = size_fixed ? TRUE : FALSE;
943
944       if (priv->adjustment && gtk_widget_get_mapped (GTK_WIDGET (range)))
945         {
946           priv->need_recalc = TRUE;
947           gtk_range_calc_layout (range, gtk_adjustment_get_value (priv->adjustment));
948           gtk_widget_queue_draw (GTK_WIDGET (range));
949         }
950     }
951 }
952
953 /**
954  * gtk_range_get_slider_size_fixed:
955  * @range: a #GtkRange
956  *
957  * This function is useful mainly for #GtkRange subclasses.
958  *
959  * See gtk_range_set_slider_size_fixed().
960  *
961  * Return value: whether the range's slider has a fixed size.
962  *
963  * Since: 2.20
964  **/
965 gboolean
966 gtk_range_get_slider_size_fixed (GtkRange *range)
967 {
968   g_return_val_if_fail (GTK_IS_RANGE (range), FALSE);
969
970   return range->priv->slider_size_fixed;
971 }
972
973 /**
974  * gtk_range_set_min_slider_size:
975  * @range: a #GtkRange
976  * @min_size: The slider's minimum size
977  *
978  * Sets the minimum size of the range's slider.
979  *
980  * This function is useful mainly for #GtkRange subclasses.
981  *
982  * Since: 2.20
983  **/
984 void
985 gtk_range_set_min_slider_size (GtkRange *range,
986                                gint      min_size)
987 {
988   GtkRangePrivate *priv;
989
990   g_return_if_fail (GTK_IS_RANGE (range));
991   g_return_if_fail (min_size > 0);
992
993   priv = range->priv;
994
995   if (min_size != priv->min_slider_size)
996     {
997       priv->min_slider_size = min_size;
998
999       if (gtk_widget_is_drawable (GTK_WIDGET (range)))
1000         {
1001           priv->need_recalc = TRUE;
1002           gtk_range_calc_layout (range, gtk_adjustment_get_value (priv->adjustment));
1003           gtk_widget_queue_draw (GTK_WIDGET (range));
1004         }
1005     }
1006 }
1007
1008 /**
1009  * gtk_range_get_min_slider_size:
1010  * @range: a #GtkRange
1011  *
1012  * This function is useful mainly for #GtkRange subclasses.
1013  *
1014  * See gtk_range_set_min_slider_size().
1015  *
1016  * Return value: The minimum size of the range's slider.
1017  *
1018  * Since: 2.20
1019  **/
1020 gint
1021 gtk_range_get_min_slider_size (GtkRange *range)
1022 {
1023   g_return_val_if_fail (GTK_IS_RANGE (range), FALSE);
1024
1025   return range->priv->min_slider_size;
1026 }
1027
1028 /**
1029  * gtk_range_get_range_rect:
1030  * @range: a #GtkRange
1031  * @range_rect: (out): return location for the range rectangle
1032  *
1033  * This function returns the area that contains the range's trough
1034  * and its steppers, in widget->window coordinates.
1035  *
1036  * This function is useful mainly for #GtkRange subclasses.
1037  *
1038  * Since: 2.20
1039  **/
1040 void
1041 gtk_range_get_range_rect (GtkRange     *range,
1042                           GdkRectangle *range_rect)
1043 {
1044   GtkRangePrivate *priv;
1045
1046   g_return_if_fail (GTK_IS_RANGE (range));
1047   g_return_if_fail (range_rect != NULL);
1048
1049   priv = range->priv;
1050
1051   gtk_range_calc_layout (range, gtk_adjustment_get_value (priv->adjustment));
1052
1053   *range_rect = priv->range_rect;
1054 }
1055
1056 /**
1057  * gtk_range_get_slider_range:
1058  * @range: a #GtkRange
1059  * @slider_start: (out) (allow-none): return location for the slider's
1060  *     start, or %NULL
1061  * @slider_end: (out) (allow-none): return location for the slider's
1062  *     end, or %NULL
1063  *
1064  * This function returns sliders range along the long dimension,
1065  * in widget->window coordinates.
1066  *
1067  * This function is useful mainly for #GtkRange subclasses.
1068  *
1069  * Since: 2.20
1070  **/
1071 void
1072 gtk_range_get_slider_range (GtkRange *range,
1073                             gint     *slider_start,
1074                             gint     *slider_end)
1075 {
1076   GtkRangePrivate *priv;
1077
1078   g_return_if_fail (GTK_IS_RANGE (range));
1079
1080   priv = range->priv;
1081
1082   gtk_range_calc_layout (range, gtk_adjustment_get_value (priv->adjustment));
1083
1084   if (slider_start)
1085     *slider_start = priv->slider_start;
1086
1087   if (slider_end)
1088     *slider_end = priv->slider_end;
1089 }
1090
1091 /**
1092  * gtk_range_set_lower_stepper_sensitivity:
1093  * @range:       a #GtkRange
1094  * @sensitivity: the lower stepper's sensitivity policy.
1095  *
1096  * Sets the sensitivity policy for the stepper that points to the
1097  * 'lower' end of the GtkRange's adjustment.
1098  *
1099  * Since: 2.10
1100  **/
1101 void
1102 gtk_range_set_lower_stepper_sensitivity (GtkRange           *range,
1103                                          GtkSensitivityType  sensitivity)
1104 {
1105   GtkRangePrivate *priv;
1106
1107   g_return_if_fail (GTK_IS_RANGE (range));
1108
1109   priv = range->priv;
1110
1111   if (priv->lower_sensitivity != sensitivity)
1112     {
1113       priv->lower_sensitivity = sensitivity;
1114
1115       priv->need_recalc = TRUE;
1116       gtk_range_calc_layout (range, gtk_adjustment_get_value (priv->adjustment));
1117       gtk_widget_queue_draw (GTK_WIDGET (range));
1118
1119       g_object_notify (G_OBJECT (range), "lower-stepper-sensitivity");
1120     }
1121 }
1122
1123 /**
1124  * gtk_range_get_lower_stepper_sensitivity:
1125  * @range: a #GtkRange
1126  *
1127  * Gets the sensitivity policy for the stepper that points to the
1128  * 'lower' end of the GtkRange's adjustment.
1129  *
1130  * Return value: The lower stepper's sensitivity policy.
1131  *
1132  * Since: 2.10
1133  **/
1134 GtkSensitivityType
1135 gtk_range_get_lower_stepper_sensitivity (GtkRange *range)
1136 {
1137   g_return_val_if_fail (GTK_IS_RANGE (range), GTK_SENSITIVITY_AUTO);
1138
1139   return range->priv->lower_sensitivity;
1140 }
1141
1142 /**
1143  * gtk_range_set_upper_stepper_sensitivity:
1144  * @range:       a #GtkRange
1145  * @sensitivity: the upper stepper's sensitivity policy.
1146  *
1147  * Sets the sensitivity policy for the stepper that points to the
1148  * 'upper' end of the GtkRange's adjustment.
1149  *
1150  * Since: 2.10
1151  **/
1152 void
1153 gtk_range_set_upper_stepper_sensitivity (GtkRange           *range,
1154                                          GtkSensitivityType  sensitivity)
1155 {
1156   GtkRangePrivate *priv;
1157
1158   g_return_if_fail (GTK_IS_RANGE (range));
1159
1160   priv = range->priv;
1161
1162   if (priv->upper_sensitivity != sensitivity)
1163     {
1164       priv->upper_sensitivity = sensitivity;
1165
1166       priv->need_recalc = TRUE;
1167       gtk_range_calc_layout (range, gtk_adjustment_get_value (priv->adjustment));
1168       gtk_widget_queue_draw (GTK_WIDGET (range));
1169
1170       g_object_notify (G_OBJECT (range), "upper-stepper-sensitivity");
1171     }
1172 }
1173
1174 /**
1175  * gtk_range_get_upper_stepper_sensitivity:
1176  * @range: a #GtkRange
1177  *
1178  * Gets the sensitivity policy for the stepper that points to the
1179  * 'upper' end of the GtkRange's adjustment.
1180  *
1181  * Return value: The upper stepper's sensitivity policy.
1182  *
1183  * Since: 2.10
1184  **/
1185 GtkSensitivityType
1186 gtk_range_get_upper_stepper_sensitivity (GtkRange *range)
1187 {
1188   g_return_val_if_fail (GTK_IS_RANGE (range), GTK_SENSITIVITY_AUTO);
1189
1190   return range->priv->upper_sensitivity;
1191 }
1192
1193 /**
1194  * gtk_range_set_increments:
1195  * @range: a #GtkRange
1196  * @step: step size
1197  * @page: page size
1198  *
1199  * Sets the step and page sizes for the range.
1200  * The step size is used when the user clicks the #GtkScrollbar
1201  * arrows or moves #GtkScale via arrow keys. The page size
1202  * is used for example when moving via Page Up or Page Down keys.
1203  **/
1204 void
1205 gtk_range_set_increments (GtkRange *range,
1206                           gdouble   step,
1207                           gdouble   page)
1208 {
1209   GtkAdjustment *adjustment;
1210
1211   g_return_if_fail (GTK_IS_RANGE (range));
1212
1213   adjustment = range->priv->adjustment;
1214
1215   gtk_adjustment_configure (adjustment,
1216                             gtk_adjustment_get_value (adjustment),
1217                             gtk_adjustment_get_lower (adjustment),
1218                             gtk_adjustment_get_upper (adjustment),
1219                             step,
1220                             page,
1221                             gtk_adjustment_get_page_size (adjustment));
1222 }
1223
1224 /**
1225  * gtk_range_set_range:
1226  * @range: a #GtkRange
1227  * @min: minimum range value
1228  * @max: maximum range value
1229  * 
1230  * Sets the allowable values in the #GtkRange, and clamps the range
1231  * value to be between @min and @max. (If the range has a non-zero
1232  * page size, it is clamped between @min and @max - page-size.)
1233  **/
1234 void
1235 gtk_range_set_range (GtkRange *range,
1236                      gdouble   min,
1237                      gdouble   max)
1238 {
1239   GtkRangePrivate *priv;
1240   GtkAdjustment *adjustment;
1241   gdouble value;
1242   
1243   g_return_if_fail (GTK_IS_RANGE (range));
1244   g_return_if_fail (min <= max);
1245
1246   priv = range->priv;
1247   adjustment = priv->adjustment;
1248
1249   value = gtk_adjustment_get_value (adjustment);
1250   if (priv->restrict_to_fill_level)
1251     value = MIN (value, MAX (gtk_adjustment_get_lower (adjustment),
1252                              priv->fill_level));
1253
1254   gtk_adjustment_configure (adjustment,
1255                             value,
1256                             min,
1257                             max,
1258                             gtk_adjustment_get_step_increment (adjustment),
1259                             gtk_adjustment_get_page_increment (adjustment),
1260                             gtk_adjustment_get_page_size (adjustment));
1261 }
1262
1263 /**
1264  * gtk_range_set_value:
1265  * @range: a #GtkRange
1266  * @value: new value of the range
1267  *
1268  * Sets the current value of the range; if the value is outside the
1269  * minimum or maximum range values, it will be clamped to fit inside
1270  * them. The range emits the #GtkRange::value-changed signal if the 
1271  * value changes.
1272  **/
1273 void
1274 gtk_range_set_value (GtkRange *range,
1275                      gdouble   value)
1276 {
1277   GtkRangePrivate *priv;
1278
1279   g_return_if_fail (GTK_IS_RANGE (range));
1280
1281   priv = range->priv;
1282
1283   if (priv->restrict_to_fill_level)
1284     value = MIN (value, MAX (gtk_adjustment_get_lower (priv->adjustment),
1285                              priv->fill_level));
1286
1287   gtk_adjustment_set_value (priv->adjustment, value);
1288 }
1289
1290 /**
1291  * gtk_range_get_value:
1292  * @range: a #GtkRange
1293  * 
1294  * Gets the current value of the range.
1295  * 
1296  * Return value: current value of the range.
1297  **/
1298 gdouble
1299 gtk_range_get_value (GtkRange *range)
1300 {
1301   g_return_val_if_fail (GTK_IS_RANGE (range), 0.0);
1302
1303   return gtk_adjustment_get_value (range->priv->adjustment);
1304 }
1305
1306 /**
1307  * gtk_range_set_show_fill_level:
1308  * @range:           A #GtkRange
1309  * @show_fill_level: Whether a fill level indicator graphics is shown.
1310  *
1311  * Sets whether a graphical fill level is show on the trough. See
1312  * gtk_range_set_fill_level() for a general description of the fill
1313  * level concept.
1314  *
1315  * Since: 2.12
1316  **/
1317 void
1318 gtk_range_set_show_fill_level (GtkRange *range,
1319                                gboolean  show_fill_level)
1320 {
1321   GtkRangePrivate *priv;
1322
1323   g_return_if_fail (GTK_IS_RANGE (range));
1324
1325   priv = range->priv;
1326
1327   show_fill_level = show_fill_level ? TRUE : FALSE;
1328
1329   if (show_fill_level != priv->show_fill_level)
1330     {
1331       priv->show_fill_level = show_fill_level;
1332       g_object_notify (G_OBJECT (range), "show-fill-level");
1333       gtk_widget_queue_draw (GTK_WIDGET (range));
1334     }
1335 }
1336
1337 /**
1338  * gtk_range_get_show_fill_level:
1339  * @range: A #GtkRange
1340  *
1341  * Gets whether the range displays the fill level graphically.
1342  *
1343  * Return value: %TRUE if @range shows the fill level.
1344  *
1345  * Since: 2.12
1346  **/
1347 gboolean
1348 gtk_range_get_show_fill_level (GtkRange *range)
1349 {
1350   g_return_val_if_fail (GTK_IS_RANGE (range), FALSE);
1351
1352   return range->priv->show_fill_level;
1353 }
1354
1355 /**
1356  * gtk_range_set_restrict_to_fill_level:
1357  * @range:                  A #GtkRange
1358  * @restrict_to_fill_level: Whether the fill level restricts slider movement.
1359  *
1360  * Sets whether the slider is restricted to the fill level. See
1361  * gtk_range_set_fill_level() for a general description of the fill
1362  * level concept.
1363  *
1364  * Since: 2.12
1365  **/
1366 void
1367 gtk_range_set_restrict_to_fill_level (GtkRange *range,
1368                                       gboolean  restrict_to_fill_level)
1369 {
1370   GtkRangePrivate *priv;
1371
1372   g_return_if_fail (GTK_IS_RANGE (range));
1373
1374   priv = range->priv;
1375
1376   restrict_to_fill_level = restrict_to_fill_level ? TRUE : FALSE;
1377
1378   if (restrict_to_fill_level != priv->restrict_to_fill_level)
1379     {
1380       priv->restrict_to_fill_level = restrict_to_fill_level;
1381       g_object_notify (G_OBJECT (range), "restrict-to-fill-level");
1382
1383       gtk_range_set_value (range, gtk_range_get_value (range));
1384     }
1385 }
1386
1387 /**
1388  * gtk_range_get_restrict_to_fill_level:
1389  * @range: A #GtkRange
1390  *
1391  * Gets whether the range is restricted to the fill level.
1392  *
1393  * Return value: %TRUE if @range is restricted to the fill level.
1394  *
1395  * Since: 2.12
1396  **/
1397 gboolean
1398 gtk_range_get_restrict_to_fill_level (GtkRange *range)
1399 {
1400   g_return_val_if_fail (GTK_IS_RANGE (range), FALSE);
1401
1402   return range->priv->restrict_to_fill_level;
1403 }
1404
1405 /**
1406  * gtk_range_set_fill_level:
1407  * @range: a #GtkRange
1408  * @fill_level: the new position of the fill level indicator
1409  *
1410  * Set the new position of the fill level indicator.
1411  *
1412  * The "fill level" is probably best described by its most prominent
1413  * use case, which is an indicator for the amount of pre-buffering in
1414  * a streaming media player. In that use case, the value of the range
1415  * would indicate the current play position, and the fill level would
1416  * be the position up to which the file/stream has been downloaded.
1417  *
1418  * This amount of prebuffering can be displayed on the range's trough
1419  * and is themeable separately from the trough. To enable fill level
1420  * display, use gtk_range_set_show_fill_level(). The range defaults
1421  * to not showing the fill level.
1422  *
1423  * Additionally, it's possible to restrict the range's slider position
1424  * to values which are smaller than the fill level. This is controller
1425  * by gtk_range_set_restrict_to_fill_level() and is by default
1426  * enabled.
1427  *
1428  * Since: 2.12
1429  **/
1430 void
1431 gtk_range_set_fill_level (GtkRange *range,
1432                           gdouble   fill_level)
1433 {
1434   GtkRangePrivate *priv;
1435
1436   g_return_if_fail (GTK_IS_RANGE (range));
1437
1438   priv = range->priv;
1439
1440   if (fill_level != priv->fill_level)
1441     {
1442       priv->fill_level = fill_level;
1443       g_object_notify (G_OBJECT (range), "fill-level");
1444
1445       if (priv->show_fill_level)
1446         gtk_widget_queue_draw (GTK_WIDGET (range));
1447
1448       if (priv->restrict_to_fill_level)
1449         gtk_range_set_value (range, gtk_range_get_value (range));
1450     }
1451 }
1452
1453 /**
1454  * gtk_range_get_fill_level:
1455  * @range: A #GtkRange
1456  *
1457  * Gets the current position of the fill level indicator.
1458  *
1459  * Return value: The current fill level
1460  *
1461  * Since: 2.12
1462  **/
1463 gdouble
1464 gtk_range_get_fill_level (GtkRange *range)
1465 {
1466   g_return_val_if_fail (GTK_IS_RANGE (range), 0.0);
1467
1468   return range->priv->fill_level;
1469 }
1470
1471 static gboolean
1472 should_invert (GtkRange *range)
1473 {
1474   GtkRangePrivate *priv = range->priv;
1475
1476   if (priv->orientation == GTK_ORIENTATION_HORIZONTAL)
1477     return
1478       (priv->inverted && !priv->flippable) ||
1479       (priv->inverted && priv->flippable && gtk_widget_get_direction (GTK_WIDGET (range)) == GTK_TEXT_DIR_LTR) ||
1480       (!priv->inverted && priv->flippable && gtk_widget_get_direction (GTK_WIDGET (range)) == GTK_TEXT_DIR_RTL);
1481   else
1482     return priv->inverted;
1483 }
1484
1485 static void
1486 gtk_range_destroy (GtkWidget *widget)
1487 {
1488   GtkRange *range = GTK_RANGE (widget);
1489   GtkRangePrivate *priv = range->priv;
1490
1491   gtk_range_remove_step_timer (range);
1492
1493   if (priv->repaint_id)
1494     g_source_remove (priv->repaint_id);
1495   priv->repaint_id = 0;
1496
1497   if (priv->adjustment)
1498     {
1499       g_signal_handlers_disconnect_by_func (priv->adjustment,
1500                                             gtk_range_adjustment_changed,
1501                                             range);
1502       g_signal_handlers_disconnect_by_func (priv->adjustment,
1503                                             gtk_range_adjustment_value_changed,
1504                                             range);
1505       g_object_unref (priv->adjustment);
1506       priv->adjustment = NULL;
1507     }
1508
1509   if (priv->n_marks)
1510     {
1511       g_free (priv->marks);
1512       priv->marks = NULL;
1513       g_free (priv->mark_pos);
1514       priv->mark_pos = NULL;
1515       priv->n_marks = 0;
1516     }
1517
1518   GTK_WIDGET_CLASS (gtk_range_parent_class)->destroy (widget);
1519 }
1520
1521 static void
1522 gtk_range_get_preferred_width (GtkWidget *widget,
1523                                gint      *minimum,
1524                                gint      *natural)
1525 {
1526   GtkRange *range;
1527   gint slider_width, stepper_size, focus_width, trough_border, stepper_spacing;
1528   GdkRectangle range_rect;
1529   GtkBorder border;
1530
1531   range = GTK_RANGE (widget);
1532
1533   gtk_range_get_props (range,
1534                        &slider_width, &stepper_size,
1535                        &focus_width, &trough_border,
1536                        &stepper_spacing, NULL,
1537                        NULL, NULL);
1538
1539   gtk_range_calc_request (range,
1540                           slider_width, stepper_size,
1541                           focus_width, trough_border, stepper_spacing,
1542                           &range_rect, &border, NULL, NULL, NULL, NULL);
1543
1544   *minimum = *natural = range_rect.width + border.left + border.right;
1545 }
1546
1547 static void
1548 gtk_range_get_preferred_height (GtkWidget *widget,
1549                                 gint      *minimum,
1550                                 gint      *natural)
1551 {
1552   GtkRange *range;
1553   gint slider_width, stepper_size, focus_width, trough_border, stepper_spacing;
1554   GdkRectangle range_rect;
1555   GtkBorder border;
1556
1557   range = GTK_RANGE (widget);
1558
1559   gtk_range_get_props (range,
1560                        &slider_width, &stepper_size,
1561                        &focus_width, &trough_border,
1562                        &stepper_spacing, NULL,
1563                        NULL, NULL);
1564
1565   gtk_range_calc_request (range,
1566                           slider_width, stepper_size,
1567                           focus_width, trough_border, stepper_spacing,
1568                           &range_rect, &border, NULL, NULL, NULL, NULL);
1569
1570   *minimum = *natural = range_rect.height + border.top + border.bottom;
1571 }
1572
1573 static gboolean
1574 modify_allocation_for_window_grip (GtkWidget     *widget,
1575                                    GtkAllocation *allocation)
1576 {
1577   GtkRange *range = GTK_RANGE (widget);
1578   GtkRangePrivate *priv = range->priv;
1579   GtkWidget *window, *parent;
1580   GdkRectangle grip_rect;
1581   GdkRectangle translated_rect;
1582   gint x;
1583   gint y;
1584
1585   window = gtk_widget_get_toplevel (widget);
1586   if (!GTK_IS_WINDOW (window))
1587     return FALSE;
1588
1589   if (!gtk_window_resize_grip_is_visible (GTK_WINDOW (window)))
1590     return FALSE;
1591
1592   /* Get the area of the window's corner grip */
1593   gtk_window_get_resize_grip_area (GTK_WINDOW (window), &grip_rect);
1594
1595   x = 0;
1596   y = 0;
1597
1598   /* Translate the stepper's area into window coords.
1599    * This is slightly tricky. We can't just use
1600    * gtk_widget_translate_coordinates (widget, window, 0, 0, &x, &y)
1601    * since that translates wrt to the _current_ allocation
1602    * and will lead to alternating between overlap and nonoverlap
1603    * for successive allocations.
1604    * Therefore, we find the window-widget to whose window allocation
1605    * is relative, and translate from there upwards.
1606    */
1607   parent = widget;
1608   while (gtk_widget_get_window (parent) == gtk_widget_get_window (widget) &&
1609          parent != window)
1610     {
1611       parent = gtk_widget_get_parent (parent);
1612     }
1613
1614   if (parent == window)
1615     translated_rect = *allocation;
1616   else
1617     {
1618       gtk_widget_translate_coordinates (gtk_widget_get_parent (widget),
1619                                         window,
1620                                         allocation->x, allocation->y,
1621                                         &x, &y);
1622       translated_rect.x = x;
1623       translated_rect.y = y;
1624       translated_rect.width = allocation->width;
1625       translated_rect.height = allocation->height;
1626     }
1627
1628   /* If the stepper button intersects the window resize grip.. */
1629   if (gdk_rectangle_intersect (&grip_rect, &translated_rect, NULL))
1630     {
1631       if (priv->orientation == GTK_ORIENTATION_HORIZONTAL)
1632         {
1633           allocation->width -= grip_rect.width;
1634           if (gtk_widget_get_direction (window) == GTK_TEXT_DIR_RTL)
1635             allocation->x += grip_rect.width;
1636         }
1637       else
1638         {
1639           allocation->height -= grip_rect.height;
1640         }
1641
1642       return TRUE;
1643     }
1644
1645   return FALSE;
1646 }
1647
1648 static void
1649 gtk_range_size_allocate (GtkWidget     *widget,
1650                          GtkAllocation *allocation)
1651 {
1652   GtkRange *range = GTK_RANGE (widget);
1653   GtkRangePrivate *priv = range->priv;
1654
1655   modify_allocation_for_window_grip (widget, allocation);
1656   gtk_widget_set_allocation (widget, allocation);
1657
1658   priv->recalc_marks = TRUE;
1659
1660   priv->need_recalc = TRUE;
1661   gtk_range_calc_layout (range, gtk_adjustment_get_value (priv->adjustment));
1662
1663   if (gtk_widget_get_realized (widget))
1664     gdk_window_move_resize (priv->event_window,
1665                             allocation->x, allocation->y,
1666                             allocation->width, allocation->height);
1667 }
1668
1669 static void
1670 resize_grip_visible_changed (GObject    *object,
1671                              GParamSpec *pspec,
1672                              gpointer    user_data)
1673 {
1674   gtk_widget_queue_resize (GTK_WIDGET (user_data));
1675 }
1676
1677 static void
1678 gtk_range_hierarchy_changed (GtkWidget *widget,
1679                              GtkWidget *previous_toplevel)
1680 {
1681   GtkWidget *window;
1682
1683   if (previous_toplevel)
1684     g_signal_handlers_disconnect_by_func (previous_toplevel,
1685                                           G_CALLBACK (resize_grip_visible_changed),
1686                                           widget);
1687   window = gtk_widget_get_toplevel (widget);
1688   if (gtk_widget_is_toplevel (window))
1689     g_signal_connect (window, "notify::resize-grip-visible",
1690                       G_CALLBACK (resize_grip_visible_changed), widget);
1691 }
1692
1693 static void
1694 gtk_range_realize (GtkWidget *widget)
1695 {
1696   GtkAllocation allocation;
1697   GtkRange *range = GTK_RANGE (widget);
1698   GtkRangePrivate *priv = range->priv;
1699   GdkWindow *window;
1700   GdkWindowAttr attributes;
1701   gint attributes_mask;
1702
1703   gtk_range_calc_layout (range, gtk_adjustment_get_value (priv->adjustment));
1704
1705   gtk_widget_set_realized (widget, TRUE);
1706
1707   window = gtk_widget_get_parent_window (widget);
1708   gtk_widget_set_window (widget, window);
1709   g_object_ref (window);
1710
1711   gtk_widget_get_allocation (widget, &allocation);
1712   if (modify_allocation_for_window_grip (widget, &allocation))
1713     gtk_widget_set_allocation (widget, &allocation);
1714
1715   attributes.window_type = GDK_WINDOW_CHILD;
1716   attributes.x = allocation.x;
1717   attributes.y = allocation.y;
1718   attributes.width = allocation.width;
1719   attributes.height = allocation.height;
1720   attributes.wclass = GDK_INPUT_ONLY;
1721   attributes.event_mask = gtk_widget_get_events (widget);
1722   attributes.event_mask |= (GDK_BUTTON_PRESS_MASK |
1723                             GDK_BUTTON_RELEASE_MASK |
1724                             GDK_ENTER_NOTIFY_MASK |
1725                             GDK_LEAVE_NOTIFY_MASK |
1726                             GDK_POINTER_MOTION_MASK |
1727                             GDK_POINTER_MOTION_HINT_MASK);
1728
1729   attributes_mask = GDK_WA_X | GDK_WA_Y;
1730
1731   priv->event_window = gdk_window_new (gtk_widget_get_parent_window (widget),
1732                                         &attributes, attributes_mask);
1733   gdk_window_set_user_data (priv->event_window, range);
1734 }
1735
1736 static void
1737 gtk_range_unrealize (GtkWidget *widget)
1738 {
1739   GtkRange *range = GTK_RANGE (widget);
1740   GtkRangePrivate *priv = range->priv;
1741
1742   gtk_range_remove_step_timer (range);
1743
1744   gdk_window_set_user_data (priv->event_window, NULL);
1745   gdk_window_destroy (priv->event_window);
1746   priv->event_window = NULL;
1747
1748   GTK_WIDGET_CLASS (gtk_range_parent_class)->unrealize (widget);
1749 }
1750
1751 static void
1752 gtk_range_map (GtkWidget *widget)
1753 {
1754   GtkRange *range = GTK_RANGE (widget);
1755   GtkRangePrivate *priv = range->priv;
1756
1757   gdk_window_show (priv->event_window);
1758
1759   GTK_WIDGET_CLASS (gtk_range_parent_class)->map (widget);
1760 }
1761
1762 static void
1763 gtk_range_unmap (GtkWidget *widget)
1764 {
1765   GtkRange *range = GTK_RANGE (widget);
1766   GtkRangePrivate *priv = range->priv;
1767
1768   stop_scrolling (range);
1769
1770   gdk_window_hide (priv->event_window);
1771
1772   GTK_WIDGET_CLASS (gtk_range_parent_class)->unmap (widget);
1773 }
1774
1775 static void
1776 _gtk_range_update_context_for_stepper (GtkRange        *range,
1777                                        GtkStyleContext *context,
1778                                        Stepper          stepper)
1779 {
1780   GtkRangePrivate *priv = range->priv;
1781   GtkJunctionSides sides = 0;
1782   gboolean vertical, is_rtl;
1783
1784   vertical = (priv->orientation == GTK_ORIENTATION_VERTICAL);
1785   is_rtl = (gtk_widget_get_direction (GTK_WIDGET (range)) == GTK_TEXT_DIR_RTL);
1786
1787   /* Take junction sides from what's been
1788    * previously set to the widget itself
1789    */
1790   sides = gtk_style_context_get_junction_sides (context);
1791
1792   if (vertical)
1793     sides &= ~(GTK_JUNCTION_TOP | GTK_JUNCTION_BOTTOM);
1794   else
1795     sides &= ~(GTK_JUNCTION_LEFT | GTK_JUNCTION_RIGHT);
1796
1797   switch (stepper)
1798     {
1799     case STEPPER_A:
1800       if (vertical)
1801         sides |= GTK_JUNCTION_BOTTOM;
1802       else
1803         sides |= (is_rtl) ? GTK_JUNCTION_LEFT : GTK_JUNCTION_RIGHT;
1804       break;
1805     case STEPPER_B:
1806       if (priv->has_stepper_a)
1807         {
1808           if (vertical)
1809             sides |= GTK_JUNCTION_TOP;
1810           else
1811             sides |= (is_rtl) ? GTK_JUNCTION_RIGHT : GTK_JUNCTION_LEFT;
1812         }
1813
1814       if (vertical)
1815         sides |= GTK_JUNCTION_BOTTOM;
1816       else
1817         sides |= (is_rtl) ? GTK_JUNCTION_LEFT : GTK_JUNCTION_RIGHT;
1818       break;
1819     case STEPPER_C:
1820       if (priv->has_stepper_d)
1821         {
1822           if (vertical)
1823             sides |= GTK_JUNCTION_BOTTOM;
1824           else
1825             sides |= (is_rtl) ? GTK_JUNCTION_LEFT : GTK_JUNCTION_RIGHT;
1826         }
1827
1828       if (vertical)
1829         sides |= GTK_JUNCTION_TOP;
1830       else
1831         sides |= (is_rtl) ? GTK_JUNCTION_RIGHT : GTK_JUNCTION_LEFT;
1832       break;
1833     case STEPPER_D:
1834       if (vertical)
1835         sides |= GTK_JUNCTION_TOP;
1836       else
1837         sides |= (is_rtl) ? GTK_JUNCTION_RIGHT : GTK_JUNCTION_LEFT;
1838       break;
1839     }
1840
1841   gtk_style_context_set_junction_sides (context, sides);
1842 }
1843
1844 static void
1845 draw_stepper (GtkRange     *range,
1846               Stepper       stepper,
1847               cairo_t      *cr,
1848               GtkArrowType  arrow_type,
1849               gboolean      clicked,
1850               gboolean      prelighted)
1851 {
1852   GtkRangePrivate *priv = range->priv;
1853   GtkAllocation allocation;
1854   GtkStateFlags state = 0;
1855   GtkStyleContext *context;
1856   GtkWidget *widget = GTK_WIDGET (range);
1857   gfloat arrow_scaling;
1858   GdkRectangle *rect;
1859   gdouble arrow_x;
1860   gdouble arrow_y;
1861   gdouble arrow_size, angle;
1862   gboolean arrow_sensitive;
1863
1864   switch (stepper)
1865     {
1866     case STEPPER_A:
1867       rect = &priv->stepper_a;
1868       break;
1869     case STEPPER_B:
1870       rect = &priv->stepper_b;
1871       break;
1872     case STEPPER_C:
1873       rect = &priv->stepper_c;
1874       break;
1875     case STEPPER_D:
1876       rect = &priv->stepper_d;
1877       break;
1878     default:
1879       g_assert_not_reached ();
1880     };
1881
1882   arrow_sensitive = TRUE;
1883
1884   gtk_widget_get_allocation (widget, &allocation);
1885
1886   if ((!priv->inverted && (arrow_type == GTK_ARROW_DOWN ||
1887                             arrow_type == GTK_ARROW_RIGHT)) ||
1888       (priv->inverted  && (arrow_type == GTK_ARROW_UP ||
1889                             arrow_type == GTK_ARROW_LEFT)))
1890     {
1891       arrow_sensitive = priv->upper_sensitive;
1892     }
1893   else
1894     {
1895       arrow_sensitive = priv->lower_sensitive;
1896     }
1897
1898   if (!gtk_widget_is_sensitive (GTK_WIDGET (range)) || !arrow_sensitive)
1899     state = GTK_STATE_FLAG_INSENSITIVE;
1900   else
1901     {
1902       if (clicked)
1903         state |= GTK_STATE_FLAG_ACTIVE;
1904       if (prelighted)
1905         state |= GTK_STATE_FLAG_PRELIGHT;
1906     }
1907
1908   context = gtk_widget_get_style_context (widget);
1909
1910   gtk_style_context_save (context);
1911
1912   /* don't set juction sides on scrollbar steppers */
1913   if (gtk_style_context_has_class (context, GTK_STYLE_CLASS_SCROLLBAR))
1914     gtk_style_context_set_junction_sides (context, GTK_JUNCTION_NONE);
1915   else
1916     _gtk_range_update_context_for_stepper (range, context, stepper);
1917
1918   gtk_style_context_add_class (context, GTK_STYLE_CLASS_BUTTON);
1919   gtk_style_context_set_state (context, state);
1920
1921   gtk_render_background (context, cr,
1922                          rect->x, rect->y,
1923                          rect->width, rect->height);
1924   gtk_render_frame (context, cr,
1925                     rect->x, rect->y,
1926                     rect->width, rect->height);
1927
1928   gtk_widget_style_get (widget, "arrow-scaling", &arrow_scaling, NULL);
1929
1930   arrow_size = MIN (rect->width, rect->height) * arrow_scaling;
1931   arrow_x = rect->x + (rect->width - arrow_size) / 2;
1932   arrow_y = rect->y + (rect->height - arrow_size) / 2;
1933
1934   if (clicked && arrow_sensitive)
1935     {
1936       gint arrow_displacement_x;
1937       gint arrow_displacement_y;
1938
1939       gtk_range_get_props (GTK_RANGE (widget),
1940                            NULL, NULL, NULL, NULL, NULL, NULL,
1941                            &arrow_displacement_x, &arrow_displacement_y);
1942
1943       arrow_x += arrow_displacement_x;
1944       arrow_y += arrow_displacement_y;
1945     }
1946
1947   switch (arrow_type)
1948     {
1949     case GTK_ARROW_RIGHT:
1950       angle = G_PI / 2;
1951       break;
1952     case GTK_ARROW_DOWN:
1953       angle = G_PI;
1954       break;
1955     case GTK_ARROW_LEFT:
1956       angle = 3 * (G_PI / 2);
1957       break;
1958     case GTK_ARROW_UP:
1959     default:
1960       angle = 0;
1961       break;
1962     }
1963
1964   gtk_render_arrow (context, cr,
1965                     angle,
1966                     arrow_x, arrow_y,
1967                     arrow_size);
1968
1969   gtk_style_context_restore (context);
1970 }
1971
1972 static gboolean
1973 gtk_range_draw (GtkWidget *widget,
1974                 cairo_t   *cr)
1975 {
1976   GtkRange *range = GTK_RANGE (widget);
1977   GtkRangePrivate *priv = range->priv;
1978   gboolean sensitive;
1979   GtkStateFlags state = 0;
1980   gint focus_line_width = 0;
1981   gint focus_padding = 0;
1982   gboolean touchscreen;
1983   gboolean draw_trough = TRUE;
1984   GtkStyleContext *context;
1985
1986   context = gtk_widget_get_style_context (widget);
1987   g_object_get (gtk_widget_get_settings (widget),
1988                 "gtk-touchscreen-mode", &touchscreen,
1989                 NULL);
1990
1991   if (GTK_IS_SCALE (widget) &&
1992       gtk_adjustment_get_upper (priv->adjustment) == gtk_adjustment_get_lower (priv->adjustment))
1993     draw_trough = FALSE;
1994
1995   if (gtk_widget_get_can_focus (GTK_WIDGET (range)))
1996     gtk_widget_style_get (GTK_WIDGET (range),
1997                           "focus-line-width", &focus_line_width,
1998                           "focus-padding", &focus_padding,
1999                           NULL);
2000
2001   /* we're now exposing, so there's no need to force early repaints */
2002   if (priv->repaint_id)
2003     g_source_remove (priv->repaint_id);
2004   priv->repaint_id = 0;
2005
2006   gtk_range_calc_marks (range);
2007   gtk_range_calc_layout (range, gtk_adjustment_get_value (priv->adjustment));
2008
2009   sensitive = gtk_widget_is_sensitive (widget);
2010
2011   /* Just to be confusing, we draw the trough for the whole
2012    * range rectangle, not the trough rectangle (the trough
2013    * rectangle is just for hit detection)
2014    */
2015   cairo_save (cr);
2016   gdk_cairo_rectangle (cr, &priv->range_rect);
2017   cairo_clip (cr);
2018
2019     {
2020       gint     x      = (priv->range_rect.x +
2021                          focus_line_width + focus_padding);
2022       gint     y      = (priv->range_rect.y +
2023                          focus_line_width + focus_padding);
2024       gint     width  = (priv->range_rect.width -
2025                          2 * (focus_line_width + focus_padding));
2026       gint     height = (priv->range_rect.height -
2027                          2 * (focus_line_width + focus_padding));
2028       gboolean trough_under_steppers;
2029       gint     stepper_size;
2030       gint     stepper_spacing;
2031
2032       gtk_widget_style_get (GTK_WIDGET (range),
2033                             "trough-under-steppers", &trough_under_steppers,
2034                             "stepper-size",          &stepper_size,
2035                             "stepper-spacing",       &stepper_spacing,
2036                             NULL);
2037
2038       gtk_style_context_save (context);
2039
2040       if (!sensitive)
2041         gtk_style_context_set_state (context, GTK_STATE_FLAG_INSENSITIVE);
2042
2043       if (!trough_under_steppers)
2044         {
2045           gint offset  = 0;
2046           gint shorter = 0;
2047
2048           if (priv->has_stepper_a)
2049             offset += stepper_size;
2050
2051           if (priv->has_stepper_b)
2052             offset += stepper_size;
2053
2054           shorter += offset;
2055
2056           if (priv->has_stepper_c)
2057             shorter += stepper_size;
2058
2059           if (priv->has_stepper_d)
2060             shorter += stepper_size;
2061
2062           if (priv->has_stepper_a || priv->has_stepper_b)
2063             {
2064               offset  += stepper_spacing;
2065               shorter += stepper_spacing;
2066             }
2067
2068           if (priv->has_stepper_c || priv->has_stepper_d)
2069             {
2070               shorter += stepper_spacing;
2071             }
2072
2073           if (priv->orientation == GTK_ORIENTATION_HORIZONTAL)
2074             {
2075               x     += offset;
2076               width -= shorter;
2077             }
2078           else
2079             {
2080               y      += offset;
2081               height -= shorter;
2082             }
2083         }
2084
2085       gtk_style_context_save (context);
2086       gtk_style_context_add_class (context, GTK_STYLE_CLASS_TROUGH);
2087
2088       if (draw_trough)
2089         {
2090           gint trough_change_pos_x = width;
2091           gint trough_change_pos_y = height;
2092
2093           if (priv->orientation == GTK_ORIENTATION_HORIZONTAL)
2094             trough_change_pos_x = (priv->slider.x +
2095                                    priv->slider.width / 2 -
2096                                    x);
2097           else
2098             trough_change_pos_y = (priv->slider.y +
2099                                    priv->slider.height / 2 -
2100                                    y);
2101
2102           /* FIXME: was trough-upper and trough-lower really used,
2103            * in that case, it should still be exposed somehow.
2104            */
2105           gtk_render_background (context, cr, x, y,
2106                                  trough_change_pos_x,
2107                                  trough_change_pos_y);
2108
2109           if (priv->orientation == GTK_ORIENTATION_HORIZONTAL)
2110             trough_change_pos_y = 0;
2111           else
2112             trough_change_pos_x = 0;
2113
2114           gtk_render_background (context, cr,
2115                                  x + trough_change_pos_x, y + trough_change_pos_y,
2116                                  width - trough_change_pos_x,
2117                                  height - trough_change_pos_y);
2118
2119           gtk_render_frame (context, cr,
2120                             x, y, width, height);
2121         }
2122       else
2123         {
2124           gtk_render_background (context, cr,
2125                                  x, y, width, height);
2126           gtk_render_frame (context, cr,
2127                             x, y, width, height);
2128         }
2129
2130       gtk_style_context_restore (context);
2131
2132       if (priv->show_fill_level &&
2133           gtk_adjustment_get_upper (priv->adjustment) - gtk_adjustment_get_page_size (priv->adjustment) -
2134           gtk_adjustment_get_lower (priv->adjustment) != 0)
2135         {
2136           gdouble  fill_level  = priv->fill_level;
2137           gint     fill_x      = x;
2138           gint     fill_y      = y;
2139           gint     fill_width  = width;
2140           gint     fill_height = height;
2141
2142           gtk_style_context_save (context);
2143           gtk_style_context_add_class (context, GTK_STYLE_CLASS_PROGRESSBAR);
2144
2145           fill_level = CLAMP (fill_level, gtk_adjustment_get_lower (priv->adjustment),
2146                               gtk_adjustment_get_upper (priv->adjustment) -
2147                               gtk_adjustment_get_page_size (priv->adjustment));
2148
2149           if (priv->orientation == GTK_ORIENTATION_HORIZONTAL)
2150             {
2151               fill_x     = priv->trough.x;
2152               fill_width = (priv->slider.width +
2153                             (fill_level - gtk_adjustment_get_lower (priv->adjustment)) /
2154                             (gtk_adjustment_get_upper (priv->adjustment) -
2155                              gtk_adjustment_get_lower (priv->adjustment) -
2156                              gtk_adjustment_get_page_size (priv->adjustment)) *
2157                             (priv->trough.width -
2158                              priv->slider.width));
2159
2160               if (should_invert (range))
2161                 fill_x += priv->trough.width - fill_width;
2162             }
2163           else
2164             {
2165               fill_y      = priv->trough.y;
2166               fill_height = (priv->slider.height +
2167                              (fill_level - gtk_adjustment_get_lower (priv->adjustment)) /
2168                              (gtk_adjustment_get_upper (priv->adjustment) -
2169                               gtk_adjustment_get_lower (priv->adjustment) -
2170                               gtk_adjustment_get_page_size (priv->adjustment)) *
2171                              (priv->trough.height -
2172                               priv->slider.height));
2173
2174               if (should_invert (range))
2175                 fill_y += priv->trough.height - fill_height;
2176             }
2177
2178 #if 0
2179           if (fill_level < gtk_adjustment_get_upper (priv->adjustment) - gtk_adjustment_get_page_size (priv->adjustment))
2180             fill_detail = "trough-fill-level-full";
2181           else
2182             fill_detail = "trough-fill-level";
2183 #endif
2184
2185           gtk_render_activity (context, cr,
2186                                fill_x, fill_y,
2187                                fill_width, fill_height);
2188
2189           gtk_style_context_restore (context);
2190         }
2191
2192       gtk_style_context_restore (context);
2193
2194       if (sensitive && gtk_widget_has_focus (widget))
2195         {
2196           gtk_style_context_save (context);
2197           gtk_style_context_set_state (context,
2198                                        gtk_widget_get_state_flags (widget));
2199
2200           gtk_render_focus (context, cr,
2201                             priv->range_rect.x,
2202                             priv->range_rect.y,
2203                             priv->range_rect.width,
2204                             priv->range_rect.height);
2205
2206           gtk_style_context_restore (context);
2207         }
2208     }
2209
2210   cairo_restore (cr);
2211
2212   if (!sensitive)
2213     state = GTK_STATE_FLAG_INSENSITIVE;
2214   else if (!touchscreen && priv->mouse_location == MOUSE_SLIDER)
2215     state = GTK_STATE_FLAG_PRELIGHT;
2216
2217   if (priv->grab_location == MOUSE_SLIDER)
2218     state |= GTK_STATE_FLAG_ACTIVE;
2219
2220   cairo_save (cr);
2221   gdk_cairo_rectangle (cr, &priv->slider);
2222   cairo_clip (cr);
2223
2224   if (draw_trough)
2225     {
2226       gtk_style_context_save (context);
2227       gtk_style_context_add_class (context, GTK_STYLE_CLASS_SLIDER);
2228       gtk_style_context_set_state (context, state);
2229
2230       gtk_render_slider (context, cr,
2231                          priv->slider.x,
2232                          priv->slider.y,
2233                          priv->slider.width,
2234                          priv->slider.height,
2235                          priv->orientation);
2236
2237       gtk_style_context_restore (context);
2238     }
2239
2240   cairo_restore (cr);
2241
2242   if (priv->has_stepper_a)
2243     draw_stepper (range, STEPPER_A, cr,
2244                   priv->orientation == GTK_ORIENTATION_VERTICAL ? GTK_ARROW_UP : GTK_ARROW_LEFT,
2245                   priv->grab_location == MOUSE_STEPPER_A,
2246                   !touchscreen && priv->mouse_location == MOUSE_STEPPER_A);
2247
2248   if (priv->has_stepper_b)
2249     draw_stepper (range, STEPPER_B, cr,
2250                   priv->orientation == GTK_ORIENTATION_VERTICAL ? GTK_ARROW_DOWN : GTK_ARROW_RIGHT,
2251                   priv->grab_location == MOUSE_STEPPER_B,
2252                   !touchscreen && priv->mouse_location == MOUSE_STEPPER_B);
2253
2254   if (priv->has_stepper_c)
2255     draw_stepper (range, STEPPER_C, cr,
2256                   priv->orientation == GTK_ORIENTATION_VERTICAL ? GTK_ARROW_UP : GTK_ARROW_LEFT,
2257                   priv->grab_location == MOUSE_STEPPER_C,
2258                   !touchscreen && priv->mouse_location == MOUSE_STEPPER_C);
2259
2260   if (priv->has_stepper_d)
2261     draw_stepper (range, STEPPER_D, cr,
2262                   priv->orientation == GTK_ORIENTATION_VERTICAL ? GTK_ARROW_DOWN : GTK_ARROW_RIGHT,
2263                   priv->grab_location == MOUSE_STEPPER_D,
2264                   !touchscreen && priv->mouse_location == MOUSE_STEPPER_D);
2265
2266   return FALSE;
2267 }
2268
2269 static void
2270 range_grab_add (GtkRange      *range,
2271                 GdkDevice     *device,
2272                 MouseLocation  location,
2273                 gint           button)
2274 {
2275   GtkRangePrivate *priv = range->priv;
2276
2277   if (device == priv->grab_device)
2278     return;
2279
2280   if (priv->grab_device != NULL)
2281     {
2282       g_warning ("GtkRange already had a grab device, releasing device grab");
2283       gtk_device_grab_remove (GTK_WIDGET (range), priv->grab_device);
2284     }
2285
2286   /* we don't actually gdk_grab, since a button is down */
2287   gtk_device_grab_add (GTK_WIDGET (range), device, TRUE);
2288
2289   priv->grab_location = location;
2290   priv->grab_button = button;
2291   priv->grab_device = device;
2292
2293   if (gtk_range_update_mouse_location (range))
2294     gtk_widget_queue_draw (GTK_WIDGET (range));
2295 }
2296
2297 static void
2298 range_grab_remove (GtkRange *range)
2299 {
2300   GtkRangePrivate *priv = range->priv;
2301   MouseLocation location;
2302
2303   if (priv->grab_device)
2304     {
2305       gtk_device_grab_remove (GTK_WIDGET (range),
2306                               priv->grab_device);
2307       priv->grab_device = NULL;
2308     }
2309
2310   location = priv->grab_location;
2311   priv->grab_location = MOUSE_OUTSIDE;
2312   priv->grab_button = 0;
2313
2314   if (gtk_range_update_mouse_location (range) ||
2315       location != MOUSE_OUTSIDE)
2316     gtk_widget_queue_draw (GTK_WIDGET (range));
2317 }
2318
2319 static GtkScrollType
2320 range_get_scroll_for_grab (GtkRange      *range)
2321 {
2322   GtkRangePrivate *priv = range->priv;
2323   gboolean invert;
2324
2325   invert = should_invert (range);
2326   switch (priv->grab_location)
2327     {
2328       /* Backward stepper */
2329     case MOUSE_STEPPER_A:
2330     case MOUSE_STEPPER_C:
2331       switch (priv->grab_button)
2332         {
2333         case 1:
2334           return invert ? GTK_SCROLL_STEP_FORWARD : GTK_SCROLL_STEP_BACKWARD;
2335           break;
2336         case 2:
2337           return invert ? GTK_SCROLL_PAGE_FORWARD : GTK_SCROLL_PAGE_BACKWARD;
2338           break;
2339         case 3:
2340           return invert ? GTK_SCROLL_END : GTK_SCROLL_START;
2341           break;
2342         }
2343       break;
2344
2345       /* Forward stepper */
2346     case MOUSE_STEPPER_B:
2347     case MOUSE_STEPPER_D:
2348       switch (priv->grab_button)
2349         {
2350         case 1:
2351           return invert ? GTK_SCROLL_STEP_BACKWARD : GTK_SCROLL_STEP_FORWARD;
2352           break;
2353         case 2:
2354           return invert ? GTK_SCROLL_PAGE_BACKWARD : GTK_SCROLL_PAGE_FORWARD;
2355           break;
2356         case 3:
2357           return invert ? GTK_SCROLL_START : GTK_SCROLL_END;
2358           break;
2359        }
2360       break;
2361
2362       /* In the trough */
2363     case MOUSE_TROUGH:
2364       {
2365         if (priv->trough_click_forward)
2366           return GTK_SCROLL_PAGE_FORWARD;
2367         else
2368           return GTK_SCROLL_PAGE_BACKWARD;
2369       }
2370       break;
2371
2372     case MOUSE_OUTSIDE:
2373     case MOUSE_SLIDER:
2374     case MOUSE_WIDGET:
2375       break;
2376     }
2377
2378   return GTK_SCROLL_NONE;
2379 }
2380
2381 static gdouble
2382 coord_to_value (GtkRange *range,
2383                 gint      coord)
2384 {
2385   GtkRangePrivate *priv = range->priv;
2386   gdouble frac;
2387   gdouble value;
2388   gint    trough_length;
2389   gint    trough_start;
2390   gint    slider_length;
2391   gint    trough_border;
2392   gint    trough_under_steppers;
2393
2394   if (priv->orientation == GTK_ORIENTATION_VERTICAL)
2395     {
2396       trough_length = priv->trough.height;
2397       trough_start  = priv->trough.y;
2398       slider_length = priv->slider.height;
2399     }
2400   else
2401     {
2402       trough_length = priv->trough.width;
2403       trough_start  = priv->trough.x;
2404       slider_length = priv->slider.width;
2405     }
2406
2407   gtk_range_get_props (range, NULL, NULL, NULL, &trough_border, NULL,
2408                        &trough_under_steppers, NULL, NULL);
2409
2410   if (! trough_under_steppers)
2411     {
2412       trough_start += trough_border;
2413       trough_length -= 2 * trough_border;
2414     }
2415
2416   if (trough_length == slider_length)
2417     frac = 1.0;
2418   else
2419     frac = (MAX (0, coord - trough_start) /
2420             (gdouble) (trough_length - slider_length));
2421
2422   if (should_invert (range))
2423     frac = 1.0 - frac;
2424
2425   value = gtk_adjustment_get_lower (priv->adjustment) + frac * (gtk_adjustment_get_upper (priv->adjustment) -
2426                                             gtk_adjustment_get_lower (priv->adjustment) -
2427                                             gtk_adjustment_get_page_size (priv->adjustment));
2428
2429   return value;
2430 }
2431
2432 static gboolean
2433 gtk_range_key_press (GtkWidget   *widget,
2434                      GdkEventKey *event)
2435 {
2436   GdkDevice *device;
2437   GtkRange *range = GTK_RANGE (widget);
2438   GtkRangePrivate *priv = range->priv;
2439
2440   device = gdk_event_get_device ((GdkEvent *) event);
2441   device = gdk_device_get_associated_device (device);
2442
2443   if (device == priv->grab_device &&
2444       event->keyval == GDK_KEY_Escape &&
2445       priv->grab_location != MOUSE_OUTSIDE)
2446     {
2447       stop_scrolling (range);
2448
2449       update_slider_position (range,
2450                               priv->slide_initial_coordinate,
2451                               priv->slide_initial_coordinate);
2452
2453       return TRUE;
2454     }
2455
2456   return GTK_WIDGET_CLASS (gtk_range_parent_class)->key_press_event (widget, event);
2457 }
2458
2459 static gint
2460 gtk_range_button_press (GtkWidget      *widget,
2461                         GdkEventButton *event)
2462 {
2463   GtkRange *range = GTK_RANGE (widget);
2464   GtkRangePrivate *priv = range->priv;
2465   GdkDevice *device;
2466
2467   if (!gtk_widget_has_focus (widget))
2468     gtk_widget_grab_focus (widget);
2469
2470   /* ignore presses when we're already doing something else. */
2471   if (priv->grab_location != MOUSE_OUTSIDE)
2472     return FALSE;
2473
2474   device = gdk_event_get_device ((GdkEvent *) event);
2475   priv->mouse_x = event->x;
2476   priv->mouse_y = event->y;
2477
2478   if (gtk_range_update_mouse_location (range))
2479     gtk_widget_queue_draw (widget);
2480
2481   if (priv->mouse_location == MOUSE_TROUGH  &&
2482       event->button == 1)
2483     {
2484       /* button 1 steps by page increment, as with button 2 on a stepper
2485        */
2486       GtkScrollType scroll;
2487       gdouble click_value;
2488       
2489       click_value = coord_to_value (range,
2490                                     priv->orientation == GTK_ORIENTATION_VERTICAL ?
2491                                     event->y : event->x);
2492
2493       priv->trough_click_forward = click_value > gtk_adjustment_get_value (priv->adjustment);
2494       range_grab_add (range, device, MOUSE_TROUGH, event->button);
2495       
2496       scroll = range_get_scroll_for_grab (range);
2497       
2498       gtk_range_add_step_timer (range, scroll);
2499
2500       return TRUE;
2501     }
2502   else if ((priv->mouse_location == MOUSE_STEPPER_A ||
2503             priv->mouse_location == MOUSE_STEPPER_B ||
2504             priv->mouse_location == MOUSE_STEPPER_C ||
2505             priv->mouse_location == MOUSE_STEPPER_D) &&
2506            (event->button == 1 || event->button == 2 || event->button == 3))
2507     {
2508       GtkAllocation allocation;
2509       GdkRectangle *stepper_area;
2510       GtkScrollType scroll;
2511
2512       range_grab_add (range, device, priv->mouse_location, event->button);
2513
2514       gtk_widget_get_allocation (widget, &allocation);
2515       stepper_area = get_area (range, priv->mouse_location);
2516
2517       gtk_widget_queue_draw_area (widget,
2518                                   allocation.x + stepper_area->x,
2519                                   allocation.y + stepper_area->y,
2520                                   stepper_area->width,
2521                                   stepper_area->height);
2522
2523       scroll = range_get_scroll_for_grab (range);
2524       if (scroll != GTK_SCROLL_NONE)
2525         gtk_range_add_step_timer (range, scroll);
2526       
2527       return TRUE;
2528     }
2529   else if ((priv->mouse_location == MOUSE_TROUGH &&
2530             event->button == 2) ||
2531            priv->mouse_location == MOUSE_SLIDER)
2532     {
2533       gboolean need_value_update = FALSE;
2534
2535       /* Any button can be used to drag the slider, but you can start
2536        * dragging the slider with a trough click using button 2;
2537        * On button 2 press, we warp the slider to mouse position,
2538        * then begin the slider drag.
2539        */
2540       if (event->button == 2)
2541         {
2542           gdouble slider_low_value, slider_high_value, new_value;
2543           
2544           slider_high_value =
2545             coord_to_value (range,
2546                             priv->orientation == GTK_ORIENTATION_VERTICAL ?
2547                             event->y : event->x);
2548           slider_low_value =
2549             coord_to_value (range,
2550                             priv->orientation == GTK_ORIENTATION_VERTICAL ?
2551                             event->y - priv->slider.height :
2552                             event->x - priv->slider.width);
2553
2554           /* compute new value for warped slider */
2555           new_value = slider_low_value + (slider_high_value - slider_low_value) / 2;
2556
2557           /* recalc slider, so we can set slide_initial_slider_position
2558            * properly
2559            */
2560           priv->need_recalc = TRUE;
2561           gtk_range_calc_layout (range, new_value);
2562
2563           /* defer adjustment updates to update_slider_position() in order
2564            * to keep pixel quantisation
2565            */
2566           need_value_update = TRUE;
2567         }
2568
2569       if (priv->orientation == GTK_ORIENTATION_VERTICAL)
2570         {
2571           priv->slide_initial_slider_position = priv->slider.y;
2572           priv->slide_initial_coordinate = event->y;
2573         }
2574       else
2575         {
2576           priv->slide_initial_slider_position = priv->slider.x;
2577           priv->slide_initial_coordinate = event->x;
2578         }
2579
2580       range_grab_add (range, device, MOUSE_SLIDER, event->button);
2581
2582       gtk_widget_queue_draw (widget);
2583
2584       if (need_value_update)
2585         update_slider_position (range, event->x, event->y);
2586
2587       return TRUE;
2588     }
2589   
2590   return FALSE;
2591 }
2592
2593 /* During a slide, move the slider as required given new mouse position */
2594 static void
2595 update_slider_position (GtkRange *range,
2596                         gint      mouse_x,
2597                         gint      mouse_y)
2598 {
2599   GtkRangePrivate *priv = range->priv;
2600   gint delta;
2601   gint c;
2602   gdouble new_value;
2603   gboolean handled;
2604   gdouble next_value;
2605   gdouble mark_value;
2606   gdouble mark_delta;
2607   gint i;
2608
2609   if (priv->orientation == GTK_ORIENTATION_VERTICAL)
2610     delta = mouse_y - priv->slide_initial_coordinate;
2611   else
2612     delta = mouse_x - priv->slide_initial_coordinate;
2613
2614   c = priv->slide_initial_slider_position + delta;
2615
2616   new_value = coord_to_value (range, c);
2617   next_value = coord_to_value (range, c + 1);
2618   mark_delta = fabs (next_value - new_value); 
2619
2620   for (i = 0; i < priv->n_marks; i++)
2621     {
2622       mark_value = priv->marks[i];
2623
2624       if (fabs (gtk_adjustment_get_value (priv->adjustment) - mark_value) < 3 * mark_delta)
2625         {
2626           if (fabs (new_value - mark_value) < (priv->slider_end - priv->slider_start) * 0.5 * mark_delta)
2627             {
2628               new_value = mark_value;
2629               break;
2630             }
2631         }
2632     }  
2633
2634   g_signal_emit (range, signals[CHANGE_VALUE], 0, GTK_SCROLL_JUMP, new_value,
2635                  &handled);
2636 }
2637
2638 static void 
2639 stop_scrolling (GtkRange *range)
2640 {
2641   range_grab_remove (range);
2642   gtk_range_remove_step_timer (range);
2643 }
2644
2645 static gboolean
2646 gtk_range_grab_broken (GtkWidget          *widget,
2647                        GdkEventGrabBroken *event)
2648 {
2649   GtkRange *range = GTK_RANGE (widget);
2650   GtkRangePrivate *priv = range->priv;
2651   GdkDevice *device;
2652
2653   device = gdk_event_get_device ((GdkEvent *) event);
2654
2655   if (device == priv->grab_device &&
2656       priv->grab_location != MOUSE_OUTSIDE)
2657     {
2658       if (priv->grab_location == MOUSE_SLIDER)
2659         update_slider_position (range, priv->mouse_x, priv->mouse_y);
2660
2661       stop_scrolling (range);
2662       
2663       return TRUE;
2664     }
2665   
2666   return FALSE;
2667 }
2668
2669 static gint
2670 gtk_range_button_release (GtkWidget      *widget,
2671                           GdkEventButton *event)
2672 {
2673   GtkRange *range = GTK_RANGE (widget);
2674   GtkRangePrivate *priv = range->priv;
2675   GdkDevice *device;
2676
2677   if (event->window == priv->event_window)
2678     {
2679       priv->mouse_x = event->x;
2680       priv->mouse_y = event->y;
2681     }
2682   else
2683     {
2684       gdk_window_get_device_position (priv->event_window,
2685                                       event->device,
2686                                       &priv->mouse_x,
2687                                       &priv->mouse_y,
2688                                       NULL);
2689     }
2690
2691   device = gdk_event_get_device ((GdkEvent *) event);
2692
2693   if (priv->grab_device == device &&
2694       priv->grab_button == event->button)
2695     {
2696       if (priv->grab_location == MOUSE_SLIDER)
2697         update_slider_position (range, priv->mouse_x, priv->mouse_y);
2698
2699       stop_scrolling (range);
2700       
2701       return TRUE;
2702     }
2703
2704   return FALSE;
2705 }
2706
2707 /**
2708  * _gtk_range_get_wheel_delta:
2709  * @range: a #GtkRange
2710  * @direction: A #GdkScrollDirection
2711  * 
2712  * Returns a good step value for the mouse wheel.
2713  * 
2714  * Return value: A good step value for the mouse wheel. 
2715  * 
2716  * Since: 2.4
2717  **/
2718 gdouble
2719 _gtk_range_get_wheel_delta (GtkRange           *range,
2720                             GdkScrollDirection  direction)
2721 {
2722   GtkRangePrivate *priv = range->priv;
2723   GtkAdjustment *adjustment = priv->adjustment;
2724   gdouble delta;
2725
2726   if (GTK_IS_SCROLLBAR (range))
2727     delta = pow (gtk_adjustment_get_page_size (adjustment), 2.0 / 3.0);
2728   else
2729     delta = gtk_adjustment_get_step_increment (adjustment) * 2;
2730   
2731   if (direction == GDK_SCROLL_UP ||
2732       direction == GDK_SCROLL_LEFT)
2733     delta = - delta;
2734   
2735   if (priv->inverted)
2736     delta = - delta;
2737
2738   return delta;
2739 }
2740       
2741 static gboolean
2742 gtk_range_scroll_event (GtkWidget      *widget,
2743                         GdkEventScroll *event)
2744 {
2745   GtkRange *range = GTK_RANGE (widget);
2746   GtkRangePrivate *priv = range->priv;
2747
2748   if (gtk_widget_get_realized (widget))
2749     {
2750       gdouble delta;
2751       gboolean handled;
2752
2753       delta = _gtk_range_get_wheel_delta (range, event->direction);
2754
2755       g_signal_emit (range, signals[CHANGE_VALUE], 0,
2756                      GTK_SCROLL_JUMP, gtk_adjustment_get_value (priv->adjustment) + delta,
2757                      &handled);
2758     }
2759
2760   return TRUE;
2761 }
2762
2763 static gboolean
2764 gtk_range_motion_notify (GtkWidget      *widget,
2765                          GdkEventMotion *event)
2766 {
2767   GtkRange *range = GTK_RANGE (widget);
2768   GtkRangePrivate *priv = range->priv;
2769
2770   gdk_event_request_motions (event);
2771
2772   priv->mouse_x = event->x;
2773   priv->mouse_y = event->y;
2774
2775   if (gtk_range_update_mouse_location (range))
2776     gtk_widget_queue_draw (widget);
2777
2778   if (priv->grab_location == MOUSE_SLIDER)
2779     update_slider_position (range, event->x, event->y);
2780
2781   /* We handled the event if the mouse was in the range_rect */
2782   return priv->mouse_location != MOUSE_OUTSIDE;
2783 }
2784
2785 static gboolean
2786 gtk_range_enter_notify (GtkWidget        *widget,
2787                         GdkEventCrossing *event)
2788 {
2789   GtkRange *range = GTK_RANGE (widget);
2790   GtkRangePrivate *priv = range->priv;
2791
2792   priv->mouse_x = event->x;
2793   priv->mouse_y = event->y;
2794
2795   if (gtk_range_update_mouse_location (range))
2796     gtk_widget_queue_draw (widget);
2797   
2798   return TRUE;
2799 }
2800
2801 static gboolean
2802 gtk_range_leave_notify (GtkWidget        *widget,
2803                         GdkEventCrossing *event)
2804 {
2805   GtkRange *range = GTK_RANGE (widget);
2806   GtkRangePrivate *priv = range->priv;
2807
2808   priv->mouse_x = -1;
2809   priv->mouse_y = -1;
2810
2811   if (gtk_range_update_mouse_location (range))
2812     gtk_widget_queue_draw (widget);
2813   
2814   return TRUE;
2815 }
2816
2817 static void
2818 gtk_range_grab_notify (GtkWidget *widget,
2819                        gboolean   was_grabbed)
2820 {
2821   GtkRangePrivate *priv = GTK_RANGE (widget)->priv;
2822
2823   if (priv->grab_device &&
2824       gtk_widget_device_is_shadowed (widget, priv->grab_device))
2825     stop_scrolling (GTK_RANGE (widget));
2826 }
2827
2828 static void
2829 gtk_range_state_flags_changed (GtkWidget     *widget,
2830                                GtkStateFlags  previous_state)
2831 {
2832   if (!gtk_widget_is_sensitive (widget))
2833     stop_scrolling (GTK_RANGE (widget));
2834 }
2835
2836 #define check_rectangle(rectangle1, rectangle2)              \
2837   {                                                          \
2838     if (rectangle1.x != rectangle2.x) return TRUE;           \
2839     if (rectangle1.y != rectangle2.y) return TRUE;           \
2840     if (rectangle1.width  != rectangle2.width)  return TRUE; \
2841     if (rectangle1.height != rectangle2.height) return TRUE; \
2842   }
2843
2844 static gboolean
2845 layout_changed (GtkRangePrivate *priv1,
2846                 GtkRangePrivate *priv2)
2847 {
2848   check_rectangle (priv1->slider, priv2->slider);
2849   check_rectangle (priv1->trough, priv2->trough);
2850   check_rectangle (priv1->stepper_a, priv2->stepper_a);
2851   check_rectangle (priv1->stepper_d, priv2->stepper_d);
2852   check_rectangle (priv1->stepper_b, priv2->stepper_b);
2853   check_rectangle (priv1->stepper_c, priv2->stepper_c);
2854
2855   if (priv1->upper_sensitive != priv2->upper_sensitive) return TRUE;
2856   if (priv1->lower_sensitive != priv2->lower_sensitive) return TRUE;
2857
2858   return FALSE;
2859 }
2860
2861 static void
2862 gtk_range_adjustment_changed (GtkAdjustment *adjustment,
2863                               gpointer       data)
2864 {
2865   GtkRange *range = GTK_RANGE (data);
2866   GtkRangePrivate *priv = range->priv;
2867   GtkRangePrivate priv_aux = *priv;
2868
2869   priv->recalc_marks = TRUE;
2870   priv->need_recalc = TRUE;
2871   gtk_range_calc_layout (range, gtk_adjustment_get_value (priv->adjustment));
2872
2873   /* now check whether the layout changed  */
2874   if (layout_changed (priv, &priv_aux))
2875     gtk_widget_queue_draw (GTK_WIDGET (range));
2876
2877   /* Note that we don't round off to priv->round_digits here.
2878    * that's because it's really broken to change a value
2879    * in response to a change signal on that value; round_digits
2880    * is therefore defined to be a filter on what the GtkRange
2881    * can input into the adjustment, not a filter that the GtkRange
2882    * will enforce on the adjustment.
2883    */
2884 }
2885
2886 static gboolean
2887 force_repaint (gpointer data)
2888 {
2889   GtkRange *range = GTK_RANGE (data);
2890   GtkRangePrivate *priv = range->priv;
2891   GtkWidget *widget = GTK_WIDGET (range);
2892
2893   priv->repaint_id = 0;
2894   if (gtk_widget_is_drawable (widget))
2895     gdk_window_process_updates (gtk_widget_get_window (widget), FALSE);
2896
2897   return FALSE;
2898 }
2899
2900 static void
2901 gtk_range_adjustment_value_changed (GtkAdjustment *adjustment,
2902                                     gpointer       data)
2903 {
2904   GtkRange *range = GTK_RANGE (data);
2905   GtkRangePrivate *priv = range->priv;
2906   GtkRangePrivate priv_aux = *priv;
2907
2908   priv->need_recalc = TRUE;
2909   gtk_range_calc_layout (range, gtk_adjustment_get_value (priv->adjustment));
2910   
2911   /* now check whether the layout changed  */
2912   if (layout_changed (priv, &priv_aux) ||
2913       (GTK_IS_SCALE (range) && gtk_scale_get_draw_value (GTK_SCALE (range))))
2914     {
2915       gtk_widget_queue_draw (GTK_WIDGET (range));
2916       /* setup a timer to ensure the range isn't lagging too much behind the scroll position */
2917       if (!priv->repaint_id)
2918         priv->repaint_id = gdk_threads_add_timeout_full (GDK_PRIORITY_EVENTS,
2919                                                          181, force_repaint,
2920                                                          range, NULL);
2921     }
2922
2923   /* Note that we don't round off to priv->round_digits here.
2924    * that's because it's really broken to change a value
2925    * in response to a change signal on that value; round_digits
2926    * is therefore defined to be a filter on what the GtkRange
2927    * can input into the adjustment, not a filter that the GtkRange
2928    * will enforce on the adjustment.
2929    */
2930
2931   g_signal_emit (range, signals[VALUE_CHANGED], 0);
2932 }
2933
2934 static void
2935 gtk_range_style_updated (GtkWidget *widget)
2936 {
2937   GtkRange *range = GTK_RANGE (widget);
2938   GtkRangePrivate *priv = range->priv;
2939
2940   priv->need_recalc = TRUE;
2941
2942   GTK_WIDGET_CLASS (gtk_range_parent_class)->style_updated (widget);
2943 }
2944
2945 static void
2946 apply_marks (GtkRange *range, 
2947              gdouble   oldval,
2948              gdouble  *newval)
2949 {
2950   GtkRangePrivate *priv = range->priv;
2951   gint i;
2952   gdouble mark;
2953
2954   for (i = 0; i < priv->n_marks; i++)
2955     {
2956       mark = priv->marks[i];
2957       if ((oldval < mark && mark < *newval) ||
2958           (oldval > mark && mark > *newval))
2959         {
2960           *newval = mark;
2961           return;
2962         }
2963     }
2964 }
2965
2966 static void
2967 step_back (GtkRange *range)
2968 {
2969   GtkRangePrivate *priv = range->priv;
2970   gdouble newval;
2971   gboolean handled;
2972
2973   newval = gtk_adjustment_get_value (priv->adjustment) - gtk_adjustment_get_step_increment (priv->adjustment);
2974   apply_marks (range, gtk_adjustment_get_value (priv->adjustment), &newval);
2975   g_signal_emit (range, signals[CHANGE_VALUE], 0,
2976                  GTK_SCROLL_STEP_BACKWARD, newval, &handled);
2977 }
2978
2979 static void
2980 step_forward (GtkRange *range)
2981 {
2982   GtkRangePrivate *priv = range->priv;
2983   gdouble newval;
2984   gboolean handled;
2985
2986   newval = gtk_adjustment_get_value (priv->adjustment) + gtk_adjustment_get_step_increment (priv->adjustment);
2987   apply_marks (range, gtk_adjustment_get_value (priv->adjustment), &newval);
2988   g_signal_emit (range, signals[CHANGE_VALUE], 0,
2989                  GTK_SCROLL_STEP_FORWARD, newval, &handled);
2990 }
2991
2992
2993 static void
2994 page_back (GtkRange *range)
2995 {
2996   GtkRangePrivate *priv = range->priv;
2997   gdouble newval;
2998   gboolean handled;
2999
3000   newval = gtk_adjustment_get_value (priv->adjustment) - gtk_adjustment_get_page_increment (priv->adjustment);
3001   apply_marks (range, gtk_adjustment_get_value (priv->adjustment), &newval);
3002   g_signal_emit (range, signals[CHANGE_VALUE], 0,
3003                  GTK_SCROLL_PAGE_BACKWARD, newval, &handled);
3004 }
3005
3006 static void
3007 page_forward (GtkRange *range)
3008 {
3009   GtkRangePrivate *priv = range->priv;
3010   gdouble newval;
3011   gboolean handled;
3012
3013   newval = gtk_adjustment_get_value (priv->adjustment) + gtk_adjustment_get_page_increment (priv->adjustment);
3014   apply_marks (range, gtk_adjustment_get_value (priv->adjustment), &newval);
3015   g_signal_emit (range, signals[CHANGE_VALUE], 0,
3016                  GTK_SCROLL_PAGE_FORWARD, newval, &handled);
3017 }
3018
3019 static void
3020 scroll_begin (GtkRange *range)
3021 {
3022   GtkRangePrivate *priv = range->priv;
3023   gboolean handled;
3024
3025   g_signal_emit (range, signals[CHANGE_VALUE], 0,
3026                  GTK_SCROLL_START, gtk_adjustment_get_lower (priv->adjustment),
3027                  &handled);
3028 }
3029
3030 static void
3031 scroll_end (GtkRange *range)
3032 {
3033   GtkRangePrivate *priv = range->priv;
3034   gdouble newval;
3035   gboolean handled;
3036
3037   newval = gtk_adjustment_get_upper (priv->adjustment) - gtk_adjustment_get_page_size (priv->adjustment);
3038   g_signal_emit (range, signals[CHANGE_VALUE], 0, GTK_SCROLL_END, newval,
3039                  &handled);
3040 }
3041
3042 static gboolean
3043 gtk_range_scroll (GtkRange     *range,
3044                   GtkScrollType scroll)
3045 {
3046   GtkRangePrivate *priv = range->priv;
3047   gdouble old_value = gtk_adjustment_get_value (priv->adjustment);
3048
3049   switch (scroll)
3050     {
3051     case GTK_SCROLL_STEP_LEFT:
3052       if (should_invert (range))
3053         step_forward (range);
3054       else
3055         step_back (range);
3056       break;
3057                     
3058     case GTK_SCROLL_STEP_UP:
3059       if (should_invert (range))
3060         step_forward (range);
3061       else
3062         step_back (range);
3063       break;
3064
3065     case GTK_SCROLL_STEP_RIGHT:
3066       if (should_invert (range))
3067         step_back (range);
3068       else
3069         step_forward (range);
3070       break;
3071                     
3072     case GTK_SCROLL_STEP_DOWN:
3073       if (should_invert (range))
3074         step_back (range);
3075       else
3076         step_forward (range);
3077       break;
3078                   
3079     case GTK_SCROLL_STEP_BACKWARD:
3080       step_back (range);
3081       break;
3082                   
3083     case GTK_SCROLL_STEP_FORWARD:
3084       step_forward (range);
3085       break;
3086
3087     case GTK_SCROLL_PAGE_LEFT:
3088       if (should_invert (range))
3089         page_forward (range);
3090       else
3091         page_back (range);
3092       break;
3093                     
3094     case GTK_SCROLL_PAGE_UP:
3095       if (should_invert (range))
3096         page_forward (range);
3097       else
3098         page_back (range);
3099       break;
3100
3101     case GTK_SCROLL_PAGE_RIGHT:
3102       if (should_invert (range))
3103         page_back (range);
3104       else
3105         page_forward (range);
3106       break;
3107                     
3108     case GTK_SCROLL_PAGE_DOWN:
3109       if (should_invert (range))
3110         page_back (range);
3111       else
3112         page_forward (range);
3113       break;
3114                   
3115     case GTK_SCROLL_PAGE_BACKWARD:
3116       page_back (range);
3117       break;
3118                   
3119     case GTK_SCROLL_PAGE_FORWARD:
3120       page_forward (range);
3121       break;
3122
3123     case GTK_SCROLL_START:
3124       scroll_begin (range);
3125       break;
3126
3127     case GTK_SCROLL_END:
3128       scroll_end (range);
3129       break;
3130
3131     case GTK_SCROLL_JUMP:
3132       /* Used by CList, range doesn't use it. */
3133       break;
3134
3135     case GTK_SCROLL_NONE:
3136       break;
3137     }
3138
3139   return gtk_adjustment_get_value (priv->adjustment) != old_value;
3140 }
3141
3142 static void
3143 gtk_range_move_slider (GtkRange     *range,
3144                        GtkScrollType scroll)
3145 {
3146   GtkRangePrivate *priv = range->priv;
3147   gboolean cursor_only;
3148
3149   g_object_get (gtk_widget_get_settings (GTK_WIDGET (range)),
3150                 "gtk-keynav-cursor-only", &cursor_only,
3151                 NULL);
3152
3153   if (cursor_only)
3154     {
3155       GtkWidget *toplevel = gtk_widget_get_toplevel (GTK_WIDGET (range));
3156
3157       if (priv->orientation == GTK_ORIENTATION_HORIZONTAL)
3158         {
3159           if (scroll == GTK_SCROLL_STEP_UP ||
3160               scroll == GTK_SCROLL_STEP_DOWN)
3161             {
3162               if (toplevel)
3163                 gtk_widget_child_focus (toplevel,
3164                                         scroll == GTK_SCROLL_STEP_UP ?
3165                                         GTK_DIR_UP : GTK_DIR_DOWN);
3166               return;
3167             }
3168         }
3169       else
3170         {
3171           if (scroll == GTK_SCROLL_STEP_LEFT ||
3172               scroll == GTK_SCROLL_STEP_RIGHT)
3173             {
3174               if (toplevel)
3175                 gtk_widget_child_focus (toplevel,
3176                                         scroll == GTK_SCROLL_STEP_LEFT ?
3177                                         GTK_DIR_LEFT : GTK_DIR_RIGHT);
3178               return;
3179             }
3180         }
3181     }
3182
3183   if (! gtk_range_scroll (range, scroll))
3184     gtk_widget_error_bell (GTK_WIDGET (range));
3185 }
3186
3187 static void
3188 gtk_range_get_props (GtkRange  *range,
3189                      gint      *slider_width,
3190                      gint      *stepper_size,
3191                      gint      *focus_width,
3192                      gint      *trough_border,
3193                      gint      *stepper_spacing,
3194                      gboolean  *trough_under_steppers,
3195                      gint      *arrow_displacement_x,
3196                      gint      *arrow_displacement_y)
3197 {
3198   GtkWidget *widget =  GTK_WIDGET (range);
3199   gint tmp_slider_width, tmp_stepper_size, tmp_focus_width, tmp_trough_border;
3200   gint tmp_stepper_spacing, tmp_trough_under_steppers;
3201   gint tmp_arrow_displacement_x, tmp_arrow_displacement_y;
3202   
3203   gtk_widget_style_get (widget,
3204                         "slider-width", &tmp_slider_width,
3205                         "trough-border", &tmp_trough_border,
3206                         "stepper-size", &tmp_stepper_size,
3207                         "stepper-spacing", &tmp_stepper_spacing,
3208                         "trough-under-steppers", &tmp_trough_under_steppers,
3209                         "arrow-displacement-x", &tmp_arrow_displacement_x,
3210                         "arrow-displacement-y", &tmp_arrow_displacement_y,
3211                         NULL);
3212
3213   if (gtk_widget_get_can_focus (GTK_WIDGET (range)))
3214     {
3215       gint focus_line_width;
3216       gint focus_padding;
3217       
3218       gtk_widget_style_get (GTK_WIDGET (range),
3219                             "focus-line-width", &focus_line_width,
3220                             "focus-padding", &focus_padding,
3221                             NULL);
3222
3223       tmp_focus_width = focus_line_width + focus_padding;
3224     }
3225   else
3226     {
3227       tmp_focus_width = 0;
3228     }
3229   
3230   if (slider_width)
3231     *slider_width = tmp_slider_width;
3232
3233   if (focus_width)
3234     *focus_width = tmp_focus_width;
3235
3236   if (trough_border)
3237     *trough_border = tmp_trough_border;
3238
3239   if (stepper_size)
3240     *stepper_size = tmp_stepper_size;
3241
3242   if (stepper_spacing)
3243     *stepper_spacing = tmp_stepper_spacing;
3244
3245   if (trough_under_steppers)
3246     *trough_under_steppers = tmp_trough_under_steppers;
3247
3248   if (arrow_displacement_x)
3249     *arrow_displacement_x = tmp_arrow_displacement_x;
3250
3251   if (arrow_displacement_y)
3252     *arrow_displacement_y = tmp_arrow_displacement_y;
3253 }
3254
3255 #define POINT_IN_RECT(xcoord, ycoord, rect) \
3256  ((xcoord) >= (rect).x &&                   \
3257   (xcoord) <  ((rect).x + (rect).width) &&  \
3258   (ycoord) >= (rect).y &&                   \
3259   (ycoord) <  ((rect).y + (rect).height))
3260
3261 /* Update mouse location, return TRUE if it changes */
3262 static gboolean
3263 gtk_range_update_mouse_location (GtkRange *range)
3264 {
3265   GtkRangePrivate *priv = range->priv;
3266   GtkAllocation allocation;
3267   gint x, y;
3268   MouseLocation old;
3269   GtkWidget *widget = GTK_WIDGET (range);
3270
3271   old = priv->mouse_location;
3272
3273   x = priv->mouse_x;
3274   y = priv->mouse_y;
3275
3276   gtk_widget_get_allocation (widget, &allocation);
3277
3278   if (priv->grab_location != MOUSE_OUTSIDE)
3279     priv->mouse_location = priv->grab_location;
3280   else if (POINT_IN_RECT (x, y, priv->stepper_a))
3281     priv->mouse_location = MOUSE_STEPPER_A;
3282   else if (POINT_IN_RECT (x, y, priv->stepper_b))
3283     priv->mouse_location = MOUSE_STEPPER_B;
3284   else if (POINT_IN_RECT (x, y, priv->stepper_c))
3285     priv->mouse_location = MOUSE_STEPPER_C;
3286   else if (POINT_IN_RECT (x, y, priv->stepper_d))
3287     priv->mouse_location = MOUSE_STEPPER_D;
3288   else if (POINT_IN_RECT (x, y, priv->slider))
3289     priv->mouse_location = MOUSE_SLIDER;
3290   else if (POINT_IN_RECT (x, y, priv->trough))
3291     priv->mouse_location = MOUSE_TROUGH;
3292   else if (POINT_IN_RECT (x, y, allocation))
3293     priv->mouse_location = MOUSE_WIDGET;
3294   else
3295     priv->mouse_location = MOUSE_OUTSIDE;
3296
3297   return old != priv->mouse_location;
3298 }
3299
3300 /* Clamp rect, border inside widget->allocation, such that we prefer
3301  * to take space from border not rect in all directions, and prefer to
3302  * give space to border over rect in one direction.
3303  */
3304 static void
3305 clamp_dimensions (GtkWidget    *widget,
3306                   GdkRectangle *rect,
3307                   GtkBorder    *border,
3308                   gboolean      border_expands_horizontally)
3309 {
3310   GtkAllocation allocation;
3311   gint extra, shortage;
3312   
3313   g_return_if_fail (rect->x == 0);
3314   g_return_if_fail (rect->y == 0);  
3315   g_return_if_fail (rect->width >= 0);
3316   g_return_if_fail (rect->height >= 0);
3317
3318   gtk_widget_get_allocation (widget, &allocation);
3319
3320   /* Width */
3321
3322   extra = allocation.width - border->left - border->right - rect->width;
3323   if (extra > 0)
3324     {
3325       if (border_expands_horizontally)
3326         {
3327           border->left += extra / 2;
3328           border->right += extra / 2 + extra % 2;
3329         }
3330       else
3331         {
3332           rect->width += extra;
3333         }
3334     }
3335   
3336   /* See if we can fit rect, if not kill the border */
3337   shortage = rect->width - allocation.width;
3338   if (shortage > 0)
3339     {
3340       rect->width = allocation.width;
3341       /* lose the border */
3342       border->left = 0;
3343       border->right = 0;
3344     }
3345   else
3346     {
3347       /* See if we can fit rect with borders */
3348       shortage = rect->width + border->left + border->right - allocation.width;
3349       if (shortage > 0)
3350         {
3351           /* Shrink borders */
3352           border->left -= shortage / 2;
3353           border->right -= shortage / 2 + shortage % 2;
3354         }
3355     }
3356
3357   /* Height */
3358
3359   extra = allocation.height - border->top - border->bottom - rect->height;
3360   if (extra > 0)
3361     {
3362       if (border_expands_horizontally)
3363         {
3364           /* don't expand border vertically */
3365           rect->height += extra;
3366         }
3367       else
3368         {
3369           border->top += extra / 2;
3370           border->bottom += extra / 2 + extra % 2;
3371         }
3372     }
3373   
3374   /* See if we can fit rect, if not kill the border */
3375   shortage = rect->height - allocation.height;
3376   if (shortage > 0)
3377     {
3378       rect->height = allocation.height;
3379       /* lose the border */
3380       border->top = 0;
3381       border->bottom = 0;
3382     }
3383   else
3384     {
3385       /* See if we can fit rect with borders */
3386       shortage = rect->height + border->top + border->bottom - allocation.height;
3387       if (shortage > 0)
3388         {
3389           /* Shrink borders */
3390           border->top -= shortage / 2;
3391           border->bottom -= shortage / 2 + shortage % 2;
3392         }
3393     }
3394 }
3395
3396 static void
3397 gtk_range_calc_request (GtkRange      *range,
3398                         gint           slider_width,
3399                         gint           stepper_size,
3400                         gint           focus_width,
3401                         gint           trough_border,
3402                         gint           stepper_spacing,
3403                         GdkRectangle  *range_rect,
3404                         GtkBorder     *border,
3405                         gint          *n_steppers_p,
3406                         gboolean      *has_steppers_ab,
3407                         gboolean      *has_steppers_cd,
3408                         gint          *slider_length_p)
3409 {
3410   GtkRangePrivate *priv = range->priv;
3411   gint slider_length;
3412   gint n_steppers;
3413   gint n_steppers_ab;
3414   gint n_steppers_cd;
3415
3416   border->left = 0;
3417   border->right = 0;
3418   border->top = 0;
3419   border->bottom = 0;
3420
3421   if (GTK_RANGE_GET_CLASS (range)->get_range_border)
3422     GTK_RANGE_GET_CLASS (range)->get_range_border (range, border);
3423
3424   n_steppers_ab = 0;
3425   n_steppers_cd = 0;
3426
3427   if (priv->has_stepper_a)
3428     n_steppers_ab += 1;
3429   if (priv->has_stepper_b)
3430     n_steppers_ab += 1;
3431   if (priv->has_stepper_c)
3432     n_steppers_cd += 1;
3433   if (priv->has_stepper_d)
3434     n_steppers_cd += 1;
3435
3436   n_steppers = n_steppers_ab + n_steppers_cd;
3437
3438   slider_length = priv->min_slider_size;
3439
3440   range_rect->x = 0;
3441   range_rect->y = 0;
3442   
3443   /* We never expand to fill available space in the small dimension
3444    * (i.e. vertical scrollbars are always a fixed width)
3445    */
3446   if (priv->orientation == GTK_ORIENTATION_VERTICAL)
3447     {
3448       range_rect->width = (focus_width + trough_border) * 2 + slider_width;
3449       range_rect->height = stepper_size * n_steppers + (focus_width + trough_border) * 2 + slider_length;
3450
3451       if (n_steppers_ab > 0)
3452         range_rect->height += stepper_spacing;
3453
3454       if (n_steppers_cd > 0)
3455         range_rect->height += stepper_spacing;
3456     }
3457   else
3458     {
3459       range_rect->width = stepper_size * n_steppers + (focus_width + trough_border) * 2 + slider_length;
3460       range_rect->height = (focus_width + trough_border) * 2 + slider_width;
3461
3462       if (n_steppers_ab > 0)
3463         range_rect->width += stepper_spacing;
3464
3465       if (n_steppers_cd > 0)
3466         range_rect->width += stepper_spacing;
3467     }
3468
3469   if (n_steppers_p)
3470     *n_steppers_p = n_steppers;
3471
3472   if (has_steppers_ab)
3473     *has_steppers_ab = (n_steppers_ab > 0);
3474
3475   if (has_steppers_cd)
3476     *has_steppers_cd = (n_steppers_cd > 0);
3477
3478   if (slider_length_p)
3479     *slider_length_p = slider_length;
3480 }
3481
3482 static void
3483 gtk_range_calc_layout (GtkRange *range,
3484                        gdouble   adjustment_value)
3485 {
3486   GtkRangePrivate *priv = range->priv;
3487   gint slider_width, stepper_size, focus_width, trough_border, stepper_spacing;
3488   gint slider_length;
3489   GtkBorder border;
3490   gint n_steppers;
3491   gboolean has_steppers_ab;
3492   gboolean has_steppers_cd;
3493   gboolean trough_under_steppers;
3494   GdkRectangle range_rect;
3495   GtkWidget *widget;
3496
3497   if (!priv->need_recalc)
3498     return;
3499
3500   /* If we have a too-small allocation, we prefer the steppers over
3501    * the trough/slider, probably the steppers are a more useful
3502    * feature in small spaces.
3503    *
3504    * Also, we prefer to draw the range itself rather than the border
3505    * areas if there's a conflict, since the borders will be decoration
3506    * not controls. Though this depends on subclasses cooperating by
3507    * not drawing on priv->range_rect.
3508    */
3509
3510   widget = GTK_WIDGET (range);
3511
3512   gtk_range_get_props (range,
3513                        &slider_width, &stepper_size,
3514                        &focus_width, &trough_border,
3515                        &stepper_spacing, &trough_under_steppers,
3516                        NULL, NULL);
3517
3518   gtk_range_calc_request (range, 
3519                           slider_width, stepper_size,
3520                           focus_width, trough_border, stepper_spacing,
3521                           &range_rect, &border, &n_steppers,
3522                           &has_steppers_ab, &has_steppers_cd, &slider_length);
3523   
3524   /* We never expand to fill available space in the small dimension
3525    * (i.e. vertical scrollbars are always a fixed width)
3526    */
3527   if (priv->orientation == GTK_ORIENTATION_VERTICAL)
3528     {
3529       clamp_dimensions (widget, &range_rect, &border, TRUE);
3530     }
3531   else
3532     {
3533       clamp_dimensions (widget, &range_rect, &border, FALSE);
3534     }
3535   
3536   range_rect.x = border.left;
3537   range_rect.y = border.top;
3538
3539   priv->range_rect = range_rect;
3540
3541   if (priv->orientation == GTK_ORIENTATION_VERTICAL)
3542     {
3543       gint stepper_width, stepper_height;
3544
3545       /* Steppers are the width of the range, and stepper_size in
3546        * height, or if we don't have enough height, divided equally
3547        * among available space.
3548        */
3549       stepper_width = range_rect.width - focus_width * 2;
3550
3551       if (trough_under_steppers)
3552         stepper_width -= trough_border * 2;
3553
3554       if (stepper_width < 1)
3555         stepper_width = range_rect.width; /* screw the trough border */
3556
3557       if (n_steppers == 0)
3558         stepper_height = 0; /* avoid divide by n_steppers */
3559       else
3560         stepper_height = MIN (stepper_size, (range_rect.height / n_steppers));
3561
3562       /* Stepper A */
3563       
3564       priv->stepper_a.x = range_rect.x + focus_width + trough_border * trough_under_steppers;
3565       priv->stepper_a.y = range_rect.y + focus_width + trough_border * trough_under_steppers;
3566
3567       if (priv->has_stepper_a)
3568         {
3569           priv->stepper_a.width = stepper_width;
3570           priv->stepper_a.height = stepper_height;
3571         }
3572       else
3573         {
3574           priv->stepper_a.width = 0;
3575           priv->stepper_a.height = 0;
3576         }
3577
3578       /* Stepper B */
3579       
3580       priv->stepper_b.x = priv->stepper_a.x;
3581       priv->stepper_b.y = priv->stepper_a.y + priv->stepper_a.height;
3582
3583       if (priv->has_stepper_b)
3584         {
3585           priv->stepper_b.width = stepper_width;
3586           priv->stepper_b.height = stepper_height;
3587         }
3588       else
3589         {
3590           priv->stepper_b.width = 0;
3591           priv->stepper_b.height = 0;
3592         }
3593
3594       /* Stepper D */
3595
3596       if (priv->has_stepper_d)
3597         {
3598           priv->stepper_d.width = stepper_width;
3599           priv->stepper_d.height = stepper_height;
3600         }
3601       else
3602         {
3603           priv->stepper_d.width = 0;
3604           priv->stepper_d.height = 0;
3605         }
3606       
3607       priv->stepper_d.x = priv->stepper_a.x;
3608       priv->stepper_d.y = range_rect.y + range_rect.height - priv->stepper_d.height - focus_width - trough_border * trough_under_steppers;
3609
3610       /* Stepper C */
3611
3612       if (priv->has_stepper_c)
3613         {
3614           priv->stepper_c.width = stepper_width;
3615           priv->stepper_c.height = stepper_height;
3616         }
3617       else
3618         {
3619           priv->stepper_c.width = 0;
3620           priv->stepper_c.height = 0;
3621         }
3622       
3623       priv->stepper_c.x = priv->stepper_a.x;
3624       priv->stepper_c.y = priv->stepper_d.y - priv->stepper_c.height;
3625
3626       /* Now the trough is the remaining space between steppers B and C,
3627        * if any, minus spacing
3628        */
3629       priv->trough.x = range_rect.x;
3630       priv->trough.y = priv->stepper_b.y + priv->stepper_b.height + stepper_spacing * has_steppers_ab;
3631       priv->trough.width = range_rect.width;
3632       priv->trough.height = priv->stepper_c.y - priv->trough.y - stepper_spacing * has_steppers_cd;
3633
3634       /* Slider fits into the trough, with stepper_spacing on either side,
3635        * and the size/position based on the adjustment or fixed, depending.
3636        */
3637       priv->slider.x = priv->trough.x + focus_width + trough_border;
3638       priv->slider.width = priv->trough.width - (focus_width + trough_border) * 2;
3639
3640       /* Compute slider position/length */
3641       {
3642         gint y, bottom, top, height;
3643         
3644         top = priv->trough.y;
3645         bottom = priv->trough.y + priv->trough.height;
3646
3647         if (! trough_under_steppers)
3648           {
3649             top += trough_border;
3650             bottom -= trough_border;
3651           }
3652
3653         /* slider height is the fraction (page_size /
3654          * total_adjustment_range) times the trough height in pixels
3655          */
3656
3657         if (gtk_adjustment_get_upper (priv->adjustment) - gtk_adjustment_get_lower (priv->adjustment) != 0)
3658           height = ((bottom - top) * (gtk_adjustment_get_page_size (priv->adjustment) /
3659                                        (gtk_adjustment_get_upper (priv->adjustment) - gtk_adjustment_get_lower (priv->adjustment))));
3660         else
3661           height = priv->min_slider_size;
3662
3663         if (height < priv->min_slider_size ||
3664             priv->slider_size_fixed)
3665           height = priv->min_slider_size;
3666
3667         height = MIN (height, priv->trough.height);
3668         
3669         y = top;
3670
3671         if (gtk_adjustment_get_upper (priv->adjustment) - gtk_adjustment_get_lower (priv->adjustment) - gtk_adjustment_get_page_size (priv->adjustment) != 0)
3672           y += (bottom - top - height) * ((adjustment_value - gtk_adjustment_get_lower (priv->adjustment)) /
3673                                           (gtk_adjustment_get_upper (priv->adjustment) - gtk_adjustment_get_lower (priv->adjustment) - gtk_adjustment_get_page_size (priv->adjustment)));
3674
3675         y = CLAMP (y, top, bottom);
3676         
3677         if (should_invert (range))
3678           y = bottom - (y - top + height);
3679         
3680         priv->slider.y = y;
3681         priv->slider.height = height;
3682
3683         /* These are publically exported */
3684         priv->slider_start = priv->slider.y;
3685         priv->slider_end = priv->slider.y + priv->slider.height;
3686       }
3687     }
3688   else
3689     {
3690       gint stepper_width, stepper_height;
3691
3692       /* Steppers are the height of the range, and stepper_size in
3693        * width, or if we don't have enough width, divided equally
3694        * among available space.
3695        */
3696       stepper_height = range_rect.height + focus_width * 2;
3697
3698       if (trough_under_steppers)
3699         stepper_height -= trough_border * 2;
3700
3701       if (stepper_height < 1)
3702         stepper_height = range_rect.height; /* screw the trough border */
3703
3704       if (n_steppers == 0)
3705         stepper_width = 0; /* avoid divide by n_steppers */
3706       else
3707         stepper_width = MIN (stepper_size, (range_rect.width / n_steppers));
3708
3709       /* Stepper A */
3710       
3711       priv->stepper_a.x = range_rect.x + focus_width + trough_border * trough_under_steppers;
3712       priv->stepper_a.y = range_rect.y + focus_width + trough_border * trough_under_steppers;
3713
3714       if (priv->has_stepper_a)
3715         {
3716           priv->stepper_a.width = stepper_width;
3717           priv->stepper_a.height = stepper_height;
3718         }
3719       else
3720         {
3721           priv->stepper_a.width = 0;
3722           priv->stepper_a.height = 0;
3723         }
3724
3725       /* Stepper B */
3726       
3727       priv->stepper_b.x = priv->stepper_a.x + priv->stepper_a.width;
3728       priv->stepper_b.y = priv->stepper_a.y;
3729
3730       if (priv->has_stepper_b)
3731         {
3732           priv->stepper_b.width = stepper_width;
3733           priv->stepper_b.height = stepper_height;
3734         }
3735       else
3736         {
3737           priv->stepper_b.width = 0;
3738           priv->stepper_b.height = 0;
3739         }
3740
3741       /* Stepper D */
3742
3743       if (priv->has_stepper_d)
3744         {
3745           priv->stepper_d.width = stepper_width;
3746           priv->stepper_d.height = stepper_height;
3747         }
3748       else
3749         {
3750           priv->stepper_d.width = 0;
3751           priv->stepper_d.height = 0;
3752         }
3753
3754       priv->stepper_d.x = range_rect.x + range_rect.width - priv->stepper_d.width - focus_width - trough_border * trough_under_steppers;
3755       priv->stepper_d.y = priv->stepper_a.y;
3756
3757
3758       /* Stepper C */
3759
3760       if (priv->has_stepper_c)
3761         {
3762           priv->stepper_c.width = stepper_width;
3763           priv->stepper_c.height = stepper_height;
3764         }
3765       else
3766         {
3767           priv->stepper_c.width = 0;
3768           priv->stepper_c.height = 0;
3769         }
3770       
3771       priv->stepper_c.x = priv->stepper_d.x - priv->stepper_c.width;
3772       priv->stepper_c.y = priv->stepper_a.y;
3773
3774       /* Now the trough is the remaining space between steppers B and C,
3775        * if any
3776        */
3777       priv->trough.x = priv->stepper_b.x + priv->stepper_b.width + stepper_spacing * has_steppers_ab;
3778       priv->trough.y = range_rect.y;
3779
3780       priv->trough.width = priv->stepper_c.x - priv->trough.x - stepper_spacing * has_steppers_cd;
3781       priv->trough.height = range_rect.height;
3782
3783       /* Slider fits into the trough, with stepper_spacing on either side,
3784        * and the size/position based on the adjustment or fixed, depending.
3785        */
3786       priv->slider.y = priv->trough.y + focus_width + trough_border;
3787       priv->slider.height = priv->trough.height - (focus_width + trough_border) * 2;
3788
3789       /* Compute slider position/length */
3790       {
3791         gint x, left, right, width;
3792         
3793         left = priv->trough.x;
3794         right = priv->trough.x + priv->trough.width;
3795
3796         if (! trough_under_steppers)
3797           {
3798             left += trough_border;
3799             right -= trough_border;
3800           }
3801
3802         /* slider width is the fraction (page_size /
3803          * total_adjustment_range) times the trough width in pixels
3804          */
3805
3806         if (gtk_adjustment_get_upper (priv->adjustment) - gtk_adjustment_get_lower (priv->adjustment) != 0)
3807           width = ((right - left) * (gtk_adjustment_get_page_size (priv->adjustment) /
3808                                    (gtk_adjustment_get_upper (priv->adjustment) - gtk_adjustment_get_lower (priv->adjustment))));
3809         else
3810           width = priv->min_slider_size;
3811
3812         if (width < priv->min_slider_size ||
3813             priv->slider_size_fixed)
3814           width = priv->min_slider_size;
3815
3816         width = MIN (width, priv->trough.width);
3817         
3818         x = left;
3819
3820         if (gtk_adjustment_get_upper (priv->adjustment) - gtk_adjustment_get_lower (priv->adjustment) - gtk_adjustment_get_page_size (priv->adjustment) != 0)
3821           x += (right - left - width) * ((adjustment_value - gtk_adjustment_get_lower (priv->adjustment)) /
3822                                          (gtk_adjustment_get_upper (priv->adjustment) - gtk_adjustment_get_lower (priv->adjustment) - gtk_adjustment_get_page_size (priv->adjustment)));
3823         
3824         x = CLAMP (x, left, right);
3825         
3826         if (should_invert (range))
3827           x = right - (x - left + width);
3828         
3829         priv->slider.x = x;
3830         priv->slider.width = width;
3831
3832         /* These are publically exported */
3833         priv->slider_start = priv->slider.x;
3834         priv->slider_end = priv->slider.x + priv->slider.width;
3835       }
3836     }
3837   
3838   gtk_range_update_mouse_location (range);
3839
3840   switch (priv->upper_sensitivity)
3841     {
3842     case GTK_SENSITIVITY_AUTO:
3843       priv->upper_sensitive =
3844         (gtk_adjustment_get_value (priv->adjustment) <
3845          (gtk_adjustment_get_upper (priv->adjustment) - gtk_adjustment_get_page_size (priv->adjustment)));
3846       break;
3847
3848     case GTK_SENSITIVITY_ON:
3849       priv->upper_sensitive = TRUE;
3850       break;
3851
3852     case GTK_SENSITIVITY_OFF:
3853       priv->upper_sensitive = FALSE;
3854       break;
3855     }
3856
3857   switch (priv->lower_sensitivity)
3858     {
3859     case GTK_SENSITIVITY_AUTO:
3860       priv->lower_sensitive =
3861         (gtk_adjustment_get_value (priv->adjustment) > gtk_adjustment_get_lower (priv->adjustment));
3862       break;
3863
3864     case GTK_SENSITIVITY_ON:
3865       priv->lower_sensitive = TRUE;
3866       break;
3867
3868     case GTK_SENSITIVITY_OFF:
3869       priv->lower_sensitive = FALSE;
3870       break;
3871     }
3872 }
3873
3874 static GdkRectangle*
3875 get_area (GtkRange     *range,
3876           MouseLocation location)
3877 {
3878   GtkRangePrivate *priv = range->priv;
3879
3880   switch (location)
3881     {
3882     case MOUSE_STEPPER_A:
3883       return &priv->stepper_a;
3884     case MOUSE_STEPPER_B:
3885       return &priv->stepper_b;
3886     case MOUSE_STEPPER_C:
3887       return &priv->stepper_c;
3888     case MOUSE_STEPPER_D:
3889       return &priv->stepper_d;
3890     case MOUSE_TROUGH:
3891       return &priv->trough;
3892     case MOUSE_SLIDER:
3893       return &priv->slider;
3894     case MOUSE_WIDGET:
3895     case MOUSE_OUTSIDE:
3896       break;
3897     }
3898
3899   g_warning (G_STRLOC": bug");
3900   return NULL;
3901 }
3902
3903 static void
3904 gtk_range_calc_marks (GtkRange *range)
3905 {
3906   GtkRangePrivate *priv = range->priv;
3907   gint i;
3908
3909   if (!priv->recalc_marks)
3910     return;
3911
3912   priv->recalc_marks = FALSE;
3913
3914   for (i = 0; i < priv->n_marks; i++)
3915     {
3916       priv->need_recalc = TRUE;
3917       gtk_range_calc_layout (range, priv->marks[i]);
3918       if (priv->orientation == GTK_ORIENTATION_HORIZONTAL)
3919         priv->mark_pos[i] = priv->slider.x + priv->slider.width / 2;
3920       else
3921         priv->mark_pos[i] = priv->slider.y + priv->slider.height / 2;
3922     }
3923
3924   priv->need_recalc = TRUE;
3925 }
3926
3927 static gboolean
3928 gtk_range_real_change_value (GtkRange     *range,
3929                              GtkScrollType scroll,
3930                              gdouble       value)
3931 {
3932   GtkRangePrivate *priv = range->priv;
3933
3934   /* potentially adjust the bounds _before_ we clamp */
3935   g_signal_emit (range, signals[ADJUST_BOUNDS], 0, value);
3936
3937   if (priv->restrict_to_fill_level)
3938     value = MIN (value, MAX (gtk_adjustment_get_lower (priv->adjustment),
3939                              priv->fill_level));
3940
3941   value = CLAMP (value, gtk_adjustment_get_lower (priv->adjustment),
3942                  (gtk_adjustment_get_upper (priv->adjustment) - gtk_adjustment_get_page_size (priv->adjustment)));
3943
3944   if (priv->round_digits >= 0)
3945     {
3946       gdouble power;
3947       gint i;
3948
3949       i = priv->round_digits;
3950       power = 1;
3951       while (i--)
3952         power *= 10;
3953       
3954       value = floor ((value * power) + 0.5) / power;
3955     }
3956
3957   if (gtk_adjustment_get_value (priv->adjustment) != value)
3958     {
3959       priv->need_recalc = TRUE;
3960
3961       gtk_widget_queue_draw (GTK_WIDGET (range));
3962
3963       gtk_adjustment_set_value (priv->adjustment, value);
3964     }
3965   return FALSE;
3966 }
3967
3968 struct _GtkRangeStepTimer
3969 {
3970   guint timeout_id;
3971   GtkScrollType step;
3972 };
3973
3974 static gboolean
3975 second_timeout (gpointer data)
3976 {
3977   GtkRange *range = GTK_RANGE (data);
3978   GtkRangePrivate *priv = range->priv;
3979
3980   gtk_range_scroll (range, priv->timer->step);
3981
3982   return TRUE;
3983 }
3984
3985 static gboolean
3986 initial_timeout (gpointer data)
3987 {
3988   GtkRange *range = GTK_RANGE (data);
3989   GtkRangePrivate *priv = range->priv;
3990   GtkSettings *settings;
3991   guint        timeout;
3992
3993   settings = gtk_widget_get_settings (GTK_WIDGET (data));
3994   g_object_get (settings, "gtk-timeout-repeat", &timeout, NULL);
3995
3996   priv->timer->timeout_id = gdk_threads_add_timeout (timeout * SCROLL_DELAY_FACTOR,
3997                                                      second_timeout,
3998                                                      range);
3999   /* remove self */
4000   return FALSE;
4001 }
4002
4003 static void
4004 gtk_range_add_step_timer (GtkRange      *range,
4005                           GtkScrollType  step)
4006 {
4007   GtkRangePrivate *priv = range->priv;
4008   GtkSettings *settings;
4009   guint        timeout;
4010
4011   g_return_if_fail (priv->timer == NULL);
4012   g_return_if_fail (step != GTK_SCROLL_NONE);
4013
4014   settings = gtk_widget_get_settings (GTK_WIDGET (range));
4015   g_object_get (settings, "gtk-timeout-initial", &timeout, NULL);
4016
4017   priv->timer = g_new (GtkRangeStepTimer, 1);
4018
4019   priv->timer->timeout_id = gdk_threads_add_timeout (timeout,
4020                                                      initial_timeout,
4021                                                      range);
4022   priv->timer->step = step;
4023
4024   gtk_range_scroll (range, priv->timer->step);
4025 }
4026
4027 static void
4028 gtk_range_remove_step_timer (GtkRange *range)
4029 {
4030   GtkRangePrivate *priv = range->priv;
4031
4032   if (priv->timer)
4033     {
4034       if (priv->timer->timeout_id != 0)
4035         g_source_remove (priv->timer->timeout_id);
4036
4037       g_free (priv->timer);
4038
4039       priv->timer = NULL;
4040     }
4041 }
4042
4043 void
4044 _gtk_range_set_stop_values (GtkRange *range,
4045                             gdouble  *values,
4046                             gint      n_values)
4047 {
4048   GtkRangePrivate *priv = range->priv;
4049   gint i;
4050
4051   g_free (priv->marks);
4052   priv->marks = g_new (gdouble, n_values);
4053
4054   g_free (priv->mark_pos);
4055   priv->mark_pos = g_new (gint, n_values);
4056
4057   priv->n_marks = n_values;
4058
4059   for (i = 0; i < n_values; i++) 
4060     priv->marks[i] = values[i];
4061
4062   priv->recalc_marks = TRUE;
4063 }
4064
4065 gint
4066 _gtk_range_get_stop_positions (GtkRange  *range,
4067                                gint     **values)
4068 {
4069   GtkRangePrivate *priv = range->priv;
4070
4071   gtk_range_calc_marks (range);
4072
4073   if (values)
4074     *values = g_memdup (priv->mark_pos, priv->n_marks * sizeof (gint));
4075
4076   return priv->n_marks;
4077 }
4078
4079 /**
4080  * gtk_range_set_round_digits:
4081  * @range: a #GtkRange
4082  * @round_digits: the precision in digits, or -1
4083  *
4084  * Sets the number of digits to round the value to when
4085  * it changes. See #GtkRange::change-value.
4086  *
4087  * Since: 2.24
4088  */
4089 void
4090 gtk_range_set_round_digits (GtkRange *range,
4091                             gint      round_digits)
4092 {
4093   g_return_if_fail (GTK_IS_RANGE (range));
4094   g_return_if_fail (round_digits >= -1);
4095
4096   range->priv->round_digits = round_digits;
4097
4098   g_object_notify (G_OBJECT (range), "round-digits");
4099 }
4100
4101 /**
4102  * gtk_range_get_round_digits:
4103  * @range: a #GtkRange
4104  *
4105  * Gets the number of digits to round the value to when
4106  * it changes. See #GtkRange::change-value.
4107  *
4108  * Return value: the number of digits to round to
4109  *
4110  * Since: 2.24
4111  */
4112 gint
4113 gtk_range_get_round_digits (GtkRange *range)
4114 {
4115   g_return_val_if_fail (GTK_IS_RANGE (range), -1);
4116
4117   return range->priv->round_digits;
4118 }
4119
4120 void
4121 _gtk_range_set_steppers (GtkRange      *range,
4122                          gboolean       has_a,
4123                          gboolean       has_b,
4124                          gboolean       has_c,
4125                          gboolean       has_d)
4126 {
4127   range->priv->has_stepper_a = has_a;
4128   range->priv->has_stepper_b = has_b;
4129   range->priv->has_stepper_c = has_c;
4130   range->priv->has_stepper_d = has_d;
4131 }