forked from AuroraMiddleware/gtk
9052f6dafe
Now that GtkATContext is explicitly realized and unrealized, we should always create an instance at widget initialization time, and drop it during the widget finalization. This should make it easier to set up the initial accessible state of a widget during the instance initialization, as well as reduce the chances of accidental creation of GtkATContext instances during the destruction sequence.
1196 lines
36 KiB
C
1196 lines
36 KiB
C
/* gtkatcontext.c: Assistive technology context
|
|
*
|
|
* Copyright 2020 GNOME Foundation
|
|
*
|
|
* SPDX-License-Identifier: LGPL-2.1-or-later
|
|
*
|
|
* This library is free software; you can redistribute it and/or
|
|
* modify it under the terms of the GNU Lesser General Public
|
|
* License as published by the Free Software Foundation; either
|
|
* version 2.1 of the License, or (at your option) any later version.
|
|
*
|
|
* This library is distributed in the hope that it will be useful,
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
|
* Lesser General Public License for more details.
|
|
*
|
|
* You should have received a copy of the GNU Lesser General Public
|
|
* License along with this library; if not, see <http://www.gnu.org/licenses/>.
|
|
*/
|
|
|
|
/**
|
|
* SECTION:gtkatcontext
|
|
* @Title: GtkATContext
|
|
* @Short_description: An object communicating to Assistive Technologies
|
|
*
|
|
* GtkATContext is an abstract class provided by GTK to communicate to
|
|
* platform-specific assistive technologies API.
|
|
*
|
|
* Each platform supported by GTK implements a #GtkATContext subclass, and
|
|
* is responsible for updating the accessible state in response to state
|
|
* changes in #GtkAccessible.
|
|
*/
|
|
|
|
#include "config.h"
|
|
|
|
#include "gtkatcontextprivate.h"
|
|
|
|
#include "gtkaccessiblevalueprivate.h"
|
|
#include "gtkaccessibleprivate.h"
|
|
#include "gtkdebug.h"
|
|
#include "gtktestatcontextprivate.h"
|
|
#include "gtktypebuiltins.h"
|
|
|
|
#if defined(GDK_WINDOWING_X11) || defined(GDK_WINDOWING_WAYLAND)
|
|
#include "a11y/gtkatspicontextprivate.h"
|
|
#endif
|
|
|
|
G_DEFINE_ABSTRACT_TYPE (GtkATContext, gtk_at_context, G_TYPE_OBJECT)
|
|
|
|
enum
|
|
{
|
|
PROP_ACCESSIBLE_ROLE = 1,
|
|
PROP_ACCESSIBLE,
|
|
PROP_DISPLAY,
|
|
|
|
N_PROPS
|
|
};
|
|
|
|
enum
|
|
{
|
|
STATE_CHANGE,
|
|
|
|
LAST_SIGNAL
|
|
};
|
|
|
|
static GParamSpec *obj_props[N_PROPS];
|
|
|
|
static guint obj_signals[LAST_SIGNAL];
|
|
|
|
static void
|
|
gtk_at_context_finalize (GObject *gobject)
|
|
{
|
|
GtkATContext *self = GTK_AT_CONTEXT (gobject);
|
|
|
|
gtk_accessible_attribute_set_unref (self->properties);
|
|
gtk_accessible_attribute_set_unref (self->relations);
|
|
gtk_accessible_attribute_set_unref (self->states);
|
|
|
|
G_OBJECT_CLASS (gtk_at_context_parent_class)->finalize (gobject);
|
|
}
|
|
|
|
static void
|
|
gtk_at_context_dispose (GObject *gobject)
|
|
{
|
|
GtkATContext *self = GTK_AT_CONTEXT (gobject);
|
|
|
|
gtk_at_context_unrealize (self);
|
|
|
|
G_OBJECT_CLASS (gtk_at_context_parent_class)->dispose (gobject);
|
|
}
|
|
|
|
static void
|
|
gtk_at_context_set_property (GObject *gobject,
|
|
guint prop_id,
|
|
const GValue *value,
|
|
GParamSpec *pspec)
|
|
{
|
|
GtkATContext *self = GTK_AT_CONTEXT (gobject);
|
|
|
|
switch (prop_id)
|
|
{
|
|
case PROP_ACCESSIBLE_ROLE:
|
|
if (!self->realized)
|
|
self->accessible_role = g_value_get_enum (value);
|
|
else
|
|
g_critical ("The accessible role cannot be set on a realized AT context");
|
|
break;
|
|
|
|
case PROP_ACCESSIBLE:
|
|
self->accessible = g_value_get_object (value);
|
|
break;
|
|
|
|
case PROP_DISPLAY:
|
|
gtk_at_context_set_display (self, g_value_get_object (value));
|
|
break;
|
|
|
|
default:
|
|
G_OBJECT_WARN_INVALID_PROPERTY_ID (gobject, prop_id, pspec);
|
|
}
|
|
}
|
|
|
|
static void
|
|
gtk_at_context_get_property (GObject *gobject,
|
|
guint prop_id,
|
|
GValue *value,
|
|
GParamSpec *pspec)
|
|
{
|
|
GtkATContext *self = GTK_AT_CONTEXT (gobject);
|
|
|
|
switch (prop_id)
|
|
{
|
|
case PROP_ACCESSIBLE_ROLE:
|
|
g_value_set_enum (value, self->accessible_role);
|
|
break;
|
|
|
|
case PROP_ACCESSIBLE:
|
|
g_value_set_object (value, self->accessible);
|
|
break;
|
|
|
|
case PROP_DISPLAY:
|
|
g_value_set_object (value, self->display);
|
|
break;
|
|
|
|
default:
|
|
G_OBJECT_WARN_INVALID_PROPERTY_ID (gobject, prop_id, pspec);
|
|
}
|
|
}
|
|
|
|
static void
|
|
gtk_at_context_real_state_change (GtkATContext *self,
|
|
GtkAccessibleStateChange changed_states,
|
|
GtkAccessiblePropertyChange changed_properties,
|
|
GtkAccessibleRelationChange changed_relations,
|
|
GtkAccessibleAttributeSet *states,
|
|
GtkAccessibleAttributeSet *properties,
|
|
GtkAccessibleAttributeSet *relations)
|
|
{
|
|
}
|
|
|
|
static void
|
|
gtk_at_context_real_platform_change (GtkATContext *self,
|
|
GtkAccessiblePlatformChange change)
|
|
{
|
|
}
|
|
|
|
static void
|
|
gtk_at_context_real_bounds_change (GtkATContext *self)
|
|
{
|
|
}
|
|
|
|
static void
|
|
gtk_at_context_real_child_change (GtkATContext *self,
|
|
GtkAccessibleChildChange change,
|
|
GtkAccessible *child)
|
|
{
|
|
}
|
|
|
|
static void
|
|
gtk_at_context_real_realize (GtkATContext *self)
|
|
{
|
|
}
|
|
|
|
static void
|
|
gtk_at_context_real_unrealize (GtkATContext *self)
|
|
{
|
|
}
|
|
|
|
static void
|
|
gtk_at_context_class_init (GtkATContextClass *klass)
|
|
{
|
|
GObjectClass *gobject_class = G_OBJECT_CLASS (klass);
|
|
|
|
gobject_class->set_property = gtk_at_context_set_property;
|
|
gobject_class->get_property = gtk_at_context_get_property;
|
|
gobject_class->dispose = gtk_at_context_dispose;
|
|
gobject_class->finalize = gtk_at_context_finalize;
|
|
|
|
klass->realize = gtk_at_context_real_realize;
|
|
klass->unrealize = gtk_at_context_real_unrealize;
|
|
klass->state_change = gtk_at_context_real_state_change;
|
|
klass->platform_change = gtk_at_context_real_platform_change;
|
|
klass->bounds_change = gtk_at_context_real_bounds_change;
|
|
klass->child_change = gtk_at_context_real_child_change;
|
|
|
|
/**
|
|
* GtkATContext:accessible-role:
|
|
*
|
|
* The accessible role used by the AT context.
|
|
*
|
|
* Depending on the given role, different states and properties can be
|
|
* set or retrieved.
|
|
*/
|
|
obj_props[PROP_ACCESSIBLE_ROLE] =
|
|
g_param_spec_enum ("accessible-role",
|
|
"Accessible Role",
|
|
"The accessible role of the AT context",
|
|
GTK_TYPE_ACCESSIBLE_ROLE,
|
|
GTK_ACCESSIBLE_ROLE_NONE,
|
|
G_PARAM_READWRITE |
|
|
G_PARAM_CONSTRUCT |
|
|
G_PARAM_STATIC_STRINGS);
|
|
|
|
/**
|
|
* GtkATContext:accessible:
|
|
*
|
|
* The #GtkAccessible that created the #GtkATContext instance.
|
|
*/
|
|
obj_props[PROP_ACCESSIBLE] =
|
|
g_param_spec_object ("accessible",
|
|
"Accessible",
|
|
"The accessible implementation",
|
|
GTK_TYPE_ACCESSIBLE,
|
|
G_PARAM_READWRITE |
|
|
G_PARAM_CONSTRUCT_ONLY |
|
|
G_PARAM_STATIC_STRINGS);
|
|
|
|
/**
|
|
* GtkATContext:display:
|
|
*
|
|
* The #GdkDisplay for the #GtkATContext.
|
|
*/
|
|
obj_props[PROP_DISPLAY] =
|
|
g_param_spec_object ("display",
|
|
"Display",
|
|
"The display connection",
|
|
GDK_TYPE_DISPLAY,
|
|
G_PARAM_READWRITE |
|
|
G_PARAM_STATIC_STRINGS |
|
|
G_PARAM_EXPLICIT_NOTIFY);
|
|
|
|
/**
|
|
* GtkATContext::state-change:
|
|
* @self: the #GtkATContext
|
|
*
|
|
* Emitted when the attributes of the accessible for the
|
|
* #GtkATContext instance change.
|
|
*/
|
|
obj_signals[STATE_CHANGE] =
|
|
g_signal_new ("state-change",
|
|
G_TYPE_FROM_CLASS (gobject_class),
|
|
G_SIGNAL_RUN_FIRST,
|
|
0,
|
|
NULL, NULL,
|
|
NULL,
|
|
G_TYPE_NONE, 0);
|
|
|
|
g_object_class_install_properties (gobject_class, N_PROPS, obj_props);
|
|
}
|
|
|
|
#define N_PROPERTIES (GTK_ACCESSIBLE_PROPERTY_VALUE_TEXT + 1)
|
|
#define N_RELATIONS (GTK_ACCESSIBLE_RELATION_SET_SIZE + 1)
|
|
#define N_STATES (GTK_ACCESSIBLE_STATE_SELECTED + 1)
|
|
|
|
static const char *property_attrs[] = {
|
|
[GTK_ACCESSIBLE_PROPERTY_AUTOCOMPLETE] = "autocomplete",
|
|
[GTK_ACCESSIBLE_PROPERTY_DESCRIPTION] = "description",
|
|
[GTK_ACCESSIBLE_PROPERTY_HAS_POPUP] = "haspopup",
|
|
[GTK_ACCESSIBLE_PROPERTY_KEY_SHORTCUTS] = "keyshortcuts",
|
|
[GTK_ACCESSIBLE_PROPERTY_LABEL] = "label",
|
|
[GTK_ACCESSIBLE_PROPERTY_LEVEL] = "level",
|
|
[GTK_ACCESSIBLE_PROPERTY_MODAL] = "modal",
|
|
[GTK_ACCESSIBLE_PROPERTY_MULTI_LINE] = "multiline",
|
|
[GTK_ACCESSIBLE_PROPERTY_MULTI_SELECTABLE] = "multiselectable",
|
|
[GTK_ACCESSIBLE_PROPERTY_ORIENTATION] = "orientation",
|
|
[GTK_ACCESSIBLE_PROPERTY_PLACEHOLDER] = "placeholder",
|
|
[GTK_ACCESSIBLE_PROPERTY_READ_ONLY] = "readonly",
|
|
[GTK_ACCESSIBLE_PROPERTY_REQUIRED] = "required",
|
|
[GTK_ACCESSIBLE_PROPERTY_ROLE_DESCRIPTION] = "roledescription",
|
|
[GTK_ACCESSIBLE_PROPERTY_SORT] = "sort",
|
|
[GTK_ACCESSIBLE_PROPERTY_VALUE_MAX] = "valuemax",
|
|
[GTK_ACCESSIBLE_PROPERTY_VALUE_MIN] = "valuemin",
|
|
[GTK_ACCESSIBLE_PROPERTY_VALUE_NOW] = "valuenow",
|
|
[GTK_ACCESSIBLE_PROPERTY_VALUE_TEXT] = "valuetext",
|
|
};
|
|
|
|
/*< private >
|
|
* gtk_accessible_property_get_attribute_name:
|
|
* @property: a #GtkAccessibleProperty
|
|
*
|
|
* Retrieves the name of a #GtkAccessibleProperty.
|
|
*
|
|
* Returns: (transfer none): the name of the accessible property
|
|
*/
|
|
const char *
|
|
gtk_accessible_property_get_attribute_name (GtkAccessibleProperty property)
|
|
{
|
|
g_return_val_if_fail (property >= GTK_ACCESSIBLE_PROPERTY_AUTOCOMPLETE &&
|
|
property <= GTK_ACCESSIBLE_PROPERTY_VALUE_TEXT,
|
|
"<none>");
|
|
|
|
return property_attrs[property];
|
|
}
|
|
|
|
static const char *relation_attrs[] = {
|
|
[GTK_ACCESSIBLE_RELATION_ACTIVE_DESCENDANT] = "activedescendant",
|
|
[GTK_ACCESSIBLE_RELATION_COL_COUNT] = "colcount",
|
|
[GTK_ACCESSIBLE_RELATION_COL_INDEX] = "colindex",
|
|
[GTK_ACCESSIBLE_RELATION_COL_INDEX_TEXT] = "colindextext",
|
|
[GTK_ACCESSIBLE_RELATION_COL_SPAN] = "colspan",
|
|
[GTK_ACCESSIBLE_RELATION_CONTROLS] = "controls",
|
|
[GTK_ACCESSIBLE_RELATION_DESCRIBED_BY] = "describedby",
|
|
[GTK_ACCESSIBLE_RELATION_DETAILS] = "details",
|
|
[GTK_ACCESSIBLE_RELATION_ERROR_MESSAGE] = "errormessage",
|
|
[GTK_ACCESSIBLE_RELATION_FLOW_TO] = "flowto",
|
|
[GTK_ACCESSIBLE_RELATION_LABELLED_BY] = "labelledby",
|
|
[GTK_ACCESSIBLE_RELATION_OWNS] = "owns",
|
|
[GTK_ACCESSIBLE_RELATION_POS_IN_SET] = "posinset",
|
|
[GTK_ACCESSIBLE_RELATION_ROW_COUNT] = "rowcount",
|
|
[GTK_ACCESSIBLE_RELATION_ROW_INDEX] = "rowindex",
|
|
[GTK_ACCESSIBLE_RELATION_ROW_INDEX_TEXT] = "rowindextext",
|
|
[GTK_ACCESSIBLE_RELATION_ROW_SPAN] = "rowspan",
|
|
[GTK_ACCESSIBLE_RELATION_SET_SIZE] = "setsize",
|
|
};
|
|
|
|
/*< private >
|
|
* gtk_accessible_relation_get_attribute_name:
|
|
* @relation: a #GtkAccessibleRelation
|
|
*
|
|
* Retrieves the name of a #GtkAccessibleRelation.
|
|
*
|
|
* Returns: (transfer none): the name of the accessible relation
|
|
*/
|
|
const char *
|
|
gtk_accessible_relation_get_attribute_name (GtkAccessibleRelation relation)
|
|
{
|
|
g_return_val_if_fail (relation >= GTK_ACCESSIBLE_RELATION_ACTIVE_DESCENDANT &&
|
|
relation <= GTK_ACCESSIBLE_RELATION_SET_SIZE,
|
|
"<none>");
|
|
|
|
return relation_attrs[relation];
|
|
}
|
|
|
|
static const char *state_attrs[] = {
|
|
[GTK_ACCESSIBLE_STATE_BUSY] = "busy",
|
|
[GTK_ACCESSIBLE_STATE_CHECKED] = "checked",
|
|
[GTK_ACCESSIBLE_STATE_DISABLED] = "disabled",
|
|
[GTK_ACCESSIBLE_STATE_EXPANDED] = "expanded",
|
|
[GTK_ACCESSIBLE_STATE_HIDDEN] = "hidden",
|
|
[GTK_ACCESSIBLE_STATE_INVALID] = "invalid",
|
|
[GTK_ACCESSIBLE_STATE_PRESSED] = "pressed",
|
|
[GTK_ACCESSIBLE_STATE_SELECTED] = "selected",
|
|
};
|
|
|
|
/*< private >
|
|
* gtk_accessible_state_get_attribute_name:
|
|
* @state: a #GtkAccessibleState
|
|
*
|
|
* Retrieves the name of a #GtkAccessibleState.
|
|
*
|
|
* Returns: (transfer none): the name of the accessible state
|
|
*/
|
|
const char *
|
|
gtk_accessible_state_get_attribute_name (GtkAccessibleState state)
|
|
{
|
|
g_return_val_if_fail (state >= GTK_ACCESSIBLE_STATE_BUSY &&
|
|
state <= GTK_ACCESSIBLE_STATE_SELECTED,
|
|
"<none>");
|
|
|
|
return state_attrs[state];
|
|
}
|
|
|
|
static void
|
|
gtk_at_context_init (GtkATContext *self)
|
|
{
|
|
self->accessible_role = GTK_ACCESSIBLE_ROLE_NONE;
|
|
|
|
self->properties =
|
|
gtk_accessible_attribute_set_new (G_N_ELEMENTS (property_attrs),
|
|
property_attrs,
|
|
(GtkAccessibleAttributeDefaultFunc) gtk_accessible_value_get_default_for_property);
|
|
self->relations =
|
|
gtk_accessible_attribute_set_new (G_N_ELEMENTS (relation_attrs),
|
|
relation_attrs,
|
|
(GtkAccessibleAttributeDefaultFunc) gtk_accessible_value_get_default_for_relation);
|
|
self->states =
|
|
gtk_accessible_attribute_set_new (G_N_ELEMENTS (state_attrs),
|
|
state_attrs,
|
|
(GtkAccessibleAttributeDefaultFunc) gtk_accessible_value_get_default_for_state);
|
|
}
|
|
|
|
/**
|
|
* gtk_at_context_get_accessible:
|
|
* @self: a #GtkATContext
|
|
*
|
|
* Retrieves the #GtkAccessible using this context.
|
|
*
|
|
* Returns: (transfer none): a #GtkAccessible
|
|
*/
|
|
GtkAccessible *
|
|
gtk_at_context_get_accessible (GtkATContext *self)
|
|
{
|
|
g_return_val_if_fail (GTK_IS_AT_CONTEXT (self), NULL);
|
|
|
|
return self->accessible;
|
|
}
|
|
|
|
/*< private >
|
|
* gtk_at_context_set_accessible_role:
|
|
* @self: a #GtkATContext
|
|
* @role: the accessible role for the context
|
|
*
|
|
* Sets the accessible role for the given #GtkATContext.
|
|
*
|
|
* This function can only be called if the #GtkATContext is unrealized.
|
|
*/
|
|
void
|
|
gtk_at_context_set_accessible_role (GtkATContext *self,
|
|
GtkAccessibleRole role)
|
|
{
|
|
g_return_if_fail (GTK_IS_AT_CONTEXT (self));
|
|
g_return_if_fail (!self->realized);
|
|
|
|
if (self->accessible_role == role)
|
|
return;
|
|
|
|
self->accessible_role = role;
|
|
|
|
g_object_notify_by_pspec (G_OBJECT (self), obj_props[PROP_ACCESSIBLE_ROLE]);
|
|
}
|
|
|
|
/**
|
|
* gtk_at_context_get_accessible_role:
|
|
* @self: a #GtkATContext
|
|
*
|
|
* Retrieves the accessible role of this context.
|
|
*
|
|
* Returns: a #GtkAccessibleRole
|
|
*/
|
|
GtkAccessibleRole
|
|
gtk_at_context_get_accessible_role (GtkATContext *self)
|
|
{
|
|
g_return_val_if_fail (GTK_IS_AT_CONTEXT (self), GTK_ACCESSIBLE_ROLE_NONE);
|
|
|
|
return self->accessible_role;
|
|
}
|
|
|
|
/*< private >
|
|
* gtk_at_context_set_display:
|
|
* @self: a #GtkATContext
|
|
* @display: a #GdkDisplay
|
|
*
|
|
* Sets the #GdkDisplay used by the #GtkATContext.
|
|
*
|
|
* This function can only be called if the #GtkATContext is
|
|
* not realized.
|
|
*/
|
|
void
|
|
gtk_at_context_set_display (GtkATContext *self,
|
|
GdkDisplay *display)
|
|
{
|
|
g_return_if_fail (GTK_IS_AT_CONTEXT (self));
|
|
g_return_if_fail (display == NULL || GDK_IS_DISPLAY (display));
|
|
|
|
if (self->display == display)
|
|
return;
|
|
|
|
if (self->realized)
|
|
return;
|
|
|
|
self->display = display;
|
|
|
|
g_object_notify_by_pspec (G_OBJECT (self), obj_props[PROP_DISPLAY]);
|
|
}
|
|
|
|
/*< private >
|
|
* gtk_at_context_get_display:
|
|
* @self: a #GtkATContext
|
|
*
|
|
* Retrieves the #GdkDisplay used to create the context.
|
|
*
|
|
* Returns: (transfer none): a #GdkDisplay
|
|
*/
|
|
GdkDisplay *
|
|
gtk_at_context_get_display (GtkATContext *self)
|
|
{
|
|
g_return_val_if_fail (GTK_IS_AT_CONTEXT (self), NULL);
|
|
|
|
return self->display;
|
|
}
|
|
|
|
static const struct {
|
|
const char *name;
|
|
const char *env_name;
|
|
GtkATContext * (* create_context) (GtkAccessibleRole accessible_role,
|
|
GtkAccessible *accessible,
|
|
GdkDisplay *display);
|
|
} a11y_backends[] = {
|
|
#if defined(GDK_WINDOWING_WAYLAND)
|
|
{ "AT-SPI (Wayland)", "atspi", gtk_at_spi_create_context },
|
|
#endif
|
|
#if defined(GDK_WINDOWING_X11)
|
|
{ "AT-SPI (X11)", "atspi", gtk_at_spi_create_context },
|
|
#endif
|
|
{ "Test", "test", gtk_test_at_context_new },
|
|
{ NULL, NULL, NULL },
|
|
};
|
|
|
|
/**
|
|
* gtk_at_context_create: (constructor)
|
|
* @accessible_role: the accessible role used by the #GtkATContext
|
|
* @accessible: the #GtkAccessible implementation using the #GtkATContext
|
|
* @display: the #GdkDisplay used by the #GtkATContext
|
|
*
|
|
* Creates a new #GtkATContext instance for the given accessible role,
|
|
* accessible instance, and display connection.
|
|
*
|
|
* The #GtkATContext implementation being instantiated will depend on the
|
|
* platform.
|
|
*
|
|
* Returns: (nullable) (transfer full): the #GtkATContext
|
|
*/
|
|
GtkATContext *
|
|
gtk_at_context_create (GtkAccessibleRole accessible_role,
|
|
GtkAccessible *accessible,
|
|
GdkDisplay *display)
|
|
{
|
|
static const char *gtk_a11y_env;
|
|
|
|
if (gtk_a11y_env == NULL)
|
|
{
|
|
gtk_a11y_env = g_getenv ("GTK_A11Y");
|
|
if (gtk_a11y_env == NULL)
|
|
gtk_a11y_env = "0";
|
|
}
|
|
|
|
/* Short-circuit disabling the accessibility support */
|
|
if (g_ascii_strcasecmp (gtk_a11y_env, "none") == 0)
|
|
return NULL;
|
|
|
|
if (g_ascii_strcasecmp (gtk_a11y_env, "help") == 0)
|
|
{
|
|
g_print ("Supported arguments for GTK_A11Y environment variable:\n");
|
|
|
|
#if defined(GDK_WINDOWING_X11) || defined(GDK_WINDOWING_WAYLAND)
|
|
g_print (" atspi - Use the AT-SPI accessibility backend\n");
|
|
#endif
|
|
g_print (" test - Use the test accessibility backend\n");
|
|
g_print (" none - Disable the accessibility backend\n");
|
|
g_print (" help - Print this help\n\n");
|
|
g_print ("Other arguments will cause a warning and be ignored.\n");
|
|
}
|
|
|
|
GtkATContext *res = NULL;
|
|
|
|
for (guint i = 0; i < G_N_ELEMENTS (a11y_backends); i++)
|
|
{
|
|
if (a11y_backends[i].name == NULL)
|
|
break;
|
|
|
|
if (a11y_backends[i].create_context != NULL &&
|
|
(*gtk_a11y_env == '0' || g_ascii_strcasecmp (a11y_backends[i].env_name, gtk_a11y_env) == 0))
|
|
{
|
|
res = a11y_backends[i].create_context (accessible_role, accessible, display);
|
|
if (res != NULL)
|
|
break;
|
|
}
|
|
}
|
|
|
|
if (*gtk_a11y_env != '0' && res == NULL)
|
|
g_warning ("Unrecognized accessibility backend \"%s\". Try GTK_A11Y=help", gtk_a11y_env);
|
|
|
|
/* Fall back to the test context, so we can get debugging data */
|
|
if (res == NULL)
|
|
res = g_object_new (GTK_TYPE_TEST_AT_CONTEXT,
|
|
"accessible_role", accessible_role,
|
|
"accessible", accessible,
|
|
"display", display,
|
|
NULL);
|
|
|
|
return res;
|
|
}
|
|
|
|
/*< private >
|
|
* gtk_at_context_clone: (constructor)
|
|
* @self: the #GtkATContext to clone
|
|
* @role: the accessible role of the clone, or %GTK_ACCESSIBLE_ROLE_NONE to
|
|
* use the same accessible role of @self
|
|
* @accessible: (nullable): the accessible creating the context, or %NULL to
|
|
* use the same #GtkAccessible of @self
|
|
* @display: (nullable): the display connection, or %NULL to use the same
|
|
* #GdkDisplay of @self
|
|
*
|
|
* Clones the state of the given #GtkATContext, using @role, @accessible,
|
|
* and @display.
|
|
*
|
|
* If @self is realized, the returned #GtkATContext will also be realized.
|
|
*
|
|
* Returns: (transfer full): the newly created #GtkATContext
|
|
*/
|
|
GtkATContext *
|
|
gtk_at_context_clone (GtkATContext *self,
|
|
GtkAccessibleRole role,
|
|
GtkAccessible *accessible,
|
|
GdkDisplay *display)
|
|
{
|
|
g_return_val_if_fail (self == NULL || GTK_IS_AT_CONTEXT (self), NULL);
|
|
g_return_val_if_fail (accessible == NULL || GTK_IS_ACCESSIBLE (accessible), NULL);
|
|
g_return_val_if_fail (display == NULL || GDK_IS_DISPLAY (display), NULL);
|
|
|
|
if (self != NULL && role == GTK_ACCESSIBLE_ROLE_NONE)
|
|
role = self->accessible_role;
|
|
|
|
if (self != NULL && accessible == NULL)
|
|
accessible = self->accessible;
|
|
|
|
if (self != NULL && display == NULL)
|
|
display = self->display;
|
|
|
|
GtkATContext *res = gtk_at_context_create (role, accessible, display);
|
|
|
|
if (self != NULL)
|
|
{
|
|
g_clear_pointer (&res->states, gtk_accessible_attribute_set_unref);
|
|
g_clear_pointer (&res->properties, gtk_accessible_attribute_set_unref);
|
|
g_clear_pointer (&res->relations, gtk_accessible_attribute_set_unref);
|
|
|
|
res->states = gtk_accessible_attribute_set_ref (self->states);
|
|
res->properties = gtk_accessible_attribute_set_ref (self->properties);
|
|
res->relations = gtk_accessible_attribute_set_ref (self->relations);
|
|
|
|
if (self->realized)
|
|
gtk_at_context_realize (res);
|
|
}
|
|
|
|
return res;
|
|
}
|
|
|
|
gboolean
|
|
gtk_at_context_is_realized (GtkATContext *self)
|
|
{
|
|
return self->realized;
|
|
}
|
|
|
|
void
|
|
gtk_at_context_realize (GtkATContext *self)
|
|
{
|
|
if (self->realized)
|
|
return;
|
|
|
|
GTK_NOTE (A11Y, g_message ("Realizing AT context '%s'", G_OBJECT_TYPE_NAME (self)));
|
|
GTK_AT_CONTEXT_GET_CLASS (self)->realize (self);
|
|
|
|
self->realized = TRUE;
|
|
}
|
|
|
|
void
|
|
gtk_at_context_unrealize (GtkATContext *self)
|
|
{
|
|
if (!self->realized)
|
|
return;
|
|
|
|
GTK_NOTE (A11Y, g_message ("Unrealizing AT context '%s'", G_OBJECT_TYPE_NAME (self)));
|
|
GTK_AT_CONTEXT_GET_CLASS (self)->unrealize (self);
|
|
|
|
self->realized = FALSE;
|
|
}
|
|
|
|
/*< private >
|
|
* gtk_at_context_update:
|
|
* @self: a #GtkATContext
|
|
*
|
|
* Notifies the AT connected to this #GtkATContext that the accessible
|
|
* state and its properties have changed.
|
|
*/
|
|
void
|
|
gtk_at_context_update (GtkATContext *self)
|
|
{
|
|
g_return_if_fail (GTK_IS_AT_CONTEXT (self));
|
|
|
|
if (!self->realized)
|
|
return;
|
|
|
|
/* There's no point in notifying of state changes if there weren't any */
|
|
if (self->updated_properties == 0 &&
|
|
self->updated_relations == 0 &&
|
|
self->updated_states == 0)
|
|
return;
|
|
|
|
GtkAccessibleStateChange changed_states =
|
|
gtk_accessible_attribute_set_get_changed (self->states);
|
|
GtkAccessiblePropertyChange changed_properties =
|
|
gtk_accessible_attribute_set_get_changed (self->properties);
|
|
GtkAccessibleRelationChange changed_relations =
|
|
gtk_accessible_attribute_set_get_changed (self->relations);
|
|
|
|
GTK_AT_CONTEXT_GET_CLASS (self)->state_change (self,
|
|
changed_states, changed_properties, changed_relations,
|
|
self->states, self->properties, self->relations);
|
|
g_signal_emit (self, obj_signals[STATE_CHANGE], 0);
|
|
|
|
self->updated_properties = 0;
|
|
self->updated_relations = 0;
|
|
self->updated_states = 0;
|
|
}
|
|
|
|
/*< private >
|
|
* gtk_at_context_set_accessible_state:
|
|
* @self: a #GtkATContext
|
|
* @state: a #GtkAccessibleState
|
|
* @value: (nullable): #GtkAccessibleValue
|
|
*
|
|
* Sets the @value for the given @state of a #GtkATContext.
|
|
*
|
|
* If @value is %NULL, the state is unset.
|
|
*
|
|
* This function will accumulate state changes until gtk_at_context_update()
|
|
* is called.
|
|
*/
|
|
void
|
|
gtk_at_context_set_accessible_state (GtkATContext *self,
|
|
GtkAccessibleState state,
|
|
GtkAccessibleValue *value)
|
|
{
|
|
g_return_if_fail (GTK_IS_AT_CONTEXT (self));
|
|
|
|
gboolean res = FALSE;
|
|
|
|
if (value != NULL)
|
|
res = gtk_accessible_attribute_set_add (self->states, state, value);
|
|
else
|
|
res = gtk_accessible_attribute_set_remove (self->states, state);
|
|
|
|
if (res)
|
|
self->updated_states |= (1 << state);
|
|
}
|
|
|
|
/*< private >
|
|
* gtk_at_context_has_accessible_state:
|
|
* @self: a #GtkATContext
|
|
* @state: a #GtkAccessibleState
|
|
*
|
|
* Checks whether a #GtkATContext has the given @state set.
|
|
*
|
|
* Returns: %TRUE, if the accessible state is set
|
|
*/
|
|
gboolean
|
|
gtk_at_context_has_accessible_state (GtkATContext *self,
|
|
GtkAccessibleState state)
|
|
{
|
|
g_return_val_if_fail (GTK_IS_AT_CONTEXT (self), FALSE);
|
|
|
|
return gtk_accessible_attribute_set_contains (self->states, state);
|
|
}
|
|
|
|
/*< private >
|
|
* gtk_at_context_get_accessible_state:
|
|
* @self: a #GtkATContext
|
|
* @state: a #GtkAccessibleState
|
|
*
|
|
* Retrieves the value for the accessible state of a #GtkATContext.
|
|
*
|
|
* Returns: (transfer none): the value for the given state
|
|
*/
|
|
GtkAccessibleValue *
|
|
gtk_at_context_get_accessible_state (GtkATContext *self,
|
|
GtkAccessibleState state)
|
|
{
|
|
g_return_val_if_fail (GTK_IS_AT_CONTEXT (self), NULL);
|
|
|
|
return gtk_accessible_attribute_set_get_value (self->states, state);
|
|
}
|
|
|
|
/*< private >
|
|
* gtk_at_context_set_accessible_property:
|
|
* @self: a #GtkATContext
|
|
* @property: a #GtkAccessibleProperty
|
|
* @value: (nullable): #GtkAccessibleValue
|
|
*
|
|
* Sets the @value for the given @property of a #GtkATContext.
|
|
*
|
|
* If @value is %NULL, the property is unset.
|
|
*
|
|
* This function will accumulate property changes until gtk_at_context_update()
|
|
* is called.
|
|
*/
|
|
void
|
|
gtk_at_context_set_accessible_property (GtkATContext *self,
|
|
GtkAccessibleProperty property,
|
|
GtkAccessibleValue *value)
|
|
{
|
|
g_return_if_fail (GTK_IS_AT_CONTEXT (self));
|
|
|
|
gboolean res = FALSE;
|
|
|
|
if (value != NULL)
|
|
res = gtk_accessible_attribute_set_add (self->properties, property, value);
|
|
else
|
|
res = gtk_accessible_attribute_set_remove (self->properties, property);
|
|
|
|
if (res)
|
|
self->updated_properties |= (1 << property);
|
|
}
|
|
|
|
/*< private >
|
|
* gtk_at_context_has_accessible_property:
|
|
* @self: a #GtkATContext
|
|
* @property: a #GtkAccessibleProperty
|
|
*
|
|
* Checks whether a #GtkATContext has the given @property set.
|
|
*
|
|
* Returns: %TRUE, if the accessible property is set
|
|
*/
|
|
gboolean
|
|
gtk_at_context_has_accessible_property (GtkATContext *self,
|
|
GtkAccessibleProperty property)
|
|
{
|
|
g_return_val_if_fail (GTK_IS_AT_CONTEXT (self), FALSE);
|
|
|
|
return gtk_accessible_attribute_set_contains (self->properties, property);
|
|
}
|
|
|
|
/*< private >
|
|
* gtk_at_context_get_accessible_property:
|
|
* @self: a #GtkATContext
|
|
* @property: a #GtkAccessibleProperty
|
|
*
|
|
* Retrieves the value for the accessible property of a #GtkATContext.
|
|
*
|
|
* Returns: (transfer none): the value for the given property
|
|
*/
|
|
GtkAccessibleValue *
|
|
gtk_at_context_get_accessible_property (GtkATContext *self,
|
|
GtkAccessibleProperty property)
|
|
{
|
|
g_return_val_if_fail (GTK_IS_AT_CONTEXT (self), NULL);
|
|
|
|
return gtk_accessible_attribute_set_get_value (self->properties, property);
|
|
}
|
|
|
|
/*< private >
|
|
* gtk_at_context_set_accessible_relation:
|
|
* @self: a #GtkATContext
|
|
* @relation: a #GtkAccessibleRelation
|
|
* @value: (nullable): #GtkAccessibleValue
|
|
*
|
|
* Sets the @value for the given @relation of a #GtkATContext.
|
|
*
|
|
* If @value is %NULL, the relation is unset.
|
|
*
|
|
* This function will accumulate relation changes until gtk_at_context_update()
|
|
* is called.
|
|
*/
|
|
void
|
|
gtk_at_context_set_accessible_relation (GtkATContext *self,
|
|
GtkAccessibleRelation relation,
|
|
GtkAccessibleValue *value)
|
|
{
|
|
g_return_if_fail (GTK_IS_AT_CONTEXT (self));
|
|
|
|
gboolean res = FALSE;
|
|
|
|
if (value != NULL)
|
|
res = gtk_accessible_attribute_set_add (self->relations, relation, value);
|
|
else
|
|
res = gtk_accessible_attribute_set_remove (self->relations, relation);
|
|
|
|
if (res)
|
|
self->updated_relations |= (1 << relation);
|
|
}
|
|
|
|
/*< private >
|
|
* gtk_at_context_has_accessible_relation:
|
|
* @self: a #GtkATContext
|
|
* @relation: a #GtkAccessibleRelation
|
|
*
|
|
* Checks whether a #GtkATContext has the given @relation set.
|
|
*
|
|
* Returns: %TRUE, if the accessible relation is set
|
|
*/
|
|
gboolean
|
|
gtk_at_context_has_accessible_relation (GtkATContext *self,
|
|
GtkAccessibleRelation relation)
|
|
{
|
|
g_return_val_if_fail (GTK_IS_AT_CONTEXT (self), FALSE);
|
|
|
|
return gtk_accessible_attribute_set_contains (self->relations, relation);
|
|
}
|
|
|
|
/*< private >
|
|
* gtk_at_context_get_accessible_relation:
|
|
* @self: a #GtkATContext
|
|
* @relation: a #GtkAccessibleRelation
|
|
*
|
|
* Retrieves the value for the accessible relation of a #GtkATContext.
|
|
*
|
|
* Returns: (transfer none): the value for the given relation
|
|
*/
|
|
GtkAccessibleValue *
|
|
gtk_at_context_get_accessible_relation (GtkATContext *self,
|
|
GtkAccessibleRelation relation)
|
|
{
|
|
g_return_val_if_fail (GTK_IS_AT_CONTEXT (self), NULL);
|
|
|
|
return gtk_accessible_attribute_set_get_value (self->relations, relation);
|
|
}
|
|
|
|
static gboolean
|
|
is_structural_role (GtkAccessibleRole role)
|
|
{
|
|
/* Keep the switch small while avoiding the compiler warning for
|
|
* unhandled enumeration values
|
|
*/
|
|
switch ((int) role)
|
|
{
|
|
case GTK_ACCESSIBLE_ROLE_FORM:
|
|
case GTK_ACCESSIBLE_ROLE_GROUP:
|
|
case GTK_ACCESSIBLE_ROLE_GENERIC:
|
|
case GTK_ACCESSIBLE_ROLE_REGION:
|
|
return TRUE;
|
|
|
|
default:
|
|
break;
|
|
}
|
|
|
|
return FALSE;
|
|
}
|
|
|
|
/* See the WAI-ARIA § 4.3, "Accessible Name and Description Computation" */
|
|
static void
|
|
gtk_at_context_get_name_accumulate (GtkATContext *self,
|
|
GPtrArray *names,
|
|
gboolean recurse)
|
|
{
|
|
GtkAccessibleValue *value = NULL;
|
|
|
|
if (gtk_accessible_attribute_set_contains (self->properties, GTK_ACCESSIBLE_PROPERTY_LABEL))
|
|
{
|
|
value = gtk_accessible_attribute_set_get_value (self->properties, GTK_ACCESSIBLE_PROPERTY_LABEL);
|
|
|
|
g_ptr_array_add (names, (char *) gtk_string_accessible_value_get (value));
|
|
}
|
|
|
|
if (recurse && gtk_accessible_attribute_set_contains (self->relations, GTK_ACCESSIBLE_RELATION_LABELLED_BY))
|
|
{
|
|
value = gtk_accessible_attribute_set_get_value (self->relations, GTK_ACCESSIBLE_RELATION_LABELLED_BY);
|
|
|
|
GList *list = gtk_reference_list_accessible_value_get (value);
|
|
|
|
for (GList *l = list; l != NULL; l = l->next)
|
|
{
|
|
GtkAccessible *rel = GTK_ACCESSIBLE (l->data);
|
|
GtkATContext *rel_context = gtk_accessible_get_at_context (rel);
|
|
|
|
gtk_at_context_get_name_accumulate (rel_context, names, FALSE);
|
|
}
|
|
}
|
|
|
|
GtkAccessibleRole role = gtk_at_context_get_accessible_role (self);
|
|
|
|
switch ((int) role)
|
|
{
|
|
case GTK_ACCESSIBLE_ROLE_RANGE:
|
|
{
|
|
int range_attrs[] = {
|
|
GTK_ACCESSIBLE_PROPERTY_VALUE_TEXT,
|
|
GTK_ACCESSIBLE_PROPERTY_VALUE_NOW,
|
|
};
|
|
|
|
value = NULL;
|
|
for (int i = 0; i < G_N_ELEMENTS (range_attrs); i++)
|
|
{
|
|
if (gtk_accessible_attribute_set_contains (self->properties, range_attrs[i]))
|
|
{
|
|
value = gtk_accessible_attribute_set_get_value (self->properties, range_attrs[i]);
|
|
break;
|
|
}
|
|
}
|
|
|
|
if (value != NULL)
|
|
g_ptr_array_add (names, (char *) gtk_string_accessible_value_get (value));
|
|
}
|
|
break;
|
|
|
|
default:
|
|
break;
|
|
}
|
|
|
|
/* If there is no label or labelled-by attribute, hidden elements
|
|
* have no name
|
|
*/
|
|
if (gtk_accessible_attribute_set_contains (self->states, GTK_ACCESSIBLE_STATE_HIDDEN))
|
|
{
|
|
value = gtk_accessible_attribute_set_get_value (self->states, GTK_ACCESSIBLE_STATE_HIDDEN);
|
|
|
|
if (gtk_boolean_accessible_value_get (value))
|
|
return;
|
|
}
|
|
|
|
/* This fallback is in place only for unlabelled elements */
|
|
if (names->len != 0)
|
|
return;
|
|
|
|
/* Ignore structural elements, namely: generic containers */
|
|
if (self->accessible != NULL && !is_structural_role (role))
|
|
g_ptr_array_add (names, (char *)G_OBJECT_TYPE_NAME (self->accessible));
|
|
}
|
|
|
|
static void
|
|
gtk_at_context_get_description_accumulate (GtkATContext *self,
|
|
GPtrArray *labels,
|
|
gboolean recurse)
|
|
{
|
|
GtkAccessibleValue *value = NULL;
|
|
|
|
if (gtk_accessible_attribute_set_contains (self->properties, GTK_ACCESSIBLE_PROPERTY_DESCRIPTION))
|
|
{
|
|
value = gtk_accessible_attribute_set_get_value (self->properties, GTK_ACCESSIBLE_PROPERTY_DESCRIPTION);
|
|
|
|
g_ptr_array_add (labels, (char *) gtk_string_accessible_value_get (value));
|
|
}
|
|
|
|
if (recurse && gtk_accessible_attribute_set_contains (self->relations, GTK_ACCESSIBLE_RELATION_DESCRIBED_BY))
|
|
{
|
|
value = gtk_accessible_attribute_set_get_value (self->relations, GTK_ACCESSIBLE_RELATION_DESCRIBED_BY);
|
|
|
|
GList *list = gtk_reference_list_accessible_value_get (value);
|
|
|
|
for (GList *l = list; l != NULL; l = l->data)
|
|
{
|
|
GtkAccessible *rel = GTK_ACCESSIBLE (l->data);
|
|
GtkATContext *rel_context = gtk_accessible_get_at_context (rel);
|
|
|
|
gtk_at_context_get_description_accumulate (rel_context, labels, FALSE);
|
|
}
|
|
}
|
|
|
|
GtkAccessibleRole role = gtk_at_context_get_accessible_role (self);
|
|
|
|
switch ((int) role)
|
|
{
|
|
case GTK_ACCESSIBLE_ROLE_RANGE:
|
|
{
|
|
int range_attrs[] = {
|
|
GTK_ACCESSIBLE_PROPERTY_VALUE_TEXT,
|
|
GTK_ACCESSIBLE_PROPERTY_VALUE_NOW,
|
|
};
|
|
|
|
value = NULL;
|
|
for (int i = 0; i < G_N_ELEMENTS (range_attrs); i++)
|
|
{
|
|
if (gtk_accessible_attribute_set_contains (self->properties, range_attrs[i]))
|
|
{
|
|
value = gtk_accessible_attribute_set_get_value (self->properties, range_attrs[i]);
|
|
break;
|
|
}
|
|
}
|
|
|
|
if (value != NULL)
|
|
g_ptr_array_add (labels, (char *) gtk_string_accessible_value_get (value));
|
|
}
|
|
break;
|
|
|
|
default:
|
|
break;
|
|
}
|
|
|
|
/* If there is no description or described-by attribute, hidden elements
|
|
* have no description
|
|
*/
|
|
if (gtk_accessible_attribute_set_contains (self->states, GTK_ACCESSIBLE_STATE_HIDDEN))
|
|
{
|
|
value = gtk_accessible_attribute_set_get_value (self->states, GTK_ACCESSIBLE_STATE_HIDDEN);
|
|
|
|
if (gtk_boolean_accessible_value_get (value))
|
|
return;
|
|
}
|
|
}
|
|
|
|
/*< private >
|
|
* gtk_at_context_get_name:
|
|
* @self: a #GtkATContext
|
|
*
|
|
* Retrieves the accessible name of the #GtkATContext.
|
|
*
|
|
* This is a convenience function meant to be used by #GtkATContext implementations.
|
|
*
|
|
* Returns: (transfer full): the label of the #GtkATContext
|
|
*/
|
|
char *
|
|
gtk_at_context_get_name (GtkATContext *self)
|
|
{
|
|
g_return_val_if_fail (GTK_IS_AT_CONTEXT (self), NULL);
|
|
|
|
GPtrArray *names = g_ptr_array_new ();
|
|
|
|
gtk_at_context_get_name_accumulate (self, names, TRUE);
|
|
|
|
if (names->len == 0)
|
|
{
|
|
g_ptr_array_unref (names);
|
|
return g_strdup ("");
|
|
}
|
|
|
|
GString *res = g_string_new ("");
|
|
g_string_append (res, g_ptr_array_index (names, 0));
|
|
|
|
for (guint i = 1; i < names->len; i++)
|
|
{
|
|
g_string_append (res, " ");
|
|
g_string_append (res, g_ptr_array_index (names, i));
|
|
}
|
|
|
|
g_ptr_array_unref (names);
|
|
|
|
return g_string_free (res, FALSE);
|
|
}
|
|
|
|
/*< private >
|
|
* gtk_at_context_get_description:
|
|
* @self: a #GtkATContext
|
|
*
|
|
* Retrieves the accessible description of the #GtkATContext.
|
|
*
|
|
* This is a convenience function meant to be used by #GtkATContext implementations.
|
|
*
|
|
* Returns: (transfer full): the label of the #GtkATContext
|
|
*/
|
|
char *
|
|
gtk_at_context_get_description (GtkATContext *self)
|
|
{
|
|
g_return_val_if_fail (GTK_IS_AT_CONTEXT (self), NULL);
|
|
|
|
GPtrArray *names = g_ptr_array_new ();
|
|
|
|
gtk_at_context_get_description_accumulate (self, names, TRUE);
|
|
|
|
if (names->len == 0)
|
|
{
|
|
g_ptr_array_unref (names);
|
|
return g_strdup ("");
|
|
}
|
|
|
|
GString *res = g_string_new ("");
|
|
g_string_append (res, g_ptr_array_index (names, 0));
|
|
|
|
for (guint i = 1; i < names->len; i++)
|
|
{
|
|
g_string_append (res, " ");
|
|
g_string_append (res, g_ptr_array_index (names, i));
|
|
}
|
|
|
|
g_ptr_array_unref (names);
|
|
|
|
return g_string_free (res, FALSE);
|
|
}
|
|
|
|
void
|
|
gtk_at_context_platform_changed (GtkATContext *self,
|
|
GtkAccessiblePlatformChange change)
|
|
{
|
|
if (!self->realized)
|
|
return;
|
|
|
|
GTK_AT_CONTEXT_GET_CLASS (self)->platform_change (self, change);
|
|
}
|
|
|
|
void
|
|
gtk_at_context_bounds_changed (GtkATContext *self)
|
|
{
|
|
if (!self->realized)
|
|
return;
|
|
|
|
GTK_AT_CONTEXT_GET_CLASS (self)->bounds_change (self);
|
|
}
|
|
|
|
void
|
|
gtk_at_context_child_changed (GtkATContext *self,
|
|
GtkAccessibleChildChange change,
|
|
GtkAccessible *child)
|
|
{
|
|
if (!self->realized)
|
|
return;
|
|
|
|
GTK_AT_CONTEXT_GET_CLASS (self)->child_change (self, change, child);
|
|
}
|