ipv6_sockglue.c 24.8 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 39 40 41 42 43 44 45 46 47 48 49 50
#include <linux/netdevice.h>
#include <linux/if_arp.h>
#include <linux/init.h>
#include <linux/sysctl.h>
#include <linux/netfilter.h>

#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>
51
#include <net/udplite.h>
L
Linus Torvalds 已提交
52
#include <net/xfrm.h>
53
#include <net/compat.h>
L
Linus Torvalds 已提交
54 55 56

#include <asm/uaccess.h>

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

struct ip6_ra_chain *ip6_ra_chain;
DEFINE_RWLOCK(ip6_ra_lock);

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

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

	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 已提交
77
				kfree(new_ra);
L
Linus Torvalds 已提交
78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101
				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;
}

102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124
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)) &&
		    inet_sk(sk)->daddr != LOOPBACK4_IPV6) {
			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 {
		write_lock(&sk->sk_dst_lock);
		opt = xchg(&inet6_sk(sk)->opt, opt);
		write_unlock(&sk->sk_dst_lock);
	}
	sk_dst_reset(sk);

	return opt;
}

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

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

	valbool = (val!=0);

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

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

	switch (optname) {

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

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

162 163 164 165 166 167 168 169
			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 已提交
170 171 172 173 174 175 176 177
				break;

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

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

			fl6_free_socklist(sk);
			ipv6_sock_mc_close(sk);

186 187 188 189 190 191 192
			/*
			 * 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 已提交
193
			if (sk->sk_protocol == IPPROTO_TCP) {
194
				struct inet_connection_sock *icsk = inet_csk(sk);
L
Linus Torvalds 已提交
195
				local_bh_disable();
196 197
				sock_prot_inuse_add(net, sk->sk_prot, -1);
				sock_prot_inuse_add(net, &tcp_prot, 1);
L
Linus Torvalds 已提交
198 199
				local_bh_enable();
				sk->sk_prot = &tcp_prot;
200
				icsk->icsk_af_ops = &ipv4_specific;
L
Linus Torvalds 已提交
201 202
				sk->sk_socket->ops = &inet_stream_ops;
				sk->sk_family = PF_INET;
203
				tcp_sync_mss(sk, icsk->icsk_pmtu_cookie);
L
Linus Torvalds 已提交
204
			} else {
205 206
				struct proto *prot = &udp_prot;

207
				if (sk->sk_protocol == IPPROTO_UDPLITE)
208
					prot = &udplite_prot;
L
Linus Torvalds 已提交
209
				local_bh_disable();
210 211
				sock_prot_inuse_add(net, sk->sk_prot, -1);
				sock_prot_inuse_add(net, prot, 1);
L
Linus Torvalds 已提交
212
				local_bh_enable();
213
				sk->sk_prot = prot;
L
Linus Torvalds 已提交
214 215 216 217 218 219 220 221 222 223 224
				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);
			if (pktopt)
				kfree_skb(pktopt);

			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 238
		if (optlen < sizeof(int) ||
		    inet_sk(sk)->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 319 320 321
			goto e_inval;
		np->tclass = val;
		retv = 0;
		break;
322

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

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

337 338 339 340 341 342
	case IPV6_HOPOPTS:
	case IPV6_RTHDRDSTOPTS:
	case IPV6_RTHDR:
	case IPV6_DSTOPTS:
	{
		struct ipv6_txoptions *opt;
343 344 345 346

		/* remove any sticky options header with a zero option
		 * length, per RFC3542.
		 */
347
		if (optlen == 0)
348
			optval = NULL;
349 350
		else if (optval == NULL)
			goto e_inval;
351 352 353
		else if (optlen < sizeof(struct ipv6_opt_hdr) ||
			 optlen & 0x7 || optlen > 8 * 255)
			goto e_inval;
354 355 356 357 358 359 360 361 362 363 364 365 366 367 368

		/* 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 */
369
		if (optname == IPV6_RTHDR && opt && opt->srcrt) {
370
			struct ipv6_rt_hdr *rthdr = opt->srcrt;
371
			switch (rthdr->type) {
372
#if defined(CONFIG_IPV6_MIP6) || defined(CONFIG_IPV6_MIP6_MODULE)
373 374
			case IPV6_SRCRT_TYPE_2:
				break;
375
#endif
376
			default:
377
				goto sticky_done;
378 379
			}

380 381 382 383 384 385
			if ((rthdr->hdrlen & 1) ||
			    (rthdr->hdrlen >> 1) != rthdr->segments_left)
				goto sticky_done;
		}

		retv = 0;
386
		opt = ipv6_update_options(sk, opt);
387 388 389 390 391 392 393
sticky_done:
		if (opt)
			sock_kfree_s(sk, opt, opt->tot_len);
		break;
	}

	case IPV6_2292PKTOPTIONS:
