6/contrib/pf/pfctl/pfctl_table.c

   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$");
  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
  57 extern void     usage(void);
  58 static int      pfctl_table(int, char *[], char *, const char *, char *,
  59                     const char *, int);
  60 static void     print_table(struct pfr_table *, int, int);
  61 static void     print_tstats(struct pfr_tstats *, int);
  62 static int      load_addr(struct pfr_buffer *, int, char *[], char *, int);
  63 static void     print_addrx(struct pfr_addr *, struct pfr_addr *, int);
  64 static void     print_astats(struct pfr_astats *, int);
  65 static void     radix_perror(void);
  66 static void     xprintf(int, const char *, ...);
  67 static void     print_iface(struct pfi_if *, int);
  68 static void     oprintf(int, int, const char *, int *, int);
  69
  70 static 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
  75 static 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
 107 int
 108 pfctl_clear_tables(const char *anchor, int opts)
 109 {
 110         return pfctl_table(0, NULL, NULL, "-F", NULL, anchor, opts);
 111 }
 112
 113 int
 114 pfctl_show_tables(const char *anchor, int opts)
 115 {
 116         return pfctl_table(0, NULL, NULL, "-s", NULL, anchor, opts);
 117 }
 118
 119 int
 120 pfctl_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
 128 int
 129 pfctl_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
 329 void
 330 print_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
 350 void
 351 print_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
 375 int
 376 load_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
 392 void
 393 print_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
 437 void
 438 print_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
 453 void
 454 radix_perror(void)
 455 {
 456         extern char *__progname;
 457         fprintf(stderr, "%s: %s.\n", __progname, pfr_strerror(errno));
 458 }
 459
 460 int
 461 pfctl_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
 477 void
 478 warn_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
 518 void
 519 xprintf(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
 541 int
 542 pfctl_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
 570 void
 571 print_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
 607 void
 608 oprintf(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