in6_ifattach.c revision 126263
1/*	$FreeBSD: head/sys/netinet6/in6_ifattach.c 126263 2004-02-26 03:53:54Z mlaier $	*/
2/*	$KAME: in6_ifattach.c,v 1.118 2001/05/24 07:44:00 itojun Exp $	*/
3
4/*
5 * Copyright (C) 1995, 1996, 1997, and 1998 WIDE Project.
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 * 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.
19 *
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
30 * SUCH DAMAGE.
31 */
32
33#include <sys/param.h>
34#include <sys/systm.h>
35#include <sys/malloc.h>
36#include <sys/socket.h>
37#include <sys/sockio.h>
38#include <sys/kernel.h>
39#include <sys/syslog.h>
40#include <sys/md5.h>
41
42#include <net/if.h>
43#include <net/if_dl.h>
44#include <net/if_types.h>
45#include <net/route.h>
46
47#include <netinet/in.h>
48#include <netinet/in_var.h>
49#include <netinet/if_ether.h>
50#include <netinet/in_pcb.h>
51
52#include <netinet/ip6.h>
53#include <netinet6/ip6_var.h>
54#include <netinet6/in6_var.h>
55#include <netinet6/in6_pcb.h>
56#include <netinet6/in6_ifattach.h>
57#include <netinet6/ip6_var.h>
58#include <netinet6/nd6.h>
59#include <netinet6/scope6_var.h>
60
61#include <net/net_osdep.h>
62
63unsigned long in6_maxmtu = 0;
64
65#ifdef IP6_AUTO_LINKLOCAL
66int ip6_auto_linklocal = IP6_AUTO_LINKLOCAL;
67#else
68int ip6_auto_linklocal = 1;	/* enable by default */
69#endif
70
71struct callout in6_tmpaddrtimer_ch;
72
73extern struct inpcbinfo udbinfo;
74extern struct inpcbinfo ripcbinfo;
75
76static int get_rand_ifid __P((struct ifnet *, struct in6_addr *));
77static int generate_tmp_ifid __P((u_int8_t *, const u_int8_t *, u_int8_t *));
78static int get_hw_ifid __P((struct ifnet *, struct in6_addr *));
79static int get_ifid __P((struct ifnet *, struct ifnet *, struct in6_addr *));
80static int in6_ifattach_linklocal __P((struct ifnet *, struct ifnet *));
81static int in6_ifattach_loopback __P((struct ifnet *));
82
83#define EUI64_GBIT	0x01
84#define EUI64_UBIT	0x02
85#define EUI64_TO_IFID(in6)	do {(in6)->s6_addr[8] ^= EUI64_UBIT; } while (0)
86#define EUI64_GROUP(in6)	((in6)->s6_addr[8] & EUI64_GBIT)
87#define EUI64_INDIVIDUAL(in6)	(!EUI64_GROUP(in6))
88#define EUI64_LOCAL(in6)	((in6)->s6_addr[8] & EUI64_UBIT)
89#define EUI64_UNIVERSAL(in6)	(!EUI64_LOCAL(in6))
90
91#define IFID_LOCAL(in6)		(!EUI64_LOCAL(in6))
92#define IFID_UNIVERSAL(in6)	(!EUI64_UNIVERSAL(in6))
93
94/*
95 * Generate a last-resort interface identifier, when the machine has no
96 * IEEE802/EUI64 address sources.
97 * The goal here is to get an interface identifier that is
98 * (1) random enough and (2) does not change across reboot.
99 * We currently use MD5(hostname) for it.
100 */
101static int
102get_rand_ifid(ifp, in6)
103	struct ifnet *ifp;
104	struct in6_addr *in6;	/* upper 64bits are preserved */
105{
106	MD5_CTX ctxt;
107	u_int8_t digest[16];
108	int hostnamelen	= strlen(hostname);
109
110#if 0
111	/* we need at least several letters as seed for ifid */
112	if (hostnamelen < 3)
113		return -1;
114#endif
115
116	/* generate 8 bytes of pseudo-random value. */
117	bzero(&ctxt, sizeof(ctxt));
118	MD5Init(&ctxt);
119	MD5Update(&ctxt, hostname, hostnamelen);
120	MD5Final(digest, &ctxt);
121
122	/* assumes sizeof(digest) > sizeof(ifid) */
123	bcopy(digest, &in6->s6_addr[8], 8);
124
125	/* make sure to set "u" bit to local, and "g" bit to individual. */
126	in6->s6_addr[8] &= ~EUI64_GBIT;	/* g bit to "individual" */
127	in6->s6_addr[8] |= EUI64_UBIT;	/* u bit to "local" */
128
129	/* convert EUI64 into IPv6 interface identifier */
130	EUI64_TO_IFID(in6);
131
132	return 0;
133}
134
135static int
136generate_tmp_ifid(seed0, seed1, ret)
137	u_int8_t *seed0, *ret;
138	const u_int8_t *seed1;
139{
140	MD5_CTX ctxt;
141	u_int8_t seed[16], digest[16], nullbuf[8];
142	u_int32_t val32;
143
144	/* If there's no hisotry, start with a random seed. */
145	bzero(nullbuf, sizeof(nullbuf));
146	if (bcmp(nullbuf, seed0, sizeof(nullbuf)) == 0) {
147		int i;
148
149		for (i = 0; i < 2; i++) {
150			val32 = arc4random();
151			bcopy(&val32, seed + sizeof(val32) * i, sizeof(val32));
152		}
153	} else
154		bcopy(seed0, seed, 8);
155
156	/* copy the right-most 64-bits of the given address */
157	/* XXX assumption on the size of IFID */
158	bcopy(seed1, &seed[8], 8);
159
160	if (0) {		/* for debugging purposes only */
161		int i;
162
163		printf("generate_tmp_ifid: new randomized ID from: ");
164		for (i = 0; i < 16; i++)
165			printf("%02x", seed[i]);
166		printf(" ");
167	}
168
169	/* generate 16 bytes of pseudo-random value. */
170	bzero(&ctxt, sizeof(ctxt));
171	MD5Init(&ctxt);
172	MD5Update(&ctxt, seed, sizeof(seed));
173	MD5Final(digest, &ctxt);
174
175	/*
176	 * RFC 3041 3.2.1. (3)
177	 * Take the left-most 64-bits of the MD5 digest and set bit 6 (the
178	 * left-most bit is numbered 0) to zero.
179	 */
180	bcopy(digest, ret, 8);
181	ret[0] &= ~EUI64_UBIT;
182
183	/*
184	 * XXX: we'd like to ensure that the generated value is not zero
185	 * for simplicity.  If the caclculated digest happens to be zero,
186	 * use a random non-zero value as the last resort.
187	 */
188	if (bcmp(nullbuf, ret, sizeof(nullbuf)) == 0) {
189		log(LOG_INFO,
190		    "generate_tmp_ifid: computed MD5 value is zero.\n");
191
192		val32 = arc4random();
193		val32 = 1 + (val32 % (0xffffffff - 1));
194	}
195
196	/*
197	 * RFC 3041 3.2.1. (4)
198	 * Take the rightmost 64-bits of the MD5 digest and save them in
199	 * stable storage as the history value to be used in the next
200	 * iteration of the algorithm.
201	 */
202	bcopy(&digest[8], seed0, 8);
203
204	if (0) {		/* for debugging purposes only */
205		int i;
206
207		printf("to: ");
208		for (i = 0; i < 16; i++)
209			printf("%02x", digest[i]);
210		printf("\n");
211	}
212
213	return 0;
214}
215
216/*
217 * Get interface identifier for the specified interface.
218 * XXX assumes single sockaddr_dl (AF_LINK address) per an interface
219 */
220static int
221get_hw_ifid(ifp, in6)
222	struct ifnet *ifp;
223	struct in6_addr *in6;	/* upper 64bits are preserved */
224{
225	struct ifaddr *ifa;
226	struct sockaddr_dl *sdl;
227	u_int8_t *addr;
228	size_t addrlen;
229	static u_int8_t allzero[8] = { 0, 0, 0, 0, 0, 0, 0, 0 };
230	static u_int8_t allone[8] =
231		{ 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff };
232
233	for (ifa = ifp->if_addrlist.tqh_first;
234	     ifa;
235	     ifa = ifa->ifa_list.tqe_next) {
236		if (ifa->ifa_addr->sa_family != AF_LINK)
237			continue;
238		sdl = (struct sockaddr_dl *)ifa->ifa_addr;
239		if (sdl == NULL)
240			continue;
241		if (sdl->sdl_alen == 0)
242			continue;
243
244		goto found;
245	}
246
247	return -1;
248
249found:
250	addr = LLADDR(sdl);
251	addrlen = sdl->sdl_alen;
252
253	/* get EUI64 */
254	switch (ifp->if_type) {
255	case IFT_ETHER:
256	case IFT_FDDI:
257	case IFT_ISO88025:
258	case IFT_ATM:
259	case IFT_IEEE1394:
260#ifdef IFT_IEEE80211
261	case IFT_IEEE80211:
262#endif
263		/* IEEE802/EUI64 cases - what others? */
264		/* IEEE1394 uses 16byte length address starting with EUI64 */
265		if (addrlen > 8)
266			addrlen = 8;
267
268		/* look at IEEE802/EUI64 only */
269		if (addrlen != 8 && addrlen != 6)
270			return -1;
271
272		/*
273		 * check for invalid MAC address - on bsdi, we see it a lot
274		 * since wildboar configures all-zero MAC on pccard before
275		 * card insertion.
276		 */
277		if (bcmp(addr, allzero, addrlen) == 0)
278			return -1;
279		if (bcmp(addr, allone, addrlen) == 0)
280			return -1;
281
282		/* make EUI64 address */
283		if (addrlen == 8)
284			bcopy(addr, &in6->s6_addr[8], 8);
285		else if (addrlen == 6) {
286			in6->s6_addr[8] = addr[0];
287			in6->s6_addr[9] = addr[1];
288			in6->s6_addr[10] = addr[2];
289			in6->s6_addr[11] = 0xff;
290			in6->s6_addr[12] = 0xfe;
291			in6->s6_addr[13] = addr[3];
292			in6->s6_addr[14] = addr[4];
293			in6->s6_addr[15] = addr[5];
294		}
295		break;
296
297	case IFT_ARCNET:
298		if (addrlen != 1)
299			return -1;
300		if (!addr[0])
301			return -1;
302
303		bzero(&in6->s6_addr[8], 8);
304		in6->s6_addr[15] = addr[0];
305
306		/*
307		 * due to insufficient bitwidth, we mark it local.
308		 */
309		in6->s6_addr[8] &= ~EUI64_GBIT;	/* g bit to "individual" */
310		in6->s6_addr[8] |= EUI64_UBIT;	/* u bit to "local" */
311		break;
312
313	case IFT_GIF:
314#ifdef IFT_STF
315	case IFT_STF:
316#endif
317		/*
318		 * RFC2893 says: "SHOULD use IPv4 address as ifid source".
319		 * however, IPv4 address is not very suitable as unique
320		 * identifier source (can be renumbered).
321		 * we don't do this.
322		 */
323		return -1;
324
325	default:
326		return -1;
327	}
328
329	/* sanity check: g bit must not indicate "group" */
330	if (EUI64_GROUP(in6))
331		return -1;
332
333	/* convert EUI64 into IPv6 interface identifier */
334	EUI64_TO_IFID(in6);
335
336	/*
337	 * sanity check: ifid must not be all zero, avoid conflict with
338	 * subnet router anycast
339	 */
340	if ((in6->s6_addr[8] & ~(EUI64_GBIT | EUI64_UBIT)) == 0x00 &&
341	    bcmp(&in6->s6_addr[9], allzero, 7) == 0) {
342		return -1;
343	}
344
345	return 0;
346}
347
348/*
349 * Get interface identifier for the specified interface.  If it is not
350 * available on ifp0, borrow interface identifier from other information
351 * sources.
352 */
353static int
354get_ifid(ifp0, altifp, in6)
355	struct ifnet *ifp0;
356	struct ifnet *altifp;	/* secondary EUI64 source */
357	struct in6_addr *in6;
358{
359	struct ifnet *ifp;
360
361	/* first, try to get it from the interface itself */
362	if (get_hw_ifid(ifp0, in6) == 0) {
363		nd6log((LOG_DEBUG, "%s: got interface identifier from itself\n",
364		    if_name(ifp0)));
365		goto success;
366	}
367
368	/* try secondary EUI64 source. this basically is for ATM PVC */
369	if (altifp && get_hw_ifid(altifp, in6) == 0) {
370		nd6log((LOG_DEBUG, "%s: got interface identifier from %s\n",
371		    if_name(ifp0), if_name(altifp)));
372		goto success;
373	}
374
375	/* next, try to get it from some other hardware interface */
376	IFNET_RLOCK();
377	for (ifp = ifnet.tqh_first; ifp; ifp = ifp->if_list.tqe_next) {
378		if (ifp == ifp0)
379			continue;
380		if (get_hw_ifid(ifp, in6) != 0)
381			continue;
382
383		/*
384		 * to borrow ifid from other interface, ifid needs to be
385		 * globally unique
386		 */
387		if (IFID_UNIVERSAL(in6)) {
388			nd6log((LOG_DEBUG,
389			    "%s: borrow interface identifier from %s\n",
390			    if_name(ifp0), if_name(ifp)));
391			IFNET_RUNLOCK();
392			goto success;
393		}
394	}
395	IFNET_RUNLOCK();
396
397	/* last resort: get from random number source */
398	if (get_rand_ifid(ifp, in6) == 0) {
399		nd6log((LOG_DEBUG,
400		    "%s: interface identifier generated by random number\n",
401		    if_name(ifp0)));
402		goto success;
403	}
404
405	printf("%s: failed to get interface identifier\n", if_name(ifp0));
406	return -1;
407
408success:
409	nd6log((LOG_INFO, "%s: ifid: %02x:%02x:%02x:%02x:%02x:%02x:%02x:%02x\n",
410	    if_name(ifp0), in6->s6_addr[8], in6->s6_addr[9], in6->s6_addr[10],
411	    in6->s6_addr[11], in6->s6_addr[12], in6->s6_addr[13],
412	    in6->s6_addr[14], in6->s6_addr[15]));
413	return 0;
414}
415
416static int
417in6_ifattach_linklocal(ifp, altifp)
418	struct ifnet *ifp;
419	struct ifnet *altifp;	/* secondary EUI64 source */
420{
421	struct in6_ifaddr *ia;
422	struct in6_aliasreq ifra;
423	struct nd_prefix pr0;
424	int i, error;
425
426	/*
427	 * configure link-local address.
428	 */
429	bzero(&ifra, sizeof(ifra));
430
431	/*
432	 * in6_update_ifa() does not use ifra_name, but we accurately set it
433	 * for safety.
434	 */
435	strncpy(ifra.ifra_name, if_name(ifp), sizeof(ifra.ifra_name));
436
437	ifra.ifra_addr.sin6_family = AF_INET6;
438	ifra.ifra_addr.sin6_len = sizeof(struct sockaddr_in6);
439	ifra.ifra_addr.sin6_addr.s6_addr16[0] = htons(0xfe80);
440	ifra.ifra_addr.sin6_addr.s6_addr16[1] = htons(ifp->if_index); /* XXX */
441	ifra.ifra_addr.sin6_addr.s6_addr32[1] = 0;
442	if ((ifp->if_flags & IFF_LOOPBACK) != 0) {
443		ifra.ifra_addr.sin6_addr.s6_addr32[2] = 0;
444		ifra.ifra_addr.sin6_addr.s6_addr32[3] = htonl(1);
445	} else {
446		if (get_ifid(ifp, altifp, &ifra.ifra_addr.sin6_addr) != 0) {
447			nd6log((LOG_ERR,
448			    "%s: no ifid available\n", if_name(ifp)));
449			return (-1);
450		}
451	}
452
453	ifra.ifra_prefixmask.sin6_len = sizeof(struct sockaddr_in6);
454	ifra.ifra_prefixmask.sin6_family = AF_INET6;
455	ifra.ifra_prefixmask.sin6_addr = in6mask64;
456	/* link-local addresses should NEVER expire. */
457	ifra.ifra_lifetime.ia6t_vltime = ND6_INFINITE_LIFETIME;
458	ifra.ifra_lifetime.ia6t_pltime = ND6_INFINITE_LIFETIME;
459
460	/*
461	 * Do not let in6_update_ifa() do DAD, since we need a random delay
462	 * before sending an NS at the first time the interface becomes up.
463	 * Instead, in6_if_up() will start DAD with a proper random delay.
464	 */
465	ifra.ifra_flags |= IN6_IFF_NODAD;
466
467	/*
468	 * Now call in6_update_ifa() to do a bunch of procedures to configure
469	 * a link-local address. We can set NULL to the 3rd argument, because
470	 * we know there's no other link-local address on the interface
471	 * and therefore we are adding one (instead of updating one).
472	 */
473	if ((error = in6_update_ifa(ifp, &ifra, NULL)) != 0) {
474		/*
475		 * XXX: When the interface does not support IPv6, this call
476		 * would fail in the SIOCSIFADDR ioctl.  I believe the
477		 * notification is rather confusing in this case, so just
478		 * suppress it.  (jinmei@kame.net 20010130)
479		 */
480		if (error != EAFNOSUPPORT)
481			log(LOG_NOTICE, "in6_ifattach_linklocal: failed to "
482			    "configure a link-local address on %s "
483			    "(errno=%d)\n",
484			    if_name(ifp), error);
485		return (-1);
486	}
487
488	/*
489	 * Adjust ia6_flags so that in6_if_up will perform DAD.
490	 * XXX: Some P2P interfaces seem not to send packets just after
491	 * becoming up, so we skip p2p interfaces for safety.
492	 */
493	ia = in6ifa_ifpforlinklocal(ifp, 0); /* ia must not be NULL */
494#ifdef DIAGNOSTIC
495	if (!ia) {
496		panic("ia == NULL in in6_ifattach_linklocal");
497		/* NOTREACHED */
498	}
499#endif
500	if (in6if_do_dad(ifp) && (ifp->if_flags & IFF_POINTOPOINT) == 0) {
501		ia->ia6_flags &= ~IN6_IFF_NODAD;
502		ia->ia6_flags |= IN6_IFF_TENTATIVE;
503	}
504
505	/*
506	 * Make the link-local prefix (fe80::%link/64) as on-link.
507	 * Since we'd like to manage prefixes separately from addresses,
508	 * we make an ND6 prefix structure for the link-local prefix,
509	 * and add it to the prefix list as a never-expire prefix.
510	 * XXX: this change might affect some existing code base...
511	 */
512	bzero(&pr0, sizeof(pr0));
513	pr0.ndpr_ifp = ifp;
514	/* this should be 64 at this moment. */
515	pr0.ndpr_plen = in6_mask2len(&ifra.ifra_prefixmask.sin6_addr, NULL);
516	pr0.ndpr_mask = ifra.ifra_prefixmask.sin6_addr;
517	pr0.ndpr_prefix = ifra.ifra_addr;
518	/* apply the mask for safety. (nd6_prelist_add will apply it again) */
519	for (i = 0; i < 4; i++) {
520		pr0.ndpr_prefix.sin6_addr.s6_addr32[i] &=
521		    in6mask64.s6_addr32[i];
522	}
523	/*
524	 * Initialize parameters.  The link-local prefix must always be
525	 * on-link, and its lifetimes never expire.
526	 */
527	pr0.ndpr_raf_onlink = 1;
528	pr0.ndpr_raf_auto = 1;	/* probably meaningless */
529	pr0.ndpr_vltime = ND6_INFINITE_LIFETIME;
530	pr0.ndpr_pltime = ND6_INFINITE_LIFETIME;
531	/*
532	 * Since there is no other link-local addresses, nd6_prefix_lookup()
533	 * probably returns NULL.  However, we cannot always expect the result.
534	 * For example, if we first remove the (only) existing link-local
535	 * address, and then reconfigure another one, the prefix is still
536	 * valid with referring to the old link-local address.
537	 */
538	if (nd6_prefix_lookup(&pr0) == NULL) {
539		if ((error = nd6_prelist_add(&pr0, NULL, NULL)) != 0)
540			return (error);
541	}
542
543	return 0;
544}
545
546static int
547in6_ifattach_loopback(ifp)
548	struct ifnet *ifp;	/* must be IFT_LOOP */
549{
550	struct in6_aliasreq ifra;
551	int error;
552
553	bzero(&ifra, sizeof(ifra));
554
555	/*
556	 * in6_update_ifa() does not use ifra_name, but we accurately set it
557	 * for safety.
558	 */
559	strncpy(ifra.ifra_name, if_name(ifp), sizeof(ifra.ifra_name));
560
561	ifra.ifra_prefixmask.sin6_len = sizeof(struct sockaddr_in6);
562	ifra.ifra_prefixmask.sin6_family = AF_INET6;
563	ifra.ifra_prefixmask.sin6_addr = in6mask128;
564
565	/*
566	 * Always initialize ia_dstaddr (= broadcast address) to loopback
567	 * address.  Follows IPv4 practice - see in_ifinit().
568	 */
569	ifra.ifra_dstaddr.sin6_len = sizeof(struct sockaddr_in6);
570	ifra.ifra_dstaddr.sin6_family = AF_INET6;
571	ifra.ifra_dstaddr.sin6_addr = in6addr_loopback;
572
573	ifra.ifra_addr.sin6_len = sizeof(struct sockaddr_in6);
574	ifra.ifra_addr.sin6_family = AF_INET6;
575	ifra.ifra_addr.sin6_addr = in6addr_loopback;
576
577	/* the loopback  address should NEVER expire. */
578	ifra.ifra_lifetime.ia6t_vltime = ND6_INFINITE_LIFETIME;
579	ifra.ifra_lifetime.ia6t_pltime = ND6_INFINITE_LIFETIME;
580
581	/* we don't need to perform DAD on loopback interfaces. */
582	ifra.ifra_flags |= IN6_IFF_NODAD;
583
584	/* skip registration to the prefix list. XXX should be temporary. */
585	ifra.ifra_flags |= IN6_IFF_NOPFX;
586
587	/*
588	 * We are sure that this is a newly assigned address, so we can set
589	 * NULL to the 3rd arg.
590	 */
591	if ((error = in6_update_ifa(ifp, &ifra, NULL)) != 0) {
592		log(LOG_ERR, "in6_ifattach_loopback: failed to configure "
593		    "the loopback address on %s (errno=%d)\n",
594		    if_name(ifp), error);
595		return (-1);
596	}
597
598	return 0;
599}
600
601/*
602 * compute NI group address, based on the current hostname setting.
603 * see draft-ietf-ipngwg-icmp-name-lookup-* (04 and later).
604 *
605 * when ifp == NULL, the caller is responsible for filling scopeid.
606 */
607int
608in6_nigroup(ifp, name, namelen, in6)
609	struct ifnet *ifp;
610	const char *name;
611	int namelen;
612	struct in6_addr *in6;
613{
614	const char *p;
615	u_char *q;
616	MD5_CTX ctxt;
617	u_int8_t digest[16];
618	char l;
619	char n[64];	/* a single label must not exceed 63 chars */
620
621	if (!namelen || !name)
622		return -1;
623
624	p = name;
625	while (p && *p && *p != '.' && p - name < namelen)
626		p++;
627	if (p - name > sizeof(n) - 1)
628		return -1;	/* label too long */
629	l = p - name;
630	strncpy(n, name, l);
631	n[(int)l] = '\0';
632	for (q = n; *q; q++) {
633		if ('A' <= *q && *q <= 'Z')
634			*q = *q - 'A' + 'a';
635	}
636
637	/* generate 8 bytes of pseudo-random value. */
638	bzero(&ctxt, sizeof(ctxt));
639	MD5Init(&ctxt);
640	MD5Update(&ctxt, &l, sizeof(l));
641	MD5Update(&ctxt, n, l);
642	MD5Final(digest, &ctxt);
643
644	bzero(in6, sizeof(*in6));
645	in6->s6_addr16[0] = htons(0xff02);
646	if (ifp)
647		in6->s6_addr16[1] = htons(ifp->if_index);
648	in6->s6_addr8[11] = 2;
649	bcopy(digest, &in6->s6_addr32[3], sizeof(in6->s6_addr32[3]));
650
651	return 0;
652}
653
654/*
655 * XXX multiple loopback interface needs more care.  for instance,
656 * nodelocal address needs to be configured onto only one of them.
657 * XXX multiple link-local address case
658 */
659void
660in6_ifattach(ifp, altifp)
661	struct ifnet *ifp;
662	struct ifnet *altifp;	/* secondary EUI64 source */
663{
664	struct in6_ifaddr *ia;
665	struct in6_addr in6;
666
667	/* some of the interfaces are inherently not IPv6 capable */
668	switch (ifp->if_type) {
669#ifdef IFT_BRIDGE	/* OpenBSD 2.8, NetBSD 1.6 */
670	case IFT_BRIDGE:
671#endif
672	case IFT_PFLOG:
673	case IFT_PFSYNC:
674		return;
675	}
676
677	/*
678	 * quirks based on interface type
679	 */
680	switch (ifp->if_type) {
681#ifdef IFT_STF
682	case IFT_STF:
683		/*
684		 * 6to4 interface is a very special kind of beast.
685		 * no multicast, no linklocal.  RFC2529 specifies how to make
686		 * linklocals for 6to4 interface, but there's no use and
687		 * it is rather harmful to have one.
688		 */
689		goto statinit;
690#endif
691	default:
692		break;
693	}
694
695	/*
696	 * usually, we require multicast capability to the interface
697	 */
698	if ((ifp->if_flags & IFF_MULTICAST) == 0) {
699		log(LOG_INFO, "in6_ifattach: "
700		    "%s is not multicast capable, IPv6 not enabled\n",
701		    if_name(ifp));
702		return;
703	}
704
705	/*
706	 * assign loopback address for loopback interface.
707	 * XXX multiple loopback interface case.
708	 */
709	if ((ifp->if_flags & IFF_LOOPBACK) != 0) {
710		in6 = in6addr_loopback;
711		if (in6ifa_ifpwithaddr(ifp, &in6) == NULL) {
712			if (in6_ifattach_loopback(ifp) != 0)
713				return;
714		}
715	}
716
717	/*
718	 * assign a link-local address, if there's none.
719	 */
720	if (ip6_auto_linklocal) {
721		ia = in6ifa_ifpforlinklocal(ifp, 0);
722		if (ia == NULL) {
723			if (in6_ifattach_linklocal(ifp, altifp) == 0) {
724				/* linklocal address assigned */
725			} else {
726				/* failed to assign linklocal address. bark? */
727			}
728		}
729	}
730
731#ifdef IFT_STF			/* XXX */
732statinit:
733#endif
734
735	/* update dynamically. */
736	if (in6_maxmtu < ifp->if_mtu)
737		in6_maxmtu = ifp->if_mtu;
738}
739
740/*
741 * NOTE: in6_ifdetach() does not support loopback if at this moment.
742 * We don't need this function in bsdi, because interfaces are never removed
743 * from the ifnet list in bsdi.
744 */
745void
746in6_ifdetach(ifp)
747	struct ifnet *ifp;
748{
749	struct in6_ifaddr *ia, *oia;
750	struct ifaddr *ifa, *next;
751	struct rtentry *rt;
752	short rtflags;
753	struct sockaddr_in6 sin6;
754	struct in6_multi *in6m;
755	struct in6_multi *in6m_next;
756
757	/* nuke prefix list.  this may try to remove some of ifaddrs as well */
758	in6_purgeprefix(ifp);
759
760	/* remove neighbor management table */
761	nd6_purge(ifp);
762
763	/* nuke any of IPv6 addresses we have */
764	for (ifa = ifp->if_addrlist.tqh_first; ifa; ifa = next) {
765		next = ifa->ifa_list.tqe_next;
766		if (ifa->ifa_addr->sa_family != AF_INET6)
767			continue;
768		in6_purgeaddr(ifa);
769	}
770
771	/* undo everything done by in6_ifattach(), just in case */
772	for (ifa = ifp->if_addrlist.tqh_first; ifa; ifa = next) {
773		next = ifa->ifa_list.tqe_next;
774
775		if (ifa->ifa_addr->sa_family != AF_INET6
776		 || !IN6_IS_ADDR_LINKLOCAL(&satosin6(&ifa->ifa_addr)->sin6_addr)) {
777			continue;
778		}
779
780		ia = (struct in6_ifaddr *)ifa;
781
782		/* remove from the routing table */
783		if ((ia->ia_flags & IFA_ROUTE) &&
784		    (rt = rtalloc1((struct sockaddr *)&ia->ia_addr, 0, 0UL))) {
785			rtflags = rt->rt_flags;
786			rtfree(rt);
787			rtrequest(RTM_DELETE, (struct sockaddr *)&ia->ia_addr,
788			    (struct sockaddr *)&ia->ia_addr,
789			    (struct sockaddr *)&ia->ia_prefixmask,
790			    rtflags, (struct rtentry **)0);
791		}
792
793		/* remove from the linked list */
794		TAILQ_REMOVE(&ifp->if_addrlist, (struct ifaddr *)ia, ifa_list);
795		IFAFREE(&ia->ia_ifa);
796
797		/* also remove from the IPv6 address chain(itojun&jinmei) */
798		oia = ia;
799		if (oia == (ia = in6_ifaddr))
800			in6_ifaddr = ia->ia_next;
801		else {
802			while (ia->ia_next && (ia->ia_next != oia))
803				ia = ia->ia_next;
804			if (ia->ia_next)
805				ia->ia_next = oia->ia_next;
806			else {
807				nd6log((LOG_ERR,
808				    "%s: didn't unlink in6ifaddr from list\n",
809				    if_name(ifp)));
810			}
811		}
812
813		IFAFREE(&oia->ia_ifa);
814	}
815
816	/* leave from all multicast groups joined */
817
818	if (udbinfo.listhead != NULL)
819		in6_pcbpurgeif0(LIST_FIRST(udbinfo.listhead), ifp);
820	if (ripcbinfo.listhead != NULL)
821		in6_pcbpurgeif0(LIST_FIRST(ripcbinfo.listhead), ifp);
822
823	for (in6m = LIST_FIRST(&in6_multihead); in6m; in6m = in6m_next) {
824		in6m_next = LIST_NEXT(in6m, in6m_entry);
825		if (in6m->in6m_ifp != ifp)
826			continue;
827		in6_delmulti(in6m);
828		in6m = NULL;
829	}
830
831	/*
832	 * remove neighbor management table.  we call it twice just to make
833	 * sure we nuke everything.  maybe we need just one call.
834	 * XXX: since the first call did not release addresses, some prefixes
835	 * might remain.  We should call nd6_purge() again to release the
836	 * prefixes after removing all addresses above.
837	 * (Or can we just delay calling nd6_purge until at this point?)
838	 */
839	nd6_purge(ifp);
840
841	/* remove route to link-local allnodes multicast (ff02::1) */
842	bzero(&sin6, sizeof(sin6));
843	sin6.sin6_len = sizeof(struct sockaddr_in6);
844	sin6.sin6_family = AF_INET6;
845	sin6.sin6_addr = in6addr_linklocal_allnodes;
846	sin6.sin6_addr.s6_addr16[1] = htons(ifp->if_index);
847	/* XXX grab lock first to avoid LOR */
848	if (rt_tables[AF_INET6] != NULL) {
849		RADIX_NODE_HEAD_LOCK(rt_tables[AF_INET6]);
850		rt = rtalloc1((struct sockaddr *)&sin6, 0, 0UL);
851		if (rt) {
852			if (rt->rt_ifp == ifp)
853				rtexpunge(rt);
854			RTFREE_LOCKED(rt);
855		}
856		RADIX_NODE_HEAD_UNLOCK(rt_tables[AF_INET6]);
857	}
858}
859
860void
861in6_get_tmpifid(ifp, retbuf, baseid, generate)
862	struct ifnet *ifp;
863	u_int8_t *retbuf;
864	const u_int8_t *baseid;
865	int generate;
866{
867	u_int8_t nullbuf[8];
868	struct nd_ifinfo *ndi = ND_IFINFO(ifp);
869
870	bzero(nullbuf, sizeof(nullbuf));
871	if (bcmp(ndi->randomid, nullbuf, sizeof(nullbuf)) == 0) {
872		/* we've never created a random ID.  Create a new one. */
873		generate = 1;
874	}
875
876	if (generate) {
877		bcopy(baseid, ndi->randomseed1, sizeof(ndi->randomseed1));
878
879		/* generate_tmp_ifid will update seedn and buf */
880		(void)generate_tmp_ifid(ndi->randomseed0, ndi->randomseed1,
881		    ndi->randomid);
882	}
883	bcopy(ndi->randomid, retbuf, 8);
884}
885
886void
887in6_tmpaddrtimer(ignored_arg)
888	void *ignored_arg;
889{
890	struct nd_ifinfo *ndi;
891	u_int8_t nullbuf[8];
892	struct ifnet *ifp;
893	int s = splnet();
894
895	callout_reset(&in6_tmpaddrtimer_ch,
896	    (ip6_temp_preferred_lifetime - ip6_desync_factor -
897	    ip6_temp_regen_advance) * hz, in6_tmpaddrtimer, NULL);
898
899	bzero(nullbuf, sizeof(nullbuf));
900	for (ifp = TAILQ_FIRST(&ifnet); ifp; ifp = TAILQ_NEXT(ifp, if_list)) {
901		ndi = ND_IFINFO(ifp);
902		if (bcmp(ndi->randomid, nullbuf, sizeof(nullbuf)) != 0) {
903			/*
904			 * We've been generating a random ID on this interface.
905			 * Create a new one.
906			 */
907			(void)generate_tmp_ifid(ndi->randomseed0,
908			    ndi->randomseed1, ndi->randomid);
909		}
910	}
911
912	splx(s);
913}
914