net/core/skbuff.c

   1 /*
   2  *      Routines having to do with the 'struct sk_buff' memory handlers.
   3  *
   4  *      Authors:        Alan Cox <iiitac@pyr.swan.ac.uk>
   5  *                      Florian La Roche <rzsfl@rz.uni-sb.de>
   6  *
   7  *      Version:        $Id: skbuff.c,v 1.90 2001/11/07 05:56:19 davem Exp $
   8  *
   9  *      Fixes:
  10  *              Alan Cox        :       Fixed the worst of the load
  11  *                                      balancer bugs.
  12  *              Dave Platt      :       Interrupt stacking fix.
  13  *      Richard Kooijman        :       Timestamp fixes.
  14  *              Alan Cox        :       Changed buffer format.
  15  *              Alan Cox        :       destructor hook for AF_UNIX etc.
  16  *              Linus Torvalds  :       Better skb_clone.
  17  *              Alan Cox        :       Added skb_copy.
  18  *              Alan Cox        :       Added all the changed routines Linus
  19  *                                      only put in the headers
  20  *              Ray VanTassle   :       Fixed --skb->lock in free
  21  *              Alan Cox        :       skb_copy copy arp field
  22  *              Andi Kleen      :       slabified it.
  23  *              Robert Olsson   :       Removed skb_head_pool
  24  *
  25  *      NOTE:
  26  *              The __skb_ routines should be called with interrupts
  27  *      disabled, or you better be *real* sure that the operation is atomic
  28  *      with respect to whatever list is being frobbed (e.g. via lock_sock()
  29  *      or via disabling bottom half handlers, etc).
  30  *
  31  *      This program is free software; you can redistribute it and/or
  32  *      modify it under the terms of the GNU General Public License
  33  *      as published by the Free Software Foundation; either version
  34  *      2 of the License, or (at your option) any later version.
  35  */
  36
  37 /*
  38  *      The functions in this file will not compile correctly with gcc 2.4.x
  39  */
  40
  41 #include <linux/config.h>
  42 #include <linux/module.h>
  43 #include <linux/types.h>
  44 #include <linux/kernel.h>
  45 #include <linux/sched.h>
  46 #include <linux/mm.h>
  47 #include <linux/interrupt.h>
  48 #include <linux/in.h>
  49 #include <linux/inet.h>
  50 #include <linux/slab.h>
  51 #include <linux/netdevice.h>
  52 #ifdef CONFIG_NET_CLS_ACT
  53 #include <net/pkt_sched.h>
  54 #endif
  55 #include <linux/string.h>
  56 #include <linux/skbuff.h>
  57 #include <linux/cache.h>
  58 #include <linux/rtnetlink.h>
  59 #include <linux/init.h>
  60 #include <linux/highmem.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
  71 static kmem_cache_t *skbuff_head_cache __read_mostly;
  72 static kmem_cache_t *skbuff_fclone_cache __read_mostly;
  73
  74 /*
  75  *      Keep out-of-line to prevent kernel bloat.
  76  *      __builtin_return_address is not used because it is not always
  77  *      reliable.
  78  */
  79
  80 /**
  81  *      skb_over_panic  -       private function
  82  *      @skb: buffer
  83  *      @sz: size
  84  *      @here: address
  85  *
  86  *      Out of line support code for skb_put(). Not user callable.
  87  */
  88 void skb_over_panic(struct sk_buff *skb, int sz, void *here)
  89 {
  90         printk(KERN_EMERG "skb_over_panic: text:%p len:%d put:%d head:%p "
  91                           "data:%p tail:%p end:%p dev:%s\n",
  92                here, skb->len, sz, skb->head, skb->data, skb->tail, skb->end,
  93                skb->dev ? skb->dev->name : "<NULL>");
  94         BUG();
  95 }
  96
  97 /**
  98  *      skb_under_panic -       private function
  99  *      @skb: buffer
 100  *      @sz: size
 101  *      @here: address
 102  *
 103  *      Out of line support code for skb_push(). Not user callable.
 104  */
 105
 106 void skb_under_panic(struct sk_buff *skb, int sz, void *here)
 107 {
 108         printk(KERN_EMERG "skb_under_panic: text:%p len:%d put:%d head:%p "
 109                           "data:%p tail:%p end:%p dev:%s\n",
 110                here, skb->len, sz, skb->head, skb->data, skb->tail, skb->end,
 111                skb->dev ? skb->dev->name : "<NULL>");
 112         BUG();
 113 }
 114
 115 /*      Allocate a new skbuff. We do this ourselves so we can fill in a few
 116  *      'private' fields and also do memory statistics to find all the
 117  *      [BEEP] leaks.
 118  *
 119  */
 120
 121 /**
 122  *      __alloc_skb     -       allocate a network buffer
 123  *      @size: size to allocate
 124  *      @gfp_mask: allocation mask
 125  *      @fclone: allocate from fclone cache instead of head cache
 126  *              and allocate a cloned (child) skb
 127  *
 128  *      Allocate a new &sk_buff. The returned buffer has no headroom and a
 129  *      tail room of size bytes. The object has a reference count of one.
 130  *      The return is the buffer. On a failure the return is %NULL.
 131  *
 132  *      Buffers may only be allocated from interrupts using a @gfp_mask of
 133  *      %GFP_ATOMIC.
 134  */
 135 struct sk_buff *__alloc_skb(unsigned int size, gfp_t gfp_mask,
 136                             int fclone)
 137 {
 138         kmem_cache_t *cache;
 139         struct skb_shared_info *shinfo;
 140         struct sk_buff *skb;
 141         u8 *data;
 142
 143         cache = fclone ? skbuff_fclone_cache : skbuff_head_cache;
 144
 145         /* Get the HEAD */
 146         skb = kmem_cache_alloc(cache, gfp_mask & ~__GFP_DMA);
 147         if (!skb)
 148                 goto out;
 149
 150         /* Get the DATA. Size must match skb_add_mtu(). */
 151         size = SKB_DATA_ALIGN(size);
 152         data = kmalloc(size + sizeof(struct skb_shared_info), gfp_mask);
 153         if (!data)
 154                 goto nodata;
 155
 156         memset(skb, 0, offsetof(struct sk_buff, truesize));
 157         skb->truesize = size + sizeof(struct sk_buff);
 158         atomic_set(&skb->users, 1);
 159         skb->head = data;
 160         skb->data = data;
 161         skb->tail = data;
 162         skb->end  = data + size;
 163         /* make sure we initialize shinfo sequentially */
 164         shinfo = skb_shinfo(skb);
 165         atomic_set(&shinfo->dataref, 1);
 166         shinfo->nr_frags  = 0;
 167         shinfo->tso_size = 0;
 168         shinfo->tso_segs = 0;
 169         shinfo->ufo_size = 0;
 170         shinfo->ip6_frag_id = 0;
 171         shinfo->frag_list = NULL;
 172
 173         if (fclone) {
 174                 struct sk_buff *child = skb + 1;
 175                 atomic_t *fclone_ref = (atomic_t *) (child + 1);
 176
 177                 skb->fclone = SKB_FCLONE_ORIG;
 178                 atomic_set(fclone_ref, 1);
 179
 180                 child->fclone = SKB_FCLONE_UNAVAILABLE;
 181         }
 182 out:
 183         return skb;
 184 nodata:
 185         kmem_cache_free(cache, skb);
 186         skb = NULL;
 187         goto out;
 188 }
 189
 190 /**
 191  *      alloc_skb_from_cache    -       allocate a network buffer
 192  *      @cp: kmem_cache from which to allocate the data area
 193  *           (object size must be big enough for @size bytes + skb overheads)
 194  *      @size: size to allocate
 195  *      @gfp_mask: allocation mask
 196  *
 197  *      Allocate a new &sk_buff. The returned buffer has no headroom and
 198  *      tail room of size bytes. The object has a reference count of one.
 199  *      The return is the buffer. On a failure the return is %NULL.
 200  *
 201  *      Buffers may only be allocated from interrupts using a @gfp_mask of
 202  *      %GFP_ATOMIC.
 203  */
 204 struct sk_buff *alloc_skb_from_cache(kmem_cache_t *cp,
 205                                      unsigned int size,
 206                                      gfp_t gfp_mask)
 207 {
 208         struct sk_buff *skb;
 209         u8 *data;
 210
 211         /* Get the HEAD */
 212         skb = kmem_cache_alloc(skbuff_head_cache,
 213                                gfp_mask & ~__GFP_DMA);
 214         if (!skb)
 215                 goto out;
 216
 217         /* Get the DATA. */
 218         size = SKB_DATA_ALIGN(size);
 219         data = kmem_cache_alloc(cp, gfp_mask);
 220         if (!data)
 221                 goto nodata;
 222
 223         memset(skb, 0, offsetof(struct sk_buff, truesize));
 224         skb->truesize = size + sizeof(struct sk_buff);
 225         atomic_set(&skb->users, 1);
 226         skb->head = data;
 227         skb->data = data;
 228         skb->tail = data;
 229         skb->end  = data + size;
 230
 231         atomic_set(&(skb_shinfo(skb)->dataref), 1);
 232         skb_shinfo(skb)->nr_frags  = 0;
 233         skb_shinfo(skb)->tso_size = 0;
 234         skb_shinfo(skb)->tso_segs = 0;
 235         skb_shinfo(skb)->ufo_size = 0;
 236         skb_shinfo(skb)->frag_list = NULL;
 237 out:
 238         return skb;
 239 nodata:
 240         kmem_cache_free(skbuff_head_cache, skb);
 241         skb = NULL;
 242         goto out;
 243 }
 244
 245
 246 static void skb_drop_list(struct sk_buff **listp)
 247 {
 248         struct sk_buff *list = *listp;
 249
 250         *listp = NULL;
 251
 252         do {
 253                 struct sk_buff *this = list;
 254                 list = list->next;
 255                 kfree_skb(this);
 256         } while (list);
 257 }
 258
 259 static inline void skb_drop_fraglist(struct sk_buff *skb)
 260 {
 261         skb_drop_list(&skb_shinfo(skb)->frag_list);
 262 }
 263
 264 static void skb_clone_fraglist(struct sk_buff *skb)
 265 {
 266         struct sk_buff *list;
 267
 268         for (list = skb_shinfo(skb)->frag_list; list; list = list->next)
 269                 skb_get(list);
 270 }
 271
 272 void skb_release_data(struct sk_buff *skb)
 273 {
 274         if (!skb->cloned ||
 275             !atomic_sub_return(skb->nohdr ? (1 << SKB_DATAREF_SHIFT) + 1 : 1,
 276                                &skb_shinfo(skb)->dataref)) {
 277                 if (skb_shinfo(skb)->nr_frags) {
 278                         int i;
 279                         for (i = 0; i < skb_shinfo(skb)->nr_frags; i++)
 280                                 put_page(skb_shinfo(skb)->frags[i].page);
 281                 }
 282
 283                 if (skb_shinfo(skb)->frag_list)
 284                         skb_drop_fraglist(skb);
 285
 286                 kfree(skb->head);
 287         }
 288 }
 289
 290 /*
 291  *      Free an skbuff by memory without cleaning the state.
 292  */
 293 void kfree_skbmem(struct sk_buff *skb)
 294 {
 295         struct sk_buff *other;
 296         atomic_t *fclone_ref;
 297
 298         skb_release_data(skb);
 299         switch (skb->fclone) {
 300         case SKB_FCLONE_UNAVAILABLE:
 301                 kmem_cache_free(skbuff_head_cache, skb);
 302                 break;
 303
 304         case SKB_FCLONE_ORIG:
 305                 fclone_ref = (atomic_t *) (skb + 2);
 306                 if (atomic_dec_and_test(fclone_ref))
 307                         kmem_cache_free(skbuff_fclone_cache, skb);
 308                 break;
 309
 310         case SKB_FCLONE_CLONE:
 311                 fclone_ref = (atomic_t *) (skb + 1);
 312                 other = skb - 1;
 313
 314                 /* The clone portion is available for
 315                  * fast-cloning again.
 316                  */
 317                 skb->fclone = SKB_FCLONE_UNAVAILABLE;
 318
 319                 if (atomic_dec_and_test(fclone_ref))
 320                         kmem_cache_free(skbuff_fclone_cache, other);
 321                 break;
 322         };
 323 }
 324
 325 /**
 326  *      __kfree_skb - private function
 327  *      @skb: buffer
 328  *
 329  *      Free an sk_buff. Release anything attached to the buffer.
 330  *      Clean the state. This is an internal helper function. Users should
 331  *      always call kfree_skb
 332  */
 333
 334 void __kfree_skb(struct sk_buff *skb)
 335 {
 336         dst_release(skb->dst);
 337 #ifdef CONFIG_XFRM
 338         secpath_put(skb->sp);
 339 #endif
 340         if (skb->destructor) {
 341                 WARN_ON(in_irq());
 342                 skb->destructor(skb);
 343         }
 344 #ifdef CONFIG_NETFILTER
 345         nf_conntrack_put(skb->nfct);
 346 #if defined(CONFIG_NF_CONNTRACK) || defined(CONFIG_NF_CONNTRACK_MODULE)
 347         nf_conntrack_put_reasm(skb->nfct_reasm);
 348 #endif
 349 #ifdef CONFIG_BRIDGE_NETFILTER
 350         nf_bridge_put(skb->nf_bridge);
 351 #endif
 352 #endif
 353 /* XXX: IS this still necessary? - JHS */
 354 #ifdef CONFIG_NET_SCHED
 355         skb->tc_index = 0;
 356 #ifdef CONFIG_NET_CLS_ACT
 357         skb->tc_verd = 0;
 358 #endif
 359 #endif
 360
 361         kfree_skbmem(skb);
 362 }
 363
 364 /**
 365  *      skb_clone       -       duplicate an sk_buff
 366  *      @skb: buffer to clone
 367  *      @gfp_mask: allocation priority
 368  *
 369  *      Duplicate an &sk_buff. The new one is not owned by a socket. Both
 370  *      copies share the same packet data but not structure. The new
 371  *      buffer has a reference count of 1. If the allocation fails the
 372  *      function returns %NULL otherwise the new buffer is returned.
 373  *
 374  *      If this function is called from an interrupt gfp_mask() must be
 375  *      %GFP_ATOMIC.
 376  */
 377
 378 struct sk_buff *skb_clone(struct sk_buff *skb, gfp_t gfp_mask)
 379 {
 380         struct sk_buff *n;
 381
 382         n = skb + 1;
 383         if (skb->fclone == SKB_FCLONE_ORIG &&
 384             n->fclone == SKB_FCLONE_UNAVAILABLE) {
 385                 atomic_t *fclone_ref = (atomic_t *) (n + 1);
 386                 n->fclone = SKB_FCLONE_CLONE;
 387                 atomic_inc(fclone_ref);
 388         } else {
 389                 n = kmem_cache_alloc(skbuff_head_cache, gfp_mask);
 390                 if (!n)
 391                         return NULL;
 392                 n->fclone = SKB_FCLONE_UNAVAILABLE;
 393         }
 394
 395 #define C(x) n->x = skb->x
 396
 397         n->next = n->prev = NULL;
 398         n->sk = NULL;
 399         C(tstamp);
 400         C(dev);
 401         C(h);
 402         C(nh);
 403         C(mac);
 404         C(dst);
 405         dst_clone(skb->dst);
 406         C(sp);
 407 #ifdef CONFIG_INET
 408         secpath_get(skb->sp);
 409 #endif
 410         memcpy(n->cb, skb->cb, sizeof(skb->cb));
 411         C(len);
 412         C(data_len);
 413         C(csum);
 414         C(local_df);
 415         n->cloned = 1;
 416         n->nohdr = 0;
 417         C(pkt_type);
 418         C(ip_summed);
 419         C(priority);
 420 #if defined(CONFIG_IP_VS) || defined(CONFIG_IP_VS_MODULE)
 421         C(ipvs_property);
 422 #endif
 423         C(protocol);
 424         n->destructor = NULL;
 425 #ifdef CONFIG_NETFILTER
 426         C(nfmark);
 427         C(nfct);
 428         nf_conntrack_get(skb->nfct);
 429         C(nfctinfo);
 430 #if defined(CONFIG_NF_CONNTRACK) || defined(CONFIG_NF_CONNTRACK_MODULE)
 431         C(nfct_reasm);
 432         nf_conntrack_get_reasm(skb->nfct_reasm);
 433 #endif
 434 #ifdef CONFIG_BRIDGE_NETFILTER
 435         C(nf_bridge);
 436         nf_bridge_get(skb->nf_bridge);
 437 #endif
 438 #endif /*CONFIG_NETFILTER*/
 439 #ifdef CONFIG_NET_SCHED
 440         C(tc_index);
 441 #ifdef CONFIG_NET_CLS_ACT
 442         n->tc_verd = SET_TC_VERD(skb->tc_verd,0);
 443         n->tc_verd = CLR_TC_OK2MUNGE(n->tc_verd);
 444         n->tc_verd = CLR_TC_MUNGED(n->tc_verd);
 445         C(input_dev);
 446 #endif
 447
 448 #endif
 449 #if defined(CONFIG_VNET) || defined(CONFIG_VNET_MODULE)
 450         C(xid);
 451 #endif
 452 #if defined(CONFIG_VNET) || defined(CONFIG_VNET_MODULE)
 453         C(xid);
 454 #endif
 455         C(truesize);
 456         atomic_set(&n->users, 1);
 457         C(head);
 458         C(data);
 459         C(tail);
 460         C(end);
 461
 462         atomic_inc(&(skb_shinfo(skb)->dataref));
 463         skb->cloned = 1;
 464
 465         return n;
 466 }
 467
 468 static void copy_skb_header(struct sk_buff *new, const struct sk_buff *old)
 469 {
 470         /*
 471          *      Shift between the two data areas in bytes
 472          */
 473         unsigned long offset = new->data - old->data;
 474
 475         new->sk         = NULL;
 476         new->dev        = old->dev;
 477         new->priority   = old->priority;
 478         new->protocol   = old->protocol;
 479         new->dst        = dst_clone(old->dst);
 480 #ifdef CONFIG_INET
 481         new->sp         = secpath_get(old->sp);
 482 #endif
 483         new->h.raw      = old->h.raw + offset;
 484         new->nh.raw     = old->nh.raw + offset;
 485         new->mac.raw    = old->mac.raw + offset;
 486         memcpy(new->cb, old->cb, sizeof(old->cb));
 487         new->local_df   = old->local_df;
 488         new->fclone     = SKB_FCLONE_UNAVAILABLE;
 489         new->pkt_type   = old->pkt_type;
 490         new->tstamp     = old->tstamp;
 491         new->destructor = NULL;
 492 #ifdef CONFIG_NETFILTER
 493         new->nfmark     = old->nfmark;
 494         new->nfct       = old->nfct;
 495         nf_conntrack_get(old->nfct);
 496         new->nfctinfo   = old->nfctinfo;
 497 #if defined(CONFIG_NF_CONNTRACK) || defined(CONFIG_NF_CONNTRACK_MODULE)
 498         new->nfct_reasm = old->nfct_reasm;
 499         nf_conntrack_get_reasm(old->nfct_reasm);
 500 #endif
 501 #if defined(CONFIG_IP_VS) || defined(CONFIG_IP_VS_MODULE)
 502         new->ipvs_property = old->ipvs_property;
 503 #endif
 504 #ifdef CONFIG_BRIDGE_NETFILTER
 505         new->nf_bridge  = old->nf_bridge;
 506         nf_bridge_get(old->nf_bridge);
 507 #endif
 508 #endif
 509 #ifdef CONFIG_NET_SCHED
 510 #ifdef CONFIG_NET_CLS_ACT
 511         new->tc_verd = old->tc_verd;
 512 #endif
 513         new->tc_index   = old->tc_index;
 514 #endif
 515 #if defined(CONFIG_VNET) || defined(CONFIG_VNET_MODULE)
 516         new->xid        = old->xid;
 517 #endif
 518         atomic_set(&new->users, 1);
 519         skb_shinfo(new)->tso_size = skb_shinfo(old)->tso_size;
 520         skb_shinfo(new)->tso_segs = skb_shinfo(old)->tso_segs;
 521         skb_shinfo(new)->ufo_size = skb_shinfo(old)->ufo_size;
 522 }
 523
 524 /**
 525  *      skb_copy        -       create private copy of an sk_buff
 526  *      @skb: buffer to copy
 527  *      @gfp_mask: allocation priority
 528  *
 529  *      Make a copy of both an &sk_buff and its data. This is used when the
 530  *      caller wishes to modify the data and needs a private copy of the
 531  *      data to alter. Returns %NULL on failure or the pointer to the buffer
 532  *      on success. The returned buffer has a reference count of 1.
 533  *
 534  *      As by-product this function converts non-linear &sk_buff to linear
 535  *      one, so that &sk_buff becomes completely private and caller is allowed
 536  *      to modify all the data of returned buffer. This means that this
 537  *      function is not recommended for use in circumstances when only
 538  *      header is going to be modified. Use pskb_copy() instead.
 539  */
 540
 541 struct sk_buff *skb_copy(const struct sk_buff *skb, gfp_t gfp_mask)
 542 {
 543         int headerlen = skb->data - skb->head;
 544         /*
 545          *      Allocate the copy buffer
 546          */
 547         struct sk_buff *n = alloc_skb(skb->end - skb->head + skb->data_len,
 548                                       gfp_mask);
 549         if (!n)
 550                 return NULL;
 551
 552         /* Set the data pointer */
 553         skb_reserve(n, headerlen);
 554         /* Set the tail pointer and length */
 555         skb_put(n, skb->len);
 556         n->csum      = skb->csum;
 557         n->ip_summed = skb->ip_summed;
 558
 559         if (skb_copy_bits(skb, -headerlen, n->head, headerlen + skb->len))
 560                 BUG();
 561
 562         copy_skb_header(n, skb);
 563         return n;
 564 }
 565
 566
 567 /**
 568  *      pskb_copy       -       create copy of an sk_buff with private head.
 569  *      @skb: buffer to copy
 570  *      @gfp_mask: allocation priority
 571  *
 572  *      Make a copy of both an &sk_buff and part of its data, located
 573  *      in header. Fragmented data remain shared. This is used when
 574  *      the caller wishes to modify only header of &sk_buff and needs
 575  *      private copy of the header to alter. Returns %NULL on failure
 576  *      or the pointer to the buffer on success.
 577  *      The returned buffer has a reference count of 1.
 578  */
 579
 580 struct sk_buff *pskb_copy(struct sk_buff *skb, gfp_t gfp_mask)
 581 {
 582         /*
 583          *      Allocate the copy buffer
 584          */
 585         struct sk_buff *n = alloc_skb(skb->end - skb->head, gfp_mask);
 586
 587         if (!n)
 588                 goto out;
 589
 590         /* Set the data pointer */
 591         skb_reserve(n, skb->data - skb->head);
 592         /* Set the tail pointer and length */
 593         skb_put(n, skb_headlen(skb));
 594         /* Copy the bytes */
 595         memcpy(n->data, skb->data, n->len);
 596         n->csum      = skb->csum;
 597         n->ip_summed = skb->ip_summed;
 598
 599         n->truesize += skb->data_len;
 600         n->data_len  = skb->data_len;
 601         n->len       = skb->len;
 602
 603         if (skb_shinfo(skb)->nr_frags) {
 604                 int i;
 605
 606                 for (i = 0; i < skb_shinfo(skb)->nr_frags; i++) {
 607                         skb_shinfo(n)->frags[i] = skb_shinfo(skb)->frags[i];
 608                         get_page(skb_shinfo(n)->frags[i].page);
 609                 }
 610                 skb_shinfo(n)->nr_frags = i;
 611         }
 612
 613         if (skb_shinfo(skb)->frag_list) {
 614                 skb_shinfo(n)->frag_list = skb_shinfo(skb)->frag_list;
 615                 skb_clone_fraglist(n);
 616         }
 617
 618         copy_skb_header(n, skb);
 619 out:
 620         return n;
 621 }
 622
 623 /**
 624  *      pskb_expand_head - reallocate header of &sk_buff
 625  *      @skb: buffer to reallocate
 626  *      @nhead: room to add at head
 627  *      @ntail: room to add at tail
 628  *      @gfp_mask: allocation priority
 629  *
 630  *      Expands (or creates identical copy, if &nhead and &ntail are zero)
 631  *      header of skb. &sk_buff itself is not changed. &sk_buff MUST have
 632  *      reference count of 1. Returns zero in the case of success or error,
 633  *      if expansion failed. In the last case, &sk_buff is not changed.
 634  *
 635  *      All the pointers pointing into skb header may change and must be
 636  *      reloaded after call to this function.
 637  */
 638
 639 int pskb_expand_head(struct sk_buff *skb, int nhead, int ntail,
 640                      gfp_t gfp_mask)
 641 {
 642         int i;
 643         u8 *data;
 644         int size = nhead + (skb->end - skb->head) + ntail;
 645         long off;
 646
 647         if (skb_shared(skb))
 648                 BUG();
 649
 650         size = SKB_DATA_ALIGN(size);
 651
 652         data = kmalloc(size + sizeof(struct skb_shared_info), gfp_mask);
 653         if (!data)
 654                 goto nodata;
 655
 656         /* Copy only real data... and, alas, header. This should be
 657          * optimized for the cases when header is void. */
 658         memcpy(data + nhead, skb->head, skb->tail - skb->head);
 659         memcpy(data + size, skb->end, sizeof(struct skb_shared_info));
 660
 661         for (i = 0; i < skb_shinfo(skb)->nr_frags; i++)
 662                 get_page(skb_shinfo(skb)->frags[i].page);
 663
 664         if (skb_shinfo(skb)->frag_list)
 665                 skb_clone_fraglist(skb);
 666
 667         skb_release_data(skb);
 668
 669         off = (data + nhead) - skb->head;
 670
 671         skb->head     = data;
 672         skb->end      = data + size;
 673         skb->data    += off;
 674         skb->tail    += off;
 675         skb->mac.raw += off;
 676         skb->h.raw   += off;
 677         skb->nh.raw  += off;
 678         skb->cloned   = 0;
 679         skb->nohdr    = 0;
 680         atomic_set(&skb_shinfo(skb)->dataref, 1);
 681         return 0;
 682
 683 nodata:
 684         return -ENOMEM;
 685 }
 686
 687 /* Make private copy of skb with writable head and some headroom */
 688
 689 struct sk_buff *skb_realloc_headroom(struct sk_buff *skb, unsigned int headroom)
 690 {
 691         struct sk_buff *skb2;
 692         int delta = headroom - skb_headroom(skb);
 693
 694         if (delta <= 0)
 695                 skb2 = pskb_copy(skb, GFP_ATOMIC);
 696         else {
 697                 skb2 = skb_clone(skb, GFP_ATOMIC);
 698                 if (skb2 && pskb_expand_head(skb2, SKB_DATA_ALIGN(delta), 0,
 699                                              GFP_ATOMIC)) {
 700                         kfree_skb(skb2);
 701                         skb2 = NULL;
 702                 }
 703         }
 704         return skb2;
 705 }
 706
 707
 708 /**
 709  *      skb_copy_expand -       copy and expand sk_buff
 710  *      @skb: buffer to copy
 711  *      @newheadroom: new free bytes at head
 712  *      @newtailroom: new free bytes at tail
 713  *      @gfp_mask: allocation priority
 714  *
 715  *      Make a copy of both an &sk_buff and its data and while doing so
 716  *      allocate additional space.
 717  *
 718  *      This is used when the caller wishes to modify the data and needs a
 719  *      private copy of the data to alter as well as more space for new fields.
 720  *      Returns %NULL on failure or the pointer to the buffer
 721  *      on success. The returned buffer has a reference count of 1.
 722  *
 723  *      You must pass %GFP_ATOMIC as the allocation priority if this function
 724  *      is called from an interrupt.
 725  *
 726  *      BUG ALERT: ip_summed is not copied. Why does this work? Is it used
 727  *      only by netfilter in the cases when checksum is recalculated? --ANK
 728  */
 729 struct sk_buff *skb_copy_expand(const struct sk_buff *skb,
 730                                 int newheadroom, int newtailroom,
 731                                 gfp_t gfp_mask)
 732 {
 733         /*
 734          *      Allocate the copy buffer
 735          */
 736         struct sk_buff *n = alloc_skb(newheadroom + skb->len + newtailroom,
 737                                       gfp_mask);
 738         int head_copy_len, head_copy_off;
 739
 740         if (!n)
 741                 return NULL;
 742
 743         skb_reserve(n, newheadroom);
 744
 745         /* Set the tail pointer and length */
 746         skb_put(n, skb->len);
 747
 748         head_copy_len = skb_headroom(skb);
 749         head_copy_off = 0;
 750         if (newheadroom <= head_copy_len)
 751                 head_copy_len = newheadroom;
 752         else
 753                 head_copy_off = newheadroom - head_copy_len;
 754
 755         /* Copy the linear header and data. */
 756         if (skb_copy_bits(skb, -head_copy_len, n->head + head_copy_off,
 757                           skb->len + head_copy_len))
 758                 BUG();
 759
 760         copy_skb_header(n, skb);
 761
 762         return n;
 763 }
 764
 765 /**
 766  *      skb_pad                 -       zero pad the tail of an skb
 767  *      @skb: buffer to pad
 768  *      @pad: space to pad
 769  *
 770  *      Ensure that a buffer is followed by a padding area that is zero
 771  *      filled. Used by network drivers which may DMA or transfer data
 772  *      beyond the buffer end onto the wire.
 773  *
 774  *      May return NULL in out of memory cases.
 775  */
 776
 777 struct sk_buff *skb_pad(struct sk_buff *skb, int pad)
 778 {
 779         struct sk_buff *nskb;
 780
 781         /* If the skbuff is non linear tailroom is always zero.. */
 782         if (skb_tailroom(skb) >= pad) {
 783                 memset(skb->data+skb->len, 0, pad);
 784                 return skb;
 785         }
 786
 787         nskb = skb_copy_expand(skb, skb_headroom(skb), skb_tailroom(skb) + pad, GFP_ATOMIC);
 788         kfree_skb(skb);
 789         if (nskb)
 790                 memset(nskb->data+nskb->len, 0, pad);
 791         return nskb;
 792 }
 793
 794 /* Trims skb to length len. It can change skb pointers.
 795  */
 796
 797 int ___pskb_trim(struct sk_buff *skb, unsigned int len)
 798 {
 799         struct sk_buff **fragp;
 800         struct sk_buff *frag;
 801         int offset = skb_headlen(skb);
 802         int nfrags = skb_shinfo(skb)->nr_frags;
 803         int i;
 804         int err;
 805
 806         if (skb_cloned(skb) &&
 807             unlikely((err = pskb_expand_head(skb, 0, 0, GFP_ATOMIC))))
 808                 return err;
 809
 810         i = 0;
 811         if (offset >= len)
 812                 goto drop_pages;
 813
 814         for (; i < nfrags; i++) {
 815                 int end = offset + skb_shinfo(skb)->frags[i].size;
 816
 817                 if (end < len) {
 818                         offset = end;
 819                         continue;
 820                 }
 821
 822                 skb_shinfo(skb)->frags[i++].size = len - offset;
 823
 824 drop_pages:
 825                 skb_shinfo(skb)->nr_frags = i;
 826
 827                 for (; i < nfrags; i++)
 828                         put_page(skb_shinfo(skb)->frags[i].page);
 829
 830                 if (skb_shinfo(skb)->frag_list)
 831                         skb_drop_fraglist(skb);
 832                 goto done;
 833         }
 834
 835         for (fragp = &skb_shinfo(skb)->frag_list; (frag = *fragp);
 836              fragp = &frag->next) {
 837                 int end = offset + frag->len;
 838
 839                 if (skb_shared(frag)) {
 840                         struct sk_buff *nfrag;
 841
 842                         nfrag = skb_clone(frag, GFP_ATOMIC);
 843                         if (unlikely(!nfrag))
 844                                 return -ENOMEM;
 845
 846                         nfrag->next = frag->next;
 847                         kfree_skb(frag);
 848                         frag = nfrag;
 849                         *fragp = frag;
 850                 }
 851
 852                 if (end < len) {
 853                         offset = end;
 854                         continue;
 855                 }
 856
 857                 if (end > len &&
 858                     unlikely((err = pskb_trim(frag, len - offset))))
 859                         return err;
 860
 861                 if (frag->next)
 862                         skb_drop_list(&frag->next);
 863                 break;
 864         }
 865
 866 done:
 867         if (len > skb_headlen(skb)) {
 868                 skb->data_len -= skb->len - len;
 869                 skb->len       = len;
 870         } else {
 871                 skb->len       = len;
 872                 skb->data_len  = 0;
 873                 skb->tail      = skb->data + len;
 874         }
 875
 876         return 0;
 877 }
 878
 879 /**
 880  *      __pskb_pull_tail - advance tail of skb header
 881  *      @skb: buffer to reallocate
 882  *      @delta: number of bytes to advance tail
 883  *
 884  *      The function makes a sense only on a fragmented &sk_buff,
 885  *      it expands header moving its tail forward and copying necessary
 886  *      data from fragmented part.
 887  *
 888  *      &sk_buff MUST have reference count of 1.
 889  *
 890  *      Returns %NULL (and &sk_buff does not change) if pull failed
 891  *      or value of new tail of skb in the case of success.
 892  *
 893  *      All the pointers pointing into skb header may change and must be
 894  *      reloaded after call to this function.
 895  */
 896
 897 /* Moves tail of skb head forward, copying data from fragmented part,
 898  * when it is necessary.
 899  * 1. It may fail due to malloc failure.
 900  * 2. It may change skb pointers.
 901  *
 902  * It is pretty complicated. Luckily, it is called only in exceptional cases.
 903  */
 904 unsigned char *__pskb_pull_tail(struct sk_buff *skb, int delta)
 905 {
 906         /* If skb has not enough free space at tail, get new one
 907          * plus 128 bytes for future expansions. If we have enough
 908          * room at tail, reallocate without expansion only if skb is cloned.
 909          */
 910         int i, k, eat = (skb->tail + delta) - skb->end;
 911
 912         if (eat > 0 || skb_cloned(skb)) {
 913                 if (pskb_expand_head(skb, 0, eat > 0 ? eat + 128 : 0,
 914                                      GFP_ATOMIC))
 915                         return NULL;
 916         }
 917
 918         if (skb_copy_bits(skb, skb_headlen(skb), skb->tail, delta))
 919                 BUG();
 920
 921         /* Optimization: no fragments, no reasons to preestimate
 922          * size of pulled pages. Superb.
 923          */
 924         if (!skb_shinfo(skb)->frag_list)
 925                 goto pull_pages;
 926
 927         /* Estimate size of pulled pages. */
 928         eat = delta;
 929         for (i = 0; i < skb_shinfo(skb)->nr_frags; i++) {
 930                 if (skb_shinfo(skb)->frags[i].size >= eat)
 931                         goto pull_pages;
 932                 eat -= skb_shinfo(skb)->frags[i].size;
 933         }
 934
 935         /* If we need update frag list, we are in troubles.
 936          * Certainly, it possible to add an offset to skb data,
 937          * but taking into account that pulling is expected to
 938          * be very rare operation, it is worth to fight against
 939          * further bloating skb head and crucify ourselves here instead.
 940          * Pure masohism, indeed. 8)8)
 941          */
 942         if (eat) {
 943                 struct sk_buff *list = skb_shinfo(skb)->frag_list;
 944                 struct sk_buff *clone = NULL;
 945                 struct sk_buff *insp = NULL;
 946
 947                 do {
 948                         BUG_ON(!list);
 949
 950                         if (list->len <= eat) {
 951                                 /* Eaten as whole. */
 952                                 eat -= list->len;
 953                                 list = list->next;
 954                                 insp = list;
 955                         } else {
 956                                 /* Eaten partially. */
 957
 958                                 if (skb_shared(list)) {
 959                                         /* Sucks! We need to fork list. :-( */
 960                                         clone = skb_clone(list, GFP_ATOMIC);
 961                                         if (!clone)
 962                                                 return NULL;
 963                                         insp = list->next;
 964                                         list = clone;
 965                                 } else {
 966                                         /* This may be pulled without
 967                                          * problems. */
 968                                         insp = list;
 969                                 }
 970                                 if (!pskb_pull(list, eat)) {
 971                                         if (clone)
 972                                                 kfree_skb(clone);
 973                                         return NULL;
 974                                 }
 975                                 break;
 976                         }
 977                 } while (eat);
 978
 979                 /* Free pulled out fragments. */
 980                 while ((list = skb_shinfo(skb)->frag_list) != insp) {
 981                         skb_shinfo(skb)->frag_list = list->next;
 982                         kfree_skb(list);
 983                 }
 984                 /* And insert new clone at head. */
 985                 if (clone) {
 986                         clone->next = list;
 987                         skb_shinfo(skb)->frag_list = clone;
 988                 }
 989         }
 990         /* Success! Now we may commit changes to skb data. */
 991
 992 pull_pages:
 993         eat = delta;
 994         k = 0;
 995         for (i = 0; i < skb_shinfo(skb)->nr_frags; i++) {
 996                 if (skb_shinfo(skb)->frags[i].size <= eat) {
 997                         put_page(skb_shinfo(skb)->frags[i].page);
 998                         eat -= skb_shinfo(skb)->frags[i].size;
 999                 } else {
1000                         skb_shinfo(skb)->frags[k] = skb_shinfo(skb)->frags[i];
1001                         if (eat) {
1002                                 skb_shinfo(skb)->frags[k].page_offset += eat;
1003                                 skb_shinfo(skb)->frags[k].size -= eat;
1004                                 eat = 0;
1005                         }
1006                         k++;
1007                 }
1008         }
1009         skb_shinfo(skb)->nr_frags = k;
1010
1011         skb->tail     += delta;
1012         skb->data_len -= delta;
1013
1014         return skb->tail;
1015 }
1016
1017 /* Copy some data bits from skb to kernel buffer. */
1018
1019 int skb_copy_bits(const struct sk_buff *skb, int offset, void *to, int len)
1020 {
1021         int i, copy;
1022         int start = skb_headlen(skb);
1023
1024         if (offset > (int)skb->len - len)
1025                 goto fault;
1026
1027         /* Copy header. */
1028         if ((copy = start - offset) > 0) {
1029                 if (copy > len)
1030                         copy = len;
1031                 memcpy(to, skb->data + offset, copy);
1032                 if ((len -= copy) == 0)
1033                         return 0;
1034                 offset += copy;
1035                 to     += copy;
1036         }
1037
1038         for (i = 0; i < skb_shinfo(skb)->nr_frags; i++) {
1039                 int end;
1040
1041                 BUG_TRAP(start <= offset + len);
1042
1043                 end = start + skb_shinfo(skb)->frags[i].size;
1044                 if ((copy = end - offset) > 0) {
1045                         u8 *vaddr;
1046
1047                         if (copy > len)
1048                                 copy = len;
1049
1050                         vaddr = kmap_skb_frag(&skb_shinfo(skb)->frags[i]);
1051                         memcpy(to,
1052                                vaddr + skb_shinfo(skb)->frags[i].page_offset+
1053                                offset - start, copy);
1054                         kunmap_skb_frag(vaddr);
1055
1056                         if ((len -= copy) == 0)
1057                                 return 0;
1058                         offset += copy;
1059                         to     += copy;
1060                 }
1061                 start = end;
1062         }
1063
1064         if (skb_shinfo(skb)->frag_list) {
1065                 struct sk_buff *list = skb_shinfo(skb)->frag_list;
1066
1067                 for (; list; list = list->next) {
1068                         int end;
1069
1070                         BUG_TRAP(start <= offset + len);
1071
1072                         end = start + list->len;
1073                         if ((copy = end - offset) > 0) {
1074                                 if (copy > len)
1075                                         copy = len;
1076                                 if (skb_copy_bits(list, offset - start,
1077                                                   to, copy))
1078                                         goto fault;
1079                                 if ((len -= copy) == 0)
1080                                         return 0;
1081                                 offset += copy;
1082                                 to     += copy;
1083                         }
1084                         start = end;
1085                 }
1086         }
1087         if (!len)
1088                 return 0;
1089
1090 fault:
1091         return -EFAULT;
1092 }
1093
1094 /**
1095  *      skb_store_bits - store bits from kernel buffer to skb
1096  *      @skb: destination buffer
1097  *      @offset: offset in destination
1098  *      @from: source buffer
1099  *      @len: number of bytes to copy
1100  *
1101  *      Copy the specified number of bytes from the source buffer to the
1102  *      destination skb.  This function handles all the messy bits of
1103  *      traversing fragment lists and such.
1104  */
1105
1106 int skb_store_bits(const struct sk_buff *skb, int offset, void *from, int len)
1107 {
1108         int i, copy;
1109         int start = skb_headlen(skb);
1110
1111         if (offset > (int)skb->len - len)
1112                 goto fault;
1113
1114         if ((copy = start - offset) > 0) {
1115                 if (copy > len)
1116                         copy = len;
1117                 memcpy(skb->data + offset, from, copy);
1118                 if ((len -= copy) == 0)
1119                         return 0;
1120                 offset += copy;
1121                 from += copy;
1122         }
1123
1124         for (i = 0; i < skb_shinfo(skb)->nr_frags; i++) {
1125                 skb_frag_t *frag = &skb_shinfo(skb)->frags[i];
1126                 int end;
1127
1128                 BUG_TRAP(start <= offset + len);
1129
1130                 end = start + frag->size;
1131                 if ((copy = end - offset) > 0) {
1132                         u8 *vaddr;
1133
1134                         if (copy > len)
1135                                 copy = len;
1136
1137                         vaddr = kmap_skb_frag(frag);
1138                         memcpy(vaddr + frag->page_offset + offset - start,
1139                                from, copy);
1140                         kunmap_skb_frag(vaddr);
1141
1142                         if ((len -= copy) == 0)
1143                                 return 0;
1144                         offset += copy;
1145                         from += copy;
1146                 }
1147                 start = end;
1148         }
1149
1150         if (skb_shinfo(skb)->frag_list) {
1151                 struct sk_buff *list = skb_shinfo(skb)->frag_list;
1152
1153                 for (; list; list = list->next) {
1154                         int end;
1155
1156                         BUG_TRAP(start <= offset + len);
1157
1158                         end = start + list->len;
1159                         if ((copy = end - offset) > 0) {
1160                                 if (copy > len)
1161                                         copy = len;
1162                                 if (skb_store_bits(list, offset - start,
1163                                                    from, copy))
1164                                         goto fault;
1165                                 if ((len -= copy) == 0)
1166                                         return 0;
1167                                 offset += copy;
1168                                 from += copy;
1169                         }
1170                         start = end;
1171                 }
1172         }
1173         if (!len)
1174                 return 0;
1175
1176 fault:
1177         return -EFAULT;
1178 }
1179
1180 EXPORT_SYMBOL(skb_store_bits);
1181
1182 /* Checksum skb data. */
1183
1184 unsigned int skb_checksum(const struct sk_buff *skb, int offset,
1185                           int len, unsigned int csum)
1186 {
1187         int start = skb_headlen(skb);
1188         int i, copy = start - offset;
1189         int pos = 0;
1190
1191         /* Checksum header. */
1192         if (copy > 0) {
1193                 if (copy > len)
1194                         copy = len;
1195                 csum = csum_partial(skb->data + offset, copy, csum);
1196                 if ((len -= copy) == 0)
1197                         return csum;
1198                 offset += copy;
1199                 pos     = copy;
1200         }
1201
1202         for (i = 0; i < skb_shinfo(skb)->nr_frags; i++) {
1203                 int end;
1204
1205                 BUG_TRAP(start <= offset + len);
1206
1207                 end = start + skb_shinfo(skb)->frags[i].size;
1208                 if ((copy = end - offset) > 0) {
1209                         unsigned int csum2;
1210                         u8 *vaddr;
1211                         skb_frag_t *frag = &skb_shinfo(skb)->frags[i];
1212
1213                         if (copy > len)
1214                                 copy = len;
1215                         vaddr = kmap_skb_frag(frag);
1216                         csum2 = csum_partial(vaddr + frag->page_offset +
1217                                              offset - start, copy, 0);
1218                         kunmap_skb_frag(vaddr);
1219                         csum = csum_block_add(csum, csum2, pos);
1220                         if (!(len -= copy))
1221                                 return csum;
1222                         offset += copy;
1223                         pos    += copy;
1224                 }
1225                 start = end;
1226         }
1227
1228         if (skb_shinfo(skb)->frag_list) {
1229                 struct sk_buff *list = skb_shinfo(skb)->frag_list;
1230
1231                 for (; list; list = list->next) {
1232                         int end;
1233
1234                         BUG_TRAP(start <= offset + len);
1235
1236                         end = start + list->len;
1237                         if ((copy = end - offset) > 0) {
1238                                 unsigned int csum2;
1239                                 if (copy > len)
1240                                         copy = len;
1241                                 csum2 = skb_checksum(list, offset - start,
1242                                                      copy, 0);
1243                                 csum = csum_block_add(csum, csum2, pos);
1244                                 if ((len -= copy) == 0)
1245                                         return csum;
1246                                 offset += copy;
1247                                 pos    += copy;
1248                         }
1249                         start = end;
1250                 }
1251         }
1252         BUG_ON(len);
1253
1254         return csum;
1255 }
1256
1257 /* Both of above in one bottle. */
1258
1259 unsigned int skb_copy_and_csum_bits(const struct sk_buff *skb, int offset,
1260                                     u8 *to, int len, unsigned int csum)
1261 {
1262         int start = skb_headlen(skb);
1263         int i, copy = start - offset;
1264         int pos = 0;
1265
1266         /* Copy header. */
1267         if (copy > 0) {
1268                 if (copy > len)
1269                         copy = len;
1270                 csum = csum_partial_copy_nocheck(skb->data + offset, to,
1271                                                  copy, csum);
1272                 if ((len -= copy) == 0)
1273                         return csum;
1274                 offset += copy;
1275                 to     += copy;
1276                 pos     = copy;
1277         }
1278
1279         for (i = 0; i < skb_shinfo(skb)->nr_frags; i++) {
1280                 int end;
1281
1282                 BUG_TRAP(start <= offset + len);
1283
1284                 end = start + skb_shinfo(skb)->frags[i].size;
1285                 if ((copy = end - offset) > 0) {
1286                         unsigned int csum2;
1287                         u8 *vaddr;
1288                         skb_frag_t *frag = &skb_shinfo(skb)->frags[i];
1289
1290                         if (copy > len)
1291                                 copy = len;
1292                         vaddr = kmap_skb_frag(frag);
1293                         csum2 = csum_partial_copy_nocheck(vaddr +
1294                                                           frag->page_offset +
1295                                                           offset - start, to,
1296                                                           copy, 0);
1297                         kunmap_skb_frag(vaddr);
1298                         csum = csum_block_add(csum, csum2, pos);
1299                         if (!(len -= copy))
1300                                 return csum;
1301                         offset += copy;
1302                         to     += copy;
1303                         pos    += copy;
1304                 }
1305                 start = end;
1306         }
1307
1308         if (skb_shinfo(skb)->frag_list) {
1309                 struct sk_buff *list = skb_shinfo(skb)->frag_list;
1310
1311                 for (; list; list = list->next) {
1312                         unsigned int csum2;
1313                         int end;
1314
1315                         BUG_TRAP(start <= offset + len);
1316
1317                         end = start + list->len;
1318                         if ((copy = end - offset) > 0) {
1319                                 if (copy > len)
1320                                         copy = len;
1321                                 csum2 = skb_copy_and_csum_bits(list,
1322                                                                offset - start,
1323                                                                to, copy, 0);
1324                                 csum = csum_block_add(csum, csum2, pos);
1325                                 if ((len -= copy) == 0)
1326                                         return csum;
1327                                 offset += copy;
1328                                 to     += copy;
1329                                 pos    += copy;
1330                         }
1331                         start = end;
1332                 }
1333         }
1334         BUG_ON(len);
1335         return csum;
1336 }
1337
1338 void skb_copy_and_csum_dev(const struct sk_buff *skb, u8 *to)
1339 {
1340         unsigned int csum;
1341         long csstart;
1342
1343         if (skb->ip_summed == CHECKSUM_HW)
1344                 csstart = skb->h.raw - skb->data;
1345         else
1346                 csstart = skb_headlen(skb);
1347
1348         BUG_ON(csstart > skb_headlen(skb));
1349
1350         memcpy(to, skb->data, csstart);
1351
1352         csum = 0;
1353         if (csstart != skb->len)
1354                 csum = skb_copy_and_csum_bits(skb, csstart, to + csstart,
1355                                               skb->len - csstart, 0);
1356
1357         if (skb->ip_summed == CHECKSUM_HW) {
1358                 long csstuff = csstart + skb->csum;
1359
1360                 *((unsigned short *)(to + csstuff)) = csum_fold(csum);
1361         }
1362 }
1363
1364 /**
1365  *      skb_dequeue - remove from the head of the queue
1366  *      @list: list to dequeue from
1367  *
1368  *      Remove the head of the list. The list lock is taken so the function
1369  *      may be used safely with other locking list functions. The head item is
1370  *      returned or %NULL if the list is empty.
1371  */
1372
1373 struct sk_buff *skb_dequeue(struct sk_buff_head *list)
1374 {
1375         unsigned long flags;
1376         struct sk_buff *result;
1377
1378         spin_lock_irqsave(&list->lock, flags);
1379         result = __skb_dequeue(list);
1380         spin_unlock_irqrestore(&list->lock, flags);
1381         return result;
1382 }
1383
1384 /**
1385  *      skb_dequeue_tail - remove from the tail of the queue
1386  *      @list: list to dequeue from
1387  *
1388  *      Remove the tail of the list. The list lock is taken so the function
1389  *      may be used safely with other locking list functions. The tail item is
1390  *      returned or %NULL if the list is empty.
1391  */
1392 struct sk_buff *skb_dequeue_tail(struct sk_buff_head *list)
1393 {
1394         unsigned long flags;
1395         struct sk_buff *result;
1396
1397         spin_lock_irqsave(&list->lock, flags);
1398         result = __skb_dequeue_tail(list);
1399         spin_unlock_irqrestore(&list->lock, flags);
1400         return result;
1401 }
1402
1403 /**
1404  *      skb_queue_purge - empty a list
1405  *      @list: list to empty
1406  *
1407  *      Delete all buffers on an &sk_buff list. Each buffer is removed from
1408  *      the list and one reference dropped. This function takes the list
1409  *      lock and is atomic with respect to other list locking functions.
1410  */
1411 void skb_queue_purge(struct sk_buff_head *list)
1412 {
1413         struct sk_buff *skb;
1414         while ((skb = skb_dequeue(list)) != NULL)
1415                 kfree_skb(skb);
1416 }
1417
1418 /**
1419  *      skb_queue_head - queue a buffer at the list head
1420  *      @list: list to use
1421  *      @newsk: buffer to queue
1422  *
1423  *      Queue a buffer at the start of the list. This function takes the
1424  *      list lock and can be used safely with other locking &sk_buff functions
1425  *      safely.
1426  *
1427  *      A buffer cannot be placed on two lists at the same time.
1428  */
1429 void skb_queue_head(struct sk_buff_head *list, struct sk_buff *newsk)
1430 {
1431         unsigned long flags;
1432
1433         spin_lock_irqsave(&list->lock, flags);
1434         __skb_queue_head(list, newsk);
1435         spin_unlock_irqrestore(&list->lock, flags);
1436 }
1437
1438 /**
1439  *      skb_queue_tail - queue a buffer at the list tail
1440  *      @list: list to use
1441  *      @newsk: buffer to queue
1442  *
1443  *      Queue a buffer at the tail of the list. This function takes the
1444  *      list lock and can be used safely with other locking &sk_buff functions
1445  *      safely.
1446  *
1447  *      A buffer cannot be placed on two lists at the same time.
1448  */
1449 void skb_queue_tail(struct sk_buff_head *list, struct sk_buff *newsk)
1450 {
1451         unsigned long flags;
1452
1453         spin_lock_irqsave(&list->lock, flags);
1454         __skb_queue_tail(list, newsk);
1455         spin_unlock_irqrestore(&list->lock, flags);
1456 }
1457
1458 /**
1459  *      skb_unlink      -       remove a buffer from a list
1460  *      @skb: buffer to remove
1461  *      @list: list to use
1462  *
1463  *      Remove a packet from a list. The list locks are taken and this
1464  *      function is atomic with respect to other list locked calls
1465  *
1466  *      You must know what list the SKB is on.
1467  */
1468 void skb_unlink(struct sk_buff *skb, struct sk_buff_head *list)
1469 {
1470         unsigned long flags;
1471
1472         spin_lock_irqsave(&list->lock, flags);
1473         __skb_unlink(skb, list);
1474         spin_unlock_irqrestore(&list->lock, flags);
1475 }
1476
1477 /**
1478  *      skb_append      -       append a buffer
1479  *      @old: buffer to insert after
1480  *      @newsk: buffer to insert
1481  *      @list: list to use
1482  *
1483  *      Place a packet after a given packet in a list. The list locks are taken
1484  *      and this function is atomic with respect to other list locked calls.
1485  *      A buffer cannot be placed on two lists at the same time.
1486  */
1487 void skb_append(struct sk_buff *old, struct sk_buff *newsk, struct sk_buff_head *list)
1488 {
1489         unsigned long flags;
1490
1491         spin_lock_irqsave(&list->lock, flags);
1492         __skb_append(old, newsk, list);
1493         spin_unlock_irqrestore(&list->lock, flags);
1494 }
1495
1496
1497 /**
1498  *      skb_insert      -       insert a buffer
1499  *      @old: buffer to insert before
1500  *      @newsk: buffer to insert
1501  *      @list: list to use
1502  *
1503  *      Place a packet before a given packet in a list. The list locks are
1504  *      taken and this function is atomic with respect to other list locked
1505  *      calls.
1506  *
1507  *      A buffer cannot be placed on two lists at the same time.
1508  */
1509 void skb_insert(struct sk_buff *old, struct sk_buff *newsk, struct sk_buff_head *list)
1510 {
1511         unsigned long flags;
1512
1513         spin_lock_irqsave(&list->lock, flags);
1514         __skb_insert(newsk, old->prev, old, list);
1515         spin_unlock_irqrestore(&list->lock, flags);
1516 }
1517
1518 #if 0
1519 /*
1520  *      Tune the memory allocator for a new MTU size.
1521  */
1522 void skb_add_mtu(int mtu)
1523 {
1524         /* Must match allocation in alloc_skb */
1525         mtu = SKB_DATA_ALIGN(mtu) + sizeof(struct skb_shared_info);
1526
1527         kmem_add_cache_size(mtu);
1528 }
1529 #endif
1530
1531 static inline void skb_split_inside_header(struct sk_buff *skb,
1532                                            struct sk_buff* skb1,
1533                                            const u32 len, const int pos)
1534 {
1535         int i;
1536
1537         memcpy(skb_put(skb1, pos - len), skb->data + len, pos - len);
1538
1539         /* And move data appendix as is. */
1540         for (i = 0; i < skb_shinfo(skb)->nr_frags; i++)
1541                 skb_shinfo(skb1)->frags[i] = skb_shinfo(skb)->frags[i];
1542
1543         skb_shinfo(skb1)->nr_frags = skb_shinfo(skb)->nr_frags;
1544         skb_shinfo(skb)->nr_frags  = 0;
1545         skb1->data_len             = skb->data_len;
1546         skb1->len                  += skb1->data_len;
1547         skb->data_len              = 0;
1548         skb->len                   = len;
1549         skb->tail                  = skb->data + len;
1550 }
1551
1552 static inline void skb_split_no_header(struct sk_buff *skb,
1553                                        struct sk_buff* skb1,
1554                                        const u32 len, int pos)
1555 {
1556         int i, k = 0;
1557         const int nfrags = skb_shinfo(skb)->nr_frags;
1558
1559         skb_shinfo(skb)->nr_frags = 0;
1560         skb1->len                 = skb1->data_len = skb->len - len;
1561         skb->len                  = len;
1562         skb->data_len             = len - pos;
1563
1564         for (i = 0; i < nfrags; i++) {
1565                 int size = skb_shinfo(skb)->frags[i].size;
1566
1567                 if (pos + size > len) {
1568                         skb_shinfo(skb1)->frags[k] = skb_shinfo(skb)->frags[i];
1569
1570                         if (pos < len) {
1571                                 /* Split frag.
1572                                  * We have two variants in this case:
1573                                  * 1. Move all the frag to the second
1574                                  *    part, if it is possible. F.e.
1575                                  *    this approach is mandatory for TUX,
1576                                  *    where splitting is expensive.
1577                                  * 2. Split is accurately. We make this.
1578                                  */
1579                                 get_page(skb_shinfo(skb)->frags[i].page);
1580                                 skb_shinfo(skb1)->frags[0].page_offset += len - pos;
1581                                 skb_shinfo(skb1)->frags[0].size -= len - pos;
1582                                 skb_shinfo(skb)->frags[i].size  = len - pos;
1583                                 skb_shinfo(skb)->nr_frags++;
1584                         }
1585                         k++;
1586                 } else
1587                         skb_shinfo(skb)->nr_frags++;
1588                 pos += size;
1589         }
1590         skb_shinfo(skb1)->nr_frags = k;
1591 }
1592
1593 /**
1594  * skb_split - Split fragmented skb to two parts at length len.
1595  * @skb: the buffer to split
1596  * @skb1: the buffer to receive the second part
1597  * @len: new length for skb
1598  */
1599 void skb_split(struct sk_buff *skb, struct sk_buff *skb1, const u32 len)
1600 {
1601         int pos = skb_headlen(skb);
1602
1603         if (len < pos)  /* Split line is inside header. */
1604                 skb_split_inside_header(skb, skb1, len, pos);
1605         else            /* Second chunk has no header, nothing to copy. */
1606                 skb_split_no_header(skb, skb1, len, pos);
1607 }
1608
1609 /**
1610  * skb_prepare_seq_read - Prepare a sequential read of skb data
1611  * @skb: the buffer to read
1612  * @from: lower offset of data to be read
1613  * @to: upper offset of data to be read
1614  * @st: state variable
1615  *
1616  * Initializes the specified state variable. Must be called before
1617  * invoking skb_seq_read() for the first time.
1618  */
1619 void skb_prepare_seq_read(struct sk_buff *skb, unsigned int from,
1620                           unsigned int to, struct skb_seq_state *st)
1621 {
1622         st->lower_offset = from;
1623         st->upper_offset = to;
1624         st->root_skb = st->cur_skb = skb;
1625         st->frag_idx = st->stepped_offset = 0;
1626         st->frag_data = NULL;
1627 }
1628
1629 /**
1630  * skb_seq_read - Sequentially read skb data
1631  * @consumed: number of bytes consumed by the caller so far
1632  * @data: destination pointer for data to be returned
1633  * @st: state variable
1634  *
1635  * Reads a block of skb data at &consumed relative to the
1636  * lower offset specified to skb_prepare_seq_read(). Assigns
1637  * the head of the data block to &data and returns the length
1638  * of the block or 0 if the end of the skb data or the upper
1639  * offset has been reached.
1640  *
1641  * The caller is not required to consume all of the data
1642  * returned, i.e. &consumed is typically set to the number
1643  * of bytes already consumed and the next call to
1644  * skb_seq_read() will return the remaining part of the block.
1645  *
1646  * Note: The size of each block of data returned can be arbitary,
1647  *       this limitation is the cost for zerocopy seqeuental
1648  *       reads of potentially non linear data.
1649  *
1650  * Note: Fragment lists within fragments are not implemented
1651  *       at the moment, state->root_skb could be replaced with
1652  *       a stack for this purpose.
1653  */
1654 unsigned int skb_seq_read(unsigned int consumed, const u8 **data,
1655                           struct skb_seq_state *st)
1656 {
1657         unsigned int block_limit, abs_offset = consumed + st->lower_offset;
1658         skb_frag_t *frag;
1659
1660         if (unlikely(abs_offset >= st->upper_offset))
1661                 return 0;
1662
1663 next_skb:
1664         block_limit = skb_headlen(st->cur_skb);
1665
1666         if (abs_offset < block_limit) {
1667                 *data = st->cur_skb->data + abs_offset;
1668                 return block_limit - abs_offset;
1669         }
1670
1671         if (st->frag_idx == 0 && !st->frag_data)
1672                 st->stepped_offset += skb_headlen(st->cur_skb);
1673
1674         while (st->frag_idx < skb_shinfo(st->cur_skb)->nr_frags) {
1675                 frag = &skb_shinfo(st->cur_skb)->frags[st->frag_idx];
1676                 block_limit = frag->size + st->stepped_offset;
1677
1678                 if (abs_offset < block_limit) {
1679                         if (!st->frag_data)
1680                                 st->frag_data = kmap_skb_frag(frag);
1681
1682                         *data = (u8 *) st->frag_data + frag->page_offset +
1683                                 (abs_offset - st->stepped_offset);
1684
1685                         return block_limit - abs_offset;
1686                 }
1687
1688                 if (st->frag_data) {
1689                         kunmap_skb_frag(st->frag_data);
1690                         st->frag_data = NULL;
1691                 }
1692
1693                 st->frag_idx++;
1694                 st->stepped_offset += frag->size;
1695         }
1696
1697         if (st->cur_skb->next) {
1698                 st->cur_skb = st->cur_skb->next;
1699                 st->frag_idx = 0;
1700                 goto next_skb;
1701         } else if (st->root_skb == st->cur_skb &&
1702                    skb_shinfo(st->root_skb)->frag_list) {
1703                 st->cur_skb = skb_shinfo(st->root_skb)->frag_list;
1704                 goto next_skb;
1705         }
1706
1707         return 0;
1708 }
1709
1710 /**
1711  * skb_abort_seq_read - Abort a sequential read of skb data
1712  * @st: state variable
1713  *
1714  * Must be called if skb_seq_read() was not called until it
1715  * returned 0.
1716  */
1717 void skb_abort_seq_read(struct skb_seq_state *st)
1718 {
1719         if (st->frag_data)
1720                 kunmap_skb_frag(st->frag_data);
1721 }
1722
1723 #define TS_SKB_CB(state)        ((struct skb_seq_state *) &((state)->cb))
1724
1725 static unsigned int skb_ts_get_next_block(unsigned int offset, const u8 **text,
1726                                           struct ts_config *conf,
1727                                           struct ts_state *state)
1728 {
1729         return skb_seq_read(offset, text, TS_SKB_CB(state));
1730 }
1731
1732 static void skb_ts_finish(struct ts_config *conf, struct ts_state *state)
1733 {
1734         skb_abort_seq_read(TS_SKB_CB(state));
1735 }
1736
1737 /**
1738  * skb_find_text - Find a text pattern in skb data
1739  * @skb: the buffer to look in
1740  * @from: search offset
1741  * @to: search limit
1742  * @config: textsearch configuration
1743  * @state: uninitialized textsearch state variable
1744  *
1745  * Finds a pattern in the skb data according to the specified
1746  * textsearch configuration. Use textsearch_next() to retrieve
1747  * subsequent occurrences of the pattern. Returns the offset
1748  * to the first occurrence or UINT_MAX if no match was found.
1749  */
1750 unsigned int skb_find_text(struct sk_buff *skb, unsigned int from,
1751                            unsigned int to, struct ts_config *config,
1752                            struct ts_state *state)
1753 {
1754         config->get_next_block = skb_ts_get_next_block;
1755         config->finish = skb_ts_finish;
1756
1757         skb_prepare_seq_read(skb, from, to, TS_SKB_CB(state));
1758
1759         return textsearch_find(config, state);
1760 }
1761
1762 /**
1763  * skb_append_datato_frags: - append the user data to a skb
1764  * @sk: sock  structure
1765  * @skb: skb structure to be appened with user data.
1766  * @getfrag: call back function to be used for getting the user data
1767  * @from: pointer to user message iov
1768  * @length: length of the iov message
1769  *
1770  * Description: This procedure append the user data in the fragment part
1771  * of the skb if any page alloc fails user this procedure returns  -ENOMEM
1772  */
1773 int skb_append_datato_frags(struct sock *sk, struct sk_buff *skb,
1774                         int (*getfrag)(void *from, char *to, int offset,
1775                                         int len, int odd, struct sk_buff *skb),
1776                         void *from, int length)
1777 {
1778         int frg_cnt = 0;
1779         skb_frag_t *frag = NULL;
1780         struct page *page = NULL;
1781         int copy, left;
1782         int offset = 0;
1783         int ret;
1784
1785         do {
1786                 /* Return error if we don't have space for new frag */
1787                 frg_cnt = skb_shinfo(skb)->nr_frags;
1788                 if (frg_cnt >= MAX_SKB_FRAGS)
1789                         return -EFAULT;
1790
1791                 /* allocate a new page for next frag */
1792                 page = alloc_pages(sk->sk_allocation, 0);
1793
1794                 /* If alloc_page fails just return failure and caller will
1795                  * free previous allocated pages by doing kfree_skb()
1796                  */
1797                 if (page == NULL)
1798                         return -ENOMEM;
1799
1800                 /* initialize the next frag */
1801                 sk->sk_sndmsg_page = page;
1802                 sk->sk_sndmsg_off = 0;
1803                 skb_fill_page_desc(skb, frg_cnt, page, 0, 0);
1804                 skb->truesize += PAGE_SIZE;
1805                 atomic_add(PAGE_SIZE, &sk->sk_wmem_alloc);
1806
1807                 /* get the new initialized frag */
1808                 frg_cnt = skb_shinfo(skb)->nr_frags;
1809                 frag = &skb_shinfo(skb)->frags[frg_cnt - 1];
1810
1811                 /* copy the user data to page */
1812                 left = PAGE_SIZE - frag->page_offset;
1813                 copy = (length > left)? left : length;
1814
1815                 ret = getfrag(from, (page_address(frag->page) +
1816                             frag->page_offset + frag->size),
1817                             offset, copy, 0, skb);
1818                 if (ret < 0)
1819                         return -EFAULT;
1820
1821                 /* copy was successful so update the size parameters */
1822                 sk->sk_sndmsg_off += copy;
1823                 frag->size += copy;
1824                 skb->len += copy;
1825                 skb->data_len += copy;
1826                 offset += copy;
1827                 length -= copy;
1828
1829         } while (length > 0);
1830
1831         return 0;
1832 }
1833
1834 void __init skb_init(void)
1835 {
1836         skbuff_head_cache = kmem_cache_create("skbuff_head_cache",
1837                                               sizeof(struct sk_buff),
1838                                               0,
1839                                               SLAB_HWCACHE_ALIGN,
1840                                               NULL, NULL);
1841         if (!skbuff_head_cache)
1842                 panic("cannot create skbuff cache");
1843
1844         skbuff_fclone_cache = kmem_cache_create("skbuff_fclone_cache",
1845                                                 (2*sizeof(struct sk_buff)) +
1846                                                 sizeof(atomic_t),
1847                                                 0,
1848                                                 SLAB_HWCACHE_ALIGN,
1849                                                 NULL, NULL);
1850         if (!skbuff_fclone_cache)
1851                 panic("cannot create skbuff cache");
1852 }
1853
1854 EXPORT_SYMBOL(___pskb_trim);
1855 EXPORT_SYMBOL(__kfree_skb);
1856 EXPORT_SYMBOL(__pskb_pull_tail);
1857 EXPORT_SYMBOL(__alloc_skb);
1858 EXPORT_SYMBOL(pskb_copy);
1859 EXPORT_SYMBOL(pskb_expand_head);
1860 EXPORT_SYMBOL(skb_checksum);
1861 EXPORT_SYMBOL(skb_clone);
1862 EXPORT_SYMBOL(skb_clone_fraglist);
1863 EXPORT_SYMBOL(skb_copy);
1864 EXPORT_SYMBOL(skb_copy_and_csum_bits);
1865 EXPORT_SYMBOL(skb_copy_and_csum_dev);
1866 EXPORT_SYMBOL(skb_copy_bits);
1867 EXPORT_SYMBOL(skb_copy_expand);
1868 EXPORT_SYMBOL(skb_over_panic);
1869 EXPORT_SYMBOL(skb_pad);
1870 EXPORT_SYMBOL(skb_realloc_headroom);
1871 EXPORT_SYMBOL(skb_under_panic);
1872 EXPORT_SYMBOL(skb_dequeue);
1873 EXPORT_SYMBOL(skb_dequeue_tail);
1874 EXPORT_SYMBOL(skb_insert);
1875 EXPORT_SYMBOL(skb_queue_purge);
1876 EXPORT_SYMBOL(skb_queue_head);
1877 EXPORT_SYMBOL(skb_queue_tail);
1878 EXPORT_SYMBOL(skb_unlink);
1879 EXPORT_SYMBOL(skb_append);
1880 EXPORT_SYMBOL(skb_split);
1881 EXPORT_SYMBOL(skb_prepare_seq_read);
1882 EXPORT_SYMBOL(skb_seq_read);
1883 EXPORT_SYMBOL(skb_abort_seq_read);
1884 EXPORT_SYMBOL(skb_find_text);
1885 EXPORT_SYMBOL(skb_append_datato_frags);