#include "bridge.h"
#include "accessible-register.h"
-#define ATK_BRIDGE_OBJECT_PATH_PREFIX "/org/freedesktop/atspi/accessible"
-#define ATK_BRIDGE_OBJECT_REFERENCE_TEMPLATE ATK_BRIDGE_OBJECT_PATH_PREFIX "/%d"
-#define ATK_BRIDGE_PATH_PREFIX_LENGTH 33
-
/*
* This module is responsible for keeping track of all the AtkObjects in
* the application, so that they can be accessed remotely and placed in
*
* To access an AtkObject remotely we need to provide a D-Bus object
* path for it. The D-Bus object paths used have a standard prefix
- * (ATK_BRIDGE_OBJECT_PATH_PREFIX). Appended to this prefix is a string
+ * (SPI_ATK_OBJECT_PATH_PREFIX). Appended to this prefix is a string
* representation of an integer reference. So to access an AtkObject
* remotely we keep a Hashtable that maps the given reference to
* the AtkObject pointer. An object in this hash table is said to be 'registered'.
/*
* FIXME
*
- * While traversing the ATK tree we may modify it unintentionally.
- * This is either a bug in the Gail implementation or this module.
- * If a change is caused that recurses, via a signal into this module
- * we should catch it.
+ * This code seems very brittle.
+ * I would prefer changes to be made to
+ * gail and the ATK interface so that all Accessible
+ * objects are registered with an exporting module.
*
- * Things could also be changed that do not cause signal emission,
- * but do cause a failure. Not sure what these would be.
+ * This is the same system as Qt has with the QAccessibleBridge
+ * and QAccessibleBridgePlugin. It entails some rather
+ * large structural changes to ATK though:
*
- * The other option is that there are threads that modify the GUI.
- * This IS A BUG IN THE PROGRAM. But it may happen. If seeing very
- * odd bugs change this to take the GDK lock. Just to make sure.
+ * Removing infinite spaces (Child access no longer references child).
+ * Removing lazy creation of accessible objects.
*/
+#define SPI_ATK_OBJECT_PATH_PREFIX "/org/freedesktop/atspi/accessible"
+#define SPI_ATK_OBJECT_PATH_DESKTOP "/root"
+
+#define SPI_ATK_PATH_PREFIX_LENGTH 33
+#define SPI_ATK_OBJECT_REFERENCE_TEMPLATE SPI_ATK_OBJECT_PATH_PREFIX "/%d"
+
+
static GHashTable *ref2ptr = NULL; /* Used for converting a D-Bus path (Reference) to the object pointer */
-static guint counter = 1;
+static guint reference_counter = 0;
static GStaticRecMutex registration_mutex = G_STATIC_REC_MUTEX_INIT;
static guint
assign_reference(void)
{
- counter++;
+ reference_counter++;
/* Reference of 0 not allowed as used as direct key in hash table */
- if (counter == 0)
- counter++;
+ if (reference_counter == 0)
+ reference_counter++;
+ return reference_counter;
}
/*
static gchar *
ref_to_path (guint ref)
{
- return g_strdup_printf(ATK_BRIDGE_OBJECT_REFERENCE_TEMPLATE, ref);
+ return g_strdup_printf(SPI_ATK_OBJECT_REFERENCE_TEMPLATE, ref);
}
/*---------------------------------------------------------------------------*/
deregister_accessible (gpointer data, GObject *accessible)
{
guint ref;
- g_assert (ATK_IS_OBJECT (accessible));
+ g_return_if_fail (ATK_IS_OBJECT (accessible));
ref = object_to_ref (ATK_OBJECT(accessible));
if (ref != 0)
register_accessible (AtkObject *accessible)
{
guint ref;
- g_assert(ATK_IS_OBJECT(accessible));
+ g_return_if_fail (ATK_IS_OBJECT(accessible));
ref = assign_reference();
/*---------------------------------------------------------------------------*/
+#ifdef SPI_ATK_DEBUG
/*
* This function checks that the ref-count of an accessible
* is greater than 1.
* in AT-SPI D-Bus so objects that are remotely owned are not
* allowed.
*
- * HACK - Needs permanent soltion.
* TODO Add debug wrapper
*/
static gboolean
{
if ((G_OBJECT (accessible))->ref_count <= 1)
{
- g_critical ("AT-SPI: Child referenced that is not owned by its parent");
+ g_warning ("AT-SPI: Child referenced that is not owned by its parent");
return TRUE;
}
else
return FALSE;
}
}
+#endif /* SPI_ATK_DEBUG */
/*---------------------------------------------------------------------------*/
state = atk_object_ref_state_set (accessible);
if (atk_state_set_contains_state (state, ATK_STATE_MANAGES_DESCENDANTS))
{
- g_message ("AT-SPI: Object with 'Manages descendants' states not currently handled by AT-SPI");
+#ifdef SPI_ATK_DEBUG
+ g_warning ("AT-SPI: Object with 'Manages descendants' states not currently handled by AT-SPI");
+#endif
result = TRUE;
}
g_object_unref (state);
return result;
}
+static void
+append_children (AtkObject *accessible, GQueue *traversal)
+{
+ AtkObject *current;
+ guint i;
+
+ for (i =0; i < atk_object_get_n_accessible_children (accessible); i++)
+ {
+ current = atk_object_ref_accessible_child (accessible, i);
+#ifdef SPI_ATK_DEBUG
+ non_owned_accessible (current);
+#endif
+ if (!has_manages_descendants (current))
+ {
+ g_queue_push_tail (traversal, current);
+ }
+ else
+ {
+ g_object_unref (G_OBJECT (current));
+ }
+ }
+}
+
/*
* Registers a subtree of accessible objects
* rooted at the accessible object provided.
void
register_subtree (AtkObject *accessible)
{
- AtkObject *current, *tmp;
- GQueue *stack;
- guint i;
- gboolean recurse;
+ AtkObject *current;
+ GQueue *traversal;
+ GQueue *emit_update;
+ g_return_if_fail (ATK_IS_OBJECT (accessible));
- current = g_object_ref (accessible);
- if (has_manages_descendants (current))
- {
- g_object_unref (current);
- return;
- }
-
- stack = g_queue_new ();
+ traversal = g_queue_new ();
+ emit_update = g_queue_new ();
- register_accessible (current);
- g_queue_push_head (stack, GINT_TO_POINTER (0));
+ g_object_ref (accessible);
+ g_queue_push_tail (traversal, accessible);
- /*
- * The index held on the stack is the next child node
- * that needs processing at the corresponding level in the tree.
- */
- while (!g_queue_is_empty (stack))
+ while (!g_queue_is_empty (traversal))
{
- /* Find the next child node that needs processing */
-
- i = GPOINTER_TO_INT(g_queue_peek_head (stack));
- recurse = FALSE;
-
- while (i < atk_object_get_n_accessible_children (current) &&
- recurse == FALSE)
+ current = g_queue_pop_head (traversal);
+ g_queue_push_tail (emit_update, current);
+ if (!object_to_ref (current))
{
- tmp = atk_object_ref_accessible_child (current, i);
-
- /* TODO Add debug wrapper */
- if (non_owned_accessible (tmp))
- {
- i++;
- continue;
- }
-
- if (object_to_ref (tmp))
- {
- /* If its already registered, just update */
- spi_emit_cache_update (tmp, atk_adaptor_app_data->bus);
- }
- else if (has_manages_descendants (tmp))
- {
- /* If it has manages descendants, just register and update */
- register_accessible (tmp);
- spi_emit_cache_update (tmp, atk_adaptor_app_data->bus);
- }
- else
- {
- recurse = TRUE;
- }
-
- if (!recurse)
- {
- i++;
- g_object_unref (G_OBJECT (tmp));
- }
- }
-
- if (recurse)
- {
- /* Push onto stack */
- current = tmp;
register_accessible (current);
-
- g_queue_peek_head_link (stack)->data = GINT_TO_POINTER (i+1);
- g_queue_push_head (stack, GINT_TO_POINTER (0));
- }
- else
- {
- /* Pop from stack */
- spi_emit_cache_update (current, atk_adaptor_app_data->bus);
- tmp = current;
- current = atk_object_get_parent (current);
- g_object_unref (G_OBJECT (tmp));
- g_queue_pop_head (stack);
+#ifdef SPI_ATK_DEBUG
+ g_debug ("REG - %s - %d - %s", atk_object_get_name (current),
+ atk_object_get_role (current),
+ atk_dbus_object_to_path (current));
+#endif
+ append_children (current, traversal);
}
}
- g_queue_free (stack);
+
+ while (!g_queue_is_empty (emit_update))
+ {
+ current = g_queue_pop_head (emit_update);
+ spi_emit_cache_update (current, atk_adaptor_app_data->bus);
+ g_object_unref (G_OBJECT (current));
+ }
+
+ g_queue_free (traversal);
+ g_queue_free (emit_update);
}
/*---------------------------------------------------------------------------*/
update_accessible (AtkObject *accessible)
{
guint ref = 0;
- g_assert(ATK_IS_OBJECT(accessible));
+ g_return_if_fail (ATK_IS_OBJECT(accessible));
ref = object_to_ref (accessible);
if (ref)
guint index;
void *data;
- g_assert (path);
+ g_return_val_if_fail (path, NULL);
- if (strncmp(path, ATK_BRIDGE_OBJECT_PATH_PREFIX, ATK_BRIDGE_PATH_PREFIX_LENGTH) != 0)
+ if (strncmp(path, SPI_ATK_OBJECT_PATH_PREFIX, SPI_ATK_PATH_PREFIX_LENGTH) != 0)
return NULL;
- path += ATK_BRIDGE_PATH_PREFIX_LENGTH; /* Skip over the prefix */
+ path += SPI_ATK_PATH_PREFIX_LENGTH; /* Skip over the prefix */
- if (path[0] == '\0')
+ if (!g_strcmp0 (SPI_ATK_OBJECT_PATH_DESKTOP, path))
return atk_get_root();
if (path[0] != '/')
return NULL;
return ref_to_path (ref);
}
+gchar *
+atk_dbus_desktop_object_path ()
+{
+ return g_strdup (SPI_ATK_OBJECT_PATH_PREFIX SPI_ATK_OBJECT_PATH_DESKTOP);
+}
+
/*---------------------------------------------------------------------------*/
/*
* have their signals processed.
*/
accessible = g_value_get_object (¶m_values[0]);
+ g_return_val_if_fail (ATK_IS_OBJECT (accessible), TRUE);
+
if (object_to_ref (accessible))
{
- /* TODO Add debug wrapper */
+#ifdef SPI_ATK_DEBUG
if (recursion_check_and_set ())
- g_critical ("AT-SPI: Recursive use of registration module");
+ g_warning ("AT-SPI: Recursive use of registration module");
+
+ g_debug ("AT-SPI: Tree update listener");
+#endif
- if (!ATK_IS_OBJECT (accessible))
- g_critical ("AT-SPI: Object data updated when not a valid AtkObject");
values = (AtkPropertyValues*) g_value_get_pointer (¶m_values[1]);
pname = values[0].property_name;
if (strcmp (pname, "accessible-name") == 0 ||
- strcmp (pname, "accessible-description"))
+ strcmp (pname, "accessible-description") == 0)
{
update_accessible (accessible);
}
- /* Parent updates not used */
- /* Parent value us updated buy child-add signal of parent object */
- /*
- else if (strcmp (pname, "accessible-parent"))
- {
- update_accessible (accessible);
- }
- */
+ /* Parent value us updated by child-add signal of parent object */
+
recursion_check_unset ();
}
* have their signals processed.
*/
accessible = g_value_get_object (¶m_values[0]);
+ g_return_val_if_fail (ATK_IS_OBJECT (accessible), TRUE);
+
if (object_to_ref (accessible))
{
- /* TODO Add debug wrapper */
+#ifdef SPI_ATK_DEBUG
if (recursion_check_and_set ())
g_warning ("AT-SPI: Recursive use of registration module");
- if (!ATK_IS_OBJECT (accessible))
- g_critical ("AT-SPI: Object children updated when not a valid AtkObject");
+ g_debug ("AT-SPI: Tree update children listener");
+#endif
if (signal_hint->detail)
- detail = g_quark_to_string (signal_hint->detail);
+ detail = g_quark_to_string (signal_hint->detail);
+
if (!strcmp (detail, "add"))
{
gpointer child;
if (!ATK_IS_OBJECT (child))
{
child = atk_object_ref_accessible_child (accessible, index);
- /* TODO Add debug wrapper */
- if (!non_owned_accessible (child))
- {
- register_subtree (child);
- }
- }
- else
- {
- register_subtree (child);
+#ifdef SPI_ATK_DEBUG
+ non_owned_accessible (child);
+#endif
}
-
+ register_subtree (child);
+ update_accessible (accessible);
}
recursion_check_unset ();
return TRUE;
}
+static void
+spi_atk_register_toplevel_added (AtkObject *accessible,
+ guint index,
+ AtkObject *child)
+{
+ g_static_rec_mutex_lock (®istration_mutex);
+
+ g_return_if_fail (ATK_IS_OBJECT (accessible));
+
+ if (object_to_ref (accessible))
+ {
+#ifdef SPI_ATK_DEBUG
+ if (recursion_check_and_set ())
+ g_warning ("AT-SPI: Recursive use of registration module");
+
+ g_debug ("AT-SPI: Toplevel added listener");
+#endif
+ if (!ATK_IS_OBJECT (child))
+ {
+ child = atk_object_ref_accessible_child (accessible, index);
+#ifdef SPI_ATK_DEBUG
+ non_owned_accessible (child);
+#endif
+ }
+ register_subtree (child);
+ update_accessible (accessible);
+
+ recursion_check_unset ();
+ }
+
+ g_static_rec_mutex_unlock (®istration_mutex);
+}
+
+static void
+spi_atk_register_toplevel_removed (AtkObject *accessible,
+ guint index,
+ AtkObject *child)
+{
+ g_static_rec_mutex_lock (®istration_mutex);
+
+ g_return_if_fail (ATK_IS_OBJECT (accessible));
+
+ if (object_to_ref (accessible))
+ {
+#ifdef SPI_ATK_DEBUG
+ if (recursion_check_and_set ())
+ g_warning ("AT-SPI: Recursive use of registration module");
+
+ g_debug ("AT-SPI: Toplevel removed listener");
+#endif
+ update_accessible (accessible);
+ recursion_check_unset ();
+ }
+
+ g_static_rec_mutex_unlock (®istration_mutex);
+}
+
/*
* Initializes required global data. The update and removal lists
* and the reference lookup tables.
if (!ref2ptr)
ref2ptr = g_hash_table_new(g_direct_hash, g_direct_equal);
+#ifdef SPI_ATK_DEBUG
if (g_thread_supported ())
g_message ("AT-SPI: Threads enabled");
+ g_debug ("AT-SPI: Initial Atk tree regisration");
+#endif
+
register_subtree (root);
atk_add_global_event_listener (tree_update_listener, "Gtk:AtkObject:property-change");
atk_add_global_event_listener (tree_update_children_listener, "Gtk:AtkObject:children-changed");
+
+ g_signal_connect (root,
+ "children-changed::add",
+ (GCallback) spi_atk_register_toplevel_added,
+ NULL);
+ g_signal_connect (root,
+ "children-changed::remove",
+ (GCallback) spi_atk_register_toplevel_removed,
+ NULL);
}
/*END------------------------------------------------------------------------*/
-