[net-next-2.6.git] / net / ipv6 / datagram.c

/*
 *	common UDP/RAW code
 *	Linux INET6 implementation
 *
 *	Authors:
 *	Pedro Roque		<roque@di.fc.ul.pt>
 *
 *	$Id: datagram.c,v 1.24 2002/02/01 22:01:04 davem Exp $
 *
 *	This program is free software; you can redistribute it and/or
 *      modify it under the terms of the GNU General Public License
 *      as published by the Free Software Foundation; either version
 *      2 of the License, or (at your option) any later version.
 */

#include <linux/capability.h>
#include <linux/errno.h>
#include <linux/types.h>
#include <linux/kernel.h>
#include <linux/interrupt.h>
#include <linux/socket.h>
#include <linux/sockios.h>
#include <linux/in6.h>
#include <linux/ipv6.h>
#include <linux/route.h>

#include <net/ipv6.h>
#include <net/ndisc.h>
#include <net/addrconf.h>
#include <net/transp_v6.h>
#include <net/ip6_route.h>
#include <net/tcp_states.h>

#include <linux/errqueue.h>
#include <asm/uaccess.h>

int ip6_datagram_connect(struct sock *sk, struct sockaddr *uaddr, int addr_len)
{
	struct sockaddr_in6	*usin = (struct sockaddr_in6 *) uaddr;
	struct inet_sock      	*inet = inet_sk(sk);
	struct ipv6_pinfo      	*np = inet6_sk(sk);
	struct in6_addr		*daddr, *final_p = NULL, final;
	struct dst_entry	*dst;
	struct flowi		fl;
	struct ip6_flowlabel	*flowlabel = NULL;
	int			addr_type;
	int			err;

	if (usin->sin6_family == AF_INET) {
		if (__ipv6_only_sock(sk))
			return -EAFNOSUPPORT;
		err = ip4_datagram_connect(sk, uaddr, addr_len);
		goto ipv4_connected;
	}

	if (addr_len < SIN6_LEN_RFC2133)
		return -EINVAL;

	if (usin->sin6_family != AF_INET6)
		return -EAFNOSUPPORT;

	memset(&fl, 0, sizeof(fl));
	if (np->sndflow) {
		fl.fl6_flowlabel = usin->sin6_flowinfo&IPV6_FLOWINFO_MASK;
		if (fl.fl6_flowlabel&IPV6_FLOWLABEL_MASK) {
			flowlabel = fl6_sock_lookup(sk, fl.fl6_flowlabel);
			if (flowlabel == NULL)
				return -EINVAL;
			ipv6_addr_copy(&usin->sin6_addr, &flowlabel->dst);
		}
	}

	addr_type = ipv6_addr_type(&usin->sin6_addr);

	if (addr_type == IPV6_ADDR_ANY) {
		/*
		 *	connect to self
		 */
		usin->sin6_addr.s6_addr[15] = 0x01;
	}

	daddr = &usin->sin6_addr;

	if (addr_type == IPV6_ADDR_MAPPED) {
		struct sockaddr_in sin;

		if (__ipv6_only_sock(sk)) {
			err = -ENETUNREACH;
			goto out;
		}
		sin.sin_family = AF_INET;
		sin.sin_addr.s_addr = daddr->s6_addr32[3];
		sin.sin_port = usin->sin6_port;

		err = ip4_datagram_connect(sk,
					   (struct sockaddr*) &sin,
					   sizeof(sin));

ipv4_connected:
		if (err)
			goto out;

		ipv6_addr_set(&np->daddr, 0, 0, htonl(0x0000ffff), inet->daddr);

		if (ipv6_addr_any(&np->saddr)) {
			ipv6_addr_set(&np->saddr, 0, 0, htonl(0x0000ffff),
				      inet->saddr);
		}

		if (ipv6_addr_any(&np->rcv_saddr)) {
			ipv6_addr_set(&np->rcv_saddr, 0, 0, htonl(0x0000ffff),
				      inet->rcv_saddr);
		}
		goto out;
	}

	if (addr_type&IPV6_ADDR_LINKLOCAL) {
		if (addr_len >= sizeof(struct sockaddr_in6) &&
		    usin->sin6_scope_id) {
			if (sk->sk_bound_dev_if &&
			    sk->sk_bound_dev_if != usin->sin6_scope_id) {
				err = -EINVAL;
				goto out;
			}
			sk->sk_bound_dev_if = usin->sin6_scope_id;
			if (!sk->sk_bound_dev_if &&
			    (addr_type & IPV6_ADDR_MULTICAST))
				fl.oif = np->mcast_oif;
		}

		/* Connect to link-local address requires an interface */
		if (!sk->sk_bound_dev_if) {
			err = -EINVAL;
			goto out;
		}
	}

	ipv6_addr_copy(&np->daddr, daddr);
	np->flow_label = fl.fl6_flowlabel;

	inet->dport = usin->sin6_port;

	/*
	 *	Check for a route to destination an obtain the
	 *	destination cache for it.
	 */

	fl.proto = sk->sk_protocol;
	ipv6_addr_copy(&fl.fl6_dst, &np->daddr);
	ipv6_addr_copy(&fl.fl6_src, &np->saddr);
	fl.oif = sk->sk_bound_dev_if;
	fl.fl_ip_dport = inet->dport;
	fl.fl_ip_sport = inet->sport;

	if (!fl.oif && (addr_type&IPV6_ADDR_MULTICAST))
		fl.oif = np->mcast_oif;

	security_sk_classify_flow(sk, &fl);

	if (flowlabel) {
		if (flowlabel->opt && flowlabel->opt->srcrt) {
			struct rt0_hdr *rt0 = (struct rt0_hdr *) flowlabel->opt->srcrt;
			ipv6_addr_copy(&final, &fl.fl6_dst);
			ipv6_addr_copy(&fl.fl6_dst, rt0->addr);
			final_p = &final;
		}
	} else if (np->opt && np->opt->srcrt) {
		struct rt0_hdr *rt0 = (struct rt0_hdr *)np->opt->srcrt;
		ipv6_addr_copy(&final, &fl.fl6_dst);
		ipv6_addr_copy(&fl.fl6_dst, rt0->addr);
		final_p = &final;
	}

	err = ip6_dst_lookup(sk, &dst, &fl);
	if (err)
		goto out;
	if (final_p)
		ipv6_addr_copy(&fl.fl6_dst, final_p);

	if ((err = xfrm_lookup(&dst, &fl, sk, 1)) < 0)
		goto out;

	/* source address lookup done in ip6_dst_lookup */

	if (ipv6_addr_any(&np->saddr))
		ipv6_addr_copy(&np->saddr, &fl.fl6_src);

	if (ipv6_addr_any(&np->rcv_saddr)) {
		ipv6_addr_copy(&np->rcv_saddr, &fl.fl6_src);
		inet->rcv_saddr = LOOPBACK4_IPV6;
	}

	ip6_dst_store(sk, dst,
		      ipv6_addr_equal(&fl.fl6_dst, &np->daddr) ?
		      &np->daddr : NULL,
#ifdef CONFIG_IPV6_SUBTREES
		      ipv6_addr_equal(&fl.fl6_src, &np->saddr) ?
		      &np->saddr :
#endif
		      NULL);

	sk->sk_state = TCP_ESTABLISHED;
out:
	fl6_sock_release(flowlabel);
	return err;
}

