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