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