void ipv6_icmp_error(struct sock *sk, struct sk_buff *skb, int err,
		     __be16 port, u32 info, u8 *payload)
{
	struct ipv6_pinfo *np  = inet6_sk(sk);
	struct icmp6hdr *icmph = (struct icmp6hdr *)skb->h.raw;
	struct sock_exterr_skb *serr;

	if (!np->recverr)
		return;

	skb = skb_clone(skb, GFP_ATOMIC);
	if (!skb)
		return;

	serr = SKB_EXT_ERR(skb);
	serr->ee.ee_errno = err;
	serr->ee.ee_origin = SO_EE_ORIGIN_ICMP6;
	serr->ee.ee_type = icmph->icmp6_type;
	serr->ee.ee_code = icmph->icmp6_code;
	serr->ee.ee_pad = 0;
	serr->ee.ee_info = info;
	serr->ee.ee_data = 0;
	serr->addr_offset = (u8 *)&(((struct ipv6hdr *)(icmph + 1))->daddr) -
				  skb_network_header(skb);
	serr->port = port;

	skb->h.raw = payload;
	__skb_pull(skb, payload - skb->data);

	if (sock_queue_err_skb(sk, skb))
		kfree_skb(skb);
}

void ipv6_local_error(struct sock *sk, int err, struct flowi *fl, u32 info)
{
	struct ipv6_pinfo *np = inet6_sk(sk);
	struct sock_exterr_skb *serr;
	struct ipv6hdr *iph;
	struct sk_buff *skb;

	if (!np->recverr)
		return;

	skb = alloc_skb(sizeof(struct ipv6hdr), GFP_ATOMIC);
	if (!skb)
		return;

	skb_put(skb, sizeof(struct ipv6hdr));
	skb_reset_network_header(skb);
	iph = skb->nh.ipv6h;
	ipv6_addr_copy(&iph->daddr, &fl->fl6_dst);

	serr = SKB_EXT_ERR(skb);
	serr->ee.ee_errno = err;
	serr->ee.ee_origin = SO_EE_ORIGIN_LOCAL;
	serr->ee.ee_type = 0;
	serr->ee.ee_code = 0;
	serr->ee.ee_pad = 0;
	serr->ee.ee_info = info;
	serr->ee.ee_data = 0;
	serr->addr_offset = (u8 *)&iph->daddr - skb_network_header(skb);
	serr->port = fl->fl_ip_dport;

	skb->h.raw = skb->tail;
	__skb_pull(skb, skb->tail - skb->data);

	if (sock_queue_err_skb(sk, skb))
		kfree_skb(skb);
}

/*
 *	Handle MSG_ERRQUEUE
 */
int ipv6_recv_error(struct sock *sk, struct msghdr *msg, int len)
{
	struct ipv6_pinfo *np = inet6_sk(sk);
	struct sock_exterr_skb *serr;
	struct sk_buff *skb, *skb2;
	struct sockaddr_in6 *sin;
	struct {
		struct sock_extended_err ee;
		struct sockaddr_in6	 offender;
	} errhdr;
	int err;
	int copied;

	err = -EAGAIN;
	skb = skb_dequeue(&sk->sk_error_queue);
	if (skb == NULL)
		goto out;

	copied = skb->len;
	if (copied > len) {
		msg->msg_flags |= MSG_TRUNC;
		copied = len;
	}
	err = skb_copy_datagram_iovec(skb, 0, msg->msg_iov, copied);
	if (err)
		goto out_free_skb;

	sock_recv_timestamp(msg, sk, skb);

	serr = SKB_EXT_ERR(skb);

	sin = (struct sockaddr_in6 *)msg->msg_name;
	if (sin) {
		const unsigned char *nh = skb_network_header(skb);
		sin->sin6_family = AF_INET6;
		sin->sin6_flowinfo = 0;
		sin->sin6_port = serr->port;
		sin->sin6_scope_id = 0;
		if (serr->ee.ee_origin == SO_EE_ORIGIN_ICMP6) {
			ipv6_addr_copy(&sin->sin6_addr,
				  (struct in6_addr *)(nh + serr->addr_offset));
			if (np->sndflow)
				sin->sin6_flowinfo =
					(*(__be32 *)(nh + serr->addr_offset - 24) &
					 IPV6_FLOWINFO_MASK);
			if (ipv6_addr_type(&sin->sin6_addr) & IPV6_ADDR_LINKLOCAL)
				sin->sin6_scope_id = IP6CB(skb)->iif;
		} else {
			ipv6_addr_set(&sin->sin6_addr, 0, 0,
				      htonl(0xffff),
				      *(__be32 *)(nh + serr->addr_offset));
		}
	}

	memcpy(&errhdr.ee, &serr->ee, sizeof(struct sock_extended_err));
	sin = &errhdr.offender;
	sin->sin6_family = AF_UNSPEC;
	if (serr->ee.ee_origin != SO_EE_ORIGIN_LOCAL) {
		sin->sin6_family = AF_INET6;
		sin->sin6_flowinfo = 0;
		sin->sin6_scope_id = 0;
		if (serr->ee.ee_origin == SO_EE_ORIGIN_ICMP6) {
			ipv6_addr_copy(&sin->sin6_addr, &skb->nh.ipv6h->saddr);
			if (np->rxopt.all)
				datagram_recv_ctl(sk, msg, skb);
			if (ipv6_addr_type(&sin->sin6_addr) & IPV6_ADDR_LINKLOCAL)
				sin->sin6_scope_id = IP6CB(skb)->iif;
		} else {
			struct inet_sock *inet = inet_sk(sk);

			ipv6_addr_set(&sin->sin6_addr, 0, 0,
				      htonl(0xffff), ip_hdr(skb)->saddr);
			if (inet->cmsg_flags)
				ip_cmsg_recv(msg, skb);
		}
	}

	put_cmsg(msg, SOL_IPV6, IPV6_RECVERR, sizeof(errhdr), &errhdr);

	/* Now we could try to dump offended packet options */

	msg->msg_flags |= MSG_ERRQUEUE;
	err = copied;

	/* Reset and regenerate socket error */
	spin_lock_bh(&sk->sk_error_queue.lock);
	sk->sk_err = 0;
	if ((skb2 = skb_peek(&sk->sk_error_queue)) != NULL) {
		sk->sk_err = SKB_EXT_ERR(skb2)->ee.ee_errno;
		spin_unlock_bh(&sk->sk_error_queue.lock);
		sk->sk_error_report(sk);
	} else {
		spin_unlock_bh(&sk->sk_error_queue.lock);
	}

out_free_skb:
	kfree_skb(skb);
out:
	return err;
}


