sys/gnu/fs/xfs/xfs_ialloc.c

   1 /*
   2  * Copyright (c) 2000-2002,2005 Silicon Graphics, Inc.
   3  * All Rights Reserved.
   4  *
   5  * This program is free software; you can redistribute it and/or
   6  * modify it under the terms of the GNU General Public License as
   7  * published by the Free Software Foundation.
   8  *
   9  * This program is distributed in the hope that it would be useful,
  10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  12  * GNU General Public License for more details.
  13  *
  14  * You should have received a copy of the GNU General Public License
  15  * along with this program; if not, write the Free Software Foundation,
  16  * Inc.,  51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
  17  */
  18 #include "xfs.h"
  19 #include "xfs_fs.h"
  20 #include "xfs_types.h"
  21 #include "xfs_bit.h"
  22 #include "xfs_log.h"
  23 #include "xfs_inum.h"
  24 #include "xfs_trans.h"
  25 #include "xfs_sb.h"
  26 #include "xfs_ag.h"
  27 #include "xfs_dir.h"
  28 #include "xfs_dir2.h"
  29 #include "xfs_dmapi.h"
  30 #include "xfs_mount.h"
  31 #include "xfs_bmap_btree.h"
  32 #include "xfs_alloc_btree.h"
  33 #include "xfs_ialloc_btree.h"
  34 #include "xfs_dir_sf.h"
  35 #include "xfs_dir2_sf.h"
  36 #include "xfs_attr_sf.h"
  37 #include "xfs_dinode.h"
  38 #include "xfs_inode.h"
  39 #include "xfs_btree.h"
  40 #include "xfs_ialloc.h"
  41 #include "xfs_alloc.h"
  42 #include "xfs_rtalloc.h"
  43 #include "xfs_error.h"
  44 #include "xfs_bmap.h"
  45
  46 /*
  47  * Log specified fields for the inode given by bp and off.
  48  */
  49 STATIC void
  50 xfs_ialloc_log_di(
  51         xfs_trans_t     *tp,            /* transaction pointer */
  52         xfs_buf_t       *bp,            /* inode buffer */
  53         int             off,            /* index of inode in buffer */
  54         int             fields)         /* bitmask of fields to log */
  55 {
  56         int                     first;          /* first byte number */
  57         int                     ioffset;        /* off in bytes */
  58         int                     last;           /* last byte number */
  59         xfs_mount_t             *mp;            /* mount point structure */
  60         static const short      offsets[] = {   /* field offsets */
  61                                                 /* keep in sync with bits */
  62                 offsetof(xfs_dinode_core_t, di_magic),
  63                 offsetof(xfs_dinode_core_t, di_mode),
  64                 offsetof(xfs_dinode_core_t, di_version),
  65                 offsetof(xfs_dinode_core_t, di_format),
  66                 offsetof(xfs_dinode_core_t, di_onlink),
  67                 offsetof(xfs_dinode_core_t, di_uid),
  68                 offsetof(xfs_dinode_core_t, di_gid),
  69                 offsetof(xfs_dinode_core_t, di_nlink),
  70                 offsetof(xfs_dinode_core_t, di_projid),
  71                 offsetof(xfs_dinode_core_t, di_pad),
  72                 offsetof(xfs_dinode_core_t, di_atime),
  73                 offsetof(xfs_dinode_core_t, di_mtime),
  74                 offsetof(xfs_dinode_core_t, di_ctime),
  75                 offsetof(xfs_dinode_core_t, di_size),
  76                 offsetof(xfs_dinode_core_t, di_nblocks),
  77                 offsetof(xfs_dinode_core_t, di_extsize),
  78                 offsetof(xfs_dinode_core_t, di_nextents),
  79                 offsetof(xfs_dinode_core_t, di_anextents),
  80                 offsetof(xfs_dinode_core_t, di_forkoff),
  81                 offsetof(xfs_dinode_core_t, di_aformat),
  82                 offsetof(xfs_dinode_core_t, di_dmevmask),
  83                 offsetof(xfs_dinode_core_t, di_dmstate),
  84                 offsetof(xfs_dinode_core_t, di_flags),
  85                 offsetof(xfs_dinode_core_t, di_gen),
  86                 offsetof(xfs_dinode_t, di_next_unlinked),
  87                 offsetof(xfs_dinode_t, di_u),
  88                 offsetof(xfs_dinode_t, di_a),
  89                 sizeof(xfs_dinode_t)
  90         };
  91
  92
  93         ASSERT(offsetof(xfs_dinode_t, di_core) == 0);
  94         ASSERT((fields & (XFS_DI_U|XFS_DI_A)) == 0);
  95         mp = tp->t_mountp;
  96         /*
  97          * Get the inode-relative first and last bytes for these fields
  98          */
  99         xfs_btree_offsets(fields, offsets, XFS_DI_NUM_BITS, &first, &last);
 100         /*
 101          * Convert to buffer offsets and log it.
 102          */
 103         ioffset = off << mp->m_sb.sb_inodelog;
 104         first += ioffset;
 105         last += ioffset;
 106         xfs_trans_log_buf(tp, bp, first, last);
 107 }
 108
 109 /*
 110  * Allocation group level functions.
 111  */
 112
 113 /*
 114  * Allocate new inodes in the allocation group specified by agbp.
 115  * Return 0 for success, else error code.
 116  */
 117 STATIC int                              /* error code or 0 */
 118 xfs_ialloc_ag_alloc(
 119         xfs_trans_t     *tp,            /* transaction pointer */
 120         xfs_buf_t       *agbp,          /* alloc group buffer */
 121         int             *alloc)
 122 {
 123         xfs_agi_t       *agi;           /* allocation group header */
 124         xfs_alloc_arg_t args;           /* allocation argument structure */
 125         int             blks_per_cluster;  /* fs blocks per inode cluster */
 126         xfs_btree_cur_t *cur;           /* inode btree cursor */
 127         xfs_daddr_t     d;              /* disk addr of buffer */
 128         int             error;
 129         xfs_buf_t       *fbuf;          /* new free inodes' buffer */
 130         xfs_dinode_t    *free;          /* new free inode structure */
 131         int             i;              /* inode counter */
 132         int             j;              /* block counter */
 133         int             nbufs;          /* num bufs of new inodes */
 134         xfs_agino_t     newino;         /* new first inode's number */
 135         xfs_agino_t     newlen;         /* new number of inodes */
 136         int             ninodes;        /* num inodes per buf */
 137         xfs_agino_t     thisino;        /* current inode number, for loop */
 138         int             version;        /* inode version number to use */
 139         int             isaligned = 0;  /* inode allocation at stripe unit */
 140                                         /* boundary */
 141
 142         args.tp = tp;
 143         args.mp = tp->t_mountp;
 144
 145         /*
 146          * Locking will ensure that we don't have two callers in here
 147          * at one time.
 148          */
 149         newlen = XFS_IALLOC_INODES(args.mp);
 150         if (args.mp->m_maxicount &&
 151             args.mp->m_sb.sb_icount + newlen > args.mp->m_maxicount)
 152                 return XFS_ERROR(ENOSPC);
 153         args.minlen = args.maxlen = XFS_IALLOC_BLOCKS(args.mp);
 154         /*
 155          * First try to allocate inodes contiguous with the last-allocated
 156          * chunk of inodes.  If the filesystem is striped, this will fill
 157          * an entire stripe unit with inodes.
 158          */
 159         agi = XFS_BUF_TO_AGI(agbp);
 160         newino = be32_to_cpu(agi->agi_newino);
 161         args.agbno = XFS_AGINO_TO_AGBNO(args.mp, newino) +
 162                         XFS_IALLOC_BLOCKS(args.mp);
 163         if (likely(newino != NULLAGINO &&
 164                   (args.agbno < be32_to_cpu(agi->agi_length)))) {
 165                 args.fsbno = XFS_AGB_TO_FSB(args.mp,
 166                                 be32_to_cpu(agi->agi_seqno), args.agbno);
 167                 args.type = XFS_ALLOCTYPE_THIS_BNO;
 168                 args.mod = args.total = args.wasdel = args.isfl =
 169                         args.userdata = args.minalignslop = 0;
 170                 args.prod = 1;
 171                 args.alignment = 1;
 172                 /*
 173                  * Allow space for the inode btree to split.
 174                  */
 175                 args.minleft = XFS_IN_MAXLEVELS(args.mp) - 1;
 176                 if ((error = xfs_alloc_vextent(&args)))
 177                         return error;
 178         } else
 179                 args.fsbno = NULLFSBLOCK;
 180
 181         if (unlikely(args.fsbno == NULLFSBLOCK)) {
 182                 /*
 183                  * Set the alignment for the allocation.
 184                  * If stripe alignment is turned on then align at stripe unit
 185                  * boundary.
 186                  * If the cluster size is smaller than a filesystem block
 187                  * then we're doing I/O for inodes in filesystem block size
 188                  * pieces, so don't need alignment anyway.
 189                  */
 190                 isaligned = 0;
 191                 if (args.mp->m_sinoalign) {
 192                         ASSERT(!(args.mp->m_flags & XFS_MOUNT_NOALIGN));
 193                         args.alignment = args.mp->m_dalign;
 194                         isaligned = 1;
 195                 } else if (XFS_SB_VERSION_HASALIGN(&args.mp->m_sb) &&
 196                            args.mp->m_sb.sb_inoalignmt >=
 197                            XFS_B_TO_FSBT(args.mp,
 198                                 XFS_INODE_CLUSTER_SIZE(args.mp)))
 199                                 args.alignment = args.mp->m_sb.sb_inoalignmt;
 200                 else
 201                         args.alignment = 1;
 202                 /*
 203                  * Need to figure out where to allocate the inode blocks.
 204                  * Ideally they should be spaced out through the a.g.
 205                  * For now, just allocate blocks up front.
 206                  */
 207                 args.agbno = be32_to_cpu(agi->agi_root);
 208                 args.fsbno = XFS_AGB_TO_FSB(args.mp,
 209                                 be32_to_cpu(agi->agi_seqno), args.agbno);
 210                 /*
 211                  * Allocate a fixed-size extent of inodes.
 212                  */
 213                 args.type = XFS_ALLOCTYPE_NEAR_BNO;
 214                 args.mod = args.total = args.wasdel = args.isfl =
 215                         args.userdata = args.minalignslop = 0;
 216                 args.prod = 1;
 217                 /*
 218                  * Allow space for the inode btree to split.
 219                  */
 220                 args.minleft = XFS_IN_MAXLEVELS(args.mp) - 1;
 221                 if ((error = xfs_alloc_vextent(&args)))
 222                         return error;
 223         }
 224
 225         /*
 226          * If stripe alignment is turned on, then try again with cluster
 227          * alignment.
 228          */
 229         if (isaligned && args.fsbno == NULLFSBLOCK) {
 230                 args.type = XFS_ALLOCTYPE_NEAR_BNO;
 231                 args.agbno = be32_to_cpu(agi->agi_root);
 232                 args.fsbno = XFS_AGB_TO_FSB(args.mp,
 233                                 be32_to_cpu(agi->agi_seqno), args.agbno);
 234                 if (XFS_SB_VERSION_HASALIGN(&args.mp->m_sb) &&
 235                         args.mp->m_sb.sb_inoalignmt >=
 236                         XFS_B_TO_FSBT(args.mp, XFS_INODE_CLUSTER_SIZE(args.mp)))
 237                                 args.alignment = args.mp->m_sb.sb_inoalignmt;
 238                 else
 239                         args.alignment = 1;
 240                 if ((error = xfs_alloc_vextent(&args)))
 241                         return error;
 242         }
 243
 244         if (args.fsbno == NULLFSBLOCK) {
 245                 *alloc = 0;
 246                 return 0;
 247         }
 248         ASSERT(args.len == args.minlen);
 249         /*
 250          * Convert the results.
 251          */
 252         newino = XFS_OFFBNO_TO_AGINO(args.mp, args.agbno, 0);
 253         /*
 254          * Loop over the new block(s), filling in the inodes.
 255          * For small block sizes, manipulate the inodes in buffers
 256          * which are multiples of the blocks size.
 257          */
 258         if (args.mp->m_sb.sb_blocksize >= XFS_INODE_CLUSTER_SIZE(args.mp)) {
 259                 blks_per_cluster = 1;
 260                 nbufs = (int)args.len;
 261                 ninodes = args.mp->m_sb.sb_inopblock;
 262         } else {
 263                 blks_per_cluster = XFS_INODE_CLUSTER_SIZE(args.mp) /
 264                                    args.mp->m_sb.sb_blocksize;
 265                 nbufs = (int)args.len / blks_per_cluster;
 266                 ninodes = blks_per_cluster * args.mp->m_sb.sb_inopblock;
 267         }
 268         /*
 269          * Figure out what version number to use in the inodes we create.
 270          * If the superblock version has caught up to the one that supports
 271          * the new inode format, then use the new inode version.  Otherwise
 272          * use the old version so that old kernels will continue to be
 273          * able to use the file system.
 274          */
 275         if (XFS_SB_VERSION_HASNLINK(&args.mp->m_sb))
 276                 version = XFS_DINODE_VERSION_2;
 277         else
 278                 version = XFS_DINODE_VERSION_1;
 279
 280         for (j = 0; j < nbufs; j++) {
 281                 /*
 282                  * Get the block.
 283                  */
 284                 d = XFS_AGB_TO_DADDR(args.mp, be32_to_cpu(agi->agi_seqno),
 285                                      args.agbno + (j * blks_per_cluster));
 286                 fbuf = xfs_trans_get_buf(tp, args.mp->m_ddev_targp, d,
 287                                          args.mp->m_bsize * blks_per_cluster,
 288                                          XFS_BUF_LOCK);
 289                 ASSERT(fbuf);
 290                 ASSERT(!XFS_BUF_GETERROR(fbuf));
 291                 /*
 292                  * Set initial values for the inodes in this buffer.
 293                  */
 294                 xfs_biozero(fbuf, 0, ninodes << args.mp->m_sb.sb_inodelog);
 295                 for (i = 0; i < ninodes; i++) {
 296                         free = XFS_MAKE_IPTR(args.mp, fbuf, i);
 297                         INT_SET(free->di_core.di_magic, ARCH_CONVERT, XFS_DINODE_MAGIC);
 298                         INT_SET(free->di_core.di_version, ARCH_CONVERT, version);
 299                         INT_SET(free->di_next_unlinked, ARCH_CONVERT, NULLAGINO);
 300                         xfs_ialloc_log_di(tp, fbuf, i,
 301                                 XFS_DI_CORE_BITS | XFS_DI_NEXT_UNLINKED);
 302                 }
 303                 xfs_trans_inode_alloc_buf(tp, fbuf);
 304         }
 305         be32_add(&agi->agi_count, newlen);
 306         be32_add(&agi->agi_freecount, newlen);
 307         down_read(&args.mp->m_peraglock);
 308         args.mp->m_perag[be32_to_cpu(agi->agi_seqno)].pagi_freecount += newlen;
 309         up_read(&args.mp->m_peraglock);
 310         agi->agi_newino = cpu_to_be32(newino);
 311         /*
 312          * Insert records describing the new inode chunk into the btree.
 313          */
 314         cur = xfs_btree_init_cursor(args.mp, tp, agbp,
 315                         be32_to_cpu(agi->agi_seqno),
 316                         XFS_BTNUM_INO, (xfs_inode_t *)0, 0);
 317         for (thisino = newino;
 318              thisino < newino + newlen;
 319              thisino += XFS_INODES_PER_CHUNK) {
 320                 if ((error = xfs_inobt_lookup_eq(cur, thisino,
 321                                 XFS_INODES_PER_CHUNK, XFS_INOBT_ALL_FREE, &i))) {
 322                         xfs_btree_del_cursor(cur, XFS_BTREE_ERROR);
 323                         return error;
 324                 }
 325                 ASSERT(i == 0);
 326                 if ((error = xfs_inobt_insert(cur, &i))) {
 327                         xfs_btree_del_cursor(cur, XFS_BTREE_ERROR);
 328                         return error;
 329                 }
 330                 ASSERT(i == 1);
 331         }
 332         xfs_btree_del_cursor(cur, XFS_BTREE_NOERROR);
 333         /*
 334          * Log allocation group header fields
 335          */
 336         xfs_ialloc_log_agi(tp, agbp,
 337                 XFS_AGI_COUNT | XFS_AGI_FREECOUNT | XFS_AGI_NEWINO);
 338         /*
 339          * Modify/log superblock values for inode count and inode free count.
 340          */
 341         xfs_trans_mod_sb(tp, XFS_TRANS_SB_ICOUNT, (long)newlen);
 342         xfs_trans_mod_sb(tp, XFS_TRANS_SB_IFREE, (long)newlen);
 343         *alloc = 1;
 344         return 0;
 345 }
 346
 347 STATIC __inline xfs_agnumber_t
 348 xfs_ialloc_next_ag(
 349         xfs_mount_t     *mp)
 350 {
 351         xfs_agnumber_t  agno;
 352
 353         spin_lock(&mp->m_agirotor_lock);
 354         agno = mp->m_agirotor;
 355         if (++mp->m_agirotor == mp->m_maxagi)
 356                 mp->m_agirotor = 0;
 357         spin_unlock(&mp->m_agirotor_lock);
 358
 359         return agno;
 360 }
 361
 362 /*
 363  * Select an allocation group to look for a free inode in, based on the parent
 364  * inode and then mode.  Return the allocation group buffer.
 365  */
 366 STATIC xfs_buf_t *                      /* allocation group buffer */
 367 xfs_ialloc_ag_select(
 368         xfs_trans_t     *tp,            /* transaction pointer */
 369         xfs_ino_t       parent,         /* parent directory inode number */
 370         mode_t          mode,           /* bits set to indicate file type */
 371         int             okalloc)        /* ok to allocate more space */
 372 {
 373         xfs_buf_t       *agbp;          /* allocation group header buffer */
 374         xfs_agnumber_t  agcount;        /* number of ag's in the filesystem */
 375         xfs_agnumber_t  agno;           /* current ag number */
 376         int             flags;          /* alloc buffer locking flags */
 377         xfs_extlen_t    ineed;          /* blocks needed for inode allocation */
 378         xfs_extlen_t    longest = 0;    /* longest extent available */
 379         xfs_mount_t     *mp;            /* mount point structure */
 380         int             needspace;      /* file mode implies space allocated */
 381         xfs_perag_t     *pag;           /* per allocation group data */
 382         xfs_agnumber_t  pagno;          /* parent (starting) ag number */
 383
 384         /*
 385          * Files of these types need at least one block if length > 0
 386          * (and they won't fit in the inode, but that's hard to figure out).
 387          */
 388         needspace = S_ISDIR(mode) || S_ISREG(mode) || S_ISLNK(mode);
 389         mp = tp->t_mountp;
 390         agcount = mp->m_maxagi;
 391         if (S_ISDIR(mode))
 392                 pagno = xfs_ialloc_next_ag(mp);
 393         else {
 394                 pagno = XFS_INO_TO_AGNO(mp, parent);
 395                 if (pagno >= agcount)
 396                         pagno = 0;
 397         }
 398         ASSERT(pagno < agcount);
 399         /*
 400          * Loop through allocation groups, looking for one with a little
 401          * free space in it.  Note we don't look for free inodes, exactly.
 402          * Instead, we include whether there is a need to allocate inodes
 403          * to mean that blocks must be allocated for them,
 404          * if none are currently free.
 405          */
 406         agno = pagno;
 407         flags = XFS_ALLOC_FLAG_TRYLOCK;
 408         down_read(&mp->m_peraglock);
 409         for (;;) {
 410                 pag = &mp->m_perag[agno];
 411                 if (!pag->pagi_init) {
 412                         if (xfs_ialloc_read_agi(mp, tp, agno, &agbp)) {
 413                                 agbp = NULL;
 414                                 goto nextag;
 415                         }
 416                 } else
 417                         agbp = NULL;
 418
 419                 if (!pag->pagi_inodeok) {
 420                         xfs_ialloc_next_ag(mp);
 421                         goto unlock_nextag;
 422                 }
 423
 424                 /*
 425                  * Is there enough free space for the file plus a block
 426                  * of inodes (if we need to allocate some)?
 427                  */
 428                 ineed = pag->pagi_freecount ? 0 : XFS_IALLOC_BLOCKS(mp);
 429                 if (ineed && !pag->pagf_init) {
 430                         if (agbp == NULL &&
 431                             xfs_ialloc_read_agi(mp, tp, agno, &agbp)) {
 432                                 agbp = NULL;
 433                                 goto nextag;
 434                         }
 435                         (void)xfs_alloc_pagf_init(mp, tp, agno, flags);
 436                 }
 437                 if (!ineed || pag->pagf_init) {
 438                         if (ineed && !(longest = pag->pagf_longest))
 439                                 longest = pag->pagf_flcount > 0;
 440                         if (!ineed ||
 441                             (pag->pagf_freeblks >= needspace + ineed &&
 442                              longest >= ineed &&
 443                              okalloc)) {
 444                                 if (agbp == NULL &&
 445                                     xfs_ialloc_read_agi(mp, tp, agno, &agbp)) {
 446                                         agbp = NULL;
 447                                         goto nextag;
 448                                 }
 449                                 up_read(&mp->m_peraglock);
 450                                 return agbp;
 451                         }
 452                 }
 453 unlock_nextag:
 454                 if (agbp)
 455                         xfs_trans_brelse(tp, agbp);
 456 nextag:
 457                 /*
 458                  * No point in iterating over the rest, if we're shutting
 459                  * down.
 460                  */
 461                 if (XFS_FORCED_SHUTDOWN(mp)) {
 462                         up_read(&mp->m_peraglock);
 463                         return (xfs_buf_t *)0;
 464                 }
 465                 agno++;
 466                 if (agno >= agcount)
 467                         agno = 0;
 468                 if (agno == pagno) {
 469                         if (flags == 0) {
 470                                 up_read(&mp->m_peraglock);
 471                                 return (xfs_buf_t *)0;
 472                         }
 473                         flags = 0;
 474                 }
 475         }
 476 }
 477
 478 /*
 479  * Visible inode allocation functions.
 480  */
 481
 482 /*
 483  * Allocate an inode on disk.
 484  * Mode is used to tell whether the new inode will need space, and whether
 485  * it is a directory.
 486  *
 487  * The arguments IO_agbp and alloc_done are defined to work within
 488  * the constraint of one allocation per transaction.
 489  * xfs_dialloc() is designed to be called twice if it has to do an
 490  * allocation to make more free inodes.  On the first call,
 491  * IO_agbp should be set to NULL. If an inode is available,
 492  * i.e., xfs_dialloc() did not need to do an allocation, an inode
 493  * number is returned.  In this case, IO_agbp would be set to the
 494  * current ag_buf and alloc_done set to false.
 495  * If an allocation needed to be done, xfs_dialloc would return
 496  * the current ag_buf in IO_agbp and set alloc_done to true.
 497  * The caller should then commit the current transaction, allocate a new
 498  * transaction, and call xfs_dialloc() again, passing in the previous
 499  * value of IO_agbp.  IO_agbp should be held across the transactions.
 500  * Since the agbp is locked across the two calls, the second call is
 501  * guaranteed to have a free inode available.
 502  *
 503  * Once we successfully pick an inode its number is returned and the
 504  * on-disk data structures are updated.  The inode itself is not read
 505  * in, since doing so would break ordering constraints with xfs_reclaim.
 506  */
 507 int
 508 xfs_dialloc(
 509         xfs_trans_t     *tp,            /* transaction pointer */
 510         xfs_ino_t       parent,         /* parent inode (directory) */
 511         mode_t          mode,           /* mode bits for new inode */
 512         int             okalloc,        /* ok to allocate more space */
 513         xfs_buf_t       **IO_agbp,      /* in/out ag header's buffer */
 514         boolean_t       *alloc_done,    /* true if we needed to replenish
 515                                            inode freelist */
 516         xfs_ino_t       *inop)          /* inode number allocated */
 517 {
 518         xfs_agnumber_t  agcount;        /* number of allocation groups */
 519         xfs_buf_t       *agbp;          /* allocation group header's buffer */
 520         xfs_agnumber_t  agno;           /* allocation group number */
 521         xfs_agi_t       *agi;           /* allocation group header structure */
 522         xfs_btree_cur_t *cur;           /* inode allocation btree cursor */
 523         int             error;          /* error return value */
 524         int             i;              /* result code */
 525         int             ialloced = 0;   /* inode allocation status */
 526         int             noroom = 0;     /* no space for inode blk allocation */
 527         xfs_ino_t       ino;            /* fs-relative inode to be returned */
 528         /* REFERENCED */
 529         int             j;              /* result code */
 530         xfs_mount_t     *mp;            /* file system mount structure */
 531         int             offset;         /* index of inode in chunk */
 532         xfs_agino_t     pagino;         /* parent's a.g. relative inode # */
 533         xfs_agnumber_t  pagno;          /* parent's allocation group number */
 534         xfs_inobt_rec_t rec;            /* inode allocation record */
 535         xfs_agnumber_t  tagno;          /* testing allocation group number */
 536         xfs_btree_cur_t *tcur;          /* temp cursor */
 537         xfs_inobt_rec_t trec;           /* temp inode allocation record */
 538
 539
 540         if (*IO_agbp == NULL) {
 541                 /*
 542                  * We do not have an agbp, so select an initial allocation
 543                  * group for inode allocation.
 544                  */
 545                 agbp = xfs_ialloc_ag_select(tp, parent, mode, okalloc);
 546                 /*
 547                  * Couldn't find an allocation group satisfying the
 548                  * criteria, give up.
 549                  */
 550                 if (!agbp) {
 551                         *inop = NULLFSINO;
 552                         return 0;
 553                 }
 554                 agi = XFS_BUF_TO_AGI(agbp);
 555                 ASSERT(be32_to_cpu(agi->agi_magicnum) == XFS_AGI_MAGIC);
 556         } else {
 557                 /*
 558                  * Continue where we left off before.  In this case, we
 559                  * know that the allocation group has free inodes.
 560                  */
 561                 agbp = *IO_agbp;
 562                 agi = XFS_BUF_TO_AGI(agbp);
 563                 ASSERT(be32_to_cpu(agi->agi_magicnum) == XFS_AGI_MAGIC);
 564                 ASSERT(be32_to_cpu(agi->agi_freecount) > 0);
 565         }
 566         mp = tp->t_mountp;
 567         agcount = mp->m_sb.sb_agcount;
 568         agno = be32_to_cpu(agi->agi_seqno);
 569         tagno = agno;
 570         pagno = XFS_INO_TO_AGNO(mp, parent);
 571         pagino = XFS_INO_TO_AGINO(mp, parent);
 572
 573         /*
 574          * If we have already hit the ceiling of inode blocks then clear
 575          * okalloc so we scan all available agi structures for a free
 576          * inode.
 577          */
 578
 579         if (mp->m_maxicount &&
 580             mp->m_sb.sb_icount + XFS_IALLOC_INODES(mp) > mp->m_maxicount) {
 581                 noroom = 1;
 582                 okalloc = 0;
 583         }
 584
 585         /*
 586          * Loop until we find an allocation group that either has free inodes
 587          * or in which we can allocate some inodes.  Iterate through the
 588          * allocation groups upward, wrapping at the end.
 589          */
 590         *alloc_done = B_FALSE;
 591         while (!agi->agi_freecount) {
 592                 /*
 593                  * Don't do anything if we're not supposed to allocate
 594                  * any blocks, just go on to the next ag.
 595                  */
 596                 if (okalloc) {
 597                         /*
 598                          * Try to allocate some new inodes in the allocation
 599                          * group.
 600                          */
 601                         if ((error = xfs_ialloc_ag_alloc(tp, agbp, &ialloced))) {
 602                                 xfs_trans_brelse(tp, agbp);
 603                                 if (error == ENOSPC) {
 604                                         *inop = NULLFSINO;
 605                                         return 0;
 606                                 } else
 607                                         return error;
 608                         }
 609                         if (ialloced) {
 610                                 /*
 611                                  * We successfully allocated some inodes, return
 612                                  * the current context to the caller so that it
 613                                  * can commit the current transaction and call
 614                                  * us again where we left off.
 615                                  */
 616                                 ASSERT(be32_to_cpu(agi->agi_freecount) > 0);
 617                                 *alloc_done = B_TRUE;
 618                                 *IO_agbp = agbp;
 619                                 *inop = NULLFSINO;
 620                                 return 0;
 621                         }
 622                 }
 623                 /*
 624                  * If it failed, give up on this ag.
 625                  */
 626                 xfs_trans_brelse(tp, agbp);
 627                 /*
 628                  * Go on to the next ag: get its ag header.
 629                  */
 630 nextag:
 631                 if (++tagno == agcount)
 632                         tagno = 0;
 633                 if (tagno == agno) {
 634                         *inop = NULLFSINO;
 635                         return noroom ? ENOSPC : 0;
 636                 }
 637                 down_read(&mp->m_peraglock);
 638                 if (mp->m_perag[tagno].pagi_inodeok == 0) {
 639                         up_read(&mp->m_peraglock);
 640                         goto nextag;
 641                 }
 642                 error = xfs_ialloc_read_agi(mp, tp, tagno, &agbp);
 643                 up_read(&mp->m_peraglock);
 644                 if (error)
 645                         goto nextag;
 646                 agi = XFS_BUF_TO_AGI(agbp);
 647                 ASSERT(be32_to_cpu(agi->agi_magicnum) == XFS_AGI_MAGIC);
 648         }
 649         /*
 650          * Here with an allocation group that has a free inode.
 651          * Reset agno since we may have chosen a new ag in the
 652          * loop above.
 653          */
 654         agno = tagno;
 655         *IO_agbp = NULL;
 656         cur = xfs_btree_init_cursor(mp, tp, agbp, be32_to_cpu(agi->agi_seqno),
 657                                     XFS_BTNUM_INO, (xfs_inode_t *)0, 0);
 658         /*
 659          * If pagino is 0 (this is the root inode allocation) use newino.
 660          * This must work because we've just allocated some.
 661          */
 662         if (!pagino)
 663                 pagino = be32_to_cpu(agi->agi_newino);
 664 #ifdef DEBUG
 665         if (cur->bc_nlevels == 1) {
 666                 int     freecount = 0;
 667
 668                 if ((error = xfs_inobt_lookup_ge(cur, 0, 0, 0, &i)))
 669                         goto error0;
 670                 XFS_WANT_CORRUPTED_GOTO(i == 1, error0);
 671                 do {
 672                         if ((error = xfs_inobt_get_rec(cur, &rec.ir_startino,
 673                                         &rec.ir_freecount, &rec.ir_free, &i)))
 674                                 goto error0;
 675                         XFS_WANT_CORRUPTED_GOTO(i == 1, error0);
 676                         freecount += rec.ir_freecount;
 677                         if ((error = xfs_inobt_increment(cur, 0, &i)))
 678                                 goto error0;
 679                 } while (i == 1);
 680
 681                 ASSERT(freecount == be32_to_cpu(agi->agi_freecount) ||
 682                        XFS_FORCED_SHUTDOWN(mp));
 683         }
 684 #endif
 685         /*
 686          * If in the same a.g. as the parent, try to get near the parent.
 687          */
 688         if (pagno == agno) {
 689                 if ((error = xfs_inobt_lookup_le(cur, pagino, 0, 0, &i)))
 690                         goto error0;
 691                 if (i != 0 &&
 692                     (error = xfs_inobt_get_rec(cur, &rec.ir_startino,
 693                             &rec.ir_freecount, &rec.ir_free, &j)) == 0 &&
 694                     j == 1 &&
 695                     rec.ir_freecount > 0) {
 696                         /*
 697                          * Found a free inode in the same chunk
 698                          * as parent, done.
 699                          */
 700                 }
 701                 /*
 702                  * In the same a.g. as parent, but parent's chunk is full.
 703                  */
 704                 else {
 705                         int     doneleft;       /* done, to the left */
 706                         int     doneright;      /* done, to the right */
 707
 708                         if (error)
 709                                 goto error0;
 710                         ASSERT(i == 1);
 711                         ASSERT(j == 1);
 712                         /*
 713                          * Duplicate the cursor, search left & right
 714                          * simultaneously.
 715                          */
 716                         if ((error = xfs_btree_dup_cursor(cur, &tcur)))
 717                                 goto error0;
 718                         /*
 719                          * Search left with tcur, back up 1 record.
 720                          */
 721                         if ((error = xfs_inobt_decrement(tcur, 0, &i)))
 722                                 goto error1;
 723                         doneleft = !i;
 724                         if (!doneleft) {
 725                                 if ((error = xfs_inobt_get_rec(tcur,
 726                                                 &trec.ir_startino,
 727                                                 &trec.ir_freecount,
 728                                                 &trec.ir_free, &i)))
 729                                         goto error1;
 730                                 XFS_WANT_CORRUPTED_GOTO(i == 1, error1);
 731                         }
 732                         /*
 733                          * Search right with cur, go forward 1 record.
 734                          */
 735                         if ((error = xfs_inobt_increment(cur, 0, &i)))
 736                                 goto error1;
 737                         doneright = !i;
 738                         if (!doneright) {
 739                                 if ((error = xfs_inobt_get_rec(cur,
 740                                                 &rec.ir_startino,
 741                                                 &rec.ir_freecount,
 742                                                 &rec.ir_free, &i)))
 743                                         goto error1;
 744                                 XFS_WANT_CORRUPTED_GOTO(i == 1, error1);
 745                         }
 746                         /*
 747                          * Loop until we find the closest inode chunk
 748                          * with a free one.
 749                          */
 750                         while (!doneleft || !doneright) {
 751                                 int     useleft;  /* using left inode
 752                                                      chunk this time */
 753
 754                                 /*
 755                                  * Figure out which block is closer,
 756                                  * if both are valid.
 757                                  */
 758                                 if (!doneleft && !doneright)
 759                                         useleft =
 760                                                 pagino -
 761                                                 (trec.ir_startino +
 762                                                  XFS_INODES_PER_CHUNK - 1) <
 763                                                  rec.ir_startino - pagino;
 764                                 else
 765                                         useleft = !doneleft;
 766                                 /*
 767                                  * If checking the left, does it have
 768                                  * free inodes?
 769                                  */
 770                                 if (useleft && trec.ir_freecount) {
 771                                         /*
 772                                          * Yes, set it up as the chunk to use.
 773                                          */
 774                                         rec = trec;
 775                                         xfs_btree_del_cursor(cur,
 776                                                 XFS_BTREE_NOERROR);
 777                                         cur = tcur;
 778                                         break;
 779                                 }
 780                                 /*
 781                                  * If checking the right, does it have
 782                                  * free inodes?
 783                                  */
 784                                 if (!useleft && rec.ir_freecount) {
 785                                         /*
 786                                          * Yes, it's already set up.
 787                                          */
 788                                         xfs_btree_del_cursor(tcur,
 789                                                 XFS_BTREE_NOERROR);
 790                                         break;
 791                                 }
 792                                 /*
 793                                  * If used the left, get another one
 794                                  * further left.
 795                                  */
 796                                 if (useleft) {
 797                                         if ((error = xfs_inobt_decrement(tcur, 0,
 798                                                         &i)))
 799                                                 goto error1;
 800                                         doneleft = !i;
 801                                         if (!doneleft) {
 802                                                 if ((error = xfs_inobt_get_rec(
 803                                                             tcur,
 804                                                             &trec.ir_startino,
 805                                                             &trec.ir_freecount,
 806                                                             &trec.ir_free, &i)))
 807                                                         goto error1;
 808                                                 XFS_WANT_CORRUPTED_GOTO(i == 1,
 809                                                         error1);
 810                                         }
 811                                 }
 812                                 /*
 813                                  * If used the right, get another one
 814                                  * further right.
 815                                  */
 816                                 else {
 817                                         if ((error = xfs_inobt_increment(cur, 0,
 818                                                         &i)))
 819                                                 goto error1;
 820                                         doneright = !i;
 821                                         if (!doneright) {
 822                                                 if ((error = xfs_inobt_get_rec(
 823                                                             cur,
 824                                                             &rec.ir_startino,
 825                                                             &rec.ir_freecount,
 826                                                             &rec.ir_free, &i)))
 827                                                         goto error1;
 828                                                 XFS_WANT_CORRUPTED_GOTO(i == 1,
 829                                                         error1);
 830                                         }
 831                                 }
 832                         }
 833                         ASSERT(!doneleft || !doneright);
 834                 }
 835         }
 836         /*
 837          * In a different a.g. from the parent.
 838          * See if the most recently allocated block has any free.
 839          */
 840         else if (be32_to_cpu(agi->agi_newino) != NULLAGINO) {
 841                 if ((error = xfs_inobt_lookup_eq(cur,
 842                                 be32_to_cpu(agi->agi_newino), 0, 0, &i)))
 843                         goto error0;
 844                 if (i == 1 &&
 845                     (error = xfs_inobt_get_rec(cur, &rec.ir_startino,
 846                             &rec.ir_freecount, &rec.ir_free, &j)) == 0 &&
 847                     j == 1 &&
 848                     rec.ir_freecount > 0) {
 849                         /*
 850                          * The last chunk allocated in the group still has
 851                          * a free inode.
 852                          */
 853                 }
 854                 /*
 855                  * None left in the last group, search the whole a.g.
 856                  */
 857                 else {
 858                         if (error)
 859                                 goto error0;
 860                         if ((error = xfs_inobt_lookup_ge(cur, 0, 0, 0, &i)))
 861                                 goto error0;
 862                         ASSERT(i == 1);
 863                         for (;;) {
 864                                 if ((error = xfs_inobt_get_rec(cur,
 865                                                 &rec.ir_startino,
 866                                                 &rec.ir_freecount, &rec.ir_free,
 867                                                 &i)))
 868                                         goto error0;
 869                                 XFS_WANT_CORRUPTED_GOTO(i == 1, error0);
 870                                 if (rec.ir_freecount > 0)
 871                                         break;
 872                                 if ((error = xfs_inobt_increment(cur, 0, &i)))
 873                                         goto error0;
 874                                 XFS_WANT_CORRUPTED_GOTO(i == 1, error0);
 875                         }
 876                 }
 877         }
 878         offset = XFS_IALLOC_FIND_FREE(&rec.ir_free);
 879         ASSERT(offset >= 0);
 880         ASSERT(offset < XFS_INODES_PER_CHUNK);
 881         ASSERT((XFS_AGINO_TO_OFFSET(mp, rec.ir_startino) %
 882                                    XFS_INODES_PER_CHUNK) == 0);
 883         ino = XFS_AGINO_TO_INO(mp, agno, rec.ir_startino + offset);
 884         XFS_INOBT_CLR_FREE(&rec, offset);
 885         rec.ir_freecount--;
 886         if ((error = xfs_inobt_update(cur, rec.ir_startino, rec.ir_freecount,
 887                         rec.ir_free)))
 888                 goto error0;
 889         be32_add(&agi->agi_freecount, -1);
 890         xfs_ialloc_log_agi(tp, agbp, XFS_AGI_FREECOUNT);
 891         down_read(&mp->m_peraglock);
 892         mp->m_perag[tagno].pagi_freecount--;
 893         up_read(&mp->m_peraglock);
 894 #ifdef DEBUG
 895         if (cur->bc_nlevels == 1) {
 896                 int     freecount = 0;
 897
 898                 if ((error = xfs_inobt_lookup_ge(cur, 0, 0, 0, &i)))
 899                         goto error0;
 900                 do {
 901                         if ((error = xfs_inobt_get_rec(cur, &rec.ir_startino,
 902                                         &rec.ir_freecount, &rec.ir_free, &i)))
 903                                 goto error0;
 904                         XFS_WANT_CORRUPTED_GOTO(i == 1, error0);
 905                         freecount += rec.ir_freecount;
 906                         if ((error = xfs_inobt_increment(cur, 0, &i)))
 907                                 goto error0;
 908                 } while (i == 1);
 909                 ASSERT(freecount == be32_to_cpu(agi->agi_freecount) ||
 910                        XFS_FORCED_SHUTDOWN(mp));
 911         }
 912 #endif
 913         xfs_btree_del_cursor(cur, XFS_BTREE_NOERROR);
 914         xfs_trans_mod_sb(tp, XFS_TRANS_SB_IFREE, -1);
 915         *inop = ino;
 916         return 0;
 917 error1:
 918         xfs_btree_del_cursor(tcur, XFS_BTREE_ERROR);
 919 error0:
 920         xfs_btree_del_cursor(cur, XFS_BTREE_ERROR);
 921         return error;
 922 }
 923
 924 /*
 925  * Free disk inode.  Carefully avoids touching the incore inode, all
 926  * manipulations incore are the caller's responsibility.
 927  * The on-disk inode is not changed by this operation, only the
 928  * btree (free inode mask) is changed.
 929  */
 930 int
 931 xfs_difree(
 932         xfs_trans_t     *tp,            /* transaction pointer */
 933         xfs_ino_t       inode,          /* inode to be freed */
 934         xfs_bmap_free_t *flist,         /* extents to free */
 935         int             *delete,        /* set if inode cluster was deleted */
 936         xfs_ino_t       *first_ino)     /* first inode in deleted cluster */
 937 {
 938         /* REFERENCED */
 939         xfs_agblock_t   agbno;  /* block number containing inode */
 940         xfs_buf_t       *agbp;  /* buffer containing allocation group header */
 941         xfs_agino_t     agino;  /* inode number relative to allocation group */
 942         xfs_agnumber_t  agno;   /* allocation group number */
 943         xfs_agi_t       *agi;   /* allocation group header */
 944         xfs_btree_cur_t *cur;   /* inode btree cursor */
 945         int             error;  /* error return value */
 946         int             i;      /* result code */
 947         int             ilen;   /* inodes in an inode cluster */
 948         xfs_mount_t     *mp;    /* mount structure for filesystem */
 949         int             off;    /* offset of inode in inode chunk */
 950         xfs_inobt_rec_t rec;    /* btree record */
 951
 952         mp = tp->t_mountp;
 953
 954         /*
 955          * Break up inode number into its components.
 956          */
 957         agno = XFS_INO_TO_AGNO(mp, inode);
 958         if (agno >= mp->m_sb.sb_agcount)  {
 959                 cmn_err(CE_WARN,
 960                         "xfs_difree: agno >= mp->m_sb.sb_agcount (%d >= %d) on %s.  Returning EINVAL.",
 961                         agno, mp->m_sb.sb_agcount, mp->m_fsname);
 962                 ASSERT(0);
 963                 return XFS_ERROR(EINVAL);
 964         }
 965         agino = XFS_INO_TO_AGINO(mp, inode);
 966         if (inode != XFS_AGINO_TO_INO(mp, agno, agino))  {
 967                 cmn_err(CE_WARN,
 968                         "xfs_difree: inode != XFS_AGINO_TO_INO() "
 969                         "(%llu != %llu) on %s.  Returning EINVAL.",
 970                         (unsigned long long)inode,
 971                         (unsigned long long)XFS_AGINO_TO_INO(mp, agno, agino),
 972                         mp->m_fsname);
 973                 ASSERT(0);
 974                 return XFS_ERROR(EINVAL);
 975         }
 976         agbno = XFS_AGINO_TO_AGBNO(mp, agino);
 977         if (agbno >= mp->m_sb.sb_agblocks)  {
 978                 cmn_err(CE_WARN,
 979                         "xfs_difree: agbno >= mp->m_sb.sb_agblocks (%d >= %d) on %s.  Returning EINVAL.",
 980                         agbno, mp->m_sb.sb_agblocks, mp->m_fsname);
 981                 ASSERT(0);
 982                 return XFS_ERROR(EINVAL);
 983         }
 984         /*
 985          * Get the allocation group header.
 986          */
 987         down_read(&mp->m_peraglock);
 988         error = xfs_ialloc_read_agi(mp, tp, agno, &agbp);
 989         up_read(&mp->m_peraglock);
 990         if (error) {
 991                 cmn_err(CE_WARN,
 992                         "xfs_difree: xfs_ialloc_read_agi() returned an error %d on %s.  Returning error.",
 993                         error, mp->m_fsname);
 994                 return error;
 995         }
 996         agi = XFS_BUF_TO_AGI(agbp);
 997         ASSERT(be32_to_cpu(agi->agi_magicnum) == XFS_AGI_MAGIC);
 998         ASSERT(agbno < be32_to_cpu(agi->agi_length));
 999         /*
1000          * Initialize the cursor.
1001          */
1002         cur = xfs_btree_init_cursor(mp, tp, agbp, agno, XFS_BTNUM_INO,
1003                 (xfs_inode_t *)0, 0);
1004 #ifdef DEBUG
1005         if (cur->bc_nlevels == 1) {
1006                 int freecount = 0;
1007
1008                 if ((error = xfs_inobt_lookup_ge(cur, 0, 0, 0, &i)))
1009                         goto error0;
1010                 do {
1011                         if ((error = xfs_inobt_get_rec(cur, &rec.ir_startino,
1012                                         &rec.ir_freecount, &rec.ir_free, &i)))
1013                                 goto error0;
1014                         if (i) {
1015                                 freecount += rec.ir_freecount;
1016                                 if ((error = xfs_inobt_increment(cur, 0, &i)))
1017                                         goto error0;
1018                         }
1019                 } while (i == 1);
1020                 ASSERT(freecount == be32_to_cpu(agi->agi_freecount) ||
1021                        XFS_FORCED_SHUTDOWN(mp));
1022         }
1023 #endif
1024         /*
1025          * Look for the entry describing this inode.
1026          */
1027         if ((error = xfs_inobt_lookup_le(cur, agino, 0, 0, &i))) {
1028                 cmn_err(CE_WARN,
1029                         "xfs_difree: xfs_inobt_lookup_le returned()  an error %d on %s.  Returning error.",
1030                         error, mp->m_fsname);
1031                 goto error0;
1032         }
1033         XFS_WANT_CORRUPTED_GOTO(i == 1, error0);
1034         if ((error = xfs_inobt_get_rec(cur, &rec.ir_startino, &rec.ir_freecount,
1035                         &rec.ir_free, &i))) {
1036                 cmn_err(CE_WARN,
1037                         "xfs_difree: xfs_inobt_get_rec()  returned an error %d on %s.  Returning error.",
1038                         error, mp->m_fsname);
1039                 goto error0;
1040         }
1041         XFS_WANT_CORRUPTED_GOTO(i == 1, error0);
1042         /*
1043          * Get the offset in the inode chunk.
1044          */
1045         off = agino - rec.ir_startino;
1046         ASSERT(off >= 0 && off < XFS_INODES_PER_CHUNK);
1047         ASSERT(!XFS_INOBT_IS_FREE(&rec, off));
1048         /*
1049          * Mark the inode free & increment the count.
1050          */
1051         XFS_INOBT_SET_FREE(&rec, off);
1052         rec.ir_freecount++;
1053
1054         /*
1055          * When an inode cluster is free, it becomes eligible for removal
1056          */
1057         if ((mp->m_flags & XFS_MOUNT_IDELETE) &&
1058             (rec.ir_freecount == XFS_IALLOC_INODES(mp))) {
1059
1060                 *delete = 1;
1061                 *first_ino = XFS_AGINO_TO_INO(mp, agno, rec.ir_startino);
1062
1063                 /*
1064                  * Remove the inode cluster from the AGI B+Tree, adjust the
1065                  * AGI and Superblock inode counts, and mark the disk space
1066                  * to be freed when the transaction is committed.
1067                  */
1068                 ilen = XFS_IALLOC_INODES(mp);
1069                 be32_add(&agi->agi_count, -ilen);
1070                 be32_add(&agi->agi_freecount, -(ilen - 1));
1071                 xfs_ialloc_log_agi(tp, agbp, XFS_AGI_COUNT | XFS_AGI_FREECOUNT);
1072                 down_read(&mp->m_peraglock);
1073                 mp->m_perag[agno].pagi_freecount -= ilen - 1;
1074                 up_read(&mp->m_peraglock);
1075                 xfs_trans_mod_sb(tp, XFS_TRANS_SB_ICOUNT, -ilen);
1076                 xfs_trans_mod_sb(tp, XFS_TRANS_SB_IFREE, -(ilen - 1));
1077
1078                 if ((error = xfs_inobt_delete(cur, &i))) {
1079                         cmn_err(CE_WARN, "xfs_difree: xfs_inobt_delete returned an error %d on %s.\n",
1080                                 error, mp->m_fsname);
1081                         goto error0;
1082                 }
1083
1084                 xfs_bmap_add_free(XFS_AGB_TO_FSB(mp,
1085                                 agno, XFS_INO_TO_AGBNO(mp,rec.ir_startino)),
1086                                 XFS_IALLOC_BLOCKS(mp), flist, mp);
1087         } else {
1088                 *delete = 0;
1089
1090                 if ((error = xfs_inobt_update(cur, rec.ir_startino, rec.ir_freecount, rec.ir_free))) {
1091                         cmn_err(CE_WARN,
1092                                 "xfs_difree: xfs_inobt_update()  returned an error %d on %s.  Returning error.",
1093                                 error, mp->m_fsname);
1094                         goto error0;
1095                 }
1096                 /*
1097                  * Change the inode free counts and log the ag/sb changes.
1098                  */
1099                 be32_add(&agi->agi_freecount, 1);
1100                 xfs_ialloc_log_agi(tp, agbp, XFS_AGI_FREECOUNT);
1101                 down_read(&mp->m_peraglock);
1102                 mp->m_perag[agno].pagi_freecount++;
1103                 up_read(&mp->m_peraglock);
1104                 xfs_trans_mod_sb(tp, XFS_TRANS_SB_IFREE, 1);
1105         }
1106
1107 #ifdef DEBUG
1108         if (cur->bc_nlevels == 1) {
1109                 int freecount = 0;
1110
1111                 if ((error = xfs_inobt_lookup_ge(cur, 0, 0, 0, &i)))
1112                         goto error0;
1113                 do {
1114                         if ((error = xfs_inobt_get_rec(cur,
1115                                         &rec.ir_startino,
1116                                         &rec.ir_freecount,
1117                                         &rec.ir_free, &i)))
1118                                 goto error0;
1119                         if (i) {
1120                                 freecount += rec.ir_freecount;
1121                                 if ((error = xfs_inobt_increment(cur, 0, &i)))
1122                                         goto error0;
1123                         }
1124                 } while (i == 1);
1125                 ASSERT(freecount == be32_to_cpu(agi->agi_freecount) ||
1126                        XFS_FORCED_SHUTDOWN(mp));
1127         }
1128 #endif
1129         xfs_btree_del_cursor(cur, XFS_BTREE_NOERROR);
1130         return 0;
1131
1132 error0:
1133         xfs_btree_del_cursor(cur, XFS_BTREE_ERROR);
1134         return error;
1135 }
1136
1137 /*
1138  * Return the location of the inode in bno/off, for mapping it into a buffer.
1139  */
1140 /*ARGSUSED*/
1141 int
1142 xfs_dilocate(
1143         xfs_mount_t     *mp,    /* file system mount structure */
1144         xfs_trans_t     *tp,    /* transaction pointer */
1145         xfs_ino_t       ino,    /* inode to locate */
1146         xfs_fsblock_t   *bno,   /* output: block containing inode */
1147         int             *len,   /* output: num blocks in inode cluster */
1148         int             *off,   /* output: index in block of inode */
1149         uint            flags)  /* flags concerning inode lookup */
1150 {
1151         xfs_agblock_t   agbno;  /* block number of inode in the alloc group */
1152         xfs_buf_t       *agbp;  /* agi buffer */
1153         xfs_agino_t     agino;  /* inode number within alloc group */
1154         xfs_agnumber_t  agno;   /* allocation group number */
1155         int             blks_per_cluster; /* num blocks per inode cluster */
1156         xfs_agblock_t   chunk_agbno;    /* first block in inode chunk */
1157         xfs_agino_t     chunk_agino;    /* first agino in inode chunk */
1158         __int32_t       chunk_cnt;      /* count of free inodes in chunk */
1159         xfs_inofree_t   chunk_free;     /* mask of free inodes in chunk */
1160         xfs_agblock_t   cluster_agbno;  /* first block in inode cluster */
1161         xfs_btree_cur_t *cur;   /* inode btree cursor */
1162         int             error;  /* error code */
1163         int             i;      /* temp state */
1164         int             offset; /* index of inode in its buffer */
1165         int             offset_agbno;   /* blks from chunk start to inode */
1166
1167         ASSERT(ino != NULLFSINO);
1168         /*
1169          * Split up the inode number into its parts.
1170          */
1171         agno = XFS_INO_TO_AGNO(mp, ino);
1172         agino = XFS_INO_TO_AGINO(mp, ino);
1173         agbno = XFS_AGINO_TO_AGBNO(mp, agino);
1174         if (agno >= mp->m_sb.sb_agcount || agbno >= mp->m_sb.sb_agblocks ||
1175             ino != XFS_AGINO_TO_INO(mp, agno, agino)) {
1176 #ifdef DEBUG
1177                 if (agno >= mp->m_sb.sb_agcount) {
1178                         xfs_fs_cmn_err(CE_ALERT, mp,
1179                                        "xfs_dilocate: ino (0x%llx) agno (%d) >= "
1180                                        "mp->m_sb.sb_agcount (%d)",
1181                                        ino,
1182                                        agno,  mp->m_sb.sb_agcount);
1183                 }
1184                 if (agbno >= mp->m_sb.sb_agblocks) {
1185                         xfs_fs_cmn_err(CE_ALERT, mp,
1186                                         "xfs_dilocate: agbno (0x%llx) >= "
1187                                         "mp->m_sb.sb_agblocks (0x%lx)",
1188                                         (unsigned long long) agbno,
1189                                         (unsigned long) mp->m_sb.sb_agblocks);
1190                 }
1191                 if (ino != XFS_AGINO_TO_INO(mp, agno, agino)) {
1192                         xfs_fs_cmn_err(CE_ALERT, mp,
1193                                         "xfs_dilocate: ino (0x%llx) != "
1194                                         "XFS_AGINO_TO_INO(mp, agno, agino) "
1195                                         "(0x%llx)",
1196                                         ino, XFS_AGINO_TO_INO(mp, agno, agino));
1197                 }
1198 #endif /* DEBUG */
1199                 return XFS_ERROR(EINVAL);
1200         }
1201         if ((mp->m_sb.sb_blocksize >= XFS_INODE_CLUSTER_SIZE(mp)) ||
1202             !(flags & XFS_IMAP_LOOKUP)) {
1203                 offset = XFS_INO_TO_OFFSET(mp, ino);
1204                 ASSERT(offset < mp->m_sb.sb_inopblock);
1205                 *bno = XFS_AGB_TO_FSB(mp, agno, agbno);
1206                 *off = offset;
1207                 *len = 1;
1208                 return 0;
1209         }
1210         blks_per_cluster = XFS_INODE_CLUSTER_SIZE(mp) >> mp->m_sb.sb_blocklog;
1211         if (*bno != NULLFSBLOCK) {
1212                 offset = XFS_INO_TO_OFFSET(mp, ino);
1213                 ASSERT(offset < mp->m_sb.sb_inopblock);
1214                 cluster_agbno = XFS_FSB_TO_AGBNO(mp, *bno);
1215                 *off = ((agbno - cluster_agbno) * mp->m_sb.sb_inopblock) +
1216                         offset;
1217                 *len = blks_per_cluster;
1218                 return 0;
1219         }
1220         if (mp->m_inoalign_mask) {
1221                 offset_agbno = agbno & mp->m_inoalign_mask;
1222                 chunk_agbno = agbno - offset_agbno;
1223         } else {
1224                 down_read(&mp->m_peraglock);
1225                 error = xfs_ialloc_read_agi(mp, tp, agno, &agbp);
1226                 up_read(&mp->m_peraglock);
1227                 if (error) {
1228 #ifdef DEBUG
1229                         xfs_fs_cmn_err(CE_ALERT, mp, "xfs_dilocate: "
1230                                         "xfs_ialloc_read_agi() returned "
1231                                         "error %d, agno %d",
1232                                         error, agno);
1233 #endif /* DEBUG */
1234                         return error;
1235                 }
1236                 cur = xfs_btree_init_cursor(mp, tp, agbp, agno, XFS_BTNUM_INO,
1237                         (xfs_inode_t *)0, 0);
1238                 if ((error = xfs_inobt_lookup_le(cur, agino, 0, 0, &i))) {
1239 #ifdef DEBUG
1240                         xfs_fs_cmn_err(CE_ALERT, mp, "xfs_dilocate: "
1241                                         "xfs_inobt_lookup_le() failed");
1242 #endif /* DEBUG */
1243                         goto error0;
1244                 }
1245                 if ((error = xfs_inobt_get_rec(cur, &chunk_agino, &chunk_cnt,
1246                                 &chunk_free, &i))) {
1247 #ifdef DEBUG
1248                         xfs_fs_cmn_err(CE_ALERT, mp, "xfs_dilocate: "
1249                                         "xfs_inobt_get_rec() failed");
1250 #endif /* DEBUG */
1251                         goto error0;
1252                 }
1253                 if (i == 0) {
1254 #ifdef DEBUG
1255                         xfs_fs_cmn_err(CE_ALERT, mp, "xfs_dilocate: "
1256                                         "xfs_inobt_get_rec() failed");
1257 #endif /* DEBUG */
1258                         error = XFS_ERROR(EINVAL);
1259                 }
1260                 xfs_trans_brelse(tp, agbp);
1261                 xfs_btree_del_cursor(cur, XFS_BTREE_NOERROR);
1262                 if (error)
1263                         return error;
1264                 chunk_agbno = XFS_AGINO_TO_AGBNO(mp, chunk_agino);
1265                 offset_agbno = agbno - chunk_agbno;
1266         }
1267         ASSERT(agbno >= chunk_agbno);
1268         cluster_agbno = chunk_agbno +
1269                 ((offset_agbno / blks_per_cluster) * blks_per_cluster);
1270         offset = ((agbno - cluster_agbno) * mp->m_sb.sb_inopblock) +
1271                 XFS_INO_TO_OFFSET(mp, ino);
1272         *bno = XFS_AGB_TO_FSB(mp, agno, cluster_agbno);
1273         *off = offset;
1274         *len = blks_per_cluster;
1275         return 0;
1276 error0:
1277         xfs_trans_brelse(tp, agbp);
1278         xfs_btree_del_cursor(cur, XFS_BTREE_ERROR);
1279         return error;
1280 }
1281
1282 /*
1283  * Compute and fill in value of m_in_maxlevels.
1284  */
1285 void
1286 xfs_ialloc_compute_maxlevels(
1287         xfs_mount_t     *mp)            /* file system mount structure */
1288 {
1289         int             level;
1290         uint            maxblocks;
1291         uint            maxleafents;
1292         int             minleafrecs;
1293         int             minnoderecs;
1294
1295         maxleafents = (1LL << XFS_INO_AGINO_BITS(mp)) >>
1296                 XFS_INODES_PER_CHUNK_LOG;
1297         minleafrecs = mp->m_alloc_mnr[0];
1298         minnoderecs = mp->m_alloc_mnr[1];
1299         maxblocks = (maxleafents + minleafrecs - 1) / minleafrecs;
1300         for (level = 1; maxblocks > 1; level++)
1301                 maxblocks = (maxblocks + minnoderecs - 1) / minnoderecs;
1302         mp->m_in_maxlevels = level;
1303 }
1304
1305 /*
1306  * Log specified fields for the ag hdr (inode section)
1307  */
1308 void
1309 xfs_ialloc_log_agi(
1310         xfs_trans_t     *tp,            /* transaction pointer */
1311         xfs_buf_t       *bp,            /* allocation group header buffer */
1312         int             fields)         /* bitmask of fields to log */
1313 {
1314         int                     first;          /* first byte number */
1315         int                     last;           /* last byte number */
1316         static const short      offsets[] = {   /* field starting offsets */
1317                                         /* keep in sync with bit definitions */
1318                 offsetof(xfs_agi_t, agi_magicnum),
1319                 offsetof(xfs_agi_t, agi_versionnum),
1320                 offsetof(xfs_agi_t, agi_seqno),
1321                 offsetof(xfs_agi_t, agi_length),
1322                 offsetof(xfs_agi_t, agi_count),
1323                 offsetof(xfs_agi_t, agi_root),
1324                 offsetof(xfs_agi_t, agi_level),
1325                 offsetof(xfs_agi_t, agi_freecount),
1326                 offsetof(xfs_agi_t, agi_newino),
1327                 offsetof(xfs_agi_t, agi_dirino),
1328                 offsetof(xfs_agi_t, agi_unlinked),
1329                 sizeof(xfs_agi_t)
1330         };
1331 #ifdef DEBUG
1332         xfs_agi_t               *agi;   /* allocation group header */
1333
1334         agi = XFS_BUF_TO_AGI(bp);
1335         ASSERT(be32_to_cpu(agi->agi_magicnum) == XFS_AGI_MAGIC);
1336 #endif
1337         /*
1338          * Compute byte offsets for the first and last fields.
1339          */
1340         xfs_btree_offsets(fields, offsets, XFS_AGI_NUM_BITS, &first, &last);
1341         /*
1342          * Log the allocation group inode header buffer.
1343          */
1344         xfs_trans_log_buf(tp, bp, first, last);
1345 }
1346
1347 /*
1348  * Read in the allocation group header (inode allocation section)
1349  */
1350 int
1351 xfs_ialloc_read_agi(
1352         xfs_mount_t     *mp,            /* file system mount structure */
1353         xfs_trans_t     *tp,            /* transaction pointer */
1354         xfs_agnumber_t  agno,           /* allocation group number */
1355         xfs_buf_t       **bpp)          /* allocation group hdr buf */
1356 {
1357         xfs_agi_t       *agi;           /* allocation group header */
1358         int             agi_ok;         /* agi is consistent */
1359         xfs_buf_t       *bp;            /* allocation group hdr buf */
1360         xfs_perag_t     *pag;           /* per allocation group data */
1361         int             error;
1362
1363         ASSERT(agno != NULLAGNUMBER);
1364         error = xfs_trans_read_buf(
1365                         mp, tp, mp->m_ddev_targp,
1366                         XFS_AG_DADDR(mp, agno, XFS_AGI_DADDR(mp)),
1367                         XFS_FSS_TO_BB(mp, 1), 0, &bp);
1368         if (error)
1369                 return error;
1370         ASSERT(bp && !XFS_BUF_GETERROR(bp));
1371
1372         /*
1373          * Validate the magic number of the agi block.
1374          */
1375         agi = XFS_BUF_TO_AGI(bp);
1376         agi_ok =
1377                 be32_to_cpu(agi->agi_magicnum) == XFS_AGI_MAGIC &&
1378                 XFS_AGI_GOOD_VERSION(be32_to_cpu(agi->agi_versionnum));
1379         if (unlikely(XFS_TEST_ERROR(!agi_ok, mp, XFS_ERRTAG_IALLOC_READ_AGI,
1380                         XFS_RANDOM_IALLOC_READ_AGI))) {
1381                 XFS_CORRUPTION_ERROR("xfs_ialloc_read_agi", XFS_ERRLEVEL_LOW,
1382                                      mp, agi);
1383                 xfs_trans_brelse(tp, bp);
1384                 return XFS_ERROR(EFSCORRUPTED);
1385         }
1386         pag = &mp->m_perag[agno];
1387         if (!pag->pagi_init) {
1388                 pag->pagi_freecount = be32_to_cpu(agi->agi_freecount);
1389                 pag->pagi_init = 1;
1390         } else {
1391                 /*
1392                  * It's possible for these to be out of sync if
1393                  * we are in the middle of a forced shutdown.
1394                  */
1395                 ASSERT(pag->pagi_freecount == be32_to_cpu(agi->agi_freecount) ||
1396                         XFS_FORCED_SHUTDOWN(mp));
1397         }
1398
1399 #ifdef DEBUG
1400         {
1401                 int     i;
1402
1403                 for (i = 0; i < XFS_AGI_UNLINKED_BUCKETS; i++)
1404                         ASSERT(agi->agi_unlinked[i]);
1405         }
1406 #endif
1407
1408         XFS_BUF_SET_VTYPE_REF(bp, B_FS_AGI, XFS_AGI_REF);
1409         *bpp = bp;
1410         return 0;
1411 }