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