ipv6_sockglue.c 26.7 KB
Newer Older
L
Linus Torvalds 已提交
1 2
/*
 *	IPv6 BSD socket options interface
3
 *	Linux INET6 implementation
L
Linus Torvalds 已提交
4 5
 *
 *	Authors:
6
 *	Pedro Roque		<roque@di.fc.ul.pt>
L
Linus Torvalds 已提交
7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25
 *
 *	Based on linux/net/ipv4/ip_sockglue.c
 *
 *	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.
 *
 *	FIXME: Make the setsockopt code POSIX compliant: That is
 *
 *	o	Truncate getsockopt returns
 *	o	Return an optlen of the truncated length if need be
 *
 *	Changes:
 *	David L Stevens <dlstevens@us.ibm.com>:
 *		- added multicast source filtering API for MLDv2
 */

#include <linux/module.h>
26
#include <linux/capability.h>
L
Linus Torvalds 已提交
27 28 29 30 31 32
#include <linux/errno.h>
#include <linux/types.h>
#include <linux/socket.h>
#include <linux/sockios.h>
#include <linux/net.h>
#include <linux/in6.h>
33
#include <linux/mroute6.h>
L
Linus Torvalds 已提交
34 35 36 37 38
#include <linux/netdevice.h>
#include <linux/if_arp.h>
#include <linux/init.h>
#include <linux/sysctl.h>
#include <linux/netfilter.h>
39
#include <linux/slab.h>
L
Linus Torvalds 已提交
40 41 42 43 44 45 46 47 48 49 50 51

#include <net/sock.h>
#include <net/snmp.h>
#include <net/ipv6.h>
#include <net/ndisc.h>
#include <net/protocol.h>
#include <net/transp_v6.h>
#include <net/ip6_route.h>
#include <net/addrconf.h>
#include <net/inet_common.h>
#include <net/tcp.h>
#include <net/udp.h>
52
#include <net/udplite.h>
L
Linus Torvalds 已提交
53
#include <net/xfrm.h>
54
#include <net/compat.h>
L
Linus Torvalds 已提交
55 56 57

#include <asm/uaccess.h>

58
DEFINE_SNMP_STAT(struct ipstats_mib, ipv6_statistics) __read_mostly;
L
Linus Torvalds 已提交
59 60 61 62

struct ip6_ra_chain *ip6_ra_chain;
DEFINE_RWLOCK(ip6_ra_lock);

63
int ip6_ra_control(struct sock *sk, int sel)
L
Linus Torvalds 已提交
64 65 66 67
{
	struct ip6_ra_chain *ra, *new_ra, **rap;

	/* RA packet may be delivered ONLY to IPPROTO_RAW socket */
E
Eric Dumazet 已提交
68
	if (sk->sk_type != SOCK_RAW || inet_sk(sk)->inet_num != IPPROTO_RAW)
69
		return -ENOPROTOOPT;
L
Linus Torvalds 已提交
70 71 72 73 74 75 76 77

	new_ra = (sel>=0) ? kmalloc(sizeof(*new_ra), GFP_KERNEL) : NULL;

	write_lock_bh(&ip6_ra_lock);
	for (rap = &ip6_ra_chain; (ra=*rap) != NULL; rap = &ra->next) {
		if (ra->sk == sk) {
			if (sel>=0) {
				write_unlock_bh(&ip6_ra_lock);
J
Jesper Juhl 已提交
78
				kfree(new_ra);
L
Linus Torvalds 已提交
79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102
				return -EADDRINUSE;
			}

			*rap = ra->next;
			write_unlock_bh(&ip6_ra_lock);

			sock_put(sk);
			kfree(ra);
			return 0;
		}
	}
	if (new_ra == NULL) {
		write_unlock_bh(&ip6_ra_lock);
		return -ENOBUFS;
	}
	new_ra->sk = sk;
	new_ra->sel = sel;
	new_ra->next = ra;
	*rap = new_ra;
	sock_hold(sk);
	write_unlock_bh(&ip6_ra_lock);
	return 0;
}

103 104 105 106 107 108 109
static
struct ipv6_txoptions *ipv6_update_options(struct sock *sk,
					   struct ipv6_txoptions *opt)
{
	if (inet_sk(sk)->is_icsk) {
		if (opt &&
		    !((1 << sk->sk_state) & (TCPF_LISTEN | TCPF_CLOSE)) &&
E
Eric Dumazet 已提交
110
		    inet_sk(sk)->inet_daddr != LOOPBACK4_IPV6) {
111 112 113 114 115 116
			struct inet_connection_sock *icsk = inet_csk(sk);
			icsk->icsk_ext_hdr_len = opt->opt_flen + opt->opt_nflen;
			icsk->icsk_sync_mss(sk, icsk->icsk_pmtu_cookie);
		}
		opt = xchg(&inet6_sk(sk)->opt, opt);
	} else {
E
Eric Dumazet 已提交
117
		spin_lock(&sk->sk_dst_lock);
118
		opt = xchg(&inet6_sk(sk)->opt, opt);
E
Eric Dumazet 已提交
119
		spin_unlock(&sk->sk_dst_lock);
120 121 122 123 124 125
	}
	sk_dst_reset(sk);

	return opt;
}

126
static int do_ipv6_setsockopt(struct sock *sk, int level, int optname,
127
		    char __user *optval, unsigned int optlen)
