Revved to 1.7.4; Fixes for cspi event handlers for EventDetails.
[platform/core/uifw/at-spi2-atk.git] / libspi / relation.c
1 /*
2  * AT-SPI - Assistive Technology Service Provider Interface
3  * (Gnome Accessibility Project; http://developer.gnome.org/projects/gap)
4  *
5  * Copyright 2001, 2002 Sun Microsystems Inc.,
6  * Copyright 2001, 2002 Ximian, Inc.
7  *
8  * This library is free software; you can redistribute it and/or
9  * modify it under the terms of the GNU Library General Public
10  * License as published by the Free Software Foundation; either
11  * version 2 of the License, or (at your option) any later version.
12  *
13  * This library is distributed in the hope that it will be useful,
14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
16  * Library General Public License for more details.
17  *
18  * You should have received a copy of the GNU Library General Public
19  * License along with this library; if not, write to the
20  * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
21  * Boston, MA 02111-1307, USA.
22  */
23
24 /* relation.c : implements the Relation interface */
25
26 #include <config.h>
27 #include <stdio.h>
28 #include <libspi/accessible.h>
29 #include <libspi/relation.h>
30
31
32 static gboolean
33 spi_init_relation_type_table (Accessibility_RelationType *types)
34 {
35   gint i;
36
37   for (i = 0; i < ATK_RELATION_LAST_DEFINED; i++)
38     types[i] = Accessibility_RELATION_NULL;
39
40   types[ATK_RELATION_CONTROLLED_BY] = Accessibility_RELATION_CONTROLLED_BY;
41   types[ATK_RELATION_CONTROLLER_FOR] = Accessibility_RELATION_CONTROLLER_FOR;
42   types[ATK_RELATION_LABEL_FOR] = Accessibility_RELATION_LABEL_FOR;
43   types[ATK_RELATION_LABELLED_BY] = Accessibility_RELATION_LABELLED_BY;
44   types[ATK_RELATION_MEMBER_OF] = Accessibility_RELATION_MEMBER_OF;
45   types[ATK_RELATION_NODE_CHILD_OF] = Accessibility_RELATION_NODE_CHILD_OF;
46   types[ATK_RELATION_FLOWS_TO] = Accessibility_RELATION_FLOWS_TO;
47   types[ATK_RELATION_FLOWS_FROM] = Accessibility_RELATION_FLOWS_FROM;
48   types[ATK_RELATION_SUBWINDOW_OF] = Accessibility_RELATION_SUBWINDOW_OF;
49   types[ATK_RELATION_EMBEDS] = Accessibility_RELATION_EMBEDS;
50   types[ATK_RELATION_EMBEDDED_BY] = Accessibility_RELATION_EMBEDDED_BY;
51   types[ATK_RELATION_POPUP_FOR] = Accessibility_RELATION_POPUP_FOR;
52   types[ATK_RELATION_PARENT_WINDOW_OF] = Accessibility_RELATION_PARENT_WINDOW_OF;
53   return TRUE;
54 }
55
56
57
58 static Accessibility_RelationType
59 spi_relation_type_from_atk_relation_type (AtkRelationType type)
60 {
61   static gboolean is_initialized = FALSE;
62   static Accessibility_RelationType spi_relation_type_table [ATK_RELATION_LAST_DEFINED];
63   Accessibility_RelationType spi_type;
64
65   if (!is_initialized)
66     is_initialized = spi_init_relation_type_table (spi_relation_type_table);       
67
68   if (type > ATK_RELATION_NULL && type < ATK_RELATION_LAST_DEFINED)
69     spi_type = spi_relation_type_table[type];
70   else
71     spi_type = Accessibility_RELATION_EXTENDED;
72   return spi_type;
73 }
74
75
76
77 static AtkRelation *
78 get_relation_from_servant (PortableServer_Servant servant)
79 {
80   SpiBase *base = SPI_BASE (bonobo_object_from_servant(servant));
81
82   g_return_val_if_fail (base, NULL);
83   return  ATK_RELATION(base->gobj);
84 }
85
86
87
88 static Accessibility_RelationType
89 impl_getRelationType (PortableServer_Servant servant,
90                       CORBA_Environment * ev)
91 {
92   AtkRelation *relation = get_relation_from_servant (servant);
93   AtkRelationType type;
94
95   g_return_val_if_fail (relation != NULL, 0);
96   type = atk_relation_get_relation_type (relation);
97   return spi_relation_type_from_atk_relation_type (type);
98 }
99
100
101 static CORBA_short
102 impl_getNTargets (PortableServer_Servant servant,
103                   CORBA_Environment * ev)
104 {
105   AtkRelation *relation = get_relation_from_servant(servant);
106   g_return_val_if_fail (relation != NULL, 0);
107
108   return relation->target ? relation->target->len : 0;
109 }
110
111
112 static CORBA_Object
113 impl_getTarget (PortableServer_Servant servant,
114                 const CORBA_short index,
115                 CORBA_Environment * ev)
116 {
117   AtkObject *atk_object;
118   AtkRelation *relation = get_relation_from_servant (servant);
119   g_return_val_if_fail (relation, NULL);
120
121   if (!relation->target ||
122       index < 0 ||
123       index >= relation->target->len)
124     return CORBA_OBJECT_NIL;
125
126   atk_object = g_ptr_array_index (relation->target, index);
127   if (!atk_object)
128     return CORBA_OBJECT_NIL;
129
130   return spi_accessible_new_return (atk_object, FALSE, ev);
131 }
132
133
134 SpiRelation *
135 spi_relation_new (AtkRelation *obj)
136 {
137   SpiRelation *new_relation = g_object_new (SPI_RELATION_TYPE, NULL);
138   spi_base_construct (SPI_BASE (new_relation), G_OBJECT (obj));
139   return new_relation;
140 }
141
142
143 static void
144 spi_relation_class_init (SpiRelationClass *klass)
145 {
146   POA_Accessibility_Relation__epv *epv = &klass->epv;
147
148   epv->getRelationType  = impl_getRelationType;  
149   epv->getNTargets      = impl_getNTargets;
150   epv->getTarget        = impl_getTarget;
151 }
152
153
154 static void
155 spi_relation_init (SpiRelation *relation)
156 {
157 }
158
159
160 BONOBO_TYPE_FUNC_FULL (SpiRelation,
161                        Accessibility_Relation,
162                        SPI_TYPE_BASE,
163                        spi_relation)