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