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