registryd/registry.c

   1 /*
   2  * AT-SPI - Assistive Technology Service Provider Interface
   3  * (Gnome Accessibility Project; http://developer.gnome.org/projects/gap)
   4  *
   5  * Copyright 2008, 2010 Codethink Ltd.
   6  * Copyright 2001, 2002 Sun Microsystems Inc.,
   7  * Copyright 2001, 2002 Ximian, Inc.
   8  *
   9  * This library is free software; you can redistribute it and/or
  10  * modify it under the terms of the GNU Library General Public
  11  * License as published by the Free Software Foundation; either
  12  * version 2 of the License, or (at your option) any later version.
  13  *
  14  * This library is distributed in the hope that it will be useful,
  15  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  16  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  17  * Library General Public License for more details.
  18  *
  19  * You should have received a copy of the GNU Library General Public
  20  * License along with this library; if not, write to the
  21  * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
  22  * Boston, MA 02111-1307, USA.
  23  */
  24
  25 #include <config.h>
  26 #include <string.h>
  27 #include <ctype.h>
  28
  29 #include "paths.h"
  30 #include "registry.h"
  31 #include "introspection.h"
  32
  33 typedef struct event_data event_data;
  34 struct event_data
  35 {
  36   gchar *bus_name;
  37   gchar **data;
  38   GSList *properties;
  39 };
  40
  41 static void
  42 children_added_listener (DBusConnection * bus,
  43                          gint             index,
  44                          const gchar    * name,
  45                          const gchar    * path);
  46
  47 static void
  48 children_removed_listener (DBusConnection * bus,
  49                            gint             index,
  50                            const gchar    * name,
  51                            const gchar    * path);
  52
  53 /*---------------------------------------------------------------------------*/
  54
  55 typedef struct _SpiReference
  56 {
  57   gchar *name;
  58   gchar *path;
  59 } SpiReference;
  60
  61 static SpiReference *
  62 spi_reference_new (const gchar *name, const gchar *path)
  63 {
  64   SpiReference *ref;
  65
  66   ref = g_new0 (SpiReference, 1);
  67   ref->name = g_strdup (name);
  68   ref->path = g_strdup (path);
  69
  70   return ref;
  71 }
  72
  73 static void
  74 spi_reference_free (SpiReference *ref)
  75 {
  76   g_free (ref->name);
  77   g_free (ref->path);
  78   g_free (ref);
  79 }
  80
  81 /*---------------------------------------------------------------------------*/
  82
  83 G_DEFINE_TYPE(SpiRegistry, spi_registry, G_TYPE_OBJECT)
  84
  85 static void
  86 spi_registry_class_init (SpiRegistryClass *klass)
  87 {
  88   spi_registry_parent_class = g_type_class_ref (G_TYPE_OBJECT);
  89 }
  90
  91 static void
  92 spi_registry_init (SpiRegistry *registry)
  93 {
  94   registry->apps = g_ptr_array_new_with_free_func ((GDestroyNotify) spi_reference_free);
  95 }
  96
  97 /*---------------------------------------------------------------------------*/
  98
  99 static dbus_bool_t
 100 return_v_string (DBusMessageIter * iter, const gchar * str)
 101 {
 102   DBusMessageIter variant;
 103
 104   if (!dbus_message_iter_open_container (iter, DBUS_TYPE_VARIANT, "s",
 105                                     &variant))
 106     return FALSE;
 107     dbus_message_iter_append_basic (&variant, DBUS_TYPE_STRING, &str);
 108   dbus_message_iter_close_container (iter, &variant);
 109   return TRUE;
 110 }
 111
 112 static dbus_bool_t
 113 append_reference (DBusMessageIter * iter, const char * name, const char * path)
 114 {
 115   DBusMessageIter iter_struct;
 116
 117   if (!dbus_message_iter_open_container (iter, DBUS_TYPE_STRUCT, NULL,
 118                                     &iter_struct))
 119     return FALSE;
 120   dbus_message_iter_append_basic (&iter_struct, DBUS_TYPE_STRING, &name);
 121   dbus_message_iter_append_basic (&iter_struct, DBUS_TYPE_OBJECT_PATH, &path);
 122   dbus_message_iter_close_container (iter, &iter_struct);
 123   return TRUE;
 124 }
 125
 126 /*---------------------------------------------------------------------------*/
 127
 128 static gboolean
 129 compare_reference (SpiReference *one, SpiReference *two)
 130 {
 131   if (g_strcmp0 (one->name, two->name) == 0 &&
 132       g_strcmp0 (one->path, two->path) == 0)
 133     return TRUE;
 134   else
 135     return FALSE;
 136 }
 137
 138 static gboolean
 139 find_index_of_reference (GPtrArray *arr, const gchar *name, const gchar * path, guint *index)
 140 {
 141   SpiReference *ref;
 142   gboolean found = FALSE;
 143   guint i = 0;
 144
 145   ref = spi_reference_new (name, path);
 146
 147   for (i = 0; i < arr->len; i++)
 148     {
 149       if (compare_reference (ref, g_ptr_array_index (arr, i)));
 150         {
 151           found = TRUE;
 152           break;
 153         }
 154     }
 155
 156   spi_reference_free (ref);
 157
 158   *index = i;
 159   return found;
 160 }
 161
 162 static void
 163 add_application (SpiRegistry *reg, DBusConnection *bus, const gchar *name, const gchar *path)
 164 {
 165   g_ptr_array_add (reg->apps, spi_reference_new (name, path));
 166   children_added_listener (bus, reg->apps->len - 1, name, path);
 167 }
 168
 169 static void
 170 set_id (SpiRegistry *reg, DBusConnection *bus, const gchar *name, const gchar *path)
 171 {
 172   DBusMessage *message;
 173   DBusMessageIter iter, iter_variant;
 174   const char *iface_application = "org.a11y.atspi.Application";
 175   const char *id = "Id";
 176
 177   message = dbus_message_new_method_call (name, path,
 178                                           DBUS_INTERFACE_PROPERTIES, "Set");
 179   if (!message)
 180     return;
 181   dbus_message_iter_init_append (message, &iter);
 182   dbus_message_iter_append_basic (&iter, DBUS_TYPE_STRING, &iface_application);
 183   dbus_message_iter_append_basic (&iter, DBUS_TYPE_STRING, &id);
 184   dbus_message_iter_open_container (&iter, DBUS_TYPE_VARIANT, "i", &iter_variant);
 185   dbus_message_iter_append_basic (&iter_variant, DBUS_TYPE_INT32, &reg->id);
 186   /* TODO: This will cause problems if we cycle through 2^31 ids */
 187   reg->id++;
 188   dbus_message_iter_close_container (&iter, &iter_variant);
 189   dbus_connection_send (bus, message, NULL);
 190   dbus_message_unref (message);
 191 }
 192
 193 static void
 194 remove_application (SpiRegistry *reg, DBusConnection *bus, guint index)
 195 {
 196   SpiReference *ref = g_ptr_array_index (reg->apps, index);
 197
 198   spi_remove_device_listeners (reg->dec, ref->name);
 199   children_removed_listener (bus, index, ref->name, ref->path);
 200   g_ptr_array_remove_index (reg->apps, index);
 201 }
 202
 203 static gboolean
 204 event_is_subtype (gchar **needle, gchar **haystack)
 205 {
 206   while (*haystack && **haystack)
 207     {
 208       if (g_strcmp0 (*needle, *haystack))
 209         return FALSE;
 210       needle++;
 211       haystack++;
 212     }
 213   return TRUE;
 214 }
 215
 216 static gboolean
 217 needs_mouse_poll (char **event)
 218 {
 219   if (g_strcmp0 (event [0], "Mouse") != 0)
 220     return FALSE;
 221   if (!event [1] || !event [1][0])
 222     return TRUE;
 223   return (g_strcmp0 (event [1], "Abs") == 0);
 224 }
 225
 226 static void
 227 remove_events (SpiRegistry *registry, const char *bus_name, const char *event)
 228 {
 229   gchar **remove_data;
 230   GList *list;
 231   gboolean mouse_found = FALSE;
 232   DBusMessage *signal;
 233
 234   remove_data = g_strsplit (event, ":", 3);
 235   if (!remove_data)
 236     {
 237       return;
 238     }
 239
 240   for (list = registry->events; list;)
 241     {
 242       event_data *evdata = list->data;
 243       list = list->next;
 244       if (!g_strcmp0 (evdata->bus_name, bus_name) &&
 245           event_is_subtype (evdata->data, remove_data))
 246         {
 247           g_strfreev (evdata->data);
 248           g_free (evdata->bus_name);
 249           g_slist_free_full (evdata->properties, g_free);
 250           g_free (evdata);
 251           registry->events = g_list_remove (registry->events, evdata);
 252         }
 253       else
 254         {
 255           if (needs_mouse_poll (evdata->data))
 256             mouse_found = TRUE;
 257         }
 258     }
 259
 260   if (!mouse_found)
 261     spi_device_event_controller_stop_poll_mouse ();
 262
 263   g_strfreev (remove_data);
 264
 265   signal = dbus_message_new_signal (SPI_DBUS_PATH_REGISTRY,
 266                                     SPI_DBUS_INTERFACE_REGISTRY,
 267                                     "EventListenerDeregistered");
 268   dbus_message_append_args (signal, DBUS_TYPE_STRING, &bus_name,
 269                             DBUS_TYPE_STRING, &event, DBUS_TYPE_INVALID);
 270   dbus_connection_send (registry->bus, signal, NULL);
 271   dbus_message_unref (signal);
 272 }
 273
 274 static void
 275 handle_disconnection (DBusConnection *bus, DBusMessage *message, void *user_data)
 276 {
 277   char *name, *old, *new;
 278   SpiRegistry *reg = SPI_REGISTRY (user_data);
 279
 280   if (dbus_message_get_args (message, NULL,
 281                              DBUS_TYPE_STRING, &name,
 282                              DBUS_TYPE_STRING, &old,
 283                              DBUS_TYPE_STRING, &new,
 284                              DBUS_TYPE_INVALID))
 285     {
 286       if (*old != '\0' && *new == '\0')
 287         {
 288           /* Remove all children with the application name the same as the disconnected application. */
 289           guint i;
 290           for (i = 0; i < reg->apps->len; i++)
 291             {
 292               SpiReference *ref  = g_ptr_array_index (reg->apps, i);
 293               if (!g_strcmp0 (old, ref->name))
 294                 {
 295                   remove_application (reg, bus, i);
 296                   i--;
 297                 }
 298             }
 299
 300           remove_events (reg, old, "");
 301         }
 302     }
 303 }
 304
 305 /*
 306  * Converts names of the form "active-descendant-changed" to
 307  *" ActiveDescendantChanged"
 308  */
 309 static gchar *
 310 ensure_proper_format (const char *name)
 311 {
 312   gchar *ret = (gchar *) g_malloc (strlen (name) * 2 + 2);
 313   gchar *p = ret;
 314   gboolean need_upper = TRUE;
 315
 316   if (!ret)
 317     return NULL;
 318   while (*name)
 319     {
 320       if (need_upper)
 321         {
 322           *p++ = toupper (*name);
 323           need_upper = FALSE;
 324         }
 325       else if (*name == '-')
 326         need_upper = TRUE;
 327       else if (*name == ':')
 328         {
 329           need_upper = TRUE;
 330           *p++ = *name;
 331         }
 332       else
 333         *p++ = *name;
 334       name++;
 335     }
 336   *p = '\0';
 337   return ret;
 338 }
 339
 340 static DBusHandlerResult
 341 signal_filter (DBusConnection *bus, DBusMessage *message, void *user_data)
 342 {
 343   guint res = DBUS_HANDLER_RESULT_HANDLED;
 344   const gint   type    = dbus_message_get_type (message);
 345   const char *iface = dbus_message_get_interface (message);
 346   const char *member = dbus_message_get_member (message);
 347
 348   if (type != DBUS_MESSAGE_TYPE_SIGNAL)
 349     return DBUS_HANDLER_RESULT_NOT_YET_HANDLED;
 350
 351   if (!g_strcmp0(iface, DBUS_INTERFACE_DBUS) &&
 352       !g_strcmp0(member, "NameOwnerChanged"))
 353       handle_disconnection (bus, message, user_data);
 354   else
 355       res = DBUS_HANDLER_RESULT_NOT_YET_HANDLED;
 356
 357   return res;
 358 }
 359
 360 /* org.at_spi.Socket interface */
 361 /*---------------------------------------------------------------------------*/
 362
 363 static DBusMessage*
 364 impl_Embed (DBusConnection *bus, DBusMessage *message, void *user_data)
 365 {
 366   SpiRegistry *reg = SPI_REGISTRY (user_data);
 367   DBusMessageIter iter, iter_struct;
 368   const gchar *app_name, *obj_path;
 369
 370   DBusMessage *reply = NULL;
 371   DBusMessageIter reply_iter;
 372
 373   dbus_message_iter_init (message, &iter);
 374   dbus_message_iter_recurse (&iter, &iter_struct);
 375   if (!(dbus_message_iter_get_arg_type (&iter_struct) == DBUS_TYPE_STRING))
 376         goto error;
 377   dbus_message_iter_get_basic (&iter_struct, &app_name);
 378   if (!app_name)
 379     app_name = dbus_message_get_sender (message);
 380   if (!dbus_message_iter_next (&iter_struct))
 381         goto error;
 382   if (!(dbus_message_iter_get_arg_type (&iter_struct) == DBUS_TYPE_OBJECT_PATH))
 383         goto error;
 384   dbus_message_iter_get_basic (&iter_struct, &obj_path);
 385
 386   add_application(reg, bus, app_name, obj_path);
 387
 388   set_id (reg, bus, app_name, obj_path);
 389
 390   reply = dbus_message_new_method_return (message);
 391   dbus_message_iter_init_append (reply, &reply_iter);
 392   append_reference (&reply_iter,
 393                     dbus_bus_get_unique_name (bus),
 394                     SPI_DBUS_PATH_ROOT);
 395
 396   return reply;
 397 error:
 398   return dbus_message_new_error (message, DBUS_ERROR_FAILED, "Invalid arguments");
 399 }
 400
 401 static DBusMessage*
 402 impl_Unembed (DBusConnection *bus, DBusMessage *message, void *user_data)
 403 {
 404   SpiRegistry *reg = SPI_REGISTRY (user_data);
 405   DBusMessageIter iter, iter_struct;
 406   gchar *app_name, *obj_path;
 407   guint index;
 408
 409   dbus_message_iter_init (message, &iter);
 410   dbus_message_iter_recurse (&iter, &iter_struct);
 411   if (!(dbus_message_iter_get_arg_type (&iter_struct) == DBUS_TYPE_STRING))
 412         goto error;
 413   dbus_message_iter_get_basic (&iter_struct, &app_name);
 414   if (!dbus_message_iter_next (&iter_struct))
 415         goto error;
 416   if (!(dbus_message_iter_get_arg_type (&iter_struct) == DBUS_TYPE_OBJECT_PATH))
 417         goto error;
 418   dbus_message_iter_get_basic (&iter_struct, &obj_path);
 419
 420   if (find_index_of_reference (reg->apps, app_name, obj_path, &index))
 421       remove_application(reg, bus, index);
 422
 423   return NULL;
 424 error:
 425   return dbus_message_new_error (message, DBUS_ERROR_FAILED, "Invalid arguments");
 426 }
 427
 428 /* org.at_spi.Component interface */
 429 /*---------------------------------------------------------------------------*/
 430
 431 static DBusMessage *
 432 impl_Contains (DBusConnection * bus, DBusMessage * message, void *user_data)
 433 {
 434   dbus_bool_t retval = FALSE;
 435   DBusMessage *reply;
 436
 437   reply = dbus_message_new_method_return (message);
 438   dbus_message_append_args (reply, DBUS_TYPE_BOOLEAN, &retval,
 439                             DBUS_TYPE_INVALID);
 440   return reply;
 441 }
 442
 443 static DBusMessage *
 444 impl_GetAccessibleAtPoint (DBusConnection * bus, DBusMessage * message,
 445                            void *user_data)
 446 {
 447   DBusMessage *reply = NULL;
 448   DBusMessageIter iter;
 449
 450   reply = dbus_message_new_method_return (message);
 451   dbus_message_iter_init_append (reply, &iter);
 452   append_reference (&iter,
 453                     dbus_bus_get_unique_name (bus),
 454                     SPI_DBUS_PATH_NULL);
 455
 456   return reply;
 457 }
 458
 459 static DBusMessage *
 460 impl_GetExtents (DBusConnection * bus, DBusMessage * message, void *user_data)
 461 {
 462   dbus_int32_t x = 0, y = 0, width = 1024, height = 768;
 463   DBusMessage *reply;
 464   DBusMessageIter iter, iter_struct;
 465
 466   reply = dbus_message_new_method_return (message);
 467   dbus_message_iter_init_append (reply, &iter);
 468   dbus_message_iter_open_container (&iter, DBUS_TYPE_STRUCT, NULL,
 469                                     &iter_struct);
 470     dbus_message_iter_append_basic (&iter_struct, DBUS_TYPE_INT32, &x);
 471     dbus_message_iter_append_basic (&iter_struct, DBUS_TYPE_INT32, &y);
 472     dbus_message_iter_append_basic (&iter_struct, DBUS_TYPE_INT32, &width);
 473     dbus_message_iter_append_basic (&iter_struct, DBUS_TYPE_INT32, &height);
 474   dbus_message_iter_close_container (&iter, &iter_struct);
 475   return reply;
 476 }
 477
 478 static DBusMessage *
 479 impl_GetPosition (DBusConnection * bus, DBusMessage * message,
 480                   void *user_data)
 481 {
 482   DBusMessage *reply;
 483   dbus_int32_t x = 0, y = 0;
 484
 485   reply = dbus_message_new_method_return (message);
 486   dbus_message_append_args (reply, DBUS_TYPE_INT32, &x, DBUS_TYPE_INT32,
 487                             &y, DBUS_TYPE_INVALID);
 488   return reply;
 489 }
 490
 491 static DBusMessage *
 492 impl_GetSize (DBusConnection * bus, DBusMessage * message, void *user_data)
 493 {
 494   /* TODO - Get the screen size */
 495   DBusMessage *reply;
 496   dbus_int32_t width = 1024, height = 768;
 497
 498   reply = dbus_message_new_method_return (message);
 499   dbus_message_append_args (reply, DBUS_TYPE_INT32, &width,
 500                             DBUS_TYPE_INT32, &height, DBUS_TYPE_INVALID);
 501   return reply;
 502 }
 503
 504 #define LAYER_WIDGET 3;
 505
 506 static DBusMessage *
 507 impl_GetLayer (DBusConnection * bus, DBusMessage * message, void *user_data)
 508 {
 509   DBusMessage *reply;
 510   dbus_uint32_t rv = LAYER_WIDGET;
 511
 512   reply = dbus_message_new_method_return (message);
 513   dbus_message_append_args (reply, DBUS_TYPE_UINT32, &rv,
 514                             DBUS_TYPE_INVALID);
 515   return reply;
 516 }
 517
 518 static DBusMessage *
 519 impl_GetMDIZOrder (DBusConnection * bus, DBusMessage * message,
 520                    void *user_data)
 521 {
 522   DBusMessage *reply;
 523   dbus_int16_t rv = 0;
 524
 525   reply = dbus_message_new_method_return (message);
 526   dbus_message_append_args (reply, DBUS_TYPE_INT16, &rv,
 527                             DBUS_TYPE_INVALID);
 528   return reply;
 529 }
 530
 531 static DBusMessage *
 532 impl_GrabFocus (DBusConnection * bus, DBusMessage * message, void *user_data)
 533 {
 534   DBusMessage *reply;
 535   dbus_bool_t retval = FALSE;
 536
 537   reply = dbus_message_new_method_return (message);
 538   dbus_message_append_args (reply, DBUS_TYPE_BOOLEAN, &retval,
 539                             DBUS_TYPE_INVALID);
 540   return reply;
 541 }
 542
 543 static DBusMessage *
 544 impl_ClearHighlight (DBusConnection * bus, DBusMessage * message, void *user_data)
 545 {
 546   DBusMessage *reply;
 547   dbus_bool_t retval = FALSE;
 548
 549   reply = dbus_message_new_method_return (message);
 550   dbus_message_append_args (reply, DBUS_TYPE_BOOLEAN, &retval,
 551                             DBUS_TYPE_INVALID);
 552   return reply;
 553 }
 554
 555 static DBusMessage *
 556 impl_GrabHighlight (DBusConnection * bus, DBusMessage * message, void *user_data)
 557 {
 558   DBusMessage *reply;
 559   dbus_bool_t retval = FALSE;
 560
 561   reply = dbus_message_new_method_return (message);
 562   dbus_message_append_args (reply, DBUS_TYPE_BOOLEAN, &retval,
 563                             DBUS_TYPE_INVALID);
 564   return reply;
 565 }
 566
 567 static DBusMessage *
 568 impl_GetAlpha (DBusConnection * bus, DBusMessage * message, void *user_data)
 569 {
 570   double rv = 1.0;
 571   DBusMessage *reply;
 572
 573   reply = dbus_message_new_method_return (message);
 574   dbus_message_append_args (reply, DBUS_TYPE_DOUBLE, &rv,
 575                             DBUS_TYPE_INVALID);
 576   return reply;
 577 }
 578
 579 /* org.at_spi.Accessible interface */
 580 /*---------------------------------------------------------------------------*/
 581
 582 static dbus_bool_t
 583 impl_get_Name (DBusMessageIter * iter, void *user_data)
 584 {
 585   const gchar *name = "main";
 586   return return_v_string (iter, name);
 587 }
 588
 589 static dbus_bool_t
 590 impl_get_Description (DBusMessageIter * iter, void *user_data)
 591 {
 592   const gchar *description = "";
 593   return return_v_string (iter, description);
 594 }
 595
 596 static dbus_bool_t
 597 impl_get_Parent (DBusMessageIter * iter, void *user_data)
 598 {
 599   const gchar *name = "";
 600   DBusMessageIter iter_variant;
 601
 602   dbus_message_iter_open_container (iter, DBUS_TYPE_VARIANT, "(so)",
 603                                     &iter_variant);
 604   append_reference (&iter_variant,
 605                     name,
 606                     SPI_DBUS_PATH_NULL);
 607   dbus_message_iter_close_container (iter, &iter_variant);
 608   return TRUE;
 609 }
 610
 611 static dbus_bool_t
 612 impl_get_ChildCount (DBusMessageIter * iter, void *user_data)
 613 {
 614   SpiRegistry *reg = SPI_REGISTRY (user_data);
 615   dbus_int32_t rv = reg->apps->len;
 616   dbus_bool_t result;
 617   DBusMessageIter iter_variant;
 618
 619   if (!dbus_message_iter_open_container (iter, DBUS_TYPE_VARIANT, "i",
 620                                          &iter_variant))
 621     return FALSE;
 622   result = dbus_message_iter_append_basic (&iter_variant, DBUS_TYPE_INT32, &rv);
 623   dbus_message_iter_close_container (iter, &iter_variant);
 624   return result;
 625 }
 626
 627 static dbus_bool_t
 628 impl_get_ToolkitName (DBusMessageIter * iter, void *user_data)
 629 {
 630   return return_v_string (iter, "at-spi-registry");
 631 }
 632
 633 static dbus_bool_t
 634 impl_get_ToolkitVersion (DBusMessageIter * iter, void *user_data)
 635 {
 636   return return_v_string (iter, "2.0");
 637 }
 638
 639 static DBusMessage *
 640 impl_GetChildAtIndex (DBusConnection * bus,
 641                       DBusMessage * message, void *user_data)
 642 {
 643   SpiRegistry *reg = SPI_REGISTRY (user_data);
 644   DBusMessage *reply;
 645   DBusMessageIter iter;
 646   DBusError error;
 647   SpiReference *ref;
 648   dbus_int32_t i;
 649
 650   dbus_error_init (&error);
 651   if (!dbus_message_get_args
 652        (message, &error, DBUS_TYPE_INT32, &i, DBUS_TYPE_INVALID))
 653     {
 654       return dbus_message_new_error (message, DBUS_ERROR_FAILED, "Invalid arguments");
 655     }
 656
 657   reply = dbus_message_new_method_return (message);
 658   dbus_message_iter_init_append (reply, &iter);
 659
 660   if (i < 0 || i >= reg->apps->len)
 661     append_reference (&iter, SPI_DBUS_NAME_REGISTRY, SPI_DBUS_PATH_NULL);
 662   else
 663     {
 664       ref = g_ptr_array_index (reg->apps, i);
 665       append_reference (&iter, ref->name, ref->path);
 666     }
 667
 668   return reply;
 669 }
 670
 671 static DBusMessage *
 672 impl_GetChildren (DBusConnection * bus,
 673                   DBusMessage * message, void *user_data)
 674 {
 675   DBusMessage *reply = NULL;
 676   DBusMessageIter iter, iter_array;
 677   SpiRegistry *reg = SPI_REGISTRY (user_data);
 678   int i;
 679
 680   reply = dbus_message_new_method_return (message);
 681
 682   dbus_message_iter_init_append (reply, &iter);
 683   dbus_message_iter_open_container(&iter, DBUS_TYPE_ARRAY, "(so)", &iter_array);
 684   for (i=0; i < reg->apps->len; i++)
 685     {
 686       SpiReference *current = g_ptr_array_index (reg->apps, i);
 687       append_reference (&iter_array, current->name, current->path);
 688     }
 689   dbus_message_iter_close_container(&iter, &iter_array);
 690   return reply;
 691 }
 692
 693 static DBusMessage *
 694 impl_GetIndexInParent (DBusConnection * bus,
 695                        DBusMessage * message, void *user_data)
 696 {
 697   DBusMessage *reply;
 698   dbus_uint32_t rv = 0;
 699
 700   reply = dbus_message_new_method_return (message);
 701   dbus_message_append_args (reply, DBUS_TYPE_INT32, &rv, DBUS_TYPE_INVALID);
 702   return reply;
 703 }
 704
 705 static DBusMessage *
 706 impl_GetRelationSet (DBusConnection * bus,
 707                      DBusMessage * message, void *user_data)
 708 {
 709   DBusMessage *reply;
 710   DBusMessageIter iter, iter_array;
 711
 712   reply = dbus_message_new_method_return (message);
 713   dbus_message_iter_init_append (reply, &iter);
 714   dbus_message_iter_open_container (&iter, DBUS_TYPE_ARRAY, "(ua(so))", &iter_array);
 715   dbus_message_iter_close_container (&iter, &iter_array);
 716
 717   return reply;
 718 }
 719
 720 static DBusMessage *
 721 impl_GetRole (DBusConnection * bus, DBusMessage * message, void * user_data)
 722 {
 723   DBusMessage *reply;
 724   dbus_uint32_t rv = 14;        /* TODO: Get DESKTOP_FRAME from somewhere */
 725
 726   reply = dbus_message_new_method_return (message);
 727   dbus_message_append_args (reply, DBUS_TYPE_UINT32, &rv, DBUS_TYPE_INVALID);
 728   return reply;
 729 }
 730
 731 static DBusMessage *
 732 impl_GetRoleName (DBusConnection * bus,
 733                   DBusMessage * message, void *user_data)
 734 {
 735   DBusMessage *reply;
 736   const char *role_name = "desktop frame";
 737
 738   reply = dbus_message_new_method_return (message);
 739   dbus_message_append_args (reply, DBUS_TYPE_STRING, &role_name,
 740                             DBUS_TYPE_INVALID);
 741   return reply;
 742 }
 743
 744 static DBusMessage *
 745 impl_GetLocalizedRoleName (DBusConnection * bus,
 746                            DBusMessage * message, void *user_data)
 747 {
 748   /* TODO - Localize this */
 749   DBusMessage *reply;
 750   const char *role_name = "desktop frame";
 751
 752   reply = dbus_message_new_method_return (message);
 753   dbus_message_append_args (reply, DBUS_TYPE_STRING, &role_name,
 754                             DBUS_TYPE_INVALID);
 755   return reply;
 756 }
 757
 758 static DBusMessage *
 759 impl_GetState (DBusConnection * bus, DBusMessage * message, void *user_data)
 760 {
 761   DBusMessage *reply = NULL;
 762   DBusMessageIter iter, iter_array;
 763
 764   dbus_uint32_t states[2] = {0, 0};
 765   guint count;
 766
 767   reply = dbus_message_new_method_return (message);
 768   dbus_message_iter_init_append (reply, &iter);
 769
 770   dbus_message_iter_open_container (&iter, DBUS_TYPE_ARRAY, "u", &iter_array);
 771   for (count = 0; count < 2; count++)
 772     {
 773       dbus_message_iter_append_basic (&iter_array, DBUS_TYPE_UINT32,
 774                                       &states[count]);
 775     }
 776   dbus_message_iter_close_container (&iter, &iter_array);
 777   return reply;
 778 }
 779
 780 static DBusMessage *
 781 impl_GetAttributes (DBusConnection * bus,
 782                     DBusMessage * message, void *user_data)
 783 {
 784   DBusMessage *reply = NULL;
 785   DBusMessageIter iter, array;
 786
 787   reply = dbus_message_new_method_return (message);
 788   dbus_message_iter_init_append (reply, &iter);
 789   dbus_message_iter_open_container (&iter, DBUS_TYPE_ARRAY, "{ss}", &array);
 790   dbus_message_iter_close_container (&iter, &array);
 791
 792   return reply;
 793 }
 794
 795 static DBusMessage *
 796 impl_GetApplication (DBusConnection * bus,
 797                      DBusMessage * message, void *user_data)
 798 {
 799   DBusMessage *reply = NULL;
 800   DBusMessageIter iter;
 801
 802   reply = dbus_message_new_method_return (message);
 803   dbus_message_iter_init_append (reply, &iter);
 804   append_reference (&iter,
 805                     dbus_bus_get_unique_name (bus),
 806                     SPI_DBUS_PATH_NULL);
 807
 808   return reply;
 809 }
 810
 811 static DBusMessage *
 812 impl_GetInterfaces (DBusConnection * bus,
 813                     DBusMessage * message, void *user_data)
 814 {
 815   DBusMessage *reply;
 816   DBusMessageIter iter, iter_array;
 817
 818   const char *acc = SPI_DBUS_INTERFACE_ACCESSIBLE;
 819   const char *com = SPI_DBUS_INTERFACE_COMPONENT;
 820
 821   reply = dbus_message_new_method_return (message);
 822
 823   dbus_message_iter_init_append (reply, &iter);
 824   dbus_message_iter_open_container (&iter, DBUS_TYPE_ARRAY, "s",
 825                                     &iter_array);
 826     dbus_message_iter_append_basic (&iter_array, DBUS_TYPE_STRING, &acc);
 827     dbus_message_iter_append_basic (&iter_array, DBUS_TYPE_STRING, &com);
 828   dbus_message_iter_close_container (&iter, &iter_array);
 829
 830   return reply;
 831 }
 832
 833 static DBusMessage *
 834 impl_GetItems (DBusConnection * bus, DBusMessage * message, void *user_data)
 835 {
 836   DBusMessage *reply;
 837   DBusMessageIter iter, iter_array;
 838
 839   reply = dbus_message_new_method_return (message);
 840
 841   dbus_message_iter_init_append (reply, &iter);
 842   dbus_message_iter_open_container (&iter, DBUS_TYPE_ARRAY,
 843                                     "((so)(so)(so)a(so)assusau)", &iter_array);
 844   dbus_message_iter_close_container (&iter, &iter_array);
 845   return reply;
 846 }
 847
 848 /* I would rather these two be signals, but I'm not sure that dbus-python
 849  * supports emitting signals except for a service, so implementing as both
 850  * a method call and signal for now.
 851  */
 852 static DBusMessage *
 853 impl_register_event (DBusConnection *bus, DBusMessage *message, void *user_data)
 854 {
 855   SpiRegistry *registry = SPI_REGISTRY (user_data);
 856   const char *orig_name;
 857   gchar *name;
 858   event_data *evdata;
 859   gchar **data;
 860   DBusMessage *signal;
 861   const char *sender = dbus_message_get_sender (message);
 862   DBusMessageIter iter, iter_array;
 863   const char *signature = dbus_message_get_signature (message);
 864
 865   if (strcmp (signature, "sas") != 0 &&
 866       strcmp (signature, "s") != 0)
 867   {
 868     g_warning ("got RegisterEvent with invalid signature '%s'", signature);
 869     return NULL;
 870   }
 871
 872   dbus_message_iter_init (message, &iter);
 873   dbus_message_iter_get_basic (&iter, &orig_name);
 874   dbus_message_iter_next (&iter);
 875   name = ensure_proper_format (orig_name);
 876
 877   evdata = g_new0 (event_data, 1);
 878   data = g_strsplit (name, ":", 3);
 879   evdata->bus_name = g_strdup (sender);
 880   evdata->data = data;
 881
 882   if (dbus_message_iter_get_arg_type (&iter) == DBUS_TYPE_ARRAY)
 883   {
 884     dbus_message_iter_recurse (&iter, &iter_array);
 885     while (dbus_message_iter_get_arg_type (&iter_array) != DBUS_TYPE_INVALID)
 886     {
 887       const char *property;
 888       dbus_message_iter_get_basic (&iter_array, &property);
 889       evdata->properties = g_slist_append (evdata->properties,
 890                                            g_strdup (property));
 891       dbus_message_iter_next (&iter_array);
 892     }
 893   }
 894   registry->events = g_list_append (registry->events, evdata);
 895
 896   if (needs_mouse_poll (evdata->data))
 897     {
 898       spi_device_event_controller_start_poll_mouse (registry);
 899     }
 900
 901   signal = dbus_message_new_signal (SPI_DBUS_PATH_REGISTRY,
 902                                     SPI_DBUS_INTERFACE_REGISTRY,
 903                                     "EventListenerRegistered");
 904   if (signal)
 905   {
 906     GSList *ls = evdata->properties;
 907     dbus_message_iter_init_append (signal, &iter);
 908     dbus_message_iter_append_basic (&iter, DBUS_TYPE_STRING, &sender);
 909     dbus_message_iter_append_basic (&iter, DBUS_TYPE_STRING, &name);
 910     dbus_message_iter_open_container (&iter, DBUS_TYPE_ARRAY, "s", &iter_array);
 911     while (ls)
 912     {
 913       dbus_message_iter_append_basic (&iter_array, DBUS_TYPE_STRING, &ls->data);
 914       ls = g_slist_next (ls);
 915     }
 916     dbus_message_iter_close_container (&iter, &iter_array);
 917     dbus_connection_send (bus, signal, NULL);
 918     dbus_message_unref (signal);
 919   }
 920
 921   g_free (name);
 922   return dbus_message_new_method_return (message);
 923 }
 924
 925 static DBusMessage *
 926 impl_deregister_event (DBusConnection *bus, DBusMessage *message, void *user_data)
 927 {
 928   SpiRegistry *registry = SPI_REGISTRY (user_data);
 929   const char *orig_name;
 930   gchar *name;
 931   const char *sender = dbus_message_get_sender (message);
 932
 933   if (!dbus_message_get_args (message, NULL, DBUS_TYPE_STRING, &orig_name,
 934     DBUS_TYPE_INVALID))
 935     return NULL;
 936   name = ensure_proper_format (orig_name);
 937
 938   remove_events (registry, sender, name);
 939
 940   g_free (name);
 941   return dbus_message_new_method_return (message);
 942 }
 943
 944 static DBusMessage *
 945 impl_get_registered_events (DBusConnection *bus, DBusMessage *message, void *user_data)
 946 {
 947   SpiRegistry *registry = SPI_REGISTRY (user_data);
 948   event_data *evdata;
 949   DBusMessage *reply;
 950   DBusMessageIter iter, iter_struct, iter_array;
 951   GList *list;
 952
 953   reply = dbus_message_new_method_return (message);
 954   if (!reply)
 955     return NULL;
 956
 957   dbus_message_iter_init_append (reply, &iter);
 958   dbus_message_iter_open_container (&iter, DBUS_TYPE_ARRAY, "(ss)", &iter_array);
 959   for (list = registry->events; list; list = list->next)
 960     {
 961       gchar *str;
 962       evdata = list->data;
 963       str = g_strconcat (evdata->data [0],
 964                          ":", (evdata->data [1]? evdata->data [1]: ""),
 965                          ":", (evdata->data [1] && evdata->data [2]? evdata->data [2]: ""), NULL);
 966       dbus_message_iter_open_container (&iter_array, DBUS_TYPE_STRUCT, NULL, &iter_struct);
 967       dbus_message_iter_append_basic (&iter_struct, DBUS_TYPE_STRING, &evdata->bus_name);
 968       dbus_message_iter_append_basic (&iter_struct, DBUS_TYPE_STRING, &str);
 969       dbus_message_iter_close_container (&iter_array, &iter_struct);
 970       g_free (str);
 971     }
 972   dbus_message_iter_close_container (&iter, &iter_array);
 973   return reply;
 974 }
 975
 976 /*---------------------------------------------------------------------------*/
 977
 978 static void
 979 emit_Available (DBusConnection * bus)
 980 {
 981   DBusMessage *sig;
 982   DBusMessageIter iter;
 983
 984   sig = dbus_message_new_signal(SPI_DBUS_PATH_ROOT, SPI_DBUS_INTERFACE_SOCKET, "Available");
 985
 986   dbus_message_iter_init_append(sig, &iter);
 987   append_reference (&iter, SPI_DBUS_NAME_REGISTRY, SPI_DBUS_PATH_ROOT);
 988
 989   dbus_connection_send(bus, sig, NULL);
 990   dbus_message_unref(sig);
 991 }
 992
 993 /*---------------------------------------------------------------------------*/
 994
 995 static const char *introspection_header =
 996 "<?xml version=\"1.0\"?>\n";
 997
 998 static const char *introspection_node_element =
 999 "<node name=\"%s\">\n";
