atspi/atspi-event-listener.c

   1 /*
   2  * AT-SPI - Assistive Technology Service Provider Interface
   3  * (Gnome Accessibility Project; http://developer.gnome.org/projects/gap)
   4  *
   5  * Copyright 2002 Ximian Inc.
   6  * Copyright 2002 Sun Microsystems, 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 #include "atspi-private.h"
  25 #include <string.h>
  26 #include <ctype.h>
  27
  28 typedef struct
  29 {
  30   AtspiEventListenerCB callback;
  31   void *user_data;
  32   GDestroyNotify callback_destroyed;
  33   char *category;
  34   char *name;
  35   char *detail;
  36 } EventListenerEntry;
  37
  38 G_DEFINE_TYPE (AtspiEventListener, atspi_event_listener, G_TYPE_OBJECT)
  39
  40 void
  41 atspi_event_listener_init (AtspiEventListener *listener)
  42 {
  43 }
  44
  45 void
  46 atspi_event_listener_class_init (AtspiEventListenerClass *klass)
  47 {
  48 }
  49
  50 static void
  51 remove_datum (const AtspiEvent *event, void *user_data)
  52 {
  53   AtspiEventListenerSimpleCB cb = user_data;
  54   cb (event);
  55 }
  56
  57 typedef struct
  58 {
  59   gpointer callback;
  60   GDestroyNotify callback_destroyed;
  61   gint ref_count;
  62 } CallbackInfo;
  63 static GHashTable *callbacks;
  64
  65 void
  66 callback_ref (void *callback, GDestroyNotify callback_destroyed)
  67 {
  68   CallbackInfo *info;
  69
  70   if (!callbacks)
  71   {
  72     callbacks = g_hash_table_new (g_direct_hash, g_direct_equal);
  73     if (!callbacks)
  74       return;
  75   }
  76
  77   info = g_hash_table_lookup (callbacks, callback);
  78   if (!info)
  79   {
  80     info = g_new (CallbackInfo, 1);
  81     if (!info)
  82       return;
  83     info->callback = callback;
  84     info->callback_destroyed = callback_destroyed;
  85     info->ref_count = 1;
  86     g_hash_table_insert (callbacks, callback, info);
  87   }
  88   else
  89     info->ref_count++;
  90 }
  91
  92 void
  93 callback_unref (gpointer callback)
  94 {
  95   CallbackInfo *info;
  96
  97   if (!callbacks)
  98     return;
  99   info = g_hash_table_lookup (callbacks, callback);
 100   if (!info)
 101   {
 102     g_warning ("Atspi: Dereferencing invalid callback %p\n", callback);
 103     return;
 104   }
 105   info->ref_count--;
 106   if (info->ref_count == 0)
 107   {
 108 #if 0
 109     /* TODO: Figure out why this seg faults from Python */
 110     if (info->callback_destroyed)
 111       (*info->callback_destroyed) (info->callback);
 112 #endif
 113     g_free (info);
 114     g_hash_table_remove (callbacks, callback);
 115   }
 116 }
 117
 118 /**
 119  * atspi_event_listener_new_simple:
 120  * @callback: (scope notified): An #AtspiEventListenerSimpleCB to be called
 121  * when an event is fired.
 122  * @callback_destroyed: A #GDestroyNotify called when the listener is freed
 123  * and data associated with the callback should be freed.  Can be NULL.
 124  *
 125  * Returns: (transfer full): A new #AtspiEventListener.
 126  */
 127 AtspiEventListener *
 128 atspi_event_listener_new_simple (AtspiEventListenerSimpleCB callback,
 129                                  GDestroyNotify callback_destroyed)
 130 {
 131   AtspiEventListener *listener = g_object_new (ATSPI_TYPE_EVENT_LISTENER, NULL);
 132   listener->callback = remove_datum;
 133   callback_ref (remove_datum, callback_destroyed);
 134   listener->user_data = callback;
 135   listener->cb_destroyed = callback_destroyed;
 136   return listener;
 137 }
 138
 139 static GList *event_listeners = NULL;
 140
 141 static gchar *
 142 convert_name_from_dbus (const char *name)
 143 {
 144   gchar *ret = g_malloc (g_utf8_strlen (name, -1) * 2 + 1);
 145   const char *p = name;
 146   gchar *q = ret;
 147
 148   if (!ret)
 149     return NULL;
 150
 151   while (*p)
 152   {
 153     if (isupper (*p))
 154     {
 155       if (q > ret)
 156         *q++ = '-';
 157       *q++ = tolower (*p++);
 158     }
 159     else
 160       *q++ = *p++;
 161   }
 162   *q = '\0';
 163   return ret;
 164 }
 165
 166 static void
 167 cache_process_children_changed (AtspiEvent *event)
 168 {
 169   AtspiAccessible *child;
 170
 171   if (!G_VALUE_HOLDS (&event->any_data, ATSPI_TYPE_ACCESSIBLE) ||
 172       !event->source->children ||
 173       atspi_state_set_contains (event->source->states, ATSPI_STATE_MANAGES_DESCENDANTS))
 174     return;
 175
 176   child = g_value_get_object (&event->any_data);
 177
 178   if (!strncmp (event->type, "object:children-changed:add", 27))
 179   {
 180     if (g_list_find (event->source->children, child))
 181       return;
 182     GList *new_list = g_list_insert (event->source->children, g_object_ref (child), event->detail1);
 183     if (new_list)
 184       event->source->children = new_list;
 185   }
 186   else if (g_list_find (event->source->children, child))
 187   {
 188     event->source->children = g_list_remove (event->source->children, child);
 189     if (child == child->parent.app->root)
 190       g_object_run_dispose (G_OBJECT (child->parent.app));
 191     g_object_unref (child);
 192   }
 193 }
 194
 195 static void
 196 cache_process_property_change (AtspiEvent *event)
 197 {
 198   if (!strcmp (event->type, "object:property-change:accessible-parent"))
 199   {
 200     if (event->source->accessible_parent)
 201       g_object_unref (event->source->accessible_parent);
 202     if (G_VALUE_HOLDS (&event->any_data, ATSPI_TYPE_ACCESSIBLE))
 203     {
 204       event->source->accessible_parent = g_value_dup_object (&event->any_data);
 205       _atspi_accessible_add_cache (event->source, ATSPI_CACHE_PARENT);
 206     }
 207     else
 208     {
 209       event->source->accessible_parent = NULL;
 210       event->source->cached_properties &= ~ATSPI_CACHE_PARENT;
 211     }
 212   }
 213   else if (!strcmp (event->type, "object:property-change:accessible-name"))
 214   {
 215     if (event->source->name)
 216       g_free (event->source->name);
 217     if (G_VALUE_HOLDS_STRING (&event->any_data))
 218     {
 219       event->source->name = g_value_dup_string (&event->any_data);
 220       _atspi_accessible_add_cache (event->source, ATSPI_CACHE_NAME);
 221     }
 222     else
 223     {
 224       event->source->name = NULL;
 225       event->source->cached_properties &= ~ATSPI_CACHE_NAME;
 226     }
 227   }
 228   else if (!strcmp (event->type, "object:property-change:accessible-description"))
 229   {
 230     if (event->source->description)
 231       g_free (event->source->description);
 232     if (G_VALUE_HOLDS_STRING (&event->any_data))
 233     {
 234       event->source->description = g_value_dup_string (&event->any_data);
 235       _atspi_accessible_add_cache (event->source, ATSPI_CACHE_DESCRIPTION);
 236     }
 237     else
 238     {
 239       event->source->description = NULL;
 240       event->source->cached_properties &= ~ATSPI_CACHE_DESCRIPTION;
 241     }
 242   }
 243 }
 244
 245 static void
 246 cache_process_state_changed (AtspiEvent *event)
 247 {
 248   if (event->source->states)
 249     atspi_state_set_set_by_name (event->source->states, event->type + 21,
 250                                  event->detail1);
 251 }
 252
 253 static dbus_bool_t
 254 demarshal_rect (DBusMessageIter *iter, AtspiRect *rect)
 255 {
 256   dbus_int32_t x, y, width, height;
 257   DBusMessageIter iter_struct;
 258
 259   dbus_message_iter_recurse (iter, &iter_struct);
 260   if (dbus_message_iter_get_arg_type (&iter_struct) != DBUS_TYPE_INT32) return FALSE;
 261   dbus_message_iter_get_basic (&iter_struct, &x);
 262   dbus_message_iter_next (&iter_struct);
 263   if (dbus_message_iter_get_arg_type (&iter_struct) != DBUS_TYPE_INT32) return FALSE;
 264   dbus_message_iter_get_basic (&iter_struct, &y);
 265   dbus_message_iter_next (&iter_struct);
 266   if (dbus_message_iter_get_arg_type (&iter_struct) != DBUS_TYPE_INT32) return FALSE;
 267   dbus_message_iter_get_basic (&iter_struct, &width);
 268   dbus_message_iter_next (&iter_struct);
 269   if (dbus_message_iter_get_arg_type (&iter_struct) != DBUS_TYPE_INT32) return FALSE;
 270   dbus_message_iter_get_basic (&iter_struct, &height);
 271   rect->x = x;
 272   rect->y = y;
 273   rect->width = width;
 274   rect->height = height;
 275   return TRUE;
 276 }
 277
 278 static gchar *
 279 strdup_and_adjust_for_dbus (const char *s)
 280 {
 281   gchar *d = g_strdup (s);
 282   gchar *p;
 283   int parts = 0;
 284
 285   if (!d)
 286     return NULL;
 287
 288   for (p = d; *p; p++)
 289   {
 290     if (*p == '-')
 291     {
 292       memmove (p, p + 1, g_utf8_strlen (p, -1));
 293       *p = toupper (*p);
 294     }
 295     else if (*p == ':')
 296     {
 297       parts++;
 298       if (parts == 2)
 299         break;
 300       p [1] = toupper (p [1]);
 301     }
 302   }
 303
 304   d [0] = toupper (d [0]);
 305   return d;
 306 }
 307
 308 static gboolean
 309 convert_event_type_to_dbus (const char *eventType, char **categoryp, char **namep, char **detailp, char **matchrule)
 310 {
 311   gchar *tmp = strdup_and_adjust_for_dbus (eventType);
 312   char *category = NULL, *name = NULL, *detail = NULL;
 313   char *saveptr = NULL;
 314
 315   if (tmp == NULL) return FALSE;
 316   category = strtok_r (tmp, ":", &saveptr);
 317   if (category) category = g_strdup (category);
 318   if (!category) goto oom;
 319   name = strtok_r (NULL, ":", &saveptr);
 320   if (name)
 321   {
 322     name = g_strdup (name);
 323     if (!name) goto oom;
 324     detail = strtok_r (NULL, ":", &saveptr);
 325     if (detail) detail = g_strdup (detail);
 326   }
 327   if (matchrule)
 328   {
 329     *matchrule = g_strdup_printf ("type='signal',interface='org.a11y.atspi.Event.%s'", category);
 330     if (!*matchrule) goto oom;
 331     if (name && name [0])
 332     {
 333       gchar *new_str = g_strconcat (*matchrule, ",member='", name, "'", NULL);
 334       if (new_str)
 335       {
 336         g_free (*matchrule);
 337         *matchrule = new_str;
 338       }
 339     }
 340     if (detail && detail [0])
 341     {
 342       gchar *new_str = g_strconcat (*matchrule, ",arg0='", detail, "'", NULL);
 343       if (new_str)
 344       {
 345         g_free (*matchrule);
 346         *matchrule = new_str;
 347       }
 348     }
 349   }
 350   if (categoryp) *categoryp = category;
 351   else g_free (category);
 352   if (namep) *namep = name;
 353   else if (name) g_free (name);
 354   if (detailp) *detailp = detail;
 355   else if (detail) g_free (detail);
 356   g_free (tmp);
 357   return TRUE;
 358 oom:
 359   if (tmp) g_free (tmp);
 360   if (category) g_free (category);
 361   if (name) g_free (name);
 362   if (detail) g_free (detail);
 363   return FALSE;
 364 }
 365
 366 static void
 367 listener_entry_free (EventListenerEntry *e)
 368 {
 369   gpointer callback = (e->callback == remove_datum ? e->user_data : e->callback);
 370   g_free (e->category);
 371   g_free (e->name);
 372   if (e->detail) g_free (e->detail);
 373   callback_unref (callback);
 374   g_free (e);
 375 }
 376
 377 /**
 378  * atspi_event_listener_register:
 379  * @listener: The #AtspiEventListener to register against an event type.
 380  * @event_type: a character string indicating the type of events for which
 381  *            notification is requested.  Format is
 382  *            EventClass:major_type:minor_type:detail
 383  *            where all subfields other than EventClass are optional.
 384  *            EventClasses include "object", "window", "mouse",
 385  *            and toolkit events (e.g. "Gtk", "AWT").
 386  *            Examples: "focus:", "Gtk:GtkWidget:button_press_event".
 387  *
 388  * Legal object event types:
 389  *
 390  *    (property change events)
 391  *
 392  *            object:property-change
 393  *            object:property-change:accessible-name
 394  *            object:property-change:accessible-description
 395  *            object:property-change:accessible-parent
 396  *            object:property-change:accessible-value
 397  *            object:property-change:accessible-role
 398  *            object:property-change:accessible-table-caption
 399  *            object:property-change:accessible-table-column-description
 400  *            object:property-change:accessible-table-column-header
 401  *            object:property-change:accessible-table-row-description
 402  *            object:property-change:accessible-table-row-header
 403  *            object:property-change:accessible-table-summary
 404  *
 405  *    (other object events)
 406  *
 407  *            object:state-changed
 408  *            object:children-changed
 409  *            object:visible-data-changed
 410  *            object:selection-changed
 411  *            object:text-selection-changed
 412  *            object:text-changed
 413  *            object:text-caret-moved
 414  *            object:row-inserted
 415  *            object:row-reordered
 416  *            object:row-deleted
 417  *            object:column-inserted
 418  *            object:column-reordered
 419  *            object:column-deleted
 420  *            object:model-changed
 421  *            object:active-descendant-changed
 422  *
 423  *  (window events)
 424  *
 425  *            window:minimize
 426  *            window:maximize
 427  *            window:restore
 428  *            window:close
 429  *            window:create
 430  *            window:reparent
 431  *            window:desktop-create
 432  *            window:desktop-destroy
 433  *            window:activate
 434  *            window:deactivate
 435  *            window:raise
 436  *            window:lower
 437  *            window:move
 438  *            window:resize
 439  *            window:shade
 440  *            window:unshade
 441  *            window:restyle
 442  *
 443  *  (other events)
 444  *
 445  *            focus:
 446  *            mouse:abs
 447  *            mouse:rel
 448  *            mouse:b1p
 449  *            mouse:b1r
 450  *            mouse:b2p
 451  *            mouse:b2r
 452  *            mouse:b3p
 453  *            mouse:b3r
 454  *
 455  * NOTE: this string may be UTF-8, but should not contain byte value 56
 456  *            (ascii ':'), except as a delimiter, since non-UTF-8 string
 457  *            delimiting functions are used internally.
 458  *            In general, listening to
 459  *            toolkit-specific events is not recommended.
 460  *
 461  * Add an in-process callback function to an existing AtspiEventListener.
 462  *
 463  * Returns: #TRUE if successful, otherwise #FALSE.
 464  **/
 465 gboolean
 466 atspi_event_listener_register (AtspiEventListener *listener,
 467                                              const gchar              *event_type,
 468                                              GError **error)
 469 {
 470   /* TODO: Keep track of which events have been registered, so that we
 471  * deregister all of them when the event listener is destroyed */
 472
 473   return atspi_event_listener_register_from_callback (listener->callback,
 474                                                       listener->user_data,
 475                                                       listener->cb_destroyed,
 476                                                       event_type, error);
 477 }
 478
 479 /**
 480  * atspi_event_listener_register_from_callback:
 481  * @callback: (scope notified): the #AtspiEventListenerCB to be registered against
 482  *            an event type.
 483  * @user_data: (closure): User data to be passed to the callback.
 484  * @callback_destroyed: A #GDestroyNotify called when the callback is destroyed.
 485  * @event_type: a character string indicating the type of events for which
 486  *            notification is requested.  See #atspi_event_listener_register
 487  * for a description of the format.
 488  */
 489 gboolean
 490 atspi_event_listener_register_from_callback (AtspiEventListenerCB callback,
 491                                              void *user_data,
 492                                              GDestroyNotify callback_destroyed,
 493                                              const gchar              *event_type,
 494                                              GError **error)
 495 {
 496   EventListenerEntry *e;
 497   char *matchrule;
 498   DBusError d_error;
 499   GList *new_list;
 500   DBusMessage *message, *reply;
 501
 502   if (!callback)
 503     {
 504       return FALSE;
 505     }
 506
 507   if (!event_type)
 508   {
 509     g_warning (_("called atspi_event_listener_register_from_callback with a NULL event_type"));
 510     return FALSE;
 511   }
 512
 513   e = g_new (EventListenerEntry, 1);
 514   if (!e) return FALSE;
 515   e->callback = callback;
 516   e->user_data = user_data;
 517   e->callback_destroyed = callback_destroyed;
 518   callback_ref (callback == remove_datum ? user_data : callback,
 519                 callback_destroyed);
 520   if (!convert_event_type_to_dbus (event_type, &e->category, &e->name, &e->detail, &matchrule))
 521   {
 522     g_free (e);
 523     return FALSE;
 524   }
 525   new_list = g_list_prepend (event_listeners, e);
 526   if (!new_list)
 527   {
 528     listener_entry_free (e);
 529     return FALSE;
 530   }
 531   event_listeners = new_list;
 532   dbus_error_init (&d_error);
 533   dbus_bus_add_match (_atspi_bus(), matchrule, &d_error);
 534   if (d_error.message)
 535   {
 536     g_warning ("Atspi: Adding match: %s", d_error.message);
 537     /* TODO: Set error */
 538   }
 539
 540   dbus_error_init (&d_error);
 541   message = dbus_message_new_method_call (atspi_bus_registry,
 542         atspi_path_registry,
 543         atspi_interface_registry,
 544         "RegisterEvent");
 545   if (!message)
 546     return FALSE;
 547   dbus_message_append_args (message, DBUS_TYPE_STRING, &event_type, DBUS_TYPE_INVALID);
 548   reply = _atspi_dbus_send_with_reply_and_block (message, error);
 549   if (reply)
 550     dbus_message_unref (reply);
 551
 552   return TRUE;
 553 }
 554
 555 /**
 556  * atspi_event_listener_register_no_data:
 557  * @callback: (scope notified): the #AtspiEventListenerSimpleCB to be
 558  *            registered against an event type.
 559  * @callback_destroyed: A #GDestroyNotify called when the callback is destroyed.
 560  * @event_type: a character string indicating the type of events for which
 561  *            notification is requested.  Format is
 562  *            EventClass:major_type:minor_type:detail
 563  *            where all subfields other than EventClass are optional.
 564  *            EventClasses include "object", "window", "mouse",
 565  *            and toolkit events (e.g. "Gtk", "AWT").
 566  *            Examples: "focus:", "Gtk:GtkWidget:button_press_event".
 567  *
 568  * Like atspi_event_listener_register, but callback takes no user_data.
 569  **/
 570 gboolean
 571 atspi_event_listener_register_no_data (AtspiEventListenerSimpleCB callback,
 572                                  GDestroyNotify callback_destroyed,
 573                                  const gchar              *event_type,
 574                                  GError **error)
 575 {
 576   return atspi_event_listener_register_from_callback (remove_datum, callback,
 577                                                       callback_destroyed,
 578                                                       event_type, error);
 579 }
 580
 581 static gboolean
 582 is_superset (const gchar *super, const gchar *sub)
 583 {
 584   if (!super || !super [0])
 585     return TRUE;
 586   return (strcmp (super, sub) == 0);
 587 }
 588
 589 /**
 590  * atspi_event_listener_deregister:
 591  * @listener: The #AtspiEventListener to deregister.
 592  * @event_type: a string specifying the event type for which this
 593  *             listener is to be deregistered.
 594  *
 595  * deregisters an #AtspiEventListener from the registry, for a specific
 596  *             event type.
 597  *
 598  * Returns: #TRUE if successful, otherwise #FALSE.
 599  **/
 600 gboolean
 601 atspi_event_listener_deregister (AtspiEventListener *listener,
 602                                                const gchar              *event_type,
 603                                                GError **error)
 604 {
 605   return atspi_event_listener_deregister_from_callback (listener->callback,
 606                                                         listener->user_data,
 607                                                         event_type, error);
 608 }
 609
 610 /**
 611  * atspi_event_listener_deregister_from_callback:
 612  * @callback: (scope call): the #AtspiEventListenerCB registered against an
 613  *            event type.
 614  * @user_data: (closure): User data that was passed in for this callback.
 615  * @event_type: a string specifying the event type for which this
 616  *             listener is to be deregistered.
 617  *
 618  * deregisters an #AtspiEventListenerCB from the registry, for a specific
 619  *             event type.
 620  *
 621  * Returns: #TRUE if successful, otherwise #FALSE.
 622  **/
 623 gboolean
 624 atspi_event_listener_deregister_from_callback (AtspiEventListenerCB callback,
 625                                                void *user_data,
 626                                                const gchar              *event_type,
 627                                                GError **error)
 628 {
 629   char *category, *name, *detail, *matchrule;
 630   GList *l;
 631
 632   if (!convert_event_type_to_dbus (event_type, &category, &name, &detail, &matchrule))
 633   {
 634     return FALSE;
 635   }
 636   if (!callback)
 637     {
 638       return FALSE;
 639     }
 640
 641   for (l = event_listeners; l;)
 642   {
 643     EventListenerEntry *e = l->data;
 644     if (e->callback == callback &&
 645         e->user_data == user_data &&
 646         is_superset (category, e->category) &&
 647         is_superset (name, e->name) &&
 648         is_superset (detail, e->detail))
 649     {
 650       gboolean need_replace;
 651       DBusError d_error;
 652       DBusMessage *message, *reply;
 653       need_replace = (l == event_listeners);
 654       l = g_list_remove (l, e);
 655       if (need_replace)
 656         event_listeners = l;
 657       dbus_error_init (&d_error);
 658       dbus_bus_remove_match (_atspi_bus(), matchrule, &d_error);
 659       dbus_error_init (&d_error);
 660       message = dbus_message_new_method_call (atspi_bus_registry,
 661             atspi_path_registry,
 662             atspi_interface_registry,
 663             "RegisterEvent");
 664       if (!message)
 665       return FALSE;
 666       dbus_message_append_args (message, DBUS_TYPE_STRING, &event_type, DBUS_TYPE_INVALID);
 667       reply = _atspi_dbus_send_with_reply_and_block (message, error);
 668       dbus_message_unref (reply);
 669
 670       listener_entry_free (e);
 671     }
 672     else l = g_list_next (l);
 673   }
 674   g_free (category);
 675   g_free (name);
 676   if (detail) g_free (detail);
 677   g_free (matchrule);
 678   return TRUE;
 679 }
 680
 681 /**
 682  * atspi_event_listener_deregister_no_data:
 683  * @callback: (scope call): the #AtspiEventListenerSimpleCB registered against
 684  *            an event type.
 685  * @event_type: a string specifying the event type for which this
 686  *             listener is to be deregistered.
 687  *
 688  * deregisters an #AtspiEventListenerSimpleCB from the registry, for a specific
 689  *             event type.
 690  *
 691  * Returns: #TRUE if successful, otherwise #FALSE.
 692  **/
 693 gboolean
 694 atspi_event_listener_deregister_no_data (AtspiEventListenerSimpleCB callback,
 695                                    const gchar              *event_type,
 696                                    GError **error)
 697 {
 698   return atspi_event_listener_deregister_from_callback (remove_datum, callback,
 699                                                         event_type,
 700                                                         error);
 701 }
 702
 703 static AtspiEvent *
 704 atspi_event_copy (AtspiEvent *src)
 705 {
 706   AtspiEvent *dst = g_new0 (AtspiEvent, 1);
 707   dst->type = g_strdup (src->type);
 708   dst->source = g_object_ref (src->source);
 709   dst->detail1 = src->detail1;
 710   dst->detail2 = src->detail2;
 711   g_value_init (&dst->any_data, G_VALUE_TYPE (&src->any_data));
 712   g_value_copy (&src->any_data, &dst->any_data);
 713   return dst;
 714 }
 715
 716 static void
 717 atspi_event_free (AtspiEvent *event)
 718 {
 719   g_object_unref (event->source);
 720   g_free (event->type);
 721   g_value_unset (&event->any_data);
 722   g_free (event);
 723 }
 724
 725 void
 726 _atspi_send_event (AtspiEvent *e)
 727 {
 728   char *category, *name, *detail;
 729   GList *l;
 730
 731   /* Ensure that the value is set to avoid a Python exception */
 732   /* TODO: Figure out how to do this without using a private field */
 733   if (e->any_data.g_type == 0)
 734   {
 735     g_value_init (&e->any_data, G_TYPE_INT);
 736     g_value_set_int (&e->any_data, 0);
 737   }
 738
 739   if (!convert_event_type_to_dbus (e->type, &category, &name, &detail, NULL))
 740   {
 741     g_warning ("Atspi: Couldn't parse event: %s\n", e->type);
 742     return;
 743   }
 744   for (l = event_listeners; l; l = g_list_next (l))
 745   {
 746     EventListenerEntry *entry = l->data;
 747     if (!strcmp (category, entry->category) &&
 748         (entry->name == NULL || !strcmp (name, entry->name)) &&
 749         (entry->detail == NULL || !strcmp (detail, entry->detail)))
 750     {
 751         entry->callback (atspi_event_copy (e), entry->user_data);
 752     }
 753   }
 754   if (detail) g_free (detail);
 755   g_free (name);
 756   g_free (category);
 757 }
 758
 759 DBusHandlerResult
 760 atspi_dbus_handle_event (DBusConnection *bus, DBusMessage *message, void *data)
 761 {
 762   char *detail = NULL;
 763   const char *category = dbus_message_get_interface (message);
 764   const char *member = dbus_message_get_member (message);
 765   const char *signature = dbus_message_get_signature (message);
 766   gchar *name;
 767   gchar *converted_type;
 768   DBusMessageIter iter, iter_variant;
 769   dbus_message_iter_init (message, &iter);
 770   AtspiEvent e;
 771   dbus_int32_t detail1, detail2;
 772   char *p;
 773
 774   if (strcmp (signature, "siiv(so)") != 0)
 775   {
 776     g_warning (_("Got invalid signature %s for signal %s from interface %s\n"), signature, member, category);
 777     return DBUS_HANDLER_RESULT_HANDLED;
 778   }
 779
 780   memset (&e, 0, sizeof (e));
 781
 782   if (category)
 783   {
 784     category = g_utf8_strrchr (category, -1, '.');
 785     if (category == NULL)
 786     {
 787       // TODO: Error
 788       return DBUS_HANDLER_RESULT_NOT_YET_HANDLED;
 789     }
 790     category++;
 791   }
 792   dbus_message_iter_get_basic (&iter, &detail);
 793   dbus_message_iter_next (&iter);
 794   dbus_message_iter_get_basic (&iter, &detail1);
 795   e.detail1 = detail1;
 796   dbus_message_iter_next (&iter);
 797   dbus_message_iter_get_basic (&iter, &detail2);
 798   e.detail2 = detail2;
 799   dbus_message_iter_next (&iter);
 800
 801   converted_type = convert_name_from_dbus (category);
 802   name = convert_name_from_dbus (member);
 803   detail = convert_name_from_dbus (detail);
 804
 805   if (strcasecmp  (category, name) != 0)
 806   {
 807     p = g_strconcat (converted_type, ":", name, NULL);
 808     if (p)
 809     {
 810       g_free (converted_type);
 811       converted_type = p;
 812     }
 813   }
 814   else if (detail [0] == '\0')
 815   {
 816     p = g_strconcat (converted_type, ":",  NULL);
 817     if (p)
 818     {
 819       g_free (converted_type);
 820       converted_type = p;
 821     }
 822   }
 823
 824   if (detail[0] != '\0')
 825   {
 826     p = g_strconcat (converted_type, ":", detail, NULL);
 827     if (p)
 828     {
 829       g_free (converted_type);
 830       converted_type = p;
 831     }
 832   }
 833   e.type = converted_type;
 834   e.source = _atspi_ref_accessible (dbus_message_get_sender(message), dbus_message_get_path(message));
 835
 836   dbus_message_iter_recurse (&iter, &iter_variant);
 837   switch (dbus_message_iter_get_arg_type (&iter_variant))
 838   {
 839     case DBUS_TYPE_STRUCT:
 840     {
 841       AtspiRect rect;
 842       if (demarshal_rect (&iter_variant, &rect))
 843       {
 844         g_value_init (&e.any_data, ATSPI_TYPE_RECT);
 845         g_value_set_boxed (&e.any_data, &rect);
 846       }
 847       else
 848       {
 849         AtspiAccessible *accessible;
 850         accessible = _atspi_dbus_return_accessible_from_iter (&iter_variant);
 851         g_value_init (&e.any_data, ATSPI_TYPE_ACCESSIBLE);
 852         g_value_set_instance (&e.any_data, accessible);
 853         g_object_unref (accessible);    /* value now owns it */
 854       }
 855       break;
 856     }
 857     case DBUS_TYPE_STRING:
 858     {
 859       dbus_message_iter_get_basic (&iter_variant, &p);
 860       g_value_init (&e.any_data, G_TYPE_STRING);
 861       g_value_set_string (&e.any_data, p);
 862       break;
 863     }
 864   default:
 865     break;
 866   }
 867
 868   if (!strncmp (e.type, "object:children-changed", 23))
 869   {
 870     cache_process_children_changed (&e);
 871   }
 872   else if (!strncmp (e.type, "object:property-change", 22))
 873   {
 874     cache_process_property_change (&e);
 875   }
 876   else if (!strncmp (e.type, "object:state-changed", 20))
 877   {
 878     cache_process_state_changed (&e);
 879   }
 880
 881   _atspi_send_event (&e);
 882
 883   g_free (converted_type);
 884   g_free (name);
 885   g_free (detail);
 886   g_object_unref (e.source);
 887   g_value_unset (&e.any_data);
 888   return DBUS_HANDLER_RESULT_HANDLED;
 889 }
 890
 891 G_DEFINE_BOXED_TYPE (AtspiEvent, atspi_event, atspi_event_copy, atspi_event_free)