L
Linus Torvalds 已提交
128 129
{
	struct ipv6_pinfo *np = inet6_sk(sk);
130
	struct net *net = sock_net(sk);
L
Linus Torvalds 已提交
131 132 133 134 135
	int val, valbool;
	int retv = -ENOPROTOOPT;

	if (optval == NULL)
		val=0;
136 137 138 139 140 141 142
	else {
		if (optlen >= sizeof(int)) {
			if (get_user(val, (int __user *) optval))
				return -EFAULT;
		} else
			val = 0;
	}
L
Linus Torvalds 已提交
143 144 145

	valbool = (val!=0);

146 147 148
	if (ip6_mroute_opt(optname))
		return ip6_mroute_setsockopt(sk, optname, optval, optlen);

L
Linus Torvalds 已提交
149 150 151 152 153
	lock_sock(sk);

	switch (optname) {

	case IPV6_ADDRFORM:
154 155
		if (optlen < sizeof(int))
			goto e_inval;
L
Linus Torvalds 已提交
156 157 158 159
		if (val == PF_INET) {
			struct ipv6_txoptions *opt;
			struct sk_buff *pktopt;

160 161 162
			if (sk->sk_type == SOCK_RAW)
				break;

163 164 165 166 167 168 169 170
			if (sk->sk_protocol == IPPROTO_UDP ||
			    sk->sk_protocol == IPPROTO_UDPLITE) {
				struct udp_sock *up = udp_sk(sk);
				if (up->pending == AF_INET6) {
					retv = -EBUSY;
					break;
				}
			} else if (sk->sk_protocol != IPPROTO_TCP)
L
Linus Torvalds 已提交
171 172 173 174 175 176 177 178
				break;

			if (sk->sk_state != TCP_ESTABLISHED) {
				retv = -ENOTCONN;
				break;
			}

			if (ipv6_only_sock(sk) ||
B
Brian Haley 已提交
179
			    !ipv6_addr_v4mapped(&np->daddr)) {
L
Linus Torvalds 已提交
180 181 182 183 184 185 186
				retv = -EADDRNOTAVAIL;
				break;
			}

			fl6_free_socklist(sk);
			ipv6_sock_mc_close(sk);

187 188 189 190 191 192 193
			/*
			 * Sock is moving from IPv6 to IPv4 (sk_prot), so
			 * remove it from the refcnt debug socks count in the
			 * original family...
			 */
			sk_refcnt_debug_dec(sk);

L
Linus Torvalds 已提交
194
			if (sk->sk_protocol == IPPROTO_TCP) {
195
				struct inet_connection_sock *icsk = inet_csk(sk);
L
Linus Torvalds 已提交
196
				local_bh_disable();
197 198
				sock_prot_inuse_add(net, sk->sk_prot, -1);
				sock_prot_inuse_add(net, &tcp_prot, 1);
L
Linus Torvalds 已提交
199 200
				local_bh_enable();
				sk->sk_prot = &tcp_prot;
201
				icsk->icsk_af_ops = &ipv4_specific;
L
Linus Torvalds 已提交
202 203
				sk->sk_socket->ops = &inet_stream_ops;
				sk->sk_family = PF_INET;
204
				tcp_sync_mss(sk, icsk->icsk_pmtu_cookie);
L
Linus Torvalds 已提交
205
			} else {
206 207
				struct proto *prot = &udp_prot;

208
				if (sk->sk_protocol == IPPROTO_UDPLITE)
209
					prot = &udplite_prot;
L
Linus Torvalds 已提交
210
				local_bh_disable();
211 212
				sock_prot_inuse_add(net, sk->sk_prot, -1);
				sock_prot_inuse_add(net, prot, 1);
L
Linus Torvalds 已提交
213
				local_bh_enable();
214
				sk->sk_prot = prot;
L
Linus Torvalds 已提交
215 216 217 218 219 220 221
				sk->sk_socket->ops = &inet_dgram_ops;
				sk->sk_family = PF_INET;
			}
			opt = xchg(&np->opt, NULL);
			if (opt)
				sock_kfree_s(sk, opt, opt->tot_len);
			pktopt = xchg(&np->pktoptions, NULL);
222
			kfree_skb(pktopt);
L
Linus Torvalds 已提交
223 224

			sk->sk_destruct = inet_sock_destruct;
225 226 227 228 229
			/*
			 * ... and add it to the refcnt debug socks count
			 * in the new family. -acme
			 */
			sk_refcnt_debug_inc(sk);
L
Linus Torvalds 已提交
230 231 232 233 234 235 236
			module_put(THIS_MODULE);
			retv = 0;
			break;
		}
		goto e_inval;

	case IPV6_V6ONLY:
237
		if (optlen < sizeof(int) ||
E
Eric Dumazet 已提交
238
		    inet_sk(sk)->inet_num)
L
Linus Torvalds 已提交
239 240 241 242 243
			goto e_inval;
		np->ipv6only = valbool;
		retv = 0;
		break;

244
	case IPV6_RECVPKTINFO:
245 246
		if (optlen < sizeof(int))
			goto e_inval;
L
Linus Torvalds 已提交
247 248 249
		np->rxopt.bits.rxinfo = valbool;
		retv = 0;
		break;
250

251
	case IPV6_2292PKTINFO:
252 253
		if (optlen < sizeof(int))
			goto e_inval;
254 255 256
		np->rxopt.bits.rxoinfo = valbool;
		retv = 0;
		break;
L
Linus Torvalds 已提交
257

258
	case IPV6_RECVHOPLIMIT:
259 260
		if (optlen < sizeof(int))
			goto e_inval;
L
Linus Torvalds 已提交
261 262 263 264
		np->rxopt.bits.rxhlim = valbool;
		retv = 0;
		break;

265
	case IPV6_2292HOPLIMIT:
266 267
		if (optlen < sizeof(int))
			goto e_inval;
268 269 270 271 272
		np->rxopt.bits.rxohlim = valbool;
		retv = 0;
		break;

	case IPV6_RECVRTHDR:
273 274
		if (optlen < sizeof(int))
			goto e_inval;
275
		np->rxopt.bits.srcrt = valbool;
L
Linus Torvalds 已提交
276 277 278
		retv = 0;
		break;

279
	case IPV6_2292RTHDR:
280 281
		if (optlen < sizeof(int))
			goto e_inval;
282
		np->rxopt.bits.osrcrt = valbool;
283 284 285 286
		retv = 0;
		break;

	case IPV6_RECVHOPOPTS:
287 288
		if (optlen < sizeof(int))
			goto e_inval;
L
Linus Torvalds 已提交
289 290 291 292
		np->rxopt.bits.hopopts = valbool;
		retv = 0;
		break;

293
	case IPV6_2292HOPOPTS:
294 295
		if (optlen < sizeof(int))
			goto e_inval;
296 297 298 299 300
		np->rxopt.bits.ohopopts = valbool;
		retv = 0;
		break;

	case IPV6_RECVDSTOPTS:
301 302
		if (optlen < sizeof(int))
			goto e_inval;
L
Linus Torvalds 已提交
303 304 305 306
		np->rxopt.bits.dstopts = valbool;
		retv = 0;
		break;

307
	case IPV6_2292DSTOPTS:
308 309
		if (optlen < sizeof(int))
			goto e_inval;
310 311 312 313
		np->rxopt.bits.odstopts = valbool;
		retv = 0;
		break;

314
	case IPV6_TCLASS:
315 316
		if (optlen < sizeof(int))
			goto e_inval;
317
		if (val < -1 || val > 0xff)
318
			goto e_inval;
G
Gerrit Renker 已提交
319 320 321
		/* RFC 3542, 6.5: default traffic class of 0x0 */
		if (val == -1)
			val = 0;
322 323 324
		np->tclass = val;
		retv = 0;
		break;
325

326
	case IPV6_RECVTCLASS:
327 328
		if (optlen < sizeof(int))
			goto e_inval;
329 330 331 332
		np->rxopt.bits.rxtclass = valbool;
		retv = 0;
		break;

L
Linus Torvalds 已提交
333
	case IPV6_FLOWINFO:
334 335
		if (optlen < sizeof(int))
			goto e_inval;
L
Linus Torvalds 已提交
336 337 338 339
		np->rxopt.bits.rxflow = valbool;
		retv = 0;
		break;

340 341 342 343 344 345 346
	case IPV6_RECVPATHMTU:
		if (optlen < sizeof(int))
			goto e_inval;
		np->rxopt.bits.rxpmtu = valbool;
		retv = 0;
		break;

347 348 349 350 351 352
	case IPV6_HOPOPTS:
	case IPV6_RTHDRDSTOPTS:
	case IPV6_RTHDR:
	case IPV6_DSTOPTS:
	{
		struct ipv6_txoptions *opt;
353 354 355 356

		/* remove any sticky options header with a zero option
		 * length, per RFC3542.
		 */
357
		if (optlen == 0)
358
			optval = NULL;
359 360
		else if (optval == NULL)
			goto e_inval;
361 362 363
		else if (optlen < sizeof(struct ipv6_opt_hdr) ||
			 optlen & 0x7 || optlen > 8 * 255)
			goto e_inval;
364 365 366 367 368 369 370 371 372 373 374 375 376 377 378

		/* hop-by-hop / destination options are privileged option */
		retv = -EPERM;
		if (optname != IPV6_RTHDR && !capable(CAP_NET_RAW))
			break;

		opt = ipv6_renew_options(sk, np->opt, optname,
					 (struct ipv6_opt_hdr __user *)optval,
					 optlen);
		if (IS_ERR(opt)) {
			retv = PTR_ERR(opt);
			break;
		}

		/* routing header option needs extra check */
B
Brian Haley 已提交
379
		retv = -EINVAL;
380
		if (optname == IPV6_RTHDR && opt && opt->srcrt) {
381
			struct ipv6_rt_hdr *rthdr = opt->srcrt;
382
			switch (rthdr->type) {
383
#if defined(CONFIG_IPV6_MIP6) || defined(CONFIG_IPV6_MIP6_MODULE)
384
			case IPV6_SRCRT_TYPE_2:
B
Brian Haley 已提交
385 386 387 388
				if (rthdr->hdrlen != 2 ||
				    rthdr->segments_left != 1)
					goto sticky_done;

389
				break;
390
#endif
391
			default:
392
				goto sticky_done;
393
			}
394 395 396
		}

		retv = 0;
397
		opt = ipv6_update_options(sk, opt);
398 399 400 401 402 403
sticky_done:
		if (opt)
			sock_kfree_s(sk, opt, opt->tot_len);
		break;
	}

404 405 406 407 408 409 410 411 412
	case IPV6_PKTINFO:
	{
		struct in6_pktinfo pkt;

		if (optlen == 0)
			goto e_inval;
		else if (optlen < sizeof(struct in6_pktinfo) || optval == NULL)
			goto e_inval;

413
		if (copy_from_user(&pkt, optval, sizeof(struct in6_pktinfo))) {
414 415 416 417 418 419 420 421 422 423 424 425
				retv = -EFAULT;
				break;
		}
		if (sk->sk_bound_dev_if && pkt.ipi6_ifindex != sk->sk_bound_dev_if)
			goto e_inval;

		np->sticky_pktinfo.ipi6_ifindex = pkt.ipi6_ifindex;
		ipv6_addr_copy(&np->sticky_pktinfo.ipi6_addr, &pkt.ipi6_addr);
		retv = 0;
		break;
	}

426
	case IPV6_2292PKTOPTIONS:
L
Linus Torvalds 已提交
427 428 429 430 431 432 433 434
	{
		struct ipv6_txoptions *opt = NULL;
		struct msghdr msg;
		struct flowi fl;
		int junk;

		fl.fl6_flowlabel = 0;
		fl.oif = sk->sk_bound_dev_if;
B
Brian Haley 已提交
435
		fl.mark = sk->sk_mark;
L
Linus Torvalds 已提交
436 437 438 439 440 441 442 443 444 445 446 447 448 449 450 451 452 453 454 455 456 457 458 459 460

		if (optlen == 0)
			goto update;

		/* 1K is probably excessive
		 * 1K is surely not enough, 2K per standard header is 16K.
		 */
		retv = -EINVAL;
		if (optlen > 64*1024)
			break;

		opt = sock_kmalloc(sk, sizeof(*opt) + optlen, GFP_KERNEL);
		retv = -ENOBUFS;
		if (opt == NULL)
			break;

		memset(opt, 0, sizeof(*opt));
		opt->tot_len = sizeof(*opt) + optlen;
		retv = -EFAULT;
		if (copy_from_user(opt+1, optval, optlen))
			goto done;

		msg.msg_controllen = optlen;
		msg.msg_control = (void*)(opt+1);

461
		retv = datagram_send_ctl(net, &msg, &fl, opt, &junk, &junk);
L
Linus Torvalds 已提交
462 463 464 465
		if (retv)
			goto done;
update:
		retv = 0;
466
		opt = ipv6_update_options(sk, opt);
L
Linus Torvalds 已提交
467 468 469 470 471 472
done:
		if (opt)
			sock_kfree_s(sk, opt, opt->tot_len);
		break;
	}
	case IPV6_UNICAST_HOPS:
473 474
		if (optlen < sizeof(int))
			goto e_inval;
L
Linus Torvalds 已提交
475 476 477 478 479 480 481 482
		if (val > 255 || val < -1)
			goto e_inval;
		np->hop_limit = val;
		retv = 0;
		break;

	case IPV6_MULTICAST_HOPS:
		if (sk->sk_type == SOCK_STREAM)
483
			break;
484 485
		if (optlen < sizeof(int))
			goto e_inval;
L
Linus Torvalds 已提交
486 487 488 489 490 491 492
		if (val > 255 || val < -1)
			goto e_inval;
		np->mcast_hops = val;
		retv = 0;
		break;

	case IPV6_MULTICAST_LOOP:
493 494
		if (optlen < sizeof(int))
			goto e_inval;
495 496
		if (val != valbool)
			goto e_inval;
L
Linus Torvalds 已提交
497 498 499 500 501 502
		np->mc_loop = valbool;
		retv = 0;
		break;

	case IPV6_MULTICAST_IF:
		if (sk->sk_type == SOCK_STREAM)
503
			break;
504 505
		if (optlen < sizeof(int))
			goto e_inval;
L
Linus Torvalds 已提交
506

507
		if (val) {
E
Eric Dumazet 已提交
508 509
			struct net_device *dev;

510 511 512
			if (sk->sk_bound_dev_if && sk->sk_bound_dev_if != val)
				goto e_inval;

E
Eric Dumazet 已提交
513 514
			dev = dev_get_by_index(net, val);
			if (!dev) {
515 516 517
				retv = -ENODEV;
				break;
			}
E
Eric Dumazet 已提交
518
			dev_put(dev);
L
Linus Torvalds 已提交
519 520 521 522 523 524 525 526 527
		}
		np->mcast_oif = val;
		retv = 0;
		break;
	case IPV6_ADD_MEMBERSHIP:
	case IPV6_DROP_MEMBERSHIP:
	{
		struct ipv6_mreq mreq;

528 529 530
		if (optlen < sizeof(struct ipv6_mreq))
			goto e_inval;

531 532 533 534
		retv = -EPROTO;
		if (inet_sk(sk)->is_icsk)
			break;

L
Linus Torvalds 已提交
535 536 537 538 539 540 541 542 543 544 545 546 547 548 549
		retv = -EFAULT;
		if (copy_from_user(&mreq, optval, sizeof(struct ipv6_mreq)))
			break;

		if (optname == IPV6_ADD_MEMBERSHIP)
			retv = ipv6_sock_mc_join(sk, mreq.ipv6mr_ifindex, &mreq.ipv6mr_multiaddr);
		else
			retv = ipv6_sock_mc_drop(sk, mreq.ipv6mr_ifindex, &mreq.ipv6mr_multiaddr);
		break;
	}
	case IPV6_JOIN_ANYCAST:
	case IPV6_LEAVE_ANYCAST:
	{
		struct ipv6_mreq mreq;

550
		if (optlen < sizeof(struct ipv6_mreq))
L
Linus Torvalds 已提交
551 552 553 554 555 556 557 558 559 560 561 562 563 564 565 566 567 568
			goto e_inval;

		retv = -EFAULT;
		if (copy_from_user(&mreq, optval, sizeof(struct ipv6_mreq)))
			break;

		if (optname == IPV6_JOIN_ANYCAST)
			retv = ipv6_sock_ac_join(sk, mreq.ipv6mr_ifindex, &mreq.ipv6mr_acaddr);
		else
			retv = ipv6_sock_ac_drop(sk, mreq.ipv6mr_ifindex, &mreq.ipv6mr_acaddr);
		break;
	}
	case MCAST_JOIN_GROUP:
	case MCAST_LEAVE_GROUP:
	{
		struct group_req greq;
		struct sockaddr_in6 *psin6;

569 570 571
		if (optlen < sizeof(struct group_req))
			goto e_inval;

L
Linus Torvalds 已提交
572 573 574 575 576 577 578 579 580 581 582 583 584 585 586 587 588 589 590 591 592 593 594 595
		retv = -EFAULT;
		if (copy_from_user(&greq, optval, sizeof(struct group_req)))
			break;
		if (greq.gr_group.ss_family != AF_INET6) {
			retv = -EADDRNOTAVAIL;
			break;
		}
		psin6 = (struct sockaddr_in6 *)&greq.gr_group;
		if (optname == MCAST_JOIN_GROUP)
			retv = ipv6_sock_mc_join(sk, greq.gr_interface,
				&psin6->sin6_addr);
		else
			retv = ipv6_sock_mc_drop(sk, greq.gr_interface,
				&psin6->sin6_addr);
		break;
	}
	case MCAST_JOIN_SOURCE_GROUP:
	case MCAST_LEAVE_SOURCE_GROUP:
	case MCAST_BLOCK_SOURCE:
	case MCAST_UNBLOCK_SOURCE:
	{
		struct group_source_req greqs;
		int omode, add;

596
		if (optlen < sizeof(struct group_source_req))
L
Linus Torvalds 已提交
597 598 599 600 601 602 603 604 605 606 607 608 609 610 611 612 613 614 615 616 617 618
			goto e_inval;
		if (copy_from_user(&greqs, optval, sizeof(greqs))) {
			retv = -EFAULT;
			break;
		}
		if (greqs.gsr_group.ss_family != AF_INET6 ||
		    greqs.gsr_source.ss_family != AF_INET6) {
			retv = -EADDRNOTAVAIL;
			break;
		}
		if (optname == MCAST_BLOCK_SOURCE) {
			omode = MCAST_EXCLUDE;
			add = 1;
		} else if (optname == MCAST_UNBLOCK_SOURCE) {
			omode = MCAST_EXCLUDE;
			add = 0;
		} else if (optname == MCAST_JOIN_SOURCE_GROUP) {
			struct sockaddr_in6 *psin6;

			psin6 = (struct sockaddr_in6 *)&greqs.gsr_group;
			retv = ipv6_sock_mc_join(sk, greqs.gsr_interface,
				&psin6->sin6_addr);
619 620
			/* prior join w/ different source is ok */
			if (retv && retv != -EADDRINUSE)
L
Linus Torvalds 已提交
621 622 623
				break;
			omode = MCAST_INCLUDE;
			add = 1;
624
		} else /* MCAST_LEAVE_SOURCE_GROUP */ {
L
Linus Torvalds 已提交
625 626 627 628 629 630 631 632 633 634 635 636 637 638 639 640 641
			omode = MCAST_INCLUDE;
			add = 0;
		}
		retv = ip6_mc_source(add, omode, sk, &greqs);
		break;
	}
	case MCAST_MSFILTER:
	{
		extern int sysctl_mld_max_msf;
		struct group_filter *gsf;

		if (optlen < GROUP_FILTER_SIZE(0))
			goto e_inval;
		if (optlen > sysctl_optmem_max) {
			retv = -ENOBUFS;
			break;
		}
642
		gsf = kmalloc(optlen,GFP_KERNEL);
S
Stephen Hemminger 已提交
643
		if (!gsf) {
L
Linus Torvalds 已提交
644 645 646 647 648 649 650 651 652 653 654 655 656 657 658 659 660 661 662 663 664 665 666 667 668 669
			retv = -ENOBUFS;
			break;
		}
		retv = -EFAULT;
		if (copy_from_user(gsf, optval, optlen)) {
			kfree(gsf);
			break;
		}
		/* numsrc >= (4G-140)/128 overflow in 32 bits */
		if (gsf->gf_numsrc >= 0x1ffffffU ||
		    gsf->gf_numsrc > sysctl_mld_max_msf) {
			kfree(gsf);
			retv = -ENOBUFS;
			break;
		}
		if (GROUP_FILTER_SIZE(gsf->gf_numsrc) > optlen) {
			kfree(gsf);
			retv = -EINVAL;
			break;
		}
		retv = ip6_mc_msfilter(sk, gsf);
		kfree(gsf);

		break;
	}
	case IPV6_ROUTER_ALERT:
670 671
		if (optlen < sizeof(int))
			goto e_inval;
672
		retv = ip6_ra_control(sk, val);
L
Linus Torvalds 已提交
673 674
		break;
	case IPV6_MTU_DISCOVER:
675 676
		if (optlen < sizeof(int))
			goto e_inval;
J
John Dykstra 已提交
677
		if (val < IP_PMTUDISC_DONT || val > IP_PMTUDISC_PROBE)
L
Linus Torvalds 已提交
678 679 680 681 682
			goto e_inval;
		np->pmtudisc = val;
		retv = 0;
		break;
	case IPV6_MTU:
683 684
		if (optlen < sizeof(int))
			goto e_inval;
L
Linus Torvalds 已提交
685 686 687 688 689 690
		if (val && val < IPV6_MIN_MTU)
			goto e_inval;
		np->frag_size = val;
		retv = 0;
		break;
	case IPV6_RECVERR:
691 692
		if (optlen < sizeof(int))
			goto e_inval;
L
Linus Torvalds 已提交
693 694 695 696 697 698
		np->recverr = valbool;
		if (!val)
			skb_queue_purge(&sk->sk_error_queue);
		retv = 0;
		break;
	case IPV6_FLOWINFO_SEND:
699 700
		if (optlen < sizeof(int))
			goto e_inval;
L
Linus Torvalds 已提交
701 702 703 704 705 706 707 708
		np->sndflow = valbool;
		retv = 0;
		break;
	case IPV6_FLOWLABEL_MGR:
		retv = ipv6_flowlabel_opt(sk, optval, optlen);
		break;
	case IPV6_IPSEC_POLICY:
	case IPV6_XFRM_POLICY:
709 710 711
		retv = -EPERM;
		if (!capable(CAP_NET_ADMIN))
			break;
L
Linus Torvalds 已提交
712 713 714
		retv = xfrm_user_policy(sk, optname, optval, optlen);
		break;

715 716 717 718 719
	case IPV6_ADDR_PREFERENCES:
	    {
		unsigned int pref = 0;
		unsigned int prefmask = ~0;

720 721 722
		if (optlen < sizeof(int))
			goto e_inval;

723 724 725 726 727 728 729 730 731 732 733 734 735 736 737 738 739 740 741 742 743 744 745 746 747 748 749 750 751 752 753 754 755 756 757 758 759 760 761 762 763 764 765 766 767 768 769 770 771 772 773 774 775 776
		retv = -EINVAL;

		/* check PUBLIC/TMP/PUBTMP_DEFAULT conflicts */
		switch (val & (IPV6_PREFER_SRC_PUBLIC|
			       IPV6_PREFER_SRC_TMP|
			       IPV6_PREFER_SRC_PUBTMP_DEFAULT)) {
		case IPV6_PREFER_SRC_PUBLIC:
			pref |= IPV6_PREFER_SRC_PUBLIC;
			break;
		case IPV6_PREFER_SRC_TMP:
			pref |= IPV6_PREFER_SRC_TMP;
			break;
		case IPV6_PREFER_SRC_PUBTMP_DEFAULT:
			break;
		case 0:
			goto pref_skip_pubtmp;
		default:
			goto e_inval;
		}

		prefmask &= ~(IPV6_PREFER_SRC_PUBLIC|
			      IPV6_PREFER_SRC_TMP);
pref_skip_pubtmp:

		/* check HOME/COA conflicts */
		switch (val & (IPV6_PREFER_SRC_HOME|IPV6_PREFER_SRC_COA)) {
		case IPV6_PREFER_SRC_HOME:
			break;
		case IPV6_PREFER_SRC_COA:
			pref |= IPV6_PREFER_SRC_COA;
		case 0:
			goto pref_skip_coa;
		default:
			goto e_inval;
		}

		prefmask &= ~IPV6_PREFER_SRC_COA;
pref_skip_coa:

		/* check CGA/NONCGA conflicts */
		switch (val & (IPV6_PREFER_SRC_CGA|IPV6_PREFER_SRC_NONCGA)) {
		case IPV6_PREFER_SRC_CGA:
		case IPV6_PREFER_SRC_NONCGA:
		case 0:
			break;
		default:
			goto e_inval;
		}

		np->srcprefs = (np->srcprefs & prefmask) | pref;
		retv = 0;

		break;
	    }
777 778 779 780 781 782
	case IPV6_MINHOPCOUNT:
		if (optlen < sizeof(int))
			goto e_inval;
		if (val < 0 || val > 255)
			goto e_inval;
		np->min_hopcount = val;
783 784 785
		break;
	case IPV6_DONTFRAG:
		np->dontfrag = valbool;
786 787
		retv = 0;
		break;
L
Linus Torvalds 已提交
788
	}
789

L
Linus Torvalds 已提交
790 791 792 793 794 795 796 797 798
	release_sock(sk);

	return retv;

e_inval:
	release_sock(sk);
	return -EINVAL;
}