L
Linus Torvalds 已提交
394 395 396 397 398 399 400 401 402 403 404 405 406 407 408 409 410 411 412 413 414 415 416 417 418 419 420 421 422 423 424 425 426
	{
		struct ipv6_txoptions *opt = NULL;
		struct msghdr msg;
		struct flowi fl;
		int junk;

		fl.fl6_flowlabel = 0;
		fl.oif = sk->sk_bound_dev_if;

		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);

427
		retv = datagram_send_ctl(net, &msg, &fl, opt, &junk, &junk);
L
Linus Torvalds 已提交
428 429 430 431
		if (retv)
			goto done;
update:
		retv = 0;
432
		opt = ipv6_update_options(sk, opt);
L
Linus Torvalds 已提交
433 434 435 436 437 438
done:
		if (opt)
			sock_kfree_s(sk, opt, opt->tot_len);
		break;
	}
	case IPV6_UNICAST_HOPS:
439 440
		if (optlen < sizeof(int))
			goto e_inval;
L
Linus Torvalds 已提交
441 442 443 444 445 446 447 448
		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)
449
			break;
450 451
		if (optlen < sizeof(int))
			goto e_inval;
L
Linus Torvalds 已提交
452 453 454 455 456 457 458
		if (val > 255 || val < -1)
			goto e_inval;
		np->mcast_hops = val;
		retv = 0;
		break;

	case IPV6_MULTICAST_LOOP:
459 460
		if (optlen < sizeof(int))
			goto e_inval;
461 462
		if (val != valbool)
			goto e_inval;
L
Linus Torvalds 已提交
463 464 465 466 467 468
		np->mc_loop = valbool;
		retv = 0;
		break;

	case IPV6_MULTICAST_IF:
		if (sk->sk_type == SOCK_STREAM)
469
			break;
470 471
		if (optlen < sizeof(int))
			goto e_inval;
L
Linus Torvalds 已提交
472

473 474 475 476
		if (val) {
			if (sk->sk_bound_dev_if && sk->sk_bound_dev_if != val)
				goto e_inval;

477
			if (__dev_get_by_index(net, val) == NULL) {
478 479 480
				retv = -ENODEV;
				break;
			}
L
Linus Torvalds 已提交
481 482 483 484 485 486 487 488 489
		}
		np->mcast_oif = val;
		retv = 0;
		break;
	case IPV6_ADD_MEMBERSHIP:
	case IPV6_DROP_MEMBERSHIP:
	{
		struct ipv6_mreq mreq;

490 491 492
		if (optlen < sizeof(struct ipv6_mreq))
			goto e_inval;

493 494 495 496
		retv = -EPROTO;
		if (inet_sk(sk)->is_icsk)
			break;

L
Linus Torvalds 已提交
497 498 499 500 501 502 503 504 505 506 507 508 509 510 511
		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;

512
		if (optlen < sizeof(struct ipv6_mreq))
L
Linus Torvalds 已提交
513 514 515 516 517 518 519 520 521 522 523 524 525 526 527 528 529 530
			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;

531 532 533
		if (optlen < sizeof(struct group_req))
			goto e_inval;

L
Linus Torvalds 已提交
534 535 536 537 538 539 540 541 542 543 544 545 546 547 548 549 550 551 552 553 554 555 556 557
		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;

558
		if (optlen < sizeof(struct group_source_req))
L
Linus Torvalds 已提交
559 560 561 562 563 564 565 566 567 568 569 570 571 572 573 574 575 576 577 578 579 580
			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);
581 582
			/* prior join w/ different source is ok */
			if (retv && retv != -EADDRINUSE)
L
Linus Torvalds 已提交
583 584 585
				break;
			omode = MCAST_INCLUDE;
			add = 1;
586
		} else /* MCAST_LEAVE_SOURCE_GROUP */ {
L
Linus Torvalds 已提交
587 588 589 590 591 592 593 594 595 596 597 598 599 600 601 602 603
			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;
		}
