1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
|
#include "config.h"
#include <ctf-api.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
int
main (int argc, char *argv[])
{
ctf_archive_t *ctf;
ctf_dict_t *a_fp, *ignore1_fp, *b_fp, *ignore2_fp, *tmp_fp;
int err;
ctf_id_t a, b, ignore1, ignore2, tmp;
char *foo;
ctf_next_t *i = NULL;
const char *name;
int val;
if (argc != 2)
{
fprintf (stderr, "Syntax: %s PROGRAM\n", argv[0]);
exit(1);
}
if ((ctf = ctf_open (argv[1], NULL, &err)) == NULL)
goto open_err;
/* Fish out each symbol in turn: also try to fish out a nonexistent one. */
if ((a_fp = ctf_arc_lookup_symbol_name (ctf, "a", &a, &err)) == NULL)
goto sym_err;
printf ("Type of a is %s\n", foo = ctf_type_aname (a_fp, a));
if ((b_fp = ctf_arc_lookup_symbol_name (ctf, "b", &b, &err)) == NULL)
goto sym_err;
printf ("Type of b is %s\n", foo = ctf_type_aname (b_fp, b));
if ((ignore1_fp = ctf_arc_lookup_symbol_name (ctf, "ignore1", &ignore1, &err)) == NULL)
goto sym_err;
printf ("Type of ignore1 is %s\n", foo = ctf_type_aname (ignore1_fp, ignore1));
if ((ignore2_fp = ctf_arc_lookup_symbol_name (ctf, "ignore2", &ignore2, &err)) == NULL)
goto sym_err;
printf ("Type of ignore2 is %s\n", foo = ctf_type_aname (ignore2_fp, ignore1));
/* Try a call in just-get-the-dict mode and make sure it doesn't fail. */
if ((tmp_fp = ctf_arc_lookup_symbol_name (ctf, "ignore2", NULL, &err)) == NULL)
goto sym_err;
ctf_dict_close (tmp_fp);
/* Make sure failures fail. */
if ((ctf_arc_lookup_symbol_name (ctf, "nonexistent", NULL, &err) != NULL)
|| err != ECTF_NOTYPEDAT)
goto nosym_err;
/* Fish them out again to check the caching layer. */
if (((tmp_fp = ctf_arc_lookup_symbol_name (ctf, "a", &tmp, &err)) != a_fp)
|| (tmp != a))
goto sym_cache_err;
ctf_dict_close (tmp_fp);
if (((tmp_fp = ctf_arc_lookup_symbol_name (ctf, "b", &tmp, &err)) != b_fp)
|| (tmp != b))
goto sym_cache_err;
ctf_dict_close (tmp_fp);
if (((tmp_fp = ctf_arc_lookup_symbol_name (ctf, "ignore1", &tmp, &err)) != ignore1_fp)
|| (tmp != ignore1))
goto sym_cache_err;
ctf_dict_close (tmp_fp);
if (((tmp_fp = ctf_arc_lookup_symbol_name (ctf, "ignore2", &tmp, &err)) != ignore2_fp)
|| (tmp != ignore2))
goto sym_cache_err;
ctf_dict_close (tmp_fp);
ctf_dict_close (a_fp);
ctf_dict_close (b_fp);
ctf_dict_close (ignore1_fp);
ctf_dict_close (ignore2_fp);
ctf_close (ctf);
return 0;
open_err:
fprintf (stderr, "%s: cannot open: %s\n", argv[0], ctf_errmsg (err));
return 1;
sym_err:
fprintf (stderr, "%s: Symbol lookup error: %s\n", argv[0], ctf_errmsg (err));
return 1;
nosym_err:
fprintf (stderr, "%s: Nonexistent symbol lookup unexpected error: %s\n", argv[0],
ctf_errmsg (err));
return 1;
sym_cache_err:
fprintf (stderr, "%s: Symbol re-lookup error (caching bug): %s\n", argv[0],
ctf_errmsg (err));
return 1;
}
|
