dd6d8e2b56730388f6a660a651f196c1f9f7f165
[claws.git] / src / gtk / gtkcmoptionmenu.c
1 /* GTK - The GIMP Toolkit
2  * Copyright (C) 1995-1997 Peter Mattis, Spencer Kimball and Jsh 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 <glib.h>
29 #include <gtk/gtk.h>
30 #include <gdk/gdkkeysyms.h>
31
32 #include "claws-marshal.h"
33 #include "gtkcmoptionmenu.h"
34 #include "utils.h"
35 #include "gtkutils.h"
36
37 #define CHILD_LEFT_SPACING        4
38 #define CHILD_RIGHT_SPACING       1
39 #define CHILD_TOP_SPACING         1
40 #define CHILD_BOTTOM_SPACING      1
41
42 typedef struct _GtkCMOptionMenuProps GtkCMOptionMenuProps;
43
44 struct _GtkCMOptionMenuProps
45 {
46   gboolean interior_focus;
47   GtkRequisition indicator_size;
48   GtkBorder indicator_spacing;
49   gint focus_width;
50   gint focus_pad;
51 };
52
53 static const GtkCMOptionMenuProps default_props = {
54   TRUE,
55   { 7, 13 },
56   { 7, 5, 2, 2 },               /* Left, right, top, bottom */
57   1,
58   0
59 };
60
61 static void gtk_cmoption_menu_destroy         (GtkObject          *object);
62 static void gtk_cmoption_menu_set_property    (GObject            *object,
63                                              guint               prop_id,
64                                              const GValue       *value,
65                                              GParamSpec         *pspec);
66 static void gtk_cmoption_menu_get_property    (GObject            *object,
67                                              guint               prop_id,
68                                              GValue             *value,
69                                              GParamSpec         *pspec);
70 static void gtk_cmoption_menu_size_request    (GtkWidget          *widget,
71                                              GtkRequisition     *requisition);
72 static void gtk_cmoption_menu_size_allocate   (GtkWidget          *widget,
73                                              GtkAllocation      *allocation);
74 static void gtk_cmoption_menu_paint           (GtkWidget          *widget,
75                                              GdkRectangle       *area);
76 static gint gtk_cmoption_menu_expose          (GtkWidget          *widget,
77                                              GdkEventExpose     *event);
78 static gint gtk_cmoption_menu_button_press    (GtkWidget          *widget,
79                                              GdkEventButton     *event);
80 static gint gtk_cmoption_menu_key_press     (GtkWidget          *widget,
81                                              GdkEventKey        *event);
82 static void gtk_cmoption_menu_selection_done  (GtkMenuShell       *menu_shell,
83                                              GtkCMOptionMenu      *option_menu);
84 static void gtk_cmoption_menu_update_contents (GtkCMOptionMenu      *option_menu);
85 static void gtk_cmoption_menu_remove_contents (GtkCMOptionMenu      *option_menu);
86 static void gtk_cmoption_menu_calc_size       (GtkCMOptionMenu      *option_menu);
87 static void gtk_cmoption_menu_position        (GtkMenu            *menu,
88                                              gint               *x,
89                                              gint               *y,
90                                              gint               *scroll_offet,
91                                              gpointer            user_data);
92 static void gtk_cmoption_menu_show_all        (GtkWidget          *widget);
93 static void gtk_cmoption_menu_hide_all        (GtkWidget          *widget);
94 static gboolean gtk_cmoption_menu_mnemonic_activate (GtkWidget    *widget,
95                                                    gboolean      group_cycling);
96 static GType gtk_cmoption_menu_child_type   (GtkContainer       *container);
97 static gint gtk_cmoption_menu_scroll_event    (GtkWidget          *widget,
98                                              GdkEventScroll     *event);
99
100 enum
101 {
102   CHANGED,
103   LAST_SIGNAL
104 };
105
106 enum
107 {
108   PROP_0,
109   PROP_MENU,
110   LAST_PROP
111 };
112
113 static guint signals[LAST_SIGNAL] = { 0 };
114
115 G_DEFINE_TYPE (GtkCMOptionMenu, gtk_cmoption_menu, GTK_TYPE_BUTTON)
116
117 static void
118 gtk_cmoption_menu_class_init (GtkCMOptionMenuClass *class)
119 {
120   GObjectClass *gobject_class;
121   GtkObjectClass *object_class;
122   GtkWidgetClass *widget_class;
123   GtkContainerClass *container_class;
124
125   gobject_class = (GObjectClass*) class;
126   object_class = (GtkObjectClass*) class;
127   widget_class = (GtkWidgetClass*) class;
128   container_class = (GtkContainerClass*) class;
129
130   signals[CHANGED] =
131     g_signal_new (("changed"),
132                   G_OBJECT_CLASS_TYPE (class),
133                   G_SIGNAL_RUN_LAST,
134                   G_STRUCT_OFFSET (GtkCMOptionMenuClass, changed),
135                   NULL, NULL,
136                   claws_marshal_VOID__VOID,
137                   G_TYPE_NONE, 0);
138
139   gobject_class->set_property = gtk_cmoption_menu_set_property;
140   gobject_class->get_property = gtk_cmoption_menu_get_property;
141   object_class->destroy = gtk_cmoption_menu_destroy;
142   
143   widget_class->size_request = gtk_cmoption_menu_size_request;
144   widget_class->size_allocate = gtk_cmoption_menu_size_allocate;
145   widget_class->expose_event = gtk_cmoption_menu_expose;
146   widget_class->button_press_event = gtk_cmoption_menu_button_press;
147   widget_class->key_press_event = gtk_cmoption_menu_key_press;
148   widget_class->scroll_event = gtk_cmoption_menu_scroll_event;
149   widget_class->show_all = gtk_cmoption_menu_show_all;
150   widget_class->hide_all = gtk_cmoption_menu_hide_all;
151   widget_class->mnemonic_activate = gtk_cmoption_menu_mnemonic_activate;
152
153   container_class->child_type = gtk_cmoption_menu_child_type;
154
155   g_object_class_install_property (gobject_class,
156                                    PROP_MENU,
157                                    g_param_spec_object ("menu",
158                                                         ("Menu"),
159                                                         ("The menu of options"),
160                                                         GTK_TYPE_MENU,
161                                                         G_PARAM_READWRITE));
162   
163   gtk_widget_class_install_style_property (widget_class,
164                                            g_param_spec_boxed ("indicator-size",
165                                                                ("Indicator Size"),
166                                                                ("Size of dropdown indicator"),
167                                                                GTK_TYPE_REQUISITION,
168                                                                G_PARAM_READABLE));
169   gtk_widget_class_install_style_property (widget_class,
170                                            g_param_spec_boxed ("indicator-spacing",
171                                                                ("Indicator Spacing"),
172                                                                ("Spacing around indicator"),
173                                                                GTK_TYPE_BORDER,
174                                                                G_PARAM_READABLE));
175 }
176
177 static GType
178 gtk_cmoption_menu_child_type (GtkContainer       *container)
179 {
180   return G_TYPE_NONE;
181 }
182
183 static void
184 gtk_cmoption_menu_init (GtkCMOptionMenu *option_menu)
185 {
186   gtkut_widget_set_can_focus (GTK_WIDGET(option_menu), TRUE);
187   gtkut_widget_set_can_default (GTK_WIDGET(option_menu), FALSE);
188   gtkut_widget_set_receives_default (GTK_WIDGET(option_menu), FALSE);
189
190   option_menu->menu = NULL;
191   option_menu->menu_item = NULL;
192   option_menu->width = 0;
193   option_menu->height = 0;
194 }
195
196 GtkWidget*
197 gtk_cmoption_menu_new (void)
198 {
199   return g_object_new (GTK_TYPE_CMOPTION_MENU, NULL);
200 }
201
202 GtkWidget*
203 gtk_cmoption_menu_get_menu (GtkCMOptionMenu *option_menu)
204 {
205   cm_return_val_if_fail (GTK_IS_CMOPTION_MENU (option_menu), NULL);
206
207   return option_menu->menu;
208 }
209
210 static void
211 gtk_cmoption_menu_detacher (GtkWidget     *widget,
212                           GtkMenu       *menu)
213 {
214   GtkCMOptionMenu *option_menu;
215
216   cm_return_if_fail (GTK_IS_CMOPTION_MENU (widget));
217
218   option_menu = GTK_CMOPTION_MENU (widget);
219   cm_return_if_fail (option_menu->menu == (GtkWidget*) menu);
220
221   gtk_cmoption_menu_remove_contents (option_menu);
222   g_signal_handlers_disconnect_by_func (option_menu->menu,
223                                         gtk_cmoption_menu_selection_done,
224                                         option_menu);
225   g_signal_handlers_disconnect_by_func (option_menu->menu,
226                                         gtk_cmoption_menu_calc_size,
227                                         option_menu);
228   
229   option_menu->menu = NULL;
230   g_object_notify (G_OBJECT (option_menu), "menu");
231 }
232
233 void
234 gtk_cmoption_menu_set_menu (GtkCMOptionMenu *option_menu,
235                           GtkWidget     *menu)
236 {
237   cm_return_if_fail (GTK_IS_CMOPTION_MENU (option_menu));
238   cm_return_if_fail (GTK_IS_MENU (menu));
239
240   if (option_menu->menu != menu)
241     {
242       gtk_cmoption_menu_remove_menu (option_menu);
243
244       option_menu->menu = menu;
245       gtk_menu_attach_to_widget (GTK_MENU (menu),
246                                  GTK_WIDGET (option_menu),
247                                  gtk_cmoption_menu_detacher);
248
249       gtk_cmoption_menu_calc_size (option_menu);
250
251       g_signal_connect_after (option_menu->menu, "selection-done",
252                               G_CALLBACK (gtk_cmoption_menu_selection_done),
253                               option_menu);
254       g_signal_connect_swapped (option_menu->menu, "size_request",
255                                 G_CALLBACK (gtk_cmoption_menu_calc_size),
256                                 option_menu);
257
258       if (GTK_WIDGET (option_menu)->parent)
259         gtk_widget_queue_resize (GTK_WIDGET (option_menu));
260
261       gtk_cmoption_menu_update_contents (option_menu);
262       
263       g_object_notify (G_OBJECT (option_menu), "menu");
264     }
265 }
266
267 void
268 gtk_cmoption_menu_remove_menu (GtkCMOptionMenu *option_menu)
269 {
270   cm_return_if_fail (GTK_IS_CMOPTION_MENU (option_menu));
271
272   if (option_menu->menu)
273     {
274       if (GTK_MENU_SHELL (option_menu->menu)->active)
275         gtk_menu_shell_cancel (GTK_MENU_SHELL (option_menu->menu));
276       
277       gtk_menu_detach (GTK_MENU (option_menu->menu));
278     }
279 }
280
281 void
282 gtk_cmoption_menu_set_history (GtkCMOptionMenu *option_menu,
283                              guint          index)
284 {
285   GtkWidget *menu_item;
286
287   cm_return_if_fail (GTK_IS_CMOPTION_MENU (option_menu));
288
289   if (option_menu->menu)
290     {
291       gtk_menu_set_active (GTK_MENU (option_menu->menu), index);
292       menu_item = gtk_menu_get_active (GTK_MENU (option_menu->menu));
293
294       if (menu_item != option_menu->menu_item)
295         gtk_cmoption_menu_update_contents (option_menu);
296     }
297 }
298
299 /**
300  * gtk_cmoption_menu_get_history:
301  * @option_menu: a #GtkCMOptionMenu
302  * 
303  * Retrieves the index of the currently selected menu item. The menu
304  * items are numbered from top to bottom, starting with 0. 
305  * 
306  * Return value: index of the selected menu item, or -1 if there are no menu items
307  * Deprecated: 2.4: Use #GtkComboBox instead.
308  **/
309 gint
310 gtk_cmoption_menu_get_history (GtkCMOptionMenu *option_menu)
311 {
312   GtkWidget *active_widget;
313   
314   cm_return_val_if_fail (GTK_IS_CMOPTION_MENU (option_menu), -1);
315
316   if (option_menu->menu)
317     {
318       active_widget = gtk_menu_get_active (GTK_MENU (option_menu->menu));
319
320       if (active_widget)
321         return g_list_index (GTK_MENU_SHELL (option_menu->menu)->children,
322                              active_widget);
323       else
324         return -1;
325     }
326   else
327     return -1;
328 }
329
330 static void
331 gtk_cmoption_menu_set_property (GObject            *object,
332                               guint               prop_id,
333                               const GValue       *value,
334                               GParamSpec         *pspec)
335 {
336   GtkCMOptionMenu *option_menu = GTK_CMOPTION_MENU (object);
337
338   switch (prop_id)
339     {
340     case PROP_MENU:
341       gtk_cmoption_menu_set_menu (option_menu, g_value_get_object (value));
342       break;
343       
344     default:
345       G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
346       break;
347     }
348 }
349
350 static void
351 gtk_cmoption_menu_get_property (GObject            *object,
352                               guint               prop_id,
353                               GValue             *value,
354                               GParamSpec         *pspec)
355 {
356   GtkCMOptionMenu *option_menu = GTK_CMOPTION_MENU (object);
357
358   switch (prop_id)
359     {
360     case PROP_MENU:
361       g_value_set_object (value, option_menu->menu);
362       break;
363       
364     default:
365       G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
366       break;
367     }
368 }
369
370 static void
371 gtk_cmoption_menu_destroy (GtkObject *object)
372 {
373   GtkCMOptionMenu *option_menu;
374
375   cm_return_if_fail (GTK_IS_CMOPTION_MENU (object));
376
377   option_menu = GTK_CMOPTION_MENU (object);
378
379   if (option_menu->menu)
380     gtk_widget_destroy (option_menu->menu);
381
382   if (GTK_OBJECT_CLASS (gtk_cmoption_menu_parent_class)->destroy)
383     (* GTK_OBJECT_CLASS (gtk_cmoption_menu_parent_class)->destroy) (object);
384 }
385
386 static void
387 gtk_cmoption_menu_get_props (GtkCMOptionMenu       *option_menu,
388                            GtkCMOptionMenuProps  *props)
389 {
390   GtkRequisition *indicator_size;
391   GtkBorder *indicator_spacing;
392   
393   gtk_widget_style_get (GTK_WIDGET (option_menu),
394                         "indicator-size", &indicator_size,
395                         "indicator-spacing", &indicator_spacing,
396                         "interior-focus", &props->interior_focus,
397                         "focus-line-width", &props->focus_width,
398                         "focus-padding", &props->focus_pad,
399                         NULL);
400
401   if (indicator_size)
402     props->indicator_size = *indicator_size;
403   else
404     props->indicator_size = default_props.indicator_size;
405
406   if (indicator_spacing)
407     props->indicator_spacing = *indicator_spacing;
408   else
409     props->indicator_spacing = default_props.indicator_spacing;
410
411   gtk_requisition_free (indicator_size);
412   gtk_border_free (indicator_spacing);
413 }
414
415 static void
416 gtk_cmoption_menu_size_request (GtkWidget      *widget,
417                               GtkRequisition *requisition)
418 {
419   GtkCMOptionMenu *option_menu = GTK_CMOPTION_MENU (widget);
420   GtkCMOptionMenuProps props;
421   gint tmp;
422   GtkRequisition child_requisition = { 0, 0 };
423       
424   gtk_cmoption_menu_get_props (option_menu, &props);
425  
426   if (GTK_BIN (option_menu)->child && gtkut_widget_get_visible (GTK_BIN (option_menu)->child))
427     {
428       gtk_widget_size_request (GTK_BIN (option_menu)->child, &child_requisition);
429
430       requisition->width += child_requisition.width;
431       requisition->height += child_requisition.height;
432     }
433   
434   requisition->width = ((GTK_CONTAINER (widget)->border_width +
435                          GTK_WIDGET (widget)->style->xthickness + props.focus_pad) * 2 +
436                         MAX (child_requisition.width, option_menu->width) +
437                         props.indicator_size.width +
438                         props.indicator_spacing.left + props.indicator_spacing.right +
439                         CHILD_LEFT_SPACING + CHILD_RIGHT_SPACING + props.focus_width * 2);
440   requisition->height = ((GTK_CONTAINER (widget)->border_width +
441                           GTK_WIDGET (widget)->style->ythickness + props.focus_pad) * 2 +
442                          MAX (child_requisition.height, option_menu->height) +
443                          CHILD_TOP_SPACING + CHILD_BOTTOM_SPACING + props.focus_width * 2);
444
445   tmp = (requisition->height - MAX (child_requisition.height, option_menu->height) +
446          props.indicator_size.height + props.indicator_spacing.top + props.indicator_spacing.bottom);
447   requisition->height = MAX (requisition->height, tmp);
448 }
449
450 static void
451 gtk_cmoption_menu_size_allocate (GtkWidget     *widget,
452                                GtkAllocation *allocation)
453 {
454   GtkWidget *child;
455   GtkButton *button = GTK_BUTTON (widget);
456   GtkAllocation child_allocation;
457   GtkCMOptionMenuProps props;
458   gint border_width;
459     
460   gtk_cmoption_menu_get_props (GTK_CMOPTION_MENU (widget), &props);
461   border_width = GTK_CONTAINER (widget)->border_width;
462
463   widget->allocation = *allocation;
464   if (gtkut_widget_get_realized (widget))
465     gdk_window_move_resize (button->event_window,
466                             allocation->x + border_width, allocation->y + border_width,
467                             allocation->width - border_width * 2, allocation->height - border_width * 2);
468
469   child = GTK_BIN (widget)->child;
470   if (child && gtkut_widget_get_visible (child))
471     {
472       gint xthickness = GTK_WIDGET (widget)->style->xthickness;
473       gint ythickness = GTK_WIDGET (widget)->style->ythickness;
474       
475       child_allocation.x = widget->allocation.x + border_width + xthickness + props.focus_width + props.focus_pad + CHILD_LEFT_SPACING;
476       child_allocation.y = widget->allocation.y + border_width + ythickness + props.focus_width + props.focus_pad + CHILD_TOP_SPACING;
477       child_allocation.width = MAX (1, allocation->width - (border_width + xthickness + props.focus_width + props.focus_pad) * 2 -
478                                     props.indicator_size.width - props.indicator_spacing.left - props.indicator_spacing.right -
479                                     CHILD_LEFT_SPACING - CHILD_RIGHT_SPACING);
480       child_allocation.height = MAX (1, allocation->height - (border_width + ythickness + props.focus_width + props.focus_pad) * 2 -
481                                      CHILD_TOP_SPACING - CHILD_BOTTOM_SPACING);
482
483       if (gtk_widget_get_direction (GTK_WIDGET (widget)) == GTK_TEXT_DIR_RTL) 
484         child_allocation.x += props.indicator_size.width + props.indicator_spacing.left + props.indicator_spacing.right;
485
486       gtk_widget_size_allocate (child, &child_allocation);
487     }
488 }
489
490 static void
491 gtk_cmoption_menu_paint (GtkWidget    *widget,
492                        GdkRectangle *area)
493 {
494   GdkRectangle button_area;
495   GtkCMOptionMenuProps props;
496   gint border_width;
497   gint tab_x;
498
499   cm_return_if_fail (GTK_IS_CMOPTION_MENU (widget));
500   cm_return_if_fail (area != NULL);
501
502   if (gtkut_widget_is_drawable (widget))
503     {
504       border_width = GTK_CONTAINER (widget)->border_width;
505       gtk_cmoption_menu_get_props (GTK_CMOPTION_MENU (widget), &props);
506
507       button_area.x = widget->allocation.x + border_width;
508       button_area.y = widget->allocation.y + border_width;
509       button_area.width = widget->allocation.width - 2 * border_width;
510       button_area.height = widget->allocation.height - 2 * border_width;
511
512       if (!props.interior_focus && gtkut_widget_has_focus (widget))
513         {
514           button_area.x += props.focus_width + props.focus_pad;
515           button_area.y += props.focus_width + props.focus_pad;
516           button_area.width -= 2 * (props.focus_width + props.focus_pad);
517           button_area.height -= 2 * (props.focus_width + props.focus_pad);
518         }
519       
520       gtk_paint_box (widget->style, widget->window,
521                      gtkut_widget_get_state (widget), GTK_SHADOW_OUT,
522                      area, widget, "optionmenu",
523                      button_area.x, button_area.y,
524                      button_area.width, button_area.height);
525       
526       if (gtk_widget_get_direction (GTK_WIDGET (widget)) == GTK_TEXT_DIR_RTL) 
527         tab_x = button_area.x + props.indicator_spacing.right + 
528           widget->style->xthickness;
529       else
530         tab_x = button_area.x + button_area.width - 
531           props.indicator_size.width - props.indicator_spacing.right -
532           widget->style->xthickness;
533
534       gtk_paint_tab (widget->style, widget->window,
535                      gtkut_widget_get_state (widget), GTK_SHADOW_OUT,
536                      area, widget, "optionmenutab",
537                      tab_x,
538                      button_area.y + (button_area.height - props.indicator_size.height) / 2,
539                      props.indicator_size.width, props.indicator_size.height);
540       
541       if (gtkut_widget_has_focus (widget))
542         {
543           if (props.interior_focus)
544             {
545               button_area.x += widget->style->xthickness + props.focus_pad;
546               button_area.y += widget->style->ythickness + props.focus_pad;
547               button_area.width -= 2 * (widget->style->xthickness + props.focus_pad) +
548                       props.indicator_spacing.left +
549                       props.indicator_spacing.right +
550                       props.indicator_size.width;
551               button_area.height -= 2 * (widget->style->ythickness + props.focus_pad);
552               if (gtk_widget_get_direction (GTK_WIDGET (widget)) == GTK_TEXT_DIR_RTL) 
553                 button_area.x += props.indicator_spacing.left +
554                   props.indicator_spacing.right +
555                   props.indicator_size.width;
556             }
557           else
558             {
559               button_area.x -= props.focus_width + props.focus_pad;
560               button_area.y -= props.focus_width + props.focus_pad;
561               button_area.width += 2 * (props.focus_width + props.focus_pad);
562               button_area.height += 2 * (props.focus_width + props.focus_pad);
563             }
564             
565           gtk_paint_focus (widget->style, widget->window, gtkut_widget_get_state (widget),
566                            area, widget, "button",
567                            button_area.x, 
568                            button_area.y, 
569                            button_area.width,
570                            button_area.height);
571         }
572     }
573 }
574
575 static gint
576 gtk_cmoption_menu_expose (GtkWidget      *widget,
577                         GdkEventExpose *event)
578 {
579   cm_return_val_if_fail (GTK_IS_CMOPTION_MENU (widget), FALSE);
580   cm_return_val_if_fail (event != NULL, FALSE);
581
582   if (gtkut_widget_is_drawable (widget))
583     {
584       gtk_cmoption_menu_paint (widget, &event->area);
585
586
587       /* The following code tries to draw the child in two places at
588        * once. It fails miserably for several reasons
589        *
590        * - If the child is not no-window, removing generates
591        *   more expose events. Bad, bad, bad.
592        * 
593        * - Even if the child is no-window, removing it now (properly)
594        *   clears the space where it was, so it does no good
595        */
596       
597 #if 0
598       remove_child = FALSE;
599       child = GTK_BUTTON (widget)->child;
600
601       if (!child)
602         {
603           if (!GTK_CMOPTION_MENU (widget)->menu)
604             return FALSE;
605           gtk_cmoption_menu_update_contents (GTK_CMOPTION_MENU (widget));
606           child = GTK_BUTTON (widget)->child;
607           if (!child)
608             return FALSE;
609           remove_child = TRUE;
610         }
611
612       child_event = *event;
613
614       if (GTK_WIDGET_NO_WINDOW (child) &&
615           gtk_widget_intersect (child, &event->area, &child_event.area))
616         gtk_widget_event (child, (GdkEvent*) &child_event);
617
618       if (remove_child)
619         gtk_cmoption_menu_remove_contents (GTK_CMOPTION_MENU (widget));
620 #else
621       if (GTK_BIN (widget)->child)
622         gtk_container_propagate_expose (GTK_CONTAINER (widget),
623                                         GTK_BIN (widget)->child,
624                                         event);
625 #endif /* 0 */
626     }
627
628   return FALSE;
629 }
630
631 static gint
632 gtk_cmoption_menu_button_press (GtkWidget      *widget,
633                               GdkEventButton *event)
634 {
635   GtkCMOptionMenu *option_menu;
636   GtkWidget *menu_item;
637
638   cm_return_val_if_fail (GTK_IS_CMOPTION_MENU (widget), FALSE);
639   cm_return_val_if_fail (event != NULL, FALSE);
640
641   option_menu = GTK_CMOPTION_MENU (widget);
642
643   if ((event->type == GDK_BUTTON_PRESS) &&
644       (event->button == 1))
645     {
646       gtk_cmoption_menu_remove_contents (option_menu);
647       gtk_menu_popup (GTK_MENU (option_menu->menu), NULL, NULL,
648                       gtk_cmoption_menu_position, option_menu,
649                       event->button, event->time);
650       menu_item = gtk_menu_get_active (GTK_MENU (option_menu->menu));
651       if (menu_item)
652         gtk_menu_shell_select_item (GTK_MENU_SHELL (option_menu->menu), menu_item);
653       return TRUE;
654     }
655
656   return FALSE;
657 }
658
659 static gint
660 gtk_cmoption_menu_key_press (GtkWidget   *widget,
661                            GdkEventKey *event)
662 {
663   GtkCMOptionMenu *option_menu;
664   GtkWidget *menu_item;
665
666   cm_return_val_if_fail (GTK_IS_CMOPTION_MENU (widget), FALSE);
667   cm_return_val_if_fail (event != NULL, FALSE);
668
669   option_menu = GTK_CMOPTION_MENU (widget);
670
671   switch (event->keyval)
672     {
673     case GDK_KP_Space:
674     case GDK_space:
675       gtk_cmoption_menu_remove_contents (option_menu);
676       gtk_menu_popup (GTK_MENU (option_menu->menu), NULL, NULL,
677                       gtk_cmoption_menu_position, option_menu,
678                       0, event->time);
679       menu_item = gtk_menu_get_active (GTK_MENU (option_menu->menu));
680       if (menu_item)
681         gtk_menu_shell_select_item (GTK_MENU_SHELL (option_menu->menu), menu_item);
682       return TRUE;
683     }
684   
685   return FALSE;
686 }
687
688 static void
689 gtk_cmoption_menu_selection_done (GtkMenuShell  *menu_shell,
690                                 GtkCMOptionMenu *option_menu)
691 {
692   cm_return_if_fail (menu_shell != NULL);
693   cm_return_if_fail (GTK_IS_CMOPTION_MENU (option_menu));
694
695   gtk_cmoption_menu_update_contents (option_menu);
696 }
697
698 static void
699 gtk_cmoption_menu_changed (GtkCMOptionMenu *option_menu)
700 {
701   cm_return_if_fail (GTK_IS_CMOPTION_MENU (option_menu));
702
703   g_signal_emit (option_menu, signals[CHANGED], 0);
704 }
705
706 static void
707 gtk_cmoption_menu_select_first_sensitive (GtkCMOptionMenu *option_menu)
708 {
709   if (option_menu->menu)
710     {
711       GList *children = GTK_MENU_SHELL (option_menu->menu)->children;
712       gint index = 0;
713
714       while (children)
715         {
716           if (gtkut_widget_get_sensitive (children->data))
717             {
718               gtk_cmoption_menu_set_history (option_menu, index);
719               return;
720             }
721           
722           children = children->next;
723           index++;
724         }
725     }
726 }
727
728 static void
729 gtk_cmoption_menu_item_state_changed_cb (GtkWidget      *widget,
730                                        GtkStateType    previous_state,
731                                        GtkCMOptionMenu  *option_menu)
732 {
733   GtkWidget *child = GTK_BIN (option_menu)->child;
734
735   if (child && gtkut_widget_get_sensitive (child) != gtkut_widget_is_sensitive (widget))
736     gtk_widget_set_sensitive (child, gtkut_widget_is_sensitive (widget));
737 }
738
739 static void
740 gtk_cmoption_menu_item_destroy_cb (GtkWidget     *widget,
741                                  GtkCMOptionMenu *option_menu)
742 {
743   GtkWidget *child = GTK_BIN (option_menu)->child;
744
745   if (child)
746     {
747       g_object_ref (child);
748       gtk_cmoption_menu_remove_contents (option_menu);
749       gtk_widget_destroy (child);
750       g_object_unref (child);
751
752       gtk_cmoption_menu_select_first_sensitive (option_menu);
753     }
754 }
755
756 static void
757 gtk_cmoption_menu_update_contents (GtkCMOptionMenu *option_menu)
758 {
759   GtkWidget *child;
760   GtkRequisition child_requisition;
761
762   cm_return_if_fail (GTK_IS_CMOPTION_MENU (option_menu));
763
764   if (option_menu->menu)
765     {
766       GtkWidget *old_item = option_menu->menu_item;
767       
768       gtk_cmoption_menu_remove_contents (option_menu);
769
770       option_menu->menu_item = gtk_menu_get_active (GTK_MENU (option_menu->menu));
771       if (option_menu->menu_item)
772         {
773           g_object_ref (option_menu->menu_item);
774           child = GTK_BIN (option_menu->menu_item)->child;
775           if (child)
776             {
777               if (!gtkut_widget_is_sensitive (option_menu->menu_item))
778                 gtk_widget_set_sensitive (child, FALSE);
779               gtk_widget_reparent (child, GTK_WIDGET (option_menu));
780             }
781
782           g_signal_connect (option_menu->menu_item, "state_changed",
783                             G_CALLBACK (gtk_cmoption_menu_item_state_changed_cb), option_menu);
784           g_signal_connect (option_menu->menu_item, "destroy",
785                             G_CALLBACK (gtk_cmoption_menu_item_destroy_cb), option_menu);
786
787           gtk_widget_size_request (child, &child_requisition);
788           gtk_widget_size_allocate (GTK_WIDGET (option_menu),
789                                     &(GTK_WIDGET (option_menu)->allocation));
790
791           if (gtkut_widget_is_drawable (GTK_WIDGET(option_menu)))
792             gtk_widget_queue_draw (GTK_WIDGET (option_menu));
793         }
794
795       if (old_item != option_menu->menu_item)
796         gtk_cmoption_menu_changed (option_menu);
797     }
798 }
799
800 static void
801 gtk_cmoption_menu_remove_contents (GtkCMOptionMenu *option_menu)
802 {
803   GtkWidget *child;
804   
805   cm_return_if_fail (GTK_IS_CMOPTION_MENU (option_menu));
806
807   if (option_menu->menu_item)
808     {
809       child = GTK_BIN (option_menu)->child;
810   
811       if (child)
812         {
813           gtk_widget_set_sensitive (child, TRUE);
814           gtk_widget_set_state (child, GTK_STATE_NORMAL);
815           gtk_widget_reparent (child, option_menu->menu_item);
816         }
817
818       g_signal_handlers_disconnect_by_func (option_menu->menu_item,
819                                             gtk_cmoption_menu_item_state_changed_cb,
820                                             option_menu);                                    
821       g_signal_handlers_disconnect_by_func (option_menu->menu_item,
822                                             gtk_cmoption_menu_item_destroy_cb,
823                                             option_menu);   
824       
825       g_object_unref (option_menu->menu_item);
826       option_menu->menu_item = NULL;
827     }
828 }
829
830 static void
831 gtk_cmoption_menu_calc_size (GtkCMOptionMenu *option_menu)
832 {
833   GtkWidget *child;
834   GList *children;
835   GtkRequisition child_requisition;
836   gint old_width = option_menu->width;
837   gint old_height = option_menu->height;
838
839   cm_return_if_fail (GTK_IS_CMOPTION_MENU (option_menu));
840
841   option_menu->width = 0;
842   option_menu->height = 0;
843
844   if (option_menu->menu)
845     {
846       children = GTK_MENU_SHELL (option_menu->menu)->children;
847       while (children)
848         {
849           child = children->data;
850           children = children->next;
851
852           if (gtkut_widget_get_visible (child))
853             {
854               GtkWidget *inner = GTK_BIN (child)->child;
855
856               if (inner)
857                 {
858                   gtk_widget_size_request (inner, &child_requisition);
859
860                   option_menu->width = MAX (option_menu->width, child_requisition.width);
861                   option_menu->height = MAX (option_menu->height, child_requisition.height);
862                 }
863             }
864         }
865     }
866
867   if (old_width != option_menu->width || old_height != option_menu->height)
868     gtk_widget_queue_resize (GTK_WIDGET (option_menu));
869 }
870
871 static void
872 gtk_cmoption_menu_position (GtkMenu  *menu,
873                           gint     *x,
874                           gint     *y,
875                           gboolean *push_in,
876                           gpointer  user_data)
877 {
878   GtkCMOptionMenu *option_menu;
879   GtkWidget *active;
880   GtkWidget *child;
881   GtkWidget *widget;
882   GtkRequisition requisition;
883   GList *children;
884   gint screen_width;
885   gint menu_xpos;
886   gint menu_ypos;
887   gint menu_width;
888
889   cm_return_if_fail (GTK_IS_CMOPTION_MENU (user_data));
890
891   option_menu = GTK_CMOPTION_MENU (user_data);
892   widget = GTK_WIDGET (option_menu);
893
894   gtk_widget_get_child_requisition (GTK_WIDGET (menu), &requisition);
895   menu_width = requisition.width;
896
897   active = gtk_menu_get_active (GTK_MENU (option_menu->menu));
898   gdk_window_get_origin (widget->window, &menu_xpos, &menu_ypos);
899
900   menu_xpos += widget->allocation.x;
901   menu_ypos += widget->allocation.y + widget->allocation.height / 2 - 2;
902
903   if (active != NULL)
904     {
905       gtk_widget_get_child_requisition (active, &requisition);
906       menu_ypos -= requisition.height / 2;
907     }
908
909   children = GTK_MENU_SHELL (option_menu->menu)->children;
910   while (children)
911     {
912       child = children->data;
913
914       if (active == child)
915         break;
916
917       if (gtkut_widget_get_visible (child))
918         {
919           gtk_widget_get_child_requisition (child, &requisition);
920           menu_ypos -= requisition.height;
921         }
922
923       children = children->next;
924     }
925
926   if (gtk_widget_get_direction (widget) == GTK_TEXT_DIR_RTL)
927     menu_xpos = menu_xpos + widget->allocation.width - menu_width;
928
929   /* Clamp the position on screen */
930   screen_width = gdk_screen_get_width (gtk_widget_get_screen (widget));
931   
932   if (menu_xpos < 0)
933     menu_xpos = 0;
934   else if ((menu_xpos + menu_width) > screen_width)
935     menu_xpos -= ((menu_xpos + menu_width) - screen_width);
936
937   *x = menu_xpos;
938   *y = menu_ypos;
939   *push_in = TRUE;
940 }
941
942
943 static void
944 gtk_cmoption_menu_show_all (GtkWidget *widget)
945 {
946   GtkContainer *container;
947   GtkCMOptionMenu *option_menu;
948   
949   cm_return_if_fail (GTK_IS_CMOPTION_MENU (widget));
950   container = GTK_CONTAINER (widget);
951   option_menu = GTK_CMOPTION_MENU (widget);
952
953   gtk_widget_show (widget);
954   gtk_container_foreach (container, (GtkCallback) gtk_widget_show_all, NULL);
955   if (option_menu->menu)
956     gtk_widget_show_all (option_menu->menu);
957   if (option_menu->menu_item)
958     gtk_widget_show_all (option_menu->menu_item);
959 }
960
961
962 static void
963 gtk_cmoption_menu_hide_all (GtkWidget *widget)
964 {
965   GtkContainer *container;
966
967   cm_return_if_fail (GTK_IS_CMOPTION_MENU (widget));
968   container = GTK_CONTAINER (widget);
969
970   gtk_widget_hide (widget);
971   gtk_container_foreach (container, (GtkCallback) gtk_widget_hide_all, NULL);
972 }
973
974 static gboolean
975 gtk_cmoption_menu_mnemonic_activate (GtkWidget *widget,
976                                    gboolean   group_cycling)
977 {
978   gtk_widget_grab_focus (widget);
979   return TRUE;
980 }
981
982 static gint
983 gtk_cmoption_menu_scroll_event (GtkWidget          *widget,
984                               GdkEventScroll     *event)
985 {
986   GtkCMOptionMenu *option_menu = GTK_CMOPTION_MENU (widget);
987   gint index;
988   gint n_children;
989   gint index_dir;
990   GList *l;
991   GtkMenuItem *item;
992     
993   index = gtk_cmoption_menu_get_history (option_menu);
994
995   if (index != -1)
996     {
997       n_children = g_list_length (GTK_MENU_SHELL (option_menu->menu)->children);
998       
999       if (event->direction == GDK_SCROLL_UP)
1000         index_dir = -1;
1001       else
1002         index_dir = 1;
1003
1004
1005       while (TRUE)
1006         {
1007           index += index_dir;
1008
1009           if (index < 0)
1010             break;
1011           if (index >= n_children)
1012             break;
1013
1014           l = g_list_nth (GTK_MENU_SHELL (option_menu->menu)->children, index);
1015           item = GTK_MENU_ITEM (l->data);
1016           if (gtkut_widget_get_visible (GTK_WIDGET(item)) && 
1017               gtkut_widget_is_sensitive (GTK_WIDGET(item)))
1018             {
1019               gtk_cmoption_menu_set_history (option_menu, index);
1020               gtk_menu_item_activate (GTK_MENU_ITEM (item));
1021               break;
1022             }
1023               
1024         }
1025     }
1026
1027   return TRUE;
1028 }
1029