1 %{ 2 /* 3 * Copyright (c) 1988, 1989, 1990, 1991, 1992, 1993, 1994, 1995, 1996, 1997 4 * The Regents of the University of California. All rights reserved. 5 * 6 * Redistribution and use in source and binary forms, with or without 7 * modification, are permitted provided that: (1) source code distributions 8 * retain the above copyright notice and this paragraph in its entirety, (2) 9 * distributions including binary code include the above copyright notice and 10 * this paragraph in its entirety in the documentation or other materials 11 * provided with the distribution, and (3) all advertising materials mentioning 12 * features or use of this software display the following acknowledgement: 13 * ``This product includes software developed by the University of California, 14 * Lawrence Berkeley Laboratory and its contributors.'' Neither the name of 15 * the University nor the names of its contributors may be used to endorse 16 * or promote products derived from this software without specific prior 17 * written permission. 18 * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR IMPLIED 19 * WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED WARRANTIES OF 20 * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE. 21 * 22 * $FreeBSD$ 23 */ 24 25 #ifndef lint 26 static const char rcsid[] = 27 "@(#) $Header: /tcpdump/master/libpcap/scanner.l,v 1.81 2001/09/14 01:40:57 fenner Exp $ (LBL)"; 28 #endif 29 30 #ifdef HAVE_CONFIG_H 31 #include "config.h" 32 #endif 33 34 #include <sys/types.h> 35 #include <sys/time.h> 36 37 #include <ctype.h> 38 #include <unistd.h> 39 #include <string.h> 40 41 #include "pcap-int.h" 42 43 #include "gencode.h" 44 #include <pcap-namedb.h> 45 #ifdef INET6 46 #include <netdb.h> 47 #include <sys/socket.h> 48 /* Workaround for AIX 4.3 */ 49 #if !defined(AI_NUMERICHOST) 50 #define AI_NUMERICHOST 0x04 51 #endif 52 #endif /*INET6*/ 53 #include "tokdefs.h" 54 55 #ifdef HAVE_OS_PROTO_H 56 #include "os-proto.h" 57 #endif 58 59 static int stoi(char *); 60 static inline int xdtoi(int); 61 62 #ifdef FLEX_SCANNER 63 #define YY_NO_UNPUT 64 static YY_BUFFER_STATE in_buffer; 65 #else 66 static char *in_buffer; 67 68 #undef getc 69 #define getc(fp) (*in_buffer == 0 ? EOF : *in_buffer++) 70 #endif 71 72 #define yylval pcap_lval 73 extern YYSTYPE yylval; 74 75 %} 76 77 N ([0-9]+|(0X|0x)[0-9A-Fa-f]+) 78 B ([0-9A-Fa-f][0-9A-Fa-f]?) 79 W ([0-9A-Fa-f][0-9A-Fa-f]?[0-9A-Fa-f]?[0-9A-Fa-f]?) 80 81 %a 15000 82 %o 17000 83 %e 6000 84 %k 4000 85 %p 19000 86 %n 2000 87 88 V680 {W}:{W}:{W}:{W}:{W}:{W}:{W}:{W} 89 90 V670 ::{W}:{W}:{W}:{W}:{W}:{W}:{W} 91 V671 {W}::{W}:{W}:{W}:{W}:{W}:{W} 92 V672 {W}:{W}::{W}:{W}:{W}:{W}:{W} 93 V673 {W}:{W}:{W}::{W}:{W}:{W}:{W} 94 V674 {W}:{W}:{W}:{W}::{W}:{W}:{W} 95 V675 {W}:{W}:{W}:{W}:{W}::{W}:{W} 96 V676 {W}:{W}:{W}:{W}:{W}:{W}::{W} 97 V677 {W}:{W}:{W}:{W}:{W}:{W}:{W}:: 98 99 V660 ::{W}:{W}:{W}:{W}:{W}:{W} 100 V661 {W}::{W}:{W}:{W}:{W}:{W} 101 V662 {W}:{W}::{W}:{W}:{W}:{W} 102 V663 {W}:{W}:{W}::{W}:{W}:{W} 103 V664 {W}:{W}:{W}:{W}::{W}:{W} 104 V665 {W}:{W}:{W}:{W}:{W}::{W} 105 V666 {W}:{W}:{W}:{W}:{W}:{W}:: 106 107 V650 ::{W}:{W}:{W}:{W}:{W} 108 V651 {W}::{W}:{W}:{W}:{W} 109 V652 {W}:{W}::{W}:{W}:{W} 110 V653 {W}:{W}:{W}::{W}:{W} 111 V654 {W}:{W}:{W}:{W}::{W} 112 V655 {W}:{W}:{W}:{W}:{W}:: 113 114 V640 ::{W}:{W}:{W}:{W} 115 V641 {W}::{W}:{W}:{W} 116 V642 {W}:{W}::{W}:{W} 117 V643 {W}:{W}:{W}::{W} 118 V644 {W}:{W}:{W}:{W}:: 119 120 V630 ::{W}:{W}:{W} 121 V631 {W}::{W}:{W} 122 V632 {W}:{W}::{W} 123 V633 {W}:{W}:{W}:: 124 125 V620 ::{W}:{W} 126 V621 {W}::{W} 127 V622 {W}:{W}:: 128 129 V610 ::{W} 130 V611 {W}:: 131 132 V600 :: 133 134 V6604 {W}:{W}:{W}:{W}:{W}:{W}:{N}\.{N}\.{N}\.{N} 135 136 V6504 ::{W}:{W}:{W}:{W}:{W}:{N}\.{N}\.{N}\.{N} 137 V6514 {W}::{W}:{W}:{W}:{W}:{N}\.{N}\.{N}\.{N} 138 V6524 {W}:{W}::{W}:{W}:{W}:{N}\.{N}\.{N}\.{N} 139 V6534 {W}:{W}:{W}::{W}:{W}:{N}\.{N}\.{N}\.{N} 140 V6544 {W}:{W}:{W}:{W}::{W}:{N}\.{N}\.{N}\.{N} 141 V6554 {W}:{W}:{W}:{W}:{W}::{N}\.{N}\.{N}\.{N} 142 143 V6404 ::{W}:{W}:{W}:{W}:{N}\.{N}\.{N}\.{N} 144 V6414 {W}::{W}:{W}:{W}:{N}\.{N}\.{N}\.{N} 145 V6424 {W}:{W}::{W}:{W}:{N}\.{N}\.{N}\.{N} 146 V6434 {W}:{W}:{W}::{W}:{N}\.{N}\.{N}\.{N} 147 V6444 {W}:{W}:{W}:{W}::{N}\.{N}\.{N}\.{N} 148 149 V6304 ::{W}:{W}:{W}:{N}\.{N}\.{N}\.{N} 150 V6314 {W}::{W}:{W}:{N}\.{N}\.{N}\.{N} 151 V6324 {W}:{W}::{W}:{N}\.{N}\.{N}\.{N} 152 V6334 {W}:{W}:{W}::{N}\.{N}\.{N}\.{N} 153 154 V6204 ::{W}:{W}:{N}\.{N}\.{N}\.{N} 155 V6214 {W}::{W}:{N}\.{N}\.{N}\.{N} 156 V6224 {W}:{W}::{N}\.{N}\.{N}\.{N} 157 158 V6104 ::{W}:{N}\.{N}\.{N}\.{N} 159 V6114 {W}::{N}\.{N}\.{N}\.{N} 160 161 V6004 ::{N}\.{N}\.{N}\.{N} 162 163 164 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}) 165 166 %% 167 dst return DST; 168 src return SRC; 169 170 link|ether|ppp|slip return LINK; 171 fddi|tr return LINK; 172 arp return ARP; 173 rarp return RARP; 174 ip return IP; 175 sctp return SCTP; 176 tcp return TCP; 177 udp return UDP; 178 icmp return ICMP; 179 igmp return IGMP; 180 igrp return IGRP; 181 pim return PIM; 182 vrrp return VRRP; 183 184 ip6 { 185 #ifdef INET6 186 return IPV6; 187 #else 188 bpf_error("%s not supported", yytext); 189 #endif 190 } 191 icmp6 { 192 #ifdef INET6 193 return ICMPV6; 194 #else 195 bpf_error("%s not supported", yytext); 196 #endif 197 } 198 ah return AH; 199 esp return ESP; 200 201 atalk return ATALK; 202 aarp return AARP; 203 decnet return DECNET; 204 lat return LAT; 205 sca return SCA; 206 moprc return MOPRC; 207 mopdl return MOPDL; 208 209 iso return ISO; 210 esis return ESIS; 211 es-is return ESIS; 212 isis return ISIS; 213 is-is return ISIS; 214 clnp return CLNP; 215 216 stp return STP; 217 218 ipx return IPX; 219 220 netbeui return NETBEUI; 221 222 host return HOST; 223 net return NET; 224 mask return MASK; 225 port return PORT; 226 proto return PROTO; 227 protochain { 228 #ifdef NO_PROTOCHAIN 229 bpf_error("%s not supported", yytext); 230 #else 231 return PROTOCHAIN; 232 #endif 233 } 234 235 gateway return GATEWAY; 236 237 less return LESS; 238 greater return GREATER; 239 byte return BYTE; 240 broadcast return TK_BROADCAST; 241 multicast return TK_MULTICAST; 242 243 and|"&&" return AND; 244 or|"||" return OR; 245 not return '!'; 246 247 len|length return LEN; 248 inbound return INBOUND; 249 outbound return OUTBOUND; 250 251 vlan return VLAN; 252 253 [ \n\t] ; 254 [+\-*/:\[\]!<>()&|=] return yytext[0]; 255 ">=" return GEQ; 256 "<=" return LEQ; 257 "!=" return NEQ; 258 "==" return '='; 259 "<<" return LSH; 260 ">>" return RSH; 261 ${B} { yylval.e = pcap_ether_aton(((char *)yytext)+1); 262 return AID; } 263 {N} { yylval.i = stoi((char *)yytext); return NUM; } 264 ({N}\.{N})|({N}\.{N}\.{N})|({N}\.{N}\.{N}\.{N}) { 265 yylval.s = sdup((char *)yytext); return HID; } 266 {B}:{B}:{B}:{B}:{B}:{B} { yylval.e = pcap_ether_aton((char *)yytext); 267 return EID; } 268 {V6} { 269 #ifdef INET6 270 struct addrinfo hints, *res; 271 memset(&hints, 0, sizeof(hints)); 272 hints.ai_family = AF_INET6; 273 hints.ai_flags = AI_NUMERICHOST; 274 if (getaddrinfo(yytext, NULL, &hints, &res)) 275 bpf_error("bogus IPv6 address %s", yytext); 276 else { 277 yylval.e = sdup((char *)yytext); return HID6; 278 } 279 #else 280 bpf_error("IPv6 address %s not supported", yytext); 281 #endif /*INET6*/ 282 } 283 {B}:+({B}:+)+ { bpf_error("bogus ethernet address %s", yytext); } 284 icmptype { yylval.i = 0; return NUM; } 285 icmpcode { yylval.i = 1; return NUM; } 286 icmp-echoreply { yylval.i = 0; return NUM; } 287 icmp-unreach { yylval.i = 3; return NUM; } 288 icmp-sourcequench { yylval.i = 4; return NUM; } 289 icmp-redirect { yylval.i = 5; return NUM; } 290 icmp-echo { yylval.i = 8; return NUM; } 291 icmp-routeradvert { yylval.i = 9; return NUM; } 292 icmp-routersolicit { yylval.i = 10; return NUM; } 293 icmp-timxceed { yylval.i = 11; return NUM; } 294 icmp-paramprob { yylval.i = 12; return NUM; } 295 icmp-tstamp { yylval.i = 13; return NUM; } 296 icmp-tstampreply { yylval.i = 14; return NUM; } 297 icmp-ireq { yylval.i = 15; return NUM; } 298 icmp-ireqreply { yylval.i = 16; return NUM; } 299 icmp-maskreq { yylval.i = 17; return NUM; } 300 icmp-maskreply { yylval.i = 18; return NUM; } 301 tcpflags { yylval.i = 13; return NUM; } 302 tcp-fin { yylval.i = 0x01; return NUM; } 303 tcp-syn { yylval.i = 0x02; return NUM; } 304 tcp-rst { yylval.i = 0x04; return NUM; } 305 tcp-push { yylval.i = 0x08; return NUM; } 306 tcp-ack { yylval.i = 0x10; return NUM; } 307 tcp-urg { yylval.i = 0x20; return NUM; } 308 [A-Za-z0-9]([-_.A-Za-z0-9]*[.A-Za-z0-9])? { 309 yylval.s = sdup((char *)yytext); return ID; } 310 "\\"[^ !()\n\t]+ { yylval.s = sdup((char *)yytext + 1); return ID; } 311 [^ \[\]\t\n\-_.A-Za-z0-9!<>()&|=]+ { 312 bpf_error("illegal token: %s", yytext); } 313 . { bpf_error("illegal char '%c'", *yytext); } 314 %% 315 void 316 lex_init(buf) 317 char *buf; 318 { 319 #ifdef FLEX_SCANNER 320 in_buffer = yy_scan_string(buf); 321 #else 322 in_buffer = buf; 323 #endif 324 } 325 326 /* 327 * Do any cleanup necessary after parsing. 328 */ 329 void 330 lex_cleanup() 331 { 332 #ifdef FLEX_SCANNER 333 if (in_buffer != NULL) 334 yy_delete_buffer(in_buffer); 335 in_buffer = NULL; 336 #endif 337 } 338 339 /* 340 * Also define a yywrap. Note that if we're using flex, it will 341 * define a macro to map this identifier to pcap_wrap. 342 */ 343 int 344 yywrap() 345 { 346 return 1; 347 } 348 349 /* Hex digit to integer. */ 350 static inline int 351 xdtoi(c) 352 register int c; 353 { 354 if (isdigit(c)) 355 return c - '0'; 356 else if (islower(c)) 357 return c - 'a' + 10; 358 else 359 return c - 'A' + 10; 360 } 361 362 /* 363 * Convert string to integer. Just like atoi(), but checks for 364 * preceding 0x or 0 and uses hex or octal instead of decimal. 365 */ 366 static int 367 stoi(s) 368 char *s; 369 { 370 int base = 10; 371 int n = 0; 372 373 if (*s == '0') { 374 if (s[1] == 'x' || s[1] == 'X') { 375 s += 2; 376 base = 16; 377 } 378 else { 379 base = 8; 380 s += 1; 381 } 382 } 383 while (*s) 384 n = n * base + xdtoi(*s++); 385 386 return n; 387 } 388