xref: /dragonfly/lib/libipfw3/basic/ipfw3_basic.c (revision 279dd846)
1 /*
2  * Copyright (c) 2014 The DragonFly Project.  All rights reserved.
3  *
4  * This code is derived from software contributed to The DragonFly Project
5  * by Bill Yuan <bycn82@gmail.com>
6  *
7  * Redistribution and use in source and binary forms, with or without
8  * modification, are permitted provided that the following conditions
9  * are met:
10  *
11  * 1. Redistributions of source code must retain the above copyright
12  *    notice, this list of conditions and the following disclaimer.
13  * 2. Redistributions in binary form must reproduce the above copyright
14  *    notice, this list of conditions and the following disclaimer in
15  *    the documentation and/or other materials provided with the
16  *    distribution.
17  * 3. Neither the name of The DragonFly Project nor the names of its
18  *    contributors may be used to endorse or promote products derived
19  *    from this software without specific, prior written permission.
20  *
21  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
22  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
23  * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
24  * FOR A PARTICULAR PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE
25  * COPYRIGHT HOLDERS OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT,
26  * INCIDENTAL, SPECIAL, EXEMPLARY OR CONSEQUENTIAL DAMAGES (INCLUDING,
27  * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
28  * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED
29  * AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
30  * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT
31  * OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
32  * SUCH DAMAGE.
33  */
34 
35 #include <ctype.h>
36 #include <err.h>
37 #include <errno.h>
38 #include <grp.h>
39 #include <limits.h>
40 #include <netdb.h>
41 #include <pwd.h>
42 #include <signal.h>
43 #include <stdio.h>
44 #include <stdlib.h>
45 #include <stdarg.h>
46 #include <string.h>
47 #include <sysexits.h>
48 #include <timeconv.h>
49 #include <unistd.h>
50 
51 #include <netinet/in.h>
52 
53 #include <arpa/inet.h>
54 #include <net/if.h>
55 #include <net/route.h>
56 #include <net/pfil.h>
57 
58 #include "../../../sys/net/ipfw3/ip_fw3.h"
59 #include "../../../sbin/ipfw3/ipfw.h"
60 #include "ipfw3_basic.h"
61 
62 
63 #define	IP_MASK_ALL	0xffffffff
64 /*
65  * we use IPPROTO_ETHERTYPE as a fake protocol id to call the print routines
66  * This is only used in this code.
67  */
68 #define IPPROTO_ETHERTYPE	0x1000
69 
70 
71 struct char_int_map limit_types[] = {
72 	{ "src-addr", 	1 },
73 	{ "src-port", 	2 },
74 	{ "dst-addr", 	3 },
75 	{ "dst-port", 	4 },
76 	{ NULL, 	0 }
77 };
78 
79 static struct char_int_map ether_types[] = {
80 	{ "ip", 	0x0800 },
81 	{ "ipv4", 	0x0800 },
82 	{ "ipv6", 	0x86dd },
83 	{ "arp", 	0x0806 },
84 	{ "rarp", 	0x8035 },
85 	{ "vlan", 	0x8100 },
86 	{ "loop", 	0x9000 },
87 	{ "trail", 	0x1000 },
88 	{ "pppoe_disc", 0x8863 },
89 	{ "pppoe_sess", 0x8864 },
90 	{ "ipx_8022", 	0x00E0 },
91 	{ "ipx_8023", 	0x0000 },
92 	{ "ipx_ii", 	0x8137 },
93 	{ "ipx_snap", 	0x8137 },
94 	{ "ipx", 	0x8137 },
95 	{ "ns", 	0x0600 },
96 	{ NULL, 	0 }
97 };
98 
99 /**
100  * match_token takes a table and a string, returns the value associated
101  * with the string (0 meaning an error in most cases)
102  */
103 static int
104 match_token(struct char_int_map *table, char *string)
105 {
106 	while (table->key) {
107 		if (strcmp(table->key, string) == 0)
108 			return table->val;
109 
110 		table++;
111 	}
112 	return 0;
113 };
114 
115 static char *
116 match_token2(struct char_int_map *table, int val)
117 {
118 	while (table->val) {
119 		if (table->val == val)
120 			return table->key;
121 
122 		table++;
123 	}
124 	return NULL;
125 };
126 
127 static void
128 fill_iface(ipfw_insn_if *cmd, char *arg)
129 {
130 	cmd->name[0] = '\0';
131 	cmd->o.len |= F_INSN_SIZE(ipfw_insn_if);
132 
133 	/* Parse the interface or address */
134 	if (!strcmp(arg, "any")){
135 		cmd->o.len = 0;
136 	} else if (!isdigit(*arg)) {
137 		strlcpy(cmd->name, arg, sizeof(cmd->name));
138 		cmd->p.glob = strpbrk(arg, "*?[") != NULL ? 1 : 0;
139 	} else if (!inet_aton(arg, &cmd->p.ip))
140 		errx(EX_DATAERR, "bad ip address ``%s''", arg);
141 }
142 
143 static int
144 lookup_host (char *host, struct in_addr *ipaddr)
145 {
146 	struct hostent *he;
147 
148 	if (!inet_aton(host, ipaddr)) {
149 		if ((he = gethostbyname(host)) == NULL)
150 			return(-1);
151 		*ipaddr = *(struct in_addr *)he->h_addr_list[0];
152 	}
153 	return(0);
154 }
155 
156 /*
157  * Like strtol, but also translates service names into port numbers
158  * for some protocols.
159  * In particular:
160  *	proto == -1 disables the protocol check;
161  *	proto == IPPROTO_ETHERTYPE looks up an internal table
162  *	proto == <some value in /etc/protocols> matches the values there.
163  * Returns *end == s in case the parameter is not found.
164  */
165 static int
166 strtoport(char *s, char **end, int base, int proto)
167 {
168 	char *p, *buf;
169 	char *s1;
170 	int i;
171 
172 	*end = s; 		/* default - not found */
173 	if ( *s == '\0')
174 		return 0; 	/* not found */
175 
176 	if (isdigit(*s))
177 		return strtol(s, end, base);
178 
179 	/*
180 	 * find separator. '\\' escapes the next char.
181 	 */
182 	for (s1 = s; *s1 && (isalnum(*s1) || *s1 == '\\') ; s1++) {
183 		if (*s1 == '\\' && s1[1] != '\0')
184 			s1++;
185 	}
186 
187 	buf = malloc(s1 - s + 1);
188 	if (buf == NULL)
189 		return 0;
190 
191 	/*
192 	 * copy into a buffer skipping backslashes
193 	 */
194 	for (p = s, i = 0; p != s1 ; p++)
195 		if ( *p != '\\')
196 			buf[i++] = *p;
197 	buf[i++] = '\0';
198 
199 	if (proto == IPPROTO_ETHERTYPE) {
200 		i = match_token(ether_types, buf);
201 		free(buf);
202 		if (i != -1) {	/* found */
203 			*end = s1;
204 			return i;
205 		}
206 	} else {
207 		struct protoent *pe = NULL;
208 		struct servent *se;
209 
210 		if (proto != 0)
211 			pe = getprotobynumber(proto);
212 		setservent(1);
213 		se = getservbyname(buf, pe ? pe->p_name : NULL);
214 		free(buf);
215 		if (se != NULL) {
216 			*end = s1;
217 			return ntohs(se->s_port);
218 		}
219 	}
220 	return 0; 	/* not found */
221 }
222 
223 static int
224 contigmask(u_char *p, int len)
225 {
226 	int i, n;
227 	for (i=0; i<len ; i++) {
228 		if ( (p[i/8] & (1 << (7 - (i%8)))) == 0) /* first bit unset */
229 			break;
230 	}
231 	for (n=i+1; n < len; n++) {
232 		if ( (p[n/8] & (1 << (7 - (n%8)))) != 0)
233 			return -1; /* mask not contiguous */
234 	}
235 	return i;
236 }
237 
238 static ipfw_insn *add_proto(ipfw_insn *cmd, char *av)
239 {
240 	struct protoent *pe;
241 	u_char proto = 0;
242 	if (!strncmp(av, "all", strlen(av))) {
243 		;
244 	} else if ((proto = atoi(av)) > 0) {
245 		;
246 	} else if ((pe = getprotobyname(av)) != NULL) {
247 		proto = pe->p_proto;
248 	} else {
249 		errx(EX_USAGE, "protocol `%s' not recognizable\n", av);
250 	}
251 	if (proto != IPPROTO_IP) {
252 		cmd->opcode = O_BASIC_PROTO;
253 		cmd->module = MODULE_BASIC_ID;
254 		cmd->len = cmd->len|LEN_OF_IPFWINSN;
255 		cmd->arg1 = proto;
256 	}
257 	return cmd;
258 }
259 
260 void
261 parse_count(ipfw_insn **cmd, int *ac, char **av[])
262 {
263 	(*cmd)->opcode = O_BASIC_COUNT;
264 	(*cmd)->module = MODULE_BASIC_ID;
265 	(*cmd)->len = LEN_OF_IPFWINSN;
266 	NEXT_ARG1;
267 }
268 
269 void
270 parse_skipto(ipfw_insn **cmd, int *ac, char **av[])
271 {
272 	NEXT_ARG1;
273 	(*cmd)->opcode = O_BASIC_SKIPTO;
274 	(*cmd)->module = MODULE_BASIC_ID;
275 	(*cmd)->len = LEN_OF_IPFWINSN;
276 	(*cmd)->arg1 = strtoul(**av, NULL, 10);
277 	NEXT_ARG1;
278 }
279 
280 /*
281  * cmd->arg3 is count of the destination
282  * cmd->arg1 is the type, random 0, round-robin 1, sticky 2
283  */
284 void
285 parse_forward(ipfw_insn **cmd, int *ac, char **av[])
286 {
287 	ipfw_insn_sa *p = (ipfw_insn_sa *)(*cmd);
288 	struct sockaddr_in *sa;
289 	char *tok, *end = '\0';
290 	char *str;
291 	int count, port;
292 
293 	(*cmd)->opcode = O_BASIC_FORWARD;
294 	NEXT_ARG1;
295 	/*
296 	 * multiple forward destinations are seperated by colon
297 	 * ip address and port are seperated by comma
298 	 * e.g. 192.168.1.1:80,192.168.1.2:8080
299 	 *      192.168.1.1,192.168.1.2 or keep the port the same
300 	 */
301 	tok = strtok(**av, ",");
302 	sa = &p->sa;
303 	count = 0;
304 	while (tok != NULL) {
305 		sa->sin_len = sizeof(struct sockaddr_in);
306 		sa->sin_family = AF_INET;
307 		sa->sin_port = 0;
308 		str = strchr(tok,':');
309 		if (str != NULL) {
310 			*(str++) = '\0';
311 			port = strtoport(str, &end, 0, 0);
312 			sa->sin_port = (u_short)port;
313 		}
314 		lookup_host(tok, &(sa->sin_addr));
315 		tok = strtok (NULL, ",");
316 		sa++;
317 		count++;
318 	}
319 	(*cmd)->arg3 = count;
320 	if (count == 0) {
321 		errx(EX_DATAERR, "forward `%s' not recognizable", **av);
322 	}
323 	NEXT_ARG1;
324 	if (count > 1) {
325 		if (strcmp(**av, "round-robin") == 0) {
326 			NEXT_ARG1;
327 			(*cmd)->arg1 = 1;
328 		} else if (strcmp(**av, "sticky") == 0) {
329 			NEXT_ARG1;
330 			(*cmd)->arg1 = 2;
331 		} else {
332 			/* random */
333 			(*cmd)->arg1 = 0;
334 		}
335 	}
336 	(*cmd)->len = LEN_OF_IPFWINSN + count * sizeof(struct sockaddr_in);
337 }
338 
339 void
340 parse_in(ipfw_insn **cmd, int *ac, char **av[])
341 {
342 	(*cmd)->opcode = O_BASIC_IN;
343 	(*cmd)->module = MODULE_BASIC_ID;
344 	(*cmd)->len = LEN_OF_IPFWINSN;
345 	(*cmd)->arg1 = 0;
346 	NEXT_ARG1;
347 }
348 
349 void
350 parse_out(ipfw_insn **cmd, int *ac, char **av[])
351 {
352 	(*cmd)->opcode = O_BASIC_OUT;
353 	(*cmd)->module = MODULE_BASIC_ID;
354 	(*cmd)->len = LEN_OF_IPFWINSN;
355 	(*cmd)->arg1 = 0;
356 	NEXT_ARG1;
357 }
358 
359 
360 void
361 parse_via(ipfw_insn **cmd, int *ac, char **av[])
362 {
363 	(*cmd)->module = MODULE_BASIC_ID;
364 	(*cmd)->len = LEN_OF_IPFWINSN;
365 	if (strcmp(*av[0], "via")==0) {
366 		(*cmd)->opcode = O_BASIC_VIA;
367 	} else if (strcmp(*av[0], "xmit")==0) {
368 		(*cmd)->opcode = O_BASIC_XMIT;
369 	} else if (strcmp(*av[0], "recv")==0) {
370 		(*cmd)->opcode = O_BASIC_RECV;
371 	}
372 	NEXT_ARG1;
373 	fill_iface((ipfw_insn_if *)(*cmd), *av[0]);
374 	NEXT_ARG1;
375 }
376 
377 /*
378  * Below formats are supported:
379  * from any		return 0 len instruction
380  * from me		O_BASIC_IP_SRC_ME
381  * from 1.2.3.4  	O_BASIC_IP_SRC
382  * from 1.2.3.4/24	O_BASIC_IP_SRC_MASK
383  */
384 void
385 parse_from(ipfw_insn **cmd, int *ac, char **av[])
386 {
387 	ipfw_insn_ip *p = (ipfw_insn_ip *)(*cmd);
388 	int i;
389 
390 	(*cmd)->module = MODULE_BASIC_ID;
391 	NEXT_ARG1;
392 	if (strcmp(**av, "any") == 0) {
393 		(*cmd)->len &= ~F_LEN_MASK;
394 	} else if (strcmp(**av, "me") == 0) {
395 		(*cmd)->len |= F_INSN_SIZE(ipfw_insn);
396 		(*cmd)->opcode = O_BASIC_IP_SRC_ME;
397 	} else {
398 		char *c = NULL, md = 0;
399 		c = strchr(**av, '/');
400 		if (c) {
401 			md = *c;
402 			*c++ = '\0';
403 		}
404 		if (lookup_host(**av, &p->addr) != 0)
405 			errx(EX_NOHOST, "hostname ``%s'' unknown", **av);
406 		switch (md) {
407 			case '/':
408 				i = atoi(c);
409 				if (i == 0)
410 					p->mask.s_addr = htonl(0);
411 				else if (i > 32)
412 					errx(EX_DATAERR, "bad width ``%s''", c);
413 				else
414 					p->mask.s_addr = htonl(~0 << (32 - i));
415 				break;
416 			default:
417 				p->mask.s_addr = htonl(~0);
418 				break;
419 		}
420 		p->addr.s_addr &= p->mask.s_addr;
421 		if (p->mask.s_addr == 0) {
422 			/* high kneel */
423 		} else if (p->mask.s_addr == IP_MASK_ALL) {
424 			(*cmd)->len |= F_INSN_SIZE(ipfw_insn_u32);
425 			(*cmd)->opcode = O_BASIC_IP_SRC;
426 		} else {
427 			(*cmd)->len |= F_INSN_SIZE(ipfw_insn_ip);
428 			(*cmd)->opcode = O_BASIC_IP_SRC_MASK;
429 		}
430 	}
431 	NEXT_ARG1;
432 }
433 
434 void
435 parse_to(ipfw_insn **cmd, int *ac, char **av[])
436 {
437 	ipfw_insn_ip *p = (ipfw_insn_ip *)(*cmd);
438 	int i;
439 
440 	(*cmd)->module = MODULE_BASIC_ID;
441 	NEXT_ARG1;
442 	if (strcmp(**av, "any") == 0) {
443 		(*cmd)->len &= ~F_LEN_MASK;
444 	} else if (strcmp(**av, "me") == 0) {
445 		(*cmd)->len |= F_INSN_SIZE(ipfw_insn);
446 		(*cmd)->opcode = O_BASIC_IP_DST_ME;
447 	} else {
448 		char *c = NULL, md = 0;
449 		c = strchr(**av, '/');
450 		if (c) {
451 			md = *c;
452 			*c++ = '\0';
453 		}
454 		if (lookup_host(**av, &p->addr) != 0)
455 			errx(EX_NOHOST, "hostname ``%s'' unknown", **av);
456 		switch (md) {
457 			case '/':
458 				i = atoi(c);
459 				if (i == 0)
460 					p->mask.s_addr = htonl(0);
461 				else if (i > 32)
462 					errx(EX_DATAERR, "bad width ``%s''", c);
463 				else
464 					p->mask.s_addr = htonl(~0 << (32 - i));
465 				break;
466 			default:
467 				p->mask.s_addr = htonl(~0);
468 				break;
469 		}
470 		p->addr.s_addr &= p->mask.s_addr;
471 		if (p->mask.s_addr == 0) {
472 			/* high kneel */
473 		} else if (p->mask.s_addr == IP_MASK_ALL) {
474 			(*cmd)->len |= F_INSN_SIZE(ipfw_insn_u32);
475 			(*cmd)->opcode = O_BASIC_IP_DST;
476 		} else {
477 			(*cmd)->len |= F_INSN_SIZE(ipfw_insn_ip);
478 			(*cmd)->opcode = O_BASIC_IP_DST_MASK;
479 		}
480 	}
481 	NEXT_ARG1;
482 }
483 
484 void
485 parse_proto(ipfw_insn **cmd, int *ac, char **av[])
486 {
487 	add_proto(*cmd, **av);
488 	NEXT_ARG1;
489 }
490 
491 void
492 parse_prob(ipfw_insn **cmd, int *ac, char **av[])
493 {
494 	NEXT_ARG1;
495 	(*cmd)->opcode = O_BASIC_PROB;
496 	(*cmd)->module = MODULE_BASIC_ID;
497 	(*cmd)->len = LEN_OF_IPFWINSN;
498 	(*cmd)->arg1 = strtoul(**av, NULL, 10);
499 	NEXT_ARG1;
500 }
501 
502 void
503 parse_keep_state(ipfw_insn **cmd, int *ac, char **av[])
504 {
505 	NEXT_ARG1;
506 	(*cmd)->opcode = O_BASIC_KEEP_STATE;
507 	(*cmd)->module = MODULE_BASIC_ID;
508 	(*cmd)->len = LEN_OF_IPFWINSN;
509 	if (strcmp(**av, "limit") == 0) {
510 		NEXT_ARG1;
511 		(*cmd)->arg3 = match_token(limit_types, **av);
512 		if ((*cmd)->arg3 == 0)
513 			errx(EX_DATAERR, "limit `%s' not recognizable", **av);
514 
515 		NEXT_ARG1;
516 		(*cmd)->arg1 = strtoul(**av, NULL, 10);
517 		if ((*cmd)->arg1 == 0)
518 			errx(EX_DATAERR, "bad limit `%s'", **av);
519 
520 		NEXT_ARG1;
521 	}
522 	if (strcmp(**av, "live") == 0) {
523 		NEXT_ARG1;
524 		(*cmd)->arg2 = strtoul(**av, NULL, 10);
525 		NEXT_ARG1;
526 	}
527 }
528 
529 void
530 parse_check_state(ipfw_insn **cmd, int *ac, char **av[])
531 {
532 	NEXT_ARG1;
533 	(*cmd)->opcode = O_BASIC_CHECK_STATE;
534 	(*cmd)->module = MODULE_BASIC_ID;
535 	(*cmd)->len = LEN_OF_IPFWINSN;
536 }
537 
538 void
539 parse_tagged(ipfw_insn **cmd, int *ac, char **av[])
540 {
541 	NEXT_ARG1;
542 	(*cmd)->opcode = O_BASIC_TAGGED;
543 	(*cmd)->module = MODULE_BASIC_ID;
544 	(*cmd)->len = LEN_OF_IPFWINSN;
545 	(*cmd)->arg1 = strtoul(**av, NULL, 10);
546 	NEXT_ARG1;
547 }
548 
549 void
550 parse_comment(ipfw_insn **cmd, int *ac, char **av[])
551 {
552 	int l = 0;
553 	char *p = (char *)((*cmd) + 1);
554 
555 	NEXT_ARG1;
556 	(*cmd)->opcode = O_BASIC_COMMENT;
557 	(*cmd)->module = MODULE_BASIC_ID;
558 
559 	while (*ac > 0) {
560 		l += strlen(**av) + 1;
561 		if (l > 84) {
562 			errx(EX_DATAERR, "comment too long (max 80 chars)");
563 		}
564 		strcpy(p, **av);
565 		p += strlen(**av);
566 		*p++ = ' ';
567 		NEXT_ARG1;
568 	}
569 	l = 1 + (l + 3) / 4;
570 	(*cmd)->len = l;
571 	*(--p) = '\0';
572 }
573 
574 void
575 parse_tag(ipfw_insn **cmd, int *ac, char **av[])
576 {
577 	NEXT_ARG1;
578 	(*cmd)->opcode = O_BASIC_TAG;
579 	(*cmd)->module = MODULE_BASIC_ID;
580 	(*cmd)->len = LEN_OF_IPFWINSN;
581 	(*cmd)->arg1 = strtoul(**av, NULL, 10);
582 	NEXT_ARG1;
583 }
584 
585 void
586 parse_untag(ipfw_insn **cmd, int *ac, char **av[])
587 {
588 	NEXT_ARG1;
589 	(*cmd)->opcode = O_BASIC_UNTAG;
590 	(*cmd)->module = MODULE_BASIC_ID;
591 	(*cmd)->len = LEN_OF_IPFWINSN;
592 	(*cmd)->arg1 = strtoul(**av, NULL, 10);
593 	NEXT_ARG1;
594 }
595 
596 void
597 show_count(ipfw_insn *cmd, int show_or)
598 {
599 	printf(" count");
600 }
601 
602 void
603 show_skipto(ipfw_insn *cmd, int show_or)
604 {
605 	printf(" skipto %u", cmd->arg1);
606 }
607 
608 void
609 show_forward(ipfw_insn *cmd, int show_or)
610 {
611 	struct sockaddr_in *sa;
612 	int i;
613 
614 	ipfw_insn_sa *s = (ipfw_insn_sa *)cmd;
615 	sa = &s->sa;
616 	printf(" forward");
617 	for (i = 0; i < cmd->arg3; i++){
618 		if (i > 0)
619 			printf(",");
620 		else
621 			printf(" ");
622 
623 		printf("%s", inet_ntoa(sa->sin_addr));
624 		if (sa->sin_port != 0)
625 			printf(":%d", sa->sin_port);
626 
627 		sa++;
628 	}
629 	if (cmd->arg1 == 1)
630 		printf(" round-robin");
631 	else if (cmd->arg1 == 2)
632 		printf(" sticky");
633 
634 }
635 
636 void
637 show_in(ipfw_insn *cmd, int show_or)
638 {
639 	printf(" in");
640 }
641 
642 void
643 show_out(ipfw_insn *cmd, int show_or)
644 {
645 	printf(" out");
646 }
647 
648 void
649 show_via(ipfw_insn *cmd, int show_or)
650 {
651 	char *s;
652 	ipfw_insn_if *cmdif = (ipfw_insn_if *)cmd;
653 
654 	if ((int)cmd->opcode == O_BASIC_XMIT)
655 		s = "xmit";
656 	else if ((int)cmd->opcode == O_BASIC_RECV)
657 		s = "recv";
658 	else if ((int)cmd->opcode == O_BASIC_VIA)
659 		s = "via";
660 	else
661 		s = "?huh?";
662 	if (show_or)
663 		s = "or";
664 	if (cmdif->name[0] == '\0')
665 		printf(" %s %s", s, inet_ntoa(cmdif->p.ip));
666 
667 	printf(" %s %s", s, cmdif->name);
668 }
669 
670 void
671 show_from(ipfw_insn *cmd, int show_or)
672 {
673 	char *word = "from";
674 	if (show_or)
675 		word = "or";
676 	printf(" %s %s", word, inet_ntoa(((ipfw_insn_ip *)cmd)->addr));
677 }
678 
679 void
680 show_from_me(ipfw_insn *cmd, int show_or)
681 {
682 	char *word = "from";
683 	if (show_or)
684 		word = "or";
685 	printf(" %s me", word);
686 }
687 
688 void
689 show_from_mask(ipfw_insn *cmd, int show_or)
690 {
691 	int mask;
692 	char *word = "from";
693 	if (show_or)
694 		word = "or";
695 	ipfw_insn_ip *p = (ipfw_insn_ip *)cmd;
696 	printf(" %s %s", word, inet_ntoa(p->addr));
697 
698 	mask = contigmask((u_char *)&(p->mask.s_addr), 32);
699 	if (mask < 32)
700 		printf("/%d", mask);
701 }
702 
703 void
704 show_to(ipfw_insn *cmd, int show_or)
705 {
706 	char *word = "to";
707 	if (show_or)
708 		word = "or";
709 	printf(" %s %s", word, inet_ntoa(((ipfw_insn_ip *)cmd)->addr));
710 }
711 
712 void
713 show_to_me(ipfw_insn *cmd, int show_or)
714 {
715 	char *word = "to";
716 	if (show_or)
717 		word = "or";
718 	printf(" %s me", word);
719 }
720 
721 void
722 show_to_mask(ipfw_insn *cmd, int show_or)
723 {
724 	int mask;
725 	char *word = "to";
726 	if (show_or)
727 		word = "or";
728 	ipfw_insn_ip *p = (ipfw_insn_ip *)cmd;
729 	printf(" %s %s", word, inet_ntoa(p->addr));
730 
731 	mask = contigmask((u_char *)&(p->mask.s_addr), 32);
732 	if (mask < 32)
733 		printf("/%d", mask);
734 }
735 
736 void
737 show_proto(ipfw_insn *cmd, int show_or)
738 {
739 	struct protoent *pe;
740 	u_char proto = 0;
741 	proto = cmd->arg1;
742 	pe = getprotobynumber(cmd->arg1);
743 	printf(" %s", pe->p_name);
744 }
745 
746 void
747 show_prob(ipfw_insn *cmd, int show_or)
748 {
749 	printf(" prob %d%%", cmd->arg1);
750 }
751 
752 void
753 show_keep_state(ipfw_insn *cmd, int show_or)
754 {
755 	printf(" keep-state");
756 	if (cmd->arg1 != 0) {
757 		char *type=match_token2(limit_types, cmd->arg3);
758 		printf(" limit %s %d", type, cmd->arg1);
759 	}
760 	if (cmd->arg2 != 0) {
761 		printf(" live %d", cmd->arg2);
762 	}
763 }
764 
765 void
766 show_check_state(ipfw_insn *cmd, int show_or)
767 {
768 	printf(" check-state");
769 }
770 
771 void
772 show_tagged(ipfw_insn *cmd, int show_or)
773 {
774 	printf(" tagged %d", cmd->arg1);
775 }
776 
777 void
778 show_comment(ipfw_insn *cmd, int show_or)
779 {
780 	printf(" // %s", (char *)(cmd + 1));
781 }
782 
783 void
784 show_tag(ipfw_insn *cmd, int show_or)
785 {
786 	printf(" tag %d", cmd->arg1);
787 }
788 
789 void
790 show_untag(ipfw_insn *cmd, int show_or)
791 {
792 	printf(" untag %d", cmd->arg1);
793 }
794 
795 void
796 load_module(register_func function, register_keyword keyword)
797 {
798 	keyword(MODULE_BASIC_ID, O_BASIC_COUNT, "count",
799 			IPFW_KEYWORD_TYPE_ACTION);
800 	function(MODULE_BASIC_ID, O_BASIC_COUNT,
801 			(parser_func)parse_count, (shower_func)show_count);
802 
803 	keyword(MODULE_BASIC_ID, O_BASIC_SKIPTO, "skipto",
804 			IPFW_KEYWORD_TYPE_ACTION);
805 	function(MODULE_BASIC_ID, O_BASIC_SKIPTO,
806 			(parser_func)parse_skipto, (shower_func)show_skipto);
807 
808 	keyword(MODULE_BASIC_ID, O_BASIC_FORWARD, "forward",
809 			IPFW_KEYWORD_TYPE_ACTION);
810 	function(MODULE_BASIC_ID, O_BASIC_FORWARD,
811 			(parser_func)parse_forward, (shower_func)show_forward);
812 
813 	keyword(MODULE_BASIC_ID, O_BASIC_IN, "in", IPFW_KEYWORD_TYPE_FILTER);
814 	function(MODULE_BASIC_ID, O_BASIC_IN,
815 			(parser_func)parse_in, (shower_func)show_in);
816 
817 	keyword(MODULE_BASIC_ID, O_BASIC_OUT, "out", IPFW_KEYWORD_TYPE_FILTER);
818 	function(MODULE_BASIC_ID, O_BASIC_OUT,
819 			(parser_func)parse_out, (shower_func)show_out);
820 
821 	keyword(MODULE_BASIC_ID, O_BASIC_VIA, "via", IPFW_KEYWORD_TYPE_FILTER);
822 	function(MODULE_BASIC_ID, O_BASIC_VIA,
823 			(parser_func)parse_via, (shower_func)show_via);
824 
825 	keyword(MODULE_BASIC_ID, O_BASIC_XMIT, "xmit",
826 			IPFW_KEYWORD_TYPE_FILTER);
827 	function(MODULE_BASIC_ID, O_BASIC_XMIT,
828 			(parser_func)parse_via, (shower_func)show_via);
829 
830 	keyword(MODULE_BASIC_ID, O_BASIC_RECV, "recv",
831 			IPFW_KEYWORD_TYPE_FILTER);
832 	function(MODULE_BASIC_ID, O_BASIC_RECV,
833 			(parser_func)parse_via, (shower_func)show_via);
834 
835 	keyword(MODULE_BASIC_ID, O_BASIC_IP_SRC, "from",
836 			IPFW_KEYWORD_TYPE_FILTER);
837 	function(MODULE_BASIC_ID, O_BASIC_IP_SRC,
838 			(parser_func)parse_from, (shower_func)show_from);
839 	keyword(MODULE_BASIC_ID, O_BASIC_IP_SRC_ME, "[from me]",
840 			IPFW_KEYWORD_TYPE_FILTER);
841 	function(MODULE_BASIC_ID, O_BASIC_IP_SRC_ME,
842 			(parser_func)parse_from, (shower_func)show_from_me);
843 	keyword(MODULE_BASIC_ID, O_BASIC_IP_SRC_MASK, "[from mask]",
844 			IPFW_KEYWORD_TYPE_FILTER);
845 	function(MODULE_BASIC_ID, O_BASIC_IP_SRC_MASK,
846 			(parser_func)parse_from, (shower_func)show_from_mask);
847 	keyword(MODULE_BASIC_ID, O_BASIC_IP_DST, "to",
848 			IPFW_KEYWORD_TYPE_FILTER);
849 	function(MODULE_BASIC_ID, O_BASIC_IP_DST,
850 			(parser_func)parse_to, (shower_func)show_to);
851 	keyword(MODULE_BASIC_ID, O_BASIC_IP_DST_ME, "[to me]",
852 			IPFW_KEYWORD_TYPE_FILTER);
853 	function(MODULE_BASIC_ID, O_BASIC_IP_DST_ME,
854 			(parser_func)parse_to, (shower_func)show_to_me);
855 	keyword(MODULE_BASIC_ID, O_BASIC_IP_DST_MASK, "[to mask]",
856 			IPFW_KEYWORD_TYPE_FILTER);
857 	function(MODULE_BASIC_ID, O_BASIC_IP_DST_MASK,
858 			(parser_func)parse_to, (shower_func)show_to_mask);
859 
860 	keyword(MODULE_BASIC_ID, O_BASIC_PROTO, "proto",
861 			IPFW_KEYWORD_TYPE_FILTER);
862 	function(MODULE_BASIC_ID, O_BASIC_PROTO,
863 			(parser_func)parse_proto, (shower_func)show_proto);
864 
865 	keyword(MODULE_BASIC_ID, O_BASIC_PROB, "prob",
866 			IPFW_KEYWORD_TYPE_FILTER);
867 	function(MODULE_BASIC_ID, O_BASIC_PROB,
868 			(parser_func)parse_prob, (shower_func)show_prob);
869 
870 	keyword(MODULE_BASIC_ID, O_BASIC_KEEP_STATE, "keep-state",
871 			IPFW_KEYWORD_TYPE_FILTER);
872 	function(MODULE_BASIC_ID, O_BASIC_KEEP_STATE,
873 			(parser_func)parse_keep_state,
874 			(shower_func)show_keep_state);
875 
876 	keyword(MODULE_BASIC_ID, O_BASIC_CHECK_STATE, "check-state",
877 			IPFW_KEYWORD_TYPE_OTHERS);
878 	function(MODULE_BASIC_ID, O_BASIC_CHECK_STATE,
879 			(parser_func)parse_check_state,
880 			(shower_func)show_check_state);
881 
882 	keyword(MODULE_BASIC_ID, O_BASIC_TAG, "tag", IPFW_KEYWORD_TYPE_OTHERS);
883 	function(MODULE_BASIC_ID, O_BASIC_TAG,
884 			(parser_func)parse_tag, (shower_func)show_tag);
885 
886 	keyword(MODULE_BASIC_ID, O_BASIC_UNTAG, "untag",
887 			IPFW_KEYWORD_TYPE_OTHERS);
888 	function(MODULE_BASIC_ID, O_BASIC_UNTAG,
889 			(parser_func)parse_untag, (shower_func)show_untag);
890 
891 	keyword(MODULE_BASIC_ID, O_BASIC_TAGGED, "tagged",
892 			IPFW_KEYWORD_TYPE_FILTER);
893 	function(MODULE_BASIC_ID, O_BASIC_TAGGED,
894 			(parser_func)parse_tagged, (shower_func)show_tagged);
895 
896 	keyword(MODULE_BASIC_ID, O_BASIC_COMMENT, "//",
897 			IPFW_KEYWORD_TYPE_FILTER);
898 	function(MODULE_BASIC_ID, O_BASIC_COMMENT,
899 			(parser_func)parse_comment, (shower_func)show_comment);
900 }
901