]> Pileus Git - ~andy/gtk/blob - gtk/gtkmenubar.c
tests: Add simple test for image clipboard
[~andy/gtk] / gtk / gtkmenubar.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 /**
28  * SECTION:gtkmenubar
29  * @Title: GtkMenuBar
30  * @Short_description: A subclass of GtkMenuShell which holds GtkMenuItem widgets
31  * @See_also: #GtkMenuShell, #GtkMenu, #GtkMenuItem
32  *
33  * The #GtkMenuBar is a subclass of #GtkMenuShell which contains one or
34  * more #GtkMenuItems. The result is a standard menu bar which can hold
35  * many menu items.
36  */
37
38 #include "config.h"
39
40 #include "gtkmenubar.h"
41
42 #include "gtkbindings.h"
43 #include "gtkmain.h"
44 #include "gtkmarshalers.h"
45 #include "gtkmenuitemprivate.h"
46 #include "gtkmenuprivate.h"
47 #include "gtkmenushellprivate.h"
48 #include "gtksettings.h"
49 #include "gtksizerequest.h"
50 #include "gtkwindow.h"
51 #include "gtkcontainerprivate.h"
52 #include "gtkintl.h"
53 #include "gtkprivate.h"
54 #include "gtktypebuiltins.h"
55
56 #define BORDER_SPACING  0
57 #define DEFAULT_IPADDING 1
58
59 /* Properties */
60 enum {
61   PROP_0,
62   PROP_PACK_DIRECTION,
63   PROP_CHILD_PACK_DIRECTION
64 };
65
66 struct _GtkMenuBarPrivate
67 {
68   GtkPackDirection pack_direction;
69   GtkPackDirection child_pack_direction;
70 };
71
72
73 static void gtk_menu_bar_set_property      (GObject             *object,
74                                             guint                prop_id,
75                                             const GValue        *value,
76                                             GParamSpec          *pspec);
77 static void gtk_menu_bar_get_property      (GObject             *object,
78                                             guint                prop_id,
79                                             GValue              *value,
80                                             GParamSpec          *pspec);
81 static void gtk_menu_bar_get_preferred_width (GtkWidget     *widget,
82                                               gint          *minimum,
83                                               gint          *natural);
84 static void gtk_menu_bar_get_preferred_height (GtkWidget    *widget,
85                                                gint         *minimum,
86                                                gint         *natural);
87 static void gtk_menu_bar_get_preferred_width_for_height (GtkWidget    *widget,
88                                                          gint          height,
89                                                          gint         *minimum,
90                                                          gint         *natural);
91 static void gtk_menu_bar_get_preferred_height_for_width (GtkWidget    *widget,
92                                                          gint          width,
93                                                          gint         *minimum,
94                                                          gint         *natural);
95 static void gtk_menu_bar_size_allocate     (GtkWidget       *widget,
96                                             GtkAllocation   *allocation);
97 static gint gtk_menu_bar_draw              (GtkWidget       *widget,
98                                             cairo_t         *cr);
99 static void gtk_menu_bar_hierarchy_changed (GtkWidget       *widget,
100                                             GtkWidget       *old_toplevel);
101 static gint gtk_menu_bar_get_popup_delay   (GtkMenuShell    *menu_shell);
102 static void gtk_menu_bar_move_current      (GtkMenuShell     *menu_shell,
103                                             GtkMenuDirectionType direction);
104
105 static GtkShadowType get_shadow_type   (GtkMenuBar      *menubar);
106
107 G_DEFINE_TYPE (GtkMenuBar, gtk_menu_bar, GTK_TYPE_MENU_SHELL)
108
109 static void
110 gtk_menu_bar_class_init (GtkMenuBarClass *class)
111 {
112   GObjectClass *gobject_class;
113   GtkWidgetClass *widget_class;
114   GtkMenuShellClass *menu_shell_class;
115
116   GtkBindingSet *binding_set;
117
118   gobject_class = (GObjectClass*) class;
119   widget_class = (GtkWidgetClass*) class;
120   menu_shell_class = (GtkMenuShellClass*) class;
121
122   gobject_class->get_property = gtk_menu_bar_get_property;
123   gobject_class->set_property = gtk_menu_bar_set_property;
124
125   widget_class->get_preferred_width = gtk_menu_bar_get_preferred_width;
126   widget_class->get_preferred_height = gtk_menu_bar_get_preferred_height;
127   widget_class->get_preferred_width_for_height = gtk_menu_bar_get_preferred_width_for_height;
128   widget_class->get_preferred_height_for_width = gtk_menu_bar_get_preferred_height_for_width;
129   widget_class->size_allocate = gtk_menu_bar_size_allocate;
130   widget_class->draw = gtk_menu_bar_draw;
131   widget_class->hierarchy_changed = gtk_menu_bar_hierarchy_changed;
132   
133   menu_shell_class->submenu_placement = GTK_TOP_BOTTOM;
134   menu_shell_class->get_popup_delay = gtk_menu_bar_get_popup_delay;
135   menu_shell_class->move_current = gtk_menu_bar_move_current;
136
137   binding_set = gtk_binding_set_by_class (class);
138   gtk_binding_entry_add_signal (binding_set,
139                                 GDK_KEY_Left, 0,
140                                 "move-current", 1,
141                                 GTK_TYPE_MENU_DIRECTION_TYPE,
142                                 GTK_MENU_DIR_PREV);
143   gtk_binding_entry_add_signal (binding_set,
144                                 GDK_KEY_KP_Left, 0,
145                                 "move-current", 1,
146                                 GTK_TYPE_MENU_DIRECTION_TYPE,
147                                 GTK_MENU_DIR_PREV);
148   gtk_binding_entry_add_signal (binding_set,
149                                 GDK_KEY_Right, 0,
150                                 "move-current", 1,
151                                 GTK_TYPE_MENU_DIRECTION_TYPE,
152                                 GTK_MENU_DIR_NEXT);
153   gtk_binding_entry_add_signal (binding_set,
154                                 GDK_KEY_KP_Right, 0,
155                                 "move-current", 1,
156                                 GTK_TYPE_MENU_DIRECTION_TYPE,
157                                 GTK_MENU_DIR_NEXT);
158   gtk_binding_entry_add_signal (binding_set,
159                                 GDK_KEY_Up, 0,
160                                 "move-current", 1,
161                                 GTK_TYPE_MENU_DIRECTION_TYPE,
162                                 GTK_MENU_DIR_PARENT);
163   gtk_binding_entry_add_signal (binding_set,
164                                 GDK_KEY_KP_Up, 0,
165                                 "move-current", 1,
166                                 GTK_TYPE_MENU_DIRECTION_TYPE,
167                                 GTK_MENU_DIR_PARENT);
168   gtk_binding_entry_add_signal (binding_set,
169                                 GDK_KEY_Down, 0,
170                                 "move-current", 1,
171                                 GTK_TYPE_MENU_DIRECTION_TYPE,
172                                 GTK_MENU_DIR_CHILD);
173   gtk_binding_entry_add_signal (binding_set,
174                                 GDK_KEY_KP_Down, 0,
175                                 "move-current", 1,
176                                 GTK_TYPE_MENU_DIRECTION_TYPE,
177                                 GTK_MENU_DIR_CHILD);
178
179   /**
180    * GtkMenuBar:pack-direction:
181    *
182    * The pack direction of the menubar. It determines how
183    * menuitems are arranged in the menubar.
184    *
185    * Since: 2.8
186    */
187   g_object_class_install_property (gobject_class,
188                                    PROP_PACK_DIRECTION,
189                                    g_param_spec_enum ("pack-direction",
190                                                       P_("Pack direction"),
191                                                       P_("The pack direction of the menubar"),
192                                                       GTK_TYPE_PACK_DIRECTION,
193                                                       GTK_PACK_DIRECTION_LTR,
194                                                       GTK_PARAM_READWRITE));
195   
196   /**
197    * GtkMenuBar:child-pack-direction:
198    *
199    * The child pack direction of the menubar. It determines how
200    * the widgets contained in child menuitems are arranged.
201    *
202    * Since: 2.8
203    */
204   g_object_class_install_property (gobject_class,
205                                    PROP_CHILD_PACK_DIRECTION,
206                                    g_param_spec_enum ("child-pack-direction",
207                                                       P_("Child Pack direction"),
208                                                       P_("The child pack direction of the menubar"),
209                                                       GTK_TYPE_PACK_DIRECTION,
210                                                       GTK_PACK_DIRECTION_LTR,
211                                                       GTK_PARAM_READWRITE));
212   
213
214   gtk_widget_class_install_style_property (widget_class,
215                                            g_param_spec_enum ("shadow-type",
216                                                               P_("Shadow type"),
217                                                               P_("Style of bevel around the menubar"),
218                                                               GTK_TYPE_SHADOW_TYPE,
219                                                               GTK_SHADOW_OUT,
220                                                               GTK_PARAM_READABLE));
221
222   gtk_widget_class_install_style_property (widget_class,
223                                            g_param_spec_int ("internal-padding",
224                                                              P_("Internal padding"),
225                                                              P_("Amount of border space between the menubar shadow and the menu items"),
226                                                              0,
227                                                              G_MAXINT,
228                                                              DEFAULT_IPADDING,
229                                                              GTK_PARAM_READABLE));
230
231   g_type_class_add_private (gobject_class, sizeof (GtkMenuBarPrivate));
232 }
233
234 static void
235 gtk_menu_bar_init (GtkMenuBar *menu_bar)
236 {
237   GtkStyleContext *context;
238
239   menu_bar->priv = G_TYPE_INSTANCE_GET_PRIVATE (menu_bar,
240                                                 GTK_TYPE_MENU_BAR,
241                                                 GtkMenuBarPrivate);
242
243   context = gtk_widget_get_style_context (GTK_WIDGET (menu_bar));
244   gtk_style_context_add_class (context, GTK_STYLE_CLASS_MENUBAR);
245 }
246
247 /**
248  * gtk_menu_bar_new:
249  *
250  * Creates a new #GtkMenuBar
251  *
252  * Returns: the new menu bar, as a #GtkWidget
253  */
254 GtkWidget*
255 gtk_menu_bar_new (void)
256 {
257   return g_object_new (GTK_TYPE_MENU_BAR, NULL);
258 }
259
260 static void
261 gtk_menu_bar_set_property (GObject      *object,
262                            guint         prop_id,
263                            const GValue *value,
264                            GParamSpec   *pspec)
265 {
266   GtkMenuBar *menubar = GTK_MENU_BAR (object);
267   
268   switch (prop_id)
269     {
270     case PROP_PACK_DIRECTION:
271       gtk_menu_bar_set_pack_direction (menubar, g_value_get_enum (value));
272       break;
273     case PROP_CHILD_PACK_DIRECTION:
274       gtk_menu_bar_set_child_pack_direction (menubar, g_value_get_enum (value));
275       break;
276     default:
277       G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
278       break;
279     }
280 }
281
282 static void
283 gtk_menu_bar_get_property (GObject    *object,
284                            guint       prop_id,
285                            GValue     *value,
286                            GParamSpec *pspec)
287 {
288   GtkMenuBar *menubar = GTK_MENU_BAR (object);
289   
290   switch (prop_id)
291     {
292     case PROP_PACK_DIRECTION:
293       g_value_set_enum (value, gtk_menu_bar_get_pack_direction (menubar));
294       break;
295     case PROP_CHILD_PACK_DIRECTION:
296       g_value_set_enum (value, gtk_menu_bar_get_child_pack_direction (menubar));
297       break;
298     default:
299       G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
300       break;
301     }
302 }
303
304 static void
305 get_preferred_size_for_size (GtkWidget      *widget,
306                              GtkOrientation  orientation,
307                              gint            size,
308                              gint           *minimum,
309                              gint           *natural)
310 {
311   if (orientation == GTK_ORIENTATION_HORIZONTAL)
312     if (size < 0)
313       gtk_widget_get_preferred_width (widget, minimum, natural);
314     else
315       gtk_widget_get_preferred_width_for_height (widget, size, minimum, natural);
316   else
317     if (size < 0)
318       gtk_widget_get_preferred_height (widget, minimum, natural);
319     else
320       gtk_widget_get_preferred_height_for_width (widget, size, minimum, natural);
321 }
322
323 static void
324 gtk_menu_bar_size_request (GtkWidget      *widget,
325                            GtkOrientation  orientation,
326                            gint            size,
327                            gint           *minimum,
328                            gint           *natural)
329 {
330   GtkMenuBar *menu_bar;
331   GtkMenuBarPrivate *priv;
332   GtkMenuShell *menu_shell;
333   GtkWidget *child;
334   GList *children;
335   gint ipadding;
336   guint border_width;
337   gboolean use_toggle_size, use_maximize;
338   gint child_minimum, child_natural;
339
340   *minimum = 0;
341   *natural = 0;
342
343   menu_bar = GTK_MENU_BAR (widget);
344   menu_shell = GTK_MENU_SHELL (widget);
345   priv = menu_bar->priv;
346
347   children = menu_shell->priv->children;
348
349   if (priv->child_pack_direction == GTK_PACK_DIRECTION_LTR ||
350       priv->child_pack_direction == GTK_PACK_DIRECTION_RTL)
351     use_toggle_size = (orientation == GTK_ORIENTATION_HORIZONTAL);
352   else
353     use_toggle_size = (orientation == GTK_ORIENTATION_VERTICAL);
354
355   if (priv->pack_direction == GTK_PACK_DIRECTION_LTR ||
356       priv->pack_direction == GTK_PACK_DIRECTION_RTL)
357     use_maximize = (orientation == GTK_ORIENTATION_VERTICAL);
358   else
359     use_maximize = (orientation == GTK_ORIENTATION_HORIZONTAL);
360
361   while (children)
362     {
363       child = children->data;
364       children = children->next;
365
366       if (gtk_widget_get_visible (child))
367         {
368           get_preferred_size_for_size (child, orientation, size, &child_minimum, &child_natural);
369
370           if (use_toggle_size)
371             {
372               gint toggle_size;
373
374               gtk_menu_item_toggle_size_request (GTK_MENU_ITEM (child),
375                                                  &toggle_size);
376
377               child_minimum += toggle_size;
378               child_natural += toggle_size;
379             }
380
381           if (use_maximize)
382             {
383               *minimum = MAX (*minimum, child_minimum);
384               *natural = MAX (*natural, child_natural);
385             }
386           else
387             {
388               *minimum += child_minimum;
389               *natural += child_natural;
390             }
391         }
392     }
393
394   gtk_widget_style_get (widget, "internal-padding", &ipadding, NULL);
395   border_width = gtk_container_get_border_width (GTK_CONTAINER (menu_bar));
396   *minimum += (border_width + ipadding + BORDER_SPACING) * 2;
397   *natural += (border_width + ipadding + BORDER_SPACING) * 2;
398
399   if (get_shadow_type (menu_bar) != GTK_SHADOW_NONE)
400     {
401       GtkStyleContext *context;
402       GtkBorder border;
403
404       context = gtk_widget_get_style_context (widget);
405       gtk_style_context_get_border (context, gtk_widget_get_state_flags (widget),
406                                     &border);
407
408       if (orientation == GTK_ORIENTATION_HORIZONTAL)
409         {
410           *minimum += border.left + border.right;
411           *natural += border.left + border.right;
412         }
413       else
414         {
415           *minimum += border.top + border.bottom;
416           *natural += border.top + border.bottom;
417         }
418     }
419 }
420
421 static void
422 gtk_menu_bar_get_preferred_width (GtkWidget *widget,
423                                   gint      *minimum,
424                                   gint      *natural)
425 {
426   gtk_menu_bar_size_request (widget, GTK_ORIENTATION_HORIZONTAL, -1, minimum, natural);
427 }
428
429 static void
430 gtk_menu_bar_get_preferred_height (GtkWidget *widget,
431                                    gint      *minimum,
432                                    gint      *natural)
433 {
434   gtk_menu_bar_size_request (widget, GTK_ORIENTATION_VERTICAL, -1, minimum, natural);
435 }
436
437 static void
438 gtk_menu_bar_get_preferred_width_for_height (GtkWidget *widget,
439                                              gint       height,
440                                              gint      *minimum,
441                                              gint      *natural)
442 {
443   gtk_menu_bar_size_request (widget, GTK_ORIENTATION_HORIZONTAL, height, minimum, natural);
444 }
445
446 static void
447 gtk_menu_bar_get_preferred_height_for_width (GtkWidget *widget,
448                                              gint       width,
449                                              gint      *minimum,
450                                              gint      *natural)
451 {
452   gtk_menu_bar_size_request (widget, GTK_ORIENTATION_VERTICAL, width, minimum, natural);
453 }
454
455 static void
456 gtk_menu_bar_size_allocate (GtkWidget     *widget,
457                             GtkAllocation *allocation)
458 {
459   GtkMenuBar *menu_bar;
460   GtkMenuShell *menu_shell;
461   GtkMenuBarPrivate *priv;
462   GtkWidget *child;
463   GList *children;
464   GtkAllocation remaining_space;
465   gint ipadding;
466   guint border_width;
467   GArray *requested_sizes;
468   gint toggle_size;
469   guint i;
470
471   g_return_if_fail (GTK_IS_MENU_BAR (widget));
472   g_return_if_fail (allocation != NULL);
473
474   menu_bar = GTK_MENU_BAR (widget);
475   menu_shell = GTK_MENU_SHELL (widget);
476   priv = menu_bar->priv;
477
478   gtk_widget_set_allocation (widget, allocation);
479
480   if (gtk_widget_get_realized (widget))
481     gdk_window_move_resize (gtk_widget_get_window (widget),
482                             allocation->x, allocation->y,
483                             allocation->width, allocation->height);
484
485   if (menu_shell->priv->children)
486     {
487       gtk_widget_style_get (widget, "internal-padding", &ipadding, NULL);
488   
489       border_width = gtk_container_get_border_width (GTK_CONTAINER (menu_bar));
490       remaining_space.x = (border_width +
491                             ipadding + 
492                             BORDER_SPACING);
493       remaining_space.y = (border_width +
494                             ipadding +
495                             BORDER_SPACING);
496       remaining_space.width = allocation->width -
497                                2 * (border_width + ipadding + BORDER_SPACING);
498       remaining_space.height = allocation->height -
499                                 2 * (border_width + ipadding + BORDER_SPACING);
500     
501       if (get_shadow_type (menu_bar) != GTK_SHADOW_NONE)
502         {
503           GtkStyleContext *context;
504           GtkBorder border;
505
506           context = gtk_widget_get_style_context (widget);
507           gtk_style_context_get_border (context, gtk_widget_get_state_flags (widget),
508                                         &border);
509
510           remaining_space.x += border.left;
511           remaining_space.y += border.top;
512           remaining_space.width -= border.left + border.right;
513           remaining_space.height -= border.top + border.bottom;
514         }
515       
516       requested_sizes = g_array_new (FALSE, FALSE, sizeof (GtkRequestedSize));
517
518       if (priv->pack_direction == GTK_PACK_DIRECTION_LTR ||
519           priv->pack_direction == GTK_PACK_DIRECTION_RTL)
520         {
521           int size = remaining_space.width;
522           gboolean ltr = (gtk_widget_get_direction (widget) == GTK_TEXT_DIR_LTR) == (priv->pack_direction == GTK_PACK_DIRECTION_LTR);
523
524           for (children = menu_shell->priv->children; children; children = children->next)
525             {
526               GtkRequestedSize request;
527               child = children->data;
528
529               if (!gtk_widget_get_visible (child))
530                 continue;
531
532               request.data = child;
533               gtk_widget_get_preferred_width_for_height (child, 
534                                                          remaining_space.height,
535                                                          &request.minimum_size, 
536                                                          &request.natural_size);
537               gtk_menu_item_toggle_size_request (GTK_MENU_ITEM (child),
538                                                  &toggle_size);
539               request.minimum_size += toggle_size;
540               request.natural_size += toggle_size;
541
542               gtk_menu_item_toggle_size_allocate (GTK_MENU_ITEM (child), toggle_size);
543
544               g_array_append_val (requested_sizes, request);
545
546               size -= request.minimum_size;
547             }
548
549           size = gtk_distribute_natural_allocation (size,
550                                                     requested_sizes->len,
551                                                     (GtkRequestedSize *) requested_sizes->data);
552
553           for (i = 0; i < requested_sizes->len; i++)
554             {
555               GtkAllocation child_allocation = remaining_space;
556               GtkRequestedSize *request = &g_array_index (requested_sizes, GtkRequestedSize, i);
557
558               child_allocation.width = request->minimum_size;
559               remaining_space.width -= request->minimum_size;
560
561               if (i + 1 == requested_sizes->len && GTK_IS_MENU_ITEM (request->data) &&
562                   GTK_MENU_ITEM (request->data)->priv->right_justify)
563                 ltr = !ltr;
564
565               if (ltr)
566                 remaining_space.x += request->minimum_size;
567               else
568                 child_allocation.x += remaining_space.width;
569
570               gtk_widget_size_allocate (request->data, &child_allocation);
571             }
572         }
573       else
574         {
575           int size = remaining_space.height;
576           gboolean ttb = (priv->pack_direction == GTK_PACK_DIRECTION_TTB);
577
578           for (children = menu_shell->priv->children; children; children = children->next)
579             {
580               GtkRequestedSize request;
581               child = children->data;
582
583               if (!gtk_widget_get_visible (child))
584                 continue;
585
586               request.data = child;
587               gtk_widget_get_preferred_height_for_width (child, 
588                                                          remaining_space.width,
589                                                          &request.minimum_size, 
590                                                          &request.natural_size);
591               gtk_menu_item_toggle_size_request (GTK_MENU_ITEM (child),
592                                                  &toggle_size);
593               request.minimum_size += toggle_size;
594               request.natural_size += toggle_size;
595
596               gtk_menu_item_toggle_size_allocate (GTK_MENU_ITEM (child), toggle_size);
597
598               g_array_append_val (requested_sizes, request);
599
600               size -= request.minimum_size;
601             }
602
603           size = gtk_distribute_natural_allocation (size,
604                                                     requested_sizes->len,
605                                                     (GtkRequestedSize *) requested_sizes->data);
606
607           for (i = 0; i < requested_sizes->len; i++)
608             {
609               GtkAllocation child_allocation = remaining_space;
610               GtkRequestedSize *request = &g_array_index (requested_sizes, GtkRequestedSize, i);
611
612               child_allocation.height = request->minimum_size;
613               remaining_space.height -= request->minimum_size;
614
615               if (i + 1 == requested_sizes->len && GTK_IS_MENU_ITEM (request->data) &&
616                   GTK_MENU_ITEM (request->data)->priv->right_justify)
617                 ttb = !ttb;
618
619               if (ttb)
620                 remaining_space.y += request->minimum_size;
621               else
622                 child_allocation.y += remaining_space.height;
623
624               gtk_widget_size_allocate (request->data, &child_allocation);
625             }
626         }
627
628       g_array_free (requested_sizes, TRUE);
629     }
630 }
631
632 static gint
633 gtk_menu_bar_draw (GtkWidget *widget,
634                    cairo_t   *cr)
635 {
636   GtkStyleContext *context;
637   GtkStateFlags state;
638   int border;
639
640   border = gtk_container_get_border_width (GTK_CONTAINER (widget));
641   context = gtk_widget_get_style_context (widget);
642
643   state = gtk_widget_get_state_flags (widget);
644   gtk_style_context_set_state (context, state);
645
646   if (get_shadow_type (GTK_MENU_BAR (widget)) != GTK_SHADOW_NONE)
647     gtk_render_background (context, cr,
648                            border, border,
649                            gtk_widget_get_allocated_width (widget) - border * 2,
650                            gtk_widget_get_allocated_height (widget) - border * 2);
651
652   gtk_render_frame (context, cr,
653                     border, border,
654                     gtk_widget_get_allocated_width (widget) - border * 2,
655                     gtk_widget_get_allocated_height (widget) - border * 2);
656
657   GTK_WIDGET_CLASS (gtk_menu_bar_parent_class)->draw (widget, cr);
658
659   return FALSE;
660 }
661
662 static GList *
663 get_menu_bars (GtkWindow *window)
664 {
665   return g_object_get_data (G_OBJECT (window), "gtk-menu-bar-list");
666 }
667
668 static GList *
669 get_viewable_menu_bars (GtkWindow *window)
670 {
671   GList *menu_bars;
672   GList *viewable_menu_bars = NULL;
673
674   for (menu_bars = get_menu_bars (window);
675        menu_bars;
676        menu_bars = menu_bars->next)
677     {
678       GtkWidget *widget = menu_bars->data;
679       gboolean viewable = TRUE;
680       
681       while (widget)
682         {
683           if (!gtk_widget_get_mapped (widget))
684             viewable = FALSE;
685
686           widget = gtk_widget_get_parent (widget);
687         }
688
689       if (viewable)
690         viewable_menu_bars = g_list_prepend (viewable_menu_bars, menu_bars->data);
691     }
692
693   return g_list_reverse (viewable_menu_bars);
694 }
695
696 static void
697 set_menu_bars (GtkWindow *window,
698                GList     *menubars)
699 {
700   g_object_set_data (G_OBJECT (window), I_("gtk-menu-bar-list"), menubars);
701 }
702
703 static gboolean
704 window_key_press_handler (GtkWidget   *widget,
705                           GdkEventKey *event,
706                           gpointer     data)
707 {
708   gchar *accel = NULL;
709   gboolean retval = FALSE;
710   
711   g_object_get (gtk_widget_get_settings (widget),
712                 "gtk-menu-bar-accel", &accel,
713                 NULL);
714
715   if (accel && *accel)
716     {
717       guint keyval = 0;
718       GdkModifierType mods = 0;
719
720       gtk_accelerator_parse (accel, &keyval, &mods);
721
722       if (keyval == 0)
723         g_warning ("Failed to parse menu bar accelerator '%s'\n", accel);
724
725       /* FIXME this is wrong, needs to be in the global accel resolution
726        * thing, to properly consider i18n etc., but that probably requires
727        * AccelGroup changes etc.
728        */
729       if (event->keyval == keyval &&
730           ((event->state & gtk_accelerator_get_default_mod_mask ()) ==
731            (mods & gtk_accelerator_get_default_mod_mask ())))
732         {
733           GList *tmp_menubars = get_viewable_menu_bars (GTK_WINDOW (widget));
734           GList *menubars;
735
736           menubars = _gtk_container_focus_sort (GTK_CONTAINER (widget), tmp_menubars,
737                                                 GTK_DIR_TAB_FORWARD, NULL);
738           g_list_free (tmp_menubars);
739           
740           if (menubars)
741             {
742               GtkMenuShell *menu_shell = GTK_MENU_SHELL (menubars->data);
743
744               _gtk_menu_shell_set_keyboard_mode (menu_shell, TRUE);
745               gtk_menu_shell_select_first (menu_shell, FALSE);
746               
747               g_list_free (menubars);
748               
749               retval = TRUE;          
750             }
751         }
752     }
753
754   g_free (accel);
755
756   return retval;
757 }
758
759 static void
760 add_to_window (GtkWindow  *window,
761                GtkMenuBar *menubar)
762 {
763   GList *menubars = get_menu_bars (window);
764
765   if (!menubars)
766     {
767       g_signal_connect (window,
768                         "key-press-event",
769                         G_CALLBACK (window_key_press_handler),
770                         NULL);
771     }
772
773   set_menu_bars (window, g_list_prepend (menubars, menubar));
774 }
775
776 static void
777 remove_from_window (GtkWindow  *window,
778                     GtkMenuBar *menubar)
779 {
780   GList *menubars = get_menu_bars (window);
781
782   menubars = g_list_remove (menubars, menubar);
783
784   if (!menubars)
785     {
786       g_signal_handlers_disconnect_by_func (window,
787                                             window_key_press_handler,
788                                             NULL);
789     }
790
791   set_menu_bars (window, menubars);
792 }
793
794 static void
795 gtk_menu_bar_hierarchy_changed (GtkWidget *widget,
796                                 GtkWidget *old_toplevel)
797 {
798   GtkWidget *toplevel;  
799   GtkMenuBar *menubar;
800
801   menubar = GTK_MENU_BAR (widget);
802
803   toplevel = gtk_widget_get_toplevel (widget);
804
805   if (old_toplevel)
806     remove_from_window (GTK_WINDOW (old_toplevel), menubar);
807   
808   if (gtk_widget_is_toplevel (toplevel))
809     add_to_window (GTK_WINDOW (toplevel), menubar);
810 }
811
812 /**
813  * _gtk_menu_bar_cycle_focus:
814  * @menubar: a #GtkMenuBar
815  * @dir: direction in which to cycle the focus
816  * 
817  * Move the focus between menubars in the toplevel.
818  **/
819 void
820 _gtk_menu_bar_cycle_focus (GtkMenuBar       *menubar,
821                            GtkDirectionType  dir)
822 {
823   GtkWidget *toplevel = gtk_widget_get_toplevel (GTK_WIDGET (menubar));
824   GtkMenuItem *to_activate = NULL;
825
826   if (gtk_widget_is_toplevel (toplevel))
827     {
828       GList *tmp_menubars = get_viewable_menu_bars (GTK_WINDOW (toplevel));
829       GList *menubars;
830       GList *current;
831
832       menubars = _gtk_container_focus_sort (GTK_CONTAINER (toplevel), tmp_menubars,
833                                             dir, GTK_WIDGET (menubar));
834       g_list_free (tmp_menubars);
835
836       if (menubars)
837         {
838           current = g_list_find (menubars, menubar);
839
840           if (current && current->next)
841             {
842               GtkMenuShell *new_menushell = GTK_MENU_SHELL (current->next->data);
843               if (new_menushell->priv->children)
844                 to_activate = new_menushell->priv->children->data;
845             }
846         }
847           
848       g_list_free (menubars);
849     }
850
851   gtk_menu_shell_cancel (GTK_MENU_SHELL (menubar));
852
853   if (to_activate)
854     g_signal_emit_by_name (to_activate, "activate_item");
855 }
856
857 static GtkShadowType
858 get_shadow_type (GtkMenuBar *menubar)
859 {
860   GtkShadowType shadow_type = GTK_SHADOW_OUT;
861   
862   gtk_widget_style_get (GTK_WIDGET (menubar),
863                         "shadow-type", &shadow_type,
864                         NULL);
865
866   return shadow_type;
867 }
868
869 static gint
870 gtk_menu_bar_get_popup_delay (GtkMenuShell *menu_shell)
871 {
872   gint popup_delay;
873   
874   g_object_get (gtk_widget_get_settings (GTK_WIDGET (menu_shell)),
875                 "gtk-menu-bar-popup-delay", &popup_delay,
876                 NULL);
877
878   return popup_delay;
879 }
880
881 static void
882 gtk_menu_bar_move_current (GtkMenuShell         *menu_shell,
883                            GtkMenuDirectionType  direction)
884 {
885   GtkMenuBar *menubar = GTK_MENU_BAR (menu_shell);
886   GtkTextDirection text_dir;
887   GtkPackDirection pack_dir;
888
889   text_dir = gtk_widget_get_direction (GTK_WIDGET (menubar));
890   pack_dir = gtk_menu_bar_get_pack_direction (menubar);
891   
892   if (pack_dir == GTK_PACK_DIRECTION_LTR || pack_dir == GTK_PACK_DIRECTION_RTL)
893      {
894       if ((text_dir == GTK_TEXT_DIR_RTL) == (pack_dir == GTK_PACK_DIRECTION_LTR))
895         {
896           switch (direction) 
897             {      
898             case GTK_MENU_DIR_PREV:
899               direction = GTK_MENU_DIR_NEXT;
900               break;
901             case GTK_MENU_DIR_NEXT:
902               direction = GTK_MENU_DIR_PREV;
903               break;
904             default: ;
905             }
906         }
907     }
908   else
909     {
910       switch (direction) 
911         {
912         case GTK_MENU_DIR_PARENT:
913           if ((text_dir == GTK_TEXT_DIR_LTR) == (pack_dir == GTK_PACK_DIRECTION_TTB))
914             direction = GTK_MENU_DIR_PREV;
915           else
916             direction = GTK_MENU_DIR_NEXT;
917           break;
918         case GTK_MENU_DIR_CHILD:
919           if ((text_dir == GTK_TEXT_DIR_LTR) == (pack_dir == GTK_PACK_DIRECTION_TTB))
920             direction = GTK_MENU_DIR_NEXT;
921           else
922             direction = GTK_MENU_DIR_PREV;
923           break;
924         case GTK_MENU_DIR_PREV:
925           if (text_dir == GTK_TEXT_DIR_RTL)       
926             direction = GTK_MENU_DIR_CHILD;
927           else
928             direction = GTK_MENU_DIR_PARENT;
929           break;
930         case GTK_MENU_DIR_NEXT:
931           if (text_dir == GTK_TEXT_DIR_RTL)       
932             direction = GTK_MENU_DIR_PARENT;
933           else
934             direction = GTK_MENU_DIR_CHILD;
935           break;
936         default: ;
937         }
938     }
939   
940   GTK_MENU_SHELL_CLASS (gtk_menu_bar_parent_class)->move_current (menu_shell, direction);
941 }
942
943 /**
944  * gtk_menu_bar_get_pack_direction:
945  * @menubar: a #GtkMenuBar
946  * 
947  * Retrieves the current pack direction of the menubar. 
948  * See gtk_menu_bar_set_pack_direction().
949  *
950  * Return value: the pack direction
951  *
952  * Since: 2.8
953  */
954 GtkPackDirection
955 gtk_menu_bar_get_pack_direction (GtkMenuBar *menubar)
956 {
957   g_return_val_if_fail (GTK_IS_MENU_BAR (menubar), 
958                         GTK_PACK_DIRECTION_LTR);
959
960   return menubar->priv->pack_direction;
961 }
962
963 /**
964  * gtk_menu_bar_set_pack_direction:
965  * @menubar: a #GtkMenuBar
966  * @pack_dir: a new #GtkPackDirection
967  * 
968  * Sets how items should be packed inside a menubar.
969  * 
970  * Since: 2.8
971  */
972 void
973 gtk_menu_bar_set_pack_direction (GtkMenuBar       *menubar,
974                                  GtkPackDirection  pack_dir)
975 {
976   GtkMenuBarPrivate *priv;
977   GList *l;
978
979   g_return_if_fail (GTK_IS_MENU_BAR (menubar));
980
981   priv = menubar->priv;
982
983   if (priv->pack_direction != pack_dir)
984     {
985       priv->pack_direction = pack_dir;
986
987       gtk_widget_queue_resize (GTK_WIDGET (menubar));
988
989       for (l = GTK_MENU_SHELL (menubar)->priv->children; l; l = l->next)
990         gtk_widget_queue_resize (GTK_WIDGET (l->data));
991
992       g_object_notify (G_OBJECT (menubar), "pack-direction");
993     }
994 }
995
996 /**
997  * gtk_menu_bar_get_child_pack_direction:
998  * @menubar: a #GtkMenuBar
999  * 
1000  * Retrieves the current child pack direction of the menubar.
1001  * See gtk_menu_bar_set_child_pack_direction().
1002  *
1003  * Return value: the child pack direction
1004  *
1005  * Since: 2.8
1006  */
1007 GtkPackDirection
1008 gtk_menu_bar_get_child_pack_direction (GtkMenuBar *menubar)
1009 {
1010   g_return_val_if_fail (GTK_IS_MENU_BAR (menubar), 
1011                         GTK_PACK_DIRECTION_LTR);
1012
1013   return menubar->priv->child_pack_direction;
1014 }
1015
1016 /**
1017  * gtk_menu_bar_set_child_pack_direction:
1018  * @menubar: a #GtkMenuBar
1019  * @child_pack_dir: a new #GtkPackDirection
1020  * 
1021  * Sets how widgets should be packed inside the children of a menubar.
1022  * 
1023  * Since: 2.8
1024  */
1025 void
1026 gtk_menu_bar_set_child_pack_direction (GtkMenuBar       *menubar,
1027                                        GtkPackDirection  child_pack_dir)
1028 {
1029   GtkMenuBarPrivate *priv;
1030   GList *l;
1031
1032   g_return_if_fail (GTK_IS_MENU_BAR (menubar));
1033
1034   priv = menubar->priv;
1035
1036   if (priv->child_pack_direction != child_pack_dir)
1037     {
1038       priv->child_pack_direction = child_pack_dir;
1039
1040       gtk_widget_queue_resize (GTK_WIDGET (menubar));
1041
1042       for (l = GTK_MENU_SHELL (menubar)->priv->children; l; l = l->next)
1043         gtk_widget_queue_resize (GTK_WIDGET (l->data));
1044
1045       g_object_notify (G_OBJECT (menubar), "child-pack-direction");
1046     }
1047 }