in6_ifattach.c revision 341087
1/*-
2 * Copyright (C) 1995, 1996, 1997, and 1998 WIDE Project.
3 * All rights reserved.
4 *
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
7 * are met:
8 * 1. Redistributions of source code must retain the above copyright
9 *    notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright
11 *    notice, this list of conditions and the following disclaimer in the
12 *    documentation and/or other materials provided with the distribution.
13 * 3. Neither the name of the project nor the names of its contributors
14 *    may be used to endorse or promote products derived from this software
15 *    without specific prior written permission.
16 *
17 * THIS SOFTWARE IS PROVIDED BY THE PROJECT AND CONTRIBUTORS ``AS IS'' AND
18 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
19 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
20 * ARE DISCLAIMED.  IN NO EVENT SHALL THE PROJECT OR CONTRIBUTORS BE LIABLE
21 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
22 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
23 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
24 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
25 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
26 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
27 * SUCH DAMAGE.
28 *
29 *	$KAME: in6_ifattach.c,v 1.118 2001/05/24 07:44:00 itojun Exp $
30 */
31
32#include <sys/cdefs.h>
33__FBSDID("$FreeBSD: stable/11/sys/netinet6/in6_ifattach.c 341087 2018-11-27 19:40:18Z vangyzen $");
34
35#include <sys/param.h>
36#include <sys/systm.h>
37#include <sys/malloc.h>
38#include <sys/socket.h>
39#include <sys/sockio.h>
40#include <sys/jail.h>
41#include <sys/kernel.h>
42#include <sys/lock.h>
43#include <sys/proc.h>
44#include <sys/rmlock.h>
45#include <sys/syslog.h>
46#include <sys/md5.h>
47
48#include <net/if.h>
49#include <net/if_var.h>
50#include <net/if_dl.h>
51#include <net/if_types.h>
52#include <net/route.h>
53#include <net/vnet.h>
54
55#include <netinet/in.h>
56#include <netinet/in_var.h>
57#include <netinet/if_ether.h>
58#include <netinet/in_pcb.h>
59#include <netinet/ip_var.h>
60#include <netinet/udp.h>
61#include <netinet/udp_var.h>
62
63#include <netinet/ip6.h>
64#include <netinet6/ip6_var.h>
65#include <netinet6/in6_var.h>
66#include <netinet6/in6_pcb.h>
67#include <netinet6/in6_ifattach.h>
68#include <netinet6/ip6_var.h>
69#include <netinet6/nd6.h>
70#include <netinet6/mld6_var.h>
71#include <netinet6/scope6_var.h>
72
73VNET_DEFINE(unsigned long, in6_maxmtu) = 0;
74
75#ifdef IP6_AUTO_LINKLOCAL
76VNET_DEFINE(int, ip6_auto_linklocal) = IP6_AUTO_LINKLOCAL;
77#else
78VNET_DEFINE(int, ip6_auto_linklocal) = 1;	/* enabled by default */
79#endif
80
81VNET_DEFINE(struct callout, in6_tmpaddrtimer_ch);
82#define	V_in6_tmpaddrtimer_ch		VNET(in6_tmpaddrtimer_ch)
83
84VNET_DECLARE(struct inpcbinfo, ripcbinfo);
85#define	V_ripcbinfo			VNET(ripcbinfo)
86
87static int get_rand_ifid(struct ifnet *, struct in6_addr *);
88static int generate_tmp_ifid(u_int8_t *, const u_int8_t *, u_int8_t *);
89static int get_ifid(struct ifnet *, struct ifnet *, struct in6_addr *);
90static int in6_ifattach_linklocal(struct ifnet *, struct ifnet *);
91static int in6_ifattach_loopback(struct ifnet *);
92static void in6_purgemaddrs(struct ifnet *);
93
94#define EUI64_GBIT	0x01
95#define EUI64_UBIT	0x02
96#define EUI64_TO_IFID(in6)	do {(in6)->s6_addr[8] ^= EUI64_UBIT; } while (0)
97#define EUI64_GROUP(in6)	((in6)->s6_addr[8] & EUI64_GBIT)
98#define EUI64_INDIVIDUAL(in6)	(!EUI64_GROUP(in6))
99#define EUI64_LOCAL(in6)	((in6)->s6_addr[8] & EUI64_UBIT)
100#define EUI64_UNIVERSAL(in6)	(!EUI64_LOCAL(in6))
101
102#define IFID_LOCAL(in6)		(!EUI64_LOCAL(in6))
103#define IFID_UNIVERSAL(in6)	(!EUI64_UNIVERSAL(in6))
104
105/*
106 * Generate a last-resort interface identifier, when the machine has no
107 * IEEE802/EUI64 address sources.
108 * The goal here is to get an interface identifier that is
109 * (1) random enough and (2) does not change across reboot.
110 * We currently use MD5(hostname) for it.
111 *
112 * in6 - upper 64bits are preserved
113 */
114static int
115get_rand_ifid(struct ifnet *ifp, struct in6_addr *in6)
116{
117	MD5_CTX ctxt;
118	struct prison *pr;
119	u_int8_t digest[16];
120	int hostnamelen;
121
122	pr = curthread->td_ucred->cr_prison;
123	mtx_lock(&pr->pr_mtx);
124	hostnamelen = strlen(pr->pr_hostname);
125#if 0
126	/* we need at least several letters as seed for ifid */
127	if (hostnamelen < 3) {
128		mtx_unlock(&pr->pr_mtx);
129		return -1;
130	}
131#endif
132
133	/* generate 8 bytes of pseudo-random value. */
134	bzero(&ctxt, sizeof(ctxt));
135	MD5Init(&ctxt);
136	MD5Update(&ctxt, pr->pr_hostname, hostnamelen);
137	mtx_unlock(&pr->pr_mtx);
138	MD5Final(digest, &ctxt);
139
140	/* assumes sizeof(digest) > sizeof(ifid) */
141	bcopy(digest, &in6->s6_addr[8], 8);
142
143	/* make sure to set "u" bit to local, and "g" bit to individual. */
144	in6->s6_addr[8] &= ~EUI64_GBIT;	/* g bit to "individual" */
145	in6->s6_addr[8] |= EUI64_UBIT;	/* u bit to "local" */
146
147	/* convert EUI64 into IPv6 interface identifier */
148	EUI64_TO_IFID(in6);
149
150	return 0;
151}
152
153static int
154generate_tmp_ifid(u_int8_t *seed0, const u_int8_t *seed1, u_int8_t *ret)
155{
156	MD5_CTX ctxt;
157	u_int8_t seed[16], digest[16], nullbuf[8];
158	u_int32_t val32;
159
160	/* If there's no history, start with a random seed. */
161	bzero(nullbuf, sizeof(nullbuf));
162	if (bcmp(nullbuf, seed0, sizeof(nullbuf)) == 0) {
163		int i;
164
165		for (i = 0; i < 2; i++) {
166			val32 = arc4random();
167			bcopy(&val32, seed + sizeof(val32) * i, sizeof(val32));
168		}
169	} else
170		bcopy(seed0, seed, 8);
171
172	/* copy the right-most 64-bits of the given address */
173	/* XXX assumption on the size of IFID */
174	bcopy(seed1, &seed[8], 8);
175
176	if (0) {		/* for debugging purposes only */
177		int i;
178
179		printf("generate_tmp_ifid: new randomized ID from: ");
180		for (i = 0; i < 16; i++)
181			printf("%02x", seed[i]);
182		printf(" ");
183	}
184
185	/* generate 16 bytes of pseudo-random value. */
186	bzero(&ctxt, sizeof(ctxt));
187	MD5Init(&ctxt);
188	MD5Update(&ctxt, seed, sizeof(seed));
189	MD5Final(digest, &ctxt);
190
191	/*
192	 * RFC 3041 3.2.1. (3)
193	 * Take the left-most 64-bits of the MD5 digest and set bit 6 (the
194	 * left-most bit is numbered 0) to zero.
195	 */
196	bcopy(digest, ret, 8);
197	ret[0] &= ~EUI64_UBIT;
198
199	/*
200	 * XXX: we'd like to ensure that the generated value is not zero
201	 * for simplicity.  If the caclculated digest happens to be zero,
202	 * use a random non-zero value as the last resort.
203	 */
204	if (bcmp(nullbuf, ret, sizeof(nullbuf)) == 0) {
205		nd6log((LOG_INFO,
206		    "generate_tmp_ifid: computed MD5 value is zero.\n"));
207
208		val32 = arc4random();
209		val32 = 1 + (val32 % (0xffffffff - 1));
210	}
211
212	/*
213	 * RFC 3041 3.2.1. (4)
214	 * Take the rightmost 64-bits of the MD5 digest and save them in
215	 * stable storage as the history value to be used in the next
216	 * iteration of the algorithm.
217	 */
218	bcopy(&digest[8], seed0, 8);
219
220	if (0) {		/* for debugging purposes only */
221		int i;
222
223		printf("to: ");
224		for (i = 0; i < 16; i++)
225			printf("%02x", digest[i]);
226		printf("\n");
227	}
228
229	return 0;
230}
231
232/*
233 * Get interface identifier for the specified interface.
234 * XXX assumes single sockaddr_dl (AF_LINK address) per an interface
235 *
236 * in6 - upper 64bits are preserved
237 */
238int
239in6_get_hw_ifid(struct ifnet *ifp, struct in6_addr *in6)
240{
241	struct ifaddr *ifa;
242	struct sockaddr_dl *sdl;
243	u_int8_t *addr;
244	size_t addrlen;
245	static u_int8_t allzero[8] = { 0, 0, 0, 0, 0, 0, 0, 0 };
246	static u_int8_t allone[8] =
247		{ 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff };
248
249	IF_ADDR_RLOCK(ifp);
250	TAILQ_FOREACH(ifa, &ifp->if_addrhead, ifa_link) {
251		if (ifa->ifa_addr->sa_family != AF_LINK)
252			continue;
253		sdl = (struct sockaddr_dl *)ifa->ifa_addr;
254		if (sdl == NULL)
255			continue;
256		if (sdl->sdl_alen == 0)
257			continue;
258
259		goto found;
260	}
261	IF_ADDR_RUNLOCK(ifp);
262
263	return -1;
264
265found:
266	IF_ADDR_LOCK_ASSERT(ifp);
267	addr = LLADDR(sdl);
268	addrlen = sdl->sdl_alen;
269
270	/* get EUI64 */
271	switch (ifp->if_type) {
272	case IFT_BRIDGE:
273	case IFT_ETHER:
274	case IFT_L2VLAN:
275	case IFT_FDDI:
276	case IFT_ISO88025:
277	case IFT_ATM:
278	case IFT_IEEE1394:
279	case IFT_IEEE80211:
280		/* IEEE802/EUI64 cases - what others? */
281		/* IEEE1394 uses 16byte length address starting with EUI64 */
282		if (addrlen > 8)
283			addrlen = 8;
284
285		/* look at IEEE802/EUI64 only */
286		if (addrlen != 8 && addrlen != 6) {
287			IF_ADDR_RUNLOCK(ifp);
288			return -1;
289		}
290
291		/*
292		 * check for invalid MAC address - on bsdi, we see it a lot
293		 * since wildboar configures all-zero MAC on pccard before
294		 * card insertion.
295		 */
296		if (bcmp(addr, allzero, addrlen) == 0) {
297			IF_ADDR_RUNLOCK(ifp);
298			return -1;
299		}
300		if (bcmp(addr, allone, addrlen) == 0) {
301			IF_ADDR_RUNLOCK(ifp);
302			return -1;
303		}
304
305		/* make EUI64 address */
306		if (addrlen == 8)
307			bcopy(addr, &in6->s6_addr[8], 8);
308		else if (addrlen == 6) {
309			in6->s6_addr[8] = addr[0];
310			in6->s6_addr[9] = addr[1];
311			in6->s6_addr[10] = addr[2];
312			in6->s6_addr[11] = 0xff;
313			in6->s6_addr[12] = 0xfe;
314			in6->s6_addr[13] = addr[3];
315			in6->s6_addr[14] = addr[4];
316			in6->s6_addr[15] = addr[5];
317		}
318		break;
319
320	case IFT_ARCNET:
321		if (addrlen != 1) {
322			IF_ADDR_RUNLOCK(ifp);
323			return -1;
324		}
325		if (!addr[0]) {
326			IF_ADDR_RUNLOCK(ifp);
327			return -1;
328		}
329
330		bzero(&in6->s6_addr[8], 8);
331		in6->s6_addr[15] = addr[0];
332
333		/*
334		 * due to insufficient bitwidth, we mark it local.
335		 */
336		in6->s6_addr[8] &= ~EUI64_GBIT;	/* g bit to "individual" */
337		in6->s6_addr[8] |= EUI64_UBIT;	/* u bit to "local" */
338		break;
339
340	case IFT_GIF:
341	case IFT_STF:
342		/*
343		 * RFC2893 says: "SHOULD use IPv4 address as ifid source".
344		 * however, IPv4 address is not very suitable as unique
345		 * identifier source (can be renumbered).
346		 * we don't do this.
347		 */
348		IF_ADDR_RUNLOCK(ifp);
349		return -1;
350
351	default:
352		IF_ADDR_RUNLOCK(ifp);
353		return -1;
354	}
355
356	/* sanity check: g bit must not indicate "group" */
357	if (EUI64_GROUP(in6)) {
358		IF_ADDR_RUNLOCK(ifp);
359		return -1;
360	}
361
362	/* convert EUI64 into IPv6 interface identifier */
363	EUI64_TO_IFID(in6);
364
365	/*
366	 * sanity check: ifid must not be all zero, avoid conflict with
367	 * subnet router anycast
368	 */
369	if ((in6->s6_addr[8] & ~(EUI64_GBIT | EUI64_UBIT)) == 0x00 &&
370	    bcmp(&in6->s6_addr[9], allzero, 7) == 0) {
371		IF_ADDR_RUNLOCK(ifp);
372		return -1;
373	}
374
375	IF_ADDR_RUNLOCK(ifp);
376	return 0;
377}
378
379/*
380 * Get interface identifier for the specified interface.  If it is not
381 * available on ifp0, borrow interface identifier from other information
382 * sources.
383 *
384 * altifp - secondary EUI64 source
385 */
386static int
387get_ifid(struct ifnet *ifp0, struct ifnet *altifp,
388    struct in6_addr *in6)
389{
390	struct ifnet *ifp;
391
392	/* first, try to get it from the interface itself */
393	if (in6_get_hw_ifid(ifp0, in6) == 0) {
394		nd6log((LOG_DEBUG, "%s: got interface identifier from itself\n",
395		    if_name(ifp0)));
396		goto success;
397	}
398
399	/* try secondary EUI64 source. this basically is for ATM PVC */
400	if (altifp && in6_get_hw_ifid(altifp, in6) == 0) {
401		nd6log((LOG_DEBUG, "%s: got interface identifier from %s\n",
402		    if_name(ifp0), if_name(altifp)));
403		goto success;
404	}
405
406	/* next, try to get it from some other hardware interface */
407	IFNET_RLOCK_NOSLEEP();
408	TAILQ_FOREACH(ifp, &V_ifnet, if_link) {
409		if (ifp == ifp0)
410			continue;
411		if (in6_get_hw_ifid(ifp, in6) != 0)
412			continue;
413
414		/*
415		 * to borrow ifid from other interface, ifid needs to be
416		 * globally unique
417		 */
418		if (IFID_UNIVERSAL(in6)) {
419			nd6log((LOG_DEBUG,
420			    "%s: borrow interface identifier from %s\n",
421			    if_name(ifp0), if_name(ifp)));
422			IFNET_RUNLOCK_NOSLEEP();
423			goto success;
424		}
425	}
426	IFNET_RUNLOCK_NOSLEEP();
427
428	/* last resort: get from random number source */
429	if (get_rand_ifid(ifp, in6) == 0) {
430		nd6log((LOG_DEBUG,
431		    "%s: interface identifier generated by random number\n",
432		    if_name(ifp0)));
433		goto success;
434	}
435
436	printf("%s: failed to get interface identifier\n", if_name(ifp0));
437	return -1;
438
439success:
440	nd6log((LOG_INFO, "%s: ifid: %02x:%02x:%02x:%02x:%02x:%02x:%02x:%02x\n",
441	    if_name(ifp0), in6->s6_addr[8], in6->s6_addr[9], in6->s6_addr[10],
442	    in6->s6_addr[11], in6->s6_addr[12], in6->s6_addr[13],
443	    in6->s6_addr[14], in6->s6_addr[15]));
444	return 0;
445}
446
447/*
448 * altifp - secondary EUI64 source
449 */
450static int
451in6_ifattach_linklocal(struct ifnet *ifp, struct ifnet *altifp)
452{
453	struct in6_ifaddr *ia;
454	struct in6_aliasreq ifra;
455	struct nd_prefixctl pr0;
456	struct nd_prefix *pr;
457	int error;
458
459	/*
460	 * configure link-local address.
461	 */
462	in6_prepare_ifra(&ifra, NULL, &in6mask64);
463
464	ifra.ifra_addr.sin6_addr.s6_addr32[0] = htonl(0xfe800000);
465	ifra.ifra_addr.sin6_addr.s6_addr32[1] = 0;
466	if ((ifp->if_flags & IFF_LOOPBACK) != 0) {
467		ifra.ifra_addr.sin6_addr.s6_addr32[2] = 0;
468		ifra.ifra_addr.sin6_addr.s6_addr32[3] = htonl(1);
469	} else {
470		if (get_ifid(ifp, altifp, &ifra.ifra_addr.sin6_addr) != 0) {
471			nd6log((LOG_ERR,
472			    "%s: no ifid available\n", if_name(ifp)));
473			return (-1);
474		}
475	}
476	if (in6_setscope(&ifra.ifra_addr.sin6_addr, ifp, NULL))
477		return (-1);
478
479	/* link-local addresses should NEVER expire. */
480	ifra.ifra_lifetime.ia6t_vltime = ND6_INFINITE_LIFETIME;
481	ifra.ifra_lifetime.ia6t_pltime = ND6_INFINITE_LIFETIME;
482
483	/*
484	 * Now call in6_update_ifa() to do a bunch of procedures to configure
485	 * a link-local address. We can set the 3rd argument to NULL, because
486	 * we know there's no other link-local address on the interface
487	 * and therefore we are adding one (instead of updating one).
488	 */
489	if ((error = in6_update_ifa(ifp, &ifra, NULL,
490				    IN6_IFAUPDATE_DADDELAY)) != 0) {
491		/*
492		 * XXX: When the interface does not support IPv6, this call
493		 * would fail in the SIOCSIFADDR ioctl.  I believe the
494		 * notification is rather confusing in this case, so just
495		 * suppress it.  (jinmei@kame.net 20010130)
496		 */
497		if (error != EAFNOSUPPORT)
498			nd6log((LOG_NOTICE, "in6_ifattach_linklocal: failed to "
499			    "configure a link-local address on %s "
500			    "(errno=%d)\n",
501			    if_name(ifp), error));
502		return (-1);
503	}
504
505	ia = in6ifa_ifpforlinklocal(ifp, 0);
506	if (ia == NULL) {
507		/*
508		 * Another thread removed the address that we just added.
509		 * This should be rare, but it happens.
510		 */
511		nd6log((LOG_NOTICE, "%s: %s: new link-local address "
512			"disappeared\n", __func__, if_name(ifp)));
513		return (-1);
514	}
515	ifa_free(&ia->ia_ifa);
516
517	/*
518	 * Make the link-local prefix (fe80::%link/64) as on-link.
519	 * Since we'd like to manage prefixes separately from addresses,
520	 * we make an ND6 prefix structure for the link-local prefix,
521	 * and add it to the prefix list as a never-expire prefix.
522	 * XXX: this change might affect some existing code base...
523	 */
524	bzero(&pr0, sizeof(pr0));
525	pr0.ndpr_ifp = ifp;
526	/* this should be 64 at this moment. */
527	pr0.ndpr_plen = in6_mask2len(&ifra.ifra_prefixmask.sin6_addr, NULL);
528	pr0.ndpr_prefix = ifra.ifra_addr;
529	/* apply the mask for safety. (nd6_prelist_add will apply it again) */
530	IN6_MASK_ADDR(&pr0.ndpr_prefix.sin6_addr, &in6mask64);
531	/*
532	 * Initialize parameters.  The link-local prefix must always be
533	 * on-link, and its lifetimes never expire.
534	 */
535	pr0.ndpr_raf_onlink = 1;
536	pr0.ndpr_raf_auto = 1;	/* probably meaningless */
537	pr0.ndpr_vltime = ND6_INFINITE_LIFETIME;
538	pr0.ndpr_pltime = ND6_INFINITE_LIFETIME;
539	/*
540	 * Since there is no other link-local addresses, nd6_prefix_lookup()
541	 * probably returns NULL.  However, we cannot always expect the result.
542	 * For example, if we first remove the (only) existing link-local
543	 * address, and then reconfigure another one, the prefix is still
544	 * valid with referring to the old link-local address.
545	 */
546	if ((pr = nd6_prefix_lookup(&pr0)) == NULL) {
547		if ((error = nd6_prelist_add(&pr0, NULL, NULL)) != 0)
548			return (error);
549	} else
550		nd6_prefix_rele(pr);
551
552	return 0;
553}
554
555/*
556 * ifp - must be IFT_LOOP
557 */
558static int
559in6_ifattach_loopback(struct ifnet *ifp)
560{
561	struct in6_aliasreq ifra;
562	int error;
563
564	in6_prepare_ifra(&ifra, &in6addr_loopback, &in6mask128);
565
566	/*
567	 * Always initialize ia_dstaddr (= broadcast address) to loopback
568	 * address.  Follows IPv4 practice - see in_ifinit().
569	 */
570	ifra.ifra_dstaddr.sin6_len = sizeof(struct sockaddr_in6);
571	ifra.ifra_dstaddr.sin6_family = AF_INET6;
572	ifra.ifra_dstaddr.sin6_addr = in6addr_loopback;
573
574	/* the loopback  address should NEVER expire. */
575	ifra.ifra_lifetime.ia6t_vltime = ND6_INFINITE_LIFETIME;
576	ifra.ifra_lifetime.ia6t_pltime = ND6_INFINITE_LIFETIME;
577
578	/*
579	 * We are sure that this is a newly assigned address, so we can set
580	 * NULL to the 3rd arg.
581	 */
582	if ((error = in6_update_ifa(ifp, &ifra, NULL, 0)) != 0) {
583		nd6log((LOG_ERR, "in6_ifattach_loopback: failed to configure "
584		    "the loopback address on %s (errno=%d)\n",
585		    if_name(ifp), error));
586		return (-1);
587	}
588
589	return 0;
590}
591
592/*
593 * compute NI group address, based on the current hostname setting.
594 * see RFC 4620.
595 *
596 * when ifp == NULL, the caller is responsible for filling scopeid.
597 *
598 * If oldmcprefix == 1, FF02:0:0:0:0:2::/96 is used for NI group address
599 * while it is FF02:0:0:0:0:2:FF00::/104 in RFC 4620.
600 */
601static int
602in6_nigroup0(struct ifnet *ifp, const char *name, int namelen,
603    struct in6_addr *in6, int oldmcprefix)
604{
605	struct prison *pr;
606	const char *p;
607	u_char *q;
608	MD5_CTX ctxt;
609	u_int8_t digest[16];
610	char l;
611	char n[64];	/* a single label must not exceed 63 chars */
612
613	/*
614	 * If no name is given and namelen is -1,
615	 * we try to do the hostname lookup ourselves.
616	 */
617	if (!name && namelen == -1) {
618		pr = curthread->td_ucred->cr_prison;
619		mtx_lock(&pr->pr_mtx);
620		name = pr->pr_hostname;
621		namelen = strlen(name);
622	} else
623		pr = NULL;
624	if (!name || !namelen) {
625		if (pr != NULL)
626			mtx_unlock(&pr->pr_mtx);
627		return -1;
628	}
629
630	p = name;
631	while (p && *p && *p != '.' && p - name < namelen)
632		p++;
633	if (p == name || p - name > sizeof(n) - 1) {
634		if (pr != NULL)
635			mtx_unlock(&pr->pr_mtx);
636		return -1;	/* label too long */
637	}
638	l = p - name;
639	strncpy(n, name, l);
640	if (pr != NULL)
641		mtx_unlock(&pr->pr_mtx);
642	n[(int)l] = '\0';
643	for (q = n; *q; q++) {
644		if ('A' <= *q && *q <= 'Z')
645			*q = *q - 'A' + 'a';
646	}
647
648	/* generate 16 bytes of pseudo-random value. */
649	bzero(&ctxt, sizeof(ctxt));
650	MD5Init(&ctxt);
651	MD5Update(&ctxt, &l, sizeof(l));
652	MD5Update(&ctxt, n, l);
653	MD5Final(digest, &ctxt);
654
655	bzero(in6, sizeof(*in6));
656	in6->s6_addr16[0] = IPV6_ADDR_INT16_MLL;
657	in6->s6_addr8[11] = 2;
658	if (oldmcprefix == 0) {
659		in6->s6_addr8[12] = 0xff;
660	 	/* Copy the first 24 bits of 128-bit hash into the address. */
661		bcopy(digest, &in6->s6_addr8[13], 3);
662	} else {
663	 	/* Copy the first 32 bits of 128-bit hash into the address. */
664		bcopy(digest, &in6->s6_addr32[3], sizeof(in6->s6_addr32[3]));
665	}
666	if (in6_setscope(in6, ifp, NULL))
667		return (-1); /* XXX: should not fail */
668
669	return 0;
670}
671
672int
673in6_nigroup(struct ifnet *ifp, const char *name, int namelen,
674    struct in6_addr *in6)
675{
676
677	return (in6_nigroup0(ifp, name, namelen, in6, 0));
678}
679
680int
681in6_nigroup_oldmcprefix(struct ifnet *ifp, const char *name, int namelen,
682    struct in6_addr *in6)
683{
684
685	return (in6_nigroup0(ifp, name, namelen, in6, 1));
686}
687
688/*
689 * XXX multiple loopback interface needs more care.  for instance,
690 * nodelocal address needs to be configured onto only one of them.
691 * XXX multiple link-local address case
692 *
693 * altifp - secondary EUI64 source
694 */
695void
696in6_ifattach(struct ifnet *ifp, struct ifnet *altifp)
697{
698	struct in6_ifaddr *ia;
699
700	if (ifp->if_afdata[AF_INET6] == NULL)
701		return;
702	/*
703	 * quirks based on interface type
704	 */
705	switch (ifp->if_type) {
706	case IFT_STF:
707		/*
708		 * 6to4 interface is a very special kind of beast.
709		 * no multicast, no linklocal.  RFC2529 specifies how to make
710		 * linklocals for 6to4 interface, but there's no use and
711		 * it is rather harmful to have one.
712		 */
713		ND_IFINFO(ifp)->flags &= ~ND6_IFF_AUTO_LINKLOCAL;
714		break;
715	default:
716		break;
717	}
718
719	/*
720	 * usually, we require multicast capability to the interface
721	 */
722	if ((ifp->if_flags & IFF_MULTICAST) == 0) {
723		nd6log((LOG_INFO, "in6_ifattach: "
724		    "%s is not multicast capable, IPv6 not enabled\n",
725		    if_name(ifp)));
726		return;
727	}
728
729	/*
730	 * assign loopback address for loopback interface.
731	 */
732	if ((ifp->if_flags & IFF_LOOPBACK) != 0) {
733		/*
734		 * check that loopback address doesn't exist yet.
735		 */
736		ia = in6ifa_ifwithaddr(&in6addr_loopback, 0);
737		if (ia == NULL)
738			in6_ifattach_loopback(ifp);
739		else
740			ifa_free(&ia->ia_ifa);
741	}
742
743	/*
744	 * assign a link-local address, if there's none.
745	 */
746	if (!(ND_IFINFO(ifp)->flags & ND6_IFF_IFDISABLED) &&
747	    ND_IFINFO(ifp)->flags & ND6_IFF_AUTO_LINKLOCAL) {
748		ia = in6ifa_ifpforlinklocal(ifp, 0);
749		if (ia == NULL)
750			in6_ifattach_linklocal(ifp, altifp);
751		else
752			ifa_free(&ia->ia_ifa);
753	}
754
755	/* update dynamically. */
756	if (V_in6_maxmtu < ifp->if_mtu)
757		V_in6_maxmtu = ifp->if_mtu;
758}
759
760/*
761 * NOTE: in6_ifdetach() does not support loopback if at this moment.
762 *
763 * When shutting down a VNET we clean up layers top-down.  In that case
764 * upper layer protocols (ulp) are cleaned up already and locks are destroyed
765 * and we must not call into these cleanup functions anymore, thus purgeulp
766 * is set to 0 in that case by in6_ifdetach_destroy().
767 * The normal case of destroying a (cloned) interface still needs to cleanup
768 * everything related to the interface and will have purgeulp set to 1.
769 */
770static void
771_in6_ifdetach(struct ifnet *ifp, int purgeulp)
772{
773	struct ifaddr *ifa, *next;
774
775	if (ifp->if_afdata[AF_INET6] == NULL)
776		return;
777
778	/*
779	 * nuke any of IPv6 addresses we have
780	 * XXX: all addresses should be already removed
781	 */
782	TAILQ_FOREACH_SAFE(ifa, &ifp->if_addrhead, ifa_link, next) {
783		if (ifa->ifa_addr->sa_family != AF_INET6)
784			continue;
785		in6_purgeaddr(ifa);
786	}
787	if (purgeulp) {
788		in6_pcbpurgeif0(&V_udbinfo, ifp);
789		in6_pcbpurgeif0(&V_ulitecbinfo, ifp);
790		in6_pcbpurgeif0(&V_ripcbinfo, ifp);
791	}
792	/* leave from all multicast groups joined */
793	in6_purgemaddrs(ifp);
794
795	/*
796	 * Remove neighbor management table.
797	 * Enabling the nd6_purge will panic on vmove for interfaces on VNET
798	 * teardown as the IPv6 layer is cleaned up already and the locks
799	 * are destroyed.
800	 */
801	if (purgeulp)
802		nd6_purge(ifp);
803}
804
805void
806in6_ifdetach(struct ifnet *ifp)
807{
808
809	_in6_ifdetach(ifp, 1);
810}
811
812void
813in6_ifdetach_destroy(struct ifnet *ifp)
814{
815
816	_in6_ifdetach(ifp, 0);
817}
818
819int
820in6_get_tmpifid(struct ifnet *ifp, u_int8_t *retbuf,
821    const u_int8_t *baseid, int generate)
822{
823	u_int8_t nullbuf[8];
824	struct nd_ifinfo *ndi = ND_IFINFO(ifp);
825
826	bzero(nullbuf, sizeof(nullbuf));
827	if (bcmp(ndi->randomid, nullbuf, sizeof(nullbuf)) == 0) {
828		/* we've never created a random ID.  Create a new one. */
829		generate = 1;
830	}
831
832	if (generate) {
833		bcopy(baseid, ndi->randomseed1, sizeof(ndi->randomseed1));
834
835		/* generate_tmp_ifid will update seedn and buf */
836		(void)generate_tmp_ifid(ndi->randomseed0, ndi->randomseed1,
837		    ndi->randomid);
838	}
839	bcopy(ndi->randomid, retbuf, 8);
840
841	return (0);
842}
843
844void
845in6_tmpaddrtimer(void *arg)
846{
847	CURVNET_SET((struct vnet *) arg);
848	struct nd_ifinfo *ndi;
849	u_int8_t nullbuf[8];
850	struct ifnet *ifp;
851
852	callout_reset(&V_in6_tmpaddrtimer_ch,
853	    (V_ip6_temp_preferred_lifetime - V_ip6_desync_factor -
854	    V_ip6_temp_regen_advance) * hz, in6_tmpaddrtimer, curvnet);
855
856	bzero(nullbuf, sizeof(nullbuf));
857	TAILQ_FOREACH(ifp, &V_ifnet, if_link) {
858		if (ifp->if_afdata[AF_INET6] == NULL)
859			continue;
860		ndi = ND_IFINFO(ifp);
861		if (bcmp(ndi->randomid, nullbuf, sizeof(nullbuf)) != 0) {
862			/*
863			 * We've been generating a random ID on this interface.
864			 * Create a new one.
865			 */
866			(void)generate_tmp_ifid(ndi->randomseed0,
867			    ndi->randomseed1, ndi->randomid);
868		}
869	}
870
871	CURVNET_RESTORE();
872}
873
874static void
875in6_purgemaddrs(struct ifnet *ifp)
876{
877	LIST_HEAD(,in6_multi)	 purgeinms;
878	struct in6_multi	*inm, *tinm;
879	struct ifmultiaddr	*ifma;
880
881	LIST_INIT(&purgeinms);
882	IN6_MULTI_LOCK();
883
884	/*
885	 * Extract list of in6_multi associated with the detaching ifp
886	 * which the PF_INET6 layer is about to release.
887	 * We need to do this as IF_ADDR_LOCK() may be re-acquired
888	 * by code further down.
889	 */
890	IF_ADDR_RLOCK(ifp);
891	TAILQ_FOREACH(ifma, &ifp->if_multiaddrs, ifma_link) {
892		if (ifma->ifma_addr->sa_family != AF_INET6 ||
893		    ifma->ifma_protospec == NULL)
894			continue;
895		inm = (struct in6_multi *)ifma->ifma_protospec;
896		LIST_INSERT_HEAD(&purgeinms, inm, in6m_entry);
897	}
898	IF_ADDR_RUNLOCK(ifp);
899
900	LIST_FOREACH_SAFE(inm, &purgeinms, in6m_entry, tinm) {
901		LIST_REMOVE(inm, in6m_entry);
902		in6m_release_locked(inm);
903	}
904	mld_ifdetach(ifp);
905
906	IN6_MULTI_UNLOCK();
907}
908
909void
910in6_ifattach_destroy(void)
911{
912
913	callout_drain(&V_in6_tmpaddrtimer_ch);
914}
915
916static void
917in6_ifattach_init(void *dummy)
918{
919
920	/* Timer for regeneranation of temporary addresses randomize ID. */
921	callout_init(&V_in6_tmpaddrtimer_ch, 0);
922	callout_reset(&V_in6_tmpaddrtimer_ch,
923	    (V_ip6_temp_preferred_lifetime - V_ip6_desync_factor -
924	    V_ip6_temp_regen_advance) * hz,
925	    in6_tmpaddrtimer, curvnet);
926}
927
928/*
929 * Cheat.
930 * This must be after route_init(), which is now SI_ORDER_THIRD.
931 */
932SYSINIT(in6_ifattach_init, SI_SUB_PROTO_DOMAIN, SI_ORDER_MIDDLE,
933    in6_ifattach_init, NULL);
934