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