File: | src/usr.sbin/btrace/obj/bt_parse.c |
Warning: | line 1498, column 26 Use of zero-allocated memory |
Press '?' to see keyboard shortcuts
Keyboard shortcuts:
1 | #include <stdlib.h> | ||||
2 | #include <string.h> | ||||
3 | #define YYBYACC1 1 | ||||
4 | #define YYMAJOR1 1 | ||||
5 | #define YYMINOR9 9 | ||||
6 | #define YYLEXyylex() yylex() | ||||
7 | #define YYEMPTY-1 -1 | ||||
8 | #define yyclearin(yychar=(-1)) (yychar=(YYEMPTY-1)) | ||||
9 | #define yyerrok(yyerrflag=0) (yyerrflag=0) | ||||
10 | #define YYRECOVERING()(yyerrflag!=0) (yyerrflag!=0) | ||||
11 | #define YYPREFIX"yy" "yy" | ||||
12 | #line 32 "/usr/src/usr.sbin/btrace/bt_parse.y" | ||||
13 | #include <sys/queue.h> | ||||
14 | |||||
15 | #include <assert.h> | ||||
16 | #include <ctype.h> | ||||
17 | #include <err.h> | ||||
18 | #include <limits.h> | ||||
19 | #include <stdarg.h> | ||||
20 | #include <stdint.h> | ||||
21 | #include <stdio.h> | ||||
22 | |||||
23 | #include "bt_parser.h" | ||||
24 | |||||
25 | /* Name for the default map @[], hopefully nobody will use this one ;) */ | ||||
26 | #define UNNAMED_MAP"___unnamed_map_doesnt_have_any_name" "___unnamed_map_doesnt_have_any_name" | ||||
27 | |||||
28 | /* Number of rules to evaluate. */ | ||||
29 | struct bt_ruleq g_rules = TAILQ_HEAD_INITIALIZER(g_rules){ ((void *)0), &(g_rules).tqh_first }; | ||||
30 | |||||
31 | /* Number of probes except BEGIN/END. */ | ||||
32 | int g_nprobes; | ||||
33 | |||||
34 | /* List of global variables, including maps. */ | ||||
35 | SLIST_HEAD(, bt_var)struct { struct bt_var *slh_first; } g_variables; | ||||
36 | |||||
37 | /* List of local variables, cleaned for each new rule. */ | ||||
38 | SLIST_HEAD(, bt_var)struct { struct bt_var *slh_first; } l_variables; | ||||
39 | |||||
40 | struct bt_arg g_nullba = BA_INITIALIZER(0, B_AT_LONG){ { ((void *)0) }, (void *)(0), ((void *)0), (B_AT_LONG) }; | ||||
41 | struct bt_arg g_maxba = BA_INITIALIZER(LONG_MAX, B_AT_LONG){ { ((void *)0) }, (void *)(9223372036854775807L), ((void *)0 ), (B_AT_LONG) }; | ||||
42 | |||||
43 | struct bt_rule *br_new(struct bt_probe *, struct bt_filter *, | ||||
44 | struct bt_stmt *); | ||||
45 | struct bt_probe *bp_new(const char *, const char *, const char *, int32_t); | ||||
46 | struct bt_arg *ba_append(struct bt_arg *, struct bt_arg *); | ||||
47 | struct bt_arg *ba_op(enum bt_argtype, struct bt_arg *, struct bt_arg *); | ||||
48 | struct bt_stmt *bs_new(enum bt_action, struct bt_arg *, struct bt_var *); | ||||
49 | struct bt_stmt *bs_append(struct bt_stmt *, struct bt_stmt *); | ||||
50 | |||||
51 | struct bt_var *bg_lookup(const char *); | ||||
52 | struct bt_stmt *bg_store(const char *, struct bt_arg *); | ||||
53 | struct bt_arg *bg_find(const char *); | ||||
54 | struct bt_var *bg_get(const char *); | ||||
55 | |||||
56 | struct bt_var *bl_lookup(const char *); | ||||
57 | struct bt_stmt *bl_store(const char *, struct bt_arg *); | ||||
58 | struct bt_arg *bl_find(const char *); | ||||
59 | |||||
60 | struct bt_arg *bm_find(const char *, struct bt_arg *); | ||||
61 | struct bt_stmt *bm_insert(const char *, struct bt_arg *, struct bt_arg *); | ||||
62 | struct bt_stmt *bm_op(enum bt_action, struct bt_arg *, struct bt_arg *); | ||||
63 | |||||
64 | struct bt_stmt *bh_inc(const char *, struct bt_arg *, struct bt_arg *); | ||||
65 | |||||
66 | /* | ||||
67 | * Lexer | ||||
68 | */ | ||||
69 | const char *pbuf; | ||||
70 | size_t plen; | ||||
71 | size_t pindex; | ||||
72 | int perrors = 0; | ||||
73 | |||||
74 | typedef struct { | ||||
75 | union { | ||||
76 | long number; | ||||
77 | int i; | ||||
78 | const char *string; | ||||
79 | struct bt_probe *probe; | ||||
80 | struct bt_filter *filter; | ||||
81 | struct bt_stmt *stmt; | ||||
82 | struct bt_arg *arg; | ||||
83 | } v; | ||||
84 | const char *filename; | ||||
85 | int lineno; | ||||
86 | int colno; | ||||
87 | } yystype; | ||||
88 | #define YYSTYPEyystype yystype | ||||
89 | |||||
90 | static void yyerror(const char *, ...); | ||||
91 | static int yylex(void); | ||||
92 | |||||
93 | static int pflag; | ||||
94 | #line 95 "bt_parse.c" | ||||
95 | #define ERROR257 257 | ||||
96 | #define ENDFILT258 258 | ||||
97 | #define OP_EQ259 259 | ||||
98 | #define OP_NE260 260 | ||||
99 | #define OP_LE261 261 | ||||
100 | #define OP_LT262 262 | ||||
101 | #define OP_GE263 263 | ||||
102 | #define OP_GT264 264 | ||||
103 | #define OP_LAND265 265 | ||||
104 | #define OP_LOR266 266 | ||||
105 | #define BUILTIN267 267 | ||||
106 | #define BEGIN268 268 | ||||
107 | #define END269 269 | ||||
108 | #define HZ270 270 | ||||
109 | #define IF271 271 | ||||
110 | #define F_DELETE272 272 | ||||
111 | #define F_PRINT273 273 | ||||
112 | #define MFUNC274 274 | ||||
113 | #define FUNC0275 275 | ||||
114 | #define FUNC1276 276 | ||||
115 | #define FUNCN277 277 | ||||
116 | #define OP1278 278 | ||||
117 | #define OP2279 279 | ||||
118 | #define OP4280 280 | ||||
119 | #define MOP0281 281 | ||||
120 | #define MOP1282 282 | ||||
121 | #define STRING283 283 | ||||
122 | #define CSTRING284 284 | ||||
123 | #define NUMBER285 285 | ||||
124 | #define STR286 286 | ||||
125 | #define YYERRCODE256 256 | ||||
126 | const short yylhs[] = | ||||
127 | { -1, | ||||
128 | 0, 0, 0, 0, 25, 3, 3, 4, 4, 26, | ||||
129 | 5, 5, 6, 6, 18, 18, 1, 1, 2, 15, | ||||
130 | 16, 16, 16, 13, 13, 7, 7, 19, 19, 19, | ||||
131 | 20, 20, 20, 20, 20, 20, 20, 20, 20, 20, | ||||
132 | 20, 20, 21, 21, 21, 22, 22, 23, 23, 23, | ||||
133 | 23, 23, 23, 23, 24, 24, 14, 14, 17, 17, | ||||
134 | 27, 27, 9, 9, 9, 9, 9, 9, 9, 9, | ||||
135 | 9, 9, 9, 9, 10, 11, 11, 11, 11, 12, | ||||
136 | 12, 8, | ||||
137 | }; | ||||
138 | const short yylen[] = | ||||
139 | { 2, | ||||
140 | 0, 2, 2, 2, 3, 1, 1, 3, 1, 0, | ||||
141 | 2, 1, 5, 5, 2, 2, 2, 1, 2, 4, | ||||
142 | 3, 4, 1, 1, 1, 0, 3, 3, 3, 1, | ||||
143 | 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, | ||||
144 | 3, 1, 3, 3, 1, 1, 1, 3, 1, 1, | ||||
145 | 1, 1, 1, 1, 4, 6, 1, 3, 1, 3, | ||||
146 | 0, 1, 2, 3, 3, 6, 4, 4, 4, 3, | ||||
147 | 4, 4, 6, 8, 5, 2, 2, 1, 1, 4, | ||||
148 | 2, 3, | ||||
149 | }; | ||||
150 | const short yydefred[] = | ||||
151 | { 1, | ||||
152 | 0, 4, 6, 7, 2, 12, 0, 9, 3, 0, | ||||
153 | 0, 0, 0, 0, 11, 8, 50, 49, 0, 0, | ||||
154 | 0, 0, 0, 46, 53, 51, 0, 0, 0, 52, | ||||
155 | 45, 54, 0, 5, 0, 19, 15, 16, 17, 0, | ||||
156 | 0, 0, 27, 0, 0, 0, 0, 0, 0, 0, | ||||
157 | 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, | ||||
158 | 0, 0, 0, 0, 0, 0, 0, 0, 0, 79, | ||||
159 | 78, 0, 0, 0, 48, 0, 0, 24, 57, 0, | ||||
160 | 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, | ||||
161 | 0, 0, 0, 0, 44, 43, 0, 0, 0, 0, | ||||
162 | 0, 0, 0, 62, 63, 0, 0, 0, 82, 77, | ||||
163 | 76, 0, 0, 0, 55, 0, 20, 0, 0, 0, | ||||
164 | 0, 0, 0, 47, 0, 70, 0, 0, 0, 0, | ||||
165 | 0, 64, 65, 14, 13, 0, 58, 0, 71, 0, | ||||
166 | 72, 69, 68, 67, 0, 0, 0, 56, 0, 0, | ||||
167 | 75, 60, 0, 0, 0, 0, 81, 0, 0, 23, | ||||
168 | 66, 73, 0, 0, 0, 0, 0, 80, 21, 0, | ||||
169 | 74, 22, | ||||
170 | }; | ||||
171 | const short yydgoto[] = | ||||
172 | { 1, | ||||
173 | 23, 24, 6, 7, 8, 15, 13, 34, 70, 71, | ||||
174 | 72, 151, 79, 80, 25, 161, 122, 26, 81, 28, | ||||
175 | 29, 30, 31, 32, 9, 10, 105, | ||||
176 | }; | ||||
177 | const short yysindex[] = | ||||
178 | { 0, | ||||
179 | -10, 0, 0, 0, 0, 0, -17, 0, 0, -247, | ||||
180 | -259, -20, -76, 4, 0, 0, 0, 0, -16, -241, | ||||
181 | -20, 9, -40, 0, 0, 0, -226, 838, -14, 0, | ||||
182 | 0, 0, 127, 0, -252, 0, 0, 0, 0, -39, | ||||
183 | 48, -23, 0, -20, -20, -20, -20, -20, -20, -20, | ||||
184 | -20, -20, -20, -20, -20, -20, -20, -20, 45, 49, | ||||
185 | 52, 53, 56, 57, 61, -181, 94, -53, 46, 0, | ||||
186 | 0, 85, 55, 58, 0, -31, -7, 0, 0, -30, | ||||
187 | -201, 838, 838, -14, -14, -14, -14, -14, -14, -14, | ||||
188 | -14, -14, -14, -14, 0, 0, -20, 44, -20, -12, | ||||
189 | 79, -23, -23, 0, 0, -23, -35, -23, 0, 0, | ||||
190 | 0, -162, -159, -23, 0, -23, 0, -26, -40, 87, | ||||
191 | -21, 90, -201, 0, 91, 0, 93, 2, -18, 95, | ||||
192 | 99, 0, 0, 0, 0, 100, 0, 330, 0, -23, | ||||
193 | 0, 0, 0, 0, 81, -23, -23, 0, 482, 86, | ||||
194 | 0, 0, -29, 106, 96, 97, 0, 112, 117, 0, | ||||
195 | 0, 0, -23, 25, 118, -23, 17, 0, 0, 121, | ||||
196 | 0, 0,}; | ||||
197 | const short yyrindex[] = | ||||
198 | { 0, | ||||
199 | -125, 0, 0, 0, 0, 0, 41, 0, 0, 0, | ||||
200 | -125, 0, 0, 0, 0, 0, 0, 0, 0, 12, | ||||
201 | 0, 0, 36, 0, 0, 0, 0, 796, 74, 0, | ||||
202 | 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, | ||||
203 | 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, | ||||
204 | 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, | ||||
205 | 0, 0, 0, 0, 0, 0, 154, 0, 0, 0, | ||||
206 | 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, | ||||
207 | 50, 818, 849, 110, 352, 374, 396, 420, 442, 464, | ||||
208 | 706, 728, 750, 774, 0, 0, 0, 0, 0, 0, | ||||
209 | 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, | ||||
210 | 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, | ||||
211 | 882, 0, 125, 0, 0, 0, 0, 0, 0, 0, | ||||
212 | 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, | ||||
213 | 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, | ||||
214 | 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, | ||||
215 | 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, | ||||
216 | 0, 0,}; | ||||
217 | const short yygindex[] = | ||||
218 | { 0, | ||||
219 | 27, -27, 0, 0, 159, 0, 0, 0, -51, 101, | ||||
220 | 0, 0, 408, -81, 73, 0, 0, 131, -9, 22, | ||||
221 | 529, 77, 11, 0, 0, 0, 0, | ||||
222 | }; | ||||
223 | #define YYTABLESIZE1148 1148 | ||||
224 | const short yytable[] = | ||||
225 | { 5, | ||||
226 | 19, 75, 27, 38, 21, 69, 19, 107, 3, 4, | ||||
227 | 21, 40, 19, 116, 138, 19, 21, 73, 38, 21, | ||||
228 | 110, 128, 140, 66, 129, 116, 11, 58, 20, 12, | ||||
229 | 74, 43, 57, 115, 20, 14, 114, 106, 44, 45, | ||||
230 | 20, 39, 144, 20, 69, 116, 33, 18, 41, 18, | ||||
231 | 42, 20, 18, 18, 18, 18, 18, 171, 18, 68, | ||||
232 | 116, 35, 117, 44, 45, 82, 83, 95, 96, 42, | ||||
233 | 18, 47, 18, 47, 145, 18, 47, 47, 47, 47, | ||||
234 | 47, 167, 47, 76, 97, 25, 150, 118, 98, 123, | ||||
235 | 25, 99, 100, 25, 47, 101, 102, 156, 68, 47, | ||||
236 | 103, 36, 18, 104, 18, 18, 108, 20, 25, 42, | ||||
237 | 69, 42, 112, 25, 42, 113, 42, 42, 42, 126, | ||||
238 | 66, 69, 134, 135, 119, 121, 124, 139, 47, 47, | ||||
239 | 141, 142, 42, 143, 146, 18, 18, 42, 147, 163, | ||||
240 | 148, 153, 25, 67, 157, 31, 162, 31, 20, 168, | ||||
241 | 31, 165, 31, 31, 31, 164, 166, 10, 169, 47, | ||||
242 | 47, 172, 66, 26, 68, 59, 42, 42, 31, 16, | ||||
243 | 120, 77, 111, 31, 25, 68, 125, 0, 0, 0, | ||||
244 | 0, 0, 0, 0, 0, 67, 0, 0, 0, 61, | ||||
245 | 20, 0, 0, 0, 0, 0, 0, 42, 42, 0, | ||||
246 | 0, 0, 31, 31, 0, 0, 0, 0, 0, 109, | ||||
247 | 0, 0, 61, 0, 0, 0, 0, 61, 0, 0, | ||||
248 | 0, 0, 0, 0, 0, 44, 45, 0, 0, 0, | ||||
249 | 0, 17, 0, 31, 31, 0, 0, 17, 44, 45, | ||||
250 | 0, 0, 130, 17, 131, 2, 17, 0, 78, 18, | ||||
251 | 22, 158, 159, 37, 78, 18, 22, 3, 4, 0, | ||||
252 | 78, 18, 22, 0, 18, 22, 36, 0, 37, 18, | ||||
253 | 18, 18, 18, 18, 18, 18, 18, 18, 61, 0, | ||||
254 | 0, 0, 18, 18, 18, 18, 18, 18, 18, 0, | ||||
255 | 0, 0, 0, 47, 47, 47, 47, 47, 47, 47, | ||||
256 | 47, 47, 0, 0, 0, 0, 47, 47, 47, 47, | ||||
257 | 47, 47, 47, 0, 0, 0, 0, 0, 0, 0, | ||||
258 | 25, 25, 25, 25, 25, 25, 25, 0, 0, 0, | ||||
259 | 0, 42, 42, 42, 42, 42, 42, 42, 42, 42, | ||||
260 | 0, 0, 0, 0, 42, 42, 42, 42, 42, 42, | ||||
261 | 42, 0, 0, 0, 0, 59, 60, 61, 62, 63, | ||||
262 | 64, 65, 0, 0, 0, 66, 0, 31, 31, 31, | ||||
263 | 31, 31, 31, 31, 31, 31, 0, 0, 0, 0, | ||||
264 | 31, 31, 31, 31, 31, 31, 31, 32, 67, 32, | ||||
265 | 0, 0, 32, 20, 32, 32, 32, 59, 60, 61, | ||||
266 | 62, 63, 64, 65, 0, 0, 0, 0, 0, 33, | ||||
267 | 32, 33, 0, 0, 33, 32, 33, 33, 33, 0, | ||||
268 | 0, 0, 0, 0, 61, 61, 61, 61, 61, 61, | ||||
269 | 61, 34, 33, 34, 0, 0, 34, 33, 34, 34, | ||||
270 | 34, 0, 0, 0, 32, 32, 0, 0, 0, 0, | ||||
271 | 0, 0, 149, 0, 34, 35, 0, 35, 0, 34, | ||||
272 | 35, 0, 35, 35, 35, 0, 33, 33, 0, 0, | ||||
273 | 0, 0, 0, 0, 0, 32, 32, 36, 35, 36, | ||||
274 | 0, 0, 36, 35, 36, 36, 36, 0, 34, 34, | ||||
275 | 0, 0, 0, 0, 0, 0, 0, 33, 33, 37, | ||||
276 | 36, 37, 0, 0, 37, 36, 37, 37, 37, 127, | ||||
277 | 0, 0, 35, 35, 132, 133, 0, 66, 0, 34, | ||||
278 | 34, 136, 37, 137, 0, 0, 0, 37, 0, 0, | ||||
279 | 0, 0, 0, 0, 36, 36, 0, 0, 0, 0, | ||||
280 | 67, 0, 0, 35, 35, 20, 0, 152, 0, 0, | ||||
281 | 0, 0, 0, 154, 155, 0, 37, 37, 0, 0, | ||||
282 | 160, 0, 0, 0, 0, 36, 36, 0, 0, 0, | ||||
283 | 0, 0, 0, 170, 84, 85, 86, 87, 88, 89, | ||||
284 | 90, 91, 92, 93, 94, 0, 0, 37, 37, 0, | ||||
285 | 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, | ||||
286 | 0, 60, 61, 62, 63, 64, 65, 0, 0, 32, | ||||
287 | 32, 32, 32, 32, 32, 32, 32, 32, 0, 0, | ||||
288 | 0, 0, 32, 32, 32, 32, 32, 32, 32, 0, | ||||
289 | 0, 33, 33, 33, 33, 33, 33, 33, 33, 33, | ||||
290 | 0, 0, 0, 0, 33, 33, 33, 33, 33, 33, | ||||
291 | 33, 0, 0, 34, 34, 34, 34, 34, 34, 34, | ||||
292 | 34, 34, 0, 0, 0, 0, 34, 34, 34, 34, | ||||
293 | 34, 34, 34, 0, 0, 0, 0, 35, 35, 35, | ||||
294 | 35, 35, 35, 35, 35, 35, 0, 0, 0, 0, | ||||
295 | 35, 35, 35, 35, 35, 35, 35, 0, 0, 36, | ||||
296 | 36, 36, 36, 36, 36, 36, 36, 36, 0, 0, | ||||
297 | 0, 0, 36, 36, 36, 36, 36, 36, 36, 0, | ||||
298 | 0, 37, 37, 37, 37, 37, 37, 37, 37, 37, | ||||
299 | 0, 0, 0, 0, 37, 37, 37, 37, 37, 37, | ||||
300 | 37, 38, 0, 38, 0, 0, 38, 0, 38, 38, | ||||
301 | 38, 0, 0, 60, 61, 62, 63, 64, 65, 0, | ||||
302 | 0, 0, 0, 39, 38, 39, 0, 0, 39, 38, | ||||
303 | 39, 39, 39, 0, 0, 0, 0, 0, 0, 0, | ||||
304 | 0, 0, 0, 0, 0, 40, 39, 40, 0, 0, | ||||
305 | 40, 39, 40, 40, 40, 0, 0, 0, 38, 38, | ||||
306 | 0, 0, 0, 0, 0, 0, 0, 0, 40, 41, | ||||
307 | 0, 41, 0, 40, 41, 0, 41, 41, 41, 0, | ||||
308 | 39, 39, 0, 0, 0, 0, 0, 0, 0, 38, | ||||
309 | 38, 30, 41, 0, 0, 0, 30, 41, 0, 30, | ||||
310 | 0, 0, 40, 40, 0, 0, 0, 0, 0, 0, | ||||
311 | 0, 39, 39, 28, 30, 0, 0, 0, 28, 30, | ||||
312 | 0, 28, 0, 0, 0, 0, 41, 41, 0, 0, | ||||
313 | 0, 0, 0, 40, 40, 54, 28, 0, 0, 0, | ||||
314 | 52, 28, 53, 0, 29, 0, 0, 0, 30, 29, | ||||
315 | 0, 0, 29, 0, 0, 0, 0, 41, 41, 0, | ||||
316 | 0, 0, 0, 0, 0, 0, 0, 29, 0, 0, | ||||
317 | 28, 0, 29, 0, 0, 0, 0, 0, 0, 47, | ||||
318 | 30, 0, 47, 47, 47, 0, 47, 0, 47, 0, | ||||
319 | 0, 55, 0, 0, 0, 0, 0, 0, 0, 0, | ||||
320 | 0, 29, 28, 0, 0, 0, 0, 0, 0, 0, | ||||
321 | 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, | ||||
322 | 0, 56, 0, 38, 38, 38, 38, 38, 38, 38, | ||||
323 | 38, 38, 0, 29, 0, 47, 38, 38, 38, 38, | ||||
324 | 38, 38, 38, 0, 0, 39, 39, 39, 39, 39, | ||||
325 | 39, 39, 39, 39, 0, 0, 0, 0, 39, 39, | ||||
326 | 39, 39, 39, 39, 39, 47, 0, 40, 40, 40, | ||||
327 | 40, 40, 40, 40, 40, 40, 0, 0, 0, 0, | ||||
328 | 40, 40, 40, 40, 40, 40, 40, 0, 0, 0, | ||||
329 | 0, 41, 41, 41, 41, 41, 41, 41, 41, 41, | ||||
330 | 0, 0, 0, 0, 41, 41, 41, 41, 41, 41, | ||||
331 | 41, 0, 0, 30, 0, 0, 0, 0, 0, 0, | ||||
332 | 30, 30, 0, 0, 0, 0, 30, 30, 30, 30, | ||||
333 | 30, 30, 30, 0, 0, 28, 0, 0, 0, 0, | ||||
334 | 0, 0, 28, 28, 0, 0, 0, 0, 28, 28, | ||||
335 | 28, 28, 28, 28, 28, 0, 46, 47, 48, 49, | ||||
336 | 50, 51, 0, 0, 0, 0, 29, 0, 0, 0, | ||||
337 | 0, 0, 0, 29, 29, 0, 0, 0, 0, 29, | ||||
338 | 29, 29, 29, 29, 29, 29, 0, 0, 0, 0, | ||||
339 | 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, | ||||
340 | 47, 47, 47, 47, 47, 47, 47, 47, | ||||
341 | }; | ||||
342 | const short yycheck[] = | ||||
343 | { 10, | ||||
344 | 36, 41, 12, 35, 40, 33, 36, 61, 268, 269, | ||||
345 | 40, 21, 36, 44, 41, 36, 40, 270, 35, 40, | ||||
346 | 72, 103, 44, 36, 106, 44, 44, 42, 64, 47, | ||||
347 | 283, 258, 47, 41, 64, 283, 44, 91, 265, 266, | ||||
348 | 64, 283, 41, 64, 72, 44, 123, 36, 40, 38, | ||||
349 | 91, 64, 41, 42, 43, 44, 45, 41, 47, 33, | ||||
350 | 44, 58, 93, 265, 266, 44, 45, 57, 58, 91, | ||||
351 | 59, 36, 61, 38, 93, 64, 41, 42, 43, 44, | ||||
352 | 45, 163, 47, 36, 40, 36, 138, 97, 40, 99, | ||||
353 | 41, 40, 40, 44, 59, 40, 40, 149, 72, 64, | ||||
354 | 40, 283, 91, 10, 93, 94, 61, 64, 59, 36, | ||||
355 | 138, 38, 58, 64, 41, 58, 43, 44, 45, 41, | ||||
356 | 36, 149, 285, 283, 98, 99, 100, 41, 93, 94, | ||||
357 | 41, 41, 59, 41, 40, 124, 125, 64, 40, 44, | ||||
358 | 41, 61, 93, 59, 59, 36, 41, 38, 64, 125, | ||||
359 | 41, 40, 43, 44, 45, 59, 40, 283, 41, 124, | ||||
360 | 125, 41, 36, 123, 138, 41, 93, 94, 59, 11, | ||||
361 | 98, 41, 72, 64, 125, 149, 100, -1, -1, -1, | ||||
362 | -1, -1, -1, -1, -1, 59, -1, -1, -1, 36, | ||||
363 | 64, -1, -1, -1, -1, -1, -1, 124, 125, -1, | ||||
364 | -1, -1, 93, 94, -1, -1, -1, -1, -1, 125, | ||||
365 | -1, -1, 59, -1, -1, -1, -1, 64, -1, -1, | ||||
366 | -1, -1, -1, -1, -1, 265, 266, -1, -1, -1, | ||||
367 | -1, 267, -1, 124, 125, -1, -1, 267, 265, 266, | ||||
368 | -1, -1, 278, 267, 280, 256, 267, -1, 284, 285, | ||||
369 | 286, 281, 282, 285, 284, 285, 286, 268, 269, -1, | ||||
370 | 284, 285, 286, -1, 285, 286, 283, -1, 285, 258, | ||||
371 | 259, 260, 261, 262, 263, 264, 265, 266, 125, -1, | ||||
372 | -1, -1, 271, 272, 273, 274, 275, 276, 277, -1, | ||||
373 | -1, -1, -1, 258, 259, 260, 261, 262, 263, 264, | ||||
374 | 265, 266, -1, -1, -1, -1, 271, 272, 273, 274, | ||||
375 | 275, 276, 277, -1, -1, -1, -1, -1, -1, -1, | ||||
376 | 271, 272, 273, 274, 275, 276, 277, -1, -1, -1, | ||||
377 | -1, 258, 259, 260, 261, 262, 263, 264, 265, 266, | ||||
378 | -1, -1, -1, -1, 271, 272, 273, 274, 275, 276, | ||||
379 | 277, -1, -1, -1, -1, 271, 272, 273, 274, 275, | ||||
380 | 276, 277, -1, -1, -1, 36, -1, 258, 259, 260, | ||||
381 | 261, 262, 263, 264, 265, 266, -1, -1, -1, -1, | ||||
382 | 271, 272, 273, 274, 275, 276, 277, 36, 59, 38, | ||||
383 | -1, -1, 41, 64, 43, 44, 45, 271, 272, 273, | ||||
384 | 274, 275, 276, 277, -1, -1, -1, -1, -1, 36, | ||||
385 | 59, 38, -1, -1, 41, 64, 43, 44, 45, -1, | ||||
386 | -1, -1, -1, -1, 271, 272, 273, 274, 275, 276, | ||||
387 | 277, 36, 59, 38, -1, -1, 41, 64, 43, 44, | ||||
388 | 45, -1, -1, -1, 93, 94, -1, -1, -1, -1, | ||||
389 | -1, -1, 123, -1, 59, 36, -1, 38, -1, 64, | ||||
390 | 41, -1, 43, 44, 45, -1, 93, 94, -1, -1, | ||||
391 | -1, -1, -1, -1, -1, 124, 125, 36, 59, 38, | ||||
392 | -1, -1, 41, 64, 43, 44, 45, -1, 93, 94, | ||||
393 | -1, -1, -1, -1, -1, -1, -1, 124, 125, 36, | ||||
394 | 59, 38, -1, -1, 41, 64, 43, 44, 45, 102, | ||||
395 | -1, -1, 93, 94, 107, 108, -1, 36, -1, 124, | ||||
396 | 125, 114, 59, 116, -1, -1, -1, 64, -1, -1, | ||||
397 | -1, -1, -1, -1, 93, 94, -1, -1, -1, -1, | ||||
398 | 59, -1, -1, 124, 125, 64, -1, 140, -1, -1, | ||||
399 | -1, -1, -1, 146, 147, -1, 93, 94, -1, -1, | ||||
400 | 153, -1, -1, -1, -1, 124, 125, -1, -1, -1, | ||||
401 | -1, -1, -1, 166, 46, 47, 48, 49, 50, 51, | ||||
402 | 52, 53, 54, 55, 56, -1, -1, 124, 125, -1, | ||||
403 | -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, | ||||
404 | -1, 272, 273, 274, 275, 276, 277, -1, -1, 258, | ||||
405 | 259, 260, 261, 262, 263, 264, 265, 266, -1, -1, | ||||
406 | -1, -1, 271, 272, 273, 274, 275, 276, 277, -1, | ||||
407 | -1, 258, 259, 260, 261, 262, 263, 264, 265, 266, | ||||
408 | -1, -1, -1, -1, 271, 272, 273, 274, 275, 276, | ||||
409 | 277, -1, -1, 258, 259, 260, 261, 262, 263, 264, | ||||
410 | 265, 266, -1, -1, -1, -1, 271, 272, 273, 274, | ||||
411 | 275, 276, 277, -1, -1, -1, -1, 258, 259, 260, | ||||
412 | 261, 262, 263, 264, 265, 266, -1, -1, -1, -1, | ||||
413 | 271, 272, 273, 274, 275, 276, 277, -1, -1, 258, | ||||
414 | 259, 260, 261, 262, 263, 264, 265, 266, -1, -1, | ||||
415 | -1, -1, 271, 272, 273, 274, 275, 276, 277, -1, | ||||
416 | -1, 258, 259, 260, 261, 262, 263, 264, 265, 266, | ||||
417 | -1, -1, -1, -1, 271, 272, 273, 274, 275, 276, | ||||
418 | 277, 36, -1, 38, -1, -1, 41, -1, 43, 44, | ||||
419 | 45, -1, -1, 272, 273, 274, 275, 276, 277, -1, | ||||
420 | -1, -1, -1, 36, 59, 38, -1, -1, 41, 64, | ||||
421 | 43, 44, 45, -1, -1, -1, -1, -1, -1, -1, | ||||
422 | -1, -1, -1, -1, -1, 36, 59, 38, -1, -1, | ||||
423 | 41, 64, 43, 44, 45, -1, -1, -1, 93, 94, | ||||
424 | -1, -1, -1, -1, -1, -1, -1, -1, 59, 36, | ||||
425 | -1, 38, -1, 64, 41, -1, 43, 44, 45, -1, | ||||
426 | 93, 94, -1, -1, -1, -1, -1, -1, -1, 124, | ||||
427 | 125, 36, 59, -1, -1, -1, 41, 64, -1, 44, | ||||
428 | -1, -1, 93, 94, -1, -1, -1, -1, -1, -1, | ||||
429 | -1, 124, 125, 36, 59, -1, -1, -1, 41, 64, | ||||
430 | -1, 44, -1, -1, -1, -1, 93, 94, -1, -1, | ||||
431 | -1, -1, -1, 124, 125, 38, 59, -1, -1, -1, | ||||
432 | 43, 64, 45, -1, 36, -1, -1, -1, 93, 41, | ||||
433 | -1, -1, 44, -1, -1, -1, -1, 124, 125, -1, | ||||
434 | -1, -1, -1, -1, -1, -1, -1, 59, -1, -1, | ||||
435 | 93, -1, 64, -1, -1, -1, -1, -1, -1, 38, | ||||
436 | 125, -1, 41, 42, 43, -1, 45, -1, 47, -1, | ||||
437 | -1, 94, -1, -1, -1, -1, -1, -1, -1, -1, | ||||
438 | -1, 93, 125, -1, -1, -1, -1, -1, -1, -1, | ||||
439 | -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, | ||||
440 | -1, 124, -1, 258, 259, 260, 261, 262, 263, 264, | ||||
441 | 265, 266, -1, 125, -1, 94, 271, 272, 273, 274, | ||||
442 | 275, 276, 277, -1, -1, 258, 259, 260, 261, 262, | ||||
443 | 263, 264, 265, 266, -1, -1, -1, -1, 271, 272, | ||||
444 | 273, 274, 275, 276, 277, 124, -1, 258, 259, 260, | ||||
445 | 261, 262, 263, 264, 265, 266, -1, -1, -1, -1, | ||||
446 | 271, 272, 273, 274, 275, 276, 277, -1, -1, -1, | ||||
447 | -1, 258, 259, 260, 261, 262, 263, 264, 265, 266, | ||||
448 | -1, -1, -1, -1, 271, 272, 273, 274, 275, 276, | ||||
449 | 277, -1, -1, 258, -1, -1, -1, -1, -1, -1, | ||||
450 | 265, 266, -1, -1, -1, -1, 271, 272, 273, 274, | ||||
451 | 275, 276, 277, -1, -1, 258, -1, -1, -1, -1, | ||||
452 | -1, -1, 265, 266, -1, -1, -1, -1, 271, 272, | ||||
453 | 273, 274, 275, 276, 277, -1, 259, 260, 261, 262, | ||||
454 | 263, 264, -1, -1, -1, -1, 258, -1, -1, -1, | ||||
455 | -1, -1, -1, 265, 266, -1, -1, -1, -1, 271, | ||||
456 | 272, 273, 274, 275, 276, 277, -1, -1, -1, -1, | ||||
457 | -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, | ||||
458 | 259, 260, 261, 262, 263, 264, 265, 266, | ||||
459 | }; | ||||
460 | #define YYFINAL1 1 | ||||
461 | #ifndef YYDEBUG0 | ||||
462 | #define YYDEBUG0 0 | ||||
463 | #endif | ||||
464 | #define YYMAXTOKEN286 286 | ||||
465 | #if YYDEBUG0 | ||||
466 | const char * const yyname[] = | ||||
467 | { | ||||
468 | "end-of-file",0,0,0,0,0,0,0,0,0,"'\\n'",0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, | ||||
469 | 0,0,0,0,"'#'","'$'",0,"'&'",0,"'('","')'","'*'","'+'","','","'-'",0,"'/'",0,0,0, | ||||
470 | 0,0,0,0,0,0,0,"':'","';'",0,"'='",0,0,"'@'",0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, | ||||
471 | 0,0,0,0,0,0,0,0,"'['",0,"']'","'^'",0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, | ||||
472 | 0,0,0,0,0,0,"'{'","'|'","'}'",0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, | ||||
473 | 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, | ||||
474 | 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, | ||||
475 | 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"ERROR","ENDFILT","OP_EQ", | ||||
476 | "OP_NE","OP_LE","OP_LT","OP_GE","OP_GT","OP_LAND","OP_LOR","BUILTIN","BEGIN", | ||||
477 | "END","HZ","IF","F_DELETE","F_PRINT","MFUNC","FUNC0","FUNC1","FUNCN","OP1", | ||||
478 | "OP2","OP4","MOP0","MOP1","STRING","CSTRING","NUMBER","STR", | ||||
479 | }; | ||||
480 | const char * const yyrule[] = | ||||
481 | {"$accept : grammar", | ||||
482 | "grammar :", | ||||
483 | "grammar : grammar '\\n'", | ||||
484 | "grammar : grammar rule", | ||||
485 | "grammar : grammar error", | ||||
486 | "rule : plist filter action", | ||||
487 | "beginend : BEGIN", | ||||
488 | "beginend : END", | ||||
489 | "plist : plist ',' probe", | ||||
490 | "plist : probe", | ||||
491 | "$$1 :", | ||||
492 | "probe : $$1 pname", | ||||
493 | "probe : beginend", | ||||
494 | "pname : STRING ':' STRING ':' STRING", | ||||
495 | "pname : STRING ':' HZ ':' NUMBER", | ||||
496 | "staticv : '$' NUMBER", | ||||
497 | "staticv : '$' '#'", | ||||
498 | "gvar : '@' STRING", | ||||
499 | "gvar : '@'", | ||||
500 | "lvar : '$' STRING", | ||||
501 | "mentry : gvar '[' vargs ']'", | ||||
502 | "mpat : MOP0 '(' ')'", | ||||
503 | "mpat : MOP1 '(' pat ')'", | ||||
504 | "mpat : pat", | ||||
505 | "pat : CSTRING", | ||||
506 | "pat : expr", | ||||
507 | "filter :", | ||||
508 | "filter : '/' expr ENDFILT", | ||||
509 | "expr : expr OP_LAND term", | ||||
510 | "expr : expr OP_LOR term", | ||||
511 | "expr : term", | ||||
512 | "term : term OP_EQ fterm", | ||||
513 | "term : term OP_NE fterm", | ||||
514 | "term : term OP_LE fterm", | ||||
515 | "term : term OP_LT fterm", | ||||
516 | "term : term OP_GE fterm", | ||||
517 | "term : term OP_GT fterm", | ||||
518 | "term : term '+' fterm", | ||||
519 | "term : term '-' fterm", | ||||
520 | "term : term '&' fterm", | ||||
521 | "term : term '^' fterm", | ||||
522 | "term : term '|' fterm", | ||||
523 | "term : fterm", | ||||
524 | "fterm : fterm '*' factor", | ||||
525 | "fterm : fterm '/' factor", | ||||
526 | "fterm : factor", | ||||
527 | "variable : lvar", | ||||
528 | "variable : gvar", | ||||
529 | "factor : '(' expr ')'", | ||||
530 | "factor : NUMBER", | ||||
531 | "factor : BUILTIN", | ||||
532 | "factor : staticv", | ||||
533 | "factor : variable", | ||||
534 | "factor : mentry", | ||||
535 | "factor : func", | ||||
536 | "func : STR '(' staticv ')'", | ||||
537 | "func : STR '(' staticv ',' pat ')'", | ||||
538 | "vargs : pat", | ||||
539 | "vargs : vargs ',' pat", | ||||
540 | "pargs : expr", | ||||
541 | "pargs : gvar ',' pat", | ||||
542 | "NL :", | ||||
543 | "NL : '\\n'", | ||||
544 | "stmt : ';' NL", | ||||
545 | "stmt : gvar '=' pat", | ||||
546 | "stmt : lvar '=' pat", | ||||
547 | "stmt : gvar '[' vargs ']' '=' mpat", | ||||
548 | "stmt : FUNCN '(' vargs ')'", | ||||
549 | "stmt : FUNC1 '(' pat ')'", | ||||
550 | "stmt : MFUNC '(' variable ')'", | ||||
551 | "stmt : FUNC0 '(' ')'", | ||||
552 | "stmt : F_DELETE '(' mentry ')'", | ||||
553 | "stmt : F_PRINT '(' pargs ')'", | ||||
554 | "stmt : gvar '=' OP1 '(' pat ')'", | ||||
555 | "stmt : gvar '=' OP4 '(' pat ',' vargs ')'", | ||||
556 | "stmtblck : IF '(' expr ')' block", | ||||
557 | "stmtlist : stmtlist stmtblck", | ||||
558 | "stmtlist : stmtlist stmt", | ||||
559 | "stmtlist : stmtblck", | ||||
560 | "stmtlist : stmt", | ||||
561 | "block : '{' stmt ';' '}'", | ||||
562 | "block : stmt ';'", | ||||
563 | "action : '{' stmtlist '}'", | ||||
564 | }; | ||||
565 | #endif | ||||
566 | #ifdef YYSTACKSIZE10000 | ||||
567 | #undef YYMAXDEPTH10000 | ||||
568 | #define YYMAXDEPTH10000 YYSTACKSIZE10000 | ||||
569 | #else | ||||
570 | #ifdef YYMAXDEPTH10000 | ||||
571 | #define YYSTACKSIZE10000 YYMAXDEPTH10000 | ||||
572 | #else | ||||
573 | #define YYSTACKSIZE10000 10000 | ||||
574 | #define YYMAXDEPTH10000 10000 | ||||
575 | #endif | ||||
576 | #endif | ||||
577 | #define YYINITSTACKSIZE200 200 | ||||
578 | /* LINTUSED */ | ||||
579 | int yydebug; | ||||
580 | int yynerrs; | ||||
581 | int yyerrflag; | ||||
582 | int yychar; | ||||
583 | short *yyssp; | ||||
584 | YYSTYPEyystype *yyvsp; | ||||
585 | YYSTYPEyystype yyval; | ||||
586 | YYSTYPEyystype yylval; | ||||
587 | short *yyss; | ||||
588 | short *yysslim; | ||||
589 | YYSTYPEyystype *yyvs; | ||||
590 | unsigned int yystacksize; | ||||
591 | int yyparse(void); | ||||
592 | #line 274 "/usr/src/usr.sbin/btrace/bt_parse.y" | ||||
593 | |||||
594 | struct bt_arg* | ||||
595 | get_varg(int index) | ||||
596 | { | ||||
597 | extern int nargs; | ||||
598 | extern char **vargs; | ||||
599 | const char *errstr = NULL((void *)0); | ||||
600 | long val; | ||||
601 | |||||
602 | if (0 < index && index <= nargs) { | ||||
603 | val = (long)strtonum(vargs[index-1], LONG_MIN(-9223372036854775807L -1L), LONG_MAX9223372036854775807L, | ||||
604 | &errstr); | ||||
605 | if (errstr == NULL((void *)0)) | ||||
606 | return ba_new(val, B_AT_LONG)ba_new0((void *)(val), (B_AT_LONG)); | ||||
607 | return ba_new(vargs[index-1], B_AT_STR)ba_new0((void *)(vargs[index-1]), (B_AT_STR)); | ||||
608 | } | ||||
609 | |||||
610 | return ba_new(0L, B_AT_NIL)ba_new0((void *)(0L), (B_AT_NIL)); | ||||
611 | } | ||||
612 | |||||
613 | struct bt_arg* | ||||
614 | get_nargs(void) | ||||
615 | { | ||||
616 | extern int nargs; | ||||
617 | |||||
618 | return ba_new((long) nargs, B_AT_LONG)ba_new0((void *)((long) nargs), (B_AT_LONG)); | ||||
619 | } | ||||
620 | |||||
621 | /* Create a new rule, representing "probe / filter / { action }" */ | ||||
622 | struct bt_rule * | ||||
623 | br_new(struct bt_probe *probe, struct bt_filter *filter, struct bt_stmt *head) | ||||
624 | { | ||||
625 | struct bt_rule *br; | ||||
626 | |||||
627 | br = calloc(1, sizeof(*br)); | ||||
628 | if (br == NULL((void *)0)) | ||||
629 | err(1, "bt_rule: calloc"); | ||||
630 | /* SLIST_INSERT_HEAD() nullify the next pointer. */ | ||||
631 | SLIST_FIRST(&br->br_probes)((&br->br_probes)->slh_first) = probe; | ||||
632 | br->br_filter = filter; | ||||
633 | /* SLIST_INSERT_HEAD() nullify the next pointer. */ | ||||
634 | SLIST_FIRST(&br->br_action)((&br->br_action)->slh_first) = head; | ||||
635 | |||||
636 | SLIST_FIRST(&br->br_variables)((&br->br_variables)->slh_first) = SLIST_FIRST(&l_variables)((&l_variables)->slh_first); | ||||
637 | SLIST_INIT(&l_variables){ ((&l_variables)->slh_first) = ((void *)0); }; | ||||
638 | |||||
639 | do { | ||||
640 | if (probe->bp_type != B_PT_PROBE) | ||||
641 | continue; | ||||
642 | g_nprobes++; | ||||
643 | } while ((probe = SLIST_NEXT(probe, bp_next)((probe)->bp_next.sle_next)) != NULL((void *)0)); | ||||
644 | |||||
645 | TAILQ_INSERT_TAIL(&g_rules, br, br_next)do { (br)->br_next.tqe_next = ((void *)0); (br)->br_next .tqe_prev = (&g_rules)->tqh_last; *(&g_rules)-> tqh_last = (br); (&g_rules)->tqh_last = &(br)-> br_next.tqe_next; } while (0); | ||||
646 | |||||
647 | return br; | ||||
648 | } | ||||
649 | |||||
650 | /* Create a new condition */ | ||||
651 | struct bt_filter * | ||||
652 | bc_new(struct bt_arg *term, enum bt_argtype op, struct bt_arg *ba) | ||||
653 | { | ||||
654 | struct bt_filter *bf; | ||||
655 | |||||
656 | bf = calloc(1, sizeof(*bf)); | ||||
657 | if (bf == NULL((void *)0)) | ||||
658 | err(1, "bt_filter: calloc"); | ||||
659 | |||||
660 | bf->bf_condition = bs_new(B_AC_TEST, ba_op(op, term, ba), NULL((void *)0)); | ||||
661 | |||||
662 | return bf; | ||||
663 | } | ||||
664 | |||||
665 | /* Create a new if/else test */ | ||||
666 | struct bt_stmt * | ||||
667 | bt_new(struct bt_arg *ba, struct bt_stmt *condbs) | ||||
668 | { | ||||
669 | struct bt_arg *bop; | ||||
670 | |||||
671 | bop = ba_op(B_AT_OP_NE, NULL((void *)0), ba); | ||||
672 | |||||
673 | return bs_new(B_AC_TEST, bop, (struct bt_var *)condbs); | ||||
674 | |||||
675 | } | ||||
676 | /* Create a new probe */ | ||||
677 | struct bt_probe * | ||||
678 | bp_new(const char *prov, const char *func, const char *name, int32_t rate) | ||||
679 | { | ||||
680 | struct bt_probe *bp; | ||||
681 | enum bt_ptype ptype; | ||||
682 | |||||
683 | if (rate < 0 || rate > INT32_MAX0x7fffffff) | ||||
684 | errx(1, "only positive values permitted"); | ||||
685 | |||||
686 | if (prov == NULL((void *)0) && func == NULL((void *)0) && name == NULL((void *)0)) | ||||
687 | ptype = rate; /* BEGIN or END */ | ||||
688 | else | ||||
689 | ptype = B_PT_PROBE; | ||||
690 | |||||
691 | bp = calloc(1, sizeof(*bp)); | ||||
692 | if (bp == NULL((void *)0)) | ||||
693 | err(1, "bt_probe: calloc"); | ||||
694 | bp->bp_prov = prov; | ||||
695 | bp->bp_func = func; | ||||
696 | bp->bp_name = name; | ||||
697 | bp->bp_rate = rate; | ||||
698 | bp->bp_type = ptype; | ||||
699 | |||||
700 | return bp; | ||||
701 | } | ||||
702 | |||||
703 | /* | ||||
704 | * Link two probes together, to build a probe list attached to | ||||
705 | * a single action. | ||||
706 | */ | ||||
707 | struct bt_probe * | ||||
708 | bp_append(struct bt_probe *bp0, struct bt_probe *bp1) | ||||
709 | { | ||||
710 | struct bt_probe *bp = bp0; | ||||
711 | |||||
712 | assert(bp1 != NULL)((bp1 != ((void *)0)) ? (void)0 : __assert2("/usr/src/usr.sbin/btrace/bt_parse.y" , 393, __func__, "bp1 != NULL")); | ||||
713 | |||||
714 | if (bp0 == NULL((void *)0)) | ||||
715 | return bp1; | ||||
716 | |||||
717 | while (SLIST_NEXT(bp, bp_next)((bp)->bp_next.sle_next) != NULL((void *)0)) | ||||
718 | bp = SLIST_NEXT(bp, bp_next)((bp)->bp_next.sle_next); | ||||
719 | |||||
720 | SLIST_INSERT_AFTER(bp, bp1, bp_next)do { (bp1)->bp_next.sle_next = (bp)->bp_next.sle_next; ( bp)->bp_next.sle_next = (bp1); } while (0); | ||||
721 | |||||
722 | return bp0; | ||||
723 | } | ||||
724 | |||||
725 | /* Create a new argument */ | ||||
726 | struct bt_arg * | ||||
727 | ba_new0(void *val, enum bt_argtype type) | ||||
728 | { | ||||
729 | struct bt_arg *ba; | ||||
730 | |||||
731 | ba = calloc(1, sizeof(*ba)); | ||||
732 | if (ba == NULL((void *)0)) | ||||
733 | err(1, "bt_arg: calloc"); | ||||
734 | ba->ba_value = val; | ||||
735 | ba->ba_type = type; | ||||
736 | |||||
737 | return ba; | ||||
738 | } | ||||
739 | |||||
740 | /* | ||||
741 | * Link two arguments together, to build an argument list used in | ||||
742 | * function calls. | ||||
743 | */ | ||||
744 | struct bt_arg * | ||||
745 | ba_append(struct bt_arg *da0, struct bt_arg *da1) | ||||
746 | { | ||||
747 | struct bt_arg *ba = da0; | ||||
748 | |||||
749 | assert(da1 != NULL)((da1 != ((void *)0)) ? (void)0 : __assert2("/usr/src/usr.sbin/btrace/bt_parse.y" , 430, __func__, "da1 != NULL")); | ||||
750 | |||||
751 | if (da0 == NULL((void *)0)) | ||||
752 | return da1; | ||||
753 | |||||
754 | while (SLIST_NEXT(ba, ba_next)((ba)->ba_next.sle_next) != NULL((void *)0)) | ||||
755 | ba = SLIST_NEXT(ba, ba_next)((ba)->ba_next.sle_next); | ||||
756 | |||||
757 | SLIST_INSERT_AFTER(ba, da1, ba_next)do { (da1)->ba_next.sle_next = (ba)->ba_next.sle_next; ( ba)->ba_next.sle_next = (da1); } while (0); | ||||
758 | |||||
759 | return da0; | ||||
760 | } | ||||
761 | |||||
762 | /* Create an operator argument */ | ||||
763 | struct bt_arg * | ||||
764 | ba_op(enum bt_argtype op, struct bt_arg *da0, struct bt_arg *da1) | ||||
765 | { | ||||
766 | return ba_new(ba_append(da0, da1), op)ba_new0((void *)(ba_append(da0, da1)), (op)); | ||||
767 | } | ||||
768 | |||||
769 | /* Create a new statement: function call or assignment. */ | ||||
770 | struct bt_stmt * | ||||
771 | bs_new(enum bt_action act, struct bt_arg *head, struct bt_var *var) | ||||
772 | { | ||||
773 | struct bt_stmt *bs; | ||||
774 | |||||
775 | bs = calloc(1, sizeof(*bs)); | ||||
776 | if (bs == NULL((void *)0)) | ||||
777 | err(1, "bt_stmt: calloc"); | ||||
778 | bs->bs_act = act; | ||||
779 | bs->bs_var = var; | ||||
780 | /* SLIST_INSERT_HEAD() nullify the next pointer. */ | ||||
781 | SLIST_FIRST(&bs->bs_args)((&bs->bs_args)->slh_first) = head; | ||||
782 | |||||
783 | return bs; | ||||
784 | } | ||||
785 | |||||
786 | /* Link two statements together, to build an 'action'. */ | ||||
787 | struct bt_stmt * | ||||
788 | bs_append(struct bt_stmt *ds0, struct bt_stmt *ds1) | ||||
789 | { | ||||
790 | struct bt_stmt *bs = ds0; | ||||
791 | |||||
792 | if (ds0 == NULL((void *)0)) | ||||
793 | return ds1; | ||||
794 | |||||
795 | if (ds1 == NULL((void *)0)) | ||||
796 | return ds0; | ||||
797 | |||||
798 | while (SLIST_NEXT(bs, bs_next)((bs)->bs_next.sle_next) != NULL((void *)0)) | ||||
799 | bs = SLIST_NEXT(bs, bs_next)((bs)->bs_next.sle_next); | ||||
800 | |||||
801 | SLIST_INSERT_AFTER(bs, ds1, bs_next)do { (ds1)->bs_next.sle_next = (bs)->bs_next.sle_next; ( bs)->bs_next.sle_next = (ds1); } while (0); | ||||
802 | |||||
803 | return ds0; | ||||
804 | } | ||||
805 | |||||
806 | const char * | ||||
807 | bv_name(struct bt_var *bv) | ||||
808 | { | ||||
809 | if (strncmp(bv->bv_name, UNNAMED_MAP"___unnamed_map_doesnt_have_any_name", strlen(UNNAMED_MAP"___unnamed_map_doesnt_have_any_name")) == 0) | ||||
810 | return ""; | ||||
811 | return bv->bv_name; | ||||
812 | } | ||||
813 | |||||
814 | /* Allocate a variable. */ | ||||
815 | struct bt_var * | ||||
816 | bv_new(const char *vname) | ||||
817 | { | ||||
818 | struct bt_var *bv; | ||||
819 | |||||
820 | bv = calloc(1, sizeof(*bv)); | ||||
821 | if (bv == NULL((void *)0)) | ||||
822 | err(1, "bt_var: calloc"); | ||||
823 | bv->bv_name = vname; | ||||
824 | |||||
825 | return bv; | ||||
826 | } | ||||
827 | |||||
828 | /* Return the global variable corresponding to `vname'. */ | ||||
829 | struct bt_var * | ||||
830 | bg_lookup(const char *vname) | ||||
831 | { | ||||
832 | struct bt_var *bv; | ||||
833 | |||||
834 | SLIST_FOREACH(bv, &g_variables, bv_next)for((bv) = ((&g_variables)->slh_first); (bv) != ((void *)0); (bv) = ((bv)->bv_next.sle_next)) { | ||||
835 | if (strcmp(vname, bv->bv_name) == 0) | ||||
836 | break; | ||||
837 | } | ||||
838 | |||||
839 | return bv; | ||||
840 | } | ||||
841 | |||||
842 | /* Find or allocate a global variable corresponding to `vname' */ | ||||
843 | struct bt_var * | ||||
844 | bg_get(const char *vname) | ||||
845 | { | ||||
846 | struct bt_var *bv; | ||||
847 | |||||
848 | bv = bg_lookup(vname); | ||||
849 | if (bv == NULL((void *)0)) { | ||||
850 | bv = bv_new(vname); | ||||
851 | SLIST_INSERT_HEAD(&g_variables, bv, bv_next)do { (bv)->bv_next.sle_next = (&g_variables)->slh_first ; (&g_variables)->slh_first = (bv); } while (0); | ||||
852 | } | ||||
853 | |||||
854 | return bv; | ||||
855 | } | ||||
856 | |||||
857 | /* Create an "argument" that points to an existing untyped variable. */ | ||||
858 | struct bt_arg * | ||||
859 | bg_find(const char *vname) | ||||
860 | { | ||||
861 | return ba_new(bg_get(vname), B_AT_VAR)ba_new0((void *)(bg_get(vname)), (B_AT_VAR)); | ||||
862 | } | ||||
863 | |||||
864 | /* Create a 'store' statement to assign a value to a global variable. */ | ||||
865 | struct bt_stmt * | ||||
866 | bg_store(const char *vname, struct bt_arg *vval) | ||||
867 | { | ||||
868 | return bs_new(B_AC_STORE, vval, bg_get(vname)); | ||||
869 | } | ||||
870 | |||||
871 | /* Return the local variable corresponding to `vname'. */ | ||||
872 | struct bt_var * | ||||
873 | bl_lookup(const char *vname) | ||||
874 | { | ||||
875 | struct bt_var *bv; | ||||
876 | |||||
877 | SLIST_FOREACH(bv, &l_variables, bv_next)for((bv) = ((&l_variables)->slh_first); (bv) != ((void *)0); (bv) = ((bv)->bv_next.sle_next)) { | ||||
878 | if (strcmp(vname, bv->bv_name) == 0) | ||||
879 | break; | ||||
880 | } | ||||
881 | |||||
882 | return bv; | ||||
883 | } | ||||
884 | |||||
885 | /* Find or create a local variable corresponding to `vname' */ | ||||
886 | struct bt_arg * | ||||
887 | bl_find(const char *vname) | ||||
888 | { | ||||
889 | struct bt_var *bv; | ||||
890 | |||||
891 | bv = bl_lookup(vname); | ||||
892 | if (bv == NULL((void *)0)) { | ||||
893 | bv = bv_new(vname); | ||||
894 | SLIST_INSERT_HEAD(&l_variables, bv, bv_next)do { (bv)->bv_next.sle_next = (&l_variables)->slh_first ; (&l_variables)->slh_first = (bv); } while (0); | ||||
895 | } | ||||
896 | |||||
897 | return ba_new(bv, B_AT_VAR)ba_new0((void *)(bv), (B_AT_VAR)); | ||||
898 | } | ||||
899 | |||||
900 | /* Create a 'store' statement to assign a value to a local variable. */ | ||||
901 | struct bt_stmt * | ||||
902 | bl_store(const char *vname, struct bt_arg *vval) | ||||
903 | { | ||||
904 | struct bt_var *bv; | ||||
905 | |||||
906 | bv = bl_lookup(vname); | ||||
907 | if (bv == NULL((void *)0)) { | ||||
908 | bv = bv_new(vname); | ||||
909 | SLIST_INSERT_HEAD(&l_variables, bv, bv_next)do { (bv)->bv_next.sle_next = (&l_variables)->slh_first ; (&l_variables)->slh_first = (bv); } while (0); | ||||
910 | } | ||||
911 | |||||
912 | return bs_new(B_AC_STORE, vval, bv); | ||||
913 | } | ||||
914 | |||||
915 | struct bt_stmt * | ||||
916 | bm_op(enum bt_action mact, struct bt_arg *ba, struct bt_arg *mval) | ||||
917 | { | ||||
918 | return bs_new(mact, ba, (struct bt_var *)mval); | ||||
919 | } | ||||
920 | |||||
921 | /* Create a 'map store' statement to assign a value to a map entry. */ | ||||
922 | struct bt_stmt * | ||||
923 | bm_insert(const char *mname, struct bt_arg *mkey, struct bt_arg *mval) | ||||
924 | { | ||||
925 | struct bt_arg *ba; | ||||
926 | |||||
927 | ba = ba_new(bg_get(mname), B_AT_MAP)ba_new0((void *)(bg_get(mname)), (B_AT_MAP)); | ||||
928 | ba->ba_key = mkey; | ||||
929 | |||||
930 | return bs_new(B_AC_INSERT, ba, (struct bt_var *)mval); | ||||
931 | } | ||||
932 | |||||
933 | /* Create an argument that points to a variable and attach a key to it. */ | ||||
934 | struct bt_arg * | ||||
935 | bm_find(const char *vname, struct bt_arg *mkey) | ||||
936 | { | ||||
937 | struct bt_arg *ba; | ||||
938 | |||||
939 | ba = ba_new(bg_get(vname), B_AT_MAP)ba_new0((void *)(bg_get(vname)), (B_AT_MAP)); | ||||
940 | ba->ba_key = mkey; | ||||
941 | return ba; | ||||
942 | } | ||||
943 | |||||
944 | /* | ||||
945 | * Histograms implemented using associative arrays (maps). In the case | ||||
946 | * of linear histograms `ba_key' points to a list of (min, max, step) | ||||
947 | * necessary to "bucketize" any value. | ||||
948 | */ | ||||
949 | struct bt_stmt * | ||||
950 | bh_inc(const char *hname, struct bt_arg *hval, struct bt_arg *hrange) | ||||
951 | { | ||||
952 | struct bt_arg *ba; | ||||
953 | |||||
954 | if (hrange == NULL((void *)0)) { | ||||
955 | /* Power-of-2 histogram */ | ||||
956 | } else { | ||||
957 | long min = 0, max; | ||||
958 | int count = 0; | ||||
959 | |||||
960 | /* Linear histogram */ | ||||
961 | for (ba = hrange; ba != NULL((void *)0); ba = SLIST_NEXT(ba, ba_next)((ba)->ba_next.sle_next)) { | ||||
962 | if (++count > 3) | ||||
963 | yyerror("too many arguments"); | ||||
964 | if (ba->ba_type != B_AT_LONG) | ||||
965 | yyerror("type invalid"); | ||||
966 | |||||
967 | switch (count) { | ||||
968 | case 1: | ||||
969 | min = (long)ba->ba_value; | ||||
970 | if (min >= 0) | ||||
971 | break; | ||||
972 | yyerror("negative minium"); | ||||
973 | case 2: | ||||
974 | max = (long)ba->ba_value; | ||||
975 | if (max > min) | ||||
976 | break; | ||||
977 | yyerror("maximum smaller than minium (%d < %d)", | ||||
978 | max, min); | ||||
979 | case 3: | ||||
980 | break; | ||||
981 | default: | ||||
982 | assert(0)((0) ? (void)0 : __assert2("/usr/src/usr.sbin/btrace/bt_parse.y" , 663, __func__, "0")); | ||||
983 | } | ||||
984 | } | ||||
985 | if (count < 3) | ||||
986 | yyerror("%d missing arguments", 3 - count); | ||||
987 | } | ||||
988 | |||||
989 | ba = ba_new(bg_get(hname), B_AT_HIST)ba_new0((void *)(bg_get(hname)), (B_AT_HIST)); | ||||
990 | ba->ba_key = hrange; | ||||
991 | return bs_new(B_AC_BUCKETIZE, ba, (struct bt_var *)hval); | ||||
992 | } | ||||
993 | |||||
994 | struct keyword { | ||||
995 | const char *word; | ||||
996 | int token; | ||||
997 | int type; | ||||
998 | }; | ||||
999 | |||||
1000 | int | ||||
1001 | kw_cmp(const void *str, const void *xkw) | ||||
1002 | { | ||||
1003 | return (strcmp(str, ((const struct keyword *)xkw)->word)); | ||||
1004 | } | ||||
1005 | |||||
1006 | struct keyword * | ||||
1007 | lookup(char *s) | ||||
1008 | { | ||||
1009 | static const struct keyword kws[] = { | ||||
1010 | { "BEGIN", BEGIN268, B_PT_BEGIN }, | ||||
1011 | { "END", END269, B_PT_END }, | ||||
1012 | { "arg0", BUILTIN267, B_AT_BI_ARG0 }, | ||||
1013 | { "arg1", BUILTIN267, B_AT_BI_ARG1 }, | ||||
1014 | { "arg2", BUILTIN267, B_AT_BI_ARG2 }, | ||||
1015 | { "arg3", BUILTIN267, B_AT_BI_ARG3 }, | ||||
1016 | { "arg4", BUILTIN267, B_AT_BI_ARG4 }, | ||||
1017 | { "arg5", BUILTIN267, B_AT_BI_ARG5 }, | ||||
1018 | { "arg6", BUILTIN267, B_AT_BI_ARG6 }, | ||||
1019 | { "arg7", BUILTIN267, B_AT_BI_ARG7 }, | ||||
1020 | { "arg8", BUILTIN267, B_AT_BI_ARG8 }, | ||||
1021 | { "arg9", BUILTIN267, B_AT_BI_ARG9 }, | ||||
1022 | { "clear", MFUNC274, B_AC_CLEAR }, | ||||
1023 | { "comm", BUILTIN267, B_AT_BI_COMM }, | ||||
1024 | { "count", MOP0281, B_AT_MF_COUNT }, | ||||
1025 | { "cpu", BUILTIN267, B_AT_BI_CPU }, | ||||
1026 | { "delete", F_DELETE272, B_AC_DELETE }, | ||||
1027 | { "exit", FUNC0275, B_AC_EXIT }, | ||||
1028 | { "hist", OP1278, 0 }, | ||||
1029 | { "hz", HZ270, 0 }, | ||||
1030 | { "if", IF271, 0 }, | ||||
1031 | { "kstack", BUILTIN267, B_AT_BI_KSTACK }, | ||||
1032 | { "lhist", OP4280, 0 }, | ||||
1033 | { "max", MOP1282, B_AT_MF_MAX }, | ||||
1034 | { "min", MOP1282, B_AT_MF_MIN }, | ||||
1035 | { "nsecs", BUILTIN267, B_AT_BI_NSECS }, | ||||
1036 | { "pid", BUILTIN267, B_AT_BI_PID }, | ||||
1037 | { "print", F_PRINT273, B_AC_PRINT }, | ||||
1038 | { "printf", FUNCN277, B_AC_PRINTF }, | ||||
1039 | { "probe", BUILTIN267, B_AT_BI_PROBE }, | ||||
1040 | { "retval", BUILTIN267, B_AT_BI_RETVAL }, | ||||
1041 | { "str", STR286, B_AT_FN_STR }, | ||||
1042 | { "sum", MOP1282, B_AT_MF_SUM }, | ||||
1043 | { "tid", BUILTIN267, B_AT_BI_TID }, | ||||
1044 | { "time", FUNC1276, B_AC_TIME }, | ||||
1045 | { "ustack", BUILTIN267, B_AT_BI_USTACK }, | ||||
1046 | { "zero", MFUNC274, B_AC_ZERO }, | ||||
1047 | }; | ||||
1048 | |||||
1049 | return bsearch(s, kws, nitems(kws)(sizeof((kws)) / sizeof((kws)[0])), sizeof(kws[0]), kw_cmp); | ||||
1050 | } | ||||
1051 | |||||
1052 | int | ||||
1053 | peek(void) | ||||
1054 | { | ||||
1055 | if (pbuf != NULL((void *)0)) { | ||||
1056 | if (pindex < plen) | ||||
1057 | return pbuf[pindex]; | ||||
1058 | } | ||||
1059 | return EOF(-1); | ||||
1060 | } | ||||
1061 | |||||
1062 | int | ||||
1063 | lgetc(void) | ||||
1064 | { | ||||
1065 | if (pbuf != NULL((void *)0)) { | ||||
1066 | if (pindex < plen) { | ||||
1067 | yylval.colno++; | ||||
1068 | return pbuf[pindex++]; | ||||
1069 | } | ||||
1070 | } | ||||
1071 | return EOF(-1); | ||||
1072 | } | ||||
1073 | |||||
1074 | void | ||||
1075 | lungetc(void) | ||||
1076 | { | ||||
1077 | if (pbuf != NULL((void *)0) && pindex > 0) { | ||||
1078 | yylval.colno--; | ||||
1079 | pindex--; | ||||
1080 | } | ||||
1081 | } | ||||
1082 | |||||
1083 | int | ||||
1084 | yylex(void) | ||||
1085 | { | ||||
1086 | unsigned char buf[1024]; | ||||
1087 | unsigned char *ebuf, *p, *str; | ||||
1088 | int c; | ||||
1089 | |||||
1090 | ebuf = buf + sizeof(buf); | ||||
1091 | p = buf; | ||||
1092 | |||||
1093 | again: | ||||
1094 | /* skip whitespaces */ | ||||
1095 | for (c = lgetc(); isspace(c); c = lgetc()) { | ||||
1096 | if (c == '\n') { | ||||
1097 | yylval.lineno++; | ||||
1098 | yylval.colno = 0; | ||||
1099 | } | ||||
1100 | } | ||||
1101 | |||||
1102 | /* skip single line comments and shell magic */ | ||||
1103 | if ((c == '/' && peek() == '/') || | ||||
1104 | (yylval.lineno == 1 && yylval.colno == 1 && c == '#' && | ||||
1105 | peek() == '!')) { | ||||
1106 | for (c = lgetc(); c != EOF(-1); c = lgetc()) { | ||||
1107 | if (c == '\n') { | ||||
1108 | yylval.lineno++; | ||||
1109 | yylval.colno = 0; | ||||
1110 | goto again; | ||||
1111 | } | ||||
1112 | } | ||||
1113 | } | ||||
1114 | |||||
1115 | /* skip multi line comments */ | ||||
1116 | if (c == '/' && peek() == '*') { | ||||
1117 | int pc; | ||||
1118 | |||||
1119 | for (pc = 0, c = lgetc(); c != EOF(-1); c = lgetc()) { | ||||
1120 | if (pc == '*' && c == '/') | ||||
1121 | goto again; | ||||
1122 | else if (c == '\n') | ||||
1123 | yylval.lineno++; | ||||
1124 | pc = c; | ||||
1125 | } | ||||
1126 | } | ||||
1127 | |||||
1128 | switch (c) { | ||||
1129 | case '!': | ||||
1130 | case '=': | ||||
1131 | if (peek() == '=') { | ||||
1132 | lgetc(); | ||||
1133 | return (c == '=') ? OP_EQ259 : OP_NE260; | ||||
1134 | } | ||||
1135 | return c; | ||||
1136 | case '<': | ||||
1137 | if (peek() == '=') { | ||||
1138 | lgetc(); | ||||
1139 | return OP_LE261; | ||||
1140 | } | ||||
1141 | return OP_LT262; | ||||
1142 | case '>': | ||||
1143 | if (peek() == '=') { | ||||
1144 | lgetc(); | ||||
1145 | return OP_GE263; | ||||
1146 | } | ||||
1147 | return OP_GT264; | ||||
1148 | case '&': | ||||
1149 | if (peek() == '&') { | ||||
1150 | lgetc(); | ||||
1151 | return OP_LAND265; | ||||
1152 | } | ||||
1153 | return c; | ||||
1154 | case '|': | ||||
1155 | if (peek() == '|') { | ||||
1156 | lgetc(); | ||||
1157 | return OP_LOR266; | ||||
1158 | } | ||||
1159 | return c; | ||||
1160 | case '/': | ||||
1161 | if (peek() == '{' || peek() == '/' || peek() == '\n') { | ||||
1162 | return ENDFILT258; | ||||
1163 | } | ||||
1164 | /* FALLTHROUGH */ | ||||
1165 | case ',': | ||||
1166 | case '(': | ||||
1167 | case ')': | ||||
1168 | case '{': | ||||
1169 | case '}': | ||||
1170 | case ':': | ||||
1171 | case ';': | ||||
1172 | return c; | ||||
1173 | case EOF(-1): | ||||
1174 | return 0; | ||||
1175 | case '"': | ||||
1176 | /* parse C-like string */ | ||||
1177 | while ((c = lgetc()) != EOF(-1) && c != '"') { | ||||
1178 | if (c == '\\') { | ||||
1179 | c = lgetc(); | ||||
1180 | switch (c) { | ||||
1181 | case '\\': c = '\\'; break; | ||||
1182 | case '\'': c = '\''; break; | ||||
1183 | case '"': c = '"'; break; | ||||
1184 | case 'a': c = '\a'; break; | ||||
1185 | case 'b': c = '\b'; break; | ||||
1186 | case 'e': c = 033; break; | ||||
1187 | case 'f': c = '\f'; break; | ||||
1188 | case 'n': c = '\n'; break; | ||||
1189 | case 'r': c = '\r'; break; | ||||
1190 | case 't': c = '\t'; break; | ||||
1191 | case 'v': c = '\v'; break; | ||||
1192 | default: | ||||
1193 | yyerror("'%c' unsuported escape", c); | ||||
1194 | return ERROR257; | ||||
1195 | } | ||||
1196 | } | ||||
1197 | *p++ = c; | ||||
1198 | if (p == ebuf) { | ||||
1199 | yyerror("too long line"); | ||||
1200 | return ERROR257; | ||||
1201 | } | ||||
1202 | } | ||||
1203 | if (c == EOF(-1)) { | ||||
1204 | yyerror("\"%s\" invalid EOF", buf); | ||||
1205 | return ERROR257; | ||||
1206 | } | ||||
1207 | *p++ = '\0'; | ||||
1208 | if ((str = strdup(buf)) == NULL((void *)0)) | ||||
1209 | err(1, "%s", __func__); | ||||
1210 | yylval.v.string = str; | ||||
1211 | return CSTRING284; | ||||
1212 | default: | ||||
1213 | break; | ||||
1214 | } | ||||
1215 | |||||
1216 | #define allowed_to_end_number(x)(isspace(x) || x == ')' || x == '/' || x == '{' || x == ';' || x == ']' || x == ',') \ | ||||
1217 | (isspace(x) || x == ')' || x == '/' || x == '{' || x == ';' || x == ']' || x == ',') | ||||
1218 | |||||
1219 | /* parsing number */ | ||||
1220 | if (isdigit(c)) { | ||||
1221 | do { | ||||
1222 | *p++ = c; | ||||
1223 | if (p == ebuf) { | ||||
1224 | yyerror("too long line"); | ||||
1225 | return ERROR257; | ||||
1226 | } | ||||
1227 | } while ((c = lgetc()) != EOF(-1) && isdigit(c)); | ||||
1228 | lungetc(); | ||||
1229 | if (c == EOF(-1) || allowed_to_end_number(c)(isspace(c) || c == ')' || c == '/' || c == '{' || c == ';' || c == ']' || c == ',')) { | ||||
1230 | const char *errstr = NULL((void *)0); | ||||
1231 | |||||
1232 | *p = '\0'; | ||||
1233 | yylval.v.number = strtonum(buf, LONG_MIN(-9223372036854775807L -1L), LONG_MAX9223372036854775807L, | ||||
1234 | &errstr); | ||||
1235 | if (errstr) { | ||||
1236 | yyerror("invalid number '%s' (%s)", buf, | ||||
1237 | errstr); | ||||
1238 | return ERROR257; | ||||
1239 | } | ||||
1240 | return NUMBER285; | ||||
1241 | } else { | ||||
1242 | while (p > buf + 1) { | ||||
1243 | --p; | ||||
1244 | lungetc(); | ||||
1245 | } | ||||
1246 | c = *--p; | ||||
1247 | } | ||||
1248 | } | ||||
1249 | |||||
1250 | #define allowed_in_string(x)(isalnum(c) || c == '_') (isalnum(c) || c == '_') | ||||
1251 | |||||
1252 | /* parsing next word */ | ||||
1253 | if (allowed_in_string(c)(isalnum(c) || c == '_')) { | ||||
1254 | struct keyword *kwp; | ||||
1255 | do { | ||||
1256 | *p++ = c; | ||||
1257 | if (p == ebuf) { | ||||
1258 | yyerror("too long line"); | ||||
1259 | return ERROR257; | ||||
1260 | } | ||||
1261 | } while ((c = lgetc()) != EOF(-1) && (allowed_in_string(c)(isalnum(c) || c == '_'))); | ||||
1262 | lungetc(); | ||||
1263 | *p = '\0'; | ||||
1264 | kwp = lookup(buf); | ||||
1265 | if (kwp == NULL((void *)0)) { | ||||
1266 | if ((yylval.v.string = strdup(buf)) == NULL((void *)0)) | ||||
1267 | err(1, "%s", __func__); | ||||
1268 | return STRING283; | ||||
1269 | } | ||||
1270 | if (pflag) { | ||||
1271 | /* | ||||
1272 | * Probe lexer backdoor, interpret the token as a string | ||||
1273 | * rather than a keyword. Otherwise, reserved keywords | ||||
1274 | * would conflict with syscall names. The exception to | ||||
1275 | * this is 'hz', which hopefully will never be a | ||||
1276 | * syscall. | ||||
1277 | */ | ||||
1278 | if (kwp->token != HZ270) { | ||||
1279 | yylval.v.string = kwp->word; | ||||
1280 | return STRING283; | ||||
1281 | } | ||||
1282 | } | ||||
1283 | yylval.v.i = kwp->type; | ||||
1284 | return kwp->token; | ||||
1285 | } | ||||
1286 | |||||
1287 | if (c == '\n') { | ||||
1288 | yylval.lineno++; | ||||
1289 | yylval.colno = 0; | ||||
1290 | } | ||||
1291 | if (c == EOF(-1)) | ||||
1292 | return 0; | ||||
1293 | return c; | ||||
1294 | } | ||||
1295 | |||||
1296 | void | ||||
1297 | pprint_syntax_error(void) | ||||
1298 | { | ||||
1299 | char line[BUFSIZ1024]; | ||||
1300 | int c, indent = yylval.colno; | ||||
1301 | size_t i; | ||||
1302 | |||||
1303 | strlcpy(line, &pbuf[pindex - yylval.colno], sizeof(line)); | ||||
1304 | |||||
1305 | for (i = 0; line[i] != '\0' && (c = line[i]) != '\n'; i++) { | ||||
1306 | if (c == '\t') | ||||
1307 | indent += (8 - 1); | ||||
1308 | fputc(c, stderr(&__sF[2])); | ||||
1309 | } | ||||
1310 | |||||
1311 | fprintf(stderr(&__sF[2]), "\n%*c\n", indent, '^'); | ||||
1312 | } | ||||
1313 | |||||
1314 | void | ||||
1315 | yyerror(const char *fmt, ...) | ||||
1316 | { | ||||
1317 | const char *prefix; | ||||
1318 | va_list va; | ||||
1319 | |||||
1320 | prefix = (yylval.filename != NULL((void *)0)) ? yylval.filename : getprogname(); | ||||
1321 | |||||
1322 | fprintf(stderr(&__sF[2]), "%s:%d:%d: ", prefix, yylval.lineno, yylval.colno); | ||||
1323 | va_start(va, fmt)__builtin_va_start(va, fmt); | ||||
1324 | vfprintf(stderr(&__sF[2]), fmt, va); | ||||
1325 | va_end(va)__builtin_va_end(va); | ||||
1326 | fprintf(stderr(&__sF[2]), ":\n"); | ||||
1327 | |||||
1328 | pprint_syntax_error(); | ||||
1329 | |||||
1330 | perrors++; | ||||
1331 | } | ||||
1332 | |||||
1333 | int | ||||
1334 | btparse(const char *str, size_t len, const char *filename, int debug) | ||||
1335 | { | ||||
1336 | if (debug > 0) | ||||
1337 | yydebug = 1; | ||||
1338 | pbuf = str; | ||||
1339 | plen = len; | ||||
1340 | pindex = 0; | ||||
1341 | yylval.filename = filename; | ||||
1342 | yylval.lineno = 1; | ||||
1343 | |||||
1344 | yyparse(); | ||||
1345 | if (perrors) | ||||
1346 | return perrors; | ||||
1347 | |||||
1348 | assert(SLIST_EMPTY(&l_variables))(((((&l_variables)->slh_first) == ((void *)0))) ? (void )0 : __assert2("/usr/src/usr.sbin/btrace/bt_parse.y", 1029, __func__ , "SLIST_EMPTY(&l_variables)")); | ||||
1349 | |||||
1350 | return 0; | ||||
1351 | } | ||||
1352 | #line 1345 "bt_parse.c" | ||||
1353 | /* allocate initial stack or double stack size, up to YYMAXDEPTH */ | ||||
1354 | static int yygrowstack(void) | ||||
1355 | { | ||||
1356 | unsigned int newsize; | ||||
1357 | long sslen; | ||||
1358 | short *newss; | ||||
1359 | YYSTYPEyystype *newvs; | ||||
1360 | |||||
1361 | if ((newsize = yystacksize) == 0) | ||||
1362 | newsize = YYINITSTACKSIZE200; | ||||
1363 | else if (newsize >= YYMAXDEPTH10000) | ||||
1364 | return -1; | ||||
1365 | else if ((newsize *= 2) > YYMAXDEPTH10000) | ||||
1366 | newsize = YYMAXDEPTH10000; | ||||
1367 | sslen = yyssp - yyss; | ||||
1368 | #ifdef SIZE_MAX0xffffffffffffffffUL | ||||
1369 | #define YY_SIZE_MAX0xffffffffffffffffUL SIZE_MAX0xffffffffffffffffUL | ||||
1370 | #else | ||||
1371 | #define YY_SIZE_MAX0xffffffffffffffffUL 0xffffffffU | ||||
1372 | #endif | ||||
1373 | if (newsize && YY_SIZE_MAX0xffffffffffffffffUL / newsize < sizeof *newss) | ||||
1374 | goto bail; | ||||
1375 | newss = (short *)realloc(yyss, newsize * sizeof *newss); | ||||
1376 | if (newss == NULL((void *)0)) | ||||
1377 | goto bail; | ||||
1378 | yyss = newss; | ||||
1379 | yyssp = newss + sslen; | ||||
1380 | if (newsize
| ||||
1381 | goto bail; | ||||
1382 | newvs = (YYSTYPEyystype *)realloc(yyvs, newsize * sizeof *newvs); | ||||
1383 | if (newvs == NULL((void *)0)) | ||||
1384 | goto bail; | ||||
1385 | yyvs = newvs; | ||||
1386 | yyvsp = newvs + sslen; | ||||
1387 | yystacksize = newsize; | ||||
1388 | yysslim = yyss + newsize - 1; | ||||
1389 | return 0; | ||||
1390 | bail: | ||||
1391 | if (yyss) | ||||
1392 | free(yyss); | ||||
1393 | if (yyvs) | ||||
1394 | free(yyvs); | ||||
1395 | yyss = yyssp = NULL((void *)0); | ||||
1396 | yyvs = yyvsp = NULL((void *)0); | ||||
1397 | yystacksize = 0; | ||||
1398 | return -1; | ||||
1399 | } | ||||
1400 | |||||
1401 | #define YYABORTgoto yyabort goto yyabort | ||||
1402 | #define YYREJECTgoto yyabort goto yyabort | ||||
1403 | #define YYACCEPTgoto yyaccept goto yyaccept | ||||
1404 | #define YYERRORgoto yyerrlab goto yyerrlab | ||||
1405 | int | ||||
1406 | yyparse(void) | ||||
1407 | { | ||||
1408 | int yym, yyn, yystate; | ||||
1409 | #if YYDEBUG0 | ||||
1410 | const char *yys; | ||||
1411 | |||||
1412 | if ((yys = getenv("YYDEBUG"))) | ||||
1413 | { | ||||
1414 | yyn = *yys; | ||||
1415 | if (yyn >= '0' && yyn <= '9') | ||||
1416 | yydebug = yyn - '0'; | ||||
1417 | } | ||||
1418 | #endif /* YYDEBUG */ | ||||
1419 | |||||
1420 | yynerrs = 0; | ||||
1421 | yyerrflag = 0; | ||||
1422 | yychar = (-1); | ||||
1423 | |||||
1424 | if (yyss == NULL((void *)0) && yygrowstack()) goto yyoverflow; | ||||
| |||||
1425 | yyssp = yyss; | ||||
1426 | yyvsp = yyvs; | ||||
1427 | *yyssp = yystate = 0; | ||||
1428 | |||||
1429 | yyloop: | ||||
1430 | if ((yyn = yydefred[yystate]) != 0) goto yyreduce; | ||||
1431 | if (yychar
| ||||
1432 | { | ||||
1433 | if ((yychar = yylex()) < 0) yychar = 0; | ||||
1434 | #if YYDEBUG0 | ||||
1435 | if (yydebug) | ||||
1436 | { | ||||
1437 | yys = 0; | ||||
1438 | if (yychar <= YYMAXTOKEN286) yys = yyname[yychar]; | ||||
1439 | if (!yys) yys = "illegal-symbol"; | ||||
1440 | printf("%sdebug: state %d, reading %d (%s)\n", | ||||
1441 | YYPREFIX"yy", yystate, yychar, yys); | ||||
1442 | } | ||||
1443 | #endif | ||||
1444 | } | ||||
1445 | if ((yyn = yysindex[yystate]) && (yyn += yychar) >= 0 && | ||||
1446 | yyn <= YYTABLESIZE1148 && yycheck[yyn] == yychar) | ||||
1447 | { | ||||
1448 | #if YYDEBUG0 | ||||
1449 | if (yydebug) | ||||
1450 | printf("%sdebug: state %d, shifting to state %d\n", | ||||
1451 | YYPREFIX"yy", yystate, yytable[yyn]); | ||||
1452 | #endif | ||||
1453 | if (yyssp >= yysslim && yygrowstack()) | ||||
1454 | { | ||||
1455 | goto yyoverflow; | ||||
1456 | } | ||||
1457 | *++yyssp = yystate = yytable[yyn]; | ||||
1458 | *++yyvsp = yylval; | ||||
1459 | yychar = (-1); | ||||
1460 | if (yyerrflag > 0) --yyerrflag; | ||||
1461 | goto yyloop; | ||||
1462 | } | ||||
1463 | if ((yyn = yyrindex[yystate]) && (yyn += yychar) >= 0 && | ||||
1464 | yyn <= YYTABLESIZE1148 && yycheck[yyn] == yychar) | ||||
1465 | { | ||||
1466 | yyn = yytable[yyn]; | ||||
1467 | goto yyreduce; | ||||
1468 | } | ||||
1469 | if (yyerrflag) goto yyinrecovery; | ||||
1470 | #if defined(__GNUC__4) | ||||
1471 | goto yynewerror; | ||||
1472 | #endif | ||||
1473 | yynewerror: | ||||
1474 | yyerror("syntax error"); | ||||
1475 | #if defined(__GNUC__4) | ||||
1476 | goto yyerrlab; | ||||
1477 | #endif | ||||
1478 | yyerrlab: | ||||
1479 | ++yynerrs; | ||||
1480 | yyinrecovery: | ||||
1481 | if (yyerrflag < 3) | ||||
1482 | { | ||||
1483 | yyerrflag = 3; | ||||
1484 | for (;;) | ||||
1485 | { | ||||
1486 | if ((yyn = yysindex[*yyssp]) && (yyn += YYERRCODE256) >= 0 && | ||||
1487 | yyn <= YYTABLESIZE1148 && yycheck[yyn] == YYERRCODE256) | ||||
1488 | { | ||||
1489 | #if YYDEBUG0 | ||||
1490 | if (yydebug) | ||||
1491 | printf("%sdebug: state %d, error recovery shifting\ | ||||
1492 | to state %d\n", YYPREFIX"yy", *yyssp, yytable[yyn]); | ||||
1493 | #endif | ||||
1494 | if (yyssp >= yysslim && yygrowstack()) | ||||
1495 | { | ||||
1496 | goto yyoverflow; | ||||
1497 | } | ||||
1498 | *++yyssp = yystate = yytable[yyn]; | ||||
| |||||
1499 | *++yyvsp = yylval; | ||||
1500 | goto yyloop; | ||||
1501 | } | ||||
1502 | else | ||||
1503 | { | ||||
1504 | #if YYDEBUG0 | ||||
1505 | if (yydebug) | ||||
1506 | printf("%sdebug: error recovery discarding state %d\n", | ||||
1507 | YYPREFIX"yy", *yyssp); | ||||
1508 | #endif | ||||
1509 | if (yyssp <= yyss) goto yyabort; | ||||
1510 | --yyssp; | ||||
1511 | --yyvsp; | ||||
1512 | } | ||||
1513 | } | ||||
1514 | } | ||||
1515 | else | ||||
1516 | { | ||||
1517 | if (yychar == 0) goto yyabort; | ||||
1518 | #if YYDEBUG0 | ||||
1519 | if (yydebug) | ||||
1520 | { | ||||
1521 | yys = 0; | ||||
1522 | if (yychar <= YYMAXTOKEN286) yys = yyname[yychar]; | ||||
1523 | if (!yys) yys = "illegal-symbol"; | ||||
1524 | printf("%sdebug: state %d, error recovery discards token %d (%s)\n", | ||||
1525 | YYPREFIX"yy", yystate, yychar, yys); | ||||
1526 | } | ||||
1527 | #endif | ||||
1528 | yychar = (-1); | ||||
1529 | goto yyloop; | ||||
1530 | } | ||||
1531 | yyreduce: | ||||
1532 | #if YYDEBUG0 | ||||
1533 | if (yydebug) | ||||
1534 | printf("%sdebug: state %d, reducing by rule %d (%s)\n", | ||||
1535 | YYPREFIX"yy", yystate, yyn, yyrule[yyn]); | ||||
1536 | #endif | ||||
1537 | yym = yylen[yyn]; | ||||
1538 | if (yym
| ||||
1539 | yyval = yyvsp[1-yym]; | ||||
1540 | else | ||||
1541 | memset(&yyval, 0, sizeof yyval); | ||||
1542 | switch (yyn) | ||||
1543 | { | ||||
1544 | case 5: | ||||
1545 | #line 140 "/usr/src/usr.sbin/btrace/bt_parse.y" | ||||
1546 | { br_new(yyvsp[-2].v.probe, yyvsp[-1].v.filter, yyvsp[0].v.stmt); } | ||||
1547 | break; | ||||
1548 | case 8: | ||||
1549 | #line 145 "/usr/src/usr.sbin/btrace/bt_parse.y" | ||||
1550 | { yyval.v.probe = bp_append(yyvsp[-2].v.probe, yyvsp[0].v.probe); } | ||||
1551 | break; | ||||
1552 | case 10: | ||||
1553 | #line 149 "/usr/src/usr.sbin/btrace/bt_parse.y" | ||||
1554 | { pflag = 1; } | ||||
1555 | break; | ||||
1556 | case 11: | ||||
1557 | #line 149 "/usr/src/usr.sbin/btrace/bt_parse.y" | ||||
1558 | { yyval.v.probe = yyvsp[0].v.probe; pflag = 0; } | ||||
1559 | break; | ||||
1560 | case 12: | ||||
1561 | #line 150 "/usr/src/usr.sbin/btrace/bt_parse.y" | ||||
1562 | { yyval.v.probe = bp_new(NULL((void *)0), NULL((void *)0), NULL((void *)0), yyvsp[0].v.i); } | ||||
1563 | break; | ||||
1564 | case 13: | ||||
1565 | #line 153 "/usr/src/usr.sbin/btrace/bt_parse.y" | ||||
1566 | { yyval.v.probe = bp_new(yyvsp[-4].v.string, yyvsp[-2].v.string, yyvsp[0].v.string, 0); } | ||||
1567 | break; | ||||
1568 | case 14: | ||||
1569 | #line 154 "/usr/src/usr.sbin/btrace/bt_parse.y" | ||||
1570 | { yyval.v.probe = bp_new(yyvsp[-4].v.string, "hz", NULL((void *)0), yyvsp[0].v.number); } | ||||
1571 | break; | ||||
1572 | case 15: | ||||
1573 | #line 157 "/usr/src/usr.sbin/btrace/bt_parse.y" | ||||
1574 | { yyval.v.arg = get_varg(yyvsp[0].v.number); } | ||||
1575 | break; | ||||
1576 | case 16: | ||||
1577 | #line 158 "/usr/src/usr.sbin/btrace/bt_parse.y" | ||||
1578 | { yyval.v.arg = get_nargs(); } | ||||
1579 | break; | ||||
1580 | case 17: | ||||
1581 | #line 161 "/usr/src/usr.sbin/btrace/bt_parse.y" | ||||
1582 | { yyval.v.string = yyvsp[0].v.string; } | ||||
1583 | break; | ||||
1584 | case 18: | ||||
1585 | #line 162 "/usr/src/usr.sbin/btrace/bt_parse.y" | ||||
1586 | { yyval.v.string = UNNAMED_MAP"___unnamed_map_doesnt_have_any_name"; } | ||||
1587 | break; | ||||
1588 | case 19: | ||||
1589 | #line 165 "/usr/src/usr.sbin/btrace/bt_parse.y" | ||||
1590 | { yyval.v.string = yyvsp[0].v.string; } | ||||
1591 | break; | ||||
1592 | case 20: | ||||
1593 | #line 168 "/usr/src/usr.sbin/btrace/bt_parse.y" | ||||
1594 | { yyval.v.arg = bm_find(yyvsp[-3].v.string, yyvsp[-1].v.arg); } | ||||
1595 | break; | ||||
1596 | case 21: | ||||
1597 | #line 171 "/usr/src/usr.sbin/btrace/bt_parse.y" | ||||
1598 | { yyval.v.arg = ba_new(NULL, yyvsp[-2].v.i)ba_new0((void *)(((void *)0)), (yyvsp[-2].v.i)); } | ||||
1599 | break; | ||||
1600 | case 22: | ||||
1601 | #line 172 "/usr/src/usr.sbin/btrace/bt_parse.y" | ||||
1602 | { yyval.v.arg = ba_new(yyvsp[-1].v.arg, yyvsp[-3].v.i)ba_new0((void *)(yyvsp[-1].v.arg), (yyvsp[-3].v.i)); } | ||||
1603 | break; | ||||
1604 | case 24: | ||||
1605 | #line 176 "/usr/src/usr.sbin/btrace/bt_parse.y" | ||||
1606 | { yyval.v.arg = ba_new(yyvsp[0].v.string, B_AT_STR)ba_new0((void *)(yyvsp[0].v.string), (B_AT_STR)); } | ||||
1607 | break; | ||||
1608 | case 26: | ||||
1609 | #line 180 "/usr/src/usr.sbin/btrace/bt_parse.y" | ||||
1610 | { yyval.v.filter = NULL((void *)0); } | ||||
1611 | break; | ||||
1612 | case 27: | ||||
1613 | #line 181 "/usr/src/usr.sbin/btrace/bt_parse.y" | ||||
1614 | { yyval.v.filter = bc_new(NULL((void *)0), B_AT_OP_NE, yyvsp[-1].v.arg); } | ||||
1615 | break; | ||||
1616 | case 28: | ||||
1617 | #line 190 "/usr/src/usr.sbin/btrace/bt_parse.y" | ||||
1618 | { yyval.v.arg = ba_op(B_AT_OP_LAND, yyvsp[-2].v.arg, yyvsp[0].v.arg); } | ||||
1619 | break; | ||||
1620 | case 29: | ||||
1621 | #line 191 "/usr/src/usr.sbin/btrace/bt_parse.y" | ||||
1622 | { yyval.v.arg = ba_op(B_AT_OP_LOR, yyvsp[-2].v.arg, yyvsp[0].v.arg); } | ||||
1623 | break; | ||||
1624 | case 31: | ||||
1625 | #line 195 "/usr/src/usr.sbin/btrace/bt_parse.y" | ||||
1626 | { yyval.v.arg = ba_op(B_AT_OP_EQ, yyvsp[-2].v.arg, yyvsp[0].v.arg); } | ||||
1627 | break; | ||||
1628 | case 32: | ||||
1629 | #line 196 "/usr/src/usr.sbin/btrace/bt_parse.y" | ||||
1630 | { yyval.v.arg = ba_op(B_AT_OP_NE, yyvsp[-2].v.arg, yyvsp[0].v.arg); } | ||||
1631 | break; | ||||
1632 | case 33: | ||||
1633 | #line 197 "/usr/src/usr.sbin/btrace/bt_parse.y" | ||||
1634 | { yyval.v.arg = ba_op(B_AT_OP_LE, yyvsp[-2].v.arg, yyvsp[0].v.arg); } | ||||
1635 | break; | ||||
1636 | case 34: | ||||
1637 | #line 198 "/usr/src/usr.sbin/btrace/bt_parse.y" | ||||
1638 | { yyval.v.arg = ba_op(B_AT_OP_LT, yyvsp[-2].v.arg, yyvsp[0].v.arg); } | ||||
1639 | break; | ||||
1640 | case 35: | ||||
1641 | #line 199 "/usr/src/usr.sbin/btrace/bt_parse.y" | ||||
1642 | { yyval.v.arg = ba_op(B_AT_OP_GE, yyvsp[-2].v.arg, yyvsp[0].v.arg); } | ||||
1643 | break; | ||||
1644 | case 36: | ||||
1645 | #line 200 "/usr/src/usr.sbin/btrace/bt_parse.y" | ||||
1646 | { yyval.v.arg = ba_op(B_AT_OP_GT, yyvsp[-2].v.arg, yyvsp[0].v.arg); } | ||||
1647 | break; | ||||
1648 | case 37: | ||||
1649 | #line 201 "/usr/src/usr.sbin/btrace/bt_parse.y" | ||||
1650 | { yyval.v.arg = ba_op(B_AT_OP_PLUS, yyvsp[-2].v.arg, yyvsp[0].v.arg); } | ||||
1651 | break; | ||||
1652 | case 38: | ||||
1653 | #line 202 "/usr/src/usr.sbin/btrace/bt_parse.y" | ||||
1654 | { yyval.v.arg = ba_op(B_AT_OP_MINUS, yyvsp[-2].v.arg, yyvsp[0].v.arg); } | ||||
1655 | break; | ||||
1656 | case 39: | ||||
1657 | #line 203 "/usr/src/usr.sbin/btrace/bt_parse.y" | ||||
1658 | { yyval.v.arg = ba_op(B_AT_OP_BAND, yyvsp[-2].v.arg, yyvsp[0].v.arg); } | ||||
1659 | break; | ||||
1660 | case 40: | ||||
1661 | #line 204 "/usr/src/usr.sbin/btrace/bt_parse.y" | ||||
1662 | { yyval.v.arg = ba_op(B_AT_OP_XOR, yyvsp[-2].v.arg, yyvsp[0].v.arg); } | ||||
1663 | break; | ||||
1664 | case 41: | ||||
1665 | #line 205 "/usr/src/usr.sbin/btrace/bt_parse.y" | ||||
1666 | { yyval.v.arg = ba_op(B_AT_OP_BOR, yyvsp[-2].v.arg, yyvsp[0].v.arg); } | ||||
1667 | break; | ||||
1668 | case 43: | ||||
1669 | #line 209 "/usr/src/usr.sbin/btrace/bt_parse.y" | ||||
1670 | { yyval.v.arg = ba_op(B_AT_OP_MULT, yyvsp[-2].v.arg, yyvsp[0].v.arg); } | ||||
1671 | break; | ||||
1672 | case 44: | ||||
1673 | #line 210 "/usr/src/usr.sbin/btrace/bt_parse.y" | ||||
1674 | { yyval.v.arg = ba_op(B_AT_OP_DIVIDE, yyvsp[-2].v.arg, yyvsp[0].v.arg); } | ||||
1675 | break; | ||||
1676 | case 46: | ||||
1677 | #line 214 "/usr/src/usr.sbin/btrace/bt_parse.y" | ||||
1678 | { yyval.v.arg = bl_find(yyvsp[0].v.string); } | ||||
1679 | break; | ||||
1680 | case 47: | ||||
1681 | #line 215 "/usr/src/usr.sbin/btrace/bt_parse.y" | ||||
1682 | { yyval.v.arg = bg_find(yyvsp[0].v.string); } | ||||
1683 | break; | ||||
1684 | case 48: | ||||
1685 | #line 218 "/usr/src/usr.sbin/btrace/bt_parse.y" | ||||
1686 | { yyval.v.arg = yyvsp[-1].v.arg; } | ||||
1687 | break; | ||||
1688 | case 49: | ||||
1689 | #line 219 "/usr/src/usr.sbin/btrace/bt_parse.y" | ||||
1690 | { yyval.v.arg = ba_new(yyvsp[0].v.number, B_AT_LONG)ba_new0((void *)(yyvsp[0].v.number), (B_AT_LONG)); } | ||||
1691 | break; | ||||
1692 | case 50: | ||||
1693 | #line 220 "/usr/src/usr.sbin/btrace/bt_parse.y" | ||||
1694 | { yyval.v.arg = ba_new(NULL, yyvsp[0].v.i)ba_new0((void *)(((void *)0)), (yyvsp[0].v.i)); } | ||||
1695 | break; | ||||
1696 | case 55: | ||||
1697 | #line 227 "/usr/src/usr.sbin/btrace/bt_parse.y" | ||||
1698 | { yyval.v.arg = ba_new(yyvsp[-1].v.arg, B_AT_FN_STR)ba_new0((void *)(yyvsp[-1].v.arg), (B_AT_FN_STR)); } | ||||
1699 | break; | ||||
1700 | case 56: | ||||
1701 | #line 228 "/usr/src/usr.sbin/btrace/bt_parse.y" | ||||
1702 | { yyval.v.arg = ba_op(B_AT_FN_STR, yyvsp[-3].v.arg, yyvsp[-1].v.arg); } | ||||
1703 | break; | ||||
1704 | case 58: | ||||
1705 | #line 232 "/usr/src/usr.sbin/btrace/bt_parse.y" | ||||
1706 | { yyval.v.arg = ba_append(yyvsp[-2].v.arg, yyvsp[0].v.arg); } | ||||
1707 | break; | ||||
1708 | case 60: | ||||
1709 | #line 236 "/usr/src/usr.sbin/btrace/bt_parse.y" | ||||
1710 | { yyval.v.arg = ba_append(bg_find(yyvsp[-2].v.string), yyvsp[0].v.arg); } | ||||
1711 | break; | ||||
1712 | case 63: | ||||
1713 | #line 243 "/usr/src/usr.sbin/btrace/bt_parse.y" | ||||
1714 | { yyval.v.stmt = NULL((void *)0); } | ||||
1715 | break; | ||||
1716 | case 64: | ||||
1717 | #line 244 "/usr/src/usr.sbin/btrace/bt_parse.y" | ||||
1718 | { yyval.v.stmt = bg_store(yyvsp[-2].v.string, yyvsp[0].v.arg); } | ||||
1719 | break; | ||||
1720 | case 65: | ||||
1721 | #line 245 "/usr/src/usr.sbin/btrace/bt_parse.y" | ||||
1722 | { yyval.v.stmt = bl_store(yyvsp[-2].v.string, yyvsp[0].v.arg); } | ||||
1723 | break; | ||||
1724 | case 66: | ||||
1725 | #line 246 "/usr/src/usr.sbin/btrace/bt_parse.y" | ||||
1726 | { yyval.v.stmt = bm_insert(yyvsp[-5].v.string, yyvsp[-3].v.arg, yyvsp[0].v.arg); } | ||||
1727 | break; | ||||
1728 | case 67: | ||||
1729 | #line 247 "/usr/src/usr.sbin/btrace/bt_parse.y" | ||||
1730 | { yyval.v.stmt = bs_new(yyvsp[-3].v.i, yyvsp[-1].v.arg, NULL((void *)0)); } | ||||
1731 | break; | ||||
1732 | case 68: | ||||
1733 | #line 248 "/usr/src/usr.sbin/btrace/bt_parse.y" | ||||
1734 | { yyval.v.stmt = bs_new(yyvsp[-3].v.i, yyvsp[-1].v.arg, NULL((void *)0)); } | ||||
1735 | break; | ||||
1736 | case 69: | ||||
1737 | #line 249 "/usr/src/usr.sbin/btrace/bt_parse.y" | ||||
1738 | { yyval.v.stmt = bs_new(yyvsp[-3].v.i, yyvsp[-1].v.arg, NULL((void *)0)); } | ||||
1739 | break; | ||||
1740 | case 70: | ||||
1741 | #line 250 "/usr/src/usr.sbin/btrace/bt_parse.y" | ||||
1742 | { yyval.v.stmt = bs_new(yyvsp[-2].v.i, NULL((void *)0), NULL((void *)0)); } | ||||
1743 | break; | ||||
1744 | case 71: | ||||
1745 | #line 251 "/usr/src/usr.sbin/btrace/bt_parse.y" | ||||
1746 | { yyval.v.stmt = bm_op(yyvsp[-3].v.i, yyvsp[-1].v.arg, NULL((void *)0)); } | ||||
1747 | break; | ||||
1748 | case 72: | ||||
1749 | #line 252 "/usr/src/usr.sbin/btrace/bt_parse.y" | ||||
1750 | { yyval.v.stmt = bs_new(yyvsp[-3].v.i, yyvsp[-1].v.arg, NULL((void *)0)); } | ||||
1751 | break; | ||||
1752 | case 73: | ||||
1753 | #line 253 "/usr/src/usr.sbin/btrace/bt_parse.y" | ||||
1754 | { yyval.v.stmt = bh_inc(yyvsp[-5].v.string, yyvsp[-1].v.arg, NULL((void *)0)); } | ||||
1755 | break; | ||||
1756 | case 74: | ||||
1757 | #line 254 "/usr/src/usr.sbin/btrace/bt_parse.y" | ||||
1758 | { yyval.v.stmt = bh_inc(yyvsp[-7].v.string, yyvsp[-3].v.arg, yyvsp[-1].v.arg); } | ||||
1759 | break; | ||||
1760 | case 75: | ||||
1761 | #line 257 "/usr/src/usr.sbin/btrace/bt_parse.y" | ||||
1762 | { yyval.v.stmt = bt_new(yyvsp[-2].v.arg, yyvsp[0].v.stmt); } | ||||
1763 | break; | ||||
1764 | case 76: | ||||
1765 | #line 260 "/usr/src/usr.sbin/btrace/bt_parse.y" | ||||
1766 | { yyval.v.stmt = bs_append(yyvsp[-1].v.stmt, yyvsp[0].v.stmt); } | ||||
1767 | break; | ||||
1768 | case 77: | ||||
1769 | #line 261 "/usr/src/usr.sbin/btrace/bt_parse.y" | ||||
1770 | { yyval.v.stmt = bs_append(yyvsp[-1].v.stmt, yyvsp[0].v.stmt); } | ||||
1771 | break; | ||||
1772 | case 80: | ||||
1773 | #line 266 "/usr/src/usr.sbin/btrace/bt_parse.y" | ||||
1774 | { yyval.v.stmt = yyvsp[-2].v.stmt; } | ||||
1775 | break; | ||||
1776 | case 82: | ||||
1777 | #line 270 "/usr/src/usr.sbin/btrace/bt_parse.y" | ||||
1778 | { yyval.v.stmt = yyvsp[-1].v.stmt; } | ||||
1779 | break; | ||||
1780 | #line 1773 "bt_parse.c" | ||||
1781 | } | ||||
1782 | yyssp -= yym; | ||||
1783 | yystate = *yyssp; | ||||
1784 | yyvsp -= yym; | ||||
1785 | yym = yylhs[yyn]; | ||||
1786 | if (yystate
| ||||
1787 | { | ||||
1788 | #if YYDEBUG0 | ||||
1789 | if (yydebug) | ||||
1790 | printf("%sdebug: after reduction, shifting from state 0 to\ | ||||
1791 | state %d\n", YYPREFIX"yy", YYFINAL1); | ||||
1792 | #endif | ||||
1793 | yystate = YYFINAL1; | ||||
1794 | *++yyssp = YYFINAL1; | ||||
1795 | *++yyvsp = yyval; | ||||
1796 | if (yychar
| ||||
1797 | { | ||||
1798 | if ((yychar = yylex()) < 0) yychar = 0; | ||||
1799 | #if YYDEBUG0 | ||||
1800 | if (yydebug) | ||||
1801 | { | ||||
1802 | yys = 0; | ||||
1803 | if (yychar <= YYMAXTOKEN286) yys = yyname[yychar]; | ||||
1804 | if (!yys) yys = "illegal-symbol"; | ||||
1805 | printf("%sdebug: state %d, reading %d (%s)\n", | ||||
1806 | YYPREFIX"yy", YYFINAL1, yychar, yys); | ||||
1807 | } | ||||
1808 | #endif | ||||
1809 | } | ||||
1810 | if (yychar == 0) goto yyaccept; | ||||
1811 | goto yyloop; | ||||
1812 | } | ||||
1813 | if ((yyn = yygindex[yym]) && (yyn += yystate) >= 0 && | ||||
1814 | yyn <= YYTABLESIZE1148 && yycheck[yyn] == yystate) | ||||
1815 | yystate = yytable[yyn]; | ||||
1816 | else | ||||
1817 | yystate = yydgoto[yym]; | ||||
1818 | #if YYDEBUG0 | ||||
1819 | if (yydebug) | ||||
1820 | printf("%sdebug: after reduction, shifting from state %d \ | ||||
1821 | to state %d\n", YYPREFIX"yy", *yyssp, yystate); | ||||
1822 | #endif | ||||
1823 | if (yyssp >= yysslim && yygrowstack()) | ||||
1824 | { | ||||
1825 | goto yyoverflow; | ||||
1826 | } | ||||
1827 | *++yyssp = yystate; | ||||
1828 | *++yyvsp = yyval; | ||||
1829 | goto yyloop; | ||||
1830 | yyoverflow: | ||||
1831 | yyerror("yacc stack overflow"); | ||||
1832 | yyabort: | ||||
1833 | if (yyss) | ||||
1834 | free(yyss); | ||||
1835 | if (yyvs) | ||||
1836 | free(yyvs); | ||||
1837 | yyss = yyssp = NULL((void *)0); | ||||
1838 | yyvs = yyvsp = NULL((void *)0); | ||||
1839 | yystacksize = 0; | ||||
1840 | return (1); | ||||
1841 | yyaccept: | ||||
1842 | if (yyss) | ||||
1843 | free(yyss); | ||||
1844 | if (yyvs) | ||||
1845 | free(yyvs); | ||||
1846 | yyss = yyssp = NULL((void *)0); | ||||
1847 | yyvs = yyvsp = NULL((void *)0); | ||||
1848 | yystacksize = 0; | ||||
1849 | return (0); | ||||
1850 | } |