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