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