forked from AuroraMiddleware/gtk
500 lines
16 KiB
C
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
|
||
|
|
}
|