1000
1001 static const char *introspection_footer =
1002 "</node>";
1003
1004 static DBusMessage *
1005 impl_Introspect_root (DBusConnection * bus,
1006                  DBusMessage * message, void *user_data)
1007 {
1008   GString *output;
1009   gchar *final;
1010
1011   const gchar *pathstr = SPI_DBUS_PATH_ROOT;
1012
1013   DBusMessage *reply;
1014
1015   output = g_string_new(introspection_header);
1016
1017   g_string_append_printf(output, introspection_node_element, pathstr);
1018
1019   g_string_append (output, spi_org_a11y_atspi_Accessible);
1020   g_string_append (output, spi_org_a11y_atspi_Component);
1021
1022   g_string_append(output, introspection_footer);
1023   final = g_string_free(output, FALSE);
1024
1025   reply = dbus_message_new_method_return (message);
1026   dbus_message_append_args(reply, DBUS_TYPE_STRING, &final, DBUS_TYPE_INVALID);
1027
1028   g_free(final);
1029   return reply;
1030 }
1031
1032 static DBusMessage *
1033 impl_Introspect_registry (DBusConnection * bus,
1034                  DBusMessage * message, void *user_data)
1035 {
1036   GString *output;
1037   gchar *final;
1038
1039   const gchar *pathstr = SPI_DBUS_PATH_REGISTRY;
1040
1041   DBusMessage *reply;
1042
1043   output = g_string_new(introspection_header);
1044
1045   g_string_append_printf(output, introspection_node_element, pathstr);
1046
1047   g_string_append (output, spi_org_a11y_atspi_Registry);
1048
1049   g_string_append(output, introspection_footer);
1050   final = g_string_free(output, FALSE);
1051
1052   reply = dbus_message_new_method_return (message);
1053   dbus_message_append_args(reply, DBUS_TYPE_STRING, &final, DBUS_TYPE_INVALID);
1054
1055   g_free(final);
1056   return reply;
1057 }
1058
1059 /*---------------------------------------------------------------------------*/
1060
1061 /*
1062  * Emits an AT-SPI event.
1063  * AT-SPI events names are split into three parts:
1064  * class:major:minor
1065  * This is mapped onto D-Bus events as:
1066  * D-Bus Interface:Signal Name:Detail argument
1067  *
1068  * Marshals a basic type into the 'any_data' attribute of
1069  * the AT-SPI event.
1070  */
1071 static void
1072 emit_event (DBusConnection *bus,
1073             const char *klass,
1074             const char *major,
1075             const char *minor,
1076             dbus_int32_t detail1,
1077             dbus_int32_t detail2,
1078             const char *name,
1079             const char *path)
1080 {
1081   DBusMessage *sig;
1082   DBusMessageIter iter, iter_variant;
1083
1084   sig = dbus_message_new_signal(SPI_DBUS_PATH_ROOT, klass, major);
1085
1086   dbus_message_iter_init_append(sig, &iter);
1087
1088   dbus_message_iter_append_basic(&iter, DBUS_TYPE_STRING, &minor);
1089   dbus_message_iter_append_basic(&iter, DBUS_TYPE_INT32, &detail1);
1090   dbus_message_iter_append_basic(&iter, DBUS_TYPE_INT32, &detail2);
1091
1092   dbus_message_iter_open_container (&iter, DBUS_TYPE_VARIANT, "(so)",
1093                                     &iter_variant);
1094     append_reference (&iter_variant, name, path);
1095   dbus_message_iter_close_container (&iter, &iter_variant);
1096
1097   append_reference (&iter,
1098                     dbus_bus_get_unique_name (bus),
1099                     SPI_DBUS_PATH_ROOT);
1100
1101   dbus_connection_send(bus, sig, NULL);
1102   dbus_message_unref(sig);
1103 }
1104
1105 /*---------------------------------------------------------------------------*/
1106
1107 /*
1108  * Children changed signal converter and forwarder.
1109  *
1110  * Klass (Interface) org.a11y.atspi.Event.Object
1111  * Major is the signal name.
1112  * Minor is 'add' or 'remove'
1113  * detail1 is the index.
1114  * detail2 is 0.
1115  * any_data is the child reference.
1116  */
1117
1118 static void
1119 children_added_listener (DBusConnection * bus,
1120                          gint             index,
1121                          const gchar    * name,
1122                          const gchar    * path)
1123 {
1124   emit_event (bus, SPI_DBUS_INTERFACE_EVENT_OBJECT, "ChildrenChanged", "add", index, 0,
1125               name, path);
1126 }
1127
1128 static void
1129 children_removed_listener (DBusConnection * bus,
1130                            gint             index,
1131                            const gchar    * name,
1132                            const gchar    * path)
1133 {
1134   emit_event (bus, SPI_DBUS_INTERFACE_EVENT_OBJECT, "ChildrenChanged", "remove", index, 0,
1135               name, path);
1136 }
1137
1138 /*---------------------------------------------------------------------------*/
1139
1140 static DBusHandlerResult
1141 handle_method_root (DBusConnection *bus, DBusMessage *message, void *user_data)
1142 {
1143   DBusHandlerResult result = DBUS_HANDLER_RESULT_NOT_YET_HANDLED;
1144
1145   const gchar *iface   = dbus_message_get_interface (message);
1146   const gchar *member  = dbus_message_get_member (message);
1147   const gint   type    = dbus_message_get_type (message);
1148
1149   DBusMessage *reply = NULL;
1150
1151   /* Check for basic reasons not to handle */
1152   if (type   != DBUS_MESSAGE_TYPE_METHOD_CALL ||
1153       member == NULL ||
1154       iface  == NULL)
1155       return DBUS_HANDLER_RESULT_NOT_YET_HANDLED;
1156
1157   if (!strcmp (iface, "org.freedesktop.DBus.Properties"))
1158     {
1159       if (!strcmp (member, "Get"))
1160         {
1161           const gchar *prop_iface;
1162           const gchar *prop_member;
1163           DBusError error;
1164
1165           dbus_error_init (&error);
1166           if (dbus_message_get_args (message,
1167                                      &error,
1168                                      DBUS_TYPE_STRING,
1169                                      &prop_iface,
1170                                      DBUS_TYPE_STRING,
1171                                      &prop_member,
1172                                      DBUS_TYPE_INVALID))
1173             {
1174               DBusMessageIter iter;
1175
1176               reply = dbus_message_new_method_return (message);
1177               dbus_message_iter_init_append (reply, &iter);
1178
1179
1180               if (!strcmp (prop_iface, SPI_DBUS_INTERFACE_ACCESSIBLE))
1181                 {
1182                   if      (!strcmp (prop_member, "Name"))
1183                     impl_get_Name (&iter, user_data);
1184                   else if (!strcmp (prop_member, "Description"))
1185                     impl_get_Description (&iter, user_data);
1186                   else if (!strcmp (prop_member, "Parent"))
1187                     impl_get_Parent (&iter, user_data);
1188                   else if (!strcmp (prop_member, "ChildCount"))
1189                     impl_get_ChildCount (&iter, user_data);
1190                   else
1191                     {
1192                       dbus_message_unref (reply);
1193                       reply = dbus_message_new_error (message, DBUS_ERROR_FAILED, "Property unavailable");
1194                     }
1195                 }
1196               else if (!strcmp (prop_iface, SPI_DBUS_INTERFACE_APPLICATION))
1197                 {
1198                   if (!strcmp (prop_member, "ToolkitName"))
1199                     impl_get_ToolkitName (&iter, user_data);
1200                   else if (!strcmp (prop_member, "ToolkitVersion"))
1201                     impl_get_ToolkitVersion (&iter, user_data);
1202                   else
1203                     {
1204                       dbus_message_unref (reply);
1205                       reply = dbus_message_new_error (message, DBUS_ERROR_FAILED, "Property unavailable");
1206                     }
1207                 }
1208               else
1209                 {
1210                   dbus_message_unref (reply);
1211                   reply = dbus_message_new_error (message, DBUS_ERROR_FAILED, "Property unavailable");
1212                 }
1213             }
1214           else
1215             {
1216               reply = dbus_message_new_error (message, DBUS_ERROR_FAILED, error.message);
1217             }
1218           result = DBUS_HANDLER_RESULT_HANDLED;
1219         }
1220       else if (!strcmp (member, "GetAll"))
1221         {
1222           result = DBUS_HANDLER_RESULT_HANDLED;
1223         }
1224     }
1225
1226   if (!strcmp (iface, SPI_DBUS_INTERFACE_ACCESSIBLE))
1227     {
1228       result = DBUS_HANDLER_RESULT_HANDLED;
1229       if      (!strcmp (member, "GetChildAtIndex"))
1230           reply = impl_GetChildAtIndex (bus, message, user_data);
1231       else if (!strcmp (member, "GetChildren"))
1232           reply = impl_GetChildren (bus, message, user_data);
1233       else if (!strcmp (member, "GetIndexInParent"))
1234           reply = impl_GetIndexInParent (bus, message, user_data);
1235       else if (!strcmp (member, "GetRelationSet"))
1236           reply = impl_GetRelationSet (bus, message, user_data);
1237       else if (!strcmp (member, "GetRole"))
1238           reply = impl_GetRole (bus, message, user_data);
1239       else if (!strcmp (member, "GetRoleName"))
1240           reply = impl_GetRoleName (bus, message, user_data);
1241       else if (!strcmp (member, "GetLocalizedRoleName"))
1242           reply = impl_GetLocalizedRoleName (bus, message, user_data);
1243       else if (!strcmp (member, "GetState"))
1244           reply = impl_GetState (bus, message, user_data);
1245       else if (!strcmp (member, "GetAttributes"))
1246           reply = impl_GetAttributes (bus, message, user_data);
1247       else if (!strcmp (member, "GetApplication"))
1248           reply = impl_GetApplication (bus, message, user_data);
1249       else if (!strcmp (member, "GetInterfaces"))
1250           reply = impl_GetInterfaces (bus, message, user_data);
1251       else
1252          result = DBUS_HANDLER_RESULT_NOT_YET_HANDLED;
1253     }
1254
1255   if (!strcmp (iface, SPI_DBUS_INTERFACE_COMPONENT))
1256     {
1257       result = DBUS_HANDLER_RESULT_HANDLED;
1258       if      (!strcmp (member, "Contains"))
1259           reply = impl_Contains (bus, message, user_data);
1260       else if (!strcmp (member, "GetAccessibleAtPoint"))
1261           reply = impl_GetAccessibleAtPoint (bus, message, user_data);
1262       else if (!strcmp (member, "GetExtents"))
1263           reply = impl_GetExtents (bus, message, user_data);
1264       else if (!strcmp (member, "GetPosition"))
1265           reply = impl_GetPosition (bus, message, user_data);
1266       else if (!strcmp (member, "GetSize"))
1267           reply = impl_GetSize (bus, message, user_data);
1268       else if (!strcmp (member, "GetLayer"))
1269           reply = impl_GetLayer (bus, message, user_data);
1270       else if (!strcmp (member, "GetMDIZOrder"))
1271           reply = impl_GetMDIZOrder (bus, message, user_data);
1272       else if (!strcmp (member, "GrabFocus"))
1273           reply = impl_GrabFocus (bus, message, user_data);
1274       else if (!strcmp (member, "GrabHighlight"))
1275           reply = impl_GrabHighlight (bus, message, user_data);
1276       else if (!strcmp (member, "ClearHighlight"))
1277           reply = impl_ClearHighlight (bus, message, user_data);
1278       else if (!strcmp (member, "GetAlpha"))
1279           reply = impl_GetAlpha (bus, message, user_data);
1280       else
1281          result = DBUS_HANDLER_RESULT_NOT_YET_HANDLED;
1282     }
1283
1284   if (!strcmp (iface, SPI_DBUS_INTERFACE_SOCKET))
1285     {
1286       result = DBUS_HANDLER_RESULT_HANDLED;
1287       if      (!strcmp (member, "Embed"))
1288           reply = impl_Embed (bus, message, user_data);
1289       else if (!strcmp (member, "Unembed"))
1290           reply = impl_Unembed (bus, message, user_data);
1291       else
1292           result = DBUS_HANDLER_RESULT_NOT_YET_HANDLED;
1293     }
1294
1295   if (!strcmp (iface, "org.freedesktop.DBus.Introspectable"))
1296     {
1297       result = DBUS_HANDLER_RESULT_HANDLED;
1298       if      (!strcmp (member, "Introspect"))
1299           reply = impl_Introspect_root (bus, message, user_data);
1300       else
1301           result = DBUS_HANDLER_RESULT_NOT_YET_HANDLED;
1302     }
1303
1304   if (result == DBUS_HANDLER_RESULT_HANDLED)
1305     {
1306       if (!reply)
1307         {
1308           reply = dbus_message_new_method_return (message);
1309         }
1310
1311       dbus_connection_send (bus, reply, NULL);
1312       dbus_message_unref (reply);
1313     }
1314 #if 0
1315   else
1316     {
1317       g_print ("Registry | Unhandled message : %s|%s\n", iface, member);
1318     }
1319 #endif
1320
1321   return result;
1322 }
1323
1324 static DBusHandlerResult
1325 handle_method_cache (DBusConnection *bus, DBusMessage *message, void *user_data)
1326 {
1327   DBusHandlerResult result = DBUS_HANDLER_RESULT_NOT_YET_HANDLED;
1328
1329   const gchar *iface   = dbus_message_get_interface (message);
1330   const gchar *member  = dbus_message_get_member (message);
1331   const gint   type    = dbus_message_get_type (message);
1332
1333   DBusMessage *reply = NULL;
1334
1335   /* Check for basic reasons not to handle */
1336   if (type   != DBUS_MESSAGE_TYPE_METHOD_CALL ||
1337       member == NULL ||
1338       iface  == NULL)
1339       return DBUS_HANDLER_RESULT_NOT_YET_HANDLED;
1340
1341   if (!strcmp (iface, SPI_DBUS_INTERFACE_CACHE))
1342     {
1343       result = DBUS_HANDLER_RESULT_HANDLED;
1344       if      (!strcmp (member, "GetItems"))
1345           reply = impl_GetItems (bus, message, user_data);
1346       else
1347          result = DBUS_HANDLER_RESULT_NOT_YET_HANDLED;
1348     }
1349
1350   if (result == DBUS_HANDLER_RESULT_HANDLED)
1351     {
1352       if (!reply)
1353         {
1354           reply = dbus_message_new_method_return (message);
1355         }
1356
1357       dbus_connection_send (bus, reply, NULL);
1358       dbus_message_unref (reply);
1359     }
1360   return result;
1361 }
1362
1363 static DBusHandlerResult
1364 handle_method_registry (DBusConnection *bus, DBusMessage *message, void *user_data)
1365 {
1366   DBusHandlerResult result = DBUS_HANDLER_RESULT_NOT_YET_HANDLED;
1367
1368   const gchar *iface   = dbus_message_get_interface (message);
1369   const gchar *member  = dbus_message_get_member (message);
1370   const gint   type    = dbus_message_get_type (message);
1371
1372   DBusMessage *reply = NULL;
1373
1374   /* Check for basic reasons not to handle */
1375   if (type   != DBUS_MESSAGE_TYPE_METHOD_CALL ||
1376       member == NULL ||
1377       iface  == NULL)
1378       return DBUS_HANDLER_RESULT_NOT_YET_HANDLED;
1379
1380   if (!strcmp (iface, SPI_DBUS_INTERFACE_REGISTRY))
1381     {
1382       result = DBUS_HANDLER_RESULT_HANDLED;
1383       if (!strcmp(member, "RegisterEvent"))
1384       reply = impl_register_event (bus, message, user_data);
1385       else if (!strcmp(member, "DeregisterEvent"))
1386         reply = impl_deregister_event (bus, message, user_data);
1387       else if (!strcmp(member, "GetRegisteredEvents"))
1388         reply = impl_get_registered_events (bus, message, user_data);
1389       else
1390           result = DBUS_HANDLER_RESULT_NOT_YET_HANDLED;
1391     }
1392
1393   if (!strcmp (iface, "org.freedesktop.DBus.Introspectable"))
1394     {
1395       result = DBUS_HANDLER_RESULT_HANDLED;
1396       if      (!strcmp (member, "Introspect"))
1397           reply = impl_Introspect_registry (bus, message, user_data);
1398       else
1399           result = DBUS_HANDLER_RESULT_NOT_YET_HANDLED;
1400     }
1401
1402   if (result == DBUS_HANDLER_RESULT_HANDLED)
1403     {
1404       if (!reply)
1405         {
1406           reply = dbus_message_new_method_return (message);
1407         }
1408
1409       dbus_connection_send (bus, reply, NULL);
1410       dbus_message_unref (reply);
1411     }
1412 #if 0
1413   else
1414     {
1415       g_print ("Registry | Unhandled message : %s|%s\n", iface, member);
1416     }
1417 #endif
1418
1419   return result;
1420 }
1421
1422 /*---------------------------------------------------------------------------*/
1423
1424 static DBusObjectPathVTable root_vtable =
1425 {
1426   NULL,
1427   &handle_method_root,
1428   NULL, NULL, NULL, NULL
1429 };
1430
1431 static DBusObjectPathVTable registry_vtable =
1432 {
1433   NULL,
1434   &handle_method_registry,
1435   NULL, NULL, NULL, NULL
1436 };
1437
1438 static DBusObjectPathVTable cache_vtable =
1439 {
1440   NULL,
1441   &handle_method_cache,
1442   NULL, NULL, NULL, NULL
1443 };
1444
1445 static gchar *app_sig_match_name_owner =
1446        "type='signal', interface='org.freedesktop.DBus', member='NameOwnerChanged'";
1447
1448 SpiRegistry *
1449 spi_registry_new (DBusConnection *bus)
1450 {
1451   SpiRegistry *reg = g_object_new (SPI_REGISTRY_TYPE, NULL);
1452
1453   reg->bus = bus;
1454
1455   dbus_bus_add_match (bus, app_sig_match_name_owner, NULL);
1456   dbus_connection_add_filter (bus, signal_filter, reg, NULL);
1457
1458   dbus_connection_register_object_path (bus, SPI_DBUS_PATH_ROOT, &root_vtable, reg);
1459
1460   dbus_connection_register_object_path (bus, SPI_DBUS_PATH_CACHE, &cache_vtable, reg);
1461
1462   dbus_connection_register_object_path (bus, SPI_DBUS_PATH_REGISTRY, &registry_vtable, reg);
1463
1464   emit_Available (bus);
1465
1466   reg->events = NULL;
1467
1468   return reg;
1469 }
1470
1471 /*END------------------------------------------------------------------------*/