gtk2/modules/other/gail/tests/testtreetable.c
Christian Persch 9905ccfef3 Move the gail tests from standalone gail to gtk+. Bug #504568.
svn path=/trunk/; revision=19284
2007-12-28 20:23:14 +00:00

500 lines
16 KiB
C

#include <stdlib.h>
#include <testlib.h>
/*
* This module is for use with the test program testtreeview
*/
static gboolean state_change_watch (GSignalInvocationHint *ihint,
guint n_param_values,
const GValue *param_values,
gpointer data);
static void _check_table (AtkObject *in_obj);
static void _check_cell_actions (AtkObject *in_obj);
static gint _find_expander_column (AtkTable *table);
static void _check_expanders (AtkTable *table,
gint expander_column);
static void _runtest (AtkObject *obj);
static void _create_event_watcher (void);
static void row_inserted (AtkObject *obj,
gint row,
gint count);
static void row_deleted (AtkObject *obj,
gint row,
gint count);
static AtkObject *table_obj = NULL;
static gint expander_column = -1;
static gboolean editing_cell = FALSE;
static gboolean
state_change_watch (GSignalInvocationHint *ihint,
guint n_param_values,
const GValue *param_values,
gpointer data)
{
GObject *object;
gboolean state_set;
G_CONST_RETURN gchar *state_name;
AtkStateType state_type;
object = g_value_get_object (param_values + 0);
g_return_val_if_fail (ATK_IS_OBJECT (object), FALSE);
state_name = g_value_get_string (param_values + 1);
state_set = g_value_get_boolean (param_values + 2);
g_print ("Object type: %s state: %s set: %d\n",
g_type_name (G_OBJECT_TYPE (object)), state_name, state_set);
state_type = atk_state_type_for_name (state_name);
if (state_type == ATK_STATE_EXPANDED)
{
AtkObject *parent = atk_object_get_parent (ATK_OBJECT (object));
if (ATK_IS_TABLE (parent))
_check_expanders (ATK_TABLE (parent), expander_column);
}
return TRUE;
}
static void
_check_table (AtkObject *in_obj)
{
AtkObject *obj;
AtkRole role[2];
AtkRole obj_role;
static gboolean emission_hook_added = FALSE;
if (!emission_hook_added)
{
emission_hook_added = TRUE;
g_signal_add_emission_hook (
g_signal_lookup ("state-change", ATK_TYPE_OBJECT),
/*
* To specify an emission hook for a particular state, e.g.
* ATK_STATE_EXPANDED, instead of 0 use
* g_quark_from_string (atk_state_type_get_name (ATK_STATE_EXPANDED))
*/
0,
state_change_watch, NULL, (GDestroyNotify) NULL);
}
role[0] = ATK_ROLE_TABLE;
role[1] = ATK_ROLE_TREE_TABLE;
g_print ("focus event for: %s\n", g_type_name (G_OBJECT_TYPE (in_obj)));
_check_cell_actions (in_obj);
obj_role = atk_object_get_role (in_obj);
if (obj_role == ATK_ROLE_TABLE_CELL)
obj = atk_object_get_parent (in_obj);
else
obj = find_object_by_role (in_obj, role, 2);
if (obj == NULL)
return;
editing_cell = FALSE;
if (obj != table_obj)
{
table_obj = obj;
g_print("Found %s table\n", g_type_name (G_OBJECT_TYPE (obj)));
g_signal_connect (G_OBJECT (obj),
"row_inserted",
G_CALLBACK (row_inserted),
NULL);
g_signal_connect (G_OBJECT (obj),
"row_deleted",
G_CALLBACK (row_deleted),
NULL);
/*
* Find expander column
*/
if (ATK_IS_TABLE (obj))
{
if (atk_object_get_role (obj) == ATK_ROLE_TREE_TABLE)
{
expander_column = _find_expander_column (ATK_TABLE (obj));
if (expander_column == -1)
{
g_warning ("Expander column not found\n");
return;
}
}
_runtest(obj);
}
else
g_warning ("Table does not support AtkTable interface\n");
}
else
{
/*
* We do not call these functions at the same time as we set the
* signals as the GtkTreeView may not be displayed yet.
*/
gint x, y, width, height, first_x, last_x, last_y;
gint first_row, last_row, first_column, last_column;
gint index;
AtkObject *first_child, *last_child, *header;
AtkComponent *component = ATK_COMPONENT (obj);
AtkTable *table = ATK_TABLE (obj);
atk_component_get_extents (component,
&x, &y, &width, &height, ATK_XY_WINDOW);
g_print ("WINDOW: x: %d y: %d width: %d height: %d\n",
x, y, width, height);
atk_component_get_extents (component,
&x, &y, &width, &height, ATK_XY_SCREEN);
g_print ("SCREEN: x: %d y: %d width: %d height: %d\n",
x, y, width, height);
last_x = x + width - 1;
last_y = y + height - 1;
first_x = x;
header = atk_table_get_column_header (table, 0);
if (header)
{
atk_component_get_extents (ATK_COMPONENT (header),
&x, &y, &width, &height, ATK_XY_SCREEN);
g_print ("Got column header: x: %d y: %d width: %d height: %d\n",
x, y, width, height);
y += height;
}
first_child = atk_component_ref_accessible_at_point (component,
first_x, y, ATK_XY_SCREEN);
atk_component_get_extents (ATK_COMPONENT (first_child),
&x, &y, &width, &height, ATK_XY_SCREEN);
g_print ("first_child: x: %d y: %d width: %d height: %d\n",
x, y, width, height);
index = atk_object_get_index_in_parent (ATK_OBJECT (first_child));
first_row = atk_table_get_row_at_index (table, index);
first_column = atk_table_get_column_at_index (table, index);
g_print ("first_row: %d first_column: %d index: %d\n",
first_row, first_column, index);
g_assert (index == atk_table_get_index_at (table, first_row, first_column));
last_child = atk_component_ref_accessible_at_point (component,
last_x, last_y, ATK_XY_SCREEN);
if (last_child == NULL)
{
/* The TreeView may be bigger than the data */
gint n_children;
n_children = atk_object_get_n_accessible_children (obj);
last_child = atk_object_ref_accessible_child (obj, n_children - 1);
}
atk_component_get_extents (ATK_COMPONENT (last_child),
&x, &y, &width, &height, ATK_XY_SCREEN);
g_print ("last_child: x: %d y: %d width: %d height: %d\n",
x, y, width, height);
index = atk_object_get_index_in_parent (ATK_OBJECT (last_child));
last_row = atk_table_get_row_at_index (table, index);
last_column = atk_table_get_column_at_index (table, index);
g_print ("last_row: %d last_column: %d index: %d\n",
last_row, last_column, index);
g_assert (index == atk_table_get_index_at (table, last_row, last_column));
g_object_unref (first_child);
g_object_unref (last_child);
if (expander_column >= 0)
{
gint n_rows, i;
gint x, y, width, height;
n_rows = atk_table_get_n_rows (table);
for (i = 0; i < n_rows; i++)
{
AtkObject *child_obj;
AtkStateSet *state_set;
gboolean showing;
child_obj = atk_table_ref_at (table, i, expander_column);
state_set = atk_object_ref_state_set (child_obj);
showing = atk_state_set_contains_state (state_set,
ATK_STATE_SHOWING);
g_object_unref (state_set);
atk_component_get_extents (ATK_COMPONENT (child_obj),
&x, &y, &width, &height,
ATK_XY_SCREEN);
g_object_unref (child_obj);
if (showing)
g_print ("Row: %d Column: %d x: %d y: %d width: %d height: %d\n",
i, expander_column, x, y, width, height);
}
}
}
}
static void
_check_cell_actions (AtkObject *in_obj)
{
AtkRole role;
AtkAction *action;
gint n_actions, i;
role = atk_object_get_role (in_obj);
if (role != ATK_ROLE_TABLE_CELL)
return;
if (!ATK_IS_ACTION (in_obj))
return;
if (editing_cell)
return;
action = ATK_ACTION (in_obj);
n_actions = atk_action_get_n_actions (action);
for (i = 0; i < n_actions; i++)
{
G_CONST_RETURN gchar* name;
name = atk_action_get_name (action, i);
g_print ("Action %d is %s\n", i, name);
#if 0
if (strcmp (name, "edit") == 0)
{
editing_cell = TRUE;
atk_action_do_action (action, i);
}
#endif
}
return;
}
static gint
_find_expander_column (AtkTable *table)
{
gint n_columns, i;
gint retval = -1;
n_columns = atk_table_get_n_columns (table);
for (i = 0; i < n_columns; i++)
{
AtkObject *cell;
AtkRelationSet *relation_set;
cell = atk_table_ref_at (table, 0, i);
relation_set = atk_object_ref_relation_set (cell);
if (atk_relation_set_contains (relation_set,
ATK_RELATION_NODE_CHILD_OF))
retval = i;
g_object_unref (relation_set);
g_object_unref (cell);
if (retval >= 0)
break;
}
return retval;
}
static void
_check_expanders (AtkTable *table,
gint expander_column)
{
gint n_rows, i;
n_rows = atk_table_get_n_rows (table);
for (i = 0; i < n_rows; i++)
{
AtkObject *cell;
AtkRelationSet *relation_set;
AtkRelation *relation;
GPtrArray *target;
gint j;
cell = atk_table_ref_at (table, i, expander_column);
relation_set = atk_object_ref_relation_set (cell);
relation = atk_relation_set_get_relation_by_type (relation_set,
ATK_RELATION_NODE_CHILD_OF);
g_assert (relation);
target = atk_relation_get_target (relation);
g_assert (target->len == 1);
for (j = 0; j < target->len; j++)
{
AtkObject *target_obj;
AtkRole role;
gint target_index, target_row;
target_obj = g_ptr_array_index (target, j);
role = atk_object_get_role (target_obj);
switch (role)
{
case ATK_ROLE_TREE_TABLE:
g_print ("Row %d is top level\n", i);
break;
case ATK_ROLE_TABLE_CELL:
target_index = atk_object_get_index_in_parent (target_obj);
target_row = atk_table_get_row_at_index (table, target_index);
g_print ("Row %d has parent at %d\n", i, target_row);
break;
default:
g_assert_not_reached ();
}
}
g_object_unref (relation_set);
g_object_unref (cell);
}
}
static void
_create_event_watcher (void)
{
atk_add_focus_tracker (_check_table);
}
int
gtk_module_init (gint argc,
char *argv[])
{
g_print ("testtreetable Module loaded\n");
_create_event_watcher ();
return 0;
}
static void
_runtest (AtkObject *obj)
{
AtkObject *child_obj;
AtkTable *table;
AtkObject *caption;
gint i;
gint n_cols, n_rows, n_children;
table = ATK_TABLE (obj);
n_children = atk_object_get_n_accessible_children (ATK_OBJECT (obj));
n_cols = atk_table_get_n_columns (table);
n_rows = atk_table_get_n_rows (table);
g_print ("n_children: %d n_rows: %d n_cols: %d\n",
n_children, n_rows, n_cols);
for (i = 0; i < n_rows; i++)
{
gint index = atk_table_get_index_at (table, i, expander_column);
gint index_in_parent;
child_obj = atk_table_ref_at (table, i, expander_column);
index_in_parent = atk_object_get_index_in_parent (child_obj);
g_print ("index: %d %d row %d column %d\n", index, index_in_parent, i, expander_column);
g_object_unref (child_obj);
}
caption = atk_table_get_caption (table);
if (caption)
{
const gchar *caption_name = atk_object_get_name (caption);
g_print ("Caption: %s\n", caption_name ? caption_name : "<null>");
}
for (i = 0; i < n_cols; i++)
{
AtkObject *header;
header = atk_table_get_column_header (table, i);
g_print ("Header for column %d is %p\n", i, header);
if (header)
{
const gchar *name;
AtkRole role;
AtkObject *parent;
AtkObject *child;
gint index;
name = atk_object_get_name (header);
role = atk_object_get_role (header);
parent = atk_object_get_parent (header);
if (parent)
{
index = atk_object_get_index_in_parent (header);
g_print ("Parent: %s index: %d\n", G_OBJECT_TYPE_NAME (parent), index);
child = atk_object_ref_accessible_child (parent, 0);
g_print ("Child: %s %p\n", G_OBJECT_TYPE_NAME (child), child);
if (index >= 0)
{
child = atk_object_ref_accessible_child (parent, index);
g_print ("Index: %d child: %s\n", index, G_OBJECT_TYPE_NAME (child));
g_object_unref (child);
}
}
else
g_print ("Parent of header is NULL\n");
g_print ("%s %s %s\n", G_OBJECT_TYPE_NAME (header), name ? name: "<null>", atk_role_get_name (role));
}
}
}
static void
row_inserted (AtkObject *obj,
gint row,
gint count)
{
#if 0
GtkWidget *widget;
GtkTreeView *tree_view;
GtkTreeModel *tree_model;
#endif
gint index;
g_print ("row_inserted: row: %d count: %d\n", row, count);
index = atk_table_get_index_at (ATK_TABLE (obj), row+1, 0);
g_print ("index for first column of next row is %d\n", index);
#if 0
widget = GTK_ACCESSIBLE (obj)->widget;
tree_view = GTK_TREE_VIEW (widget);
tree_model = gtk_tree_view_get_model (tree_view);
if (GTK_IS_TREE_STORE (tree_model))
{
GtkTreeStore *tree_store;
GtkTreePath *tree_path;
GtkTreeIter tree_iter;
tree_store = GTK_TREE_STORE (tree_model);
tree_path = gtk_tree_path_new_from_string ("3:0");
gtk_tree_model_get_iter (tree_model, &tree_iter, tree_path);
gtk_tree_path_free (tree_path);
gtk_tree_store_remove (tree_store, &tree_iter);
}
#endif
}
static void
row_deleted (AtkObject *obj,
gint row,
gint count)
{
#if 0
GtkWidget *widget;
GtkTreeView *tree_view;
GtkTreeModel *tree_model;
#endif
gint index;
g_print ("row_deleted: row: %d count: %d\n", row, count);
index = atk_table_get_index_at (ATK_TABLE (obj), row+1, 0);
g_print ("index for first column of next row is %d\n", index);
#if 0
widget = GTK_ACCESSIBLE (obj)->widget;
tree_view = GTK_TREE_VIEW (widget);
tree_model = gtk_tree_view_get_model (tree_view);
if (GTK_IS_TREE_STORE (tree_model))
{
GtkTreeStore *tree_store;
GtkTreePath *tree_path;
GtkTreeIter tree_iter, new_iter;
tree_store = GTK_TREE_STORE (tree_model);
tree_path = gtk_tree_path_new_from_string ("2");
gtk_tree_model_get_iter (tree_model, &tree_iter, tree_path);
gtk_tree_path_free (tree_path);
gtk_tree_store_insert_before (tree_store, &new_iter, NULL, &tree_iter);
}
#endif
}