gtk2_ardour/gtkscrolledwindow.c

   1 /* GTK - The GIMP Toolkit
   2  * Copyright (C) 1995-1997 Peter Mattis, Spencer Kimball and Josh MacDonald
   3  *
   4  * This library is free software; you can redistribute it and/or
   5  * modify it under the terms of the GNU Lesser General Public
   6  * License as published by the Free Software Foundation; either
   7  * version 2 of the License, or (at your option) any later version.
   8  *
   9  * This library is distributed in the hope that it will be useful,
  10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  12  * Lesser General Public License for more details.
  13  *
  14  * You should have received a copy of the GNU Lesser General Public
  15  * License along with this library; if not, write to the
  16  * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
  17  * Boston, MA 02111-1307, USA.
  18  */
  19
  20 /*
  21  * Modified by the GTK+ Team and others 1997-2000.  See the AUTHORS
  22  * file for a list of people on the GTK+ Team.  See the ChangeLog
  23  * files for a list of changes.  These files are distributed with
  24  * GTK+ at ftp://ftp.gtk.org/pub/gtk/.
  25  */
  26
  27 #include <config.h>
  28 #include <math.h>
  29 #include <gdk/gdkkeysyms.h>
  30 #include <gtk/gtkbindings.h>
  31 #include <gtk/gtkmarshalers.h>
  32 #include <gtk/gtkscrolledwindow.h>
  33 #include <gtk/gtkintl.h>
  34 #include <gtk/gtkalias.h>
  35
  36
  37 /* scrolled window policy and size requisition handling:
  38  *
  39  * gtk size requisition works as follows:
  40  *   a widget upon size-request reports the width and height that it finds
  41  *   to be best suited to display its contents, including children.
  42  *   the width and/or height reported from a widget upon size requisition
  43  *   may be overidden by the user by specifying a width and/or height
  44  *   other than 0 through gtk_widget_set_usize().
  45  *
  46  * a scrolled window needs (for imlementing all three policy types) to
  47  * request its width and height based on two different rationales.
  48  * 1)   the user wants the scrolled window to just fit into the space
  49  *      that it gets allocated for a specifc dimension.
  50  * 1.1) this does not apply if the user specified a concrete value
  51  *      value for that specific dimension by either specifying usize for the
  52  *      scrolled window or for its child.
  53  * 2)   the user wants the scrolled window to take as much space up as
  54  *      is desired by the child for a specifc dimension (i.e. POLICY_NEVER).
  55  *
  56  * also, kinda obvious:
  57  * 3)   a user would certainly not have choosen a scrolled window as a container
  58  *      for the child, if the resulting allocation takes up more space than the
  59  *      child would have allocated without the scrolled window.
  60  *
  61  * conclusions:
  62  * A) from 1) follows: the scrolled window shouldn't request more space for a
  63  *    specifc dimension than is required at minimum.
  64  * B) from 1.1) follows: the requisition may be overidden by usize of the scrolled
  65  *    window (done automatically) or by usize of the child (needs to be checked).
  66  * C) from 2) follows: for POLICY_NEVER, the scrolled window simply reports the
  67  *    child's dimension.
  68  * D) from 3) follows: the scrolled window child's minimum width and minimum height
  69  *    under A) at least correspond to the space taken up by its scrollbars.
  70  */
  71
  72 #define DEFAULT_SCROLLBAR_SPACING  3
  73
  74 enum {
  75   PROP_0,
  76   PROP_HADJUSTMENT,
  77   PROP_VADJUSTMENT,
  78   PROP_HSCROLLBAR_POLICY,
  79   PROP_VSCROLLBAR_POLICY,
  80   PROP_WINDOW_PLACEMENT,
  81   PROP_SHADOW_TYPE,
  82   PROP_LAST
  83 };
  84
  85 /* Signals */
  86 enum
  87 {
  88   SCROLL_CHILD,
  89   MOVE_FOCUS_OUT,
  90   LAST_SIGNAL
  91 };
  92
  93 static void gtk_scrolled_window_class_init         (GtkScrolledWindowClass *klass);
  94 static void gtk_scrolled_window_init               (GtkScrolledWindow      *scrolled_window);
  95 static void gtk_scrolled_window_destroy            (GtkObject              *object);
  96 static void gtk_scrolled_window_finalize           (GObject                *object);
  97 static void gtk_scrolled_window_set_property       (GObject                *object,
  98                                                     guint                   prop_id,
  99                                                     const GValue           *value,
 100                                                     GParamSpec             *pspec);
 101 static void gtk_scrolled_window_get_property       (GObject                *object,
 102                                                     guint                   prop_id,
 103                                                     GValue                 *value,
 104                                                     GParamSpec             *pspec);
 105
 106 static gint gtk_scrolled_window_expose             (GtkWidget              *widget,
 107                                                     GdkEventExpose         *event);
 108 static void gtk_scrolled_window_size_request       (GtkWidget              *widget,
 109                                                     GtkRequisition         *requisition);
 110 static void gtk_scrolled_window_size_allocate      (GtkWidget              *widget,
 111                                                     GtkAllocation          *allocation);
 112 static gint gtk_scrolled_window_scroll_event       (GtkWidget              *widget,
 113                                                     GdkEventScroll         *event);
 114 static gint gtk_scrolled_window_focus              (GtkWidget              *widget,
 115                                                     GtkDirectionType        direction);
 116 static void gtk_scrolled_window_add                (GtkContainer           *container,
 117                                                     GtkWidget              *widget);
 118 static void gtk_scrolled_window_remove             (GtkContainer           *container,
 119                                                     GtkWidget              *widget);
 120 static void gtk_scrolled_window_forall             (GtkContainer           *container,
 121                                                     gboolean                include_internals,
 122                                                     GtkCallback             callback,
 123                                                     gpointer                callback_data);
 124 static void gtk_scrolled_window_scroll_child       (GtkScrolledWindow      *scrolled_window,
 125                                                     GtkScrollType           scroll,
 126                                                     gboolean                horizontal);
 127 static void gtk_scrolled_window_move_focus_out     (GtkScrolledWindow      *scrolled_window,
 128                                                     GtkDirectionType        direction_type);
 129
 130 static void gtk_scrolled_window_relative_allocation(GtkWidget              *widget,
 131                                                     GtkAllocation          *allocation);
 132 static void gtk_scrolled_window_adjustment_changed (GtkAdjustment          *adjustment,
 133                                                     gpointer                data);
 134
 135 static GtkContainerClass *parent_class = NULL;
 136
 137 static guint signals[LAST_SIGNAL] = {0};
 138
 139 GType
 140 gtk_scrolled_window_get_type (void)
 141 {
 142   static GType scrolled_window_type = 0;
 143
 144   if (!scrolled_window_type)
 145     {
 146       static const GTypeInfo scrolled_window_info =
 147       {
 148         sizeof (GtkScrolledWindowClass),
 149         NULL,           /* base_init */
 150         NULL,           /* base_finalize */
 151         (GClassInitFunc) gtk_scrolled_window_class_init,
 152         NULL,           /* class_finalize */
 153         NULL,           /* class_data */
 154         sizeof (GtkScrolledWindow),
 155         0,              /* n_preallocs */
 156         (GInstanceInitFunc) gtk_scrolled_window_init,
 157       };
 158
 159       scrolled_window_type =
 160         g_type_register_static (GTK_TYPE_BIN, "GtkScrolledWindow",
 161                                 &scrolled_window_info, 0);
 162     }
 163
 164   return scrolled_window_type;
 165 }
 166
 167 static void
 168 add_scroll_binding (GtkBindingSet  *binding_set,
 169                     guint           keyval,
 170                     GdkModifierType mask,
 171                     GtkScrollType   scroll,
 172                     gboolean        horizontal)
 173 {
 174   guint keypad_keyval = keyval - GDK_Left + GDK_KP_Left;
 175
 176   gtk_binding_entry_add_signal (binding_set, keyval, mask,
 177                                 "scroll_child", 2,
 178                                 GTK_TYPE_SCROLL_TYPE, scroll,
 179                                 G_TYPE_BOOLEAN, horizontal);
 180   gtk_binding_entry_add_signal (binding_set, keypad_keyval, mask,
 181                                 "scroll_child", 2,
 182                                 GTK_TYPE_SCROLL_TYPE, scroll,
 183                                 G_TYPE_BOOLEAN, horizontal);
 184 }
 185
 186 static void
 187 add_tab_bindings (GtkBindingSet    *binding_set,
 188                   GdkModifierType   modifiers,
 189                   GtkDirectionType  direction)
 190 {
 191   gtk_binding_entry_add_signal (binding_set, GDK_Tab, modifiers,
 192                                 "move_focus_out", 1,
 193                                 GTK_TYPE_DIRECTION_TYPE, direction);
 194   gtk_binding_entry_add_signal (binding_set, GDK_KP_Tab, modifiers,
 195                                 "move_focus_out", 1,
 196                                 GTK_TYPE_DIRECTION_TYPE, direction);
 197 }
 198
 199 static void
 200 gtk_scrolled_window_class_init (GtkScrolledWindowClass *class)
 201 {
 202   GObjectClass *gobject_class = G_OBJECT_CLASS (class);
 203   GtkObjectClass *object_class;
 204   GtkWidgetClass *widget_class;
 205   GtkContainerClass *container_class;
 206   GtkBindingSet *binding_set;
 207
 208   object_class = (GtkObjectClass*) class;
 209   widget_class = (GtkWidgetClass*) class;
 210   container_class = (GtkContainerClass*) class;
 211
 212   parent_class = g_type_class_peek_parent (class);
 213
 214   gobject_class->finalize = gtk_scrolled_window_finalize;
 215   gobject_class->set_property = gtk_scrolled_window_set_property;
 216   gobject_class->get_property = gtk_scrolled_window_get_property;
 217
 218   object_class->destroy = gtk_scrolled_window_destroy;
 219
 220   widget_class->expose_event = gtk_scrolled_window_expose;
 221   widget_class->size_request = gtk_scrolled_window_size_request;
 222   widget_class->size_allocate = gtk_scrolled_window_size_allocate;
 223   widget_class->scroll_event = gtk_scrolled_window_scroll_event;
 224   widget_class->focus = gtk_scrolled_window_focus;
 225
 226   container_class->add = gtk_scrolled_window_add;
 227   container_class->remove = gtk_scrolled_window_remove;
 228   container_class->forall = gtk_scrolled_window_forall;
 229
 230   class->scrollbar_spacing = -1;
 231
 232   class->scroll_child = gtk_scrolled_window_scroll_child;
 233   class->move_focus_out = gtk_scrolled_window_move_focus_out;
 234
 235   g_object_class_install_property (gobject_class,
 236                                    PROP_HADJUSTMENT,
 237                                    g_param_spec_object ("hadjustment",
 238                                                         P_("Horizontal Adjustment"),
 239                                                         P_("The GtkAdjustment for the horizontal position"),
 240                                                         GTK_TYPE_ADJUSTMENT,
 241                                                         G_PARAM_READWRITE | G_PARAM_CONSTRUCT));
 242   g_object_class_install_property (gobject_class,
 243                                    PROP_VADJUSTMENT,
 244                                    g_param_spec_object ("vadjustment",
 245                                                         P_("Vertical Adjustment"),
 246                                                         P_("The GtkAdjustment for the vertical position"),
 247                                                         GTK_TYPE_ADJUSTMENT,
 248                                                         G_PARAM_READWRITE | G_PARAM_CONSTRUCT));
 249   g_object_class_install_property (gobject_class,
 250                                    PROP_HSCROLLBAR_POLICY,
 251                                    g_param_spec_enum ("hscrollbar_policy",
 252                                                       P_("Horizontal Scrollbar Policy"),
 253                                                       P_("When the horizontal scrollbar is displayed"),
 254                                                       GTK_TYPE_POLICY_TYPE,
 255                                                       GTK_POLICY_ALWAYS,
 256                                                       G_PARAM_READABLE | G_PARAM_WRITABLE));
 257   g_object_class_install_property (gobject_class,
 258                                    PROP_VSCROLLBAR_POLICY,
 259                                    g_param_spec_enum ("vscrollbar_policy",
 260                                                       P_("Vertical Scrollbar Policy"),
 261                                                       P_("When the vertical scrollbar is displayed"),
 262                                                       GTK_TYPE_POLICY_TYPE,
 263                                                       GTK_POLICY_ALWAYS,
 264                                                       G_PARAM_READABLE | G_PARAM_WRITABLE));
 265
 266   g_object_class_install_property (gobject_class,
 267                                    PROP_WINDOW_PLACEMENT,
 268                                    g_param_spec_enum ("window_placement",
 269                                                       P_("Window Placement"),
 270                                                       P_("Where the contents are located with respect to the scrollbars"),
 271                                                       GTK_TYPE_CORNER_TYPE,
 272                                                       GTK_CORNER_TOP_LEFT,
 273                                                       G_PARAM_READABLE | G_PARAM_WRITABLE));
 274   g_object_class_install_property (gobject_class,
 275                                    PROP_SHADOW_TYPE,
 276                                    g_param_spec_enum ("shadow_type",
 277                                                       P_("Shadow Type"),
 278                                                       P_("Style of bevel around the contents"),
 279                                                       GTK_TYPE_SHADOW_TYPE,
 280                                                       GTK_SHADOW_NONE,
 281                                                       G_PARAM_READABLE | G_PARAM_WRITABLE));
 282
 283   gtk_widget_class_install_style_property (widget_class,
 284                                            g_param_spec_int ("scrollbar_spacing",
 285                                                              P_("Scrollbar spacing"),
 286                                                              P_("Number of pixels between the scrollbars and the scrolled window"),
 287                                                              0,
 288                                                              G_MAXINT,
 289                                                              DEFAULT_SCROLLBAR_SPACING,
 290                                                              G_PARAM_READABLE));
 291
 292   signals[SCROLL_CHILD] =
 293     g_signal_new ("scroll_child",
 294                   G_TYPE_FROM_CLASS (object_class),
 295                   G_SIGNAL_RUN_LAST | G_SIGNAL_ACTION,
 296                   G_STRUCT_OFFSET (GtkScrolledWindowClass, scroll_child),
 297                   NULL, NULL,
 298                   _gtk_marshal_VOID__ENUM_BOOLEAN,
 299                   G_TYPE_NONE, 2,
 300                   GTK_TYPE_SCROLL_TYPE,
 301                   G_TYPE_BOOLEAN);
 302   signals[MOVE_FOCUS_OUT] =
 303     g_signal_new ("move_focus_out",
 304                   G_TYPE_FROM_CLASS (object_class),
 305                   G_SIGNAL_RUN_LAST | G_SIGNAL_ACTION,
 306                   G_STRUCT_OFFSET (GtkScrolledWindowClass, move_focus_out),
 307                   NULL, NULL,
 308                   _gtk_marshal_VOID__ENUM,
 309                   G_TYPE_NONE, 1,
 310                   GTK_TYPE_DIRECTION_TYPE);
 311
 312   binding_set = gtk_binding_set_by_class (class);
 313
 314   add_scroll_binding (binding_set, GDK_Left,  GDK_CONTROL_MASK, GTK_SCROLL_STEP_BACKWARD, TRUE);
 315   add_scroll_binding (binding_set, GDK_Right, GDK_CONTROL_MASK, GTK_SCROLL_STEP_FORWARD,  TRUE);
 316   add_scroll_binding (binding_set, GDK_Up,    GDK_CONTROL_MASK, GTK_SCROLL_STEP_BACKWARD, FALSE);
 317   add_scroll_binding (binding_set, GDK_Down,  GDK_CONTROL_MASK, GTK_SCROLL_STEP_FORWARD,  FALSE);
 318
 319   add_scroll_binding (binding_set, GDK_Page_Up,   GDK_CONTROL_MASK, GTK_SCROLL_PAGE_BACKWARD, TRUE);
 320   add_scroll_binding (binding_set, GDK_Page_Down, GDK_CONTROL_MASK, GTK_SCROLL_PAGE_FORWARD,  TRUE);
 321   add_scroll_binding (binding_set, GDK_Page_Up,   0,                GTK_SCROLL_PAGE_BACKWARD, FALSE);
 322   add_scroll_binding (binding_set, GDK_Page_Down, 0,                GTK_SCROLL_PAGE_FORWARD,  FALSE);
 323
 324   add_scroll_binding (binding_set, GDK_Home, GDK_CONTROL_MASK, GTK_SCROLL_START, TRUE);
 325   add_scroll_binding (binding_set, GDK_End,  GDK_CONTROL_MASK, GTK_SCROLL_END,   TRUE);
 326   add_scroll_binding (binding_set, GDK_Home, 0,                GTK_SCROLL_START, FALSE);
 327   add_scroll_binding (binding_set, GDK_End,  0,                GTK_SCROLL_END,   FALSE);
 328
 329   add_tab_bindings (binding_set, GDK_CONTROL_MASK, GTK_DIR_TAB_FORWARD);
 330   add_tab_bindings (binding_set, GDK_CONTROL_MASK | GDK_SHIFT_MASK, GTK_DIR_TAB_BACKWARD);
 331 }
 332
 333 static void
 334 gtk_scrolled_window_init (GtkScrolledWindow *scrolled_window)
 335 {
 336   GTK_WIDGET_SET_FLAGS (scrolled_window, GTK_NO_WINDOW | GTK_CAN_FOCUS);
 337
 338   scrolled_window->hscrollbar = NULL;
 339   scrolled_window->vscrollbar = NULL;
 340   scrolled_window->hscrollbar_policy = GTK_POLICY_ALWAYS;
 341   scrolled_window->vscrollbar_policy = GTK_POLICY_ALWAYS;
 342   scrolled_window->hscrollbar_visible = FALSE;
 343   scrolled_window->vscrollbar_visible = FALSE;
 344   scrolled_window->focus_out = FALSE;
 345   scrolled_window->window_placement = GTK_CORNER_TOP_LEFT;
 346
 347 }
 348
 349 GtkWidget*
 350 gtk_scrolled_window_new (GtkAdjustment *hadjustment,
 351                          GtkAdjustment *vadjustment)
 352 {
 353   GtkWidget *scrolled_window;
 354
 355   if (hadjustment)
 356     g_return_val_if_fail (GTK_IS_ADJUSTMENT (hadjustment), NULL);
 357
 358   if (vadjustment)
 359     g_return_val_if_fail (GTK_IS_ADJUSTMENT (vadjustment), NULL);
 360
 361   scrolled_window = gtk_widget_new (GTK_TYPE_SCROLLED_WINDOW,
 362                                     "hadjustment", hadjustment,
 363                                     "vadjustment", vadjustment,
 364                                     NULL);
 365
 366   return scrolled_window;
 367 }
 368
 369 void
 370 gtk_scrolled_window_set_hadjustment (GtkScrolledWindow *scrolled_window,
 371                                      GtkAdjustment     *hadjustment)
 372 {
 373   GtkBin *bin;
 374
 375   g_return_if_fail (GTK_IS_SCROLLED_WINDOW (scrolled_window));
 376   if (hadjustment)
 377     g_return_if_fail (GTK_IS_ADJUSTMENT (hadjustment));
 378   else
 379     hadjustment = (GtkAdjustment*) g_object_new (GTK_TYPE_ADJUSTMENT, NULL);
 380
 381   bin = GTK_BIN (scrolled_window);
 382
 383   if (!scrolled_window->hscrollbar)
 384     {
 385       gtk_widget_push_composite_child ();
 386       scrolled_window->hscrollbar = gtk_hscrollbar_new (hadjustment);
 387       gtk_widget_set_composite_name (scrolled_window->hscrollbar, "hscrollbar");
 388       gtk_widget_pop_composite_child ();
 389
 390       gtk_widget_set_parent (scrolled_window->hscrollbar, GTK_WIDGET (scrolled_window));
 391       g_object_ref (scrolled_window->hscrollbar);
 392       gtk_widget_show (scrolled_window->hscrollbar);
 393     }
 394   else
 395     {
 396       GtkAdjustment *old_adjustment;
 397
 398       old_adjustment = gtk_range_get_adjustment (GTK_RANGE (scrolled_window->hscrollbar));
 399       if (old_adjustment == hadjustment)
 400         return;
 401
 402       g_signal_handlers_disconnect_by_func (old_adjustment,
 403                                             gtk_scrolled_window_adjustment_changed,
 404                                             scrolled_window);
 405       gtk_range_set_adjustment (GTK_RANGE (scrolled_window->hscrollbar),
 406                                 hadjustment);
 407     }
 408   hadjustment = gtk_range_get_adjustment (GTK_RANGE (scrolled_window->hscrollbar));
 409   g_signal_connect (hadjustment,
 410                     "changed",
 411                     G_CALLBACK (gtk_scrolled_window_adjustment_changed),
 412                     scrolled_window);
 413   gtk_scrolled_window_adjustment_changed (hadjustment, scrolled_window);
 414
 415   if (bin->child)
 416     gtk_widget_set_scroll_adjustments (bin->child,
 417                                        gtk_range_get_adjustment (GTK_RANGE (scrolled_window->hscrollbar)),
 418                                        gtk_range_get_adjustment (GTK_RANGE (scrolled_window->vscrollbar)));
 419
 420   g_object_notify (G_OBJECT (scrolled_window), "hadjustment");
 421 }
 422
 423 void
 424 gtk_scrolled_window_set_vadjustment (GtkScrolledWindow *scrolled_window,
 425                                      GtkAdjustment     *vadjustment)
 426 {
 427   GtkBin *bin;
 428
 429   g_return_if_fail (GTK_IS_SCROLLED_WINDOW (scrolled_window));
 430   if (vadjustment)
 431     g_return_if_fail (GTK_IS_ADJUSTMENT (vadjustment));
 432   else
 433     vadjustment = (GtkAdjustment*) g_object_new (GTK_TYPE_ADJUSTMENT, NULL);
 434
 435   bin = GTK_BIN (scrolled_window);
 436
 437   if (!scrolled_window->vscrollbar)
 438     {
 439       gtk_widget_push_composite_child ();
 440       scrolled_window->vscrollbar = gtk_vscrollbar_new (vadjustment);
 441       gtk_widget_set_composite_name (scrolled_window->vscrollbar, "vscrollbar");
 442       gtk_widget_pop_composite_child ();
 443
 444       gtk_widget_set_parent (scrolled_window->vscrollbar, GTK_WIDGET (scrolled_window));
 445       g_object_ref (scrolled_window->vscrollbar);
 446       gtk_widget_show (scrolled_window->vscrollbar);
 447     }
 448   else
 449     {
 450       GtkAdjustment *old_adjustment;
 451
 452       old_adjustment = gtk_range_get_adjustment (GTK_RANGE (scrolled_window->vscrollbar));
 453       if (old_adjustment == vadjustment)
 454         return;
 455
 456       g_signal_handlers_disconnect_by_func (old_adjustment,
 457                                             gtk_scrolled_window_adjustment_changed,
 458                                             scrolled_window);
 459       gtk_range_set_adjustment (GTK_RANGE (scrolled_window->vscrollbar),
 460                                 vadjustment);
 461     }
 462   vadjustment = gtk_range_get_adjustment (GTK_RANGE (scrolled_window->vscrollbar));
 463   g_signal_connect (vadjustment,
 464                     "changed",
 465                     G_CALLBACK (gtk_scrolled_window_adjustment_changed),
 466                     scrolled_window);
 467   gtk_scrolled_window_adjustment_changed (vadjustment, scrolled_window);
 468
 469   if (bin->child)
 470     gtk_widget_set_scroll_adjustments (bin->child,
 471                                        gtk_range_get_adjustment (GTK_RANGE (scrolled_window->hscrollbar)),
 472                                        gtk_range_get_adjustment (GTK_RANGE (scrolled_window->vscrollbar)));
 473
 474   g_object_notify (G_OBJECT (scrolled_window), "vadjustment");
 475 }
 476
 477 GtkAdjustment*
 478 gtk_scrolled_window_get_hadjustment (GtkScrolledWindow *scrolled_window)
 479 {
 480   g_return_val_if_fail (GTK_IS_SCROLLED_WINDOW (scrolled_window), NULL);
 481
 482   return (scrolled_window->hscrollbar ?
 483           gtk_range_get_adjustment (GTK_RANGE (scrolled_window->hscrollbar)) :
 484           NULL);
 485 }
 486
 487 GtkAdjustment*
 488 gtk_scrolled_window_get_vadjustment (GtkScrolledWindow *scrolled_window)
 489 {
 490   g_return_val_if_fail (GTK_IS_SCROLLED_WINDOW (scrolled_window), NULL);
 491
 492   return (scrolled_window->vscrollbar ?
 493           gtk_range_get_adjustment (GTK_RANGE (scrolled_window->vscrollbar)) :
 494           NULL);
 495 }
 496
 497 void
 498 gtk_scrolled_window_set_policy (GtkScrolledWindow *scrolled_window,
 499                                 GtkPolicyType      hscrollbar_policy,
 500                                 GtkPolicyType      vscrollbar_policy)
 501 {
 502   GObject *object = G_OBJECT (scrolled_window);
 503
 504   g_return_if_fail (GTK_IS_SCROLLED_WINDOW (scrolled_window));
 505
 506   if ((scrolled_window->hscrollbar_policy != hscrollbar_policy) ||
 507       (scrolled_window->vscrollbar_policy != vscrollbar_policy))
 508     {
 509       scrolled_window->hscrollbar_policy = hscrollbar_policy;
 510       scrolled_window->vscrollbar_policy = vscrollbar_policy;
 511
 512       gtk_widget_queue_resize (GTK_WIDGET (scrolled_window));
 513
 514       g_object_freeze_notify (object);
 515       g_object_notify (object, "hscrollbar-policy");
 516       g_object_notify (object, "vscrollbar-policy");
 517       g_object_thaw_notify (object);
 518     }
 519 }
 520
 521 /**
 522  * gtk_scrolled_window_get_policy:
 523  * @scrolled_window: a #GtkScrolledWindow
 524  * @hscrollbar_policy: location to store the policy for the horizontal scrollbar, or %NULL.
 525  * @vscrollbar_policy: location to store the policy for the horizontal scrollbar, or %NULL.
 526  *
 527  * Retrieves the current policy values for the horizontal and vertical
 528  * scrollbars. See gtk_scrolled_window_set_policy().
 529  **/
 530 void
 531 gtk_scrolled_window_get_policy (GtkScrolledWindow *scrolled_window,
 532                                 GtkPolicyType     *hscrollbar_policy,
 533                                 GtkPolicyType     *vscrollbar_policy)
 534 {
 535   g_return_if_fail (GTK_IS_SCROLLED_WINDOW (scrolled_window));
 536
 537   if (hscrollbar_policy)
 538     *hscrollbar_policy = scrolled_window->hscrollbar_policy;
 539   if (vscrollbar_policy)
 540     *vscrollbar_policy = scrolled_window->vscrollbar_policy;
 541 }
 542
 543 void
 544 gtk_scrolled_window_set_placement (GtkScrolledWindow *scrolled_window,
 545                                    GtkCornerType      window_placement)
 546 {
 547   g_return_if_fail (GTK_IS_SCROLLED_WINDOW (scrolled_window));
 548
 549   if (scrolled_window->window_placement != window_placement)
 550     {
 551       scrolled_window->window_placement = window_placement;
 552
 553       gtk_widget_queue_resize (GTK_WIDGET (scrolled_window));
 554
 555       g_object_notify (G_OBJECT (scrolled_window), "window-placement");
 556     }
 557 }
 558
 559 /**
 560  * gtk_scrolled_window_get_placement:
 561  * @scrolled_window: a #GtkScrolledWindow
 562  *
 563  * Gets the placement of the scrollbars for the scrolled window. See
 564  * gtk_scrolled_window_set_placement().
 565  *
 566  * Return value: the current placement value.
 567  **/
 568 GtkCornerType
 569 gtk_scrolled_window_get_placement (GtkScrolledWindow *scrolled_window)
 570 {
 571   g_return_val_if_fail (GTK_IS_SCROLLED_WINDOW (scrolled_window), GTK_CORNER_TOP_LEFT);
 572
 573   return scrolled_window->window_placement;
 574 }
 575
 576 /**
 577  * gtk_scrolled_window_set_shadow_type:
 578  * @scrolled_window: a #GtkScrolledWindow
 579  * @type: kind of shadow to draw around scrolled window contents
 580  *
 581  * Changes the type of shadow drawn around the contents of
 582  * @scrolled_window.
 583  *
 584  **/
 585 void
 586 gtk_scrolled_window_set_shadow_type (GtkScrolledWindow *scrolled_window,
 587                                      GtkShadowType      type)
 588 {
 589   g_return_if_fail (GTK_IS_SCROLLED_WINDOW (scrolled_window));
 590   g_return_if_fail (type >= GTK_SHADOW_NONE && type <= GTK_SHADOW_ETCHED_OUT);
 591
 592   if (scrolled_window->shadow_type != type)
 593     {
 594       scrolled_window->shadow_type = type;
 595
 596       if (GTK_WIDGET_DRAWABLE (scrolled_window))
 597         gtk_widget_queue_draw (GTK_WIDGET (scrolled_window));
 598
 599       gtk_widget_queue_resize (GTK_WIDGET (scrolled_window));
 600
 601       g_object_notify (G_OBJECT (scrolled_window), "shadow-type");
 602     }
 603 }
 604
 605 /**
 606  * gtk_scrolled_window_get_shadow_type:
 607  * @scrolled_window: a #GtkScrolledWindow
 608  *
 609  * Gets the shadow type of the scrolled window. See
 610  * gtk_scrolled_window_set_shadow_type().
 611  *
 612  * Return value: the current shadow type
 613  **/
 614 GtkShadowType
 615 gtk_scrolled_window_get_shadow_type (GtkScrolledWindow *scrolled_window)
 616 {
 617   g_return_val_if_fail (GTK_IS_SCROLLED_WINDOW (scrolled_window), GTK_SHADOW_NONE);
 618
 619   return scrolled_window->shadow_type;
 620 }
 621
 622 static void
 623 gtk_scrolled_window_destroy (GtkObject *object)
 624 {
 625   GtkScrolledWindow *scrolled_window;
 626
 627   g_return_if_fail (GTK_IS_SCROLLED_WINDOW (object));
 628
 629   scrolled_window = GTK_SCROLLED_WINDOW (object);
 630
 631   gtk_widget_unparent (scrolled_window->hscrollbar);
 632   gtk_widget_unparent (scrolled_window->vscrollbar);
 633   gtk_widget_destroy (scrolled_window->hscrollbar);
 634   gtk_widget_destroy (scrolled_window->vscrollbar);
 635
 636   GTK_OBJECT_CLASS (parent_class)->destroy (object);
 637 }
 638
 639 static void
 640 gtk_scrolled_window_finalize (GObject *object)
 641 {
 642   GtkScrolledWindow *scrolled_window = GTK_SCROLLED_WINDOW (object);
 643
 644   g_object_unref (scrolled_window->hscrollbar);
 645   g_object_unref (scrolled_window->vscrollbar);
 646
 647   G_OBJECT_CLASS (parent_class)->finalize (object);
 648 }
 649
 650 static void
 651 gtk_scrolled_window_set_property (GObject      *object,
 652                                   guint         prop_id,
 653                                   const GValue *value,
 654                                   GParamSpec   *pspec)
 655 {
 656   GtkScrolledWindow *scrolled_window = GTK_SCROLLED_WINDOW (object);
 657
 658   switch (prop_id)
 659     {
 660     case PROP_HADJUSTMENT:
 661       gtk_scrolled_window_set_hadjustment (scrolled_window,
 662                                            g_value_get_object (value));
 663       break;
 664     case PROP_VADJUSTMENT:
 665       gtk_scrolled_window_set_vadjustment (scrolled_window,
 666                                            g_value_get_object (value));
 667       break;
 668     case PROP_HSCROLLBAR_POLICY:
 669       gtk_scrolled_window_set_policy (scrolled_window,
 670                                       g_value_get_enum (value),
 671                                       scrolled_window->vscrollbar_policy);
 672       break;
 673     case PROP_VSCROLLBAR_POLICY:
 674       gtk_scrolled_window_set_policy (scrolled_window,
 675                                       scrolled_window->hscrollbar_policy,
 676                                       g_value_get_enum (value));
 677       break;
 678     case PROP_WINDOW_PLACEMENT:
 679       gtk_scrolled_window_set_placement (scrolled_window,
 680                                          g_value_get_enum (value));
 681       break;
 682     case PROP_SHADOW_TYPE:
 683       gtk_scrolled_window_set_shadow_type (scrolled_window,
 684                                            g_value_get_enum (value));
 685       break;
 686     default:
 687       G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
 688       break;
 689     }
 690 }
 691
 692 static void
 693 gtk_scrolled_window_get_property (GObject    *object,
 694                                   guint       prop_id,
 695                                   GValue     *value,
 696                                   GParamSpec *pspec)
 697 {
 698   GtkScrolledWindow *scrolled_window = GTK_SCROLLED_WINDOW (object);
 699
 700   switch (prop_id)
 701     {
 702     case PROP_HADJUSTMENT:
 703       g_value_set_object (value,
 704                           G_OBJECT (gtk_scrolled_window_get_hadjustment (scrolled_window)));
 705       break;
 706     case PROP_VADJUSTMENT:
 707       g_value_set_object (value,
 708                           G_OBJECT (gtk_scrolled_window_get_vadjustment (scrolled_window)));
 709       break;
 710     case PROP_HSCROLLBAR_POLICY:
 711       g_value_set_enum (value, scrolled_window->hscrollbar_policy);
 712       break;
 713     case PROP_VSCROLLBAR_POLICY:
 714       g_value_set_enum (value, scrolled_window->vscrollbar_policy);
 715       break;
 716     case PROP_WINDOW_PLACEMENT:
 717       g_value_set_enum (value, scrolled_window->window_placement);
 718       break;
 719     case PROP_SHADOW_TYPE:
 720       g_value_set_enum (value, scrolled_window->shadow_type);
 721       break;
 722     default:
 723       G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
 724       break;
 725     }
 726 }
 727
 728 static void
 729 gtk_scrolled_window_paint (GtkWidget    *widget,
 730                            GdkRectangle *area)
 731 {
 732   GtkAllocation relative_allocation;
 733   GtkScrolledWindow *scrolled_window = GTK_SCROLLED_WINDOW (widget);
 734
 735   if (scrolled_window->shadow_type != GTK_SHADOW_NONE)
 736     {
 737       gtk_scrolled_window_relative_allocation (widget, &relative_allocation);
 738
 739       relative_allocation.x -= widget->style->xthickness;
 740       relative_allocation.y -= widget->style->ythickness;
 741       relative_allocation.width += 2 * widget->style->xthickness;
 742       relative_allocation.height += 2 * widget->style->ythickness;
 743
 744       gtk_paint_shadow (widget->style, widget->window,
 745                         GTK_STATE_NORMAL, scrolled_window->shadow_type,
 746                         area, widget, "scrolled_window",
 747                         widget->allocation.x + relative_allocation.x,
 748                         widget->allocation.y + relative_allocation.y,
 749                         relative_allocation.width,
 750                         relative_allocation.height);
 751     }
 752 }
 753
 754 static gint
 755 gtk_scrolled_window_expose (GtkWidget      *widget,
 756                             GdkEventExpose *event)
 757 {
 758   if (GTK_WIDGET_DRAWABLE (widget))
 759     {
 760       gtk_scrolled_window_paint (widget, &event->area);
 761
 762       (* GTK_WIDGET_CLASS (parent_class)->expose_event) (widget, event);
 763     }
 764
 765   return FALSE;
 766 }
 767
 768 static void
 769 gtk_scrolled_window_forall (GtkContainer *container,
 770                             gboolean      include_internals,
 771                             GtkCallback   callback,
 772                             gpointer      callback_data)
 773 {
 774   g_return_if_fail (GTK_IS_SCROLLED_WINDOW (container));
 775   g_return_if_fail (callback != NULL);
 776
 777   GTK_CONTAINER_CLASS (parent_class)->forall (container,
 778                                               include_internals,
 779                                               callback,
 780                                               callback_data);
 781   if (include_internals)
 782     {
 783       GtkScrolledWindow *scrolled_window;
 784
 785       scrolled_window = GTK_SCROLLED_WINDOW (container);
 786
 787       if (scrolled_window->vscrollbar)
 788         callback (scrolled_window->vscrollbar, callback_data);
 789       if (scrolled_window->hscrollbar)
 790         callback (scrolled_window->hscrollbar, callback_data);
 791     }
 792 }
 793
 794 static void
 795 gtk_scrolled_window_scroll_child (GtkScrolledWindow *scrolled_window,
 796                                   GtkScrollType      scroll,
 797                                   gboolean           horizontal)
 798 {
 799   GtkAdjustment *adjustment = NULL;
 800
 801   switch (scroll)
 802     {
 803     case GTK_SCROLL_STEP_UP:
 804       scroll = GTK_SCROLL_STEP_BACKWARD;
 805       horizontal = FALSE;
 806       break;
 807     case GTK_SCROLL_STEP_DOWN:
 808       scroll = GTK_SCROLL_STEP_FORWARD;
 809       horizontal = FALSE;
 810       break;
 811     case GTK_SCROLL_STEP_LEFT:
 812       scroll = GTK_SCROLL_STEP_BACKWARD;
 813       horizontal = TRUE;
 814       break;
 815     case GTK_SCROLL_STEP_RIGHT:
 816       scroll = GTK_SCROLL_STEP_FORWARD;
 817       horizontal = TRUE;
 818       break;
 819     case GTK_SCROLL_PAGE_UP:
 820       scroll = GTK_SCROLL_PAGE_BACKWARD;
 821       horizontal = FALSE;
 822       break;
 823     case GTK_SCROLL_PAGE_DOWN:
 824       scroll = GTK_SCROLL_PAGE_FORWARD;
 825       horizontal = FALSE;
 826       break;
 827     case GTK_SCROLL_PAGE_LEFT:
 828       scroll = GTK_SCROLL_STEP_BACKWARD;
 829       horizontal = TRUE;
 830       break;
 831     case GTK_SCROLL_PAGE_RIGHT:
 832       scroll = GTK_SCROLL_STEP_FORWARD;
 833       horizontal = TRUE;
 834       break;
 835     case GTK_SCROLL_STEP_BACKWARD:
 836     case GTK_SCROLL_STEP_FORWARD:
 837     case GTK_SCROLL_PAGE_BACKWARD:
 838     case GTK_SCROLL_PAGE_FORWARD:
 839     case GTK_SCROLL_START:
 840     case GTK_SCROLL_END:
 841       break;
 842     default:
 843       g_warning ("Invalid scroll type %d for GtkSpinButton::change-value", scroll);
 844       return;
 845     }
 846
 847   if (horizontal)
 848     {
 849       if (scrolled_window->hscrollbar)
 850         adjustment = gtk_range_get_adjustment (GTK_RANGE (scrolled_window->hscrollbar));
 851     }
 852   else
 853     {
 854       if (scrolled_window->vscrollbar)
 855         adjustment = gtk_range_get_adjustment (GTK_RANGE (scrolled_window->vscrollbar));
 856     }
 857
 858   if (adjustment)
 859     {
 860       gdouble value = adjustment->value;
 861
 862       switch (scroll)
 863         {
 864         case GTK_SCROLL_STEP_FORWARD:
 865           value += adjustment->step_increment;
 866           break;
 867         case GTK_SCROLL_STEP_BACKWARD:
 868           value -= adjustment->step_increment;
 869           break;
 870         case GTK_SCROLL_PAGE_FORWARD:
 871           value += adjustment->page_increment;
 872           break;
 873         case GTK_SCROLL_PAGE_BACKWARD:
 874           value -= adjustment->page_increment;
 875           break;
 876         case GTK_SCROLL_START:
 877           value = adjustment->lower;
 878           break;
 879         case GTK_SCROLL_END:
 880           value = adjustment->upper;
 881           break;
 882         default:
 883           g_assert_not_reached ();
 884           break;
 885         }
 886
 887       value = CLAMP (value, adjustment->lower, adjustment->upper - adjustment->page_size);
 888
 889       gtk_adjustment_set_value (adjustment, value);
 890     }
 891 }
 892
 893 static void
 894 gtk_scrolled_window_move_focus_out (GtkScrolledWindow *scrolled_window,
 895                                     GtkDirectionType   direction_type)
 896 {
 897   GtkWidget *toplevel;
 898
 899   /* Focus out of the scrolled window entirely. We do this by setting
 900    * a flag, then propagating the focus motion to the notebook.
 901    */
 902   toplevel = gtk_widget_get_toplevel (GTK_WIDGET (scrolled_window));
 903   if (!GTK_WIDGET_TOPLEVEL (toplevel))
 904     return;
 905
 906   g_object_ref (scrolled_window);
 907
 908   scrolled_window->focus_out = TRUE;
 909   g_signal_emit_by_name (toplevel, "move_focus", direction_type);
 910   scrolled_window->focus_out = FALSE;
 911
 912   g_object_unref (scrolled_window);
 913 }
 914
 915 static void
 916 gtk_scrolled_window_size_request (GtkWidget      *widget,
 917                                   GtkRequisition *requisition)
 918 {
 919   GtkScrolledWindow *scrolled_window;
 920   GtkBin *bin;
 921   gint extra_width;
 922   gint extra_height;
 923   gint scrollbar_spacing;
 924   GtkRequisition hscrollbar_requisition;
 925   GtkRequisition vscrollbar_requisition;
 926   GtkRequisition child_requisition;
 927
 928   g_return_if_fail (GTK_IS_SCROLLED_WINDOW (widget));
 929   g_return_if_fail (requisition != NULL);
 930
 931   scrolled_window = GTK_SCROLLED_WINDOW (widget);
 932   bin = GTK_BIN (scrolled_window);
 933
 934   scrollbar_spacing = _gtk_scrolled_window_get_scrollbar_spacing (scrolled_window);
 935
 936   extra_width = 0;
 937   extra_height = 0;
 938   requisition->width = 0;
 939   requisition->height = 0;
 940
 941   gtk_widget_size_request (scrolled_window->hscrollbar,
 942                            &hscrollbar_requisition);
 943   gtk_widget_size_request (scrolled_window->vscrollbar,
 944                            &vscrollbar_requisition);
 945
 946   if (bin->child && GTK_WIDGET_VISIBLE (bin->child))
 947     {
 948       gtk_widget_size_request (bin->child, &child_requisition);
 949
 950       if (scrolled_window->hscrollbar_policy == GTK_POLICY_NEVER)
 951         requisition->width += child_requisition.width;
 952       else
 953         {
 954           GtkWidgetAuxInfo *aux_info = _gtk_widget_get_aux_info (bin->child, FALSE);
 955
 956           if (aux_info && aux_info->width > 0)
 957             {
 958               requisition->width += aux_info->width;
 959               extra_width = -1;
 960             }
 961           else
 962             requisition->width += vscrollbar_requisition.width;
 963         }
 964
 965 //      if (scrolled_window->vscrollbar_policy == GTK_POLICY_NEVER)
 966 //      requisition->height += child_requisition.height;
 967 //      else
 968         {
 969           GtkWidgetAuxInfo *aux_info = _gtk_widget_get_aux_info (bin->child, FALSE);
 970
 971           if (aux_info && aux_info->height > 0)
 972             {
 973               requisition->height += aux_info->height;
 974               extra_height = -1;
 975             }
 976           else
 977             requisition->height += hscrollbar_requisition.height;
 978         }
 979     }
 980
 981   if (scrolled_window->hscrollbar_policy == GTK_POLICY_AUTOMATIC ||
 982       scrolled_window->hscrollbar_policy == GTK_POLICY_ALWAYS)
 983     {
 984       requisition->width = MAX (requisition->width, hscrollbar_requisition.width);
 985       if (!extra_height || scrolled_window->hscrollbar_policy == GTK_POLICY_ALWAYS)
 986         extra_height = scrollbar_spacing + hscrollbar_requisition.height;
 987     }
 988
 989   if (scrolled_window->vscrollbar_policy == GTK_POLICY_AUTOMATIC ||
 990       scrolled_window->vscrollbar_policy == GTK_POLICY_ALWAYS)
 991     {
 992       requisition->height = MAX (requisition->height, vscrollbar_requisition.height);
 993       if (!extra_height || scrolled_window->vscrollbar_policy == GTK_POLICY_ALWAYS)
 994         extra_width = scrollbar_spacing + vscrollbar_requisition.width;
 995     }
 996
 997   requisition->width += GTK_CONTAINER (widget)->border_width * 2 + MAX (0, extra_width);
 998   requisition->height += GTK_CONTAINER (widget)->border_width * 2 + MAX (0, extra_height);
 999
1000   if (scrolled_window->shadow_type != GTK_SHADOW_NONE)
1001     {
1002       requisition->width += 2 * widget->style->xthickness;
1003       requisition->height += 2 * widget->style->ythickness;
1004     }
1005 }
1006
1007 static void
1008 gtk_scrolled_window_relative_allocation (GtkWidget     *widget,
1009                                          GtkAllocation *allocation)
1010 {
1011   GtkScrolledWindow *scrolled_window;
1012   gint scrollbar_spacing;
1013
1014   g_return_if_fail (widget != NULL);
1015   g_return_if_fail (allocation != NULL);
1016
1017   scrolled_window = GTK_SCROLLED_WINDOW (widget);
1018   scrollbar_spacing = _gtk_scrolled_window_get_scrollbar_spacing (scrolled_window);
1019
1020   allocation->x = GTK_CONTAINER (widget)->border_width;
1021   allocation->y = GTK_CONTAINER (widget)->border_width;
1022
1023   if (scrolled_window->shadow_type != GTK_SHADOW_NONE)
1024     {
1025       allocation->x += widget->style->xthickness;
1026       allocation->y += widget->style->ythickness;
1027     }
1028
1029   allocation->width = MAX (1, (gint)widget->allocation.width - allocation->x * 2);
1030   allocation->height = MAX (1, (gint)widget->allocation.height - allocation->y * 2);
1031
1032   if (scrolled_window->vscrollbar_visible)
1033     {
1034       GtkRequisition vscrollbar_requisition;
1035       gboolean is_rtl;
1036
1037       gtk_widget_get_child_requisition (scrolled_window->vscrollbar,
1038                                         &vscrollbar_requisition);
1039       is_rtl = gtk_widget_get_direction (widget) == GTK_TEXT_DIR_RTL;
1040
1041       if ((!is_rtl &&
1042            (scrolled_window->window_placement == GTK_CORNER_TOP_RIGHT ||
1043             scrolled_window->window_placement == GTK_CORNER_BOTTOM_RIGHT)) ||
1044           (is_rtl &&
1045            (scrolled_window->window_placement == GTK_CORNER_TOP_LEFT ||
1046             scrolled_window->window_placement == GTK_CORNER_BOTTOM_LEFT)))
1047         allocation->x += (vscrollbar_requisition.width +  scrollbar_spacing);
1048
1049       allocation->width = MAX (1, allocation->width - (vscrollbar_requisition.width + scrollbar_spacing));
1050     }
1051   if (scrolled_window->hscrollbar_visible)
1052     {
1053       GtkRequisition hscrollbar_requisition;
1054       gtk_widget_get_child_requisition (scrolled_window->hscrollbar,
1055                                         &hscrollbar_requisition);
1056
1057       if (scrolled_window->window_placement == GTK_CORNER_BOTTOM_LEFT ||
1058           scrolled_window->window_placement == GTK_CORNER_BOTTOM_RIGHT)
1059         allocation->y += (hscrollbar_requisition.height + scrollbar_spacing);
1060
1061       allocation->height = MAX (1, allocation->height - (hscrollbar_requisition.height + scrollbar_spacing));
1062     }
1063 }
1064
1065 static void
1066 gtk_scrolled_window_size_allocate (GtkWidget     *widget,
1067                                    GtkAllocation *allocation)
1068 {
1069   GtkScrolledWindow *scrolled_window;
1070   GtkBin *bin;
1071   GtkAllocation relative_allocation;
1072   GtkAllocation child_allocation;
1073   gint scrollbar_spacing;
1074
1075   g_return_if_fail (GTK_IS_SCROLLED_WINDOW (widget));
1076   g_return_if_fail (allocation != NULL);
1077
1078   scrolled_window = GTK_SCROLLED_WINDOW (widget);
1079   bin = GTK_BIN (scrolled_window);
1080
1081   scrollbar_spacing = _gtk_scrolled_window_get_scrollbar_spacing (scrolled_window);
1082
1083   widget->allocation = *allocation;
1084
1085   if (scrolled_window->hscrollbar_policy == GTK_POLICY_ALWAYS)
1086     scrolled_window->hscrollbar_visible = TRUE;
1087   else if (scrolled_window->hscrollbar_policy == GTK_POLICY_NEVER)
1088     scrolled_window->hscrollbar_visible = FALSE;
1089   if (scrolled_window->vscrollbar_policy == GTK_POLICY_ALWAYS)
1090     scrolled_window->vscrollbar_visible = TRUE;
1091   else if (scrolled_window->vscrollbar_policy == GTK_POLICY_NEVER)
1092     scrolled_window->vscrollbar_visible = FALSE;
1093
1094   if (bin->child && GTK_WIDGET_VISIBLE (bin->child))
1095     {
1096       gboolean previous_hvis;
1097       gboolean previous_vvis;
1098       guint count = 0;
1099
1100       do
1101         {
1102           gtk_scrolled_window_relative_allocation (widget, &relative_allocation);
1103
1104           child_allocation.x = relative_allocation.x + allocation->x;
1105           child_allocation.y = relative_allocation.y + allocation->y;
1106           child_allocation.width = relative_allocation.width;
1107           child_allocation.height = relative_allocation.height;
1108
1109           previous_hvis = scrolled_window->hscrollbar_visible;
1110           previous_vvis = scrolled_window->vscrollbar_visible;
1111
1112           gtk_widget_size_allocate (bin->child, &child_allocation);
1113
1114           /* If, after the first iteration, the hscrollbar and the
1115            * vscrollbar flip visiblity, then we need both.
1116            */
1117           if (count &&
1118               previous_hvis != scrolled_window->hscrollbar_visible &&
1119               previous_vvis != scrolled_window->vscrollbar_visible)
1120             {
1121               scrolled_window->hscrollbar_visible = TRUE;
1122               scrolled_window->vscrollbar_visible = TRUE;
1123
1124               /* a new resize is already queued at this point,
1125                * so we will immediatedly get reinvoked
1126                */
1127               return;
1128             }
1129
1130           count++;
1131         }
1132       while (previous_hvis != scrolled_window->hscrollbar_visible ||
1133              previous_vvis != scrolled_window->vscrollbar_visible);
1134     }
1135   else
1136     gtk_scrolled_window_relative_allocation (widget, &relative_allocation);
1137
1138   if (scrolled_window->hscrollbar_visible)
1139     {
1140       GtkRequisition hscrollbar_requisition;
1141       gtk_widget_get_child_requisition (scrolled_window->hscrollbar,
1142                                         &hscrollbar_requisition);
1143
1144       if (!GTK_WIDGET_VISIBLE (scrolled_window->hscrollbar))
1145         gtk_widget_show (scrolled_window->hscrollbar);
1146
1147       child_allocation.x = relative_allocation.x;
1148       if (scrolled_window->window_placement == GTK_CORNER_TOP_LEFT ||
1149           scrolled_window->window_placement == GTK_CORNER_TOP_RIGHT)
1150         child_allocation.y = (relative_allocation.y +
1151                               relative_allocation.height +
1152                               scrollbar_spacing +
1153                               (scrolled_window->shadow_type == GTK_SHADOW_NONE ?
1154                                0 : widget->style->ythickness));
1155       else
1156         child_allocation.y = GTK_CONTAINER (scrolled_window)->border_width;
1157
1158       child_allocation.width = relative_allocation.width;
1159       child_allocation.height = hscrollbar_requisition.height;
1160       child_allocation.x += allocation->x;
1161       child_allocation.y += allocation->y;
1162
1163       if (scrolled_window->shadow_type != GTK_SHADOW_NONE)
1164         {
1165           child_allocation.x -= widget->style->xthickness;
1166           child_allocation.width += 2 * widget->style->xthickness;
1167         }
1168
1169       gtk_widget_size_allocate (scrolled_window->hscrollbar, &child_allocation);
1170     }
1171   else if (GTK_WIDGET_VISIBLE (scrolled_window->hscrollbar))
1172     gtk_widget_hide (scrolled_window->hscrollbar);
1173
1174   if (scrolled_window->vscrollbar_visible)
1175     {
1176       GtkRequisition vscrollbar_requisition;
1177       if (!GTK_WIDGET_VISIBLE (scrolled_window->vscrollbar))
1178         gtk_widget_show (scrolled_window->vscrollbar);
1179
1180       gtk_widget_get_child_requisition (scrolled_window->vscrollbar,
1181                                         &vscrollbar_requisition);
1182
1183       if ((gtk_widget_get_direction (widget) == GTK_TEXT_DIR_RTL &&
1184            (scrolled_window->window_placement == GTK_CORNER_TOP_RIGHT ||
1185             scrolled_window->window_placement == GTK_CORNER_BOTTOM_RIGHT)) ||
1186           (gtk_widget_get_direction (widget) == GTK_TEXT_DIR_LTR &&
1187            (scrolled_window->window_placement == GTK_CORNER_TOP_LEFT ||
1188             scrolled_window->window_placement == GTK_CORNER_BOTTOM_LEFT)))
1189         child_allocation.x = (relative_allocation.x +
1190                               relative_allocation.width +
1191                               scrollbar_spacing +
1192                               (scrolled_window->shadow_type == GTK_SHADOW_NONE ?
1193                                0 : widget->style->xthickness));
1194       else
1195         child_allocation.x = GTK_CONTAINER (scrolled_window)->border_width;
1196
1197       child_allocation.y = relative_allocation.y;
1198       child_allocation.width = vscrollbar_requisition.width;
1199       child_allocation.height = relative_allocation.height;
1200       child_allocation.x += allocation->x;
1201       child_allocation.y += allocation->y;
1202
1203       if (scrolled_window->shadow_type != GTK_SHADOW_NONE)
1204         {
1205           child_allocation.y -= widget->style->ythickness;
1206           child_allocation.height += 2 * widget->style->ythickness;
1207         }
1208
1209       gtk_widget_size_allocate (scrolled_window->vscrollbar, &child_allocation);
1210     }
1211   else if (GTK_WIDGET_VISIBLE (scrolled_window->vscrollbar))
1212     gtk_widget_hide (scrolled_window->vscrollbar);
1213 }
1214
1215 static gint
1216 gtk_scrolled_window_scroll_event (GtkWidget *widget,
1217                                   GdkEventScroll *event)
1218 {
1219   GtkWidget *range;
1220
1221   g_return_val_if_fail (GTK_IS_SCROLLED_WINDOW (widget), FALSE);
1222   g_return_val_if_fail (event != NULL, FALSE);
1223
1224   if (event->direction == GDK_SCROLL_UP || event->direction == GDK_SCROLL_DOWN)
1225     range = GTK_SCROLLED_WINDOW (widget)->vscrollbar;
1226   else
1227     range = GTK_SCROLLED_WINDOW (widget)->hscrollbar;
1228
1229   if (range && GTK_WIDGET_VISIBLE (range))
1230     {
1231       GtkAdjustment *adj = GTK_RANGE (range)->adjustment;
1232       gdouble delta, new_value;
1233
1234       delta = _gtk_range_get_wheel_delta (GTK_RANGE (range), event->direction);
1235
1236       new_value = CLAMP (adj->value + delta, adj->lower, adj->upper - adj->page_size);
1237
1238       gtk_adjustment_set_value (adj, new_value);
1239
1240       return TRUE;
1241     }
1242
1243   return FALSE;
1244 }
1245
1246 static gint
1247 gtk_scrolled_window_focus (GtkWidget        *widget,
1248                            GtkDirectionType  direction)
1249 {
1250   GtkScrolledWindow *scrolled_window = GTK_SCROLLED_WINDOW (widget);
1251   gboolean had_focus_child = GTK_CONTAINER (widget)->focus_child != NULL;
1252
1253   if (scrolled_window->focus_out)
1254     {
1255       scrolled_window->focus_out = FALSE; /* Clear this to catch the wrap-around case */
1256       return FALSE;
1257     }
1258
1259   if (gtk_widget_is_focus (widget))
1260     return FALSE;
1261
1262   /* We only put the scrolled window itself in the focus chain if it
1263    * isn't possible to focus any children.
1264    */
1265   if (GTK_BIN (widget)->child)
1266     {
1267       if (gtk_widget_child_focus (GTK_BIN (widget)->child, direction))
1268         return TRUE;
1269     }
1270
1271   if (!had_focus_child)
1272     {
1273       gtk_widget_grab_focus (widget);
1274       return TRUE;
1275     }
1276   else
1277     return FALSE;
1278 }
1279
1280 static void
1281 gtk_scrolled_window_adjustment_changed (GtkAdjustment *adjustment,
1282                                         gpointer       data)
1283 {
1284   GtkScrolledWindow *scrolled_win;
1285
1286   g_return_if_fail (adjustment != NULL);
1287   g_return_if_fail (data != NULL);
1288
1289   scrolled_win = GTK_SCROLLED_WINDOW (data);
1290
1291   if (scrolled_win->hscrollbar &&
1292       adjustment == gtk_range_get_adjustment (GTK_RANGE (scrolled_win->hscrollbar)))
1293     {
1294       if (scrolled_win->hscrollbar_policy == GTK_POLICY_AUTOMATIC)
1295         {
1296           gboolean visible;
1297
1298           visible = scrolled_win->hscrollbar_visible;
1299           scrolled_win->hscrollbar_visible = (adjustment->upper - adjustment->lower >
1300                                               adjustment->page_size);
1301           if (scrolled_win->hscrollbar_visible != visible)
1302             gtk_widget_queue_resize (GTK_WIDGET (scrolled_win));
1303         }
1304     }
1305   else if (scrolled_win->vscrollbar &&
1306            adjustment == gtk_range_get_adjustment (GTK_RANGE (scrolled_win->vscrollbar)))
1307     {
1308       if (scrolled_win->vscrollbar_policy == GTK_POLICY_AUTOMATIC)
1309         {
1310           gboolean visible;
1311
1312           visible = scrolled_win->vscrollbar_visible;
1313           scrolled_win->vscrollbar_visible = (adjustment->upper - adjustment->lower >
1314                                               adjustment->page_size);
1315           if (scrolled_win->vscrollbar_visible != visible)
1316             gtk_widget_queue_resize (GTK_WIDGET (scrolled_win));
1317         }
1318     }
1319 }
1320
1321 static void
1322 gtk_scrolled_window_add (GtkContainer *container,
1323                          GtkWidget    *child)
1324 {
1325   GtkScrolledWindow *scrolled_window;
1326   GtkBin *bin;
1327
1328   bin = GTK_BIN (container);
1329   g_return_if_fail (bin->child == NULL);
1330
1331   scrolled_window = GTK_SCROLLED_WINDOW (container);
1332
1333   bin->child = child;
1334   gtk_widget_set_parent (child, GTK_WIDGET (bin));
1335
1336   /* this is a temporary message */
1337   if (!gtk_widget_set_scroll_adjustments (child,
1338                                           gtk_range_get_adjustment (GTK_RANGE (scrolled_window->hscrollbar)),
1339                                           gtk_range_get_adjustment (GTK_RANGE (scrolled_window->vscrollbar))))
1340     g_warning ("gtk_scrolled_window_add(): cannot add non scrollable widget "
1341                "use gtk_scrolled_window_add_with_viewport() instead");
1342 }
1343
1344 static void
1345 gtk_scrolled_window_remove (GtkContainer *container,
1346                             GtkWidget    *child)
1347 {
1348   g_return_if_fail (GTK_IS_SCROLLED_WINDOW (container));
1349   g_return_if_fail (child != NULL);
1350   g_return_if_fail (GTK_BIN (container)->child == child);
1351
1352   gtk_widget_set_scroll_adjustments (child, NULL, NULL);
1353
1354   /* chain parent class handler to remove child */
1355   GTK_CONTAINER_CLASS (parent_class)->remove (container, child);
1356 }
1357
1358 void
1359 gtk_scrolled_window_add_with_viewport (GtkScrolledWindow *scrolled_window,
1360                                        GtkWidget         *child)
1361 {
1362   GtkBin *bin;
1363   GtkWidget *viewport;
1364
1365   g_return_if_fail (GTK_IS_SCROLLED_WINDOW (scrolled_window));
1366   g_return_if_fail (GTK_IS_WIDGET (child));
1367   g_return_if_fail (child->parent == NULL);
1368
1369   bin = GTK_BIN (scrolled_window);
1370
1371   if (bin->child != NULL)
1372     {
1373       g_return_if_fail (GTK_IS_VIEWPORT (bin->child));
1374       g_return_if_fail (GTK_BIN (bin->child)->child == NULL);
1375
1376       viewport = bin->child;
1377     }
1378   else
1379     {
1380       viewport =
1381         gtk_viewport_new (gtk_scrolled_window_get_hadjustment (scrolled_window),
1382                           gtk_scrolled_window_get_vadjustment (scrolled_window));
1383       gtk_container_add (GTK_CONTAINER (scrolled_window), viewport);
1384     }
1385
1386   gtk_widget_show (viewport);
1387   gtk_container_add (GTK_CONTAINER (viewport), child);
1388 }
1389
1390 /**
1391  * _gtk_scrolled_window_get_spacing:
1392  * @scrolled_window: a scrolled window
1393  *
1394  * Gets the spacing between the scrolled window's scrollbars and
1395  * the scrolled widget. Used by GtkCombo
1396  *
1397  * Return value: the spacing, in pixels.
1398  **/
1399 gint
1400 _gtk_scrolled_window_get_scrollbar_spacing (GtkScrolledWindow *scrolled_window)
1401 {
1402   GtkScrolledWindowClass *class;
1403
1404   g_return_val_if_fail (GTK_IS_SCROLLED_WINDOW (scrolled_window), 0);
1405
1406   class = GTK_SCROLLED_WINDOW_GET_CLASS (scrolled_window);
1407
1408   if (class->scrollbar_spacing >= 0)
1409     return class->scrollbar_spacing;
1410   else
1411     {
1412       gint scrollbar_spacing;
1413
1414       gtk_widget_style_get (GTK_WIDGET (scrolled_window),
1415                             "scrollbar_spacing", &scrollbar_spacing,
1416                             NULL);
1417
1418       return scrollbar_spacing;
1419     }
1420 }
1421
1422 #define __GTK_SCROLLED_WINDOW_C__
1423 #include "gtkaliasdef.c"