799
int ipv6_setsockopt(struct sock *sk, int level, int optname,
800
		    char __user *optval, unsigned int optlen)
801 802 803 804 805 806 807 808 809 810 811 812 813 814 815 816 817 818 819 820 821 822 823
{
	int err;

	if (level == SOL_IP && sk->sk_type != SOCK_RAW)
		return udp_prot.setsockopt(sk, level, optname, optval, optlen);

	if (level != SOL_IPV6)
		return -ENOPROTOOPT;

	err = do_ipv6_setsockopt(sk, level, optname, optval, optlen);
#ifdef CONFIG_NETFILTER
	/* we need to exclude all possible ENOPROTOOPTs except default case */
	if (err == -ENOPROTOOPT && optname != IPV6_IPSEC_POLICY &&
			optname != IPV6_XFRM_POLICY) {
		lock_sock(sk);
		err = nf_setsockopt(sk, PF_INET6, optname, optval,
				optlen);
		release_sock(sk);
	}
#endif
	return err;
}

824
EXPORT_SYMBOL(ipv6_setsockopt);
825 826 827

#ifdef CONFIG_COMPAT
int compat_ipv6_setsockopt(struct sock *sk, int level, int optname,
828
			   char __user *optval, unsigned int optlen)
829 830 831 832
{
	int err;

	if (level == SOL_IP && sk->sk_type != SOCK_RAW) {
833 834 835 836
		if (udp_prot.compat_setsockopt != NULL)
			return udp_prot.compat_setsockopt(sk, level, optname,
							  optval, optlen);
		return udp_prot.setsockopt(sk, level, optname, optval, optlen);
837 838 839 840 841
	}

	if (level != SOL_IPV6)
		return -ENOPROTOOPT;

842 843 844 845
	if (optname >= MCAST_JOIN_GROUP && optname <= MCAST_MSFILTER)
		return compat_mc_setsockopt(sk, level, optname, optval, optlen,
			ipv6_setsockopt);

846 847 848 849
	err = do_ipv6_setsockopt(sk, level, optname, optval, optlen);
#ifdef CONFIG_NETFILTER
	/* we need to exclude all possible ENOPROTOOPTs except default case */
	if (err == -ENOPROTOOPT && optname != IPV6_IPSEC_POLICY &&
850
	    optname != IPV6_XFRM_POLICY) {
851
		lock_sock(sk);
852 853
		err = compat_nf_setsockopt(sk, PF_INET6, optname,
					   optval, optlen);
854 855 856 857 858
		release_sock(sk);
	}
#endif
	return err;
}
859 860

