1 /* $FreeBSD: src/sys/netinet6/in6_prefix.c,v 1.4.2.3 2001/07/03 11:01:52 ume Exp $ */
2 /* $DragonFly: src/sys/netinet6/in6_prefix.c,v 1.5 2004/05/20 18:30:36 cpressey Exp $ */
3 /* $KAME: in6_prefix.c,v 1.47 2001/03/25 08:41:39 itojun Exp $ */
6 * Copyright (C) 1995, 1996, 1997, and 1998 WIDE Project.
9 * Redistribution and use in source and binary forms, with or without
10 * modification, are permitted provided that the following conditions
12 * 1. Redistributions of source code must retain the above copyright
13 * notice, this list of conditions and the following disclaimer.
14 * 2. Redistributions in binary form must reproduce the above copyright
15 * notice, this list of conditions and the following disclaimer in the
16 * documentation and/or other materials provided with the distribution.
17 * 3. Neither the name of the project nor the names of its contributors
18 * may be used to endorse or promote products derived from this software
19 * without specific prior written permission.
21 * THIS SOFTWARE IS PROVIDED BY THE PROJECT AND CONTRIBUTORS ``AS IS'' AND
22 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
23 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
24 * ARE DISCLAIMED. IN NO EVENT SHALL THE PROJECT OR CONTRIBUTORS BE LIABLE
25 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
26 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
27 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
28 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
29 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
30 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
35 * Copyright (c) 1982, 1986, 1991, 1993
36 * The Regents of the University of California. All rights reserved.
38 * Redistribution and use in source and binary forms, with or without
39 * modification, are permitted provided that the following conditions
41 * 1. Redistributions of source code must retain the above copyright
42 * notice, this list of conditions and the following disclaimer.
43 * 2. Redistributions in binary form must reproduce the above copyright
44 * notice, this list of conditions and the following disclaimer in the
45 * documentation and/or other materials provided with the distribution.
46 * 3. All advertising materials mentioning features or use of this software
47 * must display the following acknowledgement:
48 * This product includes software developed by the University of
49 * California, Berkeley and its contributors.
50 * 4. Neither the name of the University nor the names of its contributors
51 * may be used to endorse or promote products derived from this software
52 * without specific prior written permission.
54 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
55 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
56 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
57 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
58 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
59 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
60 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
61 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
62 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
63 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
66 * @(#)in.c 8.2 (Berkeley) 11/15/93
69 #include <sys/param.h>
70 #include <sys/malloc.h>
71 #include <sys/kernel.h>
72 #include <sys/socket.h>
73 #include <sys/socketvar.h>
74 #include <sys/sockio.h>
75 #include <sys/systm.h>
76 #include <sys/syslog.h>
81 #include <netinet/in.h>
82 #include <netinet/in_var.h>
83 #include <netinet/ip6.h>
84 #include <netinet6/in6_prefix.h>
85 #include <netinet6/ip6_var.h>
87 static MALLOC_DEFINE(M_IP6RR, "ip6rr", "IPv6 Router Renumbering Prefix");
88 static MALLOC_DEFINE(M_RR_ADDR, "rp_addr", "IPv6 Router Renumbering Ifid");
90 struct rr_prhead rr_prefix;
92 struct callout in6_rr_timer_ch;
94 #include <net/net_osdep.h>
96 static void add_each_addr (struct socket *so, struct rr_prefix *rpp,
98 static int create_ra_entry (struct rp_addr **rapp);
99 static int add_each_prefix (struct socket *so, struct rr_prefix *rpp);
100 static void free_rp_entries (struct rr_prefix *rpp);
101 static int link_stray_ia6s (struct rr_prefix *rpp);
102 static void rp_remove (struct rr_prefix *rpp);
105 * Copy bits from src to tgt, from off bit for len bits.
106 * Caller must specify collect tgtsize and srcsize.
109 bit_copy(char *tgt, u_int tgtsize, char *src, u_int srcsize,
110 u_int off, u_int len)
114 /* arg values check */
115 if (srcsize < off || srcsize < (off + len) ||
116 tgtsize < off || tgtsize < (off + len)) {
118 "in6_prefix.c: bit_copy: invalid args: srcsize %d,\n"
119 "tgtsize %d, off %d, len %d\n", srcsize, tgtsize, off,
124 /* search start point */
125 for (sp = src, tp = tgt; off >= 8; sp++, tp++)
127 /* copy starting bits */
132 startbits = min((8 - off), len);
134 for (setbit = (0x80 >> off); startbits;
135 setbit >>= 1, startbits--, len--)
136 *tp |= (setbit & *sp);
140 /* copy midium bits */
141 for (; len >= 8; sp++, tp++) {
145 /* copy ending bits */
149 for (setbit = 0x80; len; setbit >>= 1, len--)
150 *tp |= (setbit & *sp);
154 static struct ifprefix *
155 in6_prefixwithifp(struct ifnet *ifp, int plen, struct in6_addr *dst)
157 struct ifprefix *ifpr;
159 /* search matched prefix */
160 for (ifpr = TAILQ_FIRST(&ifp->if_prefixhead); ifpr;
161 ifpr = TAILQ_NEXT(ifpr, ifpr_list))
163 if (ifpr->ifpr_prefix->sa_family != AF_INET6 ||
164 ifpr->ifpr_type != IN6_PREFIX_RR)
166 if (plen <= in6_matchlen(dst, IFPR_IN6(ifpr)))
173 * Search prefix which matches arg prefix as specified in
174 * draft-ietf-ipngwg-router-renum-08.txt
176 static struct rr_prefix *
177 search_matched_prefix(struct ifnet *ifp, struct in6_prefixreq *ipr)
179 struct ifprefix *ifpr;
181 struct rr_prefix *rpp;
183 /* search matched prefix */
184 ifpr = in6_prefixwithifp(ifp, ipr->ipr_plen,
185 &ipr->ipr_prefix.sin6_addr);
187 return ifpr2rp(ifpr);
190 * search matched addr, and then search prefix
191 * which matches the addr
194 TAILQ_FOREACH(ifa, &ifp->if_addrlist, ifa_list)
196 if (ifa->ifa_addr->sa_family != AF_INET6)
199 in6_matchlen(&ipr->ipr_prefix.sin6_addr, IFA_IN6(ifa)))
205 rpp = ifpr2rp(((struct in6_ifaddr *)ifa)->ia6_ifpr);
209 for (ifpr = TAILQ_FIRST(&ifp->if_prefixhead); ifpr;
210 ifpr = TAILQ_NEXT(ifpr, ifpr_list))
212 if (ifpr->ifpr_prefix->sa_family != AF_INET6 ||
213 ifpr->ifpr_type != IN6_PREFIX_RR)
215 if (ifpr->ifpr_plen <= in6_matchlen(IFA_IN6(ifa),
220 log(LOG_ERR, "in6_prefix.c: search_matched_prefix: addr %s"
221 "has no pointer to prefix %s\n", ip6_sprintf(IFA_IN6(ifa)),
222 ip6_sprintf(IFPR_IN6(ifpr)));
223 return ifpr2rp(ifpr);
227 * Search prefix which matches arg prefix as specified in
228 * draft-ietf-ipngwg-router-renum-08.txt, and mark it if exists.
229 * Return 1 if anything matched, and 0 if nothing matched.
232 mark_matched_prefixes(u_long cmd, struct ifnet *ifp, struct in6_rrenumreq *irr)
234 struct ifprefix *ifpr;
236 int matchlen, matched = 0;
238 /* search matched prefixes */
239 for (ifpr = TAILQ_FIRST(&ifp->if_prefixhead); ifpr;
240 ifpr = TAILQ_NEXT(ifpr, ifpr_list))
242 if (ifpr->ifpr_prefix->sa_family != AF_INET6 ||
243 ifpr->ifpr_type != IN6_PREFIX_RR)
245 matchlen = in6_matchlen(&irr->irr_matchprefix.sin6_addr,
247 if (irr->irr_m_minlen > ifpr->ifpr_plen ||
248 irr->irr_m_maxlen < ifpr->ifpr_plen ||
249 irr->irr_m_len > matchlen)
252 ifpr2rp(ifpr)->rp_statef_addmark = 1;
253 if (cmd == SIOCCIFPREFIX_IN6)
254 ifpr2rp(ifpr)->rp_statef_delmark = 1;
258 * search matched addr, and then search prefixes
259 * which matche the addr
261 TAILQ_FOREACH(ifa, &ifp->if_addrlist, ifa_list)
263 struct rr_prefix *rpp;
265 if (ifa->ifa_addr->sa_family != AF_INET6)
267 matchlen = in6_matchlen(&irr->irr_matchprefix.sin6_addr,
269 if (irr->irr_m_minlen > matchlen ||
270 irr->irr_m_maxlen < matchlen || irr->irr_m_len > matchlen)
272 rpp = ifpr2rp(((struct in6_ifaddr *)ifa)->ia6_ifpr);
275 rpp->rp_statef_addmark = 1;
276 if (cmd == SIOCCIFPREFIX_IN6)
277 rpp->rp_statef_delmark = 1;
279 log(LOG_WARNING, "in6_prefix.c: mark_matched_prefixes:"
280 "no back pointer to ifprefix for %s. "
281 "ND autoconfigured addr?\n",
282 ip6_sprintf(IFA_IN6(ifa)));
288 * Mark global prefixes as to be deleted.
291 delmark_global_prefixes(struct ifnet *ifp, struct in6_rrenumreq *irr)
293 struct ifprefix *ifpr;
295 /* search matched prefixes */
296 for (ifpr = TAILQ_FIRST(&ifp->if_prefixhead); ifpr;
297 ifpr = TAILQ_NEXT(ifpr, ifpr_list))
299 if (ifpr->ifpr_prefix->sa_family != AF_INET6 ||
300 ifpr->ifpr_type != IN6_PREFIX_RR)
302 /* mark delete global prefix */
303 if (in6_addrscope(RP_IN6(ifpr2rp(ifpr))) ==
304 IPV6_ADDR_SCOPE_GLOBAL)
305 ifpr2rp(ifpr)->rp_statef_delmark = 1;
309 /* Unmark prefixes */
311 unmark_prefixes(struct ifnet *ifp)
313 struct ifprefix *ifpr;
315 /* unmark all prefix */
316 for (ifpr = TAILQ_FIRST(&ifp->if_prefixhead); ifpr;
317 ifpr = TAILQ_NEXT(ifpr, ifpr_list))
319 if (ifpr->ifpr_prefix->sa_family != AF_INET6 ||
320 ifpr->ifpr_type != IN6_PREFIX_RR)
323 ifpr2rp(ifpr)->rp_statef_addmark = 0;
324 ifpr2rp(ifpr)->rp_statef_delmark = 0;
329 init_prefix_ltimes(struct rr_prefix *rpp)
332 if (rpp->rp_pltime == RR_INFINITE_LIFETIME ||
333 rpp->rp_rrf_decrprefd == 0)
334 rpp->rp_preferred = 0;
336 rpp->rp_preferred = time_second + rpp->rp_pltime;
337 if (rpp->rp_vltime == RR_INFINITE_LIFETIME ||
338 rpp->rp_rrf_decrvalid == 0)
341 rpp->rp_expire = time_second + rpp->rp_vltime;
345 rr_are_ifid_equal(struct in6_addr *ii1, struct in6_addr *ii2, int ii_len)
347 int ii_bytelen, ii_bitlen;
348 int p_bytelen, p_bitlen;
352 ii_len > 124) { /* as RFC2373, prefix is at least 4 bit */
353 log(LOG_ERR, "rr_are_ifid_equal: invalid ifid length(%d)\n",
358 ii_bytelen = ii_len / 8;
359 ii_bitlen = ii_len % 8;
361 p_bytelen = sizeof(struct in6_addr) - ii_bytelen - 1;
362 p_bitlen = 8 - ii_bitlen;
364 if (bcmp(ii1->s6_addr + p_bytelen + 1, ii2->s6_addr + p_bytelen + 1,
367 if (((ii1->s6_addr[p_bytelen] << p_bitlen) & 0xff) !=
368 ((ii2->s6_addr[p_bytelen] << p_bitlen) & 0xff))
374 static struct rp_addr *
375 search_ifidwithprefix(struct rr_prefix *rpp, struct in6_addr *ifid)
379 LIST_FOREACH(rap, &rpp->rp_addrhead, ra_entry)
381 if (rr_are_ifid_equal(ifid, &rap->ra_ifid,
382 (sizeof(struct in6_addr) << 3) -
390 assign_ra_entry(struct rr_prefix *rpp, int iilen, struct in6_ifaddr *ia)
396 if ((error = create_ra_entry(&rap)) != 0)
399 /* copy interface id part */
400 bit_copy((caddr_t)&rap->ra_ifid, sizeof(rap->ra_ifid) << 3,
401 (caddr_t)IA6_IN6(ia),
402 sizeof(*IA6_IN6(ia)) << 3, rpp->rp_plen, iilen);
403 /* link to ia, and put into list */
405 IFAREF(&rap->ra_addr->ia_ifa);
406 #if 0 /* Can't do this now, because rpp may be on th stack. should fix it? */
407 ia->ia6_ifpr = rp2ifpr(rpp);
410 LIST_INSERT_HEAD(&rpp->rp_addrhead, rap, ra_entry);
417 * add a link-local address to an interface. we will add new interface address
418 * (prefix database + new interface id).
421 in6_prefix_add_llifid(int iilen, struct in6_ifaddr *ia)
423 struct rr_prefix *rpp;
428 if ((error = create_ra_entry(&rap)) != 0)
430 /* copy interface id part */
431 bit_copy((caddr_t)&rap->ra_ifid, sizeof(rap->ra_ifid) << 3,
432 (caddr_t)IA6_IN6(ia), sizeof(*IA6_IN6(ia)) << 3,
433 64, (sizeof(rap->ra_ifid) << 3) - 64);
434 /* XXX: init dummy so */
435 bzero(&so, sizeof(so));
436 /* insert into list */
437 LIST_FOREACH(rpp, &rr_prefix, rp_entry)
440 * do not attempt to add an address, if ifp does not match
442 if (rpp->rp_ifp != ia->ia_ifp)
446 LIST_INSERT_HEAD(&rpp->rp_addrhead, rap, ra_entry);
448 add_each_addr(&so, rpp, rap);
454 * add an address to an interface. if the interface id portion is new,
455 * we will add new interface address (prefix database + new interface id).
458 in6_prefix_add_ifid(int iilen, struct in6_ifaddr *ia)
460 int plen = (sizeof(*IA6_IN6(ia)) << 3) - iilen;
461 struct ifprefix *ifpr;
465 if (IN6_IS_ADDR_LINKLOCAL(IA6_IN6(ia)))
466 return(in6_prefix_add_llifid(iilen, ia));
467 ifpr = in6_prefixwithifp(ia->ia_ifp, plen, IA6_IN6(ia));
471 int pplen = (plen == 128) ? 64 : plen; /* XXX hardcoded 64 is bad */
473 /* allocate a prefix for ia, with default properties */
476 bzero(&rp, sizeof(rp));
477 rp.rp_type = IN6_PREFIX_RR;
478 rp.rp_ifp = ia->ia_ifp;
480 rp.rp_prefix.sin6_len = sizeof(rp.rp_prefix);
481 rp.rp_prefix.sin6_family = AF_INET6;
482 bit_copy((char *)RP_IN6(&rp), sizeof(*RP_IN6(&rp)) << 3,
483 (char *)&ia->ia_addr.sin6_addr,
484 sizeof(ia->ia_addr.sin6_addr) << 3,
486 rp.rp_vltime = rp.rp_pltime = RR_INFINITE_LIFETIME;
487 rp.rp_raf_onlink = 1;
489 /* Is some FlagMasks for rrf necessary? */
490 rp.rp_rrf_decrvalid = rp.rp_rrf_decrprefd = 0;
491 rp.rp_origin = PR_ORIG_RR; /* can be renumbered */
493 /* create ra_entry */
494 error = link_stray_ia6s(&rp);
496 free_rp_entries(&rp);
500 /* XXX: init dummy so */
501 bzero(&so, sizeof(so));
503 error = add_each_prefix(&so, &rp);
505 /* free each rp_addr entry */
506 free_rp_entries(&rp);
512 ifpr = in6_prefixwithifp(ia->ia_ifp, pplen, IA6_IN6(ia));
516 rap = search_ifidwithprefix(ifpr2rp(ifpr), IA6_IN6(ia));
518 if (rap->ra_addr == NULL) {
520 IFAREF(&rap->ra_addr->ia_ifa);
521 } else if (rap->ra_addr != ia) {
522 /* There may be some inconsistencies between addrs. */
523 log(LOG_ERR, "ip6_prefix.c: addr %s/%d matched prefix"
524 " already has another ia %p(%s) on its ifid list\n",
525 ip6_sprintf(IA6_IN6(ia)), plen,
527 ip6_sprintf(IA6_IN6(rap->ra_addr)));
528 return EADDRINUSE /* XXX */;
533 error = assign_ra_entry(ifpr2rp(ifpr), iilen, ia);
540 in6_prefix_remove_ifid(int iilen, struct in6_ifaddr *ia)
544 if (ia->ia6_ifpr == NULL)
546 rap = search_ifidwithprefix(ifpr2rp(ia->ia6_ifpr), IA6_IN6(ia));
549 LIST_REMOVE(rap, ra_entry);
552 IFAFREE(&rap->ra_addr->ia_ifa);
553 free(rap, M_RR_ADDR);
556 if (LIST_EMPTY(&ifpr2rp(ia->ia6_ifpr)->rp_addrhead))
557 rp_remove(ifpr2rp(ia->ia6_ifpr));
561 in6_purgeprefix(struct ifnet *ifp)
563 struct ifprefix *ifpr, *nextifpr;
565 /* delete prefixes before ifnet goes away */
566 for (ifpr = TAILQ_FIRST(&ifp->if_prefixhead); ifpr;
569 nextifpr = TAILQ_NEXT(ifpr, ifpr_list);
570 if (ifpr->ifpr_prefix->sa_family != AF_INET6 ||
571 ifpr->ifpr_type != IN6_PREFIX_RR)
573 (void)delete_each_prefix(ifpr2rp(ifpr), PR_ORIG_KERNEL);
578 add_each_addr(struct socket *so, struct rr_prefix *rpp, struct rp_addr *rap)
580 struct in6_ifaddr *ia6;
581 struct in6_aliasreq ifra;
585 bzero(&ifra, sizeof(ifra));
586 strncpy(ifra.ifra_name, if_name(rpp->rp_ifp), sizeof(ifra.ifra_name));
587 ifra.ifra_addr.sin6_family = ifra.ifra_prefixmask.sin6_family =
589 ifra.ifra_addr.sin6_len = ifra.ifra_prefixmask.sin6_len =
590 sizeof(ifra.ifra_addr);
591 /* copy prefix part */
592 bit_copy((char *)&ifra.ifra_addr.sin6_addr,
593 sizeof(ifra.ifra_addr.sin6_addr) << 3,
594 (char *)RP_IN6(rpp), sizeof(*RP_IN6(rpp)) << 3,
596 /* copy interface id part */
597 bit_copy((char *)&ifra.ifra_addr.sin6_addr,
598 sizeof(ifra.ifra_addr.sin6_addr) << 3,
599 (char *)&rap->ra_ifid, sizeof(rap->ra_ifid) << 3,
600 rpp->rp_plen, (sizeof(rap->ra_ifid) << 3) - rpp->rp_plen);
601 in6_prefixlen2mask(&ifra.ifra_prefixmask.sin6_addr, rpp->rp_plen);
602 /* don't care ifra_flags for now */
605 * XXX: if we did this with finite lifetime values, the lifetimes would
606 * decrese in time and never incremented.
607 * we should need more clarifications on the prefix mechanism...
609 ifra.ifra_lifetime.ia6t_vltime = rpp->rp_vltime;
610 ifra.ifra_lifetime.ia6t_pltime = rpp->rp_pltime;
612 ia6 = in6ifa_ifpwithaddr(rpp->rp_ifp, &ifra.ifra_addr.sin6_addr);
614 if (ia6->ia6_ifpr == NULL) {
615 /* link this addr and the prefix each other */
617 IFAFREE(&rap->ra_addr->ia_ifa);
619 IFAREF(&rap->ra_addr->ia_ifa);
620 ia6->ia6_ifpr = rp2ifpr(rpp);
623 if (ia6->ia6_ifpr == rp2ifpr(rpp)) {
625 IFAFREE(&rap->ra_addr->ia_ifa);
627 IFAREF(&rap->ra_addr->ia_ifa);
631 * The addr is already assigned to other
633 * There may be some inconsistencies between
635 * e.g. overraped prefixes with common starting
636 * part and different plefixlen.
637 * Or, completely duplicated prefixes?
641 "in6_prefix.c: add_each_addr: addition of an addr %s/%d "
642 "failed because there is already another addr %s/%d\n",
643 ip6_sprintf(&ifra.ifra_addr.sin6_addr), rpp->rp_plen,
644 ip6_sprintf(IA6_IN6(ia6)),
645 in6_mask2len(&ia6->ia_prefixmask.sin6_addr, NULL));
648 /* propagate ANYCAST flag if it is set for ancestor addr */
649 if (rap->ra_flags.anycast != 0)
650 ifra.ifra_flags |= IN6_IFF_ANYCAST;
651 error = in6_control(so, SIOCAIFADDR_IN6, (caddr_t)&ifra, rpp->rp_ifp,
654 log(LOG_ERR, "in6_prefix.c: add_each_addr: addition of an addr"
655 "%s/%d failed because in6_control failed for error %d\n",
656 ip6_sprintf(&ifra.ifra_addr.sin6_addr), rpp->rp_plen,
662 * link beween this addr and the prefix will be done
663 * in in6_prefix_add_ifid
668 rrpr_update(struct socket *so, struct rr_prefix *new)
670 struct rr_prefix *rpp;
671 struct ifprefix *ifpr;
675 /* search existing prefix */
676 for (ifpr = TAILQ_FIRST(&new->rp_ifp->if_prefixhead); ifpr;
677 ifpr = TAILQ_NEXT(ifpr, ifpr_list))
679 if (ifpr->ifpr_prefix->sa_family != AF_INET6 ||
680 ifpr->ifpr_type != IN6_PREFIX_RR)
682 if (ifpr->ifpr_plen == new->rp_plen &&
683 in6_are_prefix_equal(IFPR_IN6(ifpr), RP_IN6(new),
690 * We got a prefix which we have seen in the past.
693 * If the origin of the already-installed prefix is more
694 * preferable than the new one, ignore installation request.
696 if (rpp->rp_origin > new->rp_origin)
699 /* update prefix information */
700 rpp->rp_flags.prf_ra = new->rp_flags.prf_ra;
701 if (rpp->rp_origin >= PR_ORIG_RR)
702 rpp->rp_flags.prf_rr = new->rp_flags.prf_rr;
703 rpp->rp_vltime = new->rp_vltime;
704 rpp->rp_pltime = new->rp_pltime;
705 rpp->rp_expire = new->rp_expire;
706 rpp->rp_preferred = new->rp_preferred;
707 rpp->rp_statef_delmark = 0; /* cancel deletion */
709 * Interface id related update.
710 * add rp_addr entries in new into rpp, if they have not
711 * been already included in rpp.
713 while (!LIST_EMPTY(&new->rp_addrhead))
715 rap = LIST_FIRST(&new->rp_addrhead);
716 LIST_REMOVE(rap, ra_entry);
717 if (search_ifidwithprefix(rpp, &rap->ra_ifid)
720 IFAFREE(&rap->ra_addr->ia_ifa);
721 free(rap, M_RR_ADDR);
725 LIST_INSERT_HEAD(&rpp->rp_addrhead, rap, ra_entry);
730 * We got a fresh prefix.
732 /* create new prefix */
733 rpp = (struct rr_prefix *)malloc(sizeof(*rpp), M_IP6RR,
736 log(LOG_ERR, "in6_prefix.c: rrpr_update:%d"
737 ": ENOBUFS for rr_prefix\n", __LINE__);
742 LIST_INIT(&rpp->rp_addrhead);
743 /* move rp_addr entries of new to rpp */
744 while (!LIST_EMPTY(&new->rp_addrhead))
746 rap = LIST_FIRST(&new->rp_addrhead);
747 LIST_REMOVE(rap, ra_entry);
748 LIST_INSERT_HEAD(&rpp->rp_addrhead, rap, ra_entry);
751 /* let rp_ifpr.ifpr_prefix point rr_prefix. */
752 rpp->rp_ifpr.ifpr_prefix = (struct sockaddr *)&rpp->rp_prefix;
753 /* link rr_prefix entry to if_prefixlist */
755 struct ifnet *ifp = rpp->rp_ifp;
756 struct ifprefix *ifpr;
758 if ((ifpr = TAILQ_FIRST(&ifp->if_prefixhead))
760 for ( ; TAILQ_NEXT(ifpr, ifpr_list);
761 ifpr = TAILQ_NEXT(ifpr, ifpr_list))
763 TAILQ_NEXT(ifpr, ifpr_list) = rp2ifpr(rpp);
765 TAILQ_FIRST(&ifp->if_prefixhead) =
767 rp2ifpr(rpp)->ifpr_type = IN6_PREFIX_RR;
769 /* link rr_prefix entry to rr_prefix list */
771 LIST_INSERT_HEAD(&rr_prefix, rpp, rp_entry);
775 if (!new->rp_raf_auto)
779 * Add an address for each interface id, if it is not yet
780 * If it existed but not pointing to the prefix yet,
781 * init the prefix pointer.
783 LIST_FOREACH(rap, &rpp->rp_addrhead, ra_entry)
785 if (rap->ra_addr != NULL) {
786 if (rap->ra_addr->ia6_ifpr == NULL)
787 rap->ra_addr->ia6_ifpr = rp2ifpr(rpp);
790 add_each_addr(so, rpp, rap);
796 add_each_prefix(struct socket *so, struct rr_prefix *rpp)
798 init_prefix_ltimes(rpp);
799 return(rrpr_update(so, rpp));
803 rp_remove(struct rr_prefix *rpp)
808 /* unlink rp_entry from if_prefixlist */
810 struct ifnet *ifp = rpp->rp_ifp;
811 struct ifprefix *ifpr;
813 if ((ifpr = TAILQ_FIRST(&ifp->if_prefixhead)) == rp2ifpr(rpp))
814 TAILQ_FIRST(&ifp->if_prefixhead) =
815 TAILQ_NEXT(ifpr, ifpr_list);
817 while (TAILQ_NEXT(ifpr, ifpr_list) != NULL &&
818 (TAILQ_NEXT(ifpr, ifpr_list) != rp2ifpr(rpp)))
819 ifpr = TAILQ_NEXT(ifpr, ifpr_list);
820 if (TAILQ_NEXT(ifpr, ifpr_list))
821 TAILQ_NEXT(ifpr, ifpr_list) =
822 TAILQ_NEXT(rp2ifpr(rpp), ifpr_list);
824 printf("Couldn't unlink rr_prefix from ifp\n");
827 /* unlink rp_entry from rr_prefix list */
828 LIST_REMOVE(rpp, rp_entry);
834 create_ra_entry(struct rp_addr **rapp)
836 *rapp = (struct rp_addr *)malloc(sizeof(struct rp_addr), M_RR_ADDR,
839 log(LOG_ERR, "in6_prefix.c: init_newprefix:%d: ENOBUFS"
840 "for rp_addr\n", __LINE__);
843 bzero(*rapp, sizeof(*(*rapp)));
849 init_newprefix(struct in6_rrenumreq *irr, struct ifprefix *ifpr,
850 struct rr_prefix *rpp)
852 struct rp_addr *orap;
855 bzero(rpp, sizeof(*rpp));
856 rpp->rp_type = IN6_PREFIX_RR;
857 rpp->rp_ifp = ifpr->ifpr_ifp;
858 rpp->rp_plen = ifpr->ifpr_plen;
859 rpp->rp_prefix.sin6_len = sizeof(rpp->rp_prefix);
860 rpp->rp_prefix.sin6_family = AF_INET6;
861 bit_copy((char *)RP_IN6(rpp), sizeof(*RP_IN6(rpp)) << 3,
862 (char *)&irr->irr_useprefix.sin6_addr,
863 sizeof(irr->irr_useprefix.sin6_addr) << 3,
864 0, irr->irr_u_uselen);
865 /* copy keeplen part if necessary as necessary len */
866 if (irr->irr_u_uselen < ifpr->ifpr_plen)
867 bit_copy((char *)RP_IN6(rpp), sizeof(*RP_IN6(rpp)) << 3,
868 (char *)IFPR_IN6(ifpr), sizeof(*IFPR_IN6(ifpr)) << 3,
870 min(ifpr->ifpr_plen - irr->irr_u_uselen,
871 irr->irr_u_keeplen));
872 LIST_FOREACH(orap, &(ifpr2rp(ifpr)->rp_addrhead), ra_entry)
877 if ((error = create_ra_entry(&rap)) != 0)
879 rap->ra_ifid = orap->ra_ifid;
880 rap->ra_flags.anycast = (orap->ra_addr != NULL &&
881 (orap->ra_addr->ia6_flags &
882 IN6_IFF_ANYCAST) != 0) ? 1 : 0;
883 LIST_INSERT_HEAD(&rpp->rp_addrhead, rap, ra_entry);
885 rpp->rp_vltime = irr->irr_vltime;
886 rpp->rp_pltime = irr->irr_pltime;
887 rpp->rp_raf_onlink = irr->irr_raf_mask_onlink ? irr->irr_raf_onlink :
888 ifpr2rp(ifpr)->rp_raf_onlink;
889 rpp->rp_raf_auto = irr->irr_raf_mask_auto ? irr->irr_raf_auto :
890 ifpr2rp(ifpr)->rp_raf_auto;
891 /* Is some FlagMasks for rrf necessary? */
892 rpp->rp_rrf = irr->irr_rrf;
893 rpp->rp_origin = irr->irr_origin;
899 free_rp_entries(struct rr_prefix *rpp)
902 * This func is only called with rpp on stack(not on list).
903 * So no splnet() here
905 while (!LIST_EMPTY(&rpp->rp_addrhead))
909 rap = LIST_FIRST(&rpp->rp_addrhead);
910 LIST_REMOVE(rap, ra_entry);
912 IFAFREE(&rap->ra_addr->ia_ifa);
913 free(rap, M_RR_ADDR);
918 add_useprefixes(struct socket *so, struct ifnet *ifp,
919 struct in6_rrenumreq *irr)
921 struct ifprefix *ifpr, *nextifpr;
925 /* add prefixes to each of marked prefix */
926 for (ifpr = TAILQ_FIRST(&ifp->if_prefixhead); ifpr; ifpr = nextifpr)
928 nextifpr = TAILQ_NEXT(ifpr, ifpr_list);
929 if (ifpr->ifpr_prefix->sa_family != AF_INET6 ||
930 ifpr->ifpr_type != IN6_PREFIX_RR)
932 if (ifpr2rp(ifpr)->rp_statef_addmark) {
933 if ((error = init_newprefix(irr, ifpr, &rp)) != 0)
935 error = add_each_prefix(so, &rp);
938 /* free each rp_addr entry */
939 free_rp_entries(&rp);
945 unprefer_prefix(struct rr_prefix *rpp)
949 for (rap = rpp->rp_addrhead.lh_first; rap != NULL;
950 rap = rap->ra_entry.le_next) {
951 if (rap->ra_addr == NULL)
953 rap->ra_addr->ia6_lifetime.ia6t_preferred = time_second;
954 rap->ra_addr->ia6_lifetime.ia6t_pltime = 0;
959 delete_each_prefix(struct rr_prefix *rpp, u_char origin)
963 if (rpp->rp_origin > origin)
966 while (rpp->rp_addrhead.lh_first != NULL) {
971 rap = LIST_FIRST(&rpp->rp_addrhead);
976 LIST_REMOVE(rap, ra_entry);
978 if (rap->ra_addr == NULL) {
979 free(rap, M_RR_ADDR);
982 rap->ra_addr->ia6_ifpr = NULL;
984 in6_purgeaddr(&rap->ra_addr->ia_ifa);
985 IFAFREE(&rap->ra_addr->ia_ifa);
986 free(rap, M_RR_ADDR);
994 delete_prefixes(struct ifnet *ifp, u_char origin)
996 struct ifprefix *ifpr, *nextifpr;
998 /* delete prefixes marked as tobe deleted */
999 for (ifpr = TAILQ_FIRST(&ifp->if_prefixhead); ifpr; ifpr = nextifpr)
1001 nextifpr = TAILQ_NEXT(ifpr, ifpr_list);
1002 if (ifpr->ifpr_prefix->sa_family != AF_INET6 ||
1003 ifpr->ifpr_type != IN6_PREFIX_RR)
1005 if (ifpr2rp(ifpr)->rp_statef_delmark)
1006 (void)delete_each_prefix(ifpr2rp(ifpr), origin);
1011 link_stray_ia6s(struct rr_prefix *rpp)
1015 for (ifa = rpp->rp_ifp->if_addrlist.tqh_first; ifa;
1016 ifa = ifa->ifa_list.tqe_next)
1018 struct rp_addr *rap;
1019 struct rr_prefix *orpp;
1022 if (ifa->ifa_addr->sa_family != AF_INET6)
1024 if (rpp->rp_plen > in6_matchlen(RP_IN6(rpp), IFA_IN6(ifa)))
1027 orpp = ifpr2rp(((struct in6_ifaddr *)ifa)->ia6_ifpr);
1029 if (!in6_are_prefix_equal(RP_IN6(orpp), RP_IN6(rpp),
1031 log(LOG_ERR, "in6_prefix.c: link_stray_ia6s:"
1032 "addr %s/%d already linked to a prefix"
1033 "and it matches also %s/%d\n",
1034 ip6_sprintf(IFA_IN6(ifa)), orpp->rp_plen,
1035 ip6_sprintf(RP_IN6(rpp)),
1039 if ((error = assign_ra_entry(rpp,
1040 (sizeof(rap->ra_ifid) << 3) -
1042 (struct in6_ifaddr *)ifa)) != 0)
1048 /* XXX assumes that permission is already checked by the caller */
1050 in6_prefix_ioctl(struct socket *so, u_long cmd, caddr_t data,
1053 struct rr_prefix *rpp, rp_tmp;
1054 struct rp_addr *rap;
1055 struct in6_prefixreq *ipr = (struct in6_prefixreq *)data;
1056 struct in6_rrenumreq *irr = (struct in6_rrenumreq *)data;
1061 * Failsafe for errneous address config program.
1062 * Let's hope rrenumd don't make a mistakes.
1064 if (ipr->ipr_origin <= PR_ORIG_RA)
1065 ipr->ipr_origin = PR_ORIG_STATIC;
1068 case SIOCSGIFPREFIX_IN6:
1069 delmark_global_prefixes(ifp, irr);
1071 case SIOCAIFPREFIX_IN6:
1072 case SIOCCIFPREFIX_IN6:
1073 /* check if preferred lifetime > valid lifetime */
1074 if (irr->irr_pltime > irr->irr_vltime) {
1076 "in6_prefix_ioctl: preferred lifetime"
1077 "(%ld) is greater than valid lifetime(%ld)\n",
1078 (u_long)irr->irr_pltime, (u_long)irr->irr_vltime);
1082 if (mark_matched_prefixes(cmd, ifp, irr)) {
1083 if (irr->irr_u_uselen != 0)
1084 if ((error = add_useprefixes(so, ifp, irr))
1087 if (cmd != SIOCAIFPREFIX_IN6)
1088 delete_prefixes(ifp, irr->irr_origin);
1090 return (EADDRNOTAVAIL);
1092 unmark_prefixes(ifp);
1094 case SIOCGIFPREFIX_IN6:
1095 rpp = search_matched_prefix(ifp, ipr);
1096 if (rpp == NULL || ifp != rpp->rp_ifp)
1097 return (EADDRNOTAVAIL);
1099 ipr->ipr_origin = rpp->rp_origin;
1100 ipr->ipr_plen = rpp->rp_plen;
1101 ipr->ipr_vltime = rpp->rp_vltime;
1102 ipr->ipr_pltime = rpp->rp_pltime;
1103 ipr->ipr_flags = rpp->rp_flags;
1104 ipr->ipr_prefix = rpp->rp_prefix;
1107 case SIOCSIFPREFIX_IN6:
1108 /* check if preferred lifetime > valid lifetime */
1109 if (ipr->ipr_pltime > ipr->ipr_vltime) {
1111 "in6_prefix_ioctl: preferred lifetime"
1112 "(%ld) is greater than valid lifetime(%ld)\n",
1113 (u_long)ipr->ipr_pltime, (u_long)ipr->ipr_vltime);
1119 bzero((caddr_t)&rp_tmp, sizeof(rp_tmp));
1120 rp_tmp.rp_ifp = ifp;
1121 rp_tmp.rp_plen = ipr->ipr_plen;
1122 rp_tmp.rp_prefix = ipr->ipr_prefix;
1123 rp_tmp.rp_vltime = ipr->ipr_vltime;
1124 rp_tmp.rp_pltime = ipr->ipr_pltime;
1125 rp_tmp.rp_flags = ipr->ipr_flags;
1126 rp_tmp.rp_origin = ipr->ipr_origin;
1128 /* create rp_addr entries, usually at least for lladdr */
1129 if ((error = link_stray_ia6s(&rp_tmp)) != 0) {
1130 free_rp_entries(&rp_tmp);
1133 for (ifa = ifp->if_addrlist.tqh_first;
1135 ifa = ifa->ifa_list.tqe_next)
1137 if (ifa->ifa_addr == NULL)
1138 continue; /* just for safety */
1139 if (ifa->ifa_addr->sa_family != AF_INET6)
1141 if (IN6_IS_ADDR_LINKLOCAL(IFA_IN6(ifa)) == 0)
1144 if ((error = create_ra_entry(&rap)) != 0) {
1145 free_rp_entries(&rp_tmp);
1148 /* copy interface id part */
1149 bit_copy((caddr_t)&rap->ra_ifid,
1150 sizeof(rap->ra_ifid) << 3,
1151 (caddr_t)IFA_IN6(ifa),
1152 sizeof(*IFA_IN6(ifa)) << 3,
1154 (sizeof(rap->ra_ifid) << 3) - rp_tmp.rp_plen);
1155 /* insert into list */
1156 LIST_INSERT_HEAD(&rp_tmp.rp_addrhead, rap, ra_entry);
1159 error = add_each_prefix(so, &rp_tmp);
1161 /* free each rp_addr entry */
1162 free_rp_entries(&rp_tmp);
1165 case SIOCDIFPREFIX_IN6:
1166 rpp = search_matched_prefix(ifp, ipr);
1167 if (rpp == NULL || ifp != rpp->rp_ifp)
1168 return (EADDRNOTAVAIL);
1170 error = delete_each_prefix(rpp, ipr->ipr_origin);
1178 in6_rr_timer(void *ignored_arg)
1181 struct rr_prefix *rpp;
1183 callout_reset(&in6_rr_timer_ch, ip6_rr_prune * hz,
1184 in6_rr_timer, NULL);
1188 rpp = LIST_FIRST(&rr_prefix);
1190 if (rpp->rp_expire && rpp->rp_expire < time_second) {
1191 struct rr_prefix *next_rpp;
1193 next_rpp = LIST_NEXT(rpp, rp_entry);
1194 delete_each_prefix(rpp, PR_ORIG_KERNEL);
1198 if (rpp->rp_preferred && rpp->rp_preferred < time_second)
1199 unprefer_prefix(rpp);
1200 rpp = LIST_NEXT(rpp, rp_entry);