2002-11-19 Darren Kenny <darren.kenny@sun.com>
[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] = ATK_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   return TRUE;
52 }
53
54
55
56 static Accessibility_RelationType
57 spi_relation_type_from_atk_relation_type (AtkRelationType type)
58 {
59   static gboolean is_initialized = FALSE;
60   static Accessibility_RelationType spi_relation_type_table [ATK_RELATION_LAST_DEFINED];
61   Accessibility_RelationType spi_type;
62
63   if (!is_initialized)
64     is_initialized = spi_init_relation_type_table (spi_relation_type_table);       
65
66   if (type > ATK_RELATION_NULL && type < ATK_RELATION_LAST_DEFINED)
67     spi_type = spi_relation_type_table[type];
68   else
69     spi_type = Accessibility_RELATION_EXTENDED;
70   return spi_type;
71 }
72
73
74
75 static AtkRelation *
76 get_relation_from_servant (PortableServer_Servant servant)
77 {
78   SpiBase *base = SPI_BASE (bonobo_object_from_servant(servant));
79
80   g_return_val_if_fail (base, NULL);
81   return  ATK_RELATION(base->gobj);
82 }
83
84
85
86 static Accessibility_RelationType
87 impl_getRelationType (PortableServer_Servant servant,
88                       CORBA_Environment * ev)
89 {
90   AtkRelation *relation = get_relation_from_servant (servant);
91   AtkRelationType type;
92
93   g_return_val_if_fail (relation != NULL, 0);
94   type = atk_relation_get_relation_type (relation);
95   return spi_relation_type_from_atk_relation_type (type);
96 }
97
98
99 static CORBA_short
100 impl_getNTargets (PortableServer_Servant servant,
101                   CORBA_Environment * ev)
102 {
103   AtkRelation *relation = get_relation_from_servant(servant);
104   g_return_val_if_fail (relation != NULL, 0);
105
106   return relation->target ? relation->target->len : 0;
107 }
108
109
110 static CORBA_Object
111 impl_getTarget (PortableServer_Servant servant,
112                 const CORBA_short index,
113                 CORBA_Environment * ev)
114 {
115   AtkObject *atk_object;
116   AtkRelation *relation = get_relation_from_servant (servant);
117   g_return_val_if_fail (relation, NULL);
118
119   if (!relation->target ||
120       index < 0 ||
121       index >= relation->target->len)
122     return CORBA_OBJECT_NIL;
123
124   atk_object = g_ptr_array_index (relation->target, index);
125   if (!atk_object)
126     return CORBA_OBJECT_NIL;
127
128   return spi_accessible_new_return (atk_object, FALSE, ev);
129 }
130
131
132 SpiRelation *
133 spi_relation_new (AtkRelation *obj)
134 {
135   SpiRelation *new_relation = g_object_new (SPI_RELATION_TYPE, NULL);
136   spi_base_construct (SPI_BASE (new_relation), G_OBJECT (obj));
137   return new_relation;
138 }
139
140
141 static void
142 spi_relation_class_init (SpiRelationClass *klass)
143 {
144   POA_Accessibility_Relation__epv *epv = &klass->epv;
145
146   epv->getRelationType  = impl_getRelationType;  
147   epv->getNTargets      = impl_getNTargets;
148   epv->getTarget        = impl_getTarget;
149 }
150
151
152 static void
153 spi_relation_init (SpiRelation *relation)
154 {
155 }
156
157
158 BONOBO_TYPE_FUNC_FULL (SpiRelation,
159                        Accessibility_Relation,
160                        SPI_TYPE_BASE,
161                        spi_relation);