1 %top {
2 /* Must come first for _LARGE_FILE_API on AIX. */
3 #ifdef HAVE_CONFIG_H
4 #include <config.h>
5 #endif
6
7 /*
8 * Must come first to avoid warnings on Windows.
9 *
10 * Flex-generated scanners may only include <inttypes.h> if __STDC_VERSION__
11 * is defined with a value >= 199901, meaning "full C99", and MSVC may not
12 * define it with that value, because it isn't 100% C99-compliant, even
13 * though it has an <inttypes.h> capable of defining everything the Flex
14 * scanner needs.
15 *
16 * We, however, will include it if we know we have an MSVC version that has
17 * it; this means that we may define the INTn_MAX and UINTn_MAX values in
18 * scanner.c, and then include <stdint.h>, which may define them differently
19 * (same value, but different string of characters), causing compiler warnings.
20 *
21 * If we include it here, and they're defined, that'll prevent scanner.c
22 * from defining them. So we include <pcap/pcap-inttypes.h>, to get
23 * <inttypes.h> if we have it.
24 */
25 #include <pcap/pcap-inttypes.h>
26
27 #include "diag-control.h"
28 }
29
30 /*
31 * We want a reentrant scanner.
32 */
33 %option reentrant
34
35 /*
36 * And we need to pass the compiler state to the scanner.
37 */
38 %option extra-type="compiler_state_t *"
39
40 /*
41 * We don't use input, so don't generate code for it.
42 */
43 %option noinput
44
45 /*
46 * We don't use unput, so don't generate code for it.
47 */
48 %option nounput
49
50 /*
51 * We don't read from the terminal.
52 */
53 %option never-interactive
54
55 /*
56 * We want to stop processing when we get to the end of the input.
57 */
58 %option noyywrap
59
60 /*
61 * We want to generate code that can be used by a reentrant parser
62 * generated by Bison or Berkeley YACC.
63 */
64 %option bison-bridge
65
66 %{
67 /*
68 * Copyright (c) 1988, 1989, 1990, 1991, 1992, 1993, 1994, 1995, 1996, 1997
69 * The Regents of the University of California. All rights reserved.
70 *
71 * Redistribution and use in source and binary forms, with or without
72 * modification, are permitted provided that: (1) source code distributions
73 * retain the above copyright notice and this paragraph in its entirety, (2)
74 * distributions including binary code include the above copyright notice and
75 * this paragraph in its entirety in the documentation or other materials
76 * provided with the distribution, and (3) all advertising materials mentioning
77 * features or use of this software display the following acknowledgement:
78 * ``This product includes software developed by the University of California,
79 * Lawrence Berkeley Laboratory and its contributors.'' Neither the name of
80 * the University nor the names of its contributors may be used to endorse
81 * or promote products derived from this software without specific prior
82 * written permission.
83 * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR IMPLIED
84 * WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED WARRANTIES OF
85 * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
86 */
87
88 #include <ctype.h>
89 #include <string.h>
90
91 #include "pcap-int.h"
92
93 #include "gencode.h"
94
95 #include "grammar.h"
96
97 /*
98 * Earlier versions of Flex don't declare these, so we declare them
99 * ourselves to squelch warnings.
100 */
101 int pcap_get_column(yyscan_t);
102 void pcap_set_column(int, yyscan_t);
103
104 #ifdef INET6
105
106 #ifdef _WIN32
107 #include <winsock2.h>
108 #include <ws2tcpip.h>
109 /*
110 * To quote the MSDN page for getaddrinfo() at
111 *
112 * https://msdn.microsoft.com/en-us/library/windows/desktop/ms738520(v=vs.85).aspx
113 *
114 * "Support for getaddrinfo on Windows 2000 and older versions
115 * The getaddrinfo function was added to the Ws2_32.dll on Windows XP and
116 * later. To execute an application that uses this function on earlier
117 * versions of Windows, then you need to include the Ws2tcpip.h and
118 * Wspiapi.h files. When the Wspiapi.h include file is added, the
119 * getaddrinfo function is defined to the WspiapiGetAddrInfo inline
120 * function in the Wspiapi.h file. At runtime, the WspiapiGetAddrInfo
121 * function is implemented in such a way that if the Ws2_32.dll or the
122 * Wship6.dll (the file containing getaddrinfo in the IPv6 Technology
123 * Preview for Windows 2000) does not include getaddrinfo, then a
124 * version of getaddrinfo is implemented inline based on code in the
125 * Wspiapi.h header file. This inline code will be used on older Windows
126 * platforms that do not natively support the getaddrinfo function."
127 *
128 * We use getaddrinfo(), so we include Wspiapi.h here.
129 */
130 #include <wspiapi.h>
131 #else /* _WIN32 */
132 #include <sys/socket.h> /* for "struct sockaddr" in "struct addrinfo" */
133 #include <netdb.h> /* for "struct addrinfo" */
134 #endif /* _WIN32 */
135
136 /* Workaround for AIX 4.3 */
137 #if !defined(AI_NUMERICHOST)
138 #define AI_NUMERICHOST 0x04
139 #endif
140
141 #endif /*INET6*/
142
143 #include <pcap/namedb.h>
144 #include "grammar.h"
145
146 #ifdef HAVE_OS_PROTO_H
147 #include "os-proto.h"
148 #endif
149
150 static int stoi(char *);
151 static inline int xdtoi(int);
152
153 /*
154 * Disable diagnostics in the code generated by Flex.
155 */
156 DIAG_OFF_FLEX
157
158 %}
159
160 N ([0-9]+|(0X|0x)[0-9A-Fa-f]+)
161 B ([0-9A-Fa-f][0-9A-Fa-f]?)
162 B2 ([0-9A-Fa-f][0-9A-Fa-f][0-9A-Fa-f][0-9A-Fa-f])
163 W ([0-9A-Fa-f][0-9A-Fa-f]?[0-9A-Fa-f]?[0-9A-Fa-f]?)
164
165 %a 18400
166 %o 21500
167 %e 7600
168 %k 4550
169 %p 27600
170 %n 2000
171
172 V680 {W}:{W}:{W}:{W}:{W}:{W}:{W}:{W}
173
174 V670 ::{W}:{W}:{W}:{W}:{W}:{W}:{W}
175 V671 {W}::{W}:{W}:{W}:{W}:{W}:{W}
176 V672 {W}:{W}::{W}:{W}:{W}:{W}:{W}
177 V673 {W}:{W}:{W}::{W}:{W}:{W}:{W}
178 V674 {W}:{W}:{W}:{W}::{W}:{W}:{W}
179 V675 {W}:{W}:{W}:{W}:{W}::{W}:{W}
180 V676 {W}:{W}:{W}:{W}:{W}:{W}::{W}
181 V677 {W}:{W}:{W}:{W}:{W}:{W}:{W}::
182
183 V660 ::{W}:{W}:{W}:{W}:{W}:{W}
184 V661 {W}::{W}:{W}:{W}:{W}:{W}
185 V662 {W}:{W}::{W}:{W}:{W}:{W}
186 V663 {W}:{W}:{W}::{W}:{W}:{W}
187 V664 {W}:{W}:{W}:{W}::{W}:{W}
188 V665 {W}:{W}:{W}:{W}:{W}::{W}
189 V666 {W}:{W}:{W}:{W}:{W}:{W}::
190
191 V650 ::{W}:{W}:{W}:{W}:{W}
192 V651 {W}::{W}:{W}:{W}:{W}
193 V652 {W}:{W}::{W}:{W}:{W}
194 V653 {W}:{W}:{W}::{W}:{W}
195 V654 {W}:{W}:{W}:{W}::{W}
196 V655 {W}:{W}:{W}:{W}:{W}::
197
198 V640 ::{W}:{W}:{W}:{W}
199 V641 {W}::{W}:{W}:{W}
200 V642 {W}:{W}::{W}:{W}
201 V643 {W}:{W}:{W}::{W}
202 V644 {W}:{W}:{W}:{W}::
203
204 V630 ::{W}:{W}:{W}
205 V631 {W}::{W}:{W}
206 V632 {W}:{W}::{W}
207 V633 {W}:{W}:{W}::
208
209 V620 ::{W}:{W}
210 V621 {W}::{W}
211 V622 {W}:{W}::
212
213 V610 ::{W}
214 V611 {W}::
215
216 V600 ::
217
218 V6604 {W}:{W}:{W}:{W}:{W}:{W}:{N}\.{N}\.{N}\.{N}
219
220 V6504 ::{W}:{W}:{W}:{W}:{W}:{N}\.{N}\.{N}\.{N}
221 V6514 {W}::{W}:{W}:{W}:{W}:{N}\.{N}\.{N}\.{N}
222 V6524 {W}:{W}::{W}:{W}:{W}:{N}\.{N}\.{N}\.{N}
223 V6534 {W}:{W}:{W}::{W}:{W}:{N}\.{N}\.{N}\.{N}
224 V6544 {W}:{W}:{W}:{W}::{W}:{N}\.{N}\.{N}\.{N}
225 V6554 {W}:{W}:{W}:{W}:{W}::{N}\.{N}\.{N}\.{N}
226
227 V6404 ::{W}:{W}:{W}:{W}:{N}\.{N}\.{N}\.{N}
228 V6414 {W}::{W}:{W}:{W}:{N}\.{N}\.{N}\.{N}
229 V6424 {W}:{W}::{W}:{W}:{N}\.{N}\.{N}\.{N}
230 V6434 {W}:{W}:{W}::{W}:{N}\.{N}\.{N}\.{N}
231 V6444 {W}:{W}:{W}:{W}::{N}\.{N}\.{N}\.{N}
232
233 V6304 ::{W}:{W}:{W}:{N}\.{N}\.{N}\.{N}
234 V6314 {W}::{W}:{W}:{N}\.{N}\.{N}\.{N}
235 V6324 {W}:{W}::{W}:{N}\.{N}\.{N}\.{N}
236 V6334 {W}:{W}:{W}::{N}\.{N}\.{N}\.{N}
237
238 V6204 ::{W}:{W}:{N}\.{N}\.{N}\.{N}
239 V6214 {W}::{W}:{N}\.{N}\.{N}\.{N}
240 V6224 {W}:{W}::{N}\.{N}\.{N}\.{N}
241
242 V6104 ::{W}:{N}\.{N}\.{N}\.{N}
243 V6114 {W}::{N}\.{N}\.{N}\.{N}
244
245 V6004 ::{N}\.{N}\.{N}\.{N}
246
247
248 V6 ({V680}|{V670}|{V671}|{V672}|{V673}|{V674}|{V675}|{V676}|{V677}|{V660}|{V661}|{V662}|{V663}|{V664}|{V665}|{V666}|{V650}|{V651}|{V652}|{V653}|{V654}|{V655}|{V640}|{V641}|{V642}|{V643}|{V644}|{V630}|{V631}|{V632}|{V633}|{V620}|{V621}|{V622}|{V610}|{V611}|{V600}|{V6604}|{V6504}|{V6514}|{V6524}|{V6534}|{V6544}|{V6554}|{V6404}|{V6414}|{V6424}|{V6434}|{V6444}|{V6304}|{V6314}|{V6324}|{V6334}|{V6204}|{V6214}|{V6224}|{V6104}|{V6114}|{V6004})
249
250 MAC ({B}:{B}:{B}:{B}:{B}:{B}|{B}\-{B}\-{B}\-{B}\-{B}\-{B}|{B}\.{B}\.{B}\.{B}\.{B}\.{B}|{B2}\.{B2}\.{B2}|{B2}{3})
251
252
253
254 %%
255 dst return DST;
256 src return SRC;
257
258 link|ether|ppp|slip return LINK;
259 fddi|tr|wlan return LINK;
260 arp return ARP;
261 rarp return RARP;
262 ip return IP;
263 sctp return SCTP;
264 tcp return TCP;
265 udp return UDP;
266 icmp return ICMP;
267 igmp return IGMP;
268 igrp return IGRP;
269 pim return PIM;
270 vrrp return VRRP;
271 carp return CARP;
272 radio return RADIO;
273
274 ip6 return IPV6;
275 icmp6 return ICMPV6;
276 ah return AH;
277 esp return ESP;
278
279 atalk return ATALK;
280 aarp return AARP;
281 decnet return DECNET;
282 lat return LAT;
283 sca return SCA;
284 moprc return MOPRC;
285 mopdl return MOPDL;
286
287 iso return ISO;
288 esis return ESIS;
289 es-is return ESIS;
290 isis return ISIS;
291 is-is return ISIS;
292 l1 return L1;
293 l2 return L2;
294 iih return IIH;
295 lsp return LSP;
296 snp return SNP;
297 csnp return CSNP;
298 psnp return PSNP;
299
300 clnp return CLNP;
301
302 stp return STP;
303
304 ipx return IPX;
305
306 netbeui return NETBEUI;
307
308 host return HOST;
309 net return NET;
310 mask return NETMASK;
311 port return PORT;
312 portrange return PORTRANGE;
313 proto return PROTO;
314 protochain {
315 #ifdef NO_PROTOCHAIN
316 bpf_error(yyextra, "%s not supported", yytext);
317 #else
318 return PROTOCHAIN;
319 #endif
320 }
321
322 gateway return GATEWAY;
323
324 type return TYPE;
325 subtype return SUBTYPE;
326 direction|dir return DIR;
327 address1|addr1 return ADDR1;
328 address2|addr2 return ADDR2;
329 address3|addr3 return ADDR3;
330 address4|addr4 return ADDR4;
331 ra return RA;
332 ta return TA;
333
334 less return LESS;
335 greater return GREATER;
336 byte return CBYTE;
337 broadcast return TK_BROADCAST;
338 multicast return TK_MULTICAST;
339
340 and|"&&" return AND;
341 or|"||" return OR;
342 not return '!';
343
344 len|length return LEN;
345 inbound return INBOUND;
346 outbound return OUTBOUND;
347
348 vlan return VLAN;
349 mpls return MPLS;
350 pppoed return PPPOED;
351 pppoes return PPPOES;
352 geneve return GENEVE;
353
354 lane return LANE;
355 llc return LLC;
356 metac return METAC;
357 bcc return BCC;
358 oam return OAM;
359 oamf4 return OAMF4;
360 oamf4ec return OAMF4EC;
361 oamf4sc return OAMF4SC;
362 sc return SC;
363 ilmic return ILMIC;
364 vpi return VPI;
365 vci return VCI;
366 connectmsg return CONNECTMSG;
367 metaconnect return METACONNECT;
368
369 on|ifname return PF_IFNAME;
370 rset|ruleset return PF_RSET;
371 rnr|rulenum return PF_RNR;
372 srnr|subrulenum return PF_SRNR;
373 reason return PF_REASON;
374 action return PF_ACTION;
375
376 fisu return FISU;
377 lssu return LSSU;
378 lsu return LSSU;
379 msu return MSU;
380 hfisu return HFISU;
381 hlssu return HLSSU;
382 hmsu return HMSU;
383 sio return SIO;
384 opc return OPC;
385 dpc return DPC;
386 sls return SLS;
387 hsio return HSIO;
388 hopc return HOPC;
389 hdpc return HDPC;
390 hsls return HSLS;
391
392 [ \r\n\t] ;
393 [+\-*/%:\[\]!<>()&|\^=] return yytext[0];
394 ">=" return GEQ;
395 "<=" return LEQ;
396 "!=" return NEQ;
397 "==" return '=';
398 "<<" return LSH;
399 ">>" return RSH;
400 ${B} { yylval->e = pcap_ether_aton(((char *)yytext)+1);
401 if (yylval->e == NULL)
402 bpf_error(yyextra, "malloc");
403 return AID; }
404 {MAC} { yylval->e = pcap_ether_aton((char *)yytext);
405 if (yylval->e == NULL)
406 bpf_error(yyextra, "malloc");
407 return EID; }
408 {N} { yylval->i = stoi((char *)yytext); return NUM; }
409 ({N}\.{N})|({N}\.{N}\.{N})|({N}\.{N}\.{N}\.{N}) {
410 yylval->s = sdup(yyextra, (char *)yytext); return HID; }
411 {V6} {
412 #ifdef INET6
413 struct addrinfo hints, *res;
414 memset(&hints, 0, sizeof(hints));
415 hints.ai_family = AF_INET6;
416 hints.ai_flags = AI_NUMERICHOST;
417 if (getaddrinfo(yytext, NULL, &hints, &res))
418 bpf_error(yyextra, "bogus IPv6 address %s", yytext);
419 else {
420 freeaddrinfo(res);
421 yylval->s = sdup(yyextra, (char *)yytext); return HID6;
422 }
423 #else
424 bpf_error(yyextra, "IPv6 address %s not supported", yytext);
425 #endif /*INET6*/
426 }
427 {B}:+({B}:+)+ { bpf_error(yyextra, "bogus ethernet address %s", yytext); }
428 icmptype { yylval->i = 0; return NUM; }
429 icmpcode { yylval->i = 1; return NUM; }
430 icmp-echoreply { yylval->i = 0; return NUM; }
431 icmp-unreach { yylval->i = 3; return NUM; }
432 icmp-sourcequench { yylval->i = 4; return NUM; }
433 icmp-redirect { yylval->i = 5; return NUM; }
434 icmp-echo { yylval->i = 8; return NUM; }
435 icmp-routeradvert { yylval->i = 9; return NUM; }
436 icmp-routersolicit { yylval->i = 10; return NUM; }
437 icmp-timxceed { yylval->i = 11; return NUM; }
438 icmp-paramprob { yylval->i = 12; return NUM; }
439 icmp-tstamp { yylval->i = 13; return NUM; }
440 icmp-tstampreply { yylval->i = 14; return NUM; }
441 icmp-ireq { yylval->i = 15; return NUM; }
442 icmp-ireqreply { yylval->i = 16; return NUM; }
443 icmp-maskreq { yylval->i = 17; return NUM; }
444 icmp-maskreply { yylval->i = 18; return NUM; }
445
446 icmp6type { yylval->i = 0; return NUM; }
447 icmp6code { yylval->i = 1; return NUM; }
448
449 icmp6-echo { yylval->i = 128; return NUM; }
450 icmp6-echoreply { yylval->i = 129; return NUM; }
451 icmp6-multicastlistenerquery { yylval->i = 130; return NUM; }
452 icmp6-multicastlistenerreportv1 { yylval->i = 131; return NUM; }
453 icmp6-multicastlistenerdone { yylval->i = 132; return NUM; }
454 icmp6-routersolicit { yylval->i = 133; return NUM; }
455 icmp6-routeradvert { yylval->i = 134; return NUM; }
456 icmp6-neighborsolicit { yylval->i = 135; return NUM; }
457 icmp6-neighboradvert { yylval->i = 136; return NUM; }
458 icmp6-redirect { yylval->i = 137; return NUM; }
459 icmp6-routerrenum { yylval->i = 138; return NUM; }
460 icmp6-nodeinformationquery { yylval->i = 139; return NUM; }
461 icmp6-nodeinformationresponse { yylval->i = 140; return NUM; }
462 icmp6-ineighbordiscoverysolicit { yylval->i = 141; return NUM; }
463 icmp6-ineighbordiscoveryadvert { yylval->i = 142; return NUM; }
464 icmp6-multicastlistenerreportv2 { yylval->i = 143; return NUM; }
465 icmp6-homeagentdiscoveryrequest { yylval->i = 144; return NUM; }
466 icmp6-homeagentdiscoveryreply { yylval->i = 145; return NUM; }
467 icmp6-mobileprefixsolicit { yylval->i = 146; return NUM; }
468 icmp6-mobileprefixadvert { yylval->i = 147; return NUM; }
469 icmp6-certpathsolicit { yylval->i = 148; return NUM; }
470 icmp6-certpathadvert { yylval->i = 149; return NUM; }
471 icmp6-multicastrouteradvert { yylval->i = 151; return NUM; }
472 icmp6-multicastroutersolicit { yylval->i = 152; return NUM; }
473 icmp6-multicastrouterterm { yylval->i = 153; return NUM; }
474
475 tcpflags { yylval->i = 13; return NUM; }
476 tcp-fin { yylval->i = 0x01; return NUM; }
477 tcp-syn { yylval->i = 0x02; return NUM; }
478 tcp-rst { yylval->i = 0x04; return NUM; }
479 tcp-push { yylval->i = 0x08; return NUM; }
480 tcp-ack { yylval->i = 0x10; return NUM; }
481 tcp-urg { yylval->i = 0x20; return NUM; }
482 tcp-ece { yylval->i = 0x40; return NUM; }
483 tcp-cwr { yylval->i = 0x80; return NUM; }
484 [A-Za-z0-9]([-_.A-Za-z0-9]*[.A-Za-z0-9])? {
485 yylval->s = sdup(yyextra, (char *)yytext); return ID; }
486 "\\"[^ !()\n\t]+ { yylval->s = sdup(yyextra, (char *)yytext + 1); return ID; }
487 [^ \[\]\t\n\-_.A-Za-z0-9!<>()&|=]+ {
488 bpf_error(yyextra, "illegal token: %s", yytext); }
489 . { bpf_error(yyextra, "illegal char '%c'", *yytext); }
490 %%
491
492 /*
493 * Turn diagnostics back on, so we check the code that we've written.
494 */
495 DIAG_ON_FLEX
496
497 /* Hex digit to integer. */
498 static inline int
499 xdtoi(int c)
500 {
501 if (isdigit(c))
502 return c - '0';
503 else if (islower(c))
504 return c - 'a' + 10;
505 else
506 return c - 'A' + 10;
507 }
508
509 /*
510 * Convert string to integer. Just like atoi(), but checks for
511 * preceding 0x or 0 and uses hex or octal instead of decimal.
512 */
513 static int
stoi(char * s)514 stoi(char *s)
515 {
516 int base = 10;
517 int n = 0;
518
519 if (*s == '0') {
520 if (s[1] == 'x' || s[1] == 'X') {
521 s += 2;
522 base = 16;
523 }
524 else {
525 base = 8;
526 s += 1;
527 }
528 }
529 while (*s)
530 n = n * base + xdtoi(*s++);
531
532 return n;
533 }
534