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