2 * AT-SPI - Assistive Technology Service Provider Interface
3 * (Gnome Accessibility Project; http://developer.gnome.org/projects/gap)
5 * Copyright 2001, 2002 Sun Microsystems Inc.,
6 * Copyright 2001, 2002 Ximian, Inc.
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.
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.
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.
25 #include <glib/gmessages.h>
26 #include <glib/gslist.h>
27 #include <Accessibility.h>
29 #include "spi-private.h"
36 static GSList *working_list = NULL; /* of Iteration */
38 static char *spi_atk_bridge_null_string = "";
40 Accessibility_Role spi_accessible_role_from_atk_role (AtkRole role);
43 spi_role_from_atk_role (AtkRole role)
45 return spi_accessible_role_from_atk_role (role);
49 * deletes an element from the list - in a re-entrant
50 * safe fashion; advances the element pointer to the next
54 spi_re_entrant_list_delete_link (GList * const *element_ptr)
61 g_return_if_fail (element_ptr != NULL);
63 element = *element_ptr;
64 g_return_if_fail (element != NULL);
67 first_item = (element->prev == NULL);
69 g_list_remove_link (NULL, element);
71 for (l = working_list; l; l = l->next)
73 Iteration *i = l->data;
75 if (i->iterator == element)
80 if (first_item && *(i->list) == element)
86 g_list_free_1 (element);
90 spi_re_entrant_list_foreach (GList **list,
104 working_list = g_slist_prepend (working_list, &i);
107 GList *l = i.iterator;
109 func (&i.iterator, user_data);
112 i.iterator = i.iterator->next;
115 working_list = g_slist_remove (working_list, &i);
119 spi_init_any_nil (CORBA_any *any_details,
120 Accessibility_Application app,
121 Accessibility_Role role,
124 Accessibility_EventDetails *details = Accessibility_EventDetails__alloc();
126 any_details->_type = TC_Accessibility_EventDetails;
127 any_details->_value = details;
128 any_details->_release = TRUE;
130 details->host_application = app;
131 details->source_role = role;
132 details->source_name = CORBA_string_dup (name);
134 details->any_data._type = TC_null;
135 details->any_data._value = NULL;
136 details->any_data._release = TRUE;
140 spi_init_any_object (CORBA_any *any_details, Accessibility_Application app,
141 Accessibility_Role role,
145 Accessibility_EventDetails *details = Accessibility_EventDetails__alloc();
147 any_details->_type = TC_Accessibility_EventDetails;
148 any_details->_value = details;
149 any_details->_release = TRUE;
151 details->host_application = app;
152 details->source_role = role;
153 details->source_name = CORBA_string_dup (name);
155 details->any_data._type = TC_CORBA_Object;
156 details->any_data._value = ORBit_copy_value (o, TC_CORBA_Object);
157 details->any_data._release = TRUE;
161 spi_init_any_string (CORBA_any *any_details, Accessibility_Application app,
162 Accessibility_Role role,
164 char **string_pointer)
166 Accessibility_EventDetails *details = Accessibility_EventDetails__alloc();
168 any_details->_type = TC_Accessibility_EventDetails;
169 any_details->_value = details;
170 any_details->_release = TRUE;
172 details->host_application = app;
173 details->source_role = role;
174 details->source_name = CORBA_string_dup (name);
176 details->any_data._type = (CORBA_TypeCode) TC_CORBA_string;
177 if (string_pointer && *string_pointer)
178 details->any_data._value = string_pointer;
180 details->any_data._value = &spi_atk_bridge_null_string;
181 details->any_data._release = FALSE;
185 spi_init_any_rect (CORBA_any *any_details,
186 Accessibility_Application app,
187 Accessibility_Role role,
191 Accessibility_EventDetails *details = Accessibility_EventDetails__alloc();
192 Accessibility_BoundingBox *box = Accessibility_BoundingBox__alloc ();
194 any_details->_type = TC_Accessibility_EventDetails;
195 any_details->_value = details;
196 any_details->_release = TRUE;
198 details->host_application = app;
199 details->source_role = role;
200 details->source_name = CORBA_string_dup (name);
204 box->width = rect->width;
205 box->height = rect->height;
206 details->any_data._type = TC_Accessibility_BoundingBox;
207 details->any_data._value = box;
208 details->any_data._release = TRUE;