2 * AT-SPI - Assistive Technology Service Provider Interface
3 * (Gnome Accessibility Project; http://developer.gnome.org/projects/gap)
5 * Copyright 2001, 2002 Sun Microsystems Inc.,
6 * Copyright 2001, 2002 Ximian, Inc.
8 * This library is free software; you can redistribute it and/or
9 * modify it under the terms of the GNU Library General Public
10 * License as published by the Free Software Foundation; either
11 * version 2 of the License, or (at your option) any later version.
13 * This library is distributed in the hope that it will be useful,
14 * but WITHOUT ANY WARRANTY; without even the implied warranty of
15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
16 * Library General Public License for more details.
18 * You should have received a copy of the GNU Library General Public
19 * License along with this library; if not, write to the
20 * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
21 * Boston, MA 02111-1307, USA.
26 * Basic SPI initialization and event loop function prototypes
33 #include <cspi/spi-private.h>
38 static DBusConnection *bus = NULL;
39 static GHashTable *apps = NULL;
40 static GHashTable *live_refs = NULL;
41 static GQueue *exception_handlers = NULL;
42 static DBusError exception;
45 cspi_object_release (gpointer value)
50 cspi_exception_throw (DBusError *error, const char *desc_prefix)
52 SPIExceptionHandler *handler = NULL;
54 if (exception_handlers) handler = g_queue_peek_head (exception_handlers);
56 ex.type = SPI_EXCEPTION_SOURCE_UNSPECIFIED;
58 ex.code = SPI_EXCEPTION_UNSPECIFIED;
60 // TODO: Fill in description
63 return (*handler) (&ex, FALSE);
65 return FALSE; /* means exception was not handled */
68 const char *spi_path_dec = SPI_DBUS_PATH_DEC;
69 const char *spi_path_registry = SPI_DBUS_PATH_REGISTRY;
70 const char *spi_bus_registry = SPI_DBUS_NAME_REGISTRY;
71 const char *spi_path_desktop = SPI_DBUS_PATH_DESKTOP;
72 const char *spi_interface_accessible = SPI_DBUS_INTERFACE_ACCESSIBLE;
73 const char *spi_interface_action = SPI_DBUS_INTERFACE_ACTION;
74 const char *spi_interface_application = SPI_DBUS_INTERFACE_APPLICATION;
75 const char *spi_interface_component = SPI_DBUS_INTERFACE_COMPONENT;
76 const char *spi_interface_dec = SPI_DBUS_INTERFACE_DEC;
77 const char *spi_interface_desktop = SPI_DBUS_INTERFACE_DESKTOP;
78 const char *spi_interface_device_event_listener = SPI_DBUS_INTERFACE_DEVICE_EVENT_LISTENER;
79 const char *spi_interface_document = SPI_DBUS_INTERFACE_DOCUMENT;
80 const char *spi_interface_editable_text = SPI_DBUS_INTERFACE_EDITABLE_TEXT;
81 const char *spi_interface_hyperlink = SPI_DBUS_INTERFACE_HYPERLINK;
82 const char *spi_interface_hypertext = SPI_DBUS_INTERFACE_HYPERTEXT;
83 const char *spi_interface_image = SPI_DBUS_INTERFACE_IMAGE;
84 const char *spi_interface_registry = SPI_DBUS_INTERFACE_REGISTRY;
85 const char *spi_interface_selection = SPI_DBUS_INTERFACE_SELECTION;
86 const char *spi_interface_table = SPI_DBUS_INTERFACE_TABLE;
87 const char *spi_interface_text = SPI_DBUS_INTERFACE_TEXT;
88 const char *spi_interface_tree = SPI_DBUS_INTERFACE_TREE;
89 const char *spi_interface_value = SPI_DBUS_INTERFACE_VALUE;
91 static const char *interfaces[] =
93 SPI_DBUS_INTERFACE_ACCESSIBLE,
94 SPI_DBUS_INTERFACE_ACTION,
95 SPI_DBUS_INTERFACE_APPLICATION,
96 SPI_DBUS_INTERFACE_COLLECTION,
97 SPI_DBUS_INTERFACE_COMPONENT,
98 SPI_DBUS_INTERFACE_DOCUMENT,
99 SPI_DBUS_INTERFACE_EDITABLE_TEXT,
100 SPI_DBUS_INTERFACE_HYPERLINK,
101 SPI_DBUS_INTERFACE_HYPERTEXT,
102 SPI_DBUS_INTERFACE_IMAGE,
103 "org.freedesktop.atspi.LoginHelper",
104 SPI_DBUS_INTERFACE_SELECTION,
105 "org.freedesktop.atspi.Selector",
106 SPI_DBUS_INTERFACE_TABLE,
107 SPI_DBUS_INTERFACE_TEXT,
108 SPI_DBUS_INTERFACE_VALUE,
112 static gint get_iface_num (const char *iface)
114 // TODO: Use a binary search or hash to improve performance
117 for (i = 0; interfaces[i]; i++)
119 if (!strcmp(iface, interfaces[i])) return i;
125 cspi_accessible_is_a (Accessible *accessible,
126 const char *interface_name)
130 if (accessible == NULL)
135 n = get_iface_num (interface_name);
136 if (n == -1) return FALSE;
137 return (SPIBoolean)((accessible->interfaces & (1 << n))? TRUE: FALSE);
141 cspi_get_live_refs (void)
145 live_refs = g_hash_table_new (g_direct_hash, g_direct_equal);
157 cspi_exception (void)
159 if (dbus_error_is_set (&exception))
161 dbus_error_free (&exception);
168 cspi_check_ev (const char *error_string)
170 if (dbus_error_is_set (&exception))
172 cspi_exception_throw (&exception, error_string);
179 cspi_object_add (Accessible *accessible)
181 if (accessible) cspi_object_ref (accessible);
186 cspi_object_ref (Accessible *accessible)
188 g_return_if_fail (accessible != NULL);
190 accessible->ref_count++;
191 g_hash_table_insert (live_refs, accessible, accessible);
194 #define APP_IS_REGISTRY(app) (!strcmp (app->bus_name, spi_bus_registry))
197 cspi_object_unref_internal (Accessible *accessible, gboolean defunct)
201 if (accessible == NULL)
206 if (--accessible->ref_count == 0 || (accessible->ref_count == 1 && !defunct) && g_hash_table_lookup (live_refs, accessible))
209 memset (&e, 0, sizeof(e));
210 e.type = "object:state-change:defunct";
211 e.source = accessible;
213 cspi_dispatch_event (&e);
214 g_hash_table_remove (live_refs, accessible);
216 if (accessible->ref_count == 0)
218 if (APP_IS_REGISTRY (accessible->app))
220 g_free (accessible->v.path);
222 if (accessible->states)
223 spi_state_set_cache_unref (accessible->states);
224 g_free (accessible->description);
225 g_free (accessible->name);
231 cspi_object_unref (Accessible *accessible)
233 cspi_object_unref_internal (accessible, FALSE);
241 cspi_streams_close_all ();
247 g_hash_table_destroy (refs);
251 static gboolean SPI_inited = FALSE;
253 static GHashTable *app_hash = NULL;
256 ref_accessible (CSpiApplication *app, const char *path)
261 if (sscanf (path, "/org/freedesktop/atspi/accessible/%d", &id) != 1)
265 Accessible *a = g_hash_table_lookup (app->hash, &id);
271 id_val = g_new (guint, 1);
272 if (!id_val) return NULL;
274 a = g_new0 (Accessible, 1);
280 g_hash_table_insert (app->hash, id_val, a);
283 a->ref_count = 2; /* one for the caller, one for the hash */
287 static CSpiApplication *
288 cspi_get_application (const char *bus_name)
290 CSpiApplication *app = NULL;
295 app_hash = g_hash_table_new_full (g_str_hash, g_str_equal, g_free, (GDestroyNotify)g_hash_table_unref);
296 if (!app_hash) return;
298 app = g_hash_table_lookup (app_hash, bus_name);
300 bus_name_dup = g_strdup (bus_name);
301 if (!bus_name_dup) return NULL;
302 // TODO: change below to something that will send state-change:defunct notification if necessary */
303 app = g_new (CSpiApplication, 1);
304 if (!app) return NULL;
305 app->bus_name = bus_name_dup;
306 if (APP_IS_REGISTRY (app))
308 app->hash = g_hash_table_new_full (g_str_hash, g_str_equal, g_free, cspi_object_unref);
312 app->hash = g_hash_table_new_full (g_int_hash, g_int_equal, g_free, cspi_object_unref);
314 g_hash_table_insert (app_hash, bus_name_dup, app);
327 GArray *state_bitflags;
331 handle_addition (CSpiApplication*app, CACHE_ADDITION *ca)
336 Accessible *a = ref_accessible (app, ca->path);
337 /* Note: children don't hold refs for their parents or vice versa */
338 a->parent = ref_accessible (app, ca->parent);
339 if (a->parent) cspi_object_unref (a->parent);
342 g_list_free (a->children);
345 for (i = 0; i < ca->children->len; i++)
347 const char *child_path = g_array_index (ca->children, const char *, i);
348 Accessible *child = ref_accessible (app, child_path);
349 new_list = g_list_append (a->children, child);
350 if (new_list) a->children = new_list;
351 cspi_object_unref (child);
354 for (i = 0; i < ca->interfaces->len; i++)
356 const char *iface = g_array_index (ca->interfaces, const char *, i);
357 if (!strcmp (iface, "org.freedesktop.DBus.Introspectable")) continue;
358 gint n = get_iface_num (iface);
361 g_warning ("Unknown interface %s", iface);
363 else a->interfaces |= (1 << n);
366 if (a->name) g_free (a->name);
369 if (a->description) g_free (a->description);
370 a->description = ca->description;
371 a->states = spi_state_set_cache_new (ca->state_bitflags);
372 g_array_free (ca->interfaces, TRUE);
373 g_array_free (ca->children, TRUE);
374 /* spi_state_set_cache_new frees state_bitflags */
375 /* This is a bit of a hack since ref_accessible sets ref_count to 2
376 * for a new object, one of the refs being for the cache */
377 cspi_object_unref (a);
380 /* Update the cache with added/modified objects and free the array */
382 handle_additions (CSpiApplication*app, GArray *additions)
390 for (i = 0; i < additions->len; i++)
392 CACHE_ADDITION *ca = &g_array_index (additions, CACHE_ADDITION, i);
393 handle_addition (app, ca);
397 static DBusHandlerResult
398 cspi_dbus_handle_remove_accessible (DBusConnection *bus, DBusMessage *message, void *user_data)
400 const char *sender = dbus_message_get_sender (message);
401 CSpiApplication *app = cspi_get_application (sender);
405 if (!dbus_message_get_args (message, NULL, DBUS_TYPE_STRING, &path, DBUS_TYPE_INVALID))
407 g_warning ("Received RemoveAccessible with invalid arguments");
410 a = ref_accessible (app, path);
411 if (a->parent && g_list_find (a->parent->children, a))
413 a->parent->children = g_list_remove (a->parent->children, a);
414 // TODO: Send children-changed:remove event
415 /* Note: children don't hold refs for their parents or vice versa */
417 g_hash_table_remove (app->hash, &a->v.id);
418 cspi_object_unref_internal (a, TRUE); /* unref our own ref */
422 add_app_to_desktop (Accessible *a, const char *bus_name)
427 dbus_error_init (&error);
428 if (dbind_method_call_reentrant (bus, bus_name, "/org/freedesktop/atspi/tree", spi_interface_tree, "getRoot", &error, "=>o", &root_path))
430 Accessible *obj = cspi_ref_accessible (bus_name, root_path);
433 GList *new_list = g_list_append (a->children, obj);
436 a->children = new_list;
444 g_warning ("Error calling getRoot for %s: %s", bus_name, error.message);
450 send_children_changed (Accessible *parent, Accessible *child, gboolean add)
454 memset (&e, 0, sizeof(e));
455 e.type = (add? "object:children-changed:add": "object:children-changed:remove");
457 e.detail1 = g_list_index (parent->children, child);
458 cspi_dispatch_event (&e);
462 unref_object_and_children (Accessible *obj)
466 for (l = obj->children; l; l = l->next)
468 unref_object_and_children (l->data);
470 cspi_object_unref_internal (obj, TRUE);
474 remove_app_from_desktop (Accessible *a, const char *bus_name)
479 for (l = a->children; l; l = l->next)
482 if (!strcmp (bus_name, child->app->bus_name)) break;
486 g_warning ("Removing unregistered app %s; doing nothing\n", bus_name);
489 send_children_changed (a, child, FALSE);
490 a->children = g_list_remove (a->children, child);
491 unref_object_and_children (child);
495 static Accessible *desktop;
498 ref_accessible_desktop (CSpiApplication *app)
507 cspi_object_ref (desktop);
510 desktop = g_new0 (Accessible, 1);
515 g_hash_table_insert (app->hash, "", desktop);
517 desktop->ref_count = 2; /* one for the caller, one for the hash */
518 desktop->name = g_strdup ("");
519 dbus_error_init (&error);
520 if (!dbind_method_call_reentrant (bus, spi_bus_registry, spi_path_registry, spi_interface_registry, "getApplications", &error, "=>as", &apps))
522 g_error ("Couldn't get application list: %s", error.message);
524 for (i = 0; i < apps->len; i++)
526 const char *app_name = g_array_index (apps, char *, i);
527 if (app_name[0] == '\0')
529 g_warning ("Got empty app name");
532 CSpiApplication *app = cspi_get_application (app_name);
534 dbus_error_init (&error);
535 dbind_method_call_reentrant (bus, app_name, "/org/freedesktop/atspi/tree", spi_interface_tree, "getTree", &error, "=>a(ooaoassusau)", &additions);
538 g_warning ("getTree (%s): %s", app_name, error.message);
540 handle_additions (app, additions);
541 add_app_to_desktop (desktop, app_name);
543 g_array_free (apps, TRUE);
548 cspi_ref_accessible (const char *app, const char *path)
550 CSpiApplication *a = cspi_get_application (app);
552 if ( APP_IS_REGISTRY(a))
554 return ref_accessible_desktop (a);
556 return ref_accessible (a, path);
560 cspi_ref_related_accessible (Accessible *obj, const char *path)
562 return ref_accessible (obj->app, path);
565 static const char *cacheSignalType = "ooaoassusau";
567 static DBusHandlerResult
568 cspi_dbus_handle_update_accessible (DBusConnection *bus, DBusMessage *message, void *user_data)
570 DBusMessageIter iter;
573 const char *sender = dbus_message_get_sender (message);
574 CSpiApplication *app = cspi_get_application (sender);
575 const char *type = cacheSignalType;
579 g_warning ("UpdateAccessible from unknown app. Should we add it?", sender);
582 dbus_message_iter_init (message, &iter);
583 // TODO: Check signature
584 dbind_any_demarshal (&iter, &type, &p); /* additions */
585 handle_addition (app, &ca);
588 static DBusHandlerResult
589 cspi_dbus_handle_register_application (DBusConnection *bus, DBusMessage *message, void *user_data)
596 dbus_error_init (&error);
597 a = cspi_ref_accessible (spi_bus_registry, spi_path_registry);
598 if (add_app_to_desktop (a, dbus_message_get_sender (message)))
600 send_children_changed (a, g_list_last (a->children)->data, TRUE);
602 cspi_object_unref (a);
603 return DBUS_HANDLER_RESULT_HANDLED;
606 static DBusHandlerResult
607 cspi_dbus_handle_deregister_application (DBusConnection *bus, DBusMessage *message, void *user_data)
613 dbus_error_init (&error);
614 if (!dbus_message_get_args (message, &error, DBUS_TYPE_STRING, &bus_name, DBUS_TYPE_INVALID))
616 g_warning ("Error processing %s: %s\n", dbus_message_get_member(message), error.message);
617 dbus_error_free (&error);
618 return DBUS_HANDLER_RESULT_HANDLED;
621 a = cspi_ref_accessible (spi_bus_registry, spi_path_registry);
622 remove_app_from_desktop (a, bus_name);
623 cspi_object_unref (a);
624 return DBUS_HANDLER_RESULT_HANDLED;
628 static DBusHandlerResult
629 cspi_dbus_filter (DBusConnection *bus, DBusMessage *message, void *data)
631 int type = dbus_message_get_type (message);
632 const char *interface = dbus_message_get_interface (message);
633 const char *member = dbus_message_get_member (message);
637 if (type == DBUS_MESSAGE_TYPE_SIGNAL &&
638 !strncmp (interface, "org.freedesktop.atspi.Event.", 28))
640 return cspi_dbus_handle_event (bus, message, data);
642 if (dbus_message_is_method_call (message, spi_interface_device_event_listener, "notifyEvent"))
644 return cspi_dbus_handle_deviceEvent (bus, message, data);
646 if (dbus_message_is_signal (message, spi_interface_tree, "updateAccessible"))
648 return cspi_dbus_handle_update_accessible (bus, message, data);
650 if (dbus_message_is_signal (message, spi_interface_tree, "removeAccessible"))
652 return cspi_dbus_handle_remove_accessible (bus, message, data);
654 if (dbus_message_is_method_call (message, spi_interface_registry, "registerApplication"))
656 return cspi_dbus_handle_register_application (bus, message, data);
658 if (dbus_message_is_method_call (message, spi_interface_registry, "deregisterApplication"))
660 return cspi_dbus_handle_deregister_application (bus, message, data);
662 return DBUS_HANDLER_RESULT_NOT_YET_HANDLED;
665 static const char *signal_interfaces[] =
667 "org.freedesktop.atspi.Event.Object",
668 "org.freedesktop.atspi.Event.Window",
669 "org.freedesktop.atspi.Event.Mouse",
670 "org.freedesktop.atspi.Event.Terminal",
671 "org.freedesktop.atspi.Event.Document",
672 "org.freedesktop.atspi.Event.Focus",
679 * Connects to the accessibility registry and initializes the SPI.
681 * Returns: 0 on success, otherwise an integer error code.
699 cspi_get_live_refs();
700 g_atexit (cspi_cleanup);
702 dbus_error_init (&error);
703 bus = dbus_bus_get (DBUS_BUS_SESSION, &error);
706 g_error ("Couldn't get session bus");
709 dbus_bus_register (bus, &error);
710 dbus_connection_setup_with_g_main(bus, g_main_context_default());
711 dbus_connection_add_filter (bus, cspi_dbus_filter, NULL, NULL);
712 match = g_strdup_printf ("type='signal',interface='%s',member='updateTree'", spi_interface_tree);
713 dbus_error_init (&error);
714 dbus_bus_add_match (bus, match, &error);
716 match = g_strdup_printf ("type='method_call',interface='%s'", spi_interface_registry);
717 dbus_bus_add_match (bus, match, &error);
719 for (i = 0; signal_interfaces[i]; i++)
721 match = g_strdup_printf ("type='signal',interface='%s'", signal_interfaces[i]);
722 dbus_bus_add_match (bus, match, &error);
728 static GMainLoop *mainloop;
733 * Starts/enters the main event loop for the SPI services.
735 * (NOTE: This method does not return control, it is exited via a call to
736 * SPI_event_quit () from within an event handler).
740 SPI_event_main (void)
743 mainloop = g_main_loop_new (NULL, FALSE);
744 g_main_loop_run (mainloop);
750 * Quits the last main event loop for the SPI services,
754 SPI_event_quit (void)
756 g_main_loop_quit (mainloop);
762 * Checks to see if an SPI event is waiting in the event queue.
763 * Used by clients that don't wish to use SPI_event_main().
765 * Not Yet Implemented.
767 * Returns: #TRUE if an event is waiting, otherwise #FALSE.
771 SPI_eventIsReady (void)
778 * @waitForEvent: a #SPIBoolean indicating whether to block or not.
780 * Gets the next event in the SPI event queue; blocks if no event
781 * is pending and @waitForEvent is #TRUE.
782 * Used by clients that don't wish to use SPI_event_main().
784 * Not Yet Implemented.
786 * Returns: the next #AccessibleEvent in the SPI event queue.
789 SPI_nextEvent (SPIBoolean waitForEvent)
796 report_leaked_ref (gpointer key, gpointer val, gpointer user_data)
799 Accessible *a = (Accessible *) val;
801 name = Accessible_getName (a);
802 if (cspi_exception ())
807 role = Accessible_getRoleName (a);
808 if (cspi_exception ())
813 fprintf (stderr, "leaked %d references to object %s, role %s %p\n",
814 a->ref_count, name ? name : "<?>", role ? role : "<?>", a);
816 SPI_freeString (name);
823 * Disconnects from the Accessibility Registry and releases
824 * any floating resources. Call only once at exit.
826 * Returns: 0 if there were no leaks, otherwise non zero.
842 leaked = g_hash_table_size (live_refs);
844 fprintf (stderr, "Leaked %d SPI handles\n", leaked);
848 g_hash_table_foreach (live_refs, report_leaked_ref, NULL);
865 * @s: a character string returned from another at-spi call.
867 * Free a character string returned from an at-spi call. Clients of
868 * at-spi should use this function instead of free () or g_free().
869 * A NULL string @s will be silently ignored.
870 * This API should not be used to free strings
871 * from other libraries or allocated by the client.
874 SPI_freeString (char *s)
884 * @r: a pointer to an SPIRect returned from another at-spi call.
886 * Free a SPIRect structure returned from an at-spi call. Clients of
887 * at-spi should use this function instead of free () or g_free().
888 * A NULL rect @r will be silently ignored.
889 * This API should not be used to free data
890 * from other libraries or allocated by the client.
895 SPI_freeRect (SPIRect *r)
899 /* err, okay, in this case the client _could_
900 have called g_free, but we don't want to guarantee it */
907 * @s: a UTF-8 string to be duplicated
911 * Returns: a duplicate of the string passed as a parameter, which should
912 * be freed via SPI_freeString after use.
915 SPI_dupString (char *s)
926 * SPI_exceptionHandlerPush:
927 * @handler: an #SPIExceptionHandler to install as the first code to deal with exceptions.
929 * Install a client-side handler for #SPIException instances, which can see and handle any
930 * exceptions before chaining them to the next exception handler in the stack.
934 * Returns %TRUE if the result succeeded, %FALSE if @hander could not be registered.
936 SPIBoolean SPI_exceptionHandlerPush (SPIExceptionHandler *handler)
938 if (!exception_handlers)
939 exception_handlers = g_queue_new ();
940 g_queue_push_head (exception_handlers, handler);
945 * SPI_exceptionHandlerPop:
947 * Remove/pop an #SPIExceptionHandler off the error handler stack and return the new handler.
951 * Returns the #SPIExceptionHandler which is now at the top of the error handler stack after the call.
953 SPIExceptionHandler* SPI_exceptionHandlerPop (void)
955 return (SPIExceptionHandler *) g_queue_pop_head (exception_handlers);
959 * SPIException_getSourceType:
960 * @err: the exception being queried
962 * Get the #SPIExceptionType of an exception which has been thrown.
966 * Returns: the #SPIExceptionType corresponding to exception @err.
968 SPIExceptionType SPIException_getSourceType (SPIException *err)
973 return SPI_EXCEPTION_SOURCE_UNSPECIFIED;
977 * SPIException_getExceptionCode:
978 * @err: the #SPIException being queried.
980 * Get the #SPIExceptionCode telling what type of exception condition has occurred.
984 * Returns: the #SPIExceptionCode corresponding to exception @err.
986 SPIExceptionCode SPIException_getExceptionCode (SPIException *err)
992 * SPIAccessibleException_getSource:
993 * @err: the #SPIException being queried.
995 * Get the identity of the object which threw an exception.
999 * Returns: a pointer to the #Accessible object which threw the exception.
1001 Accessible* SPIAccessibleException_getSource (SPIException *err)
1003 if (err->type == SPI_EXCEPTION_SOURCE_ACCESSIBLE)
1004 cspi_object_ref (err->source);
1010 * SPIException_getDescription:
1011 * @err: the #SPIException being queried.
1013 * Get a text description of the exception that has been thrown.
1014 * Unfortunately these descriptions tend to be terse and limited in
1015 * the detail which they can provide.
1017 * Returns: a brief character string describing the exception.
1019 char* SPIException_getDescription (SPIException *err)
1021 /* TODO: friendlier error messages? */
1023 return err->error->message;
1028 get_path (Accessible *obj)
1030 if (APP_IS_REGISTRY (obj->app))
1032 return g_strdup_printf (SPI_DBUS_PATH_REGISTRY);
1034 return g_strdup_printf ("/org/freedesktop/atspi/accessible/%d", obj->v.id);
1038 cspi_dbus_call (Accessible *obj, const char *interface, const char *method, DBusError *error, const char *type, ...)
1041 char *path = get_path (obj);
1045 if (!error) error = &err;
1046 dbus_error_init (error);
1047 va_start (args, type);
1048 retval = dbind_method_call_reentrant_va (SPI_bus(), obj->app->bus_name, path, interface, method, error, type, args);
1051 if (dbus_error_is_set (error))
1053 if (!dbus_error_is_set (&exception))
1055 // TODO: Should we call cspi_exception_throw?
1056 dbus_move_error (error, &exception);
1058 else if (error == &err) dbus_error_free (error);
1064 cspi_dbus_get_property (Accessible *obj, const char *interface, const char *name, DBusError *error, const char *type, void *data)
1066 DBusMessage *message, *reply;
1067 char *path = get_path (obj);
1068 DBusMessageIter iter, iter_variant;
1070 dbus_bool_t retval = FALSE;
1072 message = dbus_message_new_method_call (obj->app->bus_name, path, "org.freedesktop.DBus.Properties", "Get");
1075 // TODO: throw exception
1078 dbus_message_append_args (message, DBUS_TYPE_STRING, &interface, DBUS_TYPE_STRING, &name, DBUS_TYPE_INVALID);
1079 if (!error) error = &err;
1080 dbus_error_init (error);
1081 reply = dbus_connection_send_with_reply_and_block (SPI_bus(), message, 1000, error);
1082 dbus_message_unref (message);
1085 // TODO: throw exception
1088 dbus_message_iter_init (reply, &iter);
1089 dbus_message_iter_recurse (&iter, &iter_variant);
1090 if (dbus_message_iter_get_arg_type (&iter_variant) != type[0])
1092 g_warning ("cspi_dbus_get_property: Wrong type: expected %s, got %c\n", type, dbus_message_iter_get_arg_type (&iter_variant));
1095 dbus_message_iter_get_basic (&iter_variant, data);
1096 dbus_message_unref (reply);
1097 if (type[0] == 's') *(char **)data = g_strdup (*(char **)data);