sync with kame tree as of july00. tons of bug fixes/improvements.

API changes:
- additional IPv6 ioctls
- IPsec PF_KEY API was changed, it is mandatory to upgrade setkey(8).
  (also syntax change)

1 files changed, 302 insertions, 0 deletions

diff --git a/sys/netinet6/scope6.c b/sys/netinet6/scope6.c
new file mode 100644
index 0000000..43a6fb7
--- /dev/null
+++ b/sys/netinet6/scope6.c
@@ -0,0 +1,302 @@
+/*	$FreeBSD$	*/
+/*	$KAME: scope6.c,v 1.9 2000/05/18 15:03:26 jinmei Exp $	*/
+
+/*
+ * Copyright (C) 2000 WIDE Project.
+ * All rights reserved.
+ * 
+ * Redistribution and use in source and binary forms, with or without
+ * modification, are permitted provided that the following conditions
+ * are met:
+ * 1. Redistributions of source code must retain the above copyright
+ *    notice, this list of conditions and the following disclaimer.
+ * 2. Redistributions in binary form must reproduce the above copyright
+ *    notice, this list of conditions and the following disclaimer in the
+ *    documentation and/or other materials provided with the distribution.
+ * 3. Neither the name of the project nor the names of its contributors
+ *    may be used to endorse or promote products derived from this software
+ *    without specific prior written permission.
+ * 
+ * THIS SOFTWARE IS PROVIDED BY THE PROJECT AND CONTRIBUTORS ``AS IS'' AND
+ * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
+ * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+ * ARE DISCLAIMED.  IN NO EVENT SHALL THE PROJECT OR CONTRIBUTORS BE LIABLE
+ * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
+ * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
+ * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
+ * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
+ * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
+ * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
+ * SUCH DAMAGE.
+ */
+
+#include <sys/param.h>
+#include <sys/malloc.h>
+#include <sys/mbuf.h>
+#include <sys/socket.h>
+#include <sys/systm.h>
+
+#include <net/route.h>
+#include <net/if.h>
+
+#include <netinet/in.h>
+
+#include <netinet6/in6_var.h>
+#include <netinet6/scope6_var.h>
+
+struct scope6_id {
+	/*
+	 * 16 is correspondent to 4bit multicast scope field.
+	 * i.e. from node-local to global with some reserved/unassigned types.
+	 */
+	u_int32_t s6id_list[16];
+};
+static size_t if_indexlim = 8;
+struct scope6_id *scope6_ids = NULL;
+
+void
+scope6_ifattach(ifp)
+	struct ifnet *ifp;
+{
+	int s = splnet();
+
+	/*
+	 * We have some arrays that should be indexed by if_index.
+	 * since if_index will grow dynamically, they should grow too.
+	 */
+	if (scope6_ids == NULL || if_index >= if_indexlim) {
+		size_t n;
+		caddr_t q;
+
+		while (if_index >= if_indexlim)
+			if_indexlim <<= 1;
+
+		/* grow scope index array */
+		n = if_indexlim * sizeof(struct scope6_id);
+		/* XXX: need new malloc type? */
+		q = (caddr_t)malloc(n, M_IFADDR, M_WAITOK);
+		bzero(q, n);
+		if (scope6_ids) {
+			bcopy((caddr_t)scope6_ids, q, n/2);
+			free((caddr_t)scope6_ids, M_IFADDR);
+		}
+		scope6_ids = (struct scope6_id *)q;
+	}
+
+#define SID scope6_ids[ifp->if_index]
+
+	/* don't initialize if called twice */
+	if (SID.s6id_list[IPV6_ADDR_SCOPE_LINKLOCAL]) {
+		splx(s);
+		return;
+	}
+
+	/*
+	 * XXX: IPV6_ADDR_SCOPE_xxx macros are not standard.
+	 * Should we rather hardcode here?
+	 */
+	SID.s6id_list[IPV6_ADDR_SCOPE_LINKLOCAL] = ifp->if_index;
+#ifdef MULTI_SCOPE
+	/* by default, we don't care about scope boundary for these scopes. */
+	SID.s6id_list[IPV6_ADDR_SCOPE_SITELOCAL] = 1;
+	SID.s6id_list[IPV6_ADDR_SCOPE_ORGLOCAL] = 1;
+#endif
+#undef SID
+
+	splx(s);
+}
+
+int
+scope6_set(ifp, idlist)
+	struct ifnet *ifp;
+	u_int32_t *idlist;
+{
+	int i, s;
+	int error = 0;
+
+	if (scope6_ids == NULL)	/* paranoid? */
+		return(EINVAL);
+
+	/*
+	 * XXX: We need more consistency checks of the relationship among
+	 * scopes (e.g. an organization should be larger than a site).
+	 */
+
+	/*
+	 * TODO(XXX): after setting, we should reflect the changes to
+	 * interface addresses, routing table entries, PCB entries... 
+	 */
+
+	s = splnet();
+
+	for (i = 0; i < 16; i++) {
+		if (idlist[i] &&
+		    idlist[i] != scope6_ids[ifp->if_index].s6id_list[i]) {
+			if (i == IPV6_ADDR_SCOPE_LINKLOCAL &&
+			    idlist[i] > if_index) {
+				/*
+				 * XXX: theoretically, there should be no
+				 * relationship between link IDs and interface
+				 * IDs, but we check the consistency for
+				 * safety in later use.
+				 */
+				splx(s);
+				return(EINVAL);
+			}
+
+			/*
+			 * XXX: we must need lots of work in this case,
+			 * but we simply set the new value in this initial
+			 * implementation.
+			 */
+			scope6_ids[ifp->if_index].s6id_list[i] = idlist[i];
+		}
+	}
+	splx(s);
+
+	return(error);
+}
+
+int
+scope6_get(ifp, idlist)
+	struct ifnet *ifp;
+	u_int32_t *idlist;
+{
+	if (scope6_ids == NULL)	/* paranoid? */
+		return(EINVAL);
+
+	bcopy(scope6_ids[ifp->if_index].s6id_list, idlist,
+	      sizeof(scope6_ids[ifp->if_index].s6id_list));
+
+	return(0);
+}
+
+
+/*
+ * Get a scope of the address. Node-local, link-local, site-local or global.
+ */
+int
+in6_addrscope(addr)
+struct in6_addr *addr;
+{
+	int scope;
+
+	if (addr->s6_addr8[0] == 0xfe) {
+		scope = addr->s6_addr8[1] & 0xc0;
+
+		switch (scope) {
+		case 0x80:
+			return IPV6_ADDR_SCOPE_LINKLOCAL;
+			break;
+		case 0xc0:
+			return IPV6_ADDR_SCOPE_SITELOCAL;
+			break;
+		default:
+			return IPV6_ADDR_SCOPE_GLOBAL; /* just in case */
+			break;
+		}
+	}
+
+
+	if (addr->s6_addr8[0] == 0xff) {
+		scope = addr->s6_addr8[1] & 0x0f;
+
+		/*
+		 * due to other scope such as reserved,
+		 * return scope doesn't work.
+		 */
+		switch (scope) {
+		case IPV6_ADDR_SCOPE_NODELOCAL:
+			return IPV6_ADDR_SCOPE_NODELOCAL;
+			break;
+		case IPV6_ADDR_SCOPE_LINKLOCAL:
+			return IPV6_ADDR_SCOPE_LINKLOCAL;
+			break;
+		case IPV6_ADDR_SCOPE_SITELOCAL:
+			return IPV6_ADDR_SCOPE_SITELOCAL;
+			break;
+		default:
+			return IPV6_ADDR_SCOPE_GLOBAL;
+			break;
+		}
+	}
+
+	if (bcmp(&in6addr_loopback, addr, sizeof(addr) - 1) == 0) {
+		if (addr->s6_addr8[15] == 1) /* loopback */
+			return IPV6_ADDR_SCOPE_NODELOCAL;
+		if (addr->s6_addr8[15] == 0) /* unspecified */
+			return IPV6_ADDR_SCOPE_LINKLOCAL;
+	}
+
+	return IPV6_ADDR_SCOPE_GLOBAL;
+}
+
+int
+in6_addr2scopeid(ifp, addr)
+	struct ifnet *ifp;	/* must not be NULL */
+	struct in6_addr *addr;	/* must not be NULL */
+{
+	int scope = in6_addrscope(addr);
+
+	if (scope6_ids == NULL)	/* paranoid? */
+		return(0);	/* XXX */
+	if (ifp->if_index >= if_indexlim)
+		return(0);	/* XXX */
+
+#define SID scope6_ids[ifp->if_index]
+	switch(scope) {
+	case IPV6_ADDR_SCOPE_NODELOCAL:
+		return(-1);	/* XXX: is this an appropriate value? */
+
+	case IPV6_ADDR_SCOPE_LINKLOCAL:
+		return(SID.s6id_list[IPV6_ADDR_SCOPE_LINKLOCAL]);
+
+	case IPV6_ADDR_SCOPE_SITELOCAL:
+		return(SID.s6id_list[IPV6_ADDR_SCOPE_SITELOCAL]);
+
+	case IPV6_ADDR_SCOPE_ORGLOCAL:
+		return(SID.s6id_list[IPV6_ADDR_SCOPE_ORGLOCAL]);
+
+	default:
+		return(0);	/* XXX: treat as global. */
+	}
+#undef SID
+}
+
+void
+scope6_setdefault(ifp)
+	struct ifnet *ifp;	/* note that this might be NULL */
+{
+	/*
+	 * Currently, this function just set the default "link" according to
+	 * the given interface.
+	 * We might eventually have to separate the notion of "link" from
+	 * "interface" and provide a user interface to set the default.
+	 */
+	if (ifp) {
+		scope6_ids[0].s6id_list[IPV6_ADDR_SCOPE_LINKLOCAL] =
+			ifp->if_index;
+	}
+	else
+		scope6_ids[0].s6id_list[IPV6_ADDR_SCOPE_LINKLOCAL] = 0;
+}
+
+int
+scope6_get_default(idlist)
+	u_int32_t *idlist;
+{
+	if (scope6_ids == NULL)	/* paranoid? */
+		return(EINVAL);
+
+	bcopy(scope6_ids[0].s6id_list, idlist,
+	      sizeof(scope6_ids[0].s6id_list));
+
+	return(0);
+}
+
+u_int32_t
+scope6_addr2default(addr)
+	struct in6_addr *addr;
+{
+	return(scope6_ids[0].s6id_list[in6_addrscope(addr)]);
+}