module/zfs/sa.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 /*
  23  * Copyright (c) 2010, Oracle and/or its affiliates. All rights reserved.
  24  * Copyright (c) 2012 by Delphix. All rights reserved.
  25  */
  26
  27 #include <sys/zfs_context.h>
  28 #include <sys/types.h>
  29 #include <sys/param.h>
  30 #include <sys/systm.h>
  31 #include <sys/sysmacros.h>
  32 #include <sys/dmu.h>
  33 #include <sys/dmu_impl.h>
  34 #include <sys/dmu_objset.h>
  35 #include <sys/dbuf.h>
  36 #include <sys/dnode.h>
  37 #include <sys/zap.h>
  38 #include <sys/sa.h>
  39 #include <sys/sunddi.h>
  40 #include <sys/sa_impl.h>
  41 #include <sys/dnode.h>
  42 #include <sys/errno.h>
  43 #include <sys/zfs_context.h>
  44
  45 /*
  46  * ZFS System attributes:
  47  *
  48  * A generic mechanism to allow for arbitrary attributes
  49  * to be stored in a dnode.  The data will be stored in the bonus buffer of
  50  * the dnode and if necessary a special "spill" block will be used to handle
  51  * overflow situations.  The spill block will be sized to fit the data
  52  * from 512 - 128K.  When a spill block is used the BP (blkptr_t) for the
  53  * spill block is stored at the end of the current bonus buffer.  Any
  54  * attributes that would be in the way of the blkptr_t will be relocated
  55  * into the spill block.
  56  *
  57  * Attribute registration:
  58  *
  59  * Stored persistently on a per dataset basis
  60  * a mapping between attribute "string" names and their actual attribute
  61  * numeric values, length, and byteswap function.  The names are only used
  62  * during registration.  All  attributes are known by their unique attribute
  63  * id value.  If an attribute can have a variable size then the value
  64  * 0 will be used to indicate this.
  65  *
  66  * Attribute Layout:
  67  *
  68  * Attribute layouts are a way to compactly store multiple attributes, but
  69  * without taking the overhead associated with managing each attribute
  70  * individually.  Since you will typically have the same set of attributes
  71  * stored in the same order a single table will be used to represent that
  72  * layout.  The ZPL for example will usually have only about 10 different
  73  * layouts (regular files, device files, symlinks,
  74  * regular files + scanstamp, files/dir with extended attributes, and then
  75  * you have the possibility of all of those minus ACL, because it would
  76  * be kicked out into the spill block)
  77  *
  78  * Layouts are simply an array of the attributes and their
  79  * ordering i.e. [0, 1, 4, 5, 2]
  80  *
  81  * Each distinct layout is given a unique layout number and that is whats
  82  * stored in the header at the beginning of the SA data buffer.
  83  *
  84  * A layout only covers a single dbuf (bonus or spill).  If a set of
  85  * attributes is split up between the bonus buffer and a spill buffer then
  86  * two different layouts will be used.  This allows us to byteswap the
  87  * spill without looking at the bonus buffer and keeps the on disk format of
  88  * the bonus and spill buffer the same.
  89  *
  90  * Adding a single attribute will cause the entire set of attributes to
  91  * be rewritten and could result in a new layout number being constructed
  92  * as part of the rewrite if no such layout exists for the new set of
  93  * attribues.  The new attribute will be appended to the end of the already
  94  * existing attributes.
  95  *
  96  * Both the attribute registration and attribute layout information are
  97  * stored in normal ZAP attributes.  Their should be a small number of
  98  * known layouts and the set of attributes is assumed to typically be quite
  99  * small.
 100  *
 101  * The registered attributes and layout "table" information is maintained
 102  * in core and a special "sa_os_t" is attached to the objset_t.
 103  *
 104  * A special interface is provided to allow for quickly applying
 105  * a large set of attributes at once.  sa_replace_all_by_template() is
 106  * used to set an array of attributes.  This is used by the ZPL when
 107  * creating a brand new file.  The template that is passed into the function
 108  * specifies the attribute, size for variable length attributes, location of
 109  * data and special "data locator" function if the data isn't in a contiguous
 110  * location.
 111  *
 112  * Byteswap implications:
 113  * Since the SA attributes are not entirely self describing we can't do
 114  * the normal byteswap processing.  The special ZAP layout attribute and
 115  * attribute registration attributes define the byteswap function and the
 116  * size of the attributes, unless it is variable sized.
 117  * The normal ZFS byteswapping infrastructure assumes you don't need
 118  * to read any objects in order to do the necessary byteswapping.  Whereas
 119  * SA attributes can only be properly byteswapped if the dataset is opened
 120  * and the layout/attribute ZAP attributes are available.  Because of this
 121  * the SA attributes will be byteswapped when they are first accessed by
 122  * the SA code that will read the SA data.
 123  */
 124
 125 typedef void (sa_iterfunc_t)(void *hdr, void *addr, sa_attr_type_t,
 126     uint16_t length, int length_idx, boolean_t, void *userp);
 127
 128 static int sa_build_index(sa_handle_t *hdl, sa_buf_type_t buftype);
 129 static void sa_idx_tab_hold(objset_t *os, sa_idx_tab_t *idx_tab);
 130 static void *sa_find_idx_tab(objset_t *os, dmu_object_type_t bonustype,
 131     void *data);
 132 static void sa_idx_tab_rele(objset_t *os, void *arg);
 133 static void sa_copy_data(sa_data_locator_t *func, void *start, void *target,
 134     int buflen);
 135 static int sa_modify_attrs(sa_handle_t *hdl, sa_attr_type_t newattr,
 136     sa_data_op_t action, sa_data_locator_t *locator, void *datastart,
 137     uint16_t buflen, dmu_tx_t *tx);
 138
 139 arc_byteswap_func_t *sa_bswap_table[] = {
 140         byteswap_uint64_array,
 141         byteswap_uint32_array,
 142         byteswap_uint16_array,
 143         byteswap_uint8_array,
 144         zfs_acl_byteswap,
 145 };
 146
 147 #define SA_COPY_DATA(f, s, t, l) \
 148         { \
 149                 if (f == NULL) { \
 150                         if (l == 8) { \
 151                                 *(uint64_t *)t = *(uint64_t *)s; \
 152                         } else if (l == 16) { \
 153                                 *(uint64_t *)t = *(uint64_t *)s; \
 154                                 *(uint64_t *)((uintptr_t)t + 8) = \
 155                                     *(uint64_t *)((uintptr_t)s + 8); \
 156                         } else { \
 157                                 bcopy(s, t, l); \
 158                         } \
 159                 } else \
 160                         sa_copy_data(f, s, t, l); \
 161         }
 162
 163 /*
 164  * This table is fixed and cannot be changed.  Its purpose is to
 165  * allow the SA code to work with both old/new ZPL file systems.
 166  * It contains the list of legacy attributes.  These attributes aren't
 167  * stored in the "attribute" registry zap objects, since older ZPL file systems
 168  * won't have the registry.  Only objsets of type ZFS_TYPE_FILESYSTEM will
 169  * use this static table.
 170  */
 171 sa_attr_reg_t sa_legacy_attrs[] = {
 172         {"ZPL_ATIME", sizeof (uint64_t) * 2, SA_UINT64_ARRAY, 0},
 173         {"ZPL_MTIME", sizeof (uint64_t) * 2, SA_UINT64_ARRAY, 1},
 174         {"ZPL_CTIME", sizeof (uint64_t) * 2, SA_UINT64_ARRAY, 2},
 175         {"ZPL_CRTIME", sizeof (uint64_t) * 2, SA_UINT64_ARRAY, 3},
 176         {"ZPL_GEN", sizeof (uint64_t), SA_UINT64_ARRAY, 4},
 177         {"ZPL_MODE", sizeof (uint64_t), SA_UINT64_ARRAY, 5},
 178         {"ZPL_SIZE", sizeof (uint64_t), SA_UINT64_ARRAY, 6},
 179         {"ZPL_PARENT", sizeof (uint64_t), SA_UINT64_ARRAY, 7},
 180         {"ZPL_LINKS", sizeof (uint64_t), SA_UINT64_ARRAY, 8},
 181         {"ZPL_XATTR", sizeof (uint64_t), SA_UINT64_ARRAY, 9},
 182         {"ZPL_RDEV", sizeof (uint64_t), SA_UINT64_ARRAY, 10},
 183         {"ZPL_FLAGS", sizeof (uint64_t), SA_UINT64_ARRAY, 11},
 184         {"ZPL_UID", sizeof (uint64_t), SA_UINT64_ARRAY, 12},
 185         {"ZPL_GID", sizeof (uint64_t), SA_UINT64_ARRAY, 13},
 186         {"ZPL_PAD", sizeof (uint64_t) * 4, SA_UINT64_ARRAY, 14},
 187         {"ZPL_ZNODE_ACL", 88, SA_UINT8_ARRAY, 15},
 188 };
 189
 190 /*
 191  * ZPL legacy layout
 192  * This is only used for objects of type DMU_OT_ZNODE
 193  */
 194 sa_attr_type_t sa_legacy_zpl_layout[] = {
 195     0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15
 196 };
 197
 198 /*
 199  * Special dummy layout used for buffers with no attributes.
 200  */
 201
 202 sa_attr_type_t sa_dummy_zpl_layout[] = { 0 };
 203
 204 static int sa_legacy_attr_count = 16;
 205 static kmem_cache_t *sa_cache = NULL;
 206 static kmem_cache_t *spill_cache = NULL;
 207
 208 /*ARGSUSED*/
 209 static int
 210 sa_cache_constructor(void *buf, void *unused, int kmflag)
 211 {
 212         sa_handle_t *hdl = buf;
 213
 214         hdl->sa_bonus_tab = NULL;
 215         hdl->sa_spill_tab = NULL;
 216         hdl->sa_os = NULL;
 217         hdl->sa_userp = NULL;
 218         hdl->sa_bonus = NULL;
 219         hdl->sa_spill = NULL;
 220         mutex_init(&hdl->sa_lock, NULL, MUTEX_DEFAULT, NULL);
 221         return (0);
 222 }
 223
 224 /*ARGSUSED*/
 225 static void
 226 sa_cache_destructor(void *buf, void *unused)
 227 {
 228         sa_handle_t *hdl = buf;
 229         mutex_destroy(&hdl->sa_lock);
 230 }
 231
 232 void
 233 sa_cache_init(void)
 234 {
 235         sa_cache = kmem_cache_create("sa_cache",
 236             sizeof (sa_handle_t), 0, sa_cache_constructor,
 237             sa_cache_destructor, NULL, NULL, NULL, 0);
 238         spill_cache = kmem_cache_create("spill_cache",
 239             SPA_MAXBLOCKSIZE, 0, NULL, NULL, NULL, NULL, NULL, 0);
 240 }
 241
 242 void
 243 sa_cache_fini(void)
 244 {
 245         if (sa_cache)
 246                 kmem_cache_destroy(sa_cache);
 247
 248         if (spill_cache)
 249                 kmem_cache_destroy(spill_cache);
 250 }
 251
 252 void *
 253 sa_spill_alloc(int flags)
 254 {
 255         return kmem_cache_alloc(spill_cache, flags);
 256 }
 257
 258 void
 259 sa_spill_free(void *obj)
 260 {
 261         kmem_cache_free(spill_cache, obj);
 262 }
 263
 264 static int
 265 layout_num_compare(const void *arg1, const void *arg2)
 266 {
 267         const sa_lot_t *node1 = arg1;
 268         const sa_lot_t *node2 = arg2;
 269
 270         if (node1->lot_num > node2->lot_num)
 271                 return (1);
 272         else if (node1->lot_num < node2->lot_num)
 273                 return (-1);
 274         return (0);
 275 }
 276
 277 static int
 278 layout_hash_compare(const void *arg1, const void *arg2)
 279 {
 280         const sa_lot_t *node1 = arg1;
 281         const sa_lot_t *node2 = arg2;
 282
 283         if (node1->lot_hash > node2->lot_hash)
 284                 return (1);
 285         if (node1->lot_hash < node2->lot_hash)
 286                 return (-1);
 287         if (node1->lot_instance > node2->lot_instance)
 288                 return (1);
 289         if (node1->lot_instance < node2->lot_instance)
 290                 return (-1);
 291         return (0);
 292 }
 293
 294 boolean_t
 295 sa_layout_equal(sa_lot_t *tbf, sa_attr_type_t *attrs, int count)
 296 {
 297         int i;
 298
 299         if (count != tbf->lot_attr_count)
 300                 return (1);
 301
 302         for (i = 0; i != count; i++) {
 303                 if (attrs[i] != tbf->lot_attrs[i])
 304                         return (1);
 305         }
 306         return (0);
 307 }
 308
 309 #define SA_ATTR_HASH(attr) (zfs_crc64_table[(-1ULL ^ attr) & 0xFF])
 310
 311 static uint64_t
 312 sa_layout_info_hash(sa_attr_type_t *attrs, int attr_count)
 313 {
 314         int i;
 315         uint64_t crc = -1ULL;
 316
 317         for (i = 0; i != attr_count; i++)
 318                 crc ^= SA_ATTR_HASH(attrs[i]);
 319
 320         return (crc);
 321 }
 322
 323 static int
 324 sa_get_spill(sa_handle_t *hdl)
 325 {
 326         int rc;
 327         if (hdl->sa_spill == NULL) {
 328                 if ((rc = dmu_spill_hold_existing(hdl->sa_bonus, NULL,
 329                     &hdl->sa_spill)) == 0)
 330                         VERIFY(0 == sa_build_index(hdl, SA_SPILL));
 331         } else {
 332                 rc = 0;
 333         }
 334
 335         return (rc);
 336 }
 337
 338 /*
 339  * Main attribute lookup/update function
 340  * returns 0 for success or non zero for failures
 341  *
 342  * Operates on bulk array, first failure will abort further processing
 343  */
 344 int
 345 sa_attr_op(sa_handle_t *hdl, sa_bulk_attr_t *bulk, int count,
 346     sa_data_op_t data_op, dmu_tx_t *tx)
 347 {
 348         sa_os_t *sa = hdl->sa_os->os_sa;
 349         int i;
 350         int error = 0;
 351         sa_buf_type_t buftypes;
 352
 353         buftypes = 0;
 354
 355         ASSERT(count > 0);
 356         for (i = 0; i != count; i++) {
 357                 ASSERT(bulk[i].sa_attr <= hdl->sa_os->os_sa->sa_num_attrs);
 358
 359                 bulk[i].sa_addr = NULL;
 360                 /* First check the bonus buffer */
 361
 362                 if (hdl->sa_bonus_tab && TOC_ATTR_PRESENT(
 363                     hdl->sa_bonus_tab->sa_idx_tab[bulk[i].sa_attr])) {
 364                         SA_ATTR_INFO(sa, hdl->sa_bonus_tab,
 365                             SA_GET_HDR(hdl, SA_BONUS),
 366                             bulk[i].sa_attr, bulk[i], SA_BONUS, hdl);
 367                         if (tx && !(buftypes & SA_BONUS)) {
 368                                 dmu_buf_will_dirty(hdl->sa_bonus, tx);
 369                                 buftypes |= SA_BONUS;
 370                         }
 371                 }
 372                 if (bulk[i].sa_addr == NULL &&
 373                     ((error = sa_get_spill(hdl)) == 0)) {
 374                         if (TOC_ATTR_PRESENT(
 375                             hdl->sa_spill_tab->sa_idx_tab[bulk[i].sa_attr])) {
 376                                 SA_ATTR_INFO(sa, hdl->sa_spill_tab,
 377                                     SA_GET_HDR(hdl, SA_SPILL),
 378                                     bulk[i].sa_attr, bulk[i], SA_SPILL, hdl);
 379                                 if (tx && !(buftypes & SA_SPILL) &&
 380                                     bulk[i].sa_size == bulk[i].sa_length) {
 381                                         dmu_buf_will_dirty(hdl->sa_spill, tx);
 382                                         buftypes |= SA_SPILL;
 383                                 }
 384                         }
 385                 }
 386                 if (error && error != ENOENT) {
 387                         return ((error == ECKSUM) ? EIO : error);
 388                 }
 389
 390                 switch (data_op) {
 391                 case SA_LOOKUP:
 392                         if (bulk[i].sa_addr == NULL)
 393                                 return (ENOENT);
 394                         if (bulk[i].sa_data) {
 395                                 SA_COPY_DATA(bulk[i].sa_data_func,
 396                                     bulk[i].sa_addr, bulk[i].sa_data,
 397                                     bulk[i].sa_size);
 398                         }
 399                         continue;
 400
 401                 case SA_UPDATE:
 402                         /* existing rewrite of attr */
 403                         if (bulk[i].sa_addr &&
 404                             bulk[i].sa_size == bulk[i].sa_length) {
 405                                 SA_COPY_DATA(bulk[i].sa_data_func,
 406                                     bulk[i].sa_data, bulk[i].sa_addr,
 407                                     bulk[i].sa_length);
 408                                 continue;
 409                         } else if (bulk[i].sa_addr) { /* attr size change */
 410                                 error = sa_modify_attrs(hdl, bulk[i].sa_attr,
 411                                     SA_REPLACE, bulk[i].sa_data_func,
 412                                     bulk[i].sa_data, bulk[i].sa_length, tx);
 413                         } else { /* adding new attribute */
 414                                 error = sa_modify_attrs(hdl, bulk[i].sa_attr,
 415                                     SA_ADD, bulk[i].sa_data_func,
 416                                     bulk[i].sa_data, bulk[i].sa_length, tx);
 417                         }
 418                         if (error)
 419                                 return (error);
 420                         break;
 421                 default:
 422                         break;
 423                 }
 424         }
 425         return (error);
 426 }
 427
 428 static sa_lot_t *
 429 sa_add_layout_entry(objset_t *os, sa_attr_type_t *attrs, int attr_count,
 430     uint64_t lot_num, uint64_t hash, boolean_t zapadd, dmu_tx_t *tx)
 431 {
 432         sa_os_t *sa = os->os_sa;
 433         sa_lot_t *tb, *findtb;
 434         int i;
 435         avl_index_t loc;
 436
 437         ASSERT(MUTEX_HELD(&sa->sa_lock));
 438         tb = kmem_zalloc(sizeof (sa_lot_t), KM_PUSHPAGE);
 439         tb->lot_attr_count = attr_count;
 440         tb->lot_attrs = kmem_alloc(sizeof (sa_attr_type_t) * attr_count,
 441             KM_PUSHPAGE);
 442         bcopy(attrs, tb->lot_attrs, sizeof (sa_attr_type_t) * attr_count);
 443         tb->lot_num = lot_num;
 444         tb->lot_hash = hash;
 445         tb->lot_instance = 0;
 446
 447         if (zapadd) {
 448                 char attr_name[8];
 449
 450                 if (sa->sa_layout_attr_obj == 0) {
 451                         sa->sa_layout_attr_obj = zap_create_link(os,
 452                             DMU_OT_SA_ATTR_LAYOUTS,
 453                             sa->sa_master_obj, SA_LAYOUTS, tx);
 454                 }
 455
 456                 (void) snprintf(attr_name, sizeof (attr_name),
 457                     "%d", (int)lot_num);
 458                 VERIFY(0 == zap_update(os, os->os_sa->sa_layout_attr_obj,
 459                     attr_name, 2, attr_count, attrs, tx));
 460         }
 461
 462         list_create(&tb->lot_idx_tab, sizeof (sa_idx_tab_t),
 463             offsetof(sa_idx_tab_t, sa_next));
 464
 465         for (i = 0; i != attr_count; i++) {
 466                 if (sa->sa_attr_table[tb->lot_attrs[i]].sa_length == 0)
 467                         tb->lot_var_sizes++;
 468         }
 469
 470         avl_add(&sa->sa_layout_num_tree, tb);
 471
 472         /* verify we don't have a hash collision */
 473         if ((findtb = avl_find(&sa->sa_layout_hash_tree, tb, &loc)) != NULL) {
 474                 for (; findtb && findtb->lot_hash == hash;
 475                     findtb = AVL_NEXT(&sa->sa_layout_hash_tree, findtb)) {
 476                         if (findtb->lot_instance != tb->lot_instance)
 477                                 break;
 478                         tb->lot_instance++;
 479                 }
 480         }
 481         avl_add(&sa->sa_layout_hash_tree, tb);
 482         return (tb);
 483 }
 484
 485 static void
 486 sa_find_layout(objset_t *os, uint64_t hash, sa_attr_type_t *attrs,
 487     int count, dmu_tx_t *tx, sa_lot_t **lot)
 488 {
 489         sa_lot_t *tb, tbsearch;
 490         avl_index_t loc;
 491         sa_os_t *sa = os->os_sa;
 492         boolean_t found = B_FALSE;
 493
 494         mutex_enter(&sa->sa_lock);
 495         tbsearch.lot_hash = hash;
 496         tbsearch.lot_instance = 0;
 497         tb = avl_find(&sa->sa_layout_hash_tree, &tbsearch, &loc);
 498         if (tb) {
 499                 for (; tb && tb->lot_hash == hash;
 500                     tb = AVL_NEXT(&sa->sa_layout_hash_tree, tb)) {
 501                         if (sa_layout_equal(tb, attrs, count) == 0) {
 502                                 found = B_TRUE;
 503                                 break;
 504                         }
 505                 }
 506         }
 507         if (!found) {
 508                 tb = sa_add_layout_entry(os, attrs, count,
 509                     avl_numnodes(&sa->sa_layout_num_tree), hash, B_TRUE, tx);
 510         }
 511         mutex_exit(&sa->sa_lock);
 512         *lot = tb;
 513 }
 514
 515 static int
 516 sa_resize_spill(sa_handle_t *hdl, uint32_t size, dmu_tx_t *tx)
 517 {
 518         int error;
 519         uint32_t blocksize;
 520
 521         if (size == 0) {
 522                 blocksize = SPA_MINBLOCKSIZE;
 523         } else if (size > SPA_MAXBLOCKSIZE) {
 524                 ASSERT(0);
 525                 return (EFBIG);
 526         } else {
 527                 blocksize = P2ROUNDUP_TYPED(size, SPA_MINBLOCKSIZE, uint32_t);
 528         }
 529
 530         error = dbuf_spill_set_blksz(hdl->sa_spill, blocksize, tx);
 531         ASSERT(error == 0);
 532         return (error);
 533 }
 534
 535 static void
 536 sa_copy_data(sa_data_locator_t *func, void *datastart, void *target, int buflen)
 537 {
 538         if (func == NULL) {
 539                 bcopy(datastart, target, buflen);
 540         } else {
 541                 boolean_t start;
 542                 int bytes;
 543                 void *dataptr;
 544                 void *saptr = target;
 545                 uint32_t length;
 546
 547                 start = B_TRUE;
 548                 bytes = 0;
 549                 while (bytes < buflen) {
 550                         func(&dataptr, &length, buflen, start, datastart);
 551                         bcopy(dataptr, saptr, length);
 552                         saptr = (void *)((caddr_t)saptr + length);
 553                         bytes += length;
 554                         start = B_FALSE;
 555                 }
 556         }
 557 }
 558
 559 /*
 560  * Determine several different sizes
 561  * first the sa header size
 562  * the number of bytes to be stored
 563  * if spill would occur the index in the attribute array is returned
 564  *
 565  * the boolean will_spill will be set when spilling is necessary.  It
 566  * is only set when the buftype is SA_BONUS
 567  */
 568 static int
 569 sa_find_sizes(sa_os_t *sa, sa_bulk_attr_t *attr_desc, int attr_count,
 570     dmu_buf_t *db, sa_buf_type_t buftype, int *index, int *total,
 571     boolean_t *will_spill)
 572 {
 573         int var_size = 0;
 574         int i;
 575         int full_space;
 576         int hdrsize;
 577         boolean_t done = B_FALSE;
 578
 579         if (buftype == SA_BONUS && sa->sa_force_spill) {
 580                 *total = 0;
 581                 *index = 0;
 582                 *will_spill = B_TRUE;
 583                 return (0);
 584         }
 585
 586         *index = -1;
 587         *total = 0;
 588
 589         if (buftype == SA_BONUS)
 590                 *will_spill = B_FALSE;
 591
 592         hdrsize = (SA_BONUSTYPE_FROM_DB(db) == DMU_OT_ZNODE) ? 0 :
 593             sizeof (sa_hdr_phys_t);
 594
 595         full_space = (buftype == SA_BONUS) ? DN_MAX_BONUSLEN : db->db_size;
 596         ASSERT(IS_P2ALIGNED(full_space, 8));
 597
 598         for (i = 0; i != attr_count; i++) {
 599                 boolean_t is_var_sz;
 600
 601                 *total = P2ROUNDUP(*total, 8);
 602                 *total += attr_desc[i].sa_length;
 603                 if (done)
 604                         goto next;
 605
 606                 is_var_sz = (SA_REGISTERED_LEN(sa, attr_desc[i].sa_attr) == 0);
 607                 if (is_var_sz) {
 608                         var_size++;
 609                 }
 610
 611                 if (is_var_sz && var_size > 1) {
 612                         if (P2ROUNDUP(hdrsize + sizeof (uint16_t), 8) +
 613                             *total < full_space) {
 614                                 hdrsize += sizeof (uint16_t);
 615                         } else {
 616                                 done = B_TRUE;
 617                                 *index = i;
 618                                 if (buftype == SA_BONUS)
 619                                         *will_spill = B_TRUE;
 620                                 continue;
 621                         }
 622                 }
 623
 624                 /*
 625                  * find index of where spill *could* occur.
 626                  * Then continue to count of remainder attribute
 627                  * space.  The sum is used later for sizing bonus
 628                  * and spill buffer.
 629                  */
 630                 if (buftype == SA_BONUS && *index == -1 &&
 631                     (*total + P2ROUNDUP(hdrsize, 8)) >
 632                     (full_space - sizeof (blkptr_t))) {
 633                         *index = i;
 634                         done = B_TRUE;
 635                 }
 636
 637 next:
 638                 if ((*total + P2ROUNDUP(hdrsize, 8)) > full_space &&
 639                     buftype == SA_BONUS)
 640                         *will_spill = B_TRUE;
 641         }
 642
 643         hdrsize = P2ROUNDUP(hdrsize, 8);
 644         return (hdrsize);
 645 }
 646
 647 #define BUF_SPACE_NEEDED(total, header) (total + header)
 648
 649 /*
 650  * Find layout that corresponds to ordering of attributes
 651  * If not found a new layout number is created and added to
 652  * persistent layout tables.
 653  */
 654 static int
 655 sa_build_layouts(sa_handle_t *hdl, sa_bulk_attr_t *attr_desc, int attr_count,
 656     dmu_tx_t *tx)
 657 {
 658         sa_os_t *sa = hdl->sa_os->os_sa;
 659         uint64_t hash;
 660         sa_buf_type_t buftype;
 661         sa_hdr_phys_t *sahdr;
 662         void *data_start;
 663         int buf_space;
 664         sa_attr_type_t *attrs, *attrs_start;
 665         int i, lot_count;
 666         int hdrsize, spillhdrsize = 0;
 667         int used;
 668         dmu_object_type_t bonustype;
 669         sa_lot_t *lot;
 670         int len_idx;
 671         int spill_used;
 672         boolean_t spilling;
 673
 674         dmu_buf_will_dirty(hdl->sa_bonus, tx);
 675         bonustype = SA_BONUSTYPE_FROM_DB(hdl->sa_bonus);
 676
 677         /* first determine bonus header size and sum of all attributes */
 678         hdrsize = sa_find_sizes(sa, attr_desc, attr_count, hdl->sa_bonus,
 679             SA_BONUS, &i, &used, &spilling);
 680
 681         if (used > SPA_MAXBLOCKSIZE)
 682                 return (EFBIG);
 683
 684         VERIFY(0 == dmu_set_bonus(hdl->sa_bonus, spilling ?
 685             MIN(DN_MAX_BONUSLEN - sizeof (blkptr_t), used + hdrsize) :
 686             used + hdrsize, tx));
 687
 688         ASSERT((bonustype == DMU_OT_ZNODE && spilling == 0) ||
 689             bonustype == DMU_OT_SA);
 690
 691         /* setup and size spill buffer when needed */
 692         if (spilling) {
 693                 boolean_t dummy;
 694
 695                 if (hdl->sa_spill == NULL) {
 696                         VERIFY(dmu_spill_hold_by_bonus(hdl->sa_bonus, NULL,
 697                             &hdl->sa_spill) == 0);
 698                 }
 699                 dmu_buf_will_dirty(hdl->sa_spill, tx);
 700
 701                 spillhdrsize = sa_find_sizes(sa, &attr_desc[i],
 702                     attr_count - i, hdl->sa_spill, SA_SPILL, &i,
 703                     &spill_used, &dummy);
 704
 705                 if (spill_used > SPA_MAXBLOCKSIZE)
 706                         return (EFBIG);
 707
 708                 buf_space = hdl->sa_spill->db_size - spillhdrsize;
 709                 if (BUF_SPACE_NEEDED(spill_used, spillhdrsize) >
 710                     hdl->sa_spill->db_size)
 711                         VERIFY(0 == sa_resize_spill(hdl,
 712                             BUF_SPACE_NEEDED(spill_used, spillhdrsize), tx));
 713         }
 714
 715         /* setup starting pointers to lay down data */
 716         data_start = (void *)((uintptr_t)hdl->sa_bonus->db_data + hdrsize);
 717         sahdr = (sa_hdr_phys_t *)hdl->sa_bonus->db_data;
 718         buftype = SA_BONUS;
 719
 720         if (spilling)
 721                 buf_space = (sa->sa_force_spill) ?
 722                     0 : SA_BLKPTR_SPACE - hdrsize;
 723         else
 724                 buf_space = hdl->sa_bonus->db_size - hdrsize;
 725
 726         attrs_start = attrs = kmem_alloc(sizeof (sa_attr_type_t) * attr_count,
 727             KM_PUSHPAGE);
 728         lot_count = 0;
 729
 730         for (i = 0, len_idx = 0, hash = -1ULL; i != attr_count; i++) {
 731                 uint16_t length;
 732
 733                 ASSERT(IS_P2ALIGNED(data_start, 8));
 734                 ASSERT(IS_P2ALIGNED(buf_space, 8));
 735                 attrs[i] = attr_desc[i].sa_attr;
 736                 length = SA_REGISTERED_LEN(sa, attrs[i]);
 737                 if (length == 0)
 738                         length = attr_desc[i].sa_length;
 739
 740                 if (buf_space < length) {  /* switch to spill buffer */
 741                         VERIFY(spilling);
 742                         VERIFY(bonustype == DMU_OT_SA);
 743                         if (buftype == SA_BONUS && !sa->sa_force_spill) {
 744                                 sa_find_layout(hdl->sa_os, hash, attrs_start,
 745                                     lot_count, tx, &lot);
 746                                 SA_SET_HDR(sahdr, lot->lot_num, hdrsize);
 747                         }
 748
 749                         buftype = SA_SPILL;
 750                         hash = -1ULL;
 751                         len_idx = 0;
 752
 753                         sahdr = (sa_hdr_phys_t *)hdl->sa_spill->db_data;
 754                         sahdr->sa_magic = SA_MAGIC;
 755                         data_start = (void *)((uintptr_t)sahdr +
 756                             spillhdrsize);
 757                         attrs_start = &attrs[i];
 758                         buf_space = hdl->sa_spill->db_size - spillhdrsize;
 759                         lot_count = 0;
 760                 }
 761                 hash ^= SA_ATTR_HASH(attrs[i]);
 762                 attr_desc[i].sa_addr = data_start;
 763                 attr_desc[i].sa_size = length;
 764                 SA_COPY_DATA(attr_desc[i].sa_data_func, attr_desc[i].sa_data,
 765                     data_start, length);
 766                 if (sa->sa_attr_table[attrs[i]].sa_length == 0) {
 767                         sahdr->sa_lengths[len_idx++] = length;
 768                 }
 769                 data_start = (void *)P2ROUNDUP(((uintptr_t)data_start +
 770                     length), 8);
 771                 buf_space -= P2ROUNDUP(length, 8);
 772                 lot_count++;
 773         }
 774
 775         sa_find_layout(hdl->sa_os, hash, attrs_start, lot_count, tx, &lot);
 776
 777         /*
 778          * Verify that old znodes always have layout number 0.
 779          * Must be DMU_OT_SA for arbitrary layouts
 780          */
 781         VERIFY((bonustype == DMU_OT_ZNODE && lot->lot_num == 0) ||
 782             (bonustype == DMU_OT_SA && lot->lot_num > 1));
 783
 784         if (bonustype == DMU_OT_SA) {
 785                 SA_SET_HDR(sahdr, lot->lot_num,
 786                     buftype == SA_BONUS ? hdrsize : spillhdrsize);
 787         }
 788
 789         kmem_free(attrs, sizeof (sa_attr_type_t) * attr_count);
 790         if (hdl->sa_bonus_tab) {
 791                 sa_idx_tab_rele(hdl->sa_os, hdl->sa_bonus_tab);
 792                 hdl->sa_bonus_tab = NULL;
 793         }
 794         if (!sa->sa_force_spill)
 795                 VERIFY(0 == sa_build_index(hdl, SA_BONUS));
 796         if (hdl->sa_spill) {
 797                 sa_idx_tab_rele(hdl->sa_os, hdl->sa_spill_tab);
 798                 if (!spilling) {
 799                         /*
 800                          * remove spill block that is no longer needed.
 801                          */
 802                         dmu_buf_rele(hdl->sa_spill, NULL);
 803                         hdl->sa_spill = NULL;
 804                         hdl->sa_spill_tab = NULL;
 805                         VERIFY(0 == dmu_rm_spill(hdl->sa_os,
 806                             sa_handle_object(hdl), tx));
 807                 } else {
 808                         VERIFY(0 == sa_build_index(hdl, SA_SPILL));
 809                 }
 810         }
 811
 812         return (0);
 813 }
 814
 815 static void
 816 sa_free_attr_table(sa_os_t *sa)
 817 {
 818         int i;
 819
 820         if (sa->sa_attr_table == NULL)
 821                 return;
 822
 823         for (i = 0; i != sa->sa_num_attrs; i++) {
 824                 if (sa->sa_attr_table[i].sa_name)
 825                         kmem_free(sa->sa_attr_table[i].sa_name,
 826                             strlen(sa->sa_attr_table[i].sa_name) + 1);
 827         }
 828
 829         kmem_free(sa->sa_attr_table,
 830             sizeof (sa_attr_table_t) * sa->sa_num_attrs);
 831
 832         sa->sa_attr_table = NULL;
 833 }
 834
 835 static int
 836 sa_attr_table_setup(objset_t *os, sa_attr_reg_t *reg_attrs, int count)
 837 {
 838         sa_os_t *sa = os->os_sa;
 839         uint64_t sa_attr_count = 0;
 840         uint64_t sa_reg_count = 0;
 841         int error = 0;
 842         uint64_t attr_value;
 843         sa_attr_table_t *tb;
 844         zap_cursor_t zc;
 845         zap_attribute_t za;
 846         int registered_count = 0;
 847         int i;
 848         dmu_objset_type_t ostype = dmu_objset_type(os);
 849
 850         sa->sa_user_table =
 851             kmem_zalloc(count * sizeof (sa_attr_type_t), KM_PUSHPAGE);
 852         sa->sa_user_table_sz = count * sizeof (sa_attr_type_t);
 853
 854         if (sa->sa_reg_attr_obj != 0) {
 855                 error = zap_count(os, sa->sa_reg_attr_obj,
 856                     &sa_attr_count);
 857
 858                 /*
 859                  * Make sure we retrieved a count and that it isn't zero
 860                  */
 861                 if (error || (error == 0 && sa_attr_count == 0)) {
 862                         if (error == 0)
 863                                 error = EINVAL;
 864                         goto bail;
 865                 }
 866                 sa_reg_count = sa_attr_count;
 867         }
 868
 869         if (ostype == DMU_OST_ZFS && sa_attr_count == 0)
 870                 sa_attr_count += sa_legacy_attr_count;
 871
 872         /* Allocate attribute numbers for attributes that aren't registered */
 873         for (i = 0; i != count; i++) {
 874                 boolean_t found = B_FALSE;
 875                 int j;
 876
 877                 if (ostype == DMU_OST_ZFS) {
 878                         for (j = 0; j != sa_legacy_attr_count; j++) {
 879                                 if (strcmp(reg_attrs[i].sa_name,
 880                                     sa_legacy_attrs[j].sa_name) == 0) {
 881                                         sa->sa_user_table[i] =
 882                                             sa_legacy_attrs[j].sa_attr;
 883                                         found = B_TRUE;
 884                                 }
 885                         }
 886                 }
 887                 if (found)
 888                         continue;
 889
 890                 if (sa->sa_reg_attr_obj)
 891                         error = zap_lookup(os, sa->sa_reg_attr_obj,
 892                             reg_attrs[i].sa_name, 8, 1, &attr_value);
 893                 else
 894                         error = ENOENT;
 895                 switch (error) {
 896                 case ENOENT:
 897                         sa->sa_user_table[i] = (sa_attr_type_t)sa_attr_count;
 898                         sa_attr_count++;
 899                         break;
 900                 case 0:
 901                         sa->sa_user_table[i] = ATTR_NUM(attr_value);
 902                         break;
 903                 default:
 904                         goto bail;
 905                 }
 906         }
 907
 908         sa->sa_num_attrs = sa_attr_count;
 909         tb = sa->sa_attr_table =
 910             kmem_zalloc(sizeof (sa_attr_table_t) * sa_attr_count, KM_PUSHPAGE);
 911
 912         /*
 913          * Attribute table is constructed from requested attribute list,
 914          * previously foreign registered attributes, and also the legacy
 915          * ZPL set of attributes.
 916          */
 917
 918         if (sa->sa_reg_attr_obj) {
 919                 for (zap_cursor_init(&zc, os, sa->sa_reg_attr_obj);
 920                     (error = zap_cursor_retrieve(&zc, &za)) == 0;
 921                     zap_cursor_advance(&zc)) {
 922                         uint64_t value;
 923                         value  = za.za_first_integer;
 924
 925                         registered_count++;
 926                         tb[ATTR_NUM(value)].sa_attr = ATTR_NUM(value);
 927                         tb[ATTR_NUM(value)].sa_length = ATTR_LENGTH(value);
 928                         tb[ATTR_NUM(value)].sa_byteswap = ATTR_BSWAP(value);
 929                         tb[ATTR_NUM(value)].sa_registered = B_TRUE;
 930
 931                         if (tb[ATTR_NUM(value)].sa_name) {
 932                                 continue;
 933                         }
 934                         tb[ATTR_NUM(value)].sa_name =
 935                             kmem_zalloc(strlen(za.za_name) +1, KM_PUSHPAGE);
 936                         (void) strlcpy(tb[ATTR_NUM(value)].sa_name, za.za_name,
 937                             strlen(za.za_name) +1);
 938                 }
 939                 zap_cursor_fini(&zc);
 940                 /*
 941                  * Make sure we processed the correct number of registered
 942                  * attributes
 943                  */
 944                 if (registered_count != sa_reg_count) {
 945                         ASSERT(error != 0);
 946                         goto bail;
 947                 }
 948
 949         }
 950
 951         if (ostype == DMU_OST_ZFS) {
 952                 for (i = 0; i != sa_legacy_attr_count; i++) {
 953                         if (tb[i].sa_name)
 954                                 continue;
 955                         tb[i].sa_attr = sa_legacy_attrs[i].sa_attr;
 956                         tb[i].sa_length = sa_legacy_attrs[i].sa_length;
 957                         tb[i].sa_byteswap = sa_legacy_attrs[i].sa_byteswap;
 958                         tb[i].sa_registered = B_FALSE;
 959                         tb[i].sa_name =
 960                             kmem_zalloc(strlen(sa_legacy_attrs[i].sa_name) +1,
 961                             KM_PUSHPAGE);
 962                         (void) strlcpy(tb[i].sa_name,
 963                             sa_legacy_attrs[i].sa_name,
 964                             strlen(sa_legacy_attrs[i].sa_name) + 1);
 965                 }
 966         }
 967
 968         for (i = 0; i != count; i++) {
 969                 sa_attr_type_t attr_id;
 970
 971                 attr_id = sa->sa_user_table[i];
 972                 if (tb[attr_id].sa_name)
 973                         continue;
 974
 975                 tb[attr_id].sa_length = reg_attrs[i].sa_length;
 976                 tb[attr_id].sa_byteswap = reg_attrs[i].sa_byteswap;
 977                 tb[attr_id].sa_attr = attr_id;
 978                 tb[attr_id].sa_name =
 979                     kmem_zalloc(strlen(reg_attrs[i].sa_name) + 1, KM_PUSHPAGE);
 980                 (void) strlcpy(tb[attr_id].sa_name, reg_attrs[i].sa_name,
 981                     strlen(reg_attrs[i].sa_name) + 1);
 982         }
 983
 984         sa->sa_need_attr_registration =
 985             (sa_attr_count != registered_count);
 986
 987         return (0);
 988 bail:
 989         kmem_free(sa->sa_user_table, count * sizeof (sa_attr_type_t));
 990         sa->sa_user_table = NULL;
 991         sa_free_attr_table(sa);
 992         return ((error != 0) ? error : EINVAL);
 993 }
 994
 995 int
 996 sa_setup(objset_t *os, uint64_t sa_obj, sa_attr_reg_t *reg_attrs, int count,
 997     sa_attr_type_t **user_table)
 998 {
 999         zap_cursor_t zc;
1000         zap_attribute_t za;
1001         sa_os_t *sa;
1002         dmu_objset_type_t ostype = dmu_objset_type(os);
1003         sa_attr_type_t *tb;
1004         int error;
1005
1006         mutex_enter(&os->os_lock);
1007         if (os->os_sa) {
1008                 mutex_enter(&os->os_sa->sa_lock);
1009                 mutex_exit(&os->os_lock);
1010                 tb = os->os_sa->sa_user_table;
1011                 mutex_exit(&os->os_sa->sa_lock);
1012                 *user_table = tb;
1013                 return (0);
1014         }
1015
1016         sa = kmem_zalloc(sizeof (sa_os_t), KM_PUSHPAGE);
1017         mutex_init(&sa->sa_lock, NULL, MUTEX_DEFAULT, NULL);
1018         sa->sa_master_obj = sa_obj;
1019
1020         os->os_sa = sa;
1021         mutex_enter(&sa->sa_lock);
1022         mutex_exit(&os->os_lock);
1023         avl_create(&sa->sa_layout_num_tree, layout_num_compare,
1024             sizeof (sa_lot_t), offsetof(sa_lot_t, lot_num_node));
1025         avl_create(&sa->sa_layout_hash_tree, layout_hash_compare,
1026             sizeof (sa_lot_t), offsetof(sa_lot_t, lot_hash_node));
1027
1028         if (sa_obj) {
1029                 error = zap_lookup(os, sa_obj, SA_LAYOUTS,
1030                     8, 1, &sa->sa_layout_attr_obj);
1031                 if (error != 0 && error != ENOENT)
1032                         goto fail;
1033                 error = zap_lookup(os, sa_obj, SA_REGISTRY,
1034                     8, 1, &sa->sa_reg_attr_obj);
1035                 if (error != 0 && error != ENOENT)
1036                         goto fail;
1037         }
1038
1039         if ((error = sa_attr_table_setup(os, reg_attrs, count)) != 0)
1040                 goto fail;
1041
1042         if (sa->sa_layout_attr_obj != 0) {
1043                 uint64_t layout_count;
1044
1045                 error = zap_count(os, sa->sa_layout_attr_obj,
1046                     &layout_count);
1047
1048                 /*
1049                  * Layout number count should be > 0
1050                  */
1051                 if (error || (error == 0 && layout_count == 0)) {
1052                         if (error == 0)
1053                                 error = EINVAL;
1054                         goto fail;
1055                 }
1056
1057                 for (zap_cursor_init(&zc, os, sa->sa_layout_attr_obj);
1058                     (error = zap_cursor_retrieve(&zc, &za)) == 0;
1059                     zap_cursor_advance(&zc)) {
1060                         sa_attr_type_t *lot_attrs;
1061                         uint64_t lot_num;
1062
1063                         lot_attrs = kmem_zalloc(sizeof (sa_attr_type_t) *
1064                             za.za_num_integers, KM_PUSHPAGE);
1065
1066                         if ((error = (zap_lookup(os, sa->sa_layout_attr_obj,
1067                             za.za_name, 2, za.za_num_integers,
1068                             lot_attrs))) != 0) {
1069                                 kmem_free(lot_attrs, sizeof (sa_attr_type_t) *
1070                                     za.za_num_integers);
1071                                 break;
1072                         }
1073                         VERIFY(ddi_strtoull(za.za_name, NULL, 10,
1074                             (unsigned long long *)&lot_num) == 0);
1075
1076                         (void) sa_add_layout_entry(os, lot_attrs,
1077                             za.za_num_integers, lot_num,
1078                             sa_layout_info_hash(lot_attrs,
1079                             za.za_num_integers), B_FALSE, NULL);
1080                         kmem_free(lot_attrs, sizeof (sa_attr_type_t) *
1081                             za.za_num_integers);
1082                 }
1083                 zap_cursor_fini(&zc);
1084
1085                 /*
1086                  * Make sure layout count matches number of entries added
1087                  * to AVL tree
1088                  */
1089                 if (avl_numnodes(&sa->sa_layout_num_tree) != layout_count) {
1090                         ASSERT(error != 0);
1091                         goto fail;
1092                 }
1093         }
1094
1095         /* Add special layout number for old ZNODES */
1096         if (ostype == DMU_OST_ZFS) {
1097                 (void) sa_add_layout_entry(os, sa_legacy_zpl_layout,
1098                     sa_legacy_attr_count, 0,
1099                     sa_layout_info_hash(sa_legacy_zpl_layout,
1100                     sa_legacy_attr_count), B_FALSE, NULL);
1101
1102                 (void) sa_add_layout_entry(os, sa_dummy_zpl_layout, 0, 1,
1103                     0, B_FALSE, NULL);
1104         }
1105         *user_table = os->os_sa->sa_user_table;
1106         mutex_exit(&sa->sa_lock);
1107         return (0);
1108 fail:
1109         os->os_sa = NULL;
1110         sa_free_attr_table(sa);
1111         if (sa->sa_user_table)
1112                 kmem_free(sa->sa_user_table, sa->sa_user_table_sz);
1113         mutex_exit(&sa->sa_lock);
1114         kmem_free(sa, sizeof (sa_os_t));
1115         return ((error == ECKSUM) ? EIO : error);
1116 }
1117
1118 void
1119 sa_tear_down(objset_t *os)
1120 {
1121         sa_os_t *sa = os->os_sa;
1122         sa_lot_t *layout;
1123         void *cookie;
1124
1125         kmem_free(sa->sa_user_table, sa->sa_user_table_sz);
1126
1127         /* Free up attr table */
1128
1129         sa_free_attr_table(sa);
1130
1131         cookie = NULL;
1132         while ((layout = avl_destroy_nodes(&sa->sa_layout_hash_tree, &cookie))){
1133                 sa_idx_tab_t *tab;
1134                 while ((tab = list_head(&layout->lot_idx_tab))) {
1135                         ASSERT(refcount_count(&tab->sa_refcount));
1136                         sa_idx_tab_rele(os, tab);
1137                 }
1138         }
1139
1140         cookie = NULL;
1141         while ((layout = avl_destroy_nodes(&sa->sa_layout_num_tree, &cookie))){
1142                 kmem_free(layout->lot_attrs,
1143                     sizeof (sa_attr_type_t) * layout->lot_attr_count);
1144                 kmem_free(layout, sizeof (sa_lot_t));
1145         }
1146
1147         avl_destroy(&sa->sa_layout_hash_tree);
1148         avl_destroy(&sa->sa_layout_num_tree);
1149
1150         kmem_free(sa, sizeof (sa_os_t));
1151         os->os_sa = NULL;
1152 }
1153
1154 void
1155 sa_build_idx_tab(void *hdr, void *attr_addr, sa_attr_type_t attr,
1156     uint16_t length, int length_idx, boolean_t var_length, void *userp)
1157 {
1158         sa_idx_tab_t *idx_tab = userp;
1159
1160         if (var_length) {
1161                 ASSERT(idx_tab->sa_variable_lengths);
1162                 idx_tab->sa_variable_lengths[length_idx] = length;
1163         }
1164         TOC_ATTR_ENCODE(idx_tab->sa_idx_tab[attr], length_idx,
1165             (uint32_t)((uintptr_t)attr_addr - (uintptr_t)hdr));
1166 }
1167
1168 static void
1169 sa_attr_iter(objset_t *os, sa_hdr_phys_t *hdr, dmu_object_type_t type,
1170     sa_iterfunc_t func, sa_lot_t *tab, void *userp)
1171 {
1172         void *data_start;
1173         sa_lot_t *tb = tab;
1174         sa_lot_t search;
1175         avl_index_t loc;
1176         sa_os_t *sa = os->os_sa;
1177         int i;
1178         uint16_t *length_start = NULL;
1179         uint8_t length_idx = 0;
1180
1181         if (tab == NULL) {
1182                 search.lot_num = SA_LAYOUT_NUM(hdr, type);
1183                 tb = avl_find(&sa->sa_layout_num_tree, &search, &loc);
1184                 ASSERT(tb);
1185         }
1186
1187         if (IS_SA_BONUSTYPE(type)) {
1188                 data_start = (void *)P2ROUNDUP(((uintptr_t)hdr +
1189                     offsetof(sa_hdr_phys_t, sa_lengths) +
1190                     (sizeof (uint16_t) * tb->lot_var_sizes)), 8);
1191                 length_start = hdr->sa_lengths;
1192         } else {
1193                 data_start = hdr;
1194         }
1195
1196         for (i = 0; i != tb->lot_attr_count; i++) {
1197                 int attr_length, reg_length;
1198                 uint8_t idx_len;
1199
1200                 reg_length = sa->sa_attr_table[tb->lot_attrs[i]].sa_length;
1201                 if (reg_length) {
1202                         attr_length = reg_length;
1203                         idx_len = 0;
1204                 } else {
1205                         attr_length = length_start[length_idx];
1206                         idx_len = length_idx++;
1207                 }
1208
1209                 func(hdr, data_start, tb->lot_attrs[i], attr_length,
1210                     idx_len, reg_length == 0 ? B_TRUE : B_FALSE, userp);
1211
1212                 data_start = (void *)P2ROUNDUP(((uintptr_t)data_start +
1213                     attr_length), 8);
1214         }
1215 }
1216
1217 /*ARGSUSED*/
1218 void
1219 sa_byteswap_cb(void *hdr, void *attr_addr, sa_attr_type_t attr,
1220     uint16_t length, int length_idx, boolean_t variable_length, void *userp)
1221 {
1222         sa_handle_t *hdl = userp;
1223         sa_os_t *sa = hdl->sa_os->os_sa;
1224
1225         sa_bswap_table[sa->sa_attr_table[attr].sa_byteswap](attr_addr, length);
1226 }
1227
1228 void
1229 sa_byteswap(sa_handle_t *hdl, sa_buf_type_t buftype)
1230 {
1231         sa_hdr_phys_t *sa_hdr_phys = SA_GET_HDR(hdl, buftype);
1232         dmu_buf_impl_t *db;
1233         int num_lengths = 1;
1234         int i;
1235         ASSERTV(sa_os_t *sa = hdl->sa_os->os_sa);
1236
1237         ASSERT(MUTEX_HELD(&sa->sa_lock));
1238         if (sa_hdr_phys->sa_magic == SA_MAGIC)
1239                 return;
1240
1241         db = SA_GET_DB(hdl, buftype);
1242
1243         if (buftype == SA_SPILL) {
1244                 arc_release(db->db_buf, NULL);
1245                 arc_buf_thaw(db->db_buf);
1246         }
1247
1248         sa_hdr_phys->sa_magic = BSWAP_32(sa_hdr_phys->sa_magic);
1249         sa_hdr_phys->sa_layout_info = BSWAP_16(sa_hdr_phys->sa_layout_info);
1250
1251         /*
1252          * Determine number of variable lenghts in header
1253          * The standard 8 byte header has one for free and a
1254          * 16 byte header would have 4 + 1;
1255          */
1256         if (SA_HDR_SIZE(sa_hdr_phys) > 8)
1257                 num_lengths += (SA_HDR_SIZE(sa_hdr_phys) - 8) >> 1;
1258         for (i = 0; i != num_lengths; i++)
1259                 sa_hdr_phys->sa_lengths[i] =
1260                     BSWAP_16(sa_hdr_phys->sa_lengths[i]);
1261
1262         sa_attr_iter(hdl->sa_os, sa_hdr_phys, DMU_OT_SA,
1263             sa_byteswap_cb, NULL, hdl);
1264
1265         if (buftype == SA_SPILL)
1266                 arc_buf_freeze(((dmu_buf_impl_t *)hdl->sa_spill)->db_buf);
1267 }
1268
1269 static int
1270 sa_build_index(sa_handle_t *hdl, sa_buf_type_t buftype)
1271 {
1272         sa_hdr_phys_t *sa_hdr_phys;
1273         dmu_buf_impl_t *db = SA_GET_DB(hdl, buftype);
1274         dmu_object_type_t bonustype = SA_BONUSTYPE_FROM_DB(db);
1275         sa_os_t *sa = hdl->sa_os->os_sa;
1276         sa_idx_tab_t *idx_tab;
1277
1278         sa_hdr_phys = SA_GET_HDR(hdl, buftype);
1279
1280         mutex_enter(&sa->sa_lock);
1281
1282         /* Do we need to byteswap? */
1283
1284         /* only check if not old znode */
1285         if (IS_SA_BONUSTYPE(bonustype) && sa_hdr_phys->sa_magic != SA_MAGIC &&
1286             sa_hdr_phys->sa_magic != 0) {
1287                 VERIFY(BSWAP_32(sa_hdr_phys->sa_magic) == SA_MAGIC);
1288                 sa_byteswap(hdl, buftype);
1289         }
1290
1291         idx_tab = sa_find_idx_tab(hdl->sa_os, bonustype, sa_hdr_phys);
1292
1293         if (buftype == SA_BONUS)
1294                 hdl->sa_bonus_tab = idx_tab;
1295         else
1296                 hdl->sa_spill_tab = idx_tab;
1297
1298         mutex_exit(&sa->sa_lock);
1299         return (0);
1300 }
1301
1302 /*ARGSUSED*/
1303 void
1304 sa_evict(dmu_buf_t *db, void *sap)
1305 {
1306         panic("evicting sa dbuf %p\n", (void *)db);
1307 }
1308
1309 static void
1310 sa_idx_tab_rele(objset_t *os, void *arg)
1311 {
1312         sa_os_t *sa = os->os_sa;
1313         sa_idx_tab_t *idx_tab = arg;
1314
1315         if (idx_tab == NULL)
1316                 return;
1317
1318         mutex_enter(&sa->sa_lock);
1319         if (refcount_remove(&idx_tab->sa_refcount, NULL) == 0) {
1320                 list_remove(&idx_tab->sa_layout->lot_idx_tab, idx_tab);
1321                 if (idx_tab->sa_variable_lengths)
1322                         kmem_free(idx_tab->sa_variable_lengths,
1323                             sizeof (uint16_t) *
1324                             idx_tab->sa_layout->lot_var_sizes);
1325                 refcount_destroy(&idx_tab->sa_refcount);
1326                 kmem_free(idx_tab->sa_idx_tab,
1327                     sizeof (uint32_t) * sa->sa_num_attrs);
1328                 kmem_free(idx_tab, sizeof (sa_idx_tab_t));
1329         }
1330         mutex_exit(&sa->sa_lock);
1331 }
1332
1333 static void
1334 sa_idx_tab_hold(objset_t *os, sa_idx_tab_t *idx_tab)
1335 {
1336         ASSERTV(sa_os_t *sa = os->os_sa);
1337
1338         ASSERT(MUTEX_HELD(&sa->sa_lock));
1339         (void) refcount_add(&idx_tab->sa_refcount, NULL);
1340 }
1341
1342 void
1343 sa_spill_rele(sa_handle_t *hdl)
1344 {
1345         mutex_enter(&hdl->sa_lock);
1346         if (hdl->sa_spill) {
1347                 sa_idx_tab_rele(hdl->sa_os, hdl->sa_spill_tab);
1348                 dmu_buf_rele(hdl->sa_spill, NULL);
1349                 hdl->sa_spill = NULL;
1350                 hdl->sa_spill_tab = NULL;
1351         }
1352         mutex_exit(&hdl->sa_lock);
1353 }
1354
1355 void
1356 sa_handle_destroy(sa_handle_t *hdl)
1357 {
1358         mutex_enter(&hdl->sa_lock);
1359         (void) dmu_buf_update_user((dmu_buf_t *)hdl->sa_bonus, hdl,
1360             NULL, NULL, NULL);
1361
1362         if (hdl->sa_bonus_tab) {
1363                 sa_idx_tab_rele(hdl->sa_os, hdl->sa_bonus_tab);
1364                 hdl->sa_bonus_tab = NULL;
1365         }
1366         if (hdl->sa_spill_tab) {
1367                 sa_idx_tab_rele(hdl->sa_os, hdl->sa_spill_tab);
1368                 hdl->sa_spill_tab = NULL;
1369         }
1370
1371         dmu_buf_rele(hdl->sa_bonus, NULL);
1372
1373         if (hdl->sa_spill)
1374                 dmu_buf_rele((dmu_buf_t *)hdl->sa_spill, NULL);
1375         mutex_exit(&hdl->sa_lock);
1376
1377         kmem_cache_free(sa_cache, hdl);
1378 }
1379
1380 int
1381 sa_handle_get_from_db(objset_t *os, dmu_buf_t *db, void *userp,
1382     sa_handle_type_t hdl_type, sa_handle_t **handlepp)
1383 {
1384         int error = 0;
1385         sa_handle_t *handle;
1386 #ifdef ZFS_DEBUG
1387         dmu_object_info_t doi;
1388
1389         dmu_object_info_from_db(db, &doi);
1390         ASSERT(doi.doi_bonus_type == DMU_OT_SA ||
1391             doi.doi_bonus_type == DMU_OT_ZNODE);
1392 #endif
1393         /* find handle, if it exists */
1394         /* if one doesn't exist then create a new one, and initialize it */
1395
1396         handle = (hdl_type == SA_HDL_SHARED) ? dmu_buf_get_user(db) : NULL;
1397         if (handle == NULL) {
1398                 sa_handle_t *newhandle;
1399                 handle = kmem_cache_alloc(sa_cache, KM_SLEEP);
1400                 handle->sa_userp = userp;
1401                 handle->sa_bonus = db;
1402                 handle->sa_os = os;
1403                 handle->sa_spill = NULL;
1404
1405                 error = sa_build_index(handle, SA_BONUS);
1406                 newhandle = (hdl_type == SA_HDL_SHARED) ?
1407                     dmu_buf_set_user_ie(db, handle,
1408                     NULL, sa_evict) : NULL;
1409
1410                 if (newhandle != NULL) {
1411                         kmem_cache_free(sa_cache, handle);
1412                         handle = newhandle;
1413                 }
1414         }
1415         *handlepp = handle;
1416
1417         return (error);
1418 }
1419
1420 int
1421 sa_handle_get(objset_t *objset, uint64_t objid, void *userp,
1422     sa_handle_type_t hdl_type, sa_handle_t **handlepp)
1423 {
1424         dmu_buf_t *db;
1425         int error;
1426
1427         if ((error = dmu_bonus_hold(objset, objid, NULL, &db)))
1428                 return (error);
1429
1430         return (sa_handle_get_from_db(objset, db, userp, hdl_type,
1431             handlepp));
1432 }
1433
1434 int
1435 sa_buf_hold(objset_t *objset, uint64_t obj_num, void *tag, dmu_buf_t **db)
1436 {
1437         return (dmu_bonus_hold(objset, obj_num, tag, db));
1438 }
1439
1440 void
1441 sa_buf_rele(dmu_buf_t *db, void *tag)
1442 {
1443         dmu_buf_rele(db, tag);
1444 }
1445
1446 int
1447 sa_lookup_impl(sa_handle_t *hdl, sa_bulk_attr_t *bulk, int count)
1448 {
1449         ASSERT(hdl);
1450         ASSERT(MUTEX_HELD(&hdl->sa_lock));
1451         return (sa_attr_op(hdl, bulk, count, SA_LOOKUP, NULL));
1452 }
1453
1454 int
1455 sa_lookup(sa_handle_t *hdl, sa_attr_type_t attr, void *buf, uint32_t buflen)
1456 {
1457         int error;
1458         sa_bulk_attr_t bulk;
1459
1460         bulk.sa_attr = attr;
1461         bulk.sa_data = buf;
1462         bulk.sa_length = buflen;
1463         bulk.sa_data_func = NULL;
1464
1465         ASSERT(hdl);
1466         mutex_enter(&hdl->sa_lock);
1467         error = sa_lookup_impl(hdl, &bulk, 1);
1468         mutex_exit(&hdl->sa_lock);
1469         return (error);
1470 }
1471
1472 #ifdef _KERNEL
1473 int
1474 sa_lookup_uio(sa_handle_t *hdl, sa_attr_type_t attr, uio_t *uio)
1475 {
1476         int error;
1477         sa_bulk_attr_t bulk;
1478
1479         bulk.sa_data = NULL;
1480         bulk.sa_attr = attr;
1481         bulk.sa_data_func = NULL;
1482
1483         ASSERT(hdl);
1484
1485         mutex_enter(&hdl->sa_lock);
1486         if ((error = sa_attr_op(hdl, &bulk, 1, SA_LOOKUP, NULL)) == 0) {
1487                 error = uiomove((void *)bulk.sa_addr, MIN(bulk.sa_size,
1488                     uio->uio_resid), UIO_READ, uio);
1489         }
1490         mutex_exit(&hdl->sa_lock);
1491         return (error);
1492 }
1493 #endif
1494
1495 void *
1496 sa_find_idx_tab(objset_t *os, dmu_object_type_t bonustype, void *data)
1497 {
1498         sa_idx_tab_t *idx_tab;
1499         sa_hdr_phys_t *hdr = (sa_hdr_phys_t *)data;
1500         sa_os_t *sa = os->os_sa;
1501         sa_lot_t *tb, search;
1502         avl_index_t loc;
1503
1504         /*
1505          * Deterimine layout number.  If SA node and header == 0 then
1506          * force the index table to the dummy "1" empty layout.
1507          *
1508          * The layout number would only be zero for a newly created file
1509          * that has not added any attributes yet, or with crypto enabled which
1510          * doesn't write any attributes to the bonus buffer.
1511          */
1512
1513         search.lot_num = SA_LAYOUT_NUM(hdr, bonustype);
1514
1515         tb = avl_find(&sa->sa_layout_num_tree, &search, &loc);
1516
1517         /* Verify header size is consistent with layout information */
1518         ASSERT(tb);
1519         ASSERT((IS_SA_BONUSTYPE(bonustype) &&
1520             SA_HDR_SIZE_MATCH_LAYOUT(hdr, tb)) || !IS_SA_BONUSTYPE(bonustype) ||
1521             (IS_SA_BONUSTYPE(bonustype) && hdr->sa_layout_info == 0));
1522
1523         /*
1524          * See if any of the already existing TOC entries can be reused?
1525          */
1526
1527         for (idx_tab = list_head(&tb->lot_idx_tab); idx_tab;
1528             idx_tab = list_next(&tb->lot_idx_tab, idx_tab)) {
1529                 boolean_t valid_idx = B_TRUE;
1530                 int i;
1531
1532                 if (tb->lot_var_sizes != 0 &&
1533                     idx_tab->sa_variable_lengths != NULL) {
1534                         for (i = 0; i != tb->lot_var_sizes; i++) {
1535                                 if (hdr->sa_lengths[i] !=
1536                                     idx_tab->sa_variable_lengths[i]) {
1537                                         valid_idx = B_FALSE;
1538                                         break;
1539                                 }
1540                         }
1541                 }
1542                 if (valid_idx) {
1543                         sa_idx_tab_hold(os, idx_tab);
1544                         return (idx_tab);
1545                 }
1546         }
1547
1548         /* No such luck, create a new entry */
1549         idx_tab = kmem_zalloc(sizeof (sa_idx_tab_t), KM_PUSHPAGE);
1550         idx_tab->sa_idx_tab =
1551             kmem_zalloc(sizeof (uint32_t) * sa->sa_num_attrs, KM_PUSHPAGE);
1552         idx_tab->sa_layout = tb;
1553         refcount_create(&idx_tab->sa_refcount);
1554         if (tb->lot_var_sizes)
1555                 idx_tab->sa_variable_lengths = kmem_alloc(sizeof (uint16_t) *
1556                     tb->lot_var_sizes, KM_PUSHPAGE);
1557
1558         sa_attr_iter(os, hdr, bonustype, sa_build_idx_tab,
1559             tb, idx_tab);
1560         sa_idx_tab_hold(os, idx_tab);   /* one hold for consumer */
1561         sa_idx_tab_hold(os, idx_tab);   /* one for layout */
1562         list_insert_tail(&tb->lot_idx_tab, idx_tab);
1563         return (idx_tab);
1564 }
1565
1566 void
1567 sa_default_locator(void **dataptr, uint32_t *len, uint32_t total_len,
1568     boolean_t start, void *userdata)
1569 {
1570         ASSERT(start);
1571
1572         *dataptr = userdata;
1573         *len = total_len;
1574 }
1575
1576 static void
1577 sa_attr_register_sync(sa_handle_t *hdl, dmu_tx_t *tx)
1578 {
1579         uint64_t attr_value = 0;
1580         sa_os_t *sa = hdl->sa_os->os_sa;
1581         sa_attr_table_t *tb = sa->sa_attr_table;
1582         int i;
1583
1584         mutex_enter(&sa->sa_lock);
1585
1586         if (!sa->sa_need_attr_registration || sa->sa_master_obj == 0) {
1587                 mutex_exit(&sa->sa_lock);
1588                 return;
1589         }
1590
1591         if (sa->sa_reg_attr_obj == 0) {
1592                 sa->sa_reg_attr_obj = zap_create_link(hdl->sa_os,
1593                     DMU_OT_SA_ATTR_REGISTRATION,
1594                     sa->sa_master_obj, SA_REGISTRY, tx);
1595         }
1596         for (i = 0; i != sa->sa_num_attrs; i++) {
1597                 if (sa->sa_attr_table[i].sa_registered)
1598                         continue;
1599                 ATTR_ENCODE(attr_value, tb[i].sa_attr, tb[i].sa_length,
1600                     tb[i].sa_byteswap);
1601                 VERIFY(0 == zap_update(hdl->sa_os, sa->sa_reg_attr_obj,
1602                     tb[i].sa_name, 8, 1, &attr_value, tx));
1603                 tb[i].sa_registered = B_TRUE;
1604         }
1605         sa->sa_need_attr_registration = B_FALSE;
1606         mutex_exit(&sa->sa_lock);
1607 }
1608
1609 /*
1610  * Replace all attributes with attributes specified in template.
1611  * If dnode had a spill buffer then those attributes will be
1612  * also be replaced, possibly with just an empty spill block
1613  *
1614  * This interface is intended to only be used for bulk adding of
1615  * attributes for a new file.  It will also be used by the ZPL
1616  * when converting and old formatted znode to native SA support.
1617  */
1618 int
1619 sa_replace_all_by_template_locked(sa_handle_t *hdl, sa_bulk_attr_t *attr_desc,
1620     int attr_count, dmu_tx_t *tx)
1621 {
1622         sa_os_t *sa = hdl->sa_os->os_sa;
1623
1624         if (sa->sa_need_attr_registration)
1625                 sa_attr_register_sync(hdl, tx);
1626         return (sa_build_layouts(hdl, attr_desc, attr_count, tx));
1627 }
1628
1629 int
1630 sa_replace_all_by_template(sa_handle_t *hdl, sa_bulk_attr_t *attr_desc,
1631     int attr_count, dmu_tx_t *tx)
1632 {
1633         int error;
1634
1635         mutex_enter(&hdl->sa_lock);
1636         error = sa_replace_all_by_template_locked(hdl, attr_desc,
1637             attr_count, tx);
1638         mutex_exit(&hdl->sa_lock);
1639         return (error);
1640 }
1641
1642 /*
1643  * add/remove/replace a single attribute and then rewrite the entire set
1644  * of attributes.
1645  */
1646 static int
1647 sa_modify_attrs(sa_handle_t *hdl, sa_attr_type_t newattr,
1648     sa_data_op_t action, sa_data_locator_t *locator, void *datastart,
1649     uint16_t buflen, dmu_tx_t *tx)
1650 {
1651         sa_os_t *sa = hdl->sa_os->os_sa;
1652         dmu_buf_impl_t *db = (dmu_buf_impl_t *)hdl->sa_bonus;
1653         dnode_t *dn;
1654         sa_bulk_attr_t *attr_desc;
1655         void *old_data[2];
1656         int bonus_attr_count = 0;
1657         int bonus_data_size = 0;
1658         int spill_attr_count = 0;
1659         int error;
1660         uint16_t length;
1661         int i, j, k, length_idx;
1662         sa_hdr_phys_t *hdr;
1663         sa_idx_tab_t *idx_tab;
1664         int attr_count;
1665         int count;
1666
1667         ASSERT(MUTEX_HELD(&hdl->sa_lock));
1668
1669         /* First make of copy of the old data */
1670
1671         DB_DNODE_ENTER(db);
1672         dn = DB_DNODE(db);
1673         if (dn->dn_bonuslen != 0) {
1674                 bonus_data_size = hdl->sa_bonus->db_size;
1675                 old_data[0] = kmem_alloc(bonus_data_size, KM_SLEEP);
1676                 bcopy(hdl->sa_bonus->db_data, old_data[0],
1677                     hdl->sa_bonus->db_size);
1678                 bonus_attr_count = hdl->sa_bonus_tab->sa_layout->lot_attr_count;
1679         } else {
1680                 old_data[0] = NULL;
1681         }
1682         DB_DNODE_EXIT(db);
1683
1684         /* Bring spill buffer online if it isn't currently */
1685
1686         if ((error = sa_get_spill(hdl)) == 0) {
1687                 ASSERT3U(hdl->sa_spill->db_size, <=, SPA_MAXBLOCKSIZE);
1688                 old_data[1] = sa_spill_alloc(KM_SLEEP);
1689                 bcopy(hdl->sa_spill->db_data, old_data[1],
1690                     hdl->sa_spill->db_size);
1691                 spill_attr_count =
1692                     hdl->sa_spill_tab->sa_layout->lot_attr_count;
1693         } else if (error && error != ENOENT) {
1694                 if (old_data[0])
1695                         kmem_free(old_data[0], bonus_data_size);
1696                 return (error);
1697         } else {
1698                 old_data[1] = NULL;
1699         }
1700
1701         /* build descriptor of all attributes */
1702
1703         attr_count = bonus_attr_count + spill_attr_count;
1704         if (action == SA_ADD)
1705                 attr_count++;
1706         else if (action == SA_REMOVE)
1707                 attr_count--;
1708
1709         attr_desc = kmem_zalloc(sizeof (sa_bulk_attr_t) * attr_count, KM_SLEEP);
1710
1711         /*
1712          * loop through bonus and spill buffer if it exists, and
1713          * build up new attr_descriptor to reset the attributes
1714          */
1715         k = j = 0;
1716         count = bonus_attr_count;
1717         hdr = SA_GET_HDR(hdl, SA_BONUS);
1718         idx_tab = SA_IDX_TAB_GET(hdl, SA_BONUS);
1719         for (; k != 2; k++) {
1720                 /* iterate over each attribute in layout */
1721                 for (i = 0, length_idx = 0; i != count; i++) {
1722                         sa_attr_type_t attr;
1723
1724                         attr = idx_tab->sa_layout->lot_attrs[i];
1725                         if (attr == newattr) {
1726                                 if (action == SA_REMOVE) {
1727                                         j++;
1728                                         continue;
1729                                 }
1730                                 ASSERT(SA_REGISTERED_LEN(sa, attr) == 0);
1731                                 ASSERT(action == SA_REPLACE);
1732                                 SA_ADD_BULK_ATTR(attr_desc, j, attr,
1733                                     locator, datastart, buflen);
1734                         } else {
1735                                 length = SA_REGISTERED_LEN(sa, attr);
1736                                 if (length == 0) {
1737                                         length = hdr->sa_lengths[length_idx++];
1738                                 }
1739
1740                                 SA_ADD_BULK_ATTR(attr_desc, j, attr,
1741                                     NULL, (void *)
1742                                     (TOC_OFF(idx_tab->sa_idx_tab[attr]) +
1743                                     (uintptr_t)old_data[k]), length);
1744                         }
1745                 }
1746                 if (k == 0 && hdl->sa_spill) {
1747                         hdr = SA_GET_HDR(hdl, SA_SPILL);
1748                         idx_tab = SA_IDX_TAB_GET(hdl, SA_SPILL);
1749                         count = spill_attr_count;
1750                 } else {
1751                         break;
1752                 }
1753         }
1754         if (action == SA_ADD) {
1755                 length = SA_REGISTERED_LEN(sa, newattr);
1756                 if (length == 0) {
1757                         length = buflen;
1758                 }
1759                 SA_ADD_BULK_ATTR(attr_desc, j, newattr, locator,
1760                     datastart, buflen);
1761         }
1762
1763         error = sa_build_layouts(hdl, attr_desc, attr_count, tx);
1764
1765         if (old_data[0])
1766                 kmem_free(old_data[0], bonus_data_size);
1767         if (old_data[1])
1768                 sa_spill_free(old_data[1]);
1769         kmem_free(attr_desc, sizeof (sa_bulk_attr_t) * attr_count);
1770
1771         return (error);
1772 }
1773
1774 static int
1775 sa_bulk_update_impl(sa_handle_t *hdl, sa_bulk_attr_t *bulk, int count,
1776     dmu_tx_t *tx)
1777 {
1778         int error;
1779         sa_os_t *sa = hdl->sa_os->os_sa;
1780         dmu_object_type_t bonustype;
1781         dmu_buf_t *saved_spill;
1782
1783         ASSERT(hdl);
1784         ASSERT(MUTEX_HELD(&hdl->sa_lock));
1785
1786         bonustype = SA_BONUSTYPE_FROM_DB(SA_GET_DB(hdl, SA_BONUS));
1787         saved_spill = hdl->sa_spill;
1788
1789         /* sync out registration table if necessary */
1790         if (sa->sa_need_attr_registration)
1791                 sa_attr_register_sync(hdl, tx);
1792
1793         error = sa_attr_op(hdl, bulk, count, SA_UPDATE, tx);
1794         if (error == 0 && !IS_SA_BONUSTYPE(bonustype) && sa->sa_update_cb)
1795                 sa->sa_update_cb(hdl, tx);
1796
1797         /*
1798          * If saved_spill is NULL and current sa_spill is not NULL that
1799          * means we increased the refcount of the spill buffer through
1800          * sa_get_spill() or dmu_spill_hold_by_dnode().  Therefore we
1801          * must release the hold before calling dmu_tx_commit() to avoid
1802          * making a copy of this buffer in dbuf_sync_leaf() due to the
1803          * reference count now being greater than 1.
1804          */
1805         if (!saved_spill && hdl->sa_spill) {
1806                 if (hdl->sa_spill_tab) {
1807                         sa_idx_tab_rele(hdl->sa_os, hdl->sa_spill_tab);
1808                         hdl->sa_spill_tab = NULL;
1809                 }
1810
1811                 dmu_buf_rele((dmu_buf_t *)hdl->sa_spill, NULL);
1812                 hdl->sa_spill = NULL;
1813         }
1814
1815         return (error);
1816 }
1817
1818 /*
1819  * update or add new attribute
1820  */
1821 int
1822 sa_update(sa_handle_t *hdl, sa_attr_type_t type,
1823     void *buf, uint32_t buflen, dmu_tx_t *tx)
1824 {
1825         int error;
1826         sa_bulk_attr_t bulk;
1827
1828         bulk.sa_attr = type;
1829         bulk.sa_data_func = NULL;
1830         bulk.sa_length = buflen;
1831         bulk.sa_data = buf;
1832
1833         mutex_enter(&hdl->sa_lock);
1834         error = sa_bulk_update_impl(hdl, &bulk, 1, tx);
1835         mutex_exit(&hdl->sa_lock);
1836         return (error);
1837 }
1838
1839 int
1840 sa_update_from_cb(sa_handle_t *hdl, sa_attr_type_t attr,
1841     uint32_t buflen, sa_data_locator_t *locator, void *userdata, dmu_tx_t *tx)
1842 {
1843         int error;
1844         sa_bulk_attr_t bulk;
1845
1846         bulk.sa_attr = attr;
1847         bulk.sa_data = userdata;
1848         bulk.sa_data_func = locator;
1849         bulk.sa_length = buflen;
1850
1851         mutex_enter(&hdl->sa_lock);
1852         error = sa_bulk_update_impl(hdl, &bulk, 1, tx);
1853         mutex_exit(&hdl->sa_lock);
1854         return (error);
1855 }
1856
1857 /*
1858  * Return size of an attribute
1859  */
1860
1861 int
1862 sa_size(sa_handle_t *hdl, sa_attr_type_t attr, int *size)
1863 {
1864         sa_bulk_attr_t bulk;
1865         int error;
1866
1867         bulk.sa_data = NULL;
1868         bulk.sa_attr = attr;
1869         bulk.sa_data_func = NULL;
1870
1871         ASSERT(hdl);
1872         mutex_enter(&hdl->sa_lock);
1873         if ((error = sa_attr_op(hdl, &bulk, 1, SA_LOOKUP, NULL)) != 0) {
1874                 mutex_exit(&hdl->sa_lock);
1875                 return (error);
1876         }
1877         *size = bulk.sa_size;
1878
1879         mutex_exit(&hdl->sa_lock);
1880         return (0);
1881 }
1882
1883 int
1884 sa_bulk_lookup_locked(sa_handle_t *hdl, sa_bulk_attr_t *attrs, int count)
1885 {
1886         ASSERT(hdl);
1887         ASSERT(MUTEX_HELD(&hdl->sa_lock));
1888         return (sa_lookup_impl(hdl, attrs, count));
1889 }
1890
1891 int
1892 sa_bulk_lookup(sa_handle_t *hdl, sa_bulk_attr_t *attrs, int count)
1893 {
1894         int error;
1895
1896         ASSERT(hdl);
1897         mutex_enter(&hdl->sa_lock);
1898         error = sa_bulk_lookup_locked(hdl, attrs, count);
1899         mutex_exit(&hdl->sa_lock);
1900         return (error);
1901 }
1902
1903 int
1904 sa_bulk_update(sa_handle_t *hdl, sa_bulk_attr_t *attrs, int count, dmu_tx_t *tx)
1905 {
1906         int error;
1907
1908         ASSERT(hdl);
1909         mutex_enter(&hdl->sa_lock);
1910         error = sa_bulk_update_impl(hdl, attrs, count, tx);
1911         mutex_exit(&hdl->sa_lock);
1912         return (error);
1913 }
1914
1915 int
1916 sa_remove(sa_handle_t *hdl, sa_attr_type_t attr, dmu_tx_t *tx)
1917 {
1918         int error;
1919
1920         mutex_enter(&hdl->sa_lock);
1921         error = sa_modify_attrs(hdl, attr, SA_REMOVE, NULL,
1922             NULL, 0, tx);
1923         mutex_exit(&hdl->sa_lock);
1924         return (error);
1925 }
1926
1927 void
1928 sa_object_info(sa_handle_t *hdl, dmu_object_info_t *doi)
1929 {
1930         dmu_object_info_from_db((dmu_buf_t *)hdl->sa_bonus, doi);
1931 }
1932
1933 void
1934 sa_object_size(sa_handle_t *hdl, uint32_t *blksize, u_longlong_t *nblocks)
1935 {
1936         dmu_object_size_from_db((dmu_buf_t *)hdl->sa_bonus,
1937             blksize, nblocks);
1938 }
1939
1940 void
1941 sa_update_user(sa_handle_t *newhdl, sa_handle_t *oldhdl)
1942 {
1943         (void) dmu_buf_update_user((dmu_buf_t *)newhdl->sa_bonus,
1944             oldhdl, newhdl, NULL, sa_evict);
1945         oldhdl->sa_bonus = NULL;
1946 }
1947
1948 void
1949 sa_set_userp(sa_handle_t *hdl, void *ptr)
1950 {
1951         hdl->sa_userp = ptr;
1952 }
1953
1954 dmu_buf_t *
1955 sa_get_db(sa_handle_t *hdl)
1956 {
1957         return ((dmu_buf_t *)hdl->sa_bonus);
1958 }
1959
1960 void *
1961 sa_get_userdata(sa_handle_t *hdl)
1962 {
1963         return (hdl->sa_userp);
1964 }
1965
1966 void
1967 sa_register_update_callback_locked(objset_t *os, sa_update_cb_t *func)
1968 {
1969         ASSERT(MUTEX_HELD(&os->os_sa->sa_lock));
1970         os->os_sa->sa_update_cb = func;
1971 }
1972
1973 void
1974 sa_register_update_callback(objset_t *os, sa_update_cb_t *func)
1975 {
1976
1977         mutex_enter(&os->os_sa->sa_lock);
1978         sa_register_update_callback_locked(os, func);
1979         mutex_exit(&os->os_sa->sa_lock);
1980 }
1981
1982 uint64_t
1983 sa_handle_object(sa_handle_t *hdl)
1984 {
1985         return (hdl->sa_bonus->db_object);
1986 }
1987
1988 boolean_t
1989 sa_enabled(objset_t *os)
1990 {
1991         return (os->os_sa == NULL);
1992 }
1993
1994 int
1995 sa_set_sa_object(objset_t *os, uint64_t sa_object)
1996 {
1997         sa_os_t *sa = os->os_sa;
1998
1999         if (sa->sa_master_obj)
2000                 return (1);
2001
2002         sa->sa_master_obj = sa_object;
2003
2004         return (0);
2005 }
2006
2007 int
2008 sa_hdrsize(void *arg)
2009 {
2010         sa_hdr_phys_t *hdr = arg;
2011
2012         return (SA_HDR_SIZE(hdr));
2013 }
2014
2015 void
2016 sa_handle_lock(sa_handle_t *hdl)
2017 {
2018         ASSERT(hdl);
2019         mutex_enter(&hdl->sa_lock);
2020 }
2021
2022 void
2023 sa_handle_unlock(sa_handle_t *hdl)
2024 {
2025         ASSERT(hdl);
2026         mutex_exit(&hdl->sa_lock);
2027 }
2028
2029 #ifdef _KERNEL
2030 EXPORT_SYMBOL(sa_handle_get);
2031 EXPORT_SYMBOL(sa_handle_get_from_db);
2032 EXPORT_SYMBOL(sa_handle_destroy);
2033 EXPORT_SYMBOL(sa_buf_hold);
2034 EXPORT_SYMBOL(sa_buf_rele);
2035 EXPORT_SYMBOL(sa_spill_rele);
2036 EXPORT_SYMBOL(sa_lookup);
2037 EXPORT_SYMBOL(sa_update);
2038 EXPORT_SYMBOL(sa_remove);
2039 EXPORT_SYMBOL(sa_bulk_lookup);
2040 EXPORT_SYMBOL(sa_bulk_lookup_locked);
2041 EXPORT_SYMBOL(sa_bulk_update);
2042 EXPORT_SYMBOL(sa_size);
2043 EXPORT_SYMBOL(sa_update_from_cb);
2044 EXPORT_SYMBOL(sa_object_info);
2045 EXPORT_SYMBOL(sa_object_size);
2046 EXPORT_SYMBOL(sa_update_user);
2047 EXPORT_SYMBOL(sa_get_userdata);
2048 EXPORT_SYMBOL(sa_set_userp);
2049 EXPORT_SYMBOL(sa_get_db);
2050 EXPORT_SYMBOL(sa_handle_object);
2051 EXPORT_SYMBOL(sa_register_update_callback);
2052 EXPORT_SYMBOL(sa_setup);
2053 EXPORT_SYMBOL(sa_replace_all_by_template);
2054 EXPORT_SYMBOL(sa_replace_all_by_template_locked);
2055 EXPORT_SYMBOL(sa_enabled);
2056 EXPORT_SYMBOL(sa_cache_init);
2057 EXPORT_SYMBOL(sa_cache_fini);
2058 EXPORT_SYMBOL(sa_spill_alloc);
2059 EXPORT_SYMBOL(sa_spill_free);
2060 EXPORT_SYMBOL(sa_set_sa_object);
2061 EXPORT_SYMBOL(sa_hdrsize);
2062 EXPORT_SYMBOL(sa_handle_lock);
2063 EXPORT_SYMBOL(sa_handle_unlock);
2064 EXPORT_SYMBOL(sa_lookup_uio);
2065 #endif /* _KERNEL */