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