EXPORT_SYMBOL(compat_ipv6_setsockopt);
861 862
#endif

863
static int ipv6_getsockopt_sticky(struct sock *sk, struct ipv6_txoptions *opt,
864
				  int optname, char __user *optval, int len)
865
{
866 867
	struct ipv6_opt_hdr *hdr;

868 869 870 871 872 873 874 875 876 877 878 879 880 881 882 883 884 885 886 887 888
	if (!opt)
		return 0;

	switch(optname) {
	case IPV6_HOPOPTS:
		hdr = opt->hopopt;
		break;
	case IPV6_RTHDRDSTOPTS:
		hdr = opt->dst0opt;
		break;
	case IPV6_RTHDR:
		hdr = (struct ipv6_opt_hdr *)opt->srcrt;
		break;
	case IPV6_DSTOPTS:
		hdr = opt->dst1opt;
		break;
	default:
		return -EINVAL;	/* should not happen */
	}

	if (!hdr)
889
		return 0;
890

891
	len = min_t(unsigned int, len, ipv6_optlen(hdr));
892
	if (copy_to_user(optval, hdr, len))
893
		return -EFAULT;
894
	return len;
895 896
}

897
static int do_ipv6_getsockopt(struct sock *sk, int level, int optname,
L
Linus Torvalds 已提交
898 899 900 901 902 903
		    char __user *optval, int __user *optlen)
{
	struct ipv6_pinfo *np = inet6_sk(sk);
	int len;
	int val;

904 905 906
	if (ip6_mroute_opt(optname))
		return ip6_mroute_getsockopt(sk, optname, optval, optlen);

L
Linus Torvalds 已提交
907 908 909 910 911
	if (get_user(len, optlen))
		return -EFAULT;
	switch (optname) {
	case IPV6_ADDRFORM:
		if (sk->sk_protocol != IPPROTO_UDP &&
912
		    sk->sk_protocol != IPPROTO_UDPLITE &&
L
Linus Torvalds 已提交
913
		    sk->sk_protocol != IPPROTO_TCP)
914
			return -ENOPROTOOPT;
L
Linus Torvalds 已提交
915 916 917 918 919 920 921 922 923 924 925 926 927
		if (sk->sk_state != TCP_ESTABLISHED)
			return -ENOTCONN;
		val = sk->sk_family;
		break;
	case MCAST_MSFILTER:
	{
		struct group_filter gsf;
		int err;

		if (len < GROUP_FILTER_SIZE(0))
			return -EINVAL;
		if (copy_from_user(&gsf, optval, GROUP_FILTER_SIZE(0)))
			return -EFAULT;
928 929
		if (gsf.gf_group.ss_family != AF_INET6)
			return -EADDRNOTAVAIL;
L
Linus Torvalds 已提交
930 931 932 933 934 935 936
		lock_sock(sk);
		err = ip6_mc_msfget(sk, &gsf,
			(struct group_filter __user *)optval, optlen);
		release_sock(sk);
		return err;
	}

937
	case IPV6_2292PKTOPTIONS:
L
Linus Torvalds 已提交
938 939 940 941 942 943 944 945 946 947 948 949 950 951 952 953 954 955 956 957 958 959 960 961 962
	{
		struct msghdr msg;
		struct sk_buff *skb;

		if (sk->sk_type != SOCK_STREAM)
			return -ENOPROTOOPT;

		msg.msg_control = optval;
		msg.msg_controllen = len;
		msg.msg_flags = 0;

		lock_sock(sk);
		skb = np->pktoptions;
		if (skb)
			atomic_inc(&skb->users);
		release_sock(sk);

		if (skb) {
			int err = datagram_recv_ctl(sk, &msg, skb);
			kfree_skb(skb);
			if (err)
				return err;
		} else {
			if (np->rxopt.bits.rxinfo) {
				struct in6_pktinfo src_info;
963 964 965 966
				src_info.ipi6_ifindex = np->mcast_oif ? np->mcast_oif :
					np->sticky_pktinfo.ipi6_ifindex;
				np->mcast_oif? ipv6_addr_copy(&src_info.ipi6_addr, &np->daddr) :
					ipv6_addr_copy(&src_info.ipi6_addr, &(np->sticky_pktinfo.ipi6_addr));
L
Linus Torvalds 已提交
967 968 969 970 971 972
				put_cmsg(&msg, SOL_IPV6, IPV6_PKTINFO, sizeof(src_info), &src_info);
			}
			if (np->rxopt.bits.rxhlim) {
				int hlim = np->mcast_hops;
				put_cmsg(&msg, SOL_IPV6, IPV6_HOPLIMIT, sizeof(hlim), &hlim);
			}
973 974
			if (np->rxopt.bits.rxoinfo) {
				struct in6_pktinfo src_info;
975 976 977 978
				src_info.ipi6_ifindex = np->mcast_oif ? np->mcast_oif :
					np->sticky_pktinfo.ipi6_ifindex;
				np->mcast_oif? ipv6_addr_copy(&src_info.ipi6_addr, &np->daddr) :
					ipv6_addr_copy(&src_info.ipi6_addr, &(np->sticky_pktinfo.ipi6_addr));
979 980 981 982 983 984
				put_cmsg(&msg, SOL_IPV6, IPV6_2292PKTINFO, sizeof(src_info), &src_info);
			}
			if (np->rxopt.bits.rxohlim) {
				int hlim = np->mcast_hops;
				put_cmsg(&msg, SOL_IPV6, IPV6_2292HOPLIMIT, sizeof(hlim), &hlim);
			}
L
Linus Torvalds 已提交
985 986 987 988 989 990 991
		}
		len -= msg.msg_controllen;
		return put_user(len, optlen);
	}
	case IPV6_MTU:
	{
		struct dst_entry *dst;
E
Eric Dumazet 已提交
992

993
		val = 0;
E
Eric Dumazet 已提交
994 995 996
		rcu_read_lock();
		dst = __sk_dst_get(sk);
		if (dst)
L
Linus Torvalds 已提交
997
			val = dst_mtu(dst);
E
Eric Dumazet 已提交
998
		rcu_read_unlock();
L
Linus Torvalds 已提交
999 1000 1001 1002 1003 1004 1005 1006 1007
		if (!val)
			return -ENOTCONN;
		break;
	}

	case IPV6_V6ONLY:
		val = np->ipv6only;
		break;

1008
	case IPV6_RECVPKTINFO:
L
Linus Torvalds 已提交
1009 1010 1011
		val = np->rxopt.bits.rxinfo;
		break;

1012 1013 1014 1015 1016
	case IPV6_2292PKTINFO:
		val = np->rxopt.bits.rxoinfo;
		break;

	case IPV6_RECVHOPLIMIT:
L
Linus Torvalds 已提交
1017 1018 1019
		val = np->rxopt.bits.rxhlim;
		break;

1020 1021 1022 1023 1024
	case IPV6_2292HOPLIMIT:
		val = np->rxopt.bits.rxohlim;
		break;

	case IPV6_RECVRTHDR:
L
Linus Torvalds 已提交
1025 1026 1027
		val = np->rxopt.bits.srcrt;
		break;

1028 1029 1030 1031
	case IPV6_2292RTHDR:
		val = np->rxopt.bits.osrcrt;
		break;

L
Linus Torvalds 已提交
1032
	case IPV6_HOPOPTS:
1033 1034 1035 1036 1037 1038
	case IPV6_RTHDRDSTOPTS:
	case IPV6_RTHDR:
	case IPV6_DSTOPTS:
	{

		lock_sock(sk);
1039
		len = ipv6_getsockopt_sticky(sk, np->opt,
1040
					     optname, optval, len);
1041
		release_sock(sk);
1042 1043 1044
		/* check if ipv6_getsockopt_sticky() returns err code */
		if (len < 0)
			return len;
1045 1046 1047 1048
		return put_user(len, optlen);
	}

	case IPV6_RECVHOPOPTS:
L
Linus Torvalds 已提交
1049 1050 1051
		val = np->rxopt.bits.hopopts;
		break;

1052 1053 1054 1055 1056
	case IPV6_2292HOPOPTS:
		val = np->rxopt.bits.ohopopts;
		break;

	case IPV6_RECVDSTOPTS:
L
Linus Torvalds 已提交
1057 1058 1059
		val = np->rxopt.bits.dstopts;
		break;

1060 1061 1062 1063
	case IPV6_2292DSTOPTS:
		val = np->rxopt.bits.odstopts;
		break;

1064 1065 1066 1067 1068 1069 1070 1071
	case IPV6_TCLASS:
		val = np->tclass;
		break;

	case IPV6_RECVTCLASS:
		val = np->rxopt.bits.rxtclass;
		break;

L
Linus Torvalds 已提交
1072 1073 1074 1075
	case IPV6_FLOWINFO:
		val = np->rxopt.bits.rxflow;
		break;

1076 1077 1078 1079 1080 1081 1082 1083 1084 1085 1086 1087 1088 1089 1090 1091 1092 1093 1094 1095 1096 1097 1098 1099 1100 1101 1102 1103 1104 1105 1106 1107
	case IPV6_RECVPATHMTU:
		val = np->rxopt.bits.rxpmtu;
		break;

	case IPV6_PATHMTU:
	{
		struct dst_entry *dst;
		struct ip6_mtuinfo mtuinfo;

		if (len < sizeof(mtuinfo))
			return -EINVAL;

		len = sizeof(mtuinfo);
		memset(&mtuinfo, 0, sizeof(mtuinfo));

		rcu_read_lock();
		dst = __sk_dst_get(sk);
		if (dst)
			mtuinfo.ip6m_mtu = dst_mtu(dst);
		rcu_read_unlock();
		if (!mtuinfo.ip6m_mtu)
			return -ENOTCONN;

		if (put_user(len, optlen))
			return -EFAULT;
		if (copy_to_user(optval, &mtuinfo, len))
			return -EFAULT;

		return 0;
		break;
	}

L
Linus Torvalds 已提交
1108 1109
	case IPV6_UNICAST_HOPS:
	case IPV6_MULTICAST_HOPS:
1110 1111 1112 1113 1114 1115 1116 1117
	{
		struct dst_entry *dst;

		if (optname == IPV6_UNICAST_HOPS)
			val = np->hop_limit;
		else
			val = np->mcast_hops;

E
Eric Dumazet 已提交
1118 1119 1120 1121
		if (val < 0) {
			rcu_read_lock();
			dst = __sk_dst_get(sk);
			if (dst)
1122
				val = ip6_dst_hoplimit(dst);
E
Eric Dumazet 已提交
1123
			rcu_read_unlock();
1124
		}
E
Eric Dumazet 已提交
1125

1126
		if (val < 0)
1127
			val = sock_net(sk)->ipv6.devconf_all->hop_limit;
L
Linus Torvalds 已提交
1128
		break;
1129
	}
L
Linus Torvalds 已提交
1130 1131 1132 1133 1134 1135 1136 1137 1138 1139 1140 1141 1142 1143 1144 1145 1146 1147 1148 1149 1150

	case IPV6_MULTICAST_LOOP:
		val = np->mc_loop;
		break;

	case IPV6_MULTICAST_IF:
		val = np->mcast_oif;
		break;

	case IPV6_MTU_DISCOVER:
		val = np->pmtudisc;
		break;

	case IPV6_RECVERR:
		val = np->recverr;
		break;

	case IPV6_FLOWINFO_SEND:
		val = np->sndflow;
		break;

1151 1152 1153 1154 1155 1156 1157 1158 1159 1160 1161 1162 1163 1164 1165 1166 1167
	case IPV6_ADDR_PREFERENCES:
		val = 0;

		if (np->srcprefs & IPV6_PREFER_SRC_TMP)
			val |= IPV6_PREFER_SRC_TMP;
		else if (np->srcprefs & IPV6_PREFER_SRC_PUBLIC)
			val |= IPV6_PREFER_SRC_PUBLIC;
		else {
			/* XXX: should we return system default? */
			val |= IPV6_PREFER_SRC_PUBTMP_DEFAULT;
		}

		if (np->srcprefs & IPV6_PREFER_SRC_COA)
			val |= IPV6_PREFER_SRC_COA;
		else
			val |= IPV6_PREFER_SRC_HOME;
		break;
1168 1169 1170 1171

	case IPV6_MINHOPCOUNT:
		val = np->min_hopcount;
		break;
1172 1173 1174 1175

	case IPV6_DONTFRAG:
		val = np->dontfrag;
		break;
1176

L
Linus Torvalds 已提交
1177
	default:
1178
		return -ENOPROTOOPT;
L
Linus Torvalds 已提交
1179 1180 1181 1182 1183 1184 1185 1186 1187
	}
	len = min_t(unsigned int, sizeof(int), len);
	if(put_user(len, optlen))
		return -EFAULT;
	if(copy_to_user(optval,&val,len))
		return -EFAULT;
	return 0;
}

