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
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
|
#include "dissect.h"
static inline const char *show_mode(unsigned mode)
{
static char str[3];
if (mode == -1)
return "def";
#define U(u_r) "-rwm"[(mode / u_r) & 3]
str[0] = U(U_R_AOF);
str[1] = U(U_R_VAL);
str[2] = U(U_R_PTR);
#undef U
return str;
}
static void print_usage(struct position *pos, struct symbol *sym, unsigned mode)
{
static unsigned curr_stream = -1;
static struct ident null;
struct ident *ctx = &null;
if (curr_stream != pos->stream) {
curr_stream = pos->stream;
printf("\nFILE: %s\n\n", stream_name(curr_stream));
}
if (dissect_ctx)
ctx = dissect_ctx->ident;
printf("%4d:%-3d %-16.*s %s ",
pos->line, pos->pos, ctx->len, ctx->name, show_mode(mode));
}
static char symscope(struct symbol *sym)
{
if (sym_is_local(sym)) {
if (!dissect_ctx)
warning(sym->pos, "no context");
return '.';
}
return ' ';
}
static void r_symbol(unsigned mode, struct position *pos, struct symbol *sym)
{
print_usage(pos, sym, mode);
if (!sym->ident)
sym->ident = built_in_ident("__asm__");
printf("%c %c %-32.*s %s\n",
symscope(sym), sym->kind, sym->ident->len, sym->ident->name,
show_typename(sym->ctype.base_type));
switch (sym->kind) {
case 's':
if (sym->type == SYM_STRUCT || sym->type == SYM_UNION)
break;
goto err;
case 'f':
if (sym->type != SYM_BAD && sym->ctype.base_type->type != SYM_FN)
goto err;
case 'v':
if (sym->type == SYM_NODE || sym->type == SYM_BAD)
break;
goto err;
default:
goto err;
}
return;
err:
warning(*pos, "r_symbol bad sym type=%d kind=%d", sym->type, sym->kind);
}
static void r_member(unsigned mode, struct position *pos, struct symbol *sym, struct symbol *mem)
{
struct ident *ni, *si, *mi;
print_usage(pos, sym, mode);
ni = built_in_ident("?");
si = sym->ident ?: ni;
/* mem == NULL means entire struct accessed */
mi = mem ? (mem->ident ?: ni) : built_in_ident("*");
printf("%c m %.*s.%-*.*s %s\n",
symscope(sym), si->len, si->name,
32-1 - si->len, mi->len, mi->name,
show_typename(mem ? mem->ctype.base_type : sym));
if (sym->ident && sym->kind != 's')
warning(*pos, "r_member bad sym type=%d kind=%d", sym->type, sym->kind);
if (mem && mem->kind != 'm')
warning(*pos, "r_member bad mem->kind = %d", mem->kind);
}
static void r_symdef(struct symbol *sym)
{
r_symbol(-1, &sym->pos, sym);
}
static void r_memdef(struct symbol *sym, struct symbol *mem)
{
r_member(-1, &mem->pos, sym, mem);
}
int main(int argc, char **argv)
{
static struct reporter reporter = {
.r_symdef = r_symdef,
.r_memdef = r_memdef,
.r_symbol = r_symbol,
.r_member = r_member,
};
struct string_list *filelist = NULL;
sparse_initialize(argc, argv, &filelist);
dissect(&reporter, filelist);
return 0;
}
|