604
		gsf = kmalloc(optlen,GFP_KERNEL);
S
Stephen Hemminger 已提交
605
		if (!gsf) {
L
Linus Torvalds 已提交
606 607 608 609 610 611 612 613 614 615 616 617 618 619 620 621 622 623 624 625 626 627 628 629 630 631
			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:
632 633
		if (optlen < sizeof(int))
			goto e_inval;
634
		retv = ip6_ra_control(sk, val);
L
Linus Torvalds 已提交
635 636
		break;
	case IPV6_MTU_DISCOVER:
637 638
		if (optlen < sizeof(int))
			goto e_inval;
J
John Heffner 已提交
639
		if (val<0 || val>3)
L
Linus Torvalds 已提交
640 641 642 643 644
			goto e_inval;
		np->pmtudisc = val;
		retv = 0;
		break;
	case IPV6_MTU:
645 646
		if (optlen < sizeof(int))
			goto e_inval;
L
Linus Torvalds 已提交
647 648 649 650 651 652
		if (val && val < IPV6_MIN_MTU)
			goto e_inval;
		np->frag_size = val;
		retv = 0;
		break;
	case IPV6_RECVERR:
653 654
		if (optlen < sizeof(int))
			goto e_inval;
L
Linus Torvalds 已提交
655 656 657 658 659 660
		np->recverr = valbool;
		if (!val)
			skb_queue_purge(&sk->sk_error_queue);
		retv = 0;
		break;
	case IPV6_FLOWINFO_SEND:
661 662
		if (optlen < sizeof(int))
			goto e_inval;
L
Linus Torvalds 已提交
663 664 665 666 667 668 669 670
		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:
671 672 673
		retv = -EPERM;
		if (!capable(CAP_NET_ADMIN))
			break;
L
Linus Torvalds 已提交
674 675 676
		retv = xfrm_user_policy(sk, optname, optval, optlen);
		break;

677 678 679 680 681
	case IPV6_ADDR_PREFERENCES:
	    {
		unsigned int pref = 0;
		unsigned int prefmask = ~0;

682 683 684
		if (optlen < sizeof(int))
			goto e_inval;

685 686 687 688 689 690 691 692 693 694 695 696 697 698 699 700 701 702 703 704 705 706 707 708 709 710 711 712 713 714 715 716 717 718 719 720 721 722 723 724 725 726 727 728 729 730 731 732 733 734 735 736 737 738
		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;
	    }
L
Linus Torvalds 已提交
739
	}
740

L
Linus Torvalds 已提交
741 742 743 744 745 746 747 748 749
	release_sock(sk);

	return retv;

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

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
int ipv6_setsockopt(struct sock *sk, int level, int optname,
		    char __user *optval, int optlen)
{
	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;
}

775
EXPORT_SYMBOL(ipv6_setsockopt);
776 777 778

#ifdef CONFIG_COMPAT
int compat_ipv6_setsockopt(struct sock *sk, int level, int optname,
779
			   char __user *optval, int optlen)
780 781 782 783
{
	int err;

	if (level == SOL_IP && sk->sk_type != SOCK_RAW) {
784 785 786 787
		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);
788 789 790 791 792
	}

	if (level != SOL_IPV6)
		return -ENOPROTOOPT;

793 794 795 796
	if (optname >= MCAST_JOIN_GROUP && optname <= MCAST_MSFILTER)
		return compat_mc_setsockopt(sk, level, optname, optval, optlen,
			ipv6_setsockopt);

797 798 799 800
	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 &&
801
	    optname != IPV6_XFRM_POLICY) {
802
		lock_sock(sk);
803 804
		err = compat_nf_setsockopt(sk, PF_INET6, optname,
					   optval, optlen);
805 806 807 808 809
		release_sock(sk);
	}
#endif
	return err;
}
810 811

EXPORT_SYMBOL(compat_ipv6_setsockopt);
812 813
#endif

814
static int ipv6_getsockopt_sticky(struct sock *sk, struct ipv6_txoptions *opt,
815
				  int optname, char __user *optval, int len)
816
{
817 818
	struct ipv6_opt_hdr *hdr;

819 820 821 822 823 824 825 826 827 828 829 830 831 832 833 834 835 836 837 838 839
	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)
