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