]> Pileus Git - ~andy/gtk/blob - gtk/gtkscrolledwindow.c
Update docs Deprecate gtk_widget_{ref,unref}
[~andy/gtk] / gtk / 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 "gtkbindings.h"
31 #include "gtkmarshalers.h"
32 #include "gtkscrolledwindow.h"
33 #include "gtkwindow.h"
34 #include "gtkprivate.h"
35 #include "gtkintl.h"
36 #include "gtkalias.h"
37
38
39 /* scrolled window policy and size requisition handling:
40  *
41  * gtk size requisition works as follows:
42  *   a widget upon size-request reports the width and height that it finds
43  *   to be best suited to display its contents, including children.
44  *   the width and/or height reported from a widget upon size requisition
45  *   may be overidden by the user by specifying a width and/or height
46  *   other than 0 through gtk_widget_set_usize().
47  *
48  * a scrolled window needs (for imlementing all three policy types) to
49  * request its width and height based on two different rationales.
50  * 1)   the user wants the scrolled window to just fit into the space
51  *      that it gets allocated for a specifc dimension.
52  * 1.1) this does not apply if the user specified a concrete value
53  *      value for that specific dimension by either specifying usize for the
54  *      scrolled window or for its child.
55  * 2)   the user wants the scrolled window to take as much space up as
56  *      is desired by the child for a specifc dimension (i.e. POLICY_NEVER).
57  *
58  * also, kinda obvious:
59  * 3)   a user would certainly not have choosen a scrolled window as a container
60  *      for the child, if the resulting allocation takes up more space than the
61  *      child would have allocated without the scrolled window.
62  *
63  * conclusions:
64  * A) from 1) follows: the scrolled window shouldn't request more space for a
65  *    specifc dimension than is required at minimum.
66  * B) from 1.1) follows: the requisition may be overidden by usize of the scrolled
67  *    window (done automatically) or by usize of the child (needs to be checked).
68  * C) from 2) follows: for POLICY_NEVER, the scrolled window simply reports the
69  *    child's dimension.
70  * D) from 3) follows: the scrolled window child's minimum width and minimum height
71  *    under A) at least correspond to the space taken up by its scrollbars.
72  */
73
74 #define DEFAULT_SCROLLBAR_SPACING  3
75
76 typedef struct {
77         gboolean window_placement_set;
78         GtkCornerType real_window_placement;
79 } GtkScrolledWindowPrivate;
80
81 #define GTK_SCROLLED_WINDOW_GET_PRIVATE(obj) (G_TYPE_INSTANCE_GET_PRIVATE ((obj), GTK_TYPE_SCROLLED_WINDOW, GtkScrolledWindowPrivate))
82
83 enum {
84   PROP_0,
85   PROP_HADJUSTMENT,
86   PROP_VADJUSTMENT,
87   PROP_HSCROLLBAR_POLICY,
88   PROP_VSCROLLBAR_POLICY,
89   PROP_WINDOW_PLACEMENT,
90   PROP_WINDOW_PLACEMENT_SET,
91   PROP_SHADOW_TYPE,
92   PROP_LAST
93 };
94
95 /* Signals */
96 enum
97 {
98   SCROLL_CHILD,
99   MOVE_FOCUS_OUT,
100   LAST_SIGNAL
101 };
102
103 static void gtk_scrolled_window_destroy            (GtkObject              *object);
104 static void gtk_scrolled_window_finalize           (GObject                *object);
105 static void gtk_scrolled_window_set_property       (GObject                *object,
106                                                     guint                   prop_id,
107                                                     const GValue           *value,
108                                                     GParamSpec             *pspec);
109 static void gtk_scrolled_window_get_property       (GObject                *object,
110                                                     guint                   prop_id,
111                                                     GValue                 *value,
112                                                     GParamSpec             *pspec);
113
114 static void gtk_scrolled_window_screen_changed     (GtkWidget              *widget,
115                                                     GdkScreen              *previous_screen);
116 static gint gtk_scrolled_window_expose             (GtkWidget              *widget,
117                                                     GdkEventExpose         *event);
118 static void gtk_scrolled_window_size_request       (GtkWidget              *widget,
119                                                     GtkRequisition         *requisition);
120 static void gtk_scrolled_window_size_allocate      (GtkWidget              *widget,
121                                                     GtkAllocation          *allocation);
122 static gint gtk_scrolled_window_scroll_event       (GtkWidget              *widget,
123                                                     GdkEventScroll         *event);
124 static gint gtk_scrolled_window_focus              (GtkWidget              *widget,
125                                                     GtkDirectionType        direction);
126 static void gtk_scrolled_window_add                (GtkContainer           *container,
127                                                     GtkWidget              *widget);
128 static void gtk_scrolled_window_remove             (GtkContainer           *container,
129                                                     GtkWidget              *widget);
130 static void gtk_scrolled_window_forall             (GtkContainer           *container,
131                                                     gboolean                include_internals,
132                                                     GtkCallback             callback,
133                                                     gpointer                callback_data);
134 static gboolean gtk_scrolled_window_scroll_child   (GtkScrolledWindow      *scrolled_window,
135                                                     GtkScrollType           scroll,
136                                                     gboolean                horizontal);
137 static void gtk_scrolled_window_move_focus_out     (GtkScrolledWindow      *scrolled_window,
138                                                     GtkDirectionType        direction_type);
139
140 static void gtk_scrolled_window_relative_allocation(GtkWidget              *widget,
141                                                     GtkAllocation          *allocation);
142 static void gtk_scrolled_window_adjustment_changed (GtkAdjustment          *adjustment,
143                                                     gpointer                data);
144
145 static void gtk_scrolled_window_update_real_placement (GtkScrolledWindow   *scrolled_window);
146
147 static guint signals[LAST_SIGNAL] = {0};
148
149 G_DEFINE_TYPE (GtkScrolledWindow, gtk_scrolled_window, GTK_TYPE_BIN)
150
151 static void
152 add_scroll_binding (GtkBindingSet  *binding_set,
153                     guint           keyval,
154                     GdkModifierType mask,
155                     GtkScrollType   scroll,
156                     gboolean        horizontal)
157 {
158   guint keypad_keyval = keyval - GDK_Left + GDK_KP_Left;
159   
160   gtk_binding_entry_add_signal (binding_set, keyval, mask,
161                                 "scroll_child", 2,
162                                 GTK_TYPE_SCROLL_TYPE, scroll,
163                                 G_TYPE_BOOLEAN, horizontal);
164   gtk_binding_entry_add_signal (binding_set, keypad_keyval, mask,
165                                 "scroll_child", 2,
166                                 GTK_TYPE_SCROLL_TYPE, scroll,
167                                 G_TYPE_BOOLEAN, horizontal);
168 }
169
170 static void
171 add_tab_bindings (GtkBindingSet    *binding_set,
172                   GdkModifierType   modifiers,
173                   GtkDirectionType  direction)
174 {
175   gtk_binding_entry_add_signal (binding_set, GDK_Tab, modifiers,
176                                 "move_focus_out", 1,
177                                 GTK_TYPE_DIRECTION_TYPE, direction);
178   gtk_binding_entry_add_signal (binding_set, GDK_KP_Tab, modifiers,
179                                 "move_focus_out", 1,
180                                 GTK_TYPE_DIRECTION_TYPE, direction);
181 }
182
183 static void
184 gtk_scrolled_window_class_init (GtkScrolledWindowClass *class)
185 {
186   GObjectClass *gobject_class = G_OBJECT_CLASS (class);
187   GtkObjectClass *object_class;
188   GtkWidgetClass *widget_class;
189   GtkContainerClass *container_class;
190   GtkBindingSet *binding_set;
191
192   object_class = (GtkObjectClass*) class;
193   widget_class = (GtkWidgetClass*) class;
194   container_class = (GtkContainerClass*) class;
195
196   gobject_class->finalize = gtk_scrolled_window_finalize;
197   gobject_class->set_property = gtk_scrolled_window_set_property;
198   gobject_class->get_property = gtk_scrolled_window_get_property;
199
200   object_class->destroy = gtk_scrolled_window_destroy;
201
202   widget_class->screen_changed = gtk_scrolled_window_screen_changed;
203   widget_class->expose_event = gtk_scrolled_window_expose;
204   widget_class->size_request = gtk_scrolled_window_size_request;
205   widget_class->size_allocate = gtk_scrolled_window_size_allocate;
206   widget_class->scroll_event = gtk_scrolled_window_scroll_event;
207   widget_class->focus = gtk_scrolled_window_focus;
208
209   container_class->add = gtk_scrolled_window_add;
210   container_class->remove = gtk_scrolled_window_remove;
211   container_class->forall = gtk_scrolled_window_forall;
212
213   class->scrollbar_spacing = -1;
214
215   class->scroll_child = gtk_scrolled_window_scroll_child;
216   class->move_focus_out = gtk_scrolled_window_move_focus_out;
217   
218   g_object_class_install_property (gobject_class,
219                                    PROP_HADJUSTMENT,
220                                    g_param_spec_object ("hadjustment",
221                                                         P_("Horizontal Adjustment"),
222                                                         P_("The GtkAdjustment for the horizontal position"),
223                                                         GTK_TYPE_ADJUSTMENT,
224                                                         GTK_PARAM_READWRITE | G_PARAM_CONSTRUCT));
225   g_object_class_install_property (gobject_class,
226                                    PROP_VADJUSTMENT,
227                                    g_param_spec_object ("vadjustment",
228                                                         P_("Vertical Adjustment"),
229                                                         P_("The GtkAdjustment for the vertical position"),
230                                                         GTK_TYPE_ADJUSTMENT,
231                                                         GTK_PARAM_READWRITE | G_PARAM_CONSTRUCT));
232   g_object_class_install_property (gobject_class,
233                                    PROP_HSCROLLBAR_POLICY,
234                                    g_param_spec_enum ("hscrollbar-policy",
235                                                       P_("Horizontal Scrollbar Policy"),
236                                                       P_("When the horizontal scrollbar is displayed"),
237                                                       GTK_TYPE_POLICY_TYPE,
238                                                       GTK_POLICY_ALWAYS,
239                                                       GTK_PARAM_READABLE | GTK_PARAM_WRITABLE));
240   g_object_class_install_property (gobject_class,
241                                    PROP_VSCROLLBAR_POLICY,
242                                    g_param_spec_enum ("vscrollbar-policy",
243                                                       P_("Vertical Scrollbar Policy"),
244                                                       P_("When the vertical scrollbar is displayed"),
245                                                       GTK_TYPE_POLICY_TYPE,
246                                                       GTK_POLICY_ALWAYS,
247                                                       GTK_PARAM_READABLE | GTK_PARAM_WRITABLE));
248
249   g_object_class_install_property (gobject_class,
250                                    PROP_WINDOW_PLACEMENT,
251                                    g_param_spec_enum ("window-placement",
252                                                       P_("Window Placement"),
253                                                       P_("Where the contents are located with respect to the scrollbars. This property only takes effect if \"window-placement-set\" is TRUE."),
254                                                       GTK_TYPE_CORNER_TYPE,
255                                                       GTK_CORNER_TOP_LEFT,
256                                                       GTK_PARAM_READABLE | GTK_PARAM_WRITABLE));
257   
258   /**
259    * GtkScrolledWindow:window-placement-set:
260    *
261    * Whether "window-placement" should be used to determine the location 
262    * of the contents with respect to the scrollbars. Otherwise, the 
263    * "gtk-scrolled-window-placement" setting is used.
264    *
265    * Since: 2.10
266    */
267   g_object_class_install_property (gobject_class,
268                                    PROP_WINDOW_PLACEMENT_SET,
269                                    g_param_spec_boolean ("window-placement-set",
270                                                          P_("Window Placement Set"),
271                                                          P_("Whether \"window-placement\" should be used to determine the location of the contents with respect to the scrollbars."),
272                                                          FALSE,
273                                                          GTK_PARAM_READABLE | GTK_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                                                       GTK_PARAM_READABLE | GTK_PARAM_WRITABLE));
282
283   /**
284    * GtkScrolledWindow:scrollbars-within-bevel:
285    *
286    * Whether to place scrollbars within the scrolled window's bevel.
287    *
288    * Since: 2.12
289    */
290   gtk_widget_class_install_style_property (widget_class,
291                                            g_param_spec_boolean ("scrollbars-within-bevel",
292                                                                  P_("Scrollbars within bevel"),
293                                                                  P_("Place scrollbars within the scrolled window's bevel"),
294                                                                  FALSE,
295                                                                  GTK_PARAM_READABLE));
296
297   gtk_widget_class_install_style_property (widget_class,
298                                            g_param_spec_int ("scrollbar-spacing",
299                                                              P_("Scrollbar spacing"),
300                                                              P_("Number of pixels between the scrollbars and the scrolled window"),
301                                                              0,
302                                                              G_MAXINT,
303                                                              DEFAULT_SCROLLBAR_SPACING,
304                                                              GTK_PARAM_READABLE));
305
306   /**
307    * GtkSettings:gtk-scrolled-window-placement:
308    *
309    * Where the contents of scrolled windows are located with respect to the 
310    * scrollbars, if not overridden by the scrolled window's own placement.
311    *
312    * Since: 2.10
313    */
314   gtk_settings_install_property (g_param_spec_enum ("gtk-scrolled-window-placement",
315                                                     P_("Scrolled Window Placement"),
316                                                     P_("Where the contents of scrolled windows are located with respect to the scrollbars, if not overridden by the scrolled window's own placement."),
317                                                     GTK_TYPE_CORNER_TYPE,
318                                                     GTK_CORNER_TOP_LEFT,
319                                                     G_PARAM_READABLE | G_PARAM_WRITABLE));
320
321
322   signals[SCROLL_CHILD] =
323     g_signal_new (I_("scroll_child"),
324                   G_TYPE_FROM_CLASS (object_class),
325                   G_SIGNAL_RUN_LAST | G_SIGNAL_ACTION,
326                   G_STRUCT_OFFSET (GtkScrolledWindowClass, scroll_child),
327                   NULL, NULL,
328                   _gtk_marshal_BOOLEAN__ENUM_BOOLEAN,
329                   G_TYPE_BOOLEAN, 2,
330                   GTK_TYPE_SCROLL_TYPE,
331                   G_TYPE_BOOLEAN);
332   signals[MOVE_FOCUS_OUT] =
333     g_signal_new (I_("move_focus_out"),
334                   G_TYPE_FROM_CLASS (object_class),
335                   G_SIGNAL_RUN_LAST | G_SIGNAL_ACTION,
336                   G_STRUCT_OFFSET (GtkScrolledWindowClass, move_focus_out),
337                   NULL, NULL,
338                   _gtk_marshal_VOID__ENUM,
339                   G_TYPE_NONE, 1,
340                   GTK_TYPE_DIRECTION_TYPE);
341   
342   binding_set = gtk_binding_set_by_class (class);
343
344   add_scroll_binding (binding_set, GDK_Left,  GDK_CONTROL_MASK, GTK_SCROLL_STEP_BACKWARD, TRUE);
345   add_scroll_binding (binding_set, GDK_Right, GDK_CONTROL_MASK, GTK_SCROLL_STEP_FORWARD,  TRUE);
346   add_scroll_binding (binding_set, GDK_Up,    GDK_CONTROL_MASK, GTK_SCROLL_STEP_BACKWARD, FALSE);
347   add_scroll_binding (binding_set, GDK_Down,  GDK_CONTROL_MASK, GTK_SCROLL_STEP_FORWARD,  FALSE);
348
349   add_scroll_binding (binding_set, GDK_Page_Up,   GDK_CONTROL_MASK, GTK_SCROLL_PAGE_BACKWARD, TRUE);
350   add_scroll_binding (binding_set, GDK_Page_Down, GDK_CONTROL_MASK, GTK_SCROLL_PAGE_FORWARD,  TRUE);
351   add_scroll_binding (binding_set, GDK_Page_Up,   0,                GTK_SCROLL_PAGE_BACKWARD, FALSE);
352   add_scroll_binding (binding_set, GDK_Page_Down, 0,                GTK_SCROLL_PAGE_FORWARD,  FALSE);
353
354   add_scroll_binding (binding_set, GDK_Home, GDK_CONTROL_MASK, GTK_SCROLL_START, TRUE);
355   add_scroll_binding (binding_set, GDK_End,  GDK_CONTROL_MASK, GTK_SCROLL_END,   TRUE);
356   add_scroll_binding (binding_set, GDK_Home, 0,                GTK_SCROLL_START, FALSE);
357   add_scroll_binding (binding_set, GDK_End,  0,                GTK_SCROLL_END,   FALSE);
358
359   add_tab_bindings (binding_set, GDK_CONTROL_MASK, GTK_DIR_TAB_FORWARD);
360   add_tab_bindings (binding_set, GDK_CONTROL_MASK | GDK_SHIFT_MASK, GTK_DIR_TAB_BACKWARD);
361
362   g_type_class_add_private (class, sizeof (GtkScrolledWindowPrivate));
363 }
364
365 static void
366 gtk_scrolled_window_init (GtkScrolledWindow *scrolled_window)
367 {
368   GTK_WIDGET_SET_FLAGS (scrolled_window, GTK_NO_WINDOW | GTK_CAN_FOCUS);
369
370   scrolled_window->hscrollbar = NULL;
371   scrolled_window->vscrollbar = NULL;
372   scrolled_window->hscrollbar_policy = GTK_POLICY_ALWAYS;
373   scrolled_window->vscrollbar_policy = GTK_POLICY_ALWAYS;
374   scrolled_window->hscrollbar_visible = FALSE;
375   scrolled_window->vscrollbar_visible = FALSE;
376   scrolled_window->focus_out = FALSE;
377   scrolled_window->window_placement = GTK_CORNER_TOP_LEFT;
378   gtk_scrolled_window_update_real_placement (scrolled_window);
379 }
380
381 GtkWidget*
382 gtk_scrolled_window_new (GtkAdjustment *hadjustment,
383                          GtkAdjustment *vadjustment)
384 {
385   GtkWidget *scrolled_window;
386
387   if (hadjustment)
388     g_return_val_if_fail (GTK_IS_ADJUSTMENT (hadjustment), NULL);
389
390   if (vadjustment)
391     g_return_val_if_fail (GTK_IS_ADJUSTMENT (vadjustment), NULL);
392
393   scrolled_window = gtk_widget_new (GTK_TYPE_SCROLLED_WINDOW,
394                                     "hadjustment", hadjustment,
395                                     "vadjustment", vadjustment,
396                                     NULL);
397
398   return scrolled_window;
399 }
400
401 void
402 gtk_scrolled_window_set_hadjustment (GtkScrolledWindow *scrolled_window,
403                                      GtkAdjustment     *hadjustment)
404 {
405   GtkBin *bin;
406
407   g_return_if_fail (GTK_IS_SCROLLED_WINDOW (scrolled_window));
408   if (hadjustment)
409     g_return_if_fail (GTK_IS_ADJUSTMENT (hadjustment));
410   else
411     hadjustment = (GtkAdjustment*) g_object_new (GTK_TYPE_ADJUSTMENT, NULL);
412
413   bin = GTK_BIN (scrolled_window);
414
415   if (!scrolled_window->hscrollbar)
416     {
417       gtk_widget_push_composite_child ();
418       scrolled_window->hscrollbar = gtk_hscrollbar_new (hadjustment);
419       gtk_widget_set_composite_name (scrolled_window->hscrollbar, "hscrollbar");
420       gtk_widget_pop_composite_child ();
421
422       gtk_widget_set_parent (scrolled_window->hscrollbar, GTK_WIDGET (scrolled_window));
423       g_object_ref (scrolled_window->hscrollbar);
424       gtk_widget_show (scrolled_window->hscrollbar);
425     }
426   else
427     {
428       GtkAdjustment *old_adjustment;
429       
430       old_adjustment = gtk_range_get_adjustment (GTK_RANGE (scrolled_window->hscrollbar));
431       if (old_adjustment == hadjustment)
432         return;
433
434       g_signal_handlers_disconnect_by_func (old_adjustment,
435                                             gtk_scrolled_window_adjustment_changed,
436                                             scrolled_window);
437       gtk_range_set_adjustment (GTK_RANGE (scrolled_window->hscrollbar),
438                                 hadjustment);
439     }
440   hadjustment = gtk_range_get_adjustment (GTK_RANGE (scrolled_window->hscrollbar));
441   g_signal_connect (hadjustment,
442                     "changed",
443                     G_CALLBACK (gtk_scrolled_window_adjustment_changed),
444                     scrolled_window);
445   gtk_scrolled_window_adjustment_changed (hadjustment, scrolled_window);
446   
447   if (bin->child)
448     gtk_widget_set_scroll_adjustments (bin->child,
449                                        gtk_range_get_adjustment (GTK_RANGE (scrolled_window->hscrollbar)),
450                                        gtk_range_get_adjustment (GTK_RANGE (scrolled_window->vscrollbar)));
451
452   g_object_notify (G_OBJECT (scrolled_window), "hadjustment");
453 }
454
455 void
456 gtk_scrolled_window_set_vadjustment (GtkScrolledWindow *scrolled_window,
457                                      GtkAdjustment     *vadjustment)
458 {
459   GtkBin *bin;
460
461   g_return_if_fail (GTK_IS_SCROLLED_WINDOW (scrolled_window));
462   if (vadjustment)
463     g_return_if_fail (GTK_IS_ADJUSTMENT (vadjustment));
464   else
465     vadjustment = (GtkAdjustment*) g_object_new (GTK_TYPE_ADJUSTMENT, NULL);
466
467   bin = GTK_BIN (scrolled_window);
468
469   if (!scrolled_window->vscrollbar)
470     {
471       gtk_widget_push_composite_child ();
472       scrolled_window->vscrollbar = gtk_vscrollbar_new (vadjustment);
473       gtk_widget_set_composite_name (scrolled_window->vscrollbar, "vscrollbar");
474       gtk_widget_pop_composite_child ();
475
476       gtk_widget_set_parent (scrolled_window->vscrollbar, GTK_WIDGET (scrolled_window));
477       g_object_ref (scrolled_window->vscrollbar);
478       gtk_widget_show (scrolled_window->vscrollbar);
479     }
480   else
481     {
482       GtkAdjustment *old_adjustment;
483       
484       old_adjustment = gtk_range_get_adjustment (GTK_RANGE (scrolled_window->vscrollbar));
485       if (old_adjustment == vadjustment)
486         return;
487
488       g_signal_handlers_disconnect_by_func (old_adjustment,
489                                             gtk_scrolled_window_adjustment_changed,
490                                             scrolled_window);
491       gtk_range_set_adjustment (GTK_RANGE (scrolled_window->vscrollbar),
492                                 vadjustment);
493     }
494   vadjustment = gtk_range_get_adjustment (GTK_RANGE (scrolled_window->vscrollbar));
495   g_signal_connect (vadjustment,
496                     "changed",
497                     G_CALLBACK (gtk_scrolled_window_adjustment_changed),
498                     scrolled_window);
499   gtk_scrolled_window_adjustment_changed (vadjustment, scrolled_window);
500
501   if (bin->child)
502     gtk_widget_set_scroll_adjustments (bin->child,
503                                        gtk_range_get_adjustment (GTK_RANGE (scrolled_window->hscrollbar)),
504                                        gtk_range_get_adjustment (GTK_RANGE (scrolled_window->vscrollbar)));
505
506   g_object_notify (G_OBJECT (scrolled_window), "vadjustment");
507 }
508
509 GtkAdjustment*
510 gtk_scrolled_window_get_hadjustment (GtkScrolledWindow *scrolled_window)
511 {
512   g_return_val_if_fail (GTK_IS_SCROLLED_WINDOW (scrolled_window), NULL);
513
514   return (scrolled_window->hscrollbar ?
515           gtk_range_get_adjustment (GTK_RANGE (scrolled_window->hscrollbar)) :
516           NULL);
517 }
518
519 GtkAdjustment*
520 gtk_scrolled_window_get_vadjustment (GtkScrolledWindow *scrolled_window)
521 {
522   g_return_val_if_fail (GTK_IS_SCROLLED_WINDOW (scrolled_window), NULL);
523
524   return (scrolled_window->vscrollbar ?
525           gtk_range_get_adjustment (GTK_RANGE (scrolled_window->vscrollbar)) :
526           NULL);
527 }
528
529 /**
530  * gtk_scrolled_window_get_hscrollbar:
531  * @scrolled_window: a #GtkScrolledWindow
532  * 
533  * Returns the horizontal scrollbar of @scrolled_window.
534  *
535  * Returns: the horizontal scrollbar of the scrolled window, or 
536  *  %NULL if it does not have one.
537  *
538  * Since: 2.8
539  */
540 GtkWidget*
541 gtk_scrolled_window_get_hscrollbar (GtkScrolledWindow *scrolled_window)
542 {
543   g_return_val_if_fail (GTK_IS_SCROLLED_WINDOW (scrolled_window), NULL);
544   
545   return scrolled_window->hscrollbar;
546 }
547
548 /**
549  * gtk_scrolled_window_get_vscrollbar:
550  * @scrolled_window: a #GtkScrolledWindow
551  * 
552  * Returns the vertical scrollbar of @scrolled_window.
553  *
554  * Returns: the vertical scrollbar of the scrolled window, or
555  *  %NULL if it does not have one.
556  *
557  * Since: 2.8
558  */
559 GtkWidget*
560 gtk_scrolled_window_get_vscrollbar (GtkScrolledWindow *scrolled_window)
561 {
562   g_return_val_if_fail (GTK_IS_SCROLLED_WINDOW (scrolled_window), NULL);
563
564   return scrolled_window->vscrollbar;
565 }
566
567 void
568 gtk_scrolled_window_set_policy (GtkScrolledWindow *scrolled_window,
569                                 GtkPolicyType      hscrollbar_policy,
570                                 GtkPolicyType      vscrollbar_policy)
571 {
572   GObject *object = G_OBJECT (scrolled_window);
573   
574   g_return_if_fail (GTK_IS_SCROLLED_WINDOW (scrolled_window));
575
576   if ((scrolled_window->hscrollbar_policy != hscrollbar_policy) ||
577       (scrolled_window->vscrollbar_policy != vscrollbar_policy))
578     {
579       scrolled_window->hscrollbar_policy = hscrollbar_policy;
580       scrolled_window->vscrollbar_policy = vscrollbar_policy;
581
582       gtk_widget_queue_resize (GTK_WIDGET (scrolled_window));
583
584       g_object_freeze_notify (object);
585       g_object_notify (object, "hscrollbar-policy");
586       g_object_notify (object, "vscrollbar-policy");
587       g_object_thaw_notify (object);
588     }
589 }
590
591 /**
592  * gtk_scrolled_window_get_policy:
593  * @scrolled_window: a #GtkScrolledWindow
594  * @hscrollbar_policy: location to store the policy for the horizontal scrollbar, or %NULL.
595  * @vscrollbar_policy: location to store the policy for the horizontal scrollbar, or %NULL.
596  * 
597  * Retrieves the current policy values for the horizontal and vertical
598  * scrollbars. See gtk_scrolled_window_set_policy().
599  **/
600 void
601 gtk_scrolled_window_get_policy (GtkScrolledWindow *scrolled_window,
602                                 GtkPolicyType     *hscrollbar_policy,
603                                 GtkPolicyType     *vscrollbar_policy)
604 {
605   g_return_if_fail (GTK_IS_SCROLLED_WINDOW (scrolled_window));
606
607   if (hscrollbar_policy)
608     *hscrollbar_policy = scrolled_window->hscrollbar_policy;
609   if (vscrollbar_policy)
610     *vscrollbar_policy = scrolled_window->vscrollbar_policy;
611 }
612
613 static void
614 gtk_scrolled_window_update_real_placement (GtkScrolledWindow *scrolled_window)
615 {
616   GtkScrolledWindowPrivate *priv = GTK_SCROLLED_WINDOW_GET_PRIVATE (scrolled_window);
617   GtkSettings *settings;
618
619   settings = gtk_widget_get_settings (GTK_WIDGET (scrolled_window));
620
621   if (priv->window_placement_set || settings == NULL)
622     priv->real_window_placement = scrolled_window->window_placement;
623   else
624     g_object_get (settings,
625                   "gtk-scrolled-window-placement",
626                   &priv->real_window_placement,
627                   NULL);
628 }
629
630 static void
631 gtk_scrolled_window_set_placement_internal (GtkScrolledWindow *scrolled_window,
632                                             GtkCornerType      window_placement)
633 {
634   if (scrolled_window->window_placement != window_placement)
635     {
636       scrolled_window->window_placement = window_placement;
637
638       gtk_scrolled_window_update_real_placement (scrolled_window);
639       gtk_widget_queue_resize (GTK_WIDGET (scrolled_window));
640       
641       g_object_notify (G_OBJECT (scrolled_window), "window-placement");
642     }
643 }
644
645 static void
646 gtk_scrolled_window_set_placement_set (GtkScrolledWindow *scrolled_window,
647                                        gboolean           placement_set,
648                                        gboolean           emit_resize)
649 {
650   GtkScrolledWindowPrivate *priv = GTK_SCROLLED_WINDOW_GET_PRIVATE (scrolled_window);
651
652   if (priv->window_placement_set != placement_set)
653     {
654       priv->window_placement_set = placement_set;
655
656       gtk_scrolled_window_update_real_placement (scrolled_window);
657       if (emit_resize)
658         gtk_widget_queue_resize (GTK_WIDGET (scrolled_window));
659
660       g_object_notify (G_OBJECT (scrolled_window), "window-placement-set");
661     }
662 }
663
664 /**
665  * gtk_scrolled_window_set_placement:
666  * @scrolled_window: a #GtkScrolledWindow
667  * @window_placement: position of the child window
668  *
669  * Sets the placement of the contents with respect to the scrollbars
670  * for the scrolled window.
671  * The default is %GTK_CORNER_TOP_LEFT, meaning the child is
672  * in the top left, with the scrollbars underneath and to the right.
673  * Other values in #GtkCornerType are %GTK_CORNER_TOP_RIGHT,
674  * %GTK_CORNER_BOTTOM_LEFT, and %GTK_CORNER_BOTTOM_RIGHT.
675  *
676  * See also gtk_scrolled_window_get_placement() and
677  * gtk_scrolled_window_unset_placement().
678  **/
679 void
680 gtk_scrolled_window_set_placement (GtkScrolledWindow *scrolled_window,
681                                    GtkCornerType      window_placement)
682 {
683   g_return_if_fail (GTK_IS_SCROLLED_WINDOW (scrolled_window));
684
685   gtk_scrolled_window_set_placement_set (scrolled_window, TRUE, FALSE);
686   gtk_scrolled_window_set_placement_internal (scrolled_window, window_placement);
687 }
688
689 /**
690  * gtk_scrolled_window_get_placement:
691  * @scrolled_window: a #GtkScrolledWindow
692  *
693  * Gets the placement of the contents with respect to the scrollbars
694  * for the scrolled window. See gtk_scrolled_window_set_placement().
695  *
696  * Return value: the current placement value.
697  *
698  * See also gtk_scrolled_window_set_placement() and
699  * gtk_scrolled_window_unset_placement().
700  **/
701 GtkCornerType
702 gtk_scrolled_window_get_placement (GtkScrolledWindow *scrolled_window)
703 {
704   g_return_val_if_fail (GTK_IS_SCROLLED_WINDOW (scrolled_window), GTK_CORNER_TOP_LEFT);
705
706   return scrolled_window->window_placement;
707 }
708
709 /**
710  * gtk_scrolled_window_unset_placement:
711  * @scrolled_window: a #GtkScrolledWindow
712  *
713  * Unsets the placement of the contents with respect to the scrollbars
714  * for the scrolled window. If no window placement is set for a scrolled
715  * window, it obeys the "gtk-scrolled-window-placement" XSETTING.
716  *
717  * See also gtk_scrolled_window_set_placement() and
718  * gtk_scrolled_window_get_placement().
719  *
720  * Since: 2.10
721  **/
722 void
723 gtk_scrolled_window_unset_placement (GtkScrolledWindow *scrolled_window)
724 {
725   GtkScrolledWindowPrivate *priv = GTK_SCROLLED_WINDOW_GET_PRIVATE (scrolled_window);
726
727   g_return_if_fail (GTK_IS_SCROLLED_WINDOW (scrolled_window));
728
729   if (priv->window_placement_set)
730     {
731       priv->window_placement_set = FALSE;
732
733       gtk_widget_queue_resize (GTK_WIDGET (scrolled_window));
734
735       g_object_notify (G_OBJECT (scrolled_window), "window-placement-set");
736     }
737 }
738
739 /**
740  * gtk_scrolled_window_set_shadow_type:
741  * @scrolled_window: a #GtkScrolledWindow
742  * @type: kind of shadow to draw around scrolled window contents
743  *
744  * Changes the type of shadow drawn around the contents of
745  * @scrolled_window.
746  * 
747  **/
748 void
749 gtk_scrolled_window_set_shadow_type (GtkScrolledWindow *scrolled_window,
750                                      GtkShadowType      type)
751 {
752   g_return_if_fail (GTK_IS_SCROLLED_WINDOW (scrolled_window));
753   g_return_if_fail (type >= GTK_SHADOW_NONE && type <= GTK_SHADOW_ETCHED_OUT);
754   
755   if (scrolled_window->shadow_type != type)
756     {
757       scrolled_window->shadow_type = type;
758
759       if (GTK_WIDGET_DRAWABLE (scrolled_window))
760         gtk_widget_queue_draw (GTK_WIDGET (scrolled_window));
761
762       gtk_widget_queue_resize (GTK_WIDGET (scrolled_window));
763
764       g_object_notify (G_OBJECT (scrolled_window), "shadow-type");
765     }
766 }
767
768 /**
769  * gtk_scrolled_window_get_shadow_type:
770  * @scrolled_window: a #GtkScrolledWindow
771  *
772  * Gets the shadow type of the scrolled window. See 
773  * gtk_scrolled_window_set_shadow_type().
774  *
775  * Return value: the current shadow type
776  **/
777 GtkShadowType
778 gtk_scrolled_window_get_shadow_type (GtkScrolledWindow *scrolled_window)
779 {
780   g_return_val_if_fail (GTK_IS_SCROLLED_WINDOW (scrolled_window), GTK_SHADOW_NONE);
781
782   return scrolled_window->shadow_type;
783 }
784
785 static void
786 gtk_scrolled_window_destroy (GtkObject *object)
787 {
788   GtkScrolledWindow *scrolled_window;
789
790   g_return_if_fail (GTK_IS_SCROLLED_WINDOW (object));
791
792   scrolled_window = GTK_SCROLLED_WINDOW (object);
793
794   gtk_widget_unparent (scrolled_window->hscrollbar);
795   gtk_widget_unparent (scrolled_window->vscrollbar);
796   gtk_widget_destroy (scrolled_window->hscrollbar);
797   gtk_widget_destroy (scrolled_window->vscrollbar);
798
799   GTK_OBJECT_CLASS (gtk_scrolled_window_parent_class)->destroy (object);
800 }
801
802 static void
803 gtk_scrolled_window_finalize (GObject *object)
804 {
805   GtkScrolledWindow *scrolled_window = GTK_SCROLLED_WINDOW (object);
806
807   g_object_unref (scrolled_window->hscrollbar);
808   g_object_unref (scrolled_window->vscrollbar);
809
810   G_OBJECT_CLASS (gtk_scrolled_window_parent_class)->finalize (object);
811 }
812
813 static void
814 gtk_scrolled_window_set_property (GObject      *object,
815                                   guint         prop_id,
816                                   const GValue *value,
817                                   GParamSpec   *pspec)
818 {
819   GtkScrolledWindow *scrolled_window = GTK_SCROLLED_WINDOW (object);
820   
821   switch (prop_id)
822     {
823     case PROP_HADJUSTMENT:
824       gtk_scrolled_window_set_hadjustment (scrolled_window,
825                                            g_value_get_object (value));
826       break;
827     case PROP_VADJUSTMENT:
828       gtk_scrolled_window_set_vadjustment (scrolled_window,
829                                            g_value_get_object (value));
830       break;
831     case PROP_HSCROLLBAR_POLICY:
832       gtk_scrolled_window_set_policy (scrolled_window,
833                                       g_value_get_enum (value),
834                                       scrolled_window->vscrollbar_policy);
835       break;
836     case PROP_VSCROLLBAR_POLICY:
837       gtk_scrolled_window_set_policy (scrolled_window,
838                                       scrolled_window->hscrollbar_policy,
839                                       g_value_get_enum (value));
840       break;
841     case PROP_WINDOW_PLACEMENT:
842       gtk_scrolled_window_set_placement_internal (scrolled_window,
843                                                   g_value_get_enum (value));
844       break;
845     case PROP_WINDOW_PLACEMENT_SET:
846       gtk_scrolled_window_set_placement_set (scrolled_window,
847                                              g_value_get_boolean (value),
848                                              TRUE);
849       break;
850     case PROP_SHADOW_TYPE:
851       gtk_scrolled_window_set_shadow_type (scrolled_window,
852                                            g_value_get_enum (value));
853       break;
854     default:
855       G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
856       break;
857     }
858 }
859
860 static void
861 gtk_scrolled_window_get_property (GObject    *object,
862                                   guint       prop_id,
863                                   GValue     *value,
864                                   GParamSpec *pspec)
865 {
866   GtkScrolledWindow *scrolled_window = GTK_SCROLLED_WINDOW (object);
867   GtkScrolledWindowPrivate *priv = GTK_SCROLLED_WINDOW_GET_PRIVATE (scrolled_window);
868   
869   switch (prop_id)
870     {
871     case PROP_HADJUSTMENT:
872       g_value_set_object (value,
873                           G_OBJECT (gtk_scrolled_window_get_hadjustment (scrolled_window)));
874       break;
875     case PROP_VADJUSTMENT:
876       g_value_set_object (value,
877                           G_OBJECT (gtk_scrolled_window_get_vadjustment (scrolled_window)));
878       break;
879     case PROP_HSCROLLBAR_POLICY:
880       g_value_set_enum (value, scrolled_window->hscrollbar_policy);
881       break;
882     case PROP_VSCROLLBAR_POLICY:
883       g_value_set_enum (value, scrolled_window->vscrollbar_policy);
884       break;
885     case PROP_WINDOW_PLACEMENT:
886       g_value_set_enum (value, scrolled_window->window_placement);
887       break;
888     case PROP_WINDOW_PLACEMENT_SET:
889       g_value_set_boolean (value, priv->window_placement_set);
890       break;
891     case PROP_SHADOW_TYPE:
892       g_value_set_enum (value, scrolled_window->shadow_type);
893       break;
894     default:
895       G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
896       break;
897     }
898 }
899
900 static void
901 traverse_container (GtkWidget *widget,
902                     gpointer   data)
903 {
904   if (GTK_IS_SCROLLED_WINDOW (widget))
905     {
906       gtk_scrolled_window_update_real_placement (GTK_SCROLLED_WINDOW (widget));
907       gtk_widget_queue_draw (widget);
908     }
909   else if (GTK_IS_CONTAINER (widget))
910     gtk_container_forall (GTK_CONTAINER (widget), traverse_container, NULL);
911 }
912
913 static void
914 gtk_scrolled_window_settings_changed (GtkSettings *settings)
915 {
916   GList *list, *l;
917
918   list = gtk_window_list_toplevels ();
919
920   for (l = list; l; l = l->next)
921     gtk_container_forall (GTK_CONTAINER (l->data), 
922                           traverse_container, NULL);
923
924   g_list_free (list);
925 }
926
927 static void
928 gtk_scrolled_window_screen_changed (GtkWidget *widget,
929                                     GdkScreen *previous_screen)
930 {
931   GtkSettings *settings;
932   guint window_placement_connection;
933
934   gtk_scrolled_window_update_real_placement (GTK_SCROLLED_WINDOW (widget));
935
936   if (!gtk_widget_has_screen (widget))
937     return;
938
939   settings = gtk_widget_get_settings (widget);
940
941   window_placement_connection = 
942     GPOINTER_TO_UINT (g_object_get_data (G_OBJECT (settings), 
943                                          "gtk-scrolled-window-connection"));
944   
945   if (window_placement_connection)
946     return;
947
948   window_placement_connection =
949     g_signal_connect (settings, "notify::gtk-scrolled-window-placement",
950                       G_CALLBACK (gtk_scrolled_window_settings_changed), NULL);
951   g_object_set_data (G_OBJECT (settings), 
952                      I_("gtk-scrolled-window-connection"),
953                      GUINT_TO_POINTER (window_placement_connection));
954 }
955
956 static void
957 gtk_scrolled_window_paint (GtkWidget    *widget,
958                            GdkRectangle *area)
959 {
960   GtkScrolledWindow *scrolled_window = GTK_SCROLLED_WINDOW (widget);
961
962   if (scrolled_window->shadow_type != GTK_SHADOW_NONE)
963     {
964       GtkAllocation relative_allocation;
965       gboolean scrollbars_within_bevel;
966
967       gtk_widget_style_get (widget, "scrollbars-within-bevel", &scrollbars_within_bevel, NULL);
968       
969       if (!scrollbars_within_bevel)
970         {
971           gtk_scrolled_window_relative_allocation (widget, &relative_allocation);
972
973           relative_allocation.x -= widget->style->xthickness;
974           relative_allocation.y -= widget->style->ythickness;
975           relative_allocation.width += 2 * widget->style->xthickness;
976           relative_allocation.height += 2 * widget->style->ythickness;
977         }
978       else
979         {
980           GtkContainer *container = GTK_CONTAINER (widget);
981
982           relative_allocation.x = container->border_width;
983           relative_allocation.y = container->border_width;
984           relative_allocation.width = widget->allocation.width - 2 * container->border_width;
985           relative_allocation.height = widget->allocation.height - 2 * container->border_width;
986         }
987
988       gtk_paint_shadow (widget->style, widget->window,
989                         GTK_STATE_NORMAL, scrolled_window->shadow_type,
990                         area, widget, "scrolled_window",
991                         widget->allocation.x + relative_allocation.x,
992                         widget->allocation.y + relative_allocation.y,
993                         relative_allocation.width,
994                         relative_allocation.height);
995     }
996 }
997
998 static gint
999 gtk_scrolled_window_expose (GtkWidget      *widget,
1000                             GdkEventExpose *event)
1001 {
1002   if (GTK_WIDGET_DRAWABLE (widget))
1003     {
1004       gtk_scrolled_window_paint (widget, &event->area);
1005
1006       (* GTK_WIDGET_CLASS (gtk_scrolled_window_parent_class)->expose_event) (widget, event);
1007     }
1008
1009   return FALSE;
1010 }
1011
1012 static void
1013 gtk_scrolled_window_forall (GtkContainer *container,
1014                             gboolean      include_internals,
1015                             GtkCallback   callback,
1016                             gpointer      callback_data)
1017 {
1018   g_return_if_fail (GTK_IS_SCROLLED_WINDOW (container));
1019   g_return_if_fail (callback != NULL);
1020
1021   GTK_CONTAINER_CLASS (gtk_scrolled_window_parent_class)->forall (container,
1022                                               include_internals,
1023                                               callback,
1024                                               callback_data);
1025   if (include_internals)
1026     {
1027       GtkScrolledWindow *scrolled_window;
1028
1029       scrolled_window = GTK_SCROLLED_WINDOW (container);
1030       
1031       if (scrolled_window->vscrollbar)
1032         callback (scrolled_window->vscrollbar, callback_data);
1033       if (scrolled_window->hscrollbar)
1034         callback (scrolled_window->hscrollbar, callback_data);
1035     }
1036 }
1037
1038 static gboolean
1039 gtk_scrolled_window_scroll_child (GtkScrolledWindow *scrolled_window,
1040                                   GtkScrollType      scroll,
1041                                   gboolean           horizontal)
1042 {
1043   GtkAdjustment *adjustment = NULL;
1044   
1045   switch (scroll)
1046     {
1047     case GTK_SCROLL_STEP_UP:
1048       scroll = GTK_SCROLL_STEP_BACKWARD;
1049       horizontal = FALSE;
1050       break;
1051     case GTK_SCROLL_STEP_DOWN:
1052       scroll = GTK_SCROLL_STEP_FORWARD;
1053       horizontal = FALSE;
1054       break;
1055     case GTK_SCROLL_STEP_LEFT:
1056       scroll = GTK_SCROLL_STEP_BACKWARD;
1057       horizontal = TRUE;
1058       break;
1059     case GTK_SCROLL_STEP_RIGHT:
1060       scroll = GTK_SCROLL_STEP_FORWARD;
1061       horizontal = TRUE;
1062       break;
1063     case GTK_SCROLL_PAGE_UP:
1064       scroll = GTK_SCROLL_PAGE_BACKWARD;
1065       horizontal = FALSE;
1066       break;
1067     case GTK_SCROLL_PAGE_DOWN:
1068       scroll = GTK_SCROLL_PAGE_FORWARD;
1069       horizontal = FALSE;
1070       break;
1071     case GTK_SCROLL_PAGE_LEFT:
1072       scroll = GTK_SCROLL_STEP_BACKWARD;
1073       horizontal = TRUE;
1074       break;
1075     case GTK_SCROLL_PAGE_RIGHT:
1076       scroll = GTK_SCROLL_STEP_FORWARD;
1077       horizontal = TRUE;
1078       break;
1079     case GTK_SCROLL_STEP_BACKWARD:
1080     case GTK_SCROLL_STEP_FORWARD:
1081     case GTK_SCROLL_PAGE_BACKWARD:
1082     case GTK_SCROLL_PAGE_FORWARD:
1083     case GTK_SCROLL_START:
1084     case GTK_SCROLL_END:
1085       break;
1086     default:
1087       g_warning ("Invalid scroll type %u for GtkScrolledWindow::scroll-child", scroll);
1088       return FALSE;
1089     }
1090
1091   if ((horizontal && (!scrolled_window->hscrollbar || !scrolled_window->hscrollbar_visible)) ||
1092       (!horizontal && (!scrolled_window->vscrollbar || !scrolled_window->vscrollbar_visible)))
1093     return FALSE;
1094
1095   if (horizontal)
1096     {
1097       if (scrolled_window->hscrollbar)
1098         adjustment = gtk_range_get_adjustment (GTK_RANGE (scrolled_window->hscrollbar));
1099     }
1100   else
1101     {
1102       if (scrolled_window->vscrollbar)
1103         adjustment = gtk_range_get_adjustment (GTK_RANGE (scrolled_window->vscrollbar));
1104     }
1105
1106   if (adjustment)
1107     {
1108       gdouble value = adjustment->value;
1109       
1110       switch (scroll)
1111         {
1112         case GTK_SCROLL_STEP_FORWARD:
1113           value += adjustment->step_increment;
1114           break;
1115         case GTK_SCROLL_STEP_BACKWARD:
1116           value -= adjustment->step_increment;
1117           break;
1118         case GTK_SCROLL_PAGE_FORWARD:
1119           value += adjustment->page_increment;
1120           break;
1121         case GTK_SCROLL_PAGE_BACKWARD:
1122           value -= adjustment->page_increment;
1123           break;
1124         case GTK_SCROLL_START:
1125           value = adjustment->lower;
1126           break;
1127         case GTK_SCROLL_END:
1128           value = adjustment->upper;
1129           break;
1130         default:
1131           g_assert_not_reached ();
1132           break;
1133         }
1134
1135       value = CLAMP (value, adjustment->lower, adjustment->upper - adjustment->page_size);
1136       
1137       gtk_adjustment_set_value (adjustment, value);
1138
1139       return TRUE;
1140     }
1141
1142   return FALSE;
1143 }
1144
1145 static void
1146 gtk_scrolled_window_move_focus_out (GtkScrolledWindow *scrolled_window,
1147                                     GtkDirectionType   direction_type)
1148 {
1149   GtkWidget *toplevel;
1150   
1151   /* Focus out of the scrolled window entirely. We do this by setting
1152    * a flag, then propagating the focus motion to the notebook.
1153    */
1154   toplevel = gtk_widget_get_toplevel (GTK_WIDGET (scrolled_window));
1155   if (!GTK_WIDGET_TOPLEVEL (toplevel))
1156     return;
1157
1158   g_object_ref (scrolled_window);
1159   
1160   scrolled_window->focus_out = TRUE;
1161   g_signal_emit_by_name (toplevel, "move_focus", direction_type);
1162   scrolled_window->focus_out = FALSE;
1163   
1164   g_object_unref (scrolled_window);
1165 }
1166
1167 static void
1168 gtk_scrolled_window_size_request (GtkWidget      *widget,
1169                                   GtkRequisition *requisition)
1170 {
1171   GtkScrolledWindow *scrolled_window;
1172   GtkBin *bin;
1173   gint extra_width;
1174   gint extra_height;
1175   gint scrollbar_spacing;
1176   GtkRequisition hscrollbar_requisition;
1177   GtkRequisition vscrollbar_requisition;
1178   GtkRequisition child_requisition;
1179
1180   g_return_if_fail (GTK_IS_SCROLLED_WINDOW (widget));
1181   g_return_if_fail (requisition != NULL);
1182
1183   scrolled_window = GTK_SCROLLED_WINDOW (widget);
1184   bin = GTK_BIN (scrolled_window);
1185
1186   scrollbar_spacing = _gtk_scrolled_window_get_scrollbar_spacing (scrolled_window);
1187
1188   extra_width = 0;
1189   extra_height = 0;
1190   requisition->width = 0;
1191   requisition->height = 0;
1192   
1193   gtk_widget_size_request (scrolled_window->hscrollbar,
1194                            &hscrollbar_requisition);
1195   gtk_widget_size_request (scrolled_window->vscrollbar,
1196                            &vscrollbar_requisition);
1197   
1198   if (bin->child && GTK_WIDGET_VISIBLE (bin->child))
1199     {
1200       gtk_widget_size_request (bin->child, &child_requisition);
1201
1202       if (scrolled_window->hscrollbar_policy == GTK_POLICY_NEVER)
1203         requisition->width += child_requisition.width;
1204       else
1205         {
1206           GtkWidgetAuxInfo *aux_info = _gtk_widget_get_aux_info (bin->child, FALSE);
1207
1208           if (aux_info && aux_info->width > 0)
1209             {
1210               requisition->width += aux_info->width;
1211               extra_width = -1;
1212             }
1213           else
1214             requisition->width += vscrollbar_requisition.width;
1215         }
1216
1217       if (scrolled_window->vscrollbar_policy == GTK_POLICY_NEVER)
1218         requisition->height += child_requisition.height;
1219       else
1220         {
1221           GtkWidgetAuxInfo *aux_info = _gtk_widget_get_aux_info (bin->child, FALSE);
1222
1223           if (aux_info && aux_info->height > 0)
1224             {
1225               requisition->height += aux_info->height;
1226               extra_height = -1;
1227             }
1228           else
1229             requisition->height += hscrollbar_requisition.height;
1230         }
1231     }
1232
1233   if (scrolled_window->hscrollbar_policy == GTK_POLICY_AUTOMATIC ||
1234       scrolled_window->hscrollbar_policy == GTK_POLICY_ALWAYS)
1235     {
1236       requisition->width = MAX (requisition->width, hscrollbar_requisition.width);
1237       if (!extra_height || scrolled_window->hscrollbar_policy == GTK_POLICY_ALWAYS)
1238         extra_height = scrollbar_spacing + hscrollbar_requisition.height;
1239     }
1240
1241   if (scrolled_window->vscrollbar_policy == GTK_POLICY_AUTOMATIC ||
1242       scrolled_window->vscrollbar_policy == GTK_POLICY_ALWAYS)
1243     {
1244       requisition->height = MAX (requisition->height, vscrollbar_requisition.height);
1245       if (!extra_height || scrolled_window->vscrollbar_policy == GTK_POLICY_ALWAYS)
1246         extra_width = scrollbar_spacing + vscrollbar_requisition.width;
1247     }
1248
1249   requisition->width += GTK_CONTAINER (widget)->border_width * 2 + MAX (0, extra_width);
1250   requisition->height += GTK_CONTAINER (widget)->border_width * 2 + MAX (0, extra_height);
1251
1252   if (scrolled_window->shadow_type != GTK_SHADOW_NONE)
1253     {
1254       requisition->width += 2 * widget->style->xthickness;
1255       requisition->height += 2 * widget->style->ythickness;
1256     }
1257 }
1258
1259 static void
1260 gtk_scrolled_window_relative_allocation (GtkWidget     *widget,
1261                                          GtkAllocation *allocation)
1262 {
1263   GtkScrolledWindow *scrolled_window;
1264   GtkScrolledWindowPrivate *priv;
1265   gint scrollbar_spacing;
1266
1267   g_return_if_fail (widget != NULL);
1268   g_return_if_fail (allocation != NULL);
1269
1270   scrolled_window = GTK_SCROLLED_WINDOW (widget);
1271   scrollbar_spacing = _gtk_scrolled_window_get_scrollbar_spacing (scrolled_window);
1272
1273   priv = GTK_SCROLLED_WINDOW_GET_PRIVATE (scrolled_window);
1274
1275   allocation->x = GTK_CONTAINER (widget)->border_width;
1276   allocation->y = GTK_CONTAINER (widget)->border_width;
1277
1278   if (scrolled_window->shadow_type != GTK_SHADOW_NONE)
1279     {
1280       allocation->x += widget->style->xthickness;
1281       allocation->y += widget->style->ythickness;
1282     }
1283   
1284   allocation->width = MAX (1, (gint)widget->allocation.width - allocation->x * 2);
1285   allocation->height = MAX (1, (gint)widget->allocation.height - allocation->y * 2);
1286
1287   if (scrolled_window->vscrollbar_visible)
1288     {
1289       GtkRequisition vscrollbar_requisition;
1290       gboolean is_rtl;
1291
1292       gtk_widget_get_child_requisition (scrolled_window->vscrollbar,
1293                                         &vscrollbar_requisition);
1294       is_rtl = gtk_widget_get_direction (widget) == GTK_TEXT_DIR_RTL;
1295   
1296       if ((!is_rtl && 
1297            (priv->real_window_placement == GTK_CORNER_TOP_RIGHT ||
1298             priv->real_window_placement == GTK_CORNER_BOTTOM_RIGHT)) ||
1299           (is_rtl && 
1300            (priv->real_window_placement == GTK_CORNER_TOP_LEFT ||
1301             priv->real_window_placement == GTK_CORNER_BOTTOM_LEFT)))
1302         allocation->x += (vscrollbar_requisition.width +  scrollbar_spacing);
1303
1304       allocation->width = MAX (1, allocation->width - (vscrollbar_requisition.width + scrollbar_spacing));
1305     }
1306   if (scrolled_window->hscrollbar_visible)
1307     {
1308       GtkRequisition hscrollbar_requisition;
1309       gtk_widget_get_child_requisition (scrolled_window->hscrollbar,
1310                                         &hscrollbar_requisition);
1311   
1312       if (priv->real_window_placement == GTK_CORNER_BOTTOM_LEFT ||
1313           priv->real_window_placement == GTK_CORNER_BOTTOM_RIGHT)
1314         allocation->y += (hscrollbar_requisition.height + scrollbar_spacing);
1315
1316       allocation->height = MAX (1, allocation->height - (hscrollbar_requisition.height + scrollbar_spacing));
1317     }
1318 }
1319
1320 static void
1321 gtk_scrolled_window_size_allocate (GtkWidget     *widget,
1322                                    GtkAllocation *allocation)
1323 {
1324   GtkScrolledWindow *scrolled_window;
1325   GtkScrolledWindowPrivate *priv;
1326   GtkBin *bin;
1327   GtkAllocation relative_allocation;
1328   GtkAllocation child_allocation;
1329   gboolean scrollbars_within_bevel;
1330   gint scrollbar_spacing;
1331   
1332   g_return_if_fail (GTK_IS_SCROLLED_WINDOW (widget));
1333   g_return_if_fail (allocation != NULL);
1334
1335   scrolled_window = GTK_SCROLLED_WINDOW (widget);
1336   bin = GTK_BIN (scrolled_window);
1337
1338   scrollbar_spacing = _gtk_scrolled_window_get_scrollbar_spacing (scrolled_window);
1339   gtk_widget_style_get (widget, "scrollbars-within-bevel", &scrollbars_within_bevel, NULL);
1340
1341   priv = GTK_SCROLLED_WINDOW_GET_PRIVATE (scrolled_window);
1342
1343   widget->allocation = *allocation;
1344
1345   if (scrolled_window->hscrollbar_policy == GTK_POLICY_ALWAYS)
1346     scrolled_window->hscrollbar_visible = TRUE;
1347   else if (scrolled_window->hscrollbar_policy == GTK_POLICY_NEVER)
1348     scrolled_window->hscrollbar_visible = FALSE;
1349   if (scrolled_window->vscrollbar_policy == GTK_POLICY_ALWAYS)
1350     scrolled_window->vscrollbar_visible = TRUE;
1351   else if (scrolled_window->vscrollbar_policy == GTK_POLICY_NEVER)
1352     scrolled_window->vscrollbar_visible = FALSE;
1353
1354   if (bin->child && GTK_WIDGET_VISIBLE (bin->child))
1355     {
1356       gboolean previous_hvis;
1357       gboolean previous_vvis;
1358       guint count = 0;
1359       
1360       do
1361         {
1362           gtk_scrolled_window_relative_allocation (widget, &relative_allocation);
1363           
1364           child_allocation.x = relative_allocation.x + allocation->x;
1365           child_allocation.y = relative_allocation.y + allocation->y;
1366           child_allocation.width = relative_allocation.width;
1367           child_allocation.height = relative_allocation.height;
1368           
1369           previous_hvis = scrolled_window->hscrollbar_visible;
1370           previous_vvis = scrolled_window->vscrollbar_visible;
1371           
1372           gtk_widget_size_allocate (bin->child, &child_allocation);
1373
1374           /* If, after the first iteration, the hscrollbar and the
1375            * vscrollbar flip visiblity, then we need both.
1376            */
1377           if (count &&
1378               previous_hvis != scrolled_window->hscrollbar_visible &&
1379               previous_vvis != scrolled_window->vscrollbar_visible)
1380             {
1381               scrolled_window->hscrollbar_visible = TRUE;
1382               scrolled_window->vscrollbar_visible = TRUE;
1383
1384               /* a new resize is already queued at this point,
1385                * so we will immediatedly get reinvoked
1386                */
1387               return;
1388             }
1389           
1390           count++;
1391         }
1392       while (previous_hvis != scrolled_window->hscrollbar_visible ||
1393              previous_vvis != scrolled_window->vscrollbar_visible);
1394     }
1395   else
1396     {
1397       scrolled_window->hscrollbar_visible = scrolled_window->hscrollbar_policy == GTK_POLICY_ALWAYS;
1398       scrolled_window->vscrollbar_visible = scrolled_window->vscrollbar_policy == GTK_POLICY_ALWAYS;
1399       gtk_scrolled_window_relative_allocation (widget, &relative_allocation);
1400     }
1401   
1402   if (scrolled_window->hscrollbar_visible)
1403     {
1404       GtkRequisition hscrollbar_requisition;
1405       gtk_widget_get_child_requisition (scrolled_window->hscrollbar,
1406                                         &hscrollbar_requisition);
1407   
1408       if (!GTK_WIDGET_VISIBLE (scrolled_window->hscrollbar))
1409         gtk_widget_show (scrolled_window->hscrollbar);
1410
1411       child_allocation.x = relative_allocation.x;
1412       if (priv->real_window_placement == GTK_CORNER_TOP_LEFT ||
1413           priv->real_window_placement == GTK_CORNER_TOP_RIGHT)
1414         child_allocation.y = (relative_allocation.y +
1415                               relative_allocation.height +
1416                               scrollbar_spacing +
1417                               (scrolled_window->shadow_type == GTK_SHADOW_NONE ?
1418                                0 : widget->style->ythickness));
1419       else
1420         child_allocation.y = GTK_CONTAINER (scrolled_window)->border_width;
1421
1422       child_allocation.width = relative_allocation.width;
1423       child_allocation.height = hscrollbar_requisition.height;
1424       child_allocation.x += allocation->x;
1425       child_allocation.y += allocation->y;
1426
1427       if (scrolled_window->shadow_type != GTK_SHADOW_NONE)
1428         {
1429           if (!scrollbars_within_bevel)
1430             {
1431               child_allocation.x -= widget->style->xthickness;
1432               child_allocation.width += 2 * widget->style->xthickness;
1433             }
1434           else if (GTK_CORNER_TOP_RIGHT == priv->real_window_placement ||
1435                    GTK_CORNER_TOP_LEFT == priv->real_window_placement)
1436             {
1437               child_allocation.y -= widget->style->ythickness;
1438             }
1439           else
1440             {
1441               child_allocation.y += widget->style->ythickness;
1442             }
1443         }
1444
1445       gtk_widget_size_allocate (scrolled_window->hscrollbar, &child_allocation);
1446     }
1447   else if (GTK_WIDGET_VISIBLE (scrolled_window->hscrollbar))
1448     gtk_widget_hide (scrolled_window->hscrollbar);
1449
1450   if (scrolled_window->vscrollbar_visible)
1451     {
1452       GtkRequisition vscrollbar_requisition;
1453       if (!GTK_WIDGET_VISIBLE (scrolled_window->vscrollbar))
1454         gtk_widget_show (scrolled_window->vscrollbar);
1455
1456       gtk_widget_get_child_requisition (scrolled_window->vscrollbar,
1457                                         &vscrollbar_requisition);
1458
1459       if ((gtk_widget_get_direction (widget) == GTK_TEXT_DIR_RTL && 
1460            (priv->real_window_placement == GTK_CORNER_TOP_RIGHT ||
1461             priv->real_window_placement == GTK_CORNER_BOTTOM_RIGHT)) ||
1462           (gtk_widget_get_direction (widget) == GTK_TEXT_DIR_LTR && 
1463            (priv->real_window_placement == GTK_CORNER_TOP_LEFT ||
1464             priv->real_window_placement == GTK_CORNER_BOTTOM_LEFT)))
1465         child_allocation.x = (relative_allocation.x +
1466                               relative_allocation.width +
1467                               scrollbar_spacing +
1468                               (scrolled_window->shadow_type == GTK_SHADOW_NONE ?
1469                                0 : widget->style->xthickness));
1470       else
1471         child_allocation.x = GTK_CONTAINER (scrolled_window)->border_width;
1472
1473       child_allocation.y = relative_allocation.y;
1474       child_allocation.width = vscrollbar_requisition.width;
1475       child_allocation.height = relative_allocation.height;
1476       child_allocation.x += allocation->x;
1477       child_allocation.y += allocation->y;
1478
1479       if (scrolled_window->shadow_type != GTK_SHADOW_NONE)
1480         {
1481           if (!scrollbars_within_bevel)
1482             {
1483               child_allocation.y -= widget->style->ythickness;
1484               child_allocation.height += 2 * widget->style->ythickness;
1485             }
1486           else if (GTK_CORNER_BOTTOM_LEFT == priv->real_window_placement ||
1487                    GTK_CORNER_TOP_LEFT == priv->real_window_placement)
1488             {
1489               child_allocation.x -= widget->style->xthickness;
1490             }
1491           else
1492             {
1493               child_allocation.x += widget->style->xthickness;
1494             }
1495         }
1496
1497       gtk_widget_size_allocate (scrolled_window->vscrollbar, &child_allocation);
1498     }
1499   else if (GTK_WIDGET_VISIBLE (scrolled_window->vscrollbar))
1500     gtk_widget_hide (scrolled_window->vscrollbar);
1501 }
1502
1503 static gint
1504 gtk_scrolled_window_scroll_event (GtkWidget *widget,
1505                                   GdkEventScroll *event)
1506 {
1507   GtkWidget *range;
1508
1509   g_return_val_if_fail (GTK_IS_SCROLLED_WINDOW (widget), FALSE);
1510   g_return_val_if_fail (event != NULL, FALSE);  
1511
1512   if (event->direction == GDK_SCROLL_UP || event->direction == GDK_SCROLL_DOWN)
1513     range = GTK_SCROLLED_WINDOW (widget)->vscrollbar;
1514   else
1515     range = GTK_SCROLLED_WINDOW (widget)->hscrollbar;
1516
1517   if (range && GTK_WIDGET_VISIBLE (range))
1518     {
1519       GtkAdjustment *adj = GTK_RANGE (range)->adjustment;
1520       gdouble delta, new_value;
1521
1522       delta = _gtk_range_get_wheel_delta (GTK_RANGE (range), event->direction);
1523
1524       new_value = CLAMP (adj->value + delta, adj->lower, adj->upper - adj->page_size);
1525       
1526       gtk_adjustment_set_value (adj, new_value);
1527
1528       return TRUE;
1529     }
1530
1531   return FALSE;
1532 }
1533
1534 static gint
1535 gtk_scrolled_window_focus (GtkWidget        *widget,
1536                            GtkDirectionType  direction)
1537 {
1538   GtkScrolledWindow *scrolled_window = GTK_SCROLLED_WINDOW (widget);
1539   gboolean had_focus_child = GTK_CONTAINER (widget)->focus_child != NULL;
1540   
1541   if (scrolled_window->focus_out)
1542     {
1543       scrolled_window->focus_out = FALSE; /* Clear this to catch the wrap-around case */
1544       return FALSE;
1545     }
1546   
1547   if (gtk_widget_is_focus (widget))
1548     return FALSE;
1549
1550   /* We only put the scrolled window itself in the focus chain if it
1551    * isn't possible to focus any children.
1552    */
1553   if (GTK_BIN (widget)->child)
1554     {
1555       if (gtk_widget_child_focus (GTK_BIN (widget)->child, direction))
1556         return TRUE;
1557     }
1558
1559   if (!had_focus_child)
1560     {
1561       gtk_widget_grab_focus (widget);
1562       return TRUE;
1563     }
1564   else
1565     return FALSE;
1566 }
1567
1568 static void
1569 gtk_scrolled_window_adjustment_changed (GtkAdjustment *adjustment,
1570                                         gpointer       data)
1571 {
1572   GtkScrolledWindow *scrolled_win;
1573
1574   g_return_if_fail (adjustment != NULL);
1575   g_return_if_fail (data != NULL);
1576
1577   scrolled_win = GTK_SCROLLED_WINDOW (data);
1578
1579   if (scrolled_win->hscrollbar &&
1580       adjustment == gtk_range_get_adjustment (GTK_RANGE (scrolled_win->hscrollbar)))
1581     {
1582       if (scrolled_win->hscrollbar_policy == GTK_POLICY_AUTOMATIC)
1583         {
1584           gboolean visible;
1585           
1586           visible = scrolled_win->hscrollbar_visible;
1587           scrolled_win->hscrollbar_visible = (adjustment->upper - adjustment->lower >
1588                                               adjustment->page_size);
1589           if (scrolled_win->hscrollbar_visible != visible)
1590             gtk_widget_queue_resize (GTK_WIDGET (scrolled_win));
1591         }
1592     }
1593   else if (scrolled_win->vscrollbar &&
1594            adjustment == gtk_range_get_adjustment (GTK_RANGE (scrolled_win->vscrollbar)))
1595     {
1596       if (scrolled_win->vscrollbar_policy == GTK_POLICY_AUTOMATIC)
1597         {
1598           gboolean visible;
1599
1600           visible = scrolled_win->vscrollbar_visible;
1601           scrolled_win->vscrollbar_visible = (adjustment->upper - adjustment->lower >
1602                                               adjustment->page_size);
1603           if (scrolled_win->vscrollbar_visible != visible)
1604             gtk_widget_queue_resize (GTK_WIDGET (scrolled_win));
1605         }
1606     }
1607 }
1608
1609 static void
1610 gtk_scrolled_window_add (GtkContainer *container,
1611                          GtkWidget    *child)
1612 {
1613   GtkScrolledWindow *scrolled_window;
1614   GtkBin *bin;
1615
1616   bin = GTK_BIN (container);
1617   g_return_if_fail (bin->child == NULL);
1618
1619   scrolled_window = GTK_SCROLLED_WINDOW (container);
1620
1621   bin->child = child;
1622   gtk_widget_set_parent (child, GTK_WIDGET (bin));
1623
1624   /* this is a temporary message */
1625   if (!gtk_widget_set_scroll_adjustments (child,
1626                                           gtk_range_get_adjustment (GTK_RANGE (scrolled_window->hscrollbar)),
1627                                           gtk_range_get_adjustment (GTK_RANGE (scrolled_window->vscrollbar))))
1628     g_warning ("gtk_scrolled_window_add(): cannot add non scrollable widget "
1629                "use gtk_scrolled_window_add_with_viewport() instead");
1630 }
1631
1632 static void
1633 gtk_scrolled_window_remove (GtkContainer *container,
1634                             GtkWidget    *child)
1635 {
1636   g_return_if_fail (GTK_IS_SCROLLED_WINDOW (container));
1637   g_return_if_fail (child != NULL);
1638   g_return_if_fail (GTK_BIN (container)->child == child);
1639   
1640   gtk_widget_set_scroll_adjustments (child, NULL, NULL);
1641
1642   /* chain parent class handler to remove child */
1643   GTK_CONTAINER_CLASS (gtk_scrolled_window_parent_class)->remove (container, child);
1644 }
1645
1646 void
1647 gtk_scrolled_window_add_with_viewport (GtkScrolledWindow *scrolled_window,
1648                                        GtkWidget         *child)
1649 {
1650   GtkBin *bin;
1651   GtkWidget *viewport;
1652
1653   g_return_if_fail (GTK_IS_SCROLLED_WINDOW (scrolled_window));
1654   g_return_if_fail (GTK_IS_WIDGET (child));
1655   g_return_if_fail (child->parent == NULL);
1656
1657   bin = GTK_BIN (scrolled_window);
1658
1659   if (bin->child != NULL)
1660     {
1661       g_return_if_fail (GTK_IS_VIEWPORT (bin->child));
1662       g_return_if_fail (GTK_BIN (bin->child)->child == NULL);
1663
1664       viewport = bin->child;
1665     }
1666   else
1667     {
1668       viewport =
1669         gtk_viewport_new (gtk_scrolled_window_get_hadjustment (scrolled_window),
1670                           gtk_scrolled_window_get_vadjustment (scrolled_window));
1671       gtk_container_add (GTK_CONTAINER (scrolled_window), viewport);
1672     }
1673
1674   gtk_widget_show (viewport);
1675   gtk_container_add (GTK_CONTAINER (viewport), child);
1676 }
1677
1678 /**
1679  * _gtk_scrolled_window_get_spacing:
1680  * @scrolled_window: a scrolled window
1681  * 
1682  * Gets the spacing between the scrolled window's scrollbars and
1683  * the scrolled widget. Used by GtkCombo
1684  * 
1685  * Return value: the spacing, in pixels.
1686  **/
1687 gint
1688 _gtk_scrolled_window_get_scrollbar_spacing (GtkScrolledWindow *scrolled_window)
1689 {
1690   GtkScrolledWindowClass *class;
1691     
1692   g_return_val_if_fail (GTK_IS_SCROLLED_WINDOW (scrolled_window), 0);
1693
1694   class = GTK_SCROLLED_WINDOW_GET_CLASS (scrolled_window);
1695
1696   if (class->scrollbar_spacing >= 0)
1697     return class->scrollbar_spacing;
1698   else
1699     {
1700       gint scrollbar_spacing;
1701       
1702       gtk_widget_style_get (GTK_WIDGET (scrolled_window),
1703                             "scrollbar-spacing", &scrollbar_spacing,
1704                             NULL);
1705
1706       return scrollbar_spacing;
1707     }
1708 }
1709
1710 #define __GTK_SCROLLED_WINDOW_C__
1711 #include "gtkaliasdef.c"