int datagram_recv_ctl(struct sock *sk, struct msghdr *msg, struct sk_buff *skb)
{
	struct ipv6_pinfo *np = inet6_sk(sk);
	struct inet6_skb_parm *opt = IP6CB(skb);
	unsigned char *nh = skb_network_header(skb);

	if (np->rxopt.bits.rxinfo) {
		struct in6_pktinfo src_info;

		src_info.ipi6_ifindex = opt->iif;
		ipv6_addr_copy(&src_info.ipi6_addr, &skb->nh.ipv6h->daddr);
		put_cmsg(msg, SOL_IPV6, IPV6_PKTINFO, sizeof(src_info), &src_info);
	}

	if (np->rxopt.bits.rxhlim) {
		int hlim = skb->nh.ipv6h->hop_limit;
		put_cmsg(msg, SOL_IPV6, IPV6_HOPLIMIT, sizeof(hlim), &hlim);
	}

	if (np->rxopt.bits.rxtclass) {
		int tclass = (ntohl(*(__be32 *)skb->nh.ipv6h) >> 20) & 0xff;
		put_cmsg(msg, SOL_IPV6, IPV6_TCLASS, sizeof(tclass), &tclass);
	}

	if (np->rxopt.bits.rxflow && (*(__be32 *)nh & IPV6_FLOWINFO_MASK)) {
		__be32 flowinfo = *(__be32 *)nh & IPV6_FLOWINFO_MASK;
		put_cmsg(msg, SOL_IPV6, IPV6_FLOWINFO, sizeof(flowinfo), &flowinfo);
	}

	/* HbH is allowed only once */
	if (np->rxopt.bits.hopopts && opt->hop) {
		u8 *ptr = nh + opt->hop;
		put_cmsg(msg, SOL_IPV6, IPV6_HOPOPTS, (ptr[1]+1)<<3, ptr);
	}

	if (opt->lastopt &&
	    (np->rxopt.bits.dstopts || np->rxopt.bits.srcrt)) {
		/*
		 * Silly enough, but we need to reparse in order to
		 * report extension headers (except for HbH)
		 * in order.
		 *
		 * Also note that IPV6_RECVRTHDRDSTOPTS is NOT
		 * (and WILL NOT be) defined because
		 * IPV6_RECVDSTOPTS is more generic. --yoshfuji
		 */
		unsigned int off = sizeof(struct ipv6hdr);
		u8 nexthdr = skb->nh.ipv6h->nexthdr;

		while (off <= opt->lastopt) {
			unsigned len;
			u8 *ptr = nh + off;

			switch(nexthdr) {
			case IPPROTO_DSTOPTS:
				nexthdr = ptr[0];
				len = (ptr[1] + 1) << 3;
				if (np->rxopt.bits.dstopts)
					put_cmsg(msg, SOL_IPV6, IPV6_DSTOPTS, len, ptr);
				break;
			case IPPROTO_ROUTING:
				nexthdr = ptr[0];
				len = (ptr[1] + 1) << 3;
				if (np->rxopt.bits.srcrt)
					put_cmsg(msg, SOL_IPV6, IPV6_RTHDR, len, ptr);
				break;
			case IPPROTO_AH:
				nexthdr = ptr[0];
				len = (ptr[1] + 2) << 2;
				break;
			default:
				nexthdr = ptr[0];
				len = (ptr[1] + 1) << 3;
				break;
			}

			off += len;
		}
	}

	/* socket options in old style */
	if (np->rxopt.bits.rxoinfo) {
		struct in6_pktinfo src_info;

		src_info.ipi6_ifindex = opt->iif;
		ipv6_addr_copy(&src_info.ipi6_addr, &skb->nh.ipv6h->daddr);
		put_cmsg(msg, SOL_IPV6, IPV6_2292PKTINFO, sizeof(src_info), &src_info);
	}
	if (np->rxopt.bits.rxohlim) {
		int hlim = skb->nh.ipv6h->hop_limit;
		put_cmsg(msg, SOL_IPV6, IPV6_2292HOPLIMIT, sizeof(hlim), &hlim);
	}
	if (np->rxopt.bits.ohopopts && opt->hop) {
		u8 *ptr = nh + opt->hop;
		put_cmsg(msg, SOL_IPV6, IPV6_2292HOPOPTS, (ptr[1]+1)<<3, ptr);
	}
	if (np->rxopt.bits.odstopts && opt->dst0) {
		u8 *ptr = nh + opt->dst0;
		put_cmsg(msg, SOL_IPV6, IPV6_2292DSTOPTS, (ptr[1]+1)<<3, ptr);
	}
	if (np->rxopt.bits.osrcrt && opt->srcrt) {
		struct ipv6_rt_hdr *rthdr = (struct ipv6_rt_hdr *)(nh + opt->srcrt);
		put_cmsg(msg, SOL_IPV6, IPV6_2292RTHDR, (rthdr->hdrlen+1) << 3, rthdr);
	}
	if (np->rxopt.bits.odstopts && opt->dst1) {
		u8 *ptr = nh + opt->dst1;
		put_cmsg(msg, SOL_IPV6, IPV6_2292DSTOPTS, (ptr[1]+1)<<3, ptr);
	}
	return 0;
}

