2 * AT-SPI - Assistive Technology Service Provider Interface
3 * (Gnome Accessibility Project; http://developer.gnome.org/projects/gap)
5 * Copyright 2001, 2002, 2003 Sun Microsystems Inc.,
6 * Copyright 2001, 2002, 2003 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.
29 #include <libbonobo.h>
30 #include <orbit/orbit.h>
32 #include <atk/atkobject.h>
33 #include <atk/atknoopobject.h>
34 #include <libspi/Accessibility.h>
35 #include <libspi/spi-private.h>
36 #include "accessible.h"
37 #include "application.h"
38 #include <bonobo-activation/bonobo-activation-register.h>
40 #undef SPI_BRIDGE_DEBUG
42 #define DBG(a,b) if(_dbg>=(a))b
45 static CORBA_Environment ev;
46 static Accessibility_Registry registry = CORBA_OBJECT_NIL;
47 static Accessibility_DeviceEventController device_event_controller = CORBA_OBJECT_NIL;
48 static SpiApplication *this_app = NULL;
49 static gboolean registry_died = FALSE;
50 static gboolean atk_listeners_registered = FALSE;
51 static gint toplevels = 0;
52 static gboolean exiting = FALSE;
54 static guint atk_signal_text_changed;
55 static guint atk_signal_children_changed;
56 static guint atk_signal_active_descendant_changed;
57 static guint atk_signal_text_selection_changed;
60 static guint atk_signal_row_reordered;
61 static guint atk_signal_row_inserted;
62 static guint atk_signal_row_deleted;
63 static guint atk_signal_column_reordered;
64 static guint atk_signal_column_inserted;
65 static guint atk_signal_column_deleted;
68 static guint atk_signal_link_selected;
69 static guint atk_signal_bounds_changed;
71 static Accessibility_Registry spi_atk_bridge_get_registry (void);
72 static void spi_atk_bridge_do_registration (void);
73 static void spi_atk_bridge_toplevel_added (AtkObject *object,
76 static void spi_atk_bridge_toplevel_removed (AtkObject *object,
80 static void spi_atk_bridge_exit_func (void);
81 static void spi_atk_register_event_listeners (void);
82 static void spi_atk_bridge_focus_tracker (AtkObject *object);
83 static void spi_atk_bridge_register_application (Accessibility_Registry registry);
84 static gboolean spi_atk_bridge_property_event_listener (GSignalInvocationHint *signal_hint,
86 const GValue *param_values,
89 spi_atk_bridge_window_event_listener (GSignalInvocationHint *signal_hint,
91 const GValue *param_values,
94 spi_atk_bridge_state_event_listener (GSignalInvocationHint *signal_hint,
96 const GValue *param_values,
98 static gboolean spi_atk_bridge_signal_listener (GSignalInvocationHint *signal_hint,
100 const GValue *param_values,
102 static gint spi_atk_bridge_key_listener (AtkKeyEventStruct *event,
104 static void spi_atk_tidy_windows (void);
105 static void deregister_application (BonoboObject *app);
106 static void reinit_register_vars (void);
108 /* For automatic libgnome init */
109 extern void gnome_accessibility_module_init (void);
110 extern void gnome_accessibility_module_shutdown (void);
112 static int atk_bridge_initialized = FALSE;
113 static pid_t atk_bridge_pid = 0;
114 static guint atk_bridge_focus_tracker_id = 0;
115 static guint atk_bridge_key_event_listener_id = 0;
116 static GArray *listener_ids = NULL;
119 * These exported symbols are hooked by gnome-program
120 * to provide automatic module initialization and shutdown.
122 extern void gnome_accessibility_module_init (void);
123 extern void gnome_accessibility_module_shutdown (void);
126 spi_atk_bridge_init_event_type_consts ()
128 static gboolean done = FALSE;
133 atk_signal_children_changed = g_signal_lookup ("children_changed",
135 atk_signal_text_changed = g_signal_lookup ("text_changed",
137 atk_signal_bounds_changed = g_signal_lookup ("bounds_changed",
139 atk_signal_active_descendant_changed =
140 g_signal_lookup ("active_descendant_changed",
142 atk_signal_link_selected = g_signal_lookup ("link_selected",
144 atk_signal_text_selection_changed = g_signal_lookup ("text_selection_changed",
150 atk_bridge_init (gint *argc, gchar **argv[])
152 const char *debug_env_string = g_getenv ("AT_SPI_DEBUG");
155 if (atk_bridge_initialized)
159 atk_bridge_initialized = TRUE;
160 atk_bridge_pid = getpid ();
162 if (g_getenv ("ATK_BRIDGE_REDIRECT_LOG"))
164 fname = g_strconcat ("/tmp/", g_get_prgname (), ".at-spi-log");
165 freopen (fname, "w", stderr);
169 if (debug_env_string)
170 _dbg = (int) g_ascii_strtod (debug_env_string, NULL);
172 if (!bonobo_init (argc, argv ? *argv : NULL))
174 g_error ("Could not initialize Bonobo");
177 /* Create the accessible application server object */
178 this_app = spi_application_new (atk_get_root ());
180 * We only want to enable the bridge for top level
181 * applications, we detect bonobo components by seeing
182 * if they were activated with the intention of extracting
183 * an impl. by IID - very solid.
185 if (bonobo_activation_iid_get ())
187 DBG (1, g_message ("Found Bonobo component\n"));
188 g_signal_connect (atk_get_root (),
189 "children-changed::add",
190 (GCallback) spi_atk_bridge_toplevel_added,
192 g_signal_connect (atk_get_root (),
193 "children-changed::remove",
194 (GCallback) spi_atk_bridge_toplevel_removed,
199 spi_atk_bridge_do_registration ();
201 spi_atk_register_event_listeners ();
202 spi_atk_bridge_init_event_type_consts ();
209 spi_atk_bridge_do_registration (void)
211 CORBA_Environment ev;
213 CORBA_exception_init(&ev);
215 if (spi_atk_bridge_get_registry () == CORBA_OBJECT_NIL)
217 g_error ("Could not locate registry");
222 /* Create the accessible application server object */
223 if (this_app == NULL)
224 this_app = spi_application_new (atk_get_root ());
226 DBG (1, g_message ("About to register application\n"));
228 spi_atk_bridge_register_application (spi_atk_bridge_get_registry ());
230 g_atexit (spi_atk_bridge_exit_func);
232 DBG (1, g_message ("Application registered & listening\n"));
237 spi_atk_bridge_toplevel_added (AtkObject *object,
243 spi_atk_bridge_do_registration ();
249 spi_atk_bridge_toplevel_removed (AtkObject *object,
253 BonoboObject *app = (BonoboObject *) this_app;
258 deregister_application (app);
259 reinit_register_vars ();
263 g_warning ("More toplevels removed than added\n");
269 spi_atk_bridge_register_application (Accessibility_Registry registry)
271 Accessibility_Registry_registerApplication (spi_atk_bridge_get_registry (),
272 BONOBO_OBJREF (this_app),
277 * Returns a 'canonicalized' value for DISPLAY,
278 * with the screen number stripped off if present.
281 spi_display_name (void)
283 static const char *canonical_display_name = NULL;
284 if (!canonical_display_name)
286 const gchar *display_env = g_getenv ("AT_SPI_DISPLAY");
289 display_env = g_getenv ("DISPLAY");
290 if (!display_env || !display_env[0])
291 canonical_display_name = ":0";
294 gchar *display_p, *screen_p;
295 canonical_display_name = g_strdup (display_env);
296 display_p = strrchr (canonical_display_name, ':');
297 screen_p = strrchr (canonical_display_name, '.');
298 if (screen_p && display_p && ((guint) screen_p > (guint) display_p))
306 canonical_display_name = display_env;
309 return canonical_display_name;
312 static Accessibility_Registry
313 spi_atk_bridge_get_registry (void)
315 CORBA_Environment ev;
317 if (registry_died || (registry == CORBA_OBJECT_NIL)) {
318 CORBA_exception_init (&ev);
322 return CORBA_OBJECT_NIL;
324 DBG (1, g_warning ("registry died! restarting..."));
326 bonobo_activation_set_activation_env_value ("AT_SPI_DISPLAY", spi_display_name ());
328 registry = bonobo_activation_activate_from_id (
329 "OAFIID:Accessibility_Registry:1.0", 0, NULL, &ev);
331 if (ev._major != CORBA_NO_EXCEPTION)
333 g_error ("Accessibility app error: exception during "
334 "registry activation from id: %s\n",
335 CORBA_exception_id (&ev));
336 CORBA_exception_free (&ev);
339 if (registry_died && registry) {
340 registry_died = FALSE;
341 spi_atk_bridge_register_application (registry);
347 static Accessibility_DeviceEventController
348 spi_atk_bridget_get_dec (void)
350 CORBA_Environment ev;
352 if (device_event_controller != CORBA_OBJECT_NIL)
354 if (ORBit_small_get_connection_status (device_event_controller)
355 == ORBIT_CONNECTION_CONNECTED)
356 return device_event_controller;
359 CORBA_exception_init (&ev);
361 device_event_controller =
362 Accessibility_Registry_getDeviceEventController (
363 spi_atk_bridge_get_registry (), &ev);
367 g_warning (_("failure: no device event controller found.\n"));
368 registry_died = TRUE;
369 device_event_controller = CORBA_OBJECT_NIL;
372 return device_event_controller;
376 gtk_module_init (gint *argc, gchar **argv[])
378 return atk_bridge_init (argc, argv);
382 add_signal_listener (const char *signal_name)
386 id = atk_add_global_event_listener (
387 spi_atk_bridge_signal_listener, signal_name);
389 g_array_append_val (listener_ids, id);
393 spi_atk_register_event_listeners (void)
396 * kludge to make sure the Atk interface types are registered, otherwise
397 * the AtkText signal handlers below won't get registered
400 GObject *ao = g_object_new (ATK_TYPE_OBJECT, NULL);
401 AtkObject *bo = atk_no_op_object_new (ao);
404 if (atk_listeners_registered) return;
406 atk_listeners_registered = TRUE;
408 /* Register for focus event notifications, and register app with central registry */
410 listener_ids = g_array_sized_new (FALSE, TRUE, sizeof (guint), 16);
412 atk_bridge_focus_tracker_id = atk_add_focus_tracker (spi_atk_bridge_focus_tracker);
414 id = atk_add_global_event_listener (spi_atk_bridge_property_event_listener,
415 "Gtk:AtkObject:property-change");
416 g_array_append_val (listener_ids, id);
417 id = atk_add_global_event_listener (spi_atk_bridge_window_event_listener,
419 g_array_append_val (listener_ids, id);
420 id = atk_add_global_event_listener (spi_atk_bridge_window_event_listener,
422 g_array_append_val (listener_ids, id);
423 id = atk_add_global_event_listener (spi_atk_bridge_window_event_listener,
425 g_array_append_val (listener_ids, id);
426 id = atk_add_global_event_listener (spi_atk_bridge_window_event_listener,
428 g_array_append_val (listener_ids, id);
429 id = atk_add_global_event_listener (spi_atk_bridge_window_event_listener,
431 g_array_append_val (listener_ids, id);
432 id = atk_add_global_event_listener (spi_atk_bridge_window_event_listener,
434 g_array_append_val (listener_ids, id);
435 id = atk_add_global_event_listener (spi_atk_bridge_window_event_listener,
436 "window:deactivate");
437 g_array_append_val (listener_ids, id);
438 id = atk_add_global_event_listener (spi_atk_bridge_state_event_listener,
439 "Gtk:AtkObject:state-change");
440 g_array_append_val (listener_ids, id);
442 add_signal_listener ("Gtk:AtkObject:children-changed");
443 add_signal_listener ("Gtk:AtkObject:visible-data-changed");
444 add_signal_listener ("Gtk:AtkObject:active-descendant-changed");
445 add_signal_listener ("Gtk:AtkComponent:bounds-changed");
446 add_signal_listener ("Gtk:AtkSelection:selection-changed");
447 add_signal_listener ("Gtk:AtkText:text-selection-changed");
448 add_signal_listener ("Gtk:AtkText:text-changed");
449 add_signal_listener ("Gtk:AtkText:text-caret-moved");
450 add_signal_listener ("Gtk:AtkTable:row-inserted");
451 add_signal_listener ("Gtk:AtkTable:row-reordered");
452 add_signal_listener ("Gtk:AtkTable:row-deleted");
453 add_signal_listener ("Gtk:AtkTable:column-inserted");
454 add_signal_listener ("Gtk:AtkTable:column-reordered");
455 add_signal_listener ("Gtk:AtkTable:column-deleted");
456 add_signal_listener ("Gtk:AtkTable:model-changed");
457 add_signal_listener ("Gtk:AtkHypertext:link-selected");
459 * May add the following listeners to implement preemptive key listening for GTK+
461 * atk_add_global_event_listener (spi_atk_bridge_widgetkey_listener, "Gtk:GtkWidget:key-press-event");
462 * atk_add_global_event_listener (spi_atk_bridge_widgetkey_listener, "Gtk:GtkWidget:key-release-event");
464 atk_bridge_key_event_listener_id = atk_add_key_event_listener (
465 spi_atk_bridge_key_listener, NULL);
467 g_object_unref (G_OBJECT (bo));
472 deregister_application (BonoboObject *app)
474 Accessibility_Registry registry = spi_atk_bridge_get_registry ();
475 Accessibility_Registry_deregisterApplication (registry, BONOBO_OBJREF (app), &ev);
477 device_event_controller = bonobo_object_release_unref (device_event_controller, &ev);
478 registry = bonobo_object_release_unref (registry, &ev);
480 app = bonobo_object_unref (app);
484 spi_atk_bridge_exit_func (void)
486 BonoboObject *app = (BonoboObject *) this_app;
488 DBG (1, g_message ("exiting bridge\n"));
495 if (atk_bridge_pid != getpid ())
502 * Check whether we still have windows which have not been deleted.
504 spi_atk_tidy_windows ();
506 * FIXME: this may be incorrect for apps that do their own bonobo
507 * shutdown, until we can explicitly shutdown to get the ordering
510 if (!bonobo_is_initialized ())
512 DBG (1, g_warning ("Re-initializing bonobo\n"));
513 g_assert (bonobo_init (0, NULL));
514 g_assert (bonobo_activate ());
518 deregister_application (app);
520 DBG (1, g_message ("bridge exit func complete.\n"));
522 if (g_getenv ("AT_BRIDGE_SHUTDOWN"))
524 g_assert (!bonobo_debug_shutdown ());
529 gnome_accessibility_module_init (void)
531 atk_bridge_init (NULL, NULL);
533 if (g_getenv ("AT_BRIDGE_SHUTDOWN"))
535 g_print("Atk Accessibility bridge initialized\n");
540 gnome_accessibility_module_shutdown (void)
542 BonoboObject *app = (BonoboObject *) this_app;
544 GArray *ids = listener_ids;
546 if (!atk_bridge_initialized)
550 atk_bridge_initialized = FALSE;
553 if (g_getenv ("AT_BRIDGE_SHUTDOWN"))
555 g_print("Atk Accessibility bridge shutdown\n");
559 atk_remove_focus_tracker (atk_bridge_focus_tracker_id);
561 for (i = 0; ids && i < ids->len; i++)
563 atk_remove_global_event_listener (g_array_index (ids, guint, i));
566 atk_remove_key_event_listener (atk_bridge_key_event_listener_id);
568 deregister_application (app);
572 spi_atk_bridge_focus_tracker (AtkObject *object)
574 SpiAccessible *source;
575 Accessibility_Event e;
577 source = spi_accessible_new (object);
580 e.source = BONOBO_OBJREF (source);
583 spi_init_any_nil (&e.any_data);
585 CORBA_exception_init (&ev);
586 Accessibility_Registry_notifyEvent (spi_atk_bridge_get_registry (), &e, &ev);
588 registry_died = TRUE;
590 bonobo_object_unref (source);
592 CORBA_exception_free (&ev);
596 spi_atk_emit_eventv (const GObject *gobject,
600 const char *format, ...)
603 Accessibility_Event e;
604 SpiAccessible *source;
606 Accessibility_Registry registry;
607 #ifdef SPI_BRIDGE_DEBUG
611 va_start (args, format);
613 if (ATK_IS_IMPLEMENTOR (gobject))
615 aobject = atk_implementor_ref_accessible (ATK_IMPLEMENTOR (gobject));
616 source = spi_accessible_new (aobject);
617 g_object_unref (G_OBJECT (aobject));
619 else if (ATK_IS_OBJECT (gobject))
621 aobject = ATK_OBJECT (gobject);
622 source = spi_accessible_new (aobject);
628 DBG (0, g_warning ("received property-change event from non-AtkImplementor"));
633 e.type = g_strdup_vprintf (format, args);
634 e.source = BONOBO_OBJREF (source);
637 if (any) e.any_data = *any;
638 else spi_init_any_nil (&e.any_data);
640 #ifdef SPI_BRIDGE_DEBUG
641 s = Accessibility_Accessible__get_name (BONOBO_OBJREF (source), &ev);
642 g_warning ("Emitting event '%s' (%lu, %lu) on %s",
643 e.type, e.detail1, e.detail2, s);
646 CORBA_exception_init (&ev);
647 registry = spi_atk_bridge_get_registry ();
651 Accessibility_Registry_notifyEvent (registry,
653 #ifdef SPI_BRIDGE_DEBUG
654 if (ev._major != CORBA_NO_EXCEPTION)
655 g_warning ("error emitting event %s, (%d) %s",
658 CORBA_exception_id(&ev));
660 if (BONOBO_EX (&ev)) registry_died = TRUE;
661 Accessibility_Accessible_unref (e.source, &ev);
663 CORBA_exception_free (&ev);
673 spi_atk_bridge_property_event_listener (GSignalInvocationHint *signal_hint,
674 guint n_param_values,
675 const GValue *param_values,
678 AtkPropertyValues *values;
680 const gchar *prop_name;
682 const gchar *sp = NULL;
684 SpiAccessible *s_ao = NULL;
688 #ifdef SPI_BRIDGE_DEBUG
689 GSignalQuery signal_query;
693 g_signal_query (signal_hint->signal_id, &signal_query);
694 name = signal_query.signal_name;
696 s2 = g_type_name (G_OBJECT_TYPE (g_value_get_object (param_values + 0)));
697 s = atk_object_get_name (ATK_OBJECT (g_value_get_object (param_values + 0)));
698 values = (AtkPropertyValues*) g_value_get_pointer (param_values + 1);
699 DBG (2, g_message ("Received (property) signal %s:%s:%s from object %s (gail %s)\n",
700 g_type_name (signal_query.itype), name, values->property_name, s, s2));
704 gobject = g_value_get_object (param_values + 0);
705 values = (AtkPropertyValues*) g_value_get_pointer (param_values + 1);
707 prop_name = values->property_name;
708 if (strcmp (prop_name, "accessible-name") == 0)
710 sp = atk_object_get_name (ATK_OBJECT (gobject));
711 spi_init_any_string (&any, (gchar **)&sp);
713 else if (strcmp (prop_name, "accessible-description") == 0)
715 sp = atk_object_get_description (ATK_OBJECT (gobject));
716 spi_init_any_string (&any, (gchar **)&sp);
718 else if (strcmp (prop_name, "accessible-parent") == 0)
720 ao = atk_object_get_parent (ATK_OBJECT (gobject));
723 s_ao = spi_accessible_new (ao);
724 c_obj = BONOBO_OBJREF (s_ao);
725 spi_init_any_object (&any, &c_obj);
729 spi_init_any_nil (&any);
732 else if (strcmp (prop_name, "accessible-table-summary") == 0)
734 ao = atk_table_get_summary (ATK_TABLE (gobject));
737 s_ao = spi_accessible_new (ao);
738 c_obj = BONOBO_OBJREF (s_ao);
739 spi_init_any_object (&any, &c_obj);
743 spi_init_any_nil (&any);
746 else if (strcmp (prop_name, "accessible-table-column-header") == 0)
748 i = g_value_get_int (&(values->new_value));
749 ao = atk_table_get_column_header (ATK_TABLE (gobject), i);
752 s_ao = spi_accessible_new (ao);
753 c_obj = BONOBO_OBJREF (s_ao);
754 spi_init_any_object (&any, &c_obj);
758 spi_init_any_nil (&any);
761 else if (strcmp (prop_name, "accessible-table-row-header") == 0)
763 i = g_value_get_int (&(values->new_value));
764 ao = atk_table_get_row_header (ATK_TABLE (gobject), i);
767 s_ao = spi_accessible_new (ao);
768 c_obj = BONOBO_OBJREF (s_ao);
769 spi_init_any_object (&any, &c_obj);
773 spi_init_any_nil (&any);
776 else if (strcmp (prop_name, "accessible-table-row-description") == 0)
778 i = g_value_get_int (&(values->new_value));
779 sp = atk_table_get_row_description (ATK_TABLE (gobject), i);
780 spi_init_any_string (&any, (gchar **)&sp);
782 else if (strcmp (prop_name, "accessible-table-column-description") == 0)
784 i = g_value_get_int (&(values->new_value));
785 sp = atk_table_get_column_description (ATK_TABLE (gobject), i);
786 spi_init_any_string (&any, (gchar **)&sp);
788 else if (strcmp (prop_name, "accessible-table-caption-object") == 0)
790 ao = atk_table_get_caption (ATK_TABLE (gobject));
791 sp = atk_object_get_name (ao);
792 spi_init_any_string (&any, (gchar **)&sp);
796 spi_init_any_nil (&any);
799 spi_atk_emit_eventv (gobject, 0, 0, &any,
800 "object:property-change:%s", prop_name);
807 spi_atk_bridge_state_event_listener (GSignalInvocationHint *signal_hint,
808 guint n_param_values,
809 const GValue *param_values,
813 gchar *property_name;
815 unsigned long detail1;
816 #ifdef SPI_BRIDGE_DEBUG
817 GSignalQuery signal_query;
820 g_signal_query (signal_hint->signal_id, &signal_query);
821 name = signal_query.signal_name;
822 fprintf (stderr, "Received (state) signal %s:%s\n",
823 g_type_name (signal_query.itype), name);
826 gobject = g_value_get_object (param_values + 0);
827 property_name = g_strdup (g_value_get_string (param_values + 1));
828 detail1 = (g_value_get_boolean (param_values + 2))
830 type = g_strdup_printf ("object:state-changed:%s", property_name);
831 spi_atk_emit_eventv (gobject,
836 g_free (property_name);
842 spi_init_keystroke_from_atk_key_event (Accessibility_DeviceEvent *keystroke,
843 AtkKeyEventStruct *event)
848 g_print ("event %c (%d)\n", (int) event->keyval, (int) event->keycode);
853 { /* this doesn't really need translating */
854 g_print (_("WARNING: NULL key event reported."));
857 keystroke->id = (CORBA_long) event->keyval;
858 keystroke->hw_code = (CORBA_short) event->keycode;
859 keystroke->timestamp = (CORBA_unsigned_long) event->timestamp;
860 keystroke->modifiers = (CORBA_unsigned_short) (event->state & 0xFFFF);
865 keystroke->event_string = CORBA_string_dup (event->string);
866 c = g_utf8_get_char_validated (event->string, -1);
867 if (c > 0 && g_unichar_isprint (c))
868 keystroke->is_text = CORBA_TRUE;
870 keystroke->is_text = CORBA_FALSE;
874 keystroke->event_string = CORBA_string_dup ("");
875 keystroke->is_text = CORBA_FALSE;
879 case (ATK_KEY_EVENT_PRESS):
880 keystroke->type = Accessibility_KEY_PRESSED_EVENT;
882 case (ATK_KEY_EVENT_RELEASE):
883 keystroke->type = Accessibility_KEY_RELEASED_EVENT;
890 g_print ("key_event type %d; val=%d code=%d modifiers=%x name=%s is_text=%d, time=%lx\n",
891 (int) keystroke->type, (int) keystroke->id, (int) keystroke->hw_code,
892 (int) keystroke->modifiers,
893 keystroke->event_string, (int) keystroke->is_text, (unsigned long) keystroke->timestamp);
898 spi_atk_bridge_key_listener (AtkKeyEventStruct *event, gpointer data)
900 CORBA_boolean result;
901 Accessibility_DeviceEvent key_event;
903 CORBA_exception_init (&ev);
905 spi_init_keystroke_from_atk_key_event (&key_event, event);
907 result = Accessibility_DeviceEventController_notifyListenersSync (
908 spi_atk_bridget_get_dec (), &key_event, &ev);
910 if (BONOBO_EX(&ev)) {
912 CORBA_exception_free (&ev);
919 spi_atk_bridge_signal_listener (GSignalInvocationHint *signal_hint,
920 guint n_param_values,
921 const GValue *param_values,
925 GSignalQuery signal_query;
933 gint detail1 = 0, detail2 = 0;
934 SpiAccessible *s_ao = NULL;
935 #ifdef SPI_BRIDGE_DEBUG
939 g_signal_query (signal_hint->signal_id, &signal_query);
941 name = signal_query.signal_name;
942 if (signal_hint->detail)
943 detail = g_quark_to_string (signal_hint->detail);
947 #ifdef SPI_BRIDGE_DEBUG
948 s2 = g_type_name (G_OBJECT_TYPE (g_value_get_object (param_values + 0)));
949 s = atk_object_get_name (ATK_OBJECT (g_value_get_object (param_values + 0)));
950 fprintf (stderr, "Received signal %s:%s detail: %s from object %s (gail %s)\n",
951 g_type_name (signal_query.itype), name,
952 detail ? detail : "<NULL>", s ? s : "<NULL>" , s2);
955 gobject = g_value_get_object (param_values + 0);
957 if (signal_query.signal_id == atk_signal_active_descendant_changed)
959 gpointer child = g_value_get_pointer (param_values + 1);
961 g_return_val_if_fail (ATK_IS_OBJECT (child), TRUE);
963 ao = ATK_OBJECT (child);
965 detail1 = atk_object_get_index_in_parent (ao);
966 s_ao = spi_accessible_new (ao);
967 c_obj = BONOBO_OBJREF (s_ao);
968 spi_init_any_object (&any, &c_obj);
970 else if (signal_query.signal_id == atk_signal_link_selected)
972 if (G_VALUE_TYPE (param_values + 1) == G_TYPE_INT)
973 detail1 = g_value_get_int (param_values + 1);
974 spi_init_any_nil (&any);
976 else if (signal_query.signal_id == atk_signal_bounds_changed)
978 AtkRectangle *atk_rect = NULL;
980 if (G_VALUE_HOLDS_BOXED (param_values + 1))
981 atk_rect = g_value_get_boxed (param_values + 1);
982 spi_init_any_rect (&any, atk_rect);
984 else if ((signal_query.signal_id == atk_signal_children_changed) && gobject)
986 ao = atk_object_ref_accessible_child (ATK_OBJECT (gobject),
990 s_ao = spi_accessible_new (ao);
991 c_obj = BONOBO_OBJREF (s_ao);
992 spi_init_any_object (&any, &c_obj);
997 spi_init_any_nil (&any);
1002 if (n_param_values >= 2)
1004 if (G_VALUE_TYPE (param_values + 1) == G_TYPE_INT)
1005 detail1 = g_value_get_int (param_values + 1);
1006 if (n_param_values >= 3)
1008 if (G_VALUE_TYPE (param_values + 2) == G_TYPE_INT)
1009 detail2 = g_value_get_int (param_values + 2);
1013 if (signal_query.signal_id == atk_signal_text_changed)
1015 sp = atk_text_get_text (ATK_TEXT (gobject),
1018 spi_init_any_string (&any, &sp);
1020 else if (signal_query.signal_id == atk_signal_text_selection_changed)
1022 text = ATK_TEXT (gobject);
1024 /* Return NULL as the selected string */
1025 spi_init_any_nil (&any);
1029 spi_init_any_nil (&any);
1034 spi_atk_emit_eventv (gobject, detail1, detail2, &any,
1035 "object:%s:%s", name, detail);
1037 spi_atk_emit_eventv (gobject, detail1, detail2, &any,
1047 spi_atk_bridge_window_event_listener (GSignalInvocationHint *signal_hint,
1048 guint n_param_values,
1049 const GValue *param_values,
1053 GSignalQuery signal_query;
1055 const gchar *name, *s;
1056 #ifdef SPI_BRIDGE_DEBUG
1060 g_signal_query (signal_hint->signal_id, &signal_query);
1062 name = signal_query.signal_name;
1064 #ifdef SPI_BRIDGE_DEBUG
1065 s2 = g_type_name (G_OBJECT_TYPE (g_value_get_object (param_values + 0)));
1066 s = atk_object_get_name (ATK_OBJECT (g_value_get_object (param_values + 0)));
1067 fprintf (stderr, "Received signal %s:%s from object %s (gail %s)\n",
1068 g_type_name (signal_query.itype), name, s ? s : "<NULL>" , s2);
1071 gobject = g_value_get_object (param_values + 0);
1073 s = atk_object_get_name (ATK_OBJECT (gobject));
1074 spi_init_any_string (&any, (char **) &s);
1076 spi_atk_emit_eventv (gobject, 0, 0, &any,
1082 spi_atk_tidy_windows (void)
1088 root = atk_get_root ();
1089 n_children = atk_object_get_n_accessible_children (root);
1090 for (i = 0; i < n_children; i++)
1093 AtkStateSet *stateset;
1097 child = atk_object_ref_accessible_child (root, i);
1098 stateset = atk_object_ref_state_set (child);
1100 name = atk_object_get_name (child);
1101 spi_init_any_string (&any, (char**) &name);
1102 if (atk_state_set_contains_state (stateset, ATK_STATE_ACTIVE))
1104 spi_atk_emit_eventv (G_OBJECT (child), 0, 0, &any, "window:deactivate");
1108 g_object_unref (stateset);
1110 spi_atk_emit_eventv (G_OBJECT (child), 0, 0, &any, "window:destroy");
1111 g_object_unref (child);
1116 reinit_register_vars (void)
1118 registry = CORBA_OBJECT_NIL;
1119 device_event_controller = CORBA_OBJECT_NIL;