Merge remote branch 'gvdb/master'
[platform/upstream/glib.git] / gio / tests / gdbus-export.c
1 /* GLib testing framework examples and tests
2  *
3  * Copyright (C) 2008-2010 Red Hat, Inc.
4  *
5  * This library is free software; you can redistribute it and/or
6  * modify it under the terms of the GNU Lesser General Public
7  * License as published by the Free Software Foundation; either
8  * version 2 of the License, or (at your option) any later version.
9  *
10  * This library is distributed in the hope that it will be useful,
11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
13  * Lesser General Public License for more details.
14  *
15  * You should have received a copy of the GNU Lesser General
16  * Public License along with this library; if not, write to the
17  * Free Software Foundation, Inc., 59 Temple Place, Suite 330,
18  * Boston, MA 02111-1307, USA.
19  *
20  * Author: David Zeuthen <davidz@redhat.com>
21  */
22
23 #include <gio/gio.h>
24 #include <unistd.h>
25 #include <string.h>
26
27 #include "gdbus-tests.h"
28
29 /* all tests rely on a shared mainloop */
30 static GMainLoop *loop = NULL;
31
32 static GDBusConnection *c = NULL;
33
34 /* ---------------------------------------------------------------------------------------------------- */
35 /* Test that we can export objects, the hierarchy is correct and the right handlers are invoked */
36 /* ---------------------------------------------------------------------------------------------------- */
37
38 static const GDBusArgInfo foo_method1_in_args =
39 {
40   -1,
41   "an_input_string",
42   "s",
43   NULL
44 };
45 static const GDBusArgInfo * const foo_method1_in_arg_pointers[] = {&foo_method1_in_args, NULL};
46
47 static const GDBusArgInfo foo_method1_out_args =
48 {
49   -1,
50   "an_output_string",
51   "s",
52   NULL
53 };
54 static const GDBusArgInfo * const foo_method1_out_arg_pointers[] = {&foo_method1_out_args, NULL};
55
56 static const GDBusMethodInfo foo_method_info_method1 =
57 {
58   -1,
59   "Method1",
60   (GDBusArgInfo **) &foo_method1_in_arg_pointers,
61   (GDBusArgInfo **) &foo_method1_out_arg_pointers,
62   NULL
63 };
64 static const GDBusMethodInfo foo_method_info_method2 =
65 {
66   -1,
67   "Method2",
68   NULL,
69   NULL,
70   NULL
71 };
72 static const GDBusMethodInfo * const foo_method_info_pointers[] = {&foo_method_info_method1, &foo_method_info_method2, NULL};
73
74 static const GDBusSignalInfo foo_signal_info =
75 {
76   -1,
77   "SignalAlpha",
78   NULL,
79   NULL
80 };
81 static const GDBusSignalInfo * const foo_signal_info_pointers[] = {&foo_signal_info, NULL};
82
83 static const GDBusPropertyInfo foo_property_info[] =
84 {
85   {
86     -1,
87     "PropertyUno",
88     "s",
89     G_DBUS_PROPERTY_INFO_FLAGS_READABLE | G_DBUS_PROPERTY_INFO_FLAGS_WRITABLE,
90     NULL
91   },
92   {
93     -1,
94     "NotWritable",
95     "s",
96     G_DBUS_PROPERTY_INFO_FLAGS_READABLE,
97     NULL
98   },
99   {
100     -1,
101     "NotReadable",
102     "s",
103     G_DBUS_PROPERTY_INFO_FLAGS_WRITABLE,
104     NULL
105   }
106 };
107 static const GDBusPropertyInfo * const foo_property_info_pointers[] =
108 {
109   &foo_property_info[0],
110   &foo_property_info[1],
111   &foo_property_info[2],
112   NULL
113 };
114
115 static const GDBusInterfaceInfo foo_interface_info =
116 {
117   -1,
118   "org.example.Foo",
119   (GDBusMethodInfo **) &foo_method_info_pointers,
120   (GDBusSignalInfo **) &foo_signal_info_pointers,
121   (GDBusPropertyInfo **)&foo_property_info_pointers,
122   NULL,
123 };
124
125 static void
126 foo_method_call (GDBusConnection       *connection,
127                  const gchar           *sender,
128                  const gchar           *object_path,
129                  const gchar           *interface_name,
130                  const gchar           *method_name,
131                  GVariant              *parameters,
132                  GDBusMethodInvocation *invocation,
133                  gpointer               user_data)
134 {
135   if (g_strcmp0 (method_name, "Method1") == 0)
136     {
137       const gchar *input;
138       gchar *output;
139       g_variant_get (parameters, "(&s)", &input);
140       output = g_strdup_printf ("You passed the string `%s'. Jolly good!", input);
141       g_dbus_method_invocation_return_value (invocation, g_variant_new ("(s)", output));
142       g_free (output);
143     }
144   else
145     {
146       g_dbus_method_invocation_return_dbus_error (invocation,
147                                                   "org.example.SomeError",
148                                                   "How do you like them apples, buddy!");
149     }
150 }
151
152 static GVariant *
153 foo_get_property (GDBusConnection       *connection,
154                   const gchar           *sender,
155                   const gchar           *object_path,
156                   const gchar           *interface_name,
157                   const gchar           *property_name,
158                   GError               **error,
159                   gpointer               user_data)
160 {
161   GVariant *ret;
162   gchar *s;
163   s = g_strdup_printf ("Property `%s' Is What It Is!", property_name);
164   ret = g_variant_new_string (s);
165   g_free (s);
166   return ret;
167 }
168
169 static gboolean
170 foo_set_property (GDBusConnection       *connection,
171                   const gchar           *sender,
172                   const gchar           *object_path,
173                   const gchar           *interface_name,
174                   const gchar           *property_name,
175                   GVariant              *value,
176                   GError               **error,
177                   gpointer               user_data)
178 {
179   gchar *s;
180   s = g_variant_print (value, TRUE);
181   g_set_error (error,
182                G_DBUS_ERROR,
183                G_DBUS_ERROR_SPAWN_FILE_INVALID,
184                "Returning some error instead of writing the value `%s' to the property `%s'",
185                property_name, s);
186   g_free (s);
187   return FALSE;
188 }
189
190 static const GDBusInterfaceVTable foo_vtable =
191 {
192   foo_method_call,
193   foo_get_property,
194   foo_set_property
195 };
196
197 /* -------------------- */
198
199 static const GDBusMethodInfo bar_method_info[] =
200 {
201   {
202     -1,
203     "MethodA",
204     NULL,
205     NULL,
206     NULL
207   },
208   {
209     -1,
210     "MethodB",
211     NULL,
212     NULL,
213     NULL
214   }
215 };
216 static const GDBusMethodInfo * const bar_method_info_pointers[] = {&bar_method_info[0], &bar_method_info[1], NULL};
217
218 static const GDBusSignalInfo bar_signal_info[] =
219 {
220   {
221     -1,
222     "SignalMars",
223     NULL,
224     NULL
225   }
226 };
227 static const GDBusSignalInfo * const bar_signal_info_pointers[] = {&bar_signal_info[0], NULL};
228
229 static const GDBusPropertyInfo bar_property_info[] =
230 {
231   {
232     -1,
233     "PropertyDuo",
234     "s",
235     G_DBUS_PROPERTY_INFO_FLAGS_READABLE,
236     NULL
237   }
238 };
239 static const GDBusPropertyInfo * const bar_property_info_pointers[] = {&bar_property_info[0], NULL};
240
241 static const GDBusInterfaceInfo bar_interface_info =
242 {
243   -1,
244   "org.example.Bar",
245   (GDBusMethodInfo **) bar_method_info_pointers,
246   (GDBusSignalInfo **) bar_signal_info_pointers,
247   (GDBusPropertyInfo **) bar_property_info_pointers,
248   NULL,
249 };
250
251 /* -------------------- */
252
253 static const GDBusMethodInfo dyna_method_info[] =
254 {
255   {
256     -1,
257     "DynaCyber",
258     NULL,
259     NULL,
260     NULL
261   }
262 };
263 static const GDBusMethodInfo * const dyna_method_info_pointers[] = {&dyna_method_info[0], NULL};
264
265 static const GDBusInterfaceInfo dyna_interface_info =
266 {
267   -1,
268   "org.example.Dyna",
269   (GDBusMethodInfo **) dyna_method_info_pointers,
270   NULL, /* no signals */
271   NULL, /* no properties */
272   NULL,
273 };
274
275 static void
276 dyna_cyber (GDBusConnection *connection,
277             const gchar *sender,
278             const gchar *object_path,
279             const gchar *interface_name,
280             const gchar *method_name,
281             GVariant *parameters,
282             GDBusMethodInvocation *invocation,
283             gpointer user_data)
284 {
285   GPtrArray *data = user_data;
286   gchar *node_name;
287   guint n;
288
289   node_name = strrchr (object_path, '/') + 1;
290
291   /* Add new node if it is not already known */
292   for (n = 0; n < data->len ; n++)
293     {
294       if (g_strcmp0 (g_ptr_array_index (data, n), node_name) == 0)
295         goto out;
296     }
297   g_ptr_array_add (data, g_strdup(node_name));
298
299   out:
300     g_dbus_method_invocation_return_value (invocation, NULL);
301 }
302
303 static const GDBusInterfaceVTable dyna_interface_vtable =
304 {
305   dyna_cyber,
306   NULL,
307   NULL
308 };
309
310 /* ---------------------------------------------------------------------------------------------------- */
311
312 static void
313 introspect_callback (GDBusProxy   *proxy,
314                      GAsyncResult *res,
315                      gpointer      user_data)
316 {
317   gchar **xml_data = user_data;
318   GVariant *result;
319   GError *error;
320
321   error = NULL;
322   result = g_dbus_proxy_call_finish (proxy,
323                                               res,
324                                               &error);
325   g_assert_no_error (error);
326   g_assert (result != NULL);
327   g_variant_get (result, "(s)", xml_data);
328   g_variant_unref (result);
329
330   g_main_loop_quit (loop);
331 }
332
333 static gchar **
334 get_nodes_at (GDBusConnection  *c,
335               const gchar      *object_path)
336 {
337   GError *error;
338   GDBusProxy *proxy;
339   gchar *xml_data;
340   GPtrArray *p;
341   GDBusNodeInfo *node_info;
342   guint n;
343
344   error = NULL;
345   proxy = g_dbus_proxy_new_sync (c,
346                                  G_DBUS_PROXY_FLAGS_DO_NOT_LOAD_PROPERTIES |
347                                  G_DBUS_PROXY_FLAGS_DO_NOT_CONNECT_SIGNALS,
348                                  NULL,
349                                  g_dbus_connection_get_unique_name (c),
350                                  object_path,
351                                  "org.freedesktop.DBus.Introspectable",
352                                  NULL,
353                                  &error);
354   g_assert_no_error (error);
355   g_assert (proxy != NULL);
356
357   /* do this async to avoid libdbus-1 deadlocks */
358   xml_data = NULL;
359   g_dbus_proxy_call (proxy,
360                      "Introspect",
361                      NULL,
362                      G_DBUS_CALL_FLAGS_NONE,
363                      -1,
364                      NULL,
365                      (GAsyncReadyCallback) introspect_callback,
366                      &xml_data);
367   g_main_loop_run (loop);
368   g_assert (xml_data != NULL);
369
370   node_info = g_dbus_node_info_new_for_xml (xml_data, &error);
371   g_assert_no_error (error);
372   g_assert (node_info != NULL);
373
374   p = g_ptr_array_new ();
375   for (n = 0; node_info->nodes != NULL && node_info->nodes[n] != NULL; n++)
376     {
377       const GDBusNodeInfo *sub_node_info = node_info->nodes[n];
378       g_ptr_array_add (p, g_strdup (sub_node_info->path));
379     }
380   g_ptr_array_add (p, NULL);
381
382   g_object_unref (proxy);
383   g_free (xml_data);
384   g_dbus_node_info_unref (node_info);
385
386   return (gchar **) g_ptr_array_free (p, FALSE);
387 }
388
389 static gboolean
390 has_interface (GDBusConnection *c,
391                const gchar     *object_path,
392                const gchar     *interface_name)
393 {
394   GError *error;
395   GDBusProxy *proxy;
396   gchar *xml_data;
397   GDBusNodeInfo *node_info;
398   gboolean ret;
399
400   error = NULL;
401   proxy = g_dbus_proxy_new_sync (c,
402                                  G_DBUS_PROXY_FLAGS_DO_NOT_LOAD_PROPERTIES |
403                                  G_DBUS_PROXY_FLAGS_DO_NOT_CONNECT_SIGNALS,
404                                  NULL,
405                                  g_dbus_connection_get_unique_name (c),
406                                  object_path,
407                                  "org.freedesktop.DBus.Introspectable",
408                                  NULL,
409                                  &error);
410   g_assert_no_error (error);
411   g_assert (proxy != NULL);
412
413   /* do this async to avoid libdbus-1 deadlocks */
414   xml_data = NULL;
415   g_dbus_proxy_call (proxy,
416                      "Introspect",
417                      NULL,
418                      G_DBUS_CALL_FLAGS_NONE,
419                      -1,
420                      NULL,
421                      (GAsyncReadyCallback) introspect_callback,
422                      &xml_data);
423   g_main_loop_run (loop);
424   g_assert (xml_data != NULL);
425
426   node_info = g_dbus_node_info_new_for_xml (xml_data, &error);
427   g_assert_no_error (error);
428   g_assert (node_info != NULL);
429
430   ret = (g_dbus_node_info_lookup_interface (node_info, interface_name) != NULL);
431
432   g_object_unref (proxy);
433   g_free (xml_data);
434   g_dbus_node_info_unref (node_info);
435
436   return ret;
437 }
438
439 static guint
440 count_interfaces (GDBusConnection *c,
441                   const gchar     *object_path)
442 {
443   GError *error;
444   GDBusProxy *proxy;
445   gchar *xml_data;
446   GDBusNodeInfo *node_info;
447   guint ret;
448
449   error = NULL;
450   proxy = g_dbus_proxy_new_sync (c,
451                                  G_DBUS_PROXY_FLAGS_DO_NOT_LOAD_PROPERTIES |
452                                  G_DBUS_PROXY_FLAGS_DO_NOT_CONNECT_SIGNALS,
453                                  NULL,
454                                  g_dbus_connection_get_unique_name (c),
455                                  object_path,
456                                  "org.freedesktop.DBus.Introspectable",
457                                  NULL,
458                                  &error);
459   g_assert_no_error (error);
460   g_assert (proxy != NULL);
461
462   /* do this async to avoid libdbus-1 deadlocks */
463   xml_data = NULL;
464   g_dbus_proxy_call (proxy,
465                      "Introspect",
466                      NULL,
467                      G_DBUS_CALL_FLAGS_NONE,
468                      -1,
469                      NULL,
470                      (GAsyncReadyCallback) introspect_callback,
471                      &xml_data);
472   g_main_loop_run (loop);
473   g_assert (xml_data != NULL);
474
475   node_info = g_dbus_node_info_new_for_xml (xml_data, &error);
476   g_assert_no_error (error);
477   g_assert (node_info != NULL);
478
479   ret = 0;
480   while (node_info->interfaces != NULL && node_info->interfaces[ret] != NULL)
481     ret++;
482
483   g_object_unref (proxy);
484   g_free (xml_data);
485   g_dbus_node_info_unref (node_info);
486
487   return ret;
488 }
489
490 static void
491 dyna_create_callback (GDBusProxy   *proxy,
492                       GAsyncResult  *res,
493                       gpointer      user_data)
494 {
495   GVariant *result;
496   GError *error;
497
498   error = NULL;
499   result = g_dbus_proxy_call_finish (proxy,
500                                      res,
501                                      &error);
502   g_assert_no_error (error);
503   g_assert (result != NULL);
504   g_variant_unref (result);
505
506   g_main_loop_quit (loop);
507 }
508
509 /* Dynamically create @object_name under /foo/dyna */
510 static void
511 dyna_create (GDBusConnection *c,
512              const gchar     *object_name)
513 {
514   GError *error;
515   GDBusProxy *proxy;
516   gchar *object_path;
517
518   object_path = g_strconcat ("/foo/dyna/", object_name, NULL);
519
520   error = NULL;
521   proxy = g_dbus_proxy_new_sync (c,
522                                  G_DBUS_PROXY_FLAGS_DO_NOT_LOAD_PROPERTIES |
523                                  G_DBUS_PROXY_FLAGS_DO_NOT_CONNECT_SIGNALS,
524                                  NULL,
525                                  g_dbus_connection_get_unique_name (c),
526                                  object_path,
527                                  "org.example.Dyna",
528                                  NULL,
529                                  &error);
530   g_assert_no_error (error);
531   g_assert (proxy != NULL);
532
533   /* do this async to avoid libdbus-1 deadlocks */
534   g_dbus_proxy_call (proxy,
535                      "DynaCyber",
536                      g_variant_new ("()"),
537                      G_DBUS_CALL_FLAGS_NONE,
538                      -1,
539                      NULL,
540                      (GAsyncReadyCallback) dyna_create_callback,
541                      NULL);
542   g_main_loop_run (loop);
543
544   g_assert_no_error (error);
545
546   g_object_unref (proxy);
547   g_free (object_path);
548
549   return;
550 }
551
552 typedef struct
553 {
554   guint num_unregistered_calls;
555   guint num_unregistered_subtree_calls;
556   guint num_subtree_nodes;
557 } ObjectRegistrationData;
558
559 static void
560 on_object_unregistered (gpointer user_data)
561 {
562   ObjectRegistrationData *data = user_data;
563
564   data->num_unregistered_calls++;
565 }
566
567 static void
568 on_subtree_unregistered (gpointer user_data)
569 {
570   ObjectRegistrationData *data = user_data;
571
572   data->num_unregistered_subtree_calls++;
573 }
574
575 static gboolean
576 _g_strv_has_string (const gchar* const * haystack,
577                     const gchar *needle)
578 {
579   guint n;
580
581   for (n = 0; haystack != NULL && haystack[n] != NULL; n++)
582     {
583       if (g_strcmp0 (haystack[n], needle) == 0)
584         return TRUE;
585     }
586   return FALSE;
587 }
588
589 /* -------------------- */
590
591 static gchar **
592 subtree_enumerate (GDBusConnection       *connection,
593                    const gchar           *sender,
594                    const gchar           *object_path,
595                    gpointer               user_data)
596 {
597   ObjectRegistrationData *data = user_data;
598   GPtrArray *p;
599   gchar **nodes;
600   guint n;
601
602   p = g_ptr_array_new ();
603
604   for (n = 0; n < data->num_subtree_nodes; n++)
605     {
606       g_ptr_array_add (p, g_strdup_printf ("vp%d", n));
607       g_ptr_array_add (p, g_strdup_printf ("evp%d", n));
608     }
609   g_ptr_array_add (p, NULL);
610
611   nodes = (gchar **) g_ptr_array_free (p, FALSE);
612
613   return nodes;
614 }
615
616 /* Only allows certain objects, and aborts on unknowns */
617 static GDBusInterfaceInfo **
618 subtree_introspect (GDBusConnection       *connection,
619                     const gchar           *sender,
620                     const gchar           *object_path,
621                     const gchar           *node,
622                     gpointer               user_data)
623 {
624   const GDBusInterfaceInfo *interfaces[2] = {
625      NULL /* filled in below */, NULL
626   };
627
628   /* VPs implement the Foo interface, EVPs implement the Bar interface. The root
629    * does not implement any interfaces
630    */
631   if (node == NULL)
632     {
633       return NULL;
634     }
635   else if (g_str_has_prefix (node, "vp"))
636     {
637       interfaces[0] = &foo_interface_info;
638     }
639   else if (g_str_has_prefix (node, "evp"))
640     {
641       interfaces[0] = &bar_interface_info;
642     }
643   else
644     {
645       g_assert_not_reached ();
646     }
647
648   return g_memdup (interfaces, 2 * sizeof (void *));
649 }
650
651 static const GDBusInterfaceVTable *
652 subtree_dispatch (GDBusConnection             *connection,
653                   const gchar                 *sender,
654                   const gchar                 *object_path,
655                   const gchar                 *interface_name,
656                   const gchar                 *node,
657                   gpointer                    *out_user_data,
658                   gpointer                     user_data)
659 {
660   if (g_strcmp0 (interface_name, "org.example.Foo") == 0)
661     return &foo_vtable;
662   else
663     return NULL;
664 }
665
666 static const GDBusSubtreeVTable subtree_vtable =
667 {
668   subtree_enumerate,
669   subtree_introspect,
670   subtree_dispatch
671 };
672
673 /* -------------------- */
674
675 static gchar **
676 dynamic_subtree_enumerate (GDBusConnection       *connection,
677                            const gchar           *sender,
678                            const gchar           *object_path,
679                            gpointer               user_data)
680 {
681   GPtrArray *data = user_data;
682   gchar **nodes = g_new (gchar*, data->len + 1);
683   guint n;
684
685   for (n = 0; n < data->len; n++)
686     {
687       nodes[n] = g_strdup (g_ptr_array_index (data, n));
688     }
689   nodes[data->len] = NULL;
690
691   return nodes;
692 }
693
694 /* Allow all objects to be introspected */
695 static GDBusInterfaceInfo **
696 dynamic_subtree_introspect (GDBusConnection       *connection,
697                             const gchar           *sender,
698                             const gchar           *object_path,
699                             const gchar           *node,
700                             gpointer               user_data)
701 {
702   const GDBusInterfaceInfo *interfaces[2] = { &dyna_interface_info, NULL };
703
704   return g_memdup (interfaces, 2 * sizeof (void *));
705 }
706
707 static const GDBusInterfaceVTable *
708 dynamic_subtree_dispatch (GDBusConnection             *connection,
709                           const gchar                 *sender,
710                           const gchar                 *object_path,
711                           const gchar                 *interface_name,
712                           const gchar                 *node,
713                           gpointer                    *out_user_data,
714                           gpointer                     user_data)
715 {
716   *out_user_data = user_data;
717   return &dyna_interface_vtable;
718 }
719
720 static const GDBusSubtreeVTable dynamic_subtree_vtable =
721 {
722   dynamic_subtree_enumerate,
723   dynamic_subtree_introspect,
724   dynamic_subtree_dispatch
725 };
726
727 /* -------------------- */
728
729 static gpointer
730 test_dispatch_thread_func (gpointer user_data)
731 {
732   const gchar *object_path = user_data;
733   GDBusProxy *foo_proxy;
734   GVariant *value;
735   GVariant *inner;
736   GError *error;
737   gchar *s;
738   const gchar *value_str;
739
740   foo_proxy = g_dbus_proxy_new_sync (c,
741                                      G_DBUS_PROXY_FLAGS_DO_NOT_CONNECT_SIGNALS |
742                                      G_DBUS_PROXY_FLAGS_DO_NOT_LOAD_PROPERTIES,
743                                      NULL,
744                                      g_dbus_connection_get_unique_name (c),
745                                      object_path,
746                                      "org.example.Foo",
747                                      NULL,
748                                      &error);
749   g_assert (foo_proxy != NULL);
750
751   /* generic interfaces */
752   error = NULL;
753   value = g_dbus_proxy_call_sync (foo_proxy,
754                                   "org.freedesktop.DBus.Peer.Ping",
755                                   NULL,
756                                   G_DBUS_CALL_FLAGS_NONE,
757                                   -1,
758                                   NULL,
759                                   &error);
760   g_assert_no_error (error);
761   g_assert (value != NULL);
762   g_variant_unref (value);
763
764   /* user methods */
765   error = NULL;
766   value = g_dbus_proxy_call_sync (foo_proxy,
767                                   "Method1",
768                                   g_variant_new ("(s)", "winwinwin"),
769                                   G_DBUS_CALL_FLAGS_NONE,
770                                   -1,
771                                   NULL,
772                                   &error);
773   g_assert_no_error (error);
774   g_assert (value != NULL);
775   g_assert (g_variant_is_of_type (value, G_VARIANT_TYPE ("(s)")));
776   g_variant_get (value, "(&s)", &value_str);
777   g_assert_cmpstr (value_str, ==, "You passed the string `winwinwin'. Jolly good!");
778   g_variant_unref (value);
779
780   error = NULL;
781   value = g_dbus_proxy_call_sync (foo_proxy,
782                                   "Method2",
783                                   NULL,
784                                   G_DBUS_CALL_FLAGS_NONE,
785                                   -1,
786                                   NULL,
787                                   &error);
788   g_assert_error (error, G_IO_ERROR, G_IO_ERROR_DBUS_ERROR);
789   g_assert_cmpstr (error->message, ==, "GDBus.Error:org.example.SomeError: How do you like them apples, buddy!");
790   g_error_free (error);
791   g_assert (value == NULL);
792
793   error = NULL;
794   value = g_dbus_proxy_call_sync (foo_proxy,
795                                   "Method2",
796                                   g_variant_new ("(s)", "failfailfail"),
797                                   G_DBUS_CALL_FLAGS_NONE,
798                                   -1,
799                                   NULL,
800                                   &error);
801   g_assert_error (error, G_DBUS_ERROR, G_DBUS_ERROR_INVALID_ARGS);
802   g_assert_cmpstr (error->message, ==, "GDBus.Error:org.freedesktop.DBus.Error.InvalidArgs: Type of message, `(s)', does not match expected type `()'");
803   g_error_free (error);
804   g_assert (value == NULL);
805
806   error = NULL;
807   value = g_dbus_proxy_call_sync (foo_proxy,
808                                   "NonExistantMethod",
809                                   NULL,
810                                   G_DBUS_CALL_FLAGS_NONE,
811                                   -1,
812                                   NULL,
813                                   &error);
814   g_assert_error (error, G_DBUS_ERROR, G_DBUS_ERROR_UNKNOWN_METHOD);
815   g_assert_cmpstr (error->message, ==, "GDBus.Error:org.freedesktop.DBus.Error.UnknownMethod: No such method `NonExistantMethod'");
816   g_error_free (error);
817   g_assert (value == NULL);
818
819   error = NULL;
820   value = g_dbus_proxy_call_sync (foo_proxy,
821                                   "org.example.FooXYZ.NonExistant",
822                                   NULL,
823                                   G_DBUS_CALL_FLAGS_NONE,
824                                   -1,
825                                   NULL,
826                                   &error);
827   g_assert_error (error, G_DBUS_ERROR, G_DBUS_ERROR_UNKNOWN_METHOD);
828   g_error_free (error);
829   g_assert (value == NULL);
830
831   /* user properties */
832   error = NULL;
833   value = g_dbus_proxy_call_sync (foo_proxy,
834                                   "org.freedesktop.DBus.Properties.Get",
835                                   g_variant_new ("(ss)",
836                                                  "org.example.Foo",
837                                                  "PropertyUno"),
838                                   G_DBUS_CALL_FLAGS_NONE,
839                                   -1,
840                                   NULL,
841                                   &error);
842   g_assert_no_error (error);
843   g_assert (value != NULL);
844   g_assert (g_variant_is_of_type (value, G_VARIANT_TYPE ("(v)")));
845   g_variant_get (value, "(v)", &inner);
846   g_assert (g_variant_is_of_type (inner, G_VARIANT_TYPE_STRING));
847   g_assert_cmpstr (g_variant_get_string (inner, NULL), ==, "Property `PropertyUno' Is What It Is!");
848   g_variant_unref (value);
849
850   error = NULL;
851   value = g_dbus_proxy_call_sync (foo_proxy,
852                                   "org.freedesktop.DBus.Properties.Get",
853                                   g_variant_new ("(ss)",
854                                                  "org.example.Foo",
855                                                  "ThisDoesntExist"),
856                                   G_DBUS_CALL_FLAGS_NONE,
857                                   -1,
858                                   NULL,
859                                   &error);
860   g_assert (value == NULL);
861   g_assert_error (error, G_DBUS_ERROR, G_DBUS_ERROR_INVALID_ARGS);
862   g_assert_cmpstr (error->message, ==, "GDBus.Error:org.freedesktop.DBus.Error.InvalidArgs: No such property `ThisDoesntExist'");
863   g_error_free (error);
864
865   error = NULL;
866   value = g_dbus_proxy_call_sync (foo_proxy,
867                                   "org.freedesktop.DBus.Properties.Get",
868                                   g_variant_new ("(ss)",
869                                                  "org.example.Foo",
870                                                  "NotReadable"),
871                                   G_DBUS_CALL_FLAGS_NONE,
872                                   -1,
873                                   NULL,
874                                   &error);
875   g_assert (value == NULL);
876   g_assert_error (error, G_DBUS_ERROR, G_DBUS_ERROR_INVALID_ARGS);
877   g_assert_cmpstr (error->message, ==, "GDBus.Error:org.freedesktop.DBus.Error.InvalidArgs: Property `NotReadable' is not readable");
878   g_error_free (error);
879
880   error = NULL;
881   value = g_dbus_proxy_call_sync (foo_proxy,
882                                   "org.freedesktop.DBus.Properties.Set",
883                                   g_variant_new ("(ssv)",
884                                                  "org.example.Foo",
885                                                  "NotReadable",
886                                                  g_variant_new_string ("But Writable you are!")),
887                                   G_DBUS_CALL_FLAGS_NONE,
888                                   -1,
889                                   NULL,
890                                   &error);
891   g_assert (value == NULL);
892   g_assert_error (error, G_DBUS_ERROR, G_DBUS_ERROR_SPAWN_FILE_INVALID);
893   g_assert_cmpstr (error->message, ==, "GDBus.Error:org.freedesktop.DBus.Error.Spawn.FileInvalid: Returning some error instead of writing the value `NotReadable' to the property `'But Writable you are!''");
894   g_error_free (error);
895
896   error = NULL;
897   value = g_dbus_proxy_call_sync (foo_proxy,
898                                   "org.freedesktop.DBus.Properties.Set",
899                                   g_variant_new ("(ssv)",
900                                                  "org.example.Foo",
901                                                  "NotWritable",
902                                                  g_variant_new_uint32 (42)),
903                                   G_DBUS_CALL_FLAGS_NONE,
904                                   -1,
905                                   NULL,
906                                   &error);
907   g_assert (value == NULL);
908   g_assert_error (error, G_DBUS_ERROR, G_DBUS_ERROR_INVALID_ARGS);
909   g_assert_cmpstr (error->message, ==, "GDBus.Error:org.freedesktop.DBus.Error.InvalidArgs: Property `NotWritable' is not writable");
910   g_error_free (error);
911
912   error = NULL;
913   value = g_dbus_proxy_call_sync (foo_proxy,
914                                   "org.freedesktop.DBus.Properties.GetAll",
915                                   g_variant_new ("(s)",
916                                                  "org.example.Foo"),
917                                   G_DBUS_CALL_FLAGS_NONE,
918                                   -1,
919                                   NULL,
920                                   &error);
921   g_assert_no_error (error);
922   g_assert (value != NULL);
923   g_assert (g_variant_is_of_type (value, G_VARIANT_TYPE ("(a{sv})")));
924   s = g_variant_print (value, TRUE);
925   g_assert_cmpstr (s, ==, "({'PropertyUno': <\"Property `PropertyUno' Is What It Is!\">, 'NotWritable': <\"Property `NotWritable' Is What It Is!\">},)");
926   g_free (s);
927   g_variant_unref (value);
928
929   g_object_unref (foo_proxy);
930
931   g_main_loop_quit (loop);
932   return NULL;
933 }
934
935 static void
936 test_dispatch (const gchar *object_path)
937 {
938   GThread *thread;
939   GError *error;
940
941   /* run this in a thread to avoid deadlocks */
942   error = NULL;
943   thread = g_thread_create (test_dispatch_thread_func,
944                             (gpointer) object_path,
945                             TRUE,
946                             &error);
947   g_assert_no_error (error);
948   g_assert (thread != NULL);
949   g_main_loop_run (loop);
950   g_thread_join (thread);
951 }
952
953 static void
954 test_object_registration (void)
955 {
956   GError *error;
957   ObjectRegistrationData data;
958   GPtrArray *dyna_data;
959   gchar **nodes;
960   guint boss_foo_reg_id;
961   guint boss_bar_reg_id;
962   guint worker1_foo_reg_id;
963   guint worker1p1_foo_reg_id;
964   guint worker2_bar_reg_id;
965   guint intern1_foo_reg_id;
966   guint intern2_bar_reg_id;
967   guint intern2_foo_reg_id;
968   guint intern3_bar_reg_id;
969   guint registration_id;
970   guint subtree_registration_id;
971   guint non_subtree_object_path_foo_reg_id;
972   guint non_subtree_object_path_bar_reg_id;
973   guint dyna_subtree_registration_id;
974   guint num_successful_registrations;
975
976   data.num_unregistered_calls = 0;
977   data.num_unregistered_subtree_calls = 0;
978   data.num_subtree_nodes = 0;
979
980   num_successful_registrations = 0;
981
982   error = NULL;
983   c = g_bus_get_sync (G_BUS_TYPE_SESSION, NULL, &error);
984   g_assert_no_error (error);
985   g_assert (c != NULL);
986
987   registration_id = g_dbus_connection_register_object (c,
988                                                        "/foo/boss",
989                                                        (GDBusInterfaceInfo *) &foo_interface_info,
990                                                        &foo_vtable,
991                                                        &data,
992                                                        on_object_unregistered,
993                                                        &error);
994   g_assert_no_error (error);
995   g_assert (registration_id > 0);
996   boss_foo_reg_id = registration_id;
997   num_successful_registrations++;
998
999   registration_id = g_dbus_connection_register_object (c,
1000                                                        "/foo/boss",
1001                                                        (GDBusInterfaceInfo *) &bar_interface_info,
1002                                                        NULL,
1003                                                        &data,
1004                                                        on_object_unregistered,
1005                                                        &error);
1006   g_assert_no_error (error);
1007   g_assert (registration_id > 0);
1008   boss_bar_reg_id = registration_id;
1009   num_successful_registrations++;
1010
1011   registration_id = g_dbus_connection_register_object (c,
1012                                                        "/foo/boss/worker1",
1013                                                        (GDBusInterfaceInfo *) &foo_interface_info,
1014                                                        NULL,
1015                                                        &data,
1016                                                        on_object_unregistered,
1017                                                        &error);
1018   g_assert_no_error (error);
1019   g_assert (registration_id > 0);
1020   worker1_foo_reg_id = registration_id;
1021   num_successful_registrations++;
1022
1023   registration_id = g_dbus_connection_register_object (c,
1024                                                        "/foo/boss/worker1p1",
1025                                                        (GDBusInterfaceInfo *) &foo_interface_info,
1026                                                        NULL,
1027                                                        &data,
1028                                                        on_object_unregistered,
1029                                                        &error);
1030   g_assert_no_error (error);
1031   g_assert (registration_id > 0);
1032   worker1p1_foo_reg_id = registration_id;
1033   num_successful_registrations++;
1034
1035   registration_id = g_dbus_connection_register_object (c,
1036                                                        "/foo/boss/worker2",
1037                                                        (GDBusInterfaceInfo *) &bar_interface_info,
1038                                                        NULL,
1039                                                        &data,
1040                                                        on_object_unregistered,
1041                                                        &error);
1042   g_assert_no_error (error);
1043   g_assert (registration_id > 0);
1044   worker2_bar_reg_id = registration_id;
1045   num_successful_registrations++;
1046
1047   registration_id = g_dbus_connection_register_object (c,
1048                                                        "/foo/boss/interns/intern1",
1049                                                        (GDBusInterfaceInfo *) &foo_interface_info,
1050                                                        NULL,
1051                                                        &data,
1052                                                        on_object_unregistered,
1053                                                        &error);
1054   g_assert_no_error (error);
1055   g_assert (registration_id > 0);
1056   intern1_foo_reg_id = registration_id;
1057   num_successful_registrations++;
1058
1059   /* ... and try again at another path */
1060   registration_id = g_dbus_connection_register_object (c,
1061                                                        "/foo/boss/interns/intern2",
1062                                                        (GDBusInterfaceInfo *) &bar_interface_info,
1063                                                        NULL,
1064                                                        &data,
1065                                                        on_object_unregistered,
1066                                                        &error);
1067   g_assert_no_error (error);
1068   g_assert (registration_id > 0);
1069   intern2_bar_reg_id = registration_id;
1070   num_successful_registrations++;
1071
1072   /* register at the same path/interface - this should fail */
1073   registration_id = g_dbus_connection_register_object (c,
1074                                                        "/foo/boss/interns/intern2",
1075                                                        (GDBusInterfaceInfo *) &bar_interface_info,
1076                                                        NULL,
1077                                                        &data,
1078                                                        on_object_unregistered,
1079                                                        &error);
1080   g_assert_error (error, G_IO_ERROR, G_IO_ERROR_EXISTS);
1081   g_assert (!g_dbus_error_is_remote_error (error));
1082   g_error_free (error);
1083   error = NULL;
1084   g_assert (registration_id == 0);
1085
1086   /* register at different interface - shouldn't fail */
1087   registration_id = g_dbus_connection_register_object (c,
1088                                                        "/foo/boss/interns/intern2",
1089                                                        (GDBusInterfaceInfo *) &foo_interface_info,
1090                                                        NULL,
1091                                                        &data,
1092                                                        on_object_unregistered,
1093                                                        &error);
1094   g_assert_no_error (error);
1095   g_assert (registration_id > 0);
1096   intern2_foo_reg_id = registration_id;
1097   num_successful_registrations++;
1098
1099   /* unregister it via the id */
1100   g_assert (g_dbus_connection_unregister_object (c, registration_id));
1101   g_assert_cmpint (data.num_unregistered_calls, ==, 1);
1102   intern2_foo_reg_id = 0;
1103
1104   /* register it back */
1105   registration_id = g_dbus_connection_register_object (c,
1106                                                        "/foo/boss/interns/intern2",
1107                                                        (GDBusInterfaceInfo *) &foo_interface_info,
1108                                                        NULL,
1109                                                        &data,
1110                                                        on_object_unregistered,
1111                                                        &error);
1112   g_assert_no_error (error);
1113   g_assert (registration_id > 0);
1114   intern2_foo_reg_id = registration_id;
1115   num_successful_registrations++;
1116
1117   registration_id = g_dbus_connection_register_object (c,
1118                                                        "/foo/boss/interns/intern3",
1119                                                        (GDBusInterfaceInfo *) &bar_interface_info,
1120                                                        NULL,
1121                                                        &data,
1122                                                        on_object_unregistered,
1123                                                        &error);
1124   g_assert_no_error (error);
1125   g_assert (registration_id > 0);
1126   intern3_bar_reg_id = registration_id;
1127   num_successful_registrations++;
1128
1129   /* now register a whole subtree at /foo/boss/executives */
1130   subtree_registration_id = g_dbus_connection_register_subtree (c,
1131                                                                 "/foo/boss/executives",
1132                                                                 &subtree_vtable,
1133                                                                 G_DBUS_SUBTREE_FLAGS_NONE,
1134                                                                 &data,
1135                                                                 on_subtree_unregistered,
1136                                                                 &error);
1137   g_assert_no_error (error);
1138   g_assert (subtree_registration_id > 0);
1139   /* try registering it again.. this should fail */
1140   registration_id = g_dbus_connection_register_subtree (c,
1141                                                         "/foo/boss/executives",
1142                                                         &subtree_vtable,
1143                                                         G_DBUS_SUBTREE_FLAGS_NONE,
1144                                                         &data,
1145                                                         on_subtree_unregistered,
1146                                                         &error);
1147   g_assert_error (error, G_IO_ERROR, G_IO_ERROR_EXISTS);
1148   g_assert (!g_dbus_error_is_remote_error (error));
1149   g_error_free (error);
1150   error = NULL;
1151   g_assert (registration_id == 0);
1152
1153   /* unregister it, then register it again */
1154   g_assert_cmpint (data.num_unregistered_subtree_calls, ==, 0);
1155   g_assert (g_dbus_connection_unregister_subtree (c, subtree_registration_id));
1156   g_assert_cmpint (data.num_unregistered_subtree_calls, ==, 1);
1157   subtree_registration_id = g_dbus_connection_register_subtree (c,
1158                                                                 "/foo/boss/executives",
1159                                                                 &subtree_vtable,
1160                                                                 G_DBUS_SUBTREE_FLAGS_NONE,
1161                                                                 &data,
1162                                                                 on_subtree_unregistered,
1163                                                                 &error);
1164   g_assert_no_error (error);
1165   g_assert (subtree_registration_id > 0);
1166
1167   /* try to register something under /foo/boss/executives - this should work
1168    * because registered subtrees and registered objects can coexist.
1169    *
1170    * Make the exported object implement *two* interfaces so we can check
1171    * that the right introspection handler is invoked.
1172    */
1173   registration_id = g_dbus_connection_register_object (c,
1174                                                        "/foo/boss/executives/non_subtree_object",
1175                                                        (GDBusInterfaceInfo *) &bar_interface_info,
1176                                                        NULL,
1177                                                        &data,
1178                                                        on_object_unregistered,
1179                                                        &error);
1180   g_assert_no_error (error);
1181   g_assert (registration_id > 0);
1182   non_subtree_object_path_bar_reg_id = registration_id;
1183   num_successful_registrations++;
1184   registration_id = g_dbus_connection_register_object (c,
1185                                                        "/foo/boss/executives/non_subtree_object",
1186                                                        (GDBusInterfaceInfo *) &foo_interface_info,
1187                                                        NULL,
1188                                                        &data,
1189                                                        on_object_unregistered,
1190                                                        &error);
1191   g_assert_no_error (error);
1192   g_assert (registration_id > 0);
1193   non_subtree_object_path_foo_reg_id = registration_id;
1194   num_successful_registrations++;
1195
1196   /* now register a dynamic subtree, spawning objects as they are called */
1197   dyna_data = g_ptr_array_new ();
1198   dyna_subtree_registration_id = g_dbus_connection_register_subtree (c,
1199                                                                      "/foo/dyna",
1200                                                                      &dynamic_subtree_vtable,
1201                                                                      G_DBUS_SUBTREE_FLAGS_DISPATCH_TO_UNENUMERATED_NODES,
1202                                                                      dyna_data,
1203                                                                      (GDestroyNotify)g_ptr_array_unref,
1204                                                                      &error);
1205   g_assert_no_error (error);
1206   g_assert (dyna_subtree_registration_id > 0);
1207
1208   /* First assert that we have no nodes in the dynamic subtree */
1209   nodes = get_nodes_at (c, "/foo/dyna");
1210   g_assert (nodes != NULL);
1211   g_assert_cmpint (g_strv_length (nodes), ==, 0);
1212   g_strfreev (nodes);
1213   g_assert_cmpint (count_interfaces (c, "/foo/dyna"), ==, 4);
1214
1215   /* Install three nodes in the dynamic subtree via the dyna_data backdoor and
1216    * assert that they show up correctly in the introspection data */
1217   g_ptr_array_add (dyna_data, "lol");
1218   g_ptr_array_add (dyna_data, "cat");
1219   g_ptr_array_add (dyna_data, "cheezburger");
1220   nodes = get_nodes_at (c, "/foo/dyna");
1221   g_assert (nodes != NULL);
1222   g_assert_cmpint (g_strv_length (nodes), ==, 3);
1223   g_assert_cmpstr (nodes[0], ==, "lol");
1224   g_assert_cmpstr (nodes[1], ==, "cat");
1225   g_assert_cmpstr (nodes[2], ==, "cheezburger");
1226   g_strfreev (nodes);
1227   g_assert_cmpint (count_interfaces (c, "/foo/dyna/lol"), ==, 4);
1228   g_assert_cmpint (count_interfaces (c, "/foo/dyna/cat"), ==, 4);
1229   g_assert_cmpint (count_interfaces (c, "/foo/dyna/cheezburger"), ==, 4);
1230
1231   /* Call a non-existing object path and assert that it has been created */
1232   dyna_create (c, "dynamicallycreated");
1233   nodes = get_nodes_at (c, "/foo/dyna");
1234   g_assert (nodes != NULL);
1235   g_assert_cmpint (g_strv_length (nodes), ==, 4);
1236   g_assert_cmpstr (nodes[0], ==, "lol");
1237   g_assert_cmpstr (nodes[1], ==, "cat");
1238   g_assert_cmpstr (nodes[2], ==, "cheezburger");
1239   g_assert_cmpstr (nodes[3], ==, "dynamicallycreated");
1240   g_strfreev (nodes);
1241   g_assert_cmpint (count_interfaces (c, "/foo/dyna/dynamicallycreated"), ==, 4);
1242
1243   /* now check that the object hierarachy is properly generated... yes, it's a bit
1244    * perverse that we round-trip to the bus to introspect ourselves ;-)
1245    */
1246   nodes = get_nodes_at (c, "/");
1247   g_assert (nodes != NULL);
1248   g_assert_cmpint (g_strv_length (nodes), ==, 1);
1249   g_assert_cmpstr (nodes[0], ==, "foo");
1250   g_strfreev (nodes);
1251   g_assert_cmpint (count_interfaces (c, "/"), ==, 0);
1252
1253   nodes = get_nodes_at (c, "/foo");
1254   g_assert (nodes != NULL);
1255   g_assert_cmpint (g_strv_length (nodes), ==, 2);
1256   g_assert_cmpstr (nodes[0], ==, "boss");
1257   g_assert_cmpstr (nodes[1], ==, "dyna");
1258   g_strfreev (nodes);
1259   g_assert_cmpint (count_interfaces (c, "/foo"), ==, 0);
1260
1261   nodes = get_nodes_at (c, "/foo/boss");
1262   g_assert (nodes != NULL);
1263   g_assert_cmpint (g_strv_length (nodes), ==, 5);
1264   g_assert (_g_strv_has_string ((const gchar* const *) nodes, "worker1"));
1265   g_assert (_g_strv_has_string ((const gchar* const *) nodes, "worker1p1"));
1266   g_assert (_g_strv_has_string ((const gchar* const *) nodes, "worker2"));
1267   g_assert (_g_strv_has_string ((const gchar* const *) nodes, "interns"));
1268   g_assert (_g_strv_has_string ((const gchar* const *) nodes, "executives"));
1269   g_strfreev (nodes);
1270   /* any registered object always implement org.freedesktop.DBus.[Peer,Introspectable,Properties] */
1271   g_assert_cmpint (count_interfaces (c, "/foo/boss"), ==, 5);
1272   g_assert (has_interface (c, "/foo/boss", foo_interface_info.name));
1273   g_assert (has_interface (c, "/foo/boss", bar_interface_info.name));
1274
1275   /* check subtree nodes - we should have only non_subtree_object in /foo/boss/executives
1276    * because data.num_subtree_nodes is 0
1277    */
1278   nodes = get_nodes_at (c, "/foo/boss/executives");
1279   g_assert (nodes != NULL);
1280   g_assert (_g_strv_has_string ((const gchar* const *) nodes, "non_subtree_object"));
1281   g_assert_cmpint (g_strv_length (nodes), ==, 1);
1282   g_strfreev (nodes);
1283   g_assert_cmpint (count_interfaces (c, "/foo/boss/executives"), ==, 0);
1284
1285   /* now change data.num_subtree_nodes and check */
1286   data.num_subtree_nodes = 2;
1287   nodes = get_nodes_at (c, "/foo/boss/executives");
1288   g_assert (nodes != NULL);
1289   g_assert_cmpint (g_strv_length (nodes), ==, 5);
1290   g_assert (_g_strv_has_string ((const gchar* const *) nodes, "non_subtree_object"));
1291   g_assert (_g_strv_has_string ((const gchar* const *) nodes, "vp0"));
1292   g_assert (_g_strv_has_string ((const gchar* const *) nodes, "vp1"));
1293   g_assert (_g_strv_has_string ((const gchar* const *) nodes, "evp0"));
1294   g_assert (_g_strv_has_string ((const gchar* const *) nodes, "evp1"));
1295   /* check that /foo/boss/executives/non_subtree_object is not handled by the
1296    * subtree handlers - we can do this because objects from subtree handlers
1297    * has exactly one interface and non_subtree_object has two
1298    */
1299   g_assert_cmpint (count_interfaces (c, "/foo/boss/executives/non_subtree_object"), ==, 5);
1300   g_assert (has_interface (c, "/foo/boss/executives/non_subtree_object", foo_interface_info.name));
1301   g_assert (has_interface (c, "/foo/boss/executives/non_subtree_object", bar_interface_info.name));
1302   /* check that the vp and evp objects are handled by the subtree handlers */
1303   g_assert_cmpint (count_interfaces (c, "/foo/boss/executives/vp0"), ==, 4);
1304   g_assert_cmpint (count_interfaces (c, "/foo/boss/executives/vp1"), ==, 4);
1305   g_assert_cmpint (count_interfaces (c, "/foo/boss/executives/evp0"), ==, 4);
1306   g_assert_cmpint (count_interfaces (c, "/foo/boss/executives/evp1"), ==, 4);
1307   g_assert (has_interface (c, "/foo/boss/executives/vp0", foo_interface_info.name));
1308   g_assert (has_interface (c, "/foo/boss/executives/vp1", foo_interface_info.name));
1309   g_assert (has_interface (c, "/foo/boss/executives/evp0", bar_interface_info.name));
1310   g_assert (has_interface (c, "/foo/boss/executives/evp1", bar_interface_info.name));
1311   g_strfreev (nodes);
1312   data.num_subtree_nodes = 3;
1313   nodes = get_nodes_at (c, "/foo/boss/executives");
1314   g_assert (nodes != NULL);
1315   g_assert_cmpint (g_strv_length (nodes), ==, 7);
1316   g_assert (_g_strv_has_string ((const gchar* const *) nodes, "non_subtree_object"));
1317   g_assert (_g_strv_has_string ((const gchar* const *) nodes, "vp0"));
1318   g_assert (_g_strv_has_string ((const gchar* const *) nodes, "vp1"));
1319   g_assert (_g_strv_has_string ((const gchar* const *) nodes, "vp2"));
1320   g_assert (_g_strv_has_string ((const gchar* const *) nodes, "evp0"));
1321   g_assert (_g_strv_has_string ((const gchar* const *) nodes, "evp1"));
1322   g_assert (_g_strv_has_string ((const gchar* const *) nodes, "evp2"));
1323   g_strfreev (nodes);
1324
1325   /* This is to check that a bug (rather, class of bugs) in gdbusconnection.c's
1326    *
1327    *  g_dbus_connection_list_registered_unlocked()
1328    *
1329    * where /foo/boss/worker1 reported a child '1', is now fixed.
1330    */
1331   nodes = get_nodes_at (c, "/foo/boss/worker1");
1332   g_assert (nodes != NULL);
1333   g_assert_cmpint (g_strv_length (nodes), ==, 0);
1334   g_strfreev (nodes);
1335
1336   /* check that calls are properly dispatched to the functions in foo_vtable for objects
1337    * implementing the org.example.Foo interface
1338    *
1339    * We do this for both a regular registered object (/foo/boss) and also for an object
1340    * registered through the subtree mechanism.
1341    */
1342   test_dispatch ("/foo/boss");
1343   test_dispatch ("/foo/boss/executives/vp0");
1344
1345   /* To prevent from exiting and attaching a D-Bus tool like D-Feet; uncomment: */
1346 #if 0
1347   g_debug ("Point D-feet or other tool at: %s", session_bus_get_temporary_address());
1348   g_main_loop_run (loop);
1349 #endif
1350
1351   /* check that unregistering the subtree handler works */
1352   g_assert_cmpint (data.num_unregistered_subtree_calls, ==, 1);
1353   g_assert (g_dbus_connection_unregister_subtree (c, subtree_registration_id));
1354   g_assert_cmpint (data.num_unregistered_subtree_calls, ==, 2);
1355   nodes = get_nodes_at (c, "/foo/boss/executives");
1356   g_assert (nodes != NULL);
1357   g_assert_cmpint (g_strv_length (nodes), ==, 1);
1358   g_assert (_g_strv_has_string ((const gchar* const *) nodes, "non_subtree_object"));
1359   g_strfreev (nodes);
1360
1361   g_assert (g_dbus_connection_unregister_object (c, boss_foo_reg_id));
1362   g_assert (g_dbus_connection_unregister_object (c, boss_bar_reg_id));
1363   g_assert (g_dbus_connection_unregister_object (c, worker1_foo_reg_id));
1364   g_assert (g_dbus_connection_unregister_object (c, worker1p1_foo_reg_id));
1365   g_assert (g_dbus_connection_unregister_object (c, worker2_bar_reg_id));
1366   g_assert (g_dbus_connection_unregister_object (c, intern1_foo_reg_id));
1367   g_assert (g_dbus_connection_unregister_object (c, intern2_bar_reg_id));
1368   g_assert (g_dbus_connection_unregister_object (c, intern2_foo_reg_id));
1369   g_assert (g_dbus_connection_unregister_object (c, intern3_bar_reg_id));
1370   g_assert (g_dbus_connection_unregister_object (c, non_subtree_object_path_bar_reg_id));
1371   g_assert (g_dbus_connection_unregister_object (c, non_subtree_object_path_foo_reg_id));
1372
1373   g_assert_cmpint (data.num_unregistered_calls, ==, num_successful_registrations);
1374
1375   /* check that we no longer export any objects - TODO: it looks like there's a bug in
1376    * libdbus-1 here: libdbus still reports the '/foo' object; so disable the test for now
1377    */
1378 #if 0
1379   nodes = get_nodes_at (c, "/");
1380   g_assert (nodes != NULL);
1381   g_assert_cmpint (g_strv_length (nodes), ==, 0);
1382   g_strfreev (nodes);
1383 #endif
1384
1385   g_object_unref (c);
1386 }
1387
1388
1389 /* ---------------------------------------------------------------------------------------------------- */
1390
1391 int
1392 main (int   argc,
1393       char *argv[])
1394 {
1395   gint ret;
1396
1397   g_type_init ();
1398   g_test_init (&argc, &argv, NULL);
1399
1400   /* all the tests rely on a shared main loop */
1401   loop = g_main_loop_new (NULL, FALSE);
1402
1403   /* all the tests use a session bus with a well-known address that we can bring up and down
1404    * using session_bus_up() and session_bus_down().
1405    */
1406   g_unsetenv ("DISPLAY");
1407   g_setenv ("DBUS_SESSION_BUS_ADDRESS", session_bus_get_temporary_address (), TRUE);
1408
1409   session_bus_up ();
1410
1411   /* TODO: wait a bit for the bus to come up.. ideally session_bus_up() won't return
1412    * until one can connect to the bus but that's not how things work right now
1413    */
1414   usleep (500 * 1000);
1415
1416   g_test_add_func ("/gdbus/object-registration", test_object_registration);
1417   /* TODO: check that we spit out correct introspection data */
1418   /* TODO: check that registering a whole subtree works */
1419
1420   ret = g_test_run();
1421
1422   /* tear down bus */
1423   session_bus_down ();
1424
1425   return ret;
1426 }