module/zfs/zfs_znode.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
  27 #ifdef _KERNEL
  28 #include <sys/types.h>
  29 #include <sys/param.h>
  30 #include <sys/time.h>
  31 #include <sys/systm.h>
  32 #include <sys/sysmacros.h>
  33 #include <sys/resource.h>
  34 #include <sys/mntent.h>
  35 #include <sys/mkdev.h>
  36 #include <sys/u8_textprep.h>
  37 #include <sys/dsl_dataset.h>
  38 #include <sys/vfs.h>
  39 #include <sys/vfs_opreg.h>
  40 #include <sys/vnode.h>
  41 #include <sys/file.h>
  42 #include <sys/kmem.h>
  43 #include <sys/errno.h>
  44 #include <sys/unistd.h>
  45 #include <sys/mode.h>
  46 #include <sys/atomic.h>
  47 #include <vm/pvn.h>
  48 #include "fs/fs_subr.h"
  49 #include <sys/zfs_dir.h>
  50 #include <sys/zfs_acl.h>
  51 #include <sys/zfs_ioctl.h>
  52 #include <sys/zfs_rlock.h>
  53 #include <sys/zfs_fuid.h>
  54 #include <sys/zfs_vnops.h>
  55 #include <sys/dnode.h>
  56 #include <sys/fs/zfs.h>
  57 #include <sys/kidmap.h>
  58 #include <sys/zpl.h>
  59 #endif /* _KERNEL */
  60
  61 #include <sys/dmu.h>
  62 #include <sys/refcount.h>
  63 #include <sys/stat.h>
  64 #include <sys/zap.h>
  65 #include <sys/zfs_znode.h>
  66 #include <sys/sa.h>
  67 #include <sys/zfs_sa.h>
  68 #include <sys/zfs_stat.h>
  69
  70 #include "zfs_prop.h"
  71 #include "zfs_comutil.h"
  72
  73 /*
  74  * Define ZNODE_STATS to turn on statistic gathering. By default, it is only
  75  * turned on when DEBUG is also defined.
  76  */
  77 #ifdef  DEBUG
  78 #define ZNODE_STATS
  79 #endif  /* DEBUG */
  80
  81 #ifdef  ZNODE_STATS
  82 #define ZNODE_STAT_ADD(stat)                    ((stat)++)
  83 #else
  84 #define ZNODE_STAT_ADD(stat)                    /* nothing */
  85 #endif  /* ZNODE_STATS */
  86
  87 /*
  88  * Functions needed for userland (ie: libzpool) are not put under
  89  * #ifdef_KERNEL; the rest of the functions have dependencies
  90  * (such as VFS logic) that will not compile easily in userland.
  91  */
  92 #ifdef _KERNEL
  93
  94 static kmem_cache_t *znode_cache = NULL;
  95
  96 /*ARGSUSED*/
  97 static int
  98 zfs_znode_cache_constructor(void *buf, void *arg, int kmflags)
  99 {
 100         znode_t *zp = buf;
 101
 102         inode_init_once(ZTOI(zp));
 103         list_link_init(&zp->z_link_node);
 104
 105         mutex_init(&zp->z_lock, NULL, MUTEX_DEFAULT, NULL);
 106         rw_init(&zp->z_parent_lock, NULL, RW_DEFAULT, NULL);
 107         rw_init(&zp->z_name_lock, NULL, RW_DEFAULT, NULL);
 108         mutex_init(&zp->z_acl_lock, NULL, MUTEX_DEFAULT, NULL);
 109
 110         mutex_init(&zp->z_range_lock, NULL, MUTEX_DEFAULT, NULL);
 111         avl_create(&zp->z_range_avl, zfs_range_compare,
 112             sizeof (rl_t), offsetof(rl_t, r_node));
 113
 114         zp->z_dirlocks = NULL;
 115         zp->z_acl_cached = NULL;
 116         zp->z_moved = 0;
 117         return (0);
 118 }
 119
 120 /*ARGSUSED*/
 121 static void
 122 zfs_znode_cache_destructor(void *buf, void *arg)
 123 {
 124         znode_t *zp = buf;
 125
 126         ASSERT(!list_link_active(&zp->z_link_node));
 127         mutex_destroy(&zp->z_lock);
 128         rw_destroy(&zp->z_parent_lock);
 129         rw_destroy(&zp->z_name_lock);
 130         mutex_destroy(&zp->z_acl_lock);
 131         avl_destroy(&zp->z_range_avl);
 132         mutex_destroy(&zp->z_range_lock);
 133
 134         ASSERT(zp->z_dirlocks == NULL);
 135         ASSERT(zp->z_acl_cached == NULL);
 136 }
 137
 138 void
 139 zfs_znode_init(void)
 140 {
 141         /*
 142          * Initialize zcache
 143          */
 144         ASSERT(znode_cache == NULL);
 145         znode_cache = kmem_cache_create("zfs_znode_cache",
 146             sizeof (znode_t), 0, zfs_znode_cache_constructor,
 147             zfs_znode_cache_destructor, NULL, NULL, NULL, KMC_KMEM);
 148 }
 149
 150 void
 151 zfs_znode_fini(void)
 152 {
 153         /*
 154          * Cleanup zcache
 155          */
 156         if (znode_cache)
 157                 kmem_cache_destroy(znode_cache);
 158         znode_cache = NULL;
 159 }
 160
 161 int
 162 zfs_create_share_dir(zfs_sb_t *zsb, dmu_tx_t *tx)
 163 {
 164 #ifdef HAVE_SHARE
 165         zfs_acl_ids_t acl_ids;
 166         vattr_t vattr;
 167         znode_t *sharezp;
 168         vnode_t *vp;
 169         znode_t *zp;
 170         int error;
 171
 172         vattr.va_mask = AT_MODE|AT_UID|AT_GID|AT_TYPE;
 173         vattr.va_mode = S_IFDIR | 0555;
 174         vattr.va_uid = crgetuid(kcred);
 175         vattr.va_gid = crgetgid(kcred);
 176
 177         sharezp = kmem_cache_alloc(znode_cache, KM_PUSHPAGE);
 178         sharezp->z_moved = 0;
 179         sharezp->z_unlinked = 0;
 180         sharezp->z_atime_dirty = 0;
 181         sharezp->z_zfsvfs = zfsvfs;
 182         sharezp->z_is_sa = zfsvfs->z_use_sa;
 183
 184         vp = ZTOV(sharezp);
 185         vn_reinit(vp);
 186         vp->v_type = VDIR;
 187
 188         VERIFY(0 == zfs_acl_ids_create(sharezp, IS_ROOT_NODE, &vattr,
 189             kcred, NULL, &acl_ids));
 190         zfs_mknode(sharezp, &vattr, tx, kcred, IS_ROOT_NODE, &zp, &acl_ids);
 191         ASSERT3P(zp, ==, sharezp);
 192         ASSERT(!vn_in_dnlc(ZTOV(sharezp))); /* not valid to move */
 193         POINTER_INVALIDATE(&sharezp->z_zfsvfs);
 194         error = zap_add(zfsvfs->z_os, MASTER_NODE_OBJ,
 195             ZFS_SHARES_DIR, 8, 1, &sharezp->z_id, tx);
 196         zfsvfs->z_shares_dir = sharezp->z_id;
 197
 198         zfs_acl_ids_free(&acl_ids);
 199         // ZTOV(sharezp)->v_count = 0;
 200         sa_handle_destroy(sharezp->z_sa_hdl);
 201         kmem_cache_free(znode_cache, sharezp);
 202
 203         return (error);
 204 #else
 205         return (0);
 206 #endif /* HAVE_SHARE */
 207 }
 208
 209 static void
 210 zfs_znode_sa_init(zfs_sb_t *zsb, znode_t *zp,
 211     dmu_buf_t *db, dmu_object_type_t obj_type, sa_handle_t *sa_hdl)
 212 {
 213         ASSERT(MUTEX_HELD(ZFS_OBJ_MUTEX(zsb, zp->z_id)));
 214
 215         mutex_enter(&zp->z_lock);
 216
 217         ASSERT(zp->z_sa_hdl == NULL);
 218         ASSERT(zp->z_acl_cached == NULL);
 219         if (sa_hdl == NULL) {
 220                 VERIFY(0 == sa_handle_get_from_db(zsb->z_os, db, zp,
 221                     SA_HDL_SHARED, &zp->z_sa_hdl));
 222         } else {
 223                 zp->z_sa_hdl = sa_hdl;
 224                 sa_set_userp(sa_hdl, zp);
 225         }
 226
 227         zp->z_is_sa = (obj_type == DMU_OT_SA) ? B_TRUE : B_FALSE;
 228
 229         mutex_exit(&zp->z_lock);
 230 }
 231
 232 void
 233 zfs_znode_dmu_fini(znode_t *zp)
 234 {
 235         ASSERT(MUTEX_HELD(ZFS_OBJ_MUTEX(ZTOZSB(zp), zp->z_id)) ||
 236             zp->z_unlinked ||
 237             RW_WRITE_HELD(&ZTOZSB(zp)->z_teardown_inactive_lock));
 238
 239         sa_handle_destroy(zp->z_sa_hdl);
 240         zp->z_sa_hdl = NULL;
 241 }
 242
 243 /*
 244  * Called by new_inode() to allocate a new inode.
 245  */
 246 int
 247 zfs_inode_alloc(struct super_block *sb, struct inode **ip)
 248 {
 249         znode_t *zp;
 250
 251         zp = kmem_cache_alloc(znode_cache, KM_PUSHPAGE);
 252         *ip = ZTOI(zp);
 253
 254         return (0);
 255 }
 256
 257 /*
 258  * Called in multiple places when an inode should be destroyed.
 259  */
 260 void
 261 zfs_inode_destroy(struct inode *ip)
 262 {
 263         znode_t *zp = ITOZ(ip);
 264         zfs_sb_t *zsb = ZTOZSB(zp);
 265
 266         mutex_enter(&zsb->z_znodes_lock);
 267         list_remove(&zsb->z_all_znodes, zp);
 268         mutex_exit(&zsb->z_znodes_lock);
 269
 270         if (zp->z_acl_cached) {
 271                 zfs_acl_free(zp->z_acl_cached);
 272                 zp->z_acl_cached = NULL;
 273         }
 274
 275         kmem_cache_free(znode_cache, zp);
 276 }
 277
 278 static void
 279 zfs_inode_set_ops(zfs_sb_t *zsb, struct inode *ip)
 280 {
 281         uint64_t rdev;
 282
 283         switch (ip->i_mode & S_IFMT) {
 284         case S_IFREG:
 285                 ip->i_op = &zpl_inode_operations;
 286                 ip->i_fop = &zpl_file_operations;
 287                 ip->i_mapping->a_ops = &zpl_address_space_operations;
 288                 break;
 289
 290         case S_IFDIR:
 291                 ip->i_op = &zpl_dir_inode_operations;
 292                 ip->i_fop = &zpl_dir_file_operations;
 293                 ITOZ(ip)->z_zn_prefetch = B_TRUE;
 294                 break;
 295
 296         case S_IFLNK:
 297                 ip->i_op = &zpl_symlink_inode_operations;
 298                 break;
 299
 300         case S_IFCHR:
 301         case S_IFBLK:
 302         case S_IFIFO:
 303         case S_IFSOCK:
 304                 VERIFY(sa_lookup(ITOZ(ip)->z_sa_hdl, SA_ZPL_RDEV(zsb),
 305                     &rdev, sizeof (rdev)) == 0);
 306                 init_special_inode(ip, ip->i_mode, rdev);
 307                 ip->i_op = &zpl_special_inode_operations;
 308                 break;
 309
 310         default:
 311                 printk("ZFS: Invalid mode: 0x%x\n", ip->i_mode);
 312                 VERIFY(0);
 313         }
 314 }
 315
 316 /*
 317  * Construct a znode+inode and initialize.
 318  *
 319  * This does not do a call to dmu_set_user() that is
 320  * up to the caller to do, in case you don't want to
 321  * return the znode
 322  */
 323 static znode_t *
 324 zfs_znode_alloc(zfs_sb_t *zsb, dmu_buf_t *db, int blksz,
 325     dmu_object_type_t obj_type, uint64_t obj, sa_handle_t *hdl,
 326     struct dentry *dentry)
 327 {
 328         znode_t *zp;
 329         struct inode *ip;
 330         uint64_t parent;
 331         sa_bulk_attr_t bulk[9];
 332         int count = 0;
 333
 334         ASSERT(zsb != NULL);
 335
 336         ip = new_inode(zsb->z_sb);
 337         if (ip == NULL)
 338                 return (NULL);
 339
 340         zp = ITOZ(ip);
 341         ASSERT(zp->z_dirlocks == NULL);
 342         zp->z_moved = 0;
 343         zp->z_sa_hdl = NULL;
 344         zp->z_unlinked = 0;
 345         zp->z_atime_dirty = 0;
 346         zp->z_mapcnt = 0;
 347         zp->z_id = db->db_object;
 348         zp->z_blksz = blksz;
 349         zp->z_seq = 0x7A4653;
 350         zp->z_sync_cnt = 0;
 351         zp->z_is_zvol = 0;
 352
 353         zfs_znode_sa_init(zsb, zp, db, obj_type, hdl);
 354
 355         SA_ADD_BULK_ATTR(bulk, count, SA_ZPL_MODE(zsb), NULL, &zp->z_mode, 8);
 356         SA_ADD_BULK_ATTR(bulk, count, SA_ZPL_GEN(zsb), NULL, &zp->z_gen, 8);
 357         SA_ADD_BULK_ATTR(bulk, count, SA_ZPL_SIZE(zsb), NULL, &zp->z_size, 8);
 358         SA_ADD_BULK_ATTR(bulk, count, SA_ZPL_LINKS(zsb), NULL, &zp->z_links, 8);
 359         SA_ADD_BULK_ATTR(bulk, count, SA_ZPL_FLAGS(zsb), NULL,
 360             &zp->z_pflags, 8);
 361         SA_ADD_BULK_ATTR(bulk, count, SA_ZPL_PARENT(zsb), NULL,
 362             &parent, 8);
 363         SA_ADD_BULK_ATTR(bulk, count, SA_ZPL_ATIME(zsb), NULL,
 364             &zp->z_atime, 16);
 365         SA_ADD_BULK_ATTR(bulk, count, SA_ZPL_UID(zsb), NULL, &zp->z_uid, 8);
 366         SA_ADD_BULK_ATTR(bulk, count, SA_ZPL_GID(zsb), NULL, &zp->z_gid, 8);
 367
 368         if (sa_bulk_lookup(zp->z_sa_hdl, bulk, count) != 0 || zp->z_gen == 0) {
 369                 if (hdl == NULL)
 370                         sa_handle_destroy(zp->z_sa_hdl);
 371
 372                 goto error;
 373         }
 374
 375         ip->i_ino = obj;
 376         ip->i_mode = zp->z_mode;
 377         ip->i_mtime = ip->i_atime = ip->i_ctime = CURRENT_TIME_SEC;
 378         zfs_inode_set_ops(zsb, ip);
 379
 380         if (insert_inode_locked(ip))
 381                 goto error;
 382
 383         if (dentry)
 384                 d_instantiate(dentry, ip);
 385
 386         mutex_enter(&zsb->z_znodes_lock);
 387         list_insert_tail(&zsb->z_all_znodes, zp);
 388         membar_producer();
 389         mutex_exit(&zsb->z_znodes_lock);
 390
 391         unlock_new_inode(ip);
 392         return (zp);
 393
 394 error:
 395         unlock_new_inode(ip);
 396         iput(ip);
 397         return NULL;
 398 }
 399
 400 /*
 401  * Update the embedded inode given the znode.  We should work toward
 402  * eliminating this function as soon as possible by removing values
 403  * which are duplicated between the znode and inode.  If the generic
 404  * inode has the correct field it should be used, and the ZFS code
 405  * updated to access the inode.  This can be done incrementally.
 406  */
 407 void
 408 zfs_inode_update(znode_t *zp)
 409 {
 410         zfs_sb_t        *zsb;
 411         struct inode    *ip;
 412         uint32_t        blksize;
 413         uint64_t        atime[2], mtime[2], ctime[2];
 414
 415         ASSERT(zp != NULL);
 416         zsb = ZTOZSB(zp);
 417         ip = ZTOI(zp);
 418
 419         sa_lookup(zp->z_sa_hdl, SA_ZPL_ATIME(zsb), &atime, 16);
 420         sa_lookup(zp->z_sa_hdl, SA_ZPL_MTIME(zsb), &mtime, 16);
 421         sa_lookup(zp->z_sa_hdl, SA_ZPL_CTIME(zsb), &ctime, 16);
 422
 423         spin_lock(&ip->i_lock);
 424         ip->i_generation = zp->z_gen;
 425         ip->i_uid = zp->z_uid;
 426         ip->i_gid = zp->z_gid;
 427         ip->i_nlink = zp->z_links;
 428         ip->i_mode = zp->z_mode;
 429         ip->i_blkbits = SPA_MINBLOCKSHIFT;
 430         dmu_object_size_from_db(sa_get_db(zp->z_sa_hdl), &blksize,
 431             (u_longlong_t *)&ip->i_blocks);
 432
 433         ZFS_TIME_DECODE(&ip->i_atime, atime);
 434         ZFS_TIME_DECODE(&ip->i_mtime, mtime);
 435         ZFS_TIME_DECODE(&ip->i_ctime, ctime);
 436
 437         i_size_write(ip, zp->z_size);
 438         spin_unlock(&ip->i_lock);
 439 }
 440
 441 static uint64_t empty_xattr;
 442 static uint64_t pad[4];
 443 static zfs_acl_phys_t acl_phys;
 444 /*
 445  * Create a new DMU object to hold a zfs znode.
 446  *
 447  *      IN:     dzp     - parent directory for new znode
 448  *              vap     - file attributes for new znode
 449  *              tx      - dmu transaction id for zap operations
 450  *              cr      - credentials of caller
 451  *              flag    - flags:
 452  *                        IS_ROOT_NODE  - new object will be root
 453  *                        IS_XATTR      - new object is an attribute
 454  *              bonuslen - length of bonus buffer
 455  *              setaclp  - File/Dir initial ACL
 456  *              fuidp    - Tracks fuid allocation.
 457  *
 458  *      OUT:    zpp     - allocated znode
 459  *
 460  */
 461 void
 462 zfs_mknode(znode_t *dzp, vattr_t *vap, dmu_tx_t *tx, cred_t *cr,
 463     uint_t flag, znode_t **zpp, zfs_acl_ids_t *acl_ids)
 464 {
 465         uint64_t        crtime[2], atime[2], mtime[2], ctime[2];
 466         uint64_t        mode, size, links, parent, pflags;
 467         uint64_t        dzp_pflags = 0;
 468         uint64_t        rdev = 0;
 469         zfs_sb_t        *zsb = ZTOZSB(dzp);
 470         dmu_buf_t       *db;
 471         timestruc_t     now;
 472         uint64_t        gen, obj;
 473         int             err;
 474         int             bonuslen;
 475         sa_handle_t     *sa_hdl;
 476         dmu_object_type_t obj_type;
 477         sa_bulk_attr_t  *sa_attrs;
 478         int             cnt = 0;
 479         zfs_acl_locator_cb_t locate = { 0 };
 480
 481         if (zsb->z_replay) {
 482                 obj = vap->va_nodeid;
 483                 now = vap->va_ctime;            /* see zfs_replay_create() */
 484                 gen = vap->va_nblocks;          /* ditto */
 485         } else {
 486                 obj = 0;
 487                 gethrestime(&now);
 488                 gen = dmu_tx_get_txg(tx);
 489         }
 490
 491         obj_type = zsb->z_use_sa ? DMU_OT_SA : DMU_OT_ZNODE;
 492         bonuslen = (obj_type == DMU_OT_SA) ?
 493             DN_MAX_BONUSLEN : ZFS_OLD_ZNODE_PHYS_SIZE;
 494
 495         /*
 496          * Create a new DMU object.
 497          */
 498         /*
 499          * There's currently no mechanism for pre-reading the blocks that will
 500          * be needed to allocate a new object, so we accept the small chance
 501          * that there will be an i/o error and we will fail one of the
 502          * assertions below.
 503          */
 504         if (S_ISDIR(vap->va_mode)) {
 505                 if (zsb->z_replay) {
 506                         err = zap_create_claim_norm(zsb->z_os, obj,
 507                             zsb->z_norm, DMU_OT_DIRECTORY_CONTENTS,
 508                             obj_type, bonuslen, tx);
 509                         ASSERT3U(err, ==, 0);
 510                 } else {
 511                         obj = zap_create_norm(zsb->z_os,
 512                             zsb->z_norm, DMU_OT_DIRECTORY_CONTENTS,
 513                             obj_type, bonuslen, tx);
 514                 }
 515         } else {
 516                 if (zsb->z_replay) {
 517                         err = dmu_object_claim(zsb->z_os, obj,
 518                             DMU_OT_PLAIN_FILE_CONTENTS, 0,
 519                             obj_type, bonuslen, tx);
 520                         ASSERT3U(err, ==, 0);
 521                 } else {
 522                         obj = dmu_object_alloc(zsb->z_os,
 523                             DMU_OT_PLAIN_FILE_CONTENTS, 0,
 524                             obj_type, bonuslen, tx);
 525                 }
 526         }
 527
 528         ZFS_OBJ_HOLD_ENTER(zsb, obj);
 529         VERIFY(0 == sa_buf_hold(zsb->z_os, obj, NULL, &db));
 530
 531         /*
 532          * If this is the root, fix up the half-initialized parent pointer
 533          * to reference the just-allocated physical data area.
 534          */
 535         if (flag & IS_ROOT_NODE) {
 536                 dzp->z_id = obj;
 537         } else {
 538                 dzp_pflags = dzp->z_pflags;
 539         }
 540
 541         /*
 542          * If parent is an xattr, so am I.
 543          */
 544         if (dzp_pflags & ZFS_XATTR) {
 545                 flag |= IS_XATTR;
 546         }
 547
 548         if (zsb->z_use_fuids)
 549                 pflags = ZFS_ARCHIVE | ZFS_AV_MODIFIED;
 550         else
 551                 pflags = 0;
 552
 553         if (S_ISDIR(vap->va_mode)) {
 554                 size = 2;               /* contents ("." and "..") */
 555                 links = (flag & (IS_ROOT_NODE | IS_XATTR)) ? 2 : 1;
 556         } else {
 557                 size = links = 0;
 558         }
 559
 560         if (S_ISBLK(vap->va_mode)  || S_ISCHR(vap->va_mode) ||
 561             S_ISFIFO(vap->va_mode) || S_ISSOCK(vap->va_mode))
 562                 rdev = vap->va_rdev;
 563
 564         parent = dzp->z_id;
 565         mode = acl_ids->z_mode;
 566         if (flag & IS_XATTR)
 567                 pflags |= ZFS_XATTR;
 568
 569         /*
 570          * No execs denied will be deterimed when zfs_mode_compute() is called.
 571          */
 572         pflags |= acl_ids->z_aclp->z_hints &
 573             (ZFS_ACL_TRIVIAL|ZFS_INHERIT_ACE|ZFS_ACL_AUTO_INHERIT|
 574             ZFS_ACL_DEFAULTED|ZFS_ACL_PROTECTED);
 575
 576         ZFS_TIME_ENCODE(&now, crtime);
 577         ZFS_TIME_ENCODE(&now, ctime);
 578
 579         if (vap->va_mask & ATTR_ATIME) {
 580                 ZFS_TIME_ENCODE(&vap->va_atime, atime);
 581         } else {
 582                 ZFS_TIME_ENCODE(&now, atime);
 583         }
 584
 585         if (vap->va_mask & ATTR_MTIME) {
 586                 ZFS_TIME_ENCODE(&vap->va_mtime, mtime);
 587         } else {
 588                 ZFS_TIME_ENCODE(&now, mtime);
 589         }
 590
 591         /* Now add in all of the "SA" attributes */
 592         VERIFY(0 == sa_handle_get_from_db(zsb->z_os, db, NULL, SA_HDL_SHARED,
 593             &sa_hdl));
 594
 595         /*
 596          * Setup the array of attributes to be replaced/set on the new file
 597          *
 598          * order for  DMU_OT_ZNODE is critical since it needs to be constructed
 599          * in the old znode_phys_t format.  Don't change this ordering
 600          */
 601         sa_attrs = kmem_alloc(sizeof(sa_bulk_attr_t) * ZPL_END, KM_SLEEP);
 602
 603         if (obj_type == DMU_OT_ZNODE) {
 604                 SA_ADD_BULK_ATTR(sa_attrs, cnt, SA_ZPL_ATIME(zsb),
 605                     NULL, &atime, 16);
 606                 SA_ADD_BULK_ATTR(sa_attrs, cnt, SA_ZPL_MTIME(zsb),
 607                     NULL, &mtime, 16);
 608                 SA_ADD_BULK_ATTR(sa_attrs, cnt, SA_ZPL_CTIME(zsb),
 609                     NULL, &ctime, 16);
 610                 SA_ADD_BULK_ATTR(sa_attrs, cnt, SA_ZPL_CRTIME(zsb),
 611                     NULL, &crtime, 16);
 612                 SA_ADD_BULK_ATTR(sa_attrs, cnt, SA_ZPL_GEN(zsb),
 613                     NULL, &gen, 8);
 614                 SA_ADD_BULK_ATTR(sa_attrs, cnt, SA_ZPL_MODE(zsb),
 615                     NULL, &mode, 8);
 616                 SA_ADD_BULK_ATTR(sa_attrs, cnt, SA_ZPL_SIZE(zsb),
 617                     NULL, &size, 8);
 618                 SA_ADD_BULK_ATTR(sa_attrs, cnt, SA_ZPL_PARENT(zsb),
 619                     NULL, &parent, 8);
 620         } else {
 621                 SA_ADD_BULK_ATTR(sa_attrs, cnt, SA_ZPL_MODE(zsb),
 622                     NULL, &mode, 8);
 623                 SA_ADD_BULK_ATTR(sa_attrs, cnt, SA_ZPL_SIZE(zsb),
 624                     NULL, &size, 8);
 625                 SA_ADD_BULK_ATTR(sa_attrs, cnt, SA_ZPL_GEN(zsb),
 626                     NULL, &gen, 8);
 627                 SA_ADD_BULK_ATTR(sa_attrs, cnt, SA_ZPL_UID(zsb),
 628                     NULL, &acl_ids->z_fuid, 8);
 629                 SA_ADD_BULK_ATTR(sa_attrs, cnt, SA_ZPL_GID(zsb),
 630                     NULL, &acl_ids->z_fgid, 8);
 631                 SA_ADD_BULK_ATTR(sa_attrs, cnt, SA_ZPL_PARENT(zsb),
 632                     NULL, &parent, 8);
 633                 SA_ADD_BULK_ATTR(sa_attrs, cnt, SA_ZPL_FLAGS(zsb),
 634                     NULL, &pflags, 8);
 635                 SA_ADD_BULK_ATTR(sa_attrs, cnt, SA_ZPL_ATIME(zsb),
 636                     NULL, &atime, 16);
 637                 SA_ADD_BULK_ATTR(sa_attrs, cnt, SA_ZPL_MTIME(zsb),
 638                     NULL, &mtime, 16);
 639                 SA_ADD_BULK_ATTR(sa_attrs, cnt, SA_ZPL_CTIME(zsb),
 640                     NULL, &ctime, 16);
 641                 SA_ADD_BULK_ATTR(sa_attrs, cnt, SA_ZPL_CRTIME(zsb),
 642                     NULL, &crtime, 16);
 643         }
 644
 645         SA_ADD_BULK_ATTR(sa_attrs, cnt, SA_ZPL_LINKS(zsb), NULL, &links, 8);
 646
 647         if (obj_type == DMU_OT_ZNODE) {
 648                 SA_ADD_BULK_ATTR(sa_attrs, cnt, SA_ZPL_XATTR(zsb), NULL,
 649                     &empty_xattr, 8);
 650         }
 651         if (obj_type == DMU_OT_ZNODE ||
 652             (S_ISBLK(vap->va_mode)  || S_ISCHR(vap->va_mode) ||
 653              S_ISFIFO(vap->va_mode) || S_ISSOCK(vap->va_mode))) {
 654                 SA_ADD_BULK_ATTR(sa_attrs, cnt, SA_ZPL_RDEV(zsb),
 655                     NULL, &rdev, 8);
 656         }
 657         if (obj_type == DMU_OT_ZNODE) {
 658                 SA_ADD_BULK_ATTR(sa_attrs, cnt, SA_ZPL_FLAGS(zsb),
 659                     NULL, &pflags, 8);
 660                 SA_ADD_BULK_ATTR(sa_attrs, cnt, SA_ZPL_UID(zsb), NULL,
 661                     &acl_ids->z_fuid, 8);
 662                 SA_ADD_BULK_ATTR(sa_attrs, cnt, SA_ZPL_GID(zsb), NULL,
 663                     &acl_ids->z_fgid, 8);
 664                 SA_ADD_BULK_ATTR(sa_attrs, cnt, SA_ZPL_PAD(zsb), NULL, pad,
 665                     sizeof (uint64_t) * 4);
 666                 SA_ADD_BULK_ATTR(sa_attrs, cnt, SA_ZPL_ZNODE_ACL(zsb), NULL,
 667                     &acl_phys, sizeof (zfs_acl_phys_t));
 668         } else if (acl_ids->z_aclp->z_version >= ZFS_ACL_VERSION_FUID) {
 669                 SA_ADD_BULK_ATTR(sa_attrs, cnt, SA_ZPL_DACL_COUNT(zsb), NULL,
 670                     &acl_ids->z_aclp->z_acl_count, 8);
 671                 locate.cb_aclp = acl_ids->z_aclp;
 672                 SA_ADD_BULK_ATTR(sa_attrs, cnt, SA_ZPL_DACL_ACES(zsb),
 673                     zfs_acl_data_locator, &locate,
 674                     acl_ids->z_aclp->z_acl_bytes);
 675                 mode = zfs_mode_compute(mode, acl_ids->z_aclp, &pflags,
 676                     acl_ids->z_fuid, acl_ids->z_fgid);
 677         }
 678
 679         VERIFY(sa_replace_all_by_template(sa_hdl, sa_attrs, cnt, tx) == 0);
 680
 681         if (!(flag & IS_ROOT_NODE)) {
 682                 *zpp = zfs_znode_alloc(zsb, db, 0, obj_type, obj, sa_hdl,
 683                     vap->va_dentry);
 684                 ASSERT(*zpp != NULL);
 685                 ASSERT(dzp != NULL);
 686                 err = zpl_xattr_security_init(ZTOI(*zpp), ZTOI(dzp));
 687                 ASSERT3S(err, ==, 0);
 688         } else {
 689                 /*
 690                  * If we are creating the root node, the "parent" we
 691                  * passed in is the znode for the root.
 692                  */
 693                 *zpp = dzp;
 694
 695                 (*zpp)->z_sa_hdl = sa_hdl;
 696         }
 697
 698         (*zpp)->z_pflags = pflags;
 699         (*zpp)->z_mode = mode;
 700
 701         if (obj_type == DMU_OT_ZNODE ||
 702             acl_ids->z_aclp->z_version < ZFS_ACL_VERSION_FUID) {
 703                 err = zfs_aclset_common(*zpp, acl_ids->z_aclp, cr, tx);
 704                 ASSERT3S(err, ==, 0);
 705         }
 706         kmem_free(sa_attrs, sizeof(sa_bulk_attr_t) * ZPL_END);
 707         ZFS_OBJ_HOLD_EXIT(zsb, obj);
 708 }
 709
 710 /*
 711  * zfs_xvattr_set only updates the in-core attributes
 712  * it is assumed the caller will be doing an sa_bulk_update
 713  * to push the changes out
 714  */
 715 void
 716 zfs_xvattr_set(znode_t *zp, xvattr_t *xvap, dmu_tx_t *tx)
 717 {
 718         xoptattr_t *xoap;
 719
 720         xoap = xva_getxoptattr(xvap);
 721         ASSERT(xoap);
 722
 723         if (XVA_ISSET_REQ(xvap, XAT_CREATETIME)) {
 724                 uint64_t times[2];
 725                 ZFS_TIME_ENCODE(&xoap->xoa_createtime, times);
 726                 (void) sa_update(zp->z_sa_hdl, SA_ZPL_CRTIME(ZTOZSB(zp)),
 727                     &times, sizeof (times), tx);
 728                 XVA_SET_RTN(xvap, XAT_CREATETIME);
 729         }
 730         if (XVA_ISSET_REQ(xvap, XAT_READONLY)) {
 731                 ZFS_ATTR_SET(zp, ZFS_READONLY, xoap->xoa_readonly,
 732                     zp->z_pflags, tx);
 733                 XVA_SET_RTN(xvap, XAT_READONLY);
 734         }
 735         if (XVA_ISSET_REQ(xvap, XAT_HIDDEN)) {
 736                 ZFS_ATTR_SET(zp, ZFS_HIDDEN, xoap->xoa_hidden,
 737                     zp->z_pflags, tx);
 738                 XVA_SET_RTN(xvap, XAT_HIDDEN);
 739         }
 740         if (XVA_ISSET_REQ(xvap, XAT_SYSTEM)) {
 741                 ZFS_ATTR_SET(zp, ZFS_SYSTEM, xoap->xoa_system,
 742                     zp->z_pflags, tx);
 743                 XVA_SET_RTN(xvap, XAT_SYSTEM);
 744         }
 745         if (XVA_ISSET_REQ(xvap, XAT_ARCHIVE)) {
 746                 ZFS_ATTR_SET(zp, ZFS_ARCHIVE, xoap->xoa_archive,
 747                     zp->z_pflags, tx);
 748                 XVA_SET_RTN(xvap, XAT_ARCHIVE);
 749         }
 750         if (XVA_ISSET_REQ(xvap, XAT_IMMUTABLE)) {
 751                 ZFS_ATTR_SET(zp, ZFS_IMMUTABLE, xoap->xoa_immutable,
 752                     zp->z_pflags, tx);
 753                 XVA_SET_RTN(xvap, XAT_IMMUTABLE);
 754         }
 755         if (XVA_ISSET_REQ(xvap, XAT_NOUNLINK)) {
 756                 ZFS_ATTR_SET(zp, ZFS_NOUNLINK, xoap->xoa_nounlink,
 757                     zp->z_pflags, tx);
 758                 XVA_SET_RTN(xvap, XAT_NOUNLINK);
 759         }
 760         if (XVA_ISSET_REQ(xvap, XAT_APPENDONLY)) {
 761                 ZFS_ATTR_SET(zp, ZFS_APPENDONLY, xoap->xoa_appendonly,
 762                     zp->z_pflags, tx);
 763                 XVA_SET_RTN(xvap, XAT_APPENDONLY);
 764         }
 765         if (XVA_ISSET_REQ(xvap, XAT_NODUMP)) {
 766                 ZFS_ATTR_SET(zp, ZFS_NODUMP, xoap->xoa_nodump,
 767                     zp->z_pflags, tx);
 768                 XVA_SET_RTN(xvap, XAT_NODUMP);
 769         }
 770         if (XVA_ISSET_REQ(xvap, XAT_OPAQUE)) {
 771                 ZFS_ATTR_SET(zp, ZFS_OPAQUE, xoap->xoa_opaque,
 772                     zp->z_pflags, tx);
 773                 XVA_SET_RTN(xvap, XAT_OPAQUE);
 774         }
 775         if (XVA_ISSET_REQ(xvap, XAT_AV_QUARANTINED)) {
 776                 ZFS_ATTR_SET(zp, ZFS_AV_QUARANTINED,
 777                     xoap->xoa_av_quarantined, zp->z_pflags, tx);
 778                 XVA_SET_RTN(xvap, XAT_AV_QUARANTINED);
 779         }
 780         if (XVA_ISSET_REQ(xvap, XAT_AV_MODIFIED)) {
 781                 ZFS_ATTR_SET(zp, ZFS_AV_MODIFIED, xoap->xoa_av_modified,
 782                     zp->z_pflags, tx);
 783                 XVA_SET_RTN(xvap, XAT_AV_MODIFIED);
 784         }
 785         if (XVA_ISSET_REQ(xvap, XAT_AV_SCANSTAMP)) {
 786                 zfs_sa_set_scanstamp(zp, xvap, tx);
 787                 XVA_SET_RTN(xvap, XAT_AV_SCANSTAMP);
 788         }
 789         if (XVA_ISSET_REQ(xvap, XAT_REPARSE)) {
 790                 ZFS_ATTR_SET(zp, ZFS_REPARSE, xoap->xoa_reparse,
 791                     zp->z_pflags, tx);
 792                 XVA_SET_RTN(xvap, XAT_REPARSE);
 793         }
 794         if (XVA_ISSET_REQ(xvap, XAT_OFFLINE)) {
 795                 ZFS_ATTR_SET(zp, ZFS_OFFLINE, xoap->xoa_offline,
 796                     zp->z_pflags, tx);
 797                 XVA_SET_RTN(xvap, XAT_OFFLINE);
 798         }
 799         if (XVA_ISSET_REQ(xvap, XAT_SPARSE)) {
 800                 ZFS_ATTR_SET(zp, ZFS_SPARSE, xoap->xoa_sparse,
 801                     zp->z_pflags, tx);
 802                 XVA_SET_RTN(xvap, XAT_SPARSE);
 803         }
 804 }
 805
 806 int
 807 zfs_zget(zfs_sb_t *zsb, uint64_t obj_num, znode_t **zpp)
 808 {
 809         dmu_object_info_t doi;
 810         dmu_buf_t       *db;
 811         znode_t         *zp;
 812         int err;
 813         sa_handle_t     *hdl;
 814
 815         *zpp = NULL;
 816
 817         ZFS_OBJ_HOLD_ENTER(zsb, obj_num);
 818
 819         err = sa_buf_hold(zsb->z_os, obj_num, NULL, &db);
 820         if (err) {
 821                 ZFS_OBJ_HOLD_EXIT(zsb, obj_num);
 822                 return (err);
 823         }
 824
 825         dmu_object_info_from_db(db, &doi);
 826         if (doi.doi_bonus_type != DMU_OT_SA &&
 827             (doi.doi_bonus_type != DMU_OT_ZNODE ||
 828             (doi.doi_bonus_type == DMU_OT_ZNODE &&
 829             doi.doi_bonus_size < sizeof (znode_phys_t)))) {
 830                 sa_buf_rele(db, NULL);
 831                 ZFS_OBJ_HOLD_EXIT(zsb, obj_num);
 832                 return (EINVAL);
 833         }
 834
 835         hdl = dmu_buf_get_user(db);
 836         if (hdl != NULL) {
 837                 zp  = sa_get_userdata(hdl);
 838
 839
 840                 /*
 841                  * Since "SA" does immediate eviction we
 842                  * should never find a sa handle that doesn't
 843                  * know about the znode.
 844                  */
 845
 846                 ASSERT3P(zp, !=, NULL);
 847
 848                 mutex_enter(&zp->z_lock);
 849                 ASSERT3U(zp->z_id, ==, obj_num);
 850                 if (zp->z_unlinked) {
 851                         err = ENOENT;
 852                 } else {
 853                         igrab(ZTOI(zp));
 854                         *zpp = zp;
 855                         err = 0;
 856                 }
 857                 sa_buf_rele(db, NULL);
 858                 mutex_exit(&zp->z_lock);
 859                 ZFS_OBJ_HOLD_EXIT(zsb, obj_num);
 860                 return (err);
 861         }
 862
 863         /*
 864          * Not found create new znode/vnode but only if file exists.
 865          *
 866          * There is a small window where zfs_vget() could
 867          * find this object while a file create is still in
 868          * progress.  This is checked for in zfs_znode_alloc()
 869          *
 870          * if zfs_znode_alloc() fails it will drop the hold on the
 871          * bonus buffer.
 872          */
 873         zp = zfs_znode_alloc(zsb, db, doi.doi_data_block_size,
 874             doi.doi_bonus_type, obj_num, NULL, NULL);
 875         if (zp == NULL) {
 876                 err = ENOENT;
 877         } else {
 878                 *zpp = zp;
 879         }
 880         ZFS_OBJ_HOLD_EXIT(zsb, obj_num);
 881         return (err);
 882 }
 883
 884 int
 885 zfs_rezget(znode_t *zp)
 886 {
 887         zfs_sb_t *zsb = ZTOZSB(zp);
 888         dmu_object_info_t doi;
 889         dmu_buf_t *db;
 890         uint64_t obj_num = zp->z_id;
 891         uint64_t mode;
 892         sa_bulk_attr_t bulk[8];
 893         int err;
 894         int count = 0;
 895         uint64_t gen;
 896
 897         ZFS_OBJ_HOLD_ENTER(zsb, obj_num);
 898
 899         mutex_enter(&zp->z_acl_lock);
 900         if (zp->z_acl_cached) {
 901                 zfs_acl_free(zp->z_acl_cached);
 902                 zp->z_acl_cached = NULL;
 903         }
 904
 905         mutex_exit(&zp->z_acl_lock);
 906         ASSERT(zp->z_sa_hdl == NULL);
 907         err = sa_buf_hold(zsb->z_os, obj_num, NULL, &db);
 908         if (err) {
 909                 ZFS_OBJ_HOLD_EXIT(zsb, obj_num);
 910                 return (err);
 911         }
 912
 913         dmu_object_info_from_db(db, &doi);
 914         if (doi.doi_bonus_type != DMU_OT_SA &&
 915             (doi.doi_bonus_type != DMU_OT_ZNODE ||
 916             (doi.doi_bonus_type == DMU_OT_ZNODE &&
 917             doi.doi_bonus_size < sizeof (znode_phys_t)))) {
 918                 sa_buf_rele(db, NULL);
 919                 ZFS_OBJ_HOLD_EXIT(zsb, obj_num);
 920                 return (EINVAL);
 921         }
 922
 923         zfs_znode_sa_init(zsb, zp, db, doi.doi_bonus_type, NULL);
 924
 925         /* reload cached values */
 926         SA_ADD_BULK_ATTR(bulk, count, SA_ZPL_GEN(zsb), NULL,
 927             &gen, sizeof (gen));
 928         SA_ADD_BULK_ATTR(bulk, count, SA_ZPL_SIZE(zsb), NULL,
 929             &zp->z_size, sizeof (zp->z_size));
 930         SA_ADD_BULK_ATTR(bulk, count, SA_ZPL_LINKS(zsb), NULL,
 931             &zp->z_links, sizeof (zp->z_links));
 932         SA_ADD_BULK_ATTR(bulk, count, SA_ZPL_FLAGS(zsb), NULL,
 933             &zp->z_pflags, sizeof (zp->z_pflags));
 934         SA_ADD_BULK_ATTR(bulk, count, SA_ZPL_ATIME(zsb), NULL,
 935             &zp->z_atime, sizeof (zp->z_atime));
 936         SA_ADD_BULK_ATTR(bulk, count, SA_ZPL_UID(zsb), NULL,
 937             &zp->z_uid, sizeof (zp->z_uid));
 938         SA_ADD_BULK_ATTR(bulk, count, SA_ZPL_GID(zsb), NULL,
 939             &zp->z_gid, sizeof (zp->z_gid));
 940         SA_ADD_BULK_ATTR(bulk, count, SA_ZPL_MODE(zsb), NULL,
 941             &mode, sizeof (mode));
 942
 943         if (sa_bulk_lookup(zp->z_sa_hdl, bulk, count)) {
 944                 zfs_znode_dmu_fini(zp);
 945                 ZFS_OBJ_HOLD_EXIT(zsb, obj_num);
 946                 return (EIO);
 947         }
 948
 949         zp->z_mode = mode;
 950
 951         if (gen != zp->z_gen) {
 952                 zfs_znode_dmu_fini(zp);
 953                 ZFS_OBJ_HOLD_EXIT(zsb, obj_num);
 954                 return (EIO);
 955         }
 956
 957         zp->z_unlinked = (zp->z_links == 0);
 958         zp->z_blksz = doi.doi_data_block_size;
 959
 960         ZFS_OBJ_HOLD_EXIT(zsb, obj_num);
 961
 962         return (0);
 963 }
 964
 965 void
 966 zfs_znode_delete(znode_t *zp, dmu_tx_t *tx)
 967 {
 968         zfs_sb_t *zsb = ZTOZSB(zp);
 969         objset_t *os = zsb->z_os;
 970         uint64_t obj = zp->z_id;
 971         uint64_t acl_obj = zfs_external_acl(zp);
 972
 973         ZFS_OBJ_HOLD_ENTER(zsb, obj);
 974         if (acl_obj) {
 975                 VERIFY(!zp->z_is_sa);
 976                 VERIFY(0 == dmu_object_free(os, acl_obj, tx));
 977         }
 978         VERIFY(0 == dmu_object_free(os, obj, tx));
 979         zfs_znode_dmu_fini(zp);
 980         ZFS_OBJ_HOLD_EXIT(zsb, obj);
 981 }
 982
 983 void
 984 zfs_zinactive(znode_t *zp)
 985 {
 986         zfs_sb_t *zsb = ZTOZSB(zp);
 987         uint64_t z_id = zp->z_id;
 988         boolean_t drop_mutex = 0;
 989
 990         ASSERT(zp->z_sa_hdl);
 991
 992         /*
 993          * Don't allow a zfs_zget() while were trying to release this znode.
 994          *
 995          * Linux allows direct memory reclaim which means that any KM_SLEEP
 996          * allocation may trigger inode eviction.  This can lead to a deadlock
 997          * through the ->shrink_icache_memory()->evict()->zfs_inactive()->
 998          * zfs_zinactive() call path.  To avoid this deadlock the process
 999          * must not reacquire the mutex when it is already holding it.
1000          */
1001         if (!ZFS_OBJ_HOLD_OWNED(zsb, z_id)) {
1002                 ZFS_OBJ_HOLD_ENTER(zsb, z_id);
1003                 drop_mutex = 1;
1004         }
1005
1006         mutex_enter(&zp->z_lock);
1007
1008         /*
1009          * If this was the last reference to a file with no links,
1010          * remove the file from the file system.
1011          */
1012         if (zp->z_unlinked) {
1013                 mutex_exit(&zp->z_lock);
1014
1015                 if (drop_mutex)
1016                         ZFS_OBJ_HOLD_EXIT(zsb, z_id);
1017
1018                 zfs_rmnode(zp);
1019                 return;
1020         }
1021
1022         mutex_exit(&zp->z_lock);
1023         zfs_znode_dmu_fini(zp);
1024
1025         if (drop_mutex)
1026                 ZFS_OBJ_HOLD_EXIT(zsb, z_id);
1027 }
1028
1029 void
1030 zfs_tstamp_update_setup(znode_t *zp, uint_t flag, uint64_t mtime[2],
1031     uint64_t ctime[2], boolean_t have_tx)
1032 {
1033         timestruc_t     now;
1034
1035         gethrestime(&now);
1036
1037         if (have_tx) {  /* will sa_bulk_update happen really soon? */
1038                 zp->z_atime_dirty = 0;
1039                 zp->z_seq++;
1040         } else {
1041                 zp->z_atime_dirty = 1;
1042         }
1043
1044         if (flag & ATTR_ATIME) {
1045                 ZFS_TIME_ENCODE(&now, zp->z_atime);
1046         }
1047
1048         if (flag & ATTR_MTIME) {
1049                 ZFS_TIME_ENCODE(&now, mtime);
1050                 if (ZTOZSB(zp)->z_use_fuids) {
1051                         zp->z_pflags |= (ZFS_ARCHIVE |
1052                             ZFS_AV_MODIFIED);
1053                 }
1054         }
1055
1056         if (flag & ATTR_CTIME) {
1057                 ZFS_TIME_ENCODE(&now, ctime);
1058                 if (ZTOZSB(zp)->z_use_fuids)
1059                         zp->z_pflags |= ZFS_ARCHIVE;
1060         }
1061 }
1062
1063 /*
1064  * Grow the block size for a file.
1065  *
1066  *      IN:     zp      - znode of file to free data in.
1067  *              size    - requested block size
1068  *              tx      - open transaction.
1069  *
1070  * NOTE: this function assumes that the znode is write locked.
1071  */
1072 void
1073 zfs_grow_blocksize(znode_t *zp, uint64_t size, dmu_tx_t *tx)
1074 {
1075         int             error;
1076         u_longlong_t    dummy;
1077
1078         if (size <= zp->z_blksz)
1079                 return;
1080         /*
1081          * If the file size is already greater than the current blocksize,
1082          * we will not grow.  If there is more than one block in a file,
1083          * the blocksize cannot change.
1084          */
1085         if (zp->z_blksz && zp->z_size > zp->z_blksz)
1086                 return;
1087
1088         error = dmu_object_set_blocksize(ZTOZSB(zp)->z_os, zp->z_id,
1089             size, 0, tx);
1090
1091         if (error == ENOTSUP)
1092                 return;
1093         ASSERT3U(error, ==, 0);
1094
1095         /* What blocksize did we actually get? */
1096         dmu_object_size_from_db(sa_get_db(zp->z_sa_hdl), &zp->z_blksz, &dummy);
1097 }
1098
1099 #ifdef HAVE_MMAP
1100 /*
1101  * This is a dummy interface used when pvn_vplist_dirty() should *not*
1102  * be calling back into the fs for a putpage().  E.g.: when truncating
1103  * a file, the pages being "thrown away* don't need to be written out.
1104  */
1105 /* ARGSUSED */
1106 static int
1107 zfs_no_putpage(vnode_t *vp, page_t *pp, u_offset_t *offp, size_t *lenp,
1108     int flags, cred_t *cr)
1109 {
1110         ASSERT(0);
1111         return (0);
1112 }
1113 #endif /* HAVE_MMAP */
1114
1115 /*
1116  * Increase the file length
1117  *
1118  *      IN:     zp      - znode of file to free data in.
1119  *              end     - new end-of-file
1120  *
1121  *      RETURN: 0 if success
1122  *              error code if failure
1123  */
1124 static int
1125 zfs_extend(znode_t *zp, uint64_t end)
1126 {
1127         zfs_sb_t *zsb = ZTOZSB(zp);
1128         dmu_tx_t *tx;
1129         rl_t *rl;
1130         uint64_t newblksz;
1131         int error;
1132
1133         /*
1134          * We will change zp_size, lock the whole file.
1135          */
1136         rl = zfs_range_lock(zp, 0, UINT64_MAX, RL_WRITER);
1137
1138         /*
1139          * Nothing to do if file already at desired length.
1140          */
1141         if (end <= zp->z_size) {
1142                 zfs_range_unlock(rl);
1143                 return (0);
1144         }
1145 top:
1146         tx = dmu_tx_create(zsb->z_os);
1147         dmu_tx_hold_sa(tx, zp->z_sa_hdl, B_FALSE);
1148         zfs_sa_upgrade_txholds(tx, zp);
1149         if (end > zp->z_blksz &&
1150             (!ISP2(zp->z_blksz) || zp->z_blksz < zsb->z_max_blksz)) {
1151                 /*
1152                  * We are growing the file past the current block size.
1153                  */
1154                 if (zp->z_blksz > ZTOZSB(zp)->z_max_blksz) {
1155                         ASSERT(!ISP2(zp->z_blksz));
1156                         newblksz = MIN(end, SPA_MAXBLOCKSIZE);
1157                 } else {
1158                         newblksz = MIN(end, ZTOZSB(zp)->z_max_blksz);
1159                 }
1160                 dmu_tx_hold_write(tx, zp->z_id, 0, newblksz);
1161         } else {
1162                 newblksz = 0;
1163         }
1164
1165         error = dmu_tx_assign(tx, TXG_NOWAIT);
1166         if (error) {
1167                 if (error == ERESTART) {
1168                         dmu_tx_wait(tx);
1169                         dmu_tx_abort(tx);
1170                         goto top;
1171                 }
1172                 dmu_tx_abort(tx);
1173                 zfs_range_unlock(rl);
1174                 return (error);
1175         }
1176
1177         if (newblksz)
1178                 zfs_grow_blocksize(zp, newblksz, tx);
1179
1180         zp->z_size = end;
1181
1182         VERIFY(0 == sa_update(zp->z_sa_hdl, SA_ZPL_SIZE(ZTOZSB(zp)),
1183             &zp->z_size, sizeof (zp->z_size), tx));
1184
1185         zfs_range_unlock(rl);
1186
1187         dmu_tx_commit(tx);
1188
1189         return (0);
1190 }
1191
1192 /*
1193  * Free space in a file.
1194  *
1195  *      IN:     zp      - znode of file to free data in.
1196  *              off     - start of section to free.
1197  *              len     - length of section to free.
1198  *
1199  *      RETURN: 0 if success
1200  *              error code if failure
1201  */
1202 static int
1203 zfs_free_range(znode_t *zp, uint64_t off, uint64_t len)
1204 {
1205         zfs_sb_t *zsb = ZTOZSB(zp);
1206         rl_t *rl;
1207         int error;
1208
1209         /*
1210          * Lock the range being freed.
1211          */
1212         rl = zfs_range_lock(zp, off, len, RL_WRITER);
1213
1214         /*
1215          * Nothing to do if file already at desired length.
1216          */
1217         if (off >= zp->z_size) {
1218                 zfs_range_unlock(rl);
1219                 return (0);
1220         }
1221
1222         if (off + len > zp->z_size)
1223                 len = zp->z_size - off;
1224
1225         error = dmu_free_long_range(zsb->z_os, zp->z_id, off, len);
1226
1227         zfs_range_unlock(rl);
1228
1229         return (error);
1230 }
1231
1232 /*
1233  * Truncate a file
1234  *
1235  *      IN:     zp      - znode of file to free data in.
1236  *              end     - new end-of-file.
1237  *
1238  *      RETURN: 0 if success
1239  *              error code if failure
1240  */
1241 static int
1242 zfs_trunc(znode_t *zp, uint64_t end)
1243 {
1244         zfs_sb_t *zsb = ZTOZSB(zp);
1245         dmu_tx_t *tx;
1246         rl_t *rl;
1247         int error;
1248         sa_bulk_attr_t bulk[2];
1249         int count = 0;
1250
1251         /*
1252          * We will change zp_size, lock the whole file.
1253          */
1254         rl = zfs_range_lock(zp, 0, UINT64_MAX, RL_WRITER);
1255
1256         /*
1257          * Nothing to do if file already at desired length.
1258          */
1259         if (end >= zp->z_size) {
1260                 zfs_range_unlock(rl);
1261                 return (0);
1262         }
1263
1264         error = dmu_free_long_range(zsb->z_os, zp->z_id, end,  -1);
1265         if (error) {
1266                 zfs_range_unlock(rl);
1267                 return (error);
1268         }
1269 top:
1270         tx = dmu_tx_create(zsb->z_os);
1271         dmu_tx_hold_sa(tx, zp->z_sa_hdl, B_FALSE);
1272         zfs_sa_upgrade_txholds(tx, zp);
1273         error = dmu_tx_assign(tx, TXG_NOWAIT);
1274         if (error) {
1275                 if (error == ERESTART) {
1276                         dmu_tx_wait(tx);
1277                         dmu_tx_abort(tx);
1278                         goto top;
1279                 }
1280                 dmu_tx_abort(tx);
1281                 zfs_range_unlock(rl);
1282                 return (error);
1283         }
1284
1285         zp->z_size = end;
1286         SA_ADD_BULK_ATTR(bulk, count, SA_ZPL_SIZE(zsb),
1287             NULL, &zp->z_size, sizeof (zp->z_size));
1288
1289         if (end == 0) {
1290                 zp->z_pflags &= ~ZFS_SPARSE;
1291                 SA_ADD_BULK_ATTR(bulk, count, SA_ZPL_FLAGS(zsb),
1292                     NULL, &zp->z_pflags, 8);
1293         }
1294         VERIFY(sa_bulk_update(zp->z_sa_hdl, bulk, count, tx) == 0);
1295
1296         dmu_tx_commit(tx);
1297
1298         zfs_range_unlock(rl);
1299
1300         return (0);
1301 }
1302
1303 /*
1304  * Free space in a file
1305  *
1306  *      IN:     zp      - znode of file to free data in.
1307  *              off     - start of range
1308  *              len     - end of range (0 => EOF)
1309  *              flag    - current file open mode flags.
1310  *              log     - TRUE if this action should be logged
1311  *
1312  *      RETURN: 0 if success
1313  *              error code if failure
1314  */
1315 int
1316 zfs_freesp(znode_t *zp, uint64_t off, uint64_t len, int flag, boolean_t log)
1317 {
1318 #ifdef HAVE_MANDLOCKS
1319         struct inode *ip = ZTOI(zp);
1320 #endif /* HAVE_MANDLOCKS */
1321         dmu_tx_t *tx;
1322         zfs_sb_t *zsb = ZTOZSB(zp);
1323         zilog_t *zilog = zsb->z_log;
1324         uint64_t mode;
1325         uint64_t mtime[2], ctime[2];
1326         sa_bulk_attr_t bulk[3];
1327         int count = 0;
1328         int error;
1329
1330         if ((error = sa_lookup(zp->z_sa_hdl, SA_ZPL_MODE(zsb), &mode,
1331             sizeof (mode))) != 0)
1332                 return (error);
1333
1334         if (off > zp->z_size) {
1335                 error =  zfs_extend(zp, off+len);
1336                 if (error == 0 && log)
1337                         goto log;
1338                 else
1339                         return (error);
1340         }
1341
1342 #ifdef HAVE_MANDLOCKS
1343         /*
1344          * Check for any locks in the region to be freed.
1345          */
1346
1347         if (MANDLOCK(ip, (mode_t)mode)) {
1348                 uint64_t length = (len ? len : zp->z_size - off);
1349                 if (error = chklock(ip, FWRITE, off, length, flag, NULL))
1350                         return (error);
1351         }
1352 #endif /* HAVE_MANDLOCKS */
1353
1354         if (len == 0) {
1355                 error = zfs_trunc(zp, off);
1356         } else {
1357                 if ((error = zfs_free_range(zp, off, len)) == 0 &&
1358                     off + len > zp->z_size)
1359                         error = zfs_extend(zp, off+len);
1360         }
1361         if (error || !log)
1362                 return (error);
1363 log:
1364         tx = dmu_tx_create(zsb->z_os);
1365         dmu_tx_hold_sa(tx, zp->z_sa_hdl, B_FALSE);
1366         zfs_sa_upgrade_txholds(tx, zp);
1367         error = dmu_tx_assign(tx, TXG_NOWAIT);
1368         if (error) {
1369                 if (error == ERESTART) {
1370                         dmu_tx_wait(tx);
1371                         dmu_tx_abort(tx);
1372                         goto log;
1373                 }
1374                 dmu_tx_abort(tx);
1375                 return (error);
1376         }
1377
1378         SA_ADD_BULK_ATTR(bulk, count, SA_ZPL_MTIME(zsb), NULL, mtime, 16);
1379         SA_ADD_BULK_ATTR(bulk, count, SA_ZPL_CTIME(zsb), NULL, ctime, 16);
1380         SA_ADD_BULK_ATTR(bulk, count, SA_ZPL_FLAGS(zsb),
1381             NULL, &zp->z_pflags, 8);
1382         zfs_tstamp_update_setup(zp, CONTENT_MODIFIED, mtime, ctime, B_TRUE);
1383         error = sa_bulk_update(zp->z_sa_hdl, bulk, count, tx);
1384         ASSERT(error == 0);
1385
1386         zfs_log_truncate(zilog, tx, TX_TRUNCATE, zp, off, len);
1387
1388         dmu_tx_commit(tx);
1389         zfs_inode_update(zp);
1390         return (0);
1391 }
1392
1393 void
1394 zfs_create_fs(objset_t *os, cred_t *cr, nvlist_t *zplprops, dmu_tx_t *tx)
1395 {
1396         uint64_t        moid, obj, sa_obj, version;
1397         uint64_t        norm = 0;
1398         nvpair_t        *elem;
1399         int             error;
1400         timestruc_t     now;
1401         dmu_buf_t       *db;
1402         znode_phys_t    *pzp;
1403
1404         /*
1405          * First attempt to create master node.
1406          */
1407         /*
1408          * In an empty objset, there are no blocks to read and thus
1409          * there can be no i/o errors (which we assert below).
1410          */
1411         moid = MASTER_NODE_OBJ;
1412         error = zap_create_claim(os, moid, DMU_OT_MASTER_NODE,
1413             DMU_OT_NONE, 0, tx);
1414         ASSERT(error == 0);
1415
1416         /*
1417          * Set starting attributes.
1418          */
1419         version = zfs_zpl_version_map(spa_version(dmu_objset_spa(os)));
1420         elem = NULL;
1421         while ((elem = nvlist_next_nvpair(zplprops, elem)) != NULL) {
1422                 /* For the moment we expect all zpl props to be uint64_ts */
1423                 uint64_t val;
1424                 char *name;
1425
1426                 ASSERT(nvpair_type(elem) == DATA_TYPE_UINT64);
1427                 VERIFY(nvpair_value_uint64(elem, &val) == 0);
1428                 name = nvpair_name(elem);
1429                 if (strcmp(name, zfs_prop_to_name(ZFS_PROP_VERSION)) == 0) {
1430                         if (val < version)
1431                                 version = val;
1432                 } else {
1433                         error = zap_update(os, moid, name, 8, 1, &val, tx);
1434                 }
1435                 ASSERT(error == 0);
1436                 if (strcmp(name, zfs_prop_to_name(ZFS_PROP_NORMALIZE)) == 0)
1437                         norm = val;
1438         }
1439         ASSERT(version != 0);
1440         error = zap_update(os, moid, ZPL_VERSION_STR, 8, 1, &version, tx);
1441
1442         /*
1443          * Create zap object used for SA attribute registration
1444          */
1445
1446         if (version >= ZPL_VERSION_SA) {
1447                 sa_obj = zap_create(os, DMU_OT_SA_MASTER_NODE,
1448                     DMU_OT_NONE, 0, tx);
1449                 error = zap_add(os, moid, ZFS_SA_ATTRS, 8, 1, &sa_obj, tx);
1450                 ASSERT(error == 0);
1451         } else {
1452                 sa_obj = 0;
1453         }
1454         /*
1455          * Create a delete queue.
1456          */
1457         obj = zap_create(os, DMU_OT_UNLINKED_SET, DMU_OT_NONE, 0, tx);
1458
1459         error = zap_add(os, moid, ZFS_UNLINKED_SET, 8, 1, &obj, tx);
1460         ASSERT(error == 0);
1461
1462         /*
1463          * Create root znode with code free of VFS dependencies.  This
1464          * is important because without a registered filesystem and super
1465          * block all the required VFS hooks will be missing.  The critical
1466          * thing is to just crete the required root znode.
1467          */
1468         obj = zap_create_norm(os, norm, DMU_OT_DIRECTORY_CONTENTS,
1469                               DMU_OT_ZNODE, sizeof (znode_phys_t), tx);
1470
1471         VERIFY(0 == dmu_bonus_hold(os, obj, FTAG, &db));
1472         dmu_buf_will_dirty(db, tx);
1473
1474         /*
1475          * Initialize the znode physical data to zero.
1476          */
1477         ASSERT(db->db_size >= sizeof (znode_phys_t));
1478         bzero(db->db_data, db->db_size);
1479         pzp = db->db_data;
1480
1481         if (USE_FUIDS(version, os))
1482                 pzp->zp_flags = ZFS_ARCHIVE | ZFS_AV_MODIFIED;
1483
1484         pzp->zp_size = 2; /* "." and ".." */
1485         pzp->zp_links = 2;
1486         pzp->zp_parent = obj;
1487         pzp->zp_gen = dmu_tx_get_txg(tx);
1488         pzp->zp_mode = S_IFDIR | 0755;
1489         pzp->zp_flags = ZFS_ACL_TRIVIAL;
1490
1491         gethrestime(&now);
1492
1493         ZFS_TIME_ENCODE(&now, pzp->zp_crtime);
1494         ZFS_TIME_ENCODE(&now, pzp->zp_ctime);
1495         ZFS_TIME_ENCODE(&now, pzp->zp_atime);
1496         ZFS_TIME_ENCODE(&now, pzp->zp_mtime);
1497
1498         error = zap_add(os, moid, ZFS_ROOT_OBJ, 8, 1, &obj, tx);
1499         ASSERT(error == 0);
1500
1501         dmu_buf_rele(db, FTAG);
1502 }
1503
1504 #endif /* _KERNEL */
1505
1506 static int
1507 zfs_sa_setup(objset_t *osp, sa_attr_type_t **sa_table)
1508 {
1509         uint64_t sa_obj = 0;
1510         int error;
1511
1512         error = zap_lookup(osp, MASTER_NODE_OBJ, ZFS_SA_ATTRS, 8, 1, &sa_obj);
1513         if (error != 0 && error != ENOENT)
1514                 return (error);
1515
1516         error = sa_setup(osp, sa_obj, zfs_attr_table, ZPL_END, sa_table);
1517         return (error);
1518 }
1519
1520 static int
1521 zfs_grab_sa_handle(objset_t *osp, uint64_t obj, sa_handle_t **hdlp,
1522     dmu_buf_t **db)
1523 {
1524         dmu_object_info_t doi;
1525         int error;
1526
1527         if ((error = sa_buf_hold(osp, obj, FTAG, db)) != 0)
1528                 return (error);
1529
1530         dmu_object_info_from_db(*db, &doi);
1531         if ((doi.doi_bonus_type != DMU_OT_SA &&
1532             doi.doi_bonus_type != DMU_OT_ZNODE) ||
1533             (doi.doi_bonus_type == DMU_OT_ZNODE &&
1534             doi.doi_bonus_size < sizeof (znode_phys_t))) {
1535                 sa_buf_rele(*db, FTAG);
1536                 return (ENOTSUP);
1537         }
1538
1539         error = sa_handle_get(osp, obj, NULL, SA_HDL_PRIVATE, hdlp);
1540         if (error != 0) {
1541                 sa_buf_rele(*db, FTAG);
1542                 return (error);
1543         }
1544
1545         return (0);
1546 }
1547
1548 void
1549 zfs_release_sa_handle(sa_handle_t *hdl, dmu_buf_t *db)
1550 {
1551         sa_handle_destroy(hdl);
1552         sa_buf_rele(db, FTAG);
1553 }
1554
1555 /*
1556  * Given an object number, return its parent object number and whether
1557  * or not the object is an extended attribute directory.
1558  */
1559 static int
1560 zfs_obj_to_pobj(sa_handle_t *hdl, sa_attr_type_t *sa_table, uint64_t *pobjp,
1561     int *is_xattrdir)
1562 {
1563         uint64_t parent;
1564         uint64_t pflags;
1565         uint64_t mode;
1566         sa_bulk_attr_t bulk[3];
1567         int count = 0;
1568         int error;
1569
1570         SA_ADD_BULK_ATTR(bulk, count, sa_table[ZPL_PARENT], NULL,
1571             &parent, sizeof (parent));
1572         SA_ADD_BULK_ATTR(bulk, count, sa_table[ZPL_FLAGS], NULL,
1573             &pflags, sizeof (pflags));
1574         SA_ADD_BULK_ATTR(bulk, count, sa_table[ZPL_MODE], NULL,
1575             &mode, sizeof (mode));
1576
1577         if ((error = sa_bulk_lookup(hdl, bulk, count)) != 0)
1578                 return (error);
1579
1580         *pobjp = parent;
1581         *is_xattrdir = ((pflags & ZFS_XATTR) != 0) && S_ISDIR(mode);
1582
1583         return (0);
1584 }
1585
1586 /*
1587  * Given an object number, return some zpl level statistics
1588  */
1589 static int
1590 zfs_obj_to_stats_impl(sa_handle_t *hdl, sa_attr_type_t *sa_table,
1591     zfs_stat_t *sb)
1592 {
1593         sa_bulk_attr_t bulk[4];
1594         int count = 0;
1595
1596         SA_ADD_BULK_ATTR(bulk, count, sa_table[ZPL_MODE], NULL,
1597             &sb->zs_mode, sizeof (sb->zs_mode));
1598         SA_ADD_BULK_ATTR(bulk, count, sa_table[ZPL_GEN], NULL,
1599             &sb->zs_gen, sizeof (sb->zs_gen));
1600         SA_ADD_BULK_ATTR(bulk, count, sa_table[ZPL_LINKS], NULL,
1601             &sb->zs_links, sizeof (sb->zs_links));
1602         SA_ADD_BULK_ATTR(bulk, count, sa_table[ZPL_CTIME], NULL,
1603             &sb->zs_ctime, sizeof (sb->zs_ctime));
1604
1605         return (sa_bulk_lookup(hdl, bulk, count));
1606 }
1607
1608 static int
1609 zfs_obj_to_path_impl(objset_t *osp, uint64_t obj, sa_handle_t *hdl,
1610     sa_attr_type_t *sa_table, char *buf, int len)
1611 {
1612         sa_handle_t *sa_hdl;
1613         sa_handle_t *prevhdl = NULL;
1614         dmu_buf_t *prevdb = NULL;
1615         dmu_buf_t *sa_db = NULL;
1616         char *path = buf + len - 1;
1617         int error;
1618
1619         *path = '\0';
1620         sa_hdl = hdl;
1621
1622         for (;;) {
1623                 uint64_t pobj;
1624                 char component[MAXNAMELEN + 2];
1625                 size_t complen;
1626                 int is_xattrdir;
1627
1628                 if (prevdb)
1629                         zfs_release_sa_handle(prevhdl, prevdb);
1630
1631                 if ((error = zfs_obj_to_pobj(sa_hdl, sa_table, &pobj,
1632                     &is_xattrdir)) != 0)
1633                         break;
1634
1635                 if (pobj == obj) {
1636                         if (path[0] != '/')
1637                                 *--path = '/';
1638                         break;
1639                 }
1640
1641                 component[0] = '/';
1642                 if (is_xattrdir) {
1643                         (void) sprintf(component + 1, "<xattrdir>");
1644                 } else {
1645                         error = zap_value_search(osp, pobj, obj,
1646                             ZFS_DIRENT_OBJ(-1ULL), component + 1);
1647                         if (error != 0)
1648                                 break;
1649                 }
1650
1651                 complen = strlen(component);
1652                 path -= complen;
1653                 ASSERT(path >= buf);
1654                 bcopy(component, path, complen);
1655                 obj = pobj;
1656
1657                 if (sa_hdl != hdl) {
1658                         prevhdl = sa_hdl;
1659                         prevdb = sa_db;
1660                 }
1661                 error = zfs_grab_sa_handle(osp, obj, &sa_hdl, &sa_db);
1662                 if (error != 0) {
1663                         sa_hdl = prevhdl;
1664                         sa_db = prevdb;
1665                         break;
1666                 }
1667         }
1668
1669         if (sa_hdl != NULL && sa_hdl != hdl) {
1670                 ASSERT(sa_db != NULL);
1671                 zfs_release_sa_handle(sa_hdl, sa_db);
1672         }
1673
1674         if (error == 0)
1675                 (void) memmove(buf, path, buf + len - path);
1676
1677         return (error);
1678 }
1679
1680 int
1681 zfs_obj_to_path(objset_t *osp, uint64_t obj, char *buf, int len)
1682 {
1683         sa_attr_type_t *sa_table;
1684         sa_handle_t *hdl;
1685         dmu_buf_t *db;
1686         int error;
1687
1688         error = zfs_sa_setup(osp, &sa_table);
1689         if (error != 0)
1690                 return (error);
1691
1692         error = zfs_grab_sa_handle(osp, obj, &hdl, &db);
1693         if (error != 0)
1694                 return (error);
1695
1696         error = zfs_obj_to_path_impl(osp, obj, hdl, sa_table, buf, len);
1697
1698         zfs_release_sa_handle(hdl, db);
1699         return (error);
1700 }
1701
1702 int
1703 zfs_obj_to_stats(objset_t *osp, uint64_t obj, zfs_stat_t *sb,
1704     char *buf, int len)
1705 {
1706         char *path = buf + len - 1;
1707         sa_attr_type_t *sa_table;
1708         sa_handle_t *hdl;
1709         dmu_buf_t *db;
1710         int error;
1711
1712         *path = '\0';
1713
1714         error = zfs_sa_setup(osp, &sa_table);
1715         if (error != 0)
1716                 return (error);
1717
1718         error = zfs_grab_sa_handle(osp, obj, &hdl, &db);
1719         if (error != 0)
1720                 return (error);
1721
1722         error = zfs_obj_to_stats_impl(hdl, sa_table, sb);
1723         if (error != 0) {
1724                 zfs_release_sa_handle(hdl, db);
1725                 return (error);
1726         }
1727
1728         error = zfs_obj_to_path_impl(osp, obj, hdl, sa_table, buf, len);
1729
1730         zfs_release_sa_handle(hdl, db);
1731         return (error);
1732 }
1733
1734 #if defined(_KERNEL) && defined(HAVE_SPL)
1735 EXPORT_SYMBOL(zfs_create_fs);
1736 EXPORT_SYMBOL(zfs_obj_to_path);
1737 #endif