int datagram_send_ctl(struct msghdr *msg, struct flowi *fl,
		      struct ipv6_txoptions *opt,
		      int *hlimit, int *tclass)
{
	struct in6_pktinfo *src_info;
	struct cmsghdr *cmsg;
	struct ipv6_rt_hdr *rthdr;
	struct ipv6_opt_hdr *hdr;
	int len;
	int err = 0;

	for (cmsg = CMSG_FIRSTHDR(msg); cmsg; cmsg = CMSG_NXTHDR(msg, cmsg)) {
		int addr_type;
		struct net_device *dev = NULL;

		if (!CMSG_OK(msg, cmsg)) {
			err = -EINVAL;
			goto exit_f;
		}

		if (cmsg->cmsg_level != SOL_IPV6)
			continue;

		switch (cmsg->cmsg_type) {
		case IPV6_PKTINFO:
		case IPV6_2292PKTINFO:
			if (cmsg->cmsg_len < CMSG_LEN(sizeof(struct in6_pktinfo))) {
				err = -EINVAL;
				goto exit_f;
			}

			src_info = (struct in6_pktinfo *)CMSG_DATA(cmsg);

			if (src_info->ipi6_ifindex) {
				if (fl->oif && src_info->ipi6_ifindex != fl->oif)
					return -EINVAL;
				fl->oif = src_info->ipi6_ifindex;
			}

			addr_type = ipv6_addr_type(&src_info->ipi6_addr);

			if (addr_type == IPV6_ADDR_ANY)
				break;

			if (addr_type & IPV6_ADDR_LINKLOCAL) {
				if (!src_info->ipi6_ifindex)
					return -EINVAL;
				else {
					dev = dev_get_by_index(src_info->ipi6_ifindex);
					if (!dev)
						return -ENODEV;
				}
			}
			if (!ipv6_chk_addr(&src_info->ipi6_addr, dev, 0)) {
				if (dev)
					dev_put(dev);
				err = -EINVAL;
				goto exit_f;
			}
			if (dev)
				dev_put(dev);

			ipv6_addr_copy(&fl->fl6_src, &src_info->ipi6_addr);
			break;

		case IPV6_FLOWINFO:
			if (cmsg->cmsg_len < CMSG_LEN(4)) {
				err = -EINVAL;
				goto exit_f;
			}

			if (fl->fl6_flowlabel&IPV6_FLOWINFO_MASK) {
				if ((fl->fl6_flowlabel^*(__be32 *)CMSG_DATA(cmsg))&~IPV6_FLOWINFO_MASK) {
					err = -EINVAL;
					goto exit_f;
				}
			}
			fl->fl6_flowlabel = IPV6_FLOWINFO_MASK & *(__be32 *)CMSG_DATA(cmsg);
			break;

		case IPV6_2292HOPOPTS:
		case IPV6_HOPOPTS:
			if (opt->hopopt || cmsg->cmsg_len < CMSG_LEN(sizeof(struct ipv6_opt_hdr))) {
				err = -EINVAL;
				goto exit_f;
			}

			hdr = (struct ipv6_opt_hdr *)CMSG_DATA(cmsg);
			len = ((hdr->hdrlen + 1) << 3);
			if (cmsg->cmsg_len < CMSG_LEN(len)) {
				err = -EINVAL;
				goto exit_f;
			}
			if (!capable(CAP_NET_RAW)) {
				err = -EPERM;
				goto exit_f;
			}
			opt->opt_nflen += len;
			opt->hopopt = hdr;
			break;

		case IPV6_2292DSTOPTS:
			if (cmsg->cmsg_len < CMSG_LEN(sizeof(struct ipv6_opt_hdr))) {
				err = -EINVAL;
				goto exit_f;
			}

			hdr = (struct ipv6_opt_hdr *)CMSG_DATA(cmsg);
			len = ((hdr->hdrlen + 1) << 3);
			if (cmsg->cmsg_len < CMSG_LEN(len)) {
				err = -EINVAL;
				goto exit_f;
			}
			if (!capable(CAP_NET_RAW)) {
				err = -EPERM;
				goto exit_f;
			}
			if (opt->dst1opt) {
				err = -EINVAL;
				goto exit_f;
			}
			opt->opt_flen += len;
			opt->dst1opt = hdr;
			break;

		case IPV6_DSTOPTS:
		case IPV6_RTHDRDSTOPTS:
			if (cmsg->cmsg_len < CMSG_LEN(sizeof(struct ipv6_opt_hdr))) {
				err = -EINVAL;
				goto exit_f;
			}

			hdr = (struct ipv6_opt_hdr *)CMSG_DATA(cmsg);
			len = ((hdr->hdrlen + 1) << 3);
			if (cmsg->cmsg_len < CMSG_LEN(len)) {
				err = -EINVAL;
				goto exit_f;
			}
			if (!capable(CAP_NET_RAW)) {
				err = -EPERM;
				goto exit_f;
			}
			if (cmsg->cmsg_type == IPV6_DSTOPTS) {
				opt->opt_flen += len;
				opt->dst1opt = hdr;
			} else {
				opt->opt_nflen += len;
				opt->dst0opt = hdr;
			}
			break;

		case IPV6_2292RTHDR:
		case IPV6_RTHDR:
			if (cmsg->cmsg_len < CMSG_LEN(sizeof(struct ipv6_rt_hdr))) {
				err = -EINVAL;
				goto exit_f;
			}

			rthdr = (struct ipv6_rt_hdr *)CMSG_DATA(cmsg);

			switch (rthdr->type) {
			case IPV6_SRCRT_TYPE_0:
#ifdef CONFIG_IPV6_MIP6
			case IPV6_SRCRT_TYPE_2:
#endif
				break;
			default:
				err = -EINVAL;
				goto exit_f;
			}

			len = ((rthdr->hdrlen + 1) << 3);

			if (cmsg->cmsg_len < CMSG_LEN(len)) {
				err = -EINVAL;
				goto exit_f;
			}

			/* segments left must also match */
			if ((rthdr->hdrlen >> 1) != rthdr->segments_left) {
				err = -EINVAL;
				goto exit_f;
			}

			opt->opt_nflen += len;
			opt->srcrt = rthdr;

			if (cmsg->cmsg_type == IPV6_2292RTHDR && opt->dst1opt) {
				int dsthdrlen = ((opt->dst1opt->hdrlen+1)<<3);

				opt->opt_nflen += dsthdrlen;
				opt->dst0opt = opt->dst1opt;
				opt->dst1opt = NULL;
				opt->opt_flen -= dsthdrlen;
			}

			break;

		case IPV6_2292HOPLIMIT:
		case IPV6_HOPLIMIT:
			if (cmsg->cmsg_len != CMSG_LEN(sizeof(int))) {
				err = -EINVAL;
				goto exit_f;
			}

			*hlimit = *(int *)CMSG_DATA(cmsg);
			break;

		case IPV6_TCLASS:
		    {
			int tc;

			err = -EINVAL;
			if (cmsg->cmsg_len != CMSG_LEN(sizeof(int))) {
				goto exit_f;
			}

			tc = *(int *)CMSG_DATA(cmsg);
			if (tc < -1 || tc > 0xff)
				goto exit_f;

			err = 0;
			*tclass = tc;

			break;
		    }
		default:
			LIMIT_NETDEBUG(KERN_DEBUG "invalid cmsg type: %d\n",
				       cmsg->cmsg_type);
			err = -EINVAL;
			break;
		};
	}

exit_f:
	return err;
}
Commit	Line	Data
1da177e4 LT	1	/*
1da177e4 LT	2	* common UDP/RAW code
1ab1457c	3	* Linux INET6 implementation
1da177e4 LT	4	*
1da177e4 LT	5	* Authors:
1ab1457c	6	* Pedro Roque <roque@di.fc.ul.pt>
1da177e4 LT	7	*
	8	* $Id: datagram.c,v 1.24 2002/02/01 22:01:04 davem Exp $
	9	*
	10	* This program is free software; you can redistribute it and/or
	11	* modify it under the terms of the GNU General Public License
	12	* as published by the Free Software Foundation; either version
	13	* 2 of the License, or (at your option) any later version.
	14	*/
	15
4fc268d2	16	#include <linux/capability.h>
1da177e4 LT	17	#include <linux/errno.h>
	18	#include <linux/types.h>
	19	#include <linux/kernel.h>
1da177e4 LT	20	#include <linux/interrupt.h>
	21	#include <linux/socket.h>
	22	#include <linux/sockios.h>
	23	#include <linux/in6.h>
	24	#include <linux/ipv6.h>
	25	#include <linux/route.h>
	26
	27	#include <net/ipv6.h>
	28	#include <net/ndisc.h>
	29	#include <net/addrconf.h>
	30	#include <net/transp_v6.h>
	31	#include <net/ip6_route.h>
