sys/vfs/nfs/nfs_bio.c

   1 /*
   2  * Copyright (c) 1989, 1993
   3  *      The Regents of the University of California.  All rights reserved.
   4  *
   5  * This code is derived from software contributed to Berkeley by
   6  * Rick Macklem at The University of Guelph.
   7  *
   8  * Redistribution and use in source and binary forms, with or without
   9  * modification, are permitted provided that the following conditions
  10  * are met:
  11  * 1. Redistributions of source code must retain the above copyright
  12  *    notice, this list of conditions and the following disclaimer.
  13  * 2. Redistributions in binary form must reproduce the above copyright
  14  *    notice, this list of conditions and the following disclaimer in the
  15  *    documentation and/or other materials provided with the distribution.
  16  * 3. All advertising materials mentioning features or use of this software
  17  *    must display the following acknowledgement:
  18  *      This product includes software developed by the University of
  19  *      California, Berkeley and its contributors.
  20  * 4. Neither the name of the University nor the names of its contributors
  21  *    may be used to endorse or promote products derived from this software
  22  *    without specific prior written permission.
  23  *
  24  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
  25  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  26  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  27  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
  28  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  29  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  30  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  31  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  32  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  33  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  34  * SUCH DAMAGE.
  35  *
  36  *      @(#)nfs_bio.c   8.9 (Berkeley) 3/30/95
  37  * $FreeBSD: /repoman/r/ncvs/src/sys/nfsclient/nfs_bio.c,v 1.130 2004/04/14 23:23:55 peadar Exp $
  38  * $DragonFly: src/sys/vfs/nfs/nfs_bio.c,v 1.45 2008/07/18 00:09:39 dillon Exp $
  39  */
  40
  41
  42 #include <sys/param.h>
  43 #include <sys/systm.h>
  44 #include <sys/resourcevar.h>
  45 #include <sys/signalvar.h>
  46 #include <sys/proc.h>
  47 #include <sys/buf.h>
  48 #include <sys/vnode.h>
  49 #include <sys/mount.h>
  50 #include <sys/kernel.h>
  51 #include <sys/mbuf.h>
  52 #include <sys/msfbuf.h>
  53
  54 #include <vm/vm.h>
  55 #include <vm/vm_extern.h>
  56 #include <vm/vm_page.h>
  57 #include <vm/vm_object.h>
  58 #include <vm/vm_pager.h>
  59 #include <vm/vnode_pager.h>
  60
  61 #include <sys/buf2.h>
  62 #include <sys/thread2.h>
  63
  64 #include "rpcv2.h"
  65 #include "nfsproto.h"
  66 #include "nfs.h"
  67 #include "nfsmount.h"
  68 #include "nfsnode.h"
  69 #include "xdr_subs.h"
  70 #include "nfsm_subs.h"
  71
  72
  73 static struct buf *nfs_getcacheblk(struct vnode *vp, off_t loffset,
  74                                    int size, struct thread *td);
  75 static int nfs_check_dirent(struct nfs_dirent *dp, int maxlen);
  76 static void nfsiodone_sync(struct bio *bio);
  77 static void nfs_readrpc_bio_done(nfsm_info_t info);
  78 static void nfs_writerpc_bio_done(nfsm_info_t info);
  79 static void nfs_commitrpc_bio_done(nfsm_info_t info);
  80
  81 /*
  82  * Vnode op for VM getpages.
  83  *
  84  * nfs_getpages(struct vnode *a_vp, vm_page_t *a_m, int a_count,
  85  *              int a_reqpage, vm_ooffset_t a_offset)
  86  */
  87 int
  88 nfs_getpages(struct vop_getpages_args *ap)
  89 {
  90         struct thread *td = curthread;          /* XXX */
  91         int i, error, nextoff, size, toff, count, npages;
  92         struct uio uio;
  93         struct iovec iov;
  94         char *kva;
  95         struct vnode *vp;
  96         struct nfsmount *nmp;
  97         vm_page_t *pages;
  98         vm_page_t m;
  99         struct msf_buf *msf;
 100
 101         vp = ap->a_vp;
 102         nmp = VFSTONFS(vp->v_mount);
 103         pages = ap->a_m;
 104         count = ap->a_count;
 105
 106         if (vp->v_object == NULL) {
 107                 kprintf("nfs_getpages: called with non-merged cache vnode??\n");
 108                 return VM_PAGER_ERROR;
 109         }
 110
 111         if ((nmp->nm_flag & NFSMNT_NFSV3) != 0 &&
 112             (nmp->nm_state & NFSSTA_GOTFSINFO) == 0)
 113                 (void)nfs_fsinfo(nmp, vp, td);
 114
 115         npages = btoc(count);
 116
 117         /*
 118          * NOTE that partially valid pages may occur in cases other
 119          * then file EOF, such as when a file is partially written and
 120          * ftruncate()-extended to a larger size.   It is also possible
 121          * for the valid bits to be set on garbage beyond the file EOF and
 122          * clear in the area before EOF (e.g. m->valid == 0xfc), which can
 123          * occur due to vtruncbuf() and the buffer cache's handling of
 124          * pages which 'straddle' buffers or when b_bufsize is not a
 125          * multiple of PAGE_SIZE.... the buffer cache cannot normally
 126          * clear the extra bits.  This kind of situation occurs when you
 127          * make a small write() (m->valid == 0x03) and then mmap() and
 128          * fault in the buffer(m->valid = 0xFF).  When NFS flushes the
 129          * buffer (vinvalbuf() m->valid = 0xFC) we are left with a mess.
 130          *
 131          * This is combined with the possibility that the pages are partially
 132          * dirty or that there is a buffer backing the pages that is dirty
 133          * (even if m->dirty is 0).
 134          *
 135          * To solve this problem several hacks have been made:  (1) NFS
 136          * guarentees that the IO block size is a multiple of PAGE_SIZE and
 137          * (2) The buffer cache, when invalidating an NFS buffer, will
 138          * disregard the buffer's fragmentory b_bufsize and invalidate
 139          * the whole page rather then just the piece the buffer owns.
 140          *
 141          * This allows us to assume that a partially valid page found here
 142          * is fully valid (vm_fault will zero'd out areas of the page not
 143          * marked as valid).
 144          */
 145         m = pages[ap->a_reqpage];
 146         if (m->valid != 0) {
 147                 for (i = 0; i < npages; ++i) {
 148                         if (i != ap->a_reqpage)
 149                                 vnode_pager_freepage(pages[i]);
 150                 }
 151                 return(0);
 152         }
 153
 154         /*
 155          * Use an MSF_BUF as a medium to retrieve data from the pages.
 156          */
 157         msf_map_pagelist(&msf, pages, npages, 0);
 158         KKASSERT(msf);
 159         kva = msf_buf_kva(msf);
 160
 161         iov.iov_base = kva;
 162         iov.iov_len = count;
 163         uio.uio_iov = &iov;
 164         uio.uio_iovcnt = 1;
 165         uio.uio_offset = IDX_TO_OFF(pages[0]->pindex);
 166         uio.uio_resid = count;
 167         uio.uio_segflg = UIO_SYSSPACE;
 168         uio.uio_rw = UIO_READ;
 169         uio.uio_td = td;
 170
 171         error = nfs_readrpc_uio(vp, &uio);
 172         msf_buf_free(msf);
 173
 174         if (error && (uio.uio_resid == count)) {
 175                 kprintf("nfs_getpages: error %d\n", error);
 176                 for (i = 0; i < npages; ++i) {
 177                         if (i != ap->a_reqpage)
 178                                 vnode_pager_freepage(pages[i]);
 179                 }
 180                 return VM_PAGER_ERROR;
 181         }
 182
 183         /*
 184          * Calculate the number of bytes read and validate only that number
 185          * of bytes.  Note that due to pending writes, size may be 0.  This
 186          * does not mean that the remaining data is invalid!
 187          */
 188
 189         size = count - uio.uio_resid;
 190
 191         for (i = 0, toff = 0; i < npages; i++, toff = nextoff) {
 192                 nextoff = toff + PAGE_SIZE;
 193                 m = pages[i];
 194
 195                 m->flags &= ~PG_ZERO;
 196
 197                 if (nextoff <= size) {
 198                         /*
 199                          * Read operation filled an entire page
 200                          */
 201                         m->valid = VM_PAGE_BITS_ALL;
 202                         vm_page_undirty(m);
 203                 } else if (size > toff) {
 204                         /*
 205                          * Read operation filled a partial page.
 206                          */
 207                         m->valid = 0;
 208                         vm_page_set_validclean(m, 0, size - toff);
 209                         /* handled by vm_fault now        */
 210                         /* vm_page_zero_invalid(m, TRUE); */
 211                 } else {
 212                         /*
 213                          * Read operation was short.  If no error occured
 214                          * we may have hit a zero-fill section.   We simply
 215                          * leave valid set to 0.
 216                          */
 217                         ;
 218                 }
 219                 if (i != ap->a_reqpage) {
 220                         /*
 221                          * Whether or not to leave the page activated is up in
 222                          * the air, but we should put the page on a page queue
 223                          * somewhere (it already is in the object).  Result:
 224                          * It appears that emperical results show that
 225                          * deactivating pages is best.
 226                          */
 227
 228                         /*
 229                          * Just in case someone was asking for this page we
 230                          * now tell them that it is ok to use.
 231                          */
 232                         if (!error) {
 233                                 if (m->flags & PG_WANTED)
 234                                         vm_page_activate(m);
 235                                 else
 236                                         vm_page_deactivate(m);
 237                                 vm_page_wakeup(m);
 238                         } else {
 239                                 vnode_pager_freepage(m);
 240                         }
 241                 }
 242         }
 243         return 0;
 244 }
 245
 246 /*
 247  * Vnode op for VM putpages.
 248  *
 249  * nfs_putpages(struct vnode *a_vp, vm_page_t *a_m, int a_count, int a_sync,
 250  *              int *a_rtvals, vm_ooffset_t a_offset)
 251  */
 252 int
 253 nfs_putpages(struct vop_putpages_args *ap)
 254 {
 255         struct thread *td = curthread;
 256         struct uio uio;
 257         struct iovec iov;
 258         char *kva;
 259         int iomode, must_commit, i, error, npages, count;
 260         off_t offset;
 261         int *rtvals;
 262         struct vnode *vp;
 263         struct nfsmount *nmp;
 264         struct nfsnode *np;
 265         vm_page_t *pages;
 266         struct msf_buf *msf;
 267
 268         vp = ap->a_vp;
 269         np = VTONFS(vp);
 270         nmp = VFSTONFS(vp->v_mount);
 271         pages = ap->a_m;
 272         count = ap->a_count;
 273         rtvals = ap->a_rtvals;
 274         npages = btoc(count);
 275         offset = IDX_TO_OFF(pages[0]->pindex);
 276
 277         if ((nmp->nm_flag & NFSMNT_NFSV3) != 0 &&
 278             (nmp->nm_state & NFSSTA_GOTFSINFO) == 0)
 279                 (void)nfs_fsinfo(nmp, vp, td);
 280
 281         for (i = 0; i < npages; i++) {
 282                 rtvals[i] = VM_PAGER_AGAIN;
 283         }
 284
 285         /*
 286          * When putting pages, do not extend file past EOF.
 287          */
 288
 289         if (offset + count > np->n_size) {
 290                 count = np->n_size - offset;
 291                 if (count < 0)
 292                         count = 0;
 293         }
 294
 295         /*
 296          * Use an MSF_BUF as a medium to retrieve data from the pages.
 297          */
 298         msf_map_pagelist(&msf, pages, npages, 0);
 299         KKASSERT(msf);
 300         kva = msf_buf_kva(msf);
 301
 302         iov.iov_base = kva;
 303         iov.iov_len = count;
 304         uio.uio_iov = &iov;
 305         uio.uio_iovcnt = 1;
 306         uio.uio_offset = offset;
 307         uio.uio_resid = count;
 308         uio.uio_segflg = UIO_SYSSPACE;
 309         uio.uio_rw = UIO_WRITE;
 310         uio.uio_td = td;
 311
 312         if ((ap->a_sync & VM_PAGER_PUT_SYNC) == 0)
 313             iomode = NFSV3WRITE_UNSTABLE;
 314         else
 315             iomode = NFSV3WRITE_FILESYNC;
 316
 317         error = nfs_writerpc_uio(vp, &uio, &iomode, &must_commit);
 318
 319         msf_buf_free(msf);
 320
 321         if (!error) {
 322                 int nwritten = round_page(count - uio.uio_resid) / PAGE_SIZE;
 323                 for (i = 0; i < nwritten; i++) {
 324                         rtvals[i] = VM_PAGER_OK;
 325                         vm_page_undirty(pages[i]);
 326                 }
 327                 if (must_commit)
 328                         nfs_clearcommit(vp->v_mount);
 329         }
 330         return rtvals[0];
 331 }
 332
 333 /*
 334  * Vnode op for read using bio
 335  */
 336 int
 337 nfs_bioread(struct vnode *vp, struct uio *uio, int ioflag)
 338 {
 339         struct nfsnode *np = VTONFS(vp);
 340         int biosize, i;
 341         struct buf *bp = 0, *rabp;
 342         struct vattr vattr;
 343         struct thread *td;
 344         struct nfsmount *nmp = VFSTONFS(vp->v_mount);
 345         daddr_t lbn, rabn;
 346         off_t raoffset;
 347         off_t loffset;
 348         int bcount;
 349         int seqcount;
 350         int nra, error = 0, n = 0, on = 0;
 351
 352 #ifdef DIAGNOSTIC
 353         if (uio->uio_rw != UIO_READ)
 354                 panic("nfs_read mode");
 355 #endif
 356         if (uio->uio_resid == 0)
 357                 return (0);
 358         if (uio->uio_offset < 0)        /* XXX VDIR cookies can be negative */
 359                 return (EINVAL);
 360         td = uio->uio_td;
 361
 362         if ((nmp->nm_flag & NFSMNT_NFSV3) != 0 &&
 363             (nmp->nm_state & NFSSTA_GOTFSINFO) == 0)
 364                 (void)nfs_fsinfo(nmp, vp, td);
 365         if (vp->v_type != VDIR &&
 366             (uio->uio_offset + uio->uio_resid) > nmp->nm_maxfilesize)
 367                 return (EFBIG);
 368         biosize = vp->v_mount->mnt_stat.f_iosize;
 369         seqcount = (int)((off_t)(ioflag >> IO_SEQSHIFT) * biosize / BKVASIZE);
 370
 371         /*
 372          * For nfs, cache consistency can only be maintained approximately.
 373          * Although RFC1094 does not specify the criteria, the following is
 374          * believed to be compatible with the reference port.
 375          *
 376          * NFS:         If local changes have been made and this is a
 377          *              directory, the directory must be invalidated and
 378          *              the attribute cache must be cleared.
 379          *
 380          *              GETATTR is called to synchronize the file size.
 381          *
 382          *              If remote changes are detected local data is flushed
 383          *              and the cache is invalidated.
 384          *
 385          *              NOTE: In the normal case the attribute cache is not
 386          *              cleared which means GETATTR may use cached data and
 387          *              not immediately detect changes made on the server.
 388          */
 389         if ((np->n_flag & NLMODIFIED) && vp->v_type == VDIR) {
 390                 nfs_invaldir(vp);
 391                 error = nfs_vinvalbuf(vp, V_SAVE, 1);
 392                 if (error)
 393                         return (error);
 394                 np->n_attrstamp = 0;
 395         }
 396         error = VOP_GETATTR(vp, &vattr);
 397         if (error)
 398                 return (error);
 399         if (np->n_flag & NRMODIFIED) {
 400                 if (vp->v_type == VDIR)
 401                         nfs_invaldir(vp);
 402                 error = nfs_vinvalbuf(vp, V_SAVE, 1);
 403                 if (error)
 404                         return (error);
 405                 np->n_flag &= ~NRMODIFIED;
 406         }
 407         do {
 408             if (np->n_flag & NDONTCACHE) {
 409                 switch (vp->v_type) {
 410                 case VREG:
 411                         return (nfs_readrpc_uio(vp, uio));
 412                 case VLNK:
 413                         return (nfs_readlinkrpc_uio(vp, uio));
 414                 case VDIR:
 415                         break;
 416                 default:
 417                         kprintf(" NDONTCACHE: type %x unexpected\n", vp->v_type);
 418                         break;
 419                 };
 420             }
 421             switch (vp->v_type) {
 422             case VREG:
 423                 nfsstats.biocache_reads++;
 424                 lbn = uio->uio_offset / biosize;
 425                 on = uio->uio_offset & (biosize - 1);
 426                 loffset = (off_t)lbn * biosize;
 427
 428                 /*
 429                  * Start the read ahead(s), as required.
 430                  */
 431                 if (nmp->nm_readahead > 0 && nfs_asyncok(nmp)) {
 432                     for (nra = 0; nra < nmp->nm_readahead && nra < seqcount &&
 433                         (off_t)(lbn + 1 + nra) * biosize < np->n_size; nra++) {
 434                         rabn = lbn + 1 + nra;
 435                         raoffset = (off_t)rabn * biosize;
 436                         if (findblk(vp, raoffset, FINDBLK_TEST) == NULL) {
 437                             rabp = nfs_getcacheblk(vp, raoffset, biosize, td);
 438                             if (!rabp)
 439                                 return (EINTR);
 440                             if ((rabp->b_flags & (B_CACHE|B_DELWRI)) == 0) {
 441                                 rabp->b_cmd = BUF_CMD_READ;
 442                                 vfs_busy_pages(vp, rabp);
 443                                 nfs_asyncio(vp, &rabp->b_bio2);
 444                             } else {
 445                                 brelse(rabp);
 446                             }
 447                         }
 448                     }
 449                 }
 450
 451                 /*
 452                  * Obtain the buffer cache block.  Figure out the buffer size
 453                  * when we are at EOF.  If we are modifying the size of the
 454                  * buffer based on an EOF condition we need to hold
 455                  * nfs_rslock() through obtaining the buffer to prevent
 456                  * a potential writer-appender from messing with n_size.
 457                  * Otherwise we may accidently truncate the buffer and
 458                  * lose dirty data.
 459                  *
 460                  * Note that bcount is *not* DEV_BSIZE aligned.
 461                  */
 462
 463 again:
 464                 bcount = biosize;
 465                 if (loffset >= np->n_size) {
 466                         bcount = 0;
 467                 } else if (loffset + biosize > np->n_size) {
 468                         bcount = np->n_size - loffset;
 469                 }
 470                 if (bcount != biosize) {
 471                         switch(nfs_rslock(np)) {
 472                         case ENOLCK:
 473                                 goto again;
 474                                 /* not reached */
 475                         case EINTR:
 476                         case ERESTART:
 477                                 return(EINTR);
 478                                 /* not reached */
 479                         default:
 480                                 break;
 481                         }
 482                 }
 483
 484                 bp = nfs_getcacheblk(vp, loffset, bcount, td);
 485
 486                 if (bcount != biosize)
 487                         nfs_rsunlock(np);
 488                 if (!bp)
 489                         return (EINTR);
 490
 491                 /*
 492                  * If B_CACHE is not set, we must issue the read.  If this
 493                  * fails, we return an error.
 494                  */
 495
 496                 if ((bp->b_flags & B_CACHE) == 0) {
 497                     bp->b_cmd = BUF_CMD_READ;
 498                     bp->b_bio2.bio_done = nfsiodone_sync;
 499                     bp->b_bio2.bio_flags |= BIO_SYNC;
 500                     vfs_busy_pages(vp, bp);
 501                     error = nfs_doio(vp, &bp->b_bio2, td);
 502                     if (error) {
 503                         brelse(bp);
 504                         return (error);
 505                     }
 506                 }
 507
 508                 /*
 509                  * on is the offset into the current bp.  Figure out how many
 510                  * bytes we can copy out of the bp.  Note that bcount is
 511                  * NOT DEV_BSIZE aligned.
 512                  *
 513                  * Then figure out how many bytes we can copy into the uio.
 514                  */
 515
 516                 n = 0;
 517                 if (on < bcount)
 518                         n = min((unsigned)(bcount - on), uio->uio_resid);
 519                 break;
 520             case VLNK:
 521                 biosize = min(NFS_MAXPATHLEN, np->n_size);
 522                 nfsstats.biocache_readlinks++;
 523                 bp = nfs_getcacheblk(vp, (off_t)0, biosize, td);
 524                 if (bp == NULL)
 525                         return (EINTR);
 526                 if ((bp->b_flags & B_CACHE) == 0) {
 527                     bp->b_cmd = BUF_CMD_READ;
 528                     bp->b_bio2.bio_done = nfsiodone_sync;
 529                     bp->b_bio2.bio_flags |= BIO_SYNC;
 530                     vfs_busy_pages(vp, bp);
 531                     error = nfs_doio(vp, &bp->b_bio2, td);
 532                     if (error) {
 533                         bp->b_flags |= B_ERROR | B_INVAL;
 534                         brelse(bp);
 535                         return (error);
 536                     }
 537                 }
 538                 n = min(uio->uio_resid, bp->b_bcount - bp->b_resid);
 539                 on = 0;
 540                 break;
 541             case VDIR:
 542                 nfsstats.biocache_readdirs++;
 543                 if (np->n_direofoffset
 544                     && uio->uio_offset >= np->n_direofoffset) {
 545                     return (0);
 546                 }
 547                 lbn = (uoff_t)uio->uio_offset / NFS_DIRBLKSIZ;
 548                 on = uio->uio_offset & (NFS_DIRBLKSIZ - 1);
 549                 loffset = uio->uio_offset - on;
 550                 bp = nfs_getcacheblk(vp, loffset, NFS_DIRBLKSIZ, td);
 551                 if (bp == NULL)
 552                     return (EINTR);
 553
 554                 if ((bp->b_flags & B_CACHE) == 0) {
 555                     bp->b_cmd = BUF_CMD_READ;
 556                     bp->b_bio2.bio_done = nfsiodone_sync;
 557                     bp->b_bio2.bio_flags |= BIO_SYNC;
 558                     vfs_busy_pages(vp, bp);
 559                     error = nfs_doio(vp, &bp->b_bio2, td);
 560                     if (error)
 561                             brelse(bp);
 562                     while (error == NFSERR_BAD_COOKIE) {
 563                         kprintf("got bad cookie vp %p bp %p\n", vp, bp);
 564                         nfs_invaldir(vp);
 565                         error = nfs_vinvalbuf(vp, 0, 1);
 566                         /*
 567                          * Yuck! The directory has been modified on the
 568                          * server. The only way to get the block is by
 569                          * reading from the beginning to get all the
 570                          * offset cookies.
 571                          *
 572                          * Leave the last bp intact unless there is an error.
 573                          * Loop back up to the while if the error is another
 574                          * NFSERR_BAD_COOKIE (double yuch!).
 575                          */
 576                         for (i = 0; i <= lbn && !error; i++) {
 577                             if (np->n_direofoffset
 578                                 && (i * NFS_DIRBLKSIZ) >= np->n_direofoffset)
 579                                     return (0);
 580                             bp = nfs_getcacheblk(vp, (off_t)i * NFS_DIRBLKSIZ,
 581                                                  NFS_DIRBLKSIZ, td);
 582                             if (!bp)
 583                                 return (EINTR);
 584                             if ((bp->b_flags & B_CACHE) == 0) {
 585                                     bp->b_cmd = BUF_CMD_READ;
 586                                     bp->b_bio2.bio_done = nfsiodone_sync;
 587                                     bp->b_bio2.bio_flags |= BIO_SYNC;
 588                                     vfs_busy_pages(vp, bp);
 589                                     error = nfs_doio(vp, &bp->b_bio2, td);
 590                                     /*
 591                                      * no error + B_INVAL == directory EOF,
 592                                      * use the block.
 593                                      */
 594                                     if (error == 0 && (bp->b_flags & B_INVAL))
 595                                             break;
 596                             }
 597                             /*
 598                              * An error will throw away the block and the
 599                              * for loop will break out.  If no error and this
 600                              * is not the block we want, we throw away the
 601                              * block and go for the next one via the for loop.
 602                              */
 603                             if (error || i < lbn)
 604                                     brelse(bp);
 605                         }
 606                     }
 607                     /*
 608                      * The above while is repeated if we hit another cookie
 609                      * error.  If we hit an error and it wasn't a cookie error,
 610                      * we give up.
 611                      */
 612                     if (error)
 613                             return (error);
 614                 }
 615
 616                 /*
 617                  * If not eof and read aheads are enabled, start one.
 618                  * (You need the current block first, so that you have the
 619                  *  directory offset cookie of the next block.)
 620                  */
 621                 if (nmp->nm_readahead > 0 && nfs_asyncok(nmp) &&
 622                     (bp->b_flags & B_INVAL) == 0 &&
 623                     (np->n_direofoffset == 0 ||
 624                     loffset + NFS_DIRBLKSIZ < np->n_direofoffset) &&
 625                     (np->n_flag & NDONTCACHE) == 0 &&
 626                     findblk(vp, loffset + NFS_DIRBLKSIZ, FINDBLK_TEST) == NULL
 627                 ) {
 628                         rabp = nfs_getcacheblk(vp, loffset + NFS_DIRBLKSIZ,
 629                                                NFS_DIRBLKSIZ, td);
 630                         if (rabp) {
 631                             if ((rabp->b_flags & (B_CACHE|B_DELWRI)) == 0) {
 632                                 rabp->b_cmd = BUF_CMD_READ;
 633                                 vfs_busy_pages(vp, rabp);
 634                                 nfs_asyncio(vp, &rabp->b_bio2);
 635                             } else {
 636                                 brelse(rabp);
 637                             }
 638                         }
 639                 }
 640                 /*
 641                  * Unlike VREG files, whos buffer size ( bp->b_bcount ) is
 642                  * chopped for the EOF condition, we cannot tell how large
 643                  * NFS directories are going to be until we hit EOF.  So
 644                  * an NFS directory buffer is *not* chopped to its EOF.  Now,
 645                  * it just so happens that b_resid will effectively chop it
 646                  * to EOF.  *BUT* this information is lost if the buffer goes
 647                  * away and is reconstituted into a B_CACHE state ( due to
 648                  * being VMIO ) later.  So we keep track of the directory eof
 649                  * in np->n_direofoffset and chop it off as an extra step
 650                  * right here.
 651                  */
 652                 n = lmin(uio->uio_resid, NFS_DIRBLKSIZ - bp->b_resid - on);
 653                 if (np->n_direofoffset && n > np->n_direofoffset - uio->uio_offset)
 654                         n = np->n_direofoffset - uio->uio_offset;
 655                 break;
 656             default:
 657                 kprintf(" nfs_bioread: type %x unexpected\n",vp->v_type);
 658                 break;
 659             };
 660
 661             switch (vp->v_type) {
 662             case VREG:
 663                 if (n > 0)
 664                     error = uiomove(bp->b_data + on, (int)n, uio);
 665                 break;
 666             case VLNK:
 667                 if (n > 0)
 668                     error = uiomove(bp->b_data + on, (int)n, uio);
 669                 n = 0;
 670                 break;
 671             case VDIR:
 672                 if (n > 0) {
 673                     off_t old_off = uio->uio_offset;
 674                     caddr_t cpos, epos;
 675                     struct nfs_dirent *dp;
 676
 677                     /*
 678                      * We are casting cpos to nfs_dirent, it must be
 679                      * int-aligned.
 680                      */
 681                     if (on & 3) {
 682                         error = EINVAL;
 683                         break;
 684                     }
 685
 686                     cpos = bp->b_data + on;
 687                     epos = bp->b_data + on + n;
 688                     while (cpos < epos && error == 0 && uio->uio_resid > 0) {
 689                             dp = (struct nfs_dirent *)cpos;
 690                             error = nfs_check_dirent(dp, (int)(epos - cpos));
 691                             if (error)
 692                                     break;
 693                             if (vop_write_dirent(&error, uio, dp->nfs_ino,
 694                                 dp->nfs_type, dp->nfs_namlen, dp->nfs_name)) {
 695                                     break;
 696                             }
 697                             cpos += dp->nfs_reclen;
 698                     }
 699                     n = 0;
 700                     if (error == 0)
 701                             uio->uio_offset = old_off + cpos - bp->b_data - on;
 702                 }
 703                 /*
 704                  * Invalidate buffer if caching is disabled, forcing a
 705                  * re-read from the remote later.
 706                  */
 707                 if (np->n_flag & NDONTCACHE)
 708                         bp->b_flags |= B_INVAL;
 709                 break;
 710             default:
 711                 kprintf(" nfs_bioread: type %x unexpected\n",vp->v_type);
 712             }
 713             brelse(bp);
 714         } while (error == 0 && uio->uio_resid > 0 && n > 0);
 715         return (error);
 716 }
 717
 718 /*
 719  * Userland can supply any 'seek' offset when reading a NFS directory.
 720  * Validate the structure so we don't panic the kernel.  Note that
 721  * the element name is nul terminated and the nul is not included
 722  * in nfs_namlen.
 723  */
 724 static
 725 int
 726 nfs_check_dirent(struct nfs_dirent *dp, int maxlen)
 727 {
 728         int nfs_name_off = offsetof(struct nfs_dirent, nfs_name[0]);
 729
 730         if (nfs_name_off >= maxlen)
 731                 return (EINVAL);
 732         if (dp->nfs_reclen < nfs_name_off || dp->nfs_reclen > maxlen)
 733                 return (EINVAL);
 734         if (nfs_name_off + dp->nfs_namlen >= dp->nfs_reclen)
 735                 return (EINVAL);
 736         if (dp->nfs_reclen & 3)
 737                 return (EINVAL);
 738         return (0);
 739 }
 740
 741 /*
 742  * Vnode op for write using bio
 743  *
 744  * nfs_write(struct vnode *a_vp, struct uio *a_uio, int a_ioflag,
 745  *           struct ucred *a_cred)
 746  */
 747 int
 748 nfs_write(struct vop_write_args *ap)
 749 {
 750         struct uio *uio = ap->a_uio;
 751         struct thread *td = uio->uio_td;
 752         struct vnode *vp = ap->a_vp;
 753         struct nfsnode *np = VTONFS(vp);
 754         int ioflag = ap->a_ioflag;
 755         struct buf *bp;
 756         struct vattr vattr;
 757         struct nfsmount *nmp = VFSTONFS(vp->v_mount);
 758         daddr_t lbn;
 759         off_t loffset;
 760         int n, on, error = 0, iomode, must_commit;
 761         int haverslock = 0;
 762         int bcount;
 763         int biosize;
 764
 765 #ifdef DIAGNOSTIC
 766         if (uio->uio_rw != UIO_WRITE)
 767                 panic("nfs_write mode");
 768         if (uio->uio_segflg == UIO_USERSPACE && uio->uio_td != curthread)
 769                 panic("nfs_write proc");
 770 #endif
 771         if (vp->v_type != VREG)
 772                 return (EIO);
 773         if (np->n_flag & NWRITEERR) {
 774                 np->n_flag &= ~NWRITEERR;
 775                 return (np->n_error);
 776         }
 777         if ((nmp->nm_flag & NFSMNT_NFSV3) != 0 &&
 778             (nmp->nm_state & NFSSTA_GOTFSINFO) == 0)
 779                 (void)nfs_fsinfo(nmp, vp, td);
 780
 781         /*
 782          * Synchronously flush pending buffers if we are in synchronous
 783          * mode or if we are appending.
 784          */
 785         if (ioflag & (IO_APPEND | IO_SYNC)) {
 786                 if (np->n_flag & NLMODIFIED) {
 787                         np->n_attrstamp = 0;
 788                         error = nfs_flush(vp, MNT_WAIT, td, 0);
 789                         /* error = nfs_vinvalbuf(vp, V_SAVE, 1); */
 790                         if (error)
 791                                 return (error);
 792                 }
 793         }
 794
 795         /*
 796          * If IO_APPEND then load uio_offset.  We restart here if we cannot
 797          * get the append lock.
 798          */
 799 restart:
 800         if (ioflag & IO_APPEND) {
 801                 np->n_attrstamp = 0;
 802                 error = VOP_GETATTR(vp, &vattr);
 803                 if (error)
 804                         return (error);
 805                 uio->uio_offset = np->n_size;
 806         }
 807
 808         if (uio->uio_offset < 0)
 809                 return (EINVAL);
 810         if ((uio->uio_offset + uio->uio_resid) > nmp->nm_maxfilesize)
 811                 return (EFBIG);
 812         if (uio->uio_resid == 0)
 813                 return (0);
 814
 815         /*
 816          * We need to obtain the rslock if we intend to modify np->n_size
 817          * in order to guarentee the append point with multiple contending
 818          * writers, to guarentee that no other appenders modify n_size
 819          * while we are trying to obtain a truncated buffer (i.e. to avoid
 820          * accidently truncating data written by another appender due to
 821          * the race), and to ensure that the buffer is populated prior to
 822          * our extending of the file.  We hold rslock through the entire
 823          * operation.
 824          *
 825          * Note that we do not synchronize the case where someone truncates
 826          * the file while we are appending to it because attempting to lock
 827          * this case may deadlock other parts of the system unexpectedly.
 828          */
 829         if ((ioflag & IO_APPEND) ||
 830             uio->uio_offset + uio->uio_resid > np->n_size) {
 831                 switch(nfs_rslock(np)) {
 832                 case ENOLCK:
 833                         goto restart;
 834                         /* not reached */
 835                 case EINTR:
 836                 case ERESTART:
 837                         return(EINTR);
 838                         /* not reached */
 839                 default:
 840                         break;
 841                 }
 842                 haverslock = 1;
 843         }
 844
 845         /*
 846          * Maybe this should be above the vnode op call, but so long as
 847          * file servers have no limits, i don't think it matters
 848          */
 849         if (td->td_proc && uio->uio_offset + uio->uio_resid >
 850               td->td_proc->p_rlimit[RLIMIT_FSIZE].rlim_cur) {
 851                 lwpsignal(td->td_proc, td->td_lwp, SIGXFSZ);
 852                 if (haverslock)
 853                         nfs_rsunlock(np);
 854                 return (EFBIG);
 855         }
 856
 857         biosize = vp->v_mount->mnt_stat.f_iosize;
 858
 859         do {
 860                 if ((np->n_flag & NDONTCACHE) && uio->uio_iovcnt == 1) {
 861                     iomode = NFSV3WRITE_FILESYNC;
 862                     error = nfs_writerpc_uio(vp, uio, &iomode, &must_commit);
 863                     if (must_commit)
 864                             nfs_clearcommit(vp->v_mount);
 865                     break;
 866                 }
 867                 nfsstats.biocache_writes++;
 868                 lbn = uio->uio_offset / biosize;
 869                 on = uio->uio_offset & (biosize-1);
 870                 loffset = uio->uio_offset - on;
 871                 n = min((unsigned)(biosize - on), uio->uio_resid);
 872 again:
 873                 /*
 874                  * Handle direct append and file extension cases, calculate
 875                  * unaligned buffer size.
 876                  */
 877
 878                 if (uio->uio_offset == np->n_size && n) {
 879                         /*
 880                          * Get the buffer (in its pre-append state to maintain
 881                          * B_CACHE if it was previously set).  Resize the
 882                          * nfsnode after we have locked the buffer to prevent
 883                          * readers from reading garbage.
 884                          */
 885                         bcount = on;
 886                         bp = nfs_getcacheblk(vp, loffset, bcount, td);
 887
 888                         if (bp != NULL) {
 889                                 long save;
 890
 891                                 np->n_size = uio->uio_offset + n;
 892                                 np->n_flag |= NLMODIFIED;
 893                                 vnode_pager_setsize(vp, np->n_size);
 894
 895                                 save = bp->b_flags & B_CACHE;
 896                                 bcount += n;
 897                                 allocbuf(bp, bcount);
 898                                 bp->b_flags |= save;
 899                         }
 900                 } else {
 901                         /*
 902                          * Obtain the locked cache block first, and then
 903                          * adjust the file's size as appropriate.
 904                          */
 905                         bcount = on + n;
 906                         if (loffset + bcount < np->n_size) {
 907                                 if (loffset + biosize < np->n_size)
 908                                         bcount = biosize;
 909                                 else
 910                                         bcount = np->n_size - loffset;
 911                         }
 912                         bp = nfs_getcacheblk(vp, loffset, bcount, td);
 913                         if (uio->uio_offset + n > np->n_size) {
 914                                 np->n_size = uio->uio_offset + n;
 915                                 np->n_flag |= NLMODIFIED;
 916                                 vnode_pager_setsize(vp, np->n_size);
 917                         }
 918                 }
 919
 920                 if (bp == NULL) {
 921                         error = EINTR;
 922                         break;
 923                 }
 924
 925                 /*
 926                  * Issue a READ if B_CACHE is not set.  In special-append
 927                  * mode, B_CACHE is based on the buffer prior to the write
 928                  * op and is typically set, avoiding the read.  If a read
 929                  * is required in special append mode, the server will
 930                  * probably send us a short-read since we extended the file
 931                  * on our end, resulting in b_resid == 0 and, thusly,
 932                  * B_CACHE getting set.
 933                  *
 934                  * We can also avoid issuing the read if the write covers
 935                  * the entire buffer.  We have to make sure the buffer state
 936                  * is reasonable in this case since we will not be initiating
 937                  * I/O.  See the comments in kern/vfs_bio.c's getblk() for
 938                  * more information.
 939                  *
 940                  * B_CACHE may also be set due to the buffer being cached
 941                  * normally.
 942                  *
 943                  * When doing a UIO_NOCOPY write the buffer is not
 944                  * overwritten and we cannot just set B_CACHE unconditionally
 945                  * for full-block writes.
 946                  */
 947
 948                 if (on == 0 && n == bcount && uio->uio_segflg != UIO_NOCOPY) {
 949                         bp->b_flags |= B_CACHE;
 950                         bp->b_flags &= ~(B_ERROR | B_INVAL);
 951                 }
 952
 953                 if ((bp->b_flags & B_CACHE) == 0) {
 954                         bp->b_cmd = BUF_CMD_READ;
 955                         bp->b_bio2.bio_done = nfsiodone_sync;
 956                         bp->b_bio2.bio_flags |= BIO_SYNC;
 957                         vfs_busy_pages(vp, bp);
 958                         error = nfs_doio(vp, &bp->b_bio2, td);
 959                         if (error) {
 960                                 brelse(bp);
 961                                 break;
 962                         }
 963                 }
 964                 if (!bp) {
 965                         error = EINTR;
 966                         break;
 967                 }
 968                 np->n_flag |= NLMODIFIED;
 969
 970                 /*
 971                  * If dirtyend exceeds file size, chop it down.  This should
 972                  * not normally occur but there is an append race where it
 973                  * might occur XXX, so we log it.
 974                  *
 975                  * If the chopping creates a reverse-indexed or degenerate
 976                  * situation with dirtyoff/end, we 0 both of them.
 977                  */
 978
 979                 if (bp->b_dirtyend > bcount) {
 980                         kprintf("NFS append race @%08llx:%d\n",
 981                             (long long)bp->b_bio2.bio_offset,
 982                             bp->b_dirtyend - bcount);
 983                         bp->b_dirtyend = bcount;
 984                 }
 985
 986                 if (bp->b_dirtyoff >= bp->b_dirtyend)
 987                         bp->b_dirtyoff = bp->b_dirtyend = 0;
 988
 989                 /*
 990                  * If the new write will leave a contiguous dirty
 991                  * area, just update the b_dirtyoff and b_dirtyend,
 992                  * otherwise force a write rpc of the old dirty area.
 993                  *
 994                  * While it is possible to merge discontiguous writes due to
 995                  * our having a B_CACHE buffer ( and thus valid read data
 996                  * for the hole), we don't because it could lead to
 997                  * significant cache coherency problems with multiple clients,
 998                  * especially if locking is implemented later on.
 999                  *
1000                  * as an optimization we could theoretically maintain
1001                  * a linked list of discontinuous areas, but we would still
1002                  * have to commit them separately so there isn't much
1003                  * advantage to it except perhaps a bit of asynchronization.
1004                  */
1005
1006                 if (bp->b_dirtyend > 0 &&
1007                     (on > bp->b_dirtyend || (on + n) < bp->b_dirtyoff)) {
1008                         if (bwrite(bp) == EINTR) {
1009                                 error = EINTR;
1010                                 break;
1011                         }
1012                         goto again;
1013                 }
1014
1015                 error = uiomove((char *)bp->b_data + on, n, uio);
1016
1017                 /*
1018                  * Since this block is being modified, it must be written
1019                  * again and not just committed.  Since write clustering does
1020                  * not work for the stage 1 data write, only the stage 2
1021                  * commit rpc, we have to clear B_CLUSTEROK as well.
1022                  */
1023                 bp->b_flags &= ~(B_NEEDCOMMIT | B_CLUSTEROK);
1024
1025                 if (error) {
1026                         bp->b_flags |= B_ERROR;
1027                         brelse(bp);
1028                         break;
1029                 }
1030
1031                 /*
1032                  * Only update dirtyoff/dirtyend if not a degenerate
1033                  * condition.
1034                  */
1035                 if (n) {
1036                         if (bp->b_dirtyend > 0) {
1037                                 bp->b_dirtyoff = min(on, bp->b_dirtyoff);
1038                                 bp->b_dirtyend = max((on + n), bp->b_dirtyend);
1039                         } else {
1040                                 bp->b_dirtyoff = on;
1041                                 bp->b_dirtyend = on + n;
1042                         }
1043                         vfs_bio_set_validclean(bp, on, n);
1044                 }
1045
1046                 /*
1047                  * If the lease is non-cachable or IO_SYNC do bwrite().
1048                  *
1049                  * IO_INVAL appears to be unused.  The idea appears to be
1050                  * to turn off caching in this case.  Very odd.  XXX
1051                  *
1052                  * If nfs_async is set bawrite() will use an unstable write
1053                  * (build dirty bufs on the server), so we might as well
1054                  * push it out with bawrite().  If nfs_async is not set we
1055                  * use bdwrite() to cache dirty bufs on the client.
1056                  */
1057                 if ((np->n_flag & NDONTCACHE) || (ioflag & IO_SYNC)) {
1058                         if (ioflag & IO_INVAL)
1059                                 bp->b_flags |= B_NOCACHE;
1060                         error = bwrite(bp);
1061                         if (error)
1062                                 break;
1063                         if (np->n_flag & NDONTCACHE) {
1064                                 error = nfs_vinvalbuf(vp, V_SAVE, 1);
1065                                 if (error)
1066                                         break;
1067                         }
1068                 } else if ((n + on) == biosize && nfs_async) {
1069                         bawrite(bp);
1070                 } else {
1071                         bdwrite(bp);
1072                 }
1073         } while (uio->uio_resid > 0 && n > 0);
1074
1075         if (haverslock)
1076                 nfs_rsunlock(np);
1077
1078         return (error);
1079 }
1080
1081 /*
1082  * Get an nfs cache block.
1083  *
1084  * Allocate a new one if the block isn't currently in the cache
1085  * and return the block marked busy. If the calling process is
1086  * interrupted by a signal for an interruptible mount point, return
1087  * NULL.
1088  *
1089  * The caller must carefully deal with the possible B_INVAL state of
1090  * the buffer.  nfs_startio() clears B_INVAL (and nfs_asyncio() clears it
1091  * indirectly), so synchronous reads can be issued without worrying about
1092  * the B_INVAL state.  We have to be a little more careful when dealing
1093  * with writes (see comments in nfs_write()) when extending a file past
1094  * its EOF.
1095  */
1096 static struct buf *
1097 nfs_getcacheblk(struct vnode *vp, off_t loffset, int size, struct thread *td)
1098 {
1099         struct buf *bp;
1100         struct mount *mp;
1101         struct nfsmount *nmp;
1102
1103         mp = vp->v_mount;
1104         nmp = VFSTONFS(mp);
1105
1106         if (nmp->nm_flag & NFSMNT_INT) {
1107                 bp = getblk(vp, loffset, size, GETBLK_PCATCH, 0);
1108                 while (bp == NULL) {
1109                         if (nfs_sigintr(nmp, NULL, td))
1110                                 return (NULL);
1111                         bp = getblk(vp, loffset, size, 0, 2 * hz);
1112                 }
1113         } else {
1114                 bp = getblk(vp, loffset, size, 0, 0);
1115         }
1116
1117         /*
1118          * bio2, the 'device' layer.  Since BIOs use 64 bit byte offsets
1119          * now, no translation is necessary.
1120          */
1121         bp->b_bio2.bio_offset = loffset;
1122         return (bp);
1123 }
1124
1125 /*
1126  * Flush and invalidate all dirty buffers. If another process is already
1127  * doing the flush, just wait for completion.
1128  */
1129 int
1130 nfs_vinvalbuf(struct vnode *vp, int flags, int intrflg)
1131 {
1132         struct nfsnode *np = VTONFS(vp);
1133         struct nfsmount *nmp = VFSTONFS(vp->v_mount);
1134         int error = 0, slpflag, slptimeo;
1135         thread_t td = curthread;
1136
1137         if (vp->v_flag & VRECLAIMED)
1138                 return (0);
1139
1140         if ((nmp->nm_flag & NFSMNT_INT) == 0)
1141                 intrflg = 0;
1142         if (intrflg) {
1143                 slpflag = PCATCH;
1144                 slptimeo = 2 * hz;
1145         } else {
1146                 slpflag = 0;
1147                 slptimeo = 0;
1148         }
1149         /*
1150          * First wait for any other process doing a flush to complete.
1151          */
1152         while (np->n_flag & NFLUSHINPROG) {
1153                 np->n_flag |= NFLUSHWANT;
1154                 error = tsleep((caddr_t)&np->n_flag, 0, "nfsvinval", slptimeo);
1155                 if (error && intrflg && nfs_sigintr(nmp, NULL, td))
1156                         return (EINTR);
1157         }
1158
1159         /*
1160          * Now, flush as required.
1161          */
1162         np->n_flag |= NFLUSHINPROG;
1163         error = vinvalbuf(vp, flags, slpflag, 0);
1164         while (error) {
1165                 if (intrflg && nfs_sigintr(nmp, NULL, td)) {
1166                         np->n_flag &= ~NFLUSHINPROG;
1167                         if (np->n_flag & NFLUSHWANT) {
1168                                 np->n_flag &= ~NFLUSHWANT;
1169                                 wakeup((caddr_t)&np->n_flag);
1170                         }
1171                         return (EINTR);
1172                 }
1173                 error = vinvalbuf(vp, flags, 0, slptimeo);
1174         }
1175         np->n_flag &= ~(NLMODIFIED | NFLUSHINPROG);
1176         if (np->n_flag & NFLUSHWANT) {
1177                 np->n_flag &= ~NFLUSHWANT;
1178                 wakeup((caddr_t)&np->n_flag);
1179         }
1180         return (0);
1181 }
1182
1183 /*
1184  * Return true (non-zero) if the txthread and rxthread are operational
1185  * and we do not already have too many not-yet-started BIO's built up.
1186  */
1187 int
1188 nfs_asyncok(struct nfsmount *nmp)
1189 {
1190         return (nmp->nm_bioqlen < nfs_maxasyncbio &&
1191                 nmp->nm_bioqlen < nmp->nm_maxasync_scaled / NFS_ASYSCALE &&
1192                 nmp->nm_rxstate <= NFSSVC_PENDING &&
1193                 nmp->nm_txstate <= NFSSVC_PENDING);
1194 }
1195
1196 /*
1197  * The read-ahead code calls this to queue a bio to the txthread.
1198  *
1199  * We don't touch the bio otherwise... that is, we do not even
1200  * construct or send the initial rpc.  The txthread will do it
1201  * for us.
1202  *
1203  * NOTE!  nm_bioqlen is not decremented until the request completes,
1204  *        so it does not reflect the number of bio's on bioq.
1205  */
1206 void
1207 nfs_asyncio(struct vnode *vp, struct bio *bio)
1208 {
1209         struct buf *bp = bio->bio_buf;
1210         struct nfsmount *nmp = VFSTONFS(vp->v_mount);
1211
1212         KKASSERT(vp->v_tag == VT_NFS);
1213         BUF_KERNPROC(bp);
1214         bio->bio_driver_info = vp;
1215         crit_enter();
1216         TAILQ_INSERT_TAIL(&nmp->nm_bioq, bio, bio_act);
1217         atomic_add_int(&nmp->nm_bioqlen, 1);
1218         crit_exit();
1219         nfssvc_iod_writer_wakeup(nmp);
1220 }
1221
1222 /*
1223  * nfs_dio()    - Execute a BIO operation synchronously.  The BIO will be
1224  *                completed and its error returned.  The caller is responsible
1225  *                for brelse()ing it.  ONLY USE FOR BIO_SYNC IOs!  Otherwise
1226  *                our error probe will be against an invalid pointer.
1227  *
1228  * nfs_startio()- Execute a BIO operation assynchronously.
1229  *
1230  * NOTE: nfs_asyncio() is used to initiate an asynchronous BIO operation,
1231  *       which basically just queues it to the txthread.  nfs_startio()
1232  *       actually initiates the I/O AFTER it has gotten to the txthread.
1233  *
1234  * NOTE: td might be NULL.
1235  */
1236 void
1237 nfs_startio(struct vnode *vp, struct bio *bio, struct thread *td)
1238 {
1239         struct buf *bp = bio->bio_buf;
1240         struct nfsnode *np;
1241         struct nfsmount *nmp;
1242
1243         KKASSERT(vp->v_tag == VT_NFS);
1244         np = VTONFS(vp);
1245         nmp = VFSTONFS(vp->v_mount);
1246
1247         /*
1248          * clear B_ERROR and B_INVAL state prior to initiating the I/O.  We
1249          * do this here so we do not have to do it in all the code that
1250          * calls us.
1251          */
1252         bp->b_flags &= ~(B_ERROR | B_INVAL);
1253
1254         KASSERT(bp->b_cmd != BUF_CMD_DONE,
1255                 ("nfs_doio: bp %p already marked done!", bp));
1256
1257         if (bp->b_cmd == BUF_CMD_READ) {
1258             switch (vp->v_type) {
1259             case VREG:
1260                 nfsstats.read_bios++;
1261                 nfs_readrpc_bio(vp, bio);
1262                 break;
1263             case VLNK:
1264 #if 0
1265                 bio->bio_offset = 0;
1266                 nfsstats.readlink_bios++;
1267                 nfs_readlinkrpc_bio(vp, bio);
1268 #else
1269                 nfs_doio(vp, bio, td);
1270 #endif
1271                 break;
1272             case VDIR:
1273                 /*
1274                  * NOTE: If nfs_readdirplusrpc_bio() is requested but
1275                  *       not supported, it will chain to
1276                  *       nfs_readdirrpc_bio().
1277                  */
1278 #if 0
1279                 nfsstats.readdir_bios++;
1280                 uiop->uio_offset = bio->bio_offset;
1281                 if (nmp->nm_flag & NFSMNT_RDIRPLUS)
1282                         nfs_readdirplusrpc_bio(vp, bio);
1283                 else
1284                         nfs_readdirrpc_bio(vp, bio);
1285 #else
1286                 nfs_doio(vp, bio, td);
1287 #endif
1288                 break;
1289             default:
1290                 kprintf("nfs_doio:  type %x unexpected\n",vp->v_type);
1291                 bp->b_flags |= B_ERROR;
1292                 bp->b_error = EINVAL;
1293                 biodone(bio);
1294                 break;
1295             }
1296         } else {
1297             /*
1298              * If we only need to commit, try to commit.  If this fails
1299              * it will chain through to the write.  Basically all the logic
1300              * in nfs_doio() is replicated.
1301              */
1302             KKASSERT(bp->b_cmd == BUF_CMD_WRITE);
1303             if (bp->b_flags & B_NEEDCOMMIT)
1304                 nfs_commitrpc_bio(vp, bio);
1305             else
1306                 nfs_writerpc_bio(vp, bio);
1307         }
1308 }
1309
1310 int
1311 nfs_doio(struct vnode *vp, struct bio *bio, struct thread *td)
1312 {
1313         struct buf *bp = bio->bio_buf;
1314         struct uio *uiop;
1315         struct nfsnode *np;
1316         struct nfsmount *nmp;
1317         int error = 0;
1318         int iomode, must_commit;
1319         struct uio uio;
1320         struct iovec io;
1321
1322         KKASSERT(vp->v_tag == VT_NFS);
1323         np = VTONFS(vp);
1324         nmp = VFSTONFS(vp->v_mount);
1325         uiop = &uio;
1326         uiop->uio_iov = &io;
1327         uiop->uio_iovcnt = 1;
1328         uiop->uio_segflg = UIO_SYSSPACE;
1329         uiop->uio_td = td;
1330
1331         /*
1332          * clear B_ERROR and B_INVAL state prior to initiating the I/O.  We
1333          * do this here so we do not have to do it in all the code that
1334          * calls us.
1335          */
1336         bp->b_flags &= ~(B_ERROR | B_INVAL);
1337
1338         KASSERT(bp->b_cmd != BUF_CMD_DONE,
1339                 ("nfs_doio: bp %p already marked done!", bp));
1340
1341         if (bp->b_cmd == BUF_CMD_READ) {
1342             io.iov_len = uiop->uio_resid = bp->b_bcount;
1343             io.iov_base = bp->b_data;
1344             uiop->uio_rw = UIO_READ;
1345
1346             switch (vp->v_type) {
1347             case VREG:
1348                 nfsstats.read_bios++;
1349                 uiop->uio_offset = bio->bio_offset;
1350                 error = nfs_readrpc_uio(vp, uiop);
1351                 if (error == 0) {
1352                     if (uiop->uio_resid) {
1353                         /*
1354                          * If we had a short read with no error, we must have
1355                          * hit a file hole.  We should zero-fill the remainder.
1356                          * This can also occur if the server hits the file EOF.
1357                          *
1358                          * Holes used to be able to occur due to pending
1359                          * writes, but that is not possible any longer.
1360                          */
1361                         int nread = bp->b_bcount - bp->b_resid;
1362                         int left  = bp->b_resid;
1363
1364                         if (left > 0)
1365                                 bzero((char *)bp->b_data + nread, left);
1366                         bp->b_resid = 0;
1367                     }
1368                 }
1369                 if (td && td->td_proc && (vp->v_flag & VTEXT) &&
1370                     np->n_mtime != np->n_vattr.va_mtime.tv_sec) {
1371                         uprintf("Process killed due to text file modification\n");
1372                         ksignal(td->td_proc, SIGKILL);
1373                 }
1374                 break;
1375             case VLNK:
1376                 uiop->uio_offset = 0;
1377                 nfsstats.readlink_bios++;
1378                 error = nfs_readlinkrpc_uio(vp, uiop);
1379                 break;
1380             case VDIR:
1381                 nfsstats.readdir_bios++;
1382                 uiop->uio_offset = bio->bio_offset;
1383                 if (nmp->nm_flag & NFSMNT_RDIRPLUS) {
1384                         error = nfs_readdirplusrpc_uio(vp, uiop);
1385                         if (error == NFSERR_NOTSUPP)
1386                                 nmp->nm_flag &= ~NFSMNT_RDIRPLUS;
1387                 }
1388                 if ((nmp->nm_flag & NFSMNT_RDIRPLUS) == 0)
1389                         error = nfs_readdirrpc_uio(vp, uiop);
1390                 /*
1391                  * end-of-directory sets B_INVAL but does not generate an
1392                  * error.
1393                  */
1394                 if (error == 0 && uiop->uio_resid == bp->b_bcount)
1395                         bp->b_flags |= B_INVAL;
1396                 break;
1397             default:
1398                 kprintf("nfs_doio:  type %x unexpected\n",vp->v_type);
1399                 break;
1400             };
1401             if (error) {
1402                 bp->b_flags |= B_ERROR;
1403                 bp->b_error = error;
1404             }
1405             bp->b_resid = uiop->uio_resid;
1406         } else {
1407             /*
1408              * If we only need to commit, try to commit
1409              */
1410             KKASSERT(bp->b_cmd == BUF_CMD_WRITE);
1411             if (bp->b_flags & B_NEEDCOMMIT) {
1412                     int retv;
1413                     off_t off;
1414
1415                     off = bio->bio_offset + bp->b_dirtyoff;
1416                     retv = nfs_commitrpc_uio(vp, off,
1417                                              bp->b_dirtyend - bp->b_dirtyoff,
1418                                              td);
1419                     if (retv == 0) {
1420                             bp->b_dirtyoff = bp->b_dirtyend = 0;
1421                             bp->b_flags &= ~(B_NEEDCOMMIT | B_CLUSTEROK);
1422                             bp->b_resid = 0;
1423                             biodone(bio);
1424                             return(0);
1425                     }
1426                     if (retv == NFSERR_STALEWRITEVERF) {
1427                             nfs_clearcommit(vp->v_mount);
1428                     }
1429             }
1430
1431             /*
1432              * Setup for actual write
1433              */
1434             if (bio->bio_offset + bp->b_dirtyend > np->n_size)
1435                 bp->b_dirtyend = np->n_size - bio->bio_offset;
1436
1437             if (bp->b_dirtyend > bp->b_dirtyoff) {
1438                 io.iov_len = uiop->uio_resid = bp->b_dirtyend
1439                     - bp->b_dirtyoff;
1440                 uiop->uio_offset = bio->bio_offset + bp->b_dirtyoff;
1441                 io.iov_base = (char *)bp->b_data + bp->b_dirtyoff;
1442                 uiop->uio_rw = UIO_WRITE;
1443                 nfsstats.write_bios++;
1444
1445                 if ((bp->b_flags & (B_NEEDCOMMIT | B_NOCACHE | B_CLUSTER)) == 0)
1446                     iomode = NFSV3WRITE_UNSTABLE;
1447                 else
1448                     iomode = NFSV3WRITE_FILESYNC;
1449
1450                 must_commit = 0;
1451                 error = nfs_writerpc_uio(vp, uiop, &iomode, &must_commit);
1452
1453                 /*
1454                  * When setting B_NEEDCOMMIT also set B_CLUSTEROK to try
1455                  * to cluster the buffers needing commit.  This will allow
1456                  * the system to submit a single commit rpc for the whole
1457                  * cluster.  We can do this even if the buffer is not 100%
1458                  * dirty (relative to the NFS blocksize), so we optimize the
1459                  * append-to-file-case.
1460                  *
1461                  * (when clearing B_NEEDCOMMIT, B_CLUSTEROK must also be
1462                  * cleared because write clustering only works for commit
1463                  * rpc's, not for the data portion of the write).
1464                  */
1465
1466                 if (!error && iomode == NFSV3WRITE_UNSTABLE) {
1467                     bp->b_flags |= B_NEEDCOMMIT;
1468                     if (bp->b_dirtyoff == 0
1469                         && bp->b_dirtyend == bp->b_bcount)
1470                         bp->b_flags |= B_CLUSTEROK;
1471                 } else {
1472                     bp->b_flags &= ~(B_NEEDCOMMIT | B_CLUSTEROK);
1473                 }
1474
1475                 /*
1476                  * For an interrupted write, the buffer is still valid
1477                  * and the write hasn't been pushed to the server yet,
1478                  * so we can't set B_ERROR and report the interruption
1479                  * by setting B_EINTR. For the async case, B_EINTR
1480                  * is not relevant, so the rpc attempt is essentially
1481                  * a noop.  For the case of a V3 write rpc not being
1482                  * committed to stable storage, the block is still
1483                  * dirty and requires either a commit rpc or another
1484                  * write rpc with iomode == NFSV3WRITE_FILESYNC before
1485                  * the block is reused. This is indicated by setting
1486                  * the B_DELWRI and B_NEEDCOMMIT flags.
1487                  *
1488                  * If the buffer is marked B_PAGING, it does not reside on
1489                  * the vp's paging queues so we cannot call bdirty().  The
1490                  * bp in this case is not an NFS cache block so we should
1491                  * be safe. XXX
1492                  */
1493                 if (error == EINTR
1494                     || (!error && (bp->b_flags & B_NEEDCOMMIT))) {
1495                         crit_enter();
1496                         bp->b_flags &= ~(B_INVAL|B_NOCACHE);
1497                         if ((bp->b_flags & B_PAGING) == 0)
1498                             bdirty(bp);
1499                         if (error)
1500                             bp->b_flags |= B_EINTR;
1501                         crit_exit();
1502                 } else {
1503                     if (error) {
1504                         bp->b_flags |= B_ERROR;
1505                         bp->b_error = np->n_error = error;
1506                         np->n_flag |= NWRITEERR;
1507                     }
1508                     bp->b_dirtyoff = bp->b_dirtyend = 0;
1509                 }
1510                 if (must_commit)
1511                     nfs_clearcommit(vp->v_mount);
1512                 bp->b_resid = uiop->uio_resid;
1513             } else {
1514                 bp->b_resid = 0;
1515             }
1516         }
1517
1518         /*
1519          * I/O was run synchronously, biodone() it and calculate the
1520          * error to return.
1521          */
1522         biodone(bio);
1523         KKASSERT(bp->b_cmd == BUF_CMD_DONE);
1524         if (bp->b_flags & B_EINTR)
1525                 return (EINTR);
1526         if (bp->b_flags & B_ERROR)
1527                 return (bp->b_error ? bp->b_error : EIO);
1528         return (0);
1529 }
1530
1531 /*
1532  * Used to aid in handling ftruncate() operations on the NFS client side.
1533  * Truncation creates a number of special problems for NFS.  We have to
1534  * throw away VM pages and buffer cache buffers that are beyond EOF, and
1535  * we have to properly handle VM pages or (potentially dirty) buffers
1536  * that straddle the truncation point.
1537  */
1538
1539 int
1540 nfs_meta_setsize(struct vnode *vp, struct thread *td, u_quad_t nsize)
1541 {
1542         struct nfsnode *np = VTONFS(vp);
1543         u_quad_t tsize = np->n_size;
1544         int biosize = vp->v_mount->mnt_stat.f_iosize;
1545         int error = 0;
1546
1547         np->n_size = nsize;
1548
1549         if (np->n_size < tsize) {
1550                 struct buf *bp;
1551                 daddr_t lbn;
1552                 off_t loffset;
1553                 int bufsize;
1554
1555                 /*
1556                  * vtruncbuf() doesn't get the buffer overlapping the
1557                  * truncation point.  We may have a B_DELWRI and/or B_CACHE
1558                  * buffer that now needs to be truncated.
1559                  */
1560                 error = vtruncbuf(vp, nsize, biosize);
1561                 lbn = nsize / biosize;
1562                 bufsize = nsize & (biosize - 1);
1563                 loffset = nsize - bufsize;
1564                 bp = nfs_getcacheblk(vp, loffset, bufsize, td);
1565                 if (bp->b_dirtyoff > bp->b_bcount)
1566                         bp->b_dirtyoff = bp->b_bcount;
1567                 if (bp->b_dirtyend > bp->b_bcount)
1568                         bp->b_dirtyend = bp->b_bcount;
1569                 bp->b_flags |= B_RELBUF;  /* don't leave garbage around */
1570                 brelse(bp);
1571         } else {
1572                 vnode_pager_setsize(vp, nsize);
1573         }
1574         return(error);
1575 }
1576
1577 /*
1578  * Synchronous completion for nfs_doio.  Call bpdone() with elseit=FALSE.
1579  * Caller is responsible for brelse()'ing the bp.
1580  */
1581 static void
1582 nfsiodone_sync(struct bio *bio)
1583 {
1584         bio->bio_flags = 0;
1585         bpdone(bio->bio_buf, 0);
1586 }
1587
1588 /*
1589  * nfs read rpc - BIO version
1590  */
1591 void
1592 nfs_readrpc_bio(struct vnode *vp, struct bio *bio)
1593 {
1594         struct buf *bp = bio->bio_buf;
1595         u_int32_t *tl;
1596         struct nfsmount *nmp;
1597         int error = 0, len, tsiz;
1598         struct nfsm_info *info;
1599
1600         info = kmalloc(sizeof(*info), M_NFSREQ, M_WAITOK);
1601         info->mrep = NULL;
1602         info->v3 = NFS_ISV3(vp);
1603
1604         nmp = VFSTONFS(vp->v_mount);
1605         tsiz = bp->b_bcount;
1606         KKASSERT(tsiz <= nmp->nm_rsize);
1607         if (bio->bio_offset + tsiz > nmp->nm_maxfilesize) {
1608                 error = EFBIG;
1609                 goto nfsmout;
1610         }
1611         nfsstats.rpccnt[NFSPROC_READ]++;
1612         len = tsiz;
1613         nfsm_reqhead(info, vp, NFSPROC_READ,
1614                      NFSX_FH(info->v3) + NFSX_UNSIGNED * 3);
1615         ERROROUT(nfsm_fhtom(info, vp));
1616         tl = nfsm_build(info, NFSX_UNSIGNED * 3);
1617         if (info->v3) {
1618                 txdr_hyper(bio->bio_offset, tl);
1619                 *(tl + 2) = txdr_unsigned(len);
1620         } else {
1621                 *tl++ = txdr_unsigned(bio->bio_offset);
1622                 *tl++ = txdr_unsigned(len);
1623                 *tl = 0;
1624         }
1625         info->bio = bio;
1626         info->done = nfs_readrpc_bio_done;
1627         nfsm_request_bio(info, vp, NFSPROC_READ, NULL,
1628                          nfs_vpcred(vp, ND_READ));
1629         return;
1630 nfsmout:
1631         kfree(info, M_NFSREQ);
1632         bp->b_error = error;
1633         bp->b_flags |= B_ERROR;
1634         biodone(bio);
1635 }
1636
1637 static void
1638 nfs_readrpc_bio_done(nfsm_info_t info)
1639 {
1640         struct nfsmount *nmp = VFSTONFS(info->vp->v_mount);
1641         struct bio *bio = info->bio;
1642         struct buf *bp = bio->bio_buf;
1643         u_int32_t *tl;
1644         int attrflag;
1645         int retlen;
1646         int eof;
1647         int error = 0;
1648
1649         KKASSERT(info->state == NFSM_STATE_DONE);
1650
1651         if (info->v3) {
1652                 ERROROUT(nfsm_postop_attr(info, info->vp, &attrflag,
1653                                          NFS_LATTR_NOSHRINK));
1654                 NULLOUT(tl = nfsm_dissect(info, 2 * NFSX_UNSIGNED));
1655                 eof = fxdr_unsigned(int, *(tl + 1));
1656         } else {
1657                 ERROROUT(nfsm_loadattr(info, info->vp, NULL));
1658                 eof = 0;
1659         }
1660         NEGATIVEOUT(retlen = nfsm_strsiz(info, nmp->nm_rsize));
1661         ERROROUT(nfsm_mtobio(info, bio, retlen));
1662         m_freem(info->mrep);
1663         info->mrep = NULL;
1664
1665         /*
1666          * No error occured, fill the hole if any
1667          */
1668         if (retlen < bp->b_bcount) {
1669                 bzero(bp->b_data + retlen, bp->b_bcount - retlen);
1670         }
1671         bp->b_resid = bp->b_bcount - retlen;
1672 #if 0
1673         /* retlen */
1674         tsiz -= retlen;
1675         if (info.v3) {
1676                 if (eof || retlen == 0) {
1677                         tsiz = 0;
1678                 }
1679         } else if (retlen < len) {
1680                 tsiz = 0;
1681         }
1682 #endif
1683 nfsmout:
1684         kfree(info, M_NFSREQ);
1685         if (error) {
1686                 bp->b_error = error;
1687                 bp->b_flags |= B_ERROR;
1688         }
1689         biodone(bio);
1690 }
1691
1692 /*
1693  * nfs write call - BIO version
1694  */
1695 void
1696 nfs_writerpc_bio(struct vnode *vp, struct bio *bio)
1697 {
1698         struct nfsmount *nmp = VFSTONFS(vp->v_mount);
1699         struct nfsnode *np = VTONFS(vp);
1700         struct buf *bp = bio->bio_buf;
1701         u_int32_t *tl;
1702         int len;
1703         int iomode;
1704         int error = 0;
1705         struct nfsm_info *info;
1706         off_t offset;
1707
1708         /*
1709          * Setup for actual write.  Just clean up the bio if there
1710          * is nothing to do.
1711          */
1712         if (bio->bio_offset + bp->b_dirtyend > np->n_size)
1713                 bp->b_dirtyend = np->n_size - bio->bio_offset;
1714
1715         if (bp->b_dirtyend <= bp->b_dirtyoff) {
1716                 bp->b_resid = 0;
1717                 biodone(bio);
1718                 return;
1719         }
1720         len = bp->b_dirtyend - bp->b_dirtyoff;
1721         offset = bio->bio_offset + bp->b_dirtyoff;
1722         if (offset + len > nmp->nm_maxfilesize) {
1723                 bp->b_flags |= B_ERROR;
1724                 bp->b_error = EFBIG;
1725                 biodone(bio);
1726                 return;
1727         }
1728         bp->b_resid = len;
1729         nfsstats.write_bios++;
1730
1731         info = kmalloc(sizeof(*info), M_NFSREQ, M_WAITOK);
1732         info->mrep = NULL;
1733         info->v3 = NFS_ISV3(vp);
1734         info->info_writerpc.must_commit = 0;
1735         if ((bp->b_flags & (B_NEEDCOMMIT | B_NOCACHE | B_CLUSTER)) == 0)
1736                 iomode = NFSV3WRITE_UNSTABLE;
1737         else
1738                 iomode = NFSV3WRITE_FILESYNC;
1739
1740         KKASSERT(len <= nmp->nm_wsize);
1741
1742         nfsstats.rpccnt[NFSPROC_WRITE]++;
1743         nfsm_reqhead(info, vp, NFSPROC_WRITE,
1744                      NFSX_FH(info->v3) + 5 * NFSX_UNSIGNED + nfsm_rndup(len));
1745         ERROROUT(nfsm_fhtom(info, vp));
1746         if (info->v3) {
1747                 tl = nfsm_build(info, 5 * NFSX_UNSIGNED);
1748                 txdr_hyper(offset, tl);
1749                 tl += 2;
1750                 *tl++ = txdr_unsigned(len);
1751                 *tl++ = txdr_unsigned(iomode);
1752                 *tl = txdr_unsigned(len);
1753         } else {
1754                 u_int32_t x;
1755
1756                 tl = nfsm_build(info, 4 * NFSX_UNSIGNED);
1757                 /* Set both "begin" and "current" to non-garbage. */
1758                 x = txdr_unsigned((u_int32_t)offset);
1759                 *tl++ = x;      /* "begin offset" */
1760                 *tl++ = x;      /* "current offset" */
1761                 x = txdr_unsigned(len);
1762                 *tl++ = x;      /* total to this offset */
1763                 *tl = x;        /* size of this write */
1764         }
1765         ERROROUT(nfsm_biotom(info, bio, bp->b_dirtyoff, len));
1766         info->bio = bio;
1767         info->done = nfs_writerpc_bio_done;
1768         nfsm_request_bio(info, vp, NFSPROC_WRITE, NULL,
1769                          nfs_vpcred(vp, ND_WRITE));
1770         return;
1771 nfsmout:
1772         kfree(info, M_NFSREQ);
1773         bp->b_error = error;
1774         bp->b_flags |= B_ERROR;
1775         biodone(bio);
1776 }
1777
1778 static void
1779 nfs_writerpc_bio_done(nfsm_info_t info)
1780 {
1781         struct nfsmount *nmp = VFSTONFS(info->vp->v_mount);
1782         struct nfsnode *np = VTONFS(info->vp);
1783         struct bio *bio = info->bio;
1784         struct buf *bp = bio->bio_buf;
1785         int wccflag = NFSV3_WCCRATTR;
1786         int iomode = NFSV3WRITE_FILESYNC;
1787         int commit;
1788         int rlen;
1789         int error;
1790         int len = bp->b_resid;  /* b_resid was set to shortened length */
1791         u_int32_t *tl;
1792
1793         if (info->v3) {
1794                 /*
1795                  * The write RPC returns a before and after mtime.  The
1796                  * nfsm_wcc_data() macro checks the before n_mtime
1797                  * against the before time and stores the after time
1798                  * in the nfsnode's cached vattr and n_mtime field.
1799                  * The NRMODIFIED bit will be set if the before
1800                  * time did not match the original mtime.
1801                  */
1802                 wccflag = NFSV3_WCCCHK;
1803                 ERROROUT(nfsm_wcc_data(info, info->vp, &wccflag));
1804                 if (error == 0) {
1805                         NULLOUT(tl = nfsm_dissect(info, 2 * NFSX_UNSIGNED + NFSX_V3WRITEVERF));
1806                         rlen = fxdr_unsigned(int, *tl++);
1807                         if (rlen == 0) {
1808                                 error = NFSERR_IO;
1809                                 m_freem(info->mrep);
1810                                 info->mrep = NULL;
1811                                 goto nfsmout;
1812                         } else if (rlen < len) {
1813 #if 0
1814                                 /*
1815                                  * XXX what do we do here?
1816                                  */
1817                                 backup = len - rlen;
1818                                 uiop->uio_iov->iov_base = (char *)uiop->uio_iov->iov_base - backup;
1819                                 uiop->uio_iov->iov_len += backup;
1820                                 uiop->uio_offset -= backup;
1821                                 uiop->uio_resid += backup;
1822                                 len = rlen;
1823 #endif
1824                         }
1825                         commit = fxdr_unsigned(int, *tl++);
1826
1827                         /*
1828                          * Return the lowest committment level
1829                          * obtained by any of the RPCs.
1830                          */
1831                         if (iomode == NFSV3WRITE_FILESYNC)
1832                                 iomode = commit;
1833                         else if (iomode == NFSV3WRITE_DATASYNC &&
1834                                 commit == NFSV3WRITE_UNSTABLE)
1835                                 iomode = commit;
1836                         if ((nmp->nm_state & NFSSTA_HASWRITEVERF) == 0){
1837                             bcopy(tl, (caddr_t)nmp->nm_verf, NFSX_V3WRITEVERF);
1838                             nmp->nm_state |= NFSSTA_HASWRITEVERF;
1839                         } else if (bcmp(tl, nmp->nm_verf, NFSX_V3WRITEVERF)) {
1840                             info->info_writerpc.must_commit = 1;
1841                             bcopy(tl, (caddr_t)nmp->nm_verf, NFSX_V3WRITEVERF);
1842                         }
1843                 }
1844         } else {
1845                 ERROROUT(nfsm_loadattr(info, info->vp, NULL));
1846         }
1847         m_freem(info->mrep);
1848         info->mrep = NULL;
1849         len = 0;
1850 nfsmout:
1851         if (info->vp->v_mount->mnt_flag & MNT_ASYNC)
1852                 iomode = NFSV3WRITE_FILESYNC;
1853         bp->b_resid = len;
1854
1855         /*
1856          * End of RPC.  Now clean up the bp.
1857          *
1858          * When setting B_NEEDCOMMIT also set B_CLUSTEROK to try
1859          * to cluster the buffers needing commit.  This will allow
1860          * the system to submit a single commit rpc for the whole
1861          * cluster.  We can do this even if the buffer is not 100%
1862          * dirty (relative to the NFS blocksize), so we optimize the
1863          * append-to-file-case.
1864          *
1865          * (when clearing B_NEEDCOMMIT, B_CLUSTEROK must also be
1866          * cleared because write clustering only works for commit
1867          * rpc's, not for the data portion of the write).
1868          */
1869         if (!error && iomode == NFSV3WRITE_UNSTABLE) {
1870                 bp->b_flags |= B_NEEDCOMMIT;
1871                 if (bp->b_dirtyoff == 0 && bp->b_dirtyend == bp->b_bcount)
1872                         bp->b_flags |= B_CLUSTEROK;
1873         } else {
1874                 bp->b_flags &= ~(B_NEEDCOMMIT | B_CLUSTEROK);
1875         }
1876
1877         /*
1878          * For an interrupted write, the buffer is still valid
1879          * and the write hasn't been pushed to the server yet,
1880          * so we can't set B_ERROR and report the interruption
1881          * by setting B_EINTR. For the async case, B_EINTR
1882          * is not relevant, so the rpc attempt is essentially
1883          * a noop.  For the case of a V3 write rpc not being
1884          * committed to stable storage, the block is still
1885          * dirty and requires either a commit rpc or another
1886          * write rpc with iomode == NFSV3WRITE_FILESYNC before
1887          * the block is reused. This is indicated by setting
1888          * the B_DELWRI and B_NEEDCOMMIT flags.
1889          *
1890          * If the buffer is marked B_PAGING, it does not reside on
1891          * the vp's paging queues so we cannot call bdirty().  The
1892          * bp in this case is not an NFS cache block so we should
1893          * be safe. XXX
1894          */
1895         if (error == EINTR || (!error && (bp->b_flags & B_NEEDCOMMIT))) {
1896                 crit_enter();
1897                 bp->b_flags &= ~(B_INVAL|B_NOCACHE);
1898                 if ((bp->b_flags & B_PAGING) == 0)
1899                         bdirty(bp);
1900                 if (error)
1901                         bp->b_flags |= B_EINTR;
1902                 crit_exit();
1903         } else {
1904                 if (error) {
1905                         bp->b_flags |= B_ERROR;
1906                         bp->b_error = np->n_error = error;
1907                         np->n_flag |= NWRITEERR;
1908                 }
1909                 bp->b_dirtyoff = bp->b_dirtyend = 0;
1910         }
1911         if (info->info_writerpc.must_commit)
1912                 nfs_clearcommit(info->vp->v_mount);
1913         kfree(info, M_NFSREQ);
1914         if (error) {
1915                 bp->b_flags |= B_ERROR;
1916                 bp->b_error = error;
1917         }
1918         biodone(bio);
1919 }
1920
1921 /*
1922  * Nfs Version 3 commit rpc - BIO version
1923  *
1924  * This function issues the commit rpc and will chain to a write
1925  * rpc if necessary.
1926  */
1927 void
1928 nfs_commitrpc_bio(struct vnode *vp, struct bio *bio)
1929 {
1930         struct nfsmount *nmp = VFSTONFS(vp->v_mount);
1931         struct buf *bp = bio->bio_buf;
1932         struct nfsm_info *info;
1933         int error = 0;
1934         u_int32_t *tl;
1935
1936         if ((nmp->nm_state & NFSSTA_HASWRITEVERF) == 0) {
1937                 bp->b_dirtyoff = bp->b_dirtyend = 0;
1938                 bp->b_flags &= ~(B_NEEDCOMMIT | B_CLUSTEROK);
1939                 bp->b_resid = 0;
1940                 biodone(bio);
1941                 return;
1942         }
1943
1944         info = kmalloc(sizeof(*info), M_NFSREQ, M_WAITOK);
1945         info->mrep = NULL;
1946         info->v3 = 1;
1947
1948         nfsstats.rpccnt[NFSPROC_COMMIT]++;
1949         nfsm_reqhead(info, vp, NFSPROC_COMMIT, NFSX_FH(1));
1950         ERROROUT(nfsm_fhtom(info, vp));
1951         tl = nfsm_build(info, 3 * NFSX_UNSIGNED);
1952         txdr_hyper(bio->bio_offset + bp->b_dirtyoff, tl);
1953         tl += 2;
1954         *tl = txdr_unsigned(bp->b_dirtyend - bp->b_dirtyoff);
1955         info->bio = bio;
1956         info->done = nfs_commitrpc_bio_done;
1957         nfsm_request_bio(info, vp, NFSPROC_COMMIT, NULL,
1958                          nfs_vpcred(vp, ND_WRITE));
1959         return;
1960 nfsmout:
1961         /*
1962          * Chain to write RPC on (early) error
1963          */
1964         kfree(info, M_NFSREQ);
1965         nfs_writerpc_bio(vp, bio);
1966 }
1967
1968 static void
1969 nfs_commitrpc_bio_done(nfsm_info_t info)
1970 {
1971         struct nfsmount *nmp = VFSTONFS(info->vp->v_mount);
1972         struct bio *bio = info->bio;
1973         struct buf *bp = bio->bio_buf;
1974         u_int32_t *tl;
1975         int wccflag = NFSV3_WCCRATTR;
1976         int error = 0;
1977
1978         ERROROUT(nfsm_wcc_data(info, info->vp, &wccflag));
1979         if (error == 0) {
1980                 NULLOUT(tl = nfsm_dissect(info, NFSX_V3WRITEVERF));
1981                 if (bcmp(nmp->nm_verf, tl, NFSX_V3WRITEVERF)) {
1982                         bcopy(tl, nmp->nm_verf, NFSX_V3WRITEVERF);
1983                         error = NFSERR_STALEWRITEVERF;
1984                 }
1985         }
1986         m_freem(info->mrep);
1987         info->mrep = NULL;
1988
1989         /*
1990          * On completion we must chain to a write bio if an
1991          * error occurred.
1992          */
1993 nfsmout:
1994         kfree(info, M_NFSREQ);
1995         if (error == 0) {
1996                 bp->b_dirtyoff = bp->b_dirtyend = 0;
1997                 bp->b_flags &= ~(B_NEEDCOMMIT | B_CLUSTEROK);
1998                 bp->b_resid = 0;
1999                 biodone(bio);
2000         } else {
2001                 kprintf("commitrpc_bioC %lld -> CHAIN WRITE\n", bio->bio_offset);
2002                 nfs_writerpc_bio(info->vp, bio);
2003         }
2004 }
2005