2 * AT-SPI - Assistive Technology Service Provider Interface
3 * (Gnome Accessibility Project; http://developer.gnome.org/projects/gap)
5 * Copyright 2001 Sun Microsystems Inc.
7 * This library is free software; you can redistribute it and/or
8 * modify it under the terms of the GNU Library General Public
9 * License as published by the Free Software Foundation; either
10 * version 2 of the License, or (at your option) any later version.
12 * This library is distributed in the hope that it will be useful,
13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
15 * Library General Public License for more details.
17 * You should have received a copy of the GNU Library General Public
18 * License along with this library; if not, write to the
19 * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
20 * Boston, MA 02111-1307, USA.
25 #include <libbonobo.h>
26 #include <orbit/orbit.h>
28 #include <atk/atkobject.h>
29 #include <libspi/Accessibility.h>
30 #include "accessible.h"
31 #include "application.h"
33 #define APP_STATIC_BUFF_SZ 64
35 typedef struct _ArgStruct ArgStruct;
42 static CORBA_Environment ev;
43 static Accessibility_Registry registry;
44 static SpiApplication *this_app;
46 static gboolean bridge_register_app (gpointer p);
47 static void bridge_focus_tracker (AtkObject *object);
48 static void bridge_exit_func(void);
49 static gboolean bridge_register_event_listener ();
50 static void register_atk_event_listeners();
51 static gboolean bridge_property_event_listener (GSignalInvocationHint *signal_hint,
53 const GValue *param_values,
55 static gboolean bridge_signal_listener (GSignalInvocationHint *signal_hint,
57 const GValue *param_values,
60 static gint bridge_key_listener (AtkImplementor *atk_impl,
61 AtkKeyEventStruct *event,
65 gtk_module_init(gint *argc, gchar **argv[])
67 ArgStruct *args = (ArgStruct *) g_new0(ArgStruct, 1);
70 g_idle_add (bridge_register_app, args);
71 g_atexit (bridge_exit_func);
75 bridge_register_app (gpointer gp)
80 ArgStruct *args = (ArgStruct *)gp;
82 CORBA_exception_init(&ev);
84 if (!bonobo_init (&(args->c), args->v))
86 g_error ("Could not initialize Bonobo");
89 /* Create the accesssible application server object */
90 this_app = spi_application_new(atk_get_root ());
92 obj_id = "OAFIID:Accessibility_Registry:proto0.1";
94 oclient = bonobo_activation_activate_from_id (obj_id, 0, NULL, &ev);
95 if (ev._major != CORBA_NO_EXCEPTION) {
97 ("Accessibility app error: exception during registry activation from id: %s\n"),
98 CORBA_exception_id(&ev));
99 CORBA_exception_free(&ev);
103 if (CORBA_Object_is_nil (oclient, &ev))
105 g_error ("Could not locate registry");
108 registry = (Accessibility_Registry) oclient;
110 fprintf(stderr, "About to register application\n");
114 Accessibility_Registry_registerApplication (registry,
115 CORBA_Object_duplicate (BONOBO_OBJREF (this_app), &ev),
118 register_atk_event_listeners ();
124 register_atk_event_listeners ()
126 /* Register for focus event notifications, and register app with central registry */
128 /* kludge to make sure the Atk interface types are registered, otherwise
129 the AtkText signal handlers below won't get registered */
133 atk_add_focus_tracker (bridge_focus_tracker);
134 atk_add_global_event_listener (bridge_property_event_listener, "Gtk:AtkObject:property-change");
135 atk_add_global_event_listener (bridge_signal_listener, "Gtk:AtkObject:children-changed");
136 atk_add_global_event_listener (bridge_signal_listener, "Gtk:AtkText:text-changed");
137 atk_add_global_event_listener (bridge_signal_listener, "Gtk:AtkText:text-caret-moved");
138 atk_add_key_event_listener (bridge_key_listener, NULL);
141 static void bridge_exit_func()
143 fprintf (stderr, "exiting bridge\n");
144 Accessibility_Registry_deregisterApplication (registry,
145 CORBA_Object_duplicate (BONOBO_OBJREF (this_app), &ev),
147 fprintf (stderr, "bridge exit func complete.\n");
150 static void bridge_focus_tracker (AtkObject *object)
152 Accessibility_Event *e = Accessibility_Event__alloc();
153 e->type = CORBA_string_dup ("focus:");
154 e->source = CORBA_Object_duplicate (BONOBO_OBJREF (spi_accessible_new (object)), &ev);
157 Accessibility_Registry_notifyEvent (registry, e, &ev);
161 bridge_property_event_listener (GSignalInvocationHint *signal_hint,
162 guint n_param_values,
163 const GValue *param_values,
166 Accessibility_Event *e = Accessibility_Event__alloc();
167 Bonobo_Unknown source = NULL;
169 AtkPropertyValues *values;
171 GSignalQuery signal_query;
173 char sbuf[APP_STATIC_BUFF_SZ];
175 g_signal_query (signal_hint->signal_id, &signal_query);
176 name = signal_query.signal_name;
177 #ifdef SPI_BRIDGE_DEBUG
178 fprintf (stderr, "Received (property) signal %s:%s\n",
179 g_type_name (signal_query.itype), name);
181 gobject = g_value_get_object (param_values + 0);
182 values = (AtkPropertyValues*) g_value_get_pointer (param_values + 1);
184 /* notify the actual listeners */
185 if (ATK_IS_IMPLEMENTOR (gobject))
187 aobject = atk_implementor_ref_accessible (ATK_IMPLEMENTOR (gobject));
188 source = CORBA_Object_duplicate (BONOBO_OBJREF (spi_accessible_new (aobject)), &ev);
189 g_object_unref (G_OBJECT(aobject));
191 else if (ATK_IS_OBJECT (gobject))
193 aobject = ATK_OBJECT (gobject);
194 source = CORBA_Object_duplicate (BONOBO_OBJREF (spi_accessible_new (aobject)), &ev);
198 g_error("received property-change event from non-AtkImplementor");
201 snprintf(sbuf, APP_STATIC_BUFF_SZ, "object:property-change:%s", values->property_name);
202 e->type = CORBA_string_dup (sbuf);
207 Accessibility_Registry_notifyEvent (registry, e, &ev);
212 bridge_key_listener (AtkImplementor *atk_impl, AtkKeyEventStruct *event, gpointer data)
214 g_print ("bridge key listener!\n");
218 bridge_signal_listener (GSignalInvocationHint *signal_hint,
219 guint n_param_values,
220 const GValue *param_values,
223 Accessibility_Event *e = g_new0(Accessibility_Event, 1);
225 Bonobo_Unknown source;
226 AtkPropertyValues *values;
228 GSignalQuery signal_query;
230 char sbuf[APP_STATIC_BUFF_SZ];
232 g_signal_query (signal_hint->signal_id, &signal_query);
233 name = signal_query.signal_name;
234 #ifdef SPI_BRIDGE_DEBUG
235 fprintf (stderr, "Received (property) signal %s:%s\n",
236 g_type_name (signal_query.itype), name);
238 gobject = g_value_get_object (param_values + 0);
240 /* notify the actual listeners */
241 if (ATK_IS_IMPLEMENTOR (gobject))
243 aobject = atk_implementor_ref_accessible (ATK_IMPLEMENTOR (gobject));
245 else if (ATK_IS_OBJECT (gobject))
247 aobject = ATK_OBJECT (gobject);
248 g_object_ref (aobject);
252 g_error("received property-change event from non-AtkImplementor");
255 snprintf(sbuf, APP_STATIC_BUFF_SZ, "%s:%s", name, g_type_name (signal_query.itype));
256 source = CORBA_Object_duplicate (BONOBO_OBJREF (spi_accessible_new (aobject)), &ev);
257 e->type = CORBA_string_dup (sbuf);
261 Accessibility_Registry_notifyEvent (registry, e, &ev);
262 g_object_unref (aobject);
266 static Accessibility_Registry bridge_get_registry ()