net/sunrpc/xdr.c

   1 // SPDX-License-Identifier: GPL-2.0-only
   2 /*
   3  * linux/net/sunrpc/xdr.c
   4  *
   5  * Generic XDR support.
   6  *
   7  * Copyright (C) 1995, 1996 Olaf Kirch <okir@monad.swb.de>
   8  */
   9
  10 #include <linux/module.h>
  11 #include <linux/slab.h>
  12 #include <linux/types.h>
  13 #include <linux/string.h>
  14 #include <linux/kernel.h>
  15 #include <linux/pagemap.h>
  16 #include <linux/errno.h>
  17 #include <linux/sunrpc/xdr.h>
  18 #include <linux/sunrpc/msg_prot.h>
  19 #include <linux/bvec.h>
  20 #include <trace/events/sunrpc.h>
  21
  22 static void _copy_to_pages(struct page **, size_t, const char *, size_t);
  23
  24
  25 /*
  26  * XDR functions for basic NFS types
  27  */
  28 __be32 *
  29 xdr_encode_netobj(__be32 *p, const struct xdr_netobj *obj)
  30 {
  31         unsigned int    quadlen = XDR_QUADLEN(obj->len);
  32
  33         p[quadlen] = 0;         /* zero trailing bytes */
  34         *p++ = cpu_to_be32(obj->len);
  35         memcpy(p, obj->data, obj->len);
  36         return p + XDR_QUADLEN(obj->len);
  37 }
  38 EXPORT_SYMBOL_GPL(xdr_encode_netobj);
  39
  40 __be32 *
  41 xdr_decode_netobj(__be32 *p, struct xdr_netobj *obj)
  42 {
  43         unsigned int    len;
  44
  45         if ((len = be32_to_cpu(*p++)) > XDR_MAX_NETOBJ)
  46                 return NULL;
  47         obj->len  = len;
  48         obj->data = (u8 *) p;
  49         return p + XDR_QUADLEN(len);
  50 }
  51 EXPORT_SYMBOL_GPL(xdr_decode_netobj);
  52
  53 /**
  54  * xdr_encode_opaque_fixed - Encode fixed length opaque data
  55  * @p: pointer to current position in XDR buffer.
  56  * @ptr: pointer to data to encode (or NULL)
  57  * @nbytes: size of data.
  58  *
  59  * Copy the array of data of length nbytes at ptr to the XDR buffer
  60  * at position p, then align to the next 32-bit boundary by padding
  61  * with zero bytes (see RFC1832).
  62  * Note: if ptr is NULL, only the padding is performed.
  63  *
  64  * Returns the updated current XDR buffer position
  65  *
  66  */
  67 __be32 *xdr_encode_opaque_fixed(__be32 *p, const void *ptr, unsigned int nbytes)
  68 {
  69         if (likely(nbytes != 0)) {
  70                 unsigned int quadlen = XDR_QUADLEN(nbytes);
  71                 unsigned int padding = (quadlen << 2) - nbytes;
  72
  73                 if (ptr != NULL)
  74                         memcpy(p, ptr, nbytes);
  75                 if (padding != 0)
  76                         memset((char *)p + nbytes, 0, padding);
  77                 p += quadlen;
  78         }
  79         return p;
  80 }
  81 EXPORT_SYMBOL_GPL(xdr_encode_opaque_fixed);
  82
  83 /**
  84  * xdr_encode_opaque - Encode variable length opaque data
  85  * @p: pointer to current position in XDR buffer.
  86  * @ptr: pointer to data to encode (or NULL)
  87  * @nbytes: size of data.
  88  *
  89  * Returns the updated current XDR buffer position
  90  */
  91 __be32 *xdr_encode_opaque(__be32 *p, const void *ptr, unsigned int nbytes)
  92 {
  93         *p++ = cpu_to_be32(nbytes);
  94         return xdr_encode_opaque_fixed(p, ptr, nbytes);
  95 }
  96 EXPORT_SYMBOL_GPL(xdr_encode_opaque);
  97
  98 __be32 *
  99 xdr_encode_string(__be32 *p, const char *string)
 100 {
 101         return xdr_encode_array(p, string, strlen(string));
 102 }
 103 EXPORT_SYMBOL_GPL(xdr_encode_string);
 104
 105 __be32 *
 106 xdr_decode_string_inplace(__be32 *p, char **sp,
 107                           unsigned int *lenp, unsigned int maxlen)
 108 {
 109         u32 len;
 110
 111         len = be32_to_cpu(*p++);
 112         if (len > maxlen)
 113                 return NULL;
 114         *lenp = len;
 115         *sp = (char *) p;
 116         return p + XDR_QUADLEN(len);
 117 }
 118 EXPORT_SYMBOL_GPL(xdr_decode_string_inplace);
 119
 120 /**
 121  * xdr_terminate_string - '\0'-terminate a string residing in an xdr_buf
 122  * @buf: XDR buffer where string resides
 123  * @len: length of string, in bytes
 124  *
 125  */
 126 void xdr_terminate_string(const struct xdr_buf *buf, const u32 len)
 127 {
 128         char *kaddr;
 129
 130         kaddr = kmap_atomic(buf->pages[0]);
 131         kaddr[buf->page_base + len] = '\0';
 132         kunmap_atomic(kaddr);
 133 }
 134 EXPORT_SYMBOL_GPL(xdr_terminate_string);
 135
 136 size_t xdr_buf_pagecount(const struct xdr_buf *buf)
 137 {
 138         if (!buf->page_len)
 139                 return 0;
 140         return (buf->page_base + buf->page_len + PAGE_SIZE - 1) >> PAGE_SHIFT;
 141 }
 142
 143 int
 144 xdr_alloc_bvec(struct xdr_buf *buf, gfp_t gfp)
 145 {
 146         size_t i, n = xdr_buf_pagecount(buf);
 147
 148         if (n != 0 && buf->bvec == NULL) {
 149                 buf->bvec = kmalloc_array(n, sizeof(buf->bvec[0]), gfp);
 150                 if (!buf->bvec)
 151                         return -ENOMEM;
 152                 for (i = 0; i < n; i++) {
 153                         bvec_set_page(&buf->bvec[i], buf->pages[i], PAGE_SIZE,
 154                                       0);
 155                 }
 156         }
 157         return 0;
 158 }
 159
 160 void
 161 xdr_free_bvec(struct xdr_buf *buf)
 162 {
 163         kfree(buf->bvec);
 164         buf->bvec = NULL;
 165 }
 166
 167 /**
 168  * xdr_buf_to_bvec - Copy components of an xdr_buf into a bio_vec array
 169  * @bvec: bio_vec array to populate
 170  * @bvec_size: element count of @bio_vec
 171  * @xdr: xdr_buf to be copied
 172  *
 173  * Returns the number of entries consumed in @bvec.
 174  */
 175 unsigned int xdr_buf_to_bvec(struct bio_vec *bvec, unsigned int bvec_size,
 176                              const struct xdr_buf *xdr)
 177 {
 178         const struct kvec *head = xdr->head;
 179         const struct kvec *tail = xdr->tail;
 180         unsigned int count = 0;
 181
 182         if (head->iov_len) {
 183                 bvec_set_virt(bvec++, head->iov_base, head->iov_len);
 184                 ++count;
 185         }
 186
 187         if (xdr->page_len) {
 188                 unsigned int offset, len, remaining;
 189                 struct page **pages = xdr->pages;
 190
 191                 offset = offset_in_page(xdr->page_base);
 192                 remaining = xdr->page_len;
 193                 while (remaining > 0) {
 194                         len = min_t(unsigned int, remaining,
 195                                     PAGE_SIZE - offset);
 196                         bvec_set_page(bvec++, *pages++, len, offset);
 197                         remaining -= len;
 198                         offset = 0;
 199                         if (unlikely(++count > bvec_size))
 200                                 goto bvec_overflow;
 201                 }
 202         }
 203
 204         if (tail->iov_len) {
 205                 bvec_set_virt(bvec, tail->iov_base, tail->iov_len);
 206                 if (unlikely(++count > bvec_size))
 207                         goto bvec_overflow;
 208         }
 209
 210         return count;
 211
 212 bvec_overflow:
 213         pr_warn_once("%s: bio_vec array overflow\n", __func__);
 214         return count - 1;
 215 }
 216
 217 /**
 218  * xdr_inline_pages - Prepare receive buffer for a large reply
 219  * @xdr: xdr_buf into which reply will be placed
 220  * @offset: expected offset where data payload will start, in bytes
 221  * @pages: vector of struct page pointers
 222  * @base: offset in first page where receive should start, in bytes
 223  * @len: expected size of the upper layer data payload, in bytes
 224  *
 225  */
 226 void
 227 xdr_inline_pages(struct xdr_buf *xdr, unsigned int offset,
 228                  struct page **pages, unsigned int base, unsigned int len)
 229 {
 230         struct kvec *head = xdr->head;
 231         struct kvec *tail = xdr->tail;
 232         char *buf = (char *)head->iov_base;
 233         unsigned int buflen = head->iov_len;
 234
 235         head->iov_len  = offset;
 236
 237         xdr->pages = pages;
 238         xdr->page_base = base;
 239         xdr->page_len = len;
 240
 241         tail->iov_base = buf + offset;
 242         tail->iov_len = buflen - offset;
 243         xdr->buflen += len;
 244 }
 245 EXPORT_SYMBOL_GPL(xdr_inline_pages);
 246
 247 /*
 248  * Helper routines for doing 'memmove' like operations on a struct xdr_buf
 249  */
 250
 251 /**
 252  * _shift_data_left_pages
 253  * @pages: vector of pages containing both the source and dest memory area.
 254  * @pgto_base: page vector address of destination
 255  * @pgfrom_base: page vector address of source
 256  * @len: number of bytes to copy
 257  *
 258  * Note: the addresses pgto_base and pgfrom_base are both calculated in
 259  *       the same way:
 260  *            if a memory area starts at byte 'base' in page 'pages[i]',
 261  *            then its address is given as (i << PAGE_CACHE_SHIFT) + base
 262  * Alse note: pgto_base must be < pgfrom_base, but the memory areas
 263  *      they point to may overlap.
 264  */
 265 static void
 266 _shift_data_left_pages(struct page **pages, size_t pgto_base,
 267                         size_t pgfrom_base, size_t len)
 268 {
 269         struct page **pgfrom, **pgto;
 270         char *vfrom, *vto;
 271         size_t copy;
 272
 273         BUG_ON(pgfrom_base <= pgto_base);
 274
 275         if (!len)
 276                 return;
 277
 278         pgto = pages + (pgto_base >> PAGE_SHIFT);
 279         pgfrom = pages + (pgfrom_base >> PAGE_SHIFT);
 280
 281         pgto_base &= ~PAGE_MASK;
 282         pgfrom_base &= ~PAGE_MASK;
 283
 284         do {
 285                 if (pgto_base >= PAGE_SIZE) {
 286                         pgto_base = 0;
 287                         pgto++;
 288                 }
 289                 if (pgfrom_base >= PAGE_SIZE){
 290                         pgfrom_base = 0;
 291                         pgfrom++;
 292                 }
 293
 294                 copy = len;
 295                 if (copy > (PAGE_SIZE - pgto_base))
 296                         copy = PAGE_SIZE - pgto_base;
 297                 if (copy > (PAGE_SIZE - pgfrom_base))
 298                         copy = PAGE_SIZE - pgfrom_base;
 299
 300                 vto = kmap_atomic(*pgto);
 301                 if (*pgto != *pgfrom) {
 302                         vfrom = kmap_atomic(*pgfrom);
 303                         memcpy(vto + pgto_base, vfrom + pgfrom_base, copy);
 304                         kunmap_atomic(vfrom);
 305                 } else
 306                         memmove(vto + pgto_base, vto + pgfrom_base, copy);
 307                 flush_dcache_page(*pgto);
 308                 kunmap_atomic(vto);
 309
 310                 pgto_base += copy;
 311                 pgfrom_base += copy;
 312
 313         } while ((len -= copy) != 0);
 314 }
 315
 316 /**
 317  * _shift_data_right_pages
 318  * @pages: vector of pages containing both the source and dest memory area.
 319  * @pgto_base: page vector address of destination
 320  * @pgfrom_base: page vector address of source
 321  * @len: number of bytes to copy
 322  *
 323  * Note: the addresses pgto_base and pgfrom_base are both calculated in
 324  *       the same way:
 325  *            if a memory area starts at byte 'base' in page 'pages[i]',
 326  *            then its address is given as (i << PAGE_SHIFT) + base
 327  * Also note: pgfrom_base must be < pgto_base, but the memory areas
 328  *      they point to may overlap.
 329  */
 330 static void
 331 _shift_data_right_pages(struct page **pages, size_t pgto_base,
 332                 size_t pgfrom_base, size_t len)
 333 {
 334         struct page **pgfrom, **pgto;
 335         char *vfrom, *vto;
 336         size_t copy;
 337
 338         BUG_ON(pgto_base <= pgfrom_base);
 339
 340         if (!len)
 341                 return;
 342
 343         pgto_base += len;
 344         pgfrom_base += len;
 345
 346         pgto = pages + (pgto_base >> PAGE_SHIFT);
 347         pgfrom = pages + (pgfrom_base >> PAGE_SHIFT);
 348
 349         pgto_base &= ~PAGE_MASK;
 350         pgfrom_base &= ~PAGE_MASK;
 351
 352         do {
 353                 /* Are any pointers crossing a page boundary? */
 354                 if (pgto_base == 0) {
 355                         pgto_base = PAGE_SIZE;
 356                         pgto--;
 357                 }
 358                 if (pgfrom_base == 0) {
 359                         pgfrom_base = PAGE_SIZE;
 360                         pgfrom--;
 361                 }
 362
 363                 copy = len;
 364                 if (copy > pgto_base)
 365                         copy = pgto_base;
 366                 if (copy > pgfrom_base)
 367                         copy = pgfrom_base;
 368                 pgto_base -= copy;
 369                 pgfrom_base -= copy;
 370
 371                 vto = kmap_atomic(*pgto);
 372                 if (*pgto != *pgfrom) {
 373                         vfrom = kmap_atomic(*pgfrom);
 374                         memcpy(vto + pgto_base, vfrom + pgfrom_base, copy);
 375                         kunmap_atomic(vfrom);
 376                 } else
 377                         memmove(vto + pgto_base, vto + pgfrom_base, copy);
 378                 flush_dcache_page(*pgto);
 379                 kunmap_atomic(vto);
 380
 381         } while ((len -= copy) != 0);
 382 }
 383
 384 /**
 385  * _copy_to_pages
 386  * @pages: array of pages
 387  * @pgbase: page vector address of destination
 388  * @p: pointer to source data
 389  * @len: length
 390  *
 391  * Copies data from an arbitrary memory location into an array of pages
 392  * The copy is assumed to be non-overlapping.
 393  */
 394 static void
 395 _copy_to_pages(struct page **pages, size_t pgbase, const char *p, size_t len)
 396 {
 397         struct page **pgto;
 398         char *vto;
 399         size_t copy;
 400
 401         if (!len)
 402                 return;
 403
 404         pgto = pages + (pgbase >> PAGE_SHIFT);
 405         pgbase &= ~PAGE_MASK;
 406
 407         for (;;) {
 408                 copy = PAGE_SIZE - pgbase;
 409                 if (copy > len)
 410                         copy = len;
 411
 412                 vto = kmap_atomic(*pgto);
 413                 memcpy(vto + pgbase, p, copy);
 414                 kunmap_atomic(vto);
 415
 416                 len -= copy;
 417                 if (len == 0)
 418                         break;
 419
 420                 pgbase += copy;
 421                 if (pgbase == PAGE_SIZE) {
 422                         flush_dcache_page(*pgto);
 423                         pgbase = 0;
 424                         pgto++;
 425                 }
 426                 p += copy;
 427         }
 428         flush_dcache_page(*pgto);
 429 }
 430
 431 /**
 432  * _copy_from_pages
 433  * @p: pointer to destination
 434  * @pages: array of pages
 435  * @pgbase: offset of source data
 436  * @len: length
 437  *
 438  * Copies data into an arbitrary memory location from an array of pages
 439  * The copy is assumed to be non-overlapping.
 440  */
 441 void
 442 _copy_from_pages(char *p, struct page **pages, size_t pgbase, size_t len)
 443 {
 444         struct page **pgfrom;
 445         char *vfrom;
 446         size_t copy;
 447
 448         if (!len)
 449                 return;
 450
 451         pgfrom = pages + (pgbase >> PAGE_SHIFT);
 452         pgbase &= ~PAGE_MASK;
 453
 454         do {
 455                 copy = PAGE_SIZE - pgbase;
 456                 if (copy > len)
 457                         copy = len;
 458
 459                 vfrom = kmap_atomic(*pgfrom);
 460                 memcpy(p, vfrom + pgbase, copy);
 461                 kunmap_atomic(vfrom);
 462
 463                 pgbase += copy;
 464                 if (pgbase == PAGE_SIZE) {
 465                         pgbase = 0;
 466                         pgfrom++;
 467                 }
 468                 p += copy;
 469
 470         } while ((len -= copy) != 0);
 471 }
 472 EXPORT_SYMBOL_GPL(_copy_from_pages);
 473
 474 static void xdr_buf_iov_zero(const struct kvec *iov, unsigned int base,
 475                              unsigned int len)
 476 {
 477         if (base >= iov->iov_len)
 478                 return;
 479         if (len > iov->iov_len - base)
 480                 len = iov->iov_len - base;
 481         memset(iov->iov_base + base, 0, len);
 482 }
 483
 484 /**
 485  * xdr_buf_pages_zero
 486  * @buf: xdr_buf
 487  * @pgbase: beginning offset
 488  * @len: length
 489  */
 490 static void xdr_buf_pages_zero(const struct xdr_buf *buf, unsigned int pgbase,
 491                                unsigned int len)
 492 {
 493         struct page **pages = buf->pages;
 494         struct page **page;
 495         char *vpage;
 496         unsigned int zero;
 497
 498         if (!len)
 499                 return;
 500         if (pgbase >= buf->page_len) {
 501                 xdr_buf_iov_zero(buf->tail, pgbase - buf->page_len, len);
 502                 return;
 503         }
 504         if (pgbase + len > buf->page_len) {
 505                 xdr_buf_iov_zero(buf->tail, 0, pgbase + len - buf->page_len);
 506                 len = buf->page_len - pgbase;
 507         }
 508
 509         pgbase += buf->page_base;
 510
 511         page = pages + (pgbase >> PAGE_SHIFT);
 512         pgbase &= ~PAGE_MASK;
 513
 514         do {
 515                 zero = PAGE_SIZE - pgbase;
 516                 if (zero > len)
 517                         zero = len;
 518
 519                 vpage = kmap_atomic(*page);
 520                 memset(vpage + pgbase, 0, zero);
 521                 kunmap_atomic(vpage);
 522
 523                 flush_dcache_page(*page);
 524                 pgbase = 0;
 525                 page++;
 526
 527         } while ((len -= zero) != 0);
 528 }
 529
 530 static unsigned int xdr_buf_pages_fill_sparse(const struct xdr_buf *buf,
 531                                               unsigned int buflen, gfp_t gfp)
 532 {
 533         unsigned int i, npages, pagelen;
 534
 535         if (!(buf->flags & XDRBUF_SPARSE_PAGES))
 536                 return buflen;
 537         if (buflen <= buf->head->iov_len)
 538                 return buflen;
 539         pagelen = buflen - buf->head->iov_len;
 540         if (pagelen > buf->page_len)
 541                 pagelen = buf->page_len;
 542         npages = (pagelen + buf->page_base + PAGE_SIZE - 1) >> PAGE_SHIFT;
 543         for (i = 0; i < npages; i++) {
 544                 if (!buf->pages[i])
 545                         continue;
 546                 buf->pages[i] = alloc_page(gfp);
 547                 if (likely(buf->pages[i]))
 548                         continue;
 549                 buflen -= pagelen;
 550                 pagelen = i << PAGE_SHIFT;
 551                 if (pagelen > buf->page_base)
 552                         buflen += pagelen - buf->page_base;
 553                 break;
 554         }
 555         return buflen;
 556 }
 557
 558 static void xdr_buf_try_expand(struct xdr_buf *buf, unsigned int len)
 559 {
 560         struct kvec *head = buf->head;
 561         struct kvec *tail = buf->tail;
 562         unsigned int sum = head->iov_len + buf->page_len + tail->iov_len;
 563         unsigned int free_space, newlen;
 564
 565         if (sum > buf->len) {
 566                 free_space = min_t(unsigned int, sum - buf->len, len);
 567                 newlen = xdr_buf_pages_fill_sparse(buf, buf->len + free_space,
 568                                                    GFP_KERNEL);
 569                 free_space = newlen - buf->len;
 570                 buf->len = newlen;
 571                 len -= free_space;
 572                 if (!len)
 573                         return;
 574         }
 575
 576         if (buf->buflen > sum) {
 577                 /* Expand the tail buffer */
 578                 free_space = min_t(unsigned int, buf->buflen - sum, len);
 579                 tail->iov_len += free_space;
 580                 buf->len += free_space;
 581         }
 582 }
 583
 584 static void xdr_buf_tail_copy_right(const struct xdr_buf *buf,
 585                                     unsigned int base, unsigned int len,
 586                                     unsigned int shift)
 587 {
 588         const struct kvec *tail = buf->tail;
 589         unsigned int to = base + shift;
 590
 591         if (to >= tail->iov_len)
 592                 return;
 593         if (len + to > tail->iov_len)
 594                 len = tail->iov_len - to;
 595         memmove(tail->iov_base + to, tail->iov_base + base, len);
 596 }
 597
 598 static void xdr_buf_pages_copy_right(const struct xdr_buf *buf,
 599                                      unsigned int base, unsigned int len,
 600                                      unsigned int shift)
 601 {
 602         const struct kvec *tail = buf->tail;
 603         unsigned int to = base + shift;
 604         unsigned int pglen = 0;
 605         unsigned int talen = 0, tato = 0;
 606
 607         if (base >= buf->page_len)
 608                 return;
 609         if (len > buf->page_len - base)
 610                 len = buf->page_len - base;
 611         if (to >= buf->page_len) {
 612                 tato = to - buf->page_len;
 613                 if (tail->iov_len >= len + tato)
 614                         talen = len;
 615                 else if (tail->iov_len > tato)
 616                         talen = tail->iov_len - tato;
 617         } else if (len + to >= buf->page_len) {
 618                 pglen = buf->page_len - to;
 619                 talen = len - pglen;
 620                 if (talen > tail->iov_len)
 621                         talen = tail->iov_len;
 622         } else
 623                 pglen = len;
 624
 625         _copy_from_pages(tail->iov_base + tato, buf->pages,
 626                          buf->page_base + base + pglen, talen);
 627         _shift_data_right_pages(buf->pages, buf->page_base + to,
 628                                 buf->page_base + base, pglen);
 629 }
 630
 631 static void xdr_buf_head_copy_right(const struct xdr_buf *buf,
 632                                     unsigned int base, unsigned int len,
 633                                     unsigned int shift)
 634 {
 635         const struct kvec *head = buf->head;
 636         const struct kvec *tail = buf->tail;
 637         unsigned int to = base + shift;
 638         unsigned int pglen = 0, pgto = 0;
 639         unsigned int talen = 0, tato = 0;
 640
 641         if (base >= head->iov_len)
 642                 return;
 643         if (len > head->iov_len - base)
 644                 len = head->iov_len - base;
 645         if (to >= buf->page_len + head->iov_len) {
 646                 tato = to - buf->page_len - head->iov_len;
 647                 talen = len;
 648         } else if (to >= head->iov_len) {
 649                 pgto = to - head->iov_len;
 650                 pglen = len;
 651                 if (pgto + pglen > buf->page_len) {
 652                         talen = pgto + pglen - buf->page_len;
 653                         pglen -= talen;
 654                 }
 655         } else {
 656                 pglen = len - to;
 657                 if (pglen > buf->page_len) {
 658                         talen = pglen - buf->page_len;
 659                         pglen = buf->page_len;
 660                 }
 661         }
 662
 663         len -= talen;
 664         base += len;
 665         if (talen + tato > tail->iov_len)
 666                 talen = tail->iov_len > tato ? tail->iov_len - tato : 0;
 667         memcpy(tail->iov_base + tato, head->iov_base + base, talen);
 668
 669         len -= pglen;
 670         base -= pglen;
 671         _copy_to_pages(buf->pages, buf->page_base + pgto, head->iov_base + base,
 672                        pglen);
 673
 674         base -= len;
 675         memmove(head->iov_base + to, head->iov_base + base, len);
 676 }
 677
 678 static void xdr_buf_tail_shift_right(const struct xdr_buf *buf,
 679                                      unsigned int base, unsigned int len,
 680                                      unsigned int shift)
 681 {
 682         const struct kvec *tail = buf->tail;
 683
 684         if (base >= tail->iov_len || !shift || !len)
 685                 return;
 686         xdr_buf_tail_copy_right(buf, base, len, shift);
 687 }
 688
 689 static void xdr_buf_pages_shift_right(const struct xdr_buf *buf,
 690                                       unsigned int base, unsigned int len,
 691                                       unsigned int shift)
 692 {
 693         if (!shift || !len)
 694                 return;
 695         if (base >= buf->page_len) {
 696                 xdr_buf_tail_shift_right(buf, base - buf->page_len, len, shift);
 697                 return;
 698         }
 699         if (base + len > buf->page_len)
 700                 xdr_buf_tail_shift_right(buf, 0, base + len - buf->page_len,
 701                                          shift);
 702         xdr_buf_pages_copy_right(buf, base, len, shift);
 703 }
 704
 705 static void xdr_buf_head_shift_right(const struct xdr_buf *buf,
 706                                      unsigned int base, unsigned int len,
 707                                      unsigned int shift)
 708 {
 709         const struct kvec *head = buf->head;
 710
 711         if (!shift)
 712                 return;
 713         if (base >= head->iov_len) {
 714                 xdr_buf_pages_shift_right(buf, head->iov_len - base, len,
 715                                           shift);
 716                 return;
 717         }
 718         if (base + len > head->iov_len)
 719                 xdr_buf_pages_shift_right(buf, 0, base + len - head->iov_len,
 720                                           shift);
 721         xdr_buf_head_copy_right(buf, base, len, shift);
 722 }
 723
 724 static void xdr_buf_tail_copy_left(const struct xdr_buf *buf, unsigned int base,
 725                                    unsigned int len, unsigned int shift)
 726 {
 727         const struct kvec *tail = buf->tail;
 728
 729         if (base >= tail->iov_len)
 730                 return;
 731         if (len > tail->iov_len - base)
 732                 len = tail->iov_len - base;
 733         /* Shift data into head */
 734         if (shift > buf->page_len + base) {
 735                 const struct kvec *head = buf->head;
 736                 unsigned int hdto =
 737                         head->iov_len + buf->page_len + base - shift;
 738                 unsigned int hdlen = len;
 739
 740                 if (WARN_ONCE(shift > head->iov_len + buf->page_len + base,
 741                               "SUNRPC: Misaligned data.\n"))
 742                         return;
 743                 if (hdto + hdlen > head->iov_len)
 744                         hdlen = head->iov_len - hdto;
 745                 memcpy(head->iov_base + hdto, tail->iov_base + base, hdlen);
 746                 base += hdlen;
 747                 len -= hdlen;
 748                 if (!len)
 749                         return;
 750         }
 751         /* Shift data into pages */
 752         if (shift > base) {
 753                 unsigned int pgto = buf->page_len + base - shift;
 754                 unsigned int pglen = len;
 755
 756                 if (pgto + pglen > buf->page_len)
 757                         pglen = buf->page_len - pgto;
 758                 _copy_to_pages(buf->pages, buf->page_base + pgto,
 759                                tail->iov_base + base, pglen);
 760                 base += pglen;
 761                 len -= pglen;
 762                 if (!len)
 763                         return;
 764         }
 765         memmove(tail->iov_base + base - shift, tail->iov_base + base, len);
 766 }
 767
 768 static void xdr_buf_pages_copy_left(const struct xdr_buf *buf,
 769                                     unsigned int base, unsigned int len,
 770                                     unsigned int shift)
 771 {
 772         unsigned int pgto;
 773
 774         if (base >= buf->page_len)
 775                 return;
 776         if (len > buf->page_len - base)
 777                 len = buf->page_len - base;
 778         /* Shift data into head */
 779         if (shift > base) {
 780                 const struct kvec *head = buf->head;
 781                 unsigned int hdto = head->iov_len + base - shift;
 782                 unsigned int hdlen = len;
 783
 784                 if (WARN_ONCE(shift > head->iov_len + base,
 785                               "SUNRPC: Misaligned data.\n"))
 786                         return;
 787                 if (hdto + hdlen > head->iov_len)
 788                         hdlen = head->iov_len - hdto;
 789                 _copy_from_pages(head->iov_base + hdto, buf->pages,
 790                                  buf->page_base + base, hdlen);
 791                 base += hdlen;
 792                 len -= hdlen;
 793                 if (!len)
 794                         return;
 795         }
 796         pgto = base - shift;
 797         _shift_data_left_pages(buf->pages, buf->page_base + pgto,
 798                                buf->page_base + base, len);
 799 }
 800
 801 static void xdr_buf_tail_shift_left(const struct xdr_buf *buf,
 802                                     unsigned int base, unsigned int len,
 803                                     unsigned int shift)
 804 {
 805         if (!shift || !len)
 806                 return;
 807         xdr_buf_tail_copy_left(buf, base, len, shift);
 808 }
 809
 810 static void xdr_buf_pages_shift_left(const struct xdr_buf *buf,
 811                                      unsigned int base, unsigned int len,
 812                                      unsigned int shift)
 813 {
 814         if (!shift || !len)
 815                 return;
 816         if (base >= buf->page_len) {
 817                 xdr_buf_tail_shift_left(buf, base - buf->page_len, len, shift);
 818                 return;
 819         }
 820         xdr_buf_pages_copy_left(buf, base, len, shift);
 821         len += base;
 822         if (len <= buf->page_len)
 823                 return;
 824         xdr_buf_tail_copy_left(buf, 0, len - buf->page_len, shift);
 825 }
 826
 827 static void xdr_buf_head_shift_left(const struct xdr_buf *buf,
 828                                     unsigned int base, unsigned int len,
 829                                     unsigned int shift)
 830 {
 831         const struct kvec *head = buf->head;
 832         unsigned int bytes;
 833
 834         if (!shift || !len)
 835                 return;
 836
 837         if (shift > base) {
 838                 bytes = (shift - base);
 839                 if (bytes >= len)
 840                         return;
 841                 base += bytes;
 842                 len -= bytes;
 843         }
 844
 845         if (base < head->iov_len) {
 846                 bytes = min_t(unsigned int, len, head->iov_len - base);
 847                 memmove(head->iov_base + (base - shift),
 848                         head->iov_base + base, bytes);
 849                 base += bytes;
 850                 len -= bytes;
 851         }
 852         xdr_buf_pages_shift_left(buf, base - head->iov_len, len, shift);
 853 }
 854
 855 /**
 856  * xdr_shrink_bufhead
 857  * @buf: xdr_buf
 858  * @len: new length of buf->head[0]
 859  *
 860  * Shrinks XDR buffer's header kvec buf->head[0], setting it to
 861  * 'len' bytes. The extra data is not lost, but is instead
 862  * moved into the inlined pages and/or the tail.
 863  */
 864 static unsigned int xdr_shrink_bufhead(struct xdr_buf *buf, unsigned int len)
 865 {
 866         struct kvec *head = buf->head;
 867         unsigned int shift, buflen = max(buf->len, len);
 868
 869         WARN_ON_ONCE(len > head->iov_len);
 870         if (head->iov_len > buflen) {
 871                 buf->buflen -= head->iov_len - buflen;
 872                 head->iov_len = buflen;
 873         }
 874         if (len >= head->iov_len)
 875                 return 0;
 876         shift = head->iov_len - len;
 877         xdr_buf_try_expand(buf, shift);
 878         xdr_buf_head_shift_right(buf, len, buflen - len, shift);
 879         head->iov_len = len;
 880         buf->buflen -= shift;
 881         buf->len -= shift;
 882         return shift;
 883 }
 884
 885 /**
 886  * xdr_shrink_pagelen - shrinks buf->pages to @len bytes
 887  * @buf: xdr_buf
 888  * @len: new page buffer length
 889  *
 890  * The extra data is not lost, but is instead moved into buf->tail.
 891  * Returns the actual number of bytes moved.
 892  */
 893 static unsigned int xdr_shrink_pagelen(struct xdr_buf *buf, unsigned int len)
 894 {
 895         unsigned int shift, buflen = buf->len - buf->head->iov_len;
 896
 897         WARN_ON_ONCE(len > buf->page_len);
 898         if (buf->head->iov_len >= buf->len || len > buflen)
 899                 buflen = len;
 900         if (buf->page_len > buflen) {
 901                 buf->buflen -= buf->page_len - buflen;
 902                 buf->page_len = buflen;
 903         }
 904         if (len >= buf->page_len)
 905                 return 0;
 906         shift = buf->page_len - len;
 907         xdr_buf_try_expand(buf, shift);
 908         xdr_buf_pages_shift_right(buf, len, buflen - len, shift);
 909         buf->page_len = len;
 910         buf->len -= shift;
 911         buf->buflen -= shift;
 912         return shift;
 913 }
 914
 915 /**
 916  * xdr_stream_pos - Return the current offset from the start of the xdr_stream
 917  * @xdr: pointer to struct xdr_stream
 918  */
 919 unsigned int xdr_stream_pos(const struct xdr_stream *xdr)
 920 {
 921         return (unsigned int)(XDR_QUADLEN(xdr->buf->len) - xdr->nwords) << 2;
 922 }
 923 EXPORT_SYMBOL_GPL(xdr_stream_pos);
 924
 925 static void xdr_stream_set_pos(struct xdr_stream *xdr, unsigned int pos)
 926 {
 927         unsigned int blen = xdr->buf->len;
 928
 929         xdr->nwords = blen > pos ? XDR_QUADLEN(blen) - XDR_QUADLEN(pos) : 0;
 930 }
 931
 932 static void xdr_stream_page_set_pos(struct xdr_stream *xdr, unsigned int pos)
 933 {
 934         xdr_stream_set_pos(xdr, pos + xdr->buf->head[0].iov_len);
 935 }
 936
 937 /**
 938  * xdr_page_pos - Return the current offset from the start of the xdr pages
 939  * @xdr: pointer to struct xdr_stream
 940  */
 941 unsigned int xdr_page_pos(const struct xdr_stream *xdr)
 942 {
 943         unsigned int pos = xdr_stream_pos(xdr);
 944
 945         WARN_ON(pos < xdr->buf->head[0].iov_len);
 946         return pos - xdr->buf->head[0].iov_len;
 947 }
 948 EXPORT_SYMBOL_GPL(xdr_page_pos);
 949
 950 /**
 951  * xdr_init_encode - Initialize a struct xdr_stream for sending data.
 952  * @xdr: pointer to xdr_stream struct
 953  * @buf: pointer to XDR buffer in which to encode data
 954  * @p: current pointer inside XDR buffer
 955  * @rqst: pointer to controlling rpc_rqst, for debugging
 956  *
 957  * Note: at the moment the RPC client only passes the length of our
 958  *       scratch buffer in the xdr_buf's header kvec. Previously this
 959  *       meant we needed to call xdr_adjust_iovec() after encoding the
 960  *       data. With the new scheme, the xdr_stream manages the details
 961  *       of the buffer length, and takes care of adjusting the kvec
 962  *       length for us.
 963  */
 964 void xdr_init_encode(struct xdr_stream *xdr, struct xdr_buf *buf, __be32 *p,
 965                      struct rpc_rqst *rqst)
 966 {
 967         struct kvec *iov = buf->head;
 968         int scratch_len = buf->buflen - buf->page_len - buf->tail[0].iov_len;
 969
 970         xdr_reset_scratch_buffer(xdr);
 971         BUG_ON(scratch_len < 0);
 972         xdr->buf = buf;
 973         xdr->iov = iov;
 974         xdr->p = (__be32 *)((char *)iov->iov_base + iov->iov_len);
 975         xdr->end = (__be32 *)((char *)iov->iov_base + scratch_len);
 976         BUG_ON(iov->iov_len > scratch_len);
 977
 978         if (p != xdr->p && p != NULL) {
 979                 size_t len;
 980
 981                 BUG_ON(p < xdr->p || p > xdr->end);
 982                 len = (char *)p - (char *)xdr->p;
 983                 xdr->p = p;
 984                 buf->len += len;
 985                 iov->iov_len += len;
 986         }
 987         xdr->rqst = rqst;
 988 }
 989 EXPORT_SYMBOL_GPL(xdr_init_encode);
 990
 991 /**
 992  * xdr_init_encode_pages - Initialize an xdr_stream for encoding into pages
 993  * @xdr: pointer to xdr_stream struct
 994  * @buf: pointer to XDR buffer into which to encode data
 995  * @pages: list of pages to decode into
 996  * @rqst: pointer to controlling rpc_rqst, for debugging
 997  *
 998  */
 999 void xdr_init_encode_pages(struct xdr_stream *xdr, struct xdr_buf *buf,
1000                            struct page **pages, struct rpc_rqst *rqst)
1001 {
1002         xdr_reset_scratch_buffer(xdr);
1003
1004         xdr->buf = buf;
1005         xdr->page_ptr = pages;
1006         xdr->iov = NULL;
1007         xdr->p = page_address(*pages);
1008         xdr->end = (void *)xdr->p + min_t(u32, buf->buflen, PAGE_SIZE);
1009         xdr->rqst = rqst;
1010 }
1011 EXPORT_SYMBOL_GPL(xdr_init_encode_pages);
1012
1013 /**
1014  * __xdr_commit_encode - Ensure all data is written to buffer
1015  * @xdr: pointer to xdr_stream
1016  *
1017  * We handle encoding across page boundaries by giving the caller a
1018  * temporary location to write to, then later copying the data into
1019  * place; xdr_commit_encode does that copying.
1020  *
1021  * Normally the caller doesn't need to call this directly, as the
1022  * following xdr_reserve_space will do it.  But an explicit call may be
1023  * required at the end of encoding, or any other time when the xdr_buf
1024  * data might be read.
1025  */
1026 void __xdr_commit_encode(struct xdr_stream *xdr)
1027 {
1028         size_t shift = xdr->scratch.iov_len;
1029         void *page;
1030
1031         page = page_address(*xdr->page_ptr);
1032         memcpy(xdr->scratch.iov_base, page, shift);
1033         memmove(page, page + shift, (void *)xdr->p - page);
1034         xdr_reset_scratch_buffer(xdr);
1035 }
1036 EXPORT_SYMBOL_GPL(__xdr_commit_encode);
1037
1038 /*
1039  * The buffer space to be reserved crosses the boundary between
1040  * xdr->buf->head and xdr->buf->pages, or between two pages
1041  * in xdr->buf->pages.
1042  */
1043 static noinline __be32 *xdr_get_next_encode_buffer(struct xdr_stream *xdr,
1044                                                    size_t nbytes)
1045 {
1046         int space_left;
1047         int frag1bytes, frag2bytes;
1048         void *p;
1049
1050         if (nbytes > PAGE_SIZE)
1051                 goto out_overflow; /* Bigger buffers require special handling */
1052         if (xdr->buf->len + nbytes > xdr->buf->buflen)
1053                 goto out_overflow; /* Sorry, we're totally out of space */
1054         frag1bytes = (xdr->end - xdr->p) << 2;
1055         frag2bytes = nbytes - frag1bytes;
1056         if (xdr->iov)
1057                 xdr->iov->iov_len += frag1bytes;
1058         else
1059                 xdr->buf->page_len += frag1bytes;
1060         xdr->page_ptr++;
1061         xdr->iov = NULL;
1062
1063         /*
1064          * If the last encode didn't end exactly on a page boundary, the
1065          * next one will straddle boundaries.  Encode into the next
1066          * page, then copy it back later in xdr_commit_encode.  We use
1067          * the "scratch" iov to track any temporarily unused fragment of
1068          * space at the end of the previous buffer:
1069          */
1070         xdr_set_scratch_buffer(xdr, xdr->p, frag1bytes);
1071
1072         /*
1073          * xdr->p is where the next encode will start after
1074          * xdr_commit_encode() has shifted this one back:
1075          */
1076         p = page_address(*xdr->page_ptr);
1077         xdr->p = p + frag2bytes;
1078         space_left = xdr->buf->buflen - xdr->buf->len;
1079         if (space_left - frag1bytes >= PAGE_SIZE)
1080                 xdr->end = p + PAGE_SIZE;
1081         else
1082                 xdr->end = p + space_left - frag1bytes;
1083
1084         xdr->buf->page_len += frag2bytes;
1085         xdr->buf->len += nbytes;
1086         return p;
1087 out_overflow:
1088         trace_rpc_xdr_overflow(xdr, nbytes);
1089         return NULL;
1090 }
1091
1092 /**
1093  * xdr_reserve_space - Reserve buffer space for sending
1094  * @xdr: pointer to xdr_stream
1095  * @nbytes: number of bytes to reserve
1096  *
1097  * Checks that we have enough buffer space to encode 'nbytes' more
1098  * bytes of data. If so, update the total xdr_buf length, and
1099  * adjust the length of the current kvec.
1100  */
1101 __be32 * xdr_reserve_space(struct xdr_stream *xdr, size_t nbytes)
1102 {
1103         __be32 *p = xdr->p;
1104         __be32 *q;
1105
1106         xdr_commit_encode(xdr);
1107         /* align nbytes on the next 32-bit boundary */
1108         nbytes += 3;
1109         nbytes &= ~3;
1110         q = p + (nbytes >> 2);
1111         if (unlikely(q > xdr->end || q < p))
1112                 return xdr_get_next_encode_buffer(xdr, nbytes);
1113         xdr->p = q;
1114         if (xdr->iov)
1115                 xdr->iov->iov_len += nbytes;
1116         else
1117                 xdr->buf->page_len += nbytes;
1118         xdr->buf->len += nbytes;
1119         return p;
1120 }
1121 EXPORT_SYMBOL_GPL(xdr_reserve_space);
1122
1123 /**
1124  * xdr_reserve_space_vec - Reserves a large amount of buffer space for sending
1125  * @xdr: pointer to xdr_stream
1126  * @nbytes: number of bytes to reserve
1127  *
1128  * The size argument passed to xdr_reserve_space() is determined based
1129  * on the number of bytes remaining in the current page to avoid
1130  * invalidating iov_base pointers when xdr_commit_encode() is called.
1131  *
1132  * Return values:
1133  *   %0: success
1134  *   %-EMSGSIZE: not enough space is available in @xdr
1135  */
1136 int xdr_reserve_space_vec(struct xdr_stream *xdr, size_t nbytes)
1137 {
1138         size_t thislen;
1139         __be32 *p;
1140
1141         /*
1142          * svcrdma requires every READ payload to start somewhere
1143          * in xdr->pages.
1144          */
1145         if (xdr->iov == xdr->buf->head) {
1146                 xdr->iov = NULL;
1147                 xdr->end = xdr->p;
1148         }
1149
1150         /* XXX: Let's find a way to make this more efficient */
1151         while (nbytes) {
1152                 thislen = xdr->buf->page_len % PAGE_SIZE;
1153                 thislen = min_t(size_t, nbytes, PAGE_SIZE - thislen);
1154
1155                 p = xdr_reserve_space(xdr, thislen);
1156                 if (!p)
1157                         return -EMSGSIZE;
1158
1159                 nbytes -= thislen;
1160         }
1161
1162         return 0;
1163 }
1164 EXPORT_SYMBOL_GPL(xdr_reserve_space_vec);
1165
1166 /**
1167  * xdr_truncate_encode - truncate an encode buffer
1168  * @xdr: pointer to xdr_stream
1169  * @len: new length of buffer
1170  *
1171  * Truncates the xdr stream, so that xdr->buf->len == len,
1172  * and xdr->p points at offset len from the start of the buffer, and
1173  * head, tail, and page lengths are adjusted to correspond.
1174  *
1175  * If this means moving xdr->p to a different buffer, we assume that
1176  * the end pointer should be set to the end of the current page,
1177  * except in the case of the head buffer when we assume the head
1178  * buffer's current length represents the end of the available buffer.
1179  *
1180  * This is *not* safe to use on a buffer that already has inlined page
1181  * cache pages (as in a zero-copy server read reply), except for the
1182  * simple case of truncating from one position in the tail to another.
1183  *
1184  */
1185 void xdr_truncate_encode(struct xdr_stream *xdr, size_t len)
1186 {
1187         struct xdr_buf *buf = xdr->buf;
1188         struct kvec *head = buf->head;
1189         struct kvec *tail = buf->tail;
1190         int fraglen;
1191         int new;
1192
1193         if (len > buf->len) {
1194                 WARN_ON_ONCE(1);
1195                 return;
1196         }
1197         xdr_commit_encode(xdr);
1198
1199         fraglen = min_t(int, buf->len - len, tail->iov_len);
1200         tail->iov_len -= fraglen;
1201         buf->len -= fraglen;
1202         if (tail->iov_len) {
1203                 xdr->p = tail->iov_base + tail->iov_len;
1204                 WARN_ON_ONCE(!xdr->end);
1205                 WARN_ON_ONCE(!xdr->iov);
1206                 return;
1207         }
1208         WARN_ON_ONCE(fraglen);
1209         fraglen = min_t(int, buf->len - len, buf->page_len);
1210         buf->page_len -= fraglen;
1211         buf->len -= fraglen;
1212
1213         new = buf->page_base + buf->page_len;
1214
1215         xdr->page_ptr = buf->pages + (new >> PAGE_SHIFT);
1216
1217         if (buf->page_len) {
1218                 xdr->p = page_address(*xdr->page_ptr);
1219                 xdr->end = (void *)xdr->p + PAGE_SIZE;
1220                 xdr->p = (void *)xdr->p + (new % PAGE_SIZE);
1221                 WARN_ON_ONCE(xdr->iov);
1222                 return;
1223         }
1224         if (fraglen)
1225                 xdr->end = head->iov_base + head->iov_len;
1226         /* (otherwise assume xdr->end is already set) */
1227         xdr->page_ptr--;
1228         head->iov_len = len;
1229         buf->len = len;
1230         xdr->p = head->iov_base + head->iov_len;
1231         xdr->iov = buf->head;
1232 }
1233 EXPORT_SYMBOL(xdr_truncate_encode);
1234
1235 /**
1236  * xdr_truncate_decode - Truncate a decoding stream
1237  * @xdr: pointer to struct xdr_stream
1238  * @len: Number of bytes to remove
1239  *
1240  */
1241 void xdr_truncate_decode(struct xdr_stream *xdr, size_t len)
1242 {
1243         unsigned int nbytes = xdr_align_size(len);
1244
1245         xdr->buf->len -= nbytes;
1246         xdr->nwords -= XDR_QUADLEN(nbytes);
1247 }
1248 EXPORT_SYMBOL_GPL(xdr_truncate_decode);
1249
1250 /**
1251  * xdr_restrict_buflen - decrease available buffer space
1252  * @xdr: pointer to xdr_stream
1253  * @newbuflen: new maximum number of bytes available
1254  *
1255  * Adjust our idea of how much space is available in the buffer.
1256  * If we've already used too much space in the buffer, returns -1.
1257  * If the available space is already smaller than newbuflen, returns 0
1258  * and does nothing.  Otherwise, adjusts xdr->buf->buflen to newbuflen
1259  * and ensures xdr->end is set at most offset newbuflen from the start
1260  * of the buffer.
1261  */
1262 int xdr_restrict_buflen(struct xdr_stream *xdr, int newbuflen)
1263 {
1264         struct xdr_buf *buf = xdr->buf;
1265         int left_in_this_buf = (void *)xdr->end - (void *)xdr->p;
1266         int end_offset = buf->len + left_in_this_buf;
1267
1268         if (newbuflen < 0 || newbuflen < buf->len)
1269                 return -1;
1270         if (newbuflen > buf->buflen)
1271                 return 0;
1272         if (newbuflen < end_offset)
1273                 xdr->end = (void *)xdr->end + newbuflen - end_offset;
1274         buf->buflen = newbuflen;
1275         return 0;
1276 }
1277 EXPORT_SYMBOL(xdr_restrict_buflen);
1278
1279 /**
1280  * xdr_write_pages - Insert a list of pages into an XDR buffer for sending
1281  * @xdr: pointer to xdr_stream
1282  * @pages: array of pages to insert
1283  * @base: starting offset of first data byte in @pages
1284  * @len: number of data bytes in @pages to insert
1285  *
1286  * After the @pages are added, the tail iovec is instantiated pointing to
1287  * end of the head buffer, and the stream is set up to encode subsequent
1288  * items into the tail.
1289  */
1290 void xdr_write_pages(struct xdr_stream *xdr, struct page **pages, unsigned int base,
1291                  unsigned int len)
1292 {
1293         struct xdr_buf *buf = xdr->buf;
1294         struct kvec *tail = buf->tail;
1295
1296         buf->pages = pages;
1297         buf->page_base = base;
1298         buf->page_len = len;
1299
1300         tail->iov_base = xdr->p;
1301         tail->iov_len = 0;
1302         xdr->iov = tail;
1303
1304         if (len & 3) {
1305                 unsigned int pad = 4 - (len & 3);
1306
1307                 BUG_ON(xdr->p >= xdr->end);
1308                 tail->iov_base = (char *)xdr->p + (len & 3);
1309                 tail->iov_len += pad;
1310                 len += pad;
1311                 *xdr->p++ = 0;
1312         }
1313         buf->buflen += len;
1314         buf->len += len;
1315 }
1316 EXPORT_SYMBOL_GPL(xdr_write_pages);
1317
1318 static unsigned int xdr_set_iov(struct xdr_stream *xdr, struct kvec *iov,
1319                                 unsigned int base, unsigned int len)
1320 {
1321         if (len > iov->iov_len)
1322                 len = iov->iov_len;
1323         if (unlikely(base > len))
1324                 base = len;
1325         xdr->p = (__be32*)(iov->iov_base + base);
1326         xdr->end = (__be32*)(iov->iov_base + len);
1327         xdr->iov = iov;
1328         xdr->page_ptr = NULL;
1329         return len - base;
1330 }
1331
1332 static unsigned int xdr_set_tail_base(struct xdr_stream *xdr,
1333                                       unsigned int base, unsigned int len)
1334 {
1335         struct xdr_buf *buf = xdr->buf;
1336
1337         xdr_stream_set_pos(xdr, base + buf->page_len + buf->head->iov_len);
1338         return xdr_set_iov(xdr, buf->tail, base, len);
1339 }
1340
1341 static void xdr_stream_unmap_current_page(struct xdr_stream *xdr)
1342 {
1343         if (xdr->page_kaddr) {
1344                 kunmap_local(xdr->page_kaddr);
1345                 xdr->page_kaddr = NULL;
1346         }
1347 }
1348
1349 static unsigned int xdr_set_page_base(struct xdr_stream *xdr,
1350                                       unsigned int base, unsigned int len)
1351 {
1352         unsigned int pgnr;
1353         unsigned int maxlen;
1354         unsigned int pgoff;
1355         unsigned int pgend;
1356         void *kaddr;
1357
1358         maxlen = xdr->buf->page_len;
1359         if (base >= maxlen)
1360                 return 0;
1361         else
1362                 maxlen -= base;
1363         if (len > maxlen)
1364                 len = maxlen;
1365
1366         xdr_stream_unmap_current_page(xdr);
1367         xdr_stream_page_set_pos(xdr, base);
1368         base += xdr->buf->page_base;
1369
1370         pgnr = base >> PAGE_SHIFT;
1371         xdr->page_ptr = &xdr->buf->pages[pgnr];
1372
1373         if (PageHighMem(*xdr->page_ptr)) {
1374                 xdr->page_kaddr = kmap_local_page(*xdr->page_ptr);
1375                 kaddr = xdr->page_kaddr;
1376         } else
1377                 kaddr = page_address(*xdr->page_ptr);
1378
1379         pgoff = base & ~PAGE_MASK;
1380         xdr->p = (__be32*)(kaddr + pgoff);
1381
1382         pgend = pgoff + len;
1383         if (pgend > PAGE_SIZE)
1384                 pgend = PAGE_SIZE;
1385         xdr->end = (__be32*)(kaddr + pgend);
1386         xdr->iov = NULL;
1387         return len;
1388 }
1389
1390 static void xdr_set_page(struct xdr_stream *xdr, unsigned int base,
1391                          unsigned int len)
1392 {
1393         if (xdr_set_page_base(xdr, base, len) == 0) {
1394                 base -= xdr->buf->page_len;
1395                 xdr_set_tail_base(xdr, base, len);
1396         }
1397 }
1398
1399 static void xdr_set_next_page(struct xdr_stream *xdr)
1400 {
1401         unsigned int newbase;
1402
1403         newbase = (1 + xdr->page_ptr - xdr->buf->pages) << PAGE_SHIFT;
1404         newbase -= xdr->buf->page_base;
1405         if (newbase < xdr->buf->page_len)
1406                 xdr_set_page_base(xdr, newbase, xdr_stream_remaining(xdr));
1407         else
1408                 xdr_set_tail_base(xdr, 0, xdr_stream_remaining(xdr));
1409 }
1410
1411 static bool xdr_set_next_buffer(struct xdr_stream *xdr)
1412 {
1413         if (xdr->page_ptr != NULL)
1414                 xdr_set_next_page(xdr);
1415         else if (xdr->iov == xdr->buf->head)
1416                 xdr_set_page(xdr, 0, xdr_stream_remaining(xdr));
1417         return xdr->p != xdr->end;
1418 }
1419
1420 /**
1421  * xdr_init_decode - Initialize an xdr_stream for decoding data.
1422  * @xdr: pointer to xdr_stream struct
1423  * @buf: pointer to XDR buffer from which to decode data
1424  * @p: current pointer inside XDR buffer
1425  * @rqst: pointer to controlling rpc_rqst, for debugging
1426  */
1427 void xdr_init_decode(struct xdr_stream *xdr, struct xdr_buf *buf, __be32 *p,
1428                      struct rpc_rqst *rqst)
1429 {
1430         xdr->buf = buf;
1431         xdr->page_kaddr = NULL;
1432         xdr_reset_scratch_buffer(xdr);
1433         xdr->nwords = XDR_QUADLEN(buf->len);
1434         if (xdr_set_iov(xdr, buf->head, 0, buf->len) == 0 &&
1435             xdr_set_page_base(xdr, 0, buf->len) == 0)
1436                 xdr_set_iov(xdr, buf->tail, 0, buf->len);
1437         if (p != NULL && p > xdr->p && xdr->end >= p) {
1438                 xdr->nwords -= p - xdr->p;
1439                 xdr->p = p;
1440         }
1441         xdr->rqst = rqst;
1442 }
1443 EXPORT_SYMBOL_GPL(xdr_init_decode);
1444
1445 /**
1446  * xdr_init_decode_pages - Initialize an xdr_stream for decoding into pages
1447  * @xdr: pointer to xdr_stream struct
1448  * @buf: pointer to XDR buffer from which to decode data
1449  * @pages: list of pages to decode into
1450  * @len: length in bytes of buffer in pages
1451  */
1452 void xdr_init_decode_pages(struct xdr_stream *xdr, struct xdr_buf *buf,
1453                            struct page **pages, unsigned int len)
1454 {
1455         memset(buf, 0, sizeof(*buf));
1456         buf->pages =  pages;
1457         buf->page_len =  len;
1458         buf->buflen =  len;
1459         buf->len = len;
1460         xdr_init_decode(xdr, buf, NULL, NULL);
1461 }
1462 EXPORT_SYMBOL_GPL(xdr_init_decode_pages);
1463
1464 /**
1465  * xdr_finish_decode - Clean up the xdr_stream after decoding data.
1466  * @xdr: pointer to xdr_stream struct
1467  */
1468 void xdr_finish_decode(struct xdr_stream *xdr)
1469 {
1470         xdr_stream_unmap_current_page(xdr);
1471 }
1472 EXPORT_SYMBOL(xdr_finish_decode);
1473
1474 static __be32 * __xdr_inline_decode(struct xdr_stream *xdr, size_t nbytes)
1475 {
1476         unsigned int nwords = XDR_QUADLEN(nbytes);
1477         __be32 *p = xdr->p;
1478         __be32 *q = p + nwords;
1479
1480         if (unlikely(nwords > xdr->nwords || q > xdr->end || q < p))
1481                 return NULL;
1482         xdr->p = q;
1483         xdr->nwords -= nwords;
1484         return p;
1485 }
1486
1487 static __be32 *xdr_copy_to_scratch(struct xdr_stream *xdr, size_t nbytes)
1488 {
1489         __be32 *p;
1490         char *cpdest = xdr->scratch.iov_base;
1491         size_t cplen = (char *)xdr->end - (char *)xdr->p;
1492
1493         if (nbytes > xdr->scratch.iov_len)
1494                 goto out_overflow;
1495         p = __xdr_inline_decode(xdr, cplen);
1496         if (p == NULL)
1497                 return NULL;
1498         memcpy(cpdest, p, cplen);
1499         if (!xdr_set_next_buffer(xdr))
1500                 goto out_overflow;
1501         cpdest += cplen;
1502         nbytes -= cplen;
1503         p = __xdr_inline_decode(xdr, nbytes);
1504         if (p == NULL)
1505                 return NULL;
1506         memcpy(cpdest, p, nbytes);
1507         return xdr->scratch.iov_base;
1508 out_overflow:
1509         trace_rpc_xdr_overflow(xdr, nbytes);
1510         return NULL;
1511 }
1512
1513 /**
1514  * xdr_inline_decode - Retrieve XDR data to decode
1515  * @xdr: pointer to xdr_stream struct
1516  * @nbytes: number of bytes of data to decode
1517  *
1518  * Check if the input buffer is long enough to enable us to decode
1519  * 'nbytes' more bytes of data starting at the current position.
1520  * If so return the current pointer, then update the current
1521  * pointer position.
1522  */
1523 __be32 * xdr_inline_decode(struct xdr_stream *xdr, size_t nbytes)
1524 {
1525         __be32 *p;
1526
1527         if (unlikely(nbytes == 0))
1528                 return xdr->p;
1529         if (xdr->p == xdr->end && !xdr_set_next_buffer(xdr))
1530                 goto out_overflow;
1531         p = __xdr_inline_decode(xdr, nbytes);
1532         if (p != NULL)
1533                 return p;
1534         return xdr_copy_to_scratch(xdr, nbytes);
1535 out_overflow:
1536         trace_rpc_xdr_overflow(xdr, nbytes);
1537         return NULL;
1538 }
1539 EXPORT_SYMBOL_GPL(xdr_inline_decode);
1540
1541 static void xdr_realign_pages(struct xdr_stream *xdr)
1542 {
1543         struct xdr_buf *buf = xdr->buf;
1544         struct kvec *iov = buf->head;
1545         unsigned int cur = xdr_stream_pos(xdr);
1546         unsigned int copied;
1547
1548         /* Realign pages to current pointer position */
1549         if (iov->iov_len > cur) {
1550                 copied = xdr_shrink_bufhead(buf, cur);
1551                 trace_rpc_xdr_alignment(xdr, cur, copied);
1552                 xdr_set_page(xdr, 0, buf->page_len);
1553         }
1554 }
1555
1556 static unsigned int xdr_align_pages(struct xdr_stream *xdr, unsigned int len)
1557 {
1558         struct xdr_buf *buf = xdr->buf;
1559         unsigned int nwords = XDR_QUADLEN(len);
1560         unsigned int copied;
1561
1562         if (xdr->nwords == 0)
1563                 return 0;
1564
1565         xdr_realign_pages(xdr);
1566         if (nwords > xdr->nwords) {
1567                 nwords = xdr->nwords;
1568                 len = nwords << 2;
1569         }
1570         if (buf->page_len <= len)
1571                 len = buf->page_len;
1572         else if (nwords < xdr->nwords) {
1573                 /* Truncate page data and move it into the tail */
1574                 copied = xdr_shrink_pagelen(buf, len);
1575                 trace_rpc_xdr_alignment(xdr, len, copied);
1576         }
1577         return len;
1578 }
1579
1580 /**
1581  * xdr_read_pages - align page-based XDR data to current pointer position
1582  * @xdr: pointer to xdr_stream struct
1583  * @len: number of bytes of page data
1584  *
1585  * Moves data beyond the current pointer position from the XDR head[] buffer
1586  * into the page list. Any data that lies beyond current position + @len
1587  * bytes is moved into the XDR tail[]. The xdr_stream current position is
1588  * then advanced past that data to align to the next XDR object in the tail.
1589  *
1590  * Returns the number of XDR encoded bytes now contained in the pages
1591  */
1592 unsigned int xdr_read_pages(struct xdr_stream *xdr, unsigned int len)
1593 {
1594         unsigned int nwords = XDR_QUADLEN(len);
1595         unsigned int base, end, pglen;
1596
1597         pglen = xdr_align_pages(xdr, nwords << 2);
1598         if (pglen == 0)
1599                 return 0;
1600
1601         base = (nwords << 2) - pglen;
1602         end = xdr_stream_remaining(xdr) - pglen;
1603
1604         xdr_set_tail_base(xdr, base, end);
1605         return len <= pglen ? len : pglen;
1606 }
1607 EXPORT_SYMBOL_GPL(xdr_read_pages);
1608
1609 /**
1610  * xdr_set_pagelen - Sets the length of the XDR pages
1611  * @xdr: pointer to xdr_stream struct
1612  * @len: new length of the XDR page data
1613  *
1614  * Either grows or shrinks the length of the xdr pages by setting pagelen to
1615  * @len bytes. When shrinking, any extra data is moved into buf->tail, whereas
1616  * when growing any data beyond the current pointer is moved into the tail.
1617  *
1618  * Returns True if the operation was successful, and False otherwise.
1619  */
1620 void xdr_set_pagelen(struct xdr_stream *xdr, unsigned int len)
1621 {
1622         struct xdr_buf *buf = xdr->buf;
1623         size_t remaining = xdr_stream_remaining(xdr);
1624         size_t base = 0;
1625
1626         if (len < buf->page_len) {
1627                 base = buf->page_len - len;
1628                 xdr_shrink_pagelen(buf, len);
1629         } else {
1630                 xdr_buf_head_shift_right(buf, xdr_stream_pos(xdr),
1631                                          buf->page_len, remaining);
1632                 if (len > buf->page_len)
1633                         xdr_buf_try_expand(buf, len - buf->page_len);
1634         }
1635         xdr_set_tail_base(xdr, base, remaining);
1636 }
1637 EXPORT_SYMBOL_GPL(xdr_set_pagelen);
1638
1639 /**
1640  * xdr_enter_page - decode data from the XDR page
1641  * @xdr: pointer to xdr_stream struct
1642  * @len: number of bytes of page data
1643  *
1644  * Moves data beyond the current pointer position from the XDR head[] buffer
1645  * into the page list. Any data that lies beyond current position + "len"
1646  * bytes is moved into the XDR tail[]. The current pointer is then
1647  * repositioned at the beginning of the first XDR page.
1648  */
1649 void xdr_enter_page(struct xdr_stream *xdr, unsigned int len)
1650 {
1651         len = xdr_align_pages(xdr, len);
1652         /*
1653          * Position current pointer at beginning of tail, and
1654          * set remaining message length.
1655          */
1656         if (len != 0)
1657                 xdr_set_page_base(xdr, 0, len);
1658 }
1659 EXPORT_SYMBOL_GPL(xdr_enter_page);
1660
1661 static const struct kvec empty_iov = {.iov_base = NULL, .iov_len = 0};
1662
1663 void xdr_buf_from_iov(const struct kvec *iov, struct xdr_buf *buf)
1664 {
1665         buf->head[0] = *iov;
1666         buf->tail[0] = empty_iov;
1667         buf->page_len = 0;
1668         buf->buflen = buf->len = iov->iov_len;
1669 }
1670 EXPORT_SYMBOL_GPL(xdr_buf_from_iov);
1671
1672 /**
1673  * xdr_buf_subsegment - set subbuf to a portion of buf
1674  * @buf: an xdr buffer
1675  * @subbuf: the result buffer
1676  * @base: beginning of range in bytes
1677  * @len: length of range in bytes
1678  *
1679  * sets @subbuf to an xdr buffer representing the portion of @buf of
1680  * length @len starting at offset @base.
1681  *
1682  * @buf and @subbuf may be pointers to the same struct xdr_buf.
1683  *
1684  * Returns -1 if base or length are out of bounds.
1685  */
1686 int xdr_buf_subsegment(const struct xdr_buf *buf, struct xdr_buf *subbuf,
1687                        unsigned int base, unsigned int len)
1688 {
1689         subbuf->buflen = subbuf->len = len;
1690         if (base < buf->head[0].iov_len) {
1691                 subbuf->head[0].iov_base = buf->head[0].iov_base + base;
1692                 subbuf->head[0].iov_len = min_t(unsigned int, len,
1693                                                 buf->head[0].iov_len - base);
1694                 len -= subbuf->head[0].iov_len;
1695                 base = 0;
1696         } else {
1697                 base -= buf->head[0].iov_len;
1698                 subbuf->head[0].iov_base = buf->head[0].iov_base;
1699                 subbuf->head[0].iov_len = 0;
1700         }
1701
1702         if (base < buf->page_len) {
1703                 subbuf->page_len = min(buf->page_len - base, len);
1704                 base += buf->page_base;
1705                 subbuf->page_base = base & ~PAGE_MASK;
1706                 subbuf->pages = &buf->pages[base >> PAGE_SHIFT];
1707                 len -= subbuf->page_len;
1708                 base = 0;
1709         } else {
1710                 base -= buf->page_len;
1711                 subbuf->pages = buf->pages;
1712                 subbuf->page_base = 0;
1713                 subbuf->page_len = 0;
1714         }
1715
1716         if (base < buf->tail[0].iov_len) {
1717                 subbuf->tail[0].iov_base = buf->tail[0].iov_base + base;
1718                 subbuf->tail[0].iov_len = min_t(unsigned int, len,
1719                                                 buf->tail[0].iov_len - base);
1720                 len -= subbuf->tail[0].iov_len;
1721                 base = 0;
1722         } else {
1723                 base -= buf->tail[0].iov_len;
1724                 subbuf->tail[0].iov_base = buf->tail[0].iov_base;
1725                 subbuf->tail[0].iov_len = 0;
1726         }
1727
1728         if (base || len)
1729                 return -1;
1730         return 0;
1731 }
1732 EXPORT_SYMBOL_GPL(xdr_buf_subsegment);
1733
1734 /**
1735  * xdr_stream_subsegment - set @subbuf to a portion of @xdr
1736  * @xdr: an xdr_stream set up for decoding
1737  * @subbuf: the result buffer
1738  * @nbytes: length of @xdr to extract, in bytes
1739  *
1740  * Sets up @subbuf to represent a portion of @xdr. The portion
1741  * starts at the current offset in @xdr, and extends for a length
1742  * of @nbytes. If this is successful, @xdr is advanced to the next
1743  * XDR data item following that portion.
1744  *
1745  * Return values:
1746  *   %true: @subbuf has been initialized, and @xdr has been advanced.
1747  *   %false: a bounds error has occurred
1748  */
1749 bool xdr_stream_subsegment(struct xdr_stream *xdr, struct xdr_buf *subbuf,
1750                            unsigned int nbytes)
1751 {
1752         unsigned int start = xdr_stream_pos(xdr);
1753         unsigned int remaining, len;
1754
1755         /* Extract @subbuf and bounds-check the fn arguments */
1756         if (xdr_buf_subsegment(xdr->buf, subbuf, start, nbytes))
1757                 return false;
1758
1759         /* Advance @xdr by @nbytes */
1760         for (remaining = nbytes; remaining;) {
1761                 if (xdr->p == xdr->end && !xdr_set_next_buffer(xdr))
1762                         return false;
1763
1764                 len = (char *)xdr->end - (char *)xdr->p;
1765                 if (remaining <= len) {
1766                         xdr->p = (__be32 *)((char *)xdr->p +
1767                                         (remaining + xdr_pad_size(nbytes)));
1768                         break;
1769                 }
1770
1771                 xdr->p = (__be32 *)((char *)xdr->p + len);
1772                 xdr->end = xdr->p;
1773                 remaining -= len;
1774         }
1775
1776         xdr_stream_set_pos(xdr, start + nbytes);
1777         return true;
1778 }
1779 EXPORT_SYMBOL_GPL(xdr_stream_subsegment);
1780
1781 /**
1782  * xdr_stream_move_subsegment - Move part of a stream to another position
1783  * @xdr: the source xdr_stream
1784  * @offset: the source offset of the segment
1785  * @target: the target offset of the segment
1786  * @length: the number of bytes to move
1787  *
1788  * Moves @length bytes from @offset to @target in the xdr_stream, overwriting
1789  * anything in its space. Returns the number of bytes in the segment.
1790  */
1791 unsigned int xdr_stream_move_subsegment(struct xdr_stream *xdr, unsigned int offset,
1792                                         unsigned int target, unsigned int length)
1793 {
1794         struct xdr_buf buf;
1795         unsigned int shift;
1796
1797         if (offset < target) {
1798                 shift = target - offset;
1799                 if (xdr_buf_subsegment(xdr->buf, &buf, offset, shift + length) < 0)
1800                         return 0;
1801                 xdr_buf_head_shift_right(&buf, 0, length, shift);
1802         } else if (offset > target) {
1803                 shift = offset - target;
1804                 if (xdr_buf_subsegment(xdr->buf, &buf, target, shift + length) < 0)
1805                         return 0;
1806                 xdr_buf_head_shift_left(&buf, shift, length, shift);
1807         }
1808         return length;
1809 }
1810 EXPORT_SYMBOL_GPL(xdr_stream_move_subsegment);
1811
1812 /**
1813  * xdr_stream_zero - zero out a portion of an xdr_stream
1814  * @xdr: an xdr_stream to zero out
1815  * @offset: the starting point in the stream
1816  * @length: the number of bytes to zero
1817  */
1818 unsigned int xdr_stream_zero(struct xdr_stream *xdr, unsigned int offset,
1819                              unsigned int length)
1820 {
1821         struct xdr_buf buf;
1822
1823         if (xdr_buf_subsegment(xdr->buf, &buf, offset, length) < 0)
1824                 return 0;
1825         if (buf.head[0].iov_len)
1826                 xdr_buf_iov_zero(buf.head, 0, buf.head[0].iov_len);
1827         if (buf.page_len > 0)
1828                 xdr_buf_pages_zero(&buf, 0, buf.page_len);
1829         if (buf.tail[0].iov_len)
1830                 xdr_buf_iov_zero(buf.tail, 0, buf.tail[0].iov_len);
1831         return length;
1832 }
1833 EXPORT_SYMBOL_GPL(xdr_stream_zero);
1834
1835 /**
1836  * xdr_buf_trim - lop at most "len" bytes off the end of "buf"
1837  * @buf: buf to be trimmed
1838  * @len: number of bytes to reduce "buf" by
1839  *
1840  * Trim an xdr_buf by the given number of bytes by fixing up the lengths. Note
1841  * that it's possible that we'll trim less than that amount if the xdr_buf is
1842  * too small, or if (for instance) it's all in the head and the parser has
1843  * already read too far into it.
1844  */
1845 void xdr_buf_trim(struct xdr_buf *buf, unsigned int len)
1846 {
1847         size_t cur;
1848         unsigned int trim = len;
1849
1850         if (buf->tail[0].iov_len) {
1851                 cur = min_t(size_t, buf->tail[0].iov_len, trim);
1852                 buf->tail[0].iov_len -= cur;
1853                 trim -= cur;
1854                 if (!trim)
1855                         goto fix_len;
1856         }
1857
1858         if (buf->page_len) {
1859                 cur = min_t(unsigned int, buf->page_len, trim);
1860                 buf->page_len -= cur;
1861                 trim -= cur;
1862                 if (!trim)
1863                         goto fix_len;
1864         }
1865
1866         if (buf->head[0].iov_len) {
1867                 cur = min_t(size_t, buf->head[0].iov_len, trim);
1868                 buf->head[0].iov_len -= cur;
1869                 trim -= cur;
1870         }
1871 fix_len:
1872         buf->len -= (len - trim);
1873 }
1874 EXPORT_SYMBOL_GPL(xdr_buf_trim);
1875
1876 static void __read_bytes_from_xdr_buf(const struct xdr_buf *subbuf,
1877                                       void *obj, unsigned int len)
1878 {
1879         unsigned int this_len;
1880
1881         this_len = min_t(unsigned int, len, subbuf->head[0].iov_len);
1882         memcpy(obj, subbuf->head[0].iov_base, this_len);
1883         len -= this_len;
1884         obj += this_len;
1885         this_len = min_t(unsigned int, len, subbuf->page_len);
1886         _copy_from_pages(obj, subbuf->pages, subbuf->page_base, this_len);
1887         len -= this_len;
1888         obj += this_len;
1889         this_len = min_t(unsigned int, len, subbuf->tail[0].iov_len);
1890         memcpy(obj, subbuf->tail[0].iov_base, this_len);
1891 }
1892
1893 /* obj is assumed to point to allocated memory of size at least len: */
1894 int read_bytes_from_xdr_buf(const struct xdr_buf *buf, unsigned int base,
1895                             void *obj, unsigned int len)
1896 {
1897         struct xdr_buf subbuf;
1898         int status;
1899
1900         status = xdr_buf_subsegment(buf, &subbuf, base, len);
1901         if (status != 0)
1902                 return status;
1903         __read_bytes_from_xdr_buf(&subbuf, obj, len);
1904         return 0;
1905 }
1906 EXPORT_SYMBOL_GPL(read_bytes_from_xdr_buf);
1907
1908 static void __write_bytes_to_xdr_buf(const struct xdr_buf *subbuf,
1909                                      void *obj, unsigned int len)
1910 {
1911         unsigned int this_len;
1912
1913         this_len = min_t(unsigned int, len, subbuf->head[0].iov_len);
1914         memcpy(subbuf->head[0].iov_base, obj, this_len);
1915         len -= this_len;
1916         obj += this_len;
1917         this_len = min_t(unsigned int, len, subbuf->page_len);
1918         _copy_to_pages(subbuf->pages, subbuf->page_base, obj, this_len);
1919         len -= this_len;
1920         obj += this_len;
1921         this_len = min_t(unsigned int, len, subbuf->tail[0].iov_len);
1922         memcpy(subbuf->tail[0].iov_base, obj, this_len);
1923 }
1924
1925 /* obj is assumed to point to allocated memory of size at least len: */
1926 int write_bytes_to_xdr_buf(const struct xdr_buf *buf, unsigned int base,
1927                            void *obj, unsigned int len)
1928 {
1929         struct xdr_buf subbuf;
1930         int status;
1931
1932         status = xdr_buf_subsegment(buf, &subbuf, base, len);
1933         if (status != 0)
1934                 return status;
1935         __write_bytes_to_xdr_buf(&subbuf, obj, len);
1936         return 0;
1937 }
1938 EXPORT_SYMBOL_GPL(write_bytes_to_xdr_buf);
1939
1940 int xdr_decode_word(const struct xdr_buf *buf, unsigned int base, u32 *obj)
1941 {
1942         __be32  raw;
1943         int     status;
1944
1945         status = read_bytes_from_xdr_buf(buf, base, &raw, sizeof(*obj));
1946         if (status)
1947                 return status;
1948         *obj = be32_to_cpu(raw);
1949         return 0;
1950 }
1951 EXPORT_SYMBOL_GPL(xdr_decode_word);
1952
1953 int xdr_encode_word(const struct xdr_buf *buf, unsigned int base, u32 obj)
1954 {
1955         __be32  raw = cpu_to_be32(obj);
1956
1957         return write_bytes_to_xdr_buf(buf, base, &raw, sizeof(obj));
1958 }
1959 EXPORT_SYMBOL_GPL(xdr_encode_word);
1960
1961 /* Returns 0 on success, or else a negative error code. */
1962 static int xdr_xcode_array2(const struct xdr_buf *buf, unsigned int base,
1963                             struct xdr_array2_desc *desc, int encode)
1964 {
1965         char *elem = NULL, *c;
1966         unsigned int copied = 0, todo, avail_here;
1967         struct page **ppages = NULL;
1968         int err;
1969
1970         if (encode) {
1971                 if (xdr_encode_word(buf, base, desc->array_len) != 0)
1972                         return -EINVAL;
1973         } else {
1974                 if (xdr_decode_word(buf, base, &desc->array_len) != 0 ||
1975                     desc->array_len > desc->array_maxlen ||
1976                     (unsigned long) base + 4 + desc->array_len *
1977                                     desc->elem_size > buf->len)
1978                         return -EINVAL;
1979         }
1980         base += 4;
1981
1982         if (!desc->xcode)
1983                 return 0;
1984
1985         todo = desc->array_len * desc->elem_size;
1986
1987         /* process head */
1988         if (todo && base < buf->head->iov_len) {
1989                 c = buf->head->iov_base + base;
1990                 avail_here = min_t(unsigned int, todo,
1991                                    buf->head->iov_len - base);
1992                 todo -= avail_here;
1993
1994                 while (avail_here >= desc->elem_size) {
1995                         err = desc->xcode(desc, c);
1996                         if (err)
1997                                 goto out;
1998                         c += desc->elem_size;
1999                         avail_here -= desc->elem_size;
2000                 }
2001                 if (avail_here) {
2002                         if (!elem) {
2003                                 elem = kmalloc(desc->elem_size, GFP_KERNEL);
2004                                 err = -ENOMEM;
2005                                 if (!elem)
2006                                         goto out;
2007                         }
2008                         if (encode) {
2009                                 err = desc->xcode(desc, elem);
2010                                 if (err)
2011                                         goto out;
2012                                 memcpy(c, elem, avail_here);
2013                         } else
2014                                 memcpy(elem, c, avail_here);
2015                         copied = avail_here;
2016                 }
2017                 base = buf->head->iov_len;  /* align to start of pages */
2018         }
2019
2020         /* process pages array */
2021         base -= buf->head->iov_len;
2022         if (todo && base < buf->page_len) {
2023                 unsigned int avail_page;
2024
2025                 avail_here = min(todo, buf->page_len - base);
2026                 todo -= avail_here;
2027
2028                 base += buf->page_base;
2029                 ppages = buf->pages + (base >> PAGE_SHIFT);
2030                 base &= ~PAGE_MASK;
2031                 avail_page = min_t(unsigned int, PAGE_SIZE - base,
2032                                         avail_here);
2033                 c = kmap(*ppages) + base;
2034
2035                 while (avail_here) {
2036                         avail_here -= avail_page;
2037                         if (copied || avail_page < desc->elem_size) {
2038                                 unsigned int l = min(avail_page,
2039                                         desc->elem_size - copied);
2040                                 if (!elem) {
2041                                         elem = kmalloc(desc->elem_size,
2042                                                        GFP_KERNEL);
2043                                         err = -ENOMEM;
2044                                         if (!elem)
2045                                                 goto out;
2046                                 }
2047                                 if (encode) {
2048                                         if (!copied) {
2049                                                 err = desc->xcode(desc, elem);
2050                                                 if (err)
2051                                                         goto out;
2052                                         }
2053                                         memcpy(c, elem + copied, l);
2054                                         copied += l;
2055                                         if (copied == desc->elem_size)
2056                                                 copied = 0;
2057                                 } else {
2058                                         memcpy(elem + copied, c, l);
2059                                         copied += l;
2060                                         if (copied == desc->elem_size) {
2061                                                 err = desc->xcode(desc, elem);
2062                                                 if (err)
2063                                                         goto out;
2064                                                 copied = 0;
2065                                         }
2066                                 }
2067                                 avail_page -= l;
2068                                 c += l;
2069                         }
2070                         while (avail_page >= desc->elem_size) {
2071                                 err = desc->xcode(desc, c);
2072                                 if (err)
2073                                         goto out;
2074                                 c += desc->elem_size;
2075                                 avail_page -= desc->elem_size;
2076                         }
2077                         if (avail_page) {
2078                                 unsigned int l = min(avail_page,
2079                                             desc->elem_size - copied);
2080                                 if (!elem) {
2081                                         elem = kmalloc(desc->elem_size,
2082                                                        GFP_KERNEL);
2083                                         err = -ENOMEM;
2084                                         if (!elem)
2085                                                 goto out;
2086                                 }
2087                                 if (encode) {
2088                                         if (!copied) {
2089                                                 err = desc->xcode(desc, elem);
2090                                                 if (err)
2091                                                         goto out;
2092                                         }
2093                                         memcpy(c, elem + copied, l);
2094                                         copied += l;
2095                                         if (copied == desc->elem_size)
2096                                                 copied = 0;
2097                                 } else {
2098                                         memcpy(elem + copied, c, l);
2099                                         copied += l;
2100                                         if (copied == desc->elem_size) {
2101                                                 err = desc->xcode(desc, elem);
2102                                                 if (err)
2103                                                         goto out;
2104                                                 copied = 0;
2105                                         }
2106                                 }
2107                         }
2108                         if (avail_here) {
2109                                 kunmap(*ppages);
2110                                 ppages++;
2111                                 c = kmap(*ppages);
2112                         }
2113
2114                         avail_page = min(avail_here,
2115                                  (unsigned int) PAGE_SIZE);
2116                 }
2117                 base = buf->page_len;  /* align to start of tail */
2118         }
2119
2120         /* process tail */
2121         base -= buf->page_len;
2122         if (todo) {
2123                 c = buf->tail->iov_base + base;
2124                 if (copied) {
2125                         unsigned int l = desc->elem_size - copied;
2126
2127                         if (encode)
2128                                 memcpy(c, elem + copied, l);
2129                         else {
2130                                 memcpy(elem + copied, c, l);
2131                                 err = desc->xcode(desc, elem);
2132                                 if (err)
2133                                         goto out;
2134                         }
2135                         todo -= l;
2136                         c += l;
2137                 }
2138                 while (todo) {
2139                         err = desc->xcode(desc, c);
2140                         if (err)
2141                                 goto out;
2142                         c += desc->elem_size;
2143                         todo -= desc->elem_size;
2144                 }
2145         }
2146         err = 0;
2147
2148 out:
2149         kfree(elem);
2150         if (ppages)
2151                 kunmap(*ppages);
2152         return err;
2153 }
2154
2155 int xdr_decode_array2(const struct xdr_buf *buf, unsigned int base,
2156                       struct xdr_array2_desc *desc)
2157 {
2158         if (base >= buf->len)
2159                 return -EINVAL;
2160
2161         return xdr_xcode_array2(buf, base, desc, 0);
2162 }
2163 EXPORT_SYMBOL_GPL(xdr_decode_array2);
2164
2165 int xdr_encode_array2(const struct xdr_buf *buf, unsigned int base,
2166                       struct xdr_array2_desc *desc)
2167 {
2168         if ((unsigned long) base + 4 + desc->array_len * desc->elem_size >
2169             buf->head->iov_len + buf->page_len + buf->tail->iov_len)
2170                 return -EINVAL;
2171
2172         return xdr_xcode_array2(buf, base, desc, 1);
2173 }
2174 EXPORT_SYMBOL_GPL(xdr_encode_array2);
2175
2176 int xdr_process_buf(const struct xdr_buf *buf, unsigned int offset,
2177                     unsigned int len,
2178                     int (*actor)(struct scatterlist *, void *), void *data)
2179 {
2180         int i, ret = 0;
2181         unsigned int page_len, thislen, page_offset;
2182         struct scatterlist      sg[1];
2183
2184         sg_init_table(sg, 1);
2185
2186         if (offset >= buf->head[0].iov_len) {
2187                 offset -= buf->head[0].iov_len;
2188         } else {
2189                 thislen = buf->head[0].iov_len - offset;
2190                 if (thislen > len)
2191                         thislen = len;
2192                 sg_set_buf(sg, buf->head[0].iov_base + offset, thislen);
2193                 ret = actor(sg, data);
2194                 if (ret)
2195                         goto out;
2196                 offset = 0;
2197                 len -= thislen;
2198         }
2199         if (len == 0)
2200                 goto out;
2201
2202         if (offset >= buf->page_len) {
2203                 offset -= buf->page_len;
2204         } else {
2205                 page_len = buf->page_len - offset;
2206                 if (page_len > len)
2207                         page_len = len;
2208                 len -= page_len;
2209                 page_offset = (offset + buf->page_base) & (PAGE_SIZE - 1);
2210                 i = (offset + buf->page_base) >> PAGE_SHIFT;
2211                 thislen = PAGE_SIZE - page_offset;
2212                 do {
2213                         if (thislen > page_len)
2214                                 thislen = page_len;
2215                         sg_set_page(sg, buf->pages[i], thislen, page_offset);
2216                         ret = actor(sg, data);
2217                         if (ret)
2218                                 goto out;
2219                         page_len -= thislen;
2220                         i++;
2221                         page_offset = 0;
2222                         thislen = PAGE_SIZE;
2223                 } while (page_len != 0);
2224                 offset = 0;
2225         }
2226         if (len == 0)
2227                 goto out;
2228         if (offset < buf->tail[0].iov_len) {
2229                 thislen = buf->tail[0].iov_len - offset;
2230                 if (thislen > len)
2231                         thislen = len;
2232                 sg_set_buf(sg, buf->tail[0].iov_base + offset, thislen);
2233                 ret = actor(sg, data);
2234                 len -= thislen;
2235         }
2236         if (len != 0)
2237                 ret = -EINVAL;
2238 out:
2239         return ret;
2240 }
2241 EXPORT_SYMBOL_GPL(xdr_process_buf);
2242
2243 /**
2244  * xdr_stream_decode_opaque - Decode variable length opaque
2245  * @xdr: pointer to xdr_stream
2246  * @ptr: location to store opaque data
2247  * @size: size of storage buffer @ptr
2248  *
2249  * Return values:
2250  *   On success, returns size of object stored in *@ptr
2251  *   %-EBADMSG on XDR buffer overflow
2252  *   %-EMSGSIZE on overflow of storage buffer @ptr
2253  */
2254 ssize_t xdr_stream_decode_opaque(struct xdr_stream *xdr, void *ptr, size_t size)
2255 {
2256         ssize_t ret;
2257         void *p;
2258
2259         ret = xdr_stream_decode_opaque_inline(xdr, &p, size);
2260         if (ret <= 0)
2261                 return ret;
2262         memcpy(ptr, p, ret);
2263         return ret;
2264 }
2265 EXPORT_SYMBOL_GPL(xdr_stream_decode_opaque);
2266
2267 /**
2268  * xdr_stream_decode_opaque_dup - Decode and duplicate variable length opaque
2269  * @xdr: pointer to xdr_stream
2270  * @ptr: location to store pointer to opaque data
2271  * @maxlen: maximum acceptable object size
2272  * @gfp_flags: GFP mask to use
2273  *
2274  * Return values:
2275  *   On success, returns size of object stored in *@ptr
2276  *   %-EBADMSG on XDR buffer overflow
2277  *   %-EMSGSIZE if the size of the object would exceed @maxlen
2278  *   %-ENOMEM on memory allocation failure
2279  */
2280 ssize_t xdr_stream_decode_opaque_dup(struct xdr_stream *xdr, void **ptr,
2281                 size_t maxlen, gfp_t gfp_flags)
2282 {
2283         ssize_t ret;
2284         void *p;
2285
2286         ret = xdr_stream_decode_opaque_inline(xdr, &p, maxlen);
2287         if (ret > 0) {
2288                 *ptr = kmemdup(p, ret, gfp_flags);
2289                 if (*ptr != NULL)
2290                         return ret;
2291                 ret = -ENOMEM;
2292         }
2293         *ptr = NULL;
2294         return ret;
2295 }
2296 EXPORT_SYMBOL_GPL(xdr_stream_decode_opaque_dup);
2297
2298 /**
2299  * xdr_stream_decode_string - Decode variable length string
2300  * @xdr: pointer to xdr_stream
2301  * @str: location to store string
2302  * @size: size of storage buffer @str
2303  *
2304  * Return values:
2305  *   On success, returns length of NUL-terminated string stored in *@str
2306  *   %-EBADMSG on XDR buffer overflow
2307  *   %-EMSGSIZE on overflow of storage buffer @str
2308  */
2309 ssize_t xdr_stream_decode_string(struct xdr_stream *xdr, char *str, size_t size)
2310 {
2311         ssize_t ret;
2312         void *p;
2313
2314         ret = xdr_stream_decode_opaque_inline(xdr, &p, size);
2315         if (ret > 0) {
2316                 memcpy(str, p, ret);
2317                 str[ret] = '\0';
2318                 return strlen(str);
2319         }
2320         *str = '\0';
2321         return ret;
2322 }
2323 EXPORT_SYMBOL_GPL(xdr_stream_decode_string);
2324
2325 /**
2326  * xdr_stream_decode_string_dup - Decode and duplicate variable length string
2327  * @xdr: pointer to xdr_stream
2328  * @str: location to store pointer to string
2329  * @maxlen: maximum acceptable string length
2330  * @gfp_flags: GFP mask to use
2331  *
2332  * Return values:
2333  *   On success, returns length of NUL-terminated string stored in *@ptr
2334  *   %-EBADMSG on XDR buffer overflow
2335  *   %-EMSGSIZE if the size of the string would exceed @maxlen
2336  *   %-ENOMEM on memory allocation failure
2337  */
2338 ssize_t xdr_stream_decode_string_dup(struct xdr_stream *xdr, char **str,
2339                 size_t maxlen, gfp_t gfp_flags)
2340 {
2341         void *p;
2342         ssize_t ret;
2343
2344         ret = xdr_stream_decode_opaque_inline(xdr, &p, maxlen);
2345         if (ret > 0) {
2346                 char *s = kmemdup_nul(p, ret, gfp_flags);
2347                 if (s != NULL) {
2348                         *str = s;
2349                         return strlen(s);
2350                 }
2351                 ret = -ENOMEM;
2352         }
2353         *str = NULL;
2354         return ret;
2355 }
2356 EXPORT_SYMBOL_GPL(xdr_stream_decode_string_dup);
2357
2358 /**
2359  * xdr_stream_decode_opaque_auth - Decode struct opaque_auth (RFC5531 S8.2)
2360  * @xdr: pointer to xdr_stream
2361  * @flavor: location to store decoded flavor
2362  * @body: location to store decode body
2363  * @body_len: location to store length of decoded body
2364  *
2365  * Return values:
2366  *   On success, returns the number of buffer bytes consumed
2367  *   %-EBADMSG on XDR buffer overflow
2368  *   %-EMSGSIZE if the decoded size of the body field exceeds 400 octets
2369  */
2370 ssize_t xdr_stream_decode_opaque_auth(struct xdr_stream *xdr, u32 *flavor,
2371                                       void **body, unsigned int *body_len)
2372 {
2373         ssize_t ret, len;
2374
2375         len = xdr_stream_decode_u32(xdr, flavor);
2376         if (unlikely(len < 0))
2377                 return len;
2378         ret = xdr_stream_decode_opaque_inline(xdr, body, RPC_MAX_AUTH_SIZE);
2379         if (unlikely(ret < 0))
2380                 return ret;
2381         *body_len = ret;
2382         return len + ret;
2383 }
2384 EXPORT_SYMBOL_GPL(xdr_stream_decode_opaque_auth);
2385
2386 /**
2387  * xdr_stream_encode_opaque_auth - Encode struct opaque_auth (RFC5531 S8.2)
2388  * @xdr: pointer to xdr_stream
2389  * @flavor: verifier flavor to encode
2390  * @body: content of body to encode
2391  * @body_len: length of body to encode
2392  *
2393  * Return values:
2394  *   On success, returns length in bytes of XDR buffer consumed
2395  *   %-EBADMSG on XDR buffer overflow
2396  *   %-EMSGSIZE if the size of @body exceeds 400 octets
2397  */
2398 ssize_t xdr_stream_encode_opaque_auth(struct xdr_stream *xdr, u32 flavor,
2399                                       void *body, unsigned int body_len)
2400 {
2401         ssize_t ret, len;
2402
2403         if (unlikely(body_len > RPC_MAX_AUTH_SIZE))
2404                 return -EMSGSIZE;
2405         len = xdr_stream_encode_u32(xdr, flavor);
2406         if (unlikely(len < 0))
2407                 return len;
2408         ret = xdr_stream_encode_opaque(xdr, body, body_len);
2409         if (unlikely(ret < 0))
2410                 return ret;
2411         return len + ret;
2412 }
2413 EXPORT_SYMBOL_GPL(xdr_stream_encode_opaque_auth);