net: allow pskb_expand_head() to get maximum tailroom
[pandora-kernel.git] / net / core / skbuff.c
1 /*
2  *      Routines having to do with the 'struct sk_buff' memory handlers.
3  *
4  *      Authors:        Alan Cox <alan@lxorguk.ukuu.org.uk>
5  *                      Florian La Roche <rzsfl@rz.uni-sb.de>
6  *
7  *      Fixes:
8  *              Alan Cox        :       Fixed the worst of the load
9  *                                      balancer bugs.
10  *              Dave Platt      :       Interrupt stacking fix.
11  *      Richard Kooijman        :       Timestamp fixes.
12  *              Alan Cox        :       Changed buffer format.
13  *              Alan Cox        :       destructor hook for AF_UNIX etc.
14  *              Linus Torvalds  :       Better skb_clone.
15  *              Alan Cox        :       Added skb_copy.
16  *              Alan Cox        :       Added all the changed routines Linus
17  *                                      only put in the headers
18  *              Ray VanTassle   :       Fixed --skb->lock in free
19  *              Alan Cox        :       skb_copy copy arp field
20  *              Andi Kleen      :       slabified it.
21  *              Robert Olsson   :       Removed skb_head_pool
22  *
23  *      NOTE:
24  *              The __skb_ routines should be called with interrupts
25  *      disabled, or you better be *real* sure that the operation is atomic
26  *      with respect to whatever list is being frobbed (e.g. via lock_sock()
27  *      or via disabling bottom half handlers, etc).
28  *
29  *      This program is free software; you can redistribute it and/or
30  *      modify it under the terms of the GNU General Public License
31  *      as published by the Free Software Foundation; either version
32  *      2 of the License, or (at your option) any later version.
33  */
34
35 /*
36  *      The functions in this file will not compile correctly with gcc 2.4.x
37  */
38
39 #include <linux/module.h>
40 #include <linux/types.h>
41 #include <linux/kernel.h>
42 #include <linux/kmemcheck.h>
43 #include <linux/mm.h>
44 #include <linux/interrupt.h>
45 #include <linux/in.h>
46 #include <linux/inet.h>
47 #include <linux/slab.h>
48 #include <linux/netdevice.h>
49 #ifdef CONFIG_NET_CLS_ACT
50 #include <net/pkt_sched.h>
51 #endif
52 #include <linux/string.h>
53 #include <linux/skbuff.h>
54 #include <linux/splice.h>
55 #include <linux/cache.h>
56 #include <linux/rtnetlink.h>
57 #include <linux/init.h>
58 #include <linux/scatterlist.h>
59 #include <linux/errqueue.h>
60 #include <linux/prefetch.h>
61
62 #include <net/protocol.h>
63 #include <net/dst.h>
64 #include <net/sock.h>
65 #include <net/checksum.h>
66 #include <net/xfrm.h>
67
68 #include <asm/uaccess.h>
69 #include <asm/system.h>
70 #include <trace/events/skb.h>
71
72 #include "kmap_skb.h"
73
74 static struct kmem_cache *skbuff_head_cache __read_mostly;
75 static struct kmem_cache *skbuff_fclone_cache __read_mostly;
76
77 static void sock_pipe_buf_release(struct pipe_inode_info *pipe,
78                                   struct pipe_buffer *buf)
79 {
80         put_page(buf->page);
81 }
82
83 static void sock_pipe_buf_get(struct pipe_inode_info *pipe,
84                                 struct pipe_buffer *buf)
85 {
86         get_page(buf->page);
87 }
88
89 static int sock_pipe_buf_steal(struct pipe_inode_info *pipe,
90                                struct pipe_buffer *buf)
91 {
92         return 1;
93 }
94
95
96 /* Pipe buffer operations for a socket. */
97 static const struct pipe_buf_operations sock_pipe_buf_ops = {
98         .can_merge = 0,
99         .map = generic_pipe_buf_map,
100         .unmap = generic_pipe_buf_unmap,
101         .confirm = generic_pipe_buf_confirm,
102         .release = sock_pipe_buf_release,
103         .steal = sock_pipe_buf_steal,
104         .get = sock_pipe_buf_get,
105 };
106
107 /*
108  *      Keep out-of-line to prevent kernel bloat.
109  *      __builtin_return_address is not used because it is not always
110  *      reliable.
111  */
112
113 /**
114  *      skb_over_panic  -       private function
115  *      @skb: buffer
116  *      @sz: size
117  *      @here: address
118  *
119  *      Out of line support code for skb_put(). Not user callable.
120  */
121 static void skb_over_panic(struct sk_buff *skb, int sz, void *here)
122 {
123         printk(KERN_EMERG "skb_over_panic: text:%p len:%d put:%d head:%p "
124                           "data:%p tail:%#lx end:%#lx dev:%s\n",
125                here, skb->len, sz, skb->head, skb->data,
126                (unsigned long)skb->tail, (unsigned long)skb->end,
127                skb->dev ? skb->dev->name : "<NULL>");
128         BUG();
129 }
130
131 /**
132  *      skb_under_panic -       private function
133  *      @skb: buffer
134  *      @sz: size
135  *      @here: address
136  *
137  *      Out of line support code for skb_push(). Not user callable.
138  */
139
140 static void skb_under_panic(struct sk_buff *skb, int sz, void *here)
141 {
142         printk(KERN_EMERG "skb_under_panic: text:%p len:%d put:%d head:%p "
143                           "data:%p tail:%#lx end:%#lx dev:%s\n",
144                here, skb->len, sz, skb->head, skb->data,
145                (unsigned long)skb->tail, (unsigned long)skb->end,
146                skb->dev ? skb->dev->name : "<NULL>");
147         BUG();
148 }
149
150 /*      Allocate a new skbuff. We do this ourselves so we can fill in a few
151  *      'private' fields and also do memory statistics to find all the
152  *      [BEEP] leaks.
153  *
154  */
155
156 /**
157  *      __alloc_skb     -       allocate a network buffer
158  *      @size: size to allocate
159  *      @gfp_mask: allocation mask
160  *      @fclone: allocate from fclone cache instead of head cache
161  *              and allocate a cloned (child) skb
162  *      @node: numa node to allocate memory on
163  *
164  *      Allocate a new &sk_buff. The returned buffer has no headroom and a
165  *      tail room of size bytes. The object has a reference count of one.
166  *      The return is the buffer. On a failure the return is %NULL.
167  *
168  *      Buffers may only be allocated from interrupts using a @gfp_mask of
169  *      %GFP_ATOMIC.
170  */
171 struct sk_buff *__alloc_skb(unsigned int size, gfp_t gfp_mask,
172                             int fclone, int node)
173 {
174         struct kmem_cache *cache;
175         struct skb_shared_info *shinfo;
176         struct sk_buff *skb;
177         u8 *data;
178
179         cache = fclone ? skbuff_fclone_cache : skbuff_head_cache;
180
181         /* Get the HEAD */
182         skb = kmem_cache_alloc_node(cache, gfp_mask & ~__GFP_DMA, node);
183         if (!skb)
184                 goto out;
185         prefetchw(skb);
186
187         /* We do our best to align skb_shared_info on a separate cache
188          * line. It usually works because kmalloc(X > SMP_CACHE_BYTES) gives
189          * aligned memory blocks, unless SLUB/SLAB debug is enabled.
190          * Both skb->head and skb_shared_info are cache line aligned.
191          */
192         size = SKB_DATA_ALIGN(size);
193         size += SKB_DATA_ALIGN(sizeof(struct skb_shared_info));
194         data = kmalloc_node_track_caller(size, gfp_mask, node);
195         if (!data)
196                 goto nodata;
197         /* kmalloc(size) might give us more room than requested.
198          * Put skb_shared_info exactly at the end of allocated zone,
199          * to allow max possible filling before reallocation.
200          */
201         size = SKB_WITH_OVERHEAD(ksize(data));
202         prefetchw(data + size);
203
204         /*
205          * Only clear those fields we need to clear, not those that we will
206          * actually initialise below. Hence, don't put any more fields after
207          * the tail pointer in struct sk_buff!
208          */
209         memset(skb, 0, offsetof(struct sk_buff, tail));
210         /* Account for allocated memory : skb + skb->head */
211         skb->truesize = SKB_TRUESIZE(size);
212         atomic_set(&skb->users, 1);
213         skb->head = data;
214         skb->data = data;
215         skb_reset_tail_pointer(skb);
216         skb->end = skb->tail + size;
217 #ifdef NET_SKBUFF_DATA_USES_OFFSET
218         skb->mac_header = ~0U;
219 #endif
220
221         /* make sure we initialize shinfo sequentially */
222         shinfo = skb_shinfo(skb);
223         memset(shinfo, 0, offsetof(struct skb_shared_info, dataref));
224         atomic_set(&shinfo->dataref, 1);
225         kmemcheck_annotate_variable(shinfo->destructor_arg);
226
227         if (fclone) {
228                 struct sk_buff *child = skb + 1;
229                 atomic_t *fclone_ref = (atomic_t *) (child + 1);
230
231                 kmemcheck_annotate_bitfield(child, flags1);
232                 kmemcheck_annotate_bitfield(child, flags2);
233                 skb->fclone = SKB_FCLONE_ORIG;
234                 atomic_set(fclone_ref, 1);
235
236                 child->fclone = SKB_FCLONE_UNAVAILABLE;
237         }
238 out:
239         return skb;
240 nodata:
241         kmem_cache_free(cache, skb);
242         skb = NULL;
243         goto out;
244 }
245 EXPORT_SYMBOL(__alloc_skb);
246
247 /**
248  *      __netdev_alloc_skb - allocate an skbuff for rx on a specific device
249  *      @dev: network device to receive on
250  *      @length: length to allocate
251  *      @gfp_mask: get_free_pages mask, passed to alloc_skb
252  *
253  *      Allocate a new &sk_buff and assign it a usage count of one. The
254  *      buffer has unspecified headroom built in. Users should allocate
255  *      the headroom they think they need without accounting for the
256  *      built in space. The built in space is used for optimisations.
257  *
258  *      %NULL is returned if there is no free memory.
259  */
260 struct sk_buff *__netdev_alloc_skb(struct net_device *dev,
261                 unsigned int length, gfp_t gfp_mask)
262 {
263         struct sk_buff *skb;
264
265         skb = __alloc_skb(length + NET_SKB_PAD, gfp_mask, 0, NUMA_NO_NODE);
266         if (likely(skb)) {
267                 skb_reserve(skb, NET_SKB_PAD);
268                 skb->dev = dev;
269         }
270         return skb;
271 }
272 EXPORT_SYMBOL(__netdev_alloc_skb);
273
274 void skb_add_rx_frag(struct sk_buff *skb, int i, struct page *page, int off,
275                 int size)
276 {
277         skb_fill_page_desc(skb, i, page, off, size);
278         skb->len += size;
279         skb->data_len += size;
280         skb->truesize += size;
281 }
282 EXPORT_SYMBOL(skb_add_rx_frag);
283
284 /**
285  *      dev_alloc_skb - allocate an skbuff for receiving
286  *      @length: length to allocate
287  *
288  *      Allocate a new &sk_buff and assign it a usage count of one. The
289  *      buffer has unspecified headroom built in. Users should allocate
290  *      the headroom they think they need without accounting for the
291  *      built in space. The built in space is used for optimisations.
292  *
293  *      %NULL is returned if there is no free memory. Although this function
294  *      allocates memory it can be called from an interrupt.
295  */
296 struct sk_buff *dev_alloc_skb(unsigned int length)
297 {
298         /*
299          * There is more code here than it seems:
300          * __dev_alloc_skb is an inline
301          */
302         return __dev_alloc_skb(length, GFP_ATOMIC);
303 }
304 EXPORT_SYMBOL(dev_alloc_skb);
305
306 static void skb_drop_list(struct sk_buff **listp)
307 {
308         struct sk_buff *list = *listp;
309
310         *listp = NULL;
311
312         do {
313                 struct sk_buff *this = list;
314                 list = list->next;
315                 kfree_skb(this);
316         } while (list);
317 }
318
319 static inline void skb_drop_fraglist(struct sk_buff *skb)
320 {
321         skb_drop_list(&skb_shinfo(skb)->frag_list);
322 }
323
324 static void skb_clone_fraglist(struct sk_buff *skb)
325 {
326         struct sk_buff *list;
327
328         skb_walk_frags(skb, list)
329                 skb_get(list);
330 }
331
332 static void skb_release_data(struct sk_buff *skb)
333 {
334         if (!skb->cloned ||
335             !atomic_sub_return(skb->nohdr ? (1 << SKB_DATAREF_SHIFT) + 1 : 1,
336                                &skb_shinfo(skb)->dataref)) {
337                 if (skb_shinfo(skb)->nr_frags) {
338                         int i;
339                         for (i = 0; i < skb_shinfo(skb)->nr_frags; i++)
340                                 skb_frag_unref(skb, i);
341                 }
342
343                 /*
344                  * If skb buf is from userspace, we need to notify the caller
345                  * the lower device DMA has done;
346                  */
347                 if (skb_shinfo(skb)->tx_flags & SKBTX_DEV_ZEROCOPY) {
348                         struct ubuf_info *uarg;
349
350                         uarg = skb_shinfo(skb)->destructor_arg;
351                         if (uarg->callback)
352                                 uarg->callback(uarg);
353                 }
354
355                 if (skb_has_frag_list(skb))
356                         skb_drop_fraglist(skb);
357
358                 kfree(skb->head);
359         }
360 }
361
362 /*
363  *      Free an skbuff by memory without cleaning the state.
364  */
365 static void kfree_skbmem(struct sk_buff *skb)
366 {
367         struct sk_buff *other;
368         atomic_t *fclone_ref;
369
370         switch (skb->fclone) {
371         case SKB_FCLONE_UNAVAILABLE:
372                 kmem_cache_free(skbuff_head_cache, skb);
373                 break;
374
375         case SKB_FCLONE_ORIG:
376                 fclone_ref = (atomic_t *) (skb + 2);
377                 if (atomic_dec_and_test(fclone_ref))
378                         kmem_cache_free(skbuff_fclone_cache, skb);
379                 break;
380
381         case SKB_FCLONE_CLONE:
382                 fclone_ref = (atomic_t *) (skb + 1);
383                 other = skb - 1;
384
385                 /* The clone portion is available for
386                  * fast-cloning again.
387                  */
388                 skb->fclone = SKB_FCLONE_UNAVAILABLE;
389
390                 if (atomic_dec_and_test(fclone_ref))
391                         kmem_cache_free(skbuff_fclone_cache, other);
392                 break;
393         }
394 }
395
396 static void skb_release_head_state(struct sk_buff *skb)
397 {
398         skb_dst_drop(skb);
399 #ifdef CONFIG_XFRM
400         secpath_put(skb->sp);
401 #endif
402         if (skb->destructor) {
403                 WARN_ON(in_irq());
404                 skb->destructor(skb);
405         }
406 #if defined(CONFIG_NF_CONNTRACK) || defined(CONFIG_NF_CONNTRACK_MODULE)
407         nf_conntrack_put(skb->nfct);
408 #endif
409 #ifdef NET_SKBUFF_NF_DEFRAG_NEEDED
410         nf_conntrack_put_reasm(skb->nfct_reasm);
411 #endif
412 #ifdef CONFIG_BRIDGE_NETFILTER
413         nf_bridge_put(skb->nf_bridge);
414 #endif
415 /* XXX: IS this still necessary? - JHS */
416 #ifdef CONFIG_NET_SCHED
417         skb->tc_index = 0;
418 #ifdef CONFIG_NET_CLS_ACT
419         skb->tc_verd = 0;
420 #endif
421 #endif
422 }
423
424 /* Free everything but the sk_buff shell. */
425 static void skb_release_all(struct sk_buff *skb)
426 {
427         skb_release_head_state(skb);
428         skb_release_data(skb);
429 }
430
431 /**
432  *      __kfree_skb - private function
433  *      @skb: buffer
434  *
435  *      Free an sk_buff. Release anything attached to the buffer.
436  *      Clean the state. This is an internal helper function. Users should
437  *      always call kfree_skb
438  */
439
440 void __kfree_skb(struct sk_buff *skb)
441 {
442         skb_release_all(skb);
443         kfree_skbmem(skb);
444 }
445 EXPORT_SYMBOL(__kfree_skb);
446
447 /**
448  *      kfree_skb - free an sk_buff
449  *      @skb: buffer to free
450  *
451  *      Drop a reference to the buffer and free it if the usage count has
452  *      hit zero.
453  */
454 void kfree_skb(struct sk_buff *skb)
455 {
456         if (unlikely(!skb))
457                 return;
458         if (likely(atomic_read(&skb->users) == 1))
459                 smp_rmb();
460         else if (likely(!atomic_dec_and_test(&skb->users)))
461                 return;
462         trace_kfree_skb(skb, __builtin_return_address(0));
463         __kfree_skb(skb);
464 }
465 EXPORT_SYMBOL(kfree_skb);
466
467 /**
468  *      consume_skb - free an skbuff
469  *      @skb: buffer to free
470  *
471  *      Drop a ref to the buffer and free it if the usage count has hit zero
472  *      Functions identically to kfree_skb, but kfree_skb assumes that the frame
473  *      is being dropped after a failure and notes that
474  */
475 void consume_skb(struct sk_buff *skb)
476 {
477         if (unlikely(!skb))
478                 return;
479         if (likely(atomic_read(&skb->users) == 1))
480                 smp_rmb();
481         else if (likely(!atomic_dec_and_test(&skb->users)))
482                 return;
483         trace_consume_skb(skb);
484         __kfree_skb(skb);
485 }
486 EXPORT_SYMBOL(consume_skb);
487
488 /**
489  *      skb_recycle - clean up an skb for reuse
490  *      @skb: buffer
491  *
492  *      Recycles the skb to be reused as a receive buffer. This
493  *      function does any necessary reference count dropping, and
494  *      cleans up the skbuff as if it just came from __alloc_skb().
495  */
496 void skb_recycle(struct sk_buff *skb)
497 {
498         struct skb_shared_info *shinfo;
499
500         skb_release_head_state(skb);
501
502         shinfo = skb_shinfo(skb);
503         memset(shinfo, 0, offsetof(struct skb_shared_info, dataref));
504         atomic_set(&shinfo->dataref, 1);
505
506         memset(skb, 0, offsetof(struct sk_buff, tail));
507         skb->data = skb->head + NET_SKB_PAD;
508         skb_reset_tail_pointer(skb);
509 }
510 EXPORT_SYMBOL(skb_recycle);
511
512 /**
513  *      skb_recycle_check - check if skb can be reused for receive
514  *      @skb: buffer
515  *      @skb_size: minimum receive buffer size
516  *
517  *      Checks that the skb passed in is not shared or cloned, and
518  *      that it is linear and its head portion at least as large as
519  *      skb_size so that it can be recycled as a receive buffer.
520  *      If these conditions are met, this function does any necessary
521  *      reference count dropping and cleans up the skbuff as if it
522  *      just came from __alloc_skb().
523  */
524 bool skb_recycle_check(struct sk_buff *skb, int skb_size)
525 {
526         if (!skb_is_recycleable(skb, skb_size))
527                 return false;
528
529         skb_recycle(skb);
530
531         return true;
532 }
533 EXPORT_SYMBOL(skb_recycle_check);
534
535 static void __copy_skb_header(struct sk_buff *new, const struct sk_buff *old)
536 {
537         new->tstamp             = old->tstamp;
538         new->dev                = old->dev;
539         new->transport_header   = old->transport_header;
540         new->network_header     = old->network_header;
541         new->mac_header         = old->mac_header;
542         skb_dst_copy(new, old);
543         new->rxhash             = old->rxhash;
544         new->ooo_okay           = old->ooo_okay;
545         new->l4_rxhash          = old->l4_rxhash;
546 #ifdef CONFIG_XFRM
547         new->sp                 = secpath_get(old->sp);
548 #endif
549         memcpy(new->cb, old->cb, sizeof(old->cb));
550         new->csum               = old->csum;
551         new->local_df           = old->local_df;
552         new->pkt_type           = old->pkt_type;
553         new->ip_summed          = old->ip_summed;
554         skb_copy_queue_mapping(new, old);
555         new->priority           = old->priority;
556 #if defined(CONFIG_IP_VS) || defined(CONFIG_IP_VS_MODULE)
557         new->ipvs_property      = old->ipvs_property;
558 #endif
559         new->protocol           = old->protocol;
560         new->mark               = old->mark;
561         new->skb_iif            = old->skb_iif;
562         __nf_copy(new, old);
563 #if defined(CONFIG_NETFILTER_XT_TARGET_TRACE) || \
564     defined(CONFIG_NETFILTER_XT_TARGET_TRACE_MODULE)
565         new->nf_trace           = old->nf_trace;
566 #endif
567 #ifdef CONFIG_NET_SCHED
568         new->tc_index           = old->tc_index;
569 #ifdef CONFIG_NET_CLS_ACT
570         new->tc_verd            = old->tc_verd;
571 #endif
572 #endif
573         new->vlan_tci           = old->vlan_tci;
574
575         skb_copy_secmark(new, old);
576 }
577
578 /*
579  * You should not add any new code to this function.  Add it to
580  * __copy_skb_header above instead.
581  */
582 static struct sk_buff *__skb_clone(struct sk_buff *n, struct sk_buff *skb)
583 {
584 #define C(x) n->x = skb->x
585
586         n->next = n->prev = NULL;
587         n->sk = NULL;
588         __copy_skb_header(n, skb);
589
590         C(len);
591         C(data_len);
592         C(mac_len);
593         n->hdr_len = skb->nohdr ? skb_headroom(skb) : skb->hdr_len;
594         n->cloned = 1;
595         n->nohdr = 0;
596         n->destructor = NULL;
597         C(tail);
598         C(end);
599         C(head);
600         C(data);
601         C(truesize);
602         atomic_set(&n->users, 1);
603
604         atomic_inc(&(skb_shinfo(skb)->dataref));
605         skb->cloned = 1;
606
607         return n;
608 #undef C
609 }
610
611 /**
612  *      skb_morph       -       morph one skb into another
613  *      @dst: the skb to receive the contents
614  *      @src: the skb to supply the contents
615  *
616  *      This is identical to skb_clone except that the target skb is
617  *      supplied by the user.
618  *
619  *      The target skb is returned upon exit.
620  */
621 struct sk_buff *skb_morph(struct sk_buff *dst, struct sk_buff *src)
622 {
623         skb_release_all(dst);
624         return __skb_clone(dst, src);
625 }
626 EXPORT_SYMBOL_GPL(skb_morph);
627
628 /*      skb_copy_ubufs  -       copy userspace skb frags buffers to kernel
629  *      @skb: the skb to modify
630  *      @gfp_mask: allocation priority
631  *
632  *      This must be called on SKBTX_DEV_ZEROCOPY skb.
633  *      It will copy all frags into kernel and drop the reference
634  *      to userspace pages.
635  *
636  *      If this function is called from an interrupt gfp_mask() must be
637  *      %GFP_ATOMIC.
638  *
639  *      Returns 0 on success or a negative error code on failure
640  *      to allocate kernel memory to copy to.
641  */
642 int skb_copy_ubufs(struct sk_buff *skb, gfp_t gfp_mask)
643 {
644         int i;
645         int num_frags = skb_shinfo(skb)->nr_frags;
646         struct page *page, *head = NULL;
647         struct ubuf_info *uarg = skb_shinfo(skb)->destructor_arg;
648
649         for (i = 0; i < num_frags; i++) {
650                 u8 *vaddr;
651                 skb_frag_t *f = &skb_shinfo(skb)->frags[i];
652
653                 page = alloc_page(GFP_ATOMIC);
654                 if (!page) {
655                         while (head) {
656                                 struct page *next = (struct page *)head->private;
657                                 put_page(head);
658                                 head = next;
659                         }
660                         return -ENOMEM;
661                 }
662                 vaddr = kmap_skb_frag(&skb_shinfo(skb)->frags[i]);
663                 memcpy(page_address(page),
664                        vaddr + f->page_offset, skb_frag_size(f));
665                 kunmap_skb_frag(vaddr);
666                 page->private = (unsigned long)head;
667                 head = page;
668         }
669
670         /* skb frags release userspace buffers */
671         for (i = 0; i < skb_shinfo(skb)->nr_frags; i++)
672                 skb_frag_unref(skb, i);
673
674         uarg->callback(uarg);
675
676         /* skb frags point to kernel buffers */
677         for (i = skb_shinfo(skb)->nr_frags; i > 0; i--) {
678                 __skb_fill_page_desc(skb, i-1, head, 0,
679                                      skb_shinfo(skb)->frags[i - 1].size);
680                 head = (struct page *)head->private;
681         }
682
683         skb_shinfo(skb)->tx_flags &= ~SKBTX_DEV_ZEROCOPY;
684         return 0;
685 }
686
687
688 /**
689  *      skb_clone       -       duplicate an sk_buff
690  *      @skb: buffer to clone
691  *      @gfp_mask: allocation priority
692  *
693  *      Duplicate an &sk_buff. The new one is not owned by a socket. Both
694  *      copies share the same packet data but not structure. The new
695  *      buffer has a reference count of 1. If the allocation fails the
696  *      function returns %NULL otherwise the new buffer is returned.
697  *
698  *      If this function is called from an interrupt gfp_mask() must be
699  *      %GFP_ATOMIC.
700  */
701
702 struct sk_buff *skb_clone(struct sk_buff *skb, gfp_t gfp_mask)
703 {
704         struct sk_buff *n;
705
706         if (skb_shinfo(skb)->tx_flags & SKBTX_DEV_ZEROCOPY) {
707                 if (skb_copy_ubufs(skb, gfp_mask))
708                         return NULL;
709         }
710
711         n = skb + 1;
712         if (skb->fclone == SKB_FCLONE_ORIG &&
713             n->fclone == SKB_FCLONE_UNAVAILABLE) {
714                 atomic_t *fclone_ref = (atomic_t *) (n + 1);
715                 n->fclone = SKB_FCLONE_CLONE;
716                 atomic_inc(fclone_ref);
717         } else {
718                 n = kmem_cache_alloc(skbuff_head_cache, gfp_mask);
719                 if (!n)
720                         return NULL;
721
722                 kmemcheck_annotate_bitfield(n, flags1);
723                 kmemcheck_annotate_bitfield(n, flags2);
724                 n->fclone = SKB_FCLONE_UNAVAILABLE;
725         }
726
727         return __skb_clone(n, skb);
728 }
729 EXPORT_SYMBOL(skb_clone);
730
731 static void copy_skb_header(struct sk_buff *new, const struct sk_buff *old)
732 {
733 #ifndef NET_SKBUFF_DATA_USES_OFFSET
734         /*
735          *      Shift between the two data areas in bytes
736          */
737         unsigned long offset = new->data - old->data;
738 #endif
739
740         __copy_skb_header(new, old);
741
742 #ifndef NET_SKBUFF_DATA_USES_OFFSET
743         /* {transport,network,mac}_header are relative to skb->head */
744         new->transport_header += offset;
745         new->network_header   += offset;
746         if (skb_mac_header_was_set(new))
747                 new->mac_header       += offset;
748 #endif
749         skb_shinfo(new)->gso_size = skb_shinfo(old)->gso_size;
750         skb_shinfo(new)->gso_segs = skb_shinfo(old)->gso_segs;
751         skb_shinfo(new)->gso_type = skb_shinfo(old)->gso_type;
752 }
753
754 /**
755  *      skb_copy        -       create private copy of an sk_buff
756  *      @skb: buffer to copy
757  *      @gfp_mask: allocation priority
758  *
759  *      Make a copy of both an &sk_buff and its data. This is used when the
760  *      caller wishes to modify the data and needs a private copy of the
761  *      data to alter. Returns %NULL on failure or the pointer to the buffer
762  *      on success. The returned buffer has a reference count of 1.
763  *
764  *      As by-product this function converts non-linear &sk_buff to linear
765  *      one, so that &sk_buff becomes completely private and caller is allowed
766  *      to modify all the data of returned buffer. This means that this
767  *      function is not recommended for use in circumstances when only
768  *      header is going to be modified. Use pskb_copy() instead.
769  */
770
771 struct sk_buff *skb_copy(const struct sk_buff *skb, gfp_t gfp_mask)
772 {
773         int headerlen = skb_headroom(skb);
774         unsigned int size = (skb_end_pointer(skb) - skb->head) + skb->data_len;
775         struct sk_buff *n = alloc_skb(size, gfp_mask);
776
777         if (!n)
778                 return NULL;
779
780         /* Set the data pointer */
781         skb_reserve(n, headerlen);
782         /* Set the tail pointer and length */
783         skb_put(n, skb->len);
784
785         if (skb_copy_bits(skb, -headerlen, n->head, headerlen + skb->len))
786                 BUG();
787
788         copy_skb_header(n, skb);
789         return n;
790 }
791 EXPORT_SYMBOL(skb_copy);
792
793 /**
794  *      pskb_copy       -       create copy of an sk_buff with private head.
795  *      @skb: buffer to copy
796  *      @gfp_mask: allocation priority
797  *
798  *      Make a copy of both an &sk_buff and part of its data, located
799  *      in header. Fragmented data remain shared. This is used when
800  *      the caller wishes to modify only header of &sk_buff and needs
801  *      private copy of the header to alter. Returns %NULL on failure
802  *      or the pointer to the buffer on success.
803  *      The returned buffer has a reference count of 1.
804  */
805
806 struct sk_buff *pskb_copy(struct sk_buff *skb, gfp_t gfp_mask)
807 {
808         unsigned int size = skb_end_pointer(skb) - skb->head;
809         struct sk_buff *n = alloc_skb(size, gfp_mask);
810
811         if (!n)
812                 goto out;
813
814         /* Set the data pointer */
815         skb_reserve(n, skb_headroom(skb));
816         /* Set the tail pointer and length */
817         skb_put(n, skb_headlen(skb));
818         /* Copy the bytes */
819         skb_copy_from_linear_data(skb, n->data, n->len);
820
821         n->truesize += skb->data_len;
822         n->data_len  = skb->data_len;
823         n->len       = skb->len;
824
825         if (skb_shinfo(skb)->nr_frags) {
826                 int i;
827
828                 if (skb_shinfo(skb)->tx_flags & SKBTX_DEV_ZEROCOPY) {
829                         if (skb_copy_ubufs(skb, gfp_mask)) {
830                                 kfree_skb(n);
831                                 n = NULL;
832                                 goto out;
833                         }
834                 }
835                 for (i = 0; i < skb_shinfo(skb)->nr_frags; i++) {
836                         skb_shinfo(n)->frags[i] = skb_shinfo(skb)->frags[i];
837                         skb_frag_ref(skb, i);
838                 }
839                 skb_shinfo(n)->nr_frags = i;
840         }
841
842         if (skb_has_frag_list(skb)) {
843                 skb_shinfo(n)->frag_list = skb_shinfo(skb)->frag_list;
844                 skb_clone_fraglist(n);
845         }
846
847         copy_skb_header(n, skb);
848 out:
849         return n;
850 }
851 EXPORT_SYMBOL(pskb_copy);
852
853 /**
854  *      pskb_expand_head - reallocate header of &sk_buff
855  *      @skb: buffer to reallocate
856  *      @nhead: room to add at head
857  *      @ntail: room to add at tail
858  *      @gfp_mask: allocation priority
859  *
860  *      Expands (or creates identical copy, if &nhead and &ntail are zero)
861  *      header of skb. &sk_buff itself is not changed. &sk_buff MUST have
862  *      reference count of 1. Returns zero in the case of success or error,
863  *      if expansion failed. In the last case, &sk_buff is not changed.
864  *
865  *      All the pointers pointing into skb header may change and must be
866  *      reloaded after call to this function.
867  */
868
869 int pskb_expand_head(struct sk_buff *skb, int nhead, int ntail,
870                      gfp_t gfp_mask)
871 {
872         int i;
873         u8 *data;
874         int size = nhead + (skb_end_pointer(skb) - skb->head) + ntail;
875         long off;
876         bool fastpath;
877
878         BUG_ON(nhead < 0);
879
880         if (skb_shared(skb))
881                 BUG();
882
883         size = SKB_DATA_ALIGN(size);
884
885         /* Check if we can avoid taking references on fragments if we own
886          * the last reference on skb->head. (see skb_release_data())
887          */
888         if (!skb->cloned)
889                 fastpath = true;
890         else {
891                 int delta = skb->nohdr ? (1 << SKB_DATAREF_SHIFT) + 1 : 1;
892                 fastpath = atomic_read(&skb_shinfo(skb)->dataref) == delta;
893         }
894
895         if (fastpath &&
896             size + sizeof(struct skb_shared_info) <= ksize(skb->head)) {
897                 memmove(skb->head + size, skb_shinfo(skb),
898                         offsetof(struct skb_shared_info,
899                                  frags[skb_shinfo(skb)->nr_frags]));
900                 memmove(skb->head + nhead, skb->head,
901                         skb_tail_pointer(skb) - skb->head);
902                 off = nhead;
903                 goto adjust_others;
904         }
905
906         data = kmalloc(size + SKB_DATA_ALIGN(sizeof(struct skb_shared_info)),
907                        gfp_mask);
908         if (!data)
909                 goto nodata;
910         size = SKB_WITH_OVERHEAD(ksize(data));
911
912         /* Copy only real data... and, alas, header. This should be
913          * optimized for the cases when header is void.
914          */
915         memcpy(data + nhead, skb->head, skb_tail_pointer(skb) - skb->head);
916
917         memcpy((struct skb_shared_info *)(data + size),
918                skb_shinfo(skb),
919                offsetof(struct skb_shared_info, frags[skb_shinfo(skb)->nr_frags]));
920
921         if (fastpath) {
922                 kfree(skb->head);
923         } else {
924                 /* copy this zero copy skb frags */
925                 if (skb_shinfo(skb)->tx_flags & SKBTX_DEV_ZEROCOPY) {
926                         if (skb_copy_ubufs(skb, gfp_mask))
927                                 goto nofrags;
928                 }
929                 for (i = 0; i < skb_shinfo(skb)->nr_frags; i++)
930                         skb_frag_ref(skb, i);
931
932                 if (skb_has_frag_list(skb))
933                         skb_clone_fraglist(skb);
934
935                 skb_release_data(skb);
936         }
937         off = (data + nhead) - skb->head;
938
939         skb->head     = data;
940 adjust_others:
941         skb->data    += off;
942 #ifdef NET_SKBUFF_DATA_USES_OFFSET
943         skb->end      = size;
944         off           = nhead;
945 #else
946         skb->end      = skb->head + size;
947 #endif
948         /* {transport,network,mac}_header and tail are relative to skb->head */
949         skb->tail             += off;
950         skb->transport_header += off;
951         skb->network_header   += off;
952         if (skb_mac_header_was_set(skb))
953                 skb->mac_header += off;
954         /* Only adjust this if it actually is csum_start rather than csum */
955         if (skb->ip_summed == CHECKSUM_PARTIAL)
956                 skb->csum_start += nhead;
957         skb->cloned   = 0;
958         skb->hdr_len  = 0;
959         skb->nohdr    = 0;
960         atomic_set(&skb_shinfo(skb)->dataref, 1);
961         return 0;
962
963 nofrags:
964         kfree(data);
965 nodata:
966         return -ENOMEM;
967 }
968 EXPORT_SYMBOL(pskb_expand_head);
969
970 /* Make private copy of skb with writable head and some headroom */
971
972 struct sk_buff *skb_realloc_headroom(struct sk_buff *skb, unsigned int headroom)
973 {
974         struct sk_buff *skb2;
975         int delta = headroom - skb_headroom(skb);
976
977         if (delta <= 0)
978                 skb2 = pskb_copy(skb, GFP_ATOMIC);
979         else {
980                 skb2 = skb_clone(skb, GFP_ATOMIC);
981                 if (skb2 && pskb_expand_head(skb2, SKB_DATA_ALIGN(delta), 0,
982                                              GFP_ATOMIC)) {
983                         kfree_skb(skb2);
984                         skb2 = NULL;
985                 }
986         }
987         return skb2;
988 }
989 EXPORT_SYMBOL(skb_realloc_headroom);
990
991 /**
992  *      skb_copy_expand -       copy and expand sk_buff
993  *      @skb: buffer to copy
994  *      @newheadroom: new free bytes at head
995  *      @newtailroom: new free bytes at tail
996  *      @gfp_mask: allocation priority
997  *
998  *      Make a copy of both an &sk_buff and its data and while doing so
999  *      allocate additional space.
1000  *
1001  *      This is used when the caller wishes to modify the data and needs a
1002  *      private copy of the data to alter as well as more space for new fields.
1003  *      Returns %NULL on failure or the pointer to the buffer
1004  *      on success. The returned buffer has a reference count of 1.
1005  *
1006  *      You must pass %GFP_ATOMIC as the allocation priority if this function
1007  *      is called from an interrupt.
1008  */
1009 struct sk_buff *skb_copy_expand(const struct sk_buff *skb,
1010                                 int newheadroom, int newtailroom,
1011                                 gfp_t gfp_mask)
1012 {
1013         /*
1014          *      Allocate the copy buffer
1015          */
1016         struct sk_buff *n = alloc_skb(newheadroom + skb->len + newtailroom,
1017                                       gfp_mask);
1018         int oldheadroom = skb_headroom(skb);
1019         int head_copy_len, head_copy_off;
1020         int off;
1021
1022         if (!n)
1023                 return NULL;
1024
1025         skb_reserve(n, newheadroom);
1026
1027         /* Set the tail pointer and length */
1028         skb_put(n, skb->len);
1029
1030         head_copy_len = oldheadroom;
1031         head_copy_off = 0;
1032         if (newheadroom <= head_copy_len)
1033                 head_copy_len = newheadroom;
1034         else
1035                 head_copy_off = newheadroom - head_copy_len;
1036
1037         /* Copy the linear header and data. */
1038         if (skb_copy_bits(skb, -head_copy_len, n->head + head_copy_off,
1039                           skb->len + head_copy_len))
1040                 BUG();
1041
1042         copy_skb_header(n, skb);
1043
1044         off                  = newheadroom - oldheadroom;
1045         if (n->ip_summed == CHECKSUM_PARTIAL)
1046                 n->csum_start += off;
1047 #ifdef NET_SKBUFF_DATA_USES_OFFSET
1048         n->transport_header += off;
1049         n->network_header   += off;
1050         if (skb_mac_header_was_set(skb))
1051                 n->mac_header += off;
1052 #endif
1053
1054         return n;
1055 }
1056 EXPORT_SYMBOL(skb_copy_expand);
1057
1058 /**
1059  *      skb_pad                 -       zero pad the tail of an skb
1060  *      @skb: buffer to pad
1061  *      @pad: space to pad
1062  *
1063  *      Ensure that a buffer is followed by a padding area that is zero
1064  *      filled. Used by network drivers which may DMA or transfer data
1065  *      beyond the buffer end onto the wire.
1066  *
1067  *      May return error in out of memory cases. The skb is freed on error.
1068  */
1069
1070 int skb_pad(struct sk_buff *skb, int pad)
1071 {
1072         int err;
1073         int ntail;
1074
1075         /* If the skbuff is non linear tailroom is always zero.. */
1076         if (!skb_cloned(skb) && skb_tailroom(skb) >= pad) {
1077                 memset(skb->data+skb->len, 0, pad);
1078                 return 0;
1079         }
1080
1081         ntail = skb->data_len + pad - (skb->end - skb->tail);
1082         if (likely(skb_cloned(skb) || ntail > 0)) {
1083                 err = pskb_expand_head(skb, 0, ntail, GFP_ATOMIC);
1084                 if (unlikely(err))
1085                         goto free_skb;
1086         }
1087
1088         /* FIXME: The use of this function with non-linear skb's really needs
1089          * to be audited.
1090          */
1091         err = skb_linearize(skb);
1092         if (unlikely(err))
1093                 goto free_skb;
1094
1095         memset(skb->data + skb->len, 0, pad);
1096         return 0;
1097
1098 free_skb:
1099         kfree_skb(skb);
1100         return err;
1101 }
1102 EXPORT_SYMBOL(skb_pad);
1103
1104 /**
1105  *      skb_put - add data to a buffer
1106  *      @skb: buffer to use
1107  *      @len: amount of data to add
1108  *
1109  *      This function extends the used data area of the buffer. If this would
1110  *      exceed the total buffer size the kernel will panic. A pointer to the
1111  *      first byte of the extra data is returned.
1112  */
1113 unsigned char *skb_put(struct sk_buff *skb, unsigned int len)
1114 {
1115         unsigned char *tmp = skb_tail_pointer(skb);
1116         SKB_LINEAR_ASSERT(skb);
1117         skb->tail += len;
1118         skb->len  += len;
1119         if (unlikely(skb->tail > skb->end))
1120                 skb_over_panic(skb, len, __builtin_return_address(0));
1121         return tmp;
1122 }
1123 EXPORT_SYMBOL(skb_put);
1124
1125 /**
1126  *      skb_push - add data to the start of a buffer
1127  *      @skb: buffer to use
1128  *      @len: amount of data to add
1129  *
1130  *      This function extends the used data area of the buffer at the buffer
1131  *      start. If this would exceed the total buffer headroom the kernel will
1132  *      panic. A pointer to the first byte of the extra data is returned.
1133  */
1134 unsigned char *skb_push(struct sk_buff *skb, unsigned int len)
1135 {
1136         skb->data -= len;
1137         skb->len  += len;
1138         if (unlikely(skb->data<skb->head))
1139                 skb_under_panic(skb, len, __builtin_return_address(0));
1140         return skb->data;
1141 }
1142 EXPORT_SYMBOL(skb_push);
1143
1144 /**
1145  *      skb_pull - remove data from the start of a buffer
1146  *      @skb: buffer to use
1147  *      @len: amount of data to remove
1148  *
1149  *      This function removes data from the start of a buffer, returning
1150  *      the memory to the headroom. A pointer to the next data in the buffer
1151  *      is returned. Once the data has been pulled future pushes will overwrite
1152  *      the old data.
1153  */
1154 unsigned char *skb_pull(struct sk_buff *skb, unsigned int len)
1155 {
1156         return skb_pull_inline(skb, len);
1157 }
1158 EXPORT_SYMBOL(skb_pull);
1159
1160 /**
1161  *      skb_trim - remove end from a buffer
1162  *      @skb: buffer to alter
1163  *      @len: new length
1164  *
1165  *      Cut the length of a buffer down by removing data from the tail. If
1166  *      the buffer is already under the length specified it is not modified.
1167  *      The skb must be linear.
1168  */
1169 void skb_trim(struct sk_buff *skb, unsigned int len)
1170 {
1171         if (skb->len > len)
1172                 __skb_trim(skb, len);
1173 }
1174 EXPORT_SYMBOL(skb_trim);
1175
1176 /* Trims skb to length len. It can change skb pointers.
1177  */
1178
1179 int ___pskb_trim(struct sk_buff *skb, unsigned int len)
1180 {
1181         struct sk_buff **fragp;
1182         struct sk_buff *frag;
1183         int offset = skb_headlen(skb);
1184         int nfrags = skb_shinfo(skb)->nr_frags;
1185         int i;
1186         int err;
1187
1188         if (skb_cloned(skb) &&
1189             unlikely((err = pskb_expand_head(skb, 0, 0, GFP_ATOMIC))))
1190                 return err;
1191
1192         i = 0;
1193         if (offset >= len)
1194                 goto drop_pages;
1195
1196         for (; i < nfrags; i++) {
1197                 int end = offset + skb_frag_size(&skb_shinfo(skb)->frags[i]);
1198
1199                 if (end < len) {
1200                         offset = end;
1201                         continue;
1202                 }
1203
1204                 skb_frag_size_set(&skb_shinfo(skb)->frags[i++], len - offset);
1205
1206 drop_pages:
1207                 skb_shinfo(skb)->nr_frags = i;
1208
1209                 for (; i < nfrags; i++)
1210                         skb_frag_unref(skb, i);
1211
1212                 if (skb_has_frag_list(skb))
1213                         skb_drop_fraglist(skb);
1214                 goto done;
1215         }
1216
1217         for (fragp = &skb_shinfo(skb)->frag_list; (frag = *fragp);
1218              fragp = &frag->next) {
1219                 int end = offset + frag->len;
1220
1221                 if (skb_shared(frag)) {
1222                         struct sk_buff *nfrag;
1223
1224                         nfrag = skb_clone(frag, GFP_ATOMIC);
1225                         if (unlikely(!nfrag))
1226                                 return -ENOMEM;
1227
1228                         nfrag->next = frag->next;
1229                         kfree_skb(frag);
1230                         frag = nfrag;
1231                         *fragp = frag;
1232                 }
1233
1234                 if (end < len) {
1235                         offset = end;
1236                         continue;
1237                 }
1238
1239                 if (end > len &&
1240                     unlikely((err = pskb_trim(frag, len - offset))))
1241                         return err;
1242
1243                 if (frag->next)
1244                         skb_drop_list(&frag->next);
1245                 break;
1246         }
1247
1248 done:
1249         if (len > skb_headlen(skb)) {
1250                 skb->data_len -= skb->len - len;
1251                 skb->len       = len;
1252         } else {
1253                 skb->len       = len;
1254                 skb->data_len  = 0;
1255                 skb_set_tail_pointer(skb, len);
1256         }
1257
1258         return 0;
1259 }
1260 EXPORT_SYMBOL(___pskb_trim);
1261
1262 /**
1263  *      __pskb_pull_tail - advance tail of skb header
1264  *      @skb: buffer to reallocate
1265  *      @delta: number of bytes to advance tail
1266  *
1267  *      The function makes a sense only on a fragmented &sk_buff,
1268  *      it expands header moving its tail forward and copying necessary
1269  *      data from fragmented part.
1270  *
1271  *      &sk_buff MUST have reference count of 1.
1272  *
1273  *      Returns %NULL (and &sk_buff does not change) if pull failed
1274  *      or value of new tail of skb in the case of success.
1275  *
1276  *      All the pointers pointing into skb header may change and must be
1277  *      reloaded after call to this function.
1278  */
1279
1280 /* Moves tail of skb head forward, copying data from fragmented part,
1281  * when it is necessary.
1282  * 1. It may fail due to malloc failure.
1283  * 2. It may change skb pointers.
1284  *
1285  * It is pretty complicated. Luckily, it is called only in exceptional cases.
1286  */
1287 unsigned char *__pskb_pull_tail(struct sk_buff *skb, int delta)
1288 {
1289         /* If skb has not enough free space at tail, get new one
1290          * plus 128 bytes for future expansions. If we have enough
1291          * room at tail, reallocate without expansion only if skb is cloned.
1292          */
1293         int i, k, eat = (skb->tail + delta) - skb->end;
1294
1295         if (eat > 0 || skb_cloned(skb)) {
1296                 if (pskb_expand_head(skb, 0, eat > 0 ? eat + 128 : 0,
1297                                      GFP_ATOMIC))
1298                         return NULL;
1299         }
1300
1301         if (skb_copy_bits(skb, skb_headlen(skb), skb_tail_pointer(skb), delta))
1302                 BUG();
1303
1304         /* Optimization: no fragments, no reasons to preestimate
1305          * size of pulled pages. Superb.
1306          */
1307         if (!skb_has_frag_list(skb))
1308                 goto pull_pages;
1309
1310         /* Estimate size of pulled pages. */
1311         eat = delta;
1312         for (i = 0; i < skb_shinfo(skb)->nr_frags; i++) {
1313                 int size = skb_frag_size(&skb_shinfo(skb)->frags[i]);
1314
1315                 if (size >= eat)
1316                         goto pull_pages;
1317                 eat -= size;
1318         }
1319
1320         /* If we need update frag list, we are in troubles.
1321          * Certainly, it possible to add an offset to skb data,
1322          * but taking into account that pulling is expected to
1323          * be very rare operation, it is worth to fight against
1324          * further bloating skb head and crucify ourselves here instead.
1325          * Pure masohism, indeed. 8)8)
1326          */
1327         if (eat) {
1328                 struct sk_buff *list = skb_shinfo(skb)->frag_list;
1329                 struct sk_buff *clone = NULL;
1330                 struct sk_buff *insp = NULL;
1331
1332                 do {
1333                         BUG_ON(!list);
1334
1335                         if (list->len <= eat) {
1336                                 /* Eaten as whole. */
1337                                 eat -= list->len;
1338                                 list = list->next;
1339                                 insp = list;
1340                         } else {
1341                                 /* Eaten partially. */
1342
1343                                 if (skb_shared(list)) {
1344                                         /* Sucks! We need to fork list. :-( */
1345                                         clone = skb_clone(list, GFP_ATOMIC);
1346                                         if (!clone)
1347                                                 return NULL;
1348                                         insp = list->next;
1349                                         list = clone;
1350                                 } else {
1351                                         /* This may be pulled without
1352                                          * problems. */
1353                                         insp = list;
1354                                 }
1355                                 if (!pskb_pull(list, eat)) {
1356                                         kfree_skb(clone);
1357                                         return NULL;
1358                                 }
1359                                 break;
1360                         }
1361                 } while (eat);
1362
1363                 /* Free pulled out fragments. */
1364                 while ((list = skb_shinfo(skb)->frag_list) != insp) {
1365                         skb_shinfo(skb)->frag_list = list->next;
1366                         kfree_skb(list);
1367                 }
1368                 /* And insert new clone at head. */
1369                 if (clone) {
1370                         clone->next = list;
1371                         skb_shinfo(skb)->frag_list = clone;
1372                 }
1373         }
1374         /* Success! Now we may commit changes to skb data. */
1375
1376 pull_pages:
1377         eat = delta;
1378         k = 0;
1379         for (i = 0; i < skb_shinfo(skb)->nr_frags; i++) {
1380                 int size = skb_frag_size(&skb_shinfo(skb)->frags[i]);
1381
1382                 if (size <= eat) {
1383                         skb_frag_unref(skb, i);
1384                         eat -= size;
1385                 } else {
1386                         skb_shinfo(skb)->frags[k] = skb_shinfo(skb)->frags[i];
1387                         if (eat) {
1388                                 skb_shinfo(skb)->frags[k].page_offset += eat;
1389                                 skb_frag_size_sub(&skb_shinfo(skb)->frags[k], eat);
1390                                 eat = 0;
1391                         }
1392                         k++;
1393                 }
1394         }
1395         skb_shinfo(skb)->nr_frags = k;
1396
1397         skb->tail     += delta;
1398         skb->data_len -= delta;
1399
1400         return skb_tail_pointer(skb);
1401 }
1402 EXPORT_SYMBOL(__pskb_pull_tail);
1403
1404 /**
1405  *      skb_copy_bits - copy bits from skb to kernel buffer
1406  *      @skb: source skb
1407  *      @offset: offset in source
1408  *      @to: destination buffer
1409  *      @len: number of bytes to copy
1410  *
1411  *      Copy the specified number of bytes from the source skb to the
1412  *      destination buffer.
1413  *
1414  *      CAUTION ! :
1415  *              If its prototype is ever changed,
1416  *              check arch/{*}/net/{*}.S files,
1417  *              since it is called from BPF assembly code.
1418  */
1419 int skb_copy_bits(const struct sk_buff *skb, int offset, void *to, int len)
1420 {
1421         int start = skb_headlen(skb);
1422         struct sk_buff *frag_iter;
1423         int i, copy;
1424
1425         if (offset > (int)skb->len - len)
1426                 goto fault;
1427
1428         /* Copy header. */
1429         if ((copy = start - offset) > 0) {
1430                 if (copy > len)
1431                         copy = len;
1432                 skb_copy_from_linear_data_offset(skb, offset, to, copy);
1433                 if ((len -= copy) == 0)
1434                         return 0;
1435                 offset += copy;
1436                 to     += copy;
1437         }
1438
1439         for (i = 0; i < skb_shinfo(skb)->nr_frags; i++) {
1440                 int end;
1441
1442                 WARN_ON(start > offset + len);
1443
1444                 end = start + skb_frag_size(&skb_shinfo(skb)->frags[i]);
1445                 if ((copy = end - offset) > 0) {
1446                         u8 *vaddr;
1447
1448                         if (copy > len)
1449                                 copy = len;
1450
1451                         vaddr = kmap_skb_frag(&skb_shinfo(skb)->frags[i]);
1452                         memcpy(to,
1453                                vaddr + skb_shinfo(skb)->frags[i].page_offset+
1454                                offset - start, copy);
1455                         kunmap_skb_frag(vaddr);
1456
1457                         if ((len -= copy) == 0)
1458                                 return 0;
1459                         offset += copy;
1460                         to     += copy;
1461                 }
1462                 start = end;
1463         }
1464
1465         skb_walk_frags(skb, frag_iter) {
1466                 int end;
1467
1468                 WARN_ON(start > offset + len);
1469
1470                 end = start + frag_iter->len;
1471                 if ((copy = end - offset) > 0) {
1472                         if (copy > len)
1473                                 copy = len;
1474                         if (skb_copy_bits(frag_iter, offset - start, to, copy))
1475                                 goto fault;
1476                         if ((len -= copy) == 0)
1477                                 return 0;
1478                         offset += copy;
1479                         to     += copy;
1480                 }
1481                 start = end;
1482         }
1483
1484         if (!len)
1485                 return 0;
1486
1487 fault:
1488         return -EFAULT;
1489 }
1490 EXPORT_SYMBOL(skb_copy_bits);
1491
1492 /*
1493  * Callback from splice_to_pipe(), if we need to release some pages
1494  * at the end of the spd in case we error'ed out in filling the pipe.
1495  */
1496 static void sock_spd_release(struct splice_pipe_desc *spd, unsigned int i)
1497 {
1498         put_page(spd->pages[i]);
1499 }
1500
1501 static inline struct page *linear_to_page(struct page *page, unsigned int *len,
1502                                           unsigned int *offset,
1503                                           struct sk_buff *skb, struct sock *sk)
1504 {
1505         struct page *p = sk->sk_sndmsg_page;
1506         unsigned int off;
1507
1508         if (!p) {
1509 new_page:
1510                 p = sk->sk_sndmsg_page = alloc_pages(sk->sk_allocation, 0);
1511                 if (!p)
1512                         return NULL;
1513
1514                 off = sk->sk_sndmsg_off = 0;
1515                 /* hold one ref to this page until it's full */
1516         } else {
1517                 unsigned int mlen;
1518
1519                 off = sk->sk_sndmsg_off;
1520                 mlen = PAGE_SIZE - off;
1521                 if (mlen < 64 && mlen < *len) {
1522                         put_page(p);
1523                         goto new_page;
1524                 }
1525
1526                 *len = min_t(unsigned int, *len, mlen);
1527         }
1528
1529         memcpy(page_address(p) + off, page_address(page) + *offset, *len);
1530         sk->sk_sndmsg_off += *len;
1531         *offset = off;
1532         get_page(p);
1533
1534         return p;
1535 }
1536
1537 /*
1538  * Fill page/offset/length into spd, if it can hold more pages.
1539  */
1540 static inline int spd_fill_page(struct splice_pipe_desc *spd,
1541                                 struct pipe_inode_info *pipe, struct page *page,
1542                                 unsigned int *len, unsigned int offset,
1543                                 struct sk_buff *skb, int linear,
1544                                 struct sock *sk)
1545 {
1546         if (unlikely(spd->nr_pages == pipe->buffers))
1547                 return 1;
1548
1549         if (linear) {
1550                 page = linear_to_page(page, len, &offset, skb, sk);
1551                 if (!page)
1552                         return 1;
1553         } else
1554                 get_page(page);
1555
1556         spd->pages[spd->nr_pages] = page;
1557         spd->partial[spd->nr_pages].len = *len;
1558         spd->partial[spd->nr_pages].offset = offset;
1559         spd->nr_pages++;
1560
1561         return 0;
1562 }
1563
1564 static inline void __segment_seek(struct page **page, unsigned int *poff,
1565                                   unsigned int *plen, unsigned int off)
1566 {
1567         unsigned long n;
1568
1569         *poff += off;
1570         n = *poff / PAGE_SIZE;
1571         if (n)
1572                 *page = nth_page(*page, n);
1573
1574         *poff = *poff % PAGE_SIZE;
1575         *plen -= off;
1576 }
1577
1578 static inline int __splice_segment(struct page *page, unsigned int poff,
1579                                    unsigned int plen, unsigned int *off,
1580                                    unsigned int *len, struct sk_buff *skb,
1581                                    struct splice_pipe_desc *spd, int linear,
1582                                    struct sock *sk,
1583                                    struct pipe_inode_info *pipe)
1584 {
1585         if (!*len)
1586                 return 1;
1587
1588         /* skip this segment if already processed */
1589         if (*off >= plen) {
1590                 *off -= plen;
1591                 return 0;
1592         }
1593
1594         /* ignore any bits we already processed */
1595         if (*off) {
1596                 __segment_seek(&page, &poff, &plen, *off);
1597                 *off = 0;
1598         }
1599
1600         do {
1601                 unsigned int flen = min(*len, plen);
1602
1603                 /* the linear region may spread across several pages  */
1604                 flen = min_t(unsigned int, flen, PAGE_SIZE - poff);
1605
1606                 if (spd_fill_page(spd, pipe, page, &flen, poff, skb, linear, sk))
1607                         return 1;
1608
1609                 __segment_seek(&page, &poff, &plen, flen);
1610                 *len -= flen;
1611
1612         } while (*len && plen);
1613
1614         return 0;
1615 }
1616
1617 /*
1618  * Map linear and fragment data from the skb to spd. It reports failure if the
1619  * pipe is full or if we already spliced the requested length.
1620  */
1621 static int __skb_splice_bits(struct sk_buff *skb, struct pipe_inode_info *pipe,
1622                              unsigned int *offset, unsigned int *len,
1623                              struct splice_pipe_desc *spd, struct sock *sk)
1624 {
1625         int seg;
1626
1627         /*
1628          * map the linear part
1629          */
1630         if (__splice_segment(virt_to_page(skb->data),
1631                              (unsigned long) skb->data & (PAGE_SIZE - 1),
1632                              skb_headlen(skb),
1633                              offset, len, skb, spd, 1, sk, pipe))
1634                 return 1;
1635
1636         /*
1637          * then map the fragments
1638          */
1639         for (seg = 0; seg < skb_shinfo(skb)->nr_frags; seg++) {
1640                 const skb_frag_t *f = &skb_shinfo(skb)->frags[seg];
1641
1642                 if (__splice_segment(skb_frag_page(f),
1643                                      f->page_offset, skb_frag_size(f),
1644                                      offset, len, skb, spd, 0, sk, pipe))
1645                         return 1;
1646         }
1647
1648         return 0;
1649 }
1650
1651 /*
1652  * Map data from the skb to a pipe. Should handle both the linear part,
1653  * the fragments, and the frag list. It does NOT handle frag lists within
1654  * the frag list, if such a thing exists. We'd probably need to recurse to
1655  * handle that cleanly.
1656  */
1657 int skb_splice_bits(struct sk_buff *skb, unsigned int offset,
1658                     struct pipe_inode_info *pipe, unsigned int tlen,
1659                     unsigned int flags)
1660 {
1661         struct partial_page partial[PIPE_DEF_BUFFERS];
1662         struct page *pages[PIPE_DEF_BUFFERS];
1663         struct splice_pipe_desc spd = {
1664                 .pages = pages,
1665                 .partial = partial,
1666                 .flags = flags,
1667                 .ops = &sock_pipe_buf_ops,
1668                 .spd_release = sock_spd_release,
1669         };
1670         struct sk_buff *frag_iter;
1671         struct sock *sk = skb->sk;
1672         int ret = 0;
1673
1674         if (splice_grow_spd(pipe, &spd))
1675                 return -ENOMEM;
1676
1677         /*
1678          * __skb_splice_bits() only fails if the output has no room left,
1679          * so no point in going over the frag_list for the error case.
1680          */
1681         if (__skb_splice_bits(skb, pipe, &offset, &tlen, &spd, sk))
1682                 goto done;
1683         else if (!tlen)
1684                 goto done;
1685
1686         /*
1687          * now see if we have a frag_list to map
1688          */
1689         skb_walk_frags(skb, frag_iter) {
1690                 if (!tlen)
1691                         break;
1692                 if (__skb_splice_bits(frag_iter, pipe, &offset, &tlen, &spd, sk))
1693                         break;
1694         }
1695
1696 done:
1697         if (spd.nr_pages) {
1698                 /*
1699                  * Drop the socket lock, otherwise we have reverse
1700                  * locking dependencies between sk_lock and i_mutex
1701                  * here as compared to sendfile(). We enter here
1702                  * with the socket lock held, and splice_to_pipe() will
1703                  * grab the pipe inode lock. For sendfile() emulation,
1704                  * we call into ->sendpage() with the i_mutex lock held
1705                  * and networking will grab the socket lock.
1706                  */
1707                 release_sock(sk);
1708                 ret = splice_to_pipe(pipe, &spd);
1709                 lock_sock(sk);
1710         }
1711
1712         splice_shrink_spd(pipe, &spd);
1713         return ret;
1714 }
1715
1716 /**
1717  *      skb_store_bits - store bits from kernel buffer to skb
1718  *      @skb: destination buffer
1719  *      @offset: offset in destination
1720  *      @from: source buffer
1721  *      @len: number of bytes to copy
1722  *
1723  *      Copy the specified number of bytes from the source buffer to the
1724  *      destination skb.  This function handles all the messy bits of
1725  *      traversing fragment lists and such.
1726  */
1727
1728 int skb_store_bits(struct sk_buff *skb, int offset, const void *from, int len)
1729 {
1730         int start = skb_headlen(skb);
1731         struct sk_buff *frag_iter;
1732         int i, copy;
1733
1734         if (offset > (int)skb->len - len)
1735                 goto fault;
1736
1737         if ((copy = start - offset) > 0) {
1738                 if (copy > len)
1739                         copy = len;
1740                 skb_copy_to_linear_data_offset(skb, offset, from, copy);
1741                 if ((len -= copy) == 0)
1742                         return 0;
1743                 offset += copy;
1744                 from += copy;
1745         }
1746
1747         for (i = 0; i < skb_shinfo(skb)->nr_frags; i++) {
1748                 skb_frag_t *frag = &skb_shinfo(skb)->frags[i];
1749                 int end;
1750
1751                 WARN_ON(start > offset + len);
1752
1753                 end = start + skb_frag_size(frag);
1754                 if ((copy = end - offset) > 0) {
1755                         u8 *vaddr;
1756
1757                         if (copy > len)
1758                                 copy = len;
1759
1760                         vaddr = kmap_skb_frag(frag);
1761                         memcpy(vaddr + frag->page_offset + offset - start,
1762                                from, copy);
1763                         kunmap_skb_frag(vaddr);
1764
1765                         if ((len -= copy) == 0)
1766                                 return 0;
1767                         offset += copy;
1768                         from += copy;
1769                 }
1770                 start = end;
1771         }
1772
1773         skb_walk_frags(skb, frag_iter) {
1774                 int end;
1775
1776                 WARN_ON(start > offset + len);
1777
1778                 end = start + frag_iter->len;
1779                 if ((copy = end - offset) > 0) {
1780                         if (copy > len)
1781                                 copy = len;
1782                         if (skb_store_bits(frag_iter, offset - start,
1783                                            from, copy))
1784                                 goto fault;
1785                         if ((len -= copy) == 0)
1786                                 return 0;
1787                         offset += copy;
1788                         from += copy;
1789                 }
1790                 start = end;
1791         }
1792         if (!len)
1793                 return 0;
1794
1795 fault:
1796         return -EFAULT;
1797 }
1798 EXPORT_SYMBOL(skb_store_bits);
1799
1800 /* Checksum skb data. */
1801
1802 __wsum skb_checksum(const struct sk_buff *skb, int offset,
1803                           int len, __wsum csum)
1804 {
1805         int start = skb_headlen(skb);
1806         int i, copy = start - offset;
1807         struct sk_buff *frag_iter;
1808         int pos = 0;
1809
1810         /* Checksum header. */
1811         if (copy > 0) {
1812                 if (copy > len)
1813                         copy = len;
1814                 csum = csum_partial(skb->data + offset, copy, csum);
1815                 if ((len -= copy) == 0)
1816                         return csum;
1817                 offset += copy;
1818                 pos     = copy;
1819         }
1820
1821         for (i = 0; i < skb_shinfo(skb)->nr_frags; i++) {
1822                 int end;
1823
1824                 WARN_ON(start > offset + len);
1825
1826                 end = start + skb_frag_size(&skb_shinfo(skb)->frags[i]);
1827                 if ((copy = end - offset) > 0) {
1828                         __wsum csum2;
1829                         u8 *vaddr;
1830                         skb_frag_t *frag = &skb_shinfo(skb)->frags[i];
1831
1832                         if (copy > len)
1833                                 copy = len;
1834                         vaddr = kmap_skb_frag(frag);
1835                         csum2 = csum_partial(vaddr + frag->page_offset +
1836                                              offset - start, copy, 0);
1837                         kunmap_skb_frag(vaddr);
1838                         csum = csum_block_add(csum, csum2, pos);
1839                         if (!(len -= copy))
1840                                 return csum;
1841                         offset += copy;
1842                         pos    += copy;
1843                 }
1844                 start = end;
1845         }
1846
1847         skb_walk_frags(skb, frag_iter) {
1848                 int end;
1849
1850                 WARN_ON(start > offset + len);
1851
1852                 end = start + frag_iter->len;
1853                 if ((copy = end - offset) > 0) {
1854                         __wsum csum2;
1855                         if (copy > len)
1856                                 copy = len;
1857                         csum2 = skb_checksum(frag_iter, offset - start,
1858                                              copy, 0);
1859                         csum = csum_block_add(csum, csum2, pos);
1860                         if ((len -= copy) == 0)
1861                                 return csum;
1862                         offset += copy;
1863                         pos    += copy;
1864                 }
1865                 start = end;
1866         }
1867         BUG_ON(len);
1868
1869         return csum;
1870 }
1871 EXPORT_SYMBOL(skb_checksum);
1872
1873 /* Both of above in one bottle. */
1874
1875 __wsum skb_copy_and_csum_bits(const struct sk_buff *skb, int offset,
1876                                     u8 *to, int len, __wsum csum)
1877 {
1878         int start = skb_headlen(skb);
1879         int i, copy = start - offset;
1880         struct sk_buff *frag_iter;
1881         int pos = 0;
1882
1883         /* Copy header. */
1884         if (copy > 0) {
1885                 if (copy > len)
1886                         copy = len;
1887                 csum = csum_partial_copy_nocheck(skb->data + offset, to,
1888                                                  copy, csum);
1889                 if ((len -= copy) == 0)
1890                         return csum;
1891                 offset += copy;
1892                 to     += copy;
1893                 pos     = copy;
1894         }
1895
1896         for (i = 0; i < skb_shinfo(skb)->nr_frags; i++) {
1897                 int end;
1898
1899                 WARN_ON(start > offset + len);
1900
1901                 end = start + skb_frag_size(&skb_shinfo(skb)->frags[i]);
1902                 if ((copy = end - offset) > 0) {
1903                         __wsum csum2;
1904                         u8 *vaddr;
1905                         skb_frag_t *frag = &skb_shinfo(skb)->frags[i];
1906
1907                         if (copy > len)
1908                                 copy = len;
1909                         vaddr = kmap_skb_frag(frag);
1910                         csum2 = csum_partial_copy_nocheck(vaddr +
1911                                                           frag->page_offset +
1912                                                           offset - start, to,
1913                                                           copy, 0);
1914                         kunmap_skb_frag(vaddr);
1915                         csum = csum_block_add(csum, csum2, pos);
1916                         if (!(len -= copy))
1917                                 return csum;
1918                         offset += copy;
1919                         to     += copy;
1920                         pos    += copy;
1921                 }
1922                 start = end;
1923         }
1924
1925         skb_walk_frags(skb, frag_iter) {
1926                 __wsum csum2;
1927                 int end;
1928
1929                 WARN_ON(start > offset + len);
1930
1931                 end = start + frag_iter->len;
1932                 if ((copy = end - offset) > 0) {
1933                         if (copy > len)
1934                                 copy = len;
1935                         csum2 = skb_copy_and_csum_bits(frag_iter,
1936                                                        offset - start,
1937                                                        to, copy, 0);
1938                         csum = csum_block_add(csum, csum2, pos);
1939                         if ((len -= copy) == 0)
1940                                 return csum;
1941                         offset += copy;
1942                         to     += copy;
1943                         pos    += copy;
1944                 }
1945                 start = end;
1946         }
1947         BUG_ON(len);
1948         return csum;
1949 }
1950 EXPORT_SYMBOL(skb_copy_and_csum_bits);
1951
1952 void skb_copy_and_csum_dev(const struct sk_buff *skb, u8 *to)
1953 {
1954         __wsum csum;
1955         long csstart;
1956
1957         if (skb->ip_summed == CHECKSUM_PARTIAL)
1958                 csstart = skb_checksum_start_offset(skb);
1959         else
1960                 csstart = skb_headlen(skb);
1961
1962         BUG_ON(csstart > skb_headlen(skb));
1963
1964         skb_copy_from_linear_data(skb, to, csstart);
1965
1966         csum = 0;
1967         if (csstart != skb->len)
1968                 csum = skb_copy_and_csum_bits(skb, csstart, to + csstart,
1969                                               skb->len - csstart, 0);
1970
1971         if (skb->ip_summed == CHECKSUM_PARTIAL) {
1972                 long csstuff = csstart + skb->csum_offset;
1973
1974                 *((__sum16 *)(to + csstuff)) = csum_fold(csum);
1975         }
1976 }
1977 EXPORT_SYMBOL(skb_copy_and_csum_dev);
1978
1979 /**
1980  *      skb_dequeue - remove from the head of the queue
1981  *      @list: list to dequeue from
1982  *
1983  *      Remove the head of the list. The list lock is taken so the function
1984  *      may be used safely with other locking list functions. The head item is
1985  *      returned or %NULL if the list is empty.
1986  */
1987
1988 struct sk_buff *skb_dequeue(struct sk_buff_head *list)
1989 {
1990         unsigned long flags;
1991         struct sk_buff *result;
1992
1993         spin_lock_irqsave(&list->lock, flags);
1994         result = __skb_dequeue(list);
1995         spin_unlock_irqrestore(&list->lock, flags);
1996         return result;
1997 }
1998 EXPORT_SYMBOL(skb_dequeue);
1999
2000 /**
2001  *      skb_dequeue_tail - remove from the tail of the queue
2002  *      @list: list to dequeue from
2003  *
2004  *      Remove the tail of the list. The list lock is taken so the function
2005  *      may be used safely with other locking list functions. The tail item is
2006  *      returned or %NULL if the list is empty.
2007  */
2008 struct sk_buff *skb_dequeue_tail(struct sk_buff_head *list)
2009 {
2010         unsigned long flags;
2011         struct sk_buff *result;
2012
2013         spin_lock_irqsave(&list->lock, flags);
2014         result = __skb_dequeue_tail(list);
2015         spin_unlock_irqrestore(&list->lock, flags);
2016         return result;
2017 }
2018 EXPORT_SYMBOL(skb_dequeue_tail);
2019
2020 /**
2021  *      skb_queue_purge - empty a list
2022  *      @list: list to empty
2023  *
2024  *      Delete all buffers on an &sk_buff list. Each buffer is removed from
2025  *      the list and one reference dropped. This function takes the list
2026  *      lock and is atomic with respect to other list locking functions.
2027  */
2028 void skb_queue_purge(struct sk_buff_head *list)
2029 {
2030         struct sk_buff *skb;
2031         while ((skb = skb_dequeue(list)) != NULL)
2032                 kfree_skb(skb);
2033 }
2034 EXPORT_SYMBOL(skb_queue_purge);
2035
2036 /**
2037  *      skb_queue_head - queue a buffer at the list head
2038  *      @list: list to use
2039  *      @newsk: buffer to queue
2040  *
2041  *      Queue a buffer at the start of the list. This function takes the
2042  *      list lock and can be used safely with other locking &sk_buff functions
2043  *      safely.
2044  *
2045  *      A buffer cannot be placed on two lists at the same time.
2046  */
2047 void skb_queue_head(struct sk_buff_head *list, struct sk_buff *newsk)
2048 {
2049         unsigned long flags;
2050
2051         spin_lock_irqsave(&list->lock, flags);
2052         __skb_queue_head(list, newsk);
2053         spin_unlock_irqrestore(&list->lock, flags);
2054 }
2055 EXPORT_SYMBOL(skb_queue_head);
2056
2057 /**
2058  *      skb_queue_tail - queue a buffer at the list tail
2059  *      @list: list to use
2060  *      @newsk: buffer to queue
2061  *
2062  *      Queue a buffer at the tail of the list. This function takes the
2063  *      list lock and can be used safely with other locking &sk_buff functions
2064  *      safely.
2065  *
2066  *      A buffer cannot be placed on two lists at the same time.
2067  */
2068 void skb_queue_tail(struct sk_buff_head *list, struct sk_buff *newsk)
2069 {
2070         unsigned long flags;
2071
2072         spin_lock_irqsave(&list->lock, flags);
2073         __skb_queue_tail(list, newsk);
2074         spin_unlock_irqrestore(&list->lock, flags);
2075 }
2076 EXPORT_SYMBOL(skb_queue_tail);
2077
2078 /**
2079  *      skb_unlink      -       remove a buffer from a list
2080  *      @skb: buffer to remove
2081  *      @list: list to use
2082  *
2083  *      Remove a packet from a list. The list locks are taken and this
2084  *      function is atomic with respect to other list locked calls
2085  *
2086  *      You must know what list the SKB is on.
2087  */
2088 void skb_unlink(struct sk_buff *skb, struct sk_buff_head *list)
2089 {
2090         unsigned long flags;
2091
2092         spin_lock_irqsave(&list->lock, flags);
2093         __skb_unlink(skb, list);
2094         spin_unlock_irqrestore(&list->lock, flags);
2095 }
2096 EXPORT_SYMBOL(skb_unlink);
2097
2098 /**
2099  *      skb_append      -       append a buffer
2100  *      @old: buffer to insert after
2101  *      @newsk: buffer to insert
2102  *      @list: list to use
2103  *
2104  *      Place a packet after a given packet in a list. The list locks are taken
2105  *      and this function is atomic with respect to other list locked calls.
2106  *      A buffer cannot be placed on two lists at the same time.
2107  */
2108 void skb_append(struct sk_buff *old, struct sk_buff *newsk, struct sk_buff_head *list)
2109 {
2110         unsigned long flags;
2111
2112         spin_lock_irqsave(&list->lock, flags);
2113         __skb_queue_after(list, old, newsk);
2114         spin_unlock_irqrestore(&list->lock, flags);
2115 }
2116 EXPORT_SYMBOL(skb_append);
2117
2118 /**
2119  *      skb_insert      -       insert a buffer
2120  *      @old: buffer to insert before
2121  *      @newsk: buffer to insert
2122  *      @list: list to use
2123  *
2124  *      Place a packet before a given packet in a list. The list locks are
2125  *      taken and this function is atomic with respect to other list locked
2126  *      calls.
2127  *
2128  *      A buffer cannot be placed on two lists at the same time.
2129  */
2130 void skb_insert(struct sk_buff *old, struct sk_buff *newsk, struct sk_buff_head *list)
2131 {
2132         unsigned long flags;
2133
2134         spin_lock_irqsave(&list->lock, flags);
2135         __skb_insert(newsk, old->prev, old, list);
2136         spin_unlock_irqrestore(&list->lock, flags);
2137 }
2138 EXPORT_SYMBOL(skb_insert);
2139
2140 static inline void skb_split_inside_header(struct sk_buff *skb,
2141                                            struct sk_buff* skb1,
2142                                            const u32 len, const int pos)
2143 {
2144         int i;
2145
2146         skb_copy_from_linear_data_offset(skb, len, skb_put(skb1, pos - len),
2147                                          pos - len);
2148         /* And move data appendix as is. */
2149         for (i = 0; i < skb_shinfo(skb)->nr_frags; i++)
2150                 skb_shinfo(skb1)->frags[i] = skb_shinfo(skb)->frags[i];
2151
2152         skb_shinfo(skb1)->nr_frags = skb_shinfo(skb)->nr_frags;
2153         skb_shinfo(skb)->nr_frags  = 0;
2154         skb1->data_len             = skb->data_len;
2155         skb1->len                  += skb1->data_len;
2156         skb->data_len              = 0;
2157         skb->len                   = len;
2158         skb_set_tail_pointer(skb, len);
2159 }
2160
2161 static inline void skb_split_no_header(struct sk_buff *skb,
2162                                        struct sk_buff* skb1,
2163                                        const u32 len, int pos)
2164 {
2165         int i, k = 0;
2166         const int nfrags = skb_shinfo(skb)->nr_frags;
2167
2168         skb_shinfo(skb)->nr_frags = 0;
2169         skb1->len                 = skb1->data_len = skb->len - len;
2170         skb->len                  = len;
2171         skb->data_len             = len - pos;
2172
2173         for (i = 0; i < nfrags; i++) {
2174                 int size = skb_frag_size(&skb_shinfo(skb)->frags[i]);
2175
2176                 if (pos + size > len) {
2177                         skb_shinfo(skb1)->frags[k] = skb_shinfo(skb)->frags[i];
2178
2179                         if (pos < len) {
2180                                 /* Split frag.
2181                                  * We have two variants in this case:
2182                                  * 1. Move all the frag to the second
2183                                  *    part, if it is possible. F.e.
2184                                  *    this approach is mandatory for TUX,
2185                                  *    where splitting is expensive.
2186                                  * 2. Split is accurately. We make this.
2187                                  */
2188                                 skb_frag_ref(skb, i);
2189                                 skb_shinfo(skb1)->frags[0].page_offset += len - pos;
2190                                 skb_frag_size_sub(&skb_shinfo(skb1)->frags[0], len - pos);
2191                                 skb_frag_size_set(&skb_shinfo(skb)->frags[i], len - pos);
2192                                 skb_shinfo(skb)->nr_frags++;
2193                         }
2194                         k++;
2195                 } else
2196                         skb_shinfo(skb)->nr_frags++;
2197                 pos += size;
2198         }
2199         skb_shinfo(skb1)->nr_frags = k;
2200 }
2201
2202 /**
2203  * skb_split - Split fragmented skb to two parts at length len.
2204  * @skb: the buffer to split
2205  * @skb1: the buffer to receive the second part
2206  * @len: new length for skb
2207  */
2208 void skb_split(struct sk_buff *skb, struct sk_buff *skb1, const u32 len)
2209 {
2210         int pos = skb_headlen(skb);
2211
2212         if (len < pos)  /* Split line is inside header. */
2213                 skb_split_inside_header(skb, skb1, len, pos);
2214         else            /* Second chunk has no header, nothing to copy. */
2215                 skb_split_no_header(skb, skb1, len, pos);
2216 }
2217 EXPORT_SYMBOL(skb_split);
2218
2219 /* Shifting from/to a cloned skb is a no-go.
2220  *
2221  * Caller cannot keep skb_shinfo related pointers past calling here!
2222  */
2223 static int skb_prepare_for_shift(struct sk_buff *skb)
2224 {
2225         return skb_cloned(skb) && pskb_expand_head(skb, 0, 0, GFP_ATOMIC);
2226 }
2227
2228 /**
2229  * skb_shift - Shifts paged data partially from skb to another
2230  * @tgt: buffer into which tail data gets added
2231  * @skb: buffer from which the paged data comes from
2232  * @shiftlen: shift up to this many bytes
2233  *
2234  * Attempts to shift up to shiftlen worth of bytes, which may be less than
2235  * the length of the skb, from skb to tgt. Returns number bytes shifted.
2236  * It's up to caller to free skb if everything was shifted.
2237  *
2238  * If @tgt runs out of frags, the whole operation is aborted.
2239  *
2240  * Skb cannot include anything else but paged data while tgt is allowed
2241  * to have non-paged data as well.
2242  *
2243  * TODO: full sized shift could be optimized but that would need
2244  * specialized skb free'er to handle frags without up-to-date nr_frags.
2245  */
2246 int skb_shift(struct sk_buff *tgt, struct sk_buff *skb, int shiftlen)
2247 {
2248         int from, to, merge, todo;
2249         struct skb_frag_struct *fragfrom, *fragto;
2250
2251         BUG_ON(shiftlen > skb->len);
2252         BUG_ON(skb_headlen(skb));       /* Would corrupt stream */
2253
2254         todo = shiftlen;
2255         from = 0;
2256         to = skb_shinfo(tgt)->nr_frags;
2257         fragfrom = &skb_shinfo(skb)->frags[from];
2258
2259         /* Actual merge is delayed until the point when we know we can
2260          * commit all, so that we don't have to undo partial changes
2261          */
2262         if (!to ||
2263             !skb_can_coalesce(tgt, to, skb_frag_page(fragfrom),
2264                               fragfrom->page_offset)) {
2265                 merge = -1;
2266         } else {
2267                 merge = to - 1;
2268
2269                 todo -= skb_frag_size(fragfrom);
2270                 if (todo < 0) {
2271                         if (skb_prepare_for_shift(skb) ||
2272                             skb_prepare_for_shift(tgt))
2273                                 return 0;
2274
2275                         /* All previous frag pointers might be stale! */
2276                         fragfrom = &skb_shinfo(skb)->frags[from];
2277                         fragto = &skb_shinfo(tgt)->frags[merge];
2278
2279                         skb_frag_size_add(fragto, shiftlen);
2280                         skb_frag_size_sub(fragfrom, shiftlen);
2281                         fragfrom->page_offset += shiftlen;
2282
2283                         goto onlymerged;
2284                 }
2285
2286                 from++;
2287         }
2288
2289         /* Skip full, not-fitting skb to avoid expensive operations */
2290         if ((shiftlen == skb->len) &&
2291             (skb_shinfo(skb)->nr_frags - from) > (MAX_SKB_FRAGS - to))
2292                 return 0;
2293
2294         if (skb_prepare_for_shift(skb) || skb_prepare_for_shift(tgt))
2295                 return 0;
2296
2297         while ((todo > 0) && (from < skb_shinfo(skb)->nr_frags)) {
2298                 if (to == MAX_SKB_FRAGS)
2299                         return 0;
2300
2301                 fragfrom = &skb_shinfo(skb)->frags[from];
2302                 fragto = &skb_shinfo(tgt)->frags[to];
2303
2304                 if (todo >= skb_frag_size(fragfrom)) {
2305                         *fragto = *fragfrom;
2306                         todo -= skb_frag_size(fragfrom);
2307                         from++;
2308                         to++;
2309
2310                 } else {
2311                         __skb_frag_ref(fragfrom);
2312                         fragto->page = fragfrom->page;
2313                         fragto->page_offset = fragfrom->page_offset;
2314                         skb_frag_size_set(fragto, todo);
2315
2316                         fragfrom->page_offset += todo;
2317                         skb_frag_size_sub(fragfrom, todo);
2318                         todo = 0;
2319
2320                         to++;
2321                         break;
2322                 }
2323         }
2324
2325         /* Ready to "commit" this state change to tgt */
2326         skb_shinfo(tgt)->nr_frags = to;
2327
2328         if (merge >= 0) {
2329                 fragfrom = &skb_shinfo(skb)->frags[0];
2330                 fragto = &skb_shinfo(tgt)->frags[merge];
2331
2332                 skb_frag_size_add(fragto, skb_frag_size(fragfrom));
2333                 __skb_frag_unref(fragfrom);
2334         }
2335
2336         /* Reposition in the original skb */
2337         to = 0;
2338         while (from < skb_shinfo(skb)->nr_frags)
2339                 skb_shinfo(skb)->frags[to++] = skb_shinfo(skb)->frags[from++];
2340         skb_shinfo(skb)->nr_frags = to;
2341
2342         BUG_ON(todo > 0 && !skb_shinfo(skb)->nr_frags);
2343
2344 onlymerged:
2345         /* Most likely the tgt won't ever need its checksum anymore, skb on
2346          * the other hand might need it if it needs to be resent
2347          */
2348         tgt->ip_summed = CHECKSUM_PARTIAL;
2349         skb->ip_summed = CHECKSUM_PARTIAL;
2350
2351         /* Yak, is it really working this way? Some helper please? */
2352         skb->len -= shiftlen;
2353         skb->data_len -= shiftlen;
2354         skb->truesize -= shiftlen;
2355         tgt->len += shiftlen;
2356         tgt->data_len += shiftlen;
2357         tgt->truesize += shiftlen;
2358
2359         return shiftlen;
2360 }
2361
2362 /**
2363  * skb_prepare_seq_read - Prepare a sequential read of skb data
2364  * @skb: the buffer to read
2365  * @from: lower offset of data to be read
2366  * @to: upper offset of data to be read
2367  * @st: state variable
2368  *
2369  * Initializes the specified state variable. Must be called before
2370  * invoking skb_seq_read() for the first time.
2371  */
2372 void skb_prepare_seq_read(struct sk_buff *skb, unsigned int from,
2373                           unsigned int to, struct skb_seq_state *st)
2374 {
2375         st->lower_offset = from;
2376         st->upper_offset = to;
2377         st->root_skb = st->cur_skb = skb;
2378         st->frag_idx = st->stepped_offset = 0;
2379         st->frag_data = NULL;
2380 }
2381 EXPORT_SYMBOL(skb_prepare_seq_read);
2382
2383 /**
2384  * skb_seq_read - Sequentially read skb data
2385  * @consumed: number of bytes consumed by the caller so far
2386  * @data: destination pointer for data to be returned
2387  * @st: state variable
2388  *
2389  * Reads a block of skb data at &consumed relative to the
2390  * lower offset specified to skb_prepare_seq_read(). Assigns
2391  * the head of the data block to &data and returns the length
2392  * of the block or 0 if the end of the skb data or the upper
2393  * offset has been reached.
2394  *
2395  * The caller is not required to consume all of the data
2396  * returned, i.e. &consumed is typically set to the number
2397  * of bytes already consumed and the next call to
2398  * skb_seq_read() will return the remaining part of the block.
2399  *
2400  * Note 1: The size of each block of data returned can be arbitrary,
2401  *       this limitation is the cost for zerocopy seqeuental
2402  *       reads of potentially non linear data.
2403  *
2404  * Note 2: Fragment lists within fragments are not implemented
2405  *       at the moment, state->root_skb could be replaced with
2406  *       a stack for this purpose.
2407  */
2408 unsigned int skb_seq_read(unsigned int consumed, const u8 **data,
2409                           struct skb_seq_state *st)
2410 {
2411         unsigned int block_limit, abs_offset = consumed + st->lower_offset;
2412         skb_frag_t *frag;
2413
2414         if (unlikely(abs_offset >= st->upper_offset))
2415                 return 0;
2416
2417 next_skb:
2418         block_limit = skb_headlen(st->cur_skb) + st->stepped_offset;
2419
2420         if (abs_offset < block_limit && !st->frag_data) {
2421                 *data = st->cur_skb->data + (abs_offset - st->stepped_offset);
2422                 return block_limit - abs_offset;
2423         }
2424
2425         if (st->frag_idx == 0 && !st->frag_data)
2426                 st->stepped_offset += skb_headlen(st->cur_skb);
2427
2428         while (st->frag_idx < skb_shinfo(st->cur_skb)->nr_frags) {
2429                 frag = &skb_shinfo(st->cur_skb)->frags[st->frag_idx];
2430                 block_limit = skb_frag_size(frag) + st->stepped_offset;
2431
2432                 if (abs_offset < block_limit) {
2433                         if (!st->frag_data)
2434                                 st->frag_data = kmap_skb_frag(frag);
2435
2436                         *data = (u8 *) st->frag_data + frag->page_offset +
2437                                 (abs_offset - st->stepped_offset);
2438
2439                         return block_limit - abs_offset;
2440                 }
2441
2442                 if (st->frag_data) {
2443                         kunmap_skb_frag(st->frag_data);
2444                         st->frag_data = NULL;
2445                 }
2446
2447                 st->frag_idx++;
2448                 st->stepped_offset += skb_frag_size(frag);
2449         }
2450
2451         if (st->frag_data) {
2452                 kunmap_skb_frag(st->frag_data);
2453                 st->frag_data = NULL;
2454         }
2455
2456         if (st->root_skb == st->cur_skb && skb_has_frag_list(st->root_skb)) {
2457                 st->cur_skb = skb_shinfo(st->root_skb)->frag_list;
2458                 st->frag_idx = 0;
2459                 goto next_skb;
2460         } else if (st->cur_skb->next) {
2461                 st->cur_skb = st->cur_skb->next;
2462                 st->frag_idx = 0;
2463                 goto next_skb;
2464         }
2465
2466         return 0;
2467 }
2468 EXPORT_SYMBOL(skb_seq_read);
2469
2470 /**
2471  * skb_abort_seq_read - Abort a sequential read of skb data
2472  * @st: state variable
2473  *
2474  * Must be called if skb_seq_read() was not called until it
2475  * returned 0.
2476  */
2477 void skb_abort_seq_read(struct skb_seq_state *st)
2478 {
2479         if (st->frag_data)
2480                 kunmap_skb_frag(st->frag_data);
2481 }
2482 EXPORT_SYMBOL(skb_abort_seq_read);
2483
2484 #define TS_SKB_CB(state)        ((struct skb_seq_state *) &((state)->cb))
2485
2486 static unsigned int skb_ts_get_next_block(unsigned int offset, const u8 **text,
2487                                           struct ts_config *conf,
2488                                           struct ts_state *state)
2489 {
2490         return skb_seq_read(offset, text, TS_SKB_CB(state));
2491 }
2492
2493 static void skb_ts_finish(struct ts_config *conf, struct ts_state *state)
2494 {
2495         skb_abort_seq_read(TS_SKB_CB(state));
2496 }
2497
2498 /**
2499  * skb_find_text - Find a text pattern in skb data
2500  * @skb: the buffer to look in
2501  * @from: search offset
2502  * @to: search limit
2503  * @config: textsearch configuration
2504  * @state: uninitialized textsearch state variable
2505  *
2506  * Finds a pattern in the skb data according to the specified
2507  * textsearch configuration. Use textsearch_next() to retrieve
2508  * subsequent occurrences of the pattern. Returns the offset
2509  * to the first occurrence or UINT_MAX if no match was found.
2510  */
2511 unsigned int skb_find_text(struct sk_buff *skb, unsigned int from,
2512                            unsigned int to, struct ts_config *config,
2513                            struct ts_state *state)
2514 {
2515         unsigned int ret;
2516
2517         config->get_next_block = skb_ts_get_next_block;
2518         config->finish = skb_ts_finish;
2519
2520         skb_prepare_seq_read(skb, from, to, TS_SKB_CB(state));
2521
2522         ret = textsearch_find(config, state);
2523         return (ret <= to - from ? ret : UINT_MAX);
2524 }
2525 EXPORT_SYMBOL(skb_find_text);
2526
2527 /**
2528  * skb_append_datato_frags: - append the user data to a skb
2529  * @sk: sock  structure
2530  * @skb: skb structure to be appened with user data.
2531  * @getfrag: call back function to be used for getting the user data
2532  * @from: pointer to user message iov
2533  * @length: length of the iov message
2534  *
2535  * Description: This procedure append the user data in the fragment part
2536  * of the skb if any page alloc fails user this procedure returns  -ENOMEM
2537  */
2538 int skb_append_datato_frags(struct sock *sk, struct sk_buff *skb,
2539                         int (*getfrag)(void *from, char *to, int offset,
2540                                         int len, int odd, struct sk_buff *skb),
2541                         void *from, int length)
2542 {
2543         int frg_cnt = 0;
2544         skb_frag_t *frag = NULL;
2545         struct page *page = NULL;
2546         int copy, left;
2547         int offset = 0;
2548         int ret;
2549
2550         do {
2551                 /* Return error if we don't have space for new frag */
2552                 frg_cnt = skb_shinfo(skb)->nr_frags;
2553                 if (frg_cnt >= MAX_SKB_FRAGS)
2554                         return -EFAULT;
2555
2556                 /* allocate a new page for next frag */
2557                 page = alloc_pages(sk->sk_allocation, 0);
2558
2559                 /* If alloc_page fails just return failure and caller will
2560                  * free previous allocated pages by doing kfree_skb()
2561                  */
2562                 if (page == NULL)
2563                         return -ENOMEM;
2564
2565                 /* initialize the next frag */
2566                 skb_fill_page_desc(skb, frg_cnt, page, 0, 0);
2567                 skb->truesize += PAGE_SIZE;
2568                 atomic_add(PAGE_SIZE, &sk->sk_wmem_alloc);
2569
2570                 /* get the new initialized frag */
2571                 frg_cnt = skb_shinfo(skb)->nr_frags;
2572                 frag = &skb_shinfo(skb)->frags[frg_cnt - 1];
2573
2574                 /* copy the user data to page */
2575                 left = PAGE_SIZE - frag->page_offset;
2576                 copy = (length > left)? left : length;
2577
2578                 ret = getfrag(from, skb_frag_address(frag) + skb_frag_size(frag),
2579                             offset, copy, 0, skb);
2580                 if (ret < 0)
2581                         return -EFAULT;
2582
2583                 /* copy was successful so update the size parameters */
2584                 skb_frag_size_add(frag, copy);
2585                 skb->len += copy;
2586                 skb->data_len += copy;
2587                 offset += copy;
2588                 length -= copy;
2589
2590         } while (length > 0);
2591
2592         return 0;
2593 }
2594 EXPORT_SYMBOL(skb_append_datato_frags);
2595
2596 /**
2597  *      skb_pull_rcsum - pull skb and update receive checksum
2598  *      @skb: buffer to update
2599  *      @len: length of data pulled
2600  *
2601  *      This function performs an skb_pull on the packet and updates
2602  *      the CHECKSUM_COMPLETE checksum.  It should be used on
2603  *      receive path processing instead of skb_pull unless you know
2604  *      that the checksum difference is zero (e.g., a valid IP header)
2605  *      or you are setting ip_summed to CHECKSUM_NONE.
2606  */
2607 unsigned char *skb_pull_rcsum(struct sk_buff *skb, unsigned int len)
2608 {
2609         BUG_ON(len > skb->len);
2610         skb->len -= len;
2611         BUG_ON(skb->len < skb->data_len);
2612         skb_postpull_rcsum(skb, skb->data, len);
2613         return skb->data += len;
2614 }
2615 EXPORT_SYMBOL_GPL(skb_pull_rcsum);
2616
2617 /**
2618  *      skb_segment - Perform protocol segmentation on skb.
2619  *      @skb: buffer to segment
2620  *      @features: features for the output path (see dev->features)
2621  *
2622  *      This function performs segmentation on the given skb.  It returns
2623  *      a pointer to the first in a list of new skbs for the segments.
2624  *      In case of error it returns ERR_PTR(err).
2625  */
2626 struct sk_buff *skb_segment(struct sk_buff *skb, u32 features)
2627 {
2628         struct sk_buff *segs = NULL;
2629         struct sk_buff *tail = NULL;
2630         struct sk_buff *fskb = skb_shinfo(skb)->frag_list;
2631         unsigned int mss = skb_shinfo(skb)->gso_size;
2632         unsigned int doffset = skb->data - skb_mac_header(skb);
2633         unsigned int offset = doffset;
2634         unsigned int headroom;
2635         unsigned int len;
2636         int sg = !!(features & NETIF_F_SG);
2637         int nfrags = skb_shinfo(skb)->nr_frags;
2638         int err = -ENOMEM;
2639         int i = 0;
2640         int pos;
2641
2642         __skb_push(skb, doffset);
2643         headroom = skb_headroom(skb);
2644         pos = skb_headlen(skb);
2645
2646         do {
2647                 struct sk_buff *nskb;
2648                 skb_frag_t *frag;
2649                 int hsize;
2650                 int size;
2651
2652                 len = skb->len - offset;
2653                 if (len > mss)
2654                         len = mss;
2655
2656                 hsize = skb_headlen(skb) - offset;
2657                 if (hsize < 0)
2658                         hsize = 0;
2659                 if (hsize > len || !sg)
2660                         hsize = len;
2661
2662                 if (!hsize && i >= nfrags) {
2663                         BUG_ON(fskb->len != len);
2664
2665                         pos += len;
2666                         nskb = skb_clone(fskb, GFP_ATOMIC);
2667                         fskb = fskb->next;
2668
2669                         if (unlikely(!nskb))
2670                                 goto err;
2671
2672                         hsize = skb_end_pointer(nskb) - nskb->head;
2673                         if (skb_cow_head(nskb, doffset + headroom)) {
2674                                 kfree_skb(nskb);
2675                                 goto err;
2676                         }
2677
2678                         nskb->truesize += skb_end_pointer(nskb) - nskb->head -
2679                                           hsize;
2680                         skb_release_head_state(nskb);
2681                         __skb_push(nskb, doffset);
2682                 } else {
2683                         nskb = alloc_skb(hsize + doffset + headroom,
2684                                          GFP_ATOMIC);
2685
2686                         if (unlikely(!nskb))
2687                                 goto err;
2688
2689                         skb_reserve(nskb, headroom);
2690                         __skb_put(nskb, doffset);
2691                 }
2692
2693                 if (segs)
2694                         tail->next = nskb;
2695                 else
2696                         segs = nskb;
2697                 tail = nskb;
2698
2699                 __copy_skb_header(nskb, skb);
2700                 nskb->mac_len = skb->mac_len;
2701
2702                 /* nskb and skb might have different headroom */
2703                 if (nskb->ip_summed == CHECKSUM_PARTIAL)
2704                         nskb->csum_start += skb_headroom(nskb) - headroom;
2705
2706                 skb_reset_mac_header(nskb);
2707                 skb_set_network_header(nskb, skb->mac_len);
2708                 nskb->transport_header = (nskb->network_header +
2709                                           skb_network_header_len(skb));
2710                 skb_copy_from_linear_data(skb, nskb->data, doffset);
2711
2712                 if (fskb != skb_shinfo(skb)->frag_list)
2713                         continue;
2714
2715                 if (!sg) {
2716                         nskb->ip_summed = CHECKSUM_NONE;
2717                         nskb->csum = skb_copy_and_csum_bits(skb, offset,
2718                                                             skb_put(nskb, len),
2719                                                             len, 0);
2720                         continue;
2721                 }
2722
2723                 frag = skb_shinfo(nskb)->frags;
2724
2725                 skb_copy_from_linear_data_offset(skb, offset,
2726                                                  skb_put(nskb, hsize), hsize);
2727
2728                 while (pos < offset + len && i < nfrags) {
2729                         *frag = skb_shinfo(skb)->frags[i];
2730                         __skb_frag_ref(frag);
2731                         size = skb_frag_size(frag);
2732
2733                         if (pos < offset) {
2734                                 frag->page_offset += offset - pos;
2735                                 skb_frag_size_sub(frag, offset - pos);
2736                         }
2737
2738                         skb_shinfo(nskb)->nr_frags++;
2739
2740                         if (pos + size <= offset + len) {
2741                                 i++;
2742                                 pos += size;
2743                         } else {
2744                                 skb_frag_size_sub(frag, pos + size - (offset + len));
2745                                 goto skip_fraglist;
2746                         }
2747
2748                         frag++;
2749                 }
2750
2751                 if (pos < offset + len) {
2752                         struct sk_buff *fskb2 = fskb;
2753
2754                         BUG_ON(pos + fskb->len != offset + len);
2755
2756                         pos += fskb->len;
2757                         fskb = fskb->next;
2758
2759                         if (fskb2->next) {
2760                                 fskb2 = skb_clone(fskb2, GFP_ATOMIC);
2761                                 if (!fskb2)
2762                                         goto err;
2763                         } else
2764                                 skb_get(fskb2);
2765
2766                         SKB_FRAG_ASSERT(nskb);
2767                         skb_shinfo(nskb)->frag_list = fskb2;
2768                 }
2769
2770 skip_fraglist:
2771                 nskb->data_len = len - hsize;
2772                 nskb->len += nskb->data_len;
2773                 nskb->truesize += nskb->data_len;
2774         } while ((offset += len) < skb->len);
2775
2776         return segs;
2777
2778 err:
2779         while ((skb = segs)) {
2780                 segs = skb->next;
2781                 kfree_skb(skb);
2782         }
2783         return ERR_PTR(err);
2784 }
2785 EXPORT_SYMBOL_GPL(skb_segment);
2786
2787 int skb_gro_receive(struct sk_buff **head, struct sk_buff *skb)
2788 {
2789         struct sk_buff *p = *head;
2790         struct sk_buff *nskb;
2791         struct skb_shared_info *skbinfo = skb_shinfo(skb);
2792         struct skb_shared_info *pinfo = skb_shinfo(p);
2793         unsigned int headroom;
2794         unsigned int len = skb_gro_len(skb);
2795         unsigned int offset = skb_gro_offset(skb);
2796         unsigned int headlen = skb_headlen(skb);
2797
2798         if (p->len + len >= 65536)
2799                 return -E2BIG;
2800
2801         if (pinfo->frag_list)
2802                 goto merge;
2803         else if (headlen <= offset) {
2804                 skb_frag_t *frag;
2805                 skb_frag_t *frag2;
2806                 int i = skbinfo->nr_frags;
2807                 int nr_frags = pinfo->nr_frags + i;
2808
2809                 offset -= headlen;
2810
2811                 if (nr_frags > MAX_SKB_FRAGS)
2812                         return -E2BIG;
2813
2814                 pinfo->nr_frags = nr_frags;
2815                 skbinfo->nr_frags = 0;
2816
2817                 frag = pinfo->frags + nr_frags;
2818                 frag2 = skbinfo->frags + i;
2819                 do {
2820                         *--frag = *--frag2;
2821                 } while (--i);
2822
2823                 frag->page_offset += offset;
2824                 skb_frag_size_sub(frag, offset);
2825
2826                 skb->truesize -= skb->data_len;
2827                 skb->len -= skb->data_len;
2828                 skb->data_len = 0;
2829
2830                 NAPI_GRO_CB(skb)->free = 1;
2831                 goto done;
2832         } else if (skb_gro_len(p) != pinfo->gso_size)
2833                 return -E2BIG;
2834
2835         headroom = skb_headroom(p);
2836         nskb = alloc_skb(headroom + skb_gro_offset(p), GFP_ATOMIC);
2837         if (unlikely(!nskb))
2838                 return -ENOMEM;
2839
2840         __copy_skb_header(nskb, p);
2841         nskb->mac_len = p->mac_len;
2842
2843         skb_reserve(nskb, headroom);
2844         __skb_put(nskb, skb_gro_offset(p));
2845
2846         skb_set_mac_header(nskb, skb_mac_header(p) - p->data);
2847         skb_set_network_header(nskb, skb_network_offset(p));
2848         skb_set_transport_header(nskb, skb_transport_offset(p));
2849
2850         __skb_pull(p, skb_gro_offset(p));
2851         memcpy(skb_mac_header(nskb), skb_mac_header(p),
2852                p->data - skb_mac_header(p));
2853
2854         *NAPI_GRO_CB(nskb) = *NAPI_GRO_CB(p);
2855         skb_shinfo(nskb)->frag_list = p;
2856         skb_shinfo(nskb)->gso_size = pinfo->gso_size;
2857         pinfo->gso_size = 0;
2858         skb_header_release(p);
2859         nskb->prev = p;
2860
2861         nskb->data_len += p->len;
2862         nskb->truesize += p->len;
2863         nskb->len += p->len;
2864
2865         *head = nskb;
2866         nskb->next = p->next;
2867         p->next = NULL;
2868
2869         p = nskb;
2870
2871 merge:
2872         if (offset > headlen) {
2873                 unsigned int eat = offset - headlen;
2874
2875                 skbinfo->frags[0].page_offset += eat;
2876                 skb_frag_size_sub(&skbinfo->frags[0], eat);
2877                 skb->data_len -= eat;
2878                 skb->len -= eat;
2879                 offset = headlen;
2880         }
2881
2882         __skb_pull(skb, offset);
2883
2884         p->prev->next = skb;
2885         p->prev = skb;
2886         skb_header_release(skb);
2887
2888 done:
2889         NAPI_GRO_CB(p)->count++;
2890         p->data_len += len;
2891         p->truesize += len;
2892         p->len += len;
2893
2894         NAPI_GRO_CB(skb)->same_flow = 1;
2895         return 0;
2896 }
2897 EXPORT_SYMBOL_GPL(skb_gro_receive);
2898
2899 void __init skb_init(void)
2900 {
2901         skbuff_head_cache = kmem_cache_create("skbuff_head_cache",
2902                                               sizeof(struct sk_buff),
2903                                               0,
2904                                               SLAB_HWCACHE_ALIGN|SLAB_PANIC,
2905                                               NULL);
2906         skbuff_fclone_cache = kmem_cache_create("skbuff_fclone_cache",
2907                                                 (2*sizeof(struct sk_buff)) +
2908                                                 sizeof(atomic_t),
2909                                                 0,
2910                                                 SLAB_HWCACHE_ALIGN|SLAB_PANIC,
2911                                                 NULL);
2912 }
2913
2914 /**
2915  *      skb_to_sgvec - Fill a scatter-gather list from a socket buffer
2916  *      @skb: Socket buffer containing the buffers to be mapped
2917  *      @sg: The scatter-gather list to map into
2918  *      @offset: The offset into the buffer's contents to start mapping
2919  *      @len: Length of buffer space to be mapped
2920  *
2921  *      Fill the specified scatter-gather list with mappings/pointers into a
2922  *      region of the buffer space attached to a socket buffer.
2923  */
2924 static int
2925 __skb_to_sgvec(struct sk_buff *skb, struct scatterlist *sg, int offset, int len)
2926 {
2927         int start = skb_headlen(skb);
2928         int i, copy = start - offset;
2929         struct sk_buff *frag_iter;
2930         int elt = 0;
2931
2932         if (copy > 0) {
2933                 if (copy > len)
2934                         copy = len;
2935                 sg_set_buf(sg, skb->data + offset, copy);
2936                 elt++;
2937                 if ((len -= copy) == 0)
2938                         return elt;
2939                 offset += copy;
2940         }
2941
2942         for (i = 0; i < skb_shinfo(skb)->nr_frags; i++) {
2943                 int end;
2944
2945                 WARN_ON(start > offset + len);
2946
2947                 end = start + skb_frag_size(&skb_shinfo(skb)->frags[i]);
2948                 if ((copy = end - offset) > 0) {
2949                         skb_frag_t *frag = &skb_shinfo(skb)->frags[i];
2950
2951                         if (copy > len)
2952                                 copy = len;
2953                         sg_set_page(&sg[elt], skb_frag_page(frag), copy,
2954                                         frag->page_offset+offset-start);
2955                         elt++;
2956                         if (!(len -= copy))
2957                                 return elt;
2958                         offset += copy;
2959                 }
2960                 start = end;
2961         }
2962
2963         skb_walk_frags(skb, frag_iter) {
2964                 int end;
2965
2966                 WARN_ON(start > offset + len);
2967
2968                 end = start + frag_iter->len;
2969                 if ((copy = end - offset) > 0) {
2970                         if (copy > len)
2971                                 copy = len;
2972                         elt += __skb_to_sgvec(frag_iter, sg+elt, offset - start,
2973                                               copy);
2974                         if ((len -= copy) == 0)
2975                                 return elt;
2976                         offset += copy;
2977                 }
2978                 start = end;
2979         }
2980         BUG_ON(len);
2981         return elt;
2982 }
2983
2984 int skb_to_sgvec(struct sk_buff *skb, struct scatterlist *sg, int offset, int len)
2985 {
2986         int nsg = __skb_to_sgvec(skb, sg, offset, len);
2987
2988         sg_mark_end(&sg[nsg - 1]);
2989
2990         return nsg;
2991 }
2992 EXPORT_SYMBOL_GPL(skb_to_sgvec);
2993
2994 /**
2995  *      skb_cow_data - Check that a socket buffer's data buffers are writable
2996  *      @skb: The socket buffer to check.
2997  *      @tailbits: Amount of trailing space to be added
2998  *      @trailer: Returned pointer to the skb where the @tailbits space begins
2999  *
3000  *      Make sure that the data buffers attached to a socket buffer are
3001  *      writable. If they are not, private copies are made of the data buffers
3002  *      and the socket buffer is set to use these instead.
3003  *
3004  *      If @tailbits is given, make sure that there is space to write @tailbits
3005  *      bytes of data beyond current end of socket buffer.  @trailer will be
3006  *      set to point to the skb in which this space begins.
3007  *
3008  *      The number of scatterlist elements required to completely map the
3009  *      COW'd and extended socket buffer will be returned.
3010  */
3011 int skb_cow_data(struct sk_buff *skb, int tailbits, struct sk_buff **trailer)
3012 {
3013         int copyflag;
3014         int elt;
3015         struct sk_buff *skb1, **skb_p;
3016
3017         /* If skb is cloned or its head is paged, reallocate
3018          * head pulling out all the pages (pages are considered not writable
3019          * at the moment even if they are anonymous).
3020          */
3021         if ((skb_cloned(skb) || skb_shinfo(skb)->nr_frags) &&
3022             __pskb_pull_tail(skb, skb_pagelen(skb)-skb_headlen(skb)) == NULL)
3023                 return -ENOMEM;
3024
3025         /* Easy case. Most of packets will go this way. */
3026         if (!skb_has_frag_list(skb)) {
3027                 /* A little of trouble, not enough of space for trailer.
3028                  * This should not happen, when stack is tuned to generate
3029                  * good frames. OK, on miss we reallocate and reserve even more
3030                  * space, 128 bytes is fair. */
3031
3032                 if (skb_tailroom(skb) < tailbits &&
3033                     pskb_expand_head(skb, 0, tailbits-skb_tailroom(skb)+128, GFP_ATOMIC))
3034                         return -ENOMEM;
3035
3036                 /* Voila! */
3037                 *trailer = skb;
3038                 return 1;
3039         }
3040
3041         /* Misery. We are in troubles, going to mincer fragments... */
3042
3043         elt = 1;
3044         skb_p = &skb_shinfo(skb)->frag_list;
3045         copyflag = 0;
3046
3047         while ((skb1 = *skb_p) != NULL) {
3048                 int ntail = 0;
3049
3050                 /* The fragment is partially pulled by someone,
3051                  * this can happen on input. Copy it and everything
3052                  * after it. */
3053
3054                 if (skb_shared(skb1))
3055                         copyflag = 1;
3056
3057                 /* If the skb is the last, worry about trailer. */
3058
3059                 if (skb1->next == NULL && tailbits) {
3060                         if (skb_shinfo(skb1)->nr_frags ||
3061                             skb_has_frag_list(skb1) ||
3062                             skb_tailroom(skb1) < tailbits)
3063                                 ntail = tailbits + 128;
3064                 }
3065
3066                 if (copyflag ||
3067                     skb_cloned(skb1) ||
3068                     ntail ||
3069                     skb_shinfo(skb1)->nr_frags ||
3070                     skb_has_frag_list(skb1)) {
3071                         struct sk_buff *skb2;
3072
3073                         /* Fuck, we are miserable poor guys... */
3074                         if (ntail == 0)
3075                                 skb2 = skb_copy(skb1, GFP_ATOMIC);
3076                         else
3077                                 skb2 = skb_copy_expand(skb1,
3078                                                        skb_headroom(skb1),
3079                                                        ntail,
3080                                                        GFP_ATOMIC);
3081                         if (unlikely(skb2 == NULL))
3082                                 return -ENOMEM;
3083
3084                         if (skb1->sk)
3085                                 skb_set_owner_w(skb2, skb1->sk);
3086
3087                         /* Looking around. Are we still alive?
3088                          * OK, link new skb, drop old one */
3089
3090                         skb2->next = skb1->next;
3091                         *skb_p = skb2;
3092                         kfree_skb(skb1);
3093                         skb1 = skb2;
3094                 }
3095                 elt++;
3096                 *trailer = skb1;
3097                 skb_p = &skb1->next;
3098         }
3099
3100         return elt;
3101 }
3102 EXPORT_SYMBOL_GPL(skb_cow_data);
3103
3104 static void sock_rmem_free(struct sk_buff *skb)
3105 {
3106         struct sock *sk = skb->sk;
3107
3108         atomic_sub(skb->truesize, &sk->sk_rmem_alloc);
3109 }
3110
3111 /*
3112  * Note: We dont mem charge error packets (no sk_forward_alloc changes)
3113  */
3114 int sock_queue_err_skb(struct sock *sk, struct sk_buff *skb)
3115 {
3116         int len = skb->len;
3117
3118         if (atomic_read(&sk->sk_rmem_alloc) + skb->truesize >=
3119             (unsigned)sk->sk_rcvbuf)
3120                 return -ENOMEM;
3121
3122         skb_orphan(skb);
3123         skb->sk = sk;
3124         skb->destructor = sock_rmem_free;
3125         atomic_add(skb->truesize, &sk->sk_rmem_alloc);
3126
3127         /* before exiting rcu section, make sure dst is refcounted */
3128         skb_dst_force(skb);
3129
3130         skb_queue_tail(&sk->sk_error_queue, skb);
3131         if (!sock_flag(sk, SOCK_DEAD))
3132                 sk->sk_data_ready(sk, len);
3133         return 0;
3134 }
3135 EXPORT_SYMBOL(sock_queue_err_skb);
3136
3137 void skb_tstamp_tx(struct sk_buff *orig_skb,
3138                 struct skb_shared_hwtstamps *hwtstamps)
3139 {
3140         struct sock *sk = orig_skb->sk;
3141         struct sock_exterr_skb *serr;
3142         struct sk_buff *skb;
3143         int err;
3144
3145         if (!sk)
3146                 return;
3147
3148         skb = skb_clone(orig_skb, GFP_ATOMIC);
3149         if (!skb)
3150                 return;
3151
3152         if (hwtstamps) {
3153                 *skb_hwtstamps(skb) =
3154                         *hwtstamps;
3155         } else {
3156                 /*
3157                  * no hardware time stamps available,
3158                  * so keep the shared tx_flags and only
3159                  * store software time stamp
3160                  */
3161                 skb->tstamp = ktime_get_real();
3162         }
3163
3164         serr = SKB_EXT_ERR(skb);
3165         memset(serr, 0, sizeof(*serr));
3166         serr->ee.ee_errno = ENOMSG;
3167         serr->ee.ee_origin = SO_EE_ORIGIN_TIMESTAMPING;
3168
3169         err = sock_queue_err_skb(sk, skb);
3170
3171         if (err)
3172                 kfree_skb(skb);
3173 }
3174 EXPORT_SYMBOL_GPL(skb_tstamp_tx);
3175
3176
3177 /**
3178  * skb_partial_csum_set - set up and verify partial csum values for packet
3179  * @skb: the skb to set
3180  * @start: the number of bytes after skb->data to start checksumming.
3181  * @off: the offset from start to place the checksum.
3182  *
3183  * For untrusted partially-checksummed packets, we need to make sure the values
3184  * for skb->csum_start and skb->csum_offset are valid so we don't oops.
3185  *
3186  * This function checks and sets those values and skb->ip_summed: if this
3187  * returns false you should drop the packet.
3188  */
3189 bool skb_partial_csum_set(struct sk_buff *skb, u16 start, u16 off)
3190 {
3191         if (unlikely(start > skb_headlen(skb)) ||
3192             unlikely((int)start + off > skb_headlen(skb) - 2)) {
3193                 if (net_ratelimit())
3194                         printk(KERN_WARNING
3195                                "bad partial csum: csum=%u/%u len=%u\n",
3196                                start, off, skb_headlen(skb));
3197                 return false;
3198         }
3199         skb->ip_summed = CHECKSUM_PARTIAL;
3200         skb->csum_start = skb_headroom(skb) + start;
3201         skb->csum_offset = off;
3202         return true;
3203 }
3204 EXPORT_SYMBOL_GPL(skb_partial_csum_set);
3205
3206 void __skb_warn_lro_forwarding(const struct sk_buff *skb)
3207 {
3208         if (net_ratelimit())
3209                 pr_warning("%s: received packets cannot be forwarded"
3210                            " while LRO is enabled\n", skb->dev->name);
3211 }
3212 EXPORT_SYMBOL(__skb_warn_lro_forwarding);