840
		return 0;
841

842
	len = min_t(unsigned int, len, ipv6_optlen(hdr));
843
	if (copy_to_user(optval, hdr, len))
844
		return -EFAULT;
845
	return len;
846 847
}

848
static int do_ipv6_getsockopt(struct sock *sk, int level, int optname,
L
Linus Torvalds 已提交
849 850 851 852 853 854
		    char __user *optval, int __user *optlen)
{
	struct ipv6_pinfo *np = inet6_sk(sk);
	int len;
	int val;

855 856 857
	if (ip6_mroute_opt(optname))
		return ip6_mroute_getsockopt(sk, optname, optval, optlen);

L
Linus Torvalds 已提交
858 859 860 861 862
	if (get_user(len, optlen))
		return -EFAULT;
	switch (optname) {
	case IPV6_ADDRFORM:
		if (sk->sk_protocol != IPPROTO_UDP &&
863
		    sk->sk_protocol != IPPROTO_UDPLITE &&
L
Linus Torvalds 已提交
864
		    sk->sk_protocol != IPPROTO_TCP)
865
			return -ENOPROTOOPT;
L
Linus Torvalds 已提交
866 867 868 869 870 871 872 873 874 875 876 877 878
		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;
879 880
		if (gsf.gf_group.ss_family != AF_INET6)
			return -EADDRNOTAVAIL;
L
Linus Torvalds 已提交
881 882 883 884 885 886 887
		lock_sock(sk);
		err = ip6_mc_msfget(sk, &gsf,
			(struct group_filter __user *)optval, optlen);
		release_sock(sk);
		return err;
	}

888
	case IPV6_2292PKTOPTIONS:
L
Linus Torvalds 已提交
889 890 891 892 893 894 895 896 897 898 899 900 901 902 903 904 905 906 907 908 909 910 911 912 913
	{
		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;
914
				src_info.ipi6_ifindex = np->mcast_oif ? np->mcast_oif : sk->sk_bound_dev_if;
L
Linus Torvalds 已提交
915 916 917 918 919 920 921
				ipv6_addr_copy(&src_info.ipi6_addr, &np->daddr);
				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);
			}
922 923
			if (np->rxopt.bits.rxoinfo) {
				struct in6_pktinfo src_info;
924
				src_info.ipi6_ifindex = np->mcast_oif ? np->mcast_oif : sk->sk_bound_dev_if;
925 926 927 928 929 930 931
				ipv6_addr_copy(&src_info.ipi6_addr, &np->daddr);
				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 已提交
932 933 934 935 936 937 938
		}
		len -= msg.msg_controllen;
		return put_user(len, optlen);
	}
	case IPV6_MTU:
	{
		struct dst_entry *dst;
939
		val = 0;
L
Linus Torvalds 已提交
940 941 942 943 944 945 946 947 948 949 950 951 952 953 954 955
		lock_sock(sk);
		dst = sk_dst_get(sk);
		if (dst) {
			val = dst_mtu(dst);
			dst_release(dst);
		}
		release_sock(sk);
		if (!val)
			return -ENOTCONN;
		break;
	}

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

956
	case IPV6_RECVPKTINFO:
L
Linus Torvalds 已提交
957 958 959
		val = np->rxopt.bits.rxinfo;
		break;

960 961 962 963 964
	case IPV6_2292PKTINFO:
		val = np->rxopt.bits.rxoinfo;
		break;

	case IPV6_RECVHOPLIMIT:
L
Linus Torvalds 已提交
965 966 967
		val = np->rxopt.bits.rxhlim;
		break;

968 969 970 971 972
	case IPV6_2292HOPLIMIT:
		val = np->rxopt.bits.rxohlim;
		break;

	case IPV6_RECVRTHDR:
L
Linus Torvalds 已提交
973 974 975
		val = np->rxopt.bits.srcrt;
		break;

976 977 978 979
	case IPV6_2292RTHDR:
		val = np->rxopt.bits.osrcrt;
		break;

L
Linus Torvalds 已提交
980
	case IPV6_HOPOPTS:
981 982 983 984 985 986
	case IPV6_RTHDRDSTOPTS:
	case IPV6_RTHDR:
	case IPV6_DSTOPTS:
	{

		lock_sock(sk);
987
		len = ipv6_getsockopt_sticky(sk, np->opt,
988
					     optname, optval, len);
989
		release_sock(sk);
990 991 992
		/* check if ipv6_getsockopt_sticky() returns err code */
		if (len < 0)
			return len;
993 994 995 996
		return put_user(len, optlen);
	}

	case IPV6_RECVHOPOPTS:
