autoconf: include missing meson build files
[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
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_GetAlpha (DBusConnection * bus, DBusMessage * message, void *user_data)
546 {
547   double rv = 1.0;
548   DBusMessage *reply;
549
550   reply = dbus_message_new_method_return (message);
551   dbus_message_append_args (reply, DBUS_TYPE_DOUBLE, &rv,
552                             DBUS_TYPE_INVALID);
553   return reply;
554 }
555
556 /* org.at_spi.Accessible interface */
557 /*---------------------------------------------------------------------------*/
558
559 static dbus_bool_t
560 impl_get_Name (DBusMessageIter * iter, void *user_data)
561 {
562   const gchar *name = "main";
563   return return_v_string (iter, name);
564 }
565
566 static dbus_bool_t
567 impl_get_Description (DBusMessageIter * iter, void *user_data)
568 {
569   const gchar *description = "";
570   return return_v_string (iter, description);
571 }
572
573 static dbus_bool_t
574 impl_get_Parent (DBusMessageIter * iter, void *user_data)
575 {
576   const gchar *name = "";
577   DBusMessageIter iter_variant;
578
579   dbus_message_iter_open_container (iter, DBUS_TYPE_VARIANT, "(so)",
580                                     &iter_variant);
581   append_reference (&iter_variant, 
582                     name,
583                     SPI_DBUS_PATH_NULL);
584   dbus_message_iter_close_container (iter, &iter_variant);
585   return TRUE;
586 }
587
588 static dbus_bool_t
589 impl_get_ChildCount (DBusMessageIter * iter, void *user_data)
590 {
591   SpiRegistry *reg = SPI_REGISTRY (user_data);
592   dbus_int32_t rv = reg->apps->len;
593   dbus_bool_t result;
594   DBusMessageIter iter_variant;
595
596   if (!dbus_message_iter_open_container (iter, DBUS_TYPE_VARIANT, "i",
597                                          &iter_variant))
598     return FALSE;
599   result = dbus_message_iter_append_basic (&iter_variant, DBUS_TYPE_INT32, &rv);
600   dbus_message_iter_close_container (iter, &iter_variant);
601   return result;
602 }
603
604 static dbus_bool_t
605 impl_get_ToolkitName (DBusMessageIter * iter, void *user_data)
606 {
607   return return_v_string (iter, "at-spi-registry");
608 }
609
610 static dbus_bool_t
611 impl_get_ToolkitVersion (DBusMessageIter * iter, void *user_data)
612 {
613   return return_v_string (iter, "2.0");
614 }
615
616 static DBusMessage *
617 impl_GetChildAtIndex (DBusConnection * bus,
618                       DBusMessage * message, void *user_data)
619 {
620   SpiRegistry *reg = SPI_REGISTRY (user_data);
621   DBusMessage *reply;
622   DBusMessageIter iter;
623   DBusError error;
624   SpiReference *ref;
625   dbus_int32_t i;
626
627   dbus_error_init (&error);
628   if (!dbus_message_get_args 
629        (message, &error, DBUS_TYPE_INT32, &i, DBUS_TYPE_INVALID))
630     {
631       return dbus_message_new_error (message, DBUS_ERROR_FAILED, "Invalid arguments");
632     }
633
634   reply = dbus_message_new_method_return (message);
635   dbus_message_iter_init_append (reply, &iter);
636
637   if (i < 0 || i >= reg->apps->len)
638     append_reference (&iter, SPI_DBUS_NAME_REGISTRY, SPI_DBUS_PATH_NULL);
639   else
640     {
641       ref = g_ptr_array_index (reg->apps, i);
642       append_reference (&iter, ref->name, ref->path);
643     }
644
645   return reply;
646 }
647
648 static DBusMessage *
649 impl_GetChildren (DBusConnection * bus,
650                   DBusMessage * message, void *user_data)
651 {
652   DBusMessage *reply = NULL;
653   DBusMessageIter iter, iter_array;
654   SpiRegistry *reg = SPI_REGISTRY (user_data);
655   int i;
656
657   reply = dbus_message_new_method_return (message);
658
659   dbus_message_iter_init_append (reply, &iter);
660   dbus_message_iter_open_container(&iter, DBUS_TYPE_ARRAY, "(so)", &iter_array);
661   for (i=0; i < reg->apps->len; i++)
662     {
663       SpiReference *current = g_ptr_array_index (reg->apps, i);
664       append_reference (&iter_array, current->name, current->path);
665     }
666   dbus_message_iter_close_container(&iter, &iter_array);
667   return reply;
668 }
669
670 static DBusMessage *
671 impl_GetIndexInParent (DBusConnection * bus,
672                        DBusMessage * message, void *user_data)
673 {
674   DBusMessage *reply;
675   dbus_uint32_t rv = 0;
676
677   reply = dbus_message_new_method_return (message);
678   dbus_message_append_args (reply, DBUS_TYPE_INT32, &rv, DBUS_TYPE_INVALID);
679   return reply;
680 }
681
682 static DBusMessage *
683 impl_GetRelationSet (DBusConnection * bus,
684                      DBusMessage * message, void *user_data)
685 {
686   DBusMessage *reply;
687   DBusMessageIter iter, iter_array;
688
689   reply = dbus_message_new_method_return (message);
690   dbus_message_iter_init_append (reply, &iter);
691   dbus_message_iter_open_container (&iter, DBUS_TYPE_ARRAY, "(ua(so))", &iter_array);
692   dbus_message_iter_close_container (&iter, &iter_array);
693
694   return reply;
695 }
696
697 static DBusMessage *
698 impl_GetRole (DBusConnection * bus, DBusMessage * message, void * user_data)
699 {
700   DBusMessage *reply;
701   dbus_uint32_t rv = 14;        /* TODO: Get DESKTOP_FRAME from somewhere */
702
703   reply = dbus_message_new_method_return (message);
704   dbus_message_append_args (reply, DBUS_TYPE_UINT32, &rv, DBUS_TYPE_INVALID);
705   return reply;
706 }
707
708 static DBusMessage *
709 impl_GetRoleName (DBusConnection * bus,
710                   DBusMessage * message, void *user_data)
711 {
712   DBusMessage *reply;
713   const char *role_name = "desktop frame";
714
715   reply = dbus_message_new_method_return (message);
716   dbus_message_append_args (reply, DBUS_TYPE_STRING, &role_name,
717                             DBUS_TYPE_INVALID);
718   return reply;
719 }
720
721 static DBusMessage *
722 impl_GetLocalizedRoleName (DBusConnection * bus,
723                            DBusMessage * message, void *user_data)
724 {
725   /* TODO - Localize this */
726   DBusMessage *reply;
727   const char *role_name = "desktop frame";
728
729   reply = dbus_message_new_method_return (message);
730   dbus_message_append_args (reply, DBUS_TYPE_STRING, &role_name,
731                             DBUS_TYPE_INVALID);
732   return reply;
733 }
734
735 static DBusMessage *
736 impl_GetState (DBusConnection * bus, DBusMessage * message, void *user_data)
737 {
738   DBusMessage *reply = NULL;
739   DBusMessageIter iter, iter_array;
740
741   dbus_uint32_t states[2] = {0, 0};
742   guint count;
743
744   reply = dbus_message_new_method_return (message);
745   dbus_message_iter_init_append (reply, &iter);
746
747   dbus_message_iter_open_container (&iter, DBUS_TYPE_ARRAY, "u", &iter_array);
748   for (count = 0; count < 2; count++)
749     {
750       dbus_message_iter_append_basic (&iter_array, DBUS_TYPE_UINT32,
751                                       &states[count]);
752     }
753   dbus_message_iter_close_container (&iter, &iter_array);
754   return reply;
755 }
756
757 static DBusMessage *
758 impl_GetAttributes (DBusConnection * bus,
759                     DBusMessage * message, void *user_data)
760 {
761   DBusMessage *reply = NULL;
762   DBusMessageIter iter, array;
763
764   reply = dbus_message_new_method_return (message);
765   dbus_message_iter_init_append (reply, &iter);
766   dbus_message_iter_open_container (&iter, DBUS_TYPE_ARRAY, "{ss}", &array);
767   dbus_message_iter_close_container (&iter, &array);
768
769   return reply;
770 }
771
772 static DBusMessage *
773 impl_GetApplication (DBusConnection * bus,
774                      DBusMessage * message, void *user_data)
775 {
776   DBusMessage *reply = NULL;
777   DBusMessageIter iter;
778
779   reply = dbus_message_new_method_return (message);
780   dbus_message_iter_init_append (reply, &iter);
781   append_reference (&iter,
782                     dbus_bus_get_unique_name (bus),
783                     SPI_DBUS_PATH_NULL);
784
785   return reply;
786 }
787
788 static DBusMessage *
789 impl_GetInterfaces (DBusConnection * bus,
790                     DBusMessage * message, void *user_data)
791 {
792   DBusMessage *reply;
793   DBusMessageIter iter, iter_array;
794
795   const char *acc = SPI_DBUS_INTERFACE_ACCESSIBLE;
796   const char *com = SPI_DBUS_INTERFACE_COMPONENT;
797
798   reply = dbus_message_new_method_return (message);
799
800   dbus_message_iter_init_append (reply, &iter);
801   dbus_message_iter_open_container (&iter, DBUS_TYPE_ARRAY, "s",
802                                     &iter_array);
803     dbus_message_iter_append_basic (&iter_array, DBUS_TYPE_STRING, &acc);
804     dbus_message_iter_append_basic (&iter_array, DBUS_TYPE_STRING, &com);
805   dbus_message_iter_close_container (&iter, &iter_array);
806
807   return reply;
808 }
809
810 static DBusMessage *
811 impl_GetItems (DBusConnection * bus, DBusMessage * message, void *user_data)
812 {
813   DBusMessage *reply;
814   DBusMessageIter iter, iter_array;
815
816   reply = dbus_message_new_method_return (message);
817
818   dbus_message_iter_init_append (reply, &iter);
819   dbus_message_iter_open_container (&iter, DBUS_TYPE_ARRAY,
820                                     "((so)(so)(so)a(so)assusau)", &iter_array);
821   dbus_message_iter_close_container (&iter, &iter_array);
822   return reply;
823 }
824
825 /* I would rather these two be signals, but I'm not sure that dbus-python
826  * supports emitting signals except for a service, so implementing as both
827  * a method call and signal for now.
828  */
829 static DBusMessage *
830 impl_register_event (DBusConnection *bus, DBusMessage *message, void *user_data)
831 {
832   SpiRegistry *registry = SPI_REGISTRY (user_data);
833   const char *orig_name;
834   gchar *name;
835   event_data *evdata;
836   gchar **data;
837   DBusMessage *signal;
838   const char *sender = dbus_message_get_sender (message);
839   DBusMessageIter iter, iter_array;
840   const char *signature = dbus_message_get_signature (message);
841
842   if (strcmp (signature, "sas") != 0 &&
843       strcmp (signature, "s") != 0)
844   {
845     g_warning ("got RegisterEvent with invalid signature '%s'", signature);
846     return NULL;
847   }
848
849   dbus_message_iter_init (message, &iter);
850   dbus_message_iter_get_basic (&iter, &orig_name);
851   dbus_message_iter_next (&iter);
852   name = ensure_proper_format (orig_name);
853
854   evdata = g_new0 (event_data, 1);
855   data = g_strsplit (name, ":", 3);
856   evdata->bus_name = g_strdup (sender);
857   evdata->data = data;
858
859   if (dbus_message_iter_get_arg_type (&iter) == DBUS_TYPE_ARRAY)
860   {
861     dbus_message_iter_recurse (&iter, &iter_array);
862     while (dbus_message_iter_get_arg_type (&iter_array) != DBUS_TYPE_INVALID)
863     {
864       const char *property;
865       dbus_message_iter_get_basic (&iter_array, &property);
866       evdata->properties = g_slist_append (evdata->properties,
867                                            g_strdup (property));
868       dbus_message_iter_next (&iter_array);
869     }
870   }
871   registry->events = g_list_append (registry->events, evdata);
872
873   if (needs_mouse_poll (evdata->data))
874     {
875       spi_device_event_controller_start_poll_mouse (registry);
876     }
877
878   signal = dbus_message_new_signal (SPI_DBUS_PATH_REGISTRY,
879                                     SPI_DBUS_INTERFACE_REGISTRY,
880                                     "EventListenerRegistered");
881   if (signal)
882   {
883     GSList *ls = evdata->properties;
884     dbus_message_iter_init_append (signal, &iter);
885     dbus_message_iter_append_basic (&iter, DBUS_TYPE_STRING, &sender);
886     dbus_message_iter_append_basic (&iter, DBUS_TYPE_STRING, &name);
887     dbus_message_iter_open_container (&iter, DBUS_TYPE_ARRAY, "s", &iter_array);
888     while (ls)
889     {
890       dbus_message_iter_append_basic (&iter_array, DBUS_TYPE_STRING, &ls->data);
891       ls = g_slist_next (ls);
892     }
893     dbus_message_iter_close_container (&iter, &iter_array);
894     dbus_connection_send (bus, signal, NULL);
895     dbus_message_unref (signal);
896   }
897
898   g_free (name);
899   return dbus_message_new_method_return (message);
900 }
901
902 static DBusMessage *
903 impl_deregister_event (DBusConnection *bus, DBusMessage *message, void *user_data)
904 {
905   SpiRegistry *registry = SPI_REGISTRY (user_data);
906   const char *orig_name;
907   gchar *name;
908   const char *sender = dbus_message_get_sender (message);
909
910   if (!dbus_message_get_args (message, NULL, DBUS_TYPE_STRING, &orig_name,
911     DBUS_TYPE_INVALID))
912     return NULL;
913   name = ensure_proper_format (orig_name);
914
915   remove_events (registry, sender, name);
916
917   g_free (name);
918   return dbus_message_new_method_return (message);
919 }
920
921 static DBusMessage *
922 impl_get_registered_events (DBusConnection *bus, DBusMessage *message, void *user_data)
923 {
924   SpiRegistry *registry = SPI_REGISTRY (user_data);
925   event_data *evdata;
926   DBusMessage *reply;
927   DBusMessageIter iter, iter_struct, iter_array;
928   GList *list;
929
930   reply = dbus_message_new_method_return (message);
931   if (!reply)
932     return NULL;
933
934   dbus_message_iter_init_append (reply, &iter);
935   dbus_message_iter_open_container (&iter, DBUS_TYPE_ARRAY, "(ss)", &iter_array);
936   for (list = registry->events; list; list = list->next)
937     {
938       gchar *str;
939       evdata = list->data;
940       str = g_strconcat (evdata->data [0],
941                          ":", (evdata->data [1]? evdata->data [1]: ""),
942                          ":", (evdata->data [1] && evdata->data [2]? evdata->data [2]: ""), NULL);
943       dbus_message_iter_open_container (&iter_array, DBUS_TYPE_STRUCT, NULL, &iter_struct);
944       dbus_message_iter_append_basic (&iter_struct, DBUS_TYPE_STRING, &evdata->bus_name);
945       dbus_message_iter_append_basic (&iter_struct, DBUS_TYPE_STRING, &str);
946       dbus_message_iter_close_container (&iter_array, &iter_struct);
947       g_free (str);
948     }
949   dbus_message_iter_close_container (&iter, &iter_array);
950   return reply;
951 }
952
953 /*---------------------------------------------------------------------------*/
954
955 static void 
956 emit_Available (DBusConnection * bus)
957 {
958   DBusMessage *sig;
959   DBusMessageIter iter;
960   
961   sig = dbus_message_new_signal(SPI_DBUS_PATH_ROOT, SPI_DBUS_INTERFACE_SOCKET, "Available");
962
963   dbus_message_iter_init_append(sig, &iter);
964   append_reference (&iter, SPI_DBUS_NAME_REGISTRY, SPI_DBUS_PATH_ROOT);
965
966   dbus_connection_send(bus, sig, NULL);
967   dbus_message_unref(sig);
968 }
969
970 /*---------------------------------------------------------------------------*/
971
972 static const char *introspection_header =
973 "<?xml version=\"1.0\"?>\n";
974
975 static const char *introspection_node_element =
976 "<node name=\"%s\">\n";
977
978 static const char *introspection_footer =
979 "</node>";
980
981 static DBusMessage *
982 impl_Introspect_root (DBusConnection * bus,
983                  DBusMessage * message, void *user_data)
984 {
985   GString *output;
986   gchar *final;
987
988   const gchar *pathstr = SPI_DBUS_PATH_ROOT;
989
990   DBusMessage *reply;
991
992   output = g_string_new(introspection_header);
993
994   g_string_append_printf(output, introspection_node_element, pathstr);
995
996   g_string_append (output, spi_org_a11y_atspi_Accessible);
997   g_string_append (output, spi_org_a11y_atspi_Component);
998
999   g_string_append(output, introspection_footer);
1000   final = g_string_free(output, FALSE);
1001
1002   reply = dbus_message_new_method_return (message);
1003   dbus_message_append_args(reply, DBUS_TYPE_STRING, &final, DBUS_TYPE_INVALID);
1004
1005   g_free(final);
1006   return reply;
1007 }
1008
1009 static DBusMessage *
1010 impl_Introspect_registry (DBusConnection * bus,
1011                  DBusMessage * message, void *user_data)
1012 {
1013   GString *output;
1014   gchar *final;
1015
1016   const gchar *pathstr = SPI_DBUS_PATH_REGISTRY;
1017
1018   DBusMessage *reply;
1019
1020   output = g_string_new(introspection_header);
1021
1022   g_string_append_printf(output, introspection_node_element, pathstr);
1023
1024   g_string_append (output, spi_org_a11y_atspi_Registry);
1025
1026   g_string_append(output, introspection_footer);
1027   final = g_string_free(output, FALSE);
1028
1029   reply = dbus_message_new_method_return (message);
1030   dbus_message_append_args(reply, DBUS_TYPE_STRING, &final, DBUS_TYPE_INVALID);
1031
1032   g_free(final);
1033   return reply;
1034 }
1035
1036 /*---------------------------------------------------------------------------*/
1037
1038 /*
1039  * Emits an AT-SPI event.
1040  * AT-SPI events names are split into three parts:
1041  * class:major:minor
1042  * This is mapped onto D-Bus events as:
1043  * D-Bus Interface:Signal Name:Detail argument
1044  *
1045  * Marshals a basic type into the 'any_data' attribute of
1046  * the AT-SPI event.
1047  */
1048 static void 
1049 emit_event (DBusConnection *bus,
1050             const char *klass,
1051             const char *major,
1052             const char *minor,
1053             dbus_int32_t detail1,
1054             dbus_int32_t detail2,
1055             const char *name,
1056             const char *path)
1057 {
1058   DBusMessage *sig;
1059   DBusMessageIter iter, iter_variant;
1060   
1061   sig = dbus_message_new_signal(SPI_DBUS_PATH_ROOT, klass, major);
1062
1063   dbus_message_iter_init_append(sig, &iter);
1064
1065   dbus_message_iter_append_basic(&iter, DBUS_TYPE_STRING, &minor);
1066   dbus_message_iter_append_basic(&iter, DBUS_TYPE_INT32, &detail1);
1067   dbus_message_iter_append_basic(&iter, DBUS_TYPE_INT32, &detail2);
1068
1069   dbus_message_iter_open_container (&iter, DBUS_TYPE_VARIANT, "(so)",
1070                                     &iter_variant);
1071     append_reference (&iter_variant, name, path);
1072   dbus_message_iter_close_container (&iter, &iter_variant);
1073
1074   append_reference (&iter,
1075                     dbus_bus_get_unique_name (bus),
1076                     SPI_DBUS_PATH_ROOT);
1077
1078   dbus_connection_send(bus, sig, NULL);
1079   dbus_message_unref(sig);
1080 }
1081
1082 /*---------------------------------------------------------------------------*/
1083
1084 /*
1085  * Children changed signal converter and forwarder.
1086  *
1087  * Klass (Interface) org.a11y.atspi.Event.Object
1088  * Major is the signal name.
1089  * Minor is 'add' or 'remove'
1090  * detail1 is the index.
1091  * detail2 is 0.
1092  * any_data is the child reference.
1093  */
1094
1095 static void
1096 children_added_listener (DBusConnection * bus,
1097                          gint             index,
1098                          const gchar    * name,
1099                          const gchar    * path)
1100 {
1101   emit_event (bus, SPI_DBUS_INTERFACE_EVENT_OBJECT, "ChildrenChanged", "add", index, 0,
1102               name, path);
1103 }
1104
1105 static void
1106 children_removed_listener (DBusConnection * bus,
1107                            gint             index,
1108                            const gchar    * name,
1109                            const gchar    * path)
1110 {
1111   emit_event (bus, SPI_DBUS_INTERFACE_EVENT_OBJECT, "ChildrenChanged", "remove", index, 0,
1112               name, path);
1113 }
1114
1115 /*---------------------------------------------------------------------------*/
1116
1117 static DBusHandlerResult
1118 handle_method_root (DBusConnection *bus, DBusMessage *message, void *user_data)
1119 {
1120   DBusHandlerResult result = DBUS_HANDLER_RESULT_NOT_YET_HANDLED;
1121
1122   const gchar *iface   = dbus_message_get_interface (message);
1123   const gchar *member  = dbus_message_get_member (message);
1124   const gint   type    = dbus_message_get_type (message);
1125
1126   DBusMessage *reply = NULL;
1127
1128   /* Check for basic reasons not to handle */
1129   if (type   != DBUS_MESSAGE_TYPE_METHOD_CALL ||
1130       member == NULL ||
1131       iface  == NULL)
1132       return DBUS_HANDLER_RESULT_NOT_YET_HANDLED;
1133
1134   if (!strcmp (iface, "org.freedesktop.DBus.Properties"))
1135     {
1136       if (!strcmp (member, "Get"))
1137         {
1138           const gchar *prop_iface;
1139           const gchar *prop_member;
1140           DBusError error;
1141
1142           dbus_error_init (&error);
1143           if (dbus_message_get_args (message,
1144                                      &error,
1145                                      DBUS_TYPE_STRING,
1146                                      &prop_iface,
1147                                      DBUS_TYPE_STRING,
1148                                      &prop_member,
1149                                      DBUS_TYPE_INVALID))
1150             {
1151               DBusMessageIter iter;
1152
1153               reply = dbus_message_new_method_return (message);
1154               dbus_message_iter_init_append (reply, &iter);
1155
1156
1157               if (!strcmp (prop_iface, SPI_DBUS_INTERFACE_ACCESSIBLE))
1158                 {
1159                   if      (!strcmp (prop_member, "Name"))
1160                     impl_get_Name (&iter, user_data);
1161                   else if (!strcmp (prop_member, "Description"))
1162                     impl_get_Description (&iter, user_data);
1163                   else if (!strcmp (prop_member, "Parent"))
1164                     impl_get_Parent (&iter, user_data);
1165                   else if (!strcmp (prop_member, "ChildCount"))
1166                     impl_get_ChildCount (&iter, user_data);
1167                   else
1168                     {
1169                       dbus_message_unref (reply); 
1170                       reply = dbus_message_new_error (message, DBUS_ERROR_FAILED, "Property unavailable");
1171                     }
1172                 }
1173               else if (!strcmp (prop_iface, SPI_DBUS_INTERFACE_APPLICATION))
1174                 {
1175                   if (!strcmp (prop_member, "ToolkitName"))
1176                     impl_get_ToolkitName (&iter, user_data);
1177                   else if (!strcmp (prop_member, "ToolkitVersion"))
1178                     impl_get_ToolkitVersion (&iter, user_data);
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                   dbus_message_unref (reply); 
1188                   reply = dbus_message_new_error (message, DBUS_ERROR_FAILED, "Property unavailable");
1189                 }
1190             }
1191           else
1192             {
1193               reply = dbus_message_new_error (message, DBUS_ERROR_FAILED, error.message);
1194             }
1195           result = DBUS_HANDLER_RESULT_HANDLED;
1196         }
1197       else if (!strcmp (member, "GetAll"))
1198         {
1199           result = DBUS_HANDLER_RESULT_HANDLED;
1200         }
1201     }
1202
1203   if (!strcmp (iface, SPI_DBUS_INTERFACE_ACCESSIBLE))
1204     {
1205       result = DBUS_HANDLER_RESULT_HANDLED;
1206       if      (!strcmp (member, "GetChildAtIndex"))
1207           reply = impl_GetChildAtIndex (bus, message, user_data);
1208       else if (!strcmp (member, "GetChildren"))
1209           reply = impl_GetChildren (bus, message, user_data);
1210       else if (!strcmp (member, "GetIndexInParent"))
1211           reply = impl_GetIndexInParent (bus, message, user_data);
1212       else if (!strcmp (member, "GetRelationSet"))
1213           reply = impl_GetRelationSet (bus, message, user_data);
1214       else if (!strcmp (member, "GetRole"))
1215           reply = impl_GetRole (bus, message, user_data);
1216       else if (!strcmp (member, "GetRoleName"))
1217           reply = impl_GetRoleName (bus, message, user_data);
1218       else if (!strcmp (member, "GetLocalizedRoleName"))
1219           reply = impl_GetLocalizedRoleName (bus, message, user_data);
1220       else if (!strcmp (member, "GetState"))
1221           reply = impl_GetState (bus, message, user_data);
1222       else if (!strcmp (member, "GetAttributes"))
1223           reply = impl_GetAttributes (bus, message, user_data);
1224       else if (!strcmp (member, "GetApplication"))
1225           reply = impl_GetApplication (bus, message, user_data);
1226       else if (!strcmp (member, "GetInterfaces"))
1227           reply = impl_GetInterfaces (bus, message, user_data);
1228       else
1229          result = DBUS_HANDLER_RESULT_NOT_YET_HANDLED;
1230     }
1231
1232   if (!strcmp (iface, SPI_DBUS_INTERFACE_COMPONENT))
1233     {
1234       result = DBUS_HANDLER_RESULT_HANDLED;
1235       if      (!strcmp (member, "Contains"))
1236           reply = impl_Contains (bus, message, user_data);
1237       else if (!strcmp (member, "GetAccessibleAtPoint"))
1238           reply = impl_GetAccessibleAtPoint (bus, message, user_data);
1239       else if (!strcmp (member, "GetExtents"))
1240           reply = impl_GetExtents (bus, message, user_data);
1241       else if (!strcmp (member, "GetPosition"))
1242           reply = impl_GetPosition (bus, message, user_data);
1243       else if (!strcmp (member, "GetSize"))
1244           reply = impl_GetSize (bus, message, user_data);
1245       else if (!strcmp (member, "GetLayer"))
1246           reply = impl_GetLayer (bus, message, user_data);
1247       else if (!strcmp (member, "GetMDIZOrder"))
1248           reply = impl_GetMDIZOrder (bus, message, user_data);
1249       else if (!strcmp (member, "GrabFocus"))
1250           reply = impl_GrabFocus (bus, message, user_data);
1251       else if (!strcmp (member, "GetAlpha"))
1252           reply = impl_GetAlpha (bus, message, user_data);
1253       else
1254          result = DBUS_HANDLER_RESULT_NOT_YET_HANDLED;
1255     }
1256
1257   if (!strcmp (iface, SPI_DBUS_INTERFACE_SOCKET))
1258     {
1259       result = DBUS_HANDLER_RESULT_HANDLED;
1260       if      (!strcmp (member, "Embed"))
1261           reply = impl_Embed (bus, message, user_data);
1262       else if (!strcmp (member, "Unembed"))
1263           reply = impl_Unembed (bus, message, user_data);
1264       else
1265           result = DBUS_HANDLER_RESULT_NOT_YET_HANDLED;
1266     }
1267
1268   if (!strcmp (iface, "org.freedesktop.DBus.Introspectable"))
1269     {
1270       result = DBUS_HANDLER_RESULT_HANDLED;
1271       if      (!strcmp (member, "Introspect"))
1272           reply = impl_Introspect_root (bus, message, user_data);
1273       else
1274           result = DBUS_HANDLER_RESULT_NOT_YET_HANDLED;
1275     }
1276
1277   if (result == DBUS_HANDLER_RESULT_HANDLED)
1278     {
1279       if (!reply)
1280         {
1281           reply = dbus_message_new_method_return (message);
1282         }
1283
1284       dbus_connection_send (bus, reply, NULL);
1285       dbus_message_unref (reply);
1286     }
1287 #if 0
1288   else
1289     {
1290       g_print ("Registry | Unhandled message : %s|%s\n", iface, member);
1291     }
1292 #endif
1293   
1294   return result;
1295 }
1296
1297 static DBusHandlerResult
1298 handle_method_cache (DBusConnection *bus, DBusMessage *message, void *user_data)
1299 {
1300   DBusHandlerResult result = DBUS_HANDLER_RESULT_NOT_YET_HANDLED;
1301
1302   const gchar *iface   = dbus_message_get_interface (message);
1303   const gchar *member  = dbus_message_get_member (message);
1304   const gint   type    = dbus_message_get_type (message);
1305
1306   DBusMessage *reply = NULL;
1307
1308   /* Check for basic reasons not to handle */
1309   if (type   != DBUS_MESSAGE_TYPE_METHOD_CALL ||
1310       member == NULL ||
1311       iface  == NULL)
1312       return DBUS_HANDLER_RESULT_NOT_YET_HANDLED;
1313
1314   if (!strcmp (iface, SPI_DBUS_INTERFACE_CACHE))
1315     {
1316       result = DBUS_HANDLER_RESULT_HANDLED;
1317       if      (!strcmp (member, "GetItems"))
1318           reply = impl_GetItems (bus, message, user_data);
1319       else
1320          result = DBUS_HANDLER_RESULT_NOT_YET_HANDLED;
1321     }
1322
1323   if (result == DBUS_HANDLER_RESULT_HANDLED)
1324     {
1325       if (!reply)
1326         {
1327           reply = dbus_message_new_method_return (message);
1328         }
1329
1330       dbus_connection_send (bus, reply, NULL);
1331       dbus_message_unref (reply);
1332     }
1333   return result;
1334 }
1335
1336 static DBusHandlerResult
1337 handle_method_registry (DBusConnection *bus, DBusMessage *message, void *user_data)
1338 {
1339   DBusHandlerResult result = DBUS_HANDLER_RESULT_NOT_YET_HANDLED;
1340
1341   const gchar *iface   = dbus_message_get_interface (message);
1342   const gchar *member  = dbus_message_get_member (message);
1343   const gint   type    = dbus_message_get_type (message);
1344
1345   DBusMessage *reply = NULL;
1346
1347   /* Check for basic reasons not to handle */
1348   if (type   != DBUS_MESSAGE_TYPE_METHOD_CALL ||
1349       member == NULL ||
1350       iface  == NULL)
1351       return DBUS_HANDLER_RESULT_NOT_YET_HANDLED;
1352
1353   if (!strcmp (iface, SPI_DBUS_INTERFACE_REGISTRY))
1354     {
1355       result = DBUS_HANDLER_RESULT_HANDLED;
1356       if (!strcmp(member, "RegisterEvent"))
1357       reply = impl_register_event (bus, message, user_data);
1358       else if (!strcmp(member, "DeregisterEvent"))
1359         reply = impl_deregister_event (bus, message, user_data);
1360       else if (!strcmp(member, "GetRegisteredEvents"))
1361         reply = impl_get_registered_events (bus, message, user_data);
1362       else
1363           result = DBUS_HANDLER_RESULT_NOT_YET_HANDLED;
1364     }
1365
1366   if (!strcmp (iface, "org.freedesktop.DBus.Introspectable"))
1367     {
1368       result = DBUS_HANDLER_RESULT_HANDLED;
1369       if      (!strcmp (member, "Introspect"))
1370           reply = impl_Introspect_registry (bus, message, user_data);
1371       else
1372           result = DBUS_HANDLER_RESULT_NOT_YET_HANDLED;
1373     }
1374
1375   if (result == DBUS_HANDLER_RESULT_HANDLED)
1376     {
1377       if (!reply)
1378         {
1379           reply = dbus_message_new_method_return (message);
1380         }
1381
1382       dbus_connection_send (bus, reply, NULL);
1383       dbus_message_unref (reply);
1384     }
1385 #if 0
1386   else
1387     {
1388       g_print ("Registry | Unhandled message : %s|%s\n", iface, member);
1389     }
1390 #endif
1391   
1392   return result;
1393 }
1394
1395 /*---------------------------------------------------------------------------*/
1396
1397 static DBusObjectPathVTable root_vtable =
1398 {
1399   NULL,
1400   &handle_method_root,
1401   NULL, NULL, NULL, NULL
1402 };
1403
1404 static DBusObjectPathVTable registry_vtable =
1405 {
1406   NULL,
1407   &handle_method_registry,
1408   NULL, NULL, NULL, NULL
1409 };
1410
1411 static DBusObjectPathVTable cache_vtable =
1412 {
1413   NULL,
1414   &handle_method_cache,
1415   NULL, NULL, NULL, NULL
1416 };
1417
1418 static gchar *app_sig_match_name_owner =
1419        "type='signal', interface='org.freedesktop.DBus', member='NameOwnerChanged'";
1420
1421 SpiRegistry *
1422 spi_registry_new (DBusConnection *bus)
1423 {
1424   SpiRegistry *reg = g_object_new (SPI_REGISTRY_TYPE, NULL);
1425
1426   reg->bus = bus;
1427
1428   dbus_bus_add_match (bus, app_sig_match_name_owner, NULL);
1429   dbus_connection_add_filter (bus, signal_filter, reg, NULL);
1430
1431   dbus_connection_register_object_path (bus, SPI_DBUS_PATH_ROOT, &root_vtable, reg);
1432
1433   dbus_connection_register_object_path (bus, SPI_DBUS_PATH_CACHE, &cache_vtable, reg);
1434
1435   dbus_connection_register_object_path (bus, SPI_DBUS_PATH_REGISTRY, &registry_vtable, reg);
1436
1437   emit_Available (bus);
1438
1439   reg->events = NULL;
1440
1441   return reg;
1442 }
1443
1444 /*END------------------------------------------------------------------------*/