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