?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
flowtop: show proper title of what's tracked
[netsniff-ng-old.git] / bpf_parser.y
blob4c35e07ed79e4c431754b03d028edd5aff0eac51
1 /*
2 * netsniff-ng - the packet sniffing beast
3 * By Daniel Borkmann <daniel@netsniff-ng.org>
4 * Copyright 2011 Daniel Borkmann <dborkma@tik.ee.ethz.ch>,
5 * Swiss federal institute of technology (ETH Zurich)
6 * Subject to the GPL, version 2.
7 */
8
9 /* yaac-func-prefix: yy */
10
11 %{
12
13 #include <stdio.h>
14 #include <stdlib.h>
15 #include <stdbool.h>
16 #include <signal.h>
17 #include <stdint.h>
18 #include <errno.h>
19
20 #include "bpf.h"
21 #include "xmalloc.h"
22 #include "bpf_parser.tab.h"
23 #include "built_in.h"
24 #include "die.h"
25
26 #define MAX_INSTRUCTIONS 4096
27
28 int compile_filter(char *file, int verbose, int bypass, int decimal);
29
30 static int curr_instr = 0;
31
32 static struct sock_filter out[MAX_INSTRUCTIONS];
33
34 static char *labels[MAX_INSTRUCTIONS];
35
36 static char *labels_jt[MAX_INSTRUCTIONS];
37 static char *labels_jf[MAX_INSTRUCTIONS];
38 static char *labels_k[MAX_INSTRUCTIONS];
39
40 #define YYERROR_VERBOSE 0
41 #define YYDEBUG 0
42 #define YYENABLE_NLS 1
43 #define YYLTYPE_IS_TRIVIAL 1
44 #define ENABLE_NLS 1
45
46 extern FILE *yyin;
47 extern int yylex(void);
48 extern void yyerror(const char *);
49 extern int yylineno;
50 extern char *yytext;
51
52 static inline void check_max_instr(void)
53 {
54 if (curr_instr >= MAX_INSTRUCTIONS)
55 panic("Exceeded maximal number of instructions!\n");
56 }
57
58 static inline void set_curr_instr(uint16_t code, uint8_t jt, uint8_t jf, uint32_t k)
59 {
60 check_max_instr();
61
62 out[curr_instr].code = code;
63 out[curr_instr].jt = jt;
64 out[curr_instr].jf = jf;
65 out[curr_instr].k = k;
66
67 curr_instr++;
68 }
69
70 static inline void set_curr_label(char *label)
71 {
72 check_max_instr();
73
74 labels[curr_instr] = label;
75 }
76
77 #define JTL 1
78 #define JFL 2
79 #define JKL 3
80
81 static inline void set_jmp_label(char *label, int which)
82 {
83 check_max_instr();
84
85 switch (which) {
86 case JTL:
87 labels_jt[curr_instr] = label;
88 break;
89 case JFL:
90 labels_jf[curr_instr] = label;
91 break;
92 case JKL:
93 labels_k[curr_instr] = label;
94 break;
95 default:
96 bug();
97 }
98 }
99
100 static int find_intr_offset_or_panic(char *label_to_search)
101 {
102 int i, max = curr_instr, ret = -ENOENT;
103
104 bug_on(!label_to_search);
105
106 for (i = 0; i < max; ++i) {
107 if (labels[i] != NULL) {
108 /* Both are \0-terminated! */
109 if (!strcmp(label_to_search, labels[i])) {
110 ret = i;
111 break;
112 }
113 }
114 }
115
116 if (ret == -ENOENT)
117 panic("No such label!\n");
118
119 return ret;
120 }
121
122 %}
123
124 %union {
125 char *label;
126 long int number;
127 }
128
129 %token OP_LDB OP_LDH OP_LD OP_LDX OP_ST OP_STX OP_JMP OP_JEQ OP_JGT OP_JGE
130 %token OP_JSET OP_ADD OP_SUB OP_MUL OP_DIV OP_AND OP_OR OP_XOR OP_LSH OP_RSH
131 %token OP_RET OP_TAX OP_TXA OP_LDXB OP_MOD OP_NEG OP_JNEQ OP_JLT OP_JLE OP_LDI
132 %token OP_LDXI
133
134 %token K_PKT_LEN K_PROTO K_TYPE K_NLATTR K_NLATTR_NEST K_MARK K_QUEUE K_HATYPE
135 %token K_RXHASH K_CPU K_IFIDX K_VLANT K_VLANP
136
137 %token ':' ',' '[' ']' '(' ')' 'x' 'a' '+' 'M' '*' '&' '#'
138
139 %token number label
140
141 %type <number> number
142 %type <label> label
143
144 %%
145
146 prog
147 : line
148 | prog line
149 ;
150
151 line
152 : instr
153 | labelled_instr
154 ;
155
156 labelled_instr
157 : labelled instr
158 ;
159
160 instr
161 : ldb
162 | ldh
163 | ld
164 | ldi
165 | ldx
166 | ldxi
167 | st
168 | stx
169 | jmp
170 | jeq
171 | jneq
172 | jlt
173 | jle
174 | jgt
175 | jge
176 | jset
177 | add
178 | sub
179 | mul
180 | div
181 | mod
182 | neg
183 | and
184 | or
185 | xor
186 | lsh
187 | rsh
188 | ret
189 | tax
190 | txa
191 ;
192
193 labelled
194 : label ':' { set_curr_label($1); }
195 ;
196
197 ldb
198 : OP_LDB '[' 'x' '+' number ']' {
199 set_curr_instr(BPF_LD | BPF_B | BPF_IND, 0, 0, $5); }
200 | OP_LDB '[' number ']' {
201 set_curr_instr(BPF_LD | BPF_B | BPF_ABS, 0, 0, $3); }
202 | OP_LDB K_PROTO {
203 set_curr_instr(BPF_LD | BPF_B | BPF_ABS, 0, 0,
204 SKF_AD_OFF + SKF_AD_PROTOCOL); }
205 | OP_LDB K_TYPE {
206 set_curr_instr(BPF_LD | BPF_B | BPF_ABS, 0, 0,
207 SKF_AD_OFF + SKF_AD_PKTTYPE); }
208 | OP_LDB K_IFIDX {
209 set_curr_instr(BPF_LD | BPF_B | BPF_ABS, 0, 0,
210 SKF_AD_OFF + SKF_AD_IFINDEX); }
211 | OP_LDB K_NLATTR {
212 set_curr_instr(BPF_LD | BPF_B | BPF_ABS, 0, 0,
213 SKF_AD_OFF + SKF_AD_NLATTR); }
214 | OP_LDB K_NLATTR_NEST {
215 set_curr_instr(BPF_LD | BPF_B | BPF_ABS, 0, 0,
216 SKF_AD_OFF + SKF_AD_NLATTR_NEST); }
217 | OP_LDB K_MARK {
218 set_curr_instr(BPF_LD | BPF_B | BPF_ABS, 0, 0,
219 SKF_AD_OFF + SKF_AD_MARK); }
220 | OP_LDB K_QUEUE {
221 set_curr_instr(BPF_LD | BPF_B | BPF_ABS, 0, 0,
222 SKF_AD_OFF + SKF_AD_QUEUE); }
223 | OP_LDB K_HATYPE {
224 set_curr_instr(BPF_LD | BPF_B | BPF_ABS, 0, 0,
225 SKF_AD_OFF + SKF_AD_HATYPE); }
226 | OP_LDB K_RXHASH {
227 set_curr_instr(BPF_LD | BPF_B | BPF_ABS, 0, 0,
228 SKF_AD_OFF + SKF_AD_RXHASH); }
229 | OP_LDB K_CPU {
230 set_curr_instr(BPF_LD | BPF_B | BPF_ABS, 0, 0,
231 SKF_AD_OFF + SKF_AD_CPU); }
232 | OP_LDB K_VLANT {
233 set_curr_instr(BPF_LD | BPF_B | BPF_ABS, 0, 0,
234 SKF_AD_OFF + SKF_AD_VLAN_TAG); }
235 | OP_LDB K_VLANP {
236 set_curr_instr(BPF_LD | BPF_B | BPF_ABS, 0, 0,
237 SKF_AD_OFF + SKF_AD_VLAN_TAG_PRESENT); }
238 ;
239
240 ldh
241 : OP_LDH '[' 'x' '+' number ']' {
242 set_curr_instr(BPF_LD | BPF_H | BPF_IND, 0, 0, $5); }
243 | OP_LDH '[' number ']' {
244 set_curr_instr(BPF_LD | BPF_H | BPF_ABS, 0, 0, $3); }
245 | OP_LDH K_PROTO {
246 set_curr_instr(BPF_LD | BPF_H | BPF_ABS, 0, 0,
247 SKF_AD_OFF + SKF_AD_PROTOCOL); }
248 | OP_LDH K_TYPE {
249 set_curr_instr(BPF_LD | BPF_H | BPF_ABS, 0, 0,
250 SKF_AD_OFF + SKF_AD_PKTTYPE); }
251 | OP_LDH K_IFIDX {
252 set_curr_instr(BPF_LD | BPF_H | BPF_ABS, 0, 0,
253 SKF_AD_OFF + SKF_AD_IFINDEX); }
254 | OP_LDH K_NLATTR {
255 set_curr_instr(BPF_LD | BPF_H | BPF_ABS, 0, 0,
256 SKF_AD_OFF + SKF_AD_NLATTR); }
257 | OP_LDH K_NLATTR_NEST {
258 set_curr_instr(BPF_LD | BPF_H | BPF_ABS, 0, 0,
259 SKF_AD_OFF + SKF_AD_NLATTR_NEST); }
260 | OP_LDH K_MARK {
261 set_curr_instr(BPF_LD | BPF_H | BPF_ABS, 0, 0,
262 SKF_AD_OFF + SKF_AD_MARK); }
263 | OP_LDH K_QUEUE {
264 set_curr_instr(BPF_LD | BPF_H | BPF_ABS, 0, 0,
265 SKF_AD_OFF + SKF_AD_QUEUE); }
266 | OP_LDH K_HATYPE {
267 set_curr_instr(BPF_LD | BPF_H | BPF_ABS, 0, 0,
268 SKF_AD_OFF + SKF_AD_HATYPE); }
269 | OP_LDH K_RXHASH {
270 set_curr_instr(BPF_LD | BPF_H | BPF_ABS, 0, 0,
271 SKF_AD_OFF + SKF_AD_RXHASH); }
272 | OP_LDH K_CPU {
273 set_curr_instr(BPF_LD | BPF_H | BPF_ABS, 0, 0,
274 SKF_AD_OFF + SKF_AD_CPU); }
275 | OP_LDH K_VLANT {
276 set_curr_instr(BPF_LD | BPF_H | BPF_ABS, 0, 0,
277 SKF_AD_OFF + SKF_AD_VLAN_TAG); }
278 | OP_LDH K_VLANP {
279 set_curr_instr(BPF_LD | BPF_H | BPF_ABS, 0, 0,
280 SKF_AD_OFF + SKF_AD_VLAN_TAG_PRESENT); }
281 ;
282
283 ldi
284 : OP_LDI number {
285 set_curr_instr(BPF_LD | BPF_IMM, 0, 0, $2); }
286 ;
287
288 ld
289 : OP_LD '#' number {
290 set_curr_instr(BPF_LD | BPF_IMM, 0, 0, $3); }
291 | OP_LD K_PKT_LEN {
292 set_curr_instr(BPF_LD | BPF_W | BPF_LEN, 0, 0, 0); }
293 | OP_LD K_PROTO {
294 set_curr_instr(BPF_LD | BPF_W | BPF_ABS, 0, 0,
295 SKF_AD_OFF + SKF_AD_PROTOCOL); }
296 | OP_LD K_TYPE {
297 set_curr_instr(BPF_LD | BPF_W | BPF_ABS, 0, 0,
298 SKF_AD_OFF + SKF_AD_PKTTYPE); }
299 | OP_LD K_IFIDX {
300 set_curr_instr(BPF_LD | BPF_W | BPF_ABS, 0, 0,
301 SKF_AD_OFF + SKF_AD_IFINDEX); }
302 | OP_LD K_NLATTR {
303 set_curr_instr(BPF_LD | BPF_W | BPF_ABS, 0, 0,
304 SKF_AD_OFF + SKF_AD_NLATTR); }
305 | OP_LD K_NLATTR_NEST {
306 set_curr_instr(BPF_LD | BPF_W | BPF_ABS, 0, 0,
307 SKF_AD_OFF + SKF_AD_NLATTR_NEST); }
308 | OP_LD K_MARK {
309 set_curr_instr(BPF_LD | BPF_W | BPF_ABS, 0, 0,
310 SKF_AD_OFF + SKF_AD_MARK); }
311 | OP_LD K_QUEUE {
312 set_curr_instr(BPF_LD | BPF_W | BPF_ABS, 0, 0,
313 SKF_AD_OFF + SKF_AD_QUEUE); }
314 | OP_LD K_HATYPE {
315 set_curr_instr(BPF_LD | BPF_W | BPF_ABS, 0, 0,
316 SKF_AD_OFF + SKF_AD_HATYPE); }
317 | OP_LD K_RXHASH {
318 set_curr_instr(BPF_LD | BPF_W | BPF_ABS, 0, 0,
319 SKF_AD_OFF + SKF_AD_RXHASH); }
320 | OP_LD K_CPU {
321 set_curr_instr(BPF_LD | BPF_W | BPF_ABS, 0, 0,
322 SKF_AD_OFF + SKF_AD_CPU); }
323 | OP_LD K_VLANT {
324 set_curr_instr(BPF_LD | BPF_W | BPF_ABS, 0, 0,
325 SKF_AD_OFF + SKF_AD_VLAN_TAG); }
326 | OP_LD K_VLANP {
327 set_curr_instr(BPF_LD | BPF_W | BPF_ABS, 0, 0,
328 SKF_AD_OFF + SKF_AD_VLAN_TAG_PRESENT); }
329 | OP_LD 'M' '[' number ']' {
330 set_curr_instr(BPF_LD | BPF_MEM, 0, 0, $4); }
331 | OP_LD '[' 'x' '+' number ']' {
332 set_curr_instr(BPF_LD | BPF_W | BPF_IND, 0, 0, $5); }
333 | OP_LD '[' number ']' {
334 set_curr_instr(BPF_LD | BPF_W | BPF_ABS, 0, 0, $3); }
335 ;
336
337 ldxi
338 : OP_LDXI number {
339 set_curr_instr(BPF_LDX | BPF_IMM, 0, 0, $2); }
340 ;
341
342 ldx
343 : OP_LDX '#' number {
344 set_curr_instr(BPF_LDX | BPF_IMM, 0, 0, $3); }
345 | OP_LDX 'M' '[' number ']' {
346 set_curr_instr(BPF_LDX | BPF_MEM, 0, 0, $4); }
347 | OP_LDXB number '*' '(' '[' number ']' '&' number ')' {
348 if ($2 != 4 || $9 != 0xf) {
349 panic("ldxb offset not supported!\n");
350 } else {
351 set_curr_instr(BPF_LDX | BPF_MSH | BPF_B, 0, 0, $6); } }
352 | OP_LDX number '*' '(' '[' number ']' '&' number ')' {
353 if ($2 != 4 || $9 != 0xf) {
354 panic("ldxb offset not supported!\n");
355 } else {
356 set_curr_instr(BPF_LDX | BPF_MSH | BPF_B, 0, 0, $6); } }
357 ;
358
359 st
360 : OP_ST 'M' '[' number ']' {
361 set_curr_instr(BPF_ST, 0, 0, $4); }
362 ;
363
364 stx
365 : OP_STX 'M' '[' number ']' {
366 set_curr_instr(BPF_STX, 0, 0, $4); }
367 ;
368
369 jmp
370 : OP_JMP label {
371 set_jmp_label($2, JKL);
372 set_curr_instr(BPF_JMP | BPF_JA, 0, 0, 0); }
373 ;
374
375 jeq
376 : OP_JEQ '#' number ',' label ',' label {
377 set_jmp_label($5, JTL);
378 set_jmp_label($7, JFL);
379 set_curr_instr(BPF_JMP | BPF_JEQ | BPF_K, 0, 0, $3); }
380 | OP_JEQ 'x' ',' label ',' label {
381 set_jmp_label($4, JTL);
382 set_jmp_label($6, JFL);
383 set_curr_instr(BPF_JMP | BPF_JEQ | BPF_X, 0, 0, 0); }
384 | OP_JEQ '#' number ',' label {
385 set_jmp_label($5, JTL);
386 set_curr_instr(BPF_JMP | BPF_JEQ | BPF_K, 0, 0, $3); }
387 | OP_JEQ 'x' ',' label {
388 set_jmp_label($4, JTL);
389 set_curr_instr(BPF_JMP | BPF_JEQ | BPF_X, 0, 0, 0); }
390 ;
391
392 jneq
393 : OP_JNEQ '#' number ',' label {
394 set_jmp_label($5, JFL);
395 set_curr_instr(BPF_JMP | BPF_JEQ | BPF_K, 0, 0, $3); }
396 | OP_JNEQ 'x' ',' label {
397 set_jmp_label($4, JFL);
398 set_curr_instr(BPF_JMP | BPF_JEQ | BPF_X, 0, 0, 0); }
399 ;
400
401 jlt
402 : OP_JLT '#' number ',' label {
403 set_jmp_label($5, JFL);
404 set_curr_instr(BPF_JMP | BPF_JGE | BPF_K, 0, 0, $3); }
405 | OP_JLT 'x' ',' label {
406 set_jmp_label($4, JFL);
407 set_curr_instr(BPF_JMP | BPF_JGE | BPF_X, 0, 0, 0); }
408 ;
409
410 jle
411 : OP_JLE '#' number ',' label {
412 set_jmp_label($5, JFL);
413 set_curr_instr(BPF_JMP | BPF_JGT | BPF_K, 0, 0, $3); }
414 | OP_JLE 'x' ',' label {
415 set_jmp_label($4, JFL);
416 set_curr_instr(BPF_JMP | BPF_JGT | BPF_X, 0, 0, 0); }
417 ;
418
419 jgt
420 : OP_JGT '#' number ',' label ',' label {
421 set_jmp_label($5, JTL);
422 set_jmp_label($7, JFL);
423 set_curr_instr(BPF_JMP | BPF_JGT | BPF_K, 0, 0, $3); }
424 | OP_JGT 'x' ',' label ',' label {
425 set_jmp_label($4, JTL);
426 set_jmp_label($6, JFL);
427 set_curr_instr(BPF_JMP | BPF_JGT | BPF_X, 0, 0, 0); }
428 | OP_JGT '#' number ',' label {
429 set_jmp_label($5, JTL);
430 set_curr_instr(BPF_JMP | BPF_JGT | BPF_K, 0, 0, $3); }
431 | OP_JGT 'x' ',' label {
432 set_jmp_label($4, JTL);
433 set_curr_instr(BPF_JMP | BPF_JGT | BPF_X, 0, 0, 0); }
434 ;
435
436 jge
437 : OP_JGE '#' number ',' label ',' label {
438 set_jmp_label($5, JTL);
439 set_jmp_label($7, JFL);
440 set_curr_instr(BPF_JMP | BPF_JGE | BPF_K, 0, 0, $3); }
441 | OP_JGE 'x' ',' label ',' label {
442 set_jmp_label($4, JTL);
443 set_jmp_label($6, JFL);
444 set_curr_instr(BPF_JMP | BPF_JGE | BPF_X, 0, 0, 0); }
445 | OP_JGE '#' number ',' label {
446 set_jmp_label($5, JTL);
447 set_curr_instr(BPF_JMP | BPF_JGE | BPF_K, 0, 0, $3); }
448 | OP_JGE 'x' ',' label {
449 set_jmp_label($4, JTL);
450 set_curr_instr(BPF_JMP | BPF_JGE | BPF_X, 0, 0, 0); }
451 ;
452
453 jset
454 : OP_JSET '#' number ',' label ',' label {
455 set_jmp_label($5, JTL);
456 set_jmp_label($7, JFL);
457 set_curr_instr(BPF_JMP | BPF_JSET | BPF_K, 0, 0, $3); }
458 | OP_JSET 'x' ',' label ',' label {
459 set_jmp_label($4, JTL);
460 set_jmp_label($6, JFL);
461 set_curr_instr(BPF_JMP | BPF_JSET | BPF_X, 0, 0, 0); }
462 | OP_JSET '#' number ',' label {
463 set_jmp_label($5, JTL);
464 set_curr_instr(BPF_JMP | BPF_JSET | BPF_K, 0, 0, $3); }
465 | OP_JSET 'x' ',' label {
466 set_jmp_label($4, JTL);
467 set_curr_instr(BPF_JMP | BPF_JSET | BPF_X, 0, 0, 0); }
468 ;
469
470 add
471 : OP_ADD '#' number {
472 set_curr_instr(BPF_ALU | BPF_ADD | BPF_K, 0, 0, $3); }
473 | OP_ADD 'x' {
474 set_curr_instr(BPF_ALU | BPF_ADD | BPF_X, 0, 0, 0); }
475 ;
476
477 sub
478 : OP_SUB '#' number {
479 set_curr_instr(BPF_ALU | BPF_SUB | BPF_K, 0, 0, $3); }
480 | OP_SUB 'x' {
481 set_curr_instr(BPF_ALU | BPF_SUB | BPF_X, 0, 0, 0); }
482 ;
483
484 mul
485 : OP_MUL '#' number {
486 set_curr_instr(BPF_ALU | BPF_MUL | BPF_K, 0, 0, $3); }
487 | OP_MUL 'x' {
488 set_curr_instr(BPF_ALU | BPF_MUL | BPF_X, 0, 0, 0); }
489 ;
490
491 div
492 : OP_DIV '#' number {
493 set_curr_instr(BPF_ALU | BPF_DIV | BPF_K, 0, 0, $3); }
494 | OP_DIV 'x' {
495 set_curr_instr(BPF_ALU | BPF_DIV | BPF_X, 0, 0, 0); }
496 ;
497
498 mod
499 : OP_MOD '#' number {
500 set_curr_instr(BPF_ALU | BPF_MOD | BPF_K, 0, 0, $3); }
501 | OP_MOD 'x' {
502 set_curr_instr(BPF_ALU | BPF_MOD | BPF_X, 0, 0, 0); }
503 ;
504
505 neg
506 : OP_NEG {
507 set_curr_instr(BPF_ALU | BPF_NEG, 0, 0, 0); }
508 ;
509
510 and
511 : OP_AND '#' number {
512 set_curr_instr(BPF_ALU | BPF_AND | BPF_K, 0, 0, $3); }
513 | OP_AND 'x' {
514 set_curr_instr(BPF_ALU | BPF_AND | BPF_X, 0, 0, 0); }
515 ;
516
517 or
518 : OP_OR '#' number {
519 set_curr_instr(BPF_ALU | BPF_OR | BPF_K, 0, 0, $3); }
520 | OP_OR 'x' {
521 set_curr_instr(BPF_ALU | BPF_OR | BPF_X, 0, 0, 0); }
522 ;
523
524 xor
525 : OP_XOR '#' number {
526 set_curr_instr(BPF_ALU | BPF_XOR | BPF_K, 0, 0, $3); }
527 | OP_XOR 'x' {
528 set_curr_instr(BPF_ALU | BPF_XOR | BPF_X, 0, 0, 0); }
529 ;
530
531 lsh
532 : OP_LSH '#' number {
533 set_curr_instr(BPF_ALU | BPF_LSH | BPF_K, 0, 0, $3); }
534 | OP_LSH 'x' {
535 set_curr_instr(BPF_ALU | BPF_LSH | BPF_X, 0, 0, 0); }
536 ;
537
538 rsh
539 : OP_RSH '#' number {
540 set_curr_instr(BPF_ALU | BPF_RSH | BPF_K, 0, 0, $3); }
541 | OP_RSH 'x' {
542 set_curr_instr(BPF_ALU | BPF_RSH | BPF_X, 0, 0, 0); }
543 ;
544
545 ret
546 : OP_RET 'a' {
547 set_curr_instr(BPF_RET | BPF_A, 0, 0, 0); }
548 | OP_RET 'x' {
549 set_curr_instr(BPF_RET | BPF_X, 0, 0, 0); }
550 | OP_RET '#' number {
551 set_curr_instr(BPF_RET | BPF_K, 0, 0, $3); }
552 ;
553
554 tax
555 : OP_TAX {
556 set_curr_instr(BPF_MISC | BPF_TAX, 0, 0, 0); }
557 ;
558
559 txa
560 : OP_TXA {
561 set_curr_instr(BPF_MISC | BPF_TXA, 0, 0, 0); }
562 ;
563
564 %%
565
566 static void stage_1_inline(void)
567 {
568 yyparse();
569 }
570
571 static void stage_2_label_reduce(void)
572 {
573 int i, max = curr_instr, off;
574
575 /* 1. reduce k jumps */
576 for (i = 0; i < max; ++i) {
577 if (labels_k[i] != NULL) {
578 off = find_intr_offset_or_panic(labels_k[i]);
579 out[i].k = (uint32_t) (off - i - 1);
580 }
581 }
582
583 /* 1. reduce jt jumps */
584 for (i = 0; i < max; ++i) {
585 if (labels_jt[i] != NULL) {
586 off = find_intr_offset_or_panic(labels_jt[i]);
587 out[i].jt = (uint8_t) (off - i -1);
588 }
589 }
590
591 /* 1. reduce jf jumps */
592 for (i = 0; i < max; ++i) {
593 if (labels_jf[i] != NULL) {
594 off = find_intr_offset_or_panic(labels_jf[i]);
595 out[i].jf = (uint8_t) (off - i - 1);
596 }
597 }
598 }
599
600 int compile_filter(char *file, int verbose, int bypass, int decimal)
601 {
602 int i;
603 struct sock_fprog res;
604
605 if (!strncmp("-", file, strlen("-")))
606 yyin = stdin;
607 else
608 yyin = fopen(file, "r");
609 if (!yyin)
610 panic("Cannot open file!\n");
611
612 memset(out, 0, sizeof(out));
613 memset(labels, 0, sizeof(labels));
614 memset(labels_jf, 0, sizeof(labels_jf));
615 memset(labels_jt, 0, sizeof(labels_jt));
616 memset(labels_k, 0, sizeof(labels_k));
617
618 stage_1_inline();
619 stage_2_label_reduce();
620
621 res.filter = out;
622 res.len = curr_instr;
623
624 if (verbose) {
625 printf("Generated program:\n");
626 bpf_dump_all(&res);
627 }
628
629 if (!bypass) {
630 if (verbose) {
631 printf("Validating: ");
632 fflush(stdout);
633 }
634
635 if (__bpf_validate(&res) == 0) {
636 if (verbose)
637 printf("Semantic error! BPF validation failed!\n");
638 else
639 panic("Semantic error! BPF validation failed! "
640 "Try -V for debugging output!\n");
641 } else if (verbose) {
642 printf("is runnable!\n");
643 }
644 }
645
646 if (verbose)
647 printf("Result:\n");
648 for (i = 0; i < res.len; ++i) {
649 if (decimal) {
650 printf("%u %u %u %u\n",
651 res.filter[i].code, res.filter[i].jt,
652 res.filter[i].jf, res.filter[i].k);
653 } else {
654 printf("{ 0x%x, %u, %u, 0x%08x },\n",
655 res.filter[i].code, res.filter[i].jt,
656 res.filter[i].jf, res.filter[i].k);
657 }
658
659 free(labels[i]);
660 free(labels_jt[i]);
661 free(labels_jf[i]);
662 free(labels_k[i]);
663 }
664
665 fclose(yyin);
666 return 0;
667 }
668
669 void yyerror(const char *err)
670 {
671 panic("Syntax error at line %d: %s! %s!\n",
672 yylineno, yytext, err);
673 }
Old netsniff-ng tree