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