L
Linus Torvalds 已提交
997 998 999
		val = np->rxopt.bits.hopopts;
		break;

1000 1001 1002 1003 1004
	case IPV6_2292HOPOPTS:
		val = np->rxopt.bits.ohopopts;
		break;

	case IPV6_RECVDSTOPTS:
L
Linus Torvalds 已提交
1005 1006 1007
		val = np->rxopt.bits.dstopts;
		break;

1008 1009 1010 1011
	case IPV6_2292DSTOPTS:
		val = np->rxopt.bits.odstopts;
		break;

1012 1013
	case IPV6_TCLASS:
		val = np->tclass;
1014 1015
		if (val < 0)
			val = 0;
1016 1017 1018 1019 1020 1021
		break;

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

L
Linus Torvalds 已提交
1022 1023 1024 1025 1026 1027
	case IPV6_FLOWINFO:
		val = np->rxopt.bits.rxflow;
		break;

	case IPV6_UNICAST_HOPS:
	case IPV6_MULTICAST_HOPS:
1028 1029 1030 1031 1032 1033 1034 1035 1036 1037 1038
	{
		struct dst_entry *dst;

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

		dst = sk_dst_get(sk);
		if (dst) {
			if (val < 0)
1039
				val = ip6_dst_hoplimit(dst);
1040 1041 1042
			dst_release(dst);
		}
		if (val < 0)
1043
			val = sock_net(sk)->ipv6.devconf_all->hop_limit;
L
Linus Torvalds 已提交
1044
		break;
1045
	}
L
Linus Torvalds 已提交
1046 1047 1048 1049 1050 1051 1052 1053 1054 1055 1056 1057 1058 1059 1060 1061 1062 1063 1064 1065 1066

	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;

1067 1068 1069 1070 1071 1072 1073 1074 1075 1076 1077 1078 1079 1080 1081 1082 1083 1084
	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;

L
Linus Torvalds 已提交
1085
	default:
1086
		return -ENOPROTOOPT;
L
Linus Torvalds 已提交
1087 1088 1089 1090 1091 1092 1093 1094 1095
	}
	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;
}

1096 1097 1098 1099 1100 1101 1102 1103 1104 1105 1106 1107 1108
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
1109 1110
	/* we need to exclude all possible ENOPROTOOPTs except default case */
	if (err == -ENOPROTOOPT && optname != IPV6_2292PKTOPTIONS) {
1111 1112 1113 1114 1115 1116 1117 1118 1119 1120 1121 1122 1123 1124 1125 1126
		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;
}

1127 1128
EXPORT_SYMBOL(ipv6_getsockopt);

1129 1130
#ifdef CONFIG_COMPAT
int compat_ipv6_getsockopt(struct sock *sk, int level, int optname,
1131
			   char __user *optval, int __user *optlen)
1132 1133 1134 1135
{
	int err;

	if (level == SOL_IP && sk->sk_type != SOCK_RAW) {
1136 1137 1138 1139
		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);
1140 1141
	}

1142
	if (level != SOL_IPV6)
1143 1144
		return -ENOPROTOOPT;

1145 1146 1147 1148
	if (optname == MCAST_MSFILTER)
		return compat_mc_getsockopt(sk, level, optname, optval, optlen,
			ipv6_getsockopt);

1149 1150
	err = do_ipv6_getsockopt(sk, level, optname, optval, optlen);
#ifdef CONFIG_NETFILTER
1151 1152
	/* we need to exclude all possible ENOPROTOOPTs except default case */
	if (err == -ENOPROTOOPT && optname != IPV6_2292PKTOPTIONS) {
1153 1154 1155 1156 1157 1158
		int len;

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

		lock_sock(sk);
1159 1160
		err = compat_nf_getsockopt(sk, PF_INET6,
					   optname, optval, &len);
1161 1162 1163 1164 1165 1166 1167
		release_sock(sk);
		if (err >= 0)
			err = put_user(len, optlen);
	}
#endif
	return err;
}
1168 1169

EXPORT_SYMBOL(compat_ipv6_getsockopt);
1170 1171
#endif