1%{
2/*
3 * Copyright (c) 1988, 1989, 1990, 1991, 1992, 1993, 1994, 1995, 1996
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 */
23
24#ifdef HAVE_CONFIG_H
25#include "config.h"
26#endif
27
28#ifdef WIN32
29#include <pcap-stdinc.h>
30#else /* WIN32 */
31#include <sys/types.h>
32#include <sys/socket.h>
33#endif /* WIN32 */
34
35#include <stdlib.h>
36
37#ifndef WIN32
38#if __STDC__
39struct mbuf;
40struct rtentry;
41#endif
42
43#include <netinet/in.h>
44#include <arpa/inet.h>
45#endif /* WIN32 */
46
47#include <stdio.h>
48
49#include "pcap-int.h"
50
51#include "gencode.h"
52#ifdef HAVE_NET_PFVAR_H
53#include <net/if.h>
54#include <net/pfvar.h>
55#include <net/if_pflog.h>
56#endif
57#include "llc.h"
58#include "ieee80211.h"
59#include <pcap/namedb.h>
60
61#ifdef HAVE_OS_PROTO_H
62#include "os-proto.h"
63#endif
64
65#define QSET(q, p, d, a) (q).proto = (p),\
66			 (q).dir = (d),\
67			 (q).addr = (a)
68
69struct tok {
70	int v;			/* value */
71	const char *s;		/* string */
72};
73
74static const struct tok ieee80211_types[] = {
75	{ IEEE80211_FC0_TYPE_DATA, "data" },
76	{ IEEE80211_FC0_TYPE_MGT, "mgt" },
77	{ IEEE80211_FC0_TYPE_MGT, "management" },
78	{ IEEE80211_FC0_TYPE_CTL, "ctl" },
79	{ IEEE80211_FC0_TYPE_CTL, "control" },
80	{ 0, NULL }
81};
82static const struct tok ieee80211_mgt_subtypes[] = {
83	{ IEEE80211_FC0_SUBTYPE_ASSOC_REQ, "assocreq" },
84	{ IEEE80211_FC0_SUBTYPE_ASSOC_REQ, "assoc-req" },
85	{ IEEE80211_FC0_SUBTYPE_ASSOC_RESP, "assocresp" },
86	{ IEEE80211_FC0_SUBTYPE_ASSOC_RESP, "assoc-resp" },
87	{ IEEE80211_FC0_SUBTYPE_REASSOC_REQ, "reassocreq" },
88	{ IEEE80211_FC0_SUBTYPE_REASSOC_REQ, "reassoc-req" },
89	{ IEEE80211_FC0_SUBTYPE_REASSOC_RESP, "reassocresp" },
90	{ IEEE80211_FC0_SUBTYPE_REASSOC_RESP, "reassoc-resp" },
91	{ IEEE80211_FC0_SUBTYPE_PROBE_REQ, "probereq" },
92	{ IEEE80211_FC0_SUBTYPE_PROBE_REQ, "probe-req" },
93	{ IEEE80211_FC0_SUBTYPE_PROBE_RESP, "proberesp" },
94	{ IEEE80211_FC0_SUBTYPE_PROBE_RESP, "probe-resp" },
95	{ IEEE80211_FC0_SUBTYPE_BEACON, "beacon" },
96	{ IEEE80211_FC0_SUBTYPE_ATIM, "atim" },
97	{ IEEE80211_FC0_SUBTYPE_DISASSOC, "disassoc" },
98	{ IEEE80211_FC0_SUBTYPE_DISASSOC, "disassociation" },
99	{ IEEE80211_FC0_SUBTYPE_AUTH, "auth" },
100	{ IEEE80211_FC0_SUBTYPE_AUTH, "authentication" },
101	{ IEEE80211_FC0_SUBTYPE_DEAUTH, "deauth" },
102	{ IEEE80211_FC0_SUBTYPE_DEAUTH, "deauthentication" },
103	{ 0, NULL }
104};
105static const struct tok ieee80211_ctl_subtypes[] = {
106	{ IEEE80211_FC0_SUBTYPE_PS_POLL, "ps-poll" },
107	{ IEEE80211_FC0_SUBTYPE_RTS, "rts" },
108	{ IEEE80211_FC0_SUBTYPE_CTS, "cts" },
109	{ IEEE80211_FC0_SUBTYPE_ACK, "ack" },
110	{ IEEE80211_FC0_SUBTYPE_CF_END, "cf-end" },
111	{ IEEE80211_FC0_SUBTYPE_CF_END_ACK, "cf-end-ack" },
112	{ 0, NULL }
113};
114static const struct tok ieee80211_data_subtypes[] = {
115	{ IEEE80211_FC0_SUBTYPE_DATA, "data" },
116	{ IEEE80211_FC0_SUBTYPE_CF_ACK, "data-cf-ack" },
117	{ IEEE80211_FC0_SUBTYPE_CF_POLL, "data-cf-poll" },
118	{ IEEE80211_FC0_SUBTYPE_CF_ACPL, "data-cf-ack-poll" },
119	{ IEEE80211_FC0_SUBTYPE_NODATA, "null" },
120	{ IEEE80211_FC0_SUBTYPE_NODATA_CF_ACK, "cf-ack" },
121	{ IEEE80211_FC0_SUBTYPE_NODATA_CF_POLL, "cf-poll"  },
122	{ IEEE80211_FC0_SUBTYPE_NODATA_CF_ACPL, "cf-ack-poll" },
123	{ IEEE80211_FC0_SUBTYPE_QOS|IEEE80211_FC0_SUBTYPE_DATA, "qos-data" },
124	{ IEEE80211_FC0_SUBTYPE_QOS|IEEE80211_FC0_SUBTYPE_CF_ACK, "qos-data-cf-ack" },
125	{ IEEE80211_FC0_SUBTYPE_QOS|IEEE80211_FC0_SUBTYPE_CF_POLL, "qos-data-cf-poll" },
126	{ IEEE80211_FC0_SUBTYPE_QOS|IEEE80211_FC0_SUBTYPE_CF_ACPL, "qos-data-cf-ack-poll" },
127	{ IEEE80211_FC0_SUBTYPE_QOS|IEEE80211_FC0_SUBTYPE_NODATA, "qos" },
128	{ IEEE80211_FC0_SUBTYPE_QOS|IEEE80211_FC0_SUBTYPE_NODATA_CF_POLL, "qos-cf-poll" },
129	{ IEEE80211_FC0_SUBTYPE_QOS|IEEE80211_FC0_SUBTYPE_NODATA_CF_ACPL, "qos-cf-ack-poll" },
130	{ 0, NULL }
131};
132static const struct tok llc_s_subtypes[] = {
133	{ LLC_RR, "rr" },
134	{ LLC_RNR, "rnr" },
135	{ LLC_REJ, "rej" },
136	{ 0, NULL }
137};
138static const struct tok llc_u_subtypes[] = {
139	{ LLC_UI, "ui" },
140	{ LLC_UA, "ua" },
141	{ LLC_DISC, "disc" },
142	{ LLC_DM, "dm" },
143	{ LLC_SABME, "sabme" },
144	{ LLC_TEST, "test" },
145	{ LLC_XID, "xid" },
146	{ LLC_FRMR, "frmr" },
147	{ 0, NULL }
148};
149struct type2tok {
150	int type;
151	const struct tok *tok;
152};
153static const struct type2tok ieee80211_type_subtypes[] = {
154	{ IEEE80211_FC0_TYPE_MGT, ieee80211_mgt_subtypes },
155	{ IEEE80211_FC0_TYPE_CTL, ieee80211_ctl_subtypes },
156	{ IEEE80211_FC0_TYPE_DATA, ieee80211_data_subtypes },
157	{ 0, NULL }
158};
159
160static int
161str2tok(const char *str, const struct tok *toks)
162{
163	int i;
164
165	for (i = 0; toks[i].s != NULL; i++) {
166		if (pcap_strcasecmp(toks[i].s, str) == 0)
167			return (toks[i].v);
168	}
169	return (-1);
170}
171
172int n_errors = 0;
173
174static struct qual qerr = { Q_UNDEF, Q_UNDEF, Q_UNDEF, Q_UNDEF };
175
176static void
177yyerror(const char *msg)
178{
179	++n_errors;
180	bpf_error("%s", msg);
181	/* NOTREACHED */
182}
183
184#ifdef NEED_YYPARSE_WRAPPER
185int yyparse(void);
186
187int
188pcap_parse()
189{
190	return (yyparse());
191}
192#endif
193
194#ifdef HAVE_NET_PFVAR_H
195static int
196pfreason_to_num(const char *reason)
197{
198	const char *reasons[] = PFRES_NAMES;
199	int i;
200
201	for (i = 0; reasons[i]; i++) {
202		if (pcap_strcasecmp(reason, reasons[i]) == 0)
203			return (i);
204	}
205	bpf_error("unknown PF reason");
206	/*NOTREACHED*/
207}
208
209static int
210pfaction_to_num(const char *action)
211{
212	if (pcap_strcasecmp(action, "pass") == 0 ||
213	    pcap_strcasecmp(action, "accept") == 0)
214		return (PF_PASS);
215	else if (pcap_strcasecmp(action, "drop") == 0 ||
216		pcap_strcasecmp(action, "block") == 0)
217		return (PF_DROP);
218#if HAVE_PF_NAT_THROUGH_PF_NORDR
219	else if (pcap_strcasecmp(action, "rdr") == 0)
220		return (PF_RDR);
221	else if (pcap_strcasecmp(action, "nat") == 0)
222		return (PF_NAT);
223	else if (pcap_strcasecmp(action, "binat") == 0)
224		return (PF_BINAT);
225	else if (pcap_strcasecmp(action, "nordr") == 0)
226		return (PF_NORDR);
227#endif
228	else {
229		bpf_error("unknown PF action");
230		/*NOTREACHED*/
231	}
232}
233#else /* !HAVE_NET_PFVAR_H */
234static int
235pfreason_to_num(const char *reason)
236{
237	bpf_error("libpcap was compiled on a machine without pf support");
238	/*NOTREACHED*/
239
240	/* this is to make the VC compiler happy */
241	return -1;
242}
243
244static int
245pfaction_to_num(const char *action)
246{
247	bpf_error("libpcap was compiled on a machine without pf support");
248	/*NOTREACHED*/
249
250	/* this is to make the VC compiler happy */
251	return -1;
252}
253#endif /* HAVE_NET_PFVAR_H */
254%}
255
256%union {
257	int i;
258	bpf_u_int32 h;
259	u_char *e;
260	char *s;
261	struct stmt *stmt;
262	struct arth *a;
263	struct {
264		struct qual q;
265		int atmfieldtype;
266		int mtp3fieldtype;
267		struct block *b;
268	} blk;
269	struct block *rblk;
270}
271
272%type	<blk>	expr id nid pid term rterm qid
273%type	<blk>	head
274%type	<i>	pqual dqual aqual ndaqual
275%type	<a>	arth narth
276%type	<i>	byteop pname pnum relop irelop
277%type	<blk>	and or paren not null prog
278%type	<rblk>	other pfvar p80211 pllc
279%type	<i>	atmtype atmmultitype
280%type	<blk>	atmfield
281%type	<blk>	atmfieldvalue atmvalue atmlistvalue
282%type	<i>	mtp2type
283%type	<blk>	mtp3field
284%type	<blk>	mtp3fieldvalue mtp3value mtp3listvalue
285
286
287%token  DST SRC HOST GATEWAY
288%token  NET NETMASK PORT PORTRANGE LESS GREATER PROTO PROTOCHAIN CBYTE
289%token  ARP RARP IP SCTP TCP UDP ICMP IGMP IGRP PIM VRRP CARP
290%token  ATALK AARP DECNET LAT SCA MOPRC MOPDL
291%token  TK_BROADCAST TK_MULTICAST
292%token  NUM INBOUND OUTBOUND
293%token  PF_IFNAME PF_RSET PF_RNR PF_SRNR PF_REASON PF_ACTION
294%token	TYPE SUBTYPE DIR ADDR1 ADDR2 ADDR3 ADDR4 RA TA
295%token  LINK
296%token	GEQ LEQ NEQ
297%token	ID EID HID HID6 AID
298%token	LSH RSH
299%token  LEN
300%token  IPV6 ICMPV6 AH ESP
301%token	VLAN MPLS
302%token	PPPOED PPPOES GENEVE
303%token  ISO ESIS CLNP ISIS L1 L2 IIH LSP SNP CSNP PSNP
304%token  STP
305%token  IPX
306%token  NETBEUI
307%token	LANE LLC METAC BCC SC ILMIC OAMF4EC OAMF4SC
308%token	OAM OAMF4 CONNECTMSG METACONNECT
309%token	VPI VCI
310%token	RADIO
311%token	FISU LSSU MSU HFISU HLSSU HMSU
312%token	SIO OPC DPC SLS HSIO HOPC HDPC HSLS
313
314
315%type	<s> ID
316%type	<e> EID
317%type	<e> AID
318%type	<s> HID HID6
319%type	<i> NUM action reason type subtype type_subtype dir
320
321%left OR AND
322%nonassoc  '!'
323%left '|'
324%left '&'
325%left LSH RSH
326%left '+' '-'
327%left '*' '/'
328%nonassoc UMINUS
329%%
330prog:	  null expr
331{
332	finish_parse($2.b);
333}
334	| null
335	;
336null:	  /* null */		{ $$.q = qerr; }
337	;
338expr:	  term
339	| expr and term		{ gen_and($1.b, $3.b); $$ = $3; }
340	| expr and id		{ gen_and($1.b, $3.b); $$ = $3; }
341	| expr or term		{ gen_or($1.b, $3.b); $$ = $3; }
342	| expr or id		{ gen_or($1.b, $3.b); $$ = $3; }
343	;
344and:	  AND			{ $$ = $<blk>0; }
345	;
346or:	  OR			{ $$ = $<blk>0; }
347	;
348id:	  nid
349	| pnum			{ $$.b = gen_ncode(NULL, (bpf_u_int32)$1,
350						   $$.q = $<blk>0.q); }
351	| paren pid ')'		{ $$ = $2; }
352	;
353nid:	  ID			{ $$.b = gen_scode($1, $$.q = $<blk>0.q); }
354	| HID '/' NUM		{ $$.b = gen_mcode($1, NULL, $3,
355				    $$.q = $<blk>0.q); }
356	| HID NETMASK HID	{ $$.b = gen_mcode($1, $3, 0,
357				    $$.q = $<blk>0.q); }
358	| HID			{
359				  /* Decide how to parse HID based on proto */
360				  $$.q = $<blk>0.q;
361				  if ($$.q.addr == Q_PORT)
362				  	bpf_error("'port' modifier applied to ip host");
363				  else if ($$.q.addr == Q_PORTRANGE)
364				  	bpf_error("'portrange' modifier applied to ip host");
365				  else if ($$.q.addr == Q_PROTO)
366				  	bpf_error("'proto' modifier applied to ip host");
367				  else if ($$.q.addr == Q_PROTOCHAIN)
368				  	bpf_error("'protochain' modifier applied to ip host");
369				  $$.b = gen_ncode($1, 0, $$.q);
370				}
371	| HID6 '/' NUM		{
372#ifdef INET6
373				  $$.b = gen_mcode6($1, NULL, $3,
374				    $$.q = $<blk>0.q);
375#else
376				  bpf_error("'ip6addr/prefixlen' not supported "
377					"in this configuration");
378#endif /*INET6*/
379				}
380	| HID6			{
381#ifdef INET6
382				  $$.b = gen_mcode6($1, 0, 128,
383				    $$.q = $<blk>0.q);
384#else
385				  bpf_error("'ip6addr' not supported "
386					"in this configuration");
387#endif /*INET6*/
388				}
389	| EID			{
390				  $$.b = gen_ecode($1, $$.q = $<blk>0.q);
391				  /*
392				   * $1 was allocated by "pcap_ether_aton()",
393				   * so we must free it now that we're done
394				   * with it.
395				   */
396				  free($1);
397				}
398	| AID			{
399				  $$.b = gen_acode($1, $$.q = $<blk>0.q);
400				  /*
401				   * $1 was allocated by "pcap_ether_aton()",
402				   * so we must free it now that we're done
403				   * with it.
404				   */
405				  free($1);
406				}
407	| not id		{ gen_not($2.b); $$ = $2; }
408	;
409not:	  '!'			{ $$ = $<blk>0; }
410	;
411paren:	  '('			{ $$ = $<blk>0; }
412	;
413pid:	  nid
414	| qid and id		{ gen_and($1.b, $3.b); $$ = $3; }
415	| qid or id		{ gen_or($1.b, $3.b); $$ = $3; }
416	;
417qid:	  pnum			{ $$.b = gen_ncode(NULL, (bpf_u_int32)$1,
418						   $$.q = $<blk>0.q); }
419	| pid
420	;
421term:	  rterm
422	| not term		{ gen_not($2.b); $$ = $2; }
423	;
424head:	  pqual dqual aqual	{ QSET($$.q, $1, $2, $3); }
425	| pqual dqual		{ QSET($$.q, $1, $2, Q_DEFAULT); }
426	| pqual aqual		{ QSET($$.q, $1, Q_DEFAULT, $2); }
427	| pqual PROTO		{ QSET($$.q, $1, Q_DEFAULT, Q_PROTO); }
428	| pqual PROTOCHAIN	{ QSET($$.q, $1, Q_DEFAULT, Q_PROTOCHAIN); }
429	| pqual ndaqual		{ QSET($$.q, $1, Q_DEFAULT, $2); }
430	;
431rterm:	  head id		{ $$ = $2; }
432	| paren expr ')'	{ $$.b = $2.b; $$.q = $1.q; }
433	| pname			{ $$.b = gen_proto_abbrev($1); $$.q = qerr; }
434	| arth relop arth	{ $$.b = gen_relation($2, $1, $3, 0);
435				  $$.q = qerr; }
436	| arth irelop arth	{ $$.b = gen_relation($2, $1, $3, 1);
437				  $$.q = qerr; }
438	| other			{ $$.b = $1; $$.q = qerr; }
439	| atmtype		{ $$.b = gen_atmtype_abbrev($1); $$.q = qerr; }
440	| atmmultitype		{ $$.b = gen_atmmulti_abbrev($1); $$.q = qerr; }
441	| atmfield atmvalue	{ $$.b = $2.b; $$.q = qerr; }
442	| mtp2type		{ $$.b = gen_mtp2type_abbrev($1); $$.q = qerr; }
443	| mtp3field mtp3value	{ $$.b = $2.b; $$.q = qerr; }
444	;
445/* protocol level qualifiers */
446pqual:	  pname
447	|			{ $$ = Q_DEFAULT; }
448	;
449/* 'direction' qualifiers */
450dqual:	  SRC			{ $$ = Q_SRC; }
451	| DST			{ $$ = Q_DST; }
452	| SRC OR DST		{ $$ = Q_OR; }
453	| DST OR SRC		{ $$ = Q_OR; }
454	| SRC AND DST		{ $$ = Q_AND; }
455	| DST AND SRC		{ $$ = Q_AND; }
456	| ADDR1			{ $$ = Q_ADDR1; }
457	| ADDR2			{ $$ = Q_ADDR2; }
458	| ADDR3			{ $$ = Q_ADDR3; }
459	| ADDR4			{ $$ = Q_ADDR4; }
460	| RA			{ $$ = Q_RA; }
461	| TA			{ $$ = Q_TA; }
462	;
463/* address type qualifiers */
464aqual:	  HOST			{ $$ = Q_HOST; }
465	| NET			{ $$ = Q_NET; }
466	| PORT			{ $$ = Q_PORT; }
467	| PORTRANGE		{ $$ = Q_PORTRANGE; }
468	;
469/* non-directional address type qualifiers */
470ndaqual:  GATEWAY		{ $$ = Q_GATEWAY; }
471	;
472pname:	  LINK			{ $$ = Q_LINK; }
473	| IP			{ $$ = Q_IP; }
474	| ARP			{ $$ = Q_ARP; }
475	| RARP			{ $$ = Q_RARP; }
476	| SCTP			{ $$ = Q_SCTP; }
477	| TCP			{ $$ = Q_TCP; }
478	| UDP			{ $$ = Q_UDP; }
479	| ICMP			{ $$ = Q_ICMP; }
480	| IGMP			{ $$ = Q_IGMP; }
481	| IGRP			{ $$ = Q_IGRP; }
482	| PIM			{ $$ = Q_PIM; }
483	| VRRP			{ $$ = Q_VRRP; }
484	| CARP 			{ $$ = Q_CARP; }
485	| ATALK			{ $$ = Q_ATALK; }
486	| AARP			{ $$ = Q_AARP; }
487	| DECNET		{ $$ = Q_DECNET; }
488	| LAT			{ $$ = Q_LAT; }
489	| SCA			{ $$ = Q_SCA; }
490	| MOPDL			{ $$ = Q_MOPDL; }
491	| MOPRC			{ $$ = Q_MOPRC; }
492	| IPV6			{ $$ = Q_IPV6; }
493	| ICMPV6		{ $$ = Q_ICMPV6; }
494	| AH			{ $$ = Q_AH; }
495	| ESP			{ $$ = Q_ESP; }
496	| ISO			{ $$ = Q_ISO; }
497	| ESIS			{ $$ = Q_ESIS; }
498	| ISIS			{ $$ = Q_ISIS; }
499	| L1			{ $$ = Q_ISIS_L1; }
500	| L2			{ $$ = Q_ISIS_L2; }
501	| IIH			{ $$ = Q_ISIS_IIH; }
502	| LSP			{ $$ = Q_ISIS_LSP; }
503	| SNP			{ $$ = Q_ISIS_SNP; }
504	| PSNP			{ $$ = Q_ISIS_PSNP; }
505	| CSNP			{ $$ = Q_ISIS_CSNP; }
506	| CLNP			{ $$ = Q_CLNP; }
507	| STP			{ $$ = Q_STP; }
508	| IPX			{ $$ = Q_IPX; }
509	| NETBEUI		{ $$ = Q_NETBEUI; }
510	| RADIO			{ $$ = Q_RADIO; }
511	;
512other:	  pqual TK_BROADCAST	{ $$ = gen_broadcast($1); }
513	| pqual TK_MULTICAST	{ $$ = gen_multicast($1); }
514	| LESS NUM		{ $$ = gen_less($2); }
515	| GREATER NUM		{ $$ = gen_greater($2); }
516	| CBYTE NUM byteop NUM	{ $$ = gen_byteop($3, $2, $4); }
517	| INBOUND		{ $$ = gen_inbound(0); }
518	| OUTBOUND		{ $$ = gen_inbound(1); }
519	| VLAN pnum		{ $$ = gen_vlan($2); }
520	| VLAN			{ $$ = gen_vlan(-1); }
521	| MPLS pnum		{ $$ = gen_mpls($2); }
522	| MPLS			{ $$ = gen_mpls(-1); }
523	| PPPOED		{ $$ = gen_pppoed(); }
524	| PPPOES pnum		{ $$ = gen_pppoes($2); }
525	| PPPOES		{ $$ = gen_pppoes(-1); }
526	| GENEVE pnum		{ $$ = gen_geneve($2); }
527	| GENEVE		{ $$ = gen_geneve(-1); }
528	| pfvar			{ $$ = $1; }
529	| pqual p80211		{ $$ = $2; }
530	| pllc			{ $$ = $1; }
531	;
532
533pfvar:	  PF_IFNAME ID		{ $$ = gen_pf_ifname($2); }
534	| PF_RSET ID		{ $$ = gen_pf_ruleset($2); }
535	| PF_RNR NUM		{ $$ = gen_pf_rnr($2); }
536	| PF_SRNR NUM		{ $$ = gen_pf_srnr($2); }
537	| PF_REASON reason	{ $$ = gen_pf_reason($2); }
538	| PF_ACTION action	{ $$ = gen_pf_action($2); }
539	;
540
541p80211:   TYPE type SUBTYPE subtype
542				{ $$ = gen_p80211_type($2 | $4,
543					IEEE80211_FC0_TYPE_MASK |
544					IEEE80211_FC0_SUBTYPE_MASK);
545				}
546	| TYPE type		{ $$ = gen_p80211_type($2,
547					IEEE80211_FC0_TYPE_MASK);
548				}
549	| SUBTYPE type_subtype	{ $$ = gen_p80211_type($2,
550					IEEE80211_FC0_TYPE_MASK |
551					IEEE80211_FC0_SUBTYPE_MASK);
552				}
553	| DIR dir		{ $$ = gen_p80211_fcdir($2); }
554	;
555
556type:	  NUM
557	| ID			{ $$ = str2tok($1, ieee80211_types);
558				  if ($$ == -1)
559				  	bpf_error("unknown 802.11 type name");
560				}
561	;
562
563subtype:  NUM
564	| ID			{ const struct tok *types = NULL;
565				  int i;
566				  for (i = 0;; i++) {
567				  	if (ieee80211_type_subtypes[i].tok == NULL) {
568				  		/* Ran out of types */
569						bpf_error("unknown 802.11 type");
570						break;
571					}
572					if ($<i>-1 == ieee80211_type_subtypes[i].type) {
573						types = ieee80211_type_subtypes[i].tok;
574						break;
575					}
576				  }
577
578				  $$ = str2tok($1, types);
579				  if ($$ == -1)
580					bpf_error("unknown 802.11 subtype name");
581				}
582	;
583
584type_subtype:	ID		{ int i;
585				  for (i = 0;; i++) {
586				  	if (ieee80211_type_subtypes[i].tok == NULL) {
587				  		/* Ran out of types */
588						bpf_error("unknown 802.11 type name");
589						break;
590					}
591					$$ = str2tok($1, ieee80211_type_subtypes[i].tok);
592					if ($$ != -1) {
593						$$ |= ieee80211_type_subtypes[i].type;
594						break;
595					}
596				  }
597				}
598		;
599
600pllc:	LLC			{ $$ = gen_llc(); }
601	| LLC ID		{ if (pcap_strcasecmp($2, "i") == 0)
602					$$ = gen_llc_i();
603				  else if (pcap_strcasecmp($2, "s") == 0)
604					$$ = gen_llc_s();
605				  else if (pcap_strcasecmp($2, "u") == 0)
606					$$ = gen_llc_u();
607				  else {
608				  	u_int subtype;
609
610					subtype = str2tok($2, llc_s_subtypes);
611					if (subtype != -1)
612						$$ = gen_llc_s_subtype(subtype);
613					else {
614						subtype = str2tok($2, llc_u_subtypes);
615						if (subtype == -1)
616					  		bpf_error("unknown LLC type name \"%s\"", $2);
617						$$ = gen_llc_u_subtype(subtype);
618					}
619				  }
620				}
621				/* sigh, "rnr" is already a keyword for PF */
622	| LLC PF_RNR		{ $$ = gen_llc_s_subtype(LLC_RNR); }
623	;
624
625dir:	  NUM
626	| ID			{ if (pcap_strcasecmp($1, "nods") == 0)
627					$$ = IEEE80211_FC1_DIR_NODS;
628				  else if (pcap_strcasecmp($1, "tods") == 0)
629					$$ = IEEE80211_FC1_DIR_TODS;
630				  else if (pcap_strcasecmp($1, "fromds") == 0)
631					$$ = IEEE80211_FC1_DIR_FROMDS;
632				  else if (pcap_strcasecmp($1, "dstods") == 0)
633					$$ = IEEE80211_FC1_DIR_DSTODS;
634				  else
635					bpf_error("unknown 802.11 direction");
636				}
637	;
638
639reason:	  NUM			{ $$ = $1; }
640	| ID			{ $$ = pfreason_to_num($1); }
641	;
642
643action:	  ID			{ $$ = pfaction_to_num($1); }
644	;
645
646relop:	  '>'			{ $$ = BPF_JGT; }
647	| GEQ			{ $$ = BPF_JGE; }
648	| '='			{ $$ = BPF_JEQ; }
649	;
650irelop:	  LEQ			{ $$ = BPF_JGT; }
651	| '<'			{ $$ = BPF_JGE; }
652	| NEQ			{ $$ = BPF_JEQ; }
653	;
654arth:	  pnum			{ $$ = gen_loadi($1); }
655	| narth
656	;
657narth:	  pname '[' arth ']'		{ $$ = gen_load($1, $3, 1); }
658	| pname '[' arth ':' NUM ']'	{ $$ = gen_load($1, $3, $5); }
659	| arth '+' arth			{ $$ = gen_arth(BPF_ADD, $1, $3); }
660	| arth '-' arth			{ $$ = gen_arth(BPF_SUB, $1, $3); }
661	| arth '*' arth			{ $$ = gen_arth(BPF_MUL, $1, $3); }
662	| arth '/' arth			{ $$ = gen_arth(BPF_DIV, $1, $3); }
663	| arth '%' arth			{ $$ = gen_arth(BPF_MOD, $1, $3); }
664	| arth '&' arth			{ $$ = gen_arth(BPF_AND, $1, $3); }
665	| arth '|' arth			{ $$ = gen_arth(BPF_OR, $1, $3); }
666	| arth '^' arth			{ $$ = gen_arth(BPF_XOR, $1, $3); }
667	| arth LSH arth			{ $$ = gen_arth(BPF_LSH, $1, $3); }
668	| arth RSH arth			{ $$ = gen_arth(BPF_RSH, $1, $3); }
669	| '-' arth %prec UMINUS		{ $$ = gen_neg($2); }
670	| paren narth ')'		{ $$ = $2; }
671	| LEN				{ $$ = gen_loadlen(); }
672	;
673byteop:	  '&'			{ $$ = '&'; }
674	| '|'			{ $$ = '|'; }
675	| '<'			{ $$ = '<'; }
676	| '>'			{ $$ = '>'; }
677	| '='			{ $$ = '='; }
678	;
679pnum:	  NUM
680	| paren pnum ')'	{ $$ = $2; }
681	;
682atmtype: LANE			{ $$ = A_LANE; }
683	| METAC			{ $$ = A_METAC;	}
684	| BCC			{ $$ = A_BCC; }
685	| OAMF4EC		{ $$ = A_OAMF4EC; }
686	| OAMF4SC		{ $$ = A_OAMF4SC; }
687	| SC			{ $$ = A_SC; }
688	| ILMIC			{ $$ = A_ILMIC; }
689	;
690atmmultitype: OAM		{ $$ = A_OAM; }
691	| OAMF4			{ $$ = A_OAMF4; }
692	| CONNECTMSG		{ $$ = A_CONNECTMSG; }
693	| METACONNECT		{ $$ = A_METACONNECT; }
694	;
695	/* ATM field types quantifier */
696atmfield: VPI			{ $$.atmfieldtype = A_VPI; }
697	| VCI			{ $$.atmfieldtype = A_VCI; }
698	;
699atmvalue: atmfieldvalue
700	| relop NUM		{ $$.b = gen_atmfield_code($<blk>0.atmfieldtype, (bpf_int32)$2, (bpf_u_int32)$1, 0); }
701	| irelop NUM		{ $$.b = gen_atmfield_code($<blk>0.atmfieldtype, (bpf_int32)$2, (bpf_u_int32)$1, 1); }
702	| paren atmlistvalue ')' { $$.b = $2.b; $$.q = qerr; }
703	;
704atmfieldvalue: NUM {
705	$$.atmfieldtype = $<blk>0.atmfieldtype;
706	if ($$.atmfieldtype == A_VPI ||
707	    $$.atmfieldtype == A_VCI)
708		$$.b = gen_atmfield_code($$.atmfieldtype, (bpf_int32) $1, BPF_JEQ, 0);
709	}
710	;
711atmlistvalue: atmfieldvalue
712	| atmlistvalue or atmfieldvalue { gen_or($1.b, $3.b); $$ = $3; }
713	;
714	/* MTP2 types quantifier */
715mtp2type: FISU			{ $$ = M_FISU; }
716	| LSSU			{ $$ = M_LSSU; }
717	| MSU			{ $$ = M_MSU; }
718	| HFISU			{ $$ = MH_FISU; }
719	| HLSSU			{ $$ = MH_LSSU; }
720	| HMSU			{ $$ = MH_MSU; }
721	;
722	/* MTP3 field types quantifier */
723mtp3field: SIO			{ $$.mtp3fieldtype = M_SIO; }
724	| OPC			{ $$.mtp3fieldtype = M_OPC; }
725	| DPC			{ $$.mtp3fieldtype = M_DPC; }
726	| SLS                   { $$.mtp3fieldtype = M_SLS; }
727	| HSIO			{ $$.mtp3fieldtype = MH_SIO; }
728	| HOPC			{ $$.mtp3fieldtype = MH_OPC; }
729	| HDPC			{ $$.mtp3fieldtype = MH_DPC; }
730	| HSLS                  { $$.mtp3fieldtype = MH_SLS; }
731	;
732mtp3value: mtp3fieldvalue
733	| relop NUM		{ $$.b = gen_mtp3field_code($<blk>0.mtp3fieldtype, (u_int)$2, (u_int)$1, 0); }
734	| irelop NUM		{ $$.b = gen_mtp3field_code($<blk>0.mtp3fieldtype, (u_int)$2, (u_int)$1, 1); }
735	| paren mtp3listvalue ')' { $$.b = $2.b; $$.q = qerr; }
736	;
737mtp3fieldvalue: NUM {
738	$$.mtp3fieldtype = $<blk>0.mtp3fieldtype;
739	if ($$.mtp3fieldtype == M_SIO ||
740	    $$.mtp3fieldtype == M_OPC ||
741	    $$.mtp3fieldtype == M_DPC ||
742	    $$.mtp3fieldtype == M_SLS ||
743	    $$.mtp3fieldtype == MH_SIO ||
744	    $$.mtp3fieldtype == MH_OPC ||
745	    $$.mtp3fieldtype == MH_DPC ||
746	    $$.mtp3fieldtype == MH_SLS)
747		$$.b = gen_mtp3field_code($$.mtp3fieldtype, (u_int) $1, BPF_JEQ, 0);
748	}
749	;
750mtp3listvalue: mtp3fieldvalue
751	| mtp3listvalue or mtp3fieldvalue { gen_or($1.b, $3.b); $$ = $3; }
752	;
753%%
754