2 /* $KAME: rrenum.c,v 1.10 2001/01/21 15:32:16 itojun Exp $ */
5 * Copyright (C) 1995, 1996, 1997, and 1998 WIDE Project.
8 * Redistribution and use in source and binary forms, with or without
9 * modification, are permitted provided that the following conditions
11 * 1. Redistributions of source code must retain the above copyright
12 * notice, this list of conditions and the following disclaimer.
13 * 2. Redistributions in binary form must reproduce the above copyright
14 * notice, this list of conditions and the following disclaimer in the
15 * documentation and/or other materials provided with the distribution.
16 * 3. Neither the name of the project nor the names of its contributors
17 * may be used to endorse or promote products derived from this software
18 * without specific prior written permission.
20 * THIS SOFTWARE IS PROVIDED BY THE PROJECT AND CONTRIBUTORS ``AS IS'' AND
21 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
22 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
23 * ARE DISCLAIMED. IN NO EVENT SHALL THE PROJECT OR CONTRIBUTORS BE LIABLE
24 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
25 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
26 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
27 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
28 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
29 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
32 #include <sys/types.h>
33 #include <sys/param.h>
34 #include <sys/ioctl.h>
35 #include <sys/socket.h>
36 #include <sys/sysctl.h>
39 #if defined(__FreeBSD__) && __FreeBSD__ >= 3
40 #include <net/if_var.h>
41 #endif /* __FreeBSD__ >= 3 */
42 #include <net/route.h>
43 #include <netinet/in.h>
44 #include <netinet/in_var.h>
45 #include <netinet/icmp6.h>
47 #include <arpa/inet.h>
57 #define RR_ISSET_SEGNUM(segnum_bits, segnum) \
58 ((((segnum_bits)[(segnum) >> 5]) & (1 << ((segnum) & 31))) != 0)
59 #define RR_SET_SEGNUM(segnum_bits, segnum) \
60 (((segnum_bits)[(segnum) >> 5]) |= (1 << ((segnum) & 31)))
64 u_long rro_segnum_bits[8];
67 static struct rr_operation rro;
68 static int rr_rcvifindex;
69 static int rrcmd2pco[RPM_PCO_MAX] = {
78 * Check validity of a Prefix Control Operation(PCO).
79 * Return 0 on success, 1 on failure.
82 rr_pco_check(int len, struct rr_pco_match *rpm)
84 struct rr_pco_use *rpu, *rpulim;
87 /* rpm->rpm_len must be (4N * 3) as router-renum-05.txt */
88 if ((rpm->rpm_len - 3) < 0 || /* must be at least 3 */
89 (rpm->rpm_len - 3) & 0x3) { /* must be multiple of 4 */
90 syslog(LOG_WARNING, "<%s> rpm_len %d is not 4N * 3",
91 __FUNCTION__, rpm->rpm_len);
94 /* rpm->rpm_code must be valid value */
95 switch(rpm->rpm_code) {
98 case RPM_PCO_SETGLOBAL:
101 syslog(LOG_WARNING, "<%s> unknown rpm_code %d", __FUNCTION__,
105 /* rpm->rpm_matchlen must be 0 to 128 inclusive */
106 if (rpm->rpm_matchlen > 128) {
107 syslog(LOG_WARNING, "<%s> rpm_matchlen %d is over 128",
108 __FUNCTION__, rpm->rpm_matchlen);
113 * rpu->rpu_uselen, rpu->rpu_keeplen, and sum of them must be
114 * between 0 and 128 inclusive
116 for (rpu = (struct rr_pco_use *)(rpm + 1),
117 rpulim = (struct rr_pco_use *)((char *)rpm + len);
120 checklen = rpu->rpu_uselen;
121 checklen += rpu->rpu_keeplen;
123 * omit these check, because either of rpu_uselen
124 * and rpu_keeplen is unsigned char
125 * (128 > rpu_uselen > 0)
126 * (128 > rpu_keeplen > 0)
127 * (rpu_uselen + rpu_keeplen > 0)
129 if (checklen > 128) {
130 syslog(LOG_WARNING, "<%s> sum of rpu_uselen %d and"
131 " rpu_keeplen %d is %d(over 128)",
132 __FUNCTION__, rpu->rpu_uselen,
134 rpu->rpu_uselen + rpu->rpu_keeplen);
142 do_use_prefix(int len, struct rr_pco_match *rpm,
143 struct in6_rrenumreq *irr, int ifindex)
145 struct rr_pco_use *rpu, *rpulim;
149 rpu = (struct rr_pco_use *)(rpm + 1);
150 rpulim = (struct rr_pco_use *)((char *)rpm + len);
152 if (rpu == rpulim) { /* no use prefix */
153 if (rpm->rpm_code == RPM_PCO_ADD)
156 irr->irr_u_uselen = 0;
157 irr->irr_u_keeplen = 0;
158 irr->irr_raf_mask_onlink = 0;
159 irr->irr_raf_mask_auto = 0;
162 memset(&irr->irr_flags, 0, sizeof(irr->irr_flags));
163 irr->irr_useprefix.sin6_len = 0; /* let it mean, no addition */
164 irr->irr_useprefix.sin6_family = 0;
165 irr->irr_useprefix.sin6_addr = in6addr_any;
166 if (ioctl(s, rrcmd2pco[rpm->rpm_code], (caddr_t)irr) < 0 &&
167 errno != EADDRNOTAVAIL)
168 syslog(LOG_ERR, "<%s> ioctl: %s", __FUNCTION__,
173 for (rpu = (struct rr_pco_use *)(rpm + 1),
174 rpulim = (struct rr_pco_use *)((char *)rpm + len);
177 /* init in6_rrenumreq fields */
178 irr->irr_u_uselen = rpu->rpu_uselen;
179 irr->irr_u_keeplen = rpu->rpu_keeplen;
180 irr->irr_raf_mask_onlink =
181 (rpu->rpu_ramask & ICMP6_RR_PCOUSE_RAFLAGS_ONLINK);
182 irr->irr_raf_mask_auto =
183 (rpu->rpu_ramask & ICMP6_RR_PCOUSE_RAFLAGS_AUTO);
184 irr->irr_vltime = ntohl(rpu->rpu_vltime);
185 irr->irr_pltime = ntohl(rpu->rpu_pltime);
186 irr->irr_raf_onlink =
187 (rpu->rpu_raflags & ICMP6_RR_PCOUSE_RAFLAGS_ONLINK) == 0 ? 0 : 1;
189 (rpu->rpu_raflags & ICMP6_RR_PCOUSE_RAFLAGS_AUTO) == 0 ? 0 : 1;
190 irr->irr_rrf_decrvalid =
191 (rpu->rpu_flags & ICMP6_RR_PCOUSE_FLAGS_DECRVLTIME) == 0 ? 0 : 1;
192 irr->irr_rrf_decrprefd =
193 (rpu->rpu_flags & ICMP6_RR_PCOUSE_FLAGS_DECRPLTIME) == 0 ? 0 : 1;
194 irr->irr_useprefix.sin6_len = sizeof(irr->irr_useprefix);
195 irr->irr_useprefix.sin6_family = AF_INET6;
196 irr->irr_useprefix.sin6_addr = rpu->rpu_prefix;
198 if (ioctl(s, rrcmd2pco[rpm->rpm_code], (caddr_t)irr) < 0 &&
199 errno != EADDRNOTAVAIL)
200 syslog(LOG_ERR, "<%s> ioctl: %s", __FUNCTION__,
203 /* very adhoc: should be rewritten */
204 if (rpm->rpm_code == RPM_PCO_CHANGE &&
205 IN6_ARE_ADDR_EQUAL(&rpm->rpm_prefix, &rpu->rpu_prefix) &&
206 rpm->rpm_matchlen == rpu->rpu_uselen &&
207 rpu->rpu_uselen == rpu->rpu_keeplen) {
208 if ((rai = if_indextorainfo(ifindex)) == NULL)
209 continue; /* non-advertising IF */
211 for (pp = rai->prefix.next; pp != &rai->prefix;
215 if (prefix_match(&pp->prefix, pp->prefixlen,
217 rpm->rpm_matchlen)) {
218 /* change parameters */
219 pp->validlifetime = ntohl(rpu->rpu_vltime);
220 pp->preflifetime = ntohl(rpu->rpu_pltime);
221 if (irr->irr_rrf_decrvalid) {
222 gettimeofday(&now, 0);
224 now.tv_sec + pp->validlifetime;
226 pp->vltimeexpire = 0;
227 if (irr->irr_rrf_decrprefd) {
228 gettimeofday(&now, 0);
230 now.tv_sec + pp->preflifetime;
232 pp->pltimeexpire = 0;
240 * process a Prefix Control Operation(PCO).
241 * return 0 on success, 1 on failure
244 do_pco(struct icmp6_router_renum *rr, int len, struct rr_pco_match *rpm)
247 struct in6_rrenumreq irr;
249 if ((rr_pco_check(len, rpm) != NULL))
252 if (s == -1 && (s = socket(AF_INET6, SOCK_DGRAM, 0)) < 0) {
253 syslog(LOG_ERR, "<%s> socket: %s", __FUNCTION__,
258 memset(&irr, 0, sizeof(irr));
259 irr.irr_origin = PR_ORIG_RR;
260 irr.irr_m_len = rpm->rpm_matchlen;
261 irr.irr_m_minlen = rpm->rpm_minlen;
262 irr.irr_m_maxlen = rpm->rpm_maxlen;
263 irr.irr_matchprefix.sin6_len = sizeof(irr.irr_matchprefix);
264 irr.irr_matchprefix.sin6_family = AF_INET6;
265 irr.irr_matchprefix.sin6_addr = rpm->rpm_prefix;
267 while (if_indextoname(++ifindex, irr.irr_name)) {
269 * if ICMP6_RR_FLAGS_FORCEAPPLY(A flag) is 0 and IFF_UP is off,
270 * the interface is not applied
272 if ((rr->rr_flags & ICMP6_RR_FLAGS_FORCEAPPLY) == 0 &&
273 (iflist[ifindex]->ifm_flags & IFF_UP) == 0)
275 /* TODO: interface scope check */
276 do_use_prefix(len, rpm, &irr, ifindex);
281 syslog(LOG_ERR, "<%s> if_indextoname: %s", __FUNCTION__,
289 * call do_pco() for each Prefix Control Operations(PCOs) in a received
290 * Router Renumbering Command packet.
291 * return 0 on success, 1 on failure
294 do_rr(int len, struct icmp6_router_renum *rr)
296 struct rr_pco_match *rpm;
299 lim = (char *)rr + len;
300 cp = (char *)(rr + 1);
301 len -= sizeof(struct icmp6_router_renum);
303 /* get iflist block from kernel again, to get up-to-date information */
309 rpm = (struct rr_pco_match *)cp;
310 if (len < sizeof(struct rr_pco_match)) {
312 syslog(LOG_ERR, "<%s> pkt too short. left len = %d. "
313 "gabage at end of pkt?", __FUNCTION__, len);
316 rpmlen = rpm->rpm_len << 3;
320 if (do_pco(rr, rpmlen, rpm)) {
321 syslog(LOG_WARNING, "<%s> invalid PCO", __FUNCTION__);
334 * check validity of a router renumbering command packet
335 * return 0 on success, 1 on failure
338 rr_command_check(int len, struct icmp6_router_renum *rr, struct in6_addr *from,
339 struct in6_addr *dst)
341 u_char ntopbuf[INET6_ADDRSTRLEN];
343 /* omit rr minimal length check. hope kernel have done it. */
344 /* rr_command length check */
345 if (len < (sizeof(struct icmp6_router_renum) +
346 sizeof(struct rr_pco_match))) {
347 syslog(LOG_ERR, "<%s> rr_command len %d is too short",
352 /* destination check. only for multicast. omit unicast check. */
353 if (IN6_IS_ADDR_MULTICAST(dst) && !IN6_IS_ADDR_MC_LINKLOCAL(dst) &&
354 !IN6_IS_ADDR_MC_SITELOCAL(dst)) {
355 syslog(LOG_ERR, "<%s> dst mcast addr %s is illegal",
357 inet_ntop(AF_INET6, dst, ntopbuf, INET6_ADDRSTRLEN));
361 /* seqnum and segnum check */
362 if (rro.rro_seqnum > rr->rr_seqnum) {
364 "<%s> rcvd old seqnum %d from %s",
365 __FUNCTION__, (u_int32_t)ntohl(rr->rr_seqnum),
366 inet_ntop(AF_INET6, from, ntopbuf, INET6_ADDRSTRLEN));
369 if (rro.rro_seqnum == rr->rr_seqnum &&
370 (rr->rr_flags & ICMP6_RR_FLAGS_TEST) == 0 &&
371 RR_ISSET_SEGNUM(rro.rro_segnum_bits, rr->rr_segnum)) {
372 if ((rr->rr_flags & ICMP6_RR_FLAGS_REQRESULT) != 0)
374 "<%s> rcvd duped segnum %d from %s",
375 __FUNCTION__, rr->rr_segnum,
376 inet_ntop(AF_INET6, from, ntopbuf,
382 if (rro.rro_seqnum != rr->rr_seqnum) {
383 /* then must be "<" */
385 /* init rro_segnum_bits */
386 memset(rro.rro_segnum_bits, 0,
387 sizeof(rro.rro_segnum_bits));
389 rro.rro_seqnum = rr->rr_seqnum;
395 rr_command_input(int len, struct icmp6_router_renum *rr,
396 struct in6_addr *from, struct in6_addr *dst)
398 /* rr_command validity check */
399 if (rr_command_check(len, rr, from, dst))
401 if ((rr->rr_flags & (ICMP6_RR_FLAGS_TEST|ICMP6_RR_FLAGS_REQRESULT)) ==
405 /* do router renumbering */
406 if (do_rr(len, rr)) {
411 RR_SET_SEGNUM(rro.rro_segnum_bits, rr->rr_segnum);
416 syslog(LOG_ERR, "<%s> received RR was invalid", __FUNCTION__);
421 rr_input(int len, struct icmp6_router_renum *rr, struct in6_pktinfo *pi,
422 struct sockaddr_in6 *from, struct in6_addr *dst)
424 u_char ntopbuf[2][INET6_ADDRSTRLEN], ifnamebuf[IFNAMSIZ];
427 "<%s> RR received from %s to %s on %s",
429 inet_ntop(AF_INET6, &from->sin6_addr,
430 ntopbuf[0], INET6_ADDRSTRLEN),
431 inet_ntop(AF_INET6, &dst, ntopbuf[1], INET6_ADDRSTRLEN),
432 if_indextoname(pi->ipi6_ifindex, ifnamebuf));
434 /* packet validation based on Section 4.1 of RFC2894 */
435 if (len < sizeof(struct icmp6_router_renum)) {
437 "<%s>: RR short message (size %d) from %s to %s on %s",
439 inet_ntop(AF_INET6, &from->sin6_addr,
440 ntopbuf[0], INET6_ADDRSTRLEN),
441 inet_ntop(AF_INET6, &dst, ntopbuf[1], INET6_ADDRSTRLEN),
442 if_indextoname(pi->ipi6_ifindex, ifnamebuf));
447 * If the IPv6 destination address is neither an All Routers multicast
448 * address [AARCH] nor one of the receiving router's unicast addresses,
449 * the message MUST be discarded and SHOULD be logged to network
451 * We rely on the kernel input routine for unicast addresses, and thus
452 * check multicast destinations only.
454 if (IN6_IS_ADDR_MULTICAST(&pi->ipi6_addr) &&
455 !IN6_ARE_ADDR_EQUAL(&in6a_site_allrouters, &pi->ipi6_addr)) {
457 "<%s>: RR message with invalid destination (%s) "
460 inet_ntop(AF_INET6, &dst, ntopbuf[0], INET6_ADDRSTRLEN),
461 inet_ntop(AF_INET6, &from->sin6_addr,
462 ntopbuf[1], INET6_ADDRSTRLEN),
463 if_indextoname(pi->ipi6_ifindex, ifnamebuf));
467 rr_rcvifindex = pi->ipi6_ifindex;
469 switch (rr->rr_code) {
470 case ICMP6_ROUTER_RENUMBERING_COMMAND:
471 rr_command_input(len, rr, &from->sin6_addr, dst);
472 /* TODO: send reply msg */
474 case ICMP6_ROUTER_RENUMBERING_RESULT:
475 /* RESULT will be processed by rrenumd */
477 case ICMP6_ROUTER_RENUMBERING_SEQNUM_RESET:
478 /* TODO: sequence number reset */
481 syslog(LOG_ERR, "<%s> received unknown code %d",
482 __FUNCTION__, rr->rr_code);