atk-bridge/bridge.c

   1 /*
   2  * AT-SPI - Assistive Technology Service Provider Interface
   3  * (Gnome Accessibility Project; http://developer.gnome.org/projects/gap)
   4  *
   5  * Copyright 2001 Sun Microsystems Inc.
   6  *
   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.
  11  *
  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.
  16  *
  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.
  21  */
  22
  23 #include <stdio.h>
  24 #include <stdlib.h>
  25 #include <libbonobo.h>
  26 #include <orbit/orbit.h>
  27 #include <atk/atk.h>
  28 #include <atk/atkobject.h>
  29 #include <atk/atknoopobject.h>
  30 #include <libspi/Accessibility.h>
  31 #include "accessible.h"
  32 #include "application.h"
  33
  34 #define SPI_BRIDGE_DEBUG 1
  35
  36 #define APP_STATIC_BUFF_SZ 64
  37
  38 typedef struct _ArgStruct ArgStruct;
  39
  40 struct _ArgStruct {
  41   gint c;
  42   char **v;
  43 };
  44
  45 static CORBA_Environment ev;
  46 static Accessibility_Registry registry;
  47 static SpiApplication *this_app;
  48
  49 static gboolean bridge_register_app (gpointer p);
  50 static void bridge_focus_tracker (AtkObject *object);
  51 static void bridge_exit_func(void);
  52 static gboolean bridge_register_event_listener ();
  53 static void register_atk_event_listeners();
  54 static gboolean bridge_property_event_listener (GSignalInvocationHint *signal_hint,
  55                                                 guint n_param_values,
  56                                                 const GValue *param_values,
  57                                                 gpointer data);
  58 static gboolean bridge_state_event_listener (GSignalInvocationHint *signal_hint,
  59                                              guint n_param_values,
  60                                              const GValue *param_values,
  61                                              gpointer data);
  62 static gboolean bridge_signal_listener (GSignalInvocationHint *signal_hint,
  63                                         guint n_param_values,
  64                                         const GValue *param_values,
  65                                         gpointer data);
  66
  67 static gint bridge_key_listener (AtkImplementor *atk_impl,
  68                                  AtkKeyEventStruct *event,
  69                                  gpointer data);
  70
  71 int
  72 gtk_module_init(gint *argc, gchar **argv[])
  73 {
  74   ArgStruct *args = (ArgStruct *) g_new0(ArgStruct, 1);
  75   args->c = *argc;
  76   args->v = *argv;
  77   g_idle_add (bridge_register_app, args);
  78   g_atexit (bridge_exit_func);
  79 }
  80
  81 static gboolean
  82 bridge_register_app (gpointer gp)
  83 {
  84   CORBA_Object oclient;
  85   AtkObject *atko;
  86   char *obj_id;
  87   ArgStruct *args = (ArgStruct *)gp;
  88
  89   CORBA_exception_init(&ev);
  90
  91   if (!bonobo_init (&(args->c), args->v))
  92     {
  93       g_error ("Could not initialize Bonobo");
  94     }
  95
  96   /* Create the accesssible application server object */
  97   this_app = spi_application_new(atk_get_root ());
  98
  99   obj_id = "OAFIID:Accessibility_Registry:proto0.1";
 100
 101   oclient = bonobo_activation_activate_from_id (obj_id, 0, NULL, &ev);
 102   if (ev._major != CORBA_NO_EXCEPTION) {
 103     fprintf(stderr,
 104             ("Accessibility app error: exception during registry activation from id: %s\n"),
 105             CORBA_exception_id(&ev));
 106     CORBA_exception_free(&ev);
 107     exit(-1);
 108   }
 109
 110   if (CORBA_Object_is_nil (oclient, &ev))
 111     {
 112       g_error ("Could not locate registry");
 113     }
 114
 115   registry = (Accessibility_Registry) oclient;
 116
 117   fprintf(stderr, "About to register application\n");
 118
 119   bonobo_activate ();
 120
 121   Accessibility_Registry_registerApplication (registry,
 122                                               CORBA_Object_duplicate (BONOBO_OBJREF (this_app), &ev),
 123                                               &ev);
 124
 125   register_atk_event_listeners ();
 126
 127   return FALSE;
 128 }
 129
 130 static void
 131 register_atk_event_listeners ()
 132 {
 133   GType t;
 134
 135   /*
 136    * kludge to make sure the Atk interface types are registered, otherwise
 137    * the AtkText signal handlers below won't get registered
 138    */
 139
 140   AtkNoOpObject *o = atk_no_op_object_new (g_object_new (ATK_TYPE_OBJECT, NULL));
 141
 142   /* Register for focus event notifications, and register app with central registry  */
 143
 144   g_type_class_ref (ATK_TYPE_TEXT);
 145   g_type_class_ref (ATK_TYPE_SELECTION);
 146   g_type_class_ref (ATK_TYPE_TABLE);
 147
 148   atk_add_focus_tracker (bridge_focus_tracker);
 149   atk_add_global_event_listener (bridge_property_event_listener, "Gtk:AtkObject:property-change");
 150   atk_add_global_event_listener (bridge_signal_listener, "Gtk:AtkObject:children-changed");
 151   atk_add_global_event_listener (bridge_signal_listener, "Gtk:AtkObject:visible-data-changed");
 152   atk_add_global_event_listener (bridge_signal_listener, "Gtk:AtkSelection:selection-changed");
 153   atk_add_global_event_listener (bridge_signal_listener, "Gtk:AtkText:text-selection-changed");
 154   atk_add_global_event_listener (bridge_signal_listener, "Gtk:AtkText:text-changed");
 155   atk_add_global_event_listener (bridge_signal_listener, "Gtk:AtkText:text-caret-moved");
 156   atk_add_global_event_listener (bridge_signal_listener, "Gtk:AtkTable:row-inserted");
 157   atk_add_global_event_listener (bridge_signal_listener, "Gtk:AtkTable:row-reordered");
 158   atk_add_global_event_listener (bridge_signal_listener, "Gtk:AtkTable:row-deleted");
 159   atk_add_global_event_listener (bridge_signal_listener, "Gtk:AtkTable:column-inserted");
 160   atk_add_global_event_listener (bridge_signal_listener, "Gtk:AtkTable:column-reordered");
 161   atk_add_global_event_listener (bridge_signal_listener, "Gtk:AtkTable:column-deleted");
 162   atk_add_global_event_listener (bridge_signal_listener, "Gtk:AtkTable:model-changed");
 163   atk_add_key_event_listener    (bridge_key_listener, NULL);
 164 }
 165
 166 static void bridge_exit_func()
 167 {
 168   fprintf (stderr, "exiting bridge\n");
 169   Accessibility_Registry_deregisterApplication (registry,
 170                                                 CORBA_Object_duplicate (BONOBO_OBJREF (this_app), &ev),
 171                                                 &ev);
 172   fprintf (stderr, "bridge exit func complete.\n");
 173 }
 174
 175 static void bridge_focus_tracker (AtkObject *object)
 176 {
 177   Accessibility_Event *e = Accessibility_Event__alloc();
 178   e->type = CORBA_string_dup ("focus:");
 179   e->source = CORBA_Object_duplicate (BONOBO_OBJREF (spi_accessible_new (object)), &ev);
 180   e->detail1 = 0;
 181   e->detail2 = 0;
 182   Accessibility_Registry_notifyEvent (registry, e, &ev);
 183 }
 184
 185 static gboolean
 186 bridge_property_event_listener (GSignalInvocationHint *signal_hint,
 187                                 guint n_param_values,
 188                                 const GValue *param_values,
 189                                 gpointer data)
 190 {
 191   Accessibility_Event *e = Accessibility_Event__alloc();
 192   Bonobo_Unknown source = NULL;
 193   AtkObject *aobject;
 194   AtkPropertyValues *values;
 195   GObject *gobject;
 196   GSignalQuery signal_query;
 197   gchar *name;
 198   char sbuf[APP_STATIC_BUFF_SZ];
 199
 200   g_signal_query (signal_hint->signal_id, &signal_query);
 201   name = signal_query.signal_name;
 202 #ifdef SPI_BRIDGE_DEBUG
 203   fprintf (stderr, "Received (property) signal %s:%s\n",
 204            g_type_name (signal_query.itype), name);
 205 #endif
 206   gobject = g_value_get_object (param_values + 0);
 207   values = (AtkPropertyValues*) g_value_get_pointer (param_values + 1);
 208
 209   /* notify the actual listeners */
 210   if (ATK_IS_IMPLEMENTOR (gobject))
 211   {
 212     aobject = atk_implementor_ref_accessible (ATK_IMPLEMENTOR (gobject));
 213     source = CORBA_Object_duplicate (BONOBO_OBJREF (spi_accessible_new (aobject)), &ev);
 214     g_object_unref (G_OBJECT(aobject));
 215   }
 216   else if (ATK_IS_OBJECT (gobject))
 217   {
 218     aobject = ATK_OBJECT (gobject);
 219     source = CORBA_Object_duplicate (BONOBO_OBJREF (spi_accessible_new (aobject)), &ev);
 220   }
 221   else
 222   {
 223     g_error("received property-change event from non-AtkImplementor");
 224   }
 225
 226   snprintf(sbuf, APP_STATIC_BUFF_SZ, "object:property-change:%s", values->property_name);
 227   e->type = CORBA_string_dup (sbuf);
 228   e->source = source;
 229   e->detail1 = 0;
 230   e->detail2 = 0;
 231   if (source)
 232     Accessibility_Registry_notifyEvent (registry, e, &ev);
 233   return TRUE;
 234 }
 235
 236 static gboolean
 237 bridge_state_event_listener (GSignalInvocationHint *signal_hint,
 238                              guint n_param_values,
 239                              const GValue *param_values,
 240                              gpointer data)
 241 {
 242   Accessibility_Event *e = Accessibility_Event__alloc();
 243   Bonobo_Unknown source = NULL;
 244   AtkObject *aobject;
 245   AtkPropertyValues *values;
 246   GObject *gobject;
 247   GSignalQuery signal_query;
 248   gchar *name;
 249   char sbuf[APP_STATIC_BUFF_SZ];
 250
 251   g_signal_query (signal_hint->signal_id, &signal_query);
 252   name = signal_query.signal_name;
 253 #ifdef SPI_BRIDGE_DEBUG
 254   fprintf (stderr, "Received (state) signal %s:%s\n",
 255            g_type_name (signal_query.itype), name);
 256 #endif
 257   gobject = g_value_get_object (param_values + 0);
 258   values = (AtkPropertyValues*) g_value_get_pointer (param_values + 1);
 259
 260   /* notify the actual listeners */
 261   if (ATK_IS_IMPLEMENTOR (gobject))
 262   {
 263     aobject = atk_implementor_ref_accessible (ATK_IMPLEMENTOR (gobject));
 264     source = CORBA_Object_duplicate (BONOBO_OBJREF (spi_accessible_new (aobject)), &ev);
 265     g_object_unref (G_OBJECT(aobject));
 266   }
 267   else if (ATK_IS_OBJECT (gobject))
 268   {
 269     aobject = ATK_OBJECT (gobject);
 270     source = CORBA_Object_duplicate (BONOBO_OBJREF (spi_accessible_new (aobject)), &ev);
 271   }
 272   else
 273   {
 274     g_error("received property-change event from non-AtkImplementor");
 275   }
 276
 277   snprintf(sbuf, APP_STATIC_BUFF_SZ, "object:%s:%s", values->property_name, "?");
 278   e->type = CORBA_string_dup (sbuf);
 279   e->source = source;
 280   e->detail1 = (unsigned long) values->old_value.data[0].v_ulong;
 281   e->detail2 = (unsigned long) values->new_value.data[0].v_ulong;
 282   if (source)
 283     Accessibility_Registry_notifyEvent (registry, e, &ev);
 284   return TRUE;
 285 }
 286
 287 static gint
 288 bridge_key_listener (AtkImplementor *atk_impl, AtkKeyEventStruct *event, gpointer data)
 289 {
 290   Accessibility_KeyStroke *key_event;
 291   static Accessibility_DeviceEventController controller = CORBA_OBJECT_NIL;
 292   if (controller == CORBA_OBJECT_NIL)
 293     {
 294       controller = Accessibility_Registry_getDeviceEventController (registry, &ev);
 295     }
 296   g_print ("bridge key listener fired!\n");
 297 /* Accessibility_DeviceEventController_notifyListenersSync (controller, key_event, &ev); */
 298 }
 299
 300 static gboolean
 301 bridge_signal_listener (GSignalInvocationHint *signal_hint,
 302                         guint n_param_values,
 303                         const GValue *param_values,
 304                         gpointer data)
 305 {
 306   Accessibility_Event *e = g_new0(Accessibility_Event, 1);
 307   AtkObject *aobject;
 308   Bonobo_Unknown source;
 309   AtkPropertyValues *values;
 310   GObject *gobject;
 311   GSignalQuery signal_query;
 312   gchar *name;
 313   char sbuf[APP_STATIC_BUFF_SZ];
 314
 315   g_signal_query (signal_hint->signal_id, &signal_query);
 316   name = signal_query.signal_name;
 317 #ifdef SPI_BRIDGE_DEBUG
 318   fprintf (stderr, "Received signal %s:%s\n",
 319            g_type_name (signal_query.itype), name);
 320 #endif
 321   gobject = g_value_get_object (param_values + 0);
 322
 323   /* notify the actual listeners */
 324   if (ATK_IS_IMPLEMENTOR (gobject))
 325   {
 326     aobject = atk_implementor_ref_accessible (ATK_IMPLEMENTOR (gobject));
 327   }
 328   else if (ATK_IS_OBJECT (gobject))
 329   {
 330     aobject = ATK_OBJECT (gobject);
 331     g_object_ref (aobject);
 332   }
 333   else
 334   {
 335     g_error("received property-change event from non-AtkImplementor");
 336   }
 337
 338   snprintf(sbuf, APP_STATIC_BUFF_SZ, "%s:%s", name, g_type_name (signal_query.itype));
 339   source =  CORBA_Object_duplicate (BONOBO_OBJREF (spi_accessible_new (aobject)), &ev);
 340   e->type = CORBA_string_dup (sbuf);
 341   e->source = source;
 342   e->detail1 = 0;
 343   e->detail2 = 0;
 344   Accessibility_Registry_notifyEvent (registry, e, &ev);
 345   g_object_unref (aobject);
 346   return TRUE;
 347 }
 348
 349 static Accessibility_Registry bridge_get_registry ()
 350 {
 351   return registry;
 352 }