?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
perf bpf: Move perf_event_output() from stdio.h to bpf.h
[linux/fpc-iii.git] / net / ipv6 / ip6_output.c
blobfcd3c66ded1620d0d320fd7b1753f2734d1dfa46
1 /*
2 * IPv6 output functions
3 * Linux INET6 implementation
4 *
5 * Authors:
6 * Pedro Roque <roque@di.fc.ul.pt>
7 *
8 * Based on linux/net/ipv4/ip_output.c
9 *
10 * This program is free software; you can redistribute it and/or
11 * modify it under the terms of the GNU General Public License
12 * as published by the Free Software Foundation; either version
13 * 2 of the License, or (at your option) any later version.
14 *
15 * Changes:
16 * A.N.Kuznetsov : airthmetics in fragmentation.
17 * extension headers are implemented.
18 * route changes now work.
19 * ip6_forward does not confuse sniffers.
20 * etc.
21 *
22 * H. von Brand : Added missing #include <linux/string.h>
23 * Imran Patel : frag id should be in NBO
24 * Kazunori MIYAZAWA @USAGI
25 * : add ip6_append_data and related functions
26 * for datagram xmit
27 */
28
29 #include <linux/errno.h>
30 #include <linux/kernel.h>
31 #include <linux/string.h>
32 #include <linux/socket.h>
33 #include <linux/net.h>
34 #include <linux/netdevice.h>
35 #include <linux/if_arp.h>
36 #include <linux/in6.h>
37 #include <linux/tcp.h>
38 #include <linux/route.h>
39 #include <linux/module.h>
40 #include <linux/slab.h>
41
42 #include <linux/bpf-cgroup.h>
43 #include <linux/netfilter.h>
44 #include <linux/netfilter_ipv6.h>
45
46 #include <net/sock.h>
47 #include <net/snmp.h>
48
49 #include <net/ipv6.h>
50 #include <net/ndisc.h>
51 #include <net/protocol.h>
52 #include <net/ip6_route.h>
53 #include <net/addrconf.h>
54 #include <net/rawv6.h>
55 #include <net/icmp.h>
56 #include <net/xfrm.h>
57 #include <net/checksum.h>
58 #include <linux/mroute6.h>
59 #include <net/l3mdev.h>
60 #include <net/lwtunnel.h>
61
62 static int ip6_finish_output2(struct net *net, struct sock *sk, struct sk_buff *skb)
63 {
64 struct dst_entry *dst = skb_dst(skb);
65 struct net_device *dev = dst->dev;
66 struct neighbour *neigh;
67 struct in6_addr *nexthop;
68 int ret;
69
70 if (ipv6_addr_is_multicast(&ipv6_hdr(skb)->daddr)) {
71 struct inet6_dev *idev = ip6_dst_idev(skb_dst(skb));
72
73 if (!(dev->flags & IFF_LOOPBACK) && sk_mc_loop(sk) &&
74 ((mroute6_is_socket(net, skb) &&
75 !(IP6CB(skb)->flags & IP6SKB_FORWARDED)) ||
76 ipv6_chk_mcast_addr(dev, &ipv6_hdr(skb)->daddr,
77 &ipv6_hdr(skb)->saddr))) {
78 struct sk_buff *newskb = skb_clone(skb, GFP_ATOMIC);
79
80 /* Do not check for IFF_ALLMULTI; multicast routing
81 is not supported in any case.
82 */
83 if (newskb)
84 NF_HOOK(NFPROTO_IPV6, NF_INET_POST_ROUTING,
85 net, sk, newskb, NULL, newskb->dev,
86 dev_loopback_xmit);
87
88 if (ipv6_hdr(skb)->hop_limit == 0) {
89 IP6_INC_STATS(net, idev,
90 IPSTATS_MIB_OUTDISCARDS);
91 kfree_skb(skb);
92 return 0;
93 }
94 }
95
96 IP6_UPD_PO_STATS(net, idev, IPSTATS_MIB_OUTMCAST, skb->len);
97
98 if (IPV6_ADDR_MC_SCOPE(&ipv6_hdr(skb)->daddr) <=
99 IPV6_ADDR_SCOPE_NODELOCAL &&
100 !(dev->flags & IFF_LOOPBACK)) {
101 kfree_skb(skb);
102 return 0;
103 }
104 }
105
106 if (lwtunnel_xmit_redirect(dst->lwtstate)) {
107 int res = lwtunnel_xmit(skb);
108
109 if (res < 0 || res == LWTUNNEL_XMIT_DONE)
110 return res;
111 }
112
113 rcu_read_lock_bh();
114 nexthop = rt6_nexthop((struct rt6_info *)dst, &ipv6_hdr(skb)->daddr);
115 neigh = __ipv6_neigh_lookup_noref(dst->dev, nexthop);
116 if (unlikely(!neigh))
117 neigh = __neigh_create(&nd_tbl, nexthop, dst->dev, false);
118 if (!IS_ERR(neigh)) {
119 sock_confirm_neigh(skb, neigh);
120 ret = neigh_output(neigh, skb);
121 rcu_read_unlock_bh();
122 return ret;
123 }
124 rcu_read_unlock_bh();
125
126 IP6_INC_STATS(net, ip6_dst_idev(dst), IPSTATS_MIB_OUTNOROUTES);
127 kfree_skb(skb);
128 return -EINVAL;
129 }
130
131 static int ip6_finish_output(struct net *net, struct sock *sk, struct sk_buff *skb)
132 {
133 int ret;
134
135 ret = BPF_CGROUP_RUN_PROG_INET_EGRESS(sk, skb);
136 if (ret) {
137 kfree_skb(skb);
138 return ret;
139 }
140
141 #if defined(CONFIG_NETFILTER) && defined(CONFIG_XFRM)
142 /* Policy lookup after SNAT yielded a new policy */
143 if (skb_dst(skb)->xfrm) {
144 IPCB(skb)->flags |= IPSKB_REROUTED;
145 return dst_output(net, sk, skb);
146 }
147 #endif
148
149 if ((skb->len > ip6_skb_dst_mtu(skb) && !skb_is_gso(skb)) ||
150 dst_allfrag(skb_dst(skb)) ||
151 (IP6CB(skb)->frag_max_size && skb->len > IP6CB(skb)->frag_max_size))
152 return ip6_fragment(net, sk, skb, ip6_finish_output2);
153 else
154 return ip6_finish_output2(net, sk, skb);
155 }
156
157 int ip6_output(struct net *net, struct sock *sk, struct sk_buff *skb)
158 {
159 struct net_device *dev = skb_dst(skb)->dev;
160 struct inet6_dev *idev = ip6_dst_idev(skb_dst(skb));
161
162 skb->protocol = htons(ETH_P_IPV6);
163 skb->dev = dev;
164
165 if (unlikely(idev->cnf.disable_ipv6)) {
166 IP6_INC_STATS(net, idev, IPSTATS_MIB_OUTDISCARDS);
167 kfree_skb(skb);
168 return 0;
169 }
170
171 return NF_HOOK_COND(NFPROTO_IPV6, NF_INET_POST_ROUTING,
172 net, sk, skb, NULL, dev,
173 ip6_finish_output,
174 !(IP6CB(skb)->flags & IP6SKB_REROUTED));
175 }
176
177 bool ip6_autoflowlabel(struct net *net, const struct ipv6_pinfo *np)
178 {
179 if (!np->autoflowlabel_set)
180 return ip6_default_np_autolabel(net);
181 else
182 return np->autoflowlabel;
183 }
184
185 /*
186 * xmit an sk_buff (used by TCP, SCTP and DCCP)
187 * Note : socket lock is not held for SYNACK packets, but might be modified
188 * by calls to skb_set_owner_w() and ipv6_local_error(),
189 * which are using proper atomic operations or spinlocks.
190 */
191 int ip6_xmit(const struct sock *sk, struct sk_buff *skb, struct flowi6 *fl6,
192 __u32 mark, struct ipv6_txoptions *opt, int tclass)
193 {
194 struct net *net = sock_net(sk);
195 const struct ipv6_pinfo *np = inet6_sk(sk);
196 struct in6_addr *first_hop = &fl6->daddr;
197 struct dst_entry *dst = skb_dst(skb);
198 unsigned int head_room;
199 struct ipv6hdr *hdr;
200 u8 proto = fl6->flowi6_proto;
201 int seg_len = skb->len;
202 int hlimit = -1;
203 u32 mtu;
204
205 head_room = sizeof(struct ipv6hdr) + LL_RESERVED_SPACE(dst->dev);
206 if (opt)
207 head_room += opt->opt_nflen + opt->opt_flen;
208
209 if (unlikely(skb_headroom(skb) < head_room)) {
210 struct sk_buff *skb2 = skb_realloc_headroom(skb, head_room);
211 if (!skb2) {
212 IP6_INC_STATS(net, ip6_dst_idev(skb_dst(skb)),
213 IPSTATS_MIB_OUTDISCARDS);
214 kfree_skb(skb);
215 return -ENOBUFS;
216 }
217 if (skb->sk)
218 skb_set_owner_w(skb2, skb->sk);
219 consume_skb(skb);
220 skb = skb2;
221 }
222
223 if (opt) {
224 seg_len += opt->opt_nflen + opt->opt_flen;
225
226 if (opt->opt_flen)
227 ipv6_push_frag_opts(skb, opt, &proto);
228
229 if (opt->opt_nflen)
230 ipv6_push_nfrag_opts(skb, opt, &proto, &first_hop,
231 &fl6->saddr);
232 }
233
234 skb_push(skb, sizeof(struct ipv6hdr));
235 skb_reset_network_header(skb);
236 hdr = ipv6_hdr(skb);
237
238 /*
239 * Fill in the IPv6 header
240 */
241 if (np)
242 hlimit = np->hop_limit;
243 if (hlimit < 0)
244 hlimit = ip6_dst_hoplimit(dst);
245
246 ip6_flow_hdr(hdr, tclass, ip6_make_flowlabel(net, skb, fl6->flowlabel,
247 ip6_autoflowlabel(net, np), fl6));
248
249 hdr->payload_len = htons(seg_len);
250 hdr->nexthdr = proto;
251 hdr->hop_limit = hlimit;
252
253 hdr->saddr = fl6->saddr;
254 hdr->daddr = *first_hop;
255
256 skb->protocol = htons(ETH_P_IPV6);
257 skb->priority = sk->sk_priority;
258 skb->mark = mark;
259
260 mtu = dst_mtu(dst);
261 if ((skb->len <= mtu) || skb->ignore_df || skb_is_gso(skb)) {
262 IP6_UPD_PO_STATS(net, ip6_dst_idev(skb_dst(skb)),
263 IPSTATS_MIB_OUT, skb->len);
264
265 /* if egress device is enslaved to an L3 master device pass the
266 * skb to its handler for processing
267 */
268 skb = l3mdev_ip6_out((struct sock *)sk, skb);
269 if (unlikely(!skb))
270 return 0;
271
272 /* hooks should never assume socket lock is held.
273 * we promote our socket to non const
274 */
275 return NF_HOOK(NFPROTO_IPV6, NF_INET_LOCAL_OUT,
276 net, (struct sock *)sk, skb, NULL, dst->dev,
277 dst_output);
278 }
279
280 skb->dev = dst->dev;
281 /* ipv6_local_error() does not require socket lock,
282 * we promote our socket to non const
283 */
284 ipv6_local_error((struct sock *)sk, EMSGSIZE, fl6, mtu);
285
286 IP6_INC_STATS(net, ip6_dst_idev(skb_dst(skb)), IPSTATS_MIB_FRAGFAILS);
287 kfree_skb(skb);
288 return -EMSGSIZE;
289 }
290 EXPORT_SYMBOL(ip6_xmit);
291
292 static int ip6_call_ra_chain(struct sk_buff *skb, int sel)
293 {
294 struct ip6_ra_chain *ra;
295 struct sock *last = NULL;
296
297 read_lock(&ip6_ra_lock);
298 for (ra = ip6_ra_chain; ra; ra = ra->next) {
299 struct sock *sk = ra->sk;
300 if (sk && ra->sel == sel &&
301 (!sk->sk_bound_dev_if ||
302 sk->sk_bound_dev_if == skb->dev->ifindex)) {
303 if (last) {
304 struct sk_buff *skb2 = skb_clone(skb, GFP_ATOMIC);
305 if (skb2)
306 rawv6_rcv(last, skb2);
307 }
308 last = sk;
309 }
310 }
311
312 if (last) {
313 rawv6_rcv(last, skb);
314 read_unlock(&ip6_ra_lock);
315 return 1;
316 }
317 read_unlock(&ip6_ra_lock);
318 return 0;
319 }
320
321 static int ip6_forward_proxy_check(struct sk_buff *skb)
322 {
323 struct ipv6hdr *hdr = ipv6_hdr(skb);
324 u8 nexthdr = hdr->nexthdr;
325 __be16 frag_off;
326 int offset;
327
328 if (ipv6_ext_hdr(nexthdr)) {
329 offset = ipv6_skip_exthdr(skb, sizeof(*hdr), &nexthdr, &frag_off);
330 if (offset < 0)
331 return 0;
332 } else
333 offset = sizeof(struct ipv6hdr);
334
335 if (nexthdr == IPPROTO_ICMPV6) {
336 struct icmp6hdr *icmp6;
337
338 if (!pskb_may_pull(skb, (skb_network_header(skb) +
339 offset + 1 - skb->data)))
340 return 0;
341
342 icmp6 = (struct icmp6hdr *)(skb_network_header(skb) + offset);
343
344 switch (icmp6->icmp6_type) {
345 case NDISC_ROUTER_SOLICITATION:
346 case NDISC_ROUTER_ADVERTISEMENT:
347 case NDISC_NEIGHBOUR_SOLICITATION:
348 case NDISC_NEIGHBOUR_ADVERTISEMENT:
349 case NDISC_REDIRECT:
350 /* For reaction involving unicast neighbor discovery
351 * message destined to the proxied address, pass it to
352 * input function.
353 */
354 return 1;
355 default:
356 break;
357 }
358 }
359
360 /*
361 * The proxying router can't forward traffic sent to a link-local
362 * address, so signal the sender and discard the packet. This
363 * behavior is clarified by the MIPv6 specification.
364 */
365 if (ipv6_addr_type(&hdr->daddr) & IPV6_ADDR_LINKLOCAL) {
366 dst_link_failure(skb);
367 return -1;
368 }
369
370 return 0;
371 }
372
373 static inline int ip6_forward_finish(struct net *net, struct sock *sk,
374 struct sk_buff *skb)
375 {
376 struct dst_entry *dst = skb_dst(skb);
377
378 __IP6_INC_STATS(net, ip6_dst_idev(dst), IPSTATS_MIB_OUTFORWDATAGRAMS);
379 __IP6_ADD_STATS(net, ip6_dst_idev(dst), IPSTATS_MIB_OUTOCTETS, skb->len);
380
381 return dst_output(net, sk, skb);
382 }
383
384 static bool ip6_pkt_too_big(const struct sk_buff *skb, unsigned int mtu)
385 {
386 if (skb->len <= mtu)
387 return false;
388
389 /* ipv6 conntrack defrag sets max_frag_size + ignore_df */
390 if (IP6CB(skb)->frag_max_size && IP6CB(skb)->frag_max_size > mtu)
391 return true;
392
393 if (skb->ignore_df)
394 return false;
395
396 if (skb_is_gso(skb) && skb_gso_validate_network_len(skb, mtu))
397 return false;
398
399 return true;
400 }
401
402 int ip6_forward(struct sk_buff *skb)
403 {
404 struct inet6_dev *idev = __in6_dev_get_safely(skb->dev);
405 struct dst_entry *dst = skb_dst(skb);
406 struct ipv6hdr *hdr = ipv6_hdr(skb);
407 struct inet6_skb_parm *opt = IP6CB(skb);
408 struct net *net = dev_net(dst->dev);
409 u32 mtu;
410
411 if (net->ipv6.devconf_all->forwarding == 0)
412 goto error;
413
414 if (skb->pkt_type != PACKET_HOST)
415 goto drop;
416
417 if (unlikely(skb->sk))
418 goto drop;
419
420 if (skb_warn_if_lro(skb))
421 goto drop;
422
423 if (!xfrm6_policy_check(NULL, XFRM_POLICY_FWD, skb)) {
424 __IP6_INC_STATS(net, idev, IPSTATS_MIB_INDISCARDS);
425 goto drop;
426 }
427
428 skb_forward_csum(skb);
429
430 /*
431 * We DO NOT make any processing on
432 * RA packets, pushing them to user level AS IS
433 * without ane WARRANTY that application will be able
434 * to interpret them. The reason is that we
435 * cannot make anything clever here.
436 *
437 * We are not end-node, so that if packet contains
438 * AH/ESP, we cannot make anything.
439 * Defragmentation also would be mistake, RA packets
440 * cannot be fragmented, because there is no warranty
441 * that different fragments will go along one path. --ANK
442 */
443 if (unlikely(opt->flags & IP6SKB_ROUTERALERT)) {
444 if (ip6_call_ra_chain(skb, ntohs(opt->ra)))
445 return 0;
446 }
447
448 /*
449 * check and decrement ttl
450 */
451 if (hdr->hop_limit <= 1) {
452 /* Force OUTPUT device used as source address */
453 skb->dev = dst->dev;
454 icmpv6_send(skb, ICMPV6_TIME_EXCEED, ICMPV6_EXC_HOPLIMIT, 0);
455 __IP6_INC_STATS(net, idev, IPSTATS_MIB_INHDRERRORS);
456
457 kfree_skb(skb);
458 return -ETIMEDOUT;
459 }
460
461 /* XXX: idev->cnf.proxy_ndp? */
462 if (net->ipv6.devconf_all->proxy_ndp &&
463 pneigh_lookup(&nd_tbl, net, &hdr->daddr, skb->dev, 0)) {
464 int proxied = ip6_forward_proxy_check(skb);
465 if (proxied > 0)
466 return ip6_input(skb);
467 else if (proxied < 0) {
468 __IP6_INC_STATS(net, idev, IPSTATS_MIB_INDISCARDS);
469 goto drop;
470 }
471 }
472
473 if (!xfrm6_route_forward(skb)) {
474 __IP6_INC_STATS(net, idev, IPSTATS_MIB_INDISCARDS);
475 goto drop;
476 }
477 dst = skb_dst(skb);
478
479 /* IPv6 specs say nothing about it, but it is clear that we cannot
480 send redirects to source routed frames.
481 We don't send redirects to frames decapsulated from IPsec.
482 */
483 if (IP6CB(skb)->iif == dst->dev->ifindex &&
484 opt->srcrt == 0 && !skb_sec_path(skb)) {
485 struct in6_addr *target = NULL;
486 struct inet_peer *peer;
487 struct rt6_info *rt;
488
489 /*
490 * incoming and outgoing devices are the same
491 * send a redirect.
492 */
493
494 rt = (struct rt6_info *) dst;
495 if (rt->rt6i_flags & RTF_GATEWAY)
496 target = &rt->rt6i_gateway;
497 else
498 target = &hdr->daddr;
499
500 peer = inet_getpeer_v6(net->ipv6.peers, &hdr->daddr, 1);
501
502 /* Limit redirects both by destination (here)
503 and by source (inside ndisc_send_redirect)
504 */
505 if (inet_peer_xrlim_allow(peer, 1*HZ))
506 ndisc_send_redirect(skb, target);
507 if (peer)
508 inet_putpeer(peer);
509 } else {
510 int addrtype = ipv6_addr_type(&hdr->saddr);
511
512 /* This check is security critical. */
513 if (addrtype == IPV6_ADDR_ANY ||
514 addrtype & (IPV6_ADDR_MULTICAST | IPV6_ADDR_LOOPBACK))
515 goto error;
516 if (addrtype & IPV6_ADDR_LINKLOCAL) {
517 icmpv6_send(skb, ICMPV6_DEST_UNREACH,
518 ICMPV6_NOT_NEIGHBOUR, 0);
519 goto error;
520 }
521 }
522
523 mtu = ip6_dst_mtu_forward(dst);
524 if (mtu < IPV6_MIN_MTU)
525 mtu = IPV6_MIN_MTU;
526
527 if (ip6_pkt_too_big(skb, mtu)) {
528 /* Again, force OUTPUT device used as source address */
529 skb->dev = dst->dev;
530 icmpv6_send(skb, ICMPV6_PKT_TOOBIG, 0, mtu);
531 __IP6_INC_STATS(net, idev, IPSTATS_MIB_INTOOBIGERRORS);
532 __IP6_INC_STATS(net, ip6_dst_idev(dst),
533 IPSTATS_MIB_FRAGFAILS);
534 kfree_skb(skb);
535 return -EMSGSIZE;
536 }
537
538 if (skb_cow(skb, dst->dev->hard_header_len)) {
539 __IP6_INC_STATS(net, ip6_dst_idev(dst),
540 IPSTATS_MIB_OUTDISCARDS);
541 goto drop;
542 }
543
544 hdr = ipv6_hdr(skb);
545
546 /* Mangling hops number delayed to point after skb COW */
547
548 hdr->hop_limit--;
549
550 return NF_HOOK(NFPROTO_IPV6, NF_INET_FORWARD,
551 net, NULL, skb, skb->dev, dst->dev,
552 ip6_forward_finish);
553
554 error:
555 __IP6_INC_STATS(net, idev, IPSTATS_MIB_INADDRERRORS);
556 drop:
557 kfree_skb(skb);
558 return -EINVAL;
559 }
560
561 static void ip6_copy_metadata(struct sk_buff *to, struct sk_buff *from)
562 {
563 to->pkt_type = from->pkt_type;
564 to->priority = from->priority;
565 to->protocol = from->protocol;
566 skb_dst_drop(to);
567 skb_dst_set(to, dst_clone(skb_dst(from)));
568 to->dev = from->dev;
569 to->mark = from->mark;
570
571 skb_copy_hash(to, from);
572
573 #ifdef CONFIG_NET_SCHED
574 to->tc_index = from->tc_index;
575 #endif
576 nf_copy(to, from);
577 skb_copy_secmark(to, from);
578 }
579
580 int ip6_fragment(struct net *net, struct sock *sk, struct sk_buff *skb,
581 int (*output)(struct net *, struct sock *, struct sk_buff *))
582 {
583 struct sk_buff *frag;
584 struct rt6_info *rt = (struct rt6_info *)skb_dst(skb);
585 struct ipv6_pinfo *np = skb->sk && !dev_recursion_level() ?
586 inet6_sk(skb->sk) : NULL;
587 struct ipv6hdr *tmp_hdr;
588 struct frag_hdr *fh;
589 unsigned int mtu, hlen, left, len;
590 int hroom, troom;
591 __be32 frag_id;
592 int ptr, offset = 0, err = 0;
593 u8 *prevhdr, nexthdr = 0;
594
595 err = ip6_find_1stfragopt(skb, &prevhdr);
596 if (err < 0)
597 goto fail;
598 hlen = err;
599 nexthdr = *prevhdr;
600
601 mtu = ip6_skb_dst_mtu(skb);
602
603 /* We must not fragment if the socket is set to force MTU discovery
604 * or if the skb it not generated by a local socket.
605 */
606 if (unlikely(!skb->ignore_df && skb->len > mtu))
607 goto fail_toobig;
608
609 if (IP6CB(skb)->frag_max_size) {
610 if (IP6CB(skb)->frag_max_size > mtu)
611 goto fail_toobig;
612
613 /* don't send fragments larger than what we received */
614 mtu = IP6CB(skb)->frag_max_size;
615 if (mtu < IPV6_MIN_MTU)
616 mtu = IPV6_MIN_MTU;
617 }
618
619 if (np && np->frag_size < mtu) {
620 if (np->frag_size)
621 mtu = np->frag_size;
622 }
623 if (mtu < hlen + sizeof(struct frag_hdr) + 8)
624 goto fail_toobig;
625 mtu -= hlen + sizeof(struct frag_hdr);
626
627 frag_id = ipv6_select_ident(net, &ipv6_hdr(skb)->daddr,
628 &ipv6_hdr(skb)->saddr);
629
630 if (skb->ip_summed == CHECKSUM_PARTIAL &&
631 (err = skb_checksum_help(skb)))
632 goto fail;
633
634 hroom = LL_RESERVED_SPACE(rt->dst.dev);
635 if (skb_has_frag_list(skb)) {
636 unsigned int first_len = skb_pagelen(skb);
637 struct sk_buff *frag2;
638
639 if (first_len - hlen > mtu ||
640 ((first_len - hlen) & 7) ||
641 skb_cloned(skb) ||
642 skb_headroom(skb) < (hroom + sizeof(struct frag_hdr)))
643 goto slow_path;
644
645 skb_walk_frags(skb, frag) {
646 /* Correct geometry. */
647 if (frag->len > mtu ||
648 ((frag->len & 7) && frag->next) ||
649 skb_headroom(frag) < (hlen + hroom + sizeof(struct frag_hdr)))
650 goto slow_path_clean;
651
652 /* Partially cloned skb? */
653 if (skb_shared(frag))
654 goto slow_path_clean;
655
656 BUG_ON(frag->sk);
657 if (skb->sk) {
658 frag->sk = skb->sk;
659 frag->destructor = sock_wfree;
660 }
661 skb->truesize -= frag->truesize;
662 }
663
664 err = 0;
665 offset = 0;
666 /* BUILD HEADER */
667
668 *prevhdr = NEXTHDR_FRAGMENT;
669 tmp_hdr = kmemdup(skb_network_header(skb), hlen, GFP_ATOMIC);
670 if (!tmp_hdr) {
671 err = -ENOMEM;
672 goto fail;
673 }
674 frag = skb_shinfo(skb)->frag_list;
675 skb_frag_list_init(skb);
676
677 __skb_pull(skb, hlen);
678 fh = __skb_push(skb, sizeof(struct frag_hdr));
679 __skb_push(skb, hlen);
680 skb_reset_network_header(skb);
681 memcpy(skb_network_header(skb), tmp_hdr, hlen);
682
683 fh->nexthdr = nexthdr;
684 fh->reserved = 0;
685 fh->frag_off = htons(IP6_MF);
686 fh->identification = frag_id;
687
688 first_len = skb_pagelen(skb);
689 skb->data_len = first_len - skb_headlen(skb);
690 skb->len = first_len;
691 ipv6_hdr(skb)->payload_len = htons(first_len -
692 sizeof(struct ipv6hdr));
693
694 for (;;) {
695 /* Prepare header of the next frame,
696 * before previous one went down. */
697 if (frag) {
698 frag->ip_summed = CHECKSUM_NONE;
699 skb_reset_transport_header(frag);
700 fh = __skb_push(frag, sizeof(struct frag_hdr));
701 __skb_push(frag, hlen);
702 skb_reset_network_header(frag);
703 memcpy(skb_network_header(frag), tmp_hdr,
704 hlen);
705 offset += skb->len - hlen - sizeof(struct frag_hdr);
706 fh->nexthdr = nexthdr;
707 fh->reserved = 0;
708 fh->frag_off = htons(offset);
709 if (frag->next)
710 fh->frag_off |= htons(IP6_MF);
711 fh->identification = frag_id;
712 ipv6_hdr(frag)->payload_len =
713 htons(frag->len -
714 sizeof(struct ipv6hdr));
715 ip6_copy_metadata(frag, skb);
716 }
717
718 err = output(net, sk, skb);
719 if (!err)
720 IP6_INC_STATS(net, ip6_dst_idev(&rt->dst),
721 IPSTATS_MIB_FRAGCREATES);
722
723 if (err || !frag)
724 break;
725
726 skb = frag;
727 frag = skb->next;
728 skb_mark_not_on_list(skb);
729 }
730
731 kfree(tmp_hdr);
732
733 if (err == 0) {
734 IP6_INC_STATS(net, ip6_dst_idev(&rt->dst),
735 IPSTATS_MIB_FRAGOKS);
736 return 0;
737 }
738
739 kfree_skb_list(frag);
740
741 IP6_INC_STATS(net, ip6_dst_idev(&rt->dst),
742 IPSTATS_MIB_FRAGFAILS);
743 return err;
744
745 slow_path_clean:
746 skb_walk_frags(skb, frag2) {
747 if (frag2 == frag)
748 break;
749 frag2->sk = NULL;
750 frag2->destructor = NULL;
751 skb->truesize += frag2->truesize;
752 }
753 }
754
755 slow_path:
756 left = skb->len - hlen; /* Space per frame */
757 ptr = hlen; /* Where to start from */
758
759 /*
760 * Fragment the datagram.
761 */
762
763 troom = rt->dst.dev->needed_tailroom;
764
765 /*
766 * Keep copying data until we run out.
767 */
768 while (left > 0) {
769 u8 *fragnexthdr_offset;
770
771 len = left;
772 /* IF: it doesn't fit, use 'mtu' - the data space left */
773 if (len > mtu)
774 len = mtu;
775 /* IF: we are not sending up to and including the packet end
776 then align the next start on an eight byte boundary */
777 if (len < left) {
778 len &= ~7;
779 }
780
781 /* Allocate buffer */
782 frag = alloc_skb(len + hlen + sizeof(struct frag_hdr) +
783 hroom + troom, GFP_ATOMIC);
784 if (!frag) {
785 err = -ENOMEM;
786 goto fail;
787 }
788
789 /*
790 * Set up data on packet
791 */
792
793 ip6_copy_metadata(frag, skb);
794 skb_reserve(frag, hroom);
795 skb_put(frag, len + hlen + sizeof(struct frag_hdr));
796 skb_reset_network_header(frag);
797 fh = (struct frag_hdr *)(skb_network_header(frag) + hlen);
798 frag->transport_header = (frag->network_header + hlen +
799 sizeof(struct frag_hdr));
800
801 /*
802 * Charge the memory for the fragment to any owner
803 * it might possess
804 */
805 if (skb->sk)
806 skb_set_owner_w(frag, skb->sk);
807
808 /*
809 * Copy the packet header into the new buffer.
810 */
811 skb_copy_from_linear_data(skb, skb_network_header(frag), hlen);
812
813 fragnexthdr_offset = skb_network_header(frag);
814 fragnexthdr_offset += prevhdr - skb_network_header(skb);
815 *fragnexthdr_offset = NEXTHDR_FRAGMENT;
816
817 /*
818 * Build fragment header.
819 */
820 fh->nexthdr = nexthdr;
821 fh->reserved = 0;
822 fh->identification = frag_id;
823
824 /*
825 * Copy a block of the IP datagram.
826 */
827 BUG_ON(skb_copy_bits(skb, ptr, skb_transport_header(frag),
828 len));
829 left -= len;
830
831 fh->frag_off = htons(offset);
832 if (left > 0)
833 fh->frag_off |= htons(IP6_MF);
834 ipv6_hdr(frag)->payload_len = htons(frag->len -
835 sizeof(struct ipv6hdr));
836
837 ptr += len;
838 offset += len;
839
840 /*
841 * Put this fragment into the sending queue.
842 */
843 err = output(net, sk, frag);
844 if (err)
845 goto fail;
846
847 IP6_INC_STATS(net, ip6_dst_idev(skb_dst(skb)),
848 IPSTATS_MIB_FRAGCREATES);
849 }
850 IP6_INC_STATS(net, ip6_dst_idev(skb_dst(skb)),
851 IPSTATS_MIB_FRAGOKS);
852 consume_skb(skb);
853 return err;
854
855 fail_toobig:
856 if (skb->sk && dst_allfrag(skb_dst(skb)))
857 sk_nocaps_add(skb->sk, NETIF_F_GSO_MASK);
858
859 icmpv6_send(skb, ICMPV6_PKT_TOOBIG, 0, mtu);
860 err = -EMSGSIZE;
861
862 fail:
863 IP6_INC_STATS(net, ip6_dst_idev(skb_dst(skb)),
864 IPSTATS_MIB_FRAGFAILS);
865 kfree_skb(skb);
866 return err;
867 }
868
869 static inline int ip6_rt_check(const struct rt6key *rt_key,
870 const struct in6_addr *fl_addr,
871 const struct in6_addr *addr_cache)
872 {
873 return (rt_key->plen != 128 || !ipv6_addr_equal(fl_addr, &rt_key->addr)) &&
874 (!addr_cache || !ipv6_addr_equal(fl_addr, addr_cache));
875 }
876
877 static struct dst_entry *ip6_sk_dst_check(struct sock *sk,
878 struct dst_entry *dst,
879 const struct flowi6 *fl6)
880 {
881 struct ipv6_pinfo *np = inet6_sk(sk);
882 struct rt6_info *rt;
883
884 if (!dst)
885 goto out;
886
887 if (dst->ops->family != AF_INET6) {
888 dst_release(dst);
889 return NULL;
890 }
891
892 rt = (struct rt6_info *)dst;
893 /* Yes, checking route validity in not connected
894 * case is not very simple. Take into account,
895 * that we do not support routing by source, TOS,
896 * and MSG_DONTROUTE --ANK (980726)
897 *
898 * 1. ip6_rt_check(): If route was host route,
899 * check that cached destination is current.
900 * If it is network route, we still may
901 * check its validity using saved pointer
902 * to the last used address: daddr_cache.
903 * We do not want to save whole address now,
904 * (because main consumer of this service
905 * is tcp, which has not this problem),
906 * so that the last trick works only on connected
907 * sockets.
908 * 2. oif also should be the same.
909 */
910 if (ip6_rt_check(&rt->rt6i_dst, &fl6->daddr, np->daddr_cache) ||
911 #ifdef CONFIG_IPV6_SUBTREES
912 ip6_rt_check(&rt->rt6i_src, &fl6->saddr, np->saddr_cache) ||
913 #endif
914 (!(fl6->flowi6_flags & FLOWI_FLAG_SKIP_NH_OIF) &&
915 (fl6->flowi6_oif && fl6->flowi6_oif != dst->dev->ifindex))) {
916 dst_release(dst);
917 dst = NULL;
918 }
919
920 out:
921 return dst;
922 }
923
924 static int ip6_dst_lookup_tail(struct net *net, const struct sock *sk,
925 struct dst_entry **dst, struct flowi6 *fl6)
926 {
927 #ifdef CONFIG_IPV6_OPTIMISTIC_DAD
928 struct neighbour *n;
929 struct rt6_info *rt;
930 #endif
931 int err;
932 int flags = 0;
933
934 /* The correct way to handle this would be to do
935 * ip6_route_get_saddr, and then ip6_route_output; however,
936 * the route-specific preferred source forces the
937 * ip6_route_output call _before_ ip6_route_get_saddr.
938 *
939 * In source specific routing (no src=any default route),
940 * ip6_route_output will fail given src=any saddr, though, so
941 * that's why we try it again later.
942 */
943 if (ipv6_addr_any(&fl6->saddr) && (!*dst || !(*dst)->error)) {
944 struct fib6_info *from;
945 struct rt6_info *rt;
946 bool had_dst = *dst != NULL;
947
948 if (!had_dst)
949 *dst = ip6_route_output(net, sk, fl6);
950 rt = (*dst)->error ? NULL : (struct rt6_info *)*dst;
951
952 rcu_read_lock();
953 from = rt ? rcu_dereference(rt->from) : NULL;
954 err = ip6_route_get_saddr(net, from, &fl6->daddr,
955 sk ? inet6_sk(sk)->srcprefs : 0,
956 &fl6->saddr);
957 rcu_read_unlock();
958
959 if (err)
960 goto out_err_release;
961
962 /* If we had an erroneous initial result, pretend it
963 * never existed and let the SA-enabled version take
964 * over.
965 */
966 if (!had_dst && (*dst)->error) {
967 dst_release(*dst);
968 *dst = NULL;
969 }
970
971 if (fl6->flowi6_oif)
972 flags |= RT6_LOOKUP_F_IFACE;
973 }
974
975 if (!*dst)
976 *dst = ip6_route_output_flags(net, sk, fl6, flags);
977
978 err = (*dst)->error;
979 if (err)
980 goto out_err_release;
981
982 #ifdef CONFIG_IPV6_OPTIMISTIC_DAD
983 /*
984 * Here if the dst entry we've looked up
985 * has a neighbour entry that is in the INCOMPLETE
986 * state and the src address from the flow is
987 * marked as OPTIMISTIC, we release the found
988 * dst entry and replace it instead with the
989 * dst entry of the nexthop router
990 */
991 rt = (struct rt6_info *) *dst;
992 rcu_read_lock_bh();
993 n = __ipv6_neigh_lookup_noref(rt->dst.dev,
994 rt6_nexthop(rt, &fl6->daddr));
995 err = n && !(n->nud_state & NUD_VALID) ? -EINVAL : 0;
996 rcu_read_unlock_bh();
997
998 if (err) {
999 struct inet6_ifaddr *ifp;
1000 struct flowi6 fl_gw6;
1001 int redirect;
1002
1003 ifp = ipv6_get_ifaddr(net, &fl6->saddr,
1004 (*dst)->dev, 1);
1005
1006 redirect = (ifp && ifp->flags & IFA_F_OPTIMISTIC);
1007 if (ifp)
1008 in6_ifa_put(ifp);
1009
1010 if (redirect) {
1011 /*
1012 * We need to get the dst entry for the
1013 * default router instead
1014 */
1015 dst_release(*dst);
1016 memcpy(&fl_gw6, fl6, sizeof(struct flowi6));
1017 memset(&fl_gw6.daddr, 0, sizeof(struct in6_addr));
1018 *dst = ip6_route_output(net, sk, &fl_gw6);
1019 err = (*dst)->error;
1020 if (err)
1021 goto out_err_release;
1022 }
1023 }
1024 #endif
1025 if (ipv6_addr_v4mapped(&fl6->saddr) &&
1026 !(ipv6_addr_v4mapped(&fl6->daddr) || ipv6_addr_any(&fl6->daddr))) {
1027 err = -EAFNOSUPPORT;
1028 goto out_err_release;
1029 }
1030
1031 return 0;
1032
1033 out_err_release:
1034 dst_release(*dst);
1035 *dst = NULL;
1036
1037 if (err == -ENETUNREACH)
1038 IP6_INC_STATS(net, NULL, IPSTATS_MIB_OUTNOROUTES);
1039 return err;
1040 }
1041
1042 /**
1043 * ip6_dst_lookup - perform route lookup on flow
1044 * @sk: socket which provides route info
1045 * @dst: pointer to dst_entry * for result
1046 * @fl6: flow to lookup
1047 *
1048 * This function performs a route lookup on the given flow.
1049 *
1050 * It returns zero on success, or a standard errno code on error.
1051 */
1052 int ip6_dst_lookup(struct net *net, struct sock *sk, struct dst_entry **dst,
1053 struct flowi6 *fl6)
1054 {
1055 *dst = NULL;
1056 return ip6_dst_lookup_tail(net, sk, dst, fl6);
1057 }
1058 EXPORT_SYMBOL_GPL(ip6_dst_lookup);
1059
1060 /**
1061 * ip6_dst_lookup_flow - perform route lookup on flow with ipsec
1062 * @sk: socket which provides route info
1063 * @fl6: flow to lookup
1064 * @final_dst: final destination address for ipsec lookup
1065 *
1066 * This function performs a route lookup on the given flow.
1067 *
1068 * It returns a valid dst pointer on success, or a pointer encoded
1069 * error code.
1070 */
1071 struct dst_entry *ip6_dst_lookup_flow(const struct sock *sk, struct flowi6 *fl6,
1072 const struct in6_addr *final_dst)
1073 {
1074 struct dst_entry *dst = NULL;
1075 int err;
1076
1077 err = ip6_dst_lookup_tail(sock_net(sk), sk, &dst, fl6);
1078 if (err)
1079 return ERR_PTR(err);
1080 if (final_dst)
1081 fl6->daddr = *final_dst;
1082
1083 return xfrm_lookup_route(sock_net(sk), dst, flowi6_to_flowi(fl6), sk, 0);
1084 }
1085 EXPORT_SYMBOL_GPL(ip6_dst_lookup_flow);
1086
1087 /**
1088 * ip6_sk_dst_lookup_flow - perform socket cached route lookup on flow
1089 * @sk: socket which provides the dst cache and route info
1090 * @fl6: flow to lookup
1091 * @final_dst: final destination address for ipsec lookup
1092 * @connected: whether @sk is connected or not
1093 *
1094 * This function performs a route lookup on the given flow with the
1095 * possibility of using the cached route in the socket if it is valid.
1096 * It will take the socket dst lock when operating on the dst cache.
1097 * As a result, this function can only be used in process context.
1098 *
1099 * In addition, for a connected socket, cache the dst in the socket
1100 * if the current cache is not valid.
1101 *
1102 * It returns a valid dst pointer on success, or a pointer encoded
1103 * error code.
1104 */
1105 struct dst_entry *ip6_sk_dst_lookup_flow(struct sock *sk, struct flowi6 *fl6,
1106 const struct in6_addr *final_dst,
1107 bool connected)
1108 {
1109 struct dst_entry *dst = sk_dst_check(sk, inet6_sk(sk)->dst_cookie);
1110
1111 dst = ip6_sk_dst_check(sk, dst, fl6);
1112 if (dst)
1113 return dst;
1114
1115 dst = ip6_dst_lookup_flow(sk, fl6, final_dst);
1116 if (connected && !IS_ERR(dst))
1117 ip6_sk_dst_store_flow(sk, dst_clone(dst), fl6);
1118
1119 return dst;
1120 }
1121 EXPORT_SYMBOL_GPL(ip6_sk_dst_lookup_flow);
1122
1123 static inline struct ipv6_opt_hdr *ip6_opt_dup(struct ipv6_opt_hdr *src,
1124 gfp_t gfp)
1125 {
1126 return src ? kmemdup(src, (src->hdrlen + 1) * 8, gfp) : NULL;
1127 }
1128
1129 static inline struct ipv6_rt_hdr *ip6_rthdr_dup(struct ipv6_rt_hdr *src,
1130 gfp_t gfp)
1131 {
1132 return src ? kmemdup(src, (src->hdrlen + 1) * 8, gfp) : NULL;
1133 }
1134
1135 static void ip6_append_data_mtu(unsigned int *mtu,
1136 int *maxfraglen,
1137 unsigned int fragheaderlen,
1138 struct sk_buff *skb,
1139 struct rt6_info *rt,
1140 unsigned int orig_mtu)
1141 {
1142 if (!(rt->dst.flags & DST_XFRM_TUNNEL)) {
1143 if (!skb) {
1144 /* first fragment, reserve header_len */
1145 *mtu = orig_mtu - rt->dst.header_len;
1146
1147 } else {
1148 /*
1149 * this fragment is not first, the headers
1150 * space is regarded as data space.
1151 */
1152 *mtu = orig_mtu;
1153 }
1154 *maxfraglen = ((*mtu - fragheaderlen) & ~7)
1155 + fragheaderlen - sizeof(struct frag_hdr);
1156 }
1157 }
1158
1159 static int ip6_setup_cork(struct sock *sk, struct inet_cork_full *cork,
1160 struct inet6_cork *v6_cork, struct ipcm6_cookie *ipc6,
1161 struct rt6_info *rt, struct flowi6 *fl6)
1162 {
1163 struct ipv6_pinfo *np = inet6_sk(sk);
1164 unsigned int mtu;
1165 struct ipv6_txoptions *opt = ipc6->opt;
1166
1167 /*
1168 * setup for corking
1169 */
1170 if (opt) {
1171 if (WARN_ON(v6_cork->opt))
1172 return -EINVAL;
1173
1174 v6_cork->opt = kzalloc(sizeof(*opt), sk->sk_allocation);
1175 if (unlikely(!v6_cork->opt))
1176 return -ENOBUFS;
1177
1178 v6_cork->opt->tot_len = sizeof(*opt);
1179 v6_cork->opt->opt_flen = opt->opt_flen;
1180 v6_cork->opt->opt_nflen = opt->opt_nflen;
1181
1182 v6_cork->opt->dst0opt = ip6_opt_dup(opt->dst0opt,
1183 sk->sk_allocation);
1184 if (opt->dst0opt && !v6_cork->opt->dst0opt)
1185 return -ENOBUFS;
1186
1187 v6_cork->opt->dst1opt = ip6_opt_dup(opt->dst1opt,
1188 sk->sk_allocation);
1189 if (opt->dst1opt && !v6_cork->opt->dst1opt)
1190 return -ENOBUFS;
1191
1192 v6_cork->opt->hopopt = ip6_opt_dup(opt->hopopt,
1193 sk->sk_allocation);
1194 if (opt->hopopt && !v6_cork->opt->hopopt)
1195 return -ENOBUFS;
1196
1197 v6_cork->opt->srcrt = ip6_rthdr_dup(opt->srcrt,
1198 sk->sk_allocation);
1199 if (opt->srcrt && !v6_cork->opt->srcrt)
1200 return -ENOBUFS;
1201
1202 /* need source address above miyazawa*/
1203 }
1204 dst_hold(&rt->dst);
1205 cork->base.dst = &rt->dst;
1206 cork->fl.u.ip6 = *fl6;
1207 v6_cork->hop_limit = ipc6->hlimit;
1208 v6_cork->tclass = ipc6->tclass;
1209 if (rt->dst.flags & DST_XFRM_TUNNEL)
1210 mtu = np->pmtudisc >= IPV6_PMTUDISC_PROBE ?
1211 READ_ONCE(rt->dst.dev->mtu) : dst_mtu(&rt->dst);
1212 else
1213 mtu = np->pmtudisc >= IPV6_PMTUDISC_PROBE ?
1214 READ_ONCE(rt->dst.dev->mtu) : dst_mtu(xfrm_dst_path(&rt->dst));
1215 if (np->frag_size < mtu) {
1216 if (np->frag_size)
1217 mtu = np->frag_size;
1218 }
1219 if (mtu < IPV6_MIN_MTU)
1220 return -EINVAL;
1221 cork->base.fragsize = mtu;
1222 cork->base.gso_size = ipc6->gso_size;
1223 cork->base.tx_flags = 0;
1224 sock_tx_timestamp(sk, ipc6->sockc.tsflags, &cork->base.tx_flags);
1225
1226 if (dst_allfrag(xfrm_dst_path(&rt->dst)))
1227 cork->base.flags |= IPCORK_ALLFRAG;
1228 cork->base.length = 0;
1229
1230 cork->base.transmit_time = ipc6->sockc.transmit_time;
1231
1232 return 0;
1233 }
1234
1235 static int __ip6_append_data(struct sock *sk,
1236 struct flowi6 *fl6,
1237 struct sk_buff_head *queue,
1238 struct inet_cork *cork,
1239 struct inet6_cork *v6_cork,
1240 struct page_frag *pfrag,
1241 int getfrag(void *from, char *to, int offset,
1242 int len, int odd, struct sk_buff *skb),
1243 void *from, int length, int transhdrlen,
1244 unsigned int flags, struct ipcm6_cookie *ipc6)
1245 {
1246 struct sk_buff *skb, *skb_prev = NULL;
1247 unsigned int maxfraglen, fragheaderlen, mtu, orig_mtu, pmtu;
1248 int exthdrlen = 0;
1249 int dst_exthdrlen = 0;
1250 int hh_len;
1251 int copy;
1252 int err;
1253 int offset = 0;
1254 u32 tskey = 0;
1255 struct rt6_info *rt = (struct rt6_info *)cork->dst;
1256 struct ipv6_txoptions *opt = v6_cork->opt;
1257 int csummode = CHECKSUM_NONE;
1258 unsigned int maxnonfragsize, headersize;
1259 unsigned int wmem_alloc_delta = 0;
1260 bool paged;
1261
1262 skb = skb_peek_tail(queue);
1263 if (!skb) {
1264 exthdrlen = opt ? opt->opt_flen : 0;
1265 dst_exthdrlen = rt->dst.header_len - rt->rt6i_nfheader_len;
1266 }
1267
1268 paged = !!cork->gso_size;
1269 mtu = cork->gso_size ? IP6_MAX_MTU : cork->fragsize;
1270 orig_mtu = mtu;
1271
1272 if (cork->tx_flags & SKBTX_ANY_SW_TSTAMP &&
1273 sk->sk_tsflags & SOF_TIMESTAMPING_OPT_ID)
1274 tskey = sk->sk_tskey++;
1275
1276 hh_len = LL_RESERVED_SPACE(rt->dst.dev);
1277
1278 fragheaderlen = sizeof(struct ipv6hdr) + rt->rt6i_nfheader_len +
1279 (opt ? opt->opt_nflen : 0);
1280 maxfraglen = ((mtu - fragheaderlen) & ~7) + fragheaderlen -
1281 sizeof(struct frag_hdr);
1282
1283 headersize = sizeof(struct ipv6hdr) +
1284 (opt ? opt->opt_flen + opt->opt_nflen : 0) +
1285 (dst_allfrag(&rt->dst) ?
1286 sizeof(struct frag_hdr) : 0) +
1287 rt->rt6i_nfheader_len;
1288
1289 /* as per RFC 7112 section 5, the entire IPv6 Header Chain must fit
1290 * the first fragment
1291 */
1292 if (headersize + transhdrlen > mtu)
1293 goto emsgsize;
1294
1295 if (cork->length + length > mtu - headersize && ipc6->dontfrag &&
1296 (sk->sk_protocol == IPPROTO_UDP ||
1297 sk->sk_protocol == IPPROTO_RAW)) {
1298 ipv6_local_rxpmtu(sk, fl6, mtu - headersize +
1299 sizeof(struct ipv6hdr));
1300 goto emsgsize;
1301 }
1302
1303 if (ip6_sk_ignore_df(sk))
1304 maxnonfragsize = sizeof(struct ipv6hdr) + IPV6_MAXPLEN;
1305 else
1306 maxnonfragsize = mtu;
1307
1308 if (cork->length + length > maxnonfragsize - headersize) {
1309 emsgsize:
1310 pmtu = max_t(int, mtu - headersize + sizeof(struct ipv6hdr), 0);
1311 ipv6_local_error(sk, EMSGSIZE, fl6, pmtu);
1312 return -EMSGSIZE;
1313 }
1314
1315 /* CHECKSUM_PARTIAL only with no extension headers and when
1316 * we are not going to fragment
1317 */
1318 if (transhdrlen && sk->sk_protocol == IPPROTO_UDP &&
1319 headersize == sizeof(struct ipv6hdr) &&
1320 length <= mtu - headersize &&
1321 (!(flags & MSG_MORE) || cork->gso_size) &&
1322 rt->dst.dev->features & (NETIF_F_IPV6_CSUM | NETIF_F_HW_CSUM))
1323 csummode = CHECKSUM_PARTIAL;
1324
1325 /*
1326 * Let's try using as much space as possible.
1327 * Use MTU if total length of the message fits into the MTU.
1328 * Otherwise, we need to reserve fragment header and
1329 * fragment alignment (= 8-15 octects, in total).
1330 *
1331 * Note that we may need to "move" the data from the tail of
1332 * of the buffer to the new fragment when we split
1333 * the message.
1334 *
1335 * FIXME: It may be fragmented into multiple chunks
1336 * at once if non-fragmentable extension headers
1337 * are too large.
1338 * --yoshfuji
1339 */
1340
1341 cork->length += length;
1342 if (!skb)
1343 goto alloc_new_skb;
1344
1345 while (length > 0) {
1346 /* Check if the remaining data fits into current packet. */
1347 copy = (cork->length <= mtu && !(cork->flags & IPCORK_ALLFRAG) ? mtu : maxfraglen) - skb->len;
1348 if (copy < length)
1349 copy = maxfraglen - skb->len;
1350
1351 if (copy <= 0) {
1352 char *data;
1353 unsigned int datalen;
1354 unsigned int fraglen;
1355 unsigned int fraggap;
1356 unsigned int alloclen;
1357 unsigned int pagedlen;
1358 alloc_new_skb:
1359 /* There's no room in the current skb */
1360 if (skb)
1361 fraggap = skb->len - maxfraglen;
1362 else
1363 fraggap = 0;
1364 /* update mtu and maxfraglen if necessary */
1365 if (!skb || !skb_prev)
1366 ip6_append_data_mtu(&mtu, &maxfraglen,
1367 fragheaderlen, skb, rt,
1368 orig_mtu);
1369
1370 skb_prev = skb;
1371
1372 /*
1373 * If remaining data exceeds the mtu,
1374 * we know we need more fragment(s).
1375 */
1376 datalen = length + fraggap;
1377
1378 if (datalen > (cork->length <= mtu && !(cork->flags & IPCORK_ALLFRAG) ? mtu : maxfraglen) - fragheaderlen)
1379 datalen = maxfraglen - fragheaderlen - rt->dst.trailer_len;
1380 fraglen = datalen + fragheaderlen;
1381 pagedlen = 0;
1382
1383 if ((flags & MSG_MORE) &&
1384 !(rt->dst.dev->features&NETIF_F_SG))
1385 alloclen = mtu;
1386 else if (!paged)
1387 alloclen = fraglen;
1388 else {
1389 alloclen = min_t(int, fraglen, MAX_HEADER);
1390 pagedlen = fraglen - alloclen;
1391 }
1392
1393 alloclen += dst_exthdrlen;
1394
1395 if (datalen != length + fraggap) {
1396 /*
1397 * this is not the last fragment, the trailer
1398 * space is regarded as data space.
1399 */
1400 datalen += rt->dst.trailer_len;
1401 }
1402
1403 alloclen += rt->dst.trailer_len;
1404 fraglen = datalen + fragheaderlen;
1405
1406 /*
1407 * We just reserve space for fragment header.
1408 * Note: this may be overallocation if the message
1409 * (without MSG_MORE) fits into the MTU.
1410 */
1411 alloclen += sizeof(struct frag_hdr);
1412
1413 copy = datalen - transhdrlen - fraggap - pagedlen;
1414 if (copy < 0) {
1415 err = -EINVAL;
1416 goto error;
1417 }
1418 if (transhdrlen) {
1419 skb = sock_alloc_send_skb(sk,
1420 alloclen + hh_len,
1421 (flags & MSG_DONTWAIT), &err);
1422 } else {
1423 skb = NULL;
1424 if (refcount_read(&sk->sk_wmem_alloc) + wmem_alloc_delta <=
1425 2 * sk->sk_sndbuf)
1426 skb = alloc_skb(alloclen + hh_len,
1427 sk->sk_allocation);
1428 if (unlikely(!skb))
1429 err = -ENOBUFS;
1430 }
1431 if (!skb)
1432 goto error;
1433 /*
1434 * Fill in the control structures
1435 */
1436 skb->protocol = htons(ETH_P_IPV6);
1437 skb->ip_summed = csummode;
1438 skb->csum = 0;
1439 /* reserve for fragmentation and ipsec header */
1440 skb_reserve(skb, hh_len + sizeof(struct frag_hdr) +
1441 dst_exthdrlen);
1442
1443 /* Only the initial fragment is time stamped */
1444 skb_shinfo(skb)->tx_flags = cork->tx_flags;
1445 cork->tx_flags = 0;
1446 skb_shinfo(skb)->tskey = tskey;
1447 tskey = 0;
1448
1449 /*
1450 * Find where to start putting bytes
1451 */
1452 data = skb_put(skb, fraglen - pagedlen);
1453 skb_set_network_header(skb, exthdrlen);
1454 data += fragheaderlen;
1455 skb->transport_header = (skb->network_header +
1456 fragheaderlen);
1457 if (fraggap) {
1458 skb->csum = skb_copy_and_csum_bits(
1459 skb_prev, maxfraglen,
1460 data + transhdrlen, fraggap, 0);
1461 skb_prev->csum = csum_sub(skb_prev->csum,
1462 skb->csum);
1463 data += fraggap;
1464 pskb_trim_unique(skb_prev, maxfraglen);
1465 }
1466 if (copy > 0 &&
1467 getfrag(from, data + transhdrlen, offset,
1468 copy, fraggap, skb) < 0) {
1469 err = -EFAULT;
1470 kfree_skb(skb);
1471 goto error;
1472 }
1473
1474 offset += copy;
1475 length -= copy + transhdrlen;
1476 transhdrlen = 0;
1477 exthdrlen = 0;
1478 dst_exthdrlen = 0;
1479
1480 if ((flags & MSG_CONFIRM) && !skb_prev)
1481 skb_set_dst_pending_confirm(skb, 1);
1482
1483 /*
1484 * Put the packet on the pending queue
1485 */
1486 if (!skb->destructor) {
1487 skb->destructor = sock_wfree;
1488 skb->sk = sk;
1489 wmem_alloc_delta += skb->truesize;
1490 }
1491 __skb_queue_tail(queue, skb);
1492 continue;
1493 }
1494
1495 if (copy > length)
1496 copy = length;
1497
1498 if (!(rt->dst.dev->features&NETIF_F_SG) &&
1499 skb_tailroom(skb) >= copy) {
1500 unsigned int off;
1501
1502 off = skb->len;
1503 if (getfrag(from, skb_put(skb, copy),
1504 offset, copy, off, skb) < 0) {
1505 __skb_trim(skb, off);
1506 err = -EFAULT;
1507 goto error;
1508 }
1509 } else {
1510 int i = skb_shinfo(skb)->nr_frags;
1511
1512 err = -ENOMEM;
1513 if (!sk_page_frag_refill(sk, pfrag))
1514 goto error;
1515
1516 if (!skb_can_coalesce(skb, i, pfrag->page,
1517 pfrag->offset)) {
1518 err = -EMSGSIZE;
1519 if (i == MAX_SKB_FRAGS)
1520 goto error;
1521
1522 __skb_fill_page_desc(skb, i, pfrag->page,
1523 pfrag->offset, 0);
1524 skb_shinfo(skb)->nr_frags = ++i;
1525 get_page(pfrag->page);
1526 }
1527 copy = min_t(int, copy, pfrag->size - pfrag->offset);
1528 if (getfrag(from,
1529 page_address(pfrag->page) + pfrag->offset,
1530 offset, copy, skb->len, skb) < 0)
1531 goto error_efault;
1532
1533 pfrag->offset += copy;
1534 skb_frag_size_add(&skb_shinfo(skb)->frags[i - 1], copy);
1535 skb->len += copy;
1536 skb->data_len += copy;
1537 skb->truesize += copy;
1538 wmem_alloc_delta += copy;
1539 }
1540 offset += copy;
1541 length -= copy;
1542 }
1543
1544 if (wmem_alloc_delta)
1545 refcount_add(wmem_alloc_delta, &sk->sk_wmem_alloc);
1546 return 0;
1547
1548 error_efault:
1549 err = -EFAULT;
1550 error:
1551 cork->length -= length;
1552 IP6_INC_STATS(sock_net(sk), rt->rt6i_idev, IPSTATS_MIB_OUTDISCARDS);
1553 refcount_add(wmem_alloc_delta, &sk->sk_wmem_alloc);
1554 return err;
1555 }
1556
1557 int ip6_append_data(struct sock *sk,
1558 int getfrag(void *from, char *to, int offset, int len,
1559 int odd, struct sk_buff *skb),
1560 void *from, int length, int transhdrlen,
1561 struct ipcm6_cookie *ipc6, struct flowi6 *fl6,
1562 struct rt6_info *rt, unsigned int flags)
1563 {
1564 struct inet_sock *inet = inet_sk(sk);
1565 struct ipv6_pinfo *np = inet6_sk(sk);
1566 int exthdrlen;
1567 int err;
1568
1569 if (flags&MSG_PROBE)
1570 return 0;
1571 if (skb_queue_empty(&sk->sk_write_queue)) {
1572 /*
1573 * setup for corking
1574 */
1575 err = ip6_setup_cork(sk, &inet->cork, &np->cork,
1576 ipc6, rt, fl6);
1577 if (err)
1578 return err;
1579
1580 exthdrlen = (ipc6->opt ? ipc6->opt->opt_flen : 0);
1581 length += exthdrlen;
1582 transhdrlen += exthdrlen;
1583 } else {
1584 fl6 = &inet->cork.fl.u.ip6;
1585 transhdrlen = 0;
1586 }
1587
1588 return __ip6_append_data(sk, fl6, &sk->sk_write_queue, &inet->cork.base,
1589 &np->cork, sk_page_frag(sk), getfrag,
1590 from, length, transhdrlen, flags, ipc6);
1591 }
1592 EXPORT_SYMBOL_GPL(ip6_append_data);
1593
1594 static void ip6_cork_release(struct inet_cork_full *cork,
1595 struct inet6_cork *v6_cork)
1596 {
1597 if (v6_cork->opt) {
1598 kfree(v6_cork->opt->dst0opt);
1599 kfree(v6_cork->opt->dst1opt);
1600 kfree(v6_cork->opt->hopopt);
1601 kfree(v6_cork->opt->srcrt);
1602 kfree(v6_cork->opt);
1603 v6_cork->opt = NULL;
1604 }
1605
1606 if (cork->base.dst) {
1607 dst_release(cork->base.dst);
1608 cork->base.dst = NULL;
1609 cork->base.flags &= ~IPCORK_ALLFRAG;
1610 }
1611 memset(&cork->fl, 0, sizeof(cork->fl));
1612 }
1613
1614 struct sk_buff *__ip6_make_skb(struct sock *sk,
1615 struct sk_buff_head *queue,
1616 struct inet_cork_full *cork,
1617 struct inet6_cork *v6_cork)
1618 {
1619 struct sk_buff *skb, *tmp_skb;
1620 struct sk_buff **tail_skb;
1621 struct in6_addr final_dst_buf, *final_dst = &final_dst_buf;
1622 struct ipv6_pinfo *np = inet6_sk(sk);
1623 struct net *net = sock_net(sk);
1624 struct ipv6hdr *hdr;
1625 struct ipv6_txoptions *opt = v6_cork->opt;
1626 struct rt6_info *rt = (struct rt6_info *)cork->base.dst;
1627 struct flowi6 *fl6 = &cork->fl.u.ip6;
1628 unsigned char proto = fl6->flowi6_proto;
1629
1630 skb = __skb_dequeue(queue);
1631 if (!skb)
1632 goto out;
1633 tail_skb = &(skb_shinfo(skb)->frag_list);
1634
1635 /* move skb->data to ip header from ext header */
1636 if (skb->data < skb_network_header(skb))
1637 __skb_pull(skb, skb_network_offset(skb));
1638 while ((tmp_skb = __skb_dequeue(queue)) != NULL) {
1639 __skb_pull(tmp_skb, skb_network_header_len(skb));
1640 *tail_skb = tmp_skb;
1641 tail_skb = &(tmp_skb->next);
1642 skb->len += tmp_skb->len;
1643 skb->data_len += tmp_skb->len;
1644 skb->truesize += tmp_skb->truesize;
1645 tmp_skb->destructor = NULL;
1646 tmp_skb->sk = NULL;
1647 }
1648
1649 /* Allow local fragmentation. */
1650 skb->ignore_df = ip6_sk_ignore_df(sk);
1651
1652 *final_dst = fl6->daddr;
1653 __skb_pull(skb, skb_network_header_len(skb));
1654 if (opt && opt->opt_flen)
1655 ipv6_push_frag_opts(skb, opt, &proto);
1656 if (opt && opt->opt_nflen)
1657 ipv6_push_nfrag_opts(skb, opt, &proto, &final_dst, &fl6->saddr);
1658
1659 skb_push(skb, sizeof(struct ipv6hdr));
1660 skb_reset_network_header(skb);
1661 hdr = ipv6_hdr(skb);
1662
1663 ip6_flow_hdr(hdr, v6_cork->tclass,
1664 ip6_make_flowlabel(net, skb, fl6->flowlabel,
1665 ip6_autoflowlabel(net, np), fl6));
1666 hdr->hop_limit = v6_cork->hop_limit;
1667 hdr->nexthdr = proto;
1668 hdr->saddr = fl6->saddr;
1669 hdr->daddr = *final_dst;
1670
1671 skb->priority = sk->sk_priority;
1672 skb->mark = sk->sk_mark;
1673
1674 skb->tstamp = cork->base.transmit_time;
1675
1676 skb_dst_set(skb, dst_clone(&rt->dst));
1677 IP6_UPD_PO_STATS(net, rt->rt6i_idev, IPSTATS_MIB_OUT, skb->len);
1678 if (proto == IPPROTO_ICMPV6) {
1679 struct inet6_dev *idev = ip6_dst_idev(skb_dst(skb));
1680
1681 ICMP6MSGOUT_INC_STATS(net, idev, icmp6_hdr(skb)->icmp6_type);
1682 ICMP6_INC_STATS(net, idev, ICMP6_MIB_OUTMSGS);
1683 }
1684
1685 ip6_cork_release(cork, v6_cork);
1686 out:
1687 return skb;
1688 }
1689
1690 int ip6_send_skb(struct sk_buff *skb)
1691 {
1692 struct net *net = sock_net(skb->sk);
1693 struct rt6_info *rt = (struct rt6_info *)skb_dst(skb);
1694 int err;
1695
1696 err = ip6_local_out(net, skb->sk, skb);
1697 if (err) {
1698 if (err > 0)
1699 err = net_xmit_errno(err);
1700 if (err)
1701 IP6_INC_STATS(net, rt->rt6i_idev,
1702 IPSTATS_MIB_OUTDISCARDS);
1703 }
1704
1705 return err;
1706 }
1707
1708 int ip6_push_pending_frames(struct sock *sk)
1709 {
1710 struct sk_buff *skb;
1711
1712 skb = ip6_finish_skb(sk);
1713 if (!skb)
1714 return 0;
1715
1716 return ip6_send_skb(skb);
1717 }
1718 EXPORT_SYMBOL_GPL(ip6_push_pending_frames);
1719
1720 static void __ip6_flush_pending_frames(struct sock *sk,
1721 struct sk_buff_head *queue,
1722 struct inet_cork_full *cork,
1723 struct inet6_cork *v6_cork)
1724 {
1725 struct sk_buff *skb;
1726
1727 while ((skb = __skb_dequeue_tail(queue)) != NULL) {
1728 if (skb_dst(skb))
1729 IP6_INC_STATS(sock_net(sk), ip6_dst_idev(skb_dst(skb)),
1730 IPSTATS_MIB_OUTDISCARDS);
1731 kfree_skb(skb);
1732 }
1733
1734 ip6_cork_release(cork, v6_cork);
1735 }
1736
1737 void ip6_flush_pending_frames(struct sock *sk)
1738 {
1739 __ip6_flush_pending_frames(sk, &sk->sk_write_queue,
1740 &inet_sk(sk)->cork, &inet6_sk(sk)->cork);
1741 }
1742 EXPORT_SYMBOL_GPL(ip6_flush_pending_frames);
1743
1744 struct sk_buff *ip6_make_skb(struct sock *sk,
1745 int getfrag(void *from, char *to, int offset,
1746 int len, int odd, struct sk_buff *skb),
1747 void *from, int length, int transhdrlen,
1748 struct ipcm6_cookie *ipc6, struct flowi6 *fl6,
1749 struct rt6_info *rt, unsigned int flags,
1750 struct inet_cork_full *cork)
1751 {
1752 struct inet6_cork v6_cork;
1753 struct sk_buff_head queue;
1754 int exthdrlen = (ipc6->opt ? ipc6->opt->opt_flen : 0);
1755 int err;
1756
1757 if (flags & MSG_PROBE)
1758 return NULL;
1759
1760 __skb_queue_head_init(&queue);
1761
1762 cork->base.flags = 0;
1763 cork->base.addr = 0;
1764 cork->base.opt = NULL;
1765 cork->base.dst = NULL;
1766 v6_cork.opt = NULL;
1767 err = ip6_setup_cork(sk, cork, &v6_cork, ipc6, rt, fl6);
1768 if (err) {
1769 ip6_cork_release(cork, &v6_cork);
1770 return ERR_PTR(err);
1771 }
1772 if (ipc6->dontfrag < 0)
1773 ipc6->dontfrag = inet6_sk(sk)->dontfrag;
1774
1775 err = __ip6_append_data(sk, fl6, &queue, &cork->base, &v6_cork,
1776 &current->task_frag, getfrag, from,
1777 length + exthdrlen, transhdrlen + exthdrlen,
1778 flags, ipc6);
1779 if (err) {
1780 __ip6_flush_pending_frames(sk, &queue, cork, &v6_cork);
1781 return ERR_PTR(err);
1782 }
1783
1784 return __ip6_make_skb(sk, &queue, cork, &v6_cork);
1785 }
Linux with added FPC-III support