Pileus Git - ~andy/gtk/blob - gtk/gtkrange.c

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