vti6: better validate user provided tunnel names
[GitHub/LineageOS/android_kernel_motorola_exynos9610.git] / net / ipv6 / raw.c
1 /*
2 * RAW sockets for IPv6
3 * Linux INET6 implementation
4 *
5 * Authors:
6 * Pedro Roque <roque@di.fc.ul.pt>
7 *
8 * Adapted from linux/net/ipv4/raw.c
9 *
10 * Fixes:
11 * Hideaki YOSHIFUJI : sin6_scope_id support
12 * YOSHIFUJI,H.@USAGI : raw checksum (RFC2292(bis) compliance)
13 * Kazunori MIYAZAWA @USAGI: change process style to use ip6_append_data
14 *
15 * This program is free software; you can redistribute it and/or
16 * modify it under the terms of the GNU General Public License
17 * as published by the Free Software Foundation; either version
18 * 2 of the License, or (at your option) any later version.
19 */
20
21 #include <linux/errno.h>
22 #include <linux/types.h>
23 #include <linux/socket.h>
24 #include <linux/slab.h>
25 #include <linux/sockios.h>
26 #include <linux/net.h>
27 #include <linux/in6.h>
28 #include <linux/netdevice.h>
29 #include <linux/if_arp.h>
30 #include <linux/icmpv6.h>
31 #include <linux/netfilter.h>
32 #include <linux/netfilter_ipv6.h>
33 #include <linux/skbuff.h>
34 #include <linux/compat.h>
35 #include <linux/uaccess.h>
36 #include <asm/ioctls.h>
37
38 #include <net/net_namespace.h>
39 #include <net/ip.h>
40 #include <net/sock.h>
41 #include <net/snmp.h>
42
43 #include <net/ipv6.h>
44 #include <net/ndisc.h>
45 #include <net/protocol.h>
46 #include <net/ip6_route.h>
47 #include <net/ip6_checksum.h>
48 #include <net/addrconf.h>
49 #include <net/transp_v6.h>
50 #include <net/udp.h>
51 #include <net/inet_common.h>
52 #include <net/tcp_states.h>
53 #if IS_ENABLED(CONFIG_IPV6_MIP6)
54 #include <net/mip6.h>
55 #endif
56 #include <linux/mroute6.h>
57
58 #include <net/raw.h>
59 #include <net/rawv6.h>
60 #include <net/xfrm.h>
61
62 #include <linux/proc_fs.h>
63 #include <linux/seq_file.h>
64 #include <linux/export.h>
65
66 #define ICMPV6_HDRLEN 4 /* ICMPv6 header, RFC 4443 Section 2.1 */
67
68 struct raw_hashinfo raw_v6_hashinfo = {
69 .lock = __RW_LOCK_UNLOCKED(raw_v6_hashinfo.lock),
70 };
71 EXPORT_SYMBOL_GPL(raw_v6_hashinfo);
72
73 struct sock *__raw_v6_lookup(struct net *net, struct sock *sk,
74 unsigned short num, const struct in6_addr *loc_addr,
75 const struct in6_addr *rmt_addr, int dif, int sdif)
76 {
77 bool is_multicast = ipv6_addr_is_multicast(loc_addr);
78
79 sk_for_each_from(sk)
80 if (inet_sk(sk)->inet_num == num) {
81
82 if (!net_eq(sock_net(sk), net))
83 continue;
84
85 if (!ipv6_addr_any(&sk->sk_v6_daddr) &&
86 !ipv6_addr_equal(&sk->sk_v6_daddr, rmt_addr))
87 continue;
88
89 if (sk->sk_bound_dev_if &&
90 sk->sk_bound_dev_if != dif &&
91 sk->sk_bound_dev_if != sdif)
92 continue;
93
94 if (!ipv6_addr_any(&sk->sk_v6_rcv_saddr)) {
95 if (ipv6_addr_equal(&sk->sk_v6_rcv_saddr, loc_addr))
96 goto found;
97 if (is_multicast &&
98 inet6_mc_check(sk, loc_addr, rmt_addr))
99 goto found;
100 continue;
101 }
102 goto found;
103 }
104 sk = NULL;
105 found:
106 return sk;
107 }
108 EXPORT_SYMBOL_GPL(__raw_v6_lookup);
109
110 /*
111 * 0 - deliver
112 * 1 - block
113 */
114 static int icmpv6_filter(const struct sock *sk, const struct sk_buff *skb)
115 {
116 struct icmp6hdr _hdr;
117 const struct icmp6hdr *hdr;
118
119 /* We require only the four bytes of the ICMPv6 header, not any
120 * additional bytes of message body in "struct icmp6hdr".
121 */
122 hdr = skb_header_pointer(skb, skb_transport_offset(skb),
123 ICMPV6_HDRLEN, &_hdr);
124 if (hdr) {
125 const __u32 *data = &raw6_sk(sk)->filter.data[0];
126 unsigned int type = hdr->icmp6_type;
127
128 return (data[type >> 5] & (1U << (type & 31))) != 0;
129 }
130 return 1;
131 }
132
133 #if IS_ENABLED(CONFIG_IPV6_MIP6)
134 typedef int mh_filter_t(struct sock *sock, struct sk_buff *skb);
135
136 static mh_filter_t __rcu *mh_filter __read_mostly;
137
138 int rawv6_mh_filter_register(mh_filter_t filter)
139 {
140 rcu_assign_pointer(mh_filter, filter);
141 return 0;
142 }
143 EXPORT_SYMBOL(rawv6_mh_filter_register);
144
145 int rawv6_mh_filter_unregister(mh_filter_t filter)
146 {
147 RCU_INIT_POINTER(mh_filter, NULL);
148 synchronize_rcu();
149 return 0;
150 }
151 EXPORT_SYMBOL(rawv6_mh_filter_unregister);
152
153 #endif
154
155 /*
156 * demultiplex raw sockets.
157 * (should consider queueing the skb in the sock receive_queue
158 * without calling rawv6.c)
159 *
160 * Caller owns SKB so we must make clones.
161 */
162 static bool ipv6_raw_deliver(struct sk_buff *skb, int nexthdr)
163 {
164 const struct in6_addr *saddr;
165 const struct in6_addr *daddr;
166 struct sock *sk;
167 bool delivered = false;
168 __u8 hash;
169 struct net *net;
170
171 saddr = &ipv6_hdr(skb)->saddr;
172 daddr = saddr + 1;
173
174 hash = nexthdr & (RAW_HTABLE_SIZE - 1);
175
176 read_lock(&raw_v6_hashinfo.lock);
177 sk = sk_head(&raw_v6_hashinfo.ht[hash]);
178
179 if (!sk)
180 goto out;
181
182 net = dev_net(skb->dev);
183 sk = __raw_v6_lookup(net, sk, nexthdr, daddr, saddr,
184 inet6_iif(skb), inet6_sdif(skb));
185
186 while (sk) {
187 int filtered;
188
189 delivered = true;
190 switch (nexthdr) {
191 case IPPROTO_ICMPV6:
192 filtered = icmpv6_filter(sk, skb);
193 break;
194
195 #if IS_ENABLED(CONFIG_IPV6_MIP6)
196 case IPPROTO_MH:
197 {
198 /* XXX: To validate MH only once for each packet,
199 * this is placed here. It should be after checking
200 * xfrm policy, however it doesn't. The checking xfrm
201 * policy is placed in rawv6_rcv() because it is
202 * required for each socket.
203 */
204 mh_filter_t *filter;
205
206 filter = rcu_dereference(mh_filter);
207 filtered = filter ? (*filter)(sk, skb) : 0;
208 break;
209 }
210 #endif
211 default:
212 filtered = 0;
213 break;
214 }
215
216 if (filtered < 0)
217 break;
218 if (filtered == 0) {
219 struct sk_buff *clone = skb_clone(skb, GFP_ATOMIC);
220
221 /* Not releasing hash table! */
222 if (clone) {
223 nf_reset(clone);
224 rawv6_rcv(sk, clone);
225 }
226 }
227 sk = __raw_v6_lookup(net, sk_next(sk), nexthdr, daddr, saddr,
228 inet6_iif(skb), inet6_sdif(skb));
229 }
230 out:
231 read_unlock(&raw_v6_hashinfo.lock);
232 return delivered;
233 }
234
235 bool raw6_local_deliver(struct sk_buff *skb, int nexthdr)
236 {
237 struct sock *raw_sk;
238
239 raw_sk = sk_head(&raw_v6_hashinfo.ht[nexthdr & (RAW_HTABLE_SIZE - 1)]);
240 if (raw_sk && !ipv6_raw_deliver(skb, nexthdr))
241 raw_sk = NULL;
242
243 return raw_sk != NULL;
244 }
245
246 /* This cleans up af_inet6 a bit. -DaveM */
247 static int rawv6_bind(struct sock *sk, struct sockaddr *uaddr, int addr_len)
248 {
249 struct inet_sock *inet = inet_sk(sk);
250 struct ipv6_pinfo *np = inet6_sk(sk);
251 struct sockaddr_in6 *addr = (struct sockaddr_in6 *) uaddr;
252 __be32 v4addr = 0;
253 int addr_type;
254 int err;
255
256 if (addr_len < SIN6_LEN_RFC2133)
257 return -EINVAL;
258
259 if (addr->sin6_family != AF_INET6)
260 return -EINVAL;
261
262 addr_type = ipv6_addr_type(&addr->sin6_addr);
263
264 /* Raw sockets are IPv6 only */
265 if (addr_type == IPV6_ADDR_MAPPED)
266 return -EADDRNOTAVAIL;
267
268 lock_sock(sk);
269
270 err = -EINVAL;
271 if (sk->sk_state != TCP_CLOSE)
272 goto out;
273
274 rcu_read_lock();
275 /* Check if the address belongs to the host. */
276 if (addr_type != IPV6_ADDR_ANY) {
277 struct net_device *dev = NULL;
278
279 if (__ipv6_addr_needs_scope_id(addr_type)) {
280 if (addr_len >= sizeof(struct sockaddr_in6) &&
281 addr->sin6_scope_id) {
282 /* Override any existing binding, if another
283 * one is supplied by user.
284 */
285 sk->sk_bound_dev_if = addr->sin6_scope_id;
286 }
287
288 /* Binding to link-local address requires an interface */
289 if (!sk->sk_bound_dev_if)
290 goto out_unlock;
291
292 err = -ENODEV;
293 dev = dev_get_by_index_rcu(sock_net(sk),
294 sk->sk_bound_dev_if);
295 if (!dev)
296 goto out_unlock;
297 }
298
299 /* ipv4 addr of the socket is invalid. Only the
300 * unspecified and mapped address have a v4 equivalent.
301 */
302 v4addr = LOOPBACK4_IPV6;
303 if (!(addr_type & IPV6_ADDR_MULTICAST) &&
304 !sock_net(sk)->ipv6.sysctl.ip_nonlocal_bind) {
305 err = -EADDRNOTAVAIL;
306 if (!ipv6_chk_addr(sock_net(sk), &addr->sin6_addr,
307 dev, 0)) {
308 goto out_unlock;
309 }
310 }
311 }
312
313 inet->inet_rcv_saddr = inet->inet_saddr = v4addr;
314 sk->sk_v6_rcv_saddr = addr->sin6_addr;
315 if (!(addr_type & IPV6_ADDR_MULTICAST))
316 np->saddr = addr->sin6_addr;
317 err = 0;
318 out_unlock:
319 rcu_read_unlock();
320 out:
321 release_sock(sk);
322 return err;
323 }
324
325 static void rawv6_err(struct sock *sk, struct sk_buff *skb,
326 struct inet6_skb_parm *opt,
327 u8 type, u8 code, int offset, __be32 info)
328 {
329 struct inet_sock *inet = inet_sk(sk);
330 struct ipv6_pinfo *np = inet6_sk(sk);
331 int err;
332 int harderr;
333
334 /* Report error on raw socket, if:
335 1. User requested recverr.
336 2. Socket is connected (otherwise the error indication
337 is useless without recverr and error is hard.
338 */
339 if (!np->recverr && sk->sk_state != TCP_ESTABLISHED)
340 return;
341
342 harderr = icmpv6_err_convert(type, code, &err);
343 if (type == ICMPV6_PKT_TOOBIG) {
344 ip6_sk_update_pmtu(skb, sk, info);
345 harderr = (np->pmtudisc == IPV6_PMTUDISC_DO);
346 }
347 if (type == NDISC_REDIRECT) {
348 ip6_sk_redirect(skb, sk);
349 return;
350 }
351 if (np->recverr) {
352 u8 *payload = skb->data;
353 if (!inet->hdrincl)
354 payload += offset;
355 ipv6_icmp_error(sk, skb, err, 0, ntohl(info), payload);
356 }
357
358 if (np->recverr || harderr) {
359 sk->sk_err = err;
360 sk->sk_error_report(sk);
361 }
362 }
363
364 void raw6_icmp_error(struct sk_buff *skb, int nexthdr,
365 u8 type, u8 code, int inner_offset, __be32 info)
366 {
367 struct sock *sk;
368 int hash;
369 const struct in6_addr *saddr, *daddr;
370 struct net *net;
371
372 hash = nexthdr & (RAW_HTABLE_SIZE - 1);
373
374 read_lock(&raw_v6_hashinfo.lock);
375 sk = sk_head(&raw_v6_hashinfo.ht[hash]);
376 if (sk) {
377 /* Note: ipv6_hdr(skb) != skb->data */
378 const struct ipv6hdr *ip6h = (const struct ipv6hdr *)skb->data;
379 saddr = &ip6h->saddr;
380 daddr = &ip6h->daddr;
381 net = dev_net(skb->dev);
382
383 while ((sk = __raw_v6_lookup(net, sk, nexthdr, saddr, daddr,
384 inet6_iif(skb), inet6_iif(skb)))) {
385 rawv6_err(sk, skb, NULL, type, code,
386 inner_offset, info);
387 sk = sk_next(sk);
388 }
389 }
390 read_unlock(&raw_v6_hashinfo.lock);
391 }
392
393 static inline int rawv6_rcv_skb(struct sock *sk, struct sk_buff *skb)
394 {
395 if ((raw6_sk(sk)->checksum || rcu_access_pointer(sk->sk_filter)) &&
396 skb_checksum_complete(skb)) {
397 atomic_inc(&sk->sk_drops);
398 kfree_skb(skb);
399 return NET_RX_DROP;
400 }
401
402 /* Charge it to the socket. */
403 skb_dst_drop(skb);
404 if (sock_queue_rcv_skb(sk, skb) < 0) {
405 kfree_skb(skb);
406 return NET_RX_DROP;
407 }
408
409 return 0;
410 }
411
412 /*
413 * This is next to useless...
414 * if we demultiplex in network layer we don't need the extra call
415 * just to queue the skb...
416 * maybe we could have the network decide upon a hint if it
417 * should call raw_rcv for demultiplexing
418 */
419 int rawv6_rcv(struct sock *sk, struct sk_buff *skb)
420 {
421 struct inet_sock *inet = inet_sk(sk);
422 struct raw6_sock *rp = raw6_sk(sk);
423
424 if (!xfrm6_policy_check(sk, XFRM_POLICY_IN, skb)) {
425 atomic_inc(&sk->sk_drops);
426 kfree_skb(skb);
427 return NET_RX_DROP;
428 }
429
430 if (!rp->checksum)
431 skb->ip_summed = CHECKSUM_UNNECESSARY;
432
433 if (skb->ip_summed == CHECKSUM_COMPLETE) {
434 skb_postpull_rcsum(skb, skb_network_header(skb),
435 skb_network_header_len(skb));
436 if (!csum_ipv6_magic(&ipv6_hdr(skb)->saddr,
437 &ipv6_hdr(skb)->daddr,
438 skb->len, inet->inet_num, skb->csum))
439 skb->ip_summed = CHECKSUM_UNNECESSARY;
440 }
441 if (!skb_csum_unnecessary(skb))
442 skb->csum = ~csum_unfold(csum_ipv6_magic(&ipv6_hdr(skb)->saddr,
443 &ipv6_hdr(skb)->daddr,
444 skb->len,
445 inet->inet_num, 0));
446
447 if (inet->hdrincl) {
448 if (skb_checksum_complete(skb)) {
449 atomic_inc(&sk->sk_drops);
450 kfree_skb(skb);
451 return NET_RX_DROP;
452 }
453 }
454
455 rawv6_rcv_skb(sk, skb);
456 return 0;
457 }
458
459
460 /*
461 * This should be easy, if there is something there
462 * we return it, otherwise we block.
463 */
464
465 static int rawv6_recvmsg(struct sock *sk, struct msghdr *msg, size_t len,
466 int noblock, int flags, int *addr_len)
467 {
468 struct ipv6_pinfo *np = inet6_sk(sk);
469 DECLARE_SOCKADDR(struct sockaddr_in6 *, sin6, msg->msg_name);
470 struct sk_buff *skb;
471 size_t copied;
472 int err;
473
474 if (flags & MSG_OOB)
475 return -EOPNOTSUPP;
476
477 if (flags & MSG_ERRQUEUE)
478 return ipv6_recv_error(sk, msg, len, addr_len);
479
480 if (np->rxpmtu && np->rxopt.bits.rxpmtu)
481 return ipv6_recv_rxpmtu(sk, msg, len, addr_len);
482
483 skb = skb_recv_datagram(sk, flags, noblock, &err);
484 if (!skb)
485 goto out;
486
487 copied = skb->len;
488 if (copied > len) {
489 copied = len;
490 msg->msg_flags |= MSG_TRUNC;
491 }
492
493 if (skb_csum_unnecessary(skb)) {
494 err = skb_copy_datagram_msg(skb, 0, msg, copied);
495 } else if (msg->msg_flags&MSG_TRUNC) {
496 if (__skb_checksum_complete(skb))
497 goto csum_copy_err;
498 err = skb_copy_datagram_msg(skb, 0, msg, copied);
499 } else {
500 err = skb_copy_and_csum_datagram_msg(skb, 0, msg);
501 if (err == -EINVAL)
502 goto csum_copy_err;
503 }
504 if (err)
505 goto out_free;
506
507 /* Copy the address. */
508 if (sin6) {
509 sin6->sin6_family = AF_INET6;
510 sin6->sin6_port = 0;
511 sin6->sin6_addr = ipv6_hdr(skb)->saddr;
512 sin6->sin6_flowinfo = 0;
513 sin6->sin6_scope_id = ipv6_iface_scope_id(&sin6->sin6_addr,
514 inet6_iif(skb));
515 *addr_len = sizeof(*sin6);
516 }
517
518 sock_recv_ts_and_drops(msg, sk, skb);
519
520 if (np->rxopt.all)
521 ip6_datagram_recv_ctl(sk, msg, skb);
522
523 err = copied;
524 if (flags & MSG_TRUNC)
525 err = skb->len;
526
527 out_free:
528 skb_free_datagram(sk, skb);
529 out:
530 return err;
531
532 csum_copy_err:
533 skb_kill_datagram(sk, skb, flags);
534
535 /* Error for blocking case is chosen to masquerade
536 as some normal condition.
537 */
538 err = (flags&MSG_DONTWAIT) ? -EAGAIN : -EHOSTUNREACH;
539 goto out;
540 }
541
542 static int rawv6_push_pending_frames(struct sock *sk, struct flowi6 *fl6,
543 struct raw6_sock *rp)
544 {
545 struct sk_buff *skb;
546 int err = 0;
547 int offset;
548 int len;
549 int total_len;
550 __wsum tmp_csum;
551 __sum16 csum;
552
553 if (!rp->checksum)
554 goto send;
555
556 skb = skb_peek(&sk->sk_write_queue);
557 if (!skb)
558 goto out;
559
560 offset = rp->offset;
561 total_len = inet_sk(sk)->cork.base.length;
562 if (offset >= total_len - 1) {
563 err = -EINVAL;
564 ip6_flush_pending_frames(sk);
565 goto out;
566 }
567
568 /* should be check HW csum miyazawa */
569 if (skb_queue_len(&sk->sk_write_queue) == 1) {
570 /*
571 * Only one fragment on the socket.
572 */
573 tmp_csum = skb->csum;
574 } else {
575 struct sk_buff *csum_skb = NULL;
576 tmp_csum = 0;
577
578 skb_queue_walk(&sk->sk_write_queue, skb) {
579 tmp_csum = csum_add(tmp_csum, skb->csum);
580
581 if (csum_skb)
582 continue;
583
584 len = skb->len - skb_transport_offset(skb);
585 if (offset >= len) {
586 offset -= len;
587 continue;
588 }
589
590 csum_skb = skb;
591 }
592
593 skb = csum_skb;
594 }
595
596 offset += skb_transport_offset(skb);
597 err = skb_copy_bits(skb, offset, &csum, 2);
598 if (err < 0) {
599 ip6_flush_pending_frames(sk);
600 goto out;
601 }
602
603 /* in case cksum was not initialized */
604 if (unlikely(csum))
605 tmp_csum = csum_sub(tmp_csum, csum_unfold(csum));
606
607 csum = csum_ipv6_magic(&fl6->saddr, &fl6->daddr,
608 total_len, fl6->flowi6_proto, tmp_csum);
609
610 if (csum == 0 && fl6->flowi6_proto == IPPROTO_UDP)
611 csum = CSUM_MANGLED_0;
612
613 BUG_ON(skb_store_bits(skb, offset, &csum, 2));
614
615 send:
616 err = ip6_push_pending_frames(sk);
617 out:
618 return err;
619 }
620
621 static int rawv6_send_hdrinc(struct sock *sk, struct msghdr *msg, int length,
622 struct flowi6 *fl6, struct dst_entry **dstp,
623 unsigned int flags)
624 {
625 struct ipv6_pinfo *np = inet6_sk(sk);
626 struct net *net = sock_net(sk);
627 struct ipv6hdr *iph;
628 struct sk_buff *skb;
629 int err;
630 struct rt6_info *rt = (struct rt6_info *)*dstp;
631 int hlen = LL_RESERVED_SPACE(rt->dst.dev);
632 int tlen = rt->dst.dev->needed_tailroom;
633
634 if (length > rt->dst.dev->mtu) {
635 ipv6_local_error(sk, EMSGSIZE, fl6, rt->dst.dev->mtu);
636 return -EMSGSIZE;
637 }
638 if (length < sizeof(struct ipv6hdr))
639 return -EINVAL;
640 if (flags&MSG_PROBE)
641 goto out;
642
643 skb = sock_alloc_send_skb(sk,
644 length + hlen + tlen + 15,
645 flags & MSG_DONTWAIT, &err);
646 if (!skb)
647 goto error;
648 skb_reserve(skb, hlen);
649
650 skb->protocol = htons(ETH_P_IPV6);
651 skb->priority = sk->sk_priority;
652 skb->mark = sk->sk_mark;
653 skb_dst_set(skb, &rt->dst);
654 *dstp = NULL;
655
656 skb_put(skb, length);
657 skb_reset_network_header(skb);
658 iph = ipv6_hdr(skb);
659
660 skb->ip_summed = CHECKSUM_NONE;
661
662 if (flags & MSG_CONFIRM)
663 skb_set_dst_pending_confirm(skb, 1);
664
665 skb->transport_header = skb->network_header;
666 err = memcpy_from_msg(iph, msg, length);
667 if (err)
668 goto error_fault;
669
670 /* if egress device is enslaved to an L3 master device pass the
671 * skb to its handler for processing
672 */
673 skb = l3mdev_ip6_out(sk, skb);
674 if (unlikely(!skb))
675 return 0;
676
677 IP6_UPD_PO_STATS(net, rt->rt6i_idev, IPSTATS_MIB_OUT, skb->len);
678 err = NF_HOOK(NFPROTO_IPV6, NF_INET_LOCAL_OUT, net, sk, skb,
679 NULL, rt->dst.dev, dst_output);
680 if (err > 0)
681 err = net_xmit_errno(err);
682 if (err)
683 goto error;
684 out:
685 return 0;
686
687 error_fault:
688 err = -EFAULT;
689 kfree_skb(skb);
690 error:
691 IP6_INC_STATS(net, rt->rt6i_idev, IPSTATS_MIB_OUTDISCARDS);
692 if (err == -ENOBUFS && !np->recverr)
693 err = 0;
694 return err;
695 }
696
697 struct raw6_frag_vec {
698 struct msghdr *msg;
699 int hlen;
700 char c[4];
701 };
702
703 static int rawv6_probe_proto_opt(struct raw6_frag_vec *rfv, struct flowi6 *fl6)
704 {
705 int err = 0;
706 switch (fl6->flowi6_proto) {
707 case IPPROTO_ICMPV6:
708 rfv->hlen = 2;
709 err = memcpy_from_msg(rfv->c, rfv->msg, rfv->hlen);
710 if (!err) {
711 fl6->fl6_icmp_type = rfv->c[0];
712 fl6->fl6_icmp_code = rfv->c[1];
713 }
714 break;
715 case IPPROTO_MH:
716 rfv->hlen = 4;
717 err = memcpy_from_msg(rfv->c, rfv->msg, rfv->hlen);
718 if (!err)
719 fl6->fl6_mh_type = rfv->c[2];
720 }
721 return err;
722 }
723
724 static int raw6_getfrag(void *from, char *to, int offset, int len, int odd,
725 struct sk_buff *skb)
726 {
727 struct raw6_frag_vec *rfv = from;
728
729 if (offset < rfv->hlen) {
730 int copy = min(rfv->hlen - offset, len);
731
732 if (skb->ip_summed == CHECKSUM_PARTIAL)
733 memcpy(to, rfv->c + offset, copy);
734 else
735 skb->csum = csum_block_add(
736 skb->csum,
737 csum_partial_copy_nocheck(rfv->c + offset,
738 to, copy, 0),
739 odd);
740
741 odd = 0;
742 offset += copy;
743 to += copy;
744 len -= copy;
745
746 if (!len)
747 return 0;
748 }
749
750 offset -= rfv->hlen;
751
752 return ip_generic_getfrag(rfv->msg, to, offset, len, odd, skb);
753 }
754
755 static int rawv6_sendmsg(struct sock *sk, struct msghdr *msg, size_t len)
756 {
757 struct ipv6_txoptions *opt_to_free = NULL;
758 struct ipv6_txoptions opt_space;
759 DECLARE_SOCKADDR(struct sockaddr_in6 *, sin6, msg->msg_name);
760 struct in6_addr *daddr, *final_p, final;
761 struct inet_sock *inet = inet_sk(sk);
762 struct ipv6_pinfo *np = inet6_sk(sk);
763 struct raw6_sock *rp = raw6_sk(sk);
764 struct ipv6_txoptions *opt = NULL;
765 struct ip6_flowlabel *flowlabel = NULL;
766 struct dst_entry *dst = NULL;
767 struct raw6_frag_vec rfv;
768 struct flowi6 fl6;
769 struct sockcm_cookie sockc;
770 struct ipcm6_cookie ipc6;
771 int addr_len = msg->msg_namelen;
772 u16 proto;
773 int err;
774
775 /* Rough check on arithmetic overflow,
776 better check is made in ip6_append_data().
777 */
778 if (len > INT_MAX)
779 return -EMSGSIZE;
780
781 /* Mirror BSD error message compatibility */
782 if (msg->msg_flags & MSG_OOB)
783 return -EOPNOTSUPP;
784
785 /*
786 * Get and verify the address.
787 */
788 memset(&fl6, 0, sizeof(fl6));
789
790 fl6.flowi6_mark = sk->sk_mark;
791 fl6.flowi6_uid = sk->sk_uid;
792
793 ipc6.hlimit = -1;
794 ipc6.tclass = -1;
795 ipc6.dontfrag = -1;
796 ipc6.opt = NULL;
797
798 if (sin6) {
799 if (addr_len < SIN6_LEN_RFC2133)
800 return -EINVAL;
801
802 if (sin6->sin6_family && sin6->sin6_family != AF_INET6)
803 return -EAFNOSUPPORT;
804
805 /* port is the proto value [0..255] carried in nexthdr */
806 proto = ntohs(sin6->sin6_port);
807
808 if (!proto)
809 proto = inet->inet_num;
810 else if (proto != inet->inet_num)
811 return -EINVAL;
812
813 if (proto > 255)
814 return -EINVAL;
815
816 daddr = &sin6->sin6_addr;
817 if (np->sndflow) {
818 fl6.flowlabel = sin6->sin6_flowinfo&IPV6_FLOWINFO_MASK;
819 if (fl6.flowlabel&IPV6_FLOWLABEL_MASK) {
820 flowlabel = fl6_sock_lookup(sk, fl6.flowlabel);
821 if (!flowlabel)
822 return -EINVAL;
823 }
824 }
825
826 /*
827 * Otherwise it will be difficult to maintain
828 * sk->sk_dst_cache.
829 */
830 if (sk->sk_state == TCP_ESTABLISHED &&
831 ipv6_addr_equal(daddr, &sk->sk_v6_daddr))
832 daddr = &sk->sk_v6_daddr;
833
834 if (addr_len >= sizeof(struct sockaddr_in6) &&
835 sin6->sin6_scope_id &&
836 __ipv6_addr_needs_scope_id(__ipv6_addr_type(daddr)))
837 fl6.flowi6_oif = sin6->sin6_scope_id;
838 } else {
839 if (sk->sk_state != TCP_ESTABLISHED)
840 return -EDESTADDRREQ;
841
842 proto = inet->inet_num;
843 daddr = &sk->sk_v6_daddr;
844 fl6.flowlabel = np->flow_label;
845 }
846
847 if (fl6.flowi6_oif == 0)
848 fl6.flowi6_oif = sk->sk_bound_dev_if;
849
850 sockc.tsflags = sk->sk_tsflags;
851 if (msg->msg_controllen) {
852 opt = &opt_space;
853 memset(opt, 0, sizeof(struct ipv6_txoptions));
854 opt->tot_len = sizeof(struct ipv6_txoptions);
855 ipc6.opt = opt;
856
857 err = ip6_datagram_send_ctl(sock_net(sk), sk, msg, &fl6, &ipc6, &sockc);
858 if (err < 0) {
859 fl6_sock_release(flowlabel);
860 return err;
861 }
862 if ((fl6.flowlabel&IPV6_FLOWLABEL_MASK) && !flowlabel) {
863 flowlabel = fl6_sock_lookup(sk, fl6.flowlabel);
864 if (!flowlabel)
865 return -EINVAL;
866 }
867 if (!(opt->opt_nflen|opt->opt_flen))
868 opt = NULL;
869 }
870 if (!opt) {
871 opt = txopt_get(np);
872 opt_to_free = opt;
873 }
874 if (flowlabel)
875 opt = fl6_merge_options(&opt_space, flowlabel, opt);
876 opt = ipv6_fixup_options(&opt_space, opt);
877
878 fl6.flowi6_proto = proto;
879 rfv.msg = msg;
880 rfv.hlen = 0;
881 err = rawv6_probe_proto_opt(&rfv, &fl6);
882 if (err)
883 goto out;
884
885 if (!ipv6_addr_any(daddr))
886 fl6.daddr = *daddr;
887 else
888 fl6.daddr.s6_addr[15] = 0x1; /* :: means loopback (BSD'ism) */
889 if (ipv6_addr_any(&fl6.saddr) && !ipv6_addr_any(&np->saddr))
890 fl6.saddr = np->saddr;
891
892 final_p = fl6_update_dst(&fl6, opt, &final);
893
894 if (!fl6.flowi6_oif && ipv6_addr_is_multicast(&fl6.daddr))
895 fl6.flowi6_oif = np->mcast_oif;
896 else if (!fl6.flowi6_oif)
897 fl6.flowi6_oif = np->ucast_oif;
898 security_sk_classify_flow(sk, flowi6_to_flowi(&fl6));
899
900 if (inet->hdrincl)
901 fl6.flowi6_flags |= FLOWI_FLAG_KNOWN_NH;
902
903 if (ipc6.tclass < 0)
904 ipc6.tclass = np->tclass;
905
906 fl6.flowlabel = ip6_make_flowinfo(ipc6.tclass, fl6.flowlabel);
907
908 dst = ip6_dst_lookup_flow(sk, &fl6, final_p);
909 if (IS_ERR(dst)) {
910 err = PTR_ERR(dst);
911 goto out;
912 }
913 if (ipc6.hlimit < 0)
914 ipc6.hlimit = ip6_sk_dst_hoplimit(np, &fl6, dst);
915
916 if (ipc6.dontfrag < 0)
917 ipc6.dontfrag = np->dontfrag;
918
919 if (msg->msg_flags&MSG_CONFIRM)
920 goto do_confirm;
921
922 back_from_confirm:
923 if (inet->hdrincl)
924 err = rawv6_send_hdrinc(sk, msg, len, &fl6, &dst, msg->msg_flags);
925 else {
926 ipc6.opt = opt;
927 lock_sock(sk);
928 err = ip6_append_data(sk, raw6_getfrag, &rfv,
929 len, 0, &ipc6, &fl6, (struct rt6_info *)dst,
930 msg->msg_flags, &sockc);
931
932 if (err)
933 ip6_flush_pending_frames(sk);
934 else if (!(msg->msg_flags & MSG_MORE))
935 err = rawv6_push_pending_frames(sk, &fl6, rp);
936 release_sock(sk);
937 }
938 done:
939 dst_release(dst);
940 out:
941 fl6_sock_release(flowlabel);
942 txopt_put(opt_to_free);
943 return err < 0 ? err : len;
944 do_confirm:
945 if (msg->msg_flags & MSG_PROBE)
946 dst_confirm_neigh(dst, &fl6.daddr);
947 if (!(msg->msg_flags & MSG_PROBE) || len)
948 goto back_from_confirm;
949 err = 0;
950 goto done;
951 }
952
953 static int rawv6_seticmpfilter(struct sock *sk, int level, int optname,
954 char __user *optval, int optlen)
955 {
956 switch (optname) {
957 case ICMPV6_FILTER:
958 if (optlen > sizeof(struct icmp6_filter))
959 optlen = sizeof(struct icmp6_filter);
960 if (copy_from_user(&raw6_sk(sk)->filter, optval, optlen))
961 return -EFAULT;
962 return 0;
963 default:
964 return -ENOPROTOOPT;
965 }
966
967 return 0;
968 }
969
970 static int rawv6_geticmpfilter(struct sock *sk, int level, int optname,
971 char __user *optval, int __user *optlen)
972 {
973 int len;
974
975 switch (optname) {
976 case ICMPV6_FILTER:
977 if (get_user(len, optlen))
978 return -EFAULT;
979 if (len < 0)
980 return -EINVAL;
981 if (len > sizeof(struct icmp6_filter))
982 len = sizeof(struct icmp6_filter);
983 if (put_user(len, optlen))
984 return -EFAULT;
985 if (copy_to_user(optval, &raw6_sk(sk)->filter, len))
986 return -EFAULT;
987 return 0;
988 default:
989 return -ENOPROTOOPT;
990 }
991
992 return 0;
993 }
994
995
996 static int do_rawv6_setsockopt(struct sock *sk, int level, int optname,
997 char __user *optval, unsigned int optlen)
998 {
999 struct raw6_sock *rp = raw6_sk(sk);
1000 int val;
1001
1002 if (get_user(val, (int __user *)optval))
1003 return -EFAULT;
1004
1005 switch (optname) {
1006 case IPV6_HDRINCL:
1007 if (sk->sk_type != SOCK_RAW)
1008 return -EINVAL;
1009 inet_sk(sk)->hdrincl = !!val;
1010 return 0;
1011 case IPV6_CHECKSUM:
1012 if (inet_sk(sk)->inet_num == IPPROTO_ICMPV6 &&
1013 level == IPPROTO_IPV6) {
1014 /*
1015 * RFC3542 tells that IPV6_CHECKSUM socket
1016 * option in the IPPROTO_IPV6 level is not
1017 * allowed on ICMPv6 sockets.
1018 * If you want to set it, use IPPROTO_RAW
1019 * level IPV6_CHECKSUM socket option
1020 * (Linux extension).
1021 */
1022 return -EINVAL;
1023 }
1024
1025 /* You may get strange result with a positive odd offset;
1026 RFC2292bis agrees with me. */
1027 if (val > 0 && (val&1))
1028 return -EINVAL;
1029 if (val < 0) {
1030 rp->checksum = 0;
1031 } else {
1032 rp->checksum = 1;
1033 rp->offset = val;
1034 }
1035
1036 return 0;
1037
1038 default:
1039 return -ENOPROTOOPT;
1040 }
1041 }
1042
1043 static int rawv6_setsockopt(struct sock *sk, int level, int optname,
1044 char __user *optval, unsigned int optlen)
1045 {
1046 switch (level) {
1047 case SOL_RAW:
1048 break;
1049
1050 case SOL_ICMPV6:
1051 if (inet_sk(sk)->inet_num != IPPROTO_ICMPV6)
1052 return -EOPNOTSUPP;
1053 return rawv6_seticmpfilter(sk, level, optname, optval, optlen);
1054 case SOL_IPV6:
1055 if (optname == IPV6_CHECKSUM ||
1056 optname == IPV6_HDRINCL)
1057 break;
1058 default:
1059 return ipv6_setsockopt(sk, level, optname, optval, optlen);
1060 }
1061
1062 return do_rawv6_setsockopt(sk, level, optname, optval, optlen);
1063 }
1064
1065 #ifdef CONFIG_COMPAT
1066 static int compat_rawv6_setsockopt(struct sock *sk, int level, int optname,
1067 char __user *optval, unsigned int optlen)
1068 {
1069 switch (level) {
1070 case SOL_RAW:
1071 break;
1072 case SOL_ICMPV6:
1073 if (inet_sk(sk)->inet_num != IPPROTO_ICMPV6)
1074 return -EOPNOTSUPP;
1075 return rawv6_seticmpfilter(sk, level, optname, optval, optlen);
1076 case SOL_IPV6:
1077 if (optname == IPV6_CHECKSUM ||
1078 optname == IPV6_HDRINCL)
1079 break;
1080 default:
1081 return compat_ipv6_setsockopt(sk, level, optname,
1082 optval, optlen);
1083 }
1084 return do_rawv6_setsockopt(sk, level, optname, optval, optlen);
1085 }
1086 #endif
1087
1088 static int do_rawv6_getsockopt(struct sock *sk, int level, int optname,
1089 char __user *optval, int __user *optlen)
1090 {
1091 struct raw6_sock *rp = raw6_sk(sk);
1092 int val, len;
1093
1094 if (get_user(len, optlen))
1095 return -EFAULT;
1096
1097 switch (optname) {
1098 case IPV6_HDRINCL:
1099 val = inet_sk(sk)->hdrincl;
1100 break;
1101 case IPV6_CHECKSUM:
1102 /*
1103 * We allow getsockopt() for IPPROTO_IPV6-level
1104 * IPV6_CHECKSUM socket option on ICMPv6 sockets
1105 * since RFC3542 is silent about it.
1106 */
1107 if (rp->checksum == 0)
1108 val = -1;
1109 else
1110 val = rp->offset;
1111 break;
1112
1113 default:
1114 return -ENOPROTOOPT;
1115 }
1116
1117 len = min_t(unsigned int, sizeof(int), len);
1118
1119 if (put_user(len, optlen))
1120 return -EFAULT;
1121 if (copy_to_user(optval, &val, len))
1122 return -EFAULT;
1123 return 0;
1124 }
1125
1126 static int rawv6_getsockopt(struct sock *sk, int level, int optname,
1127 char __user *optval, int __user *optlen)
1128 {
1129 switch (level) {
1130 case SOL_RAW:
1131 break;
1132
1133 case SOL_ICMPV6:
1134 if (inet_sk(sk)->inet_num != IPPROTO_ICMPV6)
1135 return -EOPNOTSUPP;
1136 return rawv6_geticmpfilter(sk, level, optname, optval, optlen);
1137 case SOL_IPV6:
1138 if (optname == IPV6_CHECKSUM ||
1139 optname == IPV6_HDRINCL)
1140 break;
1141 default:
1142 return ipv6_getsockopt(sk, level, optname, optval, optlen);
1143 }
1144
1145 return do_rawv6_getsockopt(sk, level, optname, optval, optlen);
1146 }
1147
1148 #ifdef CONFIG_COMPAT
1149 static int compat_rawv6_getsockopt(struct sock *sk, int level, int optname,
1150 char __user *optval, int __user *optlen)
1151 {
1152 switch (level) {
1153 case SOL_RAW:
1154 break;
1155 case SOL_ICMPV6:
1156 if (inet_sk(sk)->inet_num != IPPROTO_ICMPV6)
1157 return -EOPNOTSUPP;
1158 return rawv6_geticmpfilter(sk, level, optname, optval, optlen);
1159 case SOL_IPV6:
1160 if (optname == IPV6_CHECKSUM ||
1161 optname == IPV6_HDRINCL)
1162 break;
1163 default:
1164 return compat_ipv6_getsockopt(sk, level, optname,
1165 optval, optlen);
1166 }
1167 return do_rawv6_getsockopt(sk, level, optname, optval, optlen);
1168 }
1169 #endif
1170
1171 static int rawv6_ioctl(struct sock *sk, int cmd, unsigned long arg)
1172 {
1173 switch (cmd) {
1174 case SIOCOUTQ: {
1175 int amount = sk_wmem_alloc_get(sk);
1176
1177 return put_user(amount, (int __user *)arg);
1178 }
1179 case SIOCINQ: {
1180 struct sk_buff *skb;
1181 int amount = 0;
1182
1183 spin_lock_bh(&sk->sk_receive_queue.lock);
1184 skb = skb_peek(&sk->sk_receive_queue);
1185 if (skb)
1186 amount = skb->len;
1187 spin_unlock_bh(&sk->sk_receive_queue.lock);
1188 return put_user(amount, (int __user *)arg);
1189 }
1190
1191 default:
1192 #ifdef CONFIG_IPV6_MROUTE
1193 return ip6mr_ioctl(sk, cmd, (void __user *)arg);
1194 #else
1195 return -ENOIOCTLCMD;
1196 #endif
1197 }
1198 }
1199
1200 #ifdef CONFIG_COMPAT
1201 static int compat_rawv6_ioctl(struct sock *sk, unsigned int cmd, unsigned long arg)
1202 {
1203 switch (cmd) {
1204 case SIOCOUTQ:
1205 case SIOCINQ:
1206 return -ENOIOCTLCMD;
1207 default:
1208 #ifdef CONFIG_IPV6_MROUTE
1209 return ip6mr_compat_ioctl(sk, cmd, compat_ptr(arg));
1210 #else
1211 return -ENOIOCTLCMD;
1212 #endif
1213 }
1214 }
1215 #endif
1216
1217 static void rawv6_close(struct sock *sk, long timeout)
1218 {
1219 if (inet_sk(sk)->inet_num == IPPROTO_RAW)
1220 ip6_ra_control(sk, -1);
1221 ip6mr_sk_done(sk);
1222 sk_common_release(sk);
1223 }
1224
1225 static void raw6_destroy(struct sock *sk)
1226 {
1227 lock_sock(sk);
1228 ip6_flush_pending_frames(sk);
1229 release_sock(sk);
1230
1231 inet6_destroy_sock(sk);
1232 }
1233
1234 static int rawv6_init_sk(struct sock *sk)
1235 {
1236 struct raw6_sock *rp = raw6_sk(sk);
1237
1238 switch (inet_sk(sk)->inet_num) {
1239 case IPPROTO_ICMPV6:
1240 rp->checksum = 1;
1241 rp->offset = 2;
1242 break;
1243 case IPPROTO_MH:
1244 rp->checksum = 1;
1245 rp->offset = 4;
1246 break;
1247 default:
1248 break;
1249 }
1250 return 0;
1251 }
1252
1253 struct proto rawv6_prot = {
1254 .name = "RAWv6",
1255 .owner = THIS_MODULE,
1256 .close = rawv6_close,
1257 .destroy = raw6_destroy,
1258 .connect = ip6_datagram_connect_v6_only,
1259 .disconnect = __udp_disconnect,
1260 .ioctl = rawv6_ioctl,
1261 .init = rawv6_init_sk,
1262 .setsockopt = rawv6_setsockopt,
1263 .getsockopt = rawv6_getsockopt,
1264 .sendmsg = rawv6_sendmsg,
1265 .recvmsg = rawv6_recvmsg,
1266 .bind = rawv6_bind,
1267 .backlog_rcv = rawv6_rcv_skb,
1268 .hash = raw_hash_sk,
1269 .unhash = raw_unhash_sk,
1270 .obj_size = sizeof(struct raw6_sock),
1271 .h.raw_hash = &raw_v6_hashinfo,
1272 #ifdef CONFIG_COMPAT
1273 .compat_setsockopt = compat_rawv6_setsockopt,
1274 .compat_getsockopt = compat_rawv6_getsockopt,
1275 .compat_ioctl = compat_rawv6_ioctl,
1276 #endif
1277 .diag_destroy = raw_abort,
1278 };
1279
1280 #ifdef CONFIG_PROC_FS
1281 static int raw6_seq_show(struct seq_file *seq, void *v)
1282 {
1283 if (v == SEQ_START_TOKEN) {
1284 seq_puts(seq, IPV6_SEQ_DGRAM_HEADER);
1285 } else {
1286 struct sock *sp = v;
1287 __u16 srcp = inet_sk(sp)->inet_num;
1288 ip6_dgram_sock_seq_show(seq, v, srcp, 0,
1289 raw_seq_private(seq)->bucket);
1290 }
1291 return 0;
1292 }
1293
1294 static const struct seq_operations raw6_seq_ops = {
1295 .start = raw_seq_start,
1296 .next = raw_seq_next,
1297 .stop = raw_seq_stop,
1298 .show = raw6_seq_show,
1299 };
1300
1301 static int raw6_seq_open(struct inode *inode, struct file *file)
1302 {
1303 return raw_seq_open(inode, file, &raw_v6_hashinfo, &raw6_seq_ops);
1304 }
1305
1306 static const struct file_operations raw6_seq_fops = {
1307 .owner = THIS_MODULE,
1308 .open = raw6_seq_open,
1309 .read = seq_read,
1310 .llseek = seq_lseek,
1311 .release = seq_release_net,
1312 };
1313
1314 static int __net_init raw6_init_net(struct net *net)
1315 {
1316 if (!proc_create("raw6", S_IRUGO, net->proc_net, &raw6_seq_fops))
1317 return -ENOMEM;
1318
1319 return 0;
1320 }
1321
1322 static void __net_exit raw6_exit_net(struct net *net)
1323 {
1324 remove_proc_entry("raw6", net->proc_net);
1325 }
1326
1327 static struct pernet_operations raw6_net_ops = {
1328 .init = raw6_init_net,
1329 .exit = raw6_exit_net,
1330 };
1331
1332 int __init raw6_proc_init(void)
1333 {
1334 return register_pernet_subsys(&raw6_net_ops);
1335 }
1336
1337 void raw6_proc_exit(void)
1338 {
1339 unregister_pernet_subsys(&raw6_net_ops);
1340 }
1341 #endif /* CONFIG_PROC_FS */
1342
1343 /* Same as inet6_dgram_ops, sans udp_poll. */
1344 const struct proto_ops inet6_sockraw_ops = {
1345 .family = PF_INET6,
1346 .owner = THIS_MODULE,
1347 .release = inet6_release,
1348 .bind = inet6_bind,
1349 .connect = inet_dgram_connect, /* ok */
1350 .socketpair = sock_no_socketpair, /* a do nothing */
1351 .accept = sock_no_accept, /* a do nothing */
1352 .getname = inet6_getname,
1353 .poll = datagram_poll, /* ok */
1354 .ioctl = inet6_ioctl, /* must change */
1355 .listen = sock_no_listen, /* ok */
1356 .shutdown = inet_shutdown, /* ok */
1357 .setsockopt = sock_common_setsockopt, /* ok */
1358 .getsockopt = sock_common_getsockopt, /* ok */
1359 .sendmsg = inet_sendmsg, /* ok */
1360 .recvmsg = sock_common_recvmsg, /* ok */
1361 .mmap = sock_no_mmap,
1362 .sendpage = sock_no_sendpage,
1363 #ifdef CONFIG_COMPAT
1364 .compat_setsockopt = compat_sock_common_setsockopt,
1365 .compat_getsockopt = compat_sock_common_getsockopt,
1366 #endif
1367 };
1368
1369 static struct inet_protosw rawv6_protosw = {
1370 .type = SOCK_RAW,
1371 .protocol = IPPROTO_IP, /* wild card */
1372 .prot = &rawv6_prot,
1373 .ops = &inet6_sockraw_ops,
1374 .flags = INET_PROTOSW_REUSE,
1375 };
1376
1377 int __init rawv6_init(void)
1378 {
1379 return inet6_register_protosw(&rawv6_protosw);
1380 }
1381
1382 void rawv6_exit(void)
1383 {
1384 inet6_unregister_protosw(&rawv6_protosw);
1385 }