Cleanup mmap(2) writes
[zfs.git] / module / zfs / zfs_vnops.c
1 /*
2  * CDDL HEADER START
3  *
4  * The contents of this file are subject to the terms of the
5  * Common Development and Distribution License (the "License").
6  * You may not use this file except in compliance with the License.
7  *
8  * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
9  * or http://www.opensolaris.org/os/licensing.
10  * See the License for the specific language governing permissions
11  * and limitations under the License.
12  *
13  * When distributing Covered Code, include this CDDL HEADER in each
14  * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
15  * If applicable, add the following below this CDDL HEADER, with the
16  * fields enclosed by brackets "[]" replaced with your own identifying
17  * information: Portions Copyright [yyyy] [name of copyright owner]
18  *
19  * CDDL HEADER END
20  */
21 /*
22  * Copyright (c) 2005, 2010, Oracle and/or its affiliates. All rights reserved.
23  */
24
25 /* Portions Copyright 2007 Jeremy Teo */
26 /* Portions Copyright 2010 Robert Milkowski */
27
28
29 #include <sys/types.h>
30 #include <sys/param.h>
31 #include <sys/time.h>
32 #include <sys/systm.h>
33 #include <sys/sysmacros.h>
34 #include <sys/resource.h>
35 #include <sys/vfs.h>
36 #include <sys/vfs_opreg.h>
37 #include <sys/file.h>
38 #include <sys/stat.h>
39 #include <sys/kmem.h>
40 #include <sys/taskq.h>
41 #include <sys/uio.h>
42 #include <sys/vmsystm.h>
43 #include <sys/atomic.h>
44 #include <vm/pvn.h>
45 #include <sys/pathname.h>
46 #include <sys/cmn_err.h>
47 #include <sys/errno.h>
48 #include <sys/unistd.h>
49 #include <sys/zfs_dir.h>
50 #include <sys/zfs_acl.h>
51 #include <sys/zfs_ioctl.h>
52 #include <sys/fs/zfs.h>
53 #include <sys/dmu.h>
54 #include <sys/dmu_objset.h>
55 #include <sys/spa.h>
56 #include <sys/txg.h>
57 #include <sys/dbuf.h>
58 #include <sys/zap.h>
59 #include <sys/sa.h>
60 #include <sys/dirent.h>
61 #include <sys/policy.h>
62 #include <sys/sunddi.h>
63 #include <sys/sid.h>
64 #include <sys/mode.h>
65 #include "fs/fs_subr.h"
66 #include <sys/zfs_fuid.h>
67 #include <sys/zfs_sa.h>
68 #include <sys/zfs_vnops.h>
69 #include <sys/dnlc.h>
70 #include <sys/zfs_rlock.h>
71 #include <sys/extdirent.h>
72 #include <sys/kidmap.h>
73 #include <sys/cred.h>
74 #include <sys/attr.h>
75 #include <sys/zpl.h>
76
77 /*
78  * Programming rules.
79  *
80  * Each vnode op performs some logical unit of work.  To do this, the ZPL must
81  * properly lock its in-core state, create a DMU transaction, do the work,
82  * record this work in the intent log (ZIL), commit the DMU transaction,
83  * and wait for the intent log to commit if it is a synchronous operation.
84  * Moreover, the vnode ops must work in both normal and log replay context.
85  * The ordering of events is important to avoid deadlocks and references
86  * to freed memory.  The example below illustrates the following Big Rules:
87  *
88  *  (1) A check must be made in each zfs thread for a mounted file system.
89  *      This is done avoiding races using ZFS_ENTER(zsb).
90  *      A ZFS_EXIT(zsb) is needed before all returns.  Any znodes
91  *      must be checked with ZFS_VERIFY_ZP(zp).  Both of these macros
92  *      can return EIO from the calling function.
93  *
94  *  (2) iput() should always be the last thing except for zil_commit()
95  *      (if necessary) and ZFS_EXIT(). This is for 3 reasons:
96  *      First, if it's the last reference, the vnode/znode
97  *      can be freed, so the zp may point to freed memory.  Second, the last
98  *      reference will call zfs_zinactive(), which may induce a lot of work --
99  *      pushing cached pages (which acquires range locks) and syncing out
100  *      cached atime changes.  Third, zfs_zinactive() may require a new tx,
101  *      which could deadlock the system if you were already holding one.
102  *      If you must call iput() within a tx then use iput_ASYNC().
103  *
104  *  (3) All range locks must be grabbed before calling dmu_tx_assign(),
105  *      as they can span dmu_tx_assign() calls.
106  *
107  *  (4) Always pass TXG_NOWAIT as the second argument to dmu_tx_assign().
108  *      This is critical because we don't want to block while holding locks.
109  *      Note, in particular, that if a lock is sometimes acquired before
110  *      the tx assigns, and sometimes after (e.g. z_lock), then failing to
111  *      use a non-blocking assign can deadlock the system.  The scenario:
112  *
113  *      Thread A has grabbed a lock before calling dmu_tx_assign().
114  *      Thread B is in an already-assigned tx, and blocks for this lock.
115  *      Thread A calls dmu_tx_assign(TXG_WAIT) and blocks in txg_wait_open()
116  *      forever, because the previous txg can't quiesce until B's tx commits.
117  *
118  *      If dmu_tx_assign() returns ERESTART and zsb->z_assign is TXG_NOWAIT,
119  *      then drop all locks, call dmu_tx_wait(), and try again.
120  *
121  *  (5) If the operation succeeded, generate the intent log entry for it
122  *      before dropping locks.  This ensures that the ordering of events
123  *      in the intent log matches the order in which they actually occurred.
124  *      During ZIL replay the zfs_log_* functions will update the sequence
125  *      number to indicate the zil transaction has replayed.
126  *
127  *  (6) At the end of each vnode op, the DMU tx must always commit,
128  *      regardless of whether there were any errors.
129  *
130  *  (7) After dropping all locks, invoke zil_commit(zilog, foid)
131  *      to ensure that synchronous semantics are provided when necessary.
132  *
133  * In general, this is how things should be ordered in each vnode op:
134  *
135  *      ZFS_ENTER(zsb);         // exit if unmounted
136  * top:
137  *      zfs_dirent_lock(&dl, ...)       // lock directory entry (may igrab())
138  *      rw_enter(...);                  // grab any other locks you need
139  *      tx = dmu_tx_create(...);        // get DMU tx
140  *      dmu_tx_hold_*();                // hold each object you might modify
141  *      error = dmu_tx_assign(tx, TXG_NOWAIT);  // try to assign
142  *      if (error) {
143  *              rw_exit(...);           // drop locks
144  *              zfs_dirent_unlock(dl);  // unlock directory entry
145  *              iput(...);              // release held vnodes
146  *              if (error == ERESTART) {
147  *                      dmu_tx_wait(tx);
148  *                      dmu_tx_abort(tx);
149  *                      goto top;
150  *              }
151  *              dmu_tx_abort(tx);       // abort DMU tx
152  *              ZFS_EXIT(zsb);  // finished in zfs
153  *              return (error);         // really out of space
154  *      }
155  *      error = do_real_work();         // do whatever this VOP does
156  *      if (error == 0)
157  *              zfs_log_*(...);         // on success, make ZIL entry
158  *      dmu_tx_commit(tx);              // commit DMU tx -- error or not
159  *      rw_exit(...);                   // drop locks
160  *      zfs_dirent_unlock(dl);          // unlock directory entry
161  *      iput(...);                      // release held vnodes
162  *      zil_commit(zilog, foid);        // synchronous when necessary
163  *      ZFS_EXIT(zsb);          // finished in zfs
164  *      return (error);                 // done, report error
165  */
166
167 /*
168  * Virus scanning is unsupported.  It would be possible to add a hook
169  * here to performance the required virus scan.  This could be done
170  * entirely in the kernel or potentially as an update to invoke a
171  * scanning utility.
172  */
173 static int
174 zfs_vscan(struct inode *ip, cred_t *cr, int async)
175 {
176         return (0);
177 }
178
179 /* ARGSUSED */
180 int
181 zfs_open(struct inode *ip, int mode, int flag, cred_t *cr)
182 {
183         znode_t *zp = ITOZ(ip);
184         zfs_sb_t *zsb = ITOZSB(ip);
185
186         ZFS_ENTER(zsb);
187         ZFS_VERIFY_ZP(zp);
188
189         /* Honor ZFS_APPENDONLY file attribute */
190         if ((mode & FMODE_WRITE) && (zp->z_pflags & ZFS_APPENDONLY) &&
191             ((flag & O_APPEND) == 0)) {
192                 ZFS_EXIT(zsb);
193                 return (EPERM);
194         }
195
196         /* Virus scan eligible files on open */
197         if (!zfs_has_ctldir(zp) && zsb->z_vscan && S_ISREG(ip->i_mode) &&
198             !(zp->z_pflags & ZFS_AV_QUARANTINED) && zp->z_size > 0) {
199                 if (zfs_vscan(ip, cr, 0) != 0) {
200                         ZFS_EXIT(zsb);
201                         return (EACCES);
202                 }
203         }
204
205         /* Keep a count of the synchronous opens in the znode */
206         if (flag & O_SYNC)
207                 atomic_inc_32(&zp->z_sync_cnt);
208
209         ZFS_EXIT(zsb);
210         return (0);
211 }
212 EXPORT_SYMBOL(zfs_open);
213
214 /* ARGSUSED */
215 int
216 zfs_close(struct inode *ip, int flag, cred_t *cr)
217 {
218         znode_t *zp = ITOZ(ip);
219         zfs_sb_t *zsb = ITOZSB(ip);
220
221         ZFS_ENTER(zsb);
222         ZFS_VERIFY_ZP(zp);
223
224         /*
225          * Zero the synchronous opens in the znode.  Under Linux the
226          * zfs_close() hook is not symmetric with zfs_open(), it is
227          * only called once when the last reference is dropped.
228          */
229         if (flag & O_SYNC)
230                 zp->z_sync_cnt = 0;
231
232         if (!zfs_has_ctldir(zp) && zsb->z_vscan && S_ISREG(ip->i_mode) &&
233             !(zp->z_pflags & ZFS_AV_QUARANTINED) && zp->z_size > 0)
234                 VERIFY(zfs_vscan(ip, cr, 1) == 0);
235
236         ZFS_EXIT(zsb);
237         return (0);
238 }
239 EXPORT_SYMBOL(zfs_close);
240
241 #if defined(_KERNEL)
242 /*
243  * When a file is memory mapped, we must keep the IO data synchronized
244  * between the DMU cache and the memory mapped pages.  What this means:
245  *
246  * On Write:    If we find a memory mapped page, we write to *both*
247  *              the page and the dmu buffer.
248  */
249 static void
250 update_pages(struct inode *ip, int64_t start, int len,
251     objset_t *os, uint64_t oid)
252 {
253         struct address_space *mp = ip->i_mapping;
254         struct page *pp;
255         uint64_t nbytes;
256         int64_t off;
257         void *pb;
258
259         off = start & (PAGE_CACHE_SIZE-1);
260         for (start &= PAGE_CACHE_MASK; len > 0; start += PAGE_CACHE_SIZE) {
261                 nbytes = MIN(PAGE_CACHE_SIZE - off, len);
262
263                 pp = find_lock_page(mp, start >> PAGE_CACHE_SHIFT);
264                 if (pp) {
265                         if (mapping_writably_mapped(mp))
266                                 flush_dcache_page(pp);
267
268                         pb = kmap(pp);
269                         (void) dmu_read(os, oid, start+off, nbytes, pb+off,
270                             DMU_READ_PREFETCH);
271                         kunmap(pp);
272
273                         if (mapping_writably_mapped(mp))
274                                 flush_dcache_page(pp);
275
276                         mark_page_accessed(pp);
277                         SetPageUptodate(pp);
278                         ClearPageError(pp);
279                         unlock_page(pp);
280                         page_cache_release(pp);
281                 }
282
283                 len -= nbytes;
284                 off = 0;
285         }
286 }
287
288 /*
289  * When a file is memory mapped, we must keep the IO data synchronized
290  * between the DMU cache and the memory mapped pages.  What this means:
291  *
292  * On Read:     We "read" preferentially from memory mapped pages,
293  *              else we default from the dmu buffer.
294  *
295  * NOTE: We will always "break up" the IO into PAGESIZE uiomoves when
296  *      the file is memory mapped.
297  */
298 static int
299 mappedread(struct inode *ip, int nbytes, uio_t *uio)
300 {
301         struct address_space *mp = ip->i_mapping;
302         struct page *pp;
303         znode_t *zp = ITOZ(ip);
304         objset_t *os = ITOZSB(ip)->z_os;
305         int64_t start, off;
306         uint64_t bytes;
307         int len = nbytes;
308         int error = 0;
309         void *pb;
310
311         start = uio->uio_loffset;
312         off = start & (PAGE_CACHE_SIZE-1);
313         for (start &= PAGE_CACHE_MASK; len > 0; start += PAGE_CACHE_SIZE) {
314                 bytes = MIN(PAGE_CACHE_SIZE - off, len);
315
316                 pp = find_lock_page(mp, start >> PAGE_CACHE_SHIFT);
317                 if (pp) {
318                         ASSERT(PageUptodate(pp));
319
320                         pb = kmap(pp);
321                         error = uiomove(pb + off, bytes, UIO_READ, uio);
322                         kunmap(pp);
323
324                         if (mapping_writably_mapped(mp))
325                                 flush_dcache_page(pp);
326
327                         mark_page_accessed(pp);
328                         unlock_page(pp);
329                         page_cache_release(pp);
330                 } else {
331                         error = dmu_read_uio(os, zp->z_id, uio, bytes);
332                 }
333
334                 len -= bytes;
335                 off = 0;
336                 if (error)
337                         break;
338         }
339         return (error);
340 }
341 #endif /* _KERNEL */
342
343 unsigned long zfs_read_chunk_size = 1024 * 1024; /* Tunable */
344
345 /*
346  * Read bytes from specified file into supplied buffer.
347  *
348  *      IN:     ip      - inode of file to be read from.
349  *              uio     - structure supplying read location, range info,
350  *                        and return buffer.
351  *              ioflag  - FSYNC flags; used to provide FRSYNC semantics.
352  *                        O_DIRECT flag; used to bypass page cache.
353  *              cr      - credentials of caller.
354  *
355  *      OUT:    uio     - updated offset and range, buffer filled.
356  *
357  *      RETURN: 0 if success
358  *              error code if failure
359  *
360  * Side Effects:
361  *      inode - atime updated if byte count > 0
362  */
363 /* ARGSUSED */
364 int
365 zfs_read(struct inode *ip, uio_t *uio, int ioflag, cred_t *cr)
366 {
367         znode_t         *zp = ITOZ(ip);
368         zfs_sb_t        *zsb = ITOZSB(ip);
369         objset_t        *os;
370         ssize_t         n, nbytes;
371         int             error = 0;
372         rl_t            *rl;
373 #ifdef HAVE_UIO_ZEROCOPY
374         xuio_t          *xuio = NULL;
375 #endif /* HAVE_UIO_ZEROCOPY */
376
377         ZFS_ENTER(zsb);
378         ZFS_VERIFY_ZP(zp);
379         os = zsb->z_os;
380
381         if (zp->z_pflags & ZFS_AV_QUARANTINED) {
382                 ZFS_EXIT(zsb);
383                 return (EACCES);
384         }
385
386         /*
387          * Validate file offset
388          */
389         if (uio->uio_loffset < (offset_t)0) {
390                 ZFS_EXIT(zsb);
391                 return (EINVAL);
392         }
393
394         /*
395          * Fasttrack empty reads
396          */
397         if (uio->uio_resid == 0) {
398                 ZFS_EXIT(zsb);
399                 return (0);
400         }
401
402         /*
403          * Check for mandatory locks
404          */
405         if (mandatory_lock(ip) &&
406             !lock_may_read(ip, uio->uio_loffset, uio->uio_resid)) {
407                 ZFS_EXIT(zsb);
408                 return (EAGAIN);
409         }
410
411         /*
412          * If we're in FRSYNC mode, sync out this znode before reading it.
413          */
414         if (ioflag & FRSYNC || zsb->z_os->os_sync == ZFS_SYNC_ALWAYS)
415                 zil_commit(zsb->z_log, zp->z_id);
416
417         /*
418          * Lock the range against changes.
419          */
420         rl = zfs_range_lock(zp, uio->uio_loffset, uio->uio_resid, RL_READER);
421
422         /*
423          * If we are reading past end-of-file we can skip
424          * to the end; but we might still need to set atime.
425          */
426         if (uio->uio_loffset >= zp->z_size) {
427                 error = 0;
428                 goto out;
429         }
430
431         ASSERT(uio->uio_loffset < zp->z_size);
432         n = MIN(uio->uio_resid, zp->z_size - uio->uio_loffset);
433
434 #ifdef HAVE_UIO_ZEROCOPY
435         if ((uio->uio_extflg == UIO_XUIO) &&
436             (((xuio_t *)uio)->xu_type == UIOTYPE_ZEROCOPY)) {
437                 int nblk;
438                 int blksz = zp->z_blksz;
439                 uint64_t offset = uio->uio_loffset;
440
441                 xuio = (xuio_t *)uio;
442                 if ((ISP2(blksz))) {
443                         nblk = (P2ROUNDUP(offset + n, blksz) - P2ALIGN(offset,
444                             blksz)) / blksz;
445                 } else {
446                         ASSERT(offset + n <= blksz);
447                         nblk = 1;
448                 }
449                 (void) dmu_xuio_init(xuio, nblk);
450
451                 if (vn_has_cached_data(ip)) {
452                         /*
453                          * For simplicity, we always allocate a full buffer
454                          * even if we only expect to read a portion of a block.
455                          */
456                         while (--nblk >= 0) {
457                                 (void) dmu_xuio_add(xuio,
458                                     dmu_request_arcbuf(sa_get_db(zp->z_sa_hdl),
459                                     blksz), 0, blksz);
460                         }
461                 }
462         }
463 #endif /* HAVE_UIO_ZEROCOPY */
464
465         while (n > 0) {
466                 nbytes = MIN(n, zfs_read_chunk_size -
467                     P2PHASE(uio->uio_loffset, zfs_read_chunk_size));
468
469                 if (zp->z_is_mapped && !(ioflag & O_DIRECT))
470                         error = mappedread(ip, nbytes, uio);
471                 else
472                         error = dmu_read_uio(os, zp->z_id, uio, nbytes);
473
474                 if (error) {
475                         /* convert checksum errors into IO errors */
476                         if (error == ECKSUM)
477                                 error = EIO;
478                         break;
479                 }
480
481                 n -= nbytes;
482         }
483 out:
484         zfs_range_unlock(rl);
485
486         ZFS_ACCESSTIME_STAMP(zsb, zp);
487         zfs_inode_update(zp);
488         ZFS_EXIT(zsb);
489         return (error);
490 }
491 EXPORT_SYMBOL(zfs_read);
492
493 /*
494  * Write the bytes to a file.
495  *
496  *      IN:     ip      - inode of file to be written to.
497  *              uio     - structure supplying write location, range info,
498  *                        and data buffer.
499  *              ioflag  - FAPPEND flag set if in append mode.
500  *                        O_DIRECT flag; used to bypass page cache.
501  *              cr      - credentials of caller.
502  *
503  *      OUT:    uio     - updated offset and range.
504  *
505  *      RETURN: 0 if success
506  *              error code if failure
507  *
508  * Timestamps:
509  *      ip - ctime|mtime updated if byte count > 0
510  */
511
512 /* ARGSUSED */
513 int
514 zfs_write(struct inode *ip, uio_t *uio, int ioflag, cred_t *cr)
515 {
516         znode_t         *zp = ITOZ(ip);
517         rlim64_t        limit = uio->uio_limit;
518         ssize_t         start_resid = uio->uio_resid;
519         ssize_t         tx_bytes;
520         uint64_t        end_size;
521         dmu_tx_t        *tx;
522         zfs_sb_t        *zsb = ZTOZSB(zp);
523         zilog_t         *zilog;
524         offset_t        woff;
525         ssize_t         n, nbytes;
526         rl_t            *rl;
527         int             max_blksz = zsb->z_max_blksz;
528         int             error = 0;
529         arc_buf_t       *abuf;
530         iovec_t         *aiov = NULL;
531         xuio_t          *xuio = NULL;
532         int             i_iov = 0;
533         iovec_t         *iovp = uio->uio_iov;
534         int             write_eof;
535         int             count = 0;
536         sa_bulk_attr_t  bulk[4];
537         uint64_t        mtime[2], ctime[2];
538         ASSERTV(int     iovcnt = uio->uio_iovcnt);
539
540         /*
541          * Fasttrack empty write
542          */
543         n = start_resid;
544         if (n == 0)
545                 return (0);
546
547         if (limit == RLIM64_INFINITY || limit > MAXOFFSET_T)
548                 limit = MAXOFFSET_T;
549
550         ZFS_ENTER(zsb);
551         ZFS_VERIFY_ZP(zp);
552
553         SA_ADD_BULK_ATTR(bulk, count, SA_ZPL_MTIME(zsb), NULL, &mtime, 16);
554         SA_ADD_BULK_ATTR(bulk, count, SA_ZPL_CTIME(zsb), NULL, &ctime, 16);
555         SA_ADD_BULK_ATTR(bulk, count, SA_ZPL_SIZE(zsb), NULL, &zp->z_size, 8);
556         SA_ADD_BULK_ATTR(bulk, count, SA_ZPL_FLAGS(zsb), NULL,
557             &zp->z_pflags, 8);
558
559         /*
560          * If immutable or not appending then return EPERM
561          */
562         if ((zp->z_pflags & (ZFS_IMMUTABLE | ZFS_READONLY)) ||
563             ((zp->z_pflags & ZFS_APPENDONLY) && !(ioflag & FAPPEND) &&
564             (uio->uio_loffset < zp->z_size))) {
565                 ZFS_EXIT(zsb);
566                 return (EPERM);
567         }
568
569         zilog = zsb->z_log;
570
571         /*
572          * Validate file offset
573          */
574         woff = ioflag & FAPPEND ? zp->z_size : uio->uio_loffset;
575         if (woff < 0) {
576                 ZFS_EXIT(zsb);
577                 return (EINVAL);
578         }
579
580         /*
581          * Check for mandatory locks before calling zfs_range_lock()
582          * in order to prevent a deadlock with locks set via fcntl().
583          */
584         if (mandatory_lock(ip) && !lock_may_write(ip, woff, n)) {
585                 ZFS_EXIT(zsb);
586                 return (EAGAIN);
587         }
588
589 #ifdef HAVE_UIO_ZEROCOPY
590         /*
591          * Pre-fault the pages to ensure slow (eg NFS) pages
592          * don't hold up txg.
593          * Skip this if uio contains loaned arc_buf.
594          */
595         if ((uio->uio_extflg == UIO_XUIO) &&
596             (((xuio_t *)uio)->xu_type == UIOTYPE_ZEROCOPY))
597                 xuio = (xuio_t *)uio;
598         else
599                 uio_prefaultpages(MIN(n, max_blksz), uio);
600 #endif /* HAVE_UIO_ZEROCOPY */
601
602         /*
603          * If in append mode, set the io offset pointer to eof.
604          */
605         if (ioflag & FAPPEND) {
606                 /*
607                  * Obtain an appending range lock to guarantee file append
608                  * semantics.  We reset the write offset once we have the lock.
609                  */
610                 rl = zfs_range_lock(zp, 0, n, RL_APPEND);
611                 woff = rl->r_off;
612                 if (rl->r_len == UINT64_MAX) {
613                         /*
614                          * We overlocked the file because this write will cause
615                          * the file block size to increase.
616                          * Note that zp_size cannot change with this lock held.
617                          */
618                         woff = zp->z_size;
619                 }
620                 uio->uio_loffset = woff;
621         } else {
622                 /*
623                  * Note that if the file block size will change as a result of
624                  * this write, then this range lock will lock the entire file
625                  * so that we can re-write the block safely.
626                  */
627                 rl = zfs_range_lock(zp, woff, n, RL_WRITER);
628         }
629
630         if (woff >= limit) {
631                 zfs_range_unlock(rl);
632                 ZFS_EXIT(zsb);
633                 return (EFBIG);
634         }
635
636         if ((woff + n) > limit || woff > (limit - n))
637                 n = limit - woff;
638
639         /* Will this write extend the file length? */
640         write_eof = (woff + n > zp->z_size);
641
642         end_size = MAX(zp->z_size, woff + n);
643
644         /*
645          * Write the file in reasonable size chunks.  Each chunk is written
646          * in a separate transaction; this keeps the intent log records small
647          * and allows us to do more fine-grained space accounting.
648          */
649         while (n > 0) {
650                 abuf = NULL;
651                 woff = uio->uio_loffset;
652 again:
653                 if (zfs_owner_overquota(zsb, zp, B_FALSE) ||
654                     zfs_owner_overquota(zsb, zp, B_TRUE)) {
655                         if (abuf != NULL)
656                                 dmu_return_arcbuf(abuf);
657                         error = EDQUOT;
658                         break;
659                 }
660
661                 if (xuio && abuf == NULL) {
662                         ASSERT(i_iov < iovcnt);
663                         aiov = &iovp[i_iov];
664                         abuf = dmu_xuio_arcbuf(xuio, i_iov);
665                         dmu_xuio_clear(xuio, i_iov);
666                         ASSERT((aiov->iov_base == abuf->b_data) ||
667                             ((char *)aiov->iov_base - (char *)abuf->b_data +
668                             aiov->iov_len == arc_buf_size(abuf)));
669                         i_iov++;
670                 } else if (abuf == NULL && n >= max_blksz &&
671                     woff >= zp->z_size &&
672                     P2PHASE(woff, max_blksz) == 0 &&
673                     zp->z_blksz == max_blksz) {
674                         /*
675                          * This write covers a full block.  "Borrow" a buffer
676                          * from the dmu so that we can fill it before we enter
677                          * a transaction.  This avoids the possibility of
678                          * holding up the transaction if the data copy hangs
679                          * up on a pagefault (e.g., from an NFS server mapping).
680                          */
681                         size_t cbytes;
682
683                         abuf = dmu_request_arcbuf(sa_get_db(zp->z_sa_hdl),
684                             max_blksz);
685                         ASSERT(abuf != NULL);
686                         ASSERT(arc_buf_size(abuf) == max_blksz);
687                         if ((error = uiocopy(abuf->b_data, max_blksz,
688                             UIO_WRITE, uio, &cbytes))) {
689                                 dmu_return_arcbuf(abuf);
690                                 break;
691                         }
692                         ASSERT(cbytes == max_blksz);
693                 }
694
695                 /*
696                  * Start a transaction.
697                  */
698                 tx = dmu_tx_create(zsb->z_os);
699                 dmu_tx_hold_sa(tx, zp->z_sa_hdl, B_FALSE);
700                 dmu_tx_hold_write(tx, zp->z_id, woff, MIN(n, max_blksz));
701                 zfs_sa_upgrade_txholds(tx, zp);
702                 error = dmu_tx_assign(tx, TXG_NOWAIT);
703                 if (error) {
704                         if (error == ERESTART) {
705                                 dmu_tx_wait(tx);
706                                 dmu_tx_abort(tx);
707                                 goto again;
708                         }
709                         dmu_tx_abort(tx);
710                         if (abuf != NULL)
711                                 dmu_return_arcbuf(abuf);
712                         break;
713                 }
714
715                 /*
716                  * If zfs_range_lock() over-locked we grow the blocksize
717                  * and then reduce the lock range.  This will only happen
718                  * on the first iteration since zfs_range_reduce() will
719                  * shrink down r_len to the appropriate size.
720                  */
721                 if (rl->r_len == UINT64_MAX) {
722                         uint64_t new_blksz;
723
724                         if (zp->z_blksz > max_blksz) {
725                                 ASSERT(!ISP2(zp->z_blksz));
726                                 new_blksz = MIN(end_size, SPA_MAXBLOCKSIZE);
727                         } else {
728                                 new_blksz = MIN(end_size, max_blksz);
729                         }
730                         zfs_grow_blocksize(zp, new_blksz, tx);
731                         zfs_range_reduce(rl, woff, n);
732                 }
733
734                 /*
735                  * XXX - should we really limit each write to z_max_blksz?
736                  * Perhaps we should use SPA_MAXBLOCKSIZE chunks?
737                  */
738                 nbytes = MIN(n, max_blksz - P2PHASE(woff, max_blksz));
739
740                 if (abuf == NULL) {
741                         tx_bytes = uio->uio_resid;
742                         error = dmu_write_uio_dbuf(sa_get_db(zp->z_sa_hdl),
743                             uio, nbytes, tx);
744                         tx_bytes -= uio->uio_resid;
745                 } else {
746                         tx_bytes = nbytes;
747                         ASSERT(xuio == NULL || tx_bytes == aiov->iov_len);
748                         /*
749                          * If this is not a full block write, but we are
750                          * extending the file past EOF and this data starts
751                          * block-aligned, use assign_arcbuf().  Otherwise,
752                          * write via dmu_write().
753                          */
754                         if (tx_bytes < max_blksz && (!write_eof ||
755                             aiov->iov_base != abuf->b_data)) {
756                                 ASSERT(xuio);
757                                 dmu_write(zsb->z_os, zp->z_id, woff,
758                                     aiov->iov_len, aiov->iov_base, tx);
759                                 dmu_return_arcbuf(abuf);
760                                 xuio_stat_wbuf_copied();
761                         } else {
762                                 ASSERT(xuio || tx_bytes == max_blksz);
763                                 dmu_assign_arcbuf(sa_get_db(zp->z_sa_hdl),
764                                     woff, abuf, tx);
765                         }
766                         ASSERT(tx_bytes <= uio->uio_resid);
767                         uioskip(uio, tx_bytes);
768                 }
769
770                 if (tx_bytes && zp->z_is_mapped && !(ioflag & O_DIRECT))
771                         update_pages(ip, woff, tx_bytes, zsb->z_os, zp->z_id);
772
773                 /*
774                  * If we made no progress, we're done.  If we made even
775                  * partial progress, update the znode and ZIL accordingly.
776                  */
777                 if (tx_bytes == 0) {
778                         (void) sa_update(zp->z_sa_hdl, SA_ZPL_SIZE(zsb),
779                             (void *)&zp->z_size, sizeof (uint64_t), tx);
780                         dmu_tx_commit(tx);
781                         ASSERT(error != 0);
782                         break;
783                 }
784
785                 /*
786                  * Clear Set-UID/Set-GID bits on successful write if not
787                  * privileged and at least one of the excute bits is set.
788                  *
789                  * It would be nice to to this after all writes have
790                  * been done, but that would still expose the ISUID/ISGID
791                  * to another app after the partial write is committed.
792                  *
793                  * Note: we don't call zfs_fuid_map_id() here because
794                  * user 0 is not an ephemeral uid.
795                  */
796                 mutex_enter(&zp->z_acl_lock);
797                 if ((zp->z_mode & (S_IXUSR | (S_IXUSR >> 3) |
798                     (S_IXUSR >> 6))) != 0 &&
799                     (zp->z_mode & (S_ISUID | S_ISGID)) != 0 &&
800                     secpolicy_vnode_setid_retain(cr,
801                     (zp->z_mode & S_ISUID) != 0 && zp->z_uid == 0) != 0) {
802                         uint64_t newmode;
803                         zp->z_mode &= ~(S_ISUID | S_ISGID);
804                         newmode = zp->z_mode;
805                         (void) sa_update(zp->z_sa_hdl, SA_ZPL_MODE(zsb),
806                             (void *)&newmode, sizeof (uint64_t), tx);
807                 }
808                 mutex_exit(&zp->z_acl_lock);
809
810                 zfs_tstamp_update_setup(zp, CONTENT_MODIFIED, mtime, ctime,
811                     B_TRUE);
812
813                 /*
814                  * Update the file size (zp_size) if it has changed;
815                  * account for possible concurrent updates.
816                  */
817                 while ((end_size = zp->z_size) < uio->uio_loffset) {
818                         (void) atomic_cas_64(&zp->z_size, end_size,
819                             uio->uio_loffset);
820                         ASSERT(error == 0);
821                 }
822                 /*
823                  * If we are replaying and eof is non zero then force
824                  * the file size to the specified eof. Note, there's no
825                  * concurrency during replay.
826                  */
827                 if (zsb->z_replay && zsb->z_replay_eof != 0)
828                         zp->z_size = zsb->z_replay_eof;
829
830                 error = sa_bulk_update(zp->z_sa_hdl, bulk, count, tx);
831
832                 zfs_log_write(zilog, tx, TX_WRITE, zp, woff, tx_bytes, ioflag);
833                 dmu_tx_commit(tx);
834
835                 if (error != 0)
836                         break;
837                 ASSERT(tx_bytes == nbytes);
838                 n -= nbytes;
839
840                 if (!xuio && n > 0)
841                         uio_prefaultpages(MIN(n, max_blksz), uio);
842         }
843
844         zfs_range_unlock(rl);
845
846         /*
847          * If we're in replay mode, or we made no progress, return error.
848          * Otherwise, it's at least a partial write, so it's successful.
849          */
850         if (zsb->z_replay || uio->uio_resid == start_resid) {
851                 ZFS_EXIT(zsb);
852                 return (error);
853         }
854
855         if (ioflag & (FSYNC | FDSYNC) ||
856             zsb->z_os->os_sync == ZFS_SYNC_ALWAYS)
857                 zil_commit(zilog, zp->z_id);
858
859         zfs_inode_update(zp);
860         ZFS_EXIT(zsb);
861         return (0);
862 }
863 EXPORT_SYMBOL(zfs_write);
864
865 static void
866 iput_async(struct inode *ip, taskq_t *taskq)
867 {
868         ASSERT(atomic_read(&ip->i_count) > 0);
869         if (atomic_read(&ip->i_count) == 1)
870                 taskq_dispatch(taskq, (task_func_t *)iput, ip, TQ_SLEEP);
871         else
872                 iput(ip);
873 }
874
875 void
876 zfs_get_done(zgd_t *zgd, int error)
877 {
878         znode_t *zp = zgd->zgd_private;
879         objset_t *os = ZTOZSB(zp)->z_os;
880
881         if (zgd->zgd_db)
882                 dmu_buf_rele(zgd->zgd_db, zgd);
883
884         zfs_range_unlock(zgd->zgd_rl);
885
886         /*
887          * Release the vnode asynchronously as we currently have the
888          * txg stopped from syncing.
889          */
890         iput_async(ZTOI(zp), dsl_pool_iput_taskq(dmu_objset_pool(os)));
891
892         if (error == 0 && zgd->zgd_bp)
893                 zil_add_block(zgd->zgd_zilog, zgd->zgd_bp);
894
895         kmem_free(zgd, sizeof (zgd_t));
896 }
897
898 #ifdef DEBUG
899 static int zil_fault_io = 0;
900 #endif
901
902 /*
903  * Get data to generate a TX_WRITE intent log record.
904  */
905 int
906 zfs_get_data(void *arg, lr_write_t *lr, char *buf, zio_t *zio)
907 {
908         zfs_sb_t *zsb = arg;
909         objset_t *os = zsb->z_os;
910         znode_t *zp;
911         uint64_t object = lr->lr_foid;
912         uint64_t offset = lr->lr_offset;
913         uint64_t size = lr->lr_length;
914         blkptr_t *bp = &lr->lr_blkptr;
915         dmu_buf_t *db;
916         zgd_t *zgd;
917         int error = 0;
918
919         ASSERT(zio != NULL);
920         ASSERT(size != 0);
921
922         /*
923          * Nothing to do if the file has been removed
924          */
925         if (zfs_zget(zsb, object, &zp) != 0)
926                 return (ENOENT);
927         if (zp->z_unlinked) {
928                 /*
929                  * Release the vnode asynchronously as we currently have the
930                  * txg stopped from syncing.
931                  */
932                 iput_async(ZTOI(zp), dsl_pool_iput_taskq(dmu_objset_pool(os)));
933                 return (ENOENT);
934         }
935
936         zgd = (zgd_t *)kmem_zalloc(sizeof (zgd_t), KM_SLEEP);
937         zgd->zgd_zilog = zsb->z_log;
938         zgd->zgd_private = zp;
939
940         /*
941          * Write records come in two flavors: immediate and indirect.
942          * For small writes it's cheaper to store the data with the
943          * log record (immediate); for large writes it's cheaper to
944          * sync the data and get a pointer to it (indirect) so that
945          * we don't have to write the data twice.
946          */
947         if (buf != NULL) { /* immediate write */
948                 zgd->zgd_rl = zfs_range_lock(zp, offset, size, RL_READER);
949                 /* test for truncation needs to be done while range locked */
950                 if (offset >= zp->z_size) {
951                         error = ENOENT;
952                 } else {
953                         error = dmu_read(os, object, offset, size, buf,
954                             DMU_READ_NO_PREFETCH);
955                 }
956                 ASSERT(error == 0 || error == ENOENT);
957         } else { /* indirect write */
958                 /*
959                  * Have to lock the whole block to ensure when it's
960                  * written out and it's checksum is being calculated
961                  * that no one can change the data. We need to re-check
962                  * blocksize after we get the lock in case it's changed!
963                  */
964                 for (;;) {
965                         uint64_t blkoff;
966                         size = zp->z_blksz;
967                         blkoff = ISP2(size) ? P2PHASE(offset, size) : offset;
968                         offset -= blkoff;
969                         zgd->zgd_rl = zfs_range_lock(zp, offset, size,
970                             RL_READER);
971                         if (zp->z_blksz == size)
972                                 break;
973                         offset += blkoff;
974                         zfs_range_unlock(zgd->zgd_rl);
975                 }
976                 /* test for truncation needs to be done while range locked */
977                 if (lr->lr_offset >= zp->z_size)
978                         error = ENOENT;
979 #ifdef DEBUG
980                 if (zil_fault_io) {
981                         error = EIO;
982                         zil_fault_io = 0;
983                 }
984 #endif
985                 if (error == 0)
986                         error = dmu_buf_hold(os, object, offset, zgd, &db,
987                             DMU_READ_NO_PREFETCH);
988
989                 if (error == 0) {
990                         zgd->zgd_db = db;
991                         zgd->zgd_bp = bp;
992
993                         ASSERT(db->db_offset == offset);
994                         ASSERT(db->db_size == size);
995
996                         error = dmu_sync(zio, lr->lr_common.lrc_txg,
997                             zfs_get_done, zgd);
998                         ASSERT(error || lr->lr_length <= zp->z_blksz);
999
1000                         /*
1001                          * On success, we need to wait for the write I/O
1002                          * initiated by dmu_sync() to complete before we can
1003                          * release this dbuf.  We will finish everything up
1004                          * in the zfs_get_done() callback.
1005                          */
1006                         if (error == 0)
1007                                 return (0);
1008
1009                         if (error == EALREADY) {
1010                                 lr->lr_common.lrc_txtype = TX_WRITE2;
1011                                 error = 0;
1012                         }
1013                 }
1014         }
1015
1016         zfs_get_done(zgd, error);
1017
1018         return (error);
1019 }
1020
1021 /*ARGSUSED*/
1022 int
1023 zfs_access(struct inode *ip, int mode, int flag, cred_t *cr)
1024 {
1025         znode_t *zp = ITOZ(ip);
1026         zfs_sb_t *zsb = ITOZSB(ip);
1027         int error;
1028
1029         ZFS_ENTER(zsb);
1030         ZFS_VERIFY_ZP(zp);
1031
1032         if (flag & V_ACE_MASK)
1033                 error = zfs_zaccess(zp, mode, flag, B_FALSE, cr);
1034         else
1035                 error = zfs_zaccess_rwx(zp, mode, flag, cr);
1036
1037         ZFS_EXIT(zsb);
1038         return (error);
1039 }
1040 EXPORT_SYMBOL(zfs_access);
1041
1042 /*
1043  * Lookup an entry in a directory, or an extended attribute directory.
1044  * If it exists, return a held inode reference for it.
1045  *
1046  *      IN:     dip     - inode of directory to search.
1047  *              nm      - name of entry to lookup.
1048  *              flags   - LOOKUP_XATTR set if looking for an attribute.
1049  *              cr      - credentials of caller.
1050  *              direntflags - directory lookup flags
1051  *              realpnp - returned pathname.
1052  *
1053  *      OUT:    ipp     - inode of located entry, NULL if not found.
1054  *
1055  *      RETURN: 0 if success
1056  *              error code if failure
1057  *
1058  * Timestamps:
1059  *      NA
1060  */
1061 /* ARGSUSED */
1062 int
1063 zfs_lookup(struct inode *dip, char *nm, struct inode **ipp, int flags,
1064     cred_t *cr, int *direntflags, pathname_t *realpnp)
1065 {
1066         znode_t *zdp = ITOZ(dip);
1067         zfs_sb_t *zsb = ITOZSB(dip);
1068         int error = 0;
1069
1070         /* fast path */
1071         if (!(flags & (LOOKUP_XATTR | FIGNORECASE))) {
1072
1073                 if (!S_ISDIR(dip->i_mode)) {
1074                         return (ENOTDIR);
1075                 } else if (zdp->z_sa_hdl == NULL) {
1076                         return (EIO);
1077                 }
1078
1079                 if (nm[0] == 0 || (nm[0] == '.' && nm[1] == '\0')) {
1080                         error = zfs_fastaccesschk_execute(zdp, cr);
1081                         if (!error) {
1082                                 *ipp = dip;
1083                                 igrab(*ipp);
1084                                 return (0);
1085                         }
1086                         return (error);
1087 #ifdef HAVE_DNLC
1088                 } else {
1089                         vnode_t *tvp = dnlc_lookup(dvp, nm);
1090
1091                         if (tvp) {
1092                                 error = zfs_fastaccesschk_execute(zdp, cr);
1093                                 if (error) {
1094                                         iput(tvp);
1095                                         return (error);
1096                                 }
1097                                 if (tvp == DNLC_NO_VNODE) {
1098                                         iput(tvp);
1099                                         return (ENOENT);
1100                                 } else {
1101                                         *vpp = tvp;
1102                                         return (specvp_check(vpp, cr));
1103                                 }
1104                         }
1105 #endif /* HAVE_DNLC */
1106                 }
1107         }
1108
1109         ZFS_ENTER(zsb);
1110         ZFS_VERIFY_ZP(zdp);
1111
1112         *ipp = NULL;
1113
1114         if (flags & LOOKUP_XATTR) {
1115                 /*
1116                  * We don't allow recursive attributes..
1117                  * Maybe someday we will.
1118                  */
1119                 if (zdp->z_pflags & ZFS_XATTR) {
1120                         ZFS_EXIT(zsb);
1121                         return (EINVAL);
1122                 }
1123
1124                 if ((error = zfs_get_xattrdir(zdp, ipp, cr, flags))) {
1125                         ZFS_EXIT(zsb);
1126                         return (error);
1127                 }
1128
1129                 /*
1130                  * Do we have permission to get into attribute directory?
1131                  */
1132
1133                 if ((error = zfs_zaccess(ITOZ(*ipp), ACE_EXECUTE, 0,
1134                     B_FALSE, cr))) {
1135                         iput(*ipp);
1136                         *ipp = NULL;
1137                 }
1138
1139                 ZFS_EXIT(zsb);
1140                 return (error);
1141         }
1142
1143         if (!S_ISDIR(dip->i_mode)) {
1144                 ZFS_EXIT(zsb);
1145                 return (ENOTDIR);
1146         }
1147
1148         /*
1149          * Check accessibility of directory.
1150          */
1151
1152         if ((error = zfs_zaccess(zdp, ACE_EXECUTE, 0, B_FALSE, cr))) {
1153                 ZFS_EXIT(zsb);
1154                 return (error);
1155         }
1156
1157         if (zsb->z_utf8 && u8_validate(nm, strlen(nm),
1158             NULL, U8_VALIDATE_ENTIRE, &error) < 0) {
1159                 ZFS_EXIT(zsb);
1160                 return (EILSEQ);
1161         }
1162
1163         error = zfs_dirlook(zdp, nm, ipp, flags, direntflags, realpnp);
1164         if ((error == 0) && (*ipp))
1165                 zfs_inode_update(ITOZ(*ipp));
1166
1167         ZFS_EXIT(zsb);
1168         return (error);
1169 }
1170 EXPORT_SYMBOL(zfs_lookup);
1171
1172 /*
1173  * Attempt to create a new entry in a directory.  If the entry
1174  * already exists, truncate the file if permissible, else return
1175  * an error.  Return the ip of the created or trunc'd file.
1176  *
1177  *      IN:     dip     - inode of directory to put new file entry in.
1178  *              name    - name of new file entry.
1179  *              vap     - attributes of new file.
1180  *              excl    - flag indicating exclusive or non-exclusive mode.
1181  *              mode    - mode to open file with.
1182  *              cr      - credentials of caller.
1183  *              flag    - large file flag [UNUSED].
1184  *              vsecp   - ACL to be set
1185  *
1186  *      OUT:    ipp     - inode of created or trunc'd entry.
1187  *
1188  *      RETURN: 0 if success
1189  *              error code if failure
1190  *
1191  * Timestamps:
1192  *      dip - ctime|mtime updated if new entry created
1193  *       ip - ctime|mtime always, atime if new
1194  */
1195
1196 /* ARGSUSED */
1197 int
1198 zfs_create(struct inode *dip, char *name, vattr_t *vap, int excl,
1199     int mode, struct inode **ipp, cred_t *cr, int flag, vsecattr_t *vsecp)
1200 {
1201         znode_t         *zp, *dzp = ITOZ(dip);
1202         zfs_sb_t        *zsb = ITOZSB(dip);
1203         zilog_t         *zilog;
1204         objset_t        *os;
1205         zfs_dirlock_t   *dl;
1206         dmu_tx_t        *tx;
1207         int             error;
1208         uid_t           uid;
1209         gid_t           gid;
1210         zfs_acl_ids_t   acl_ids;
1211         boolean_t       fuid_dirtied;
1212         boolean_t       have_acl = B_FALSE;
1213
1214         /*
1215          * If we have an ephemeral id, ACL, or XVATTR then
1216          * make sure file system is at proper version
1217          */
1218
1219         gid = crgetgid(cr);
1220         uid = crgetuid(cr);
1221
1222         if (zsb->z_use_fuids == B_FALSE &&
1223             (vsecp || IS_EPHEMERAL(uid) || IS_EPHEMERAL(gid)))
1224                 return (EINVAL);
1225
1226         ZFS_ENTER(zsb);
1227         ZFS_VERIFY_ZP(dzp);
1228         os = zsb->z_os;
1229         zilog = zsb->z_log;
1230
1231         if (zsb->z_utf8 && u8_validate(name, strlen(name),
1232             NULL, U8_VALIDATE_ENTIRE, &error) < 0) {
1233                 ZFS_EXIT(zsb);
1234                 return (EILSEQ);
1235         }
1236
1237         if (vap->va_mask & ATTR_XVATTR) {
1238                 if ((error = secpolicy_xvattr((xvattr_t *)vap,
1239                     crgetuid(cr), cr, vap->va_mode)) != 0) {
1240                         ZFS_EXIT(zsb);
1241                         return (error);
1242                 }
1243         }
1244
1245 top:
1246         *ipp = NULL;
1247         if (*name == '\0') {
1248                 /*
1249                  * Null component name refers to the directory itself.
1250                  */
1251                 igrab(dip);
1252                 zp = dzp;
1253                 dl = NULL;
1254                 error = 0;
1255         } else {
1256                 /* possible igrab(zp) */
1257                 int zflg = 0;
1258
1259                 if (flag & FIGNORECASE)
1260                         zflg |= ZCILOOK;
1261
1262                 error = zfs_dirent_lock(&dl, dzp, name, &zp, zflg,
1263                     NULL, NULL);
1264                 if (error) {
1265                         if (have_acl)
1266                                 zfs_acl_ids_free(&acl_ids);
1267                         if (strcmp(name, "..") == 0)
1268                                 error = EISDIR;
1269                         ZFS_EXIT(zsb);
1270                         return (error);
1271                 }
1272         }
1273
1274         if (zp == NULL) {
1275                 uint64_t txtype;
1276
1277                 /*
1278                  * Create a new file object and update the directory
1279                  * to reference it.
1280                  */
1281                 if ((error = zfs_zaccess(dzp, ACE_ADD_FILE, 0, B_FALSE, cr))) {
1282                         if (have_acl)
1283                                 zfs_acl_ids_free(&acl_ids);
1284                         goto out;
1285                 }
1286
1287                 /*
1288                  * We only support the creation of regular files in
1289                  * extended attribute directories.
1290                  */
1291
1292                 if ((dzp->z_pflags & ZFS_XATTR) && !S_ISREG(vap->va_mode)) {
1293                         if (have_acl)
1294                                 zfs_acl_ids_free(&acl_ids);
1295                         error = EINVAL;
1296                         goto out;
1297                 }
1298
1299                 if (!have_acl && (error = zfs_acl_ids_create(dzp, 0, vap,
1300                     cr, vsecp, &acl_ids)) != 0)
1301                         goto out;
1302                 have_acl = B_TRUE;
1303
1304                 if (zfs_acl_ids_overquota(zsb, &acl_ids)) {
1305                         zfs_acl_ids_free(&acl_ids);
1306                         error = EDQUOT;
1307                         goto out;
1308                 }
1309
1310                 tx = dmu_tx_create(os);
1311
1312                 dmu_tx_hold_sa_create(tx, acl_ids.z_aclp->z_acl_bytes +
1313                     ZFS_SA_BASE_ATTR_SIZE);
1314
1315                 fuid_dirtied = zsb->z_fuid_dirty;
1316                 if (fuid_dirtied)
1317                         zfs_fuid_txhold(zsb, tx);
1318                 dmu_tx_hold_zap(tx, dzp->z_id, TRUE, name);
1319                 dmu_tx_hold_sa(tx, dzp->z_sa_hdl, B_FALSE);
1320                 if (!zsb->z_use_sa &&
1321                     acl_ids.z_aclp->z_acl_bytes > ZFS_ACE_SPACE) {
1322                         dmu_tx_hold_write(tx, DMU_NEW_OBJECT,
1323                             0, acl_ids.z_aclp->z_acl_bytes);
1324                 }
1325                 error = dmu_tx_assign(tx, TXG_NOWAIT);
1326                 if (error) {
1327                         zfs_dirent_unlock(dl);
1328                         if (error == ERESTART) {
1329                                 dmu_tx_wait(tx);
1330                                 dmu_tx_abort(tx);
1331                                 goto top;
1332                         }
1333                         zfs_acl_ids_free(&acl_ids);
1334                         dmu_tx_abort(tx);
1335                         ZFS_EXIT(zsb);
1336                         return (error);
1337                 }
1338                 zfs_mknode(dzp, vap, tx, cr, 0, &zp, &acl_ids);
1339
1340                 if (fuid_dirtied)
1341                         zfs_fuid_sync(zsb, tx);
1342
1343                 (void) zfs_link_create(dl, zp, tx, ZNEW);
1344                 txtype = zfs_log_create_txtype(Z_FILE, vsecp, vap);
1345                 if (flag & FIGNORECASE)
1346                         txtype |= TX_CI;
1347                 zfs_log_create(zilog, tx, txtype, dzp, zp, name,
1348                     vsecp, acl_ids.z_fuidp, vap);
1349                 zfs_acl_ids_free(&acl_ids);
1350                 dmu_tx_commit(tx);
1351         } else {
1352                 int aflags = (flag & FAPPEND) ? V_APPEND : 0;
1353
1354                 if (have_acl)
1355                         zfs_acl_ids_free(&acl_ids);
1356                 have_acl = B_FALSE;
1357
1358                 /*
1359                  * A directory entry already exists for this name.
1360                  */
1361                 /*
1362                  * Can't truncate an existing file if in exclusive mode.
1363                  */
1364                 if (excl) {
1365                         error = EEXIST;
1366                         goto out;
1367                 }
1368                 /*
1369                  * Can't open a directory for writing.
1370                  */
1371                 if (S_ISDIR(ZTOI(zp)->i_mode)) {
1372                         error = EISDIR;
1373                         goto out;
1374                 }
1375                 /*
1376                  * Verify requested access to file.
1377                  */
1378                 if (mode && (error = zfs_zaccess_rwx(zp, mode, aflags, cr))) {
1379                         goto out;
1380                 }
1381
1382                 mutex_enter(&dzp->z_lock);
1383                 dzp->z_seq++;
1384                 mutex_exit(&dzp->z_lock);
1385
1386                 /*
1387                  * Truncate regular files if requested.
1388                  */
1389                 if (S_ISREG(ZTOI(zp)->i_mode) &&
1390                     (vap->va_mask & ATTR_SIZE) && (vap->va_size == 0)) {
1391                         /* we can't hold any locks when calling zfs_freesp() */
1392                         zfs_dirent_unlock(dl);
1393                         dl = NULL;
1394                         error = zfs_freesp(zp, 0, 0, mode, TRUE);
1395                 }
1396         }
1397 out:
1398
1399         if (dl)
1400                 zfs_dirent_unlock(dl);
1401
1402         if (error) {
1403                 if (zp)
1404                         iput(ZTOI(zp));
1405         } else {
1406                 zfs_inode_update(dzp);
1407                 zfs_inode_update(zp);
1408                 *ipp = ZTOI(zp);
1409         }
1410
1411         if (zsb->z_os->os_sync == ZFS_SYNC_ALWAYS)
1412                 zil_commit(zilog, 0);
1413
1414         ZFS_EXIT(zsb);
1415         return (error);
1416 }
1417 EXPORT_SYMBOL(zfs_create);
1418
1419 /*
1420  * Remove an entry from a directory.
1421  *
1422  *      IN:     dip     - inode of directory to remove entry from.
1423  *              name    - name of entry to remove.
1424  *              cr      - credentials of caller.
1425  *
1426  *      RETURN: 0 if success
1427  *              error code if failure
1428  *
1429  * Timestamps:
1430  *      dip - ctime|mtime
1431  *       ip - ctime (if nlink > 0)
1432  */
1433
1434 uint64_t null_xattr = 0;
1435
1436 /*ARGSUSED*/
1437 int
1438 zfs_remove(struct inode *dip, char *name, cred_t *cr)
1439 {
1440         znode_t         *zp, *dzp = ITOZ(dip);
1441         znode_t         *xzp;
1442         struct inode    *ip;
1443         zfs_sb_t        *zsb = ITOZSB(dip);
1444         zilog_t         *zilog;
1445         uint64_t        xattr_obj;
1446         uint64_t        xattr_obj_unlinked = 0;
1447         uint64_t        obj = 0;
1448         zfs_dirlock_t   *dl;
1449         dmu_tx_t        *tx;
1450         boolean_t       unlinked;
1451         uint64_t        txtype;
1452         pathname_t      *realnmp = NULL;
1453 #ifdef HAVE_PN_UTILS
1454         pathname_t      realnm;
1455 #endif /* HAVE_PN_UTILS */
1456         int             error;
1457         int             zflg = ZEXISTS;
1458
1459         ZFS_ENTER(zsb);
1460         ZFS_VERIFY_ZP(dzp);
1461         zilog = zsb->z_log;
1462
1463 #ifdef HAVE_PN_UTILS
1464         if (flags & FIGNORECASE) {
1465                 zflg |= ZCILOOK;
1466                 pn_alloc(&realnm);
1467                 realnmp = &realnm;
1468         }
1469 #endif /* HAVE_PN_UTILS */
1470
1471 top:
1472         xattr_obj = 0;
1473         xzp = NULL;
1474         /*
1475          * Attempt to lock directory; fail if entry doesn't exist.
1476          */
1477         if ((error = zfs_dirent_lock(&dl, dzp, name, &zp, zflg,
1478             NULL, realnmp))) {
1479 #ifdef HAVE_PN_UTILS
1480                 if (realnmp)
1481                         pn_free(realnmp);
1482 #endif /* HAVE_PN_UTILS */
1483                 ZFS_EXIT(zsb);
1484                 return (error);
1485         }
1486
1487         ip = ZTOI(zp);
1488
1489         if ((error = zfs_zaccess_delete(dzp, zp, cr))) {
1490                 goto out;
1491         }
1492
1493         /*
1494          * Need to use rmdir for removing directories.
1495          */
1496         if (S_ISDIR(ip->i_mode)) {
1497                 error = EPERM;
1498                 goto out;
1499         }
1500
1501 #ifdef HAVE_DNLC
1502         if (realnmp)
1503                 dnlc_remove(dvp, realnmp->pn_buf);
1504         else
1505                 dnlc_remove(dvp, name);
1506 #endif /* HAVE_DNLC */
1507
1508         /*
1509          * We never delete the znode and always place it in the unlinked
1510          * set.  The dentry cache will always hold the last reference and
1511          * is responsible for safely freeing the znode.
1512          */
1513         obj = zp->z_id;
1514         tx = dmu_tx_create(zsb->z_os);
1515         dmu_tx_hold_zap(tx, dzp->z_id, FALSE, name);
1516         dmu_tx_hold_sa(tx, zp->z_sa_hdl, B_FALSE);
1517         zfs_sa_upgrade_txholds(tx, zp);
1518         zfs_sa_upgrade_txholds(tx, dzp);
1519
1520         /* are there any extended attributes? */
1521         error = sa_lookup(zp->z_sa_hdl, SA_ZPL_XATTR(zsb),
1522             &xattr_obj, sizeof (xattr_obj));
1523         if (error == 0 && xattr_obj) {
1524                 error = zfs_zget(zsb, xattr_obj, &xzp);
1525                 ASSERT3U(error, ==, 0);
1526                 dmu_tx_hold_sa(tx, zp->z_sa_hdl, B_TRUE);
1527                 dmu_tx_hold_sa(tx, xzp->z_sa_hdl, B_FALSE);
1528         }
1529
1530         /* charge as an update -- would be nice not to charge at all */
1531         dmu_tx_hold_zap(tx, zsb->z_unlinkedobj, FALSE, NULL);
1532
1533         error = dmu_tx_assign(tx, TXG_NOWAIT);
1534         if (error) {
1535                 zfs_dirent_unlock(dl);
1536                 iput(ip);
1537                 if (xzp)
1538                         iput(ZTOI(xzp));
1539                 if (error == ERESTART) {
1540                         dmu_tx_wait(tx);
1541                         dmu_tx_abort(tx);
1542                         goto top;
1543                 }
1544 #ifdef HAVE_PN_UTILS
1545                 if (realnmp)
1546                         pn_free(realnmp);
1547 #endif /* HAVE_PN_UTILS */
1548                 dmu_tx_abort(tx);
1549                 ZFS_EXIT(zsb);
1550                 return (error);
1551         }
1552
1553         /*
1554          * Remove the directory entry.
1555          */
1556         error = zfs_link_destroy(dl, zp, tx, zflg, &unlinked);
1557
1558         if (error) {
1559                 dmu_tx_commit(tx);
1560                 goto out;
1561         }
1562
1563         if (unlinked) {
1564                 /*
1565                  * Hold z_lock so that we can make sure that the ACL obj
1566                  * hasn't changed.  Could have been deleted due to
1567                  * zfs_sa_upgrade().
1568                  */
1569                 mutex_enter(&zp->z_lock);
1570                 (void) sa_lookup(zp->z_sa_hdl, SA_ZPL_XATTR(zsb),
1571                     &xattr_obj_unlinked, sizeof (xattr_obj_unlinked));
1572                 mutex_exit(&zp->z_lock);
1573                 zfs_unlinked_add(zp, tx);
1574         }
1575
1576         txtype = TX_REMOVE;
1577 #ifdef HAVE_PN_UTILS
1578         if (flags & FIGNORECASE)
1579                 txtype |= TX_CI;
1580 #endif /* HAVE_PN_UTILS */
1581         zfs_log_remove(zilog, tx, txtype, dzp, name, obj);
1582
1583         dmu_tx_commit(tx);
1584 out:
1585 #ifdef HAVE_PN_UTILS
1586         if (realnmp)
1587                 pn_free(realnmp);
1588 #endif /* HAVE_PN_UTILS */
1589
1590         zfs_dirent_unlock(dl);
1591         zfs_inode_update(dzp);
1592         zfs_inode_update(zp);
1593         if (xzp)
1594                 zfs_inode_update(xzp);
1595
1596         iput(ip);
1597         if (xzp)
1598                 iput(ZTOI(xzp));
1599
1600         if (zsb->z_os->os_sync == ZFS_SYNC_ALWAYS)
1601                 zil_commit(zilog, 0);
1602
1603         ZFS_EXIT(zsb);
1604         return (error);
1605 }
1606 EXPORT_SYMBOL(zfs_remove);
1607
1608 /*
1609  * Create a new directory and insert it into dip using the name
1610  * provided.  Return a pointer to the inserted directory.
1611  *
1612  *      IN:     dip     - inode of directory to add subdir to.
1613  *              dirname - name of new directory.
1614  *              vap     - attributes of new directory.
1615  *              cr      - credentials of caller.
1616  *              vsecp   - ACL to be set
1617  *
1618  *      OUT:    ipp     - inode of created directory.
1619  *
1620  *      RETURN: 0 if success
1621  *              error code if failure
1622  *
1623  * Timestamps:
1624  *      dip - ctime|mtime updated
1625  *      ipp - ctime|mtime|atime updated
1626  */
1627 /*ARGSUSED*/
1628 int
1629 zfs_mkdir(struct inode *dip, char *dirname, vattr_t *vap, struct inode **ipp,
1630     cred_t *cr, int flags, vsecattr_t *vsecp)
1631 {
1632         znode_t         *zp, *dzp = ITOZ(dip);
1633         zfs_sb_t        *zsb = ITOZSB(dip);
1634         zilog_t         *zilog;
1635         zfs_dirlock_t   *dl;
1636         uint64_t        txtype;
1637         dmu_tx_t        *tx;
1638         int             error;
1639         int             zf = ZNEW;
1640         uid_t           uid;
1641         gid_t           gid = crgetgid(cr);
1642         zfs_acl_ids_t   acl_ids;
1643         boolean_t       fuid_dirtied;
1644
1645         ASSERT(S_ISDIR(vap->va_mode));
1646
1647         /*
1648          * If we have an ephemeral id, ACL, or XVATTR then
1649          * make sure file system is at proper version
1650          */
1651
1652         uid = crgetuid(cr);
1653         if (zsb->z_use_fuids == B_FALSE &&
1654             (vsecp || IS_EPHEMERAL(uid) || IS_EPHEMERAL(gid)))
1655                 return (EINVAL);
1656
1657         ZFS_ENTER(zsb);
1658         ZFS_VERIFY_ZP(dzp);
1659         zilog = zsb->z_log;
1660
1661         if (dzp->z_pflags & ZFS_XATTR) {
1662                 ZFS_EXIT(zsb);
1663                 return (EINVAL);
1664         }
1665
1666         if (zsb->z_utf8 && u8_validate(dirname,
1667             strlen(dirname), NULL, U8_VALIDATE_ENTIRE, &error) < 0) {
1668                 ZFS_EXIT(zsb);
1669                 return (EILSEQ);
1670         }
1671         if (flags & FIGNORECASE)
1672                 zf |= ZCILOOK;
1673
1674         if (vap->va_mask & ATTR_XVATTR) {
1675                 if ((error = secpolicy_xvattr((xvattr_t *)vap,
1676                     crgetuid(cr), cr, vap->va_mode)) != 0) {
1677                         ZFS_EXIT(zsb);
1678                         return (error);
1679                 }
1680         }
1681
1682         if ((error = zfs_acl_ids_create(dzp, 0, vap, cr,
1683             vsecp, &acl_ids)) != 0) {
1684                 ZFS_EXIT(zsb);
1685                 return (error);
1686         }
1687         /*
1688          * First make sure the new directory doesn't exist.
1689          *
1690          * Existence is checked first to make sure we don't return
1691          * EACCES instead of EEXIST which can cause some applications
1692          * to fail.
1693          */
1694 top:
1695         *ipp = NULL;
1696
1697         if ((error = zfs_dirent_lock(&dl, dzp, dirname, &zp, zf,
1698             NULL, NULL))) {
1699                 zfs_acl_ids_free(&acl_ids);
1700                 ZFS_EXIT(zsb);
1701                 return (error);
1702         }
1703
1704         if ((error = zfs_zaccess(dzp, ACE_ADD_SUBDIRECTORY, 0, B_FALSE, cr))) {
1705                 zfs_acl_ids_free(&acl_ids);
1706                 zfs_dirent_unlock(dl);
1707                 ZFS_EXIT(zsb);
1708                 return (error);
1709         }
1710
1711         if (zfs_acl_ids_overquota(zsb, &acl_ids)) {
1712                 zfs_acl_ids_free(&acl_ids);
1713                 zfs_dirent_unlock(dl);
1714                 ZFS_EXIT(zsb);
1715                 return (EDQUOT);
1716         }
1717
1718         /*
1719          * Add a new entry to the directory.
1720          */
1721         tx = dmu_tx_create(zsb->z_os);
1722         dmu_tx_hold_zap(tx, dzp->z_id, TRUE, dirname);
1723         dmu_tx_hold_zap(tx, DMU_NEW_OBJECT, FALSE, NULL);
1724         fuid_dirtied = zsb->z_fuid_dirty;
1725         if (fuid_dirtied)
1726                 zfs_fuid_txhold(zsb, tx);
1727         if (!zsb->z_use_sa && acl_ids.z_aclp->z_acl_bytes > ZFS_ACE_SPACE) {
1728                 dmu_tx_hold_write(tx, DMU_NEW_OBJECT, 0,
1729                     acl_ids.z_aclp->z_acl_bytes);
1730         }
1731
1732         dmu_tx_hold_sa_create(tx, acl_ids.z_aclp->z_acl_bytes +
1733             ZFS_SA_BASE_ATTR_SIZE);
1734
1735         error = dmu_tx_assign(tx, TXG_NOWAIT);
1736         if (error) {
1737                 zfs_dirent_unlock(dl);
1738                 if (error == ERESTART) {
1739                         dmu_tx_wait(tx);
1740                         dmu_tx_abort(tx);
1741                         goto top;
1742                 }
1743                 zfs_acl_ids_free(&acl_ids);
1744                 dmu_tx_abort(tx);
1745                 ZFS_EXIT(zsb);
1746                 return (error);
1747         }
1748
1749         /*
1750          * Create new node.
1751          */
1752         zfs_mknode(dzp, vap, tx, cr, 0, &zp, &acl_ids);
1753
1754         if (fuid_dirtied)
1755                 zfs_fuid_sync(zsb, tx);
1756
1757         /*
1758          * Now put new name in parent dir.
1759          */
1760         (void) zfs_link_create(dl, zp, tx, ZNEW);
1761
1762         *ipp = ZTOI(zp);
1763
1764         txtype = zfs_log_create_txtype(Z_DIR, vsecp, vap);
1765         if (flags & FIGNORECASE)
1766                 txtype |= TX_CI;
1767         zfs_log_create(zilog, tx, txtype, dzp, zp, dirname, vsecp,
1768             acl_ids.z_fuidp, vap);
1769
1770         zfs_acl_ids_free(&acl_ids);
1771
1772         dmu_tx_commit(tx);
1773
1774         zfs_dirent_unlock(dl);
1775
1776         if (zsb->z_os->os_sync == ZFS_SYNC_ALWAYS)
1777                 zil_commit(zilog, 0);
1778
1779         zfs_inode_update(dzp);
1780         zfs_inode_update(zp);
1781         ZFS_EXIT(zsb);
1782         return (0);
1783 }
1784 EXPORT_SYMBOL(zfs_mkdir);
1785
1786 /*
1787  * Remove a directory subdir entry.  If the current working
1788  * directory is the same as the subdir to be removed, the
1789  * remove will fail.
1790  *
1791  *      IN:     dip     - inode of directory to remove from.
1792  *              name    - name of directory to be removed.
1793  *              cwd     - inode of current working directory.
1794  *              cr      - credentials of caller.
1795  *              flags   - case flags
1796  *
1797  *      RETURN: 0 if success
1798  *              error code if failure
1799  *
1800  * Timestamps:
1801  *      dip - ctime|mtime updated
1802  */
1803 /*ARGSUSED*/
1804 int
1805 zfs_rmdir(struct inode *dip, char *name, struct inode *cwd, cred_t *cr,
1806     int flags)
1807 {
1808         znode_t         *dzp = ITOZ(dip);
1809         znode_t         *zp;
1810         struct inode    *ip;
1811         zfs_sb_t        *zsb = ITOZSB(dip);
1812         zilog_t         *zilog;
1813         zfs_dirlock_t   *dl;
1814         dmu_tx_t        *tx;
1815         int             error;
1816         int             zflg = ZEXISTS;
1817
1818         ZFS_ENTER(zsb);
1819         ZFS_VERIFY_ZP(dzp);
1820         zilog = zsb->z_log;
1821
1822         if (flags & FIGNORECASE)
1823                 zflg |= ZCILOOK;
1824 top:
1825         zp = NULL;
1826
1827         /*
1828          * Attempt to lock directory; fail if entry doesn't exist.
1829          */
1830         if ((error = zfs_dirent_lock(&dl, dzp, name, &zp, zflg,
1831             NULL, NULL))) {
1832                 ZFS_EXIT(zsb);
1833                 return (error);
1834         }
1835
1836         ip = ZTOI(zp);
1837
1838         if ((error = zfs_zaccess_delete(dzp, zp, cr))) {
1839                 goto out;
1840         }
1841
1842         if (!S_ISDIR(ip->i_mode)) {
1843                 error = ENOTDIR;
1844                 goto out;
1845         }
1846
1847         if (ip == cwd) {
1848                 error = EINVAL;
1849                 goto out;
1850         }
1851
1852         /*
1853          * Grab a lock on the directory to make sure that noone is
1854          * trying to add (or lookup) entries while we are removing it.
1855          */
1856         rw_enter(&zp->z_name_lock, RW_WRITER);
1857
1858         /*
1859          * Grab a lock on the parent pointer to make sure we play well
1860          * with the treewalk and directory rename code.
1861          */
1862         rw_enter(&zp->z_parent_lock, RW_WRITER);
1863
1864         tx = dmu_tx_create(zsb->z_os);
1865         dmu_tx_hold_zap(tx, dzp->z_id, FALSE, name);
1866         dmu_tx_hold_sa(tx, zp->z_sa_hdl, B_FALSE);
1867         dmu_tx_hold_zap(tx, zsb->z_unlinkedobj, FALSE, NULL);
1868         zfs_sa_upgrade_txholds(tx, zp);
1869         zfs_sa_upgrade_txholds(tx, dzp);
1870         error = dmu_tx_assign(tx, TXG_NOWAIT);
1871         if (error) {
1872                 rw_exit(&zp->z_parent_lock);
1873                 rw_exit(&zp->z_name_lock);
1874                 zfs_dirent_unlock(dl);
1875                 iput(ip);
1876                 if (error == ERESTART) {
1877                         dmu_tx_wait(tx);
1878                         dmu_tx_abort(tx);
1879                         goto top;
1880                 }
1881                 dmu_tx_abort(tx);
1882                 ZFS_EXIT(zsb);
1883                 return (error);
1884         }
1885
1886         error = zfs_link_destroy(dl, zp, tx, zflg, NULL);
1887
1888         if (error == 0) {
1889                 uint64_t txtype = TX_RMDIR;
1890                 if (flags & FIGNORECASE)
1891                         txtype |= TX_CI;
1892                 zfs_log_remove(zilog, tx, txtype, dzp, name, ZFS_NO_OBJECT);
1893         }
1894
1895         dmu_tx_commit(tx);
1896
1897         rw_exit(&zp->z_parent_lock);
1898         rw_exit(&zp->z_name_lock);
1899 out:
1900         zfs_dirent_unlock(dl);
1901
1902         iput(ip);
1903
1904         if (zsb->z_os->os_sync == ZFS_SYNC_ALWAYS)
1905                 zil_commit(zilog, 0);
1906
1907         zfs_inode_update(dzp);
1908         zfs_inode_update(zp);
1909         ZFS_EXIT(zsb);
1910         return (error);
1911 }
1912 EXPORT_SYMBOL(zfs_rmdir);
1913
1914 /*
1915  * Read as many directory entries as will fit into the provided
1916  * dirent buffer from the given directory cursor position.
1917  *
1918  *      IN:     ip      - inode of directory to read.
1919  *              dirent  - buffer for directory entries.
1920  *
1921  *      OUT:    dirent  - filler buffer of directory entries.
1922  *
1923  *      RETURN: 0 if success
1924  *              error code if failure
1925  *
1926  * Timestamps:
1927  *      ip - atime updated
1928  *
1929  * Note that the low 4 bits of the cookie returned by zap is always zero.
1930  * This allows us to use the low range for "special" directory entries:
1931  * We use 0 for '.', and 1 for '..'.  If this is the root of the filesystem,
1932  * we use the offset 2 for the '.zfs' directory.
1933  */
1934 /* ARGSUSED */
1935 int
1936 zfs_readdir(struct inode *ip, void *dirent, filldir_t filldir,
1937     loff_t *pos, cred_t *cr)
1938 {
1939         znode_t         *zp = ITOZ(ip);
1940         zfs_sb_t        *zsb = ITOZSB(ip);
1941         objset_t        *os;
1942         zap_cursor_t    zc;
1943         zap_attribute_t zap;
1944         int             outcount;
1945         int             error;
1946         uint8_t         prefetch;
1947         int             done = 0;
1948         uint64_t        parent;
1949
1950         ZFS_ENTER(zsb);
1951         ZFS_VERIFY_ZP(zp);
1952
1953         if ((error = sa_lookup(zp->z_sa_hdl, SA_ZPL_PARENT(zsb),
1954             &parent, sizeof (parent))) != 0)
1955                 goto out;
1956
1957         /*
1958          * Quit if directory has been removed (posix)
1959          */
1960         error = 0;
1961         if (zp->z_unlinked)
1962                 goto out;
1963
1964         os = zsb->z_os;
1965         prefetch = zp->z_zn_prefetch;
1966
1967         /*
1968          * Initialize the iterator cursor.
1969          */
1970         if (*pos <= 3) {
1971                 /*
1972                  * Start iteration from the beginning of the directory.
1973                  */
1974                 zap_cursor_init(&zc, os, zp->z_id);
1975         } else {
1976                 /*
1977                  * The offset is a serialized cursor.
1978                  */
1979                 zap_cursor_init_serialized(&zc, os, zp->z_id, *pos);
1980         }
1981
1982         /*
1983          * Transform to file-system independent format
1984          */
1985         outcount = 0;
1986
1987         while (!done) {
1988                 uint64_t objnum;
1989                 /*
1990                  * Special case `.', `..', and `.zfs'.
1991                  */
1992                 if (*pos == 0) {
1993                         (void) strcpy(zap.za_name, ".");
1994                         zap.za_normalization_conflict = 0;
1995                         objnum = zp->z_id;
1996                 } else if (*pos == 1) {
1997                         (void) strcpy(zap.za_name, "..");
1998                         zap.za_normalization_conflict = 0;
1999                         objnum = parent;
2000                 } else if (*pos == 2 && zfs_show_ctldir(zp)) {
2001                         (void) strcpy(zap.za_name, ZFS_CTLDIR_NAME);
2002                         zap.za_normalization_conflict = 0;
2003                         objnum = ZFSCTL_INO_ROOT;
2004                 } else {
2005                         /*
2006                          * Grab next entry.
2007                          */
2008                         if ((error = zap_cursor_retrieve(&zc, &zap))) {
2009                                 if (error == ENOENT)
2010                                         break;
2011                                 else
2012                                         goto update;
2013                         }
2014
2015                         if (zap.za_integer_length != 8 ||
2016                             zap.za_num_integers != 1) {
2017                                 cmn_err(CE_WARN, "zap_readdir: bad directory "
2018                                     "entry, obj = %lld, offset = %lld\n",
2019                                     (u_longlong_t)zp->z_id,
2020                                     (u_longlong_t)*pos);
2021                                 error = ENXIO;
2022                                 goto update;
2023                         }
2024
2025                         objnum = ZFS_DIRENT_OBJ(zap.za_first_integer);
2026                 }
2027                 done = filldir(dirent, zap.za_name, strlen(zap.za_name),
2028                                zap_cursor_serialize(&zc), objnum, 0);
2029                 if (done) {
2030                         break;
2031                 }
2032
2033                 /* Prefetch znode */
2034                 if (prefetch) {
2035                         dmu_prefetch(os, objnum, 0, 0);
2036                 }
2037
2038                 if (*pos >= 2) {
2039                         zap_cursor_advance(&zc);
2040                         *pos = zap_cursor_serialize(&zc);
2041                 } else {
2042                         (*pos)++;
2043                 }
2044         }
2045         zp->z_zn_prefetch = B_FALSE; /* a lookup will re-enable pre-fetching */
2046
2047 update:
2048         zap_cursor_fini(&zc);
2049         if (error == ENOENT)
2050                 error = 0;
2051
2052         ZFS_ACCESSTIME_STAMP(zsb, zp);
2053         zfs_inode_update(zp);
2054
2055 out:
2056         ZFS_EXIT(zsb);
2057
2058         return (error);
2059 }
2060 EXPORT_SYMBOL(zfs_readdir);
2061
2062 ulong_t zfs_fsync_sync_cnt = 4;
2063
2064 int
2065 zfs_fsync(struct inode *ip, int syncflag, cred_t *cr)
2066 {
2067         znode_t *zp = ITOZ(ip);
2068         zfs_sb_t *zsb = ITOZSB(ip);
2069
2070         (void) tsd_set(zfs_fsyncer_key, (void *)zfs_fsync_sync_cnt);
2071
2072         if (zsb->z_os->os_sync != ZFS_SYNC_DISABLED) {
2073                 ZFS_ENTER(zsb);
2074                 ZFS_VERIFY_ZP(zp);
2075                 zil_commit(zsb->z_log, zp->z_id);
2076                 ZFS_EXIT(zsb);
2077         }
2078         return (0);
2079 }
2080 EXPORT_SYMBOL(zfs_fsync);
2081
2082
2083 /*
2084  * Get the requested file attributes and place them in the provided
2085  * vattr structure.
2086  *
2087  *      IN:     ip      - inode of file.
2088  *              vap     - va_mask identifies requested attributes.
2089  *                        If ATTR_XVATTR set, then optional attrs are requested
2090  *              flags   - ATTR_NOACLCHECK (CIFS server context)
2091  *              cr      - credentials of caller.
2092  *
2093  *      OUT:    vap     - attribute values.
2094  *
2095  *      RETURN: 0 (always succeeds)
2096  */
2097 /* ARGSUSED */
2098 int
2099 zfs_getattr(struct inode *ip, vattr_t *vap, int flags, cred_t *cr)
2100 {
2101         znode_t *zp = ITOZ(ip);
2102         zfs_sb_t *zsb = ITOZSB(ip);
2103         int     error = 0;
2104         uint64_t links;
2105         uint64_t mtime[2], ctime[2];
2106         xvattr_t *xvap = (xvattr_t *)vap;       /* vap may be an xvattr_t * */
2107         xoptattr_t *xoap = NULL;
2108         boolean_t skipaclchk = (flags & ATTR_NOACLCHECK) ? B_TRUE : B_FALSE;
2109         sa_bulk_attr_t bulk[2];
2110         int count = 0;
2111
2112         ZFS_ENTER(zsb);
2113         ZFS_VERIFY_ZP(zp);
2114
2115         zfs_fuid_map_ids(zp, cr, &vap->va_uid, &vap->va_gid);
2116
2117         SA_ADD_BULK_ATTR(bulk, count, SA_ZPL_MTIME(zsb), NULL, &mtime, 16);
2118         SA_ADD_BULK_ATTR(bulk, count, SA_ZPL_CTIME(zsb), NULL, &ctime, 16);
2119
2120         if ((error = sa_bulk_lookup(zp->z_sa_hdl, bulk, count)) != 0) {
2121                 ZFS_EXIT(zsb);
2122                 return (error);
2123         }
2124
2125         /*
2126          * If ACL is trivial don't bother looking for ACE_READ_ATTRIBUTES.
2127          * Also, if we are the owner don't bother, since owner should
2128          * always be allowed to read basic attributes of file.
2129          */
2130         if (!(zp->z_pflags & ZFS_ACL_TRIVIAL) &&
2131             (vap->va_uid != crgetuid(cr))) {
2132                 if ((error = zfs_zaccess(zp, ACE_READ_ATTRIBUTES, 0,
2133                     skipaclchk, cr))) {
2134                         ZFS_EXIT(zsb);
2135                         return (error);
2136                 }
2137         }
2138
2139         /*
2140          * Return all attributes.  It's cheaper to provide the answer
2141          * than to determine whether we were asked the question.
2142          */
2143
2144         mutex_enter(&zp->z_lock);
2145         vap->va_type = vn_mode_to_vtype(zp->z_mode);
2146         vap->va_mode = zp->z_mode;
2147         vap->va_fsid = ZTOI(zp)->i_sb->s_dev;
2148         vap->va_nodeid = zp->z_id;
2149         if ((zp->z_id == zsb->z_root) && zfs_show_ctldir(zp))
2150                 links = zp->z_links + 1;
2151         else
2152                 links = zp->z_links;
2153         vap->va_nlink = MIN(links, ZFS_LINK_MAX);
2154         vap->va_size = i_size_read(ip);
2155         vap->va_rdev = ip->i_rdev;
2156         vap->va_seq = ip->i_generation;
2157
2158         /*
2159          * Add in any requested optional attributes and the create time.
2160          * Also set the corresponding bits in the returned attribute bitmap.
2161          */
2162         if ((xoap = xva_getxoptattr(xvap)) != NULL && zsb->z_use_fuids) {
2163                 if (XVA_ISSET_REQ(xvap, XAT_ARCHIVE)) {
2164                         xoap->xoa_archive =
2165                             ((zp->z_pflags & ZFS_ARCHIVE) != 0);
2166                         XVA_SET_RTN(xvap, XAT_ARCHIVE);
2167                 }
2168
2169                 if (XVA_ISSET_REQ(xvap, XAT_READONLY)) {
2170                         xoap->xoa_readonly =
2171                             ((zp->z_pflags & ZFS_READONLY) != 0);
2172                         XVA_SET_RTN(xvap, XAT_READONLY);
2173                 }
2174
2175                 if (XVA_ISSET_REQ(xvap, XAT_SYSTEM)) {
2176                         xoap->xoa_system =
2177                             ((zp->z_pflags & ZFS_SYSTEM) != 0);
2178                         XVA_SET_RTN(xvap, XAT_SYSTEM);
2179                 }
2180
2181                 if (XVA_ISSET_REQ(xvap, XAT_HIDDEN)) {
2182                         xoap->xoa_hidden =
2183                             ((zp->z_pflags & ZFS_HIDDEN) != 0);
2184                         XVA_SET_RTN(xvap, XAT_HIDDEN);
2185                 }
2186
2187                 if (XVA_ISSET_REQ(xvap, XAT_NOUNLINK)) {
2188                         xoap->xoa_nounlink =
2189                             ((zp->z_pflags & ZFS_NOUNLINK) != 0);
2190                         XVA_SET_RTN(xvap, XAT_NOUNLINK);
2191                 }
2192
2193                 if (XVA_ISSET_REQ(xvap, XAT_IMMUTABLE)) {
2194                         xoap->xoa_immutable =
2195                             ((zp->z_pflags & ZFS_IMMUTABLE) != 0);
2196                         XVA_SET_RTN(xvap, XAT_IMMUTABLE);
2197                 }
2198
2199                 if (XVA_ISSET_REQ(xvap, XAT_APPENDONLY)) {
2200                         xoap->xoa_appendonly =
2201                             ((zp->z_pflags & ZFS_APPENDONLY) != 0);
2202                         XVA_SET_RTN(xvap, XAT_APPENDONLY);
2203                 }
2204
2205                 if (XVA_ISSET_REQ(xvap, XAT_NODUMP)) {
2206                         xoap->xoa_nodump =
2207                             ((zp->z_pflags & ZFS_NODUMP) != 0);
2208                         XVA_SET_RTN(xvap, XAT_NODUMP);
2209                 }
2210
2211                 if (XVA_ISSET_REQ(xvap, XAT_OPAQUE)) {
2212                         xoap->xoa_opaque =
2213                             ((zp->z_pflags & ZFS_OPAQUE) != 0);
2214                         XVA_SET_RTN(xvap, XAT_OPAQUE);
2215                 }
2216
2217                 if (XVA_ISSET_REQ(xvap, XAT_AV_QUARANTINED)) {
2218                         xoap->xoa_av_quarantined =
2219                             ((zp->z_pflags & ZFS_AV_QUARANTINED) != 0);
2220                         XVA_SET_RTN(xvap, XAT_AV_QUARANTINED);
2221                 }
2222
2223                 if (XVA_ISSET_REQ(xvap, XAT_AV_MODIFIED)) {
2224                         xoap->xoa_av_modified =
2225                             ((zp->z_pflags & ZFS_AV_MODIFIED) != 0);
2226                         XVA_SET_RTN(xvap, XAT_AV_MODIFIED);
2227                 }
2228
2229                 if (XVA_ISSET_REQ(xvap, XAT_AV_SCANSTAMP) &&
2230                     S_ISREG(ip->i_mode)) {
2231                         zfs_sa_get_scanstamp(zp, xvap);
2232                 }
2233
2234                 if (XVA_ISSET_REQ(xvap, XAT_CREATETIME)) {
2235                         uint64_t times[2];
2236
2237                         (void) sa_lookup(zp->z_sa_hdl, SA_ZPL_CRTIME(zsb),
2238                             times, sizeof (times));
2239                         ZFS_TIME_DECODE(&xoap->xoa_createtime, times);
2240                         XVA_SET_RTN(xvap, XAT_CREATETIME);
2241                 }
2242
2243                 if (XVA_ISSET_REQ(xvap, XAT_REPARSE)) {
2244                         xoap->xoa_reparse = ((zp->z_pflags & ZFS_REPARSE) != 0);
2245                         XVA_SET_RTN(xvap, XAT_REPARSE);
2246                 }
2247                 if (XVA_ISSET_REQ(xvap, XAT_GEN)) {
2248                         xoap->xoa_generation = zp->z_gen;
2249                         XVA_SET_RTN(xvap, XAT_GEN);
2250                 }
2251
2252                 if (XVA_ISSET_REQ(xvap, XAT_OFFLINE)) {
2253                         xoap->xoa_offline =
2254                             ((zp->z_pflags & ZFS_OFFLINE) != 0);
2255                         XVA_SET_RTN(xvap, XAT_OFFLINE);
2256                 }
2257
2258                 if (XVA_ISSET_REQ(xvap, XAT_SPARSE)) {
2259                         xoap->xoa_sparse =
2260                             ((zp->z_pflags & ZFS_SPARSE) != 0);
2261                         XVA_SET_RTN(xvap, XAT_SPARSE);
2262                 }
2263         }
2264
2265         ZFS_TIME_DECODE(&vap->va_atime, zp->z_atime);
2266         ZFS_TIME_DECODE(&vap->va_mtime, mtime);
2267         ZFS_TIME_DECODE(&vap->va_ctime, ctime);
2268
2269         mutex_exit(&zp->z_lock);
2270
2271         sa_object_size(zp->z_sa_hdl, &vap->va_blksize, &vap->va_nblocks);
2272
2273         if (zp->z_blksz == 0) {
2274                 /*
2275                  * Block size hasn't been set; suggest maximal I/O transfers.
2276                  */
2277                 vap->va_blksize = zsb->z_max_blksz;
2278         }
2279
2280         ZFS_EXIT(zsb);
2281         return (0);
2282 }
2283 EXPORT_SYMBOL(zfs_getattr);
2284
2285 /*
2286  * Get the basic file attributes and place them in the provided kstat
2287  * structure.  The inode is assumed to be the authoritative source
2288  * for most of the attributes.  However, the znode currently has the
2289  * authoritative atime, blksize, and block count.
2290  *
2291  *      IN:     ip      - inode of file.
2292  *
2293  *      OUT:    sp      - kstat values.
2294  *
2295  *      RETURN: 0 (always succeeds)
2296  */
2297 /* ARGSUSED */
2298 int
2299 zfs_getattr_fast(struct inode *ip, struct kstat *sp)
2300 {
2301         znode_t *zp = ITOZ(ip);
2302         zfs_sb_t *zsb = ITOZSB(ip);
2303
2304         mutex_enter(&zp->z_lock);
2305
2306         generic_fillattr(ip, sp);
2307         ZFS_TIME_DECODE(&sp->atime, zp->z_atime);
2308
2309         sa_object_size(zp->z_sa_hdl, (uint32_t *)&sp->blksize, &sp->blocks);
2310         if (unlikely(zp->z_blksz == 0)) {
2311                 /*
2312                  * Block size hasn't been set; suggest maximal I/O transfers.
2313                  */
2314                 sp->blksize = zsb->z_max_blksz;
2315         }
2316
2317         mutex_exit(&zp->z_lock);
2318
2319         return (0);
2320 }
2321 EXPORT_SYMBOL(zfs_getattr_fast);
2322
2323 /*
2324  * Set the file attributes to the values contained in the
2325  * vattr structure.
2326  *
2327  *      IN:     ip      - inode of file to be modified.
2328  *              vap     - new attribute values.
2329  *                        If ATTR_XVATTR set, then optional attrs are being set
2330  *              flags   - ATTR_UTIME set if non-default time values provided.
2331  *                      - ATTR_NOACLCHECK (CIFS context only).
2332  *              cr      - credentials of caller.
2333  *
2334  *      RETURN: 0 if success
2335  *              error code if failure
2336  *
2337  * Timestamps:
2338  *      ip - ctime updated, mtime updated if size changed.
2339  */
2340 /* ARGSUSED */
2341 int
2342 zfs_setattr(struct inode *ip, vattr_t *vap, int flags, cred_t *cr)
2343 {
2344         znode_t         *zp = ITOZ(ip);
2345         zfs_sb_t        *zsb = ITOZSB(ip);
2346         zilog_t         *zilog;
2347         dmu_tx_t        *tx;
2348         vattr_t         oldva;
2349         xvattr_t        *tmpxvattr;
2350         uint_t          mask = vap->va_mask;
2351         uint_t          saved_mask;
2352         int             trim_mask = 0;
2353         uint64_t        new_mode;
2354         uint64_t        new_uid, new_gid;
2355         uint64_t        xattr_obj;
2356         uint64_t        mtime[2], ctime[2];
2357         znode_t         *attrzp;
2358         int             need_policy = FALSE;
2359         int             err, err2;
2360         zfs_fuid_info_t *fuidp = NULL;
2361         xvattr_t *xvap = (xvattr_t *)vap;       /* vap may be an xvattr_t * */
2362         xoptattr_t      *xoap;
2363         zfs_acl_t       *aclp;
2364         boolean_t skipaclchk = (flags & ATTR_NOACLCHECK) ? B_TRUE : B_FALSE;
2365         boolean_t       fuid_dirtied = B_FALSE;
2366         sa_bulk_attr_t  *bulk, *xattr_bulk;
2367         int             count = 0, xattr_count = 0;
2368
2369         if (mask == 0)
2370                 return (0);
2371
2372         ZFS_ENTER(zsb);
2373         ZFS_VERIFY_ZP(zp);
2374
2375         zilog = zsb->z_log;
2376
2377         /*
2378          * Make sure that if we have ephemeral uid/gid or xvattr specified
2379          * that file system is at proper version level
2380          */
2381
2382         if (zsb->z_use_fuids == B_FALSE &&
2383             (((mask & ATTR_UID) && IS_EPHEMERAL(vap->va_uid)) ||
2384             ((mask & ATTR_GID) && IS_EPHEMERAL(vap->va_gid)) ||
2385             (mask & ATTR_XVATTR))) {
2386                 ZFS_EXIT(zsb);
2387                 return (EINVAL);
2388         }
2389
2390         if (mask & ATTR_SIZE && S_ISDIR(ip->i_mode)) {
2391                 ZFS_EXIT(zsb);
2392                 return (EISDIR);
2393         }
2394
2395         if (mask & ATTR_SIZE && !S_ISREG(ip->i_mode) && !S_ISFIFO(ip->i_mode)) {
2396                 ZFS_EXIT(zsb);
2397                 return (EINVAL);
2398         }
2399
2400         /*
2401          * If this is an xvattr_t, then get a pointer to the structure of
2402          * optional attributes.  If this is NULL, then we have a vattr_t.
2403          */
2404         xoap = xva_getxoptattr(xvap);
2405
2406         tmpxvattr = kmem_alloc(sizeof(xvattr_t), KM_SLEEP);
2407         xva_init(tmpxvattr);
2408
2409         bulk = kmem_alloc(sizeof(sa_bulk_attr_t) * 7, KM_SLEEP);
2410         xattr_bulk = kmem_alloc(sizeof(sa_bulk_attr_t) * 7, KM_SLEEP);
2411
2412         /*
2413          * Immutable files can only alter immutable bit and atime
2414          */
2415         if ((zp->z_pflags & ZFS_IMMUTABLE) &&
2416             ((mask & (ATTR_SIZE|ATTR_UID|ATTR_GID|ATTR_MTIME|ATTR_MODE)) ||
2417             ((mask & ATTR_XVATTR) && XVA_ISSET_REQ(xvap, XAT_CREATETIME)))) {
2418                 err = EPERM;
2419                 goto out3;
2420         }
2421
2422         if ((mask & ATTR_SIZE) && (zp->z_pflags & ZFS_READONLY)) {
2423                 err = EPERM;
2424                 goto out3;
2425         }
2426
2427         /*
2428          * Verify timestamps doesn't overflow 32 bits.
2429          * ZFS can handle large timestamps, but 32bit syscalls can't
2430          * handle times greater than 2039.  This check should be removed
2431          * once large timestamps are fully supported.
2432          */
2433         if (mask & (ATTR_ATIME | ATTR_MTIME)) {
2434                 if (((mask & ATTR_ATIME) && TIMESPEC_OVERFLOW(&vap->va_atime)) ||
2435                     ((mask & ATTR_MTIME) && TIMESPEC_OVERFLOW(&vap->va_mtime))) {
2436                         err = EOVERFLOW;
2437                         goto out3;
2438                 }
2439         }
2440
2441 top:
2442         attrzp = NULL;
2443         aclp = NULL;
2444
2445         /* Can this be moved to before the top label? */
2446         if (zfs_is_readonly(zsb)) {
2447                 err = EROFS;
2448                 goto out3;
2449         }
2450
2451         /*
2452          * First validate permissions
2453          */
2454
2455         if (mask & ATTR_SIZE) {
2456                 err = zfs_zaccess(zp, ACE_WRITE_DATA, 0, skipaclchk, cr);
2457                 if (err)
2458                         goto out3;
2459
2460                 truncate_setsize(ip, vap->va_size);
2461
2462                 /*
2463                  * XXX - Note, we are not providing any open
2464                  * mode flags here (like FNDELAY), so we may
2465                  * block if there are locks present... this
2466                  * should be addressed in openat().
2467                  */
2468                 /* XXX - would it be OK to generate a log record here? */
2469                 err = zfs_freesp(zp, vap->va_size, 0, 0, FALSE);
2470                 if (err)
2471                         goto out3;
2472         }
2473
2474         if (mask & (ATTR_ATIME|ATTR_MTIME) ||
2475             ((mask & ATTR_XVATTR) && (XVA_ISSET_REQ(xvap, XAT_HIDDEN) ||
2476             XVA_ISSET_REQ(xvap, XAT_READONLY) ||
2477             XVA_ISSET_REQ(xvap, XAT_ARCHIVE) ||
2478             XVA_ISSET_REQ(xvap, XAT_OFFLINE) ||
2479             XVA_ISSET_REQ(xvap, XAT_SPARSE) ||
2480             XVA_ISSET_REQ(xvap, XAT_CREATETIME) ||
2481             XVA_ISSET_REQ(xvap, XAT_SYSTEM)))) {
2482                 need_policy = zfs_zaccess(zp, ACE_WRITE_ATTRIBUTES, 0,
2483                     skipaclchk, cr);
2484         }
2485
2486         if (mask & (ATTR_UID|ATTR_GID)) {
2487                 int     idmask = (mask & (ATTR_UID|ATTR_GID));
2488                 int     take_owner;
2489                 int     take_group;
2490
2491                 /*
2492                  * NOTE: even if a new mode is being set,
2493                  * we may clear S_ISUID/S_ISGID bits.
2494                  */
2495
2496                 if (!(mask & ATTR_MODE))
2497                         vap->va_mode = zp->z_mode;
2498
2499                 /*
2500                  * Take ownership or chgrp to group we are a member of
2501                  */
2502
2503                 take_owner = (mask & ATTR_UID) && (vap->va_uid == crgetuid(cr));
2504                 take_group = (mask & ATTR_GID) &&
2505                     zfs_groupmember(zsb, vap->va_gid, cr);
2506
2507                 /*
2508                  * If both ATTR_UID and ATTR_GID are set then take_owner and
2509                  * take_group must both be set in order to allow taking
2510                  * ownership.
2511                  *
2512                  * Otherwise, send the check through secpolicy_vnode_setattr()
2513                  *
2514                  */
2515
2516                 if (((idmask == (ATTR_UID|ATTR_GID)) &&
2517                     take_owner && take_group) ||
2518                     ((idmask == ATTR_UID) && take_owner) ||
2519                     ((idmask == ATTR_GID) && take_group)) {
2520                         if (zfs_zaccess(zp, ACE_WRITE_OWNER, 0,
2521                             skipaclchk, cr) == 0) {
2522                                 /*
2523                                  * Remove setuid/setgid for non-privileged users
2524                                  */
2525                                 (void) secpolicy_setid_clear(vap, cr);
2526                                 trim_mask = (mask & (ATTR_UID|ATTR_GID));
2527                         } else {
2528                                 need_policy =  TRUE;
2529                         }
2530                 } else {
2531                         need_policy =  TRUE;
2532                 }
2533         }
2534
2535         mutex_enter(&zp->z_lock);
2536         oldva.va_mode = zp->z_mode;
2537         zfs_fuid_map_ids(zp, cr, &oldva.va_uid, &oldva.va_gid);
2538         if (mask & ATTR_XVATTR) {
2539                 /*
2540                  * Update xvattr mask to include only those attributes
2541                  * that are actually changing.
2542                  *
2543                  * the bits will be restored prior to actually setting
2544                  * the attributes so the caller thinks they were set.
2545                  */
2546                 if (XVA_ISSET_REQ(xvap, XAT_APPENDONLY)) {
2547                         if (xoap->xoa_appendonly !=
2548                             ((zp->z_pflags & ZFS_APPENDONLY) != 0)) {
2549                                 need_policy = TRUE;
2550                         } else {
2551                                 XVA_CLR_REQ(xvap, XAT_APPENDONLY);
2552                                 XVA_SET_REQ(tmpxvattr, XAT_APPENDONLY);
2553                         }
2554                 }
2555
2556                 if (XVA_ISSET_REQ(xvap, XAT_NOUNLINK)) {
2557                         if (xoap->xoa_nounlink !=
2558                             ((zp->z_pflags & ZFS_NOUNLINK) != 0)) {
2559                                 need_policy = TRUE;
2560                         } else {
2561                                 XVA_CLR_REQ(xvap, XAT_NOUNLINK);
2562                                 XVA_SET_REQ(tmpxvattr, XAT_NOUNLINK);
2563                         }
2564                 }
2565
2566                 if (XVA_ISSET_REQ(xvap, XAT_IMMUTABLE)) {
2567                         if (xoap->xoa_immutable !=
2568                             ((zp->z_pflags & ZFS_IMMUTABLE) != 0)) {
2569                                 need_policy = TRUE;
2570                         } else {
2571                                 XVA_CLR_REQ(xvap, XAT_IMMUTABLE);
2572                                 XVA_SET_REQ(tmpxvattr, XAT_IMMUTABLE);
2573                         }
2574                 }
2575
2576                 if (XVA_ISSET_REQ(xvap, XAT_NODUMP)) {
2577                         if (xoap->xoa_nodump !=
2578                             ((zp->z_pflags & ZFS_NODUMP) != 0)) {
2579                                 need_policy = TRUE;
2580                         } else {
2581                                 XVA_CLR_REQ(xvap, XAT_NODUMP);
2582                                 XVA_SET_REQ(tmpxvattr, XAT_NODUMP);
2583                         }
2584                 }
2585
2586                 if (XVA_ISSET_REQ(xvap, XAT_AV_MODIFIED)) {
2587                         if (xoap->xoa_av_modified !=
2588                             ((zp->z_pflags & ZFS_AV_MODIFIED) != 0)) {
2589                                 need_policy = TRUE;
2590                         } else {
2591                                 XVA_CLR_REQ(xvap, XAT_AV_MODIFIED);
2592                                 XVA_SET_REQ(tmpxvattr, XAT_AV_MODIFIED);
2593                         }
2594                 }
2595
2596                 if (XVA_ISSET_REQ(xvap, XAT_AV_QUARANTINED)) {
2597                         if ((!S_ISREG(ip->i_mode) &&
2598                             xoap->xoa_av_quarantined) ||
2599                             xoap->xoa_av_quarantined !=
2600                             ((zp->z_pflags & ZFS_AV_QUARANTINED) != 0)) {
2601                                 need_policy = TRUE;
2602                         } else {
2603                                 XVA_CLR_REQ(xvap, XAT_AV_QUARANTINED);
2604                                 XVA_SET_REQ(tmpxvattr, XAT_AV_QUARANTINED);
2605                         }
2606                 }
2607
2608                 if (XVA_ISSET_REQ(xvap, XAT_REPARSE)) {
2609                         mutex_exit(&zp->z_lock);
2610                         err = EPERM;
2611                         goto out3;
2612                 }
2613
2614                 if (need_policy == FALSE &&
2615                     (XVA_ISSET_REQ(xvap, XAT_AV_SCANSTAMP) ||
2616                     XVA_ISSET_REQ(xvap, XAT_OPAQUE))) {
2617                         need_policy = TRUE;
2618                 }
2619         }
2620
2621         mutex_exit(&zp->z_lock);
2622
2623         if (mask & ATTR_MODE) {
2624                 if (zfs_zaccess(zp, ACE_WRITE_ACL, 0, skipaclchk, cr) == 0) {
2625                         err = secpolicy_setid_setsticky_clear(ip, vap,
2626                             &oldva, cr);
2627                         if (err)
2628                                 goto out3;
2629
2630                         trim_mask |= ATTR_MODE;
2631                 } else {
2632                         need_policy = TRUE;
2633                 }
2634         }
2635
2636         if (need_policy) {
2637                 /*
2638                  * If trim_mask is set then take ownership
2639                  * has been granted or write_acl is present and user
2640                  * has the ability to modify mode.  In that case remove
2641                  * UID|GID and or MODE from mask so that
2642                  * secpolicy_vnode_setattr() doesn't revoke it.
2643                  */
2644
2645                 if (trim_mask) {
2646                         saved_mask = vap->va_mask;
2647                         vap->va_mask &= ~trim_mask;
2648                 }
2649                 err = secpolicy_vnode_setattr(cr, ip, vap, &oldva, flags,
2650                     (int (*)(void *, int, cred_t *))zfs_zaccess_unix, zp);
2651                 if (err)
2652                         goto out3;
2653
2654                 if (trim_mask)
2655                         vap->va_mask |= saved_mask;
2656         }
2657
2658         /*
2659          * secpolicy_vnode_setattr, or take ownership may have
2660          * changed va_mask
2661          */
2662         mask = vap->va_mask;
2663
2664         if ((mask & (ATTR_UID | ATTR_GID))) {
2665                 err = sa_lookup(zp->z_sa_hdl, SA_ZPL_XATTR(zsb),
2666                     &xattr_obj, sizeof (xattr_obj));
2667
2668                 if (err == 0 && xattr_obj) {
2669                         err = zfs_zget(ZTOZSB(zp), xattr_obj, &attrzp);
2670                         if (err)
2671                                 goto out2;
2672                 }
2673                 if (mask & ATTR_UID) {
2674                         new_uid = zfs_fuid_create(zsb,
2675                             (uint64_t)vap->va_uid, cr, ZFS_OWNER, &fuidp);
2676                         if (new_uid != zp->z_uid &&
2677                             zfs_fuid_overquota(zsb, B_FALSE, new_uid)) {
2678                                 if (attrzp)
2679                                         iput(ZTOI(attrzp));
2680                                 err = EDQUOT;
2681                                 goto out2;
2682                         }
2683                 }
2684
2685                 if (mask & ATTR_GID) {
2686                         new_gid = zfs_fuid_create(zsb, (uint64_t)vap->va_gid,
2687                             cr, ZFS_GROUP, &fuidp);
2688                         if (new_gid != zp->z_gid &&
2689                             zfs_fuid_overquota(zsb, B_TRUE, new_gid)) {
2690                                 if (attrzp)
2691                                         iput(ZTOI(attrzp));
2692                                 err = EDQUOT;
2693                                 goto out2;
2694                         }
2695                 }
2696         }
2697         tx = dmu_tx_create(zsb->z_os);
2698
2699         if (mask & ATTR_MODE) {
2700                 uint64_t pmode = zp->z_mode;
2701                 uint64_t acl_obj;
2702                 new_mode = (pmode & S_IFMT) | (vap->va_mode & ~S_IFMT);
2703
2704                 zfs_acl_chmod_setattr(zp, &aclp, new_mode);
2705
2706                 mutex_enter(&zp->z_lock);
2707                 if (!zp->z_is_sa && ((acl_obj = zfs_external_acl(zp)) != 0)) {
2708                         /*
2709                          * Are we upgrading ACL from old V0 format
2710                          * to V1 format?
2711                          */
2712                         if (zsb->z_version >= ZPL_VERSION_FUID &&
2713                             zfs_znode_acl_version(zp) ==
2714                             ZFS_ACL_VERSION_INITIAL) {
2715                                 dmu_tx_hold_free(tx, acl_obj, 0,
2716                                     DMU_OBJECT_END);
2717                                 dmu_tx_hold_write(tx, DMU_NEW_OBJECT,
2718                                     0, aclp->z_acl_bytes);
2719                         } else {
2720                                 dmu_tx_hold_write(tx, acl_obj, 0,
2721                                     aclp->z_acl_bytes);
2722                         }
2723                 } else if (!zp->z_is_sa && aclp->z_acl_bytes > ZFS_ACE_SPACE) {
2724                         dmu_tx_hold_write(tx, DMU_NEW_OBJECT,
2725                             0, aclp->z_acl_bytes);
2726                 }
2727                 mutex_exit(&zp->z_lock);
2728                 dmu_tx_hold_sa(tx, zp->z_sa_hdl, B_TRUE);
2729         } else {
2730                 if ((mask & ATTR_XVATTR) &&
2731                     XVA_ISSET_REQ(xvap, XAT_AV_SCANSTAMP))
2732                         dmu_tx_hold_sa(tx, zp->z_sa_hdl, B_TRUE);
2733                 else
2734                         dmu_tx_hold_sa(tx, zp->z_sa_hdl, B_FALSE);
2735         }
2736
2737         if (attrzp) {
2738                 dmu_tx_hold_sa(tx, attrzp->z_sa_hdl, B_FALSE);
2739         }
2740
2741         fuid_dirtied = zsb->z_fuid_dirty;
2742         if (fuid_dirtied)
2743                 zfs_fuid_txhold(zsb, tx);
2744
2745         zfs_sa_upgrade_txholds(tx, zp);
2746
2747         err = dmu_tx_assign(tx, TXG_NOWAIT);
2748         if (err) {
2749                 if (err == ERESTART)
2750                         dmu_tx_wait(tx);
2751                 goto out;
2752         }
2753
2754         count = 0;
2755         /*
2756          * Set each attribute requested.
2757          * We group settings according to the locks they need to acquire.
2758          *
2759          * Note: you cannot set ctime directly, although it will be
2760          * updated as a side-effect of calling this function.
2761          */
2762
2763
2764         if (mask & (ATTR_UID|ATTR_GID|ATTR_MODE))
2765                 mutex_enter(&zp->z_acl_lock);
2766         mutex_enter(&zp->z_lock);
2767
2768         SA_ADD_BULK_ATTR(bulk, count, SA_ZPL_FLAGS(zsb), NULL,
2769             &zp->z_pflags, sizeof (zp->z_pflags));
2770
2771         if (attrzp) {
2772                 if (mask & (ATTR_UID|ATTR_GID|ATTR_MODE))
2773                         mutex_enter(&attrzp->z_acl_lock);
2774                 mutex_enter(&attrzp->z_lock);
2775                 SA_ADD_BULK_ATTR(xattr_bulk, xattr_count,
2776                     SA_ZPL_FLAGS(zsb), NULL, &attrzp->z_pflags,
2777                     sizeof (attrzp->z_pflags));
2778         }
2779
2780         if (mask & (ATTR_UID|ATTR_GID)) {
2781
2782                 if (mask & ATTR_UID) {
2783                         SA_ADD_BULK_ATTR(bulk, count, SA_ZPL_UID(zsb), NULL,
2784                             &new_uid, sizeof (new_uid));
2785                         zp->z_uid = new_uid;
2786                         if (attrzp) {
2787                                 SA_ADD_BULK_ATTR(xattr_bulk, xattr_count,
2788                                     SA_ZPL_UID(zsb), NULL, &new_uid,
2789                                     sizeof (new_uid));
2790                                 attrzp->z_uid = new_uid;
2791                         }
2792                 }
2793
2794                 if (mask & ATTR_GID) {
2795                         SA_ADD_BULK_ATTR(bulk, count, SA_ZPL_GID(zsb),
2796                             NULL, &new_gid, sizeof (new_gid));
2797                         zp->z_gid = new_gid;
2798                         if (attrzp) {
2799                                 SA_ADD_BULK_ATTR(xattr_bulk, xattr_count,
2800                                     SA_ZPL_GID(zsb), NULL, &new_gid,
2801                                     sizeof (new_gid));
2802                                 attrzp->z_gid = new_gid;
2803                         }
2804                 }
2805                 if (!(mask & ATTR_MODE)) {
2806                         SA_ADD_BULK_ATTR(bulk, count, SA_ZPL_MODE(zsb),
2807                             NULL, &new_mode, sizeof (new_mode));
2808                         new_mode = zp->z_mode;
2809                 }
2810                 err = zfs_acl_chown_setattr(zp);
2811                 ASSERT(err == 0);
2812                 if (attrzp) {
2813                         err = zfs_acl_chown_setattr(attrzp);
2814                         ASSERT(err == 0);
2815                 }
2816         }
2817
2818         if (mask & ATTR_MODE) {
2819                 SA_ADD_BULK_ATTR(bulk, count, SA_ZPL_MODE(zsb), NULL,
2820                     &new_mode, sizeof (new_mode));
2821                 zp->z_mode = new_mode;
2822                 ASSERT3P(aclp, !=, NULL);
2823                 err = zfs_aclset_common(zp, aclp, cr, tx);
2824                 ASSERT3U(err, ==, 0);
2825                 if (zp->z_acl_cached)
2826                         zfs_acl_free(zp->z_acl_cached);
2827                 zp->z_acl_cached = aclp;
2828                 aclp = NULL;
2829         }
2830
2831
2832         if (mask & ATTR_ATIME) {
2833                 ZFS_TIME_ENCODE(&vap->va_atime, zp->z_atime);
2834                 SA_ADD_BULK_ATTR(bulk, count, SA_ZPL_ATIME(zsb), NULL,
2835                     &zp->z_atime, sizeof (zp->z_atime));
2836         }
2837
2838         if (mask & ATTR_MTIME) {
2839                 ZFS_TIME_ENCODE(&vap->va_mtime, mtime);
2840                 SA_ADD_BULK_ATTR(bulk, count, SA_ZPL_MTIME(zsb), NULL,
2841                     mtime, sizeof (mtime));
2842         }
2843
2844         /* XXX - shouldn't this be done *before* the ATIME/MTIME checks? */
2845         if (mask & ATTR_SIZE && !(mask & ATTR_MTIME)) {
2846                 SA_ADD_BULK_ATTR(bulk, count, SA_ZPL_MTIME(zsb),
2847                     NULL, mtime, sizeof (mtime));
2848                 SA_ADD_BULK_ATTR(bulk, count, SA_ZPL_CTIME(zsb), NULL,
2849                     &ctime, sizeof (ctime));
2850                 zfs_tstamp_update_setup(zp, CONTENT_MODIFIED, mtime, ctime,
2851                     B_TRUE);
2852         } else if (mask != 0) {
2853                 SA_ADD_BULK_ATTR(bulk, count, SA_ZPL_CTIME(zsb), NULL,
2854                     &ctime, sizeof (ctime));
2855                 zfs_tstamp_update_setup(zp, STATE_CHANGED, mtime, ctime,
2856                     B_TRUE);
2857                 if (attrzp) {
2858                         SA_ADD_BULK_ATTR(xattr_bulk, xattr_count,
2859                             SA_ZPL_CTIME(zsb), NULL,
2860                             &ctime, sizeof (ctime));
2861                         zfs_tstamp_update_setup(attrzp, STATE_CHANGED,
2862                             mtime, ctime, B_TRUE);
2863                 }
2864         }
2865         /*
2866          * Do this after setting timestamps to prevent timestamp
2867          * update from toggling bit
2868          */
2869
2870         if (xoap && (mask & ATTR_XVATTR)) {
2871
2872                 /*
2873                  * restore trimmed off masks
2874                  * so that return masks can be set for caller.
2875                  */
2876
2877                 if (XVA_ISSET_REQ(tmpxvattr, XAT_APPENDONLY)) {
2878                         XVA_SET_REQ(xvap, XAT_APPENDONLY);
2879                 }
2880                 if (XVA_ISSET_REQ(tmpxvattr, XAT_NOUNLINK)) {
2881                         XVA_SET_REQ(xvap, XAT_NOUNLINK);
2882                 }
2883                 if (XVA_ISSET_REQ(tmpxvattr, XAT_IMMUTABLE)) {
2884                         XVA_SET_REQ(xvap, XAT_IMMUTABLE);
2885                 }
2886                 if (XVA_ISSET_REQ(tmpxvattr, XAT_NODUMP)) {
2887                         XVA_SET_REQ(xvap, XAT_NODUMP);
2888                 }
2889                 if (XVA_ISSET_REQ(tmpxvattr, XAT_AV_MODIFIED)) {
2890                         XVA_SET_REQ(xvap, XAT_AV_MODIFIED);
2891                 }
2892                 if (XVA_ISSET_REQ(tmpxvattr, XAT_AV_QUARANTINED)) {
2893                         XVA_SET_REQ(xvap, XAT_AV_QUARANTINED);
2894                 }
2895
2896                 if (XVA_ISSET_REQ(xvap, XAT_AV_SCANSTAMP))
2897                         ASSERT(S_ISREG(ip->i_mode));
2898
2899                 zfs_xvattr_set(zp, xvap, tx);
2900         }
2901
2902         if (fuid_dirtied)
2903                 zfs_fuid_sync(zsb, tx);
2904
2905         if (mask != 0)
2906                 zfs_log_setattr(zilog, tx, TX_SETATTR, zp, vap, mask, fuidp);
2907
2908         mutex_exit(&zp->z_lock);
2909         if (mask & (ATTR_UID|ATTR_GID|ATTR_MODE))
2910                 mutex_exit(&zp->z_acl_lock);
2911
2912         if (attrzp) {
2913                 if (mask & (ATTR_UID|ATTR_GID|ATTR_MODE))
2914                         mutex_exit(&attrzp->z_acl_lock);
2915                 mutex_exit(&attrzp->z_lock);
2916         }
2917 out:
2918         if (err == 0 && attrzp) {
2919                 err2 = sa_bulk_update(attrzp->z_sa_hdl, xattr_bulk,
2920                     xattr_count, tx);
2921                 ASSERT(err2 == 0);
2922         }
2923
2924         if (attrzp)
2925                 iput(ZTOI(attrzp));
2926         if (aclp)
2927                 zfs_acl_free(aclp);
2928
2929         if (fuidp) {
2930                 zfs_fuid_info_free(fuidp);
2931                 fuidp = NULL;
2932         }
2933
2934         if (err) {
2935                 dmu_tx_abort(tx);
2936                 if (err == ERESTART)
2937                         goto top;
2938         } else {
2939                 err2 = sa_bulk_update(zp->z_sa_hdl, bulk, count, tx);
2940                 dmu_tx_commit(tx);
2941                 zfs_inode_update(zp);
2942         }
2943
2944 out2:
2945         if (zsb->z_os->os_sync == ZFS_SYNC_ALWAYS)
2946                 zil_commit(zilog, 0);
2947
2948 out3:
2949         kmem_free(xattr_bulk, sizeof(sa_bulk_attr_t) * 7);
2950         kmem_free(bulk, sizeof(sa_bulk_attr_t) * 7);
2951         kmem_free(tmpxvattr, sizeof(xvattr_t));
2952         ZFS_EXIT(zsb);
2953         return (err);
2954 }
2955 EXPORT_SYMBOL(zfs_setattr);
2956
2957 typedef struct zfs_zlock {
2958         krwlock_t       *zl_rwlock;     /* lock we acquired */
2959         znode_t         *zl_znode;      /* znode we held */
2960         struct zfs_zlock *zl_next;      /* next in list */
2961 } zfs_zlock_t;
2962
2963 /*
2964  * Drop locks and release vnodes that were held by zfs_rename_lock().
2965  */
2966 static void
2967 zfs_rename_unlock(zfs_zlock_t **zlpp)
2968 {
2969         zfs_zlock_t *zl;
2970
2971         while ((zl = *zlpp) != NULL) {
2972                 if (zl->zl_znode != NULL)
2973                         iput(ZTOI(zl->zl_znode));
2974                 rw_exit(zl->zl_rwlock);
2975                 *zlpp = zl->zl_next;
2976                 kmem_free(zl, sizeof (*zl));
2977         }
2978 }
2979
2980 /*
2981  * Search back through the directory tree, using the ".." entries.
2982  * Lock each directory in the chain to prevent concurrent renames.
2983  * Fail any attempt to move a directory into one of its own descendants.
2984  * XXX - z_parent_lock can overlap with map or grow locks
2985  */
2986 static int
2987 zfs_rename_lock(znode_t *szp, znode_t *tdzp, znode_t *sdzp, zfs_zlock_t **zlpp)
2988 {
2989         zfs_zlock_t     *zl;
2990         znode_t         *zp = tdzp;
2991         uint64_t        rootid = ZTOZSB(zp)->z_root;
2992         uint64_t        oidp = zp->z_id;
2993         krwlock_t       *rwlp = &szp->z_parent_lock;
2994         krw_t           rw = RW_WRITER;
2995
2996         /*
2997          * First pass write-locks szp and compares to zp->z_id.
2998          * Later passes read-lock zp and compare to zp->z_parent.
2999          */
3000         do {
3001                 if (!rw_tryenter(rwlp, rw)) {
3002                         /*
3003                          * Another thread is renaming in this path.
3004                          * Note that if we are a WRITER, we don't have any
3005                          * parent_locks held yet.
3006                          */
3007                         if (rw == RW_READER && zp->z_id > szp->z_id) {
3008                                 /*
3009                                  * Drop our locks and restart
3010                                  */
3011                                 zfs_rename_unlock(&zl);
3012                                 *zlpp = NULL;
3013                                 zp = tdzp;
3014                                 oidp = zp->z_id;
3015                                 rwlp = &szp->z_parent_lock;
3016                                 rw = RW_WRITER;
3017                                 continue;
3018                         } else {
3019                                 /*
3020                                  * Wait for other thread to drop its locks
3021                                  */
3022                                 rw_enter(rwlp, rw);
3023                         }
3024                 }
3025
3026                 zl = kmem_alloc(sizeof (*zl), KM_SLEEP);
3027                 zl->zl_rwlock = rwlp;
3028                 zl->zl_znode = NULL;
3029                 zl->zl_next = *zlpp;
3030                 *zlpp = zl;
3031
3032                 if (oidp == szp->z_id)          /* We're a descendant of szp */
3033                         return (EINVAL);
3034
3035                 if (oidp == rootid)             /* We've hit the top */
3036                         return (0);
3037
3038                 if (rw == RW_READER) {          /* i.e. not the first pass */
3039                         int error = zfs_zget(ZTOZSB(zp), oidp, &zp);
3040                         if (error)
3041                                 return (error);
3042                         zl->zl_znode = zp;
3043                 }
3044                 (void) sa_lookup(zp->z_sa_hdl, SA_ZPL_PARENT(ZTOZSB(zp)),
3045                     &oidp, sizeof (oidp));
3046                 rwlp = &zp->z_parent_lock;
3047                 rw = RW_READER;
3048
3049         } while (zp->z_id != sdzp->z_id);
3050
3051         return (0);
3052 }
3053
3054 /*
3055  * Move an entry from the provided source directory to the target
3056  * directory.  Change the entry name as indicated.
3057  *
3058  *      IN:     sdip    - Source directory containing the "old entry".
3059  *              snm     - Old entry name.
3060  *              tdip    - Target directory to contain the "new entry".
3061  *              tnm     - New entry name.
3062  *              cr      - credentials of caller.
3063  *              flags   - case flags
3064  *
3065  *      RETURN: 0 if success
3066  *              error code if failure
3067  *
3068  * Timestamps:
3069  *      sdip,tdip - ctime|mtime updated
3070  */
3071 /*ARGSUSED*/
3072 int
3073 zfs_rename(struct inode *sdip, char *snm, struct inode *tdip, char *tnm,
3074     cred_t *cr, int flags)
3075 {
3076         znode_t         *tdzp, *szp, *tzp;
3077         znode_t         *sdzp = ITOZ(sdip);
3078         zfs_sb_t        *zsb = ITOZSB(sdip);
3079         zilog_t         *zilog;
3080         zfs_dirlock_t   *sdl, *tdl;
3081         dmu_tx_t        *tx;
3082         zfs_zlock_t     *zl;
3083         int             cmp, serr, terr;
3084         int             error = 0;
3085         int             zflg = 0;
3086
3087         ZFS_ENTER(zsb);
3088         ZFS_VERIFY_ZP(sdzp);
3089         zilog = zsb->z_log;
3090
3091         if (tdip->i_sb != sdip->i_sb) {
3092                 ZFS_EXIT(zsb);
3093                 return (EXDEV);
3094         }
3095
3096         tdzp = ITOZ(tdip);
3097         ZFS_VERIFY_ZP(tdzp);
3098         if (zsb->z_utf8 && u8_validate(tnm,
3099             strlen(tnm), NULL, U8_VALIDATE_ENTIRE, &error) < 0) {
3100                 ZFS_EXIT(zsb);
3101                 return (EILSEQ);
3102         }
3103
3104         if (flags & FIGNORECASE)
3105                 zflg |= ZCILOOK;
3106
3107 top:
3108         szp = NULL;
3109         tzp = NULL;
3110         zl = NULL;
3111
3112         /*
3113          * This is to prevent the creation of links into attribute space
3114          * by renaming a linked file into/outof an attribute directory.
3115          * See the comment in zfs_link() for why this is considered bad.
3116          */
3117         if ((tdzp->z_pflags & ZFS_XATTR) != (sdzp->z_pflags & ZFS_XATTR)) {
3118                 ZFS_EXIT(zsb);
3119                 return (EINVAL);
3120         }
3121
3122         /*
3123          * Lock source and target directory entries.  To prevent deadlock,
3124          * a lock ordering must be defined.  We lock the directory with
3125          * the smallest object id first, or if it's a tie, the one with
3126          * the lexically first name.
3127          */
3128         if (sdzp->z_id < tdzp->z_id) {
3129                 cmp = -1;
3130         } else if (sdzp->z_id > tdzp->z_id) {
3131                 cmp = 1;
3132         } else {
3133                 /*
3134                  * First compare the two name arguments without
3135                  * considering any case folding.
3136                  */
3137                 int nofold = (zsb->z_norm & ~U8_TEXTPREP_TOUPPER);
3138
3139                 cmp = u8_strcmp(snm, tnm, 0, nofold, U8_UNICODE_LATEST, &error);
3140                 ASSERT(error == 0 || !zsb->z_utf8);
3141                 if (cmp == 0) {
3142                         /*
3143                          * POSIX: "If the old argument and the new argument
3144                          * both refer to links to the same existing file,
3145                          * the rename() function shall return successfully
3146                          * and perform no other action."
3147                          */
3148                         ZFS_EXIT(zsb);
3149                         return (0);
3150                 }
3151                 /*
3152                  * If the file system is case-folding, then we may
3153                  * have some more checking to do.  A case-folding file
3154                  * system is either supporting mixed case sensitivity
3155                  * access or is completely case-insensitive.  Note
3156                  * that the file system is always case preserving.
3157                  *
3158                  * In mixed sensitivity mode case sensitive behavior
3159                  * is the default.  FIGNORECASE must be used to
3160                  * explicitly request case insensitive behavior.
3161                  *
3162                  * If the source and target names provided differ only
3163                  * by case (e.g., a request to rename 'tim' to 'Tim'),
3164                  * we will treat this as a special case in the
3165                  * case-insensitive mode: as long as the source name
3166                  * is an exact match, we will allow this to proceed as
3167                  * a name-change request.
3168                  */
3169                 if ((zsb->z_case == ZFS_CASE_INSENSITIVE ||
3170                     (zsb->z_case == ZFS_CASE_MIXED &&
3171                     flags & FIGNORECASE)) &&
3172                     u8_strcmp(snm, tnm, 0, zsb->z_norm, U8_UNICODE_LATEST,
3173                     &error) == 0) {
3174                         /*
3175                          * case preserving rename request, require exact
3176                          * name matches
3177                          */
3178                         zflg |= ZCIEXACT;
3179                         zflg &= ~ZCILOOK;
3180                 }
3181         }
3182
3183         /*
3184          * If the source and destination directories are the same, we should
3185          * grab the z_name_lock of that directory only once.
3186          */
3187         if (sdzp == tdzp) {
3188                 zflg |= ZHAVELOCK;
3189                 rw_enter(&sdzp->z_name_lock, RW_READER);
3190         }
3191
3192         if (cmp < 0) {
3193                 serr = zfs_dirent_lock(&sdl, sdzp, snm, &szp,
3194                     ZEXISTS | zflg, NULL, NULL);
3195                 terr = zfs_dirent_lock(&tdl,
3196                     tdzp, tnm, &tzp, ZRENAMING | zflg, NULL, NULL);
3197         } else {
3198                 terr = zfs_dirent_lock(&tdl,
3199                     tdzp, tnm, &tzp, zflg, NULL, NULL);
3200                 serr = zfs_dirent_lock(&sdl,
3201                     sdzp, snm, &szp, ZEXISTS | ZRENAMING | zflg,
3202                     NULL, NULL);
3203         }
3204
3205         if (serr) {
3206                 /*
3207                  * Source entry invalid or not there.
3208                  */
3209                 if (!terr) {
3210                         zfs_dirent_unlock(tdl);
3211                         if (tzp)
3212                                 iput(ZTOI(tzp));
3213                 }
3214
3215                 if (sdzp == tdzp)
3216                         rw_exit(&sdzp->z_name_lock);
3217
3218                 if (strcmp(snm, "..") == 0)
3219                         serr = EINVAL;
3220                 ZFS_EXIT(zsb);
3221                 return (serr);
3222         }
3223         if (terr) {
3224                 zfs_dirent_unlock(sdl);
3225                 iput(ZTOI(szp));
3226
3227                 if (sdzp == tdzp)
3228                         rw_exit(&sdzp->z_name_lock);
3229
3230                 if (strcmp(tnm, "..") == 0)
3231                         terr = EINVAL;
3232                 ZFS_EXIT(zsb);
3233                 return (terr);
3234         }
3235
3236         /*
3237          * Must have write access at the source to remove the old entry
3238          * and write access at the target to create the new entry.
3239          * Note that if target and source are the same, this can be
3240          * done in a single check.
3241          */
3242
3243         if ((error = zfs_zaccess_rename(sdzp, szp, tdzp, tzp, cr)))
3244                 goto out;
3245
3246         if (S_ISDIR(ZTOI(szp)->i_mode)) {
3247                 /*
3248                  * Check to make sure rename is valid.
3249                  * Can't do a move like this: /usr/a/b to /usr/a/b/c/d
3250                  */
3251                 if ((error = zfs_rename_lock(szp, tdzp, sdzp, &zl)))
3252                         goto out;
3253         }
3254
3255         /*
3256          * Does target exist?
3257          */
3258         if (tzp) {
3259                 /*
3260                  * Source and target must be the same type.
3261                  */
3262                 if (S_ISDIR(ZTOI(szp)->i_mode)) {
3263                         if (!S_ISDIR(ZTOI(tzp)->i_mode)) {
3264                                 error = ENOTDIR;
3265                                 goto out;
3266                         }
3267                 } else {
3268                         if (S_ISDIR(ZTOI(tzp)->i_mode)) {
3269                                 error = EISDIR;
3270                                 goto out;
3271                         }
3272                 }
3273                 /*
3274                  * POSIX dictates that when the source and target
3275                  * entries refer to the same file object, rename
3276                  * must do nothing and exit without error.
3277                  */
3278                 if (szp->z_id == tzp->z_id) {
3279                         error = 0;
3280                         goto out;
3281                 }
3282         }
3283
3284         tx = dmu_tx_create(zsb->z_os);
3285         dmu_tx_hold_sa(tx, szp->z_sa_hdl, B_FALSE);
3286         dmu_tx_hold_sa(tx, sdzp->z_sa_hdl, B_FALSE);
3287         dmu_tx_hold_zap(tx, sdzp->z_id, FALSE, snm);
3288         dmu_tx_hold_zap(tx, tdzp->z_id, TRUE, tnm);
3289         if (sdzp != tdzp) {
3290                 dmu_tx_hold_sa(tx, tdzp->z_sa_hdl, B_FALSE);
3291                 zfs_sa_upgrade_txholds(tx, tdzp);
3292         }
3293         if (tzp) {
3294                 dmu_tx_hold_sa(tx, tzp->z_sa_hdl, B_FALSE);
3295                 zfs_sa_upgrade_txholds(tx, tzp);
3296         }
3297
3298         zfs_sa_upgrade_txholds(tx, szp);
3299         dmu_tx_hold_zap(tx, zsb->z_unlinkedobj, FALSE, NULL);
3300         error = dmu_tx_assign(tx, TXG_NOWAIT);
3301         if (error) {
3302                 if (zl != NULL)
3303                         zfs_rename_unlock(&zl);
3304                 zfs_dirent_unlock(sdl);
3305                 zfs_dirent_unlock(tdl);
3306
3307                 if (sdzp == tdzp)
3308                         rw_exit(&sdzp->z_name_lock);
3309
3310                 iput(ZTOI(szp));
3311                 if (tzp)
3312                         iput(ZTOI(tzp));
3313                 if (error == ERESTART) {
3314                         dmu_tx_wait(tx);
3315                         dmu_tx_abort(tx);
3316                         goto top;
3317                 }
3318                 dmu_tx_abort(tx);
3319                 ZFS_EXIT(zsb);
3320                 return (error);
3321         }
3322
3323         if (tzp)        /* Attempt to remove the existing target */
3324                 error = zfs_link_destroy(tdl, tzp, tx, zflg, NULL);
3325
3326         if (error == 0) {
3327                 error = zfs_link_create(tdl, szp, tx, ZRENAMING);
3328                 if (error == 0) {
3329                         szp->z_pflags |= ZFS_AV_MODIFIED;
3330
3331                         error = sa_update(szp->z_sa_hdl, SA_ZPL_FLAGS(zsb),
3332                             (void *)&szp->z_pflags, sizeof (uint64_t), tx);
3333                         ASSERT3U(error, ==, 0);
3334
3335                         error = zfs_link_destroy(sdl, szp, tx, ZRENAMING, NULL);
3336                         if (error == 0) {
3337                                 zfs_log_rename(zilog, tx, TX_RENAME |
3338                                     (flags & FIGNORECASE ? TX_CI : 0), sdzp,
3339                                     sdl->dl_name, tdzp, tdl->dl_name, szp);
3340                         } else {
3341                                 /*
3342                                  * At this point, we have successfully created
3343                                  * the target name, but have failed to remove
3344                                  * the source name.  Since the create was done
3345                                  * with the ZRENAMING flag, there are
3346                                  * complications; for one, the link count is
3347                                  * wrong.  The easiest way to deal with this
3348                                  * is to remove the newly created target, and
3349                                  * return the original error.  This must
3350                                  * succeed; fortunately, it is very unlikely to
3351                                  * fail, since we just created it.
3352                                  */
3353                                 VERIFY3U(zfs_link_destroy(tdl, szp, tx,
3354                                     ZRENAMING, NULL), ==, 0);
3355                         }
3356                 }
3357         }
3358
3359         dmu_tx_commit(tx);
3360 out:
3361         if (zl != NULL)
3362                 zfs_rename_unlock(&zl);
3363
3364         zfs_dirent_unlock(sdl);
3365         zfs_dirent_unlock(tdl);
3366
3367         zfs_inode_update(sdzp);
3368         if (sdzp == tdzp)
3369                 rw_exit(&sdzp->z_name_lock);
3370
3371         if (sdzp != tdzp)
3372                 zfs_inode_update(tdzp);
3373
3374         zfs_inode_update(szp);
3375         iput(ZTOI(szp));
3376         if (tzp) {
3377                 zfs_inode_update(tzp);
3378                 iput(ZTOI(tzp));
3379         }
3380
3381         if (zsb->z_os->os_sync == ZFS_SYNC_ALWAYS)
3382                 zil_commit(zilog, 0);
3383
3384         ZFS_EXIT(zsb);
3385         return (error);
3386 }
3387 EXPORT_SYMBOL(zfs_rename);
3388
3389 /*
3390  * Insert the indicated symbolic reference entry into the directory.
3391  *
3392  *      IN:     dip     - Directory to contain new symbolic link.
3393  *              link    - Name for new symlink entry.
3394  *              vap     - Attributes of new entry.
3395  *              target  - Target path of new symlink.
3396  *
3397  *              cr      - credentials of caller.
3398  *              flags   - case flags
3399  *
3400  *      RETURN: 0 if success
3401  *              error code if failure
3402  *
3403  * Timestamps:
3404  *      dip - ctime|mtime updated
3405  */
3406 /*ARGSUSED*/
3407 int
3408 zfs_symlink(struct inode *dip, char *name, vattr_t *vap, char *link,
3409     struct inode **ipp, cred_t *cr, int flags)
3410 {
3411         znode_t         *zp, *dzp = ITOZ(dip);
3412         zfs_dirlock_t   *dl;
3413         dmu_tx_t        *tx;
3414         zfs_sb_t        *zsb = ITOZSB(dip);
3415         zilog_t         *zilog;
3416         uint64_t        len = strlen(link);
3417         int             error;
3418         int             zflg = ZNEW;
3419         zfs_acl_ids_t   acl_ids;
3420         boolean_t       fuid_dirtied;
3421         uint64_t        txtype = TX_SYMLINK;
3422
3423         ASSERT(S_ISLNK(vap->va_mode));
3424
3425         ZFS_ENTER(zsb);
3426         ZFS_VERIFY_ZP(dzp);
3427         zilog = zsb->z_log;
3428
3429         if (zsb->z_utf8 && u8_validate(name, strlen(name),
3430             NULL, U8_VALIDATE_ENTIRE, &error) < 0) {
3431                 ZFS_EXIT(zsb);
3432                 return (EILSEQ);
3433         }
3434         if (flags & FIGNORECASE)
3435                 zflg |= ZCILOOK;
3436
3437         if (len > MAXPATHLEN) {
3438                 ZFS_EXIT(zsb);
3439                 return (ENAMETOOLONG);
3440         }
3441
3442         if ((error = zfs_acl_ids_create(dzp, 0,
3443             vap, cr, NULL, &acl_ids)) != 0) {
3444                 ZFS_EXIT(zsb);
3445                 return (error);
3446         }
3447 top:
3448         *ipp = NULL;
3449
3450         /*
3451          * Attempt to lock directory; fail if entry already exists.
3452          */
3453         error = zfs_dirent_lock(&dl, dzp, name, &zp, zflg, NULL, NULL);
3454         if (error) {
3455                 zfs_acl_ids_free(&acl_ids);
3456                 ZFS_EXIT(zsb);
3457                 return (error);
3458         }
3459
3460         if ((error = zfs_zaccess(dzp, ACE_ADD_FILE, 0, B_FALSE, cr))) {
3461                 zfs_acl_ids_free(&acl_ids);
3462                 zfs_dirent_unlock(dl);
3463                 ZFS_EXIT(zsb);
3464                 return (error);
3465         }
3466
3467         if (zfs_acl_ids_overquota(zsb, &acl_ids)) {
3468                 zfs_acl_ids_free(&acl_ids);
3469                 zfs_dirent_unlock(dl);
3470                 ZFS_EXIT(zsb);
3471                 return (EDQUOT);
3472         }
3473         tx = dmu_tx_create(zsb->z_os);
3474         fuid_dirtied = zsb->z_fuid_dirty;
3475         dmu_tx_hold_write(tx, DMU_NEW_OBJECT, 0, MAX(1, len));
3476         dmu_tx_hold_zap(tx, dzp->z_id, TRUE, name);
3477         dmu_tx_hold_sa_create(tx, acl_ids.z_aclp->z_acl_bytes +
3478             ZFS_SA_BASE_ATTR_SIZE + len);
3479         dmu_tx_hold_sa(tx, dzp->z_sa_hdl, B_FALSE);
3480         if (!zsb->z_use_sa && acl_ids.z_aclp->z_acl_bytes > ZFS_ACE_SPACE) {
3481                 dmu_tx_hold_write(tx, DMU_NEW_OBJECT, 0,
3482                     acl_ids.z_aclp->z_acl_bytes);
3483         }
3484         if (fuid_dirtied)
3485                 zfs_fuid_txhold(zsb, tx);
3486         error = dmu_tx_assign(tx, TXG_NOWAIT);
3487         if (error) {
3488                 zfs_dirent_unlock(dl);
3489                 if (error == ERESTART) {
3490                         dmu_tx_wait(tx);
3491                         dmu_tx_abort(tx);
3492                         goto top;
3493                 }
3494                 zfs_acl_ids_free(&acl_ids);
3495                 dmu_tx_abort(tx);
3496                 ZFS_EXIT(zsb);
3497                 return (error);
3498         }
3499
3500         /*
3501          * Create a new object for the symlink.
3502          * for version 4 ZPL datsets the symlink will be an SA attribute
3503          */
3504         zfs_mknode(dzp, vap, tx, cr, 0, &zp, &acl_ids);
3505
3506         if (fuid_dirtied)
3507                 zfs_fuid_sync(zsb, tx);
3508
3509         mutex_enter(&zp->z_lock);
3510         if (zp->z_is_sa)
3511                 error = sa_update(zp->z_sa_hdl, SA_ZPL_SYMLINK(zsb),
3512                     link, len, tx);
3513         else
3514                 zfs_sa_symlink(zp, link, len, tx);
3515         mutex_exit(&zp->z_lock);
3516
3517         zp->z_size = len;
3518         (void) sa_update(zp->z_sa_hdl, SA_ZPL_SIZE(zsb),
3519             &zp->z_size, sizeof (zp->z_size), tx);
3520         /*
3521          * Insert the new object into the directory.
3522          */
3523         (void) zfs_link_create(dl, zp, tx, ZNEW);
3524
3525         if (flags & FIGNORECASE)
3526                 txtype |= TX_CI;
3527         zfs_log_symlink(zilog, tx, txtype, dzp, zp, name, link);
3528
3529         zfs_inode_update(dzp);
3530         zfs_inode_update(zp);
3531
3532         zfs_acl_ids_free(&acl_ids);
3533
3534         dmu_tx_commit(tx);
3535
3536         zfs_dirent_unlock(dl);
3537
3538         *ipp = ZTOI(zp);
3539
3540         if (zsb->z_os->os_sync == ZFS_SYNC_ALWAYS)
3541                 zil_commit(zilog, 0);
3542
3543         ZFS_EXIT(zsb);
3544         return (error);
3545 }
3546 EXPORT_SYMBOL(zfs_symlink);
3547
3548 /*
3549  * Return, in the buffer contained in the provided uio structure,
3550  * the symbolic path referred to by ip.
3551  *
3552  *      IN:     ip      - inode of symbolic link
3553  *              uio     - structure to contain the link path.
3554  *              cr      - credentials of caller.
3555  *
3556  *      RETURN: 0 if success
3557  *              error code if failure
3558  *
3559  * Timestamps:
3560  *      ip - atime updated
3561  */
3562 /* ARGSUSED */
3563 int
3564 zfs_readlink(struct inode *ip, uio_t *uio, cred_t *cr)
3565 {
3566         znode_t         *zp = ITOZ(ip);
3567         zfs_sb_t        *zsb = ITOZSB(ip);
3568         int             error;
3569
3570         ZFS_ENTER(zsb);
3571         ZFS_VERIFY_ZP(zp);
3572
3573         mutex_enter(&zp->z_lock);
3574         if (zp->z_is_sa)
3575                 error = sa_lookup_uio(zp->z_sa_hdl,
3576                     SA_ZPL_SYMLINK(zsb), uio);
3577         else
3578                 error = zfs_sa_readlink(zp, uio);
3579         mutex_exit(&zp->z_lock);
3580
3581         ZFS_ACCESSTIME_STAMP(zsb, zp);
3582         zfs_inode_update(zp);
3583         ZFS_EXIT(zsb);
3584         return (error);
3585 }
3586 EXPORT_SYMBOL(zfs_readlink);
3587
3588 /*
3589  * Insert a new entry into directory tdip referencing sip.
3590  *
3591  *      IN:     tdip    - Directory to contain new entry.
3592  *              sip     - inode of new entry.
3593  *              name    - name of new entry.
3594  *              cr      - credentials of caller.
3595  *
3596  *      RETURN: 0 if success
3597  *              error code if failure
3598  *
3599  * Timestamps:
3600  *      tdip - ctime|mtime updated
3601  *       sip - ctime updated
3602  */
3603 /* ARGSUSED */
3604 int
3605 zfs_link(struct inode *tdip, struct inode *sip, char *name, cred_t *cr)
3606 {
3607         znode_t         *dzp = ITOZ(tdip);
3608         znode_t         *tzp, *szp;
3609         zfs_sb_t        *zsb = ITOZSB(tdip);
3610         zilog_t         *zilog;
3611         zfs_dirlock_t   *dl;
3612         dmu_tx_t        *tx;
3613         int             error;
3614         int             zf = ZNEW;
3615         uint64_t        parent;
3616         uid_t           owner;
3617
3618         ASSERT(S_ISDIR(tdip->i_mode));
3619
3620         ZFS_ENTER(zsb);
3621         ZFS_VERIFY_ZP(dzp);
3622         zilog = zsb->z_log;
3623
3624         /*
3625          * POSIX dictates that we return EPERM here.
3626          * Better choices include ENOTSUP or EISDIR.
3627          */
3628         if (S_ISDIR(sip->i_mode)) {
3629                 ZFS_EXIT(zsb);
3630                 return (EPERM);
3631         }
3632
3633         if (sip->i_sb != tdip->i_sb) {
3634                 ZFS_EXIT(zsb);
3635                 return (EXDEV);
3636         }
3637
3638         szp = ITOZ(sip);
3639         ZFS_VERIFY_ZP(szp);
3640
3641         /* Prevent links to .zfs/shares files */
3642
3643         if ((error = sa_lookup(szp->z_sa_hdl, SA_ZPL_PARENT(zsb),
3644             &parent, sizeof (uint64_t))) != 0) {
3645                 ZFS_EXIT(zsb);
3646                 return (error);
3647         }
3648         if (parent == zsb->z_shares_dir) {
3649                 ZFS_EXIT(zsb);
3650                 return (EPERM);
3651         }
3652
3653         if (zsb->z_utf8 && u8_validate(name,
3654             strlen(name), NULL, U8_VALIDATE_ENTIRE, &error) < 0) {
3655                 ZFS_EXIT(zsb);
3656                 return (EILSEQ);
3657         }
3658 #ifdef HAVE_PN_UTILS
3659         if (flags & FIGNORECASE)
3660                 zf |= ZCILOOK;
3661 #endif /* HAVE_PN_UTILS */
3662
3663         /*
3664          * We do not support links between attributes and non-attributes
3665          * because of the potential security risk of creating links
3666          * into "normal" file space in order to circumvent restrictions
3667          * imposed in attribute space.
3668          */
3669         if ((szp->z_pflags & ZFS_XATTR) != (dzp->z_pflags & ZFS_XATTR)) {
3670                 ZFS_EXIT(zsb);
3671                 return (EINVAL);
3672         }
3673
3674         owner = zfs_fuid_map_id(zsb, szp->z_uid, cr, ZFS_OWNER);
3675         if (owner != crgetuid(cr) && secpolicy_basic_link(cr) != 0) {
3676                 ZFS_EXIT(zsb);
3677                 return (EPERM);
3678         }
3679
3680         if ((error = zfs_zaccess(dzp, ACE_ADD_FILE, 0, B_FALSE, cr))) {
3681                 ZFS_EXIT(zsb);
3682                 return (error);
3683         }
3684
3685 top:
3686         /*
3687          * Attempt to lock directory; fail if entry already exists.
3688          */
3689         error = zfs_dirent_lock(&dl, dzp, name, &tzp, zf, NULL, NULL);
3690         if (error) {
3691                 ZFS_EXIT(zsb);
3692                 return (error);
3693         }
3694
3695         tx = dmu_tx_create(zsb->z_os);
3696         dmu_tx_hold_sa(tx, szp->z_sa_hdl, B_FALSE);
3697         dmu_tx_hold_zap(tx, dzp->z_id, TRUE, name);
3698         zfs_sa_upgrade_txholds(tx, szp);
3699         zfs_sa_upgrade_txholds(tx, dzp);
3700         error = dmu_tx_assign(tx, TXG_NOWAIT);
3701         if (error) {
3702                 zfs_dirent_unlock(dl);
3703                 if (error == ERESTART) {
3704                         dmu_tx_wait(tx);
3705                         dmu_tx_abort(tx);
3706                         goto top;
3707                 }
3708                 dmu_tx_abort(tx);
3709                 ZFS_EXIT(zsb);
3710                 return (error);
3711         }
3712
3713         error = zfs_link_create(dl, szp, tx, 0);
3714
3715         if (error == 0) {
3716                 uint64_t txtype = TX_LINK;
3717 #ifdef HAVE_PN_UTILS
3718                 if (flags & FIGNORECASE)
3719                         txtype |= TX_CI;
3720 #endif /* HAVE_PN_UTILS */
3721                 zfs_log_link(zilog, tx, txtype, dzp, szp, name);
3722         }
3723
3724         dmu_tx_commit(tx);
3725
3726         zfs_dirent_unlock(dl);
3727
3728         if (zsb->z_os->os_sync == ZFS_SYNC_ALWAYS)
3729                 zil_commit(zilog, 0);
3730
3731         zfs_inode_update(dzp);
3732         zfs_inode_update(szp);
3733         ZFS_EXIT(zsb);
3734         return (error);
3735 }
3736 EXPORT_SYMBOL(zfs_link);
3737
3738 static void
3739 zfs_putpage_commit_cb(void *arg, int error)
3740 {
3741         struct page *pp = arg;
3742
3743         if (error) {
3744                 __set_page_dirty_nobuffers(pp);
3745
3746                 if (error != ECANCELED)
3747                         SetPageError(pp);
3748         } else {
3749                 ClearPageError(pp);
3750         }
3751
3752         end_page_writeback(pp);
3753 }
3754
3755 /*
3756  * Push a page out to disk, once the page is on stable storage the
3757  * registered commit callback will be run as notification of completion.
3758  *
3759  *      IN:     ip      - page mapped for inode.
3760  *              pp      - page to push (page is locked)
3761  *              wbc     - writeback control data
3762  *
3763  *      RETURN: 0 if success
3764  *              error code if failure
3765  *
3766  * Timestamps:
3767  *      ip - ctime|mtime updated
3768  */
3769 /* ARGSUSED */
3770 int
3771 zfs_putpage(struct inode *ip, struct page *pp, struct writeback_control *wbc)
3772 {
3773         znode_t         *zp = ITOZ(ip);
3774         zfs_sb_t        *zsb = ITOZSB(ip);
3775         loff_t          offset;
3776         loff_t          pgoff;
3777         unsigned int    pglen;
3778         dmu_tx_t        *tx;
3779         caddr_t         va;
3780         int             err = 0;
3781         uint64_t        mtime[2], ctime[2];
3782         sa_bulk_attr_t  bulk[3];
3783         int             cnt = 0;
3784
3785
3786         ASSERT(PageLocked(pp));
3787
3788         pgoff = page_offset(pp);     /* Page byte-offset in file */
3789         offset = i_size_read(ip);    /* File length in bytes */
3790         pglen = MIN(PAGE_CACHE_SIZE, /* Page length in bytes */
3791             P2ROUNDUP(offset, PAGE_CACHE_SIZE)-pgoff);
3792
3793         /* Page is beyond end of file */
3794         if (pgoff >= offset) {
3795                 unlock_page(pp);
3796                 return (0);
3797         }
3798
3799         /* Truncate page length to end of file */
3800         if (pgoff + pglen > offset)
3801                 pglen = offset - pgoff;
3802
3803 #if 0
3804         /*
3805          * FIXME: Allow mmap writes past its quota.  The correct fix
3806          * is to register a page_mkwrite() handler to count the page
3807          * against its quota when it is about to be dirtied.
3808          */
3809         if (zfs_owner_overquota(zsb, zp, B_FALSE) ||
3810             zfs_owner_overquota(zsb, zp, B_TRUE)) {
3811                 err = EDQUOT;
3812         }
3813 #endif
3814
3815         set_page_writeback(pp);
3816         unlock_page(pp);
3817
3818         tx = dmu_tx_create(zsb->z_os);
3819
3820         dmu_tx_callback_register(tx, zfs_putpage_commit_cb, pp);
3821
3822         dmu_tx_hold_write(tx, zp->z_id, pgoff, pglen);
3823
3824         dmu_tx_hold_sa(tx, zp->z_sa_hdl, B_FALSE);
3825         zfs_sa_upgrade_txholds(tx, zp);
3826         err = dmu_tx_assign(tx, TXG_NOWAIT);
3827         if (err != 0) {
3828                 if (err == ERESTART)
3829                         dmu_tx_wait(tx);
3830
3831                 dmu_tx_abort(tx);
3832                 return (err);
3833         }
3834
3835         va = kmap(pp);
3836         ASSERT3U(pglen, <=, PAGE_CACHE_SIZE);
3837         dmu_write(zsb->z_os, zp->z_id, pgoff, pglen, va, tx);
3838         kunmap(pp);
3839
3840         SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_MTIME(zsb), NULL, &mtime, 16);
3841         SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_CTIME(zsb), NULL, &ctime, 16);
3842         SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_FLAGS(zsb), NULL, &zp->z_pflags, 8);
3843         zfs_tstamp_update_setup(zp, CONTENT_MODIFIED, mtime, ctime, B_TRUE);
3844         zfs_log_write(zsb->z_log, tx, TX_WRITE, zp, pgoff, pglen, 0);
3845
3846         dmu_tx_commit(tx);
3847         ASSERT3S(err, ==, 0);
3848
3849         if ((zsb->z_os->os_sync == ZFS_SYNC_ALWAYS) ||
3850             (wbc->sync_mode == WB_SYNC_ALL))
3851                 zil_commit(zsb->z_log, zp->z_id);
3852
3853         return (err);
3854 }
3855
3856 /*ARGSUSED*/
3857 void
3858 zfs_inactive(struct inode *ip)
3859 {
3860         znode_t *zp = ITOZ(ip);
3861         zfs_sb_t *zsb = ITOZSB(ip);
3862         int error;
3863
3864 #ifdef HAVE_SNAPSHOT
3865         /* Early return for snapshot inode? */
3866 #endif /* HAVE_SNAPSHOT */
3867
3868         rw_enter(&zsb->z_teardown_inactive_lock, RW_READER);
3869         if (zp->z_sa_hdl == NULL) {
3870                 rw_exit(&zsb->z_teardown_inactive_lock);
3871                 return;
3872         }
3873
3874         if (zp->z_atime_dirty && zp->z_unlinked == 0) {
3875                 dmu_tx_t *tx = dmu_tx_create(zsb->z_os);
3876
3877                 dmu_tx_hold_sa(tx, zp->z_sa_hdl, B_FALSE);
3878                 zfs_sa_upgrade_txholds(tx, zp);
3879                 error = dmu_tx_assign(tx, TXG_WAIT);
3880                 if (error) {
3881                         dmu_tx_abort(tx);
3882                 } else {
3883                         mutex_enter(&zp->z_lock);
3884                         (void) sa_update(zp->z_sa_hdl, SA_ZPL_ATIME(zsb),
3885                             (void *)&zp->z_atime, sizeof (zp->z_atime), tx);
3886                         zp->z_atime_dirty = 0;
3887                         mutex_exit(&zp->z_lock);
3888                         dmu_tx_commit(tx);
3889                 }
3890         }
3891
3892         zfs_zinactive(zp);
3893         rw_exit(&zsb->z_teardown_inactive_lock);
3894 }
3895 EXPORT_SYMBOL(zfs_inactive);
3896
3897 /*
3898  * Bounds-check the seek operation.
3899  *
3900  *      IN:     ip      - inode seeking within
3901  *              ooff    - old file offset
3902  *              noffp   - pointer to new file offset
3903  *              ct      - caller context
3904  *
3905  *      RETURN: 0 if success
3906  *              EINVAL if new offset invalid
3907  */
3908 /* ARGSUSED */
3909 int
3910 zfs_seek(struct inode *ip, offset_t ooff, offset_t *noffp)
3911 {
3912         if (S_ISDIR(ip->i_mode))
3913                 return (0);
3914         return ((*noffp < 0 || *noffp > MAXOFFSET_T) ? EINVAL : 0);
3915 }
3916 EXPORT_SYMBOL(zfs_seek);
3917
3918 /*
3919  * Fill pages with data from the disk.
3920  */
3921 static int
3922 zfs_fillpage(struct inode *ip, struct page *pl[], int nr_pages)
3923 {
3924         znode_t     *zp = ITOZ(ip);
3925         zfs_sb_t    *zsb = ITOZSB(ip);
3926         objset_t    *os;
3927         struct page *cur_pp;
3928         u_offset_t  io_off, total;
3929         size_t      io_len;
3930         loff_t      i_size;
3931         unsigned    page_idx;
3932         int         err;
3933
3934         os     = zsb->z_os;
3935         io_len = nr_pages << PAGE_CACHE_SHIFT;
3936         i_size = i_size_read(ip);
3937         io_off = page_offset(pl[0]);
3938
3939         if (io_off + io_len > i_size)
3940                 io_len = i_size - io_off;
3941
3942         /*
3943          * Iterate over list of pages and read each page individually.
3944          */
3945         page_idx = 0;
3946         cur_pp   = pl[0];
3947         for (total = io_off + io_len; io_off < total; io_off += PAGESIZE) {
3948                 caddr_t va;
3949
3950                 va = kmap(cur_pp);
3951                 err = dmu_read(os, zp->z_id, io_off, PAGESIZE, va,
3952                     DMU_READ_PREFETCH);
3953                 kunmap(cur_pp);
3954                 if (err) {
3955                         /* convert checksum errors into IO errors */
3956                         if (err == ECKSUM)
3957                                 err = EIO;
3958                         return (err);
3959                 }
3960                 cur_pp = pl[++page_idx];
3961         }
3962
3963         return (0);
3964 }
3965
3966 /*
3967  * Uses zfs_fillpage to read data from the file and fill the pages.
3968  *
3969  *      IN:     ip       - inode of file to get data from.
3970  *              pl       - list of pages to read
3971  *              nr_pages - number of pages to read
3972  *
3973  *      RETURN: 0 if success
3974  *              error code if failure
3975  *
3976  * Timestamps:
3977  *      vp - atime updated
3978  */
3979 /* ARGSUSED */
3980 int
3981 zfs_getpage(struct inode *ip, struct page *pl[], int nr_pages)
3982 {
3983         znode_t  *zp  = ITOZ(ip);
3984         zfs_sb_t *zsb = ITOZSB(ip);
3985         int      err;
3986
3987         if (pl == NULL)
3988                 return (0);
3989
3990         ZFS_ENTER(zsb);
3991         ZFS_VERIFY_ZP(zp);
3992
3993         err = zfs_fillpage(ip, pl, nr_pages);
3994
3995         if (!err)
3996                 ZFS_ACCESSTIME_STAMP(zsb, zp);
3997
3998         ZFS_EXIT(zsb);
3999         return (err);
4000 }
4001 EXPORT_SYMBOL(zfs_getpage);
4002
4003 /*
4004  * Check ZFS specific permissions to memory map a section of a file.
4005  *
4006  *      IN:     ip      - inode of the file to mmap
4007  *              off     - file offset
4008  *              addrp   - start address in memory region
4009  *              len     - length of memory region
4010  *              vm_flags- address flags
4011  *
4012  *      RETURN: 0 if success
4013  *              error code if failure
4014  */
4015 /*ARGSUSED*/
4016 int
4017 zfs_map(struct inode *ip, offset_t off, caddr_t *addrp, size_t len,
4018     unsigned long vm_flags)
4019 {
4020         znode_t  *zp = ITOZ(ip);
4021         zfs_sb_t *zsb = ITOZSB(ip);
4022
4023         ZFS_ENTER(zsb);
4024         ZFS_VERIFY_ZP(zp);
4025
4026         if ((vm_flags & VM_WRITE) && (zp->z_pflags &
4027             (ZFS_IMMUTABLE | ZFS_READONLY | ZFS_APPENDONLY))) {
4028                 ZFS_EXIT(zsb);
4029                 return (EPERM);
4030         }
4031
4032         if ((vm_flags & (VM_READ | VM_EXEC)) &&
4033             (zp->z_pflags & ZFS_AV_QUARANTINED)) {
4034                 ZFS_EXIT(zsb);
4035                 return (EACCES);
4036         }
4037
4038         if (off < 0 || len > MAXOFFSET_T - off) {
4039                 ZFS_EXIT(zsb);
4040                 return (ENXIO);
4041         }
4042
4043         ZFS_EXIT(zsb);
4044         return (0);
4045 }
4046 EXPORT_SYMBOL(zfs_map);
4047
4048 /*
4049  * convoff - converts the given data (start, whence) to the
4050  * given whence.
4051  */
4052 int
4053 convoff(struct inode *ip, flock64_t *lckdat, int  whence, offset_t offset)
4054 {
4055         vattr_t vap;
4056         int error;
4057
4058         if ((lckdat->l_whence == 2) || (whence == 2)) {
4059                 if ((error = zfs_getattr(ip, &vap, 0, CRED()) != 0))
4060                         return (error);
4061         }
4062
4063         switch (lckdat->l_whence) {
4064         case 1:
4065                 lckdat->l_start += offset;
4066                 break;
4067         case 2:
4068                 lckdat->l_start += vap.va_size;
4069                 /* FALLTHRU */
4070         case 0:
4071                 break;
4072         default:
4073                 return (EINVAL);
4074         }
4075
4076         if (lckdat->l_start < 0)
4077                 return (EINVAL);
4078
4079         switch (whence) {
4080         case 1:
4081                 lckdat->l_start -= offset;
4082                 break;
4083         case 2:
4084                 lckdat->l_start -= vap.va_size;
4085                 /* FALLTHRU */
4086         case 0:
4087                 break;
4088         default:
4089                 return (EINVAL);
4090         }
4091
4092         lckdat->l_whence = (short)whence;
4093         return (0);
4094 }
4095
4096 /*
4097  * Free or allocate space in a file.  Currently, this function only
4098  * supports the `F_FREESP' command.  However, this command is somewhat
4099  * misnamed, as its functionality includes the ability to allocate as
4100  * well as free space.
4101  *
4102  *      IN:     ip      - inode of file to free data in.
4103  *              cmd     - action to take (only F_FREESP supported).
4104  *              bfp     - section of file to free/alloc.
4105  *              flag    - current file open mode flags.
4106  *              offset  - current file offset.
4107  *              cr      - credentials of caller [UNUSED].
4108  *
4109  *      RETURN: 0 if success
4110  *              error code if failure
4111  *
4112  * Timestamps:
4113  *      ip - ctime|mtime updated
4114  */
4115 /* ARGSUSED */
4116 int
4117 zfs_space(struct inode *ip, int cmd, flock64_t *bfp, int flag,
4118     offset_t offset, cred_t *cr)
4119 {
4120         znode_t         *zp = ITOZ(ip);
4121         zfs_sb_t        *zsb = ITOZSB(ip);
4122         uint64_t        off, len;
4123         int             error;
4124
4125         ZFS_ENTER(zsb);
4126         ZFS_VERIFY_ZP(zp);
4127
4128         if (cmd != F_FREESP) {
4129                 ZFS_EXIT(zsb);
4130                 return (EINVAL);
4131         }
4132
4133         if ((error = convoff(ip, bfp, 0, offset))) {
4134                 ZFS_EXIT(zsb);
4135                 return (error);
4136         }
4137
4138         if (bfp->l_len < 0) {
4139                 ZFS_EXIT(zsb);
4140                 return (EINVAL);
4141         }
4142
4143         off = bfp->l_start;
4144         len = bfp->l_len; /* 0 means from off to end of file */
4145
4146         error = zfs_freesp(zp, off, len, flag, TRUE);
4147
4148         ZFS_EXIT(zsb);
4149         return (error);
4150 }
4151 EXPORT_SYMBOL(zfs_space);
4152
4153 /*ARGSUSED*/
4154 int
4155 zfs_fid(struct inode *ip, fid_t *fidp)
4156 {
4157         znode_t         *zp = ITOZ(ip);
4158         zfs_sb_t        *zsb = ITOZSB(ip);
4159         uint32_t        gen;
4160         uint64_t        gen64;
4161         uint64_t        object = zp->z_id;
4162         zfid_short_t    *zfid;
4163         int             size, i, error;
4164
4165         ZFS_ENTER(zsb);
4166         ZFS_VERIFY_ZP(zp);
4167
4168         if ((error = sa_lookup(zp->z_sa_hdl, SA_ZPL_GEN(zsb),
4169             &gen64, sizeof (uint64_t))) != 0) {
4170                 ZFS_EXIT(zsb);
4171                 return (error);
4172         }
4173
4174         gen = (uint32_t)gen64;
4175
4176         size = (zsb->z_parent != zsb) ? LONG_FID_LEN : SHORT_FID_LEN;
4177         if (fidp->fid_len < size) {
4178                 fidp->fid_len = size;
4179                 ZFS_EXIT(zsb);
4180                 return (ENOSPC);
4181         }
4182
4183         zfid = (zfid_short_t *)fidp;
4184
4185         zfid->zf_len = size;
4186
4187         for (i = 0; i < sizeof (zfid->zf_object); i++)
4188                 zfid->zf_object[i] = (uint8_t)(object >> (8 * i));
4189
4190         /* Must have a non-zero generation number to distinguish from .zfs */
4191         if (gen == 0)
4192                 gen = 1;
4193         for (i = 0; i < sizeof (zfid->zf_gen); i++)
4194                 zfid->zf_gen[i] = (uint8_t)(gen >> (8 * i));
4195
4196         if (size == LONG_FID_LEN) {
4197                 uint64_t        objsetid = dmu_objset_id(zsb->z_os);
4198                 zfid_long_t     *zlfid;
4199
4200                 zlfid = (zfid_long_t *)fidp;
4201
4202                 for (i = 0; i < sizeof (zlfid->zf_setid); i++)
4203                         zlfid->zf_setid[i] = (uint8_t)(objsetid >> (8 * i));
4204
4205                 /* XXX - this should be the generation number for the objset */
4206                 for (i = 0; i < sizeof (zlfid->zf_setgen); i++)
4207                         zlfid->zf_setgen[i] = 0;
4208         }
4209
4210         ZFS_EXIT(zsb);
4211         return (0);
4212 }
4213 EXPORT_SYMBOL(zfs_fid);
4214
4215 /*ARGSUSED*/
4216 int
4217 zfs_getsecattr(struct inode *ip, vsecattr_t *vsecp, int flag, cred_t *cr)
4218 {
4219         znode_t *zp = ITOZ(ip);
4220         zfs_sb_t *zsb = ITOZSB(ip);
4221         int error;
4222         boolean_t skipaclchk = (flag & ATTR_NOACLCHECK) ? B_TRUE : B_FALSE;
4223
4224         ZFS_ENTER(zsb);
4225         ZFS_VERIFY_ZP(zp);
4226         error = zfs_getacl(zp, vsecp, skipaclchk, cr);
4227         ZFS_EXIT(zsb);
4228
4229         return (error);
4230 }
4231 EXPORT_SYMBOL(zfs_getsecattr);
4232
4233 /*ARGSUSED*/
4234 int
4235 zfs_setsecattr(struct inode *ip, vsecattr_t *vsecp, int flag, cred_t *cr)
4236 {
4237         znode_t *zp = ITOZ(ip);
4238         zfs_sb_t *zsb = ITOZSB(ip);
4239         int error;
4240         boolean_t skipaclchk = (flag & ATTR_NOACLCHECK) ? B_TRUE : B_FALSE;
4241         zilog_t *zilog = zsb->z_log;
4242
4243         ZFS_ENTER(zsb);
4244         ZFS_VERIFY_ZP(zp);
4245
4246         error = zfs_setacl(zp, vsecp, skipaclchk, cr);
4247
4248         if (zsb->z_os->os_sync == ZFS_SYNC_ALWAYS)
4249                 zil_commit(zilog, 0);
4250
4251         ZFS_EXIT(zsb);
4252         return (error);
4253 }
4254 EXPORT_SYMBOL(zfs_setsecattr);
4255
4256 #ifdef HAVE_UIO_ZEROCOPY
4257 /*
4258  * Tunable, both must be a power of 2.
4259  *
4260  * zcr_blksz_min: the smallest read we may consider to loan out an arcbuf
4261  * zcr_blksz_max: if set to less than the file block size, allow loaning out of
4262  *              an arcbuf for a partial block read
4263  */
4264 int zcr_blksz_min = (1 << 10);  /* 1K */
4265 int zcr_blksz_max = (1 << 17);  /* 128K */
4266
4267 /*ARGSUSED*/
4268 static int
4269 zfs_reqzcbuf(struct inode *ip, enum uio_rw ioflag, xuio_t *xuio, cred_t *cr)
4270 {
4271         znode_t *zp = ITOZ(ip);
4272         zfs_sb_t *zsb = ITOZSB(ip);
4273         int max_blksz = zsb->z_max_blksz;
4274         uio_t *uio = &xuio->xu_uio;
4275         ssize_t size = uio->uio_resid;
4276         offset_t offset = uio->uio_loffset;
4277         int blksz;
4278         int fullblk, i;
4279         arc_buf_t *abuf;
4280         ssize_t maxsize;
4281         int preamble, postamble;
4282
4283         if (xuio->xu_type != UIOTYPE_ZEROCOPY)
4284                 return (EINVAL);
4285
4286         ZFS_ENTER(zsb);
4287         ZFS_VERIFY_ZP(zp);
4288         switch (ioflag) {
4289         case UIO_WRITE:
4290                 /*
4291                  * Loan out an arc_buf for write if write size is bigger than
4292                  * max_blksz, and the file's block size is also max_blksz.
4293                  */
4294                 blksz = max_blksz;
4295                 if (size < blksz || zp->z_blksz != blksz) {
4296                         ZFS_EXIT(zsb);
4297                         return (EINVAL);
4298                 }
4299                 /*
4300                  * Caller requests buffers for write before knowing where the
4301                  * write offset might be (e.g. NFS TCP write).
4302                  */
4303                 if (offset == -1) {
4304                         preamble = 0;
4305                 } else {
4306                         preamble = P2PHASE(offset, blksz);
4307                         if (preamble) {
4308                                 preamble = blksz - preamble;
4309                                 size -= preamble;
4310                         }
4311                 }
4312
4313                 postamble = P2PHASE(size, blksz);
4314                 size -= postamble;
4315
4316                 fullblk = size / blksz;
4317                 (void) dmu_xuio_init(xuio,
4318                     (preamble != 0) + fullblk + (postamble != 0));
4319
4320                 /*
4321                  * Have to fix iov base/len for partial buffers.  They
4322                  * currently represent full arc_buf's.
4323                  */
4324                 if (preamble) {
4325                         /* data begins in the middle of the arc_buf */
4326                         abuf = dmu_request_arcbuf(sa_get_db(zp->z_sa_hdl),
4327                             blksz);
4328                         ASSERT(abuf);
4329                         (void) dmu_xuio_add(xuio, abuf,
4330                             blksz - preamble, preamble);
4331                 }
4332
4333                 for (i = 0; i < fullblk; i++) {
4334                         abuf = dmu_request_arcbuf(sa_get_db(zp->z_sa_hdl),
4335                             blksz);
4336                         ASSERT(abuf);
4337                         (void) dmu_xuio_add(xuio, abuf, 0, blksz);
4338                 }
4339
4340                 if (postamble) {
4341                         /* data ends in the middle of the arc_buf */
4342                         abuf = dmu_request_arcbuf(sa_get_db(zp->z_sa_hdl),
4343                             blksz);
4344                         ASSERT(abuf);
4345                         (void) dmu_xuio_add(xuio, abuf, 0, postamble);
4346                 }
4347                 break;
4348         case UIO_READ:
4349                 /*
4350                  * Loan out an arc_buf for read if the read size is larger than
4351                  * the current file block size.  Block alignment is not
4352                  * considered.  Partial arc_buf will be loaned out for read.
4353                  */
4354                 blksz = zp->z_blksz;
4355                 if (blksz < zcr_blksz_min)
4356                         blksz = zcr_blksz_min;
4357                 if (blksz > zcr_blksz_max)
4358                         blksz = zcr_blksz_max;
4359                 /* avoid potential complexity of dealing with it */
4360                 if (blksz > max_blksz) {
4361                         ZFS_EXIT(zsb);
4362                         return (EINVAL);
4363                 }
4364
4365                 maxsize = zp->z_size - uio->uio_loffset;
4366                 if (size > maxsize)
4367                         size = maxsize;
4368
4369                 if (size < blksz) {
4370                         ZFS_EXIT(zsb);
4371                         return (EINVAL);
4372                 }
4373                 break;
4374         default:
4375                 ZFS_EXIT(zsb);
4376                 return (EINVAL);
4377         }
4378
4379         uio->uio_extflg = UIO_XUIO;
4380         XUIO_XUZC_RW(xuio) = ioflag;
4381         ZFS_EXIT(zsb);
4382         return (0);
4383 }
4384
4385 /*ARGSUSED*/
4386 static int
4387 zfs_retzcbuf(struct inode *ip, xuio_t *xuio, cred_t *cr)
4388 {
4389         int i;
4390         arc_buf_t *abuf;
4391         int ioflag = XUIO_XUZC_RW(xuio);
4392
4393         ASSERT(xuio->xu_type == UIOTYPE_ZEROCOPY);
4394
4395         i = dmu_xuio_cnt(xuio);
4396         while (i-- > 0) {
4397                 abuf = dmu_xuio_arcbuf(xuio, i);
4398                 /*
4399                  * if abuf == NULL, it must be a write buffer
4400                  * that has been returned in zfs_write().
4401                  */
4402                 if (abuf)
4403                         dmu_return_arcbuf(abuf);
4404                 ASSERT(abuf || ioflag == UIO_WRITE);
4405         }
4406
4407         dmu_xuio_fini(xuio);
4408         return (0);
4409 }
4410 #endif /* HAVE_UIO_ZEROCOPY */
4411
4412 #if defined(_KERNEL) && defined(HAVE_SPL)
4413 module_param(zfs_read_chunk_size, long, 0644);
4414 MODULE_PARM_DESC(zfs_read_chunk_size, "Bytes to read per chunk");
4415 #endif