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 };
  39
  40 static void
  41 children_added_listener (DBusConnection * bus,
  42                          gint             index,
  43                          const gchar    * name,
  44                          const gchar    * path);
  45
  46 static void
  47 children_removed_listener (DBusConnection * bus,
  48                            gint             index,
  49                            const gchar    * name,
  50                            const gchar    * path);
  51
  52 /*---------------------------------------------------------------------------*/
  53
  54 typedef struct _SpiReference
  55 {
  56   gchar *name;
  57   gchar *path;
  58 } SpiReference;
  59
  60 static SpiReference *
  61 spi_reference_new (const gchar *name, const gchar *path)
  62 {
  63   SpiReference *ref;
  64
  65   ref = g_new0 (SpiReference, 1);
  66   ref->name = g_strdup (name);
  67   ref->path = g_strdup (path);
  68
  69   return ref;
  70 }
  71
  72 static void
  73 spi_reference_free (SpiReference *ref)
  74 {
  75   g_free (ref->name);
  76   g_free (ref->path);
  77   g_free (ref);
  78 }
  79
  80 /*---------------------------------------------------------------------------*/
  81
  82 G_DEFINE_TYPE(SpiRegistry, spi_registry, G_TYPE_OBJECT)
  83
  84 static void
  85 spi_registry_class_init (SpiRegistryClass *klass)
  86 {
  87   GObjectClass * object_class = (GObjectClass *) klass;
  88
  89   spi_registry_parent_class = g_type_class_ref (G_TYPE_OBJECT);
  90 }
  91
  92 static void
  93 spi_registry_init (SpiRegistry *registry)
  94 {
  95   registry->apps = g_ptr_array_new_with_free_func ((GDestroyNotify) spi_reference_free);
  96 }
  97
  98 /*---------------------------------------------------------------------------*/
  99
 100 static dbus_bool_t
 101 return_v_string (DBusMessageIter * iter, const gchar * str)
 102 {
 103   DBusMessageIter variant;
 104
 105   if (!dbus_message_iter_open_container (iter, DBUS_TYPE_VARIANT, "s",
 106                                     &variant))
 107     return FALSE;
 108     dbus_message_iter_append_basic (&variant, DBUS_TYPE_STRING, &str);
 109   dbus_message_iter_close_container (iter, &variant);
 110   return TRUE;
 111 }
 112
 113 static dbus_bool_t
 114 append_reference (DBusMessageIter * iter, const char * name, const char * path)
 115 {
 116   DBusMessageIter iter_struct;
 117
 118   if (!dbus_message_iter_open_container (iter, DBUS_TYPE_STRUCT, NULL,
 119                                     &iter_struct))
 120     return FALSE;
 121   dbus_message_iter_append_basic (&iter_struct, DBUS_TYPE_STRING, &name);
 122   dbus_message_iter_append_basic (&iter_struct, DBUS_TYPE_OBJECT_PATH, &path);
 123   dbus_message_iter_close_container (iter, &iter_struct);
 124   return TRUE;
 125 }
 126
 127 /*---------------------------------------------------------------------------*/
 128
 129 static gboolean
 130 compare_reference (SpiReference *one, SpiReference *two)
 131 {
 132   if (g_strcmp0 (one->name, two->name) == 0 &&
 133       g_strcmp0 (one->path, two->path) == 0)
 134     return TRUE;
 135   else
 136     return FALSE;
 137 }
 138
 139 static gboolean
 140 find_index_of_reference (GPtrArray *arr, const gchar *name, const gchar * path, guint *index)
 141 {
 142   SpiReference *ref;
 143   gboolean found = FALSE;
 144   guint i = 0;
 145
 146   ref = spi_reference_new (name, path);
 147
 148   for (i = 0; i < arr->len && found == FALSE; i++)
 149     {
 150       if (compare_reference (ref, g_ptr_array_index (arr, i)));
 151         {
 152           found = TRUE;
 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   event_data *evdata;
 230   gchar **remove_data;
 231   GList *list;
 232   gboolean mouse_found = FALSE;
 233   DBusMessage *signal;
 234
 235   remove_data = g_strsplit (event, ":", 3);
 236   if (!remove_data)
 237     {
 238       return;
 239     }
 240
 241   for (list = registry->events; list;)
 242     {
 243       event_data *evdata = list->data;
 244       list = list->next;
 245       if (!g_strcmp0 (evdata->bus_name, bus_name) &&
 246           event_is_subtype (evdata->data, remove_data))
 247         {
 248           g_strfreev (evdata->data);
 249           g_free (evdata->bus_name);
 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   SpiRegistry *registry = SPI_REGISTRY (user_data);
 344   guint res = DBUS_HANDLER_RESULT_HANDLED;
 345   const gint   type    = dbus_message_get_type (message);
 346   const char *iface = dbus_message_get_interface (message);
 347   const char *member = dbus_message_get_member (message);
 348
 349   if (type != DBUS_MESSAGE_TYPE_SIGNAL)
 350     return DBUS_HANDLER_RESULT_NOT_YET_HANDLED;
 351
 352   if (!g_strcmp0(iface, DBUS_INTERFACE_DBUS) &&
 353       !g_strcmp0(member, "NameOwnerChanged"))
 354       handle_disconnection (bus, message, user_data);
 355   else
 356       res = DBUS_HANDLER_RESULT_NOT_YET_HANDLED;
 357
 358   return res;
 359 }
 360
 361 /* org.at_spi.Socket interface */
 362 /*---------------------------------------------------------------------------*/
 363
 364 static DBusMessage*
 365 impl_Embed (DBusConnection *bus, DBusMessage *message, void *user_data)
 366 {
 367   SpiRegistry *reg = SPI_REGISTRY (user_data);
 368   DBusMessageIter iter, iter_struct;
 369   gchar *app_name, *obj_path;
 370
 371   DBusMessage *reply = NULL;
 372   DBusMessageIter reply_iter;
 373
 374   dbus_message_iter_init (message, &iter);
 375   dbus_message_iter_recurse (&iter, &iter_struct);
 376   if (!(dbus_message_iter_get_arg_type (&iter_struct) == DBUS_TYPE_STRING))
 377         goto error;
 378   dbus_message_iter_get_basic (&iter_struct, &app_name);
 379   if (!app_name)
 380     app_name = dbus_message_get_sender (message);
 381   if (!dbus_message_iter_next (&iter_struct))
 382         goto error;
 383   if (!(dbus_message_iter_get_arg_type (&iter_struct) == DBUS_TYPE_OBJECT_PATH))
 384         goto error;
 385   dbus_message_iter_get_basic (&iter_struct, &obj_path);
 386
 387   add_application(reg, bus, app_name, obj_path);
 388
 389   set_id (reg, bus, app_name, obj_path);
 390
 391   reply = dbus_message_new_method_return (message);
 392   dbus_message_iter_init_append (reply, &reply_iter);
 393   append_reference (&reply_iter,
 394                     dbus_bus_get_unique_name (bus),
 395                     SPI_DBUS_PATH_ROOT);
 396
 397   return reply;
 398 error:
 399   return dbus_message_new_error (message, DBUS_ERROR_FAILED, "Invalid arguments");
 400 }
 401
 402 static DBusMessage*
 403 impl_Unembed (DBusConnection *bus, DBusMessage *message, void *user_data)
 404 {
 405   SpiRegistry *reg = SPI_REGISTRY (user_data);
 406   DBusMessageIter iter, iter_struct;
 407   gchar *app_name, *obj_path;
 408   guint index;
 409
 410   dbus_message_iter_init (message, &iter);
 411   dbus_message_iter_recurse (&iter, &iter_struct);
 412   if (!(dbus_message_iter_get_arg_type (&iter_struct) == DBUS_TYPE_STRING))
 413         goto error;
 414   dbus_message_iter_get_basic (&iter_struct, &app_name);
 415   if (!dbus_message_iter_next (&iter_struct))
 416         goto error;
 417   if (!(dbus_message_iter_get_arg_type (&iter_struct) == DBUS_TYPE_OBJECT_PATH))
 418         goto error;
 419   dbus_message_iter_get_basic (&iter_struct, &obj_path);
 420
 421   if (find_index_of_reference (reg->apps, app_name, obj_path, &index))
 422       remove_application(reg, bus, index);
 423
 424   return NULL;
 425 error:
 426   return dbus_message_new_error (message, DBUS_ERROR_FAILED, "Invalid arguments");
 427 }
 428
 429 /* org.at_spi.Component interface */
 430 /*---------------------------------------------------------------------------*/
 431
 432 static DBusMessage *
 433 impl_Contains (DBusConnection * bus, DBusMessage * message, void *user_data)
 434 {
 435   dbus_bool_t retval = FALSE;
 436   DBusMessage *reply;
 437
 438   reply = dbus_message_new_method_return (message);
 439   dbus_message_append_args (reply, DBUS_TYPE_BOOLEAN, &retval,
 440                             DBUS_TYPE_INVALID);
 441   return reply;
 442 }
 443
 444 static DBusMessage *
 445 impl_GetAccessibleAtPoint (DBusConnection * bus, DBusMessage * message,
 446                            void *user_data)
 447 {
 448   DBusMessage *reply = NULL;
 449   DBusMessageIter iter;
 450
 451   reply = dbus_message_new_method_return (message);
 452   dbus_message_iter_init_append (reply, &iter);
 453   append_reference (&iter,
 454                     dbus_bus_get_unique_name (bus),
 455                     SPI_DBUS_PATH_NULL);
 456
 457   return reply;
 458 }
 459
 460 static DBusMessage *
 461 impl_GetExtents (DBusConnection * bus, DBusMessage * message, void *user_data)
 462 {
 463   dbus_uint32_t coord_type;
 464   dbus_int32_t x = 0, y = 0, width = 1024, height = 768;
 465   DBusMessage *reply;
 466   DBusMessageIter iter, iter_struct;
 467
 468   reply = dbus_message_new_method_return (message);
 469   dbus_message_iter_init_append (reply, &iter);
 470   dbus_message_iter_open_container (&iter, DBUS_TYPE_STRUCT, NULL,
 471                                     &iter_struct);
 472     dbus_message_iter_append_basic (&iter_struct, DBUS_TYPE_INT32, &x);
 473     dbus_message_iter_append_basic (&iter_struct, DBUS_TYPE_INT32, &y);
 474     dbus_message_iter_append_basic (&iter_struct, DBUS_TYPE_INT32, &width);
 475     dbus_message_iter_append_basic (&iter_struct, DBUS_TYPE_INT32, &height);
 476   dbus_message_iter_close_container (&iter, &iter_struct);
 477   return reply;
 478 }
 479
 480 static DBusMessage *
 481 impl_GetPosition (DBusConnection * bus, DBusMessage * message,
 482                   void *user_data)
 483 {
 484   DBusMessage *reply;
 485   dbus_int32_t x = 0, y = 0;
 486
 487   reply = dbus_message_new_method_return (message);
 488   dbus_message_append_args (reply, DBUS_TYPE_INT32, &x, DBUS_TYPE_INT32,
 489                             &y, DBUS_TYPE_INVALID);
 490   return reply;
 491 }
 492
 493 static DBusMessage *
 494 impl_GetSize (DBusConnection * bus, DBusMessage * message, void *user_data)
 495 {
 496   /* TODO - Get the screen size */
 497   DBusMessage *reply;
 498   dbus_int32_t width = 1024, height = 768;
 499
 500   reply = dbus_message_new_method_return (message);
 501   dbus_message_append_args (reply, DBUS_TYPE_INT32, &width,
 502                             DBUS_TYPE_INT32, &height, DBUS_TYPE_INVALID);
 503   return reply;
 504 }
 505
 506 #define LAYER_WIDGET 3;
 507
 508 static DBusMessage *
 509 impl_GetLayer (DBusConnection * bus, DBusMessage * message, void *user_data)
 510 {
 511   DBusMessage *reply;
 512   dbus_uint32_t rv = LAYER_WIDGET;
 513
 514   reply = dbus_message_new_method_return (message);
 515   dbus_message_append_args (reply, DBUS_TYPE_UINT32, &rv,
 516                             DBUS_TYPE_INVALID);
 517   return reply;
 518 }
 519
 520 static DBusMessage *
 521 impl_GetMDIZOrder (DBusConnection * bus, DBusMessage * message,
 522                    void *user_data)
 523 {
 524   DBusMessage *reply;
 525   dbus_int16_t rv = 0;
 526
 527   reply = dbus_message_new_method_return (message);
 528   dbus_message_append_args (reply, DBUS_TYPE_INT16, &rv,
 529                             DBUS_TYPE_INVALID);
 530   return reply;
 531 }
 532
 533 static DBusMessage *
 534 impl_GrabFocus (DBusConnection * bus, DBusMessage * message, void *user_data)
 535 {
 536   DBusMessage *reply;
 537   dbus_bool_t retval = FALSE;
 538
 539   reply = dbus_message_new_method_return (message);
 540   dbus_message_append_args (reply, DBUS_TYPE_BOOLEAN, &retval,
 541                             DBUS_TYPE_INVALID);
 542   return reply;
 543 }
 544
 545 static DBusMessage *
 546 impl_GetAlpha (DBusConnection * bus, DBusMessage * message, void *user_data)
 547 {
 548   double rv = 1.0;
 549   DBusMessage *reply;
 550
 551   reply = dbus_message_new_method_return (message);
 552   dbus_message_append_args (reply, DBUS_TYPE_DOUBLE, &rv,
 553                             DBUS_TYPE_INVALID);
 554   return reply;
 555 }
 556
 557 /* org.at_spi.Accessible interface */
 558 /*---------------------------------------------------------------------------*/
 559
 560 static dbus_bool_t
 561 impl_get_Name (DBusMessageIter * iter, void *user_data)
 562 {
 563   const gchar *name = "main";
 564   return return_v_string (iter, name);
 565 }
 566
 567 static dbus_bool_t
 568 impl_get_Description (DBusMessageIter * iter, void *user_data)
 569 {
 570   const gchar *description = "";
 571   return return_v_string (iter, description);
 572 }
 573
 574 static dbus_bool_t
 575 impl_get_Parent (DBusMessageIter * iter, void *user_data)
 576 {
 577   const gchar *name = "";
 578   DBusMessageIter iter_variant;
 579
 580   dbus_message_iter_open_container (iter, DBUS_TYPE_VARIANT, "(so)",
 581                                     &iter_variant);
 582   append_reference (&iter_variant,
 583                     name,
 584                     SPI_DBUS_PATH_NULL);
 585   dbus_message_iter_close_container (iter, &iter_variant);
 586   return TRUE;
 587 }
 588
 589 static dbus_bool_t
 590 impl_get_ChildCount (DBusMessageIter * iter, void *user_data)
 591 {
 592   SpiRegistry *reg = SPI_REGISTRY (user_data);
 593   dbus_int32_t rv = reg->apps->len;
 594   dbus_bool_t result;
 595   DBusMessageIter iter_variant;
 596
 597   if (!dbus_message_iter_open_container (iter, DBUS_TYPE_VARIANT, "i",
 598                                          &iter_variant))
 599     return FALSE;
 600   result = dbus_message_iter_append_basic (&iter_variant, DBUS_TYPE_INT32, &rv);
 601   dbus_message_iter_close_container (iter, &iter_variant);
 602   return result;
 603 }
 604
 605 static dbus_bool_t
 606 impl_get_ToolkitName (DBusMessageIter * iter, void *user_data)
 607 {
 608   return return_v_string (iter, "at-spi-registry");
 609 }
 610
 611 impl_get_ToolkitVersion (DBusMessageIter * iter, void *user_data)
 612 {
 613   return return_v_string (iter, "2.0");
 614 }
 615
 616 static DBusMessage *
 617 impl_GetChildAtIndex (DBusConnection * bus,
 618                       DBusMessage * message, void *user_data)
 619 {
 620   SpiRegistry *reg = SPI_REGISTRY (user_data);
 621   DBusMessage *reply;
 622   DBusMessageIter iter;
 623   DBusError error;
 624   SpiReference *ref;
 625   dbus_int32_t i;
 626
 627   dbus_error_init (&error);
 628   if (!dbus_message_get_args
 629        (message, &error, DBUS_TYPE_INT32, &i, DBUS_TYPE_INVALID))
 630     {
 631       return dbus_message_new_error (message, DBUS_ERROR_FAILED, "Invalid arguments");
 632     }
 633
 634   reply = dbus_message_new_method_return (message);
 635   dbus_message_iter_init_append (reply, &iter);
 636
 637   if (i < 0 || i >= reg->apps->len)
 638     append_reference (&iter, SPI_DBUS_NAME_REGISTRY, SPI_DBUS_PATH_NULL);
 639   else
 640     {
 641       ref = g_ptr_array_index (reg->apps, i);
 642       append_reference (&iter, ref->name, ref->path);
 643     }
 644
 645   return reply;
 646 }
 647
 648 static DBusMessage *
 649 impl_GetChildren (DBusConnection * bus,
 650                   DBusMessage * message, void *user_data)
 651 {
 652   DBusMessage *reply = NULL;
 653   DBusMessageIter iter, iter_array;
 654   SpiRegistry *reg = SPI_REGISTRY (user_data);
 655   int i;
 656
 657   reply = dbus_message_new_method_return (message);
 658
 659   dbus_message_iter_init_append (reply, &iter);
 660   dbus_message_iter_open_container(&iter, DBUS_TYPE_ARRAY, "(so)", &iter_array);
 661   for (i=0; i < reg->apps->len; i++)
 662     {
 663       SpiReference *current = g_ptr_array_index (reg->apps, i);
 664       append_reference (&iter_array, current->name, current->path);
 665     }
 666   dbus_message_iter_close_container(&iter, &iter_array);
 667   return reply;
 668 }
 669
 670 static DBusMessage *
 671 impl_GetIndexInParent (DBusConnection * bus,
 672                        DBusMessage * message, void *user_data)
 673 {
 674   DBusMessage *reply;
 675   dbus_uint32_t rv = 0;
 676
 677   reply = dbus_message_new_method_return (message);
 678   dbus_message_append_args (reply, DBUS_TYPE_INT32, &rv, DBUS_TYPE_INVALID);
 679   return reply;
 680 }
 681
 682 static DBusMessage *
 683 impl_GetRelationSet (DBusConnection * bus,
 684                      DBusMessage * message, void *user_data)
 685 {
 686   DBusMessage *reply;
 687   DBusMessageIter iter, iter_array;
 688
 689   reply = dbus_message_new_method_return (message);
 690   dbus_message_iter_init_append (reply, &iter);
 691   dbus_message_iter_open_container (&iter, DBUS_TYPE_ARRAY, "(ua(so))", &iter_array);
 692   dbus_message_iter_close_container (&iter, &iter_array);
 693
 694   return reply;
 695 }
 696
 697 static DBusMessage *
 698 impl_GetRole (DBusConnection * bus, DBusMessage * message, void * user_data)
 699 {
 700   DBusMessage *reply;
 701   dbus_uint32_t rv = 14;        /* TODO: Get DESKTOP_FRAME from somewhere */
 702
 703   reply = dbus_message_new_method_return (message);
 704   dbus_message_append_args (reply, DBUS_TYPE_UINT32, &rv, DBUS_TYPE_INVALID);
 705   return reply;
 706 }
 707
 708 static DBusMessage *
 709 impl_GetRoleName (DBusConnection * bus,
 710                   DBusMessage * message, void *user_data)
 711 {
 712   DBusMessage *reply;
 713   const char *role_name = "desktop frame";
 714
 715   reply = dbus_message_new_method_return (message);
 716   dbus_message_append_args (reply, DBUS_TYPE_STRING, &role_name,
 717                             DBUS_TYPE_INVALID);
 718   return reply;
 719 }
 720
 721 static DBusMessage *
 722 impl_GetLocalizedRoleName (DBusConnection * bus,
 723                            DBusMessage * message, void *user_data)
 724 {
 725   /* TODO - Localize this */
 726   DBusMessage *reply;
 727   const char *role_name = "desktop frame";
 728
 729   reply = dbus_message_new_method_return (message);
 730   dbus_message_append_args (reply, DBUS_TYPE_STRING, &role_name,
 731                             DBUS_TYPE_INVALID);
 732   return reply;
 733 }
 734
 735 static DBusMessage *
 736 impl_GetState (DBusConnection * bus, DBusMessage * message, void *user_data)
 737 {
 738   DBusMessage *reply = NULL;
 739   DBusMessageIter iter, iter_array;
 740
 741   dbus_uint32_t states[2] = {0, 0};
 742   guint count;
 743
 744   reply = dbus_message_new_method_return (message);
 745   dbus_message_iter_init_append (reply, &iter);
 746
 747   dbus_message_iter_open_container (&iter, DBUS_TYPE_ARRAY, "u", &iter_array);
 748   for (count = 0; count < 2; count++)
 749     {
 750       dbus_message_iter_append_basic (&iter_array, DBUS_TYPE_UINT32,
 751                                       &states[count]);
 752     }
 753   dbus_message_iter_close_container (&iter, &iter_array);
 754   return reply;
 755 }
 756
 757 static DBusMessage *
 758 impl_GetAttributes (DBusConnection * bus,
 759                     DBusMessage * message, void *user_data)
 760 {
 761   DBusMessage *reply = NULL;
 762   DBusMessageIter iter, array;
 763
 764   reply = dbus_message_new_method_return (message);
 765   dbus_message_iter_init_append (reply, &iter);
 766   dbus_message_iter_open_container (&iter, DBUS_TYPE_ARRAY, "{ss}", &array);
 767   dbus_message_iter_close_container (&iter, &array);
 768
 769   return reply;
 770 }
 771
 772 static DBusMessage *
 773 impl_GetApplication (DBusConnection * bus,
 774                      DBusMessage * message, void *user_data)
 775 {
 776   DBusMessage *reply = NULL;
 777   DBusMessageIter iter;
 778
 779   reply = dbus_message_new_method_return (message);
 780   dbus_message_iter_init_append (reply, &iter);
 781   append_reference (&iter,
 782                     dbus_bus_get_unique_name (bus),
 783                     SPI_DBUS_PATH_NULL);
 784
 785   return reply;
 786 }
 787
 788 static DBusMessage *
 789 impl_GetInterfaces (DBusConnection * bus,
 790                     DBusMessage * message, void *user_data)
 791 {
 792   DBusMessage *reply;
 793   DBusMessageIter iter, iter_array;
 794
 795   const char *acc = SPI_DBUS_INTERFACE_ACCESSIBLE;
 796   const char *com = SPI_DBUS_INTERFACE_COMPONENT;
 797
 798   reply = dbus_message_new_method_return (message);
 799
 800   dbus_message_iter_init_append (reply, &iter);
 801   dbus_message_iter_open_container (&iter, DBUS_TYPE_ARRAY, "s",
 802                                     &iter_array);
 803     dbus_message_iter_append_basic (&iter_array, DBUS_TYPE_STRING, &acc);
 804     dbus_message_iter_append_basic (&iter_array, DBUS_TYPE_STRING, &com);
 805   dbus_message_iter_close_container (&iter, &iter_array);
 806
 807   return reply;
 808 }
 809
 810 static DBusMessage *
 811 impl_GetItems (DBusConnection * bus, DBusMessage * message, void *user_data)
 812 {
 813   DBusMessage *reply;
 814   DBusMessageIter iter, iter_array;
 815
 816   reply = dbus_message_new_method_return (message);
 817
 818   dbus_message_iter_init_append (reply, &iter);
 819   dbus_message_iter_open_container (&iter, DBUS_TYPE_ARRAY,
 820                                     "((so)(so)(so)a(so)assusau)", &iter_array);
 821   dbus_message_iter_close_container (&iter, &iter_array);
 822   return reply;
 823 }
 824
 825 /* I would rather these two be signals, but I'm not sure that dbus-python
 826  * supports emitting signals except for a service, so implementing as both
 827  * a method call and signal for now.
 828  */
 829 static DBusMessage *
 830 impl_register_event (DBusConnection *bus, DBusMessage *message, void *user_data)
 831 {
 832   SpiRegistry *registry = SPI_REGISTRY (user_data);
 833   const char *orig_name;
 834   gchar *name;
 835   event_data *evdata;
 836   gchar **data;
 837   DBusMessage *signal;
 838   const char *sender = dbus_message_get_sender (message);
 839
 840   if (!dbus_message_get_args (message, NULL, DBUS_TYPE_STRING, &orig_name,
 841     DBUS_TYPE_INVALID))
 842     return NULL;
 843
 844   name = ensure_proper_format (orig_name);
 845
 846   evdata = (event_data *) g_malloc (sizeof (*evdata));
 847   if (!evdata)
 848     return NULL;
 849   data = g_strsplit (name, ":", 3);
 850   evdata->bus_name = g_strdup (sender);
 851   evdata->data = data;
 852   registry->events = g_list_append (registry->events, evdata);
 853
 854   if (needs_mouse_poll (evdata->data))
 855     {
 856       spi_device_event_controller_start_poll_mouse (registry);
 857     }
 858
 859   signal = dbus_message_new_signal (SPI_DBUS_PATH_REGISTRY,
 860                                     SPI_DBUS_INTERFACE_REGISTRY,
 861                                     "EventListenerRegistered");
 862   dbus_message_append_args (signal, DBUS_TYPE_STRING, &sender,
 863                             DBUS_TYPE_STRING, &name, DBUS_TYPE_INVALID);
 864   dbus_connection_send (bus, signal, NULL);
 865   dbus_message_unref (signal);
 866
 867   g_free (name);
 868   return dbus_message_new_method_return (message);
 869 }
 870
 871 static DBusMessage *
 872 impl_deregister_event (DBusConnection *bus, DBusMessage *message, void *user_data)
 873 {
 874   SpiRegistry *registry = SPI_REGISTRY (user_data);
 875   const char *orig_name;
 876   gchar *name;
 877   const char *sender = dbus_message_get_sender (message);
 878
 879   if (!dbus_message_get_args (message, NULL, DBUS_TYPE_STRING, &orig_name,
 880     DBUS_TYPE_INVALID))
 881     return NULL;
 882   name = ensure_proper_format (orig_name);
 883
 884   remove_events (registry, sender, name);
 885
 886   g_free (name);
 887   return dbus_message_new_method_return (message);
 888 }
 889
 890 static DBusMessage *
 891 impl_get_registered_events (DBusConnection *bus, DBusMessage *message, void *user_data)
 892 {
 893   SpiRegistry *registry = SPI_REGISTRY (user_data);
 894   event_data *evdata;
 895   DBusMessage *reply;
 896   DBusMessageIter iter, iter_struct, iter_array;
 897   GList *list;
 898
 899   reply = dbus_message_new_method_return (message);
 900   if (!reply)
 901     return NULL;
 902
 903   dbus_message_iter_init_append (reply, &iter);
 904   dbus_message_iter_open_container (&iter, DBUS_TYPE_ARRAY, "(ss)", &iter_array);
 905   for (list = registry->events; list; list = list->next)
 906     {
 907       gchar *str;
 908       evdata = list->data;
 909       str = g_strconcat (evdata->data [0],
 910                          ":", (evdata->data [1]? evdata->data [1]: ""),
 911                          ":", (evdata->data [1] && evdata->data [2]? evdata->data [2]: ""), NULL);
 912       dbus_message_iter_open_container (&iter_array, DBUS_TYPE_STRUCT, NULL, &iter_struct);
 913       dbus_message_iter_append_basic (&iter_struct, DBUS_TYPE_STRING, &evdata->bus_name);
 914       dbus_message_iter_append_basic (&iter_struct, DBUS_TYPE_STRING, &str);
 915       dbus_message_iter_close_container (&iter_array, &iter_struct);
 916       g_free (str);
 917     }
 918   dbus_message_iter_close_container (&iter, &iter_array);
 919   return reply;
 920 }
 921
 922 /*---------------------------------------------------------------------------*/
 923
 924 static void
 925 emit_Available (DBusConnection * bus)
 926 {
 927   DBusMessage *sig;
 928   DBusMessageIter iter;
 929
 930   sig = dbus_message_new_signal(SPI_DBUS_PATH_ROOT, SPI_DBUS_INTERFACE_SOCKET, "Available");
 931
 932   dbus_message_iter_init_append(sig, &iter);
 933   append_reference (&iter, SPI_DBUS_NAME_REGISTRY, SPI_DBUS_PATH_ROOT);
 934
 935   dbus_connection_send(bus, sig, NULL);
 936   dbus_message_unref(sig);
 937 }
 938
 939 /*---------------------------------------------------------------------------*/
 940
 941 static const char *introspection_header =
 942 "<?xml version=\"1.0\"?>\n";
 943
 944 static const char *introspection_node_element =
 945 "<node name=\"%s\">\n";
 946
 947 static const char *introspection_footer =
 948 "</node>";
 949
 950 static DBusMessage *
 951 impl_Introspect_root (DBusConnection * bus,
 952                  DBusMessage * message, void *user_data)
 953 {
 954   GString *output;
 955   gchar *final;
 956   gint i;
 957
 958   const gchar *pathstr = SPI_DBUS_PATH_ROOT;
 959
 960   DBusMessage *reply;
 961
 962   output = g_string_new(introspection_header);
 963
 964   g_string_append_printf(output, introspection_node_element, pathstr);
 965
 966   g_string_append (output, spi_org_a11y_atspi_Accessible);
 967   g_string_append (output, spi_org_a11y_atspi_Component);
 968
 969   g_string_append(output, introspection_footer);
 970   final = g_string_free(output, FALSE);
 971
 972   reply = dbus_message_new_method_return (message);
 973   dbus_message_append_args(reply, DBUS_TYPE_STRING, &final, DBUS_TYPE_INVALID);
 974
 975   g_free(final);
 976   return reply;
 977 }
 978
 979 static DBusMessage *
 980 impl_Introspect_registry (DBusConnection * bus,
 981                  DBusMessage * message, void *user_data)
 982 {
 983   GString *output;
 984   gchar *final;
 985   gint i;
 986
 987   const gchar *pathstr = SPI_DBUS_PATH_REGISTRY;
 988
 989   DBusMessage *reply;
 990
 991   output = g_string_new(introspection_header);
 992
 993   g_string_append_printf(output, introspection_node_element, pathstr);
 994
 995   g_string_append (output, spi_org_a11y_atspi_Registry);
 996
 997   g_string_append(output, introspection_footer);
 998   final = g_string_free(output, FALSE);
 999
1000   reply = dbus_message_new_method_return (message);
1001   dbus_message_append_args(reply, DBUS_TYPE_STRING, &final, DBUS_TYPE_INVALID);
1002
1003   g_free(final);
1004   return reply;
1005 }
1006
1007 /*---------------------------------------------------------------------------*/
1008
1009 /*
1010  * Emits an AT-SPI event.
1011  * AT-SPI events names are split into three parts:
1012  * class:major:minor
1013  * This is mapped onto D-Bus events as:
1014  * D-Bus Interface:Signal Name:Detail argument
1015  *
1016  * Marshals a basic type into the 'any_data' attribute of
1017  * the AT-SPI event.
1018  */
1019 static void
1020 emit_event (DBusConnection *bus,
1021             const char *klass,
1022             const char *major,
1023             const char *minor,
1024             dbus_int32_t detail1,
1025             dbus_int32_t detail2,
1026             const char *name,
1027             const char *path)
1028 {
1029   DBusMessage *sig;
1030   DBusMessageIter iter, iter_variant;
1031
1032   sig = dbus_message_new_signal(SPI_DBUS_PATH_ROOT, klass, major);
1033
1034   dbus_message_iter_init_append(sig, &iter);
1035
1036   dbus_message_iter_append_basic(&iter, DBUS_TYPE_STRING, &minor);
1037   dbus_message_iter_append_basic(&iter, DBUS_TYPE_INT32, &detail1);
1038   dbus_message_iter_append_basic(&iter, DBUS_TYPE_INT32, &detail2);
1039
1040   dbus_message_iter_open_container (&iter, DBUS_TYPE_VARIANT, "(so)",
1041                                     &iter_variant);
1042     append_reference (&iter_variant, name, path);
1043   dbus_message_iter_close_container (&iter, &iter_variant);
1044
1045   append_reference (&iter,
1046                     dbus_bus_get_unique_name (bus),
1047                     SPI_DBUS_PATH_ROOT);
1048
1049   dbus_connection_send(bus, sig, NULL);
1050   dbus_message_unref(sig);
1051 }
1052
1053 /*---------------------------------------------------------------------------*/
1054
1055 /*
1056  * Children changed signal converter and forwarder.
1057  *
1058  * Klass (Interface) org.a11y.atspi.Event.Object
1059  * Major is the signal name.
1060  * Minor is 'add' or 'remove'
1061  * detail1 is the index.
1062  * detail2 is 0.
1063  * any_data is the child reference.
1064  */
1065
1066 static void
1067 children_added_listener (DBusConnection * bus,
1068                          gint             index,
1069                          const gchar    * name,
1070                          const gchar    * path)
1071 {
1072   emit_event (bus, SPI_DBUS_INTERFACE_EVENT_OBJECT, "ChildrenChanged", "add", index, 0,
1073               name, path);
1074 }
1075
1076 static void
1077 children_removed_listener (DBusConnection * bus,
1078                            gint             index,
1079                            const gchar    * name,
1080                            const gchar    * path)
1081 {
1082   emit_event (bus, SPI_DBUS_INTERFACE_EVENT_OBJECT, "ChildrenChanged", "remove", index, 0,
1083               name, path);
1084 }
1085
1086 /*---------------------------------------------------------------------------*/
1087
1088 static DBusHandlerResult
1089 handle_method_root (DBusConnection *bus, DBusMessage *message, void *user_data)
1090 {
1091   DBusHandlerResult result = DBUS_HANDLER_RESULT_NOT_YET_HANDLED;
1092
1093   const gchar *iface   = dbus_message_get_interface (message);
1094   const gchar *member  = dbus_message_get_member (message);
1095   const gint   type    = dbus_message_get_type (message);
1096
1097   DBusMessage *reply = NULL;
1098
1099   /* Check for basic reasons not to handle */
1100   if (type   != DBUS_MESSAGE_TYPE_METHOD_CALL ||
1101       member == NULL ||
1102       iface  == NULL)
1103       return DBUS_HANDLER_RESULT_NOT_YET_HANDLED;
1104
1105   if (!strcmp (iface, "org.freedesktop.DBus.Properties"))
1106     {
1107       if (!strcmp (member, "Get"))
1108         {
1109           const gchar *prop_iface;
1110           const gchar *prop_member;
1111           DBusError error;
1112
1113           dbus_error_init (&error);
1114           if (dbus_message_get_args (message,
1115                                      &error,
1116                                      DBUS_TYPE_STRING,
1117                                      &prop_iface,
1118                                      DBUS_TYPE_STRING,
1119                                      &prop_member,
1120                                      DBUS_TYPE_INVALID))
1121             {
1122               DBusMessageIter iter;
1123
1124               reply = dbus_message_new_method_return (message);
1125               dbus_message_iter_init_append (reply, &iter);
1126
1127
1128               if (!strcmp (prop_iface, SPI_DBUS_INTERFACE_ACCESSIBLE))
1129                 {
1130                   if      (!strcmp (prop_member, "Name"))
1131                     impl_get_Name (&iter, user_data);
1132                   else if (!strcmp (prop_member, "Description"))
1133                     impl_get_Description (&iter, user_data);
1134                   else if (!strcmp (prop_member, "Parent"))
1135                     impl_get_Parent (&iter, user_data);
1136                   else if (!strcmp (prop_member, "ChildCount"))
1137                     impl_get_ChildCount (&iter, user_data);
1138                   else
1139                     {
1140                       dbus_message_unref (reply);
1141                       reply = dbus_message_new_error (message, DBUS_ERROR_FAILED, "Property unavailable");
1142                     }
1143                 }
1144               else if (!strcmp (prop_iface, SPI_DBUS_INTERFACE_APPLICATION))
1145                 {
1146                   if (!strcmp (prop_member, "ToolkitName"))
1147                     impl_get_ToolkitName (&iter, user_data);
1148                   else if (!strcmp (prop_member, "ToolkitVersion"))
1149                     impl_get_ToolkitVersion (&iter, user_data);
1150                   else
1151                     {
1152                       dbus_message_unref (reply);
1153                       reply = dbus_message_new_error (message, DBUS_ERROR_FAILED, "Property unavailable");
1154                     }
1155                 }
1156               else
1157                 {
1158                   dbus_message_unref (reply);
1159                   reply = dbus_message_new_error (message, DBUS_ERROR_FAILED, "Property unavailable");
1160                 }
1161             }
1162           else
1163             {
1164               reply = dbus_message_new_error (message, DBUS_ERROR_FAILED, error.message);
1165             }
1166           result = DBUS_HANDLER_RESULT_HANDLED;
1167         }
1168       else if (!strcmp (member, "GetAll"))
1169         {
1170           result = DBUS_HANDLER_RESULT_HANDLED;
1171         }
1172     }
1173
1174   if (!strcmp (iface, SPI_DBUS_INTERFACE_ACCESSIBLE))
1175     {
1176       result = DBUS_HANDLER_RESULT_HANDLED;
1177       if      (!strcmp (member, "GetChildAtIndex"))
1178           reply = impl_GetChildAtIndex (bus, message, user_data);
1179       else if (!strcmp (member, "GetChildren"))
1180           reply = impl_GetChildren (bus, message, user_data);
1181       else if (!strcmp (member, "GetIndexInParent"))
1182           reply = impl_GetIndexInParent (bus, message, user_data);
1183       else if (!strcmp (member, "GetRelationSet"))
1184           reply = impl_GetRelationSet (bus, message, user_data);
1185       else if (!strcmp (member, "GetRole"))
1186           reply = impl_GetRole (bus, message, user_data);
1187       else if (!strcmp (member, "GetRoleName"))
1188           reply = impl_GetRoleName (bus, message, user_data);
1189       else if (!strcmp (member, "GetLocalizedRoleName"))
1190           reply = impl_GetLocalizedRoleName (bus, message, user_data);
1191       else if (!strcmp (member, "GetState"))
1192           reply = impl_GetState (bus, message, user_data);
1193       else if (!strcmp (member, "GetAttributes"))
1194           reply = impl_GetAttributes (bus, message, user_data);
1195       else if (!strcmp (member, "GetApplication"))
1196           reply = impl_GetApplication (bus, message, user_data);
1197       else if (!strcmp (member, "GetInterfaces"))
1198           reply = impl_GetInterfaces (bus, message, user_data);
1199       else
1200          result = DBUS_HANDLER_RESULT_NOT_YET_HANDLED;
1201     }
1202
1203   if (!strcmp (iface, SPI_DBUS_INTERFACE_COMPONENT))
1204     {
1205       result = DBUS_HANDLER_RESULT_HANDLED;
1206       if      (!strcmp (member, "Contains"))
1207           reply = impl_Contains (bus, message, user_data);
1208       else if (!strcmp (member, "GetAccessibleAtPoint"))
1209           reply = impl_GetAccessibleAtPoint (bus, message, user_data);
1210       else if (!strcmp (member, "GetExtents"))
1211           reply = impl_GetExtents (bus, message, user_data);
1212       else if (!strcmp (member, "GetPosition"))
1213           reply = impl_GetPosition (bus, message, user_data);
1214       else if (!strcmp (member, "GetSize"))
1215           reply = impl_GetSize (bus, message, user_data);
1216       else if (!strcmp (member, "GetLayer"))
1217           reply = impl_GetLayer (bus, message, user_data);
1218       else if (!strcmp (member, "GetMDIZOrder"))
1219           reply = impl_GetMDIZOrder (bus, message, user_data);
1220       else if (!strcmp (member, "GrabFocus"))
1221           reply = impl_GrabFocus (bus, message, user_data);
1222       else if (!strcmp (member, "GetAlpha"))
1223           reply = impl_GetAlpha (bus, message, user_data);
1224       else
1225          result = DBUS_HANDLER_RESULT_NOT_YET_HANDLED;
1226     }
1227
1228   if (!strcmp (iface, SPI_DBUS_INTERFACE_SOCKET))
1229     {
1230       result = DBUS_HANDLER_RESULT_HANDLED;
1231       if      (!strcmp (member, "Embed"))
1232           reply = impl_Embed (bus, message, user_data);
1233       else if (!strcmp (member, "Unembed"))
1234           reply = impl_Unembed (bus, message, user_data);
1235       else
1236           result = DBUS_HANDLER_RESULT_NOT_YET_HANDLED;
1237     }
1238
1239   if (!strcmp (iface, "org.freedesktop.DBus.Introspectable"))
1240     {
1241       result = DBUS_HANDLER_RESULT_HANDLED;
1242       if      (!strcmp (member, "Introspect"))
1243           reply = impl_Introspect_root (bus, message, user_data);
1244       else
1245           result = DBUS_HANDLER_RESULT_NOT_YET_HANDLED;
1246     }
1247
1248   if (result == DBUS_HANDLER_RESULT_HANDLED)
1249     {
1250       if (!reply)
1251         {
1252           reply = dbus_message_new_method_return (message);
1253         }
1254
1255       dbus_connection_send (bus, reply, NULL);
1256       dbus_message_unref (reply);
1257     }
1258 #if 0
1259   else
1260     {
1261       g_print ("Registry | Unhandled message : %s|%s\n", iface, member);
1262     }
1263 #endif
1264
1265   return result;
1266 }
1267
1268 static DBusHandlerResult
1269 handle_method_cache (DBusConnection *bus, DBusMessage *message, void *user_data)
1270 {
1271   DBusHandlerResult result = DBUS_HANDLER_RESULT_NOT_YET_HANDLED;
1272
1273   const gchar *iface   = dbus_message_get_interface (message);
1274   const gchar *member  = dbus_message_get_member (message);
1275   const gint   type    = dbus_message_get_type (message);
1276
1277   DBusMessage *reply = NULL;
1278
1279   /* Check for basic reasons not to handle */
1280   if (type   != DBUS_MESSAGE_TYPE_METHOD_CALL ||
1281       member == NULL ||
1282       iface  == NULL)
1283       return DBUS_HANDLER_RESULT_NOT_YET_HANDLED;
1284
1285   if (!strcmp (iface, SPI_DBUS_INTERFACE_CACHE))
1286     {
1287       result = DBUS_HANDLER_RESULT_HANDLED;
1288       if      (!strcmp (member, "GetItems"))
1289           reply = impl_GetItems (bus, message, user_data);
1290       else
1291          result = DBUS_HANDLER_RESULT_NOT_YET_HANDLED;
1292     }
1293
1294   if (result == DBUS_HANDLER_RESULT_HANDLED)
1295     {
1296       if (!reply)
1297         {
1298           reply = dbus_message_new_method_return (message);
1299         }
1300
1301       dbus_connection_send (bus, reply, NULL);
1302       dbus_message_unref (reply);
1303     }
1304   return result;
1305 }
1306
1307 static DBusHandlerResult
1308 handle_method_registry (DBusConnection *bus, DBusMessage *message, void *user_data)
1309 {
1310   DBusHandlerResult result = DBUS_HANDLER_RESULT_NOT_YET_HANDLED;
1311
1312   const gchar *iface   = dbus_message_get_interface (message);
1313   const gchar *member  = dbus_message_get_member (message);
1314   const gint   type    = dbus_message_get_type (message);
1315
1316   DBusMessage *reply = NULL;
1317
1318   /* Check for basic reasons not to handle */
1319   if (type   != DBUS_MESSAGE_TYPE_METHOD_CALL ||
1320       member == NULL ||
1321       iface  == NULL)
1322       return DBUS_HANDLER_RESULT_NOT_YET_HANDLED;
1323
1324   if (!strcmp (iface, SPI_DBUS_INTERFACE_REGISTRY))
1325     {
1326       result = DBUS_HANDLER_RESULT_HANDLED;
1327       if (!strcmp(member, "RegisterEvent"))
1328       reply = impl_register_event (bus, message, user_data);
1329       else if (!strcmp(member, "DeregisterEvent"))
1330         reply = impl_deregister_event (bus, message, user_data);
1331       else if (!strcmp(member, "GetRegisteredEvents"))
1332         reply = impl_get_registered_events (bus, message, user_data);
1333       else
1334           result = DBUS_HANDLER_RESULT_NOT_YET_HANDLED;
1335     }
1336
1337   if (!strcmp (iface, "org.freedesktop.DBus.Introspectable"))
1338     {
1339       result = DBUS_HANDLER_RESULT_HANDLED;
1340       if      (!strcmp (member, "Introspect"))
1341           reply = impl_Introspect_registry (bus, message, user_data);
1342       else
1343           result = DBUS_HANDLER_RESULT_NOT_YET_HANDLED;
1344     }
1345
1346   if (result == DBUS_HANDLER_RESULT_HANDLED)
1347     {
1348       if (!reply)
1349         {
1350           reply = dbus_message_new_method_return (message);
1351         }
1352
1353       dbus_connection_send (bus, reply, NULL);
1354       dbus_message_unref (reply);
1355     }
1356 #if 0
1357   else
1358     {
1359       g_print ("Registry | Unhandled message : %s|%s\n", iface, member);
1360     }
1361 #endif
1362
1363   return result;
1364 }
1365
1366 /*---------------------------------------------------------------------------*/
1367
1368 static DBusObjectPathVTable root_vtable =
1369 {
1370   NULL,
1371   &handle_method_root,
1372   NULL, NULL, NULL, NULL
1373 };
1374
1375 static DBusObjectPathVTable registry_vtable =
1376 {
1377   NULL,
1378   &handle_method_registry,
1379   NULL, NULL, NULL, NULL
1380 };
1381
1382 static DBusObjectPathVTable cache_vtable =
1383 {
1384   NULL,
1385   &handle_method_cache,
1386   NULL, NULL, NULL, NULL
1387 };
1388
1389 static gchar *app_sig_match_name_owner =
1390        "type='signal', interface='org.freedesktop.DBus', member='NameOwnerChanged'";
1391
1392 SpiRegistry *
1393 spi_registry_new (DBusConnection *bus)
1394 {
1395   SpiRegistry *reg = g_object_new (SPI_REGISTRY_TYPE, NULL);
1396
1397   reg->bus = bus;
1398
1399   dbus_bus_add_match (bus, app_sig_match_name_owner, NULL);
1400   dbus_connection_add_filter (bus, signal_filter, reg, NULL);
1401
1402   dbus_connection_register_object_path (bus, SPI_DBUS_PATH_ROOT, &root_vtable, reg);
1403
1404   dbus_connection_register_object_path (bus, SPI_DBUS_PATH_CACHE, &cache_vtable, reg);
1405
1406   dbus_connection_register_object_path (bus, SPI_DBUS_PATH_REGISTRY, &registry_vtable, reg);
1407
1408   emit_Available (bus);
1409
1410   reg->events = NULL;
1411
1412   return reg;
1413 }
1414
1415 /*END------------------------------------------------------------------------*/