c752f073	32	#include <net/tcp_states.h>
1da177e4 LT	33
	34	#include <linux/errqueue.h>
	35	#include <asm/uaccess.h>
	36
	37	int ip6_datagram_connect(struct sock sk, struct sockaddr uaddr, int addr_len)
	38	{
	39	struct sockaddr_in6 usin = (struct sockaddr_in6 ) uaddr;
	40	struct inet_sock *inet = inet_sk(sk);
	41	struct ipv6_pinfo *np = inet6_sk(sk);
	42	struct in6_addr daddr, final_p = NULL, final;
	43	struct dst_entry *dst;
	44	struct flowi fl;
	45	struct ip6_flowlabel *flowlabel = NULL;
	46	int addr_type;
	47	int err;
	48
	49	if (usin->sin6_family == AF_INET) {
	50	if (__ipv6_only_sock(sk))
	51	return -EAFNOSUPPORT;
	52	err = ip4_datagram_connect(sk, uaddr, addr_len);
	53	goto ipv4_connected;
	54	}
	55
	56	if (addr_len < SIN6_LEN_RFC2133)
1ab1457c	57	return -EINVAL;
1da177e4	58
1ab1457c YH	59	if (usin->sin6_family != AF_INET6)
1ab1457c YH	60	return -EAFNOSUPPORT;
1da177e4 LT	61
	62	memset(&fl, 0, sizeof(fl));
	63	if (np->sndflow) {
	64	fl.fl6_flowlabel = usin->sin6_flowinfo&IPV6_FLOWINFO_MASK;
	65	if (fl.fl6_flowlabel&IPV6_FLOWLABEL_MASK) {
	66	flowlabel = fl6_sock_lookup(sk, fl.fl6_flowlabel);
	67	if (flowlabel == NULL)
	68	return -EINVAL;
	69	ipv6_addr_copy(&usin->sin6_addr, &flowlabel->dst);
	70	}
	71	}
	72
	73	addr_type = ipv6_addr_type(&usin->sin6_addr);
	74
	75	if (addr_type == IPV6_ADDR_ANY) {
	76	/*
	77	* connect to self
	78	*/
	79	usin->sin6_addr.s6_addr[15] = 0x01;
	80	}
	81
	82	daddr = &usin->sin6_addr;
	83
	84	if (addr_type == IPV6_ADDR_MAPPED) {
	85	struct sockaddr_in sin;
	86
	87	if (__ipv6_only_sock(sk)) {
	88	err = -ENETUNREACH;
	89	goto out;
	90	}
	91	sin.sin_family = AF_INET;
	92	sin.sin_addr.s_addr = daddr->s6_addr32[3];
	93	sin.sin_port = usin->sin6_port;
	94
1ab1457c YH	95	err = ip4_datagram_connect(sk,
1ab1457c YH	96	(struct sockaddr*) &sin,
1da177e4 LT	97	sizeof(sin));
	98
	99	ipv4_connected:
	100	if (err)
	101	goto out;
1ab1457c	102
1da177e4 LT	103	ipv6_addr_set(&np->daddr, 0, 0, htonl(0x0000ffff), inet->daddr);
	104
	105	if (ipv6_addr_any(&np->saddr)) {
	106	ipv6_addr_set(&np->saddr, 0, 0, htonl(0x0000ffff),
	107	inet->saddr);
	108	}
	109
	110	if (ipv6_addr_any(&np->rcv_saddr)) {
	111	ipv6_addr_set(&np->rcv_saddr, 0, 0, htonl(0x0000ffff),
	112	inet->rcv_saddr);
	113	}
	114	goto out;
	115	}
	116
	117	if (addr_type&IPV6_ADDR_LINKLOCAL) {
	118	if (addr_len >= sizeof(struct sockaddr_in6) &&
	119	usin->sin6_scope_id) {
	120	if (sk->sk_bound_dev_if &&
	121	sk->sk_bound_dev_if != usin->sin6_scope_id) {
	122	err = -EINVAL;
	123	goto out;
	124	}
	125	sk->sk_bound_dev_if = usin->sin6_scope_id;
	126	if (!sk->sk_bound_dev_if &&
	127	(addr_type & IPV6_ADDR_MULTICAST))
	128	fl.oif = np->mcast_oif;
	129	}
	130
	131	/* Connect to link-local address requires an interface */
	132	if (!sk->sk_bound_dev_if) {
	133	err = -EINVAL;
	134	goto out;
	135	}
	136	}
	137
	138	ipv6_addr_copy(&np->daddr, daddr);
	139	np->flow_label = fl.fl6_flowlabel;
	140
	141	inet->dport = usin->sin6_port;
	142
	143	/*
	144	* Check for a route to destination an obtain the
	145	* destination cache for it.
	146	*/
	147
	148	fl.proto = sk->sk_protocol;
	149	ipv6_addr_copy(&fl.fl6_dst, &np->daddr);
	150	ipv6_addr_copy(&fl.fl6_src, &np->saddr);
	151	fl.oif = sk->sk_bound_dev_if;
	152	fl.fl_ip_dport = inet->dport;
	153	fl.fl_ip_sport = inet->sport;
	154
	155	if (!fl.oif && (addr_type&IPV6_ADDR_MULTICAST))
	156	fl.oif = np->mcast_oif;
	157
beb8d13b VY	158	security_sk_classify_flow(sk, &fl);
beb8d13b VY	159
1da177e4 LT	160	if (flowlabel) {
	161	if (flowlabel->opt && flowlabel->opt->srcrt) {
	162	struct rt0_hdr rt0 = (struct rt0_hdr ) flowlabel->opt->srcrt;
	163	ipv6_addr_copy(&final, &fl.fl6_dst);
	164	ipv6_addr_copy(&fl.fl6_dst, rt0->addr);
	165	final_p = &final;
	166	}
	167	} else if (np->opt && np->opt->srcrt) {
	168	struct rt0_hdr rt0 = (struct rt0_hdr )np->opt->srcrt;
	169	ipv6_addr_copy(&final, &fl.fl6_dst);
	170	ipv6_addr_copy(&fl.fl6_dst, rt0->addr);
	171	final_p = &final;
	172	}
	173
	174	err = ip6_dst_lookup(sk, &dst, &fl);
	175	if (err)
	176	goto out;
	177	if (final_p)
	178	ipv6_addr_copy(&fl.fl6_dst, final_p);
	179
8eb9086f	180	if ((err = xfrm_lookup(&dst, &fl, sk, 1)) < 0)
1da177e4	181	goto out;
1da177e4 LT	182
	183	/* source address lookup done in ip6_dst_lookup */
	184
	185	if (ipv6_addr_any(&np->saddr))
	186	ipv6_addr_copy(&np->saddr, &fl.fl6_src);
	187
	188	if (ipv6_addr_any(&np->rcv_saddr)) {
	189	ipv6_addr_copy(&np->rcv_saddr, &fl.fl6_src);
	190	inet->rcv_saddr = LOOPBACK4_IPV6;
	191	}
	192
	193	ip6_dst_store(sk, dst,
	194	ipv6_addr_equal(&fl.fl6_dst, &np->daddr) ?
8e1ef0a9 YH	195	&np->daddr : NULL,
	196	#ifdef CONFIG_IPV6_SUBTREES
	197	ipv6_addr_equal(&fl.fl6_src, &np->saddr) ?
	198	&np->saddr :
	199	#endif
	200	NULL);
1da177e4 LT	201
	202	sk->sk_state = TCP_ESTABLISHED;
	203	out:
	204	fl6_sock_release(flowlabel);
	205	return err;
	206	}
	207
1ab1457c	208	void ipv6_icmp_error(struct sock sk, struct sk_buff skb, int err,
e69a4adc	209	__be16 port, u32 info, u8 *payload)
1da177e4 LT	210	{
	211	struct ipv6_pinfo *np = inet6_sk(sk);
	212	struct icmp6hdr icmph = (struct icmp6hdr )skb->h.raw;
	213	struct sock_exterr_skb *serr;
	214
	215	if (!np->recverr)
	216	return;
	217
	218	skb = skb_clone(skb, GFP_ATOMIC);
	219	if (!skb)
	220	return;
	221
	222	serr = SKB_EXT_ERR(skb);
	223	serr->ee.ee_errno = err;
	224	serr->ee.ee_origin = SO_EE_ORIGIN_ICMP6;
1ab1457c	225	serr->ee.ee_type = icmph->icmp6_type;
1da177e4 LT	226	serr->ee.ee_code = icmph->icmp6_code;
	227	serr->ee.ee_pad = 0;
	228	serr->ee.ee_info = info;
	229	serr->ee.ee_data = 0;
d56f90a7 ACM	230	serr->addr_offset = (u8 )&(((struct ipv6hdr )(icmph + 1))->daddr) -
d56f90a7 ACM	231	skb_network_header(skb);
1da177e4 LT	232	serr->port = port;
	233
	234	skb->h.raw = payload;
	235	__skb_pull(skb, payload - skb->data);
	236
	237	if (sock_queue_err_skb(sk, skb))
	238	kfree_skb(skb);
	239	}
	240
	241	void ipv6_local_error(struct sock sk, int err, struct flowi fl, u32 info)
	242	{
	243	struct ipv6_pinfo *np = inet6_sk(sk);
	244	struct sock_exterr_skb *serr;
	245	struct ipv6hdr *iph;
	246	struct sk_buff *skb;
	247
	248	if (!np->recverr)
	249	return;
	250
	251	skb = alloc_skb(sizeof(struct ipv6hdr), GFP_ATOMIC);
	252	if (!skb)
	253	return;
	254
1ced98e8 ACM	255	skb_put(skb, sizeof(struct ipv6hdr));
	256	skb_reset_network_header(skb);
	257	iph = skb->nh.ipv6h;
1da177e4 LT	258	ipv6_addr_copy(&iph->daddr, &fl->fl6_dst);
	259
	260	serr = SKB_EXT_ERR(skb);
	261	serr->ee.ee_errno = err;
	262	serr->ee.ee_origin = SO_EE_ORIGIN_LOCAL;
1ab1457c	263	serr->ee.ee_type = 0;
1da177e4 LT	264	serr->ee.ee_code = 0;
	265	serr->ee.ee_pad = 0;
	266	serr->ee.ee_info = info;
	267	serr->ee.ee_data = 0;
d56f90a7	268	serr->addr_offset = (u8 *)&iph->daddr - skb_network_header(skb);
1da177e4 LT	269	serr->port = fl->fl_ip_dport;
	270
	271	skb->h.raw = skb->tail;
	272	__skb_pull(skb, skb->tail - skb->data);
	273
	274	if (sock_queue_err_skb(sk, skb))
	275	kfree_skb(skb);
	276	}
	277
