]> Pileus Git - ~andy/gtk/blob - modules/other/gail/gailradiosubmenuitem.c
9360f8f41870da058d2e789cd40ea6eaec3f82ef
[~andy/gtk] / modules / other / gail / gailradiosubmenuitem.c
1 /* GAIL - The GNOME Accessibility Implementation Library
2  * Copyright 2002 Sun Microsystems Inc.
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 #include "config.h"
21
22 #include <gtk/gtk.h>
23 #include "gailradiosubmenuitem.h"
24
25 static void      gail_radio_sub_menu_item_class_init        (GailRadioSubMenuItemClass *klass);
26 static void      gail_radio_sub_menu_item_init              (GailRadioSubMenuItem      *radio_menu_item);
27
28 static AtkRelationSet* gail_radio_sub_menu_item_ref_relation_set (AtkObject       *obj);
29
30 G_DEFINE_TYPE (GailRadioSubMenuItem, gail_radio_sub_menu_item, GAIL_TYPE_CHECK_SUB_MENU_ITEM)
31
32 static void
33 gail_radio_sub_menu_item_class_init (GailRadioSubMenuItemClass *klass)
34 {
35   AtkObjectClass *class = ATK_OBJECT_CLASS (klass);
36
37   class->ref_relation_set = gail_radio_sub_menu_item_ref_relation_set;
38 }
39
40 AtkObject* 
41 gail_radio_sub_menu_item_new (GtkWidget *widget)
42 {
43   GObject *object;
44   AtkObject *accessible;
45
46   g_return_val_if_fail (GTK_IS_RADIO_MENU_ITEM (widget), NULL);
47
48   object = g_object_new (GAIL_TYPE_RADIO_SUB_MENU_ITEM, NULL);
49
50   accessible = ATK_OBJECT (object);
51   atk_object_initialize (accessible, widget);
52
53   accessible->role = ATK_ROLE_RADIO_MENU_ITEM;
54   return accessible;
55 }
56
57 static void
58 gail_radio_sub_menu_item_init (GailRadioSubMenuItem *radio_menu_item)
59 {
60   radio_menu_item->old_group = NULL;
61 }
62
63 AtkRelationSet*
64 gail_radio_sub_menu_item_ref_relation_set (AtkObject *obj)
65 {
66   GtkWidget *widget;
67   AtkRelationSet *relation_set;
68   GSList *list;
69   GailRadioSubMenuItem *radio_menu_item;
70
71   g_return_val_if_fail (GAIL_IS_RADIO_SUB_MENU_ITEM (obj), NULL);
72
73   widget = gtk_accessible_get_widget (GTK_ACCESSIBLE (obj));
74   if (widget == NULL)
75   {
76     /*
77      * State is defunct
78      */
79     return NULL;
80   }
81   radio_menu_item = GAIL_RADIO_SUB_MENU_ITEM (obj);
82
83   relation_set = ATK_OBJECT_CLASS (gail_radio_sub_menu_item_parent_class)->ref_relation_set (obj);
84
85   /*
86    * If the radio menu_item'group has changed remove the relation
87    */
88   list = gtk_radio_menu_item_get_group (GTK_RADIO_MENU_ITEM (widget));
89   
90   if (radio_menu_item->old_group != list)
91     {
92       AtkRelation *relation;
93
94       relation = atk_relation_set_get_relation_by_type (relation_set, ATK_RELATION_MEMBER_OF);
95       atk_relation_set_remove (relation_set, relation);
96     }
97
98   if (!atk_relation_set_contains (relation_set, ATK_RELATION_MEMBER_OF))
99   {
100     /*
101      * Get the members of the menu_item group
102      */
103
104     radio_menu_item->old_group = list;
105     if (list)
106     {
107       AtkObject **accessible_array;
108       guint list_length;
109       AtkRelation* relation;
110       gint i = 0;
111
112       list_length = g_slist_length (list);
113       accessible_array = (AtkObject**) g_malloc (sizeof (AtkObject *) * 
114                           list_length);
115       while (list != NULL)
116       {
117         GtkWidget* list_item = list->data;
118
119         accessible_array[i++] = gtk_widget_get_accessible (list_item);
120
121         list = list->next;
122       }
123       relation = atk_relation_new (accessible_array, list_length,
124                                    ATK_RELATION_MEMBER_OF);
125       g_free (accessible_array);
126
127       atk_relation_set_add (relation_set, relation);
128       /*
129        * Unref the relation so that it is not leaked.
130        */
131       g_object_unref (relation);
132     }
133   }
134   return relation_set;
135 }