1188 1189 1190 1191 1192 1193 1194 1195 1196 1197 1198 1199 1200
int ipv6_getsockopt(struct sock *sk, int level, int optname,
		    char __user *optval, int __user *optlen)
{
	int err;

	if (level == SOL_IP && sk->sk_type != SOCK_RAW)
		return udp_prot.getsockopt(sk, level, optname, optval, optlen);

	if(level != SOL_IPV6)
		return -ENOPROTOOPT;

	err = do_ipv6_getsockopt(sk, level, optname, optval, optlen);
#ifdef CONFIG_NETFILTER
1201 1202
	/* we need to exclude all possible ENOPROTOOPTs except default case */
	if (err == -ENOPROTOOPT && optname != IPV6_2292PKTOPTIONS) {
1203 1204 1205 1206 1207 1208 1209 1210 1211 1212 1213 1214 1215 1216 1217 1218
		int len;

		if (get_user(len, optlen))
			return -EFAULT;

		lock_sock(sk);
		err = nf_getsockopt(sk, PF_INET6, optname, optval,
				&len);
		release_sock(sk);
		if (err >= 0)
			err = put_user(len, optlen);
	}
#endif
	return err;
}

1219 1220
EXPORT_SYMBOL(ipv6_getsockopt);

1221 1222
#ifdef CONFIG_COMPAT
int compat_ipv6_getsockopt(struct sock *sk, int level, int optname,
1223
			   char __user *optval, int __user *optlen)
