Merge "test : enhance accessible state information" into tizen_4.0
[platform/upstream/at-spi2-core.git] / test / at_spi2_tool.c
1 #include "atspi/atspi.h"
2 #include <stdio.h>
3 #include <stdlib.h>
4 #include <string.h>
5 #include <getopt.h>
6 #include <stdbool.h>
7 #include <gio/gio.h>
8 #include <assert.h>
9 #include <stdint.h>
10
11 #define ERROR_STATE -1
12 #define SAFE_BUFFER_SIZE 2048
13 #define CHECK_OUTPUT_WIDTH 42
14 #define MINIMAL_MODULE_WIDTH 3
15 #define ATTR_WIDTH 50
16 #define NUMBER_WIDTH 6
17 #define ARRAY_SIZE(x)  (sizeof(x) / sizeof((x)[0]))
18 #define COLUMN_NO 3
19 #define FLAG_NO 3
20 #define DUMP 0
21 #define CHECK 1
22 #define FIRST_MATCH 2
23 #define RELATION_TABLE_COLUMN_COUNT 7
24 #define ATTRIBUTE_TABLE_COLUMN_COUNT 3
25 #define RELATION_TABLE_COLUMN_WIDTH 20
26 #define ATTRIBUTE_TABLE_BASE_COLUMN_WIDTH 20
27 #define VERSION "1.1"
28
29 static unsigned indent_width = 2;
30 static int module_name_limit = -1;
31
32 static const char* atspi_state_names[] = {
33         [ATSPI_STATE_INVALID] = "INVALID",
34         [ATSPI_STATE_ACTIVE] = "ACTIVE",
35         [ATSPI_STATE_ARMED] = "ARMED",
36         [ATSPI_STATE_BUSY] =  "BUSY",
37         [ATSPI_STATE_CHECKED] = "CHECKED",
38         [ATSPI_STATE_COLLAPSED] = "COLLAPSED",
39         [ATSPI_STATE_DEFUNCT] = "DEFUNCT",
40         [ATSPI_STATE_EDITABLE] = "EDITABLE",
41         [ATSPI_STATE_ENABLED] = "ENABLED",
42         [ATSPI_STATE_EXPANDABLE] = "EXPANDABLE",
43         [ATSPI_STATE_EXPANDED] = "EXPANDED",
44         [ATSPI_STATE_FOCUSABLE] = "FOCUSABLE",
45         [ATSPI_STATE_FOCUSED] = "FOCUSED",
46         [ATSPI_STATE_HAS_TOOLTIP] = "HAS_TOOLTIP",
47         [ATSPI_STATE_HORIZONTAL] = "HORIZONTAL",
48         [ATSPI_STATE_ICONIFIED] = "ICONIFIED",
49         [ATSPI_STATE_MULTI_LINE] = "MULTI_LINE",
50         [ATSPI_STATE_MULTISELECTABLE] = "MULTISELECTABLE",
51         [ATSPI_STATE_OPAQUE] = "OPAQUE",
52         [ATSPI_STATE_PRESSED] = "PRESSED",
53         [ATSPI_STATE_RESIZABLE] = "RESIZABLE",
54         [ATSPI_STATE_SELECTABLE] = "SELECTABLE",
55         [ATSPI_STATE_SELECTED] = "SELECTED",
56         [ATSPI_STATE_SENSITIVE] = "SENSITIVE",
57         [ATSPI_STATE_SHOWING] = "SHOWING",
58         [ATSPI_STATE_SINGLE_LINE] = "SINGLE_LINE",
59         [ATSPI_STATE_STALE] = "STALE",
60         [ATSPI_STATE_TRANSIENT] = "TRANSIENT",
61         [ATSPI_STATE_VERTICAL] = "VERTICAL",
62         [ATSPI_STATE_VISIBLE] = "VISIBLE",
63         [ATSPI_STATE_MANAGES_DESCENDANTS] = "MANAGES_DESCENDANTS",
64         [ATSPI_STATE_INDETERMINATE] = "INDETERMINATE",
65         [ATSPI_STATE_REQUIRED] = "REQUIRED",
66         [ATSPI_STATE_TRUNCATED] = "TRUNCATED",
67         [ATSPI_STATE_ANIMATED] = "ANIMATED",
68         [ATSPI_STATE_INVALID_ENTRY] = "INVALID_ENTRY",
69         [ATSPI_STATE_SUPPORTS_AUTOCOMPLETION] = "SUPPORTS_AUTOCOMPLETION",
70         [ATSPI_STATE_SELECTABLE_TEXT] = "SELECTABLE_TEXT",
71         [ATSPI_STATE_IS_DEFAULT] = "IS_DEFAULT",
72         [ATSPI_STATE_VISITED] = "VISITED",
73         [ATSPI_STATE_CHECKABLE] = "CHECKABLE",
74         [ATSPI_STATE_MODAL] = "MODAL",
75         [ATSPI_STATE_HIGHLIGHTED] = "HIGHLIGHTED",
76         [ATSPI_STATE_HIGHLIGHTABLE] = "HIGHLIGHTABLE",
77         [ATSPI_STATE_HAS_POPUP] = "HAS_POPUP",
78         [ATSPI_STATE_READ_ONLY] = "READ_ONLY",
79         [ATSPI_STATE_LAST_DEFINED] = "LAST_DEFINED"
80 };
81
82 typedef struct _Box_Size {
83         char *x;
84         char *y;
85         char *height;
86         char *width;
87 } Box_Size;
88
89 static char *_multiply_string(char c, unsigned number)
90 {
91         char *result = (char *)calloc(1, number + 1);
92
93         if (result == NULL)
94                 return result;
95
96         memset(result, c, number);
97
98         return result;
99 }
100
101 static void _print_module_legend()
102 {
103         printf("\n[[node],[node role name],[attributes list],[x,y,width,height],[node name],[states list][relations]\n\n");
104 }
105
106 static void _print_atspi_states_legend()
107 {
108         _print_module_legend();
109
110         int array_len = ARRAY_SIZE(atspi_state_names);
111         int line_count = (array_len + COLUMN_NO - 1)/COLUMN_NO;
112         for (int line_idx = 0; line_idx < line_count; line_idx++) {
113                 if ((line_idx < line_count - 1) || (array_len % COLUMN_NO == 0)) {
114                         printf("[%d]\t%-24s[%d]\t%-24s[%d]\t%s\n",
115                                         line_idx * COLUMN_NO,
116                                         atspi_state_names[line_idx * COLUMN_NO],
117                                         (line_idx * COLUMN_NO) + 1,
118                                         atspi_state_names[(line_idx * COLUMN_NO) + 1],
119                                         (line_idx * COLUMN_NO) + 2,
120                                         atspi_state_names[(line_idx * COLUMN_NO) + 2]);
121                 } else if (array_len % COLUMN_NO == 2) {
122                         printf("[%d]\t%-24s[%d]\t%s\n",
123                                         line_idx * COLUMN_NO,
124                                         atspi_state_names[line_idx * COLUMN_NO],
125                                         (line_idx * COLUMN_NO) + 1,
126                                         atspi_state_names[(line_idx * COLUMN_NO) + 1]);
127                 } else {
128                         printf("[%d]\t%s\n", line_idx * COLUMN_NO, atspi_state_names[line_idx * COLUMN_NO]);
129                 }
130         }
131 }
132
133 static void _set_indent(int indent_size)
134 {
135         if (indent_size < 0) {
136                 fprintf(stderr, "WARNING: Invalid indent size. Default value retained.\n");
137                 return;
138         }
139
140         indent_width = indent_size;
141 }
142
143 static void _set_module_length_limit(int limit)
144 {
145         if (limit < MINIMAL_MODULE_WIDTH) {
146                 fprintf(stderr, "WARNING: Invalid maximum field size. Default value retained.\n");
147                 return;
148         }
149
150         module_name_limit = limit;
151 }
152
153 static int _int_sort_function(gconstpointer a, gconstpointer b)
154 {
155         int int_a = GPOINTER_TO_INT (a);
156         int int_b = GPOINTER_TO_INT (b);
157
158         return int_a - int_b;
159 }
160
161 static void _truncate_string(char *string, int length_limit)
162 {
163         if (length_limit < MINIMAL_MODULE_WIDTH || !string)
164                 return;
165
166         int len = strlen(string);
167
168         if (len > length_limit)
169                 memcpy(string + length_limit - 3, "...", 4);
170 }
171
172 static size_t _combine_strings(char **destination, const char *source)
173 {
174         if (!source || !*source || !destination)
175                 return 0;
176
177         size_t old_len = *destination ? strlen(*destination) : 0;
178         size_t source_len = strlen(source);
179         size_t len = old_len + source_len;
180         char *buf = realloc(*destination, (len + 1) * sizeof(char));
181
182         if (!buf) {
183                 fprintf(stderr, "_combine_strings: allocation failed");
184                 return old_len;
185         }
186
187         memcpy(buf + old_len, source, source_len + 1);
188
189         *destination = buf;
190
191         return len;
192 }
193
194 static Box_Size *_get_box_size(AtspiAccessible *node)
195 {
196         Box_Size *box_size = (Box_Size *)malloc(sizeof(Box_Size));
197         if (box_size == NULL)
198                 return NULL;
199
200         char *x = NULL;
201         char *y = NULL;
202         char *width = NULL;
203         char *height = NULL;
204
205         AtspiComponent *component = atspi_accessible_get_component_iface(node);
206         AtspiRect *extent = component ? atspi_component_get_extents(component, ATSPI_COORD_TYPE_SCREEN, NULL) : NULL;
207
208         if (extent == NULL) {
209                 _combine_strings(&x, "_");
210                 _combine_strings(&y, "_");
211                 _combine_strings(&width, "_");
212                 _combine_strings(&height, "_");
213         } else {
214                 char temp_buff[NUMBER_WIDTH];
215
216                 snprintf(temp_buff, NUMBER_WIDTH, "%d", extent->x);
217                 _combine_strings(&x, temp_buff);
218
219                 snprintf(temp_buff, NUMBER_WIDTH, "%d", extent->y);
220                 _combine_strings(&y, temp_buff);
221
222                 snprintf(temp_buff, NUMBER_WIDTH, "%d", extent->width);
223                 _combine_strings(&width, temp_buff);
224
225                 snprintf(temp_buff, NUMBER_WIDTH, "%d", extent->height);
226                 _combine_strings(&height, temp_buff);
227
228                 g_object_unref(component);
229                 g_free(extent);
230         }
231
232         box_size->x = x;
233         box_size->y = y;
234         box_size->width = width;
235         box_size->height = height;
236
237         return box_size;
238 }
239
240 static char *_get_states(AtspiAccessible *node, int length_limit)
241 {
242         AtspiStateSet *node_state_set = atspi_accessible_get_state_set(node);
243         GArray *states = atspi_state_set_get_states(node_state_set);
244         if (!states) return NULL;
245         g_array_sort(states, _int_sort_function);
246
247         AtspiStateType state_type;
248         char *state_string = NULL;
249
250         for (int i = 0; i < states->len; i++) {
251                 state_type = g_array_index(states, AtspiStateType, i);
252
253                 char node_state_str[27] = "";
254                 strncat(node_state_str, "(", sizeof(node_state_str) - strlen(node_state_str) - 1);
255                 strncat(node_state_str, atspi_state_names[state_type], sizeof(node_state_str) - strlen(node_state_str) - 1);
256                 strncat(node_state_str, ")", sizeof(node_state_str) - strlen(node_state_str) - 1);
257
258                 _combine_strings(&state_string, node_state_str);
259         }
260
261         g_array_free(states, 0);
262         g_object_unref(node_state_set);
263
264         _truncate_string(state_string, length_limit);
265
266         return state_string;
267 }
268
269 static char *_get_attributes(AtspiAccessible *node, int length_limit, bool *attributes_are_too_long)
270 {
271         GHashTable *attributes = atspi_accessible_get_attributes(node, NULL);
272
273         if (!attributes)
274                 return NULL;
275
276         GHashTableIter attributes_iter;
277         gpointer attr_key;
278         gpointer attr_value;
279         g_hash_table_iter_init (&attributes_iter, attributes);
280         char *result = NULL;
281         while (g_hash_table_iter_next (&attributes_iter, &attr_key, &attr_value)) {
282                 char attributes_string[SAFE_BUFFER_SIZE];
283                 int ret = snprintf(attributes_string, SAFE_BUFFER_SIZE, "(%s=%s)", (char *)attr_key, (char *)attr_value);
284                 if (ret >= SAFE_BUFFER_SIZE)
285                         fprintf(stderr, "\n%s, %s %d: generated string is too long. Buffer overflow\n", __FILE__, __FUNCTION__, __LINE__);
286
287                 _combine_strings(&result, attributes_string);
288         }
289         g_hash_table_unref(attributes);
290
291         int real_truncate_size = (length_limit < ATTR_WIDTH && length_limit > MINIMAL_MODULE_WIDTH) ? length_limit : ATTR_WIDTH;
292         if (result && attributes_are_too_long && strlen(result) > real_truncate_size)
293                 *attributes_are_too_long = true;
294
295         _truncate_string(result, real_truncate_size);
296         return result;
297 }
298
299 static char *_get_info(AtspiAccessible *node, int length_limit, bool *attributes_are_too_long, bool *app_has_relations)
300 {
301         if (!node)
302                 return NULL;
303
304         char *node_name = atspi_accessible_get_name(node, NULL);
305         char *node_role_name = atspi_accessible_get_role_name(node, NULL);
306         char *unique_id = atspi_accessible_get_unique_id(node, NULL);
307         char *path = atspi_accessible_get_path(node, NULL);
308         unsigned long long eo_ptr = 0;
309         sscanf(path, "%llu", &eo_ptr);
310
311         char *attributes = _get_attributes(node, length_limit, attributes_are_too_long);
312         Box_Size *box_size = _get_box_size(node);
313         char *states = _get_states(node, length_limit);
314
315         GArray *relations = atspi_accessible_get_relation_set(node, NULL);
316         bool current_node_has_relations = (relations && relations->len);
317
318         char result[SAFE_BUFFER_SIZE];
319         int ret = snprintf(result, SAFE_BUFFER_SIZE, "[[%s(%p)],[%s],[%s],[%s,%s,%s,%s],[%s],[%s],[%s]]",
320                                                 unique_id, (uintptr_t)eo_ptr,
321                                                 node_role_name,
322                                                 attributes,
323                                                 box_size->x,
324                                                 box_size->y,
325                                                 box_size->width,
326                                                 box_size->height,
327                                                 node_name,
328                                                 states,
329                                                 current_node_has_relations ? "*" : "");
330
331         if (ret >= SAFE_BUFFER_SIZE)
332                 fprintf(stderr, "\n%s, %s %d: generated string is too long. Buffer overflow\n", __FILE__, __FUNCTION__, __LINE__);
333
334         if (current_node_has_relations)
335                 *app_has_relations = true;
336
337         free(node_name);
338         free(node_role_name);
339         free(unique_id);
340         free(path);
341         free(attributes);
342         if (box_size) {
343                 free(box_size->width);
344                 free(box_size->height);
345                 free(box_size);
346         }
347         free(states);
348         g_array_free(relations, TRUE);
349
350         return g_strdup(result);
351 }
352
353 static void _test_atspi_parent_child_relation(AtspiAccessible *obj, AtspiAccessible *parent_candidate, int parent_candidate_index)
354 {
355         int parent_index = atspi_accessible_get_index_in_parent(obj, NULL);
356         AtspiAccessible *parent = atspi_accessible_get_parent(obj, NULL);
357
358         char output[CHECK_OUTPUT_WIDTH];
359         if (parent_index != parent_candidate_index || parent_candidate != parent) {
360                 char parent_status[NUMBER_WIDTH];
361
362                 if (parent == NULL)
363                         strncpy(parent_status, "_", NUMBER_WIDTH);
364                 else
365                         snprintf(parent_status, NUMBER_WIDTH, "%d", parent_index);
366
367                 char *parent_unique_id = atspi_accessible_get_unique_id(parent, NULL);
368                 char *parent_candidate_unique_id = atspi_accessible_get_unique_id(parent_candidate, NULL);
369                 snprintf(output, CHECK_OUTPUT_WIDTH, "[FAIL<%d,%s><%s,%s>]", parent_candidate_index, parent_status,
370                                 parent_candidate_unique_id, parent_unique_id);
371                 free(parent_unique_id);
372                 free(parent_candidate_unique_id);
373
374         } else {
375                 snprintf(output, CHECK_OUTPUT_WIDTH, "[OK]");
376         }
377
378         printf("%-*s\t", CHECK_OUTPUT_WIDTH, output);
379 }
380
381 static int _print_atspi_tree_verify_maybe_r(int indent_number, AtspiAccessible *object, bool check_integrity, int length_limit,
382                                                                                         bool *attributes_are_too_long, bool *app_has_relations)
383 {
384         char *indent = _multiply_string(' ', indent_number*indent_width);
385         if (indent != NULL) {
386                 printf("%s", indent);
387                 free(indent);
388         }
389
390         char *node_info = _get_info(object, length_limit, attributes_are_too_long, app_has_relations);
391         if (node_info != NULL) {
392                 printf("%s\n", node_info);
393                 free(node_info);
394         }
395
396         int count = atspi_accessible_get_child_count(object, NULL);
397         for (int i = 0; i < count; i++) {
398                 AtspiAccessible *child = atspi_accessible_get_child_at_index(object, i, NULL);
399                 if (child) {
400                         if (check_integrity)
401                                 _test_atspi_parent_child_relation(child, object, i);
402
403                         _print_atspi_tree_verify_maybe_r(indent_number + 1, child, check_integrity, length_limit, attributes_are_too_long, app_has_relations);
404                 }
405         }
406         return 0;
407 }
408
409 void _print_help()
410 {
411         printf("AT-SPI2-CORE-UTIL\n\n");
412         printf("USAGE: at_spi2_tool [OPTION] [PARAMETER] ...\n\n");
413         printf("OPTION LIST:\n");
414         printf("-h, --help\t\tshow this message\n");
415         printf("-v, --version\t\tshow actual version of tool\n");
416         printf("-g, --show-legend\tprint AT-SPI state legend\n");
417         printf("-l, --list-apps\t\tlist all applications of desktop\n");
418         printf("-a, --at-spi-client <true|false>\tenable/disable org.a11y.Status.IsEnabled property\n");
419         printf("-s, --sleep <N>\tsleep N seconds\n");
420         printf("-d, --tree-dump\t\tdump tree for selected application\n");
421         printf("-c, --tree-check\tcheck tree for selected application\n");
422         printf("-f, --first-match\tperform dump or check only for first matching application\n");
423         printf("-i, --indent\t\tset indentation size, default value stands at 2\n");
424         printf("-t, --truncate\t\tset maximum single field size, default value stands at 30\n");
425         printf("\nEXAMPLE:\n");
426         printf("\tat_spi2_tool -i3 -d quickpanel\n");
427         printf("\t  show AT-SPI tree for node \"quickpanel\" using three-space indentation\n");
428         printf("\tat_spi2_tool -i1 -c starter\n");
429         printf("\t  show AT-SPI tree with integrity test for node \"starter\" using one-space indentation\n");
430 }
431
432 void _print_version()
433 {
434         printf("AT-SPI2-CORE-UTIL v%s\n", VERSION);
435 }
436
437 static void _print_horizontal_line_in_relations_table() {
438         for (int i = 0; i < RELATION_TABLE_COLUMN_COUNT; i++) {
439                 for (int j = 0; j < RELATION_TABLE_COLUMN_WIDTH; j++)
440                         printf("-");
441                 printf("+");
442         }
443         printf("\n");
444 }
445
446 static char *_get_unique_id_of_object_in_relation(AtspiRelation *relation) {
447         if (!relation)
448                 return NULL;
449
450         gint last_index = atspi_relation_get_n_targets(relation) - 1;
451         AtspiAccessible *target = atspi_relation_get_target(relation, last_index);
452         return atspi_accessible_get_unique_id(target, NULL);
453 }
454
455 static void _print_relations_for_object(AtspiAccessible *node) {
456         GArray *relations = atspi_accessible_get_relation_set(node, NULL);
457         if (!relations)
458                 return;
459
460         if (!relations->len) {
461                 g_array_free(relations, FALSE);
462                 return;
463         }
464
465         char **table = calloc(RELATION_TABLE_COLUMN_COUNT, sizeof(char *));
466         if (!table) {
467                 fprintf(stderr, "Calloc failed. Can't alloc memory for object relations string\n");
468                 return;
469         }
470
471         table[0] = atspi_accessible_get_unique_id(node, NULL);
472         for (int i = 0; i < relations->len; i++) {
473                 AtspiRelation *relation = g_array_index(relations, AtspiRelation *, i);
474                 AtspiRelationType type = atspi_relation_get_relation_type(relation);
475                 int idx;
476                 switch (type) {
477                         case ATSPI_RELATION_CONTROLLER_FOR:     idx = 1; break;
478                         case ATSPI_RELATION_CONTROLLED_BY:      idx = 2; break;
479                         case ATSPI_RELATION_FLOWS_TO:           idx = 3; break;
480                         case ATSPI_RELATION_FLOWS_FROM:         idx = 4; break;
481                         case ATSPI_RELATION_DESCRIBED_BY:       idx = 5; break;
482                         default: idx = 0;
483                 }
484
485                 if (idx > 0)
486                         table[idx] = _get_unique_id_of_object_in_relation(relation);
487                 else {
488                         char buf[16];
489                         snprintf(buf, sizeof(buf), " [%d]", type);
490                         _combine_strings(&table[RELATION_TABLE_COLUMN_COUNT - 1], buf);
491                 }
492         }
493
494         for (int i = 0; i < RELATION_TABLE_COLUMN_COUNT; i++) {
495                 printf("%*s|", RELATION_TABLE_COLUMN_WIDTH, table[i] ? table[i] : "");
496                 free(table[i]);
497         }
498         free(table);
499
500         printf("\n");
501         _print_horizontal_line_in_relations_table();
502         g_array_free(relations, TRUE);
503 }
504
505 typedef void (*print_information_about_object_function)(AtspiAccessible *);
506
507 static void _iterate_over_tree(print_information_about_object_function func, AtspiAccessible *node) {
508         func(node);
509
510         int count = atspi_accessible_get_child_count(node, NULL);
511         for (int i = 0; i < count; i++) {
512                 AtspiAccessible *child = atspi_accessible_get_child_at_index(node, i, NULL);
513                 if (child)
514                         _iterate_over_tree(func, child);
515         }
516 }
517
518 static void _print_relations_for_objects_in_tree(AtspiAccessible *node) {
519         _iterate_over_tree(_print_relations_for_object, node);
520 }
521
522 static void _print_header_for_relation_table() {
523         char *table[] = {"OBJECT", "CONTROLLER_FOR", "CONTROLLED_BY", "FLOWS_TO", "FLOWS_FROM", "DESCRIBED_BY", "OTHER RELATION [ID]"};
524         assert(ARRAY_SIZE(table) == RELATION_TABLE_COLUMN_COUNT);
525
526         _print_horizontal_line_in_relations_table();
527
528         for (int i = 0; i < RELATION_TABLE_COLUMN_COUNT; i++)
529                 printf("%*s|", RELATION_TABLE_COLUMN_WIDTH , table[i]);
530
531         printf("\n");
532         _print_horizontal_line_in_relations_table();
533 }
534
535 static void _print_relations_table(AtspiAccessible *node) {
536         printf("\nRELATIONS TABLE\n");
537         _print_header_for_relation_table();
538         _print_relations_for_objects_in_tree(node);
539 }
540
541 static void _print_horizontal_line_in_attributes_table() {
542         int size_factor = 1;
543         for (int i = 0; i < ATTRIBUTE_TABLE_COLUMN_COUNT; i++) {
544                 if (i == ATTRIBUTE_TABLE_COLUMN_COUNT - 1)
545                         size_factor = 4;
546                 for (int j = 0; j < ATTRIBUTE_TABLE_BASE_COLUMN_WIDTH * size_factor; j++)
547                         printf("-");
548                 printf("+");
549         }
550         printf("\n");
551 }
552
553 static void _print_attributes_for_object(AtspiAccessible *node) {
554         GHashTable *attributes = atspi_accessible_get_attributes(node, NULL);
555
556         if (!attributes)
557                 return;
558
559         char *unique_id = atspi_accessible_get_unique_id(node, NULL);
560         GHashTableIter attributes_iter;
561         gpointer attr_key;
562         gpointer attr_value;
563
564         g_hash_table_iter_init (&attributes_iter, attributes);
565         while (g_hash_table_iter_next (&attributes_iter, &attr_key, &attr_value)) {
566                 printf("%*s|", ATTRIBUTE_TABLE_BASE_COLUMN_WIDTH, unique_id ? unique_id : "");
567                 printf("%*s|", ATTRIBUTE_TABLE_BASE_COLUMN_WIDTH, attr_key ? (char *) attr_key : "");
568                 printf("%*s|\n", ATTRIBUTE_TABLE_BASE_COLUMN_WIDTH * 4, attr_value ? (char *) attr_value : "");
569         }
570
571         if (g_hash_table_size (attributes))
572                 _print_horizontal_line_in_attributes_table();
573
574         g_hash_table_unref(attributes);
575         free(unique_id);
576 }
577
578 static void _print_attributes_for_objects_in_tree(AtspiAccessible *node) {
579         _iterate_over_tree(_print_attributes_for_object, node);
580 }
581
582 static void _print_header_for_attributes_table() {
583         char *table[] = {"OBJECT", "ATTRIBUTE KEY", "ATTRIBUTE VALUE"};
584         assert(ARRAY_SIZE(table) == ATTRIBUTE_TABLE_COLUMN_COUNT);
585
586         _print_horizontal_line_in_attributes_table();
587
588         int size_factor = 1;
589         for (int i = 0; i < ATTRIBUTE_TABLE_COLUMN_COUNT; i++) {
590                 if (i == ATTRIBUTE_TABLE_COLUMN_COUNT - 1)
591                         size_factor = 4;
592                 printf("%*s|", ATTRIBUTE_TABLE_BASE_COLUMN_WIDTH * size_factor , table[i]);
593         }
594
595         printf("\n");
596         _print_horizontal_line_in_attributes_table();
597 }
598
599 static void _print_attributes_table(AtspiAccessible *node) {
600         printf("\nATTRIBUTES TABLE\n");
601         _print_header_for_attributes_table();
602         _print_attributes_for_objects_in_tree(node);
603 }
604
605 static void _atspi_tree_traverse(const char *app_name, bool dump, bool check, bool first_match, int length_limit)
606 {
607
608         AtspiAccessible *desktop = atspi_get_desktop(0);
609         if (!desktop) {
610                 fprintf(stderr, "atspi_get_desktop failed\n");
611                 return;
612         }
613
614         int count = atspi_accessible_get_child_count(desktop, NULL);
615         bool app_name_matched = false;
616
617         for (int i = 0; i < count; i++) {
618                 AtspiAccessible *child = atspi_accessible_get_child_at_index(desktop, i, NULL);
619                 if (child == NULL) {
620                         fprintf(stderr, "\n%s, %s %d: Null application occured. Results may be misleading.\n", __FILE__, __FUNCTION__, __LINE__);
621                         continue;
622                 }
623
624                 char *name = atspi_accessible_get_name(child, NULL);
625                 bool attributes_are_too_long = false;
626                 bool app_has_relations = false;
627
628                 if (!dump && !check)
629                         printf("%s\n", name);
630
631                 if ((check || dump) && name && !strcmp(name, app_name)) {
632                         app_name_matched = true;
633
634                         _print_module_legend();
635
636                         if (check)
637                                 _test_atspi_parent_child_relation(child, desktop, i);
638
639                         _print_atspi_tree_verify_maybe_r(0, child, check, length_limit, &attributes_are_too_long, &app_has_relations);
640
641                         if (app_has_relations)
642                                 _print_relations_table(child);
643
644                         if (attributes_are_too_long)
645                                 _print_attributes_table(child);
646
647                         if (first_match) {
648                                 free(name);
649                                 break;
650                         } else {
651                                 printf("\n");
652                         }
653
654                         free(name);
655                 }
656         }
657
658         if (!app_name_matched && (dump || check))
659                 fprintf(stderr, "There is no application with name: %s. Try again.\n", app_name);
660
661         g_object_unref(desktop);
662 }
663
664 static void _at_spi_client_enable(gboolean enabled)
665 {
666         static GDBusProxy *proxy = NULL; //we keep proxy (dbus connection) until program exits
667         GVariant *result;
668         GError *error = NULL;
669         GDBusProxyFlags flags = G_DBUS_PROXY_FLAGS_NONE;
670
671
672         if (!proxy) {
673                 proxy = g_dbus_proxy_new_for_bus_sync (G_BUS_TYPE_SESSION,
674                                         flags,
675                                         NULL, /* GDBusInterfaceInfo */
676                                         "org.a11y.Bus",
677                                         "/org/a11y/bus",
678                                         "org.freedesktop.DBus.Properties",
679                                         NULL, /* GCancellable */
680                                         &error);
681                 if (error) {
682                         fprintf(stderr, "Failed to create proxy object for '/org/a11y/bus': %s\n", error->message);
683                         g_error_free(error);
684                         return;
685                 }
686         }
687
688         result = g_dbus_proxy_call_sync(proxy,
689                                         "Set",
690                                         g_variant_new ("(ssv)",  "org.a11y.Status", "IsEnabled", g_variant_new_boolean(enabled)),
691                                         G_DBUS_CALL_FLAGS_NONE,
692                                         -1,
693                                         NULL,
694                                         &error);
695         if (result)
696                 g_variant_unref(result);
697
698         if (error) {
699                 fprintf(stderr, "Fail to call org.freedesktop.DBus.Properties.Set: %s\n", error->message);
700                 g_error_free(error);
701         }
702 }
703
704 static void _run_command(int argc, char *argv[])
705 {
706         struct option long_options[] = {
707                 {"help", no_argument, 0, 'h'},
708                 {"version", no_argument, 0, 'v'},
709                 {"show-legend", no_argument, 0, 'g'},
710                 {"list-apps", no_argument, 0, 'l'},
711                 {"at-spi-client", no_argument, 0, 'a'},
712                 {"sleep", required_argument, 0, 's'},
713                 {"tree-dump", required_argument, 0, 'd'},
714                 {"tree-check", required_argument, 0, 'c'},
715                 {"first-match", no_argument, 0, 'f'},
716                 {"indent", required_argument, 0, 'i'},
717                 {"truncate", required_argument, 0, 't'},
718         };
719
720         int command = 0;
721         int option_index = 0;
722         bool traverse_flags[FLAG_NO] = {false};
723         char *app_name = NULL;
724         gboolean enable_at_spi_client;
725
726         while (TRUE) {
727                 command = getopt_long(argc, argv, "hvgla:s:d:c:ft:i:", long_options, &option_index);
728
729                 if (command == ERROR_STATE)
730                         break;
731
732                 switch (command) {
733                 case 'h':
734                         _print_help();
735                         break;
736
737                 case 'v':
738                         _print_version();
739                         break;
740
741                 case 'g':
742                         _print_atspi_states_legend();
743                         break;
744
745                 case 'l':
746                         _atspi_tree_traverse(NULL, false, false, false, module_name_limit);
747                         break;
748
749                 case 'a':
750                         enable_at_spi_client = TRUE;
751                         if (optarg[0] == 'f' || optarg[0] == '0')
752                                 enable_at_spi_client = FALSE;
753
754                         _at_spi_client_enable(enable_at_spi_client);
755                         break;
756
757                 case 's':
758                         sleep(atoi(optarg));
759                         break;
760
761                 case 'd':
762                         traverse_flags[DUMP] = true;
763                         app_name = optarg;
764                         break;
765
766                 case 'c':
767                         traverse_flags[CHECK] = true;
768                         app_name = optarg;
769                         break;
770
771                 case 'f':
772                         traverse_flags[FIRST_MATCH] = true;
773                         break;
774
775                 case 'i':
776                         _set_indent(atoi(optarg));
777                         break;
778
779                 case 't':
780                         _set_module_length_limit(atoi(optarg));
781                         break;
782
783                 case '?':
784                         fprintf(stderr, "Invalid parameter. Use: \"--help\"\n");
785                         break;
786
787                 default:
788                         abort();
789                 }
790         }
791
792         if (traverse_flags[DUMP] || traverse_flags[CHECK])
793                 _atspi_tree_traverse(app_name, traverse_flags[DUMP], traverse_flags[CHECK], traverse_flags[FIRST_MATCH], module_name_limit);
794 }
795
796 int main(int argc, char *argv[])
797 {
798         if (argc < 2) {
799                 printf("Arguments required. Type %s --help.\n", argv[0]);
800                 return -1;
801         }
802
803         int result = atspi_init();
804         if (result != 0)
805         {
806                 fprintf(stderr, "Unable to initilize AT-SPI infrastructure, atspi_init failed\n");
807                 return -1;
808         }
809
810         _run_command(argc, argv);
811
812         return 0;
813 }