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.
7 * Copyright 2010, 2011 Novell, Inc.
9 * This library is free software; you can redistribute it and/or
10 * modify it under the terms of the GNU Library General Public
11 * License as published by the Free Software Foundation; either
12 * version 2 of the License, or (at your option) any later version.
14 * This library is distributed in the hope that it will be useful,
15 * but WITHOUT ANY WARRANTY; without even the implied warranty of
16 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
17 * Library General Public License for more details.
19 * You should have received a copy of the GNU Library General Public
20 * License along with this library; if not, write to the
21 * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
22 * Boston, MA 02111-1307, USA.
25 #include "atspi-private.h"
29 atspi_action_interface_init (AtspiAction *action)
34 atspi_collection_interface_init (AtspiCollection *component)
39 atspi_component_interface_init (AtspiComponent *component)
44 atspi_document_interface_init (AtspiDocument *document)
49 atspi_editable_text_interface_init (AtspiEditableText *editable_text)
54 atspi_hypertext_interface_init (AtspiHypertext *hypertext)
59 atspi_image_interface_init (AtspiImage *image)
64 atspi_selection_interface_init (AtspiSelection *selection)
69 atspi_table_interface_init (AtspiTable *table)
74 atspi_text_interface_init (AtspiText *text)
79 atspi_value_interface_init (AtspiValue *value)
83 G_DEFINE_TYPE_WITH_CODE (AtspiAccessible, atspi_accessible, ATSPI_TYPE_OBJECT,
84 G_IMPLEMENT_INTERFACE (ATSPI_TYPE_ACTION, atspi_action_interface_init)
85 G_IMPLEMENT_INTERFACE (ATSPI_TYPE_COLLECTION, atspi_collection_interface_init)
86 G_IMPLEMENT_INTERFACE (ATSPI_TYPE_COMPONENT, atspi_component_interface_init)
87 G_IMPLEMENT_INTERFACE (ATSPI_TYPE_DOCUMENT, atspi_document_interface_init)
88 G_IMPLEMENT_INTERFACE (ATSPI_TYPE_EDITABLE_TEXT, atspi_editable_text_interface_init)
89 G_IMPLEMENT_INTERFACE (ATSPI_TYPE_HYPERTEXT, atspi_hypertext_interface_init)
90 G_IMPLEMENT_INTERFACE (ATSPI_TYPE_IMAGE, atspi_image_interface_init)
91 G_IMPLEMENT_INTERFACE (ATSPI_TYPE_SELECTION, atspi_selection_interface_init)
92 G_IMPLEMENT_INTERFACE (ATSPI_TYPE_TABLE, atspi_table_interface_init)
93 G_IMPLEMENT_INTERFACE (ATSPI_TYPE_TEXT, atspi_text_interface_init)
94 G_IMPLEMENT_INTERFACE (ATSPI_TYPE_VALUE, atspi_value_interface_init))
96 #ifdef DEBUG_REF_COUNTS
97 static gint accessible_count = 0;
101 atspi_accessible_init (AtspiAccessible *accessible)
103 #ifdef DEBUG_REF_COUNTS
105 printf("at-spi: init: %d objects\n", accessible_count);
110 atspi_accessible_dispose (GObject *object)
112 AtspiAccessible *accessible = ATSPI_ACCESSIBLE (object);
114 AtspiAccessible *parent;
116 /* TODO: Only fire if object not already marked defunct */
117 memset (&e, 0, sizeof (e));
118 e.type = "object:state-change:defunct";
119 e.source = accessible;
122 _atspi_send_event (&e);
124 if (accessible->states)
126 g_object_unref (accessible->states);
127 accessible->states = NULL;
130 parent = accessible->accessible_parent;
131 if (parent && parent->children)
133 GList*ls = g_list_find (parent->children, accessible);
136 gboolean replace = (ls == parent->children);
137 ls = g_list_remove (ls, accessible);
139 parent->children = ls;
140 g_object_unref (object);
146 g_object_unref (parent);
147 accessible->accessible_parent = NULL;
150 G_OBJECT_CLASS (atspi_accessible_parent_class) ->dispose (object);
154 atspi_accessible_finalize (GObject *object)
156 AtspiAccessible *accessible = ATSPI_ACCESSIBLE (object);
158 g_free (accessible->description);
159 g_free (accessible->name);
161 #ifdef DEBUG_REF_COUNTS
163 printf("at-spi: finalize: %d objects\n", accessible_count);
166 G_OBJECT_CLASS (atspi_accessible_parent_class)
171 atspi_accessible_class_init (AtspiAccessibleClass *klass)
173 GObjectClass *object_class = G_OBJECT_CLASS (klass);
175 object_class->dispose = atspi_accessible_dispose;
176 object_class->finalize = atspi_accessible_finalize;
179 /* TODO: Generate following from spec? */
180 static const char *role_names [] =
238 "table-column-header",
240 "tear-off-menu-item",
270 "input method window"
273 #define MAX_ROLES (sizeof (role_names) / sizeof (char *))
276 * atspi_role_get_name
277 * @role: an #AtspiAccessibleRole object to query.
279 * Get a localizeable string that indicates the name of an #AtspiAccessibleRole.
280 * <em>DEPRECATED.</em>
282 * Returns: a localizable string name for an #AtspiAccessibleRole enumerated type.
285 atspi_role_get_name (AtspiRole role)
287 if (role < MAX_ROLES && role_names [(int) role])
289 return g_strdup (role_names [(int) role]);
293 return g_strdup ("");
298 * atspi_accessible_get_name:
299 * @obj: a pointer to the #AtspiAccessible object on which to operate.
301 * Get the name of an #AtspiAccessible object.
303 * Returns: a UTF-8 string indicating the name of the #AtspiAccessible object.
304 * or NULL on exception
307 atspi_accessible_get_name (AtspiAccessible *obj, GError **error)
309 g_return_val_if_fail (obj != NULL, g_strdup (""));
310 if (!_atspi_accessible_test_cache (obj, ATSPI_CACHE_NAME))
312 if (!_atspi_dbus_get_property (obj, atspi_interface_accessible, "Name", error,
314 return g_strdup ("");
315 _atspi_accessible_add_cache (obj, ATSPI_CACHE_NAME);
317 return g_strdup (obj->name);
321 * atspi_accessible_get_description:
322 * @obj: a pointer to the #AtspiAccessible object on which to operate.
324 * Get the description of an #AtspiAccessible object.
326 * Returns: a UTF-8 string describing the #AtspiAccessible object.
327 * or NULL on exception
330 atspi_accessible_get_description (AtspiAccessible *obj, GError **error)
332 g_return_val_if_fail (obj != NULL, g_strdup (""));
334 if (!_atspi_accessible_test_cache (obj, ATSPI_CACHE_DESCRIPTION))
336 if (!_atspi_dbus_get_property (obj, atspi_interface_accessible,
337 "Description", error, "s",
339 return g_strdup ("");
340 _atspi_accessible_add_cache (obj, ATSPI_CACHE_DESCRIPTION);
342 return g_strdup (obj->description);
345 const char *str_parent = "Parent";
348 * atspi_accessible_get_parent:
349 * @obj: a pointer to the #AtspiAccessible object to query.
351 * Get an #AtspiAccessible object's parent container.
353 * Returns: (transfer full): a pointer to the #AtspiAccessible object which
354 * contains the given #AtspiAccessible instance, or NULL if the @obj
355 * has no parent container.
359 atspi_accessible_get_parent (AtspiAccessible *obj, GError **error)
361 g_return_val_if_fail (obj != NULL, NULL);
363 if (obj->parent.app &&
364 !_atspi_accessible_test_cache (obj, ATSPI_CACHE_PARENT))
366 DBusMessage *message, *reply;
367 DBusMessageIter iter, iter_variant;
368 message = dbus_message_new_method_call (obj->parent.app->bus_name,
370 DBUS_INTERFACE_PROPERTIES, "Get");
373 dbus_message_append_args (message, DBUS_TYPE_STRING, &atspi_interface_accessible,
374 DBUS_TYPE_STRING, &str_parent,
376 reply = _atspi_dbus_send_with_reply_and_block (message, error);
379 if (strcmp (dbus_message_get_signature (reply), "v") != 0)
381 dbus_message_unref (reply);
384 dbus_message_iter_init (reply, &iter);
385 dbus_message_iter_recurse (&iter, &iter_variant);
386 obj->accessible_parent = _atspi_dbus_return_accessible_from_iter (&iter_variant);
387 dbus_message_unref (reply);
388 _atspi_accessible_add_cache (obj, ATSPI_CACHE_PARENT);
390 if (!obj->accessible_parent)
392 return g_object_ref (obj->accessible_parent);
396 * atspi_accessible_get_child_count:
397 * @obj: a pointer to the #AtspiAccessible object on which to operate.
399 * Get the number of children contained by an #AtspiAccessible object.
401 * Returns: a #long indicating the number of #AtspiAccessible children
402 * contained by an #AtspiAccessible object. or -1 on exception
406 atspi_accessible_get_child_count (AtspiAccessible *obj, GError **error)
408 g_return_val_if_fail (obj != NULL, -1);
410 if (!_atspi_accessible_test_cache (obj, ATSPI_CACHE_CHILDREN))
413 if (!_atspi_dbus_get_property (obj, atspi_interface_accessible,
414 "ChildCount", error, "i", &ret))
419 return g_list_length (obj->children);
423 * atspi_accessible_get_child_at_index:
424 * @obj: a pointer to the #AtspiAccessible object on which to operate.
425 * @child_index: a #long indicating which child is specified.
427 * Get the #AtspiAccessible child of an #AtspiAccessible object at a given index.
429 * Returns: (transfer full): a pointer to the #AtspiAccessible child object at
430 * index @child_index. or NULL on exception
433 atspi_accessible_get_child_at_index (AtspiAccessible *obj,
437 AtspiAccessible *child;
439 g_return_val_if_fail (obj != NULL, NULL);
441 if (!_atspi_accessible_test_cache (obj, ATSPI_CACHE_CHILDREN))
444 reply = _atspi_dbus_call_partial (obj, atspi_interface_accessible,
445 "GetChildAtIndex", error, "i",
447 return _atspi_dbus_return_accessible_from_message (reply);
450 child = g_list_nth_data (obj->children, child_index);
453 return g_object_ref (child);
457 * atspi_accessible_get_index_in_parent
458 * @obj: a pointer to the #AtspiAccessible object on which to operate.
460 * Get the index of an #AtspiAccessible object in its containing #AtspiAccessible.
462 * Returns: a #glong indicating the index of the #AtspiAccessible object
463 * in its parent (i.e. containing) #AtspiAccessible instance,
464 * or -1 if @obj has no containing parent or on exception.
467 atspi_accessible_get_index_in_parent (AtspiAccessible *obj, GError **error)
472 g_return_val_if_fail (obj != NULL, -1);
473 if (!obj->accessible_parent) return -1;
474 if (!_atspi_accessible_test_cache (obj->accessible_parent,
475 ATSPI_CACHE_CHILDREN))
477 dbus_uint32_t ret = -1;
478 _atspi_dbus_call (obj, atspi_interface_accessible,
479 "GetIndexInParent", NULL, "=>u", &ret);
483 l = obj->accessible_parent->children;
486 if (l->data == obj) return i;
497 } Accessibility_Relation;
500 * atspi_accessible_get_relation_set:
501 * @obj: a pointer to the #AtspiAccessible object on which to operate.
503 * Get the set of #AtspiRelation objects which describe this #AtspiAccessible object's
504 * relationships with other #AtspiAccessible objects.
506 * Returns: (element-type AtspiAccessible*) (transfer full): an array of
507 * #AtspiAccessibleRelation pointers. or NULL on exception
510 atspi_accessible_get_relation_set (AtspiAccessible *obj, GError **error)
513 DBusMessageIter iter, iter_array;
516 g_return_val_if_fail (obj != NULL, NULL);
518 reply = _atspi_dbus_call_partial (obj, atspi_interface_accessible, "GetRelationSet", error, "");
521 _ATSPI_DBUS_CHECK_SIG (reply, "a(ua(so))", error, NULL);
523 ret = g_array_new (TRUE, TRUE, sizeof (AtspiRelation *));
524 dbus_message_iter_init (reply, &iter);
525 dbus_message_iter_recurse (&iter, &iter_array);
526 while (dbus_message_iter_get_arg_type (&iter_array) != DBUS_TYPE_INVALID)
528 AtspiRelation *relation;
529 relation = _atspi_relation_new_from_iter (&iter_array);
530 ret = g_array_append_val (ret, relation);
531 dbus_message_iter_next (&iter_array);
533 dbus_message_unref (reply);
538 * atspi_accessible_get_role:
539 * @obj: a pointer to the #AtspiAccessible object on which to operate.
541 * Get the UI role of an #AtspiAccessible object.
542 * A UTF-8 string describing this role can be obtained via atspi_accessible_getRoleName ().
544 * Returns: the #AtspiRole of the object.
548 atspi_accessible_get_role (AtspiAccessible *obj, GError **error)
550 g_return_val_if_fail (obj != NULL, ATSPI_ROLE_INVALID);
552 if (!_atspi_accessible_test_cache (obj, ATSPI_CACHE_ROLE))
555 /* TODO: Make this a property */
556 if (_atspi_dbus_call (obj, atspi_interface_accessible, "GetRole", error, "=>u", &role))
559 _atspi_accessible_add_cache (obj, ATSPI_CACHE_ROLE);
566 * atspi_accessible_get_role_name:
567 * @obj: a pointer to the #AtspiAccessible object on which to operate.
569 * Get a UTF-8 string describing the role this object plays in the UI.
570 * This method will return useful values for roles that fall outside the
571 * enumeration used in atspi_accessible_getRole ().
573 * Returns: a UTF-8 string specifying the role of this #AtspiAccessible object.
577 atspi_accessible_get_role_name (AtspiAccessible *obj, GError **error)
581 g_return_val_if_fail (obj != NULL, NULL);
583 _atspi_dbus_call (obj, atspi_interface_accessible, "GetRoleName", error, "=>s", &retval);
586 retval = g_strdup ("");
592 * atspi_accessible_get_localized_role_name:
593 * @obj: a pointer to the #AtspiAccessible object on which to operate.
595 * Get a UTF-8 string describing the (localized) role this object plays in the UI.
596 * This method will return useful values for roles that fall outside the
597 * enumeration used in atspi_accessible_getRole ().
599 * Returns: a UTF-8 string specifying the role of this #AtspiAccessible object.
603 atspi_accessible_get_localized_role_name (AtspiAccessible *obj, GError **error)
607 g_return_val_if_fail (obj != NULL, NULL);
609 _atspi_dbus_call (obj, atspi_interface_accessible, "GetLocalizedRoleName", error, "=>s", &retval);
612 return g_strdup ("");
617 static AtspiStateSet *
620 AtspiStateSet *set = atspi_state_set_new (NULL);
621 atspi_state_set_add (set, ATSPI_STATE_DEFUNCT);
626 * atspi_accessible_get_state_set:
627 * @obj: a pointer to the #AtspiAccessible object on which to operate.
629 * Gets the current state of an object.
631 * Returns: (transfer full): a pointer to an #AtspiStateSet representing the
632 * object's current state.
635 atspi_accessible_get_state_set (AtspiAccessible *obj)
637 if (!obj->parent.app || !obj->parent.app->bus)
638 return defunct_set ();
641 if (!_atspi_accessible_test_cache (obj, ATSPI_CACHE_STATES))
644 DBusMessageIter iter;
645 reply = _atspi_dbus_call_partial (obj, atspi_interface_accessible,
646 "GetState", NULL, "");
647 _ATSPI_DBUS_CHECK_SIG (reply, "au", NULL, defunct_set ());
648 dbus_message_iter_init (reply, &iter);
649 _atspi_dbus_set_state (obj, &iter);
650 dbus_message_unref (reply);
651 _atspi_accessible_add_cache (obj, ATSPI_CACHE_STATES);
654 return g_object_ref (obj->states);
658 * atspi_accessible_get_attributes:
659 * @obj: The #AtspiAccessible being queried.
661 * Get the #AttributeSet representing any assigned
662 * name-value pair attributes or annotations for this object.
663 * For typographic, textual, or textually-semantic attributes, see
664 * atspi_text_get_attributes instead.
666 * Returns: (element-type gchar* gchar*) (transfer full): The name-value-pair
667 * attributes assigned to this object.
670 atspi_accessible_get_attributes (AtspiAccessible *obj, GError **error)
672 DBusMessage *message;
674 g_return_val_if_fail (obj != NULL, NULL);
676 message = _atspi_dbus_call_partial (obj, atspi_interface_accessible, "GetAttributes", error, "");
677 return _atspi_dbus_return_hash_from_message (message);
681 * atspi_accessible_get_attributes_as_array:
682 * @obj: The #AtspiAccessible being queried.
684 * Get the #AttributeSet representing any assigned
685 * name-value pair attributes or annotations for this object.
686 * For typographic, textual, or textually-semantic attributes, see
687 * atspi_text_get_attributes_as_array instead.
689 * Returns: (element-type gchar*) (transfer full): The name-value-pair
690 * attributes assigned to this object.
693 atspi_accessible_get_attributes_as_array (AtspiAccessible *obj, GError **error)
695 DBusMessage *message;
697 g_return_val_if_fail (obj != NULL, NULL);
699 message = _atspi_dbus_call_partial (obj, atspi_interface_accessible, "GetAttributes", error, "");
700 return _atspi_dbus_return_attribute_array_from_message (message);
704 * atspi_accessible_get_application:
705 * @obj: The #AtspiAccessible being queried.
707 * Get the containing #AtspiApplication for an object.
709 * Returns: (transfer full): the containing AtspiApplication instance for
713 atspi_accessible_get_application (AtspiAccessible *obj, GError **error)
715 AtspiAccessible *parent;
720 parent = atspi_accessible_get_parent (obj, NULL);
721 if (!parent && obj->parent.app &&
722 atspi_accessible_get_role (obj, NULL) != ATSPI_ROLE_APPLICATION)
724 AtspiAccessible *root = g_object_ref (obj->parent.app->root);
727 g_object_unref (obj);
728 if (atspi_accessible_get_role (root, NULL) == ATSPI_ROLE_DESKTOP_FRAME)
730 g_object_unref (root);
736 if (!parent || parent == obj ||
737 atspi_accessible_get_role (parent, NULL) == ATSPI_ROLE_DESKTOP_FRAME)
739 g_object_unref (obj);
744 /* Application-specific methods */
747 * atspi_accessible_get_toolkit_name:
748 * @obj: a pointer to the #AtspiAccessible object on which to operate.
750 * Get the toolkit for a #AtspiAccessible object.
751 * Only works on application root objects.
753 * Returns: a UTF-8 string indicating the toolkit name for the #AtspiAccessible object.
754 * or NULL on exception
757 atspi_accessible_get_toolkit_name (AtspiAccessible *obj, GError **error)
761 g_return_val_if_fail (obj != NULL, NULL);
763 if (!_atspi_dbus_get_property (obj, atspi_interface_application, "ToolkitName", error, "s", &ret))
769 * atspi_accessible_get_toolkit_version:
770 * @obj: a pointer to the #AtspiAccessible object on which to operate.
772 * Get the toolkit version for a #AtspiAccessible object.
773 * Only works on application root objects.
775 * Returns: a UTF-8 string indicating the toolkit ersion for the #AtspiAccessible object.
776 * or NULL on exception
779 atspi_accessible_get_toolkit_version (AtspiAccessible *obj, GError **error)
783 g_return_val_if_fail (obj != NULL, NULL);
785 if (!_atspi_dbus_get_property (obj, atspi_interface_application, "Version", error, "s", &ret))
791 * atspi_accessible_get_atspi_version:
792 * @obj: a pointer to the #AtspiAccessible object on which to operate.
794 * Get the AT-SPI IPC specification version supported by the application
795 * pointed to by the #AtspiAccessible object.
796 * Only works on application root objects.
798 * Returns: a UTF-8 string indicating the AT-SPI ersion for the #AtspiAccessible object.
799 * or NULL on exception
802 atspi_accessible_get_atspi_version (AtspiAccessible *obj, GError **error)
806 g_return_val_if_fail (obj != NULL, NULL);
808 if (!_atspi_dbus_get_property (obj, atspi_interface_application, "AtspiVersion", error, "s", &ret))
814 * atspi_accessible_get_toolkit_version:
815 * @obj: a pointer to the #AtspiAccessible object on which to operate.
817 * Get the application id for a #AtspiAccessible object.
818 * Only works on application root objects.
820 * Returns: a gint indicating the id for the #AtspiAccessible object.
824 atspi_accessible_get_id (AtspiAccessible *obj, GError **error)
828 g_return_val_if_fail (obj != NULL, -1);
830 if (!_atspi_dbus_get_property (obj, atspi_interface_application, "Id", error, "i", &ret))
836 /* Interface query methods */
839 _atspi_accessible_is_a (AtspiAccessible *accessible,
840 const char *interface_name)
844 if (accessible == NULL)
849 if (!_atspi_accessible_test_cache (accessible, ATSPI_CACHE_INTERFACES))
852 DBusMessageIter iter;
853 reply = _atspi_dbus_call_partial (accessible, atspi_interface_accessible,
854 "GetInterfaces", NULL, "");
855 _ATSPI_DBUS_CHECK_SIG (reply, "as", NULL, FALSE);
856 dbus_message_iter_init (reply, &iter);
857 _atspi_dbus_set_interfaces (accessible, &iter);
858 dbus_message_unref (reply);
859 _atspi_accessible_add_cache (accessible, ATSPI_CACHE_INTERFACES);
862 n = _atspi_get_iface_num (interface_name);
863 if (n == -1) return FALSE;
864 return (gboolean) ((accessible->interfaces & (1 << n))? TRUE: FALSE);
868 * atspi_accessible_is_action:
869 * @obj: a pointer to the #AtspiAccessible instance to query.
871 * Query whether the specified #AtspiAccessible implements #AtspiAction.
873 * Returns: #TRUE if @obj implements the #AtspiAction interface,
877 atspi_accessible_is_action (AtspiAccessible *obj)
879 return _atspi_accessible_is_a (obj,
880 atspi_interface_action);
884 * atspi_accessible_is_application:
885 * @obj: a pointer to the #AtspiAccessible instance to query.
887 * Query whether the specified #AtspiAccessible implements #AtspiApplication.
889 * Returns: #TRUE if @obj implements the #AtspiApplication interface,
893 atspi_accessible_is_application (AtspiAccessible *obj)
895 return _atspi_accessible_is_a (obj,
896 atspi_interface_application);
900 * atspi_accessible_is_collection: * @obj: a pointer to the #AtspiAccessible instance to query.
902 * Query whether the specified #AtspiAccessible implements #AtspiCollection.
903 * Returns: #TRUE if @obj implements the #AtspiCollection interface,
907 atspi_accessible_is_collection (AtspiAccessible *obj)
909 return _atspi_accessible_is_a (obj,
910 atspi_interface_collection);
914 * atspi_accessible_is_component:
915 * @obj: a pointer to the #AtspiAccessible instance to query.
917 * Query whether the specified #AtspiAccessible implements #AtspiComponent.
919 * Returns: #TRUE if @obj implements the #AtspiComponent interface,
923 atspi_accessible_is_component (AtspiAccessible *obj)
925 return _atspi_accessible_is_a (obj,
926 atspi_interface_component);
930 * atspi_accessible_is_document:
931 * @obj: a pointer to the #AtspiAccessible instance to query.
933 * Query whether the specified #AtspiAccessible implements #AtspiDocument.
935 * Returns: #TRUE if @obj implements the #AtspiDocument interface,
939 atspi_accessible_is_document (AtspiAccessible *obj)
941 return _atspi_accessible_is_a (obj,
942 atspi_interface_document);
946 * atspi_accessible_is_editable_text:
947 * @obj: a pointer to the #AtspiAccessible instance to query.
949 * Query whether the specified #AtspiAccessible implements #AtspiEditableText.
951 * Returns: #TRUE if @obj implements the #AtspiEditableText interface,
955 atspi_accessible_is_editable_text (AtspiAccessible *obj)
957 return _atspi_accessible_is_a (obj,
958 atspi_interface_editable_text);
962 * atspi_accessible_is_hypertext:
963 * @obj: a pointer to the #AtspiAccessible instance to query.
965 * Query whether the specified #AtspiAccessible implements #AtspiHypertext.
967 * Returns: #TRUE if @obj implements the #AtspiHypertext interface,
971 atspi_accessible_is_hypertext (AtspiAccessible *obj)
973 return _atspi_accessible_is_a (obj,
974 atspi_interface_hypertext);
978 * atspi_accessible_is_hyperlink:
979 * @obj: a pointer to the #AtspiAccessible instance to query.
981 * Query whether the specified #AtspiAccessible implements #AtspiHyperlink.
983 * Returns: #TRUE if @obj implements the #AtspiHypertext interface,
987 atspi_accessible_is_hyperlink (AtspiAccessible *obj)
989 return _atspi_accessible_is_a (obj,
990 atspi_interface_hyperlink);
994 * atspi_accessible_is_image:
995 * @obj: a pointer to the #AtspiAccessible instance to query.
997 * Query whether the specified #AtspiAccessible implements #AtspiImage.
999 * Returns: #TRUE if @obj implements the #AtspiImage interface,
1003 atspi_accessible_is_image (AtspiAccessible *obj)
1005 return _atspi_accessible_is_a (obj,
1006 atspi_interface_image);
1010 * atspi_accessible_is_selection:
1011 * @obj: a pointer to the #AtspiAccessible instance to query.
1013 * Query whether the specified #AtspiAccessible implements #AtspiSelection.
1015 * Returns: #TRUE if @obj implements the #AtspiSelection interface,
1019 atspi_accessible_is_selection (AtspiAccessible *obj)
1021 return _atspi_accessible_is_a (obj,
1022 atspi_interface_selection);
1026 * atspi_accessible_is_table:
1027 * @obj: a pointer to the #AtspiAccessible instance to query.
1029 * Query whether the specified #AtspiAccessible implements #AtspiTable.
1031 * Returns: #TRUE if @obj implements the #AtspiTable interface,
1035 atspi_accessible_is_table (AtspiAccessible *obj)
1037 return _atspi_accessible_is_a (obj,
1038 atspi_interface_table);
1042 * atspi_accessible_is_streamable_content:
1043 * @obj: a pointer to the #AtspiAccessible instance to query.
1045 * Query whether the specified #AtspiAccessible implements
1046 * #AtspiStreamableContent.
1048 * Returns: #TRUE if @obj implements the #AtspiStreamableContent interface,
1052 atspi_accessible_is_streamable_content (AtspiAccessible *obj)
1055 return _atspi_accessible_is_a (obj,
1056 atspi_interface_streamable_content);
1058 g_warning ("Streamable content not implemented");
1064 * atspi_accessible_is_text:
1065 * @obj: a pointer to the #AtspiAccessible instance to query.
1067 * Query whether the specified #AtspiAccessible implements #AtspiText.
1069 * Returns: #TRUE if @obj implements the #AtspiText interface,
1073 atspi_accessible_is_text (AtspiAccessible *obj)
1075 return _atspi_accessible_is_a (obj,
1076 atspi_interface_text);
1080 * atspi_accessible_is_value:
1081 * @obj: a pointer to the #AtspiAccessible instance to query.
1083 * Query whether the specified #AtspiAccessible implements #AtspiValue.
1085 * Returns: #TRUE if @obj implements the #AtspiValue interface,
1089 atspi_accessible_is_value (AtspiAccessible *obj)
1091 return _atspi_accessible_is_a (obj,
1092 atspi_interface_value);
1096 * atspi_accessible_get_action:
1097 * @obj: a pointer to the #AtspiAccessible instance to query.
1099 * Get the #AtspiAction interface for an #AtspiAccessible.
1101 * Returns: (transfer full): a pointer to an #AtspiAction interface
1102 * instance, or NULL if @obj does not implement #AtspiAction.
1105 atspi_accessible_get_action (AtspiAccessible *accessible)
1107 return (_atspi_accessible_is_a (accessible, atspi_interface_action) ?
1108 g_object_ref (ATSPI_ACTION (accessible)) : NULL);
1112 * atspi_accessible_get_collection:
1113 * @obj: a pointer to the #AtspiAccessible instance to query.
1115 * Get the #AtspiCollection interface for an #AtspiAccessible.
1117 * Returns: (transfer full): a pointer to an #AtspiCollection interface
1118 * instance, or NULL if @obj does not implement #AtspiCollection.
1121 atspi_accessible_get_collection (AtspiAccessible *accessible)
1123 return (_atspi_accessible_is_a (accessible, atspi_interface_collection) ?
1124 g_object_ref (ATSPI_COLLECTION (accessible)) : NULL);
1128 * atspi_accessible_get_component:
1129 * @obj: a pointer to the #AtspiAccessible instance to query.
1131 * Get the #AtspiComponent interface for an #AtspiAccessible.
1133 * Returns: (transfer full): a pointer to an #AtspiComponent interface
1134 * instance, or NULL if @obj does not implement #AtspiComponent.
1137 atspi_accessible_get_component (AtspiAccessible *obj)
1139 return (_atspi_accessible_is_a (obj, atspi_interface_component) ?
1140 g_object_ref (ATSPI_COMPONENT (obj)) : NULL);
1144 * atspi_accessible_get_document:
1145 * @obj: a pointer to the #AtspiAccessible instance to query.
1147 * Get the #AtspiDocument interface for an #AtspiAccessible.
1149 * Returns: (transfer full): a pointer to an #AtspiDocument interface
1150 * instance, or NULL if @obj does not implement #AtspiDocument.
1153 atspi_accessible_get_document (AtspiAccessible *accessible)
1155 return (_atspi_accessible_is_a (accessible, atspi_interface_document) ?
1156 g_object_ref (ATSPI_DOCUMENT (accessible)) : NULL);
1160 * atspi_accessible_get_editable_text:
1161 * @obj: a pointer to the #AtspiAccessible instance to query.
1163 * Get the #AtspiEditableText interface for an #AtspiAccessible.
1165 * Returns: (transfer full): a pointer to an #AtspiEditableText interface
1166 * instance, or NULL if @obj does not implement #AtspiEditableText.
1169 atspi_accessible_get_editable_text (AtspiAccessible *accessible)
1171 return (_atspi_accessible_is_a (accessible, atspi_interface_editable_text) ?
1172 g_object_ref (ATSPI_EDITABLE_TEXT (accessible)) : NULL);
1176 * atspi_accessible_get_hyperlink:
1177 * @obj: a pointer to the #AtspiAccessible object on which to operate.
1179 * Get the #AtspiHyperlink associated with the given #AtspiAccessible, if
1182 * Returns: (transfer full): the #AtspiHyperlink object associated with
1183 * the given #AtspiAccessible, or NULL if not supported.
1186 atspi_accessible_get_hyperlink (AtspiAccessible *accessible)
1188 return (_atspi_accessible_is_a (accessible, atspi_interface_hyperlink) ?
1189 atspi_hyperlink_new (accessible->parent.app, accessible->parent.path) : NULL);
1193 * atspi_accessible_get_hypertext:
1194 * @obj: a pointer to the #AtspiAccessible instance to query.
1196 * Get the #AtspiHypertext interface for an #AtspiAccessible.
1198 * Returns: (transfer full): a pointer to an #AtspiHypertext interface
1199 * instance, or NULL if @obj does not implement #AtspiHypertext.
1202 atspi_accessible_get_hypertext (AtspiAccessible *accessible)
1204 return (_atspi_accessible_is_a (accessible, atspi_interface_hypertext) ?
1205 g_object_ref (ATSPI_HYPERTEXT (accessible)) : NULL);
1209 * atspi_accessible_get_image:
1210 * @obj: a pointer to the #AtspiAccessible instance to query.
1212 * Get the #AtspiImage interface for an #AtspiAccessible.
1214 * Returns: (transfer full): a pointer to an #AtspiImage interface instance, or
1215 * NULL if @obj does not implement #AtspiImage.
1218 atspi_accessible_get_image (AtspiAccessible *accessible)
1220 return (_atspi_accessible_is_a (accessible, atspi_interface_image) ?
1221 g_object_ref (ATSPI_IMAGE (accessible)) : NULL);
1225 * atspi_accessible_get_selection:
1226 * @obj: a pointer to the #AtspiAccessible instance to query.
1228 * Get the #AtspiSelection interface for an #AtspiAccessible.
1230 * Returns: (transfer full): a pointer to an #AtspiSelection interface
1231 * instance, or NULL if @obj does not implement #AtspiSelection.
1234 atspi_accessible_get_selection (AtspiAccessible *accessible)
1236 return (_atspi_accessible_is_a (accessible, atspi_interface_selection) ?
1237 g_object_ref (ATSPI_SELECTION (accessible)) : NULL);
1242 * atspi_accessible_get_streamable_content:
1243 * @obj: a pointer to the #AtspiAccessible instance to query.
1245 * Get the #AtspiStreamableContent interface for an #AtspiAccessible.
1247 * Returns: (transfer full): a pointer to an #AtspiStreamableContent interface
1248 * instance, or NULL if @obj does not implement #AtspiStreamableContent.
1250 AtspiStreamableContent *
1251 atspi_accessible_get_streamable_content (AtspiAccessible *accessible)
1253 return (_atspi_accessible_is_a (accessible, atspi_interface_streamable_content) ?
1259 * atspi_accessible_get_table:
1260 * @obj: a pointer to the #AtspiAccessible instance to query.
1262 * Get the #AtspiTable interface for an #AtspiAccessible.
1264 * Returns: (transfer full): a pointer to an #AtspiTable interface instance, or
1265 * NULL if @obj does not implement #AtspiTable.
1268 atspi_accessible_get_table (AtspiAccessible *obj)
1270 return (_atspi_accessible_is_a (obj, atspi_interface_table) ?
1271 g_object_ref (ATSPI_TABLE (obj)) : NULL);
1275 * atspi_accessible_get_text:
1276 * @obj: a pointer to the #AtspiAccessible instance to query.
1278 * Get the #AtspiTable interface for an #AtspiAccessible.
1280 * Returns: (transfer full): a pointer to an #AtspiText interface instance, or
1281 * NULL if @obj does not implement #AtspiText.
1284 atspi_accessible_get_text (AtspiAccessible *obj)
1286 return (_atspi_accessible_is_a (obj, atspi_interface_text) ?
1287 g_object_ref (ATSPI_TEXT (obj)) : NULL);
1291 * atspi_accessible_get_value:
1292 * @obj: a pointer to the #AtspiAccessible instance to query.
1294 * Get the #AtspiTable interface for an #AtspiAccessible.
1296 * Returns: (transfer full): a pointer to an #AtspiValue interface instance, or
1297 * NULL if @obj does not implement #AtspiValue.
1300 atspi_accessible_get_value (AtspiAccessible *accessible)
1302 return (_atspi_accessible_is_a (accessible, atspi_interface_value) ?
1303 g_object_ref (ATSPI_VALUE (accessible)) : NULL);
1307 append_const_val (GArray *array, const gchar *val)
1309 gchar *dup = g_strdup (val);
1312 g_array_append_val (array, dup);
1316 * atspi_accessible_get_interfaces:
1318 * #obj: The #AtspiAccessible to query.
1320 * Returns: (element-type gchar*) (transfer full): A #GArray of strings
1321 * describing the interfaces supported by the object. Interfaces are
1322 * denoted in short-hand (ie, "Component", "Text", etc.)
1325 atspi_accessible_get_interfaces (AtspiAccessible *obj)
1327 GArray *ret = g_array_new (TRUE, TRUE, sizeof (gchar *));
1329 g_return_val_if_fail (obj != NULL, NULL);
1331 append_const_val (ret, "Accessible");
1332 if (atspi_accessible_is_action (obj))
1333 append_const_val (ret, "Action");
1334 if (atspi_accessible_is_collection (obj))
1335 append_const_val (ret, "Collection");
1336 if (atspi_accessible_is_component (obj))
1337 append_const_val (ret, "Component");
1338 if (atspi_accessible_is_document (obj))
1339 append_const_val (ret, "Document");
1340 if (atspi_accessible_is_editable_text (obj))
1341 append_const_val (ret, "EditableText");
1342 if (atspi_accessible_is_hypertext (obj))
1343 append_const_val (ret, "Hypertext");
1344 if (atspi_accessible_is_hyperlink (obj))
1345 append_const_val (ret, "Hyperlink");
1346 if (atspi_accessible_is_image (obj))
1347 append_const_val (ret, "Image");
1348 if (atspi_accessible_is_selection (obj))
1349 append_const_val (ret, "Selection");
1350 if (atspi_accessible_is_table (obj))
1351 append_const_val (ret, "Table");
1352 if (atspi_accessible_is_text (obj))
1353 append_const_val (ret, "Text");
1354 if (atspi_accessible_is_value (obj))
1355 append_const_val (ret, "Value");
1361 atspi_accessible_new (AtspiApplication *app, const gchar *path)
1363 AtspiAccessible *accessible;
1365 accessible = g_object_new (ATSPI_TYPE_ACCESSIBLE, NULL);
1366 g_return_val_if_fail (accessible != NULL, NULL);
1368 accessible->parent.app = g_object_ref (app);
1369 accessible->parent.path = g_strdup (path);
1375 * atspi_accessible_set_cache_mask:
1377 * @accessible: The #AtspiAccessible to operate on. Must be the desktop or
1378 * the root of an application.
1379 * @mask: An #AtspiCache specifying a bit mask of the types of data to cache.
1381 * Sets the type of data to cache for accessibles.
1382 * If this is not set for an application or is reset to ATSPI_CACHE_UNDEFINED,
1383 * then the desktop's cache flag will be used.
1384 * If the desktop's cache flag is also undefined, then all possible data will
1386 * This function is intended to work around bugs in toolkits where the proper
1387 * events are not raised / to aid in testing for such bugs.
1390 atspi_accessible_set_cache_mask (AtspiAccessible *accessible, AtspiCache mask)
1392 g_return_if_fail (accessible != NULL);
1393 g_return_if_fail (accessible->parent.app != NULL);
1394 g_return_if_fail (accessible == accessible->parent.app->root);
1395 accessible->parent.app->cache = mask;
1399 * atspi_accessible_clear_cache:
1400 * @accessible: The #AtspiAccessible whose cache to clear.
1402 * Clears the cached information for the given accessible and all of its
1406 atspi_accessible_clear_cache (AtspiAccessible *accessible)
1412 accessible->cached_properties = ATSPI_CACHE_NONE;
1413 for (l = accessible->children; l; l = l->next)
1414 atspi_accessible_clear_cache (l->data);
1419 _atspi_accessible_get_cache_mask (AtspiAccessible *accessible)
1423 if (!accessible->parent.app)
1424 return ATSPI_CACHE_NONE;
1426 mask = accessible->parent.app->cache;
1427 if (mask == ATSPI_CACHE_UNDEFINED &&
1428 accessible->parent.app->root &&
1429 accessible->parent.app->root->accessible_parent)
1431 AtspiAccessible *desktop = atspi_get_desktop (0);
1432 mask = desktop->parent.app->cache;
1433 g_object_unref (desktop);
1436 if (mask == ATSPI_CACHE_UNDEFINED)
1437 mask = ATSPI_CACHE_ALL;
1443 _atspi_accessible_test_cache (AtspiAccessible *accessible, AtspiCache flag)
1445 AtspiCache mask = _atspi_accessible_get_cache_mask (accessible);
1446 AtspiCache result = accessible->cached_properties & mask & flag;
1447 return (result != 0 && atspi_main_loop && !atspi_no_cache);
1451 _atspi_accessible_add_cache (AtspiAccessible *accessible, AtspiCache flag)
1453 AtspiCache mask = _atspi_accessible_get_cache_mask (accessible);
1455 accessible->cached_properties |= flag & mask;