1ab1457c	278	/*
1da177e4 LT	279	* Handle MSG_ERRQUEUE
	280	*/
	281	int ipv6_recv_error(struct sock sk, struct msghdr msg, int len)
	282	{
	283	struct ipv6_pinfo *np = inet6_sk(sk);
	284	struct sock_exterr_skb *serr;
	285	struct sk_buff skb, skb2;
	286	struct sockaddr_in6 *sin;
	287	struct {
	288	struct sock_extended_err ee;
	289	struct sockaddr_in6 offender;
	290	} errhdr;
	291	int err;
	292	int copied;
	293
	294	err = -EAGAIN;
	295	skb = skb_dequeue(&sk->sk_error_queue);
	296	if (skb == NULL)
	297	goto out;
	298
	299	copied = skb->len;
	300	if (copied > len) {
	301	msg->msg_flags \|= MSG_TRUNC;
	302	copied = len;
	303	}
	304	err = skb_copy_datagram_iovec(skb, 0, msg->msg_iov, copied);
	305	if (err)
	306	goto out_free_skb;
	307
	308	sock_recv_timestamp(msg, sk, skb);
	309
	310	serr = SKB_EXT_ERR(skb);
	311
	312	sin = (struct sockaddr_in6 *)msg->msg_name;
	313	if (sin) {
d56f90a7	314	const unsigned char *nh = skb_network_header(skb);
1da177e4 LT	315	sin->sin6_family = AF_INET6;
1da177e4 LT	316	sin->sin6_flowinfo = 0;
1ab1457c	317	sin->sin6_port = serr->port;
1da177e4 LT	318	sin->sin6_scope_id = 0;
	319	if (serr->ee.ee_origin == SO_EE_ORIGIN_ICMP6) {
	320	ipv6_addr_copy(&sin->sin6_addr,
d56f90a7	321	(struct in6_addr *)(nh + serr->addr_offset));
1da177e4	322	if (np->sndflow)
d56f90a7 ACM	323	sin->sin6_flowinfo =
	324	((__be32 )(nh + serr->addr_offset - 24) &
	325	IPV6_FLOWINFO_MASK);
1da177e4 LT	326	if (ipv6_addr_type(&sin->sin6_addr) & IPV6_ADDR_LINKLOCAL)
	327	sin->sin6_scope_id = IP6CB(skb)->iif;
	328	} else {
	329	ipv6_addr_set(&sin->sin6_addr, 0, 0,
	330	htonl(0xffff),
d56f90a7	331	(__be32 )(nh + serr->addr_offset));
1da177e4 LT	332	}
	333	}
	334
	335	memcpy(&errhdr.ee, &serr->ee, sizeof(struct sock_extended_err));
	336	sin = &errhdr.offender;
	337	sin->sin6_family = AF_UNSPEC;
	338	if (serr->ee.ee_origin != SO_EE_ORIGIN_LOCAL) {
	339	sin->sin6_family = AF_INET6;
	340	sin->sin6_flowinfo = 0;
	341	sin->sin6_scope_id = 0;
	342	if (serr->ee.ee_origin == SO_EE_ORIGIN_ICMP6) {
	343	ipv6_addr_copy(&sin->sin6_addr, &skb->nh.ipv6h->saddr);
	344	if (np->rxopt.all)
	345	datagram_recv_ctl(sk, msg, skb);
	346	if (ipv6_addr_type(&sin->sin6_addr) & IPV6_ADDR_LINKLOCAL)
	347	sin->sin6_scope_id = IP6CB(skb)->iif;
	348	} else {
	349	struct inet_sock *inet = inet_sk(sk);
	350
	351	ipv6_addr_set(&sin->sin6_addr, 0, 0,
eddc9ec5	352	htonl(0xffff), ip_hdr(skb)->saddr);
1da177e4 LT	353	if (inet->cmsg_flags)
	354	ip_cmsg_recv(msg, skb);
	355	}
	356	}
	357
	358	put_cmsg(msg, SOL_IPV6, IPV6_RECVERR, sizeof(errhdr), &errhdr);
	359
	360	/* Now we could try to dump offended packet options */
	361
	362	msg->msg_flags \|= MSG_ERRQUEUE;
	363	err = copied;
	364
	365	/* Reset and regenerate socket error */
e0f9f858	366	spin_lock_bh(&sk->sk_error_queue.lock);
1da177e4 LT	367	sk->sk_err = 0;
	368	if ((skb2 = skb_peek(&sk->sk_error_queue)) != NULL) {
	369	sk->sk_err = SKB_EXT_ERR(skb2)->ee.ee_errno;
e0f9f858	370	spin_unlock_bh(&sk->sk_error_queue.lock);
1da177e4 LT	371	sk->sk_error_report(sk);
1da177e4 LT	372	} else {
e0f9f858	373	spin_unlock_bh(&sk->sk_error_queue.lock);
1da177e4 LT	374	}
1da177e4 LT	375
1ab1457c	376	out_free_skb:
1da177e4 LT	377	kfree_skb(skb);
	378	out:
	379	return err;
	380	}
	381
	382
	383
	384	int datagram_recv_ctl(struct sock sk, struct msghdr msg, struct sk_buff *skb)
	385	{
	386	struct ipv6_pinfo *np = inet6_sk(sk);
	387	struct inet6_skb_parm *opt = IP6CB(skb);
d56f90a7	388	unsigned char *nh = skb_network_header(skb);
1da177e4 LT	389
	390	if (np->rxopt.bits.rxinfo) {
	391	struct in6_pktinfo src_info;
	392
	393	src_info.ipi6_ifindex = opt->iif;
	394	ipv6_addr_copy(&src_info.ipi6_addr, &skb->nh.ipv6h->daddr);
	395	put_cmsg(msg, SOL_IPV6, IPV6_PKTINFO, sizeof(src_info), &src_info);
	396	}
	397
	398	if (np->rxopt.bits.rxhlim) {
	399	int hlim = skb->nh.ipv6h->hop_limit;
	400	put_cmsg(msg, SOL_IPV6, IPV6_HOPLIMIT, sizeof(hlim), &hlim);
	401	}
	402
41a1f8ea	403	if (np->rxopt.bits.rxtclass) {
e69a4adc	404	int tclass = (ntohl((__be32 )skb->nh.ipv6h) >> 20) & 0xff;
41a1f8ea YH	405	put_cmsg(msg, SOL_IPV6, IPV6_TCLASS, sizeof(tclass), &tclass);
	406	}
	407
d56f90a7 ACM	408	if (np->rxopt.bits.rxflow && ((__be32 )nh & IPV6_FLOWINFO_MASK)) {
d56f90a7 ACM	409	__be32 flowinfo = (__be32 )nh & IPV6_FLOWINFO_MASK;
1da177e4 LT	410	put_cmsg(msg, SOL_IPV6, IPV6_FLOWINFO, sizeof(flowinfo), &flowinfo);
1da177e4 LT	411	}
333fad53 YH	412
333fad53 YH	413	/* HbH is allowed only once */
1da177e4	414	if (np->rxopt.bits.hopopts && opt->hop) {
d56f90a7	415	u8 *ptr = nh + opt->hop;
1da177e4 LT	416	put_cmsg(msg, SOL_IPV6, IPV6_HOPOPTS, (ptr[1]+1)<<3, ptr);
1da177e4 LT	417	}
333fad53 YH	418
	419	if (opt->lastopt &&
	420	(np->rxopt.bits.dstopts \|\| np->rxopt.bits.srcrt)) {
	421	/*
	422	* Silly enough, but we need to reparse in order to
	423	* report extension headers (except for HbH)
	424	* in order.
	425	*
1ab1457c	426	* Also note that IPV6_RECVRTHDRDSTOPTS is NOT
333fad53 YH	427	* (and WILL NOT be) defined because
	428	* IPV6_RECVDSTOPTS is more generic. --yoshfuji
	429	*/
	430	unsigned int off = sizeof(struct ipv6hdr);
	431	u8 nexthdr = skb->nh.ipv6h->nexthdr;
	432
	433	while (off <= opt->lastopt) {
	434	unsigned len;
d56f90a7	435	u8 *ptr = nh + off;
333fad53 YH	436
	437	switch(nexthdr) {
	438	case IPPROTO_DSTOPTS:
	439	nexthdr = ptr[0];
	440	len = (ptr[1] + 1) << 3;
	441	if (np->rxopt.bits.dstopts)
	442	put_cmsg(msg, SOL_IPV6, IPV6_DSTOPTS, len, ptr);
	443	break;
	444	case IPPROTO_ROUTING:
	445	nexthdr = ptr[0];
	446	len = (ptr[1] + 1) << 3;
	447	if (np->rxopt.bits.srcrt)
	448	put_cmsg(msg, SOL_IPV6, IPV6_RTHDR, len, ptr);
	449	break;
	450	case IPPROTO_AH:
	451	nexthdr = ptr[0];
a3059893	452	len = (ptr[1] + 2) << 2;
333fad53 YH	453	break;
	454	default:
	455	nexthdr = ptr[0];
	456	len = (ptr[1] + 1) << 3;
	457	break;
	458	}
	459
	460	off += len;
	461	}
	462	}
	463
	464	/* socket options in old style */
	465	if (np->rxopt.bits.rxoinfo) {
	466	struct in6_pktinfo src_info;
	467
	468	src_info.ipi6_ifindex = opt->iif;
	469	ipv6_addr_copy(&src_info.ipi6_addr, &skb->nh.ipv6h->daddr);
	470	put_cmsg(msg, SOL_IPV6, IPV6_2292PKTINFO, sizeof(src_info), &src_info);
	471	}
	472	if (np->rxopt.bits.rxohlim) {
	473	int hlim = skb->nh.ipv6h->hop_limit;
	474	put_cmsg(msg, SOL_IPV6, IPV6_2292HOPLIMIT, sizeof(hlim), &hlim);
	475	}
	476	if (np->rxopt.bits.ohopopts && opt->hop) {
d56f90a7	477	u8 *ptr = nh + opt->hop;
333fad53 YH	478	put_cmsg(msg, SOL_IPV6, IPV6_2292HOPOPTS, (ptr[1]+1)<<3, ptr);
	479	}
	480	if (np->rxopt.bits.odstopts && opt->dst0) {
d56f90a7	481	u8 *ptr = nh + opt->dst0;
333fad53	482	put_cmsg(msg, SOL_IPV6, IPV6_2292DSTOPTS, (ptr[1]+1)<<3, ptr);
1da177e4	483	}
333fad53	484	if (np->rxopt.bits.osrcrt && opt->srcrt) {
d56f90a7	485	struct ipv6_rt_hdr rthdr = (struct ipv6_rt_hdr )(nh + opt->srcrt);
333fad53	486	put_cmsg(msg, SOL_IPV6, IPV6_2292RTHDR, (rthdr->hdrlen+1) << 3, rthdr);
1da177e4	487	}
333fad53	488	if (np->rxopt.bits.odstopts && opt->dst1) {
d56f90a7	489	u8 *ptr = nh + opt->dst1;
333fad53	490	put_cmsg(msg, SOL_IPV6, IPV6_2292DSTOPTS, (ptr[1]+1)<<3, ptr);
1da177e4 LT	491	}
	492	return 0;
	493	}
	494
	495	int datagram_send_ctl(struct msghdr msg, struct flowi fl,
	496	struct ipv6_txoptions *opt,
41a1f8ea	497	int hlimit, int tclass)
1da177e4 LT	498	{
	499	struct in6_pktinfo *src_info;
	500	struct cmsghdr *cmsg;
	501	struct ipv6_rt_hdr *rthdr;
	502	struct ipv6_opt_hdr *hdr;
	503	int len;
	504	int err = 0;
	505
	506	for (cmsg = CMSG_FIRSTHDR(msg); cmsg; cmsg = CMSG_NXTHDR(msg, cmsg)) {
	507	int addr_type;
	508	struct net_device *dev = NULL;
	509
	510	if (!CMSG_OK(msg, cmsg)) {
	511	err = -EINVAL;
	512	goto exit_f;
	513	}
	514
	515	if (cmsg->cmsg_level != SOL_IPV6)
	516	continue;
	517
	518	switch (cmsg->cmsg_type) {
1ab1457c YH	519	case IPV6_PKTINFO:
	520	case IPV6_2292PKTINFO:
	521	if (cmsg->cmsg_len < CMSG_LEN(sizeof(struct in6_pktinfo))) {
1da177e4 LT	522	err = -EINVAL;
	523	goto exit_f;
	524	}
	525
	526	src_info = (struct in6_pktinfo *)CMSG_DATA(cmsg);
1ab1457c	527
1da177e4 LT	528	if (src_info->ipi6_ifindex) {
	529	if (fl->oif && src_info->ipi6_ifindex != fl->oif)
	530	return -EINVAL;
	531	fl->oif = src_info->ipi6_ifindex;
	532	}
	533
	534	addr_type = ipv6_addr_type(&src_info->ipi6_addr);
	535
	536	if (addr_type == IPV6_ADDR_ANY)
	537	break;
1ab1457c	538
1da177e4 LT	539	if (addr_type & IPV6_ADDR_LINKLOCAL) {
	540	if (!src_info->ipi6_ifindex)
	541	return -EINVAL;
	542	else {
	543	dev = dev_get_by_index(src_info->ipi6_ifindex);
	544	if (!dev)
	545	return -ENODEV;
	546	}
	547	}
	548	if (!ipv6_chk_addr(&src_info->ipi6_addr, dev, 0)) {
	549	if (dev)
	550	dev_put(dev);
	551	err = -EINVAL;
	552	goto exit_f;
	553	}
	554	if (dev)
	555	dev_put(dev);
	556
	557	ipv6_addr_copy(&fl->fl6_src, &src_info->ipi6_addr);
	558	break;
	559
	560	case IPV6_FLOWINFO:
1ab1457c	561	if (cmsg->cmsg_len < CMSG_LEN(4)) {
1da177e4 LT	562	err = -EINVAL;
	563	goto exit_f;
	564	}
	565
	566	if (fl->fl6_flowlabel&IPV6_FLOWINFO_MASK) {
90bcaf7b	567	if ((fl->fl6_flowlabel^(__be32 )CMSG_DATA(cmsg))&~IPV6_FLOWINFO_MASK) {
1da177e4 LT	568	err = -EINVAL;
	569	goto exit_f;
	570	}
	571	}
90bcaf7b	572	fl->fl6_flowlabel = IPV6_FLOWINFO_MASK & (__be32 )CMSG_DATA(cmsg);
1da177e4 LT	573	break;
1da177e4 LT	574
333fad53	575	case IPV6_2292HOPOPTS:
1da177e4	576	case IPV6_HOPOPTS:
1ab1457c	577	if (opt->hopopt \|\| cmsg->cmsg_len < CMSG_LEN(sizeof(struct ipv6_opt_hdr))) {
1da177e4 LT	578	err = -EINVAL;
	579	goto exit_f;
	580	}
	581
	582	hdr = (struct ipv6_opt_hdr *)CMSG_DATA(cmsg);
	583	len = ((hdr->hdrlen + 1) << 3);
	584	if (cmsg->cmsg_len < CMSG_LEN(len)) {
	585	err = -EINVAL;
	586	goto exit_f;
	587	}
	588	if (!capable(CAP_NET_RAW)) {
	589	err = -EPERM;
	590	goto exit_f;
	591	}
	592	opt->opt_nflen += len;
	593	opt->hopopt = hdr;
	594	break;
	595
333fad53	596	case IPV6_2292DSTOPTS:
1ab1457c	597	if (cmsg->cmsg_len < CMSG_LEN(sizeof(struct ipv6_opt_hdr))) {
1da177e4 LT	598	err = -EINVAL;
	599	goto exit_f;
	600	}
	601
	602	hdr = (struct ipv6_opt_hdr *)CMSG_DATA(cmsg);
	603	len = ((hdr->hdrlen + 1) << 3);
	604	if (cmsg->cmsg_len < CMSG_LEN(len)) {
	605	err = -EINVAL;
	606	goto exit_f;
	607	}
	608	if (!capable(CAP_NET_RAW)) {
	609	err = -EPERM;
	610	goto exit_f;
	611	}
	612	if (opt->dst1opt) {
	613	err = -EINVAL;
	614	goto exit_f;
	615	}
	616	opt->opt_flen += len;
	617	opt->dst1opt = hdr;
	618	break;
	619
333fad53 YH	620	case IPV6_DSTOPTS:
	621	case IPV6_RTHDRDSTOPTS:
	622	if (cmsg->cmsg_len < CMSG_LEN(sizeof(struct ipv6_opt_hdr))) {
	623	err = -EINVAL;
	624	goto exit_f;
	625	}
	626
	627	hdr = (struct ipv6_opt_hdr *)CMSG_DATA(cmsg);
	628	len = ((hdr->hdrlen + 1) << 3);
	629	if (cmsg->cmsg_len < CMSG_LEN(len)) {
	630	err = -EINVAL;
	631	goto exit_f;
	632	}
	633	if (!capable(CAP_NET_RAW)) {
	634	err = -EPERM;
	635	goto exit_f;
	636	}
	637	if (cmsg->cmsg_type == IPV6_DSTOPTS) {
	638	opt->opt_flen += len;
	639	opt->dst1opt = hdr;
	640	} else {
	641	opt->opt_nflen += len;
	642	opt->dst0opt = hdr;
	643	}
	644	break;
	645
	646	case IPV6_2292RTHDR:
1da177e4	647	case IPV6_RTHDR:
1ab1457c	648	if (cmsg->cmsg_len < CMSG_LEN(sizeof(struct ipv6_rt_hdr))) {
1da177e4 LT	649	err = -EINVAL;
	650	goto exit_f;
	651	}
	652
	653	rthdr = (struct ipv6_rt_hdr *)CMSG_DATA(cmsg);
	654
280a9d34 MN	655	switch (rthdr->type) {
	656	case IPV6_SRCRT_TYPE_0:
	657	#ifdef CONFIG_IPV6_MIP6
	658	case IPV6_SRCRT_TYPE_2:
	659	#endif
	660	break;
	661	default:
1da177e4 LT	662	err = -EINVAL;
	663	goto exit_f;
	664	}
	665
	666	len = ((rthdr->hdrlen + 1) << 3);
	667
1ab1457c	668	if (cmsg->cmsg_len < CMSG_LEN(len)) {
1da177e4 LT	669	err = -EINVAL;
	670	goto exit_f;
	671	}
	672
	673	/* segments left must also match */
	674	if ((rthdr->hdrlen >> 1) != rthdr->segments_left) {
	675	err = -EINVAL;
	676	goto exit_f;
	677	}
	678
	679	opt->opt_nflen += len;
	680	opt->srcrt = rthdr;
	681
333fad53	682	if (cmsg->cmsg_type == IPV6_2292RTHDR && opt->dst1opt) {
1da177e4 LT	683	int dsthdrlen = ((opt->dst1opt->hdrlen+1)<<3);
	684
	685	opt->opt_nflen += dsthdrlen;
	686	opt->dst0opt = opt->dst1opt;
	687	opt->dst1opt = NULL;
	688	opt->opt_flen -= dsthdrlen;
	689	}
	690
	691	break;
	692
333fad53	693	case IPV6_2292HOPLIMIT:
1da177e4 LT	694	case IPV6_HOPLIMIT:
	695	if (cmsg->cmsg_len != CMSG_LEN(sizeof(int))) {
	696	err = -EINVAL;
	697	goto exit_f;
	698	}
	699
	700	hlimit = (int *)CMSG_DATA(cmsg);
	701	break;
	702
41a1f8ea YH	703	case IPV6_TCLASS:
	704	{
	705	int tc;
	706
	707	err = -EINVAL;
	708	if (cmsg->cmsg_len != CMSG_LEN(sizeof(int))) {
	709	goto exit_f;
	710	}
	711
	712	tc = (int )CMSG_DATA(cmsg);
d0ee011f	713	if (tc < -1 \|\| tc > 0xff)
41a1f8ea YH	714	goto exit_f;
	715
	716	err = 0;
	717	*tclass = tc;
	718
	719	break;
	720	}
1da177e4	721	default:
64ce2073	722	LIMIT_NETDEBUG(KERN_DEBUG "invalid cmsg type: %d\n",
1ab1457c	723	cmsg->cmsg_type);
1da177e4 LT	724	err = -EINVAL;
	725	break;
	726	};
	727	}
	728
	729	exit_f:
	730	return err;
	731	}