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