1224 1225 1226 1227
{
	int err;

	if (level == SOL_IP && sk->sk_type != SOCK_RAW) {
1228 1229 1230 1231
		if (udp_prot.compat_getsockopt != NULL)
			return udp_prot.compat_getsockopt(sk, level, optname,
							  optval, optlen);
		return udp_prot.getsockopt(sk, level, optname, optval, optlen);
1232 1233
	}

1234
	if (level != SOL_IPV6)
1235 1236
		return -ENOPROTOOPT;

1237 1238 1239 1240
	if (optname == MCAST_MSFILTER)
		return compat_mc_getsockopt(sk, level, optname, optval, optlen,
			ipv6_getsockopt);

1241 1242
	err = do_ipv6_getsockopt(sk, level, optname, optval, optlen);
#ifdef CONFIG_NETFILTER
1243 1244
	/* we need to exclude all possible ENOPROTOOPTs except default case */
	if (err == -ENOPROTOOPT && optname != IPV6_2292PKTOPTIONS) {
1245 1246 1247 1248 1249 1250
		int len;

		if (get_user(len, optlen))
			return -EFAULT;

		lock_sock(sk);
1251 1252
		err = compat_nf_getsockopt(sk, PF_INET6,
					   optname, optval, &len);
1253 1254 1255 1256 1257 1258 1259
		release_sock(sk);
		if (err >= 0)
			err = put_user(len, optlen);
	}
#endif
	return err;
}
1260 1261

EXPORT_SYMBOL(compat_ipv6_getsockopt);
1262 1263
#endif