1/* $OpenBSD: pfctl_table.c,v 1.62 2004/12/22 17:17:55 dhartmei Exp $ */
2
3/*
4 * Copyright (c) 2002 Cedric Berger
5 * All rights reserved.
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 * - Redistributions of source code must retain the above copyright
12 * notice, this list of conditions and the following disclaimer.
13 * - Redistributions in binary form must reproduce the above
14 * copyright notice, this list of conditions and the following
15 * disclaimer in the documentation and/or other materials provided
16 * with the distribution.
17 *
18 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
19 * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
20 * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
21 * FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE
22 * COPYRIGHT HOLDERS OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT,
23 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
24 * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
25 * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER
26 * CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
27 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN
28 * ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
29 * POSSIBILITY OF SUCH DAMAGE.
30 *
31 */
32
33#include <sys/cdefs.h>
34__FBSDID("$FreeBSD: head/contrib/pf/pfctl/pfctl_table.c 145840 2005-05-03 16:55:20Z mlaier $");
35
36#include <sys/types.h>
37#include <sys/ioctl.h>
38#include <sys/socket.h>
39
40#include <net/if.h>
41#include <net/pfvar.h>
42#include <arpa/inet.h>
43
44#include <ctype.h>
45#include <err.h>
46#include <errno.h>
47#include <netdb.h>
48#include <stdarg.h>
49#include <stdio.h>
50#include <stdlib.h>
51#include <string.h>
52#include <time.h>
53
54#include "pfctl_parser.h"
55#include "pfctl.h"
56
57extern void usage(void);
58static int pfctl_table(int, char *[], char *, const char *, char *,
59 const char *, int);
60static void print_table(struct pfr_table *, int, int);
61static void print_tstats(struct pfr_tstats *, int);
62static int load_addr(struct pfr_buffer *, int, char *[], char *, int);
63static void print_addrx(struct pfr_addr *, struct pfr_addr *, int);
64static void print_astats(struct pfr_astats *, int);
65static void radix_perror(void);
66static void xprintf(int, const char *, ...);
67static void print_iface(struct pfi_if *, int);
68static void oprintf(int, int, const char *, int *, int);
69
70static const char *stats_text[PFR_DIR_MAX][PFR_OP_TABLE_MAX] = {
71 { "In/Block:", "In/Pass:", "In/XPass:" },
72 { "Out/Block:", "Out/Pass:", "Out/XPass:" }
73};
74
75static const char *istats_text[2][2][2] = {
76 { { "In4/Pass:", "In4/Block:" }, { "Out4/Pass:", "Out4/Block:" } },
77 { { "In6/Pass:", "In6/Block:" }, { "Out6/Pass:", "Out6/Block:" } }
78};
79
80#define RVTEST(fct) do { \
81 if ((!(opts & PF_OPT_NOACTION) || \
82 (opts & PF_OPT_DUMMYACTION)) && \
83 (fct)) { \
84 radix_perror(); \
85 goto _error; \
86 } \
87 } while (0)
88
89#define CREATE_TABLE do { \
90 table.pfrt_flags |= PFR_TFLAG_PERSIST; \
91 if ((!(opts & PF_OPT_NOACTION) || \
92 (opts & PF_OPT_DUMMYACTION)) && \
93 (pfr_add_tables(&table, 1, &nadd, flags)) && \
94 (errno != EPERM)) { \
95 radix_perror(); \
96 goto _error; \
97 } \
98 if (nadd) { \
99 warn_namespace_collision(table.pfrt_name); \
100 xprintf(opts, "%d table created", nadd); \
101 if (opts & PF_OPT_NOACTION) \
102 return (0); \
103 } \
104 table.pfrt_flags &= ~PFR_TFLAG_PERSIST; \
105 } while(0)
106
107int
108pfctl_clear_tables(const char *anchor, int opts)
109{
110 return pfctl_table(0, NULL, NULL, "-F", NULL, anchor, opts);
111}
112
113int
114pfctl_show_tables(const char *anchor, int opts)
115{
116 return pfctl_table(0, NULL, NULL, "-s", NULL, anchor, opts);
117}
118
119int
120pfctl_command_tables(int argc, char *argv[], char *tname,
121 const char *command, char *file, const char *anchor, int opts)
122{
123 if (tname == NULL || command == NULL)
124 usage();
125 return pfctl_table(argc, argv, tname, command, file, anchor, opts);
126}
127
128int
129pfctl_table(int argc, char *argv[], char *tname, const char *command,
130 char *file, const char *anchor, int opts)
131{
132 struct pfr_table table;
133 struct pfr_buffer b, b2;
134 struct pfr_addr *a, *a2;
135 int nadd = 0, ndel = 0, nchange = 0, nzero = 0;
136 int rv = 0, flags = 0, nmatch = 0;
137 void *p;
138
139 if (command == NULL)
140 usage();
141 if (opts & PF_OPT_NOACTION)
142 flags |= PFR_FLAG_DUMMY;
143
144 bzero(&b, sizeof(b));
145 bzero(&b2, sizeof(b2));
146 bzero(&table, sizeof(table));
147 if (tname != NULL) {
148 if (strlen(tname) >= PF_TABLE_NAME_SIZE)
149 usage();
150 if (strlcpy(table.pfrt_name, tname,
151 sizeof(table.pfrt_name)) >= sizeof(table.pfrt_name))
152 errx(1, "pfctl_table: strlcpy");
153 }
154 if (strlcpy(table.pfrt_anchor, anchor,
155 sizeof(table.pfrt_anchor)) >= sizeof(table.pfrt_anchor))
156 errx(1, "pfctl_table: strlcpy");
157
158 if (!strcmp(command, "-F")) {
159 if (argc || file != NULL)
160 usage();
161 RVTEST(pfr_clr_tables(&table, &ndel, flags));
162 xprintf(opts, "%d tables deleted", ndel);
163 } else if (!strcmp(command, "-s")) {
164 b.pfrb_type = (opts & PF_OPT_VERBOSE2) ?
165 PFRB_TSTATS : PFRB_TABLES;
166 if (argc || file != NULL)
167 usage();
168 for (;;) {
169 pfr_buf_grow(&b, b.pfrb_size);
170 b.pfrb_size = b.pfrb_msize;
171 if (opts & PF_OPT_VERBOSE2)
172 RVTEST(pfr_get_tstats(&table,
173 b.pfrb_caddr, &b.pfrb_size, flags));
174 else
175 RVTEST(pfr_get_tables(&table,
176 b.pfrb_caddr, &b.pfrb_size, flags));
177 if (b.pfrb_size <= b.pfrb_msize)
178 break;
179 }
180
181 if (opts & PF_OPT_SHOWALL && b.pfrb_size > 0)
182 pfctl_print_title("TABLES:");
183
184 PFRB_FOREACH(p, &b)
185 if (opts & PF_OPT_VERBOSE2)
186 print_tstats(p, opts & PF_OPT_DEBUG);
187 else
188 print_table(p, opts & PF_OPT_VERBOSE,
189 opts & PF_OPT_DEBUG);
190 } else if (!strcmp(command, "kill")) {
191 if (argc || file != NULL)
192 usage();
193 RVTEST(pfr_del_tables(&table, 1, &ndel, flags));
194 xprintf(opts, "%d table deleted", ndel);
195 } else if (!strcmp(command, "flush")) {
196 if (argc || file != NULL)
197 usage();
198 RVTEST(pfr_clr_addrs(&table, &ndel, flags));
199 xprintf(opts, "%d addresses deleted", ndel);
200 } else if (!strcmp(command, "add")) {
201 b.pfrb_type = PFRB_ADDRS;
202 if (load_addr(&b, argc, argv, file, 0))
203 goto _error;
204 CREATE_TABLE;
205 if (opts & PF_OPT_VERBOSE)
206 flags |= PFR_FLAG_FEEDBACK;
207 RVTEST(pfr_add_addrs(&table, b.pfrb_caddr, b.pfrb_size,
208 &nadd, flags));
209 xprintf(opts, "%d/%d addresses added", nadd, b.pfrb_size);
210 if (opts & PF_OPT_VERBOSE)
211 PFRB_FOREACH(a, &b)
212 if ((opts & PF_OPT_VERBOSE2) || a->pfra_fback)
213 print_addrx(a, NULL,
214 opts & PF_OPT_USEDNS);
215 } else if (!strcmp(command, "delete")) {
216 b.pfrb_type = PFRB_ADDRS;
217 if (load_addr(&b, argc, argv, file, 0))
218 goto _error;
219 if (opts & PF_OPT_VERBOSE)
220 flags |= PFR_FLAG_FEEDBACK;
221 RVTEST(pfr_del_addrs(&table, b.pfrb_caddr, b.pfrb_size,
222 &ndel, flags));
223 xprintf(opts, "%d/%d addresses deleted", ndel, b.pfrb_size);
224 if (opts & PF_OPT_VERBOSE)
225 PFRB_FOREACH(a, &b)
226 if ((opts & PF_OPT_VERBOSE2) || a->pfra_fback)
227 print_addrx(a, NULL,
228 opts & PF_OPT_USEDNS);
229 } else if (!strcmp(command, "replace")) {
230 b.pfrb_type = PFRB_ADDRS;
231 if (load_addr(&b, argc, argv, file, 0))
232 goto _error;
233 CREATE_TABLE;
234 if (opts & PF_OPT_VERBOSE)
235 flags |= PFR_FLAG_FEEDBACK;
236 for (;;) {
237 int sz2 = b.pfrb_msize;
238
239 RVTEST(pfr_set_addrs(&table, b.pfrb_caddr, b.pfrb_size,
240 &sz2, &nadd, &ndel, &nchange, flags));
241 if (sz2 <= b.pfrb_msize) {
242 b.pfrb_size = sz2;
243 break;
244 } else
245 pfr_buf_grow(&b, sz2);
246 }
247 if (nadd)
248 xprintf(opts, "%d addresses added", nadd);
249 if (ndel)
250 xprintf(opts, "%d addresses deleted", ndel);
251 if (nchange)
252 xprintf(opts, "%d addresses changed", nchange);
253 if (!nadd && !ndel && !nchange)
254 xprintf(opts, "no changes");
255 if (opts & PF_OPT_VERBOSE)
256 PFRB_FOREACH(a, &b)
257 if ((opts & PF_OPT_VERBOSE2) || a->pfra_fback)
258 print_addrx(a, NULL,
259 opts & PF_OPT_USEDNS);
260 } else if (!strcmp(command, "show")) {
261 b.pfrb_type = (opts & PF_OPT_VERBOSE) ?
262 PFRB_ASTATS : PFRB_ADDRS;
263 if (argc || file != NULL)
264 usage();
265 for (;;) {
266 pfr_buf_grow(&b, b.pfrb_size);
267 b.pfrb_size = b.pfrb_msize;
268 if (opts & PF_OPT_VERBOSE)
269 RVTEST(pfr_get_astats(&table, b.pfrb_caddr,
270 &b.pfrb_size, flags));
271 else
272 RVTEST(pfr_get_addrs(&table, b.pfrb_caddr,
273 &b.pfrb_size, flags));
274 if (b.pfrb_size <= b.pfrb_msize)
275 break;
276 }
277 PFRB_FOREACH(p, &b)
278 if (opts & PF_OPT_VERBOSE)
279 print_astats(p, opts & PF_OPT_USEDNS);
280 else
281 print_addrx(p, NULL, opts & PF_OPT_USEDNS);
282 } else if (!strcmp(command, "test")) {
283 b.pfrb_type = PFRB_ADDRS;
284 b2.pfrb_type = PFRB_ADDRS;
285
286 if (load_addr(&b, argc, argv, file, 1))
287 goto _error;
288 if (opts & PF_OPT_VERBOSE2) {
289 flags |= PFR_FLAG_REPLACE;
290 PFRB_FOREACH(a, &b)
291 if (pfr_buf_add(&b2, a))
292 err(1, "duplicate buffer");
293 }
294 RVTEST(pfr_tst_addrs(&table, b.pfrb_caddr, b.pfrb_size,
295 &nmatch, flags));
296 xprintf(opts, "%d/%d addresses match", nmatch, b.pfrb_size);
297 if (opts & PF_OPT_VERBOSE && !(opts & PF_OPT_VERBOSE2))
298 PFRB_FOREACH(a, &b)
299 if (a->pfra_fback == PFR_FB_MATCH)
300 print_addrx(a, NULL,
301 opts & PF_OPT_USEDNS);
302 if (opts & PF_OPT_VERBOSE2) {
303 a2 = NULL;
304 PFRB_FOREACH(a, &b) {
305 a2 = pfr_buf_next(&b2, a2);
306 print_addrx(a2, a, opts & PF_OPT_USEDNS);
307 }
308 }
309 if (nmatch < b.pfrb_size)
310 rv = 2;
311 } else if (!strcmp(command, "zero")) {
312 if (argc || file != NULL)
313 usage();
314 flags |= PFR_FLAG_ADDRSTOO;
315 RVTEST(pfr_clr_tstats(&table, 1, &nzero, flags));
316 xprintf(opts, "%d table/stats cleared", nzero);
317 } else
318 warnx("pfctl_table: unknown command '%s'", command);
319 goto _cleanup;
320
321_error:
322 rv = -1;
323_cleanup:
324 pfr_buf_clear(&b);
325 pfr_buf_clear(&b2);
326 return (rv);
327}
328
329void
330print_table(struct pfr_table *ta, int verbose, int debug)
331{
332 if (!debug && !(ta->pfrt_flags & PFR_TFLAG_ACTIVE))
333 return;
334 if (verbose) {
335 printf("%c%c%c%c%c%c\t%s",
336 (ta->pfrt_flags & PFR_TFLAG_CONST) ? 'c' : '-',
337 (ta->pfrt_flags & PFR_TFLAG_PERSIST) ? 'p' : '-',
338 (ta->pfrt_flags & PFR_TFLAG_ACTIVE) ? 'a' : '-',
339 (ta->pfrt_flags & PFR_TFLAG_INACTIVE) ? 'i' : '-',
340 (ta->pfrt_flags & PFR_TFLAG_REFERENCED) ? 'r' : '-',
341 (ta->pfrt_flags & PFR_TFLAG_REFDANCHOR) ? 'h' : '-',
342 ta->pfrt_name);
343 if (ta->pfrt_anchor[0])
344 printf("\t%s", ta->pfrt_anchor);
345 puts("");
346 } else
347 puts(ta->pfrt_name);
348}
349
350void
351print_tstats(struct pfr_tstats *ts, int debug)
352{
353 time_t time = ts->pfrts_tzero;
354 int dir, op;
355
356 if (!debug && !(ts->pfrts_flags & PFR_TFLAG_ACTIVE))
357 return;
358 print_table(&ts->pfrts_t, 1, debug);
359 printf("\tAddresses: %d\n", ts->pfrts_cnt);
360 printf("\tCleared: %s", ctime(&time));
361 printf("\tReferences: [ Anchors: %-18d Rules: %-18d ]\n",
362 ts->pfrts_refcnt[PFR_REFCNT_ANCHOR],
363 ts->pfrts_refcnt[PFR_REFCNT_RULE]);
364 printf("\tEvaluations: [ NoMatch: %-18llu Match: %-18llu ]\n",
365 (unsigned long long)ts->pfrts_nomatch,
366 (unsigned long long)ts->pfrts_match);
367 for (dir = 0; dir < PFR_DIR_MAX; dir++)
368 for (op = 0; op < PFR_OP_TABLE_MAX; op++)
369 printf("\t%-12s [ Packets: %-18llu Bytes: %-18llu ]\n",
370 stats_text[dir][op],
371 (unsigned long long)ts->pfrts_packets[dir][op],
372 (unsigned long long)ts->pfrts_bytes[dir][op]);
373}
374
375int
376load_addr(struct pfr_buffer *b, int argc, char *argv[], char *file,
377 int nonetwork)
378{
379 while (argc--)
380 if (append_addr(b, *argv++, nonetwork)) {
381 if (errno)
382 warn("cannot decode %s", argv[-1]);
383 return (-1);
384 }
385 if (pfr_buf_load(b, file, nonetwork, append_addr)) {
386 warn("cannot load %s", file);
387 return (-1);
388 }
389 return (0);
390}
391
392void
393print_addrx(struct pfr_addr *ad, struct pfr_addr *rad, int dns)
394{
395 char ch, buf[256] = "{error}";
396 char fb[] = { ' ', 'M', 'A', 'D', 'C', 'Z', 'X', ' ', 'Y' };
397 unsigned int fback, hostnet;
398
399 fback = (rad != NULL) ? rad->pfra_fback : ad->pfra_fback;
400 ch = (fback < sizeof(fb)/sizeof(*fb)) ? fb[fback] : '?';
401 hostnet = (ad->pfra_af == AF_INET6) ? 128 : 32;
402 inet_ntop(ad->pfra_af, &ad->pfra_u, buf, sizeof(buf));
403 printf("%c %c%s", ch, (ad->pfra_not?'!':' '), buf);
404 if (ad->pfra_net < hostnet)
405 printf("/%d", ad->pfra_net);
406 if (rad != NULL && fback != PFR_FB_NONE) {
407 if (strlcpy(buf, "{error}", sizeof(buf)) >= sizeof(buf))
408 errx(1, "print_addrx: strlcpy");
409 inet_ntop(rad->pfra_af, &rad->pfra_u, buf, sizeof(buf));
410 printf("\t%c%s", (rad->pfra_not?'!':' '), buf);
411 if (rad->pfra_net < hostnet)
412 printf("/%d", rad->pfra_net);
413 }
414 if (rad != NULL && fback == PFR_FB_NONE)
415 printf("\t nomatch");
416 if (dns && ad->pfra_net == hostnet) {
417 char host[NI_MAXHOST];
418 union sockaddr_union sa;
419
420 strlcpy(host, "?", sizeof(host));
421 bzero(&sa, sizeof(sa));
422 sa.sa.sa_family = ad->pfra_af;
423 if (sa.sa.sa_family == AF_INET) {
424 sa.sa.sa_len = sizeof(sa.sin);
425 sa.sin.sin_addr = ad->pfra_ip4addr;
426 } else {
427 sa.sa.sa_len = sizeof(sa.sin6);
428 sa.sin6.sin6_addr = ad->pfra_ip6addr;
429 }
430 if (getnameinfo(&sa.sa, sa.sa.sa_len, host, sizeof(host),
431 NULL, 0, NI_NAMEREQD) == 0)
432 printf("\t(%s)", host);
433 }
434 printf("\n");
435}
436
437void
438print_astats(struct pfr_astats *as, int dns)
439{
440 time_t time = as->pfras_tzero;
441 int dir, op;
442
443 print_addrx(&as->pfras_a, NULL, dns);
444 printf("\tCleared: %s", ctime(&time));
445 for (dir = 0; dir < PFR_DIR_MAX; dir++)
446 for (op = 0; op < PFR_OP_ADDR_MAX; op++)
447 printf("\t%-12s [ Packets: %-18llu Bytes: %-18llu ]\n",
448 stats_text[dir][op],
449 (unsigned long long)as->pfras_packets[dir][op],
450 (unsigned long long)as->pfras_bytes[dir][op]);
451}
452
453void
454radix_perror(void)
455{
456 extern char *__progname;
457 fprintf(stderr, "%s: %s.\n", __progname, pfr_strerror(errno));
458}
459
460int
461pfctl_define_table(char *name, int flags, int addrs, const char *anchor,
462 struct pfr_buffer *ab, u_int32_t ticket)
463{
464 struct pfr_table tbl;
465
466 bzero(&tbl, sizeof(tbl));
467 if (strlcpy(tbl.pfrt_name, name, sizeof(tbl.pfrt_name)) >=
468 sizeof(tbl.pfrt_name) || strlcpy(tbl.pfrt_anchor, anchor,
469 sizeof(tbl.pfrt_anchor)) >= sizeof(tbl.pfrt_anchor))
470 errx(1, "pfctl_define_table: strlcpy");
471 tbl.pfrt_flags = flags;
472
473 return pfr_ina_define(&tbl, ab->pfrb_caddr, ab->pfrb_size, NULL,
474 NULL, ticket, addrs ? PFR_FLAG_ADDRSTOO : 0);
475}
476
477void
478warn_namespace_collision(const char *filter)
479{
480 struct pfr_buffer b;
481 struct pfr_table *t;
482 const char *name = NULL, *lastcoll;
483 int coll = 0;
484
485 bzero(&b, sizeof(b));
486 b.pfrb_type = PFRB_TABLES;
487 for (;;) {
488 pfr_buf_grow(&b, b.pfrb_size);
489 b.pfrb_size = b.pfrb_msize;
490 if (pfr_get_tables(NULL, b.pfrb_caddr,
491 &b.pfrb_size, PFR_FLAG_ALLRSETS))
492 err(1, "pfr_get_tables");
493 if (b.pfrb_size <= b.pfrb_msize)
494 break;
495 }
496 PFRB_FOREACH(t, &b) {
497 if (!(t->pfrt_flags & PFR_TFLAG_ACTIVE))
498 continue;
499 if (filter != NULL && strcmp(filter, t->pfrt_name))
500 continue;
501 if (!t->pfrt_anchor[0])
502 name = t->pfrt_name;
503 else if (name != NULL && !strcmp(name, t->pfrt_name)) {
504 coll++;
505 lastcoll = name;
506 name = NULL;
507 }
508 }
509 if (coll == 1)
510 warnx("warning: namespace collision with <%s> global table.",
511 lastcoll);
512 else if (coll > 1)
513 warnx("warning: namespace collisions with %d global tables.",
514 coll);
515 pfr_buf_clear(&b);
516}
517
518void
519xprintf(int opts, const char *fmt, ...)
520{
521 va_list args;
522
523 if (opts & PF_OPT_QUIET)
524 return;
525
526 va_start(args, fmt);
527 vfprintf(stderr, fmt, args);
528 va_end(args);
529
530 if (opts & PF_OPT_DUMMYACTION)
531 fprintf(stderr, " (dummy).\n");
532 else if (opts & PF_OPT_NOACTION)
533 fprintf(stderr, " (syntax only).\n");
534 else
535 fprintf(stderr, ".\n");
536}
537
538
539/* interface stuff */
540
541int
542pfctl_show_ifaces(const char *filter, int opts)
543{
544 struct pfr_buffer b;
545 struct pfi_if *p;
546 int i = 0, f = PFI_FLAG_GROUP|PFI_FLAG_INSTANCE;
547
548 if (filter != NULL && *filter && !isdigit(filter[strlen(filter)-1]))
549 f &= ~PFI_FLAG_INSTANCE;
550 bzero(&b, sizeof(b));
551 b.pfrb_type = PFRB_IFACES;
552 for (;;) {
553 pfr_buf_grow(&b, b.pfrb_size);
554 b.pfrb_size = b.pfrb_msize;
555 if (pfi_get_ifaces(filter, b.pfrb_caddr, &b.pfrb_size, f)) {
556 radix_perror();
557 return (1);
558 }
559 if (b.pfrb_size <= b.pfrb_msize)
560 break;
561 i++;
562 }
563 if (opts & PF_OPT_SHOWALL)
564 pfctl_print_title("INTERFACES:");
565 PFRB_FOREACH(p, &b)
566 print_iface(p, opts);
567 return (0);
568}
569
570void
571print_iface(struct pfi_if *p, int opts)
572{
573 time_t tzero = p->pfif_tzero;
574 int flags = (opts & PF_OPT_VERBOSE) ? p->pfif_flags : 0;
575 int first = 1;
576 int i, af, dir, act;
577
578 printf("%s", p->pfif_name);
579 oprintf(flags, PFI_IFLAG_INSTANCE, "instance", &first, 0);
580 oprintf(flags, PFI_IFLAG_GROUP, "group", &first, 0);
581 oprintf(flags, PFI_IFLAG_CLONABLE, "clonable", &first, 0);
582 oprintf(flags, PFI_IFLAG_DYNAMIC, "dynamic", &first, 0);
583 oprintf(flags, PFI_IFLAG_ATTACHED, "attached", &first, 0);
584 oprintf(flags, PFI_IFLAG_SKIP, "skipped", &first, 1);
585#ifdef __FreeBSD__
586 first = 1;
587 oprintf(flags, PFI_IFLAG_PLACEHOLDER, "placeholder", &first, 1);
588#endif
589 printf("\n");
590
591 if (!(opts & PF_OPT_VERBOSE2))
592 return;
593 printf("\tCleared: %s", ctime(&tzero));
594 printf("\tReferences: [ States: %-18d Rules: %-18d ]\n",
595 p->pfif_states, p->pfif_rules);
596 for (i = 0; i < 8; i++) {
597 af = (i>>2) & 1;
598 dir = (i>>1) &1;
599 act = i & 1;
600 printf("\t%-12s [ Packets: %-18llu Bytes: %-18llu ]\n",
601 istats_text[af][dir][act],
602 (unsigned long long)p->pfif_packets[af][dir][act],
603 (unsigned long long)p->pfif_bytes[af][dir][act]);
604 }
605}
606
607void
608oprintf(int flags, int flag, const char *s, int *first, int last)
609{
610 if (flags & flag) {
611 printf(*first ? "\t(%s" : ", %s", s);
612 *first = 0;
613 }
614 if (last && !*first)
615 printf(")");
616}
617
2
3/*
4 * Copyright (c) 2002 Cedric Berger
5 * All rights reserved.
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 * - Redistributions of source code must retain the above copyright
12 * notice, this list of conditions and the following disclaimer.
13 * - Redistributions in binary form must reproduce the above
14 * copyright notice, this list of conditions and the following
15 * disclaimer in the documentation and/or other materials provided
16 * with the distribution.
17 *
18 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
19 * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
20 * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
21 * FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE
22 * COPYRIGHT HOLDERS OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT,
23 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
24 * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
25 * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER
26 * CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
27 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN
28 * ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
29 * POSSIBILITY OF SUCH DAMAGE.
30 *
31 */
32
33#include <sys/cdefs.h>
34__FBSDID("$FreeBSD: head/contrib/pf/pfctl/pfctl_table.c 145840 2005-05-03 16:55:20Z mlaier $");
35
36#include <sys/types.h>
37#include <sys/ioctl.h>
38#include <sys/socket.h>
39
40#include <net/if.h>
41#include <net/pfvar.h>
42#include <arpa/inet.h>
43
44#include <ctype.h>
45#include <err.h>
46#include <errno.h>
47#include <netdb.h>
48#include <stdarg.h>
49#include <stdio.h>
50#include <stdlib.h>
51#include <string.h>
52#include <time.h>
53
54#include "pfctl_parser.h"
55#include "pfctl.h"
56
57extern void usage(void);
58static int pfctl_table(int, char *[], char *, const char *, char *,
59 const char *, int);
60static void print_table(struct pfr_table *, int, int);
61static void print_tstats(struct pfr_tstats *, int);
62static int load_addr(struct pfr_buffer *, int, char *[], char *, int);
63static void print_addrx(struct pfr_addr *, struct pfr_addr *, int);
64static void print_astats(struct pfr_astats *, int);
65static void radix_perror(void);
66static void xprintf(int, const char *, ...);
67static void print_iface(struct pfi_if *, int);
68static void oprintf(int, int, const char *, int *, int);
69
70static const char *stats_text[PFR_DIR_MAX][PFR_OP_TABLE_MAX] = {
71 { "In/Block:", "In/Pass:", "In/XPass:" },
72 { "Out/Block:", "Out/Pass:", "Out/XPass:" }
73};
74
75static const char *istats_text[2][2][2] = {
76 { { "In4/Pass:", "In4/Block:" }, { "Out4/Pass:", "Out4/Block:" } },
77 { { "In6/Pass:", "In6/Block:" }, { "Out6/Pass:", "Out6/Block:" } }
78};
79
80#define RVTEST(fct) do { \
81 if ((!(opts & PF_OPT_NOACTION) || \
82 (opts & PF_OPT_DUMMYACTION)) && \
83 (fct)) { \
84 radix_perror(); \
85 goto _error; \
86 } \
87 } while (0)
88
89#define CREATE_TABLE do { \
90 table.pfrt_flags |= PFR_TFLAG_PERSIST; \
91 if ((!(opts & PF_OPT_NOACTION) || \
92 (opts & PF_OPT_DUMMYACTION)) && \
93 (pfr_add_tables(&table, 1, &nadd, flags)) && \
94 (errno != EPERM)) { \
95 radix_perror(); \
96 goto _error; \
97 } \
98 if (nadd) { \
99 warn_namespace_collision(table.pfrt_name); \
100 xprintf(opts, "%d table created", nadd); \
101 if (opts & PF_OPT_NOACTION) \
102 return (0); \
103 } \
104 table.pfrt_flags &= ~PFR_TFLAG_PERSIST; \
105 } while(0)
106
107int
108pfctl_clear_tables(const char *anchor, int opts)
109{
110 return pfctl_table(0, NULL, NULL, "-F", NULL, anchor, opts);
111}
112
113int
114pfctl_show_tables(const char *anchor, int opts)
115{
116 return pfctl_table(0, NULL, NULL, "-s", NULL, anchor, opts);
117}
118
119int
120pfctl_command_tables(int argc, char *argv[], char *tname,
121 const char *command, char *file, const char *anchor, int opts)
122{
123 if (tname == NULL || command == NULL)
124 usage();
125 return pfctl_table(argc, argv, tname, command, file, anchor, opts);
126}
127
128int
129pfctl_table(int argc, char *argv[], char *tname, const char *command,
130 char *file, const char *anchor, int opts)
131{
132 struct pfr_table table;
133 struct pfr_buffer b, b2;
134 struct pfr_addr *a, *a2;
135 int nadd = 0, ndel = 0, nchange = 0, nzero = 0;
136 int rv = 0, flags = 0, nmatch = 0;
137 void *p;
138
139 if (command == NULL)
140 usage();
141 if (opts & PF_OPT_NOACTION)
142 flags |= PFR_FLAG_DUMMY;
143
144 bzero(&b, sizeof(b));
145 bzero(&b2, sizeof(b2));
146 bzero(&table, sizeof(table));
147 if (tname != NULL) {
148 if (strlen(tname) >= PF_TABLE_NAME_SIZE)
149 usage();
150 if (strlcpy(table.pfrt_name, tname,
151 sizeof(table.pfrt_name)) >= sizeof(table.pfrt_name))
152 errx(1, "pfctl_table: strlcpy");
153 }
154 if (strlcpy(table.pfrt_anchor, anchor,
155 sizeof(table.pfrt_anchor)) >= sizeof(table.pfrt_anchor))
156 errx(1, "pfctl_table: strlcpy");
157
158 if (!strcmp(command, "-F")) {
159 if (argc || file != NULL)
160 usage();
161 RVTEST(pfr_clr_tables(&table, &ndel, flags));
162 xprintf(opts, "%d tables deleted", ndel);
163 } else if (!strcmp(command, "-s")) {
164 b.pfrb_type = (opts & PF_OPT_VERBOSE2) ?
165 PFRB_TSTATS : PFRB_TABLES;
166 if (argc || file != NULL)
167 usage();
168 for (;;) {
169 pfr_buf_grow(&b, b.pfrb_size);
170 b.pfrb_size = b.pfrb_msize;
171 if (opts & PF_OPT_VERBOSE2)
172 RVTEST(pfr_get_tstats(&table,
173 b.pfrb_caddr, &b.pfrb_size, flags));
174 else
175 RVTEST(pfr_get_tables(&table,
176 b.pfrb_caddr, &b.pfrb_size, flags));
177 if (b.pfrb_size <= b.pfrb_msize)
178 break;
179 }
180
181 if (opts & PF_OPT_SHOWALL && b.pfrb_size > 0)
182 pfctl_print_title("TABLES:");
183
184 PFRB_FOREACH(p, &b)
185 if (opts & PF_OPT_VERBOSE2)
186 print_tstats(p, opts & PF_OPT_DEBUG);
187 else
188 print_table(p, opts & PF_OPT_VERBOSE,
189 opts & PF_OPT_DEBUG);
190 } else if (!strcmp(command, "kill")) {
191 if (argc || file != NULL)
192 usage();
193 RVTEST(pfr_del_tables(&table, 1, &ndel, flags));
194 xprintf(opts, "%d table deleted", ndel);
195 } else if (!strcmp(command, "flush")) {
196 if (argc || file != NULL)
197 usage();
198 RVTEST(pfr_clr_addrs(&table, &ndel, flags));
199 xprintf(opts, "%d addresses deleted", ndel);
200 } else if (!strcmp(command, "add")) {
201 b.pfrb_type = PFRB_ADDRS;
202 if (load_addr(&b, argc, argv, file, 0))
203 goto _error;
204 CREATE_TABLE;
205 if (opts & PF_OPT_VERBOSE)
206 flags |= PFR_FLAG_FEEDBACK;
207 RVTEST(pfr_add_addrs(&table, b.pfrb_caddr, b.pfrb_size,
208 &nadd, flags));
209 xprintf(opts, "%d/%d addresses added", nadd, b.pfrb_size);
210 if (opts & PF_OPT_VERBOSE)
211 PFRB_FOREACH(a, &b)
212 if ((opts & PF_OPT_VERBOSE2) || a->pfra_fback)
213 print_addrx(a, NULL,
214 opts & PF_OPT_USEDNS);
215 } else if (!strcmp(command, "delete")) {
216 b.pfrb_type = PFRB_ADDRS;
217 if (load_addr(&b, argc, argv, file, 0))
218 goto _error;
219 if (opts & PF_OPT_VERBOSE)
220 flags |= PFR_FLAG_FEEDBACK;
221 RVTEST(pfr_del_addrs(&table, b.pfrb_caddr, b.pfrb_size,
222 &ndel, flags));
223 xprintf(opts, "%d/%d addresses deleted", ndel, b.pfrb_size);
224 if (opts & PF_OPT_VERBOSE)
225 PFRB_FOREACH(a, &b)
226 if ((opts & PF_OPT_VERBOSE2) || a->pfra_fback)
227 print_addrx(a, NULL,
228 opts & PF_OPT_USEDNS);
229 } else if (!strcmp(command, "replace")) {
230 b.pfrb_type = PFRB_ADDRS;
231 if (load_addr(&b, argc, argv, file, 0))
232 goto _error;
233 CREATE_TABLE;
234 if (opts & PF_OPT_VERBOSE)
235 flags |= PFR_FLAG_FEEDBACK;
236 for (;;) {
237 int sz2 = b.pfrb_msize;
238
239 RVTEST(pfr_set_addrs(&table, b.pfrb_caddr, b.pfrb_size,
240 &sz2, &nadd, &ndel, &nchange, flags));
241 if (sz2 <= b.pfrb_msize) {
242 b.pfrb_size = sz2;
243 break;
244 } else
245 pfr_buf_grow(&b, sz2);
246 }
247 if (nadd)
248 xprintf(opts, "%d addresses added", nadd);
249 if (ndel)
250 xprintf(opts, "%d addresses deleted", ndel);
251 if (nchange)
252 xprintf(opts, "%d addresses changed", nchange);
253 if (!nadd && !ndel && !nchange)
254 xprintf(opts, "no changes");
255 if (opts & PF_OPT_VERBOSE)
256 PFRB_FOREACH(a, &b)
257 if ((opts & PF_OPT_VERBOSE2) || a->pfra_fback)
258 print_addrx(a, NULL,
259 opts & PF_OPT_USEDNS);
260 } else if (!strcmp(command, "show")) {
261 b.pfrb_type = (opts & PF_OPT_VERBOSE) ?
262 PFRB_ASTATS : PFRB_ADDRS;
263 if (argc || file != NULL)
264 usage();
265 for (;;) {
266 pfr_buf_grow(&b, b.pfrb_size);
267 b.pfrb_size = b.pfrb_msize;
268 if (opts & PF_OPT_VERBOSE)
269 RVTEST(pfr_get_astats(&table, b.pfrb_caddr,
270 &b.pfrb_size, flags));
271 else
272 RVTEST(pfr_get_addrs(&table, b.pfrb_caddr,
273 &b.pfrb_size, flags));
274 if (b.pfrb_size <= b.pfrb_msize)
275 break;
276 }
277 PFRB_FOREACH(p, &b)
278 if (opts & PF_OPT_VERBOSE)
279 print_astats(p, opts & PF_OPT_USEDNS);
280 else
281 print_addrx(p, NULL, opts & PF_OPT_USEDNS);
282 } else if (!strcmp(command, "test")) {
283 b.pfrb_type = PFRB_ADDRS;
284 b2.pfrb_type = PFRB_ADDRS;
285
286 if (load_addr(&b, argc, argv, file, 1))
287 goto _error;
288 if (opts & PF_OPT_VERBOSE2) {
289 flags |= PFR_FLAG_REPLACE;
290 PFRB_FOREACH(a, &b)
291 if (pfr_buf_add(&b2, a))
292 err(1, "duplicate buffer");
293 }
294 RVTEST(pfr_tst_addrs(&table, b.pfrb_caddr, b.pfrb_size,
295 &nmatch, flags));
296 xprintf(opts, "%d/%d addresses match", nmatch, b.pfrb_size);
297 if (opts & PF_OPT_VERBOSE && !(opts & PF_OPT_VERBOSE2))
298 PFRB_FOREACH(a, &b)
299 if (a->pfra_fback == PFR_FB_MATCH)
300 print_addrx(a, NULL,
301 opts & PF_OPT_USEDNS);
302 if (opts & PF_OPT_VERBOSE2) {
303 a2 = NULL;
304 PFRB_FOREACH(a, &b) {
305 a2 = pfr_buf_next(&b2, a2);
306 print_addrx(a2, a, opts & PF_OPT_USEDNS);
307 }
308 }
309 if (nmatch < b.pfrb_size)
310 rv = 2;
311 } else if (!strcmp(command, "zero")) {
312 if (argc || file != NULL)
313 usage();
314 flags |= PFR_FLAG_ADDRSTOO;
315 RVTEST(pfr_clr_tstats(&table, 1, &nzero, flags));
316 xprintf(opts, "%d table/stats cleared", nzero);
317 } else
318 warnx("pfctl_table: unknown command '%s'", command);
319 goto _cleanup;
320
321_error:
322 rv = -1;
323_cleanup:
324 pfr_buf_clear(&b);
325 pfr_buf_clear(&b2);
326 return (rv);
327}
328
329void
330print_table(struct pfr_table *ta, int verbose, int debug)
331{
332 if (!debug && !(ta->pfrt_flags & PFR_TFLAG_ACTIVE))
333 return;
334 if (verbose) {
335 printf("%c%c%c%c%c%c\t%s",
336 (ta->pfrt_flags & PFR_TFLAG_CONST) ? 'c' : '-',
337 (ta->pfrt_flags & PFR_TFLAG_PERSIST) ? 'p' : '-',
338 (ta->pfrt_flags & PFR_TFLAG_ACTIVE) ? 'a' : '-',
339 (ta->pfrt_flags & PFR_TFLAG_INACTIVE) ? 'i' : '-',
340 (ta->pfrt_flags & PFR_TFLAG_REFERENCED) ? 'r' : '-',
341 (ta->pfrt_flags & PFR_TFLAG_REFDANCHOR) ? 'h' : '-',
342 ta->pfrt_name);
343 if (ta->pfrt_anchor[0])
344 printf("\t%s", ta->pfrt_anchor);
345 puts("");
346 } else
347 puts(ta->pfrt_name);
348}
349
350void
351print_tstats(struct pfr_tstats *ts, int debug)
352{
353 time_t time = ts->pfrts_tzero;
354 int dir, op;
355
356 if (!debug && !(ts->pfrts_flags & PFR_TFLAG_ACTIVE))
357 return;
358 print_table(&ts->pfrts_t, 1, debug);
359 printf("\tAddresses: %d\n", ts->pfrts_cnt);
360 printf("\tCleared: %s", ctime(&time));
361 printf("\tReferences: [ Anchors: %-18d Rules: %-18d ]\n",
362 ts->pfrts_refcnt[PFR_REFCNT_ANCHOR],
363 ts->pfrts_refcnt[PFR_REFCNT_RULE]);
364 printf("\tEvaluations: [ NoMatch: %-18llu Match: %-18llu ]\n",
365 (unsigned long long)ts->pfrts_nomatch,
366 (unsigned long long)ts->pfrts_match);
367 for (dir = 0; dir < PFR_DIR_MAX; dir++)
368 for (op = 0; op < PFR_OP_TABLE_MAX; op++)
369 printf("\t%-12s [ Packets: %-18llu Bytes: %-18llu ]\n",
370 stats_text[dir][op],
371 (unsigned long long)ts->pfrts_packets[dir][op],
372 (unsigned long long)ts->pfrts_bytes[dir][op]);
373}
374
375int
376load_addr(struct pfr_buffer *b, int argc, char *argv[], char *file,
377 int nonetwork)
378{
379 while (argc--)
380 if (append_addr(b, *argv++, nonetwork)) {
381 if (errno)
382 warn("cannot decode %s", argv[-1]);
383 return (-1);
384 }
385 if (pfr_buf_load(b, file, nonetwork, append_addr)) {
386 warn("cannot load %s", file);
387 return (-1);
388 }
389 return (0);
390}
391
392void
393print_addrx(struct pfr_addr *ad, struct pfr_addr *rad, int dns)
394{
395 char ch, buf[256] = "{error}";
396 char fb[] = { ' ', 'M', 'A', 'D', 'C', 'Z', 'X', ' ', 'Y' };
397 unsigned int fback, hostnet;
398
399 fback = (rad != NULL) ? rad->pfra_fback : ad->pfra_fback;
400 ch = (fback < sizeof(fb)/sizeof(*fb)) ? fb[fback] : '?';
401 hostnet = (ad->pfra_af == AF_INET6) ? 128 : 32;
402 inet_ntop(ad->pfra_af, &ad->pfra_u, buf, sizeof(buf));
403 printf("%c %c%s", ch, (ad->pfra_not?'!':' '), buf);
404 if (ad->pfra_net < hostnet)
405 printf("/%d", ad->pfra_net);
406 if (rad != NULL && fback != PFR_FB_NONE) {
407 if (strlcpy(buf, "{error}", sizeof(buf)) >= sizeof(buf))
408 errx(1, "print_addrx: strlcpy");
409 inet_ntop(rad->pfra_af, &rad->pfra_u, buf, sizeof(buf));
410 printf("\t%c%s", (rad->pfra_not?'!':' '), buf);
411 if (rad->pfra_net < hostnet)
412 printf("/%d", rad->pfra_net);
413 }
414 if (rad != NULL && fback == PFR_FB_NONE)
415 printf("\t nomatch");
416 if (dns && ad->pfra_net == hostnet) {
417 char host[NI_MAXHOST];
418 union sockaddr_union sa;
419
420 strlcpy(host, "?", sizeof(host));
421 bzero(&sa, sizeof(sa));
422 sa.sa.sa_family = ad->pfra_af;
423 if (sa.sa.sa_family == AF_INET) {
424 sa.sa.sa_len = sizeof(sa.sin);
425 sa.sin.sin_addr = ad->pfra_ip4addr;
426 } else {
427 sa.sa.sa_len = sizeof(sa.sin6);
428 sa.sin6.sin6_addr = ad->pfra_ip6addr;
429 }
430 if (getnameinfo(&sa.sa, sa.sa.sa_len, host, sizeof(host),
431 NULL, 0, NI_NAMEREQD) == 0)
432 printf("\t(%s)", host);
433 }
434 printf("\n");
435}
436
437void
438print_astats(struct pfr_astats *as, int dns)
439{
440 time_t time = as->pfras_tzero;
441 int dir, op;
442
443 print_addrx(&as->pfras_a, NULL, dns);
444 printf("\tCleared: %s", ctime(&time));
445 for (dir = 0; dir < PFR_DIR_MAX; dir++)
446 for (op = 0; op < PFR_OP_ADDR_MAX; op++)
447 printf("\t%-12s [ Packets: %-18llu Bytes: %-18llu ]\n",
448 stats_text[dir][op],
449 (unsigned long long)as->pfras_packets[dir][op],
450 (unsigned long long)as->pfras_bytes[dir][op]);
451}
452
453void
454radix_perror(void)
455{
456 extern char *__progname;
457 fprintf(stderr, "%s: %s.\n", __progname, pfr_strerror(errno));
458}
459
460int
461pfctl_define_table(char *name, int flags, int addrs, const char *anchor,
462 struct pfr_buffer *ab, u_int32_t ticket)
463{
464 struct pfr_table tbl;
465
466 bzero(&tbl, sizeof(tbl));
467 if (strlcpy(tbl.pfrt_name, name, sizeof(tbl.pfrt_name)) >=
468 sizeof(tbl.pfrt_name) || strlcpy(tbl.pfrt_anchor, anchor,
469 sizeof(tbl.pfrt_anchor)) >= sizeof(tbl.pfrt_anchor))
470 errx(1, "pfctl_define_table: strlcpy");
471 tbl.pfrt_flags = flags;
472
473 return pfr_ina_define(&tbl, ab->pfrb_caddr, ab->pfrb_size, NULL,
474 NULL, ticket, addrs ? PFR_FLAG_ADDRSTOO : 0);
475}
476
477void
478warn_namespace_collision(const char *filter)
479{
480 struct pfr_buffer b;
481 struct pfr_table *t;
482 const char *name = NULL, *lastcoll;
483 int coll = 0;
484
485 bzero(&b, sizeof(b));
486 b.pfrb_type = PFRB_TABLES;
487 for (;;) {
488 pfr_buf_grow(&b, b.pfrb_size);
489 b.pfrb_size = b.pfrb_msize;
490 if (pfr_get_tables(NULL, b.pfrb_caddr,
491 &b.pfrb_size, PFR_FLAG_ALLRSETS))
492 err(1, "pfr_get_tables");
493 if (b.pfrb_size <= b.pfrb_msize)
494 break;
495 }
496 PFRB_FOREACH(t, &b) {
497 if (!(t->pfrt_flags & PFR_TFLAG_ACTIVE))
498 continue;
499 if (filter != NULL && strcmp(filter, t->pfrt_name))
500 continue;
501 if (!t->pfrt_anchor[0])
502 name = t->pfrt_name;
503 else if (name != NULL && !strcmp(name, t->pfrt_name)) {
504 coll++;
505 lastcoll = name;
506 name = NULL;
507 }
508 }
509 if (coll == 1)
510 warnx("warning: namespace collision with <%s> global table.",
511 lastcoll);
512 else if (coll > 1)
513 warnx("warning: namespace collisions with %d global tables.",
514 coll);
515 pfr_buf_clear(&b);
516}
517
518void
519xprintf(int opts, const char *fmt, ...)
520{
521 va_list args;
522
523 if (opts & PF_OPT_QUIET)
524 return;
525
526 va_start(args, fmt);
527 vfprintf(stderr, fmt, args);
528 va_end(args);
529
530 if (opts & PF_OPT_DUMMYACTION)
531 fprintf(stderr, " (dummy).\n");
532 else if (opts & PF_OPT_NOACTION)
533 fprintf(stderr, " (syntax only).\n");
534 else
535 fprintf(stderr, ".\n");
536}
537
538
539/* interface stuff */
540
541int
542pfctl_show_ifaces(const char *filter, int opts)
543{
544 struct pfr_buffer b;
545 struct pfi_if *p;
546 int i = 0, f = PFI_FLAG_GROUP|PFI_FLAG_INSTANCE;
547
548 if (filter != NULL && *filter && !isdigit(filter[strlen(filter)-1]))
549 f &= ~PFI_FLAG_INSTANCE;
550 bzero(&b, sizeof(b));
551 b.pfrb_type = PFRB_IFACES;
552 for (;;) {
553 pfr_buf_grow(&b, b.pfrb_size);
554 b.pfrb_size = b.pfrb_msize;
555 if (pfi_get_ifaces(filter, b.pfrb_caddr, &b.pfrb_size, f)) {
556 radix_perror();
557 return (1);
558 }
559 if (b.pfrb_size <= b.pfrb_msize)
560 break;
561 i++;
562 }
563 if (opts & PF_OPT_SHOWALL)
564 pfctl_print_title("INTERFACES:");
565 PFRB_FOREACH(p, &b)
566 print_iface(p, opts);
567 return (0);
568}
569
570void
571print_iface(struct pfi_if *p, int opts)
572{
573 time_t tzero = p->pfif_tzero;
574 int flags = (opts & PF_OPT_VERBOSE) ? p->pfif_flags : 0;
575 int first = 1;
576 int i, af, dir, act;
577
578 printf("%s", p->pfif_name);
579 oprintf(flags, PFI_IFLAG_INSTANCE, "instance", &first, 0);
580 oprintf(flags, PFI_IFLAG_GROUP, "group", &first, 0);
581 oprintf(flags, PFI_IFLAG_CLONABLE, "clonable", &first, 0);
582 oprintf(flags, PFI_IFLAG_DYNAMIC, "dynamic", &first, 0);
583 oprintf(flags, PFI_IFLAG_ATTACHED, "attached", &first, 0);
584 oprintf(flags, PFI_IFLAG_SKIP, "skipped", &first, 1);
585#ifdef __FreeBSD__
586 first = 1;
587 oprintf(flags, PFI_IFLAG_PLACEHOLDER, "placeholder", &first, 1);
588#endif
589 printf("\n");
590
591 if (!(opts & PF_OPT_VERBOSE2))
592 return;
593 printf("\tCleared: %s", ctime(&tzero));
594 printf("\tReferences: [ States: %-18d Rules: %-18d ]\n",
595 p->pfif_states, p->pfif_rules);
596 for (i = 0; i < 8; i++) {
597 af = (i>>2) & 1;
598 dir = (i>>1) &1;
599 act = i & 1;
600 printf("\t%-12s [ Packets: %-18llu Bytes: %-18llu ]\n",
601 istats_text[af][dir][act],
602 (unsigned long long)p->pfif_packets[af][dir][act],
603 (unsigned long long)p->pfif_bytes[af][dir][act]);
604 }
605}
606
607void
608oprintf(int flags, int flag, const char *s, int *first, int last)
609{
610 if (flags & flag) {
611 printf(*first ? "\t(%s" : ", %s", s);
612 *first = 0;
613 }
614 if (last && !*first)
615 printf(")");
616}
617