[gtk/matthiasc/for-master] a11y: Add more tests

[Matthias Clasen <matthiasc src gnome org>]

commit 37d4932b313b95c93410dc8e0cf01308b27ad757
Author: Matthias Clasen <mclasen redhat com>
Date:   Sun Oct 25 19:29:00 2020 -0400

    a11y: Add more tests
    
    Test some of the attributes that GTK maintains
    for every widget.

 testsuite/a11y/general.c   | 94 ++++++++++++++++++++++++++++++++++++++++++++++
 testsuite/a11y/meson.build |  1 +
 2 files changed, 95 insertions(+)
---
diff --git a/testsuite/a11y/general.c b/testsuite/a11y/general.c
new file mode 100644
index 0000000000..fe37d05632
--- /dev/null
+++ b/testsuite/a11y/general.c
@@ -0,0 +1,94 @@
+#include <gtk/gtk.h>
+
+/* Some of the accessible attributes are general enough
+ * that GTK maintains them for every widget. These tests
+ * are checking them.
+ */
+
+static void
+test_hidden (void)
+{
+  GtkWidget *widget;
+
+  widget = gtk_button_new ();
+  g_object_ref_sink (widget);
+
+  gtk_test_accessible_assert_state (widget, GTK_ACCESSIBLE_STATE_HIDDEN, FALSE);
+
+  gtk_widget_hide (widget);
+
+  gtk_test_accessible_assert_state (widget, GTK_ACCESSIBLE_STATE_HIDDEN, TRUE);
+
+  g_object_unref (widget);
+}
+
+static void
+test_disabled (void)
+{
+  GtkWidget *widget;
+
+  widget = gtk_expander_new ("");
+  g_object_ref_sink (widget);
+
+  gtk_test_accessible_assert_state (widget, GTK_ACCESSIBLE_STATE_DISABLED, FALSE);
+
+  gtk_widget_set_sensitive (widget, FALSE);
+
+  gtk_test_accessible_assert_state (widget, GTK_ACCESSIBLE_STATE_DISABLED, TRUE);
+
+  g_object_unref (widget);
+}
+
+static void
+test_orientation (void)
+{
+  GtkWidget *widget;
+
+  widget = gtk_scale_new (GTK_ORIENTATION_HORIZONTAL, NULL);
+  g_object_ref_sink (widget);
+
+  gtk_test_accessible_assert_property (widget, GTK_ACCESSIBLE_PROPERTY_ORIENTATION, 
GTK_ORIENTATION_HORIZONTAL);
+
+  gtk_orientable_set_orientation (GTK_ORIENTABLE (widget), GTK_ORIENTATION_VERTICAL);
+
+  gtk_test_accessible_assert_property (widget, GTK_ACCESSIBLE_PROPERTY_ORIENTATION, 
GTK_ORIENTATION_VERTICAL);
+
+  g_object_unref (widget);
+}
+
+static void
+test_labelled_by (void)
+{
+  GtkWidget *widget;
+  GtkWidget *label;
+  GList *list;
+
+  widget = gtk_switch_new ();
+  g_object_ref_sink (widget);
+
+  gtk_test_accessible_assert_relation (widget, GTK_ACCESSIBLE_RELATION_LABELLED_BY, NULL);
+
+  label = gtk_label_new ("Switch");
+  g_object_ref_sink (label);
+  gtk_widget_add_mnemonic_label (widget, label);
+
+  list = g_list_append (NULL, label);
+  gtk_test_accessible_assert_relation (widget, GTK_ACCESSIBLE_RELATION_LABELLED_BY, list);
+  g_list_free (list);
+
+  g_object_unref (widget);
+  g_object_unref (label);
+}
+
+int
+main (int argc, char *argv[])
+{
+  gtk_test_init (&argc, &argv, NULL);
+
+  g_test_add_func ("/a11y/general/hidden", test_hidden);
+  g_test_add_func ("/a11y/general/disabled", test_disabled);
+  g_test_add_func ("/a11y/general/orientation", test_orientation);
+  g_test_add_func ("/a11y/general/labelled-by", test_labelled_by);
+
+  return g_test_run ();
+}
diff --git a/testsuite/a11y/meson.build b/testsuite/a11y/meson.build
index d8471bc6fc..8ebfd032cd 100644
--- a/testsuite/a11y/meson.build
+++ b/testsuite/a11y/meson.build
@@ -17,6 +17,7 @@ tests = [
   { 'name': 'entry' },
   { 'name': 'expander' },
   { 'name': 'flowbox' },
+  { 'name': 'general' },
   { 'name': 'image' },
   { 'name': 'label' },
   { 'name': 'listbox' },