?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
getconf(1): Fix typo. _POSIX_V6_LP64_OFFBIG -> _POSIX_V6_LPBIG_OFFBIG.
[dragonfly.git] / usr.sbin / pfctl / pfctl_parser.c
blob75875920043838835055850805871debfb366107
1 /* $OpenBSD: pfctl_parser.c,v 1.240 2008/06/10 20:55:02 mcbride Exp $ */
2
3 /*
4 * Copyright (c) 2001 Daniel Hartmeier
5 * Copyright (c) 2002,2003 Henning Brauer
6 * All rights reserved.
7 *
8 * Redistribution and use in source and binary forms, with or without
9 * modification, are permitted provided that the following conditions
10 * are met:
11 *
12 * - Redistributions of source code must retain the above copyright
13 * notice, this list of conditions and the following disclaimer.
14 * - Redistributions in binary form must reproduce the above
15 * copyright notice, this list of conditions and the following
16 * disclaimer in the documentation and/or other materials provided
17 * with the distribution.
18 *
19 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
20 * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
21 * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
22 * FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE
23 * COPYRIGHT HOLDERS OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT,
24 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
25 * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
26 * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER
27 * CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
28 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN
29 * ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
30 * POSSIBILITY OF SUCH DAMAGE.
31 *
32 */
33
34 #include <sys/user.h>
35 #include <sys/types.h>
36 #include <sys/ioctl.h>
37 #include <sys/socket.h>
38 #include <sys/param.h>
39 #include <net/if.h>
40 #include <netinet/in.h>
41 #include <netinet/in_systm.h>
42 #include <netinet/ip.h>
43 #include <netinet/ip_icmp.h>
44 #include <netinet/icmp6.h>
45 #include <net/pf/pfvar.h>
46 #include <arpa/inet.h>
47
48 #include <stdio.h>
49 #include <stdlib.h>
50 #include <string.h>
51 #include <ctype.h>
52 #include <netdb.h>
53 #include <stdarg.h>
54 #include <errno.h>
55 #include <err.h>
56 #include <ifaddrs.h>
57 #include <unistd.h>
58
59 #include "pfctl_parser.h"
60 #include "pfctl.h"
61
62 void print_op (u_int8_t, const char *, const char *);
63 void print_port (u_int8_t, u_int16_t, u_int16_t, const char *);
64 void print_ugid (u_int8_t, unsigned, unsigned, const char *, unsigned);
65 void print_flags (u_int8_t);
66 void print_fromto(struct pf_rule_addr *, pf_osfp_t,
67 struct pf_rule_addr *, u_int8_t, u_int8_t, int);
68 int ifa_skip_if(const char *filter, struct node_host *p);
69
70 struct node_host *ifa_grouplookup(const char *, int);
71 struct node_host *host_if(const char *, int);
72 static struct node_host *host_v4(const char *);
73 struct node_host *host_v6(const char *, int);
74 struct node_host *host_dns(const char *, int, int);
75
76 const char *tcpflags = "FSRPAUEW";
77
78 static const struct icmptypeent icmp_type[] = {
79 { "echoreq", ICMP_ECHO },
80 { "echorep", ICMP_ECHOREPLY },
81 { "unreach", ICMP_UNREACH },
82 { "squench", ICMP_SOURCEQUENCH },
83 { "redir", ICMP_REDIRECT },
84 { "althost", ICMP_ALTHOSTADDR },
85 { "routeradv", ICMP_ROUTERADVERT },
86 { "routersol", ICMP_ROUTERSOLICIT },
87 { "timex", ICMP_TIMXCEED },
88 { "paramprob", ICMP_PARAMPROB },
89 { "timereq", ICMP_TSTAMP },
90 { "timerep", ICMP_TSTAMPREPLY },
91 { "inforeq", ICMP_IREQ },
92 { "inforep", ICMP_IREQREPLY },
93 { "maskreq", ICMP_MASKREQ },
94 { "maskrep", ICMP_MASKREPLY },
95 { "trace", ICMP_TRACEROUTE },
96 { "dataconv", ICMP_DATACONVERR },
97 { "mobredir", ICMP_MOBILE_REDIRECT },
98 { "ipv6-where", ICMP_IPV6_WHEREAREYOU },
99 { "ipv6-here", ICMP_IPV6_IAMHERE },
100 { "mobregreq", ICMP_MOBILE_REGREQUEST },
101 { "mobregrep", ICMP_MOBILE_REGREPLY },
102 { "skip", ICMP_SKIP },
103 { "photuris", ICMP_PHOTURIS }
104 };
105
106 static const struct icmptypeent icmp6_type[] = {
107 { "unreach", ICMP6_DST_UNREACH },
108 { "toobig", ICMP6_PACKET_TOO_BIG },
109 { "timex", ICMP6_TIME_EXCEEDED },
110 { "paramprob", ICMP6_PARAM_PROB },
111 { "echoreq", ICMP6_ECHO_REQUEST },
112 { "echorep", ICMP6_ECHO_REPLY },
113 { "groupqry", ICMP6_MEMBERSHIP_QUERY },
114 { "listqry", MLD_LISTENER_QUERY },
115 { "grouprep", ICMP6_MEMBERSHIP_REPORT },
116 { "listenrep", MLD_LISTENER_REPORT },
117 { "groupterm", ICMP6_MEMBERSHIP_REDUCTION },
118 { "listendone", MLD_LISTENER_DONE },
119 { "routersol", ND_ROUTER_SOLICIT },
120 { "routeradv", ND_ROUTER_ADVERT },
121 { "neighbrsol", ND_NEIGHBOR_SOLICIT },
122 { "neighbradv", ND_NEIGHBOR_ADVERT },
123 { "redir", ND_REDIRECT },
124 { "routrrenum", ICMP6_ROUTER_RENUMBERING },
125 { "wrureq", ICMP6_WRUREQUEST },
126 { "wrurep", ICMP6_WRUREPLY },
127 { "fqdnreq", ICMP6_FQDN_QUERY },
128 { "fqdnrep", ICMP6_FQDN_REPLY },
129 { "niqry", ICMP6_NI_QUERY },
130 { "nirep", ICMP6_NI_REPLY },
131 { "mtraceresp", MLD_MTRACE_RESP },
132 { "mtrace", MLD_MTRACE }
133 };
134
135 static const struct icmpcodeent icmp_code[] = {
136 { "net-unr", ICMP_UNREACH, ICMP_UNREACH_NET },
137 { "host-unr", ICMP_UNREACH, ICMP_UNREACH_HOST },
138 { "proto-unr", ICMP_UNREACH, ICMP_UNREACH_PROTOCOL },
139 { "port-unr", ICMP_UNREACH, ICMP_UNREACH_PORT },
140 { "needfrag", ICMP_UNREACH, ICMP_UNREACH_NEEDFRAG },
141 { "srcfail", ICMP_UNREACH, ICMP_UNREACH_SRCFAIL },
142 { "net-unk", ICMP_UNREACH, ICMP_UNREACH_NET_UNKNOWN },
143 { "host-unk", ICMP_UNREACH, ICMP_UNREACH_HOST_UNKNOWN },
144 { "isolate", ICMP_UNREACH, ICMP_UNREACH_ISOLATED },
145 { "net-prohib", ICMP_UNREACH, ICMP_UNREACH_NET_PROHIB },
146 { "host-prohib", ICMP_UNREACH, ICMP_UNREACH_HOST_PROHIB },
147 { "net-tos", ICMP_UNREACH, ICMP_UNREACH_TOSNET },
148 { "host-tos", ICMP_UNREACH, ICMP_UNREACH_TOSHOST },
149 { "filter-prohib", ICMP_UNREACH, ICMP_UNREACH_FILTER_PROHIB },
150 { "host-preced", ICMP_UNREACH, ICMP_UNREACH_HOST_PRECEDENCE },
151 { "cutoff-preced", ICMP_UNREACH, ICMP_UNREACH_PRECEDENCE_CUTOFF },
152 { "redir-net", ICMP_REDIRECT, ICMP_REDIRECT_NET },
153 { "redir-host", ICMP_REDIRECT, ICMP_REDIRECT_HOST },
154 { "redir-tos-net", ICMP_REDIRECT, ICMP_REDIRECT_TOSNET },
155 { "redir-tos-host", ICMP_REDIRECT, ICMP_REDIRECT_TOSHOST },
156 { "normal-adv", ICMP_ROUTERADVERT, ICMP_ROUTERADVERT_NORMAL },
157 { "common-adv", ICMP_ROUTERADVERT, ICMP_ROUTERADVERT_NOROUTE_COMMON },
158 { "transit", ICMP_TIMXCEED, ICMP_TIMXCEED_INTRANS },
159 { "reassemb", ICMP_TIMXCEED, ICMP_TIMXCEED_REASS },
160 { "badhead", ICMP_PARAMPROB, ICMP_PARAMPROB_ERRATPTR },
161 { "optmiss", ICMP_PARAMPROB, ICMP_PARAMPROB_OPTABSENT },
162 { "badlen", ICMP_PARAMPROB, ICMP_PARAMPROB_LENGTH },
163 { "unknown-ind", ICMP_PHOTURIS, ICMP_PHOTURIS_UNKNOWN_INDEX },
164 { "auth-fail", ICMP_PHOTURIS, ICMP_PHOTURIS_AUTH_FAILED },
165 { "decrypt-fail", ICMP_PHOTURIS, ICMP_PHOTURIS_DECRYPT_FAILED }
166 };
167
168 static const struct icmpcodeent icmp6_code[] = {
169 { "admin-unr", ICMP6_DST_UNREACH, ICMP6_DST_UNREACH_ADMIN },
170 { "noroute-unr", ICMP6_DST_UNREACH, ICMP6_DST_UNREACH_NOROUTE },
171 { "notnbr-unr", ICMP6_DST_UNREACH, ICMP6_DST_UNREACH_NOTNEIGHBOR },
172 { "beyond-unr", ICMP6_DST_UNREACH, ICMP6_DST_UNREACH_BEYONDSCOPE },
173 { "addr-unr", ICMP6_DST_UNREACH, ICMP6_DST_UNREACH_ADDR },
174 { "port-unr", ICMP6_DST_UNREACH, ICMP6_DST_UNREACH_NOPORT },
175 { "transit", ICMP6_TIME_EXCEEDED, ICMP6_TIME_EXCEED_TRANSIT },
176 { "reassemb", ICMP6_TIME_EXCEEDED, ICMP6_TIME_EXCEED_REASSEMBLY },
177 { "badhead", ICMP6_PARAM_PROB, ICMP6_PARAMPROB_HEADER },
178 { "nxthdr", ICMP6_PARAM_PROB, ICMP6_PARAMPROB_NEXTHEADER },
179 { "redironlink", ND_REDIRECT, ND_REDIRECT_ONLINK },
180 { "redirrouter", ND_REDIRECT, ND_REDIRECT_ROUTER }
181 };
182
183 const struct pf_timeout pf_timeouts[] = {
184 { "tcp.first", PFTM_TCP_FIRST_PACKET },
185 { "tcp.opening", PFTM_TCP_OPENING },
186 { "tcp.established", PFTM_TCP_ESTABLISHED },
187 { "tcp.closing", PFTM_TCP_CLOSING },
188 { "tcp.finwait", PFTM_TCP_FIN_WAIT },
189 { "tcp.closed", PFTM_TCP_CLOSED },
190 { "tcp.tsdiff", PFTM_TS_DIFF },
191 { "udp.first", PFTM_UDP_FIRST_PACKET },
192 { "udp.single", PFTM_UDP_SINGLE },
193 { "udp.multiple", PFTM_UDP_MULTIPLE },
194 { "icmp.first", PFTM_ICMP_FIRST_PACKET },
195 { "icmp.error", PFTM_ICMP_ERROR_REPLY },
196 { "other.first", PFTM_OTHER_FIRST_PACKET },
197 { "other.single", PFTM_OTHER_SINGLE },
198 { "other.multiple", PFTM_OTHER_MULTIPLE },
199 { "frag", PFTM_FRAG },
200 { "interval", PFTM_INTERVAL },
201 { "adaptive.start", PFTM_ADAPTIVE_START },
202 { "adaptive.end", PFTM_ADAPTIVE_END },
203 { "src.track", PFTM_SRC_NODE },
204 { NULL, 0 }
205 };
206
207 const struct icmptypeent *
208 geticmptypebynumber(u_int8_t type, sa_family_t af)
209 {
210 unsigned int i;
211
212 if (af != AF_INET6) {
213 for (i=0; i < (sizeof (icmp_type) / sizeof(icmp_type[0]));
214 i++) {
215 if (type == icmp_type[i].type)
216 return (&icmp_type[i]);
217 }
218 } else {
219 for (i=0; i < (sizeof (icmp6_type) /
220 sizeof(icmp6_type[0])); i++) {
221 if (type == icmp6_type[i].type)
222 return (&icmp6_type[i]);
223 }
224 }
225 return (NULL);
226 }
227
228 const struct icmptypeent *
229 geticmptypebyname(char *w, sa_family_t af)
230 {
231 unsigned int i;
232
233 if (af != AF_INET6) {
234 for (i=0; i < (sizeof (icmp_type) / sizeof(icmp_type[0]));
235 i++) {
236 if (!strcmp(w, icmp_type[i].name))
237 return (&icmp_type[i]);
238 }
239 } else {
240 for (i=0; i < (sizeof (icmp6_type) /
241 sizeof(icmp6_type[0])); i++) {
242 if (!strcmp(w, icmp6_type[i].name))
243 return (&icmp6_type[i]);
244 }
245 }
246 return (NULL);
247 }
248
249 const struct icmpcodeent *
250 geticmpcodebynumber(u_int8_t type, u_int8_t code, sa_family_t af)
251 {
252 unsigned int i;
253
254 if (af != AF_INET6) {
255 for (i=0; i < (sizeof (icmp_code) / sizeof(icmp_code[0]));
256 i++) {
257 if (type == icmp_code[i].type &&
258 code == icmp_code[i].code)
259 return (&icmp_code[i]);
260 }
261 } else {
262 for (i=0; i < (sizeof (icmp6_code) /
263 sizeof(icmp6_code[0])); i++) {
264 if (type == icmp6_code[i].type &&
265 code == icmp6_code[i].code)
266 return (&icmp6_code[i]);
267 }
268 }
269 return (NULL);
270 }
271
272 const struct icmpcodeent *
273 geticmpcodebyname(u_long type, char *w, sa_family_t af)
274 {
275 unsigned int i;
276
277 if (af != AF_INET6) {
278 for (i=0; i < (sizeof (icmp_code) / sizeof(icmp_code[0]));
279 i++) {
280 if (type == icmp_code[i].type &&
281 !strcmp(w, icmp_code[i].name))
282 return (&icmp_code[i]);
283 }
284 } else {
285 for (i=0; i < (sizeof (icmp6_code) /
286 sizeof(icmp6_code[0])); i++) {
287 if (type == icmp6_code[i].type &&
288 !strcmp(w, icmp6_code[i].name))
289 return (&icmp6_code[i]);
290 }
291 }
292 return (NULL);
293 }
294
295 void
296 print_op(u_int8_t op, const char *a1, const char *a2)
297 {
298 if (op == PF_OP_IRG)
299 printf(" %s >< %s", a1, a2);
300 else if (op == PF_OP_XRG)
301 printf(" %s <> %s", a1, a2);
302 else if (op == PF_OP_EQ)
303 printf(" = %s", a1);
304 else if (op == PF_OP_NE)
305 printf(" != %s", a1);
306 else if (op == PF_OP_LT)
307 printf(" < %s", a1);
308 else if (op == PF_OP_LE)
309 printf(" <= %s", a1);
310 else if (op == PF_OP_GT)
311 printf(" > %s", a1);
312 else if (op == PF_OP_GE)
313 printf(" >= %s", a1);
314 else if (op == PF_OP_RRG)
315 printf(" %s:%s", a1, a2);
316 }
317
318 void
319 print_port(u_int8_t op, u_int16_t p1, u_int16_t p2, const char *proto)
320 {
321 char a1[6], a2[6];
322 struct servent *s;
323
324 s = getservbyport(p1, proto);
325 p1 = ntohs(p1);
326 p2 = ntohs(p2);
327 snprintf(a1, sizeof(a1), "%u", p1);
328 snprintf(a2, sizeof(a2), "%u", p2);
329 printf(" port");
330 if (s != NULL && (op == PF_OP_EQ || op == PF_OP_NE))
331 print_op(op, s->s_name, a2);
332 else
333 print_op(op, a1, a2);
334 }
335
336 void
337 print_ugid(u_int8_t op, unsigned u1, unsigned u2, const char *t, unsigned umax)
338 {
339 char a1[11], a2[11];
340
341 snprintf(a1, sizeof(a1), "%u", u1);
342 snprintf(a2, sizeof(a2), "%u", u2);
343 printf(" %s", t);
344 if (u1 == umax && (op == PF_OP_EQ || op == PF_OP_NE))
345 print_op(op, "unknown", a2);
346 else
347 print_op(op, a1, a2);
348 }
349
350 void
351 print_flags(u_int8_t f)
352 {
353 int i;
354
355 for (i = 0; tcpflags[i]; ++i)
356 if (f & (1 << i))
357 printf("%c", tcpflags[i]);
358 }
359
360 void
361 print_fromto(struct pf_rule_addr *src, pf_osfp_t osfp, struct pf_rule_addr *dst,
362 sa_family_t af, u_int8_t proto, int verbose)
363 {
364 char buf[PF_OSFP_LEN*3];
365 if (src->addr.type == PF_ADDR_ADDRMASK &&
366 dst->addr.type == PF_ADDR_ADDRMASK &&
367 PF_AZERO(&src->addr.v.a.addr, AF_INET6) &&
368 PF_AZERO(&src->addr.v.a.mask, AF_INET6) &&
369 PF_AZERO(&dst->addr.v.a.addr, AF_INET6) &&
370 PF_AZERO(&dst->addr.v.a.mask, AF_INET6) &&
371 !src->neg && !dst->neg &&
372 !src->port_op && !dst->port_op &&
373 osfp == PF_OSFP_ANY)
374 printf(" all");
375 else {
376 printf(" from ");
377 if (src->neg)
378 printf("! ");
379 print_addr(&src->addr, af, verbose);
380 if (src->port_op)
381 print_port(src->port_op, src->port[0],
382 src->port[1],
383 proto == IPPROTO_TCP ? "tcp" : "udp");
384 if (osfp != PF_OSFP_ANY)
385 printf(" os \"%s\"", pfctl_lookup_fingerprint(osfp, buf,
386 sizeof(buf)));
387
388 printf(" to ");
389 if (dst->neg)
390 printf("! ");
391 print_addr(&dst->addr, af, verbose);
392 if (dst->port_op)
393 print_port(dst->port_op, dst->port[0],
394 dst->port[1],
395 proto == IPPROTO_TCP ? "tcp" : "udp");
396 }
397 }
398
399 void
400 print_pool(struct pf_pool *pool, u_int16_t p1, u_int16_t p2,
401 sa_family_t af, int id)
402 {
403 struct pf_pooladdr *pooladdr;
404
405 if ((TAILQ_FIRST(&pool->list) != NULL) &&
406 TAILQ_NEXT(TAILQ_FIRST(&pool->list), entries) != NULL)
407 printf("{ ");
408 TAILQ_FOREACH(pooladdr, &pool->list, entries){
409 switch (id) {
410 case PF_NAT:
411 case PF_RDR:
412 case PF_BINAT:
413 print_addr(&pooladdr->addr, af, 0);
414 break;
415 case PF_PASS:
416 if (PF_AZERO(&pooladdr->addr.v.a.addr, af))
417 printf("%s", pooladdr->ifname);
418 else {
419 printf("(%s ", pooladdr->ifname);
420 print_addr(&pooladdr->addr, af, 0);
421 printf(")");
422 }
423 break;
424 default:
425 break;
426 }
427 if (TAILQ_NEXT(pooladdr, entries) != NULL)
428 printf(", ");
429 else if (TAILQ_NEXT(TAILQ_FIRST(&pool->list), entries) != NULL)
430 printf(" }");
431 }
432 switch (id) {
433 case PF_NAT:
434 if ((p1 != PF_NAT_PROXY_PORT_LOW ||
435 p2 != PF_NAT_PROXY_PORT_HIGH) && (p1 != 0 || p2 != 0)) {
436 if (p1 == p2)
437 printf(" port %u", p1);
438 else
439 printf(" port %u:%u", p1, p2);
440 }
441 break;
442 case PF_RDR:
443 if (p1) {
444 printf(" port %u", p1);
445 if (p2 && (p2 != p1))
446 printf(":%u", p2);
447 }
448 break;
449 default:
450 break;
451 }
452 switch (pool->opts & PF_POOL_TYPEMASK) {
453 case PF_POOL_NONE:
454 break;
455 case PF_POOL_BITMASK:
456 printf(" bitmask");
457 break;
458 case PF_POOL_RANDOM:
459 printf(" random");
460 break;
461 case PF_POOL_SRCHASH:
462 printf(" source-hash 0x%08x%08x%08x%08x",
463 pool->key.key32[0], pool->key.key32[1],
464 pool->key.key32[2], pool->key.key32[3]);
465 break;
466 case PF_POOL_ROUNDROBIN:
467 printf(" round-robin");
468 break;
469 }
470 if (pool->opts & PF_POOL_STICKYADDR)
471 printf(" sticky-address");
472 if (id == PF_NAT && p1 == 0 && p2 == 0)
473 printf(" static-port");
474 }
475
476 const char *pf_reasons[PFRES_MAX+1] = PFRES_NAMES;
477 const char *pf_lcounters[LCNT_MAX+1] = LCNT_NAMES;
478 const char *pf_fcounters[FCNT_MAX+1] = FCNT_NAMES;
479 const char *pf_scounters[FCNT_MAX+1] = FCNT_NAMES;
480
481 void
482 print_status(struct pf_status *s, int opts)
483 {
484 char statline[80];
485 const char *running;
486 time_t runtime;
487 int i;
488 char buf[PF_MD5_DIGEST_LENGTH * 2 + 1];
489 static const char hex[] = "0123456789abcdef";
490
491 runtime = time(NULL) - s->since;
492 running = s->running ? "Enabled" : "Disabled";
493
494 if (s->since) {
495 unsigned int sec, min, hrs, day = runtime;
496
497 sec = day % 60;
498 day /= 60;
499 min = day % 60;
500 day /= 60;
501 hrs = day % 24;
502 day /= 24;
503 snprintf(statline, sizeof(statline),
504 "Status: %s for %u days %.2u:%.2u:%.2u",
505 running, day, hrs, min, sec);
506 } else
507 snprintf(statline, sizeof(statline), "Status: %s", running);
508 printf("%-44s", statline);
509 switch (s->debug) {
510 case PF_DEBUG_NONE:
511 printf("%15s\n\n", "Debug: None");
512 break;
513 case PF_DEBUG_URGENT:
514 printf("%15s\n\n", "Debug: Urgent");
515 break;
516 case PF_DEBUG_MISC:
517 printf("%15s\n\n", "Debug: Misc");
518 break;
519 case PF_DEBUG_NOISY:
520 printf("%15s\n\n", "Debug: Loud");
521 break;
522 }
523
524 if (opts & PF_OPT_VERBOSE) {
525 printf("Hostid: 0x%08x\n", ntohl(s->hostid));
526
527 for (i = 0; i < PF_MD5_DIGEST_LENGTH; i++) {
528 buf[i + i] = hex[s->pf_chksum[i] >> 4];
529 buf[i + i + 1] = hex[s->pf_chksum[i] & 0x0f];
530 }
531 buf[i + i] = '\0';
532 printf("Checksum: 0x%s\n\n", buf);
533 }
534
535 if (s->ifname[0] != 0) {
536 printf("Interface Stats for %-16s %5s %16s\n",
537 s->ifname, "IPv4", "IPv6");
538 printf(" %-25s %14llu %16llu\n", "Bytes In",
539 (unsigned long long)s->bcounters[0][0],
540 (unsigned long long)s->bcounters[1][0]);
541 printf(" %-25s %14llu %16llu\n", "Bytes Out",
542 (unsigned long long)s->bcounters[0][1],
543 (unsigned long long)s->bcounters[1][1]);
544 printf(" Packets In\n");
545 printf(" %-23s %14llu %16llu\n", "Passed",
546 (unsigned long long)s->pcounters[0][0][PF_PASS],
547 (unsigned long long)s->pcounters[1][0][PF_PASS]);
548 printf(" %-23s %14llu %16llu\n", "Blocked",
549 (unsigned long long)s->pcounters[0][0][PF_DROP],
550 (unsigned long long)s->pcounters[1][0][PF_DROP]);
551 printf(" Packets Out\n");
552 printf(" %-23s %14llu %16llu\n", "Passed",
553 (unsigned long long)s->pcounters[0][1][PF_PASS],
554 (unsigned long long)s->pcounters[1][1][PF_PASS]);
555 printf(" %-23s %14llu %16llu\n\n", "Blocked",
556 (unsigned long long)s->pcounters[0][1][PF_DROP],
557 (unsigned long long)s->pcounters[1][1][PF_DROP]);
558 }
559 printf("%-27s %14s %16s\n", "State Table", "Total", "Rate");
560 printf(" %-25s %14u %14s\n", "current entries", s->states, "");
561 for (i = 0; i < FCNT_MAX; i++) {
562 printf(" %-25s %14llu ", pf_fcounters[i],
563 (unsigned long long)s->fcounters[i]);
564 if (runtime > 0)
565 printf("%14.1f/s\n",
566 (double)s->fcounters[i] / (double)runtime);
567 else
568 printf("%14s\n", "");
569 }
570 if (opts & PF_OPT_VERBOSE) {
571 printf("Source Tracking Table\n");
572 printf(" %-25s %14u %14s\n", "current entries",
573 s->src_nodes, "");
574 for (i = 0; i < SCNT_MAX; i++) {
575 printf(" %-25s %14lld ", pf_scounters[i],
576 (unsigned long long)s->scounters[i]);
577 if (runtime > 0)
578 printf("%14.1f/s\n",
579 (double)s->scounters[i] / (double)runtime);
580 else
581 printf("%14s\n", "");
582 }
583 }
584 printf("Counters\n");
585 for (i = 0; i < PFRES_MAX; i++) {
586 printf(" %-25s %14llu ", pf_reasons[i],
587 (unsigned long long)s->counters[i]);
588 if (runtime > 0)
589 printf("%14.1f/s\n",
590 (double)s->counters[i] / (double)runtime);
591 else
592 printf("%14s\n", "");
593 }
594 if (opts & PF_OPT_VERBOSE) {
595 printf("Limit Counters\n");
596 for (i = 0; i < LCNT_MAX; i++) {
597 printf(" %-25s %14ju ", pf_lcounters[i],
598 (uintmax_t)s->lcounters[i]);
599 if (runtime > 0)
600 printf("%14.1f/s\n",
601 (double)s->lcounters[i] / (double)runtime);
602 else
603 printf("%14s\n", "");
604 }
605 }
606 }
607
608 void
609 print_src_node(struct pf_src_node *sn, int opts)
610 {
611 struct pf_addr_wrap aw;
612 int min, sec;
613
614 memset(&aw, 0, sizeof(aw));
615 if (sn->af == AF_INET)
616 aw.v.a.mask.addr32[0] = 0xffffffff;
617 else
618 memset(&aw.v.a.mask, 0xff, sizeof(aw.v.a.mask));
619
620 aw.v.a.addr = sn->addr;
621 print_addr(&aw, sn->af, opts & PF_OPT_VERBOSE2);
622 printf(" -> ");
623 aw.v.a.addr = sn->raddr;
624 print_addr(&aw, sn->af, opts & PF_OPT_VERBOSE2);
625 printf(" ( states %u, connections %u, rate %u.%u/%us )\n", sn->states,
626 sn->conn, sn->conn_rate.count / 1000,
627 (sn->conn_rate.count % 1000) / 100, sn->conn_rate.seconds);
628 if (opts & PF_OPT_VERBOSE) {
629 sec = sn->creation % 60;
630 sn->creation /= 60;
631 min = sn->creation % 60;
632 sn->creation /= 60;
633 printf(" age %.2u:%.2u:%.2u", sn->creation, min, sec);
634 if (sn->states == 0) {
635 sec = sn->expire % 60;
636 sn->expire /= 60;
637 min = sn->expire % 60;
638 sn->expire /= 60;
639 printf(", expires in %.2u:%.2u:%.2u",
640 sn->expire, min, sec);
641 }
642 printf(", %ju pkts, %ju bytes",
643 (uintmax_t)sn->packets[0] + sn->packets[1],
644 (uintmax_t)sn->bytes[0] + sn->bytes[1]);
645 switch (sn->ruletype) {
646 case PF_NAT:
647 if (sn->rule.nr != (uint32_t)(-1))
648 printf(", nat rule %u", sn->rule.nr);
649 break;
650 case PF_RDR:
651 if (sn->rule.nr != (uint32_t)(-1))
652 printf(", rdr rule %u", sn->rule.nr);
653 break;
654 case PF_PASS:
655 if (sn->rule.nr != (uint32_t)(-1))
656 printf(", filter rule %u", sn->rule.nr);
657 break;
658 }
659 printf("\n");
660 }
661 }
662
663 void
664 print_rule(struct pf_rule *r, const char *anchor_call, int verbose)
665 {
666 static const char *actiontypes[] = { "pass", "block", "scrub",
667 "no scrub", "nat", "no nat", "binat", "no binat", "rdr", "no rdr" };
668 static const char *anchortypes[] = { "anchor", "anchor", "anchor",
669 "anchor", "nat-anchor", "nat-anchor", "binat-anchor",
670 "binat-anchor", "rdr-anchor", "rdr-anchor" };
671 int i, opts;
672
673 if (verbose)
674 printf("@%d ", r->nr);
675 if (r->action > PF_NORDR)
676 printf("action(%d)", r->action);
677 else if (anchor_call[0]) {
678 if (anchor_call[0] == '_') {
679 printf("%s", anchortypes[r->action]);
680 } else
681 printf("%s \"%s\"", anchortypes[r->action],
682 anchor_call);
683 } else {
684 printf("%s", actiontypes[r->action]);
685 if (r->natpass)
686 printf(" pass");
687 }
688 if (r->action == PF_DROP) {
689 if (r->rule_flag & PFRULE_RETURN)
690 printf(" return");
691 else if (r->rule_flag & PFRULE_RETURNRST) {
692 if (!r->return_ttl)
693 printf(" return-rst");
694 else
695 printf(" return-rst(ttl %d)", r->return_ttl);
696 } else if (r->rule_flag & PFRULE_RETURNICMP) {
697 const struct icmpcodeent *ic, *ic6;
698
699 ic = geticmpcodebynumber(r->return_icmp >> 8,
700 r->return_icmp & 255, AF_INET);
701 ic6 = geticmpcodebynumber(r->return_icmp6 >> 8,
702 r->return_icmp6 & 255, AF_INET6);
703
704 switch (r->af) {
705 case AF_INET:
706 printf(" return-icmp");
707 if (ic == NULL)
708 printf("(%u)", r->return_icmp & 255);
709 else
710 printf("(%s)", ic->name);
711 break;
712 case AF_INET6:
713 printf(" return-icmp6");
714 if (ic6 == NULL)
715 printf("(%u)", r->return_icmp6 & 255);
716 else
717 printf("(%s)", ic6->name);
718 break;
719 default:
720 printf(" return-icmp");
721 if (ic == NULL)
722 printf("(%u, ", r->return_icmp & 255);
723 else
724 printf("(%s, ", ic->name);
725 if (ic6 == NULL)
726 printf("%u)", r->return_icmp6 & 255);
727 else
728 printf("%s)", ic6->name);
729 break;
730 }
731 } else
732 printf(" drop");
733 }
734 if (r->direction == PF_IN)
735 printf(" in");
736 else if (r->direction == PF_OUT)
737 printf(" out");
738 if (r->log) {
739 printf(" log");
740 if (r->log & ~PF_LOG || r->logif) {
741 int count = 0;
742
743 printf(" (");
744 if (r->log & PF_LOG_ALL)
745 printf("%sall", count++ ? ", " : "");
746 if (r->log & PF_LOG_SOCKET_LOOKUP)
747 printf("%suser", count++ ? ", " : "");
748 if (r->logif)
749 printf("%sto pflog%u", count++ ? ", " : "",
750 r->logif);
751 printf(")");
752 }
753 }
754 if (r->quick)
755 printf(" quick");
756 if (r->ifname[0]) {
757 if (r->ifnot)
758 printf(" on ! %s", r->ifname);
759 else
760 printf(" on %s", r->ifname);
761 }
762 if (r->rt) {
763 if (r->rt == PF_ROUTETO)
764 printf(" route-to");
765 else if (r->rt == PF_REPLYTO)
766 printf(" reply-to");
767 else if (r->rt == PF_DUPTO)
768 printf(" dup-to");
769 else if (r->rt == PF_FASTROUTE)
770 printf(" fastroute");
771 if (r->rt != PF_FASTROUTE) {
772 printf(" ");
773 print_pool(&r->rpool, 0, 0, r->af, PF_PASS);
774 }
775 }
776 if (r->af) {
777 if (r->af == AF_INET)
778 printf(" inet");
779 else
780 printf(" inet6");
781 }
782 if (r->proto) {
783 struct protoent *p;
784
785 if ((p = getprotobynumber(r->proto)) != NULL)
786 printf(" proto %s", p->p_name);
787 else
788 printf(" proto %u", r->proto);
789 }
790 print_fromto(&r->src, r->os_fingerprint, &r->dst, r->af, r->proto,
791 verbose);
792 if (r->uid.op)
793 print_ugid(r->uid.op, r->uid.uid[0], r->uid.uid[1], "user",
794 UID_MAX);
795 if (r->gid.op)
796 print_ugid(r->gid.op, r->gid.gid[0], r->gid.gid[1], "group",
797 GID_MAX);
798 if (r->flags || r->flagset) {
799 printf(" flags ");
800 print_flags(r->flags);
801 printf("/");
802 print_flags(r->flagset);
803 } else if (r->action == PF_PASS &&
804 (!r->proto || r->proto == IPPROTO_TCP) &&
805 !(r->rule_flag & PFRULE_FRAGMENT) &&
806 !anchor_call[0] && r->keep_state)
807 printf(" flags any");
808 if (r->type) {
809 const struct icmptypeent *it;
810
811 it = geticmptypebynumber(r->type-1, r->af);
812 if (r->af != AF_INET6)
813 printf(" icmp-type");
814 else
815 printf(" icmp6-type");
816 if (it != NULL)
817 printf(" %s", it->name);
818 else
819 printf(" %u", r->type-1);
820 if (r->code) {
821 const struct icmpcodeent *ic;
822
823 ic = geticmpcodebynumber(r->type-1, r->code-1, r->af);
824 if (ic != NULL)
825 printf(" code %s", ic->name);
826 else
827 printf(" code %u", r->code-1);
828 }
829 }
830 if (r->tos)
831 printf(" tos 0x%2.2x", r->tos);
832 if (!r->keep_state && r->action == PF_PASS && !anchor_call[0])
833 printf(" no state");
834 else if (r->keep_state == PF_STATE_NORMAL)
835 printf(" keep state");
836 else if (r->keep_state == PF_STATE_MODULATE)
837 printf(" modulate state");
838 else if (r->keep_state == PF_STATE_SYNPROXY)
839 printf(" synproxy state");
840 if (r->prob) {
841 char buf[20];
842
843 snprintf(buf, sizeof(buf), "%f", r->prob*100.0/(UINT_MAX+1.0));
844 for (i = strlen(buf)-1; i > 0; i--) {
845 if (buf[i] == '0')
846 buf[i] = '\0';
847 else {
848 if (buf[i] == '.')
849 buf[i] = '\0';
850 break;
851 }
852 }
853 printf(" probability %s%%", buf);
854 }
855 opts = 0;
856 if (r->max_states || r->max_src_nodes || r->max_src_states)
857 opts = 1;
858 if (r->pickup_mode)
859 opts = 1;
860 if (r->rule_flag & PFRULE_NOSYNC)
861 opts = 1;
862 if (r->rule_flag & PFRULE_SRCTRACK)
863 opts = 1;
864 if (r->rule_flag & PFRULE_IFBOUND)
865 opts = 1;
866 if (r->rule_flag & PFRULE_STATESLOPPY)
867 opts = 1;
868 for (i = 0; !opts && i < PFTM_MAX; ++i)
869 if (r->timeout[i])
870 opts = 1;
871 if (opts) {
872 printf(" (");
873 switch(r->pickup_mode) {
874 case PF_PICKUPS_UNSPECIFIED:
875 break;
876 case PF_PICKUPS_DISABLED:
877 printf("no-pickups");
878 opts = 0;
879 break;
880 case PF_PICKUPS_HASHONLY:
881 printf("hash-only");
882 opts = 0;
883 break;
884 case PF_PICKUPS_ENABLED:
885 printf("pickups");
886 opts = 0;
887 break;
888 default:
889 printf("unknown-pickups-mode-%d", r->pickup_mode);
890 break;
891 }
892 if (r->max_states) {
893 if (!opts)
894 printf(", ");
895 printf("max %u", r->max_states);
896 opts = 0;
897 }
898 if (r->rule_flag & PFRULE_NOSYNC) {
899 if (!opts)
900 printf(", ");
901 printf("no-sync");
902 opts = 0;
903 }
904 if (r->rule_flag & PFRULE_SRCTRACK) {
905 if (!opts)
906 printf(", ");
907 printf("source-track");
908 if (r->rule_flag & PFRULE_RULESRCTRACK)
909 printf(" rule");
910 else
911 printf(" global");
912 opts = 0;
913 }
914 if (r->max_src_states) {
915 if (!opts)
916 printf(", ");
917 printf("max-src-states %u", r->max_src_states);
918 opts = 0;
919 }
920 if (r->max_src_conn) {
921 if (!opts)
922 printf(", ");
923 printf("max-src-conn %u", r->max_src_conn);
924 opts = 0;
925 }
926 if (r->max_src_conn_rate.limit) {
927 if (!opts)
928 printf(", ");
929 printf("max-src-conn-rate %u/%u",
930 r->max_src_conn_rate.limit,
931 r->max_src_conn_rate.seconds);
932 opts = 0;
933 }
934 if (r->max_src_nodes) {
935 if (!opts)
936 printf(", ");
937 printf("max-src-nodes %u", r->max_src_nodes);
938 opts = 0;
939 }
940 if (r->overload_tblname[0]) {
941 if (!opts)
942 printf(", ");
943 printf("overload <%s>", r->overload_tblname);
944 if (r->flush)
945 printf(" flush");
946 if (r->flush & PF_FLUSH_GLOBAL)
947 printf(" global");
948 }
949 if (r->rule_flag & PFRULE_IFBOUND) {
950 if (!opts)
951 printf(", ");
952 printf("if-bound");
953 opts = 0;
954 }
955 if (r->rule_flag & PFRULE_STATESLOPPY) {
956 if (!opts)
957 printf(", ");
958 printf("sloppy");
959 opts = 0;
960 }
961 for (i = 0; i < PFTM_MAX; ++i)
962 if (r->timeout[i]) {
963 int j;
964
965 if (!opts)
966 printf(", ");
967 opts = 0;
968 for (j = 0; pf_timeouts[j].name != NULL;
969 ++j)
970 if (pf_timeouts[j].timeout == i)
971 break;
972 printf("%s %u", pf_timeouts[j].name == NULL ?
973 "inv.timeout" : pf_timeouts[j].name,
974 r->timeout[i]);
975 }
976 printf(")");
977 }
978 if (r->rule_flag & PFRULE_FRAGMENT)
979 printf(" fragment");
980 if (r->rule_flag & PFRULE_NODF)
981 printf(" no-df");
982 if (r->rule_flag & PFRULE_RANDOMID)
983 printf(" random-id");
984 if (r->min_ttl)
985 printf(" min-ttl %d", r->min_ttl);
986 if (r->max_mss)
987 printf(" max-mss %d", r->max_mss);
988 if (r->rule_flag & PFRULE_SET_TOS)
989 printf(" set-tos 0x%2.2x", r->set_tos);
990 if (r->allow_opts)
991 printf(" allow-opts");
992 if (r->action == PF_SCRUB) {
993 if (r->rule_flag & PFRULE_REASSEMBLE_TCP)
994 printf(" reassemble tcp");
995
996 if (r->rule_flag & PFRULE_FRAGDROP)
997 printf(" fragment drop-ovl");
998 else if (r->rule_flag & PFRULE_FRAGCROP)
999 printf(" fragment crop");
1000 else
1001 printf(" fragment reassemble");
1002 }
1003 if (r->label[0])
1004 printf(" label \"%s\"", r->label);
1005 if (r->qname[0] && r->pqname[0])
1006 printf(" queue(%s, %s)", r->qname, r->pqname);
1007 else if (r->qname[0])
1008 printf(" queue %s", r->qname);
1009 if (r->tagname[0])
1010 printf(" tag %s", r->tagname);
1011 if (r->match_tagname[0]) {
1012 if (r->match_tag_not)
1013 printf(" !");
1014 printf(" tagged %s", r->match_tagname);
1015 }
1016 if (r->rtableid != -1)
1017 printf(" rtable %u", r->rtableid);
1018 if (r->divert.port) {
1019 if (PF_AZERO(&r->divert.addr, r->af)) {
1020 printf(" divert-reply");
1021 } else {
1022 /* XXX cut&paste from print_addr */
1023 char buf[48];
1024
1025 printf(" divert-to ");
1026 if (inet_ntop(r->af, &r->divert.addr, buf,
1027 sizeof(buf)) == NULL)
1028 printf("?");
1029 else
1030 printf("%s", buf);
1031 printf(" port %u", ntohs(r->divert.port));
1032 }
1033 }
1034 if (!anchor_call[0] && (r->action == PF_NAT ||
1035 r->action == PF_BINAT || r->action == PF_RDR)) {
1036 printf(" -> ");
1037 print_pool(&r->rpool, r->rpool.proxy_port[0],
1038 r->rpool.proxy_port[1], r->af, r->action);
1039 }
1040 }
1041
1042 void
1043 print_tabledef(const char *name, int flags, int addrs,
1044 struct node_tinithead *nodes)
1045 {
1046 struct node_tinit *ti, *nti;
1047 struct node_host *h;
1048
1049 printf("table <%s>", name);
1050 if (flags & PFR_TFLAG_CONST)
1051 printf(" const");
1052 if (flags & PFR_TFLAG_PERSIST)
1053 printf(" persist");
1054 if (flags & PFR_TFLAG_COUNTERS)
1055 printf(" counters");
1056 SIMPLEQ_FOREACH(ti, nodes, entries) {
1057 if (ti->file) {
1058 printf(" file \"%s\"", ti->file);
1059 continue;
1060 }
1061 printf(" {");
1062 for (;;) {
1063 for (h = ti->host; h != NULL; h = h->next) {
1064 printf(h->not ? " !" : " ");
1065 print_addr(&h->addr, h->af, 0);
1066 }
1067 nti = SIMPLEQ_NEXT(ti, entries);
1068 if (nti != NULL && nti->file == NULL)
1069 ti = nti; /* merge lists */
1070 else
1071 break;
1072 }
1073 printf(" }");
1074 }
1075 if (addrs && SIMPLEQ_EMPTY(nodes))
1076 printf(" { }");
1077 printf("\n");
1078 }
1079
1080 int
1081 parse_flags(const char *s)
1082 {
1083 const char *p, *q;
1084 u_int8_t f = 0;
1085
1086 for (p = s; *p; p++) {
1087 if ((q = strchr(tcpflags, *p)) == NULL)
1088 return -1;
1089 else
1090 f |= 1 << (q - tcpflags);
1091 }
1092 return (f ? f : PF_TH_ALL);
1093 }
1094
1095 void
1096 set_ipmask(struct node_host *h, u_int8_t b)
1097 {
1098 struct pf_addr *m, *n;
1099 int i, j = 0;
1100
1101 m = &h->addr.v.a.mask;
1102 memset(m, 0, sizeof(*m));
1103
1104 while (b >= 32) {
1105 m->addr32[j++] = 0xffffffff;
1106 b -= 32;
1107 }
1108 for (i = 31; i > 31-b; --i)
1109 m->addr32[j] |= (1 << i);
1110 if (b)
1111 m->addr32[j] = htonl(m->addr32[j]);
1112
1113 /* Mask off bits of the address that will never be used. */
1114 n = &h->addr.v.a.addr;
1115 if (h->addr.type == PF_ADDR_ADDRMASK)
1116 for (i = 0; i < 4; i++)
1117 n->addr32[i] = n->addr32[i] & m->addr32[i];
1118 }
1119
1120 int
1121 check_netmask(struct node_host *h, sa_family_t af)
1122 {
1123 struct node_host *n = NULL;
1124 struct pf_addr *m;
1125
1126 for (n = h; n != NULL; n = n->next) {
1127 if (h->addr.type == PF_ADDR_TABLE)
1128 continue;
1129 m = &h->addr.v.a.mask;
1130 /* fix up netmask for dynaddr */
1131 if (af == AF_INET && h->addr.type == PF_ADDR_DYNIFTL &&
1132 unmask(m, AF_INET6) > 32)
1133 set_ipmask(n, 32);
1134 /* netmasks > 32 bit are invalid on v4 */
1135 if (af == AF_INET &&
1136 (m->addr32[1] || m->addr32[2] || m->addr32[3])) {
1137 fprintf(stderr, "netmask %u invalid for IPv4 address\n",
1138 unmask(m, AF_INET6));
1139 return (1);
1140 }
1141 }
1142 return (0);
1143 }
1144
1145 /* interface lookup routines */
1146
1147 struct node_host *iftab;
1148
1149 void
1150 ifa_load(void)
1151 {
1152 struct ifaddrs *ifap, *ifa;
1153 struct node_host *n = NULL, *h = NULL;
1154
1155 if (getifaddrs(&ifap) < 0)
1156 err(1, "getifaddrs");
1157
1158 for (ifa = ifap; ifa; ifa = ifa->ifa_next) {
1159 if (!(ifa->ifa_addr->sa_family == AF_INET ||
1160 ifa->ifa_addr->sa_family == AF_INET6 ||
1161 ifa->ifa_addr->sa_family == AF_LINK))
1162 continue;
1163 n = calloc(1, sizeof(struct node_host));
1164 if (n == NULL)
1165 err(1, "address: calloc");
1166 n->af = ifa->ifa_addr->sa_family;
1167 n->ifa_flags = ifa->ifa_flags;
1168 #ifdef __KAME__
1169 if (n->af == AF_INET6 &&
1170 IN6_IS_ADDR_LINKLOCAL(&((struct sockaddr_in6 *)
1171 ifa->ifa_addr)->sin6_addr) &&
1172 ((struct sockaddr_in6 *)ifa->ifa_addr)->sin6_scope_id ==
1173 0) {
1174 struct sockaddr_in6 *sin6;
1175
1176 sin6 = (struct sockaddr_in6 *)ifa->ifa_addr;
1177 sin6->sin6_scope_id = sin6->sin6_addr.s6_addr[2] << 8 |
1178 sin6->sin6_addr.s6_addr[3];
1179 sin6->sin6_addr.s6_addr[2] = 0;
1180 sin6->sin6_addr.s6_addr[3] = 0;
1181 }
1182 #endif
1183 n->ifindex = 0;
1184 if (n->af == AF_INET) {
1185 memcpy(&n->addr.v.a.addr, &((struct sockaddr_in *)
1186 ifa->ifa_addr)->sin_addr.s_addr,
1187 sizeof(struct in_addr));
1188 memcpy(&n->addr.v.a.mask, &((struct sockaddr_in *)
1189 ifa->ifa_netmask)->sin_addr.s_addr,
1190 sizeof(struct in_addr));
1191 if (ifa->ifa_broadaddr != NULL)
1192 memcpy(&n->bcast, &((struct sockaddr_in *)
1193 ifa->ifa_broadaddr)->sin_addr.s_addr,
1194 sizeof(struct in_addr));
1195 if (ifa->ifa_dstaddr != NULL)
1196 memcpy(&n->peer, &((struct sockaddr_in *)
1197 ifa->ifa_dstaddr)->sin_addr.s_addr,
1198 sizeof(struct in_addr));
1199 } else if (n->af == AF_INET6) {
1200 memcpy(&n->addr.v.a.addr, &((struct sockaddr_in6 *)
1201 ifa->ifa_addr)->sin6_addr.s6_addr,
1202 sizeof(struct in6_addr));
1203 memcpy(&n->addr.v.a.mask, &((struct sockaddr_in6 *)
1204 ifa->ifa_netmask)->sin6_addr.s6_addr,
1205 sizeof(struct in6_addr));
1206 if (ifa->ifa_broadaddr != NULL)
1207 memcpy(&n->bcast, &((struct sockaddr_in6 *)
1208 ifa->ifa_broadaddr)->sin6_addr.s6_addr,
1209 sizeof(struct in6_addr));
1210 if (ifa->ifa_dstaddr != NULL)
1211 memcpy(&n->peer, &((struct sockaddr_in6 *)
1212 ifa->ifa_dstaddr)->sin6_addr.s6_addr,
1213 sizeof(struct in6_addr));
1214 n->ifindex = ((struct sockaddr_in6 *)
1215 ifa->ifa_addr)->sin6_scope_id;
1216 }
1217 if ((n->ifname = strdup(ifa->ifa_name)) == NULL)
1218 err(1, "ifa_load: strdup");
1219 n->next = NULL;
1220 n->tail = n;
1221 if (h == NULL)
1222 h = n;
1223 else {
1224 h->tail->next = n;
1225 h->tail = n;
1226 }
1227 }
1228
1229 iftab = h;
1230 freeifaddrs(ifap);
1231 }
1232
1233 struct node_host *
1234 ifa_exists(const char *ifa_name)
1235 {
1236 struct node_host *n;
1237 struct ifgroupreq ifgr;
1238 int s;
1239
1240 if (iftab == NULL)
1241 ifa_load();
1242
1243 /* check wether this is a group */
1244 if ((s = socket(AF_INET, SOCK_DGRAM, 0)) == -1)
1245 err(1, "socket");
1246 bzero(&ifgr, sizeof(ifgr));
1247 strlcpy(ifgr.ifgr_name, ifa_name, sizeof(ifgr.ifgr_name));
1248 if (ioctl(s, SIOCGIFGMEMB, (caddr_t)&ifgr) == 0) {
1249 /* fake a node_host */
1250 if ((n = calloc(1, sizeof(*n))) == NULL)
1251 err(1, "calloc");
1252 if ((n->ifname = strdup(ifa_name)) == NULL)
1253 err(1, "strdup");
1254 close(s);
1255 return (n);
1256 }
1257 close(s);
1258
1259 for (n = iftab; n; n = n->next) {
1260 if (n->af == AF_LINK && !strncmp(n->ifname, ifa_name, IFNAMSIZ))
1261 return (n);
1262 }
1263
1264 return (NULL);
1265 }
1266
1267 struct node_host *
1268 ifa_grouplookup(const char *ifa_name, int flags)
1269 {
1270 struct ifg_req *ifg;
1271 struct ifgroupreq ifgr;
1272 int s;
1273 size_t len;
1274 struct node_host *n, *h = NULL;
1275
1276 if ((s = socket(AF_INET, SOCK_DGRAM, 0)) == -1)
1277 err(1, "socket");
1278 bzero(&ifgr, sizeof(ifgr));
1279 strlcpy(ifgr.ifgr_name, ifa_name, sizeof(ifgr.ifgr_name));
1280 if (ioctl(s, SIOCGIFGMEMB, (caddr_t)&ifgr) == -1) {
1281 close(s);
1282 return (NULL);
1283 }
1284
1285 len = ifgr.ifgr_len;
1286 if ((ifgr.ifgr_groups = calloc(1, len)) == NULL)
1287 err(1, "calloc");
1288 if (ioctl(s, SIOCGIFGMEMB, (caddr_t)&ifgr) == -1)
1289 err(1, "SIOCGIFGMEMB");
1290
1291 for (ifg = ifgr.ifgr_groups; ifg && len >= sizeof(struct ifg_req);
1292 ifg++) {
1293 len -= sizeof(struct ifg_req);
1294 if ((n = ifa_lookup(ifg->ifgrq_member, flags)) == NULL)
1295 continue;
1296 if (h == NULL)
1297 h = n;
1298 else {
1299 h->tail->next = n;
1300 h->tail = n->tail;
1301 }
1302 }
1303 free(ifgr.ifgr_groups);
1304 close(s);
1305
1306 return (h);
1307 }
1308
1309 struct node_host *
1310 ifa_lookup(const char *ifa_name, int flags)
1311 {
1312 struct node_host *p = NULL, *h = NULL, *n = NULL;
1313 int got4 = 0, got6 = 0;
1314 const char *last_if = NULL;
1315
1316 if ((h = ifa_grouplookup(ifa_name, flags)) != NULL)
1317 return (h);
1318
1319 if (!strncmp(ifa_name, "self", IFNAMSIZ))
1320 ifa_name = NULL;
1321
1322 if (iftab == NULL)
1323 ifa_load();
1324
1325 for (p = iftab; p; p = p->next) {
1326 if (ifa_skip_if(ifa_name, p))
1327 continue;
1328 if ((flags & PFI_AFLAG_BROADCAST) && p->af != AF_INET)
1329 continue;
1330 if ((flags & PFI_AFLAG_BROADCAST) &&
1331 !(p->ifa_flags & IFF_BROADCAST))
1332 continue;
1333 if ((flags & PFI_AFLAG_PEER) &&
1334 !(p->ifa_flags & IFF_POINTOPOINT))
1335 continue;
1336 if ((flags & PFI_AFLAG_NETWORK) && p->ifindex > 0)
1337 continue;
1338 if (last_if == NULL || strcmp(last_if, p->ifname))
1339 got4 = got6 = 0;
1340 last_if = p->ifname;
1341 if ((flags & PFI_AFLAG_NOALIAS) && p->af == AF_INET && got4)
1342 continue;
1343 if ((flags & PFI_AFLAG_NOALIAS) && p->af == AF_INET6 && got6)
1344 continue;
1345 if (p->af == AF_INET)
1346 got4 = 1;
1347 else
1348 got6 = 1;
1349 n = calloc(1, sizeof(struct node_host));
1350 if (n == NULL)
1351 err(1, "address: calloc");
1352 n->af = p->af;
1353 if (flags & PFI_AFLAG_BROADCAST)
1354 memcpy(&n->addr.v.a.addr, &p->bcast,
1355 sizeof(struct pf_addr));
1356 else if (flags & PFI_AFLAG_PEER)
1357 memcpy(&n->addr.v.a.addr, &p->peer,
1358 sizeof(struct pf_addr));
1359 else
1360 memcpy(&n->addr.v.a.addr, &p->addr.v.a.addr,
1361 sizeof(struct pf_addr));
1362 if (flags & PFI_AFLAG_NETWORK)
1363 set_ipmask(n, unmask(&p->addr.v.a.mask, n->af));
1364 else {
1365 if (n->af == AF_INET) {
1366 if (p->ifa_flags & IFF_LOOPBACK &&
1367 p->ifa_flags & IFF_LINK1)
1368 memcpy(&n->addr.v.a.mask,
1369 &p->addr.v.a.mask,
1370 sizeof(struct pf_addr));
1371 else
1372 set_ipmask(n, 32);
1373 } else
1374 set_ipmask(n, 128);
1375 }
1376 n->ifindex = p->ifindex;
1377
1378 n->next = NULL;
1379 n->tail = n;
1380 if (h == NULL)
1381 h = n;
1382 else {
1383 h->tail->next = n;
1384 h->tail = n;
1385 }
1386 }
1387 return (h);
1388 }
1389
1390 int
1391 ifa_skip_if(const char *filter, struct node_host *p)
1392 {
1393 int n;
1394
1395 if (p->af != AF_INET && p->af != AF_INET6)
1396 return (1);
1397 if (filter == NULL || !*filter)
1398 return (0);
1399 if (!strcmp(p->ifname, filter))
1400 return (0); /* exact match */
1401 n = strlen(filter);
1402 if (n < 1 || n >= IFNAMSIZ)
1403 return (1); /* sanity check */
1404 if (filter[n-1] >= '0' && filter[n-1] <= '9')
1405 return (1); /* only do exact match in that case */
1406 if (strncmp(p->ifname, filter, n))
1407 return (1); /* prefix doesn't match */
1408 return (p->ifname[n] < '0' || p->ifname[n] > '9');
1409 }
1410
1411
1412 struct node_host *
1413 host(const char *s)
1414 {
1415 struct node_host *h = NULL;
1416 int mask, v4mask, v6mask, cont = 1;
1417 char *p, *q, *ps;
1418
1419 if ((p = strrchr(s, '/')) != NULL) {
1420 mask = strtol(p+1, &q, 0);
1421 if (!q || *q || mask > 128 || q == (p+1)) {
1422 fprintf(stderr, "invalid netmask '%s'\n", p);
1423 return (NULL);
1424 }
1425 if ((ps = malloc(strlen(s) - strlen(p) + 1)) == NULL)
1426 err(1, "host: malloc");
1427 strlcpy(ps, s, strlen(s) - strlen(p) + 1);
1428 v4mask = v6mask = mask;
1429 } else {
1430 if ((ps = strdup(s)) == NULL)
1431 err(1, "host: strdup");
1432 v4mask = 32;
1433 v6mask = 128;
1434 mask = -1;
1435 }
1436
1437 /* interface with this name exists? */
1438 if (cont && (h = host_if(ps, mask)) != NULL)
1439 cont = 0;
1440
1441 /* IPv4 address? */
1442 if (cont && (h = host_v4(s)) != NULL)
1443 cont = 0;
1444
1445 /* IPv6 address? */
1446 if (cont && (h = host_v6(ps, v6mask)) != NULL)
1447 cont = 0;
1448
1449 /* dns lookup */
1450 if (cont && (h = host_dns(ps, v4mask, v6mask)) != NULL)
1451 cont = 0;
1452 free(ps);
1453
1454 if (h == NULL || cont == 1) {
1455 fprintf(stderr, "no IP address found for %s\n", s);
1456 return (NULL);
1457 }
1458 return (h);
1459 }
1460
1461 struct node_host *
1462 host_if(const char *s, int mask)
1463 {
1464 struct node_host *n, *h = NULL;
1465 char *p, *ps;
1466 int flags = 0;
1467
1468 if ((ps = strdup(s)) == NULL)
1469 err(1, "host_if: strdup");
1470 while ((p = strrchr(ps, ':')) != NULL) {
1471 if (!strcmp(p+1, "network"))
1472 flags |= PFI_AFLAG_NETWORK;
1473 else if (!strcmp(p+1, "broadcast"))
1474 flags |= PFI_AFLAG_BROADCAST;
1475 else if (!strcmp(p+1, "peer"))
1476 flags |= PFI_AFLAG_PEER;
1477 else if (!strcmp(p+1, "0"))
1478 flags |= PFI_AFLAG_NOALIAS;
1479 else {
1480 free(ps);
1481 return (NULL);
1482 }
1483 *p = '\0';
1484 }
1485 if (flags & (flags - 1) & PFI_AFLAG_MODEMASK) { /* Yep! */
1486 fprintf(stderr, "illegal combination of interface modifiers\n");
1487 free(ps);
1488 return (NULL);
1489 }
1490 if ((flags & (PFI_AFLAG_NETWORK|PFI_AFLAG_BROADCAST)) && mask > -1) {
1491 fprintf(stderr, "network or broadcast lookup, but "
1492 "extra netmask given\n");
1493 free(ps);
1494 return (NULL);
1495 }
1496 if (ifa_exists(ps) || !strncmp(ps, "self", IFNAMSIZ)) {
1497 /* interface with this name exists */
1498 h = ifa_lookup(ps, flags);
1499 for (n = h; n != NULL && mask > -1; n = n->next)
1500 set_ipmask(n, mask);
1501 }
1502
1503 free(ps);
1504 return (h);
1505 }
1506
1507 static struct node_host *
1508 host_v4(const char *s)
1509 {
1510 struct node_host *h = NULL;
1511 struct in_addr ina;
1512 int bits = 32;
1513
1514 memset(&ina, 0, sizeof(struct in_addr));
1515 if (strrchr(s, '/') != NULL) {
1516 if ((bits = inet_net_pton(AF_INET, s, &ina, sizeof(ina))) == -1)
1517 return (NULL);
1518 } else {
1519 if (inet_pton(AF_INET, s, &ina) != 1)
1520 return (NULL);
1521 }
1522
1523 h = calloc(1, sizeof(struct node_host));
1524 if (h == NULL)
1525 err(1, "address: calloc");
1526 h->ifname = NULL;
1527 h->af = AF_INET;
1528 h->addr.v.a.addr.addr32[0] = ina.s_addr;
1529 set_ipmask(h, bits);
1530 h->next = NULL;
1531 h->tail = h;
1532
1533 return (h);
1534 }
1535
1536 struct node_host *
1537 host_v6(const char *s, int mask)
1538 {
1539 struct addrinfo hints, *res;
1540 struct node_host *h = NULL;
1541
1542 memset(&hints, 0, sizeof(hints));
1543 hints.ai_family = AF_INET6;
1544 hints.ai_socktype = SOCK_DGRAM; /*dummy*/
1545 hints.ai_flags = AI_NUMERICHOST;
1546 if (getaddrinfo(s, "0", &hints, &res) == 0) {
1547 h = calloc(1, sizeof(struct node_host));
1548 if (h == NULL)
1549 err(1, "address: calloc");
1550 h->ifname = NULL;
1551 h->af = AF_INET6;
1552 memcpy(&h->addr.v.a.addr,
1553 &((struct sockaddr_in6 *)res->ai_addr)->sin6_addr,
1554 sizeof(h->addr.v.a.addr));
1555 h->ifindex =
1556 ((struct sockaddr_in6 *)res->ai_addr)->sin6_scope_id;
1557 set_ipmask(h, mask);
1558 freeaddrinfo(res);
1559 h->next = NULL;
1560 h->tail = h;
1561 }
1562
1563 return (h);
1564 }
1565
1566 struct node_host *
1567 host_dns(const char *s, int v4mask, int v6mask)
1568 {
1569 struct addrinfo hints, *res0, *res;
1570 struct node_host *n, *h = NULL;
1571 int error, noalias = 0;
1572 int got4 = 0, got6 = 0;
1573 char *p, *ps;
1574
1575 if ((ps = strdup(s)) == NULL)
1576 err(1, "host_dns: strdup");
1577 if ((p = strrchr(ps, ':')) != NULL && !strcmp(p, ":0")) {
1578 noalias = 1;
1579 *p = '\0';
1580 }
1581 memset(&hints, 0, sizeof(hints));
1582 hints.ai_family = PF_UNSPEC;
1583 hints.ai_socktype = SOCK_STREAM; /* DUMMY */
1584 error = getaddrinfo(ps, NULL, &hints, &res0);
1585 if (error) {
1586 free(ps);
1587 return (h);
1588 }
1589
1590 for (res = res0; res; res = res->ai_next) {
1591 if (res->ai_family != AF_INET &&
1592 res->ai_family != AF_INET6)
1593 continue;
1594 if (noalias) {
1595 if (res->ai_family == AF_INET) {
1596 if (got4)
1597 continue;
1598 got4 = 1;
1599 } else {
1600 if (got6)
1601 continue;
1602 got6 = 1;
1603 }
1604 }
1605 n = calloc(1, sizeof(struct node_host));
1606 if (n == NULL)
1607 err(1, "host_dns: calloc");
1608 n->ifname = NULL;
1609 n->af = res->ai_family;
1610 if (res->ai_family == AF_INET) {
1611 memcpy(&n->addr.v.a.addr,
1612 &((struct sockaddr_in *)
1613 res->ai_addr)->sin_addr.s_addr,
1614 sizeof(struct in_addr));
1615 set_ipmask(n, v4mask);
1616 } else {
1617 memcpy(&n->addr.v.a.addr,
1618 &((struct sockaddr_in6 *)
1619 res->ai_addr)->sin6_addr.s6_addr,
1620 sizeof(struct in6_addr));
1621 n->ifindex =
1622 ((struct sockaddr_in6 *)
1623 res->ai_addr)->sin6_scope_id;
1624 set_ipmask(n, v6mask);
1625 }
1626 n->next = NULL;
1627 n->tail = n;
1628 if (h == NULL)
1629 h = n;
1630 else {
1631 h->tail->next = n;
1632 h->tail = n;
1633 }
1634 }
1635 freeaddrinfo(res0);
1636 free(ps);
1637
1638 return (h);
1639 }
1640
1641 /*
1642 * convert a hostname to a list of addresses and put them in the given buffer.
1643 * test:
1644 * if set to 1, only simple addresses are accepted (no netblock, no "!").
1645 */
1646 int
1647 append_addr(struct pfr_buffer *b, char *s, int test)
1648 {
1649 char *r;
1650 struct node_host *h, *n;
1651 int rv, not = 0;
1652
1653 for (r = s; *r == '!'; r++)
1654 not = !not;
1655 if ((n = host(r)) == NULL) {
1656 errno = 0;
1657 return (-1);
1658 }
1659 rv = append_addr_host(b, n, test, not);
1660 do {
1661 h = n;
1662 n = n->next;
1663 free(h);
1664 } while (n != NULL);
1665 return (rv);
1666 }
1667
1668 /*
1669 * same as previous function, but with a pre-parsed input and the ability
1670 * to "negate" the result. Does not free the node_host list.
1671 * not:
1672 * setting it to 1 is equivalent to adding "!" in front of parameter s.
1673 */
1674 int
1675 append_addr_host(struct pfr_buffer *b, struct node_host *n, int test, int not)
1676 {
1677 int bits;
1678 struct pfr_addr addr;
1679
1680 do {
1681 bzero(&addr, sizeof(addr));
1682 addr.pfra_not = n->not ^ not;
1683 addr.pfra_af = n->af;
1684 addr.pfra_net = unmask(&n->addr.v.a.mask, n->af);
1685 switch (n->af) {
1686 case AF_INET:
1687 addr.pfra_ip4addr.s_addr = n->addr.v.a.addr.addr32[0];
1688 bits = 32;
1689 break;
1690 case AF_INET6:
1691 memcpy(&addr.pfra_ip6addr, &n->addr.v.a.addr.v6,
1692 sizeof(struct in6_addr));
1693 bits = 128;
1694 break;
1695 default:
1696 errno = EINVAL;
1697 return (-1);
1698 }
1699 if ((test && (not || addr.pfra_net != bits)) ||
1700 addr.pfra_net > bits) {
1701 errno = EINVAL;
1702 return (-1);
1703 }
1704 if (pfr_buf_add(b, &addr))
1705 return (-1);
1706 } while ((n = n->next) != NULL);
1707
1708 return (0);
1709 }
1710
1711 int
1712 pfctl_add_trans(struct pfr_buffer *buf, int rs_num, const char *anchor)
1713 {
1714 struct pfioc_trans_e trans;
1715
1716 bzero(&trans, sizeof(trans));
1717 trans.rs_num = rs_num;
1718 if (strlcpy(trans.anchor, anchor,
1719 sizeof(trans.anchor)) >= sizeof(trans.anchor))
1720 errx(1, "pfctl_add_trans: strlcpy");
1721
1722 return pfr_buf_add(buf, &trans);
1723 }
1724
1725 u_int32_t
1726 pfctl_get_ticket(struct pfr_buffer *buf, int rs_num, const char *anchor)
1727 {
1728 const struct pfioc_trans_e *p;
1729
1730 PFRB_FOREACH(p, buf)
1731 if (rs_num == p->rs_num && !strcmp(anchor, p->anchor))
1732 return (p->ticket);
1733 errx(1, "pfctl_get_ticket: assertion failed");
1734 }
1735
1736 int
1737 pfctl_trans(int dev, struct pfr_buffer *buf, u_long cmd, int from)
1738 {
1739 struct pfioc_trans trans;
1740
1741 bzero(&trans, sizeof(trans));
1742 trans.size = buf->pfrb_size - from;
1743 trans.esize = sizeof(struct pfioc_trans_e);
1744 trans.array = ((struct pfioc_trans_e *)buf->pfrb_caddr) + from;
1745 return ioctl(dev, cmd, &trans);
1746 }
DragonFly BSD