pf_ioctl.c revision 1.1.1.2 1 /* $OpenBSD: pf_ioctl.c,v 1.130 2004/09/09 22:08:42 dhartmei 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 * Effort sponsored in part by the Defense Advanced Research Projects
33 * Agency (DARPA) and Air Force Research Laboratory, Air Force
34 * Materiel Command, USAF, under agreement number F30602-01-2-0537.
35 *
36 */
37
38 #include "pfsync.h"
39
40 #include <sys/param.h>
41 #include <sys/systm.h>
42 #include <sys/mbuf.h>
43 #include <sys/filio.h>
44 #include <sys/fcntl.h>
45 #include <sys/socket.h>
46 #include <sys/socketvar.h>
47 #include <sys/kernel.h>
48 #include <sys/time.h>
49 #include <sys/timeout.h>
50 #include <sys/pool.h>
51 #include <sys/malloc.h>
52
53 #include <net/if.h>
54 #include <net/if_types.h>
55 #include <net/route.h>
56
57 #include <netinet/in.h>
58 #include <netinet/in_var.h>
59 #include <netinet/in_systm.h>
60 #include <netinet/ip.h>
61 #include <netinet/ip_var.h>
62 #include <netinet/ip_icmp.h>
63
64 #include <dev/rndvar.h>
65 #include <net/pfvar.h>
66
67 #if NPFSYNC > 0
68 #include <net/if_pfsync.h>
69 #endif /* NPFSYNC > 0 */
70
71 #ifdef INET6
72 #include <netinet/ip6.h>
73 #include <netinet/in_pcb.h>
74 #endif /* INET6 */
75
76 #ifdef ALTQ
77 #include <altq/altq.h>
78 #endif
79
80 void pfattach(int);
81 int pfopen(dev_t, int, int, struct proc *);
82 int pfclose(dev_t, int, int, struct proc *);
83 struct pf_pool *pf_get_pool(char *, u_int32_t, u_int8_t, u_int32_t,
84 u_int8_t, u_int8_t, u_int8_t);
85 int pf_get_ruleset_number(u_int8_t);
86 void pf_init_ruleset(struct pf_ruleset *);
87 int pf_anchor_setup(struct pf_rule *,
88 const struct pf_ruleset *, const char *);
89 int pf_anchor_copyout(const struct pf_ruleset *,
90 const struct pf_rule *, struct pfioc_rule *);
91 void pf_anchor_remove(struct pf_rule *);
92
93 void pf_mv_pool(struct pf_palist *, struct pf_palist *);
94 void pf_empty_pool(struct pf_palist *);
95 int pfioctl(dev_t, u_long, caddr_t, int, struct proc *);
96 #ifdef ALTQ
97 int pf_begin_altq(u_int32_t *);
98 int pf_rollback_altq(u_int32_t);
99 int pf_commit_altq(u_int32_t);
100 int pf_enable_altq(struct pf_altq *);
101 int pf_disable_altq(struct pf_altq *);
102 #endif /* ALTQ */
103 int pf_begin_rules(u_int32_t *, int, const char *);
104 int pf_rollback_rules(u_int32_t, int, char *);
105 int pf_commit_rules(u_int32_t, int, char *);
106
107 extern struct timeout pf_expire_to;
108
109 struct pf_rule pf_default_rule;
110 #ifdef ALTQ
111 static int pf_altq_running;
112 #endif
113
114 #define TAGID_MAX 50000
115 TAILQ_HEAD(pf_tags, pf_tagname) pf_tags = TAILQ_HEAD_INITIALIZER(pf_tags),
116 pf_qids = TAILQ_HEAD_INITIALIZER(pf_qids);
117
118 #if (PF_QNAME_SIZE != PF_TAG_NAME_SIZE)
119 #error PF_QNAME_SIZE must be equal to PF_TAG_NAME_SIZE
120 #endif
121 static u_int16_t tagname2tag(struct pf_tags *, char *);
122 static void tag2tagname(struct pf_tags *, u_int16_t, char *);
123 static void tag_unref(struct pf_tags *, u_int16_t);
124
125 #define DPFPRINTF(n, x) if (pf_status.debug >= (n)) printf x
126
127 void
128 pfattach(int num)
129 {
130 u_int32_t *timeout = pf_default_rule.timeout;
131
132 pool_init(&pf_rule_pl, sizeof(struct pf_rule), 0, 0, 0, "pfrulepl",
133 &pool_allocator_nointr);
134 pool_init(&pf_src_tree_pl, sizeof(struct pf_src_node), 0, 0, 0,
135 "pfsrctrpl", NULL);
136 pool_init(&pf_state_pl, sizeof(struct pf_state), 0, 0, 0, "pfstatepl",
137 NULL);
138 pool_init(&pf_altq_pl, sizeof(struct pf_altq), 0, 0, 0, "pfaltqpl",
139 &pool_allocator_nointr);
140 pool_init(&pf_pooladdr_pl, sizeof(struct pf_pooladdr), 0, 0, 0,
141 "pfpooladdrpl", &pool_allocator_nointr);
142 pfr_initialize();
143 pfi_initialize();
144 pf_osfp_initialize();
145
146 pool_sethardlimit(pf_pool_limits[PF_LIMIT_STATES].pp,
147 pf_pool_limits[PF_LIMIT_STATES].limit, NULL, 0);
148
149 RB_INIT(&tree_src_tracking);
150 RB_INIT(&pf_anchors);
151 pf_init_ruleset(&pf_main_ruleset);
152 TAILQ_INIT(&pf_altqs[0]);
153 TAILQ_INIT(&pf_altqs[1]);
154 TAILQ_INIT(&pf_pabuf);
155 pf_altqs_active = &pf_altqs[0];
156 pf_altqs_inactive = &pf_altqs[1];
157 TAILQ_INIT(&state_updates);
158
159 /* default rule should never be garbage collected */
160 pf_default_rule.entries.tqe_prev = &pf_default_rule.entries.tqe_next;
161 pf_default_rule.action = PF_PASS;
162 pf_default_rule.nr = -1;
163
164 /* initialize default timeouts */
165 timeout[PFTM_TCP_FIRST_PACKET] = 120; /* First TCP packet */
166 timeout[PFTM_TCP_OPENING] = 30; /* No response yet */
167 timeout[PFTM_TCP_ESTABLISHED] = 24*60*60; /* Established */
168 timeout[PFTM_TCP_CLOSING] = 15 * 60; /* Half closed */
169 timeout[PFTM_TCP_FIN_WAIT] = 45; /* Got both FINs */
170 timeout[PFTM_TCP_CLOSED] = 90; /* Got a RST */
171 timeout[PFTM_UDP_FIRST_PACKET] = 60; /* First UDP packet */
172 timeout[PFTM_UDP_SINGLE] = 30; /* Unidirectional */
173 timeout[PFTM_UDP_MULTIPLE] = 60; /* Bidirectional */
174 timeout[PFTM_ICMP_FIRST_PACKET] = 20; /* First ICMP packet */
175 timeout[PFTM_ICMP_ERROR_REPLY] = 10; /* Got error response */
176 timeout[PFTM_OTHER_FIRST_PACKET] = 60; /* First packet */
177 timeout[PFTM_OTHER_SINGLE] = 30; /* Unidirectional */
178 timeout[PFTM_OTHER_MULTIPLE] = 60; /* Bidirectional */
179 timeout[PFTM_FRAG] = 30; /* Fragment expire */
180 timeout[PFTM_INTERVAL] = 10; /* Expire interval */
181 timeout[PFTM_SRC_NODE] = 0; /* Source tracking */
182 timeout[PFTM_TS_DIFF] = 30; /* Allowed TS diff */
183
184 timeout_set(&pf_expire_to, pf_purge_timeout, &pf_expire_to);
185 timeout_add(&pf_expire_to, timeout[PFTM_INTERVAL] * hz);
186
187 pf_normalize_init();
188 bzero(&pf_status, sizeof(pf_status));
189 pf_status.debug = PF_DEBUG_URGENT;
190
191 /* XXX do our best to avoid a conflict */
192 pf_status.hostid = arc4random();
193 }
194
195 int
196 pfopen(dev_t dev, int flags, int fmt, struct proc *p)
197 {
198 if (minor(dev) >= 1)
199 return (ENXIO);
200 return (0);
201 }
202
203 int
204 pfclose(dev_t dev, int flags, int fmt, struct proc *p)
205 {
206 if (minor(dev) >= 1)
207 return (ENXIO);
208 return (0);
209 }
210
211 struct pf_pool *
212 pf_get_pool(char *anchor, u_int32_t ticket, u_int8_t rule_action,
213 u_int32_t rule_number, u_int8_t r_last, u_int8_t active,
214 u_int8_t check_ticket)
215 {
216 struct pf_ruleset *ruleset;
217 struct pf_rule *rule;
218 int rs_num;
219
220 ruleset = pf_find_ruleset(anchor);
221 if (ruleset == NULL)
222 return (NULL);
223 rs_num = pf_get_ruleset_number(rule_action);
224 if (rs_num >= PF_RULESET_MAX)
225 return (NULL);
226 if (active) {
227 if (check_ticket && ticket !=
228 ruleset->rules[rs_num].active.ticket)
229 return (NULL);
230 if (r_last)
231 rule = TAILQ_LAST(ruleset->rules[rs_num].active.ptr,
232 pf_rulequeue);
233 else
234 rule = TAILQ_FIRST(ruleset->rules[rs_num].active.ptr);
235 } else {
236 if (check_ticket && ticket !=
237 ruleset->rules[rs_num].inactive.ticket)
238 return (NULL);
239 if (r_last)
240 rule = TAILQ_LAST(ruleset->rules[rs_num].inactive.ptr,
241 pf_rulequeue);
242 else
243 rule = TAILQ_FIRST(ruleset->rules[rs_num].inactive.ptr);
244 }
245 if (!r_last) {
246 while ((rule != NULL) && (rule->nr != rule_number))
247 rule = TAILQ_NEXT(rule, entries);
248 }
249 if (rule == NULL)
250 return (NULL);
251
252 return (&rule->rpool);
253 }
254
255 int
256 pf_get_ruleset_number(u_int8_t action)
257 {
258 switch (action) {
259 case PF_SCRUB:
260 return (PF_RULESET_SCRUB);
261 break;
262 case PF_PASS:
263 case PF_DROP:
264 return (PF_RULESET_FILTER);
265 break;
266 case PF_NAT:
267 case PF_NONAT:
268 return (PF_RULESET_NAT);
269 break;
270 case PF_BINAT:
271 case PF_NOBINAT:
272 return (PF_RULESET_BINAT);
273 break;
274 case PF_RDR:
275 case PF_NORDR:
276 return (PF_RULESET_RDR);
277 break;
278 default:
279 return (PF_RULESET_MAX);
280 break;
281 }
282 }
283
284 void
285 pf_init_ruleset(struct pf_ruleset *ruleset)
286 {
287 int i;
288
289 memset(ruleset, 0, sizeof(struct pf_ruleset));
290 for (i = 0; i < PF_RULESET_MAX; i++) {
291 TAILQ_INIT(&ruleset->rules[i].queues[0]);
292 TAILQ_INIT(&ruleset->rules[i].queues[1]);
293 ruleset->rules[i].active.ptr = &ruleset->rules[i].queues[0];
294 ruleset->rules[i].inactive.ptr = &ruleset->rules[i].queues[1];
295 }
296 }
297
298 struct pf_anchor *
299 pf_find_anchor(const char *path)
300 {
301 static struct pf_anchor key;
302
303 memset(&key, 0, sizeof(key));
304 strlcpy(key.path, path, sizeof(key.path));
305 return (RB_FIND(pf_anchor_global, &pf_anchors, &key));
306 }
307
308 struct pf_ruleset *
309 pf_find_ruleset(const char *path)
310 {
311 struct pf_anchor *anchor;
312
313 while (*path == '/')
314 path++;
315 if (!*path)
316 return (&pf_main_ruleset);
317 anchor = pf_find_anchor(path);
318 if (anchor == NULL)
319 return (NULL);
320 else
321 return (&anchor->ruleset);
322 }
323
324 struct pf_ruleset *
325 pf_find_or_create_ruleset(const char *path)
326 {
327 static char p[MAXPATHLEN];
328 char *q, *r;
329 struct pf_ruleset *ruleset;
330 struct pf_anchor *anchor, *dup, *parent = NULL;
331
332 while (*path == '/')
333 path++;
334 ruleset = pf_find_ruleset(path);
335 if (ruleset != NULL)
336 return (ruleset);
337 strlcpy(p, path, sizeof(p));
338 while (parent == NULL && (q = strrchr(p, '/')) != NULL) {
339 *q = 0;
340 if ((ruleset = pf_find_ruleset(p)) != NULL) {
341 parent = ruleset->anchor;
342 break;
343 }
344 }
345 if (q == NULL)
346 q = p;
347 else
348 q++;
349 strlcpy(p, path, sizeof(p));
350 if (!*q)
351 return (NULL);
352 while ((r = strchr(q, '/')) != NULL || *q) {
353 if (r != NULL)
354 *r = 0;
355 if (!*q || strlen(q) >= PF_ANCHOR_NAME_SIZE ||
356 (parent != NULL && strlen(parent->path) >=
357 MAXPATHLEN - PF_ANCHOR_NAME_SIZE - 1))
358 return (NULL);
359 anchor = (struct pf_anchor *)malloc(sizeof(*anchor), M_TEMP,
360 M_NOWAIT);
361 if (anchor == NULL)
362 return (NULL);
363 memset(anchor, 0, sizeof(*anchor));
364 RB_INIT(&anchor->children);
365 strlcpy(anchor->name, q, sizeof(anchor->name));
366 if (parent != NULL) {
367 strlcpy(anchor->path, parent->path,
368 sizeof(anchor->path));
369 strlcat(anchor->path, "/", sizeof(anchor->path));
370 }
371 strlcat(anchor->path, anchor->name, sizeof(anchor->path));
372 if ((dup = RB_INSERT(pf_anchor_global, &pf_anchors, anchor)) !=
373 NULL) {
374 printf("pf_find_or_create_ruleset: RB_INSERT1 "
375 "'%s' '%s' collides with '%s' '%s'\n",
376 anchor->path, anchor->name, dup->path, dup->name);
377 free(anchor, M_TEMP);
378 return (NULL);
379 }
380 if (parent != NULL) {
381 anchor->parent = parent;
382 if ((dup = RB_INSERT(pf_anchor_node, &parent->children,
383 anchor)) != NULL) {
384 printf("pf_find_or_create_ruleset: "
385 "RB_INSERT2 '%s' '%s' collides with "
386 "'%s' '%s'\n", anchor->path, anchor->name,
387 dup->path, dup->name);
388 RB_REMOVE(pf_anchor_global, &pf_anchors,
389 anchor);
390 free(anchor, M_TEMP);
391 return (NULL);
392 }
393 }
394 pf_init_ruleset(&anchor->ruleset);
395 anchor->ruleset.anchor = anchor;
396 parent = anchor;
397 if (r != NULL)
398 q = r + 1;
399 else
400 *q = 0;
401 }
402 return (&anchor->ruleset);
403 }
404
405 void
406 pf_remove_if_empty_ruleset(struct pf_ruleset *ruleset)
407 {
408 struct pf_anchor *parent;
409 int i;
410
411 while (ruleset != NULL) {
412 if (ruleset == &pf_main_ruleset || ruleset->anchor == NULL ||
413 !RB_EMPTY(&ruleset->anchor->children) ||
414 ruleset->anchor->refcnt > 0 || ruleset->tables > 0 ||
415 ruleset->topen)
416 return;
417 for (i = 0; i < PF_RULESET_MAX; ++i)
418 if (!TAILQ_EMPTY(ruleset->rules[i].active.ptr) ||
419 !TAILQ_EMPTY(ruleset->rules[i].inactive.ptr) ||
420 ruleset->rules[i].inactive.open)
421 return;
422 RB_REMOVE(pf_anchor_global, &pf_anchors, ruleset->anchor);
423 if ((parent = ruleset->anchor->parent) != NULL)
424 RB_REMOVE(pf_anchor_node, &parent->children,
425 ruleset->anchor);
426 free(ruleset->anchor, M_TEMP);
427 if (parent == NULL)
428 return;
429 ruleset = &parent->ruleset;
430 }
431 }
432
433 int
434 pf_anchor_setup(struct pf_rule *r, const struct pf_ruleset *s,
435 const char *name)
436 {
437 static char *p, path[MAXPATHLEN];
438 struct pf_ruleset *ruleset;
439
440 r->anchor = NULL;
441 r->anchor_relative = 0;
442 r->anchor_wildcard = 0;
443 if (!name[0])
444 return (0);
445 if (name[0] == '/')
446 strlcpy(path, name + 1, sizeof(path));
447 else {
448 /* relative path */
449 r->anchor_relative = 1;
450 if (s->anchor == NULL || !s->anchor->path[0])
451 path[0] = 0;
452 else
453 strlcpy(path, s->anchor->path, sizeof(path));
454 while (name[0] == '.' && name[1] == '.' && name[2] == '/') {
455 if (!path[0]) {
456 printf("pf_anchor_setup: .. beyond root\n");
457 return (1);
458 }
459 if ((p = strrchr(path, '/')) != NULL)
460 *p = 0;
461 else
462 path[0] = 0;
463 r->anchor_relative++;
464 name += 3;
465 }
466 if (path[0])
467 strlcat(path, "/", sizeof(path));
468 strlcat(path, name, sizeof(path));
469 }
470 if ((p = strrchr(path, '/')) != NULL && !strcmp(p, "/*")) {
471 r->anchor_wildcard = 1;
472 *p = 0;
473 }
474 ruleset = pf_find_or_create_ruleset(path);
475 if (ruleset == NULL || ruleset->anchor == NULL) {
476 printf("pf_anchor_setup: ruleset\n");
477 return (1);
478 }
479 r->anchor = ruleset->anchor;
480 r->anchor->refcnt++;
481 return (0);
482 }
483
484 int
485 pf_anchor_copyout(const struct pf_ruleset *rs, const struct pf_rule *r,
486 struct pfioc_rule *pr)
487 {
488 pr->anchor_call[0] = 0;
489 if (r->anchor == NULL)
490 return (0);
491 if (!r->anchor_relative) {
492 strlcpy(pr->anchor_call, "/", sizeof(pr->anchor_call));
493 strlcat(pr->anchor_call, r->anchor->path,
494 sizeof(pr->anchor_call));
495 } else {
496 char a[MAXPATHLEN], b[MAXPATHLEN], *p;
497 int i;
498
499 if (rs->anchor == NULL)
500 a[0] = 0;
501 else
502 strlcpy(a, rs->anchor->path, sizeof(a));
503 strlcpy(b, r->anchor->path, sizeof(b));
504 for (i = 1; i < r->anchor_relative; ++i) {
505 if ((p = strrchr(a, '/')) == NULL)
506 p = a;
507 *p = 0;
508 strlcat(pr->anchor_call, "../",
509 sizeof(pr->anchor_call));
510 }
511 if (strncmp(a, b, strlen(a))) {
512 printf("pf_anchor_copyout: '%s' '%s'\n", a, b);
513 return (1);
514 }
515 if (strlen(b) > strlen(a))
516 strlcat(pr->anchor_call, b + (a[0] ? strlen(a) + 1 : 0),
517 sizeof(pr->anchor_call));
518 }
519 if (r->anchor_wildcard)
520 strlcat(pr->anchor_call, pr->anchor_call[0] ? "/*" : "*",
521 sizeof(pr->anchor_call));
522 return (0);
523 }
524
525 void
526 pf_anchor_remove(struct pf_rule *r)
527 {
528 if (r->anchor == NULL)
529 return;
530 if (r->anchor->refcnt <= 0) {
531 printf("pf_anchor_remove: broken refcount");
532 r->anchor = NULL;
533 return;
534 }
535 if (!--r->anchor->refcnt)
536 pf_remove_if_empty_ruleset(&r->anchor->ruleset);
537 r->anchor = NULL;
538 }
539
540 void
541 pf_mv_pool(struct pf_palist *poola, struct pf_palist *poolb)
542 {
543 struct pf_pooladdr *mv_pool_pa;
544
545 while ((mv_pool_pa = TAILQ_FIRST(poola)) != NULL) {
546 TAILQ_REMOVE(poola, mv_pool_pa, entries);
547 TAILQ_INSERT_TAIL(poolb, mv_pool_pa, entries);
548 }
549 }
550
551 void
552 pf_empty_pool(struct pf_palist *poola)
553 {
554 struct pf_pooladdr *empty_pool_pa;
555
556 while ((empty_pool_pa = TAILQ_FIRST(poola)) != NULL) {
557 pfi_dynaddr_remove(&empty_pool_pa->addr);
558 pf_tbladdr_remove(&empty_pool_pa->addr);
559 pfi_detach_rule(empty_pool_pa->kif);
560 TAILQ_REMOVE(poola, empty_pool_pa, entries);
561 pool_put(&pf_pooladdr_pl, empty_pool_pa);
562 }
563 }
564
565 void
566 pf_rm_rule(struct pf_rulequeue *rulequeue, struct pf_rule *rule)
567 {
568 if (rulequeue != NULL) {
569 if (rule->states <= 0) {
570 /*
571 * XXX - we need to remove the table *before* detaching
572 * the rule to make sure the table code does not delete
573 * the anchor under our feet.
574 */
575 pf_tbladdr_remove(&rule->src.addr);
576 pf_tbladdr_remove(&rule->dst.addr);
577 }
578 TAILQ_REMOVE(rulequeue, rule, entries);
579 rule->entries.tqe_prev = NULL;
580 rule->nr = -1;
581 }
582
583 if (rule->states > 0 || rule->src_nodes > 0 ||
584 rule->entries.tqe_prev != NULL)
585 return;
586 pf_tag_unref(rule->tag);
587 pf_tag_unref(rule->match_tag);
588 #ifdef ALTQ
589 if (rule->pqid != rule->qid)
590 pf_qid_unref(rule->pqid);
591 pf_qid_unref(rule->qid);
592 #endif
593 pfi_dynaddr_remove(&rule->src.addr);
594 pfi_dynaddr_remove(&rule->dst.addr);
595 if (rulequeue == NULL) {
596 pf_tbladdr_remove(&rule->src.addr);
597 pf_tbladdr_remove(&rule->dst.addr);
598 }
599 pfi_detach_rule(rule->kif);
600 pf_anchor_remove(rule);
601 pf_empty_pool(&rule->rpool.list);
602 pool_put(&pf_rule_pl, rule);
603 }
604
605 static u_int16_t
606 tagname2tag(struct pf_tags *head, char *tagname)
607 {
608 struct pf_tagname *tag, *p = NULL;
609 u_int16_t new_tagid = 1;
610
611 TAILQ_FOREACH(tag, head, entries)
612 if (strcmp(tagname, tag->name) == 0) {
613 tag->ref++;
614 return (tag->tag);
615 }
616
617 /*
618 * to avoid fragmentation, we do a linear search from the beginning
619 * and take the first free slot we find. if there is none or the list
620 * is empty, append a new entry at the end.
621 */
622
623 /* new entry */
624 if (!TAILQ_EMPTY(head))
625 for (p = TAILQ_FIRST(head); p != NULL &&
626 p->tag == new_tagid; p = TAILQ_NEXT(p, entries))
627 new_tagid = p->tag + 1;
628
629 if (new_tagid > TAGID_MAX)
630 return (0);
631
632 /* allocate and fill new struct pf_tagname */
633 tag = (struct pf_tagname *)malloc(sizeof(struct pf_tagname),
634 M_TEMP, M_NOWAIT);
635 if (tag == NULL)
636 return (0);
637 bzero(tag, sizeof(struct pf_tagname));
638 strlcpy(tag->name, tagname, sizeof(tag->name));
639 tag->tag = new_tagid;
640 tag->ref++;
641
642 if (p != NULL) /* insert new entry before p */
643 TAILQ_INSERT_BEFORE(p, tag, entries);
644 else /* either list empty or no free slot in between */
645 TAILQ_INSERT_TAIL(head, tag, entries);
646
647 return (tag->tag);
648 }
649
650 static void
651 tag2tagname(struct pf_tags *head, u_int16_t tagid, char *p)
652 {
653 struct pf_tagname *tag;
654
655 TAILQ_FOREACH(tag, head, entries)
656 if (tag->tag == tagid) {
657 strlcpy(p, tag->name, PF_TAG_NAME_SIZE);
658 return;
659 }
660 }
661
662 static void
663 tag_unref(struct pf_tags *head, u_int16_t tag)
664 {
665 struct pf_tagname *p, *next;
666
667 if (tag == 0)
668 return;
669
670 for (p = TAILQ_FIRST(head); p != NULL; p = next) {
671 next = TAILQ_NEXT(p, entries);
672 if (tag == p->tag) {
673 if (--p->ref == 0) {
674 TAILQ_REMOVE(head, p, entries);
675 free(p, M_TEMP);
676 }
677 break;
678 }
679 }
680 }
681
682 u_int16_t
683 pf_tagname2tag(char *tagname)
684 {
685 return (tagname2tag(&pf_tags, tagname));
686 }
687
688 void
689 pf_tag2tagname(u_int16_t tagid, char *p)
690 {
691 return (tag2tagname(&pf_tags, tagid, p));
692 }
693
694 void
695 pf_tag_unref(u_int16_t tag)
696 {
697 return (tag_unref(&pf_tags, tag));
698 }
699
700 #ifdef ALTQ
701 u_int32_t
702 pf_qname2qid(char *qname)
703 {
704 return ((u_int32_t)tagname2tag(&pf_qids, qname));
705 }
706
707 void
708 pf_qid2qname(u_int32_t qid, char *p)
709 {
710 return (tag2tagname(&pf_qids, (u_int16_t)qid, p));
711 }
712
713 void
714 pf_qid_unref(u_int32_t qid)
715 {
716 return (tag_unref(&pf_qids, (u_int16_t)qid));
717 }
718
719 int
720 pf_begin_altq(u_int32_t *ticket)
721 {
722 struct pf_altq *altq;
723 int error = 0;
724
725 /* Purge the old altq list */
726 while ((altq = TAILQ_FIRST(pf_altqs_inactive)) != NULL) {
727 TAILQ_REMOVE(pf_altqs_inactive, altq, entries);
728 if (altq->qname[0] == 0) {
729 /* detach and destroy the discipline */
730 error = altq_remove(altq);
731 } else
732 pf_qid_unref(altq->qid);
733 pool_put(&pf_altq_pl, altq);
734 }
735 if (error)
736 return (error);
737 *ticket = ++ticket_altqs_inactive;
738 altqs_inactive_open = 1;
739 return (0);
740 }
741
742 int
743 pf_rollback_altq(u_int32_t ticket)
744 {
745 struct pf_altq *altq;
746 int error = 0;
747
748 if (!altqs_inactive_open || ticket != ticket_altqs_inactive)
749 return (0);
750 /* Purge the old altq list */
751 while ((altq = TAILQ_FIRST(pf_altqs_inactive)) != NULL) {
752 TAILQ_REMOVE(pf_altqs_inactive, altq, entries);
753 if (altq->qname[0] == 0) {
754 /* detach and destroy the discipline */
755 error = altq_remove(altq);
756 } else
757 pf_qid_unref(altq->qid);
758 pool_put(&pf_altq_pl, altq);
759 }
760 altqs_inactive_open = 0;
761 return (error);
762 }
763
764 int
765 pf_commit_altq(u_int32_t ticket)
766 {
767 struct pf_altqqueue *old_altqs;
768 struct pf_altq *altq;
769 int s, err, error = 0;
770
771 if (!altqs_inactive_open || ticket != ticket_altqs_inactive)
772 return (EBUSY);
773
774 /* swap altqs, keep the old. */
775 s = splsoftnet();
776 old_altqs = pf_altqs_active;
777 pf_altqs_active = pf_altqs_inactive;
778 pf_altqs_inactive = old_altqs;
779 ticket_altqs_active = ticket_altqs_inactive;
780
781 /* Attach new disciplines */
782 TAILQ_FOREACH(altq, pf_altqs_active, entries) {
783 if (altq->qname[0] == 0) {
784 /* attach the discipline */
785 error = altq_pfattach(altq);
786 if (error == 0 && pf_altq_running)
787 error = pf_enable_altq(altq);
788 if (error != 0) {
789 splx(s);
790 return (error);
791 }
792 }
793 }
794
795 /* Purge the old altq list */
796 while ((altq = TAILQ_FIRST(pf_altqs_inactive)) != NULL) {
797 TAILQ_REMOVE(pf_altqs_inactive, altq, entries);
798 if (altq->qname[0] == 0) {
799 /* detach and destroy the discipline */
800 if (pf_altq_running)
801 error = pf_disable_altq(altq);
802 err = altq_pfdetach(altq);
803 if (err != 0 && error == 0)
804 error = err;
805 err = altq_remove(altq);
806 if (err != 0 && error == 0)
807 error = err;
808 } else
809 pf_qid_unref(altq->qid);
810 pool_put(&pf_altq_pl, altq);
811 }
812 splx(s);
813
814 altqs_inactive_open = 0;
815 return (error);
816 }
817
818 int
819 pf_enable_altq(struct pf_altq *altq)
820 {
821 struct ifnet *ifp;
822 struct tb_profile tb;
823 int s, error = 0;
824
825 if ((ifp = ifunit(altq->ifname)) == NULL)
826 return (EINVAL);
827
828 if (ifp->if_snd.altq_type != ALTQT_NONE)
829 error = altq_enable(&ifp->if_snd);
830
831 /* set tokenbucket regulator */
832 if (error == 0 && ifp != NULL && ALTQ_IS_ENABLED(&ifp->if_snd)) {
833 tb.rate = altq->ifbandwidth;
834 tb.depth = altq->tbrsize;
835 s = splimp();
836 error = tbr_set(&ifp->if_snd, &tb);
837 splx(s);
838 }
839
840 return (error);
841 }
842
843 int
844 pf_disable_altq(struct pf_altq *altq)
845 {
846 struct ifnet *ifp;
847 struct tb_profile tb;
848 int s, error;
849
850 if ((ifp = ifunit(altq->ifname)) == NULL)
851 return (EINVAL);
852
853 /*
854 * when the discipline is no longer referenced, it was overridden
855 * by a new one. if so, just return.
856 */
857 if (altq->altq_disc != ifp->if_snd.altq_disc)
858 return (0);
859
860 error = altq_disable(&ifp->if_snd);
861
862 if (error == 0) {
863 /* clear tokenbucket regulator */
864 tb.rate = 0;
865 s = splimp();
866 error = tbr_set(&ifp->if_snd, &tb);
867 splx(s);
868 }
869
870 return (error);
871 }
872 #endif /* ALTQ */
873
874 int
875 pf_begin_rules(u_int32_t *ticket, int rs_num, const char *anchor)
876 {
877 struct pf_ruleset *rs;
878 struct pf_rule *rule;
879
880 if (rs_num < 0 || rs_num >= PF_RULESET_MAX)
881 return (EINVAL);
882 rs = pf_find_or_create_ruleset(anchor);
883 if (rs == NULL)
884 return (EINVAL);
885 while ((rule = TAILQ_FIRST(rs->rules[rs_num].inactive.ptr)) != NULL)
886 pf_rm_rule(rs->rules[rs_num].inactive.ptr, rule);
887 *ticket = ++rs->rules[rs_num].inactive.ticket;
888 rs->rules[rs_num].inactive.open = 1;
889 return (0);
890 }
891
892 int
893 pf_rollback_rules(u_int32_t ticket, int rs_num, char *anchor)
894 {
895 struct pf_ruleset *rs;
896 struct pf_rule *rule;
897
898 if (rs_num < 0 || rs_num >= PF_RULESET_MAX)
899 return (EINVAL);
900 rs = pf_find_ruleset(anchor);
901 if (rs == NULL || !rs->rules[rs_num].inactive.open ||
902 rs->rules[rs_num].inactive.ticket != ticket)
903 return (0);
904 while ((rule = TAILQ_FIRST(rs->rules[rs_num].inactive.ptr)) != NULL)
905 pf_rm_rule(rs->rules[rs_num].inactive.ptr, rule);
906 rs->rules[rs_num].inactive.open = 0;
907 return (0);
908 }
909
910 int
911 pf_commit_rules(u_int32_t ticket, int rs_num, char *anchor)
912 {
913 struct pf_ruleset *rs;
914 struct pf_rule *rule;
915 struct pf_rulequeue *old_rules;
916 int s;
917
918 if (rs_num < 0 || rs_num >= PF_RULESET_MAX)
919 return (EINVAL);
920 rs = pf_find_ruleset(anchor);
921 if (rs == NULL || !rs->rules[rs_num].inactive.open ||
922 ticket != rs->rules[rs_num].inactive.ticket)
923 return (EBUSY);
924
925 /* Swap rules, keep the old. */
926 s = splsoftnet();
927 old_rules = rs->rules[rs_num].active.ptr;
928 rs->rules[rs_num].active.ptr =
929 rs->rules[rs_num].inactive.ptr;
930 rs->rules[rs_num].inactive.ptr = old_rules;
931 rs->rules[rs_num].active.ticket =
932 rs->rules[rs_num].inactive.ticket;
933 pf_calc_skip_steps(rs->rules[rs_num].active.ptr);
934
935 /* Purge the old rule list. */
936 while ((rule = TAILQ_FIRST(old_rules)) != NULL)
937 pf_rm_rule(old_rules, rule);
938 rs->rules[rs_num].inactive.open = 0;
939 pf_remove_if_empty_ruleset(rs);
940 splx(s);
941 return (0);
942 }
943
944 int
945 pfioctl(dev_t dev, u_long cmd, caddr_t addr, int flags, struct proc *p)
946 {
947 struct pf_pooladdr *pa = NULL;
948 struct pf_pool *pool = NULL;
949 int s;
950 int error = 0;
951
952 /* XXX keep in sync with switch() below */
953 if (securelevel > 1)
954 switch (cmd) {
955 case DIOCGETRULES:
956 case DIOCGETRULE:
957 case DIOCGETADDRS:
958 case DIOCGETADDR:
959 case DIOCGETSTATE:
960 case DIOCSETSTATUSIF:
961 case DIOCGETSTATUS:
962 case DIOCCLRSTATUS:
963 case DIOCNATLOOK:
964 case DIOCSETDEBUG:
965 case DIOCGETSTATES:
966 case DIOCGETTIMEOUT:
967 case DIOCCLRRULECTRS:
968 case DIOCGETLIMIT:
969 case DIOCGETALTQS:
970 case DIOCGETALTQ:
971 case DIOCGETQSTATS:
972 case DIOCGETRULESETS:
973 case DIOCGETRULESET:
974 case DIOCRGETTABLES:
975 case DIOCRGETTSTATS:
976 case DIOCRCLRTSTATS:
977 case DIOCRCLRADDRS:
978 case DIOCRADDADDRS:
979 case DIOCRDELADDRS:
980 case DIOCRSETADDRS:
981 case DIOCRGETADDRS:
982 case DIOCRGETASTATS:
983 case DIOCRCLRASTATS:
984 case DIOCRTSTADDRS:
985 case DIOCOSFPGET:
986 case DIOCGETSRCNODES:
987 case DIOCCLRSRCNODES:
988 case DIOCIGETIFACES:
989 case DIOCICLRISTATS:
990 break;
991 case DIOCRCLRTABLES:
992 case DIOCRADDTABLES:
993 case DIOCRDELTABLES:
994 case DIOCRSETTFLAGS:
995 if (((struct pfioc_table *)addr)->pfrio_flags &
996 PFR_FLAG_DUMMY)
997 break; /* dummy operation ok */
998 return (EPERM);
999 default:
1000 return (EPERM);
1001 }
1002
1003 if (!(flags & FWRITE))
1004 switch (cmd) {
1005 case DIOCGETRULES:
1006 case DIOCGETRULE:
1007 case DIOCGETADDRS:
1008 case DIOCGETADDR:
1009 case DIOCGETSTATE:
1010 case DIOCGETSTATUS:
1011 case DIOCGETSTATES:
1012 case DIOCGETTIMEOUT:
1013 case DIOCGETLIMIT:
1014 case DIOCGETALTQS:
1015 case DIOCGETALTQ:
1016 case DIOCGETQSTATS:
1017 case DIOCGETRULESETS:
1018 case DIOCGETRULESET:
1019 case DIOCRGETTABLES:
1020 case DIOCRGETTSTATS:
1021 case DIOCRGETADDRS:
1022 case DIOCRGETASTATS:
1023 case DIOCRTSTADDRS:
1024 case DIOCOSFPGET:
1025 case DIOCGETSRCNODES:
1026 case DIOCIGETIFACES:
1027 break;
1028 case DIOCRCLRTABLES:
1029 case DIOCRADDTABLES:
1030 case DIOCRDELTABLES:
1031 case DIOCRCLRTSTATS:
1032 case DIOCRCLRADDRS:
1033 case DIOCRADDADDRS:
1034 case DIOCRDELADDRS:
1035 case DIOCRSETADDRS:
1036 case DIOCRSETTFLAGS:
1037 if (((struct pfioc_table *)addr)->pfrio_flags &
1038 PFR_FLAG_DUMMY)
1039 break; /* dummy operation ok */
1040 return (EACCES);
1041 default:
1042 return (EACCES);
1043 }
1044
1045 switch (cmd) {
1046
1047 case DIOCSTART:
1048 if (pf_status.running)
1049 error = EEXIST;
1050 else {
1051 pf_status.running = 1;
1052 pf_status.since = time_second;
1053 if (pf_status.stateid == 0) {
1054 pf_status.stateid = time_second;
1055 pf_status.stateid = pf_status.stateid << 32;
1056 }
1057 DPFPRINTF(PF_DEBUG_MISC, ("pf: started\n"));
1058 }
1059 break;
1060
1061 case DIOCSTOP:
1062 if (!pf_status.running)
1063 error = ENOENT;
1064 else {
1065 pf_status.running = 0;
1066 pf_status.since = time_second;
1067 DPFPRINTF(PF_DEBUG_MISC, ("pf: stopped\n"));
1068 }
1069 break;
1070
1071 case DIOCADDRULE: {
1072 struct pfioc_rule *pr = (struct pfioc_rule *)addr;
1073 struct pf_ruleset *ruleset;
1074 struct pf_rule *rule, *tail;
1075 struct pf_pooladdr *pa;
1076 int rs_num;
1077
1078 pr->anchor[sizeof(pr->anchor) - 1] = 0;
1079 ruleset = pf_find_ruleset(pr->anchor);
1080 if (ruleset == NULL) {
1081 error = EINVAL;
1082 break;
1083 }
1084 rs_num = pf_get_ruleset_number(pr->rule.action);
1085 if (rs_num >= PF_RULESET_MAX) {
1086 error = EINVAL;
1087 break;
1088 }
1089 if (pr->rule.return_icmp >> 8 > ICMP_MAXTYPE) {
1090 error = EINVAL;
1091 break;
1092 }
1093 if (pr->ticket != ruleset->rules[rs_num].inactive.ticket) {
1094 error = EBUSY;
1095 break;
1096 }
1097 if (pr->pool_ticket != ticket_pabuf) {
1098 error = EBUSY;
1099 break;
1100 }
1101 rule = pool_get(&pf_rule_pl, PR_NOWAIT);
1102 if (rule == NULL) {
1103 error = ENOMEM;
1104 break;
1105 }
1106 bcopy(&pr->rule, rule, sizeof(struct pf_rule));
1107 rule->anchor = NULL;
1108 rule->kif = NULL;
1109 TAILQ_INIT(&rule->rpool.list);
1110 /* initialize refcounting */
1111 rule->states = 0;
1112 rule->src_nodes = 0;
1113 rule->entries.tqe_prev = NULL;
1114 #ifndef INET
1115 if (rule->af == AF_INET) {
1116 pool_put(&pf_rule_pl, rule);
1117 error = EAFNOSUPPORT;
1118 break;
1119 }
1120 #endif /* INET */
1121 #ifndef INET6
1122 if (rule->af == AF_INET6) {
1123 pool_put(&pf_rule_pl, rule);
1124 error = EAFNOSUPPORT;
1125 break;
1126 }
1127 #endif /* INET6 */
1128 tail = TAILQ_LAST(ruleset->rules[rs_num].inactive.ptr,
1129 pf_rulequeue);
1130 if (tail)
1131 rule->nr = tail->nr + 1;
1132 else
1133 rule->nr = 0;
1134 if (rule->ifname[0]) {
1135 rule->kif = pfi_attach_rule(rule->ifname);
1136 if (rule->kif == NULL) {
1137 pool_put(&pf_rule_pl, rule);
1138 error = EINVAL;
1139 break;
1140 }
1141 }
1142
1143 #ifdef ALTQ
1144 /* set queue IDs */
1145 if (rule->qname[0] != 0) {
1146 if ((rule->qid = pf_qname2qid(rule->qname)) == 0)
1147 error = EBUSY;
1148 else if (rule->pqname[0] != 0) {
1149 if ((rule->pqid =
1150 pf_qname2qid(rule->pqname)) == 0)
1151 error = EBUSY;
1152 } else
1153 rule->pqid = rule->qid;
1154 }
1155 #endif
1156 if (rule->tagname[0])
1157 if ((rule->tag = pf_tagname2tag(rule->tagname)) == 0)
1158 error = EBUSY;
1159 if (rule->match_tagname[0])
1160 if ((rule->match_tag =
1161 pf_tagname2tag(rule->match_tagname)) == 0)
1162 error = EBUSY;
1163 if (rule->rt && !rule->direction)
1164 error = EINVAL;
1165 if (pfi_dynaddr_setup(&rule->src.addr, rule->af))
1166 error = EINVAL;
1167 if (pfi_dynaddr_setup(&rule->dst.addr, rule->af))
1168 error = EINVAL;
1169 if (pf_tbladdr_setup(ruleset, &rule->src.addr))
1170 error = EINVAL;
1171 if (pf_tbladdr_setup(ruleset, &rule->dst.addr))
1172 error = EINVAL;
1173 if (pf_anchor_setup(rule, ruleset, pr->anchor_call))
1174 error = EINVAL;
1175 TAILQ_FOREACH(pa, &pf_pabuf, entries)
1176 if (pf_tbladdr_setup(ruleset, &pa->addr))
1177 error = EINVAL;
1178
1179 pf_mv_pool(&pf_pabuf, &rule->rpool.list);
1180 if (((((rule->action == PF_NAT) || (rule->action == PF_RDR) ||
1181 (rule->action == PF_BINAT)) && rule->anchor == NULL) ||
1182 (rule->rt > PF_FASTROUTE)) &&
1183 (TAILQ_FIRST(&rule->rpool.list) == NULL))
1184 error = EINVAL;
1185
1186 if (error) {
1187 pf_rm_rule(NULL, rule);
1188 break;
1189 }
1190 rule->rpool.cur = TAILQ_FIRST(&rule->rpool.list);
1191 rule->evaluations = rule->packets = rule->bytes = 0;
1192 TAILQ_INSERT_TAIL(ruleset->rules[rs_num].inactive.ptr,
1193 rule, entries);
1194 break;
1195 }
1196
1197 case DIOCGETRULES: {
1198 struct pfioc_rule *pr = (struct pfioc_rule *)addr;
1199 struct pf_ruleset *ruleset;
1200 struct pf_rule *tail;
1201 int rs_num;
1202
1203 pr->anchor[sizeof(pr->anchor) - 1] = 0;
1204 ruleset = pf_find_ruleset(pr->anchor);
1205 if (ruleset == NULL) {
1206 error = EINVAL;
1207 break;
1208 }
1209 rs_num = pf_get_ruleset_number(pr->rule.action);
1210 if (rs_num >= PF_RULESET_MAX) {
1211 error = EINVAL;
1212 break;
1213 }
1214 s = splsoftnet();
1215 tail = TAILQ_LAST(ruleset->rules[rs_num].active.ptr,
1216 pf_rulequeue);
1217 if (tail)
1218 pr->nr = tail->nr + 1;
1219 else
1220 pr->nr = 0;
1221 pr->ticket = ruleset->rules[rs_num].active.ticket;
1222 splx(s);
1223 break;
1224 }
1225
1226 case DIOCGETRULE: {
1227 struct pfioc_rule *pr = (struct pfioc_rule *)addr;
1228 struct pf_ruleset *ruleset;
1229 struct pf_rule *rule;
1230 int rs_num, i;
1231
1232 pr->anchor[sizeof(pr->anchor) - 1] = 0;
1233 ruleset = pf_find_ruleset(pr->anchor);
1234 if (ruleset == NULL) {
1235 error = EINVAL;
1236 break;
1237 }
1238 rs_num = pf_get_ruleset_number(pr->rule.action);
1239 if (rs_num >= PF_RULESET_MAX) {
1240 error = EINVAL;
1241 break;
1242 }
1243 if (pr->ticket != ruleset->rules[rs_num].active.ticket) {
1244 error = EBUSY;
1245 break;
1246 }
1247 s = splsoftnet();
1248 rule = TAILQ_FIRST(ruleset->rules[rs_num].active.ptr);
1249 while ((rule != NULL) && (rule->nr != pr->nr))
1250 rule = TAILQ_NEXT(rule, entries);
1251 if (rule == NULL) {
1252 error = EBUSY;
1253 splx(s);
1254 break;
1255 }
1256 bcopy(rule, &pr->rule, sizeof(struct pf_rule));
1257 if (pf_anchor_copyout(ruleset, rule, pr)) {
1258 error = EBUSY;
1259 splx(s);
1260 break;
1261 }
1262 pfi_dynaddr_copyout(&pr->rule.src.addr);
1263 pfi_dynaddr_copyout(&pr->rule.dst.addr);
1264 pf_tbladdr_copyout(&pr->rule.src.addr);
1265 pf_tbladdr_copyout(&pr->rule.dst.addr);
1266 for (i = 0; i < PF_SKIP_COUNT; ++i)
1267 if (rule->skip[i].ptr == NULL)
1268 pr->rule.skip[i].nr = -1;
1269 else
1270 pr->rule.skip[i].nr =
1271 rule->skip[i].ptr->nr;
1272 splx(s);
1273 break;
1274 }
1275
1276 case DIOCCHANGERULE: {
1277 struct pfioc_rule *pcr = (struct pfioc_rule *)addr;
1278 struct pf_ruleset *ruleset;
1279 struct pf_rule *oldrule = NULL, *newrule = NULL;
1280 u_int32_t nr = 0;
1281 int rs_num;
1282
1283 if (!(pcr->action == PF_CHANGE_REMOVE ||
1284 pcr->action == PF_CHANGE_GET_TICKET) &&
1285 pcr->pool_ticket != ticket_pabuf) {
1286 error = EBUSY;
1287 break;
1288 }
1289
1290 if (pcr->action < PF_CHANGE_ADD_HEAD ||
1291 pcr->action > PF_CHANGE_GET_TICKET) {
1292 error = EINVAL;
1293 break;
1294 }
1295 ruleset = pf_find_ruleset(pcr->anchor);
1296 if (ruleset == NULL) {
1297 error = EINVAL;
1298 break;
1299 }
1300 rs_num = pf_get_ruleset_number(pcr->rule.action);
1301 if (rs_num >= PF_RULESET_MAX) {
1302 error = EINVAL;
1303 break;
1304 }
1305
1306 if (pcr->action == PF_CHANGE_GET_TICKET) {
1307 pcr->ticket = ++ruleset->rules[rs_num].active.ticket;
1308 break;
1309 } else {
1310 if (pcr->ticket !=
1311 ruleset->rules[rs_num].active.ticket) {
1312 error = EINVAL;
1313 break;
1314 }
1315 if (pcr->rule.return_icmp >> 8 > ICMP_MAXTYPE) {
1316 error = EINVAL;
1317 break;
1318 }
1319 }
1320
1321 if (pcr->action != PF_CHANGE_REMOVE) {
1322 newrule = pool_get(&pf_rule_pl, PR_NOWAIT);
1323 if (newrule == NULL) {
1324 error = ENOMEM;
1325 break;
1326 }
1327 bcopy(&pcr->rule, newrule, sizeof(struct pf_rule));
1328 TAILQ_INIT(&newrule->rpool.list);
1329 /* initialize refcounting */
1330 newrule->states = 0;
1331 newrule->entries.tqe_prev = NULL;
1332 #ifndef INET
1333 if (newrule->af == AF_INET) {
1334 pool_put(&pf_rule_pl, newrule);
1335 error = EAFNOSUPPORT;
1336 break;
1337 }
1338 #endif /* INET */
1339 #ifndef INET6
1340 if (newrule->af == AF_INET6) {
1341 pool_put(&pf_rule_pl, newrule);
1342 error = EAFNOSUPPORT;
1343 break;
1344 }
1345 #endif /* INET6 */
1346 if (newrule->ifname[0]) {
1347 newrule->kif = pfi_attach_rule(newrule->ifname);
1348 if (newrule->kif == NULL) {
1349 pool_put(&pf_rule_pl, newrule);
1350 error = EINVAL;
1351 break;
1352 }
1353 } else
1354 newrule->kif = NULL;
1355
1356 #ifdef ALTQ
1357 /* set queue IDs */
1358 if (newrule->qname[0] != 0) {
1359 if ((newrule->qid =
1360 pf_qname2qid(newrule->qname)) == 0)
1361 error = EBUSY;
1362 else if (newrule->pqname[0] != 0) {
1363 if ((newrule->pqid =
1364 pf_qname2qid(newrule->pqname)) == 0)
1365 error = EBUSY;
1366 } else
1367 newrule->pqid = newrule->qid;
1368 }
1369 #endif /* ALTQ */
1370 if (newrule->tagname[0])
1371 if ((newrule->tag =
1372 pf_tagname2tag(newrule->tagname)) == 0)
1373 error = EBUSY;
1374 if (newrule->match_tagname[0])
1375 if ((newrule->match_tag = pf_tagname2tag(
1376 newrule->match_tagname)) == 0)
1377 error = EBUSY;
1378
1379 if (newrule->rt && !newrule->direction)
1380 error = EINVAL;
1381 if (pfi_dynaddr_setup(&newrule->src.addr, newrule->af))
1382 error = EINVAL;
1383 if (pfi_dynaddr_setup(&newrule->dst.addr, newrule->af))
1384 error = EINVAL;
1385 if (pf_tbladdr_setup(ruleset, &newrule->src.addr))
1386 error = EINVAL;
1387 if (pf_tbladdr_setup(ruleset, &newrule->dst.addr))
1388 error = EINVAL;
1389 if (pf_anchor_setup(newrule, ruleset, pcr->anchor_call))
1390 error = EINVAL;
1391
1392 pf_mv_pool(&pf_pabuf, &newrule->rpool.list);
1393 if (((((newrule->action == PF_NAT) ||
1394 (newrule->action == PF_RDR) ||
1395 (newrule->action == PF_BINAT) ||
1396 (newrule->rt > PF_FASTROUTE)) &&
1397 !pcr->anchor[0])) &&
1398 (TAILQ_FIRST(&newrule->rpool.list) == NULL))
1399 error = EINVAL;
1400
1401 if (error) {
1402 pf_rm_rule(NULL, newrule);
1403 break;
1404 }
1405 newrule->rpool.cur = TAILQ_FIRST(&newrule->rpool.list);
1406 newrule->evaluations = newrule->packets = 0;
1407 newrule->bytes = 0;
1408 }
1409 pf_empty_pool(&pf_pabuf);
1410
1411 s = splsoftnet();
1412
1413 if (pcr->action == PF_CHANGE_ADD_HEAD)
1414 oldrule = TAILQ_FIRST(
1415 ruleset->rules[rs_num].active.ptr);
1416 else if (pcr->action == PF_CHANGE_ADD_TAIL)
1417 oldrule = TAILQ_LAST(
1418 ruleset->rules[rs_num].active.ptr, pf_rulequeue);
1419 else {
1420 oldrule = TAILQ_FIRST(
1421 ruleset->rules[rs_num].active.ptr);
1422 while ((oldrule != NULL) && (oldrule->nr != pcr->nr))
1423 oldrule = TAILQ_NEXT(oldrule, entries);
1424 if (oldrule == NULL) {
1425 if (newrule != NULL)
1426 pf_rm_rule(NULL, newrule);
1427 error = EINVAL;
1428 splx(s);
1429 break;
1430 }
1431 }
1432
1433 if (pcr->action == PF_CHANGE_REMOVE)
1434 pf_rm_rule(ruleset->rules[rs_num].active.ptr, oldrule);
1435 else {
1436 if (oldrule == NULL)
1437 TAILQ_INSERT_TAIL(
1438 ruleset->rules[rs_num].active.ptr,
1439 newrule, entries);
1440 else if (pcr->action == PF_CHANGE_ADD_HEAD ||
1441 pcr->action == PF_CHANGE_ADD_BEFORE)
1442 TAILQ_INSERT_BEFORE(oldrule, newrule, entries);
1443 else
1444 TAILQ_INSERT_AFTER(
1445 ruleset->rules[rs_num].active.ptr,
1446 oldrule, newrule, entries);
1447 }
1448
1449 nr = 0;
1450 TAILQ_FOREACH(oldrule,
1451 ruleset->rules[rs_num].active.ptr, entries)
1452 oldrule->nr = nr++;
1453
1454 ruleset->rules[rs_num].active.ticket++;
1455
1456 pf_calc_skip_steps(ruleset->rules[rs_num].active.ptr);
1457 pf_remove_if_empty_ruleset(ruleset);
1458
1459 splx(s);
1460 break;
1461 }
1462
1463 case DIOCCLRSTATES: {
1464 struct pf_state *state;
1465 struct pfioc_state_kill *psk = (struct pfioc_state_kill *)addr;
1466 int killed = 0;
1467
1468 s = splsoftnet();
1469 RB_FOREACH(state, pf_state_tree_id, &tree_id) {
1470 if (!psk->psk_ifname[0] || !strcmp(psk->psk_ifname,
1471 state->u.s.kif->pfik_name)) {
1472 state->timeout = PFTM_PURGE;
1473 #if NPFSYNC
1474 /* don't send out individual delete messages */
1475 state->sync_flags = PFSTATE_NOSYNC;
1476 #endif
1477 killed++;
1478 }
1479 }
1480 pf_purge_expired_states();
1481 pf_status.states = 0;
1482 psk->psk_af = killed;
1483 #if NPFSYNC
1484 pfsync_clear_states(pf_status.hostid, psk->psk_ifname);
1485 #endif
1486 splx(s);
1487 break;
1488 }
1489
1490 case DIOCKILLSTATES: {
1491 struct pf_state *state;
1492 struct pfioc_state_kill *psk = (struct pfioc_state_kill *)addr;
1493 int killed = 0;
1494
1495 s = splsoftnet();
1496 RB_FOREACH(state, pf_state_tree_id, &tree_id) {
1497 if ((!psk->psk_af || state->af == psk->psk_af)
1498 && (!psk->psk_proto || psk->psk_proto ==
1499 state->proto) &&
1500 PF_MATCHA(psk->psk_src.neg,
1501 &psk->psk_src.addr.v.a.addr,
1502 &psk->psk_src.addr.v.a.mask,
1503 &state->lan.addr, state->af) &&
1504 PF_MATCHA(psk->psk_dst.neg,
1505 &psk->psk_dst.addr.v.a.addr,
1506 &psk->psk_dst.addr.v.a.mask,
1507 &state->ext.addr, state->af) &&
1508 (psk->psk_src.port_op == 0 ||
1509 pf_match_port(psk->psk_src.port_op,
1510 psk->psk_src.port[0], psk->psk_src.port[1],
1511 state->lan.port)) &&
1512 (psk->psk_dst.port_op == 0 ||
1513 pf_match_port(psk->psk_dst.port_op,
1514 psk->psk_dst.port[0], psk->psk_dst.port[1],
1515 state->ext.port)) &&
1516 (!psk->psk_ifname[0] || !strcmp(psk->psk_ifname,
1517 state->u.s.kif->pfik_name))) {
1518 state->timeout = PFTM_PURGE;
1519 killed++;
1520 }
1521 }
1522 pf_purge_expired_states();
1523 splx(s);
1524 psk->psk_af = killed;
1525 break;
1526 }
1527
1528 case DIOCADDSTATE: {
1529 struct pfioc_state *ps = (struct pfioc_state *)addr;
1530 struct pf_state *state;
1531 struct pfi_kif *kif;
1532
1533 if (ps->state.timeout >= PFTM_MAX &&
1534 ps->state.timeout != PFTM_UNTIL_PACKET) {
1535 error = EINVAL;
1536 break;
1537 }
1538 state = pool_get(&pf_state_pl, PR_NOWAIT);
1539 if (state == NULL) {
1540 error = ENOMEM;
1541 break;
1542 }
1543 s = splsoftnet();
1544 kif = pfi_lookup_create(ps->state.u.ifname);
1545 if (kif == NULL) {
1546 pool_put(&pf_state_pl, state);
1547 error = ENOENT;
1548 splx(s);
1549 break;
1550 }
1551 bcopy(&ps->state, state, sizeof(struct pf_state));
1552 bzero(&state->u, sizeof(state->u));
1553 state->rule.ptr = &pf_default_rule;
1554 state->nat_rule.ptr = NULL;
1555 state->anchor.ptr = NULL;
1556 state->rt_kif = NULL;
1557 state->creation = time_second;
1558 state->pfsync_time = 0;
1559 state->packets[0] = state->packets[1] = 0;
1560 state->bytes[0] = state->bytes[1] = 0;
1561
1562 if (pf_insert_state(kif, state)) {
1563 pfi_maybe_destroy(kif);
1564 pool_put(&pf_state_pl, state);
1565 error = ENOMEM;
1566 }
1567 splx(s);
1568 break;
1569 }
1570
1571 case DIOCGETSTATE: {
1572 struct pfioc_state *ps = (struct pfioc_state *)addr;
1573 struct pf_state *state;
1574 u_int32_t nr;
1575
1576 nr = 0;
1577 s = splsoftnet();
1578 RB_FOREACH(state, pf_state_tree_id, &tree_id) {
1579 if (nr >= ps->nr)
1580 break;
1581 nr++;
1582 }
1583 if (state == NULL) {
1584 error = EBUSY;
1585 splx(s);
1586 break;
1587 }
1588 bcopy(state, &ps->state, sizeof(struct pf_state));
1589 ps->state.rule.nr = state->rule.ptr->nr;
1590 ps->state.nat_rule.nr = (state->nat_rule.ptr == NULL) ?
1591 -1 : state->nat_rule.ptr->nr;
1592 ps->state.anchor.nr = (state->anchor.ptr == NULL) ?
1593 -1 : state->anchor.ptr->nr;
1594 splx(s);
1595 ps->state.expire = pf_state_expires(state);
1596 if (ps->state.expire > time_second)
1597 ps->state.expire -= time_second;
1598 else
1599 ps->state.expire = 0;
1600 break;
1601 }
1602
1603 case DIOCGETSTATES: {
1604 struct pfioc_states *ps = (struct pfioc_states *)addr;
1605 struct pf_state *state;
1606 struct pf_state *p, pstore;
1607 struct pfi_kif *kif;
1608 u_int32_t nr = 0;
1609 int space = ps->ps_len;
1610
1611 if (space == 0) {
1612 s = splsoftnet();
1613 TAILQ_FOREACH(kif, &pfi_statehead, pfik_w_states)
1614 nr += kif->pfik_states;
1615 splx(s);
1616 ps->ps_len = sizeof(struct pf_state) * nr;
1617 return (0);
1618 }
1619
1620 s = splsoftnet();
1621 p = ps->ps_states;
1622 TAILQ_FOREACH(kif, &pfi_statehead, pfik_w_states)
1623 RB_FOREACH(state, pf_state_tree_ext_gwy,
1624 &kif->pfik_ext_gwy) {
1625 int secs = time_second;
1626
1627 if ((nr+1) * sizeof(*p) > (unsigned)ps->ps_len)
1628 break;
1629
1630 bcopy(state, &pstore, sizeof(pstore));
1631 strlcpy(pstore.u.ifname, kif->pfik_name,
1632 sizeof(pstore.u.ifname));
1633 pstore.rule.nr = state->rule.ptr->nr;
1634 pstore.nat_rule.nr = (state->nat_rule.ptr ==
1635 NULL) ? -1 : state->nat_rule.ptr->nr;
1636 pstore.anchor.nr = (state->anchor.ptr ==
1637 NULL) ? -1 : state->anchor.ptr->nr;
1638 pstore.creation = secs - pstore.creation;
1639 pstore.expire = pf_state_expires(state);
1640 if (pstore.expire > secs)
1641 pstore.expire -= secs;
1642 else
1643 pstore.expire = 0;
1644 error = copyout(&pstore, p, sizeof(*p));
1645 if (error) {
1646 splx(s);
1647 goto fail;
1648 }
1649 p++;
1650 nr++;
1651 }
1652 ps->ps_len = sizeof(struct pf_state) * nr;
1653 splx(s);
1654 break;
1655 }
1656
1657 case DIOCGETSTATUS: {
1658 struct pf_status *s = (struct pf_status *)addr;
1659 bcopy(&pf_status, s, sizeof(struct pf_status));
1660 pfi_fill_oldstatus(s);
1661 break;
1662 }
1663
1664 case DIOCSETSTATUSIF: {
1665 struct pfioc_if *pi = (struct pfioc_if *)addr;
1666
1667 if (pi->ifname[0] == 0) {
1668 bzero(pf_status.ifname, IFNAMSIZ);
1669 break;
1670 }
1671 if (ifunit(pi->ifname) == NULL) {
1672 error = EINVAL;
1673 break;
1674 }
1675 strlcpy(pf_status.ifname, pi->ifname, IFNAMSIZ);
1676 break;
1677 }
1678
1679 case DIOCCLRSTATUS: {
1680 bzero(pf_status.counters, sizeof(pf_status.counters));
1681 bzero(pf_status.fcounters, sizeof(pf_status.fcounters));
1682 bzero(pf_status.scounters, sizeof(pf_status.scounters));
1683 if (*pf_status.ifname)
1684 pfi_clr_istats(pf_status.ifname, NULL,
1685 PFI_FLAG_INSTANCE);
1686 break;
1687 }
1688
1689 case DIOCNATLOOK: {
1690 struct pfioc_natlook *pnl = (struct pfioc_natlook *)addr;
1691 struct pf_state *state;
1692 struct pf_state key;
1693 int m = 0, direction = pnl->direction;
1694
1695 key.af = pnl->af;
1696 key.proto = pnl->proto;
1697
1698 if (!pnl->proto ||
1699 PF_AZERO(&pnl->saddr, pnl->af) ||
1700 PF_AZERO(&pnl->daddr, pnl->af) ||
1701 !pnl->dport || !pnl->sport)
1702 error = EINVAL;
1703 else {
1704 s = splsoftnet();
1705
1706 /*
1707 * userland gives us source and dest of connection,
1708 * reverse the lookup so we ask for what happens with
1709 * the return traffic, enabling us to find it in the
1710 * state tree.
1711 */
1712 if (direction == PF_IN) {
1713 PF_ACPY(&key.ext.addr, &pnl->daddr, pnl->af);
1714 key.ext.port = pnl->dport;
1715 PF_ACPY(&key.gwy.addr, &pnl->saddr, pnl->af);
1716 key.gwy.port = pnl->sport;
1717 state = pf_find_state_all(&key, PF_EXT_GWY, &m);
1718 } else {
1719 PF_ACPY(&key.lan.addr, &pnl->daddr, pnl->af);
1720 key.lan.port = pnl->dport;
1721 PF_ACPY(&key.ext.addr, &pnl->saddr, pnl->af);
1722 key.ext.port = pnl->sport;
1723 state = pf_find_state_all(&key, PF_LAN_EXT, &m);
1724 }
1725 if (m > 1)
1726 error = E2BIG; /* more than one state */
1727 else if (state != NULL) {
1728 if (direction == PF_IN) {
1729 PF_ACPY(&pnl->rsaddr, &state->lan.addr,
1730 state->af);
1731 pnl->rsport = state->lan.port;
1732 PF_ACPY(&pnl->rdaddr, &pnl->daddr,
1733 pnl->af);
1734 pnl->rdport = pnl->dport;
1735 } else {
1736 PF_ACPY(&pnl->rdaddr, &state->gwy.addr,
1737 state->af);
1738 pnl->rdport = state->gwy.port;
1739 PF_ACPY(&pnl->rsaddr, &pnl->saddr,
1740 pnl->af);
1741 pnl->rsport = pnl->sport;
1742 }
1743 } else
1744 error = ENOENT;
1745 splx(s);
1746 }
1747 break;
1748 }
1749
1750 case DIOCSETTIMEOUT: {
1751 struct pfioc_tm *pt = (struct pfioc_tm *)addr;
1752 int old;
1753
1754 if (pt->timeout < 0 || pt->timeout >= PFTM_MAX ||
1755 pt->seconds < 0) {
1756 error = EINVAL;
1757 goto fail;
1758 }
1759 old = pf_default_rule.timeout[pt->timeout];
1760 pf_default_rule.timeout[pt->timeout] = pt->seconds;
1761 pt->seconds = old;
1762 break;
1763 }
1764
1765 case DIOCGETTIMEOUT: {
1766 struct pfioc_tm *pt = (struct pfioc_tm *)addr;
1767
1768 if (pt->timeout < 0 || pt->timeout >= PFTM_MAX) {
1769 error = EINVAL;
1770 goto fail;
1771 }
1772 pt->seconds = pf_default_rule.timeout[pt->timeout];
1773 break;
1774 }
1775
1776 case DIOCGETLIMIT: {
1777 struct pfioc_limit *pl = (struct pfioc_limit *)addr;
1778
1779 if (pl->index < 0 || pl->index >= PF_LIMIT_MAX) {
1780 error = EINVAL;
1781 goto fail;
1782 }
1783 pl->limit = pf_pool_limits[pl->index].limit;
1784 break;
1785 }
1786
1787 case DIOCSETLIMIT: {
1788 struct pfioc_limit *pl = (struct pfioc_limit *)addr;
1789 int old_limit;
1790
1791 if (pl->index < 0 || pl->index >= PF_LIMIT_MAX ||
1792 pf_pool_limits[pl->index].pp == NULL) {
1793 error = EINVAL;
1794 goto fail;
1795 }
1796 if (pool_sethardlimit(pf_pool_limits[pl->index].pp,
1797 pl->limit, NULL, 0) != 0) {
1798 error = EBUSY;
1799 goto fail;
1800 }
1801 old_limit = pf_pool_limits[pl->index].limit;
1802 pf_pool_limits[pl->index].limit = pl->limit;
1803 pl->limit = old_limit;
1804 break;
1805 }
1806
1807 case DIOCSETDEBUG: {
1808 u_int32_t *level = (u_int32_t *)addr;
1809
1810 pf_status.debug = *level;
1811 break;
1812 }
1813
1814 case DIOCCLRRULECTRS: {
1815 struct pf_ruleset *ruleset = &pf_main_ruleset;
1816 struct pf_rule *rule;
1817
1818 s = splsoftnet();
1819 TAILQ_FOREACH(rule,
1820 ruleset->rules[PF_RULESET_FILTER].active.ptr, entries)
1821 rule->evaluations = rule->packets =
1822 rule->bytes = 0;
1823 splx(s);
1824 break;
1825 }
1826
1827 #ifdef ALTQ
1828 case DIOCSTARTALTQ: {
1829 struct pf_altq *altq;
1830
1831 /* enable all altq interfaces on active list */
1832 s = splsoftnet();
1833 TAILQ_FOREACH(altq, pf_altqs_active, entries) {
1834 if (altq->qname[0] == 0) {
1835 error = pf_enable_altq(altq);
1836 if (error != 0)
1837 break;
1838 }
1839 }
1840 if (error == 0)
1841 pf_altq_running = 1;
1842 splx(s);
1843 DPFPRINTF(PF_DEBUG_MISC, ("altq: started\n"));
1844 break;
1845 }
1846
1847 case DIOCSTOPALTQ: {
1848 struct pf_altq *altq;
1849
1850 /* disable all altq interfaces on active list */
1851 s = splsoftnet();
1852 TAILQ_FOREACH(altq, pf_altqs_active, entries) {
1853 if (altq->qname[0] == 0) {
1854 error = pf_disable_altq(altq);
1855 if (error != 0)
1856 break;
1857 }
1858 }
1859 if (error == 0)
1860 pf_altq_running = 0;
1861 splx(s);
1862 DPFPRINTF(PF_DEBUG_MISC, ("altq: stopped\n"));
1863 break;
1864 }
1865
1866 case DIOCADDALTQ: {
1867 struct pfioc_altq *pa = (struct pfioc_altq *)addr;
1868 struct pf_altq *altq, *a;
1869
1870 if (pa->ticket != ticket_altqs_inactive) {
1871 error = EBUSY;
1872 break;
1873 }
1874 altq = pool_get(&pf_altq_pl, PR_NOWAIT);
1875 if (altq == NULL) {
1876 error = ENOMEM;
1877 break;
1878 }
1879 bcopy(&pa->altq, altq, sizeof(struct pf_altq));
1880
1881 /*
1882 * if this is for a queue, find the discipline and
1883 * copy the necessary fields
1884 */
1885 if (altq->qname[0] != 0) {
1886 if ((altq->qid = pf_qname2qid(altq->qname)) == 0) {
1887 error = EBUSY;
1888 pool_put(&pf_altq_pl, altq);
1889 break;
1890 }
1891 TAILQ_FOREACH(a, pf_altqs_inactive, entries) {
1892 if (strncmp(a->ifname, altq->ifname,
1893 IFNAMSIZ) == 0 && a->qname[0] == 0) {
1894 altq->altq_disc = a->altq_disc;
1895 break;
1896 }
1897 }
1898 }
1899
1900 error = altq_add(altq);
1901 if (error) {
1902 pool_put(&pf_altq_pl, altq);
1903 break;
1904 }
1905
1906 TAILQ_INSERT_TAIL(pf_altqs_inactive, altq, entries);
1907 bcopy(altq, &pa->altq, sizeof(struct pf_altq));
1908 break;
1909 }
1910
1911 case DIOCGETALTQS: {
1912 struct pfioc_altq *pa = (struct pfioc_altq *)addr;
1913 struct pf_altq *altq;
1914
1915 pa->nr = 0;
1916 s = splsoftnet();
1917 TAILQ_FOREACH(altq, pf_altqs_active, entries)
1918 pa->nr++;
1919 pa->ticket = ticket_altqs_active;
1920 splx(s);
1921 break;
1922 }
1923
1924 case DIOCGETALTQ: {
1925 struct pfioc_altq *pa = (struct pfioc_altq *)addr;
1926 struct pf_altq *altq;
1927 u_int32_t nr;
1928
1929 if (pa->ticket != ticket_altqs_active) {
1930 error = EBUSY;
1931 break;
1932 }
1933 nr = 0;
1934 s = splsoftnet();
1935 altq = TAILQ_FIRST(pf_altqs_active);
1936 while ((altq != NULL) && (nr < pa->nr)) {
1937 altq = TAILQ_NEXT(altq, entries);
1938 nr++;
1939 }
1940 if (altq == NULL) {
1941 error = EBUSY;
1942 splx(s);
1943 break;
1944 }
1945 bcopy(altq, &pa->altq, sizeof(struct pf_altq));
1946 splx(s);
1947 break;
1948 }
1949
1950 case DIOCCHANGEALTQ:
1951 /* CHANGEALTQ not supported yet! */
1952 error = ENODEV;
1953 break;
1954
1955 case DIOCGETQSTATS: {
1956 struct pfioc_qstats *pq = (struct pfioc_qstats *)addr;
1957 struct pf_altq *altq;
1958 u_int32_t nr;
1959 int nbytes;
1960
1961 if (pq->ticket != ticket_altqs_active) {
1962 error = EBUSY;
1963 break;
1964 }
1965 nbytes = pq->nbytes;
1966 nr = 0;
1967 s = splsoftnet();
1968 altq = TAILQ_FIRST(pf_altqs_active);
1969 while ((altq != NULL) && (nr < pq->nr)) {
1970 altq = TAILQ_NEXT(altq, entries);
1971 nr++;
1972 }
1973 if (altq == NULL) {
1974 error = EBUSY;
1975 splx(s);
1976 break;
1977 }
1978 error = altq_getqstats(altq, pq->buf, &nbytes);
1979 splx(s);
1980 if (error == 0) {
1981 pq->scheduler = altq->scheduler;
1982 pq->nbytes = nbytes;
1983 }
1984 break;
1985 }
1986 #endif /* ALTQ */
1987
1988 case DIOCBEGINADDRS: {
1989 struct pfioc_pooladdr *pp = (struct pfioc_pooladdr *)addr;
1990
1991 pf_empty_pool(&pf_pabuf);
1992 pp->ticket = ++ticket_pabuf;
1993 break;
1994 }
1995
1996 case DIOCADDADDR: {
1997 struct pfioc_pooladdr *pp = (struct pfioc_pooladdr *)addr;
1998
1999 #ifndef INET
2000 if (pp->af == AF_INET) {
2001 error = EAFNOSUPPORT;
2002 break;
2003 }
2004 #endif /* INET */
2005 #ifndef INET6
2006 if (pp->af == AF_INET6) {
2007 error = EAFNOSUPPORT;
2008 break;
2009 }
2010 #endif /* INET6 */
2011 if (pp->addr.addr.type != PF_ADDR_ADDRMASK &&
2012 pp->addr.addr.type != PF_ADDR_DYNIFTL &&
2013 pp->addr.addr.type != PF_ADDR_TABLE) {
2014 error = EINVAL;
2015 break;
2016 }
2017 pa = pool_get(&pf_pooladdr_pl, PR_NOWAIT);
2018 if (pa == NULL) {
2019 error = ENOMEM;
2020 break;
2021 }
2022 bcopy(&pp->addr, pa, sizeof(struct pf_pooladdr));
2023 if (pa->ifname[0]) {
2024 pa->kif = pfi_attach_rule(pa->ifname);
2025 if (pa->kif == NULL) {
2026 pool_put(&pf_pooladdr_pl, pa);
2027 error = EINVAL;
2028 break;
2029 }
2030 }
2031 if (pfi_dynaddr_setup(&pa->addr, pp->af)) {
2032 pfi_dynaddr_remove(&pa->addr);
2033 pfi_detach_rule(pa->kif);
2034 pool_put(&pf_pooladdr_pl, pa);
2035 error = EINVAL;
2036 break;
2037 }
2038 TAILQ_INSERT_TAIL(&pf_pabuf, pa, entries);
2039 break;
2040 }
2041
2042 case DIOCGETADDRS: {
2043 struct pfioc_pooladdr *pp = (struct pfioc_pooladdr *)addr;
2044
2045 pp->nr = 0;
2046 s = splsoftnet();
2047 pool = pf_get_pool(pp->anchor, pp->ticket, pp->r_action,
2048 pp->r_num, 0, 1, 0);
2049 if (pool == NULL) {
2050 error = EBUSY;
2051 splx(s);
2052 break;
2053 }
2054 TAILQ_FOREACH(pa, &pool->list, entries)
2055 pp->nr++;
2056 splx(s);
2057 break;
2058 }
2059
2060 case DIOCGETADDR: {
2061 struct pfioc_pooladdr *pp = (struct pfioc_pooladdr *)addr;
2062 u_int32_t nr = 0;
2063
2064 s = splsoftnet();
2065 pool = pf_get_pool(pp->anchor, pp->ticket, pp->r_action,
2066 pp->r_num, 0, 1, 1);
2067 if (pool == NULL) {
2068 error = EBUSY;
2069 splx(s);
2070 break;
2071 }
2072 pa = TAILQ_FIRST(&pool->list);
2073 while ((pa != NULL) && (nr < pp->nr)) {
2074 pa = TAILQ_NEXT(pa, entries);
2075 nr++;
2076 }
2077 if (pa == NULL) {
2078 error = EBUSY;
2079 splx(s);
2080 break;
2081 }
2082 bcopy(pa, &pp->addr, sizeof(struct pf_pooladdr));
2083 pfi_dynaddr_copyout(&pp->addr.addr);
2084 pf_tbladdr_copyout(&pp->addr.addr);
2085 splx(s);
2086 break;
2087 }
2088
2089 case DIOCCHANGEADDR: {
2090 struct pfioc_pooladdr *pca = (struct pfioc_pooladdr *)addr;
2091 struct pf_pooladdr *oldpa = NULL, *newpa = NULL;
2092 struct pf_ruleset *ruleset;
2093
2094 if (pca->action < PF_CHANGE_ADD_HEAD ||
2095 pca->action > PF_CHANGE_REMOVE) {
2096 error = EINVAL;
2097 break;
2098 }
2099 if (pca->addr.addr.type != PF_ADDR_ADDRMASK &&
2100 pca->addr.addr.type != PF_ADDR_DYNIFTL &&
2101 pca->addr.addr.type != PF_ADDR_TABLE) {
2102 error = EINVAL;
2103 break;
2104 }
2105
2106 ruleset = pf_find_ruleset(pca->anchor);
2107 if (ruleset == NULL) {
2108 error = EBUSY;
2109 break;
2110 }
2111 pool = pf_get_pool(pca->anchor, pca->ticket, pca->r_action,
2112 pca->r_num, pca->r_last, 1, 1);
2113 if (pool == NULL) {
2114 error = EBUSY;
2115 break;
2116 }
2117 if (pca->action != PF_CHANGE_REMOVE) {
2118 newpa = pool_get(&pf_pooladdr_pl, PR_NOWAIT);
2119 if (newpa == NULL) {
2120 error = ENOMEM;
2121 break;
2122 }
2123 bcopy(&pca->addr, newpa, sizeof(struct pf_pooladdr));
2124 #ifndef INET
2125 if (pca->af == AF_INET) {
2126 pool_put(&pf_pooladdr_pl, newpa);
2127 error = EAFNOSUPPORT;
2128 break;
2129 }
2130 #endif /* INET */
2131 #ifndef INET6
2132 if (pca->af == AF_INET6) {
2133 pool_put(&pf_pooladdr_pl, newpa);
2134 error = EAFNOSUPPORT;
2135 break;
2136 }
2137 #endif /* INET6 */
2138 if (newpa->ifname[0]) {
2139 newpa->kif = pfi_attach_rule(newpa->ifname);
2140 if (newpa->kif == NULL) {
2141 pool_put(&pf_pooladdr_pl, newpa);
2142 error = EINVAL;
2143 break;
2144 }
2145 } else
2146 newpa->kif = NULL;
2147 if (pfi_dynaddr_setup(&newpa->addr, pca->af) ||
2148 pf_tbladdr_setup(ruleset, &newpa->addr)) {
2149 pfi_dynaddr_remove(&newpa->addr);
2150 pfi_detach_rule(newpa->kif);
2151 pool_put(&pf_pooladdr_pl, newpa);
2152 error = EINVAL;
2153 break;
2154 }
2155 }
2156
2157 s = splsoftnet();
2158
2159 if (pca->action == PF_CHANGE_ADD_HEAD)
2160 oldpa = TAILQ_FIRST(&pool->list);
2161 else if (pca->action == PF_CHANGE_ADD_TAIL)
2162 oldpa = TAILQ_LAST(&pool->list, pf_palist);
2163 else {
2164 int i = 0;
2165
2166 oldpa = TAILQ_FIRST(&pool->list);
2167 while ((oldpa != NULL) && (i < pca->nr)) {
2168 oldpa = TAILQ_NEXT(oldpa, entries);
2169 i++;
2170 }
2171 if (oldpa == NULL) {
2172 error = EINVAL;
2173 splx(s);
2174 break;
2175 }
2176 }
2177
2178 if (pca->action == PF_CHANGE_REMOVE) {
2179 TAILQ_REMOVE(&pool->list, oldpa, entries);
2180 pfi_dynaddr_remove(&oldpa->addr);
2181 pf_tbladdr_remove(&oldpa->addr);
2182 pfi_detach_rule(oldpa->kif);
2183 pool_put(&pf_pooladdr_pl, oldpa);
2184 } else {
2185 if (oldpa == NULL)
2186 TAILQ_INSERT_TAIL(&pool->list, newpa, entries);
2187 else if (pca->action == PF_CHANGE_ADD_HEAD ||
2188 pca->action == PF_CHANGE_ADD_BEFORE)
2189 TAILQ_INSERT_BEFORE(oldpa, newpa, entries);
2190 else
2191 TAILQ_INSERT_AFTER(&pool->list, oldpa,
2192 newpa, entries);
2193 }
2194
2195 pool->cur = TAILQ_FIRST(&pool->list);
2196 PF_ACPY(&pool->counter, &pool->cur->addr.v.a.addr,
2197 pca->af);
2198 splx(s);
2199 break;
2200 }
2201
2202 case DIOCGETRULESETS: {
2203 struct pfioc_ruleset *pr = (struct pfioc_ruleset *)addr;
2204 struct pf_ruleset *ruleset;
2205 struct pf_anchor *anchor;
2206
2207 pr->path[sizeof(pr->path) - 1] = 0;
2208 if ((ruleset = pf_find_ruleset(pr->path)) == NULL) {
2209 error = EINVAL;
2210 break;
2211 }
2212 pr->nr = 0;
2213 if (ruleset->anchor == NULL) {
2214 /* XXX kludge for pf_main_ruleset */
2215 RB_FOREACH(anchor, pf_anchor_global, &pf_anchors)
2216 if (anchor->parent == NULL)
2217 pr->nr++;
2218 } else {
2219 RB_FOREACH(anchor, pf_anchor_node,
2220 &ruleset->anchor->children)
2221 pr->nr++;
2222 }
2223 break;
2224 }
2225
2226 case DIOCGETRULESET: {
2227 struct pfioc_ruleset *pr = (struct pfioc_ruleset *)addr;
2228 struct pf_ruleset *ruleset;
2229 struct pf_anchor *anchor;
2230 u_int32_t nr = 0;
2231
2232 pr->path[sizeof(pr->path) - 1] = 0;
2233 if ((ruleset = pf_find_ruleset(pr->path)) == NULL) {
2234 error = EINVAL;
2235 break;
2236 }
2237 pr->name[0] = 0;
2238 if (ruleset->anchor == NULL) {
2239 /* XXX kludge for pf_main_ruleset */
2240 RB_FOREACH(anchor, pf_anchor_global, &pf_anchors)
2241 if (anchor->parent == NULL && nr++ == pr->nr) {
2242 strlcpy(pr->name, anchor->name,
2243 sizeof(pr->name));
2244 break;
2245 }
2246 } else {
2247 RB_FOREACH(anchor, pf_anchor_node,
2248 &ruleset->anchor->children)
2249 if (nr++ == pr->nr) {
2250 strlcpy(pr->name, anchor->name,
2251 sizeof(pr->name));
2252 break;
2253 }
2254 }
2255 if (!pr->name[0])
2256 error = EBUSY;
2257 break;
2258 }
2259
2260 case DIOCRCLRTABLES: {
2261 struct pfioc_table *io = (struct pfioc_table *)addr;
2262
2263 if (io->pfrio_esize != 0) {
2264 error = ENODEV;
2265 break;
2266 }
2267 error = pfr_clr_tables(&io->pfrio_table, &io->pfrio_ndel,
2268 io->pfrio_flags | PFR_FLAG_USERIOCTL);
2269 break;
2270 }
2271
2272 case DIOCRADDTABLES: {
2273 struct pfioc_table *io = (struct pfioc_table *)addr;
2274
2275 if (io->pfrio_esize != sizeof(struct pfr_table)) {
2276 error = ENODEV;
2277 break;
2278 }
2279 error = pfr_add_tables(io->pfrio_buffer, io->pfrio_size,
2280 &io->pfrio_nadd, io->pfrio_flags | PFR_FLAG_USERIOCTL);
2281 break;
2282 }
2283
2284 case DIOCRDELTABLES: {
2285 struct pfioc_table *io = (struct pfioc_table *)addr;
2286
2287 if (io->pfrio_esize != sizeof(struct pfr_table)) {
2288 error = ENODEV;
2289 break;
2290 }
2291 error = pfr_del_tables(io->pfrio_buffer, io->pfrio_size,
2292 &io->pfrio_ndel, io->pfrio_flags | PFR_FLAG_USERIOCTL);
2293 break;
2294 }
2295
2296 case DIOCRGETTABLES: {
2297 struct pfioc_table *io = (struct pfioc_table *)addr;
2298
2299 if (io->pfrio_esize != sizeof(struct pfr_table)) {
2300 error = ENODEV;
2301 break;
2302 }
2303 error = pfr_get_tables(&io->pfrio_table, io->pfrio_buffer,
2304 &io->pfrio_size, io->pfrio_flags | PFR_FLAG_USERIOCTL);
2305 break;
2306 }
2307
2308 case DIOCRGETTSTATS: {
2309 struct pfioc_table *io = (struct pfioc_table *)addr;
2310
2311 if (io->pfrio_esize != sizeof(struct pfr_tstats)) {
2312 error = ENODEV;
2313 break;
2314 }
2315 error = pfr_get_tstats(&io->pfrio_table, io->pfrio_buffer,
2316 &io->pfrio_size, io->pfrio_flags | PFR_FLAG_USERIOCTL);
2317 break;
2318 }
2319
2320 case DIOCRCLRTSTATS: {
2321 struct pfioc_table *io = (struct pfioc_table *)addr;
2322
2323 if (io->pfrio_esize != sizeof(struct pfr_table)) {
2324 error = ENODEV;
2325 break;
2326 }
2327 error = pfr_clr_tstats(io->pfrio_buffer, io->pfrio_size,
2328 &io->pfrio_nzero, io->pfrio_flags | PFR_FLAG_USERIOCTL);
2329 break;
2330 }
2331
2332 case DIOCRSETTFLAGS: {
2333 struct pfioc_table *io = (struct pfioc_table *)addr;
2334
2335 if (io->pfrio_esize != sizeof(struct pfr_table)) {
2336 error = ENODEV;
2337 break;
2338 }
2339 error = pfr_set_tflags(io->pfrio_buffer, io->pfrio_size,
2340 io->pfrio_setflag, io->pfrio_clrflag, &io->pfrio_nchange,
2341 &io->pfrio_ndel, io->pfrio_flags | PFR_FLAG_USERIOCTL);
2342 break;
2343 }
2344
2345 case DIOCRCLRADDRS: {
2346 struct pfioc_table *io = (struct pfioc_table *)addr;
2347
2348 if (io->pfrio_esize != 0) {
2349 error = ENODEV;
2350 break;
2351 }
2352 error = pfr_clr_addrs(&io->pfrio_table, &io->pfrio_ndel,
2353 io->pfrio_flags | PFR_FLAG_USERIOCTL);
2354 break;
2355 }
2356
2357 case DIOCRADDADDRS: {
2358 struct pfioc_table *io = (struct pfioc_table *)addr;
2359
2360 if (io->pfrio_esize != sizeof(struct pfr_addr)) {
2361 error = ENODEV;
2362 break;
2363 }
2364 error = pfr_add_addrs(&io->pfrio_table, io->pfrio_buffer,
2365 io->pfrio_size, &io->pfrio_nadd, io->pfrio_flags |
2366 PFR_FLAG_USERIOCTL);
2367 break;
2368 }
2369
2370 case DIOCRDELADDRS: {
2371 struct pfioc_table *io = (struct pfioc_table *)addr;
2372
2373 if (io->pfrio_esize != sizeof(struct pfr_addr)) {
2374 error = ENODEV;
2375 break;
2376 }
2377 error = pfr_del_addrs(&io->pfrio_table, io->pfrio_buffer,
2378 io->pfrio_size, &io->pfrio_ndel, io->pfrio_flags |
2379 PFR_FLAG_USERIOCTL);
2380 break;
2381 }
2382
2383 case DIOCRSETADDRS: {
2384 struct pfioc_table *io = (struct pfioc_table *)addr;
2385
2386 if (io->pfrio_esize != sizeof(struct pfr_addr)) {
2387 error = ENODEV;
2388 break;
2389 }
2390 error = pfr_set_addrs(&io->pfrio_table, io->pfrio_buffer,
2391 io->pfrio_size, &io->pfrio_size2, &io->pfrio_nadd,
2392 &io->pfrio_ndel, &io->pfrio_nchange, io->pfrio_flags |
2393 PFR_FLAG_USERIOCTL);
2394 break;
2395 }
2396
2397 case DIOCRGETADDRS: {
2398 struct pfioc_table *io = (struct pfioc_table *)addr;
2399
2400 if (io->pfrio_esize != sizeof(struct pfr_addr)) {
2401 error = ENODEV;
2402 break;
2403 }
2404 error = pfr_get_addrs(&io->pfrio_table, io->pfrio_buffer,
2405 &io->pfrio_size, io->pfrio_flags | PFR_FLAG_USERIOCTL);
2406 break;
2407 }
2408
2409 case DIOCRGETASTATS: {
2410 struct pfioc_table *io = (struct pfioc_table *)addr;
2411
2412 if (io->pfrio_esize != sizeof(struct pfr_astats)) {
2413 error = ENODEV;
2414 break;
2415 }
2416 error = pfr_get_astats(&io->pfrio_table, io->pfrio_buffer,
2417 &io->pfrio_size, io->pfrio_flags | PFR_FLAG_USERIOCTL);
2418 break;
2419 }
2420
2421 case DIOCRCLRASTATS: {
2422 struct pfioc_table *io = (struct pfioc_table *)addr;
2423
2424 if (io->pfrio_esize != sizeof(struct pfr_addr)) {
2425 error = ENODEV;
2426 break;
2427 }
2428 error = pfr_clr_astats(&io->pfrio_table, io->pfrio_buffer,
2429 io->pfrio_size, &io->pfrio_nzero, io->pfrio_flags |
2430 PFR_FLAG_USERIOCTL);
2431 break;
2432 }
2433
2434 case DIOCRTSTADDRS: {
2435 struct pfioc_table *io = (struct pfioc_table *)addr;
2436
2437 if (io->pfrio_esize != sizeof(struct pfr_addr)) {
2438 error = ENODEV;
2439 break;
2440 }
2441 error = pfr_tst_addrs(&io->pfrio_table, io->pfrio_buffer,
2442 io->pfrio_size, &io->pfrio_nmatch, io->pfrio_flags |
2443 PFR_FLAG_USERIOCTL);
2444 break;
2445 }
2446
2447 case DIOCRINADEFINE: {
2448 struct pfioc_table *io = (struct pfioc_table *)addr;
2449
2450 if (io->pfrio_esize != sizeof(struct pfr_addr)) {
2451 error = ENODEV;
2452 break;
2453 }
2454 error = pfr_ina_define(&io->pfrio_table, io->pfrio_buffer,
2455 io->pfrio_size, &io->pfrio_nadd, &io->pfrio_naddr,
2456 io->pfrio_ticket, io->pfrio_flags | PFR_FLAG_USERIOCTL);
2457 break;
2458 }
2459
2460 case DIOCOSFPADD: {
2461 struct pf_osfp_ioctl *io = (struct pf_osfp_ioctl *)addr;
2462 s = splsoftnet();
2463 error = pf_osfp_add(io);
2464 splx(s);
2465 break;
2466 }
2467
2468 case DIOCOSFPGET: {
2469 struct pf_osfp_ioctl *io = (struct pf_osfp_ioctl *)addr;
2470 s = splsoftnet();
2471 error = pf_osfp_get(io);
2472 splx(s);
2473 break;
2474 }
2475
2476 case DIOCXBEGIN: {
2477 struct pfioc_trans *io = (struct pfioc_trans *)
2478 addr;
2479 static struct pfioc_trans_e ioe;
2480 static struct pfr_table table;
2481 int i;
2482
2483 if (io->esize != sizeof(ioe)) {
2484 error = ENODEV;
2485 goto fail;
2486 }
2487 for (i = 0; i < io->size; i++) {
2488 if (copyin(io->array+i, &ioe, sizeof(ioe))) {
2489 error = EFAULT;
2490 goto fail;
2491 }
2492 switch (ioe.rs_num) {
2493 #ifdef ALTQ
2494 case PF_RULESET_ALTQ:
2495 if (ioe.anchor[0]) {
2496 error = EINVAL;
2497 goto fail;
2498 }
2499 if ((error = pf_begin_altq(&ioe.ticket)))
2500 goto fail;
2501 break;
2502 #endif /* ALTQ */
2503 case PF_RULESET_TABLE:
2504 bzero(&table, sizeof(table));
2505 strlcpy(table.pfrt_anchor, ioe.anchor,
2506 sizeof(table.pfrt_anchor));
2507 if ((error = pfr_ina_begin(&table,
2508 &ioe.ticket, NULL, 0)))
2509 goto fail;
2510 break;
2511 default:
2512 if ((error = pf_begin_rules(&ioe.ticket,
2513 ioe.rs_num, ioe.anchor)))
2514 goto fail;
2515 break;
2516 }
2517 if (copyout(&ioe, io->array+i, sizeof(io->array[i]))) {
2518 error = EFAULT;
2519 goto fail;
2520 }
2521 }
2522 break;
2523 }
2524
2525 case DIOCXROLLBACK: {
2526 struct pfioc_trans *io = (struct pfioc_trans *)
2527 addr;
2528 static struct pfioc_trans_e ioe;
2529 static struct pfr_table table;
2530 int i;
2531
2532 if (io->esize != sizeof(ioe)) {
2533 error = ENODEV;
2534 goto fail;
2535 }
2536 for (i = 0; i < io->size; i++) {
2537 if (copyin(io->array+i, &ioe, sizeof(ioe))) {
2538 error = EFAULT;
2539 goto fail;
2540 }
2541 switch (ioe.rs_num) {
2542 #ifdef ALTQ
2543 case PF_RULESET_ALTQ:
2544 if (ioe.anchor[0]) {
2545 error = EINVAL;
2546 goto fail;
2547 }
2548 if ((error = pf_rollback_altq(ioe.ticket)))
2549 goto fail; /* really bad */
2550 break;
2551 #endif /* ALTQ */
2552 case PF_RULESET_TABLE:
2553 bzero(&table, sizeof(table));
2554 strlcpy(table.pfrt_anchor, ioe.anchor,
2555 sizeof(table.pfrt_anchor));
2556 if ((error = pfr_ina_rollback(&table,
2557 ioe.ticket, NULL, 0)))
2558 goto fail; /* really bad */
2559 break;
2560 default:
2561 if ((error = pf_rollback_rules(ioe.ticket,
2562 ioe.rs_num, ioe.anchor)))
2563 goto fail; /* really bad */
2564 break;
2565 }
2566 }
2567 break;
2568 }
2569
2570 case DIOCXCOMMIT: {
2571 struct pfioc_trans *io = (struct pfioc_trans *)
2572 addr;
2573 static struct pfioc_trans_e ioe;
2574 static struct pfr_table table;
2575 struct pf_ruleset *rs;
2576 int i;
2577
2578 if (io->esize != sizeof(ioe)) {
2579 error = ENODEV;
2580 goto fail;
2581 }
2582 /* first makes sure everything will succeed */
2583 for (i = 0; i < io->size; i++) {
2584 if (copyin(io->array+i, &ioe, sizeof(ioe))) {
2585 error = EFAULT;
2586 goto fail;
2587 }
2588 switch (ioe.rs_num) {
2589 #ifdef ALTQ
2590 case PF_RULESET_ALTQ:
2591 if (ioe.anchor[0]) {
2592 error = EINVAL;
2593 goto fail;
2594 }
2595 if (!altqs_inactive_open || ioe.ticket !=
2596 ticket_altqs_inactive) {
2597 error = EBUSY;
2598 goto fail;
2599 }
2600 break;
2601 #endif /* ALTQ */
2602 case PF_RULESET_TABLE:
2603 rs = pf_find_ruleset(ioe.anchor);
2604 if (rs == NULL || !rs->topen || ioe.ticket !=
2605 rs->tticket) {
2606 error = EBUSY;
2607 goto fail;
2608 }
2609 break;
2610 default:
2611 if (ioe.rs_num < 0 || ioe.rs_num >=
2612 PF_RULESET_MAX) {
2613 error = EINVAL;
2614 goto fail;
2615 }
2616 rs = pf_find_ruleset(ioe.anchor);
2617 if (rs == NULL ||
2618 !rs->rules[ioe.rs_num].inactive.open ||
2619 rs->rules[ioe.rs_num].inactive.ticket !=
2620 ioe.ticket) {
2621 error = EBUSY;
2622 goto fail;
2623 }
2624 break;
2625 }
2626 }
2627 /* now do the commit - no errors should happen here */
2628 for (i = 0; i < io->size; i++) {
2629 if (copyin(io->array+i, &ioe, sizeof(ioe))) {
2630 error = EFAULT;
2631 goto fail;
2632 }
2633 switch (ioe.rs_num) {
2634 #ifdef ALTQ
2635 case PF_RULESET_ALTQ:
2636 if ((error = pf_commit_altq(ioe.ticket)))
2637 goto fail; /* really bad */
2638 break;
2639 #endif /* ALTQ */
2640 case PF_RULESET_TABLE:
2641 bzero(&table, sizeof(table));
2642 strlcpy(table.pfrt_anchor, ioe.anchor,
2643 sizeof(table.pfrt_anchor));
2644 if ((error = pfr_ina_commit(&table, ioe.ticket,
2645 NULL, NULL, 0)))
2646 goto fail; /* really bad */
2647 break;
2648 default:
2649 if ((error = pf_commit_rules(ioe.ticket,
2650 ioe.rs_num, ioe.anchor)))
2651 goto fail; /* really bad */
2652 break;
2653 }
2654 }
2655 break;
2656 }
2657
2658 case DIOCGETSRCNODES: {
2659 struct pfioc_src_nodes *psn = (struct pfioc_src_nodes *)addr;
2660 struct pf_src_node *n;
2661 struct pf_src_node *p, pstore;
2662 u_int32_t nr = 0;
2663 int space = psn->psn_len;
2664
2665 if (space == 0) {
2666 s = splsoftnet();
2667 RB_FOREACH(n, pf_src_tree, &tree_src_tracking)
2668 nr++;
2669 splx(s);
2670 psn->psn_len = sizeof(struct pf_src_node) * nr;
2671 return (0);
2672 }
2673
2674 s = splsoftnet();
2675 p = psn->psn_src_nodes;
2676 RB_FOREACH(n, pf_src_tree, &tree_src_tracking) {
2677 int secs = time_second;
2678
2679 if ((nr + 1) * sizeof(*p) > (unsigned)psn->psn_len)
2680 break;
2681
2682 bcopy(n, &pstore, sizeof(pstore));
2683 if (n->rule.ptr != NULL)
2684 pstore.rule.nr = n->rule.ptr->nr;
2685 pstore.creation = secs - pstore.creation;
2686 if (pstore.expire > secs)
2687 pstore.expire -= secs;
2688 else
2689 pstore.expire = 0;
2690 error = copyout(&pstore, p, sizeof(*p));
2691 if (error) {
2692 splx(s);
2693 goto fail;
2694 }
2695 p++;
2696 nr++;
2697 }
2698 psn->psn_len = sizeof(struct pf_src_node) * nr;
2699 splx(s);
2700 break;
2701 }
2702
2703 case DIOCCLRSRCNODES: {
2704 struct pf_src_node *n;
2705 struct pf_state *state;
2706
2707 s = splsoftnet();
2708 RB_FOREACH(state, pf_state_tree_id, &tree_id) {
2709 state->src_node = NULL;
2710 state->nat_src_node = NULL;
2711 }
2712 RB_FOREACH(n, pf_src_tree, &tree_src_tracking) {
2713 n->expire = 1;
2714 n->states = 0;
2715 }
2716 pf_purge_expired_src_nodes();
2717 pf_status.src_nodes = 0;
2718 splx(s);
2719 break;
2720 }
2721
2722 case DIOCSETHOSTID: {
2723 u_int32_t *hostid = (u_int32_t *)addr;
2724
2725 if (*hostid == 0) {
2726 error = EINVAL;
2727 goto fail;
2728 }
2729 pf_status.hostid = *hostid;
2730 break;
2731 }
2732
2733 case DIOCOSFPFLUSH:
2734 s = splsoftnet();
2735 pf_osfp_flush();
2736 splx(s);
2737 break;
2738
2739 case DIOCIGETIFACES: {
2740 struct pfioc_iface *io = (struct pfioc_iface *)addr;
2741
2742 if (io->pfiio_esize != sizeof(struct pfi_if)) {
2743 error = ENODEV;
2744 break;
2745 }
2746 error = pfi_get_ifaces(io->pfiio_name, io->pfiio_buffer,
2747 &io->pfiio_size, io->pfiio_flags);
2748 break;
2749 }
2750
2751 case DIOCICLRISTATS: {
2752 struct pfioc_iface *io = (struct pfioc_iface *)addr;
2753
2754 error = pfi_clr_istats(io->pfiio_name, &io->pfiio_nzero,
2755 io->pfiio_flags);
2756 break;
2757 }
2758
2759 default:
2760 error = ENODEV;
2761 break;
2762 }
2763 fail:
2764
2765 return (error);
2766 }
2767