fs/xfs/xfs_inode.c

   1 /*
   2  * Copyright (c) 2000-2003 Silicon Graphics, Inc.  All Rights Reserved.
   3  *
   4  * This program is free software; you can redistribute it and/or modify it
   5  * under the terms of version 2 of the GNU General Public License as
   6  * published by the Free Software Foundation.
   7  *
   8  * This program is distributed in the hope that it would be useful, but
   9  * WITHOUT ANY WARRANTY; without even the implied warranty of
  10  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
  11  *
  12  * Further, this software is distributed without any warranty that it is
  13  * free of the rightful claim of any third person regarding infringement
  14  * or the like.  Any license provided herein, whether implied or
  15  * otherwise, applies only to this software file.  Patent licenses, if
  16  * any, provided herein do not apply to combinations of this program with
  17  * other software, or any other product whatsoever.
  18  *
  19  * You should have received a copy of the GNU General Public License along
  20  * with this program; if not, write the Free Software Foundation, Inc., 59
  21  * Temple Place - Suite 330, Boston MA 02111-1307, USA.
  22  *
  23  * Contact information: Silicon Graphics, Inc., 1600 Amphitheatre Pkwy,
  24  * Mountain View, CA  94043, or:
  25  *
  26  * http://www.sgi.com
  27  *
  28  * For further information regarding this notice, see:
  29  *
  30  * http://oss.sgi.com/projects/GenInfo/SGIGPLNoticeExplan/
  31  */
  32
  33 #include "xfs.h"
  34 #include "xfs_macros.h"
  35 #include "xfs_types.h"
  36 #include "xfs_inum.h"
  37 #include "xfs_log.h"
  38 #include "xfs_trans.h"
  39 #include "xfs_trans_priv.h"
  40 #include "xfs_sb.h"
  41 #include "xfs_ag.h"
  42 #include "xfs_dir.h"
  43 #include "xfs_dir2.h"
  44 #include "xfs_dmapi.h"
  45 #include "xfs_mount.h"
  46 #include "xfs_alloc_btree.h"
  47 #include "xfs_bmap_btree.h"
  48 #include "xfs_ialloc_btree.h"
  49 #include "xfs_btree.h"
  50 #include "xfs_imap.h"
  51 #include "xfs_alloc.h"
  52 #include "xfs_ialloc.h"
  53 #include "xfs_attr_sf.h"
  54 #include "xfs_dir_sf.h"
  55 #include "xfs_dir2_sf.h"
  56 #include "xfs_dinode.h"
  57 #include "xfs_inode_item.h"
  58 #include "xfs_inode.h"
  59 #include "xfs_bmap.h"
  60 #include "xfs_buf_item.h"
  61 #include "xfs_rw.h"
  62 #include "xfs_error.h"
  63 #include "xfs_bit.h"
  64 #include "xfs_utils.h"
  65 #include "xfs_dir2_trace.h"
  66 #include "xfs_quota.h"
  67 #include "xfs_mac.h"
  68 #include "xfs_acl.h"
  69
  70
  71 kmem_zone_t *xfs_ifork_zone;
  72 kmem_zone_t *xfs_inode_zone;
  73 kmem_zone_t *xfs_chashlist_zone;
  74
  75 /*
  76  * Used in xfs_itruncate().  This is the maximum number of extents
  77  * freed from a file in a single transaction.
  78  */
  79 #define XFS_ITRUNC_MAX_EXTENTS  2
  80
  81 STATIC int xfs_iflush_int(xfs_inode_t *, xfs_buf_t *);
  82 STATIC int xfs_iformat_local(xfs_inode_t *, xfs_dinode_t *, int, int);
  83 STATIC int xfs_iformat_extents(xfs_inode_t *, xfs_dinode_t *, int);
  84 STATIC int xfs_iformat_btree(xfs_inode_t *, xfs_dinode_t *, int);
  85
  86
  87 #ifdef DEBUG
  88 /*
  89  * Make sure that the extents in the given memory buffer
  90  * are valid.
  91  */
  92 STATIC void
  93 xfs_validate_extents(
  94         xfs_bmbt_rec_t          *ep,
  95         int                     nrecs,
  96         int                     disk,
  97         xfs_exntfmt_t           fmt)
  98 {
  99         xfs_bmbt_irec_t         irec;
 100         xfs_bmbt_rec_t          rec;
 101         int                     i;
 102
 103         for (i = 0; i < nrecs; i++) {
 104                 rec.l0 = get_unaligned((__uint64_t*)&ep->l0);
 105                 rec.l1 = get_unaligned((__uint64_t*)&ep->l1);
 106                 if (disk)
 107                         xfs_bmbt_disk_get_all(&rec, &irec);
 108                 else
 109                         xfs_bmbt_get_all(&rec, &irec);
 110                 if (fmt == XFS_EXTFMT_NOSTATE)
 111                         ASSERT(irec.br_state == XFS_EXT_NORM);
 112                 ep++;
 113         }
 114 }
 115 #else /* DEBUG */
 116 #define xfs_validate_extents(ep, nrecs, disk, fmt)
 117 #endif /* DEBUG */
 118
 119 /*
 120  * Check that none of the inode's in the buffer have a next
 121  * unlinked field of 0.
 122  */
 123 #if defined(DEBUG)
 124 void
 125 xfs_inobp_check(
 126         xfs_mount_t     *mp,
 127         xfs_buf_t       *bp)
 128 {
 129         int             i;
 130         int             j;
 131         xfs_dinode_t    *dip;
 132
 133         j = mp->m_inode_cluster_size >> mp->m_sb.sb_inodelog;
 134
 135         for (i = 0; i < j; i++) {
 136                 dip = (xfs_dinode_t *)xfs_buf_offset(bp,
 137                                         i * mp->m_sb.sb_inodesize);
 138                 if (INT_ISZERO(dip->di_next_unlinked, ARCH_CONVERT))  {
 139                         xfs_fs_cmn_err(CE_ALERT, mp,
 140                                 "Detected a bogus zero next_unlinked field in incore inode buffer 0x%p.  About to pop an ASSERT.",
 141                                 bp);
 142                         ASSERT(!INT_ISZERO(dip->di_next_unlinked, ARCH_CONVERT));
 143                 }
 144         }
 145 }
 146 #endif
 147
 148 /*
 149  * called from bwrite on xfs inode buffers
 150  */
 151 void
 152 xfs_inobp_bwcheck(xfs_buf_t *bp)
 153 {
 154         xfs_mount_t     *mp;
 155         int             i;
 156         int             j;
 157         xfs_dinode_t    *dip;
 158
 159         ASSERT(XFS_BUF_FSPRIVATE3(bp, void *) != NULL);
 160
 161         mp = XFS_BUF_FSPRIVATE3(bp, xfs_mount_t *);
 162
 163
 164         j = mp->m_inode_cluster_size >> mp->m_sb.sb_inodelog;
 165
 166         for (i = 0; i < j; i++)  {
 167                 dip = (xfs_dinode_t *) xfs_buf_offset(bp,
 168                                                 i * mp->m_sb.sb_inodesize);
 169                 if (INT_GET(dip->di_core.di_magic, ARCH_CONVERT) != XFS_DINODE_MAGIC) {
 170                         cmn_err(CE_WARN,
 171 "Bad magic # 0x%x in XFS inode buffer 0x%Lx, starting blockno %Ld, offset 0x%x",
 172                                 INT_GET(dip->di_core.di_magic, ARCH_CONVERT),
 173                                 (__uint64_t)(__psunsigned_t) bp,
 174                                 (__int64_t) XFS_BUF_ADDR(bp),
 175                                 xfs_buf_offset(bp, i * mp->m_sb.sb_inodesize));
 176                         xfs_fs_cmn_err(CE_WARN, mp,
 177                                 "corrupt, unmount and run xfs_repair");
 178                 }
 179                 if (INT_ISZERO(dip->di_next_unlinked, ARCH_CONVERT))  {
 180                         cmn_err(CE_WARN,
 181 "Bad next_unlinked field (0) in XFS inode buffer 0x%p, starting blockno %Ld, offset 0x%x",
 182                                 (__uint64_t)(__psunsigned_t) bp,
 183                                 (__int64_t) XFS_BUF_ADDR(bp),
 184                                 xfs_buf_offset(bp, i * mp->m_sb.sb_inodesize));
 185                         xfs_fs_cmn_err(CE_WARN, mp,
 186                                 "corrupt, unmount and run xfs_repair");
 187                 }
 188         }
 189
 190         return;
 191 }
 192
 193 /*
 194  * This routine is called to map an inode number within a file
 195  * system to the buffer containing the on-disk version of the
 196  * inode.  It returns a pointer to the buffer containing the
 197  * on-disk inode in the bpp parameter, and in the dip parameter
 198  * it returns a pointer to the on-disk inode within that buffer.
 199  *
 200  * If a non-zero error is returned, then the contents of bpp and
 201  * dipp are undefined.
 202  *
 203  * Use xfs_imap() to determine the size and location of the
 204  * buffer to read from disk.
 205  */
 206 int
 207 xfs_inotobp(
 208         xfs_mount_t     *mp,
 209         xfs_trans_t     *tp,
 210         xfs_ino_t       ino,
 211         xfs_dinode_t    **dipp,
 212         xfs_buf_t       **bpp,
 213         int             *offset)
 214 {
 215         int             di_ok;
 216         xfs_imap_t      imap;
 217         xfs_buf_t       *bp;
 218         int             error;
 219         xfs_dinode_t    *dip;
 220
 221         /*
 222          * Call the space managment code to find the location of the
 223          * inode on disk.
 224          */
 225         imap.im_blkno = 0;
 226         error = xfs_imap(mp, tp, ino, &imap, XFS_IMAP_LOOKUP);
 227         if (error != 0) {
 228                 cmn_err(CE_WARN,
 229         "xfs_inotobp: xfs_imap()  returned an "
 230         "error %d on %s.  Returning error.", error, mp->m_fsname);
 231                 return error;
 232         }
 233
 234         /*
 235          * If the inode number maps to a block outside the bounds of the
 236          * file system then return NULL rather than calling read_buf
 237          * and panicing when we get an error from the driver.
 238          */
 239         if ((imap.im_blkno + imap.im_len) >
 240             XFS_FSB_TO_BB(mp, mp->m_sb.sb_dblocks)) {
 241                 cmn_err(CE_WARN,
 242         "xfs_inotobp: inode number (%d + %d) maps to a block outside the bounds "
 243         "of the file system %s.  Returning EINVAL.",
 244                         imap.im_blkno, imap.im_len,mp->m_fsname);
 245                 return XFS_ERROR(EINVAL);
 246         }
 247
 248         /*
 249          * Read in the buffer.  If tp is NULL, xfs_trans_read_buf() will
 250          * default to just a read_buf() call.
 251          */
 252         error = xfs_trans_read_buf(mp, tp, mp->m_ddev_targp, imap.im_blkno,
 253                                    (int)imap.im_len, XFS_BUF_LOCK, &bp);
 254
 255         if (error) {
 256                 cmn_err(CE_WARN,
 257         "xfs_inotobp: xfs_trans_read_buf()  returned an "
 258         "error %d on %s.  Returning error.", error, mp->m_fsname);
 259                 return error;
 260         }
 261         dip = (xfs_dinode_t *)xfs_buf_offset(bp, 0);
 262         di_ok =
 263                 INT_GET(dip->di_core.di_magic, ARCH_CONVERT) == XFS_DINODE_MAGIC &&
 264                 XFS_DINODE_GOOD_VERSION(INT_GET(dip->di_core.di_version, ARCH_CONVERT));
 265         if (unlikely(XFS_TEST_ERROR(!di_ok, mp, XFS_ERRTAG_ITOBP_INOTOBP,
 266                         XFS_RANDOM_ITOBP_INOTOBP))) {
 267                 XFS_CORRUPTION_ERROR("xfs_inotobp", XFS_ERRLEVEL_LOW, mp, dip);
 268                 xfs_trans_brelse(tp, bp);
 269                 cmn_err(CE_WARN,
 270         "xfs_inotobp: XFS_TEST_ERROR()  returned an "
 271         "error on %s.  Returning EFSCORRUPTED.",  mp->m_fsname);
 272                 return XFS_ERROR(EFSCORRUPTED);
 273         }
 274
 275         xfs_inobp_check(mp, bp);
 276
 277         /*
 278          * Set *dipp to point to the on-disk inode in the buffer.
 279          */
 280         *dipp = (xfs_dinode_t *)xfs_buf_offset(bp, imap.im_boffset);
 281         *bpp = bp;
 282         *offset = imap.im_boffset;
 283         return 0;
 284 }
 285
 286
 287 /*
 288  * This routine is called to map an inode to the buffer containing
 289  * the on-disk version of the inode.  It returns a pointer to the
 290  * buffer containing the on-disk inode in the bpp parameter, and in
 291  * the dip parameter it returns a pointer to the on-disk inode within
 292  * that buffer.
 293  *
 294  * If a non-zero error is returned, then the contents of bpp and
 295  * dipp are undefined.
 296  *
 297  * If the inode is new and has not yet been initialized, use xfs_imap()
 298  * to determine the size and location of the buffer to read from disk.
 299  * If the inode has already been mapped to its buffer and read in once,
 300  * then use the mapping information stored in the inode rather than
 301  * calling xfs_imap().  This allows us to avoid the overhead of looking
 302  * at the inode btree for small block file systems (see xfs_dilocate()).
 303  * We can tell whether the inode has been mapped in before by comparing
 304  * its disk block address to 0.  Only uninitialized inodes will have
 305  * 0 for the disk block address.
 306  */
 307 int
 308 xfs_itobp(
 309         xfs_mount_t     *mp,
 310         xfs_trans_t     *tp,
 311         xfs_inode_t     *ip,
 312         xfs_dinode_t    **dipp,
 313         xfs_buf_t       **bpp,
 314         xfs_daddr_t     bno)
 315 {
 316         xfs_buf_t       *bp;
 317         int             error;
 318         xfs_imap_t      imap;
 319 #ifdef __KERNEL__
 320         int             i;
 321         int             ni;
 322 #endif
 323
 324         if (ip->i_blkno == (xfs_daddr_t)0) {
 325                 /*
 326                  * Call the space management code to find the location of the
 327                  * inode on disk.
 328                  */
 329                 imap.im_blkno = bno;
 330                 error = xfs_imap(mp, tp, ip->i_ino, &imap, XFS_IMAP_LOOKUP);
 331                 if (error != 0) {
 332                         return error;
 333                 }
 334
 335                 /*
 336                  * If the inode number maps to a block outside the bounds
 337                  * of the file system then return NULL rather than calling
 338                  * read_buf and panicing when we get an error from the
 339                  * driver.
 340                  */
 341                 if ((imap.im_blkno + imap.im_len) >
 342                     XFS_FSB_TO_BB(mp, mp->m_sb.sb_dblocks)) {
 343 #ifdef DEBUG
 344                         xfs_fs_cmn_err(CE_ALERT, mp, "xfs_itobp: "
 345                                         "(imap.im_blkno (0x%llx) "
 346                                         "+ imap.im_len (0x%llx)) > "
 347                                         " XFS_FSB_TO_BB(mp, "
 348                                         "mp->m_sb.sb_dblocks) (0x%llx)",
 349                                         (unsigned long long) imap.im_blkno,
 350                                         (unsigned long long) imap.im_len,
 351                                         XFS_FSB_TO_BB(mp, mp->m_sb.sb_dblocks));
 352 #endif /* DEBUG */
 353                         return XFS_ERROR(EINVAL);
 354                 }
 355
 356                 /*
 357                  * Fill in the fields in the inode that will be used to
 358                  * map the inode to its buffer from now on.
 359                  */
 360                 ip->i_blkno = imap.im_blkno;
 361                 ip->i_len = imap.im_len;
 362                 ip->i_boffset = imap.im_boffset;
 363         } else {
 364                 /*
 365                  * We've already mapped the inode once, so just use the
 366                  * mapping that we saved the first time.
 367                  */
 368                 imap.im_blkno = ip->i_blkno;
 369                 imap.im_len = ip->i_len;
 370                 imap.im_boffset = ip->i_boffset;
 371         }
 372         ASSERT(bno == 0 || bno == imap.im_blkno);
 373
 374         /*
 375          * Read in the buffer.  If tp is NULL, xfs_trans_read_buf() will
 376          * default to just a read_buf() call.
 377          */
 378         error = xfs_trans_read_buf(mp, tp, mp->m_ddev_targp, imap.im_blkno,
 379                                    (int)imap.im_len, XFS_BUF_LOCK, &bp);
 380
 381         if (error) {
 382 #ifdef DEBUG
 383                 xfs_fs_cmn_err(CE_ALERT, mp, "xfs_itobp: "
 384                                 "xfs_trans_read_buf() returned error %d, "
 385                                 "imap.im_blkno 0x%llx, imap.im_len 0x%llx",
 386                                 error, (unsigned long long) imap.im_blkno,
 387                                 (unsigned long long) imap.im_len);
 388 #endif /* DEBUG */
 389                 return error;
 390         }
 391 #ifdef __KERNEL__
 392         /*
 393          * Validate the magic number and version of every inode in the buffer
 394          * (if DEBUG kernel) or the first inode in the buffer, otherwise.
 395          */
 396 #ifdef DEBUG
 397         ni = BBTOB(imap.im_len) >> mp->m_sb.sb_inodelog;
 398 #else
 399         ni = 1;
 400 #endif
 401         for (i = 0; i < ni; i++) {
 402                 int             di_ok;
 403                 xfs_dinode_t    *dip;
 404
 405                 dip = (xfs_dinode_t *)xfs_buf_offset(bp,
 406                                         (i << mp->m_sb.sb_inodelog));
 407                 di_ok = INT_GET(dip->di_core.di_magic, ARCH_CONVERT) == XFS_DINODE_MAGIC &&
 408                             XFS_DINODE_GOOD_VERSION(INT_GET(dip->di_core.di_version, ARCH_CONVERT));
 409                 if (unlikely(XFS_TEST_ERROR(!di_ok, mp, XFS_ERRTAG_ITOBP_INOTOBP,
 410                                  XFS_RANDOM_ITOBP_INOTOBP))) {
 411 #ifdef DEBUG
 412                         prdev("bad inode magic/vsn daddr %lld #%d (magic=%x)",
 413                                 mp->m_ddev_targp,
 414                                 (unsigned long long)imap.im_blkno, i,
 415                                 INT_GET(dip->di_core.di_magic, ARCH_CONVERT));
 416 #endif
 417                         XFS_CORRUPTION_ERROR("xfs_itobp", XFS_ERRLEVEL_HIGH,
 418                                              mp, dip);
 419                         xfs_trans_brelse(tp, bp);
 420                         return XFS_ERROR(EFSCORRUPTED);
 421                 }
 422         }
 423 #endif  /* __KERNEL__ */
 424
 425         xfs_inobp_check(mp, bp);
 426
 427         /*
 428          * Mark the buffer as an inode buffer now that it looks good
 429          */
 430         XFS_BUF_SET_VTYPE(bp, B_FS_INO);
 431
 432         /*
 433          * Set *dipp to point to the on-disk inode in the buffer.
 434          */
 435         *dipp = (xfs_dinode_t *)xfs_buf_offset(bp, imap.im_boffset);
 436         *bpp = bp;
 437         return 0;
 438 }
 439
 440 /*
 441  * Move inode type and inode format specific information from the
 442  * on-disk inode to the in-core inode.  For fifos, devs, and sockets
 443  * this means set if_rdev to the proper value.  For files, directories,
 444  * and symlinks this means to bring in the in-line data or extent
 445  * pointers.  For a file in B-tree format, only the root is immediately
 446  * brought in-core.  The rest will be in-lined in if_extents when it
 447  * is first referenced (see xfs_iread_extents()).
 448  */
 449 STATIC int
 450 xfs_iformat(
 451         xfs_inode_t             *ip,
 452         xfs_dinode_t            *dip)
 453 {
 454         xfs_attr_shortform_t    *atp;
 455         int                     size;
 456         int                     error;
 457         xfs_fsize_t             di_size;
 458         ip->i_df.if_ext_max =
 459                 XFS_IFORK_DSIZE(ip) / (uint)sizeof(xfs_bmbt_rec_t);
 460         error = 0;
 461
 462         if (unlikely(
 463             INT_GET(dip->di_core.di_nextents, ARCH_CONVERT) +
 464                 INT_GET(dip->di_core.di_anextents, ARCH_CONVERT) >
 465             INT_GET(dip->di_core.di_nblocks, ARCH_CONVERT))) {
 466                 xfs_fs_cmn_err(CE_WARN, ip->i_mount,
 467                         "corrupt dinode %Lu, extent total = %d, nblocks = %Lu."
 468                         "  Unmount and run xfs_repair.",
 469                         (unsigned long long)ip->i_ino,
 470                         (int)(INT_GET(dip->di_core.di_nextents, ARCH_CONVERT)
 471                             + INT_GET(dip->di_core.di_anextents, ARCH_CONVERT)),
 472                         (unsigned long long)
 473                         INT_GET(dip->di_core.di_nblocks, ARCH_CONVERT));
 474                 XFS_CORRUPTION_ERROR("xfs_iformat(1)", XFS_ERRLEVEL_LOW,
 475                                      ip->i_mount, dip);
 476                 return XFS_ERROR(EFSCORRUPTED);
 477         }
 478
 479         if (unlikely(INT_GET(dip->di_core.di_forkoff, ARCH_CONVERT) > ip->i_mount->m_sb.sb_inodesize)) {
 480                 xfs_fs_cmn_err(CE_WARN, ip->i_mount,
 481                         "corrupt dinode %Lu, forkoff = 0x%x."
 482                         "  Unmount and run xfs_repair.",
 483                         (unsigned long long)ip->i_ino,
 484                         (int)(INT_GET(dip->di_core.di_forkoff, ARCH_CONVERT)));
 485                 XFS_CORRUPTION_ERROR("xfs_iformat(2)", XFS_ERRLEVEL_LOW,
 486                                      ip->i_mount, dip);
 487                 return XFS_ERROR(EFSCORRUPTED);
 488         }
 489
 490         switch (ip->i_d.di_mode & S_IFMT) {
 491         case S_IFIFO:
 492         case S_IFCHR:
 493         case S_IFBLK:
 494         case S_IFSOCK:
 495                 if (unlikely(INT_GET(dip->di_core.di_format, ARCH_CONVERT) != XFS_DINODE_FMT_DEV)) {
 496                         XFS_CORRUPTION_ERROR("xfs_iformat(3)", XFS_ERRLEVEL_LOW,
 497                                               ip->i_mount, dip);
 498                         return XFS_ERROR(EFSCORRUPTED);
 499                 }
 500                 ip->i_d.di_size = 0;
 501                 ip->i_df.if_u2.if_rdev = INT_GET(dip->di_u.di_dev, ARCH_CONVERT);
 502                 break;
 503
 504         case S_IFREG:
 505         case S_IFLNK:
 506         case S_IFDIR:
 507                 switch (INT_GET(dip->di_core.di_format, ARCH_CONVERT)) {
 508                 case XFS_DINODE_FMT_LOCAL:
 509                         /*
 510                          * no local regular files yet
 511                          */
 512                         if (unlikely((INT_GET(dip->di_core.di_mode, ARCH_CONVERT) & S_IFMT) == S_IFREG)) {
 513                                 xfs_fs_cmn_err(CE_WARN, ip->i_mount,
 514                                         "corrupt inode (local format for regular file) %Lu.  Unmount and run xfs_repair.",
 515                                         (unsigned long long) ip->i_ino);
 516                                 XFS_CORRUPTION_ERROR("xfs_iformat(4)",
 517                                                      XFS_ERRLEVEL_LOW,
 518                                                      ip->i_mount, dip);
 519                                 return XFS_ERROR(EFSCORRUPTED);
 520                         }
 521
 522                         di_size = INT_GET(dip->di_core.di_size, ARCH_CONVERT);
 523                         if (unlikely(di_size >
 524                             XFS_DFORK_DSIZE_ARCH(dip, ip->i_mount, ARCH_CONVERT))) {
 525                                 xfs_fs_cmn_err(CE_WARN, ip->i_mount,
 526                                         "corrupt inode %Lu (bad size %Ld for local inode).  Unmount and run xfs_repair.",
 527                                         (unsigned long long) ip->i_ino,
 528                                         (long long) di_size);
 529                                 XFS_CORRUPTION_ERROR("xfs_iformat(5)",
 530                                                      XFS_ERRLEVEL_LOW,
 531                                                      ip->i_mount, dip);
 532                                 return XFS_ERROR(EFSCORRUPTED);
 533                         }
 534
 535                         size = (int)di_size;
 536                         error = xfs_iformat_local(ip, dip, XFS_DATA_FORK, size);
 537                         break;
 538                 case XFS_DINODE_FMT_EXTENTS:
 539                         error = xfs_iformat_extents(ip, dip, XFS_DATA_FORK);
 540                         break;
 541                 case XFS_DINODE_FMT_BTREE:
 542                         error = xfs_iformat_btree(ip, dip, XFS_DATA_FORK);
 543                         break;
 544                 default:
 545                         XFS_ERROR_REPORT("xfs_iformat(6)", XFS_ERRLEVEL_LOW,
 546                                          ip->i_mount);
 547                         return XFS_ERROR(EFSCORRUPTED);
 548                 }
 549                 break;
 550
 551         default:
 552                 XFS_ERROR_REPORT("xfs_iformat(7)", XFS_ERRLEVEL_LOW, ip->i_mount);
 553                 return XFS_ERROR(EFSCORRUPTED);
 554         }
 555         if (error) {
 556                 return error;
 557         }
 558         if (!XFS_DFORK_Q_ARCH(dip, ARCH_CONVERT))
 559                 return 0;
 560         ASSERT(ip->i_afp == NULL);
 561         ip->i_afp = kmem_zone_zalloc(xfs_ifork_zone, KM_SLEEP);
 562         ip->i_afp->if_ext_max =
 563                 XFS_IFORK_ASIZE(ip) / (uint)sizeof(xfs_bmbt_rec_t);
 564         switch (INT_GET(dip->di_core.di_aformat, ARCH_CONVERT)) {
 565         case XFS_DINODE_FMT_LOCAL:
 566                 atp = (xfs_attr_shortform_t *)XFS_DFORK_APTR_ARCH(dip, ARCH_CONVERT);
 567                 size = (int)INT_GET(atp->hdr.totsize, ARCH_CONVERT);
 568                 error = xfs_iformat_local(ip, dip, XFS_ATTR_FORK, size);
 569                 break;
 570         case XFS_DINODE_FMT_EXTENTS:
 571                 error = xfs_iformat_extents(ip, dip, XFS_ATTR_FORK);
 572                 break;
 573         case XFS_DINODE_FMT_BTREE:
 574                 error = xfs_iformat_btree(ip, dip, XFS_ATTR_FORK);
 575                 break;
 576         default:
 577                 error = XFS_ERROR(EFSCORRUPTED);
 578                 break;
 579         }
 580         if (error) {
 581                 kmem_zone_free(xfs_ifork_zone, ip->i_afp);
 582                 ip->i_afp = NULL;
 583                 xfs_idestroy_fork(ip, XFS_DATA_FORK);
 584         }
 585         return error;
 586 }
 587
 588 /*
 589  * The file is in-lined in the on-disk inode.
 590  * If it fits into if_inline_data, then copy
 591  * it there, otherwise allocate a buffer for it
 592  * and copy the data there.  Either way, set
 593  * if_data to point at the data.
 594  * If we allocate a buffer for the data, make
 595  * sure that its size is a multiple of 4 and
 596  * record the real size in i_real_bytes.
 597  */
 598 STATIC int
 599 xfs_iformat_local(
 600         xfs_inode_t     *ip,
 601         xfs_dinode_t    *dip,
 602         int             whichfork,
 603         int             size)
 604 {
 605         xfs_ifork_t     *ifp;
 606         int             real_size;
 607
 608         /*
 609          * If the size is unreasonable, then something
 610          * is wrong and we just bail out rather than crash in
 611          * kmem_alloc() or memcpy() below.
 612          */
 613         if (unlikely(size > XFS_DFORK_SIZE_ARCH(dip, ip->i_mount, whichfork, ARCH_CONVERT))) {
 614                 xfs_fs_cmn_err(CE_WARN, ip->i_mount,
 615                         "corrupt inode %Lu (bad size %d for local fork, size = %d).  Unmount and run xfs_repair.",
 616                         (unsigned long long) ip->i_ino, size,
 617                         XFS_DFORK_SIZE_ARCH(dip, ip->i_mount, whichfork, ARCH_CONVERT));
 618                 XFS_CORRUPTION_ERROR("xfs_iformat_local", XFS_ERRLEVEL_LOW,
 619                                      ip->i_mount, dip);
 620                 return XFS_ERROR(EFSCORRUPTED);
 621         }
 622         ifp = XFS_IFORK_PTR(ip, whichfork);
 623         real_size = 0;
 624         if (size == 0)
 625                 ifp->if_u1.if_data = NULL;
 626         else if (size <= sizeof(ifp->if_u2.if_inline_data))
 627                 ifp->if_u1.if_data = ifp->if_u2.if_inline_data;
 628         else {
 629                 real_size = roundup(size, 4);
 630                 ifp->if_u1.if_data = kmem_alloc(real_size, KM_SLEEP);
 631         }
 632         ifp->if_bytes = size;
 633         ifp->if_real_bytes = real_size;
 634         if (size)
 635                 memcpy(ifp->if_u1.if_data,
 636                         XFS_DFORK_PTR_ARCH(dip, whichfork, ARCH_CONVERT), size);
 637         ifp->if_flags &= ~XFS_IFEXTENTS;
 638         ifp->if_flags |= XFS_IFINLINE;
 639         return 0;
 640 }
 641
 642 /*
 643  * The file consists of a set of extents all
 644  * of which fit into the on-disk inode.
 645  * If there are few enough extents to fit into
 646  * the if_inline_ext, then copy them there.
 647  * Otherwise allocate a buffer for them and copy
 648  * them into it.  Either way, set if_extents
 649  * to point at the extents.
 650  */
 651 STATIC int
 652 xfs_iformat_extents(
 653         xfs_inode_t     *ip,
 654         xfs_dinode_t    *dip,
 655         int             whichfork)
 656 {
 657         xfs_bmbt_rec_t  *ep, *dp;
 658         xfs_ifork_t     *ifp;
 659         int             nex;
 660         int             real_size;
 661         int             size;
 662         int             i;
 663
 664         ifp = XFS_IFORK_PTR(ip, whichfork);
 665         nex = XFS_DFORK_NEXTENTS_ARCH(dip, whichfork, ARCH_CONVERT);
 666         size = nex * (uint)sizeof(xfs_bmbt_rec_t);
 667
 668         /*
 669          * If the number of extents is unreasonable, then something
 670          * is wrong and we just bail out rather than crash in
 671          * kmem_alloc() or memcpy() below.
 672          */
 673         if (unlikely(size < 0 || size > XFS_DFORK_SIZE_ARCH(dip, ip->i_mount, whichfork, ARCH_CONVERT))) {
 674                 xfs_fs_cmn_err(CE_WARN, ip->i_mount,
 675                         "corrupt inode %Lu ((a)extents = %d).  Unmount and run xfs_repair.",
 676                         (unsigned long long) ip->i_ino, nex);
 677                 XFS_CORRUPTION_ERROR("xfs_iformat_extents(1)", XFS_ERRLEVEL_LOW,
 678                                      ip->i_mount, dip);
 679                 return XFS_ERROR(EFSCORRUPTED);
 680         }
 681
 682         real_size = 0;
 683         if (nex == 0)
 684                 ifp->if_u1.if_extents = NULL;
 685         else if (nex <= XFS_INLINE_EXTS)
 686                 ifp->if_u1.if_extents = ifp->if_u2.if_inline_ext;
 687         else {
 688                 ifp->if_u1.if_extents = kmem_alloc(size, KM_SLEEP);
 689                 ASSERT(ifp->if_u1.if_extents != NULL);
 690                 real_size = size;
 691         }
 692         ifp->if_bytes = size;
 693         ifp->if_real_bytes = real_size;
 694         if (size) {
 695                 dp = (xfs_bmbt_rec_t *)
 696                         XFS_DFORK_PTR_ARCH(dip, whichfork, ARCH_CONVERT);
 697                 xfs_validate_extents(dp, nex, 1, XFS_EXTFMT_INODE(ip));
 698                 ep = ifp->if_u1.if_extents;
 699                 for (i = 0; i < nex; i++, ep++, dp++) {
 700                         ep->l0 = INT_GET(get_unaligned((__uint64_t*)&dp->l0),
 701                                                                 ARCH_CONVERT);
 702                         ep->l1 = INT_GET(get_unaligned((__uint64_t*)&dp->l1),
 703                                                                 ARCH_CONVERT);
 704                 }
 705                 xfs_bmap_trace_exlist("xfs_iformat_extents", ip, nex,
 706                         whichfork);
 707                 if (whichfork != XFS_DATA_FORK ||
 708                         XFS_EXTFMT_INODE(ip) == XFS_EXTFMT_NOSTATE)
 709                                 if (unlikely(xfs_check_nostate_extents(
 710                                     ifp->if_u1.if_extents, nex))) {
 711                                         XFS_ERROR_REPORT("xfs_iformat_extents(2)",
 712                                                          XFS_ERRLEVEL_LOW,
 713                                                          ip->i_mount);
 714                                         return XFS_ERROR(EFSCORRUPTED);
 715                                 }
 716         }
 717         ifp->if_flags |= XFS_IFEXTENTS;
 718         return 0;
 719 }
 720
 721 /*
 722  * The file has too many extents to fit into
 723  * the inode, so they are in B-tree format.
 724  * Allocate a buffer for the root of the B-tree
 725  * and copy the root into it.  The i_extents
 726  * field will remain NULL until all of the
 727  * extents are read in (when they are needed).
 728  */
 729 STATIC int
 730 xfs_iformat_btree(
 731         xfs_inode_t             *ip,
 732         xfs_dinode_t            *dip,
 733         int                     whichfork)
 734 {
 735         xfs_bmdr_block_t        *dfp;
 736         xfs_ifork_t             *ifp;
 737         /* REFERENCED */
 738         int                     nrecs;
 739         int                     size;
 740
 741         ifp = XFS_IFORK_PTR(ip, whichfork);
 742         dfp = (xfs_bmdr_block_t *)XFS_DFORK_PTR_ARCH(dip, whichfork, ARCH_CONVERT);
 743         size = XFS_BMAP_BROOT_SPACE(dfp);
 744         nrecs = XFS_BMAP_BROOT_NUMRECS(dfp);
 745
 746         /*
 747          * blow out if -- fork has less extents than can fit in
 748          * fork (fork shouldn't be a btree format), root btree
 749          * block has more records than can fit into the fork,
 750          * or the number of extents is greater than the number of
 751          * blocks.
 752          */
 753         if (unlikely(XFS_IFORK_NEXTENTS(ip, whichfork) <= ifp->if_ext_max
 754             || XFS_BMDR_SPACE_CALC(nrecs) >
 755                         XFS_DFORK_SIZE_ARCH(dip, ip->i_mount, whichfork, ARCH_CONVERT)
 756             || XFS_IFORK_NEXTENTS(ip, whichfork) > ip->i_d.di_nblocks)) {
 757                 xfs_fs_cmn_err(CE_WARN, ip->i_mount,
 758                         "corrupt inode %Lu (btree).  Unmount and run xfs_repair.",
 759                         (unsigned long long) ip->i_ino);
 760                 XFS_ERROR_REPORT("xfs_iformat_btree", XFS_ERRLEVEL_LOW,
 761                                  ip->i_mount);
 762                 return XFS_ERROR(EFSCORRUPTED);
 763         }
 764
 765         ifp->if_broot_bytes = size;
 766         ifp->if_broot = kmem_alloc(size, KM_SLEEP);
 767         ASSERT(ifp->if_broot != NULL);
 768         /*
 769          * Copy and convert from the on-disk structure
 770          * to the in-memory structure.
 771          */
 772         xfs_bmdr_to_bmbt(dfp, XFS_DFORK_SIZE_ARCH(dip, ip->i_mount, whichfork, ARCH_CONVERT),
 773                 ifp->if_broot, size);
 774         ifp->if_flags &= ~XFS_IFEXTENTS;
 775         ifp->if_flags |= XFS_IFBROOT;
 776
 777         return 0;
 778 }
 779
 780 /*
 781  * xfs_xlate_dinode_core - translate an xfs_inode_core_t between ondisk
 782  * and native format
 783  *
 784  * buf  = on-disk representation
 785  * dip  = native representation
 786  * dir  = direction - +ve -> disk to native
 787  *                    -ve -> native to disk
 788  * arch = on-disk architecture
 789  */
 790 void
 791 xfs_xlate_dinode_core(
 792         xfs_caddr_t             buf,
 793         xfs_dinode_core_t       *dip,
 794         int                     dir,
 795         xfs_arch_t              arch)
 796 {
 797         xfs_dinode_core_t       *buf_core = (xfs_dinode_core_t *)buf;
 798         xfs_dinode_core_t       *mem_core = (xfs_dinode_core_t *)dip;
 799
 800         ASSERT(dir);
 801         if (arch == ARCH_NOCONVERT) {
 802                 if (dir > 0) {
 803                         memcpy((xfs_caddr_t)mem_core, (xfs_caddr_t)buf_core,
 804                                 sizeof(xfs_dinode_core_t));
 805                 } else {
 806                         memcpy((xfs_caddr_t)buf_core, (xfs_caddr_t)mem_core,
 807                                 sizeof(xfs_dinode_core_t));
 808                 }
 809                 return;
 810         }
 811
 812         INT_XLATE(buf_core->di_magic, mem_core->di_magic, dir, arch);
 813         INT_XLATE(buf_core->di_mode, mem_core->di_mode, dir, arch);
 814         INT_XLATE(buf_core->di_version, mem_core->di_version, dir, arch);
 815         INT_XLATE(buf_core->di_format, mem_core->di_format, dir, arch);
 816         INT_XLATE(buf_core->di_onlink, mem_core->di_onlink, dir, arch);
 817         INT_XLATE(buf_core->di_uid, mem_core->di_uid, dir, arch);
 818         INT_XLATE(buf_core->di_gid, mem_core->di_gid, dir, arch);
 819         INT_XLATE(buf_core->di_nlink, mem_core->di_nlink, dir, arch);
 820         INT_XLATE(buf_core->di_projid, mem_core->di_projid, dir, arch);
 821
 822         if (dir > 0) {
 823                 memcpy(mem_core->di_pad, buf_core->di_pad,
 824                         sizeof(buf_core->di_pad));
 825         } else {
 826                 memcpy(buf_core->di_pad, mem_core->di_pad,
 827                         sizeof(buf_core->di_pad));
 828         }
 829
 830         INT_XLATE(buf_core->di_flushiter, mem_core->di_flushiter, dir, arch);
 831
 832         INT_XLATE(buf_core->di_atime.t_sec, mem_core->di_atime.t_sec,
 833                         dir, arch);
 834         INT_XLATE(buf_core->di_atime.t_nsec, mem_core->di_atime.t_nsec,
 835                         dir, arch);
 836         INT_XLATE(buf_core->di_mtime.t_sec, mem_core->di_mtime.t_sec,
 837                         dir, arch);
 838         INT_XLATE(buf_core->di_mtime.t_nsec, mem_core->di_mtime.t_nsec,
 839                         dir, arch);
 840         INT_XLATE(buf_core->di_ctime.t_sec, mem_core->di_ctime.t_sec,
 841                         dir, arch);
 842         INT_XLATE(buf_core->di_ctime.t_nsec, mem_core->di_ctime.t_nsec,
 843                         dir, arch);
 844         INT_XLATE(buf_core->di_size, mem_core->di_size, dir, arch);
 845         INT_XLATE(buf_core->di_nblocks, mem_core->di_nblocks, dir, arch);
 846         INT_XLATE(buf_core->di_extsize, mem_core->di_extsize, dir, arch);
 847         INT_XLATE(buf_core->di_nextents, mem_core->di_nextents, dir, arch);
 848         INT_XLATE(buf_core->di_anextents, mem_core->di_anextents, dir, arch);
 849         INT_XLATE(buf_core->di_forkoff, mem_core->di_forkoff, dir, arch);
 850         INT_XLATE(buf_core->di_aformat, mem_core->di_aformat, dir, arch);
 851         INT_XLATE(buf_core->di_dmevmask, mem_core->di_dmevmask, dir, arch);
 852         INT_XLATE(buf_core->di_dmstate, mem_core->di_dmstate, dir, arch);
 853         INT_XLATE(buf_core->di_flags, mem_core->di_flags, dir, arch);
 854         INT_XLATE(buf_core->di_gen, mem_core->di_gen, dir, arch);
 855 }
 856
 857 uint
 858 xfs_dic2xflags(
 859         xfs_dinode_core_t       *dic,
 860         xfs_arch_t              arch)
 861 {
 862         __uint16_t              di_flags;
 863         uint                    flags;
 864
 865         di_flags = INT_GET(dic->di_flags, arch);
 866         flags = XFS_CFORK_Q_ARCH(dic, arch) ? XFS_XFLAG_HASATTR : 0;
 867         if (di_flags & XFS_DIFLAG_ANY) {
 868                 if (di_flags & XFS_DIFLAG_REALTIME)
 869                         flags |= XFS_XFLAG_REALTIME;
 870                 if (di_flags & XFS_DIFLAG_PREALLOC)
 871                         flags |= XFS_XFLAG_PREALLOC;
 872                 if (di_flags & XFS_DIFLAG_IMMUTABLE)
 873                         flags |= XFS_XFLAG_IMMUTABLE;
 874                 if (di_flags & XFS_DIFLAG_IUNLINK)
 875                         flags |= XFS_XFLAG_IUNLINK;
 876                 if (di_flags & XFS_DIFLAG_BARRIER)
 877                         flags |= XFS_XFLAG_BARRIER;
 878                 if (di_flags & XFS_DIFLAG_APPEND)
 879                         flags |= XFS_XFLAG_APPEND;
 880                 if (di_flags & XFS_DIFLAG_SYNC)
 881                         flags |= XFS_XFLAG_SYNC;
 882                 if (di_flags & XFS_DIFLAG_NOATIME)
 883                         flags |= XFS_XFLAG_NOATIME;
 884                 if (di_flags & XFS_DIFLAG_NODUMP)
 885                         flags |= XFS_XFLAG_NODUMP;
 886                 if (di_flags & XFS_DIFLAG_RTINHERIT)
 887                         flags |= XFS_XFLAG_RTINHERIT;
 888                 if (di_flags & XFS_DIFLAG_PROJINHERIT)
 889                         flags |= XFS_XFLAG_PROJINHERIT;
 890                 if (di_flags & XFS_DIFLAG_NOSYMLINKS)
 891                         flags |= XFS_XFLAG_NOSYMLINKS;
 892         }
 893         return flags;
 894 }
 895
 896 /*
 897  * Given a mount structure and an inode number, return a pointer
 898  * to a newly allocated in-core inode coresponding to the given
 899  * inode number.
 900  *
 901  * Initialize the inode's attributes and extent pointers if it
 902  * already has them (it will not if the inode has no links).
 903  */
 904 int
 905 xfs_iread(
 906         xfs_mount_t     *mp,
 907         xfs_trans_t     *tp,
 908         xfs_ino_t       ino,
 909         xfs_inode_t     **ipp,
 910         xfs_daddr_t     bno)
 911 {
 912         xfs_buf_t       *bp;
 913         xfs_dinode_t    *dip;
 914         xfs_inode_t     *ip;
 915         int             error;
 916
 917         ASSERT(xfs_inode_zone != NULL);
 918
 919         ip = kmem_zone_zalloc(xfs_inode_zone, KM_SLEEP);
 920         ip->i_ino = ino;
 921         ip->i_mount = mp;
 922
 923         /*
 924          * Get pointer's to the on-disk inode and the buffer containing it.
 925          * If the inode number refers to a block outside the file system
 926          * then xfs_itobp() will return NULL.  In this case we should
 927          * return NULL as well.  Set i_blkno to 0 so that xfs_itobp() will
 928          * know that this is a new incore inode.
 929          */
 930         error = xfs_itobp(mp, tp, ip, &dip, &bp, bno);
 931
 932         if (error != 0) {
 933                 kmem_zone_free(xfs_inode_zone, ip);
 934                 return error;
 935         }
 936
 937         /*
 938          * Initialize inode's trace buffers.
 939          * Do this before xfs_iformat in case it adds entries.
 940          */
 941 #ifdef XFS_BMAP_TRACE
 942         ip->i_xtrace = ktrace_alloc(XFS_BMAP_KTRACE_SIZE, KM_SLEEP);
 943 #endif
 944 #ifdef XFS_BMBT_TRACE
 945         ip->i_btrace = ktrace_alloc(XFS_BMBT_KTRACE_SIZE, KM_SLEEP);
 946 #endif
 947 #ifdef XFS_RW_TRACE
 948         ip->i_rwtrace = ktrace_alloc(XFS_RW_KTRACE_SIZE, KM_SLEEP);
 949 #endif
 950 #ifdef XFS_ILOCK_TRACE
 951         ip->i_lock_trace = ktrace_alloc(XFS_ILOCK_KTRACE_SIZE, KM_SLEEP);
 952 #endif
 953 #ifdef XFS_DIR2_TRACE
 954         ip->i_dir_trace = ktrace_alloc(XFS_DIR2_KTRACE_SIZE, KM_SLEEP);
 955 #endif
 956
 957         /*
 958          * If we got something that isn't an inode it means someone
 959          * (nfs or dmi) has a stale handle.
 960          */
 961         if (INT_GET(dip->di_core.di_magic, ARCH_CONVERT) != XFS_DINODE_MAGIC) {
 962                 kmem_zone_free(xfs_inode_zone, ip);
 963                 xfs_trans_brelse(tp, bp);
 964 #ifdef DEBUG
 965                 xfs_fs_cmn_err(CE_ALERT, mp, "xfs_iread: "
 966                                 "dip->di_core.di_magic (0x%x) != "
 967                                 "XFS_DINODE_MAGIC (0x%x)",
 968                                 INT_GET(dip->di_core.di_magic, ARCH_CONVERT),
 969                                 XFS_DINODE_MAGIC);
 970 #endif /* DEBUG */
 971                 return XFS_ERROR(EINVAL);
 972         }
 973
 974         /*
 975          * If the on-disk inode is already linked to a directory
 976          * entry, copy all of the inode into the in-core inode.
 977          * xfs_iformat() handles copying in the inode format
 978          * specific information.
 979          * Otherwise, just get the truly permanent information.
 980          */
 981         if (!INT_ISZERO(dip->di_core.di_mode, ARCH_CONVERT)) {
 982                 xfs_xlate_dinode_core((xfs_caddr_t)&dip->di_core,
 983                      &(ip->i_d), 1, ARCH_CONVERT);
 984                 error = xfs_iformat(ip, dip);
 985                 if (error)  {
 986                         kmem_zone_free(xfs_inode_zone, ip);
 987                         xfs_trans_brelse(tp, bp);
 988 #ifdef DEBUG
 989                         xfs_fs_cmn_err(CE_ALERT, mp, "xfs_iread: "
 990                                         "xfs_iformat() returned error %d",
 991                                         error);
 992 #endif /* DEBUG */
 993                         return error;
 994                 }
 995         } else {
 996                 ip->i_d.di_magic = INT_GET(dip->di_core.di_magic, ARCH_CONVERT);
 997                 ip->i_d.di_version = INT_GET(dip->di_core.di_version, ARCH_CONVERT);
 998                 ip->i_d.di_gen = INT_GET(dip->di_core.di_gen, ARCH_CONVERT);
 999                 ip->i_d.di_flushiter = INT_GET(dip->di_core.di_flushiter, ARCH_CONVERT);
1000                 /*
1001                  * Make sure to pull in the mode here as well in
1002                  * case the inode is released without being used.
1003                  * This ensures that xfs_inactive() will see that
1004                  * the inode is already free and not try to mess
1005                  * with the uninitialized part of it.
1006                  */
1007                 ip->i_d.di_mode = 0;
1008                 /*
1009                  * Initialize the per-fork minima and maxima for a new
1010                  * inode here.  xfs_iformat will do it for old inodes.
1011                  */
1012                 ip->i_df.if_ext_max =
1013                         XFS_IFORK_DSIZE(ip) / (uint)sizeof(xfs_bmbt_rec_t);
1014         }
1015
1016         INIT_LIST_HEAD(&ip->i_reclaim);
1017
1018         /*
1019          * The inode format changed when we moved the link count and
1020          * made it 32 bits long.  If this is an old format inode,
1021          * convert it in memory to look like a new one.  If it gets
1022          * flushed to disk we will convert back before flushing or
1023          * logging it.  We zero out the new projid field and the old link
1024          * count field.  We'll handle clearing the pad field (the remains
1025          * of the old uuid field) when we actually convert the inode to
1026          * the new format. We don't change the version number so that we
1027          * can distinguish this from a real new format inode.
1028          */
1029         if (ip->i_d.di_version == XFS_DINODE_VERSION_1) {
1030                 ip->i_d.di_nlink = ip->i_d.di_onlink;
1031                 ip->i_d.di_onlink = 0;
1032                 ip->i_d.di_projid = 0;
1033         }
1034
1035         ip->i_delayed_blks = 0;
1036
1037         /*
1038          * Mark the buffer containing the inode as something to keep
1039          * around for a while.  This helps to keep recently accessed
1040          * meta-data in-core longer.
1041          */
1042          XFS_BUF_SET_REF(bp, XFS_INO_REF);
1043
1044         /*
1045          * Use xfs_trans_brelse() to release the buffer containing the
1046          * on-disk inode, because it was acquired with xfs_trans_read_buf()
1047          * in xfs_itobp() above.  If tp is NULL, this is just a normal
1048          * brelse().  If we're within a transaction, then xfs_trans_brelse()
1049          * will only release the buffer if it is not dirty within the
1050          * transaction.  It will be OK to release the buffer in this case,
1051          * because inodes on disk are never destroyed and we will be
1052          * locking the new in-core inode before putting it in the hash
1053          * table where other processes can find it.  Thus we don't have
1054          * to worry about the inode being changed just because we released
1055          * the buffer.
1056          */
1057         xfs_trans_brelse(tp, bp);
1058         *ipp = ip;
1059         return 0;
1060 }
1061
1062 /*
1063  * Read in extents from a btree-format inode.
1064  * Allocate and fill in if_extents.  Real work is done in xfs_bmap.c.
1065  */
1066 int
1067 xfs_iread_extents(
1068         xfs_trans_t     *tp,
1069         xfs_inode_t     *ip,
1070         int             whichfork)
1071 {
1072         int             error;
1073         xfs_ifork_t     *ifp;
1074         size_t          size;
1075
1076         if (unlikely(XFS_IFORK_FORMAT(ip, whichfork) != XFS_DINODE_FMT_BTREE)) {
1077                 XFS_ERROR_REPORT("xfs_iread_extents", XFS_ERRLEVEL_LOW,
1078                                  ip->i_mount);
1079                 return XFS_ERROR(EFSCORRUPTED);
1080         }
1081         size = XFS_IFORK_NEXTENTS(ip, whichfork) * (uint)sizeof(xfs_bmbt_rec_t);
1082         ifp = XFS_IFORK_PTR(ip, whichfork);
1083         /*
1084          * We know that the size is valid (it's checked in iformat_btree)
1085          */
1086         ifp->if_u1.if_extents = kmem_alloc(size, KM_SLEEP);
1087         ASSERT(ifp->if_u1.if_extents != NULL);
1088         ifp->if_lastex = NULLEXTNUM;
1089         ifp->if_bytes = ifp->if_real_bytes = (int)size;
1090         ifp->if_flags |= XFS_IFEXTENTS;
1091         error = xfs_bmap_read_extents(tp, ip, whichfork);
1092         if (error) {
1093                 kmem_free(ifp->if_u1.if_extents, size);
1094                 ifp->if_u1.if_extents = NULL;
1095                 ifp->if_bytes = ifp->if_real_bytes = 0;
1096                 ifp->if_flags &= ~XFS_IFEXTENTS;
1097                 return error;
1098         }
1099         xfs_validate_extents((xfs_bmbt_rec_t *)ifp->if_u1.if_extents,
1100                 XFS_IFORK_NEXTENTS(ip, whichfork), 0, XFS_EXTFMT_INODE(ip));
1101         return 0;
1102 }
1103
1104 /*
1105  * Allocate an inode on disk and return a copy of its in-core version.
1106  * The in-core inode is locked exclusively.  Set mode, nlink, and rdev
1107  * appropriately within the inode.  The uid and gid for the inode are
1108  * set according to the contents of the given cred structure.
1109  *
1110  * Use xfs_dialloc() to allocate the on-disk inode. If xfs_dialloc()
1111  * has a free inode available, call xfs_iget()
1112  * to obtain the in-core version of the allocated inode.  Finally,
1113  * fill in the inode and log its initial contents.  In this case,
1114  * ialloc_context would be set to NULL and call_again set to false.
1115  *
1116  * If xfs_dialloc() does not have an available inode,
1117  * it will replenish its supply by doing an allocation. Since we can
1118  * only do one allocation within a transaction without deadlocks, we
1119  * must commit the current transaction before returning the inode itself.
1120  * In this case, therefore, we will set call_again to true and return.
1121  * The caller should then commit the current transaction, start a new
1122  * transaction, and call xfs_ialloc() again to actually get the inode.
1123  *
1124  * To ensure that some other process does not grab the inode that
1125  * was allocated during the first call to xfs_ialloc(), this routine
1126  * also returns the [locked] bp pointing to the head of the freelist
1127  * as ialloc_context.  The caller should hold this buffer across
1128  * the commit and pass it back into this routine on the second call.
1129  */
1130 int
1131 xfs_ialloc(
1132         xfs_trans_t     *tp,
1133         xfs_inode_t     *pip,
1134         mode_t          mode,
1135         nlink_t         nlink,
1136         xfs_dev_t       rdev,
1137         cred_t          *cr,
1138         xfs_prid_t      prid,
1139         int             okalloc,
1140         xfs_buf_t       **ialloc_context,
1141         boolean_t       *call_again,
1142         xfs_inode_t     **ipp)
1143 {
1144         xfs_ino_t       ino;
1145         xfs_inode_t     *ip;
1146         vnode_t         *vp;
1147         uint            flags;
1148         int             error;
1149
1150         /*
1151          * Call the space management code to pick
1152          * the on-disk inode to be allocated.
1153          */
1154         error = xfs_dialloc(tp, pip->i_ino, mode, okalloc,
1155                             ialloc_context, call_again, &ino);
1156         if (error != 0) {
1157                 return error;
1158         }
1159         if (*call_again || ino == NULLFSINO) {
1160                 *ipp = NULL;
1161                 return 0;
1162         }
1163         ASSERT(*ialloc_context == NULL);
1164
1165         /*
1166          * Get the in-core inode with the lock held exclusively.
1167          * This is because we're setting fields here we need
1168          * to prevent others from looking at until we're done.
1169          */
1170         error = xfs_trans_iget(tp->t_mountp, tp, ino, XFS_ILOCK_EXCL, &ip);
1171         if (error != 0) {
1172                 return error;
1173         }
1174         ASSERT(ip != NULL);
1175
1176         vp = XFS_ITOV(ip);
1177         vp->v_type = IFTOVT(mode);
1178         ip->i_d.di_mode = (__uint16_t)mode;
1179         ip->i_d.di_onlink = 0;
1180         ip->i_d.di_nlink = nlink;
1181         ASSERT(ip->i_d.di_nlink == nlink);
1182         ip->i_d.di_uid = current_fsuid(cr);
1183         ip->i_d.di_gid = current_fsgid(cr);
1184         ip->i_d.di_projid = prid;
1185         memset(&(ip->i_d.di_pad[0]), 0, sizeof(ip->i_d.di_pad));
1186
1187         /*
1188          * If the superblock version is up to where we support new format
1189          * inodes and this is currently an old format inode, then change
1190          * the inode version number now.  This way we only do the conversion
1191          * here rather than here and in the flush/logging code.
1192          */
1193         if (XFS_SB_VERSION_HASNLINK(&tp->t_mountp->m_sb) &&
1194             ip->i_d.di_version == XFS_DINODE_VERSION_1) {
1195                 ip->i_d.di_version = XFS_DINODE_VERSION_2;
1196                 /*
1197                  * We've already zeroed the old link count, the projid field,
1198                  * and the pad field.
1199                  */
1200         }
1201
1202         /*
1203          * Project ids won't be stored on disk if we are using a version 1 inode.
1204          */
1205         if ( (prid != 0) && (ip->i_d.di_version == XFS_DINODE_VERSION_1))
1206                 xfs_bump_ino_vers2(tp, ip);
1207
1208         if (XFS_INHERIT_GID(pip, vp->v_vfsp)) {
1209                 ip->i_d.di_gid = pip->i_d.di_gid;
1210                 if ((pip->i_d.di_mode & S_ISGID) && (mode & S_IFMT) == S_IFDIR) {
1211                         ip->i_d.di_mode |= S_ISGID;
1212                 }
1213         }
1214
1215         /*
1216          * If the group ID of the new file does not match the effective group
1217          * ID or one of the supplementary group IDs, the S_ISGID bit is cleared
1218          * (and only if the irix_sgid_inherit compatibility variable is set).
1219          */
1220         if ((irix_sgid_inherit) &&
1221             (ip->i_d.di_mode & S_ISGID) &&
1222             (!in_group_p((gid_t)ip->i_d.di_gid))) {
1223                 ip->i_d.di_mode &= ~S_ISGID;
1224         }
1225
1226         ip->i_d.di_size = 0;
1227         ip->i_d.di_nextents = 0;
1228         ASSERT(ip->i_d.di_nblocks == 0);
1229         xfs_ichgtime(ip, XFS_ICHGTIME_CHG|XFS_ICHGTIME_ACC|XFS_ICHGTIME_MOD);
1230         /*
1231          * di_gen will have been taken care of in xfs_iread.
1232          */
1233         ip->i_d.di_extsize = 0;
1234         ip->i_d.di_dmevmask = 0;
1235         ip->i_d.di_dmstate = 0;
1236         ip->i_d.di_flags = 0;
1237         flags = XFS_ILOG_CORE;
1238         switch (mode & S_IFMT) {
1239         case S_IFIFO:
1240         case S_IFCHR:
1241         case S_IFBLK:
1242         case S_IFSOCK:
1243                 ip->i_d.di_format = XFS_DINODE_FMT_DEV;
1244                 ip->i_df.if_u2.if_rdev = rdev;
1245                 ip->i_df.if_flags = 0;
1246                 flags |= XFS_ILOG_DEV;
1247                 break;
1248         case S_IFREG:
1249         case S_IFDIR:
1250                 if (unlikely(pip->i_d.di_flags & XFS_DIFLAG_ANY)) {
1251                         if (pip->i_d.di_flags & XFS_DIFLAG_RTINHERIT) {
1252                                 if ((mode & S_IFMT) == S_IFDIR) {
1253                                         ip->i_d.di_flags |= XFS_DIFLAG_RTINHERIT;
1254                                 } else {
1255                                         ip->i_d.di_flags |= XFS_DIFLAG_REALTIME;
1256                                         ip->i_iocore.io_flags |= XFS_IOCORE_RT;
1257                                 }
1258                         }
1259                         if ((pip->i_d.di_flags & XFS_DIFLAG_NOATIME) &&
1260                             xfs_inherit_noatime)
1261                                 ip->i_d.di_flags |= XFS_DIFLAG_NOATIME;
1262                         if ((pip->i_d.di_flags & XFS_DIFLAG_NODUMP) &&
1263                             xfs_inherit_nodump)
1264                                 ip->i_d.di_flags |= XFS_DIFLAG_NODUMP;
1265                         if ((pip->i_d.di_flags & XFS_DIFLAG_SYNC) &&
1266                             xfs_inherit_sync)
1267                                 ip->i_d.di_flags |= XFS_DIFLAG_SYNC;
1268                         if ((pip->i_d.di_flags & XFS_DIFLAG_NOSYMLINKS) &&
1269                             xfs_inherit_nosymlinks)
1270                                 ip->i_d.di_flags |= XFS_DIFLAG_NOSYMLINKS;
1271                 }
1272                 /* FALLTHROUGH */
1273         case S_IFLNK:
1274                 ip->i_d.di_format = XFS_DINODE_FMT_EXTENTS;
1275                 ip->i_df.if_flags = XFS_IFEXTENTS;
1276                 ip->i_df.if_bytes = ip->i_df.if_real_bytes = 0;
1277                 ip->i_df.if_u1.if_extents = NULL;
1278                 break;
1279         default:
1280                 ASSERT(0);
1281         }
1282         /*
1283          * Attribute fork settings for new inode.
1284          */
1285         ip->i_d.di_aformat = XFS_DINODE_FMT_EXTENTS;
1286         ip->i_d.di_anextents = 0;
1287
1288         /*
1289          * Log the new values stuffed into the inode.
1290          */
1291         xfs_trans_log_inode(tp, ip, flags);
1292
1293         /* now that we have a v_type we can set Linux inode ops (& unlock) */
1294         VFS_INIT_VNODE(XFS_MTOVFS(tp->t_mountp), vp, XFS_ITOBHV(ip), 1);
1295
1296         *ipp = ip;
1297         return 0;
1298 }
1299
1300 /*
1301  * Check to make sure that there are no blocks allocated to the
1302  * file beyond the size of the file.  We don't check this for
1303  * files with fixed size extents or real time extents, but we
1304  * at least do it for regular files.
1305  */
1306 #ifdef DEBUG
1307 void
1308 xfs_isize_check(
1309         xfs_mount_t     *mp,
1310         xfs_inode_t     *ip,
1311         xfs_fsize_t     isize)
1312 {
1313         xfs_fileoff_t   map_first;
1314         int             nimaps;
1315         xfs_bmbt_irec_t imaps[2];
1316
1317         if ((ip->i_d.di_mode & S_IFMT) != S_IFREG)
1318                 return;
1319
1320         if ( ip->i_d.di_flags & XFS_DIFLAG_REALTIME )
1321                 return;
1322
1323         nimaps = 2;
1324         map_first = XFS_B_TO_FSB(mp, (xfs_ufsize_t)isize);
1325         /*
1326          * The filesystem could be shutting down, so bmapi may return
1327          * an error.
1328          */
1329         if (xfs_bmapi(NULL, ip, map_first,
1330                          (XFS_B_TO_FSB(mp,
1331                                        (xfs_ufsize_t)XFS_MAXIOFFSET(mp)) -
1332                           map_first),
1333                          XFS_BMAPI_ENTIRE, NULL, 0, imaps, &nimaps,
1334                          NULL))
1335             return;
1336         ASSERT(nimaps == 1);
1337         ASSERT(imaps[0].br_startblock == HOLESTARTBLOCK);
1338 }
1339 #endif  /* DEBUG */
1340
1341 /*
1342  * Calculate the last possible buffered byte in a file.  This must
1343  * include data that was buffered beyond the EOF by the write code.
1344  * This also needs to deal with overflowing the xfs_fsize_t type
1345  * which can happen for sizes near the limit.
1346  *
1347  * We also need to take into account any blocks beyond the EOF.  It
1348  * may be the case that they were buffered by a write which failed.
1349  * In that case the pages will still be in memory, but the inode size
1350  * will never have been updated.
1351  */
1352 xfs_fsize_t
1353 xfs_file_last_byte(
1354         xfs_inode_t     *ip)
1355 {
1356         xfs_mount_t     *mp;
1357         xfs_fsize_t     last_byte;
1358         xfs_fileoff_t   last_block;
1359         xfs_fileoff_t   size_last_block;
1360         int             error;
1361
1362         ASSERT(ismrlocked(&(ip->i_iolock), MR_UPDATE | MR_ACCESS));
1363
1364         mp = ip->i_mount;
1365         /*
1366          * Only check for blocks beyond the EOF if the extents have
1367          * been read in.  This eliminates the need for the inode lock,
1368          * and it also saves us from looking when it really isn't
1369          * necessary.
1370          */
1371         if (ip->i_df.if_flags & XFS_IFEXTENTS) {
1372                 error = xfs_bmap_last_offset(NULL, ip, &last_block,
1373                         XFS_DATA_FORK);
1374                 if (error) {
1375                         last_block = 0;
1376                 }
1377         } else {
1378                 last_block = 0;
1379         }
1380         size_last_block = XFS_B_TO_FSB(mp, (xfs_ufsize_t)ip->i_d.di_size);
1381         last_block = XFS_FILEOFF_MAX(last_block, size_last_block);
1382
1383         last_byte = XFS_FSB_TO_B(mp, last_block);
1384         if (last_byte < 0) {
1385                 return XFS_MAXIOFFSET(mp);
1386         }
1387         last_byte += (1 << mp->m_writeio_log);
1388         if (last_byte < 0) {
1389                 return XFS_MAXIOFFSET(mp);
1390         }
1391         return last_byte;
1392 }
1393
1394 #if defined(XFS_RW_TRACE)
1395 STATIC void
1396 xfs_itrunc_trace(
1397         int             tag,
1398         xfs_inode_t     *ip,
1399         int             flag,
1400         xfs_fsize_t     new_size,
1401         xfs_off_t       toss_start,
1402         xfs_off_t       toss_finish)
1403 {
1404         if (ip->i_rwtrace == NULL) {
1405                 return;
1406         }
1407
1408         ktrace_enter(ip->i_rwtrace,
1409                      (void*)((long)tag),
1410                      (void*)ip,
1411                      (void*)(unsigned long)((ip->i_d.di_size >> 32) & 0xffffffff),
1412                      (void*)(unsigned long)(ip->i_d.di_size & 0xffffffff),
1413                      (void*)((long)flag),
1414                      (void*)(unsigned long)((new_size >> 32) & 0xffffffff),
1415                      (void*)(unsigned long)(new_size & 0xffffffff),
1416                      (void*)(unsigned long)((toss_start >> 32) & 0xffffffff),
1417                      (void*)(unsigned long)(toss_start & 0xffffffff),
1418                      (void*)(unsigned long)((toss_finish >> 32) & 0xffffffff),
1419                      (void*)(unsigned long)(toss_finish & 0xffffffff),
1420                      (void*)(unsigned long)current_cpu(),
1421                      (void*)0,
1422                      (void*)0,
1423                      (void*)0,
1424                      (void*)0);
1425 }
1426 #else
1427 #define xfs_itrunc_trace(tag, ip, flag, new_size, toss_start, toss_finish)
1428 #endif
1429
1430 /*
1431  * Start the truncation of the file to new_size.  The new size
1432  * must be smaller than the current size.  This routine will
1433  * clear the buffer and page caches of file data in the removed
1434  * range, and xfs_itruncate_finish() will remove the underlying
1435  * disk blocks.
1436  *
1437  * The inode must have its I/O lock locked EXCLUSIVELY, and it
1438  * must NOT have the inode lock held at all.  This is because we're
1439  * calling into the buffer/page cache code and we can't hold the
1440  * inode lock when we do so.
1441  *
1442  * The flags parameter can have either the value XFS_ITRUNC_DEFINITE
1443  * or XFS_ITRUNC_MAYBE.  The XFS_ITRUNC_MAYBE value should be used
1444  * in the case that the caller is locking things out of order and
1445  * may not be able to call xfs_itruncate_finish() with the inode lock
1446  * held without dropping the I/O lock.  If the caller must drop the
1447  * I/O lock before calling xfs_itruncate_finish(), then xfs_itruncate_start()
1448  * must be called again with all the same restrictions as the initial
1449  * call.
1450  */
1451 void
1452 xfs_itruncate_start(
1453         xfs_inode_t     *ip,
1454         uint            flags,
1455         xfs_fsize_t     new_size)
1456 {
1457         xfs_fsize_t     last_byte;
1458         xfs_off_t       toss_start;
1459         xfs_mount_t     *mp;
1460         vnode_t         *vp;
1461
1462         ASSERT(ismrlocked(&ip->i_iolock, MR_UPDATE) != 0);
1463         ASSERT((new_size == 0) || (new_size <= ip->i_d.di_size));
1464         ASSERT((flags == XFS_ITRUNC_DEFINITE) ||
1465                (flags == XFS_ITRUNC_MAYBE));
1466
1467         mp = ip->i_mount;
1468         vp = XFS_ITOV(ip);
1469         /*
1470          * Call VOP_TOSS_PAGES() or VOP_FLUSHINVAL_PAGES() to get rid of pages and buffers
1471          * overlapping the region being removed.  We have to use
1472          * the less efficient VOP_FLUSHINVAL_PAGES() in the case that the
1473          * caller may not be able to finish the truncate without
1474          * dropping the inode's I/O lock.  Make sure
1475          * to catch any pages brought in by buffers overlapping
1476          * the EOF by searching out beyond the isize by our
1477          * block size. We round new_size up to a block boundary
1478          * so that we don't toss things on the same block as
1479          * new_size but before it.
1480          *
1481          * Before calling VOP_TOSS_PAGES() or VOP_FLUSHINVAL_PAGES(), make sure to
1482          * call remapf() over the same region if the file is mapped.
1483          * This frees up mapped file references to the pages in the
1484          * given range and for the VOP_FLUSHINVAL_PAGES() case it ensures
1485          * that we get the latest mapped changes flushed out.
1486          */
1487         toss_start = XFS_B_TO_FSB(mp, (xfs_ufsize_t)new_size);
1488         toss_start = XFS_FSB_TO_B(mp, toss_start);
1489         if (toss_start < 0) {
1490                 /*
1491                  * The place to start tossing is beyond our maximum
1492                  * file size, so there is no way that the data extended
1493                  * out there.
1494                  */
1495                 return;
1496         }
1497         last_byte = xfs_file_last_byte(ip);
1498         xfs_itrunc_trace(XFS_ITRUNC_START, ip, flags, new_size, toss_start,
1499                          last_byte);
1500         if (last_byte > toss_start) {
1501                 if (flags & XFS_ITRUNC_DEFINITE) {
1502                         VOP_TOSS_PAGES(vp, toss_start, -1, FI_REMAPF_LOCKED);
1503                 } else {
1504                         VOP_FLUSHINVAL_PAGES(vp, toss_start, -1, FI_REMAPF_LOCKED);
1505                 }
1506         }
1507
1508 #ifdef DEBUG
1509         if (new_size == 0) {
1510                 ASSERT(VN_CACHED(vp) == 0);
1511         }
1512 #endif
1513 }
1514
1515 /*
1516  * Shrink the file to the given new_size.  The new
1517  * size must be smaller than the current size.
1518  * This will free up the underlying blocks
1519  * in the removed range after a call to xfs_itruncate_start()
1520  * or xfs_atruncate_start().
1521  *
1522  * The transaction passed to this routine must have made
1523  * a permanent log reservation of at least XFS_ITRUNCATE_LOG_RES.
1524  * This routine may commit the given transaction and
1525  * start new ones, so make sure everything involved in
1526  * the transaction is tidy before calling here.
1527  * Some transaction will be returned to the caller to be
1528  * committed.  The incoming transaction must already include
1529  * the inode, and both inode locks must be held exclusively.
1530  * The inode must also be "held" within the transaction.  On
1531  * return the inode will be "held" within the returned transaction.
1532  * This routine does NOT require any disk space to be reserved
1533  * for it within the transaction.
1534  *
1535  * The fork parameter must be either xfs_attr_fork or xfs_data_fork,
1536  * and it indicates the fork which is to be truncated.  For the
1537  * attribute fork we only support truncation to size 0.
1538  *
1539  * We use the sync parameter to indicate whether or not the first
1540  * transaction we perform might have to be synchronous.  For the attr fork,
1541  * it needs to be so if the unlink of the inode is not yet known to be
1542  * permanent in the log.  This keeps us from freeing and reusing the
1543  * blocks of the attribute fork before the unlink of the inode becomes
1544  * permanent.
1545  *
1546  * For the data fork, we normally have to run synchronously if we're
1547  * being called out of the inactive path or we're being called
1548  * out of the create path where we're truncating an existing file.
1549  * Either way, the truncate needs to be sync so blocks don't reappear
1550  * in the file with altered data in case of a crash.  wsync filesystems
1551  * can run the first case async because anything that shrinks the inode
1552  * has to run sync so by the time we're called here from inactive, the
1553  * inode size is permanently set to 0.
1554  *
1555  * Calls from the truncate path always need to be sync unless we're
1556  * in a wsync filesystem and the file has already been unlinked.
1557  *
1558  * The caller is responsible for correctly setting the sync parameter.
1559  * It gets too hard for us to guess here which path we're being called
1560  * out of just based on inode state.
1561  */
1562 int
1563 xfs_itruncate_finish(
1564         xfs_trans_t     **tp,
1565         xfs_inode_t     *ip,
1566         xfs_fsize_t     new_size,
1567         int             fork,
1568         int             sync)
1569 {
1570         xfs_fsblock_t   first_block;
1571         xfs_fileoff_t   first_unmap_block;
1572         xfs_fileoff_t   last_block;
1573         xfs_filblks_t   unmap_len=0;
1574         xfs_mount_t     *mp;
1575         xfs_trans_t     *ntp;
1576         int             done;
1577         int             committed;
1578         xfs_bmap_free_t free_list;
1579         int             error;
1580
1581         ASSERT(ismrlocked(&ip->i_iolock, MR_UPDATE) != 0);
1582         ASSERT(ismrlocked(&ip->i_lock, MR_UPDATE) != 0);
1583         ASSERT((new_size == 0) || (new_size <= ip->i_d.di_size));
1584         ASSERT(*tp != NULL);
1585         ASSERT((*tp)->t_flags & XFS_TRANS_PERM_LOG_RES);
1586         ASSERT(ip->i_transp == *tp);
1587         ASSERT(ip->i_itemp != NULL);
1588         ASSERT(ip->i_itemp->ili_flags & XFS_ILI_HOLD);
1589
1590
1591         ntp = *tp;
1592         mp = (ntp)->t_mountp;
1593         ASSERT(! XFS_NOT_DQATTACHED(mp, ip));
1594
1595         /*
1596          * We only support truncating the entire attribute fork.
1597          */
1598         if (fork == XFS_ATTR_FORK) {
1599                 new_size = 0LL;
1600         }
1601         first_unmap_block = XFS_B_TO_FSB(mp, (xfs_ufsize_t)new_size);
1602         xfs_itrunc_trace(XFS_ITRUNC_FINISH1, ip, 0, new_size, 0, 0);
1603         /*
1604          * The first thing we do is set the size to new_size permanently
1605          * on disk.  This way we don't have to worry about anyone ever
1606          * being able to look at the data being freed even in the face
1607          * of a crash.  What we're getting around here is the case where
1608          * we free a block, it is allocated to another file, it is written
1609          * to, and then we crash.  If the new data gets written to the
1610          * file but the log buffers containing the free and reallocation
1611          * don't, then we'd end up with garbage in the blocks being freed.
1612          * As long as we make the new_size permanent before actually
1613          * freeing any blocks it doesn't matter if they get writtten to.
1614          *
1615          * The callers must signal into us whether or not the size
1616          * setting here must be synchronous.  There are a few cases
1617          * where it doesn't have to be synchronous.  Those cases
1618          * occur if the file is unlinked and we know the unlink is
1619          * permanent or if the blocks being truncated are guaranteed
1620          * to be beyond the inode eof (regardless of the link count)
1621          * and the eof value is permanent.  Both of these cases occur
1622          * only on wsync-mounted filesystems.  In those cases, we're
1623          * guaranteed that no user will ever see the data in the blocks
1624          * that are being truncated so the truncate can run async.
1625          * In the free beyond eof case, the file may wind up with
1626          * more blocks allocated to it than it needs if we crash
1627          * and that won't get fixed until the next time the file
1628          * is re-opened and closed but that's ok as that shouldn't
1629          * be too many blocks.
1630          *
1631          * However, we can't just make all wsync xactions run async
1632          * because there's one call out of the create path that needs
1633          * to run sync where it's truncating an existing file to size
1634          * 0 whose size is > 0.
1635          *
1636          * It's probably possible to come up with a test in this
1637          * routine that would correctly distinguish all the above
1638          * cases from the values of the function parameters and the
1639          * inode state but for sanity's sake, I've decided to let the
1640          * layers above just tell us.  It's simpler to correctly figure
1641          * out in the layer above exactly under what conditions we
1642          * can run async and I think it's easier for others read and
1643          * follow the logic in case something has to be changed.
1644          * cscope is your friend -- rcc.
1645          *
1646          * The attribute fork is much simpler.
1647          *
1648          * For the attribute fork we allow the caller to tell us whether
1649          * the unlink of the inode that led to this call is yet permanent
1650          * in the on disk log.  If it is not and we will be freeing extents
1651          * in this inode then we make the first transaction synchronous
1652          * to make sure that the unlink is permanent by the time we free
1653          * the blocks.
1654          */
1655         if (fork == XFS_DATA_FORK) {
1656                 if (ip->i_d.di_nextents > 0) {
1657                         ip->i_d.di_size = new_size;
1658                         xfs_trans_log_inode(ntp, ip, XFS_ILOG_CORE);
1659                 }
1660         } else if (sync) {
1661                 ASSERT(!(mp->m_flags & XFS_MOUNT_WSYNC));
1662                 if (ip->i_d.di_anextents > 0)
1663                         xfs_trans_set_sync(ntp);
1664         }
1665         ASSERT(fork == XFS_DATA_FORK ||
1666                 (fork == XFS_ATTR_FORK &&
1667                         ((sync && !(mp->m_flags & XFS_MOUNT_WSYNC)) ||
1668                          (sync == 0 && (mp->m_flags & XFS_MOUNT_WSYNC)))));
1669
1670         /*
1671          * Since it is possible for space to become allocated beyond
1672          * the end of the file (in a crash where the space is allocated
1673          * but the inode size is not yet updated), simply remove any
1674          * blocks which show up between the new EOF and the maximum
1675          * possible file size.  If the first block to be removed is
1676          * beyond the maximum file size (ie it is the same as last_block),
1677          * then there is nothing to do.
1678          */
1679         last_block = XFS_B_TO_FSB(mp, (xfs_ufsize_t)XFS_MAXIOFFSET(mp));
1680         ASSERT(first_unmap_block <= last_block);
1681         done = 0;
1682         if (last_block == first_unmap_block) {
1683                 done = 1;
1684         } else {
1685                 unmap_len = last_block - first_unmap_block + 1;
1686         }
1687         while (!done) {
1688                 /*
1689                  * Free up up to XFS_ITRUNC_MAX_EXTENTS.  xfs_bunmapi()
1690                  * will tell us whether it freed the entire range or
1691                  * not.  If this is a synchronous mount (wsync),
1692                  * then we can tell bunmapi to keep all the
1693                  * transactions asynchronous since the unlink
1694                  * transaction that made this inode inactive has
1695                  * already hit the disk.  There's no danger of
1696                  * the freed blocks being reused, there being a
1697                  * crash, and the reused blocks suddenly reappearing
1698                  * in this file with garbage in them once recovery
1699                  * runs.
1700                  */
1701                 XFS_BMAP_INIT(&free_list, &first_block);
1702                 error = xfs_bunmapi(ntp, ip, first_unmap_block,
1703                                     unmap_len,
1704                                     XFS_BMAPI_AFLAG(fork) |
1705                                       (sync ? 0 : XFS_BMAPI_ASYNC),
1706                                     XFS_ITRUNC_MAX_EXTENTS,
1707                                     &first_block, &free_list, &done);
1708                 if (error) {
1709                         /*
1710                          * If the bunmapi call encounters an error,
1711                          * return to the caller where the transaction
1712                          * can be properly aborted.  We just need to
1713                          * make sure we're not holding any resources
1714                          * that we were not when we came in.
1715                          */
1716                         xfs_bmap_cancel(&free_list);
1717                         return error;
1718                 }
1719
1720                 /*
1721                  * Duplicate the transaction that has the permanent
1722                  * reservation and commit the old transaction.
1723                  */
1724                 error = xfs_bmap_finish(tp, &free_list, first_block,
1725                                         &committed);
1726                 ntp = *tp;
1727                 if (error) {
1728                         /*
1729                          * If the bmap finish call encounters an error,
1730                          * return to the caller where the transaction
1731                          * can be properly aborted.  We just need to
1732                          * make sure we're not holding any resources
1733                          * that we were not when we came in.
1734                          *
1735                          * Aborting from this point might lose some
1736                          * blocks in the file system, but oh well.
1737                          */
1738                         xfs_bmap_cancel(&free_list);
1739                         if (committed) {
1740                                 /*
1741                                  * If the passed in transaction committed
1742                                  * in xfs_bmap_finish(), then we want to
1743                                  * add the inode to this one before returning.
1744                                  * This keeps things simple for the higher
1745                                  * level code, because it always knows that
1746                                  * the inode is locked and held in the
1747                                  * transaction that returns to it whether
1748                                  * errors occur or not.  We don't mark the
1749                                  * inode dirty so that this transaction can
1750                                  * be easily aborted if possible.
1751                                  */
1752                                 xfs_trans_ijoin(ntp, ip,
1753                                         XFS_ILOCK_EXCL | XFS_IOLOCK_EXCL);
1754                                 xfs_trans_ihold(ntp, ip);
1755                         }
1756                         return error;
1757                 }
1758
1759                 if (committed) {
1760                         /*
1761                          * The first xact was committed,
1762                          * so add the inode to the new one.
1763                          * Mark it dirty so it will be logged
1764                          * and moved forward in the log as
1765                          * part of every commit.
1766                          */
1767                         xfs_trans_ijoin(ntp, ip,
1768                                         XFS_ILOCK_EXCL | XFS_IOLOCK_EXCL);
1769                         xfs_trans_ihold(ntp, ip);
1770                         xfs_trans_log_inode(ntp, ip, XFS_ILOG_CORE);
1771                 }
1772                 ntp = xfs_trans_dup(ntp);
1773                 (void) xfs_trans_commit(*tp, 0, NULL);
1774                 *tp = ntp;
1775                 error = xfs_trans_reserve(ntp, 0, XFS_ITRUNCATE_LOG_RES(mp), 0,
1776                                           XFS_TRANS_PERM_LOG_RES,
1777                                           XFS_ITRUNCATE_LOG_COUNT);
1778                 /*
1779                  * Add the inode being truncated to the next chained
1780                  * transaction.
1781                  */
1782                 xfs_trans_ijoin(ntp, ip, XFS_ILOCK_EXCL | XFS_IOLOCK_EXCL);
1783                 xfs_trans_ihold(ntp, ip);
1784                 if (error)
1785                         return (error);
1786         }
1787         /*
1788          * Only update the size in the case of the data fork, but
1789          * always re-log the inode so that our permanent transaction
1790          * can keep on rolling it forward in the log.
1791          */
1792         if (fork == XFS_DATA_FORK) {
1793                 xfs_isize_check(mp, ip, new_size);
1794                 ip->i_d.di_size = new_size;
1795         }
1796         xfs_trans_log_inode(ntp, ip, XFS_ILOG_CORE);
1797         ASSERT((new_size != 0) ||
1798                (fork == XFS_ATTR_FORK) ||
1799                (ip->i_delayed_blks == 0));
1800         ASSERT((new_size != 0) ||
1801                (fork == XFS_ATTR_FORK) ||
1802                (ip->i_d.di_nextents == 0));
1803         xfs_itrunc_trace(XFS_ITRUNC_FINISH2, ip, 0, new_size, 0, 0);
1804         return 0;
1805 }
1806
1807
1808 /*
1809  * xfs_igrow_start
1810  *
1811  * Do the first part of growing a file: zero any data in the last
1812  * block that is beyond the old EOF.  We need to do this before
1813  * the inode is joined to the transaction to modify the i_size.
1814  * That way we can drop the inode lock and call into the buffer
1815  * cache to get the buffer mapping the EOF.
1816  */
1817 int
1818 xfs_igrow_start(
1819         xfs_inode_t     *ip,
1820         xfs_fsize_t     new_size,
1821         cred_t          *credp)
1822 {
1823         xfs_fsize_t     isize;
1824         int             error;
1825
1826         ASSERT(ismrlocked(&(ip->i_lock), MR_UPDATE) != 0);
1827         ASSERT(ismrlocked(&(ip->i_iolock), MR_UPDATE) != 0);
1828         ASSERT(new_size > ip->i_d.di_size);
1829
1830         error = 0;
1831         isize = ip->i_d.di_size;
1832         /*
1833          * Zero any pages that may have been created by
1834          * xfs_write_file() beyond the end of the file
1835          * and any blocks between the old and new file sizes.
1836          */
1837         error = xfs_zero_eof(XFS_ITOV(ip), &ip->i_iocore, new_size, isize,
1838                                 new_size);
1839         return error;
1840 }
1841
1842 /*
1843  * xfs_igrow_finish
1844  *
1845  * This routine is called to extend the size of a file.
1846  * The inode must have both the iolock and the ilock locked
1847  * for update and it must be a part of the current transaction.
1848  * The xfs_igrow_start() function must have been called previously.
1849  * If the change_flag is not zero, the inode change timestamp will
1850  * be updated.
1851  */
1852 void
1853 xfs_igrow_finish(
1854         xfs_trans_t     *tp,
1855         xfs_inode_t     *ip,
1856         xfs_fsize_t     new_size,
1857         int             change_flag)
1858 {
1859         ASSERT(ismrlocked(&(ip->i_lock), MR_UPDATE) != 0);
1860         ASSERT(ismrlocked(&(ip->i_iolock), MR_UPDATE) != 0);
1861         ASSERT(ip->i_transp == tp);
1862         ASSERT(new_size > ip->i_d.di_size);
1863
1864         /*
1865          * Update the file size.  Update the inode change timestamp
1866          * if change_flag set.
1867          */
1868         ip->i_d.di_size = new_size;
1869         if (change_flag)
1870                 xfs_ichgtime(ip, XFS_ICHGTIME_CHG);
1871         xfs_trans_log_inode(tp, ip, XFS_ILOG_CORE);
1872
1873 }
1874
1875
1876 /*
1877  * This is called when the inode's link count goes to 0.
1878  * We place the on-disk inode on a list in the AGI.  It
1879  * will be pulled from this list when the inode is freed.
1880  */
1881 int
1882 xfs_iunlink(
1883         xfs_trans_t     *tp,
1884         xfs_inode_t     *ip)
1885 {
1886         xfs_mount_t     *mp;
1887         xfs_agi_t       *agi;
1888         xfs_dinode_t    *dip;
1889         xfs_buf_t       *agibp;
1890         xfs_buf_t       *ibp;
1891         xfs_agnumber_t  agno;
1892         xfs_daddr_t     agdaddr;
1893         xfs_agino_t     agino;
1894         short           bucket_index;
1895         int             offset;
1896         int             error;
1897         int             agi_ok;
1898
1899         ASSERT(ip->i_d.di_nlink == 0);
1900         ASSERT(ip->i_d.di_mode != 0);
1901         ASSERT(ip->i_transp == tp);
1902
1903         mp = tp->t_mountp;
1904
1905         agno = XFS_INO_TO_AGNO(mp, ip->i_ino);
1906         agdaddr = XFS_AG_DADDR(mp, agno, XFS_AGI_DADDR(mp));
1907
1908         /*
1909          * Get the agi buffer first.  It ensures lock ordering
1910          * on the list.
1911          */
1912         error = xfs_trans_read_buf(mp, tp, mp->m_ddev_targp, agdaddr,
1913                                    XFS_FSS_TO_BB(mp, 1), 0, &agibp);
1914         if (error) {
1915                 return error;
1916         }
1917         /*
1918          * Validate the magic number of the agi block.
1919          */
1920         agi = XFS_BUF_TO_AGI(agibp);
1921         agi_ok =
1922                 INT_GET(agi->agi_magicnum, ARCH_CONVERT) == XFS_AGI_MAGIC &&
1923                 XFS_AGI_GOOD_VERSION(INT_GET(agi->agi_versionnum, ARCH_CONVERT));
1924         if (unlikely(XFS_TEST_ERROR(!agi_ok, mp, XFS_ERRTAG_IUNLINK,
1925                         XFS_RANDOM_IUNLINK))) {
1926                 XFS_CORRUPTION_ERROR("xfs_iunlink", XFS_ERRLEVEL_LOW, mp, agi);
1927                 xfs_trans_brelse(tp, agibp);
1928                 return XFS_ERROR(EFSCORRUPTED);
1929         }
1930         /*
1931          * Get the index into the agi hash table for the
1932          * list this inode will go on.
1933          */
1934         agino = XFS_INO_TO_AGINO(mp, ip->i_ino);
1935         ASSERT(agino != 0);
1936         bucket_index = agino % XFS_AGI_UNLINKED_BUCKETS;
1937         ASSERT(!INT_ISZERO(agi->agi_unlinked[bucket_index], ARCH_CONVERT));
1938         ASSERT(INT_GET(agi->agi_unlinked[bucket_index], ARCH_CONVERT) != agino);
1939
1940         if (INT_GET(agi->agi_unlinked[bucket_index], ARCH_CONVERT) != NULLAGINO) {
1941                 /*
1942                  * There is already another inode in the bucket we need
1943                  * to add ourselves to.  Add us at the front of the list.
1944                  * Here we put the head pointer into our next pointer,
1945                  * and then we fall through to point the head at us.
1946                  */
1947                 error = xfs_itobp(mp, tp, ip, &dip, &ibp, 0);
1948                 if (error) {
1949                         return error;
1950                 }
1951                 ASSERT(INT_GET(dip->di_next_unlinked, ARCH_CONVERT) == NULLAGINO);
1952                 ASSERT(!INT_ISZERO(dip->di_next_unlinked, ARCH_CONVERT));
1953                 /* both on-disk, don't endian flip twice */
1954                 dip->di_next_unlinked = agi->agi_unlinked[bucket_index];
1955                 offset = ip->i_boffset +
1956                         offsetof(xfs_dinode_t, di_next_unlinked);
1957                 xfs_trans_inode_buf(tp, ibp);
1958                 xfs_trans_log_buf(tp, ibp, offset,
1959                                   (offset + sizeof(xfs_agino_t) - 1));
1960                 xfs_inobp_check(mp, ibp);
1961         }
1962
1963         /*
1964          * Point the bucket head pointer at the inode being inserted.
1965          */
1966         ASSERT(agino != 0);
1967         INT_SET(agi->agi_unlinked[bucket_index], ARCH_CONVERT, agino);
1968         offset = offsetof(xfs_agi_t, agi_unlinked) +
1969                 (sizeof(xfs_agino_t) * bucket_index);
1970         xfs_trans_log_buf(tp, agibp, offset,
1971                           (offset + sizeof(xfs_agino_t) - 1));
1972         return 0;
1973 }
1974
1975 /*
1976  * Pull the on-disk inode from the AGI unlinked list.
1977  */
1978 STATIC int
1979 xfs_iunlink_remove(
1980         xfs_trans_t     *tp,
1981         xfs_inode_t     *ip)
1982 {
1983         xfs_ino_t       next_ino;
1984         xfs_mount_t     *mp;
1985         xfs_agi_t       *agi;
1986         xfs_dinode_t    *dip;
1987         xfs_buf_t       *agibp;
1988         xfs_buf_t       *ibp;
1989         xfs_agnumber_t  agno;
1990         xfs_daddr_t     agdaddr;
1991         xfs_agino_t     agino;
1992         xfs_agino_t     next_agino;
1993         xfs_buf_t       *last_ibp;
1994         xfs_dinode_t    *last_dip;
1995         short           bucket_index;
1996         int             offset, last_offset;
1997         int             error;
1998         int             agi_ok;
1999
2000         /*
2001          * First pull the on-disk inode from the AGI unlinked list.
2002          */
2003         mp = tp->t_mountp;
2004
2005         agno = XFS_INO_TO_AGNO(mp, ip->i_ino);
2006         agdaddr = XFS_AG_DADDR(mp, agno, XFS_AGI_DADDR(mp));
2007
2008         /*
2009          * Get the agi buffer first.  It ensures lock ordering
2010          * on the list.
2011          */
2012         error = xfs_trans_read_buf(mp, tp, mp->m_ddev_targp, agdaddr,
2013                                    XFS_FSS_TO_BB(mp, 1), 0, &agibp);
2014         if (error) {
2015                 cmn_err(CE_WARN,
2016                         "xfs_iunlink_remove: xfs_trans_read_buf()  returned an error %d on %s.  Returning error.",
2017                         error, mp->m_fsname);
2018                 return error;
2019         }
2020         /*
2021          * Validate the magic number of the agi block.
2022          */
2023         agi = XFS_BUF_TO_AGI(agibp);
2024         agi_ok =
2025                 INT_GET(agi->agi_magicnum, ARCH_CONVERT) == XFS_AGI_MAGIC &&
2026                 XFS_AGI_GOOD_VERSION(INT_GET(agi->agi_versionnum, ARCH_CONVERT));
2027         if (unlikely(XFS_TEST_ERROR(!agi_ok, mp, XFS_ERRTAG_IUNLINK_REMOVE,
2028                         XFS_RANDOM_IUNLINK_REMOVE))) {
2029                 XFS_CORRUPTION_ERROR("xfs_iunlink_remove", XFS_ERRLEVEL_LOW,
2030                                      mp, agi);
2031                 xfs_trans_brelse(tp, agibp);
2032                 cmn_err(CE_WARN,
2033                         "xfs_iunlink_remove: XFS_TEST_ERROR()  returned an error on %s.  Returning EFSCORRUPTED.",
2034                          mp->m_fsname);
2035                 return XFS_ERROR(EFSCORRUPTED);
2036         }
2037         /*
2038          * Get the index into the agi hash table for the
2039          * list this inode will go on.
2040          */
2041         agino = XFS_INO_TO_AGINO(mp, ip->i_ino);
2042         ASSERT(agino != 0);
2043         bucket_index = agino % XFS_AGI_UNLINKED_BUCKETS;
2044         ASSERT(INT_GET(agi->agi_unlinked[bucket_index], ARCH_CONVERT) != NULLAGINO);
2045         ASSERT(!INT_ISZERO(agi->agi_unlinked[bucket_index], ARCH_CONVERT));
2046
2047         if (INT_GET(agi->agi_unlinked[bucket_index], ARCH_CONVERT) == agino) {
2048                 /*
2049                  * We're at the head of the list.  Get the inode's
2050                  * on-disk buffer to see if there is anyone after us
2051                  * on the list.  Only modify our next pointer if it
2052                  * is not already NULLAGINO.  This saves us the overhead
2053                  * of dealing with the buffer when there is no need to
2054                  * change it.
2055                  */
2056                 error = xfs_itobp(mp, tp, ip, &dip, &ibp, 0);
2057                 if (error) {
2058                         cmn_err(CE_WARN,
2059                                 "xfs_iunlink_remove: xfs_itobp()  returned an error %d on %s.  Returning error.",
2060                                 error, mp->m_fsname);
2061                         return error;
2062                 }
2063                 next_agino = INT_GET(dip->di_next_unlinked, ARCH_CONVERT);
2064                 ASSERT(next_agino != 0);
2065                 if (next_agino != NULLAGINO) {
2066                         INT_SET(dip->di_next_unlinked, ARCH_CONVERT, NULLAGINO);
2067                         offset = ip->i_boffset +
2068                                 offsetof(xfs_dinode_t, di_next_unlinked);
2069                         xfs_trans_inode_buf(tp, ibp);
2070                         xfs_trans_log_buf(tp, ibp, offset,
2071                                           (offset + sizeof(xfs_agino_t) - 1));
2072                         xfs_inobp_check(mp, ibp);
2073                 } else {
2074                         xfs_trans_brelse(tp, ibp);
2075                 }
2076                 /*
2077                  * Point the bucket head pointer at the next inode.
2078                  */
2079                 ASSERT(next_agino != 0);
2080                 ASSERT(next_agino != agino);
2081                 INT_SET(agi->agi_unlinked[bucket_index], ARCH_CONVERT, next_agino);
2082                 offset = offsetof(xfs_agi_t, agi_unlinked) +
2083                         (sizeof(xfs_agino_t) * bucket_index);
2084                 xfs_trans_log_buf(tp, agibp, offset,
2085                                   (offset + sizeof(xfs_agino_t) - 1));
2086         } else {
2087                 /*
2088                  * We need to search the list for the inode being freed.
2089                  */
2090                 next_agino = INT_GET(agi->agi_unlinked[bucket_index], ARCH_CONVERT);
2091                 last_ibp = NULL;
2092                 while (next_agino != agino) {
2093                         /*
2094                          * If the last inode wasn't the one pointing to
2095                          * us, then release its buffer since we're not
2096                          * going to do anything with it.
2097                          */
2098                         if (last_ibp != NULL) {
2099                                 xfs_trans_brelse(tp, last_ibp);
2100                         }
2101                         next_ino = XFS_AGINO_TO_INO(mp, agno, next_agino);
2102                         error = xfs_inotobp(mp, tp, next_ino, &last_dip,
2103                                             &last_ibp, &last_offset);
2104                         if (error) {
2105                                 cmn_err(CE_WARN,
2106                         "xfs_iunlink_remove: xfs_inotobp()  returned an error %d on %s.  Returning error.",
2107                                         error, mp->m_fsname);
2108                                 return error;
2109                         }
2110                         next_agino = INT_GET(last_dip->di_next_unlinked, ARCH_CONVERT);
2111                         ASSERT(next_agino != NULLAGINO);
2112                         ASSERT(next_agino != 0);
2113                 }
2114                 /*
2115                  * Now last_ibp points to the buffer previous to us on
2116                  * the unlinked list.  Pull us from the list.
2117                  */
2118                 error = xfs_itobp(mp, tp, ip, &dip, &ibp, 0);
2119                 if (error) {
2120                         cmn_err(CE_WARN,
2121                                 "xfs_iunlink_remove: xfs_itobp()  returned an error %d on %s.  Returning error.",
2122                                 error, mp->m_fsname);
2123                         return error;
2124                 }
2125                 next_agino = INT_GET(dip->di_next_unlinked, ARCH_CONVERT);
2126                 ASSERT(next_agino != 0);
2127                 ASSERT(next_agino != agino);
2128                 if (next_agino != NULLAGINO) {
2129                         INT_SET(dip->di_next_unlinked, ARCH_CONVERT, NULLAGINO);
2130                         offset = ip->i_boffset +
2131                                 offsetof(xfs_dinode_t, di_next_unlinked);
2132                         xfs_trans_inode_buf(tp, ibp);
2133                         xfs_trans_log_buf(tp, ibp, offset,
2134                                           (offset + sizeof(xfs_agino_t) - 1));
2135                         xfs_inobp_check(mp, ibp);
2136                 } else {
2137                         xfs_trans_brelse(tp, ibp);
2138                 }
2139                 /*
2140                  * Point the previous inode on the list to the next inode.
2141                  */
2142                 INT_SET(last_dip->di_next_unlinked, ARCH_CONVERT, next_agino);
2143                 ASSERT(next_agino != 0);
2144                 offset = last_offset + offsetof(xfs_dinode_t, di_next_unlinked);
2145                 xfs_trans_inode_buf(tp, last_ibp);
2146                 xfs_trans_log_buf(tp, last_ibp, offset,
2147                                   (offset + sizeof(xfs_agino_t) - 1));
2148                 xfs_inobp_check(mp, last_ibp);
2149         }
2150         return 0;
2151 }
2152
2153 static __inline__ int xfs_inode_clean(xfs_inode_t *ip)
2154 {
2155         return (((ip->i_itemp == NULL) ||
2156                 !(ip->i_itemp->ili_format.ilf_fields & XFS_ILOG_ALL)) &&
2157                 (ip->i_update_core == 0));
2158 }
2159
2160 void
2161 xfs_ifree_cluster(
2162         xfs_inode_t     *free_ip,
2163         xfs_trans_t     *tp,
2164         xfs_ino_t       inum)
2165 {
2166         xfs_mount_t             *mp = free_ip->i_mount;
2167         int                     blks_per_cluster;
2168         int                     nbufs;
2169         int                     ninodes;
2170         int                     i, j, found, pre_flushed;
2171         xfs_daddr_t             blkno;
2172         xfs_buf_t               *bp;
2173         xfs_ihash_t             *ih;
2174         xfs_inode_t             *ip, **ip_found;
2175         xfs_inode_log_item_t    *iip;
2176         xfs_log_item_t          *lip;
2177         SPLDECL(s);
2178
2179         if (mp->m_sb.sb_blocksize >= XFS_INODE_CLUSTER_SIZE(mp)) {
2180                 blks_per_cluster = 1;
2181                 ninodes = mp->m_sb.sb_inopblock;
2182                 nbufs = XFS_IALLOC_BLOCKS(mp);
2183         } else {
2184                 blks_per_cluster = XFS_INODE_CLUSTER_SIZE(mp) /
2185                                         mp->m_sb.sb_blocksize;
2186                 ninodes = blks_per_cluster * mp->m_sb.sb_inopblock;
2187                 nbufs = XFS_IALLOC_BLOCKS(mp) / blks_per_cluster;
2188         }
2189
2190         ip_found = kmem_alloc(ninodes * sizeof(xfs_inode_t *), KM_NOFS);
2191
2192         for (j = 0; j < nbufs; j++, inum += ninodes) {
2193                 blkno = XFS_AGB_TO_DADDR(mp, XFS_INO_TO_AGNO(mp, inum),
2194                                          XFS_INO_TO_AGBNO(mp, inum));
2195
2196
2197                 /*
2198                  * Look for each inode in memory and attempt to lock it,
2199                  * we can be racing with flush and tail pushing here.
2200                  * any inode we get the locks on, add to an array of
2201                  * inode items to process later.
2202                  *
2203                  * The get the buffer lock, we could beat a flush
2204                  * or tail pushing thread to the lock here, in which
2205                  * case they will go looking for the inode buffer
2206                  * and fail, we need some other form of interlock
2207                  * here.
2208                  */
2209                 found = 0;
2210                 for (i = 0; i < ninodes; i++) {
2211                         ih = XFS_IHASH(mp, inum + i);
2212                         read_lock(&ih->ih_lock);
2213                         for (ip = ih->ih_next; ip != NULL; ip = ip->i_next) {
2214                                 if (ip->i_ino == inum + i)
2215                                         break;
2216                         }
2217
2218                         /* Inode not in memory or we found it already,
2219                          * nothing to do
2220                          */
2221                         if (!ip || (ip->i_flags & XFS_ISTALE)) {
2222                                 read_unlock(&ih->ih_lock);
2223                                 continue;
2224                         }
2225
2226                         if (xfs_inode_clean(ip)) {
2227                                 read_unlock(&ih->ih_lock);
2228                                 continue;
2229                         }
2230
2231                         /* If we can get the locks then add it to the
2232                          * list, otherwise by the time we get the bp lock
2233                          * below it will already be attached to the
2234                          * inode buffer.
2235                          */
2236
2237                         /* This inode will already be locked - by us, lets
2238                          * keep it that way.
2239                          */
2240
2241                         if (ip == free_ip) {
2242                                 if (xfs_iflock_nowait(ip)) {
2243                                         ip->i_flags |= XFS_ISTALE;
2244
2245                                         if (xfs_inode_clean(ip)) {
2246                                                 xfs_ifunlock(ip);
2247                                         } else {
2248                                                 ip_found[found++] = ip;
2249                                         }
2250                                 }
2251                                 read_unlock(&ih->ih_lock);
2252                                 continue;
2253                         }
2254
2255                         if (xfs_ilock_nowait(ip, XFS_ILOCK_EXCL)) {
2256                                 if (xfs_iflock_nowait(ip)) {
2257                                         ip->i_flags |= XFS_ISTALE;
2258
2259                                         if (xfs_inode_clean(ip)) {
2260                                                 xfs_ifunlock(ip);
2261                                                 xfs_iunlock(ip, XFS_ILOCK_EXCL);
2262                                         } else {
2263                                                 ip_found[found++] = ip;
2264                                         }
2265                                 } else {
2266                                         xfs_iunlock(ip, XFS_ILOCK_EXCL);
2267                                 }
2268                         }
2269
2270                         read_unlock(&ih->ih_lock);
2271                 }
2272
2273                 bp = xfs_trans_get_buf(tp, mp->m_ddev_targp, blkno,
2274                                         mp->m_bsize * blks_per_cluster,
2275                                         XFS_BUF_LOCK);
2276
2277                 pre_flushed = 0;
2278                 lip = XFS_BUF_FSPRIVATE(bp, xfs_log_item_t *);
2279                 while (lip) {
2280                         if (lip->li_type == XFS_LI_INODE) {
2281                                 iip = (xfs_inode_log_item_t *)lip;
2282                                 ASSERT(iip->ili_logged == 1);
2283                                 lip->li_cb = (void(*)(xfs_buf_t*,xfs_log_item_t*)) xfs_istale_done;
2284                                 AIL_LOCK(mp,s);
2285                                 iip->ili_flush_lsn = iip->ili_item.li_lsn;
2286                                 AIL_UNLOCK(mp, s);
2287                                 iip->ili_inode->i_flags |= XFS_ISTALE;
2288                                 pre_flushed++;
2289                         }
2290                         lip = lip->li_bio_list;
2291                 }
2292
2293                 for (i = 0; i < found; i++) {
2294                         ip = ip_found[i];
2295                         iip = ip->i_itemp;
2296
2297                         if (!iip) {
2298                                 ip->i_update_core = 0;
2299                                 xfs_ifunlock(ip);
2300                                 xfs_iunlock(ip, XFS_ILOCK_EXCL);
2301                                 continue;
2302                         }
2303
2304                         iip->ili_last_fields = iip->ili_format.ilf_fields;
2305                         iip->ili_format.ilf_fields = 0;
2306                         iip->ili_logged = 1;
2307                         AIL_LOCK(mp,s);
2308                         iip->ili_flush_lsn = iip->ili_item.li_lsn;
2309                         AIL_UNLOCK(mp, s);
2310
2311                         xfs_buf_attach_iodone(bp,
2312                                 (void(*)(xfs_buf_t*,xfs_log_item_t*))
2313                                 xfs_istale_done, (xfs_log_item_t *)iip);
2314                         if (ip != free_ip) {
2315                                 xfs_iunlock(ip, XFS_ILOCK_EXCL);
2316                         }
2317                 }
2318
2319                 if (found || pre_flushed)
2320                         xfs_trans_stale_inode_buf(tp, bp);
2321                 xfs_trans_binval(tp, bp);
2322         }
2323
2324         kmem_free(ip_found, ninodes * sizeof(xfs_inode_t *));
2325 }
2326
2327 /*
2328  * This is called to return an inode to the inode free list.
2329  * The inode should already be truncated to 0 length and have
2330  * no pages associated with it.  This routine also assumes that
2331  * the inode is already a part of the transaction.
2332  *
2333  * The on-disk copy of the inode will have been added to the list
2334  * of unlinked inodes in the AGI. We need to remove the inode from
2335  * that list atomically with respect to freeing it here.
2336  */
2337 int
2338 xfs_ifree(
2339         xfs_trans_t     *tp,
2340         xfs_inode_t     *ip,
2341         xfs_bmap_free_t *flist)
2342 {
2343         int                     error;
2344         int                     delete;
2345         xfs_ino_t               first_ino;
2346
2347         ASSERT(ismrlocked(&ip->i_lock, MR_UPDATE));
2348         ASSERT(ip->i_transp == tp);
2349         ASSERT(ip->i_d.di_nlink == 0);
2350         ASSERT(ip->i_d.di_nextents == 0);
2351         ASSERT(ip->i_d.di_anextents == 0);
2352         ASSERT((ip->i_d.di_size == 0) ||
2353                ((ip->i_d.di_mode & S_IFMT) != S_IFREG));
2354         ASSERT(ip->i_d.di_nblocks == 0);
2355
2356         /*
2357          * Pull the on-disk inode from the AGI unlinked list.
2358          */
2359         error = xfs_iunlink_remove(tp, ip);
2360         if (error != 0) {
2361                 return error;
2362         }
2363
2364         error = xfs_difree(tp, ip->i_ino, flist, &delete, &first_ino);
2365         if (error != 0) {
2366                 return error;
2367         }
2368         ip->i_d.di_mode = 0;            /* mark incore inode as free */
2369         ip->i_d.di_flags = 0;
2370         ip->i_d.di_dmevmask = 0;
2371         ip->i_d.di_forkoff = 0;         /* mark the attr fork not in use */
2372         ip->i_df.if_ext_max =
2373                 XFS_IFORK_DSIZE(ip) / (uint)sizeof(xfs_bmbt_rec_t);
2374         ip->i_d.di_format = XFS_DINODE_FMT_EXTENTS;
2375         ip->i_d.di_aformat = XFS_DINODE_FMT_EXTENTS;
2376         /*
2377          * Bump the generation count so no one will be confused
2378          * by reincarnations of this inode.
2379          */
2380         ip->i_d.di_gen++;
2381         xfs_trans_log_inode(tp, ip, XFS_ILOG_CORE);
2382
2383         if (delete) {
2384                 xfs_ifree_cluster(ip, tp, first_ino);
2385         }
2386
2387         return 0;
2388 }
2389
2390 /*
2391  * Reallocate the space for if_broot based on the number of records
2392  * being added or deleted as indicated in rec_diff.  Move the records
2393  * and pointers in if_broot to fit the new size.  When shrinking this
2394  * will eliminate holes between the records and pointers created by
2395  * the caller.  When growing this will create holes to be filled in
2396  * by the caller.
2397  *
2398  * The caller must not request to add more records than would fit in
2399  * the on-disk inode root.  If the if_broot is currently NULL, then
2400  * if we adding records one will be allocated.  The caller must also
2401  * not request that the number of records go below zero, although
2402  * it can go to zero.
2403  *
2404  * ip -- the inode whose if_broot area is changing
2405  * ext_diff -- the change in the number of records, positive or negative,
2406  *       requested for the if_broot array.
2407  */
2408 void
2409 xfs_iroot_realloc(
2410         xfs_inode_t             *ip,
2411         int                     rec_diff,
2412         int                     whichfork)
2413 {
2414         int                     cur_max;
2415         xfs_ifork_t             *ifp;
2416         xfs_bmbt_block_t        *new_broot;
2417         int                     new_max;
2418         size_t                  new_size;
2419         char                    *np;
2420         char                    *op;
2421
2422         /*
2423          * Handle the degenerate case quietly.
2424          */
2425         if (rec_diff == 0) {
2426                 return;
2427         }
2428
2429         ifp = XFS_IFORK_PTR(ip, whichfork);
2430         if (rec_diff > 0) {
2431                 /*
2432                  * If there wasn't any memory allocated before, just
2433                  * allocate it now and get out.
2434                  */
2435                 if (ifp->if_broot_bytes == 0) {
2436                         new_size = (size_t)XFS_BMAP_BROOT_SPACE_CALC(rec_diff);
2437                         ifp->if_broot = (xfs_bmbt_block_t*)kmem_alloc(new_size,
2438                                                                      KM_SLEEP);
2439                         ifp->if_broot_bytes = (int)new_size;
2440                         return;
2441                 }
2442
2443                 /*
2444                  * If there is already an existing if_broot, then we need
2445                  * to realloc() it and shift the pointers to their new
2446                  * location.  The records don't change location because
2447                  * they are kept butted up against the btree block header.
2448                  */
2449                 cur_max = XFS_BMAP_BROOT_MAXRECS(ifp->if_broot_bytes);
2450                 new_max = cur_max + rec_diff;
2451                 new_size = (size_t)XFS_BMAP_BROOT_SPACE_CALC(new_max);
2452                 ifp->if_broot = (xfs_bmbt_block_t *)
2453                   kmem_realloc(ifp->if_broot,
2454                                 new_size,
2455                                 (size_t)XFS_BMAP_BROOT_SPACE_CALC(cur_max), /* old size */
2456                                 KM_SLEEP);
2457                 op = (char *)XFS_BMAP_BROOT_PTR_ADDR(ifp->if_broot, 1,
2458                                                       ifp->if_broot_bytes);
2459                 np = (char *)XFS_BMAP_BROOT_PTR_ADDR(ifp->if_broot, 1,
2460                                                       (int)new_size);
2461                 ifp->if_broot_bytes = (int)new_size;
2462                 ASSERT(ifp->if_broot_bytes <=
2463                         XFS_IFORK_SIZE(ip, whichfork) + XFS_BROOT_SIZE_ADJ);
2464                 memmove(np, op, cur_max * (uint)sizeof(xfs_dfsbno_t));
2465                 return;
2466         }
2467
2468         /*
2469          * rec_diff is less than 0.  In this case, we are shrinking the
2470          * if_broot buffer.  It must already exist.  If we go to zero
2471          * records, just get rid of the root and clear the status bit.
2472          */
2473         ASSERT((ifp->if_broot != NULL) && (ifp->if_broot_bytes > 0));
2474         cur_max = XFS_BMAP_BROOT_MAXRECS(ifp->if_broot_bytes);
2475         new_max = cur_max + rec_diff;
2476         ASSERT(new_max >= 0);
2477         if (new_max > 0)
2478                 new_size = (size_t)XFS_BMAP_BROOT_SPACE_CALC(new_max);
2479         else
2480                 new_size = 0;
2481         if (new_size > 0) {
2482                 new_broot = (xfs_bmbt_block_t *)kmem_alloc(new_size, KM_SLEEP);
2483                 /*
2484                  * First copy over the btree block header.
2485                  */
2486                 memcpy(new_broot, ifp->if_broot, sizeof(xfs_bmbt_block_t));
2487         } else {
2488                 new_broot = NULL;
2489                 ifp->if_flags &= ~XFS_IFBROOT;
2490         }
2491
2492         /*
2493          * Only copy the records and pointers if there are any.
2494          */
2495         if (new_max > 0) {
2496                 /*
2497                  * First copy the records.
2498                  */
2499                 op = (char *)XFS_BMAP_BROOT_REC_ADDR(ifp->if_broot, 1,
2500                                                      ifp->if_broot_bytes);
2501                 np = (char *)XFS_BMAP_BROOT_REC_ADDR(new_broot, 1,
2502                                                      (int)new_size);
2503                 memcpy(np, op, new_max * (uint)sizeof(xfs_bmbt_rec_t));
2504
2505                 /*
2506                  * Then copy the pointers.
2507                  */
2508                 op = (char *)XFS_BMAP_BROOT_PTR_ADDR(ifp->if_broot, 1,
2509                                                      ifp->if_broot_bytes);
2510                 np = (char *)XFS_BMAP_BROOT_PTR_ADDR(new_broot, 1,
2511                                                      (int)new_size);
2512                 memcpy(np, op, new_max * (uint)sizeof(xfs_dfsbno_t));
2513         }
2514         kmem_free(ifp->if_broot, ifp->if_broot_bytes);
2515         ifp->if_broot = new_broot;
2516         ifp->if_broot_bytes = (int)new_size;
2517         ASSERT(ifp->if_broot_bytes <=
2518                 XFS_IFORK_SIZE(ip, whichfork) + XFS_BROOT_SIZE_ADJ);
2519         return;
2520 }
2521
2522
2523 /*
2524  * This is called when the amount of space needed for if_extents
2525  * is increased or decreased.  The change in size is indicated by
2526  * the number of extents that need to be added or deleted in the
2527  * ext_diff parameter.
2528  *
2529  * If the amount of space needed has decreased below the size of the
2530  * inline buffer, then switch to using the inline buffer.  Otherwise,
2531  * use kmem_realloc() or kmem_alloc() to adjust the size of the buffer
2532  * to what is needed.
2533  *
2534  * ip -- the inode whose if_extents area is changing
2535  * ext_diff -- the change in the number of extents, positive or negative,
2536  *       requested for the if_extents array.
2537  */
2538 void
2539 xfs_iext_realloc(
2540         xfs_inode_t     *ip,
2541         int             ext_diff,
2542         int             whichfork)
2543 {
2544         int             byte_diff;
2545         xfs_ifork_t     *ifp;
2546         int             new_size;
2547         uint            rnew_size;
2548
2549         if (ext_diff == 0) {
2550                 return;
2551         }
2552
2553         ifp = XFS_IFORK_PTR(ip, whichfork);
2554         byte_diff = ext_diff * (uint)sizeof(xfs_bmbt_rec_t);
2555         new_size = (int)ifp->if_bytes + byte_diff;
2556         ASSERT(new_size >= 0);
2557
2558         if (new_size == 0) {
2559                 if (ifp->if_u1.if_extents != ifp->if_u2.if_inline_ext) {
2560                         ASSERT(ifp->if_real_bytes != 0);
2561                         kmem_free(ifp->if_u1.if_extents, ifp->if_real_bytes);
2562                 }
2563                 ifp->if_u1.if_extents = NULL;
2564                 rnew_size = 0;
2565         } else if (new_size <= sizeof(ifp->if_u2.if_inline_ext)) {
2566                 /*
2567                  * If the valid extents can fit in if_inline_ext,
2568                  * copy them from the malloc'd vector and free it.
2569                  */
2570                 if (ifp->if_u1.if_extents != ifp->if_u2.if_inline_ext) {
2571                         /*
2572                          * For now, empty files are format EXTENTS,
2573                          * so the if_extents pointer is null.
2574                          */
2575                         if (ifp->if_u1.if_extents) {
2576                                 memcpy(ifp->if_u2.if_inline_ext,
2577                                         ifp->if_u1.if_extents, new_size);
2578                                 kmem_free(ifp->if_u1.if_extents,
2579                                           ifp->if_real_bytes);
2580                         }
2581                         ifp->if_u1.if_extents = ifp->if_u2.if_inline_ext;
2582                 }
2583                 rnew_size = 0;
2584         } else {
2585                 rnew_size = new_size;
2586                 if ((rnew_size & (rnew_size - 1)) != 0)
2587                         rnew_size = xfs_iroundup(rnew_size);
2588                 /*
2589                  * Stuck with malloc/realloc.
2590                  */
2591                 if (ifp->if_u1.if_extents == ifp->if_u2.if_inline_ext) {
2592                         ifp->if_u1.if_extents = (xfs_bmbt_rec_t *)
2593                                 kmem_alloc(rnew_size, KM_SLEEP);
2594                         memcpy(ifp->if_u1.if_extents, ifp->if_u2.if_inline_ext,
2595                               sizeof(ifp->if_u2.if_inline_ext));
2596                 } else if (rnew_size != ifp->if_real_bytes) {
2597                         ifp->if_u1.if_extents = (xfs_bmbt_rec_t *)
2598                           kmem_realloc(ifp->if_u1.if_extents,
2599                                         rnew_size,
2600                                         ifp->if_real_bytes,
2601                                         KM_NOFS);
2602                 }
2603         }
2604         ifp->if_real_bytes = rnew_size;
2605         ifp->if_bytes = new_size;
2606 }
2607
2608
2609 /*
2610  * This is called when the amount of space needed for if_data
2611  * is increased or decreased.  The change in size is indicated by
2612  * the number of bytes that need to be added or deleted in the
2613  * byte_diff parameter.
2614  *
2615  * If the amount of space needed has decreased below the size of the
2616  * inline buffer, then switch to using the inline buffer.  Otherwise,
2617  * use kmem_realloc() or kmem_alloc() to adjust the size of the buffer
2618  * to what is needed.
2619  *
2620  * ip -- the inode whose if_data area is changing
2621  * byte_diff -- the change in the number of bytes, positive or negative,
2622  *       requested for the if_data array.
2623  */
2624 void
2625 xfs_idata_realloc(
2626         xfs_inode_t     *ip,
2627         int             byte_diff,
2628         int             whichfork)
2629 {
2630         xfs_ifork_t     *ifp;
2631         int             new_size;
2632         int             real_size;
2633
2634         if (byte_diff == 0) {
2635                 return;
2636         }
2637
2638         ifp = XFS_IFORK_PTR(ip, whichfork);
2639         new_size = (int)ifp->if_bytes + byte_diff;
2640         ASSERT(new_size >= 0);
2641
2642         if (new_size == 0) {
2643                 if (ifp->if_u1.if_data != ifp->if_u2.if_inline_data) {
2644                         kmem_free(ifp->if_u1.if_data, ifp->if_real_bytes);
2645                 }
2646                 ifp->if_u1.if_data = NULL;
2647                 real_size = 0;
2648         } else if (new_size <= sizeof(ifp->if_u2.if_inline_data)) {
2649                 /*
2650                  * If the valid extents/data can fit in if_inline_ext/data,
2651                  * copy them from the malloc'd vector and free it.
2652                  */
2653                 if (ifp->if_u1.if_data == NULL) {
2654                         ifp->if_u1.if_data = ifp->if_u2.if_inline_data;
2655                 } else if (ifp->if_u1.if_data != ifp->if_u2.if_inline_data) {
2656                         ASSERT(ifp->if_real_bytes != 0);
2657                         memcpy(ifp->if_u2.if_inline_data, ifp->if_u1.if_data,
2658                               new_size);
2659                         kmem_free(ifp->if_u1.if_data, ifp->if_real_bytes);
2660                         ifp->if_u1.if_data = ifp->if_u2.if_inline_data;
2661                 }
2662                 real_size = 0;
2663         } else {
2664                 /*
2665                  * Stuck with malloc/realloc.
2666                  * For inline data, the underlying buffer must be
2667                  * a multiple of 4 bytes in size so that it can be
2668                  * logged and stay on word boundaries.  We enforce
2669                  * that here.
2670                  */
2671                 real_size = roundup(new_size, 4);
2672                 if (ifp->if_u1.if_data == NULL) {
2673                         ASSERT(ifp->if_real_bytes == 0);
2674                         ifp->if_u1.if_data = kmem_alloc(real_size, KM_SLEEP);
2675                 } else if (ifp->if_u1.if_data != ifp->if_u2.if_inline_data) {
2676                         /*
2677                          * Only do the realloc if the underlying size
2678                          * is really changing.
2679                          */
2680                         if (ifp->if_real_bytes != real_size) {
2681                                 ifp->if_u1.if_data =
2682                                         kmem_realloc(ifp->if_u1.if_data,
2683                                                         real_size,
2684                                                         ifp->if_real_bytes,
2685                                                         KM_SLEEP);
2686                         }
2687                 } else {
2688                         ASSERT(ifp->if_real_bytes == 0);
2689                         ifp->if_u1.if_data = kmem_alloc(real_size, KM_SLEEP);
2690                         memcpy(ifp->if_u1.if_data, ifp->if_u2.if_inline_data,
2691                                 ifp->if_bytes);
2692                 }
2693         }
2694         ifp->if_real_bytes = real_size;
2695         ifp->if_bytes = new_size;
2696         ASSERT(ifp->if_bytes <= XFS_IFORK_SIZE(ip, whichfork));
2697 }
2698
2699
2700
2701
2702 /*
2703  * Map inode to disk block and offset.
2704  *
2705  * mp -- the mount point structure for the current file system
2706  * tp -- the current transaction
2707  * ino -- the inode number of the inode to be located
2708  * imap -- this structure is filled in with the information necessary
2709  *       to retrieve the given inode from disk
2710  * flags -- flags to pass to xfs_dilocate indicating whether or not
2711  *       lookups in the inode btree were OK or not
2712  */
2713 int
2714 xfs_imap(
2715         xfs_mount_t     *mp,
2716         xfs_trans_t     *tp,
2717         xfs_ino_t       ino,
2718         xfs_imap_t      *imap,
2719         uint            flags)
2720 {
2721         xfs_fsblock_t   fsbno;
2722         int             len;
2723         int             off;
2724         int             error;
2725
2726         fsbno = imap->im_blkno ?
2727                 XFS_DADDR_TO_FSB(mp, imap->im_blkno) : NULLFSBLOCK;
2728         error = xfs_dilocate(mp, tp, ino, &fsbno, &len, &off, flags);
2729         if (error != 0) {
2730                 return error;
2731         }
2732         imap->im_blkno = XFS_FSB_TO_DADDR(mp, fsbno);
2733         imap->im_len = XFS_FSB_TO_BB(mp, len);
2734         imap->im_agblkno = XFS_FSB_TO_AGBNO(mp, fsbno);
2735         imap->im_ioffset = (ushort)off;
2736         imap->im_boffset = (ushort)(off << mp->m_sb.sb_inodelog);
2737         return 0;
2738 }
2739
2740 void
2741 xfs_idestroy_fork(
2742         xfs_inode_t     *ip,
2743         int             whichfork)
2744 {
2745         xfs_ifork_t     *ifp;
2746
2747         ifp = XFS_IFORK_PTR(ip, whichfork);
2748         if (ifp->if_broot != NULL) {
2749                 kmem_free(ifp->if_broot, ifp->if_broot_bytes);
2750                 ifp->if_broot = NULL;
2751         }
2752
2753         /*
2754          * If the format is local, then we can't have an extents
2755          * array so just look for an inline data array.  If we're
2756          * not local then we may or may not have an extents list,
2757          * so check and free it up if we do.
2758          */
2759         if (XFS_IFORK_FORMAT(ip, whichfork) == XFS_DINODE_FMT_LOCAL) {
2760                 if ((ifp->if_u1.if_data != ifp->if_u2.if_inline_data) &&
2761                     (ifp->if_u1.if_data != NULL)) {
2762                         ASSERT(ifp->if_real_bytes != 0);
2763                         kmem_free(ifp->if_u1.if_data, ifp->if_real_bytes);
2764                         ifp->if_u1.if_data = NULL;
2765                         ifp->if_real_bytes = 0;
2766                 }
2767         } else if ((ifp->if_flags & XFS_IFEXTENTS) &&
2768                    (ifp->if_u1.if_extents != NULL) &&
2769                    (ifp->if_u1.if_extents != ifp->if_u2.if_inline_ext)) {
2770                 ASSERT(ifp->if_real_bytes != 0);
2771                 kmem_free(ifp->if_u1.if_extents, ifp->if_real_bytes);
2772                 ifp->if_u1.if_extents = NULL;
2773                 ifp->if_real_bytes = 0;
2774         }
2775         ASSERT(ifp->if_u1.if_extents == NULL ||
2776                ifp->if_u1.if_extents == ifp->if_u2.if_inline_ext);
2777         ASSERT(ifp->if_real_bytes == 0);
2778         if (whichfork == XFS_ATTR_FORK) {
2779                 kmem_zone_free(xfs_ifork_zone, ip->i_afp);
2780                 ip->i_afp = NULL;
2781         }
2782 }
2783
2784 /*
2785  * This is called free all the memory associated with an inode.
2786  * It must free the inode itself and any buffers allocated for
2787  * if_extents/if_data and if_broot.  It must also free the lock
2788  * associated with the inode.
2789  */
2790 void
2791 xfs_idestroy(
2792         xfs_inode_t     *ip)
2793 {
2794
2795         switch (ip->i_d.di_mode & S_IFMT) {
2796         case S_IFREG:
2797         case S_IFDIR:
2798         case S_IFLNK:
2799                 xfs_idestroy_fork(ip, XFS_DATA_FORK);
2800                 break;
2801         }
2802         if (ip->i_afp)
2803                 xfs_idestroy_fork(ip, XFS_ATTR_FORK);
2804         mrfree(&ip->i_lock);
2805         mrfree(&ip->i_iolock);
2806         freesema(&ip->i_flock);
2807 #ifdef XFS_BMAP_TRACE
2808         ktrace_free(ip->i_xtrace);
2809 #endif
2810 #ifdef XFS_BMBT_TRACE
2811         ktrace_free(ip->i_btrace);
2812 #endif
2813 #ifdef XFS_RW_TRACE
2814         ktrace_free(ip->i_rwtrace);
2815 #endif
2816 #ifdef XFS_ILOCK_TRACE
2817         ktrace_free(ip->i_lock_trace);
2818 #endif
2819 #ifdef XFS_DIR2_TRACE
2820         ktrace_free(ip->i_dir_trace);
2821 #endif
2822         if (ip->i_itemp) {
2823                 /* XXXdpd should be able to assert this but shutdown
2824                  * is leaving the AIL behind. */
2825                 ASSERT(((ip->i_itemp->ili_item.li_flags & XFS_LI_IN_AIL) == 0) ||
2826                        XFS_FORCED_SHUTDOWN(ip->i_mount));
2827                 xfs_inode_item_destroy(ip);
2828         }
2829         kmem_zone_free(xfs_inode_zone, ip);
2830 }
2831
2832
2833 /*
2834  * Increment the pin count of the given buffer.
2835  * This value is protected by ipinlock spinlock in the mount structure.
2836  */
2837 void
2838 xfs_ipin(
2839         xfs_inode_t     *ip)
2840 {
2841         ASSERT(ismrlocked(&ip->i_lock, MR_UPDATE));
2842
2843         atomic_inc(&ip->i_pincount);
2844 }
2845
2846 /*
2847  * Decrement the pin count of the given inode, and wake up
2848  * anyone in xfs_iwait_unpin() if the count goes to 0.  The
2849  * inode must have been previoulsy pinned with a call to xfs_ipin().
2850  */
2851 void
2852 xfs_iunpin(
2853         xfs_inode_t     *ip)
2854 {
2855         ASSERT(atomic_read(&ip->i_pincount) > 0);
2856
2857         if (atomic_dec_and_test(&ip->i_pincount)) {
2858                 vnode_t *vp = XFS_ITOV_NULL(ip);
2859
2860                 /* make sync come back and flush this inode */
2861                 if (vp) {
2862                         struct inode    *inode = LINVFS_GET_IP(vp);
2863
2864                         if (!(inode->i_state & I_NEW))
2865                                 mark_inode_dirty_sync(inode);
2866                 }
2867
2868                 wake_up(&ip->i_ipin_wait);
2869         }
2870 }
2871
2872 /*
2873  * This is called to wait for the given inode to be unpinned.
2874  * It will sleep until this happens.  The caller must have the
2875  * inode locked in at least shared mode so that the buffer cannot
2876  * be subsequently pinned once someone is waiting for it to be
2877  * unpinned.
2878  */
2879 void
2880 xfs_iunpin_wait(
2881         xfs_inode_t     *ip)
2882 {
2883         xfs_inode_log_item_t    *iip;
2884         xfs_lsn_t       lsn;
2885
2886         ASSERT(ismrlocked(&ip->i_lock, MR_UPDATE | MR_ACCESS));
2887
2888         if (atomic_read(&ip->i_pincount) == 0) {
2889                 return;
2890         }
2891
2892         iip = ip->i_itemp;
2893         if (iip && iip->ili_last_lsn) {
2894                 lsn = iip->ili_last_lsn;
2895         } else {
2896                 lsn = (xfs_lsn_t)0;
2897         }
2898
2899         /*
2900          * Give the log a push so we don't wait here too long.
2901          */
2902         xfs_log_force(ip->i_mount, lsn, XFS_LOG_FORCE);
2903
2904         wait_event(ip->i_ipin_wait, (atomic_read(&ip->i_pincount) == 0));
2905 }
2906
2907
2908 /*
2909  * xfs_iextents_copy()
2910  *
2911  * This is called to copy the REAL extents (as opposed to the delayed
2912  * allocation extents) from the inode into the given buffer.  It
2913  * returns the number of bytes copied into the buffer.
2914  *
2915  * If there are no delayed allocation extents, then we can just
2916  * memcpy() the extents into the buffer.  Otherwise, we need to
2917  * examine each extent in turn and skip those which are delayed.
2918  */
2919 int
2920 xfs_iextents_copy(
2921         xfs_inode_t             *ip,
2922         xfs_bmbt_rec_t          *buffer,
2923         int                     whichfork)
2924 {
2925         int                     copied;
2926         xfs_bmbt_rec_t          *dest_ep;
2927         xfs_bmbt_rec_t          *ep;
2928 #ifdef XFS_BMAP_TRACE
2929         static char             fname[] = "xfs_iextents_copy";
2930 #endif
2931         int                     i;
2932         xfs_ifork_t             *ifp;
2933         int                     nrecs;
2934         xfs_fsblock_t           start_block;
2935
2936         ifp = XFS_IFORK_PTR(ip, whichfork);
2937         ASSERT(ismrlocked(&ip->i_lock, MR_UPDATE|MR_ACCESS));
2938         ASSERT(ifp->if_bytes > 0);
2939
2940         nrecs = ifp->if_bytes / (uint)sizeof(xfs_bmbt_rec_t);
2941         xfs_bmap_trace_exlist(fname, ip, nrecs, whichfork);
2942         ASSERT(nrecs > 0);
2943
2944         /*
2945          * There are some delayed allocation extents in the
2946          * inode, so copy the extents one at a time and skip
2947          * the delayed ones.  There must be at least one
2948          * non-delayed extent.
2949          */
2950         ep = ifp->if_u1.if_extents;
2951         dest_ep = buffer;
2952         copied = 0;
2953         for (i = 0; i < nrecs; i++) {
2954                 start_block = xfs_bmbt_get_startblock(ep);
2955                 if (ISNULLSTARTBLOCK(start_block)) {
2956                         /*
2957                          * It's a delayed allocation extent, so skip it.
2958                          */
2959                         ep++;
2960                         continue;
2961                 }
2962
2963                 /* Translate to on disk format */
2964                 put_unaligned(INT_GET(ep->l0, ARCH_CONVERT),
2965                               (__uint64_t*)&dest_ep->l0);
2966                 put_unaligned(INT_GET(ep->l1, ARCH_CONVERT),
2967                               (__uint64_t*)&dest_ep->l1);
2968                 dest_ep++;
2969                 ep++;
2970                 copied++;
2971         }
2972         ASSERT(copied != 0);
2973         xfs_validate_extents(buffer, copied, 1, XFS_EXTFMT_INODE(ip));
2974
2975         return (copied * (uint)sizeof(xfs_bmbt_rec_t));
2976 }
2977
2978 /*
2979  * Each of the following cases stores data into the same region
2980  * of the on-disk inode, so only one of them can be valid at
2981  * any given time. While it is possible to have conflicting formats
2982  * and log flags, e.g. having XFS_ILOG_?DATA set when the fork is
2983  * in EXTENTS format, this can only happen when the fork has
2984  * changed formats after being modified but before being flushed.
2985  * In these cases, the format always takes precedence, because the
2986  * format indicates the current state of the fork.
2987  */
2988 /*ARGSUSED*/
2989 STATIC int
2990 xfs_iflush_fork(
2991         xfs_inode_t             *ip,
2992         xfs_dinode_t            *dip,
2993         xfs_inode_log_item_t    *iip,
2994         int                     whichfork,
2995         xfs_buf_t               *bp)
2996 {
2997         char                    *cp;
2998         xfs_ifork_t             *ifp;
2999         xfs_mount_t             *mp;
3000 #ifdef XFS_TRANS_DEBUG
3001         int                     first;
3002 #endif
3003         static const short      brootflag[2] =
3004                 { XFS_ILOG_DBROOT, XFS_ILOG_ABROOT };
3005         static const short      dataflag[2] =
3006                 { XFS_ILOG_DDATA, XFS_ILOG_ADATA };
3007         static const short      extflag[2] =
3008                 { XFS_ILOG_DEXT, XFS_ILOG_AEXT };
3009
3010         if (iip == NULL)
3011                 return 0;
3012         ifp = XFS_IFORK_PTR(ip, whichfork);
3013         /*
3014          * This can happen if we gave up in iformat in an error path,
3015          * for the attribute fork.
3016          */
3017         if (ifp == NULL) {
3018                 ASSERT(whichfork == XFS_ATTR_FORK);
3019                 return 0;
3020         }
3021         cp = XFS_DFORK_PTR_ARCH(dip, whichfork, ARCH_CONVERT);
3022         mp = ip->i_mount;
3023         switch (XFS_IFORK_FORMAT(ip, whichfork)) {
3024         case XFS_DINODE_FMT_LOCAL:
3025                 if ((iip->ili_format.ilf_fields & dataflag[whichfork]) &&
3026                     (ifp->if_bytes > 0)) {
3027                         ASSERT(ifp->if_u1.if_data != NULL);
3028                         ASSERT(ifp->if_bytes <= XFS_IFORK_SIZE(ip, whichfork));
3029                         memcpy(cp, ifp->if_u1.if_data, ifp->if_bytes);
3030                 }
3031                 if (whichfork == XFS_DATA_FORK) {
3032                         if (unlikely(XFS_DIR_SHORTFORM_VALIDATE_ONDISK(mp, dip))) {
3033                                 XFS_ERROR_REPORT("xfs_iflush_fork",
3034                                                  XFS_ERRLEVEL_LOW, mp);
3035                                 return XFS_ERROR(EFSCORRUPTED);
3036                         }
3037                 }
3038                 break;
3039
3040         case XFS_DINODE_FMT_EXTENTS:
3041                 ASSERT((ifp->if_flags & XFS_IFEXTENTS) ||
3042                        !(iip->ili_format.ilf_fields & extflag[whichfork]));
3043                 ASSERT((ifp->if_u1.if_extents != NULL) || (ifp->if_bytes == 0));
3044                 ASSERT((ifp->if_u1.if_extents == NULL) || (ifp->if_bytes > 0));
3045                 if ((iip->ili_format.ilf_fields & extflag[whichfork]) &&
3046                     (ifp->if_bytes > 0)) {
3047                         ASSERT(XFS_IFORK_NEXTENTS(ip, whichfork) > 0);
3048                         (void)xfs_iextents_copy(ip, (xfs_bmbt_rec_t *)cp,
3049                                 whichfork);
3050                 }
3051                 break;
3052
3053         case XFS_DINODE_FMT_BTREE:
3054                 if ((iip->ili_format.ilf_fields & brootflag[whichfork]) &&
3055                     (ifp->if_broot_bytes > 0)) {
3056                         ASSERT(ifp->if_broot != NULL);
3057                         ASSERT(ifp->if_broot_bytes <=
3058                                (XFS_IFORK_SIZE(ip, whichfork) +
3059                                 XFS_BROOT_SIZE_ADJ));
3060                         xfs_bmbt_to_bmdr(ifp->if_broot, ifp->if_broot_bytes,
3061                                 (xfs_bmdr_block_t *)cp,
3062                                 XFS_DFORK_SIZE_ARCH(dip, mp, whichfork, ARCH_CONVERT));
3063                 }
3064                 break;
3065
3066         case XFS_DINODE_FMT_DEV:
3067                 if (iip->ili_format.ilf_fields & XFS_ILOG_DEV) {
3068                         ASSERT(whichfork == XFS_DATA_FORK);
3069                         INT_SET(dip->di_u.di_dev, ARCH_CONVERT, ip->i_df.if_u2.if_rdev);
3070                 }
3071                 break;
3072
3073         case XFS_DINODE_FMT_UUID:
3074                 if (iip->ili_format.ilf_fields & XFS_ILOG_UUID) {
3075                         ASSERT(whichfork == XFS_DATA_FORK);
3076                         memcpy(&dip->di_u.di_muuid, &ip->i_df.if_u2.if_uuid,
3077                                 sizeof(uuid_t));
3078                 }
3079                 break;
3080
3081         default:
3082                 ASSERT(0);
3083                 break;
3084         }
3085
3086         return 0;
3087 }
3088
3089 /*
3090  * xfs_iflush() will write a modified inode's changes out to the
3091  * inode's on disk home.  The caller must have the inode lock held
3092  * in at least shared mode and the inode flush semaphore must be
3093  * held as well.  The inode lock will still be held upon return from
3094  * the call and the caller is free to unlock it.
3095  * The inode flush lock will be unlocked when the inode reaches the disk.
3096  * The flags indicate how the inode's buffer should be written out.
3097  */
3098 int
3099 xfs_iflush(
3100         xfs_inode_t             *ip,
3101         uint                    flags)
3102 {
3103         xfs_inode_log_item_t    *iip;
3104         xfs_buf_t               *bp;
3105         xfs_dinode_t            *dip;
3106         xfs_mount_t             *mp;
3107         int                     error;
3108         /* REFERENCED */
3109         xfs_chash_t             *ch;
3110         xfs_inode_t             *iq;
3111         int                     clcount;        /* count of inodes clustered */
3112         int                     bufwasdelwri;
3113         enum { INT_DELWRI = (1 << 0), INT_ASYNC = (1 << 1) };
3114         SPLDECL(s);
3115
3116         XFS_STATS_INC(xs_iflush_count);
3117
3118         ASSERT(ismrlocked(&ip->i_lock, MR_UPDATE|MR_ACCESS));
3119         ASSERT(valusema(&ip->i_flock) <= 0);
3120         ASSERT(ip->i_d.di_format != XFS_DINODE_FMT_BTREE ||
3121                ip->i_d.di_nextents > ip->i_df.if_ext_max);
3122
3123         iip = ip->i_itemp;
3124         mp = ip->i_mount;
3125
3126         /*
3127          * If the inode isn't dirty, then just release the inode
3128          * flush lock and do nothing.
3129          */
3130         if ((ip->i_update_core == 0) &&
3131             ((iip == NULL) || !(iip->ili_format.ilf_fields & XFS_ILOG_ALL))) {
3132                 ASSERT((iip != NULL) ?
3133                          !(iip->ili_item.li_flags & XFS_LI_IN_AIL) : 1);
3134                 xfs_ifunlock(ip);
3135                 return 0;
3136         }
3137
3138         /*
3139          * We can't flush the inode until it is unpinned, so
3140          * wait for it.  We know noone new can pin it, because
3141          * we are holding the inode lock shared and you need
3142          * to hold it exclusively to pin the inode.
3143          */
3144         xfs_iunpin_wait(ip);
3145
3146         /*
3147          * This may have been unpinned because the filesystem is shutting
3148          * down forcibly. If that's the case we must not write this inode
3149          * to disk, because the log record didn't make it to disk!
3150          */
3151         if (XFS_FORCED_SHUTDOWN(mp)) {
3152                 ip->i_update_core = 0;
3153                 if (iip)
3154                         iip->ili_format.ilf_fields = 0;
3155                 xfs_ifunlock(ip);
3156                 return XFS_ERROR(EIO);
3157         }
3158
3159         /*
3160          * Get the buffer containing the on-disk inode.
3161          */
3162         error = xfs_itobp(mp, NULL, ip, &dip, &bp, 0);
3163         if (error != 0) {
3164                 xfs_ifunlock(ip);
3165                 return error;
3166         }
3167
3168         /*
3169          * Decide how buffer will be flushed out.  This is done before
3170          * the call to xfs_iflush_int because this field is zeroed by it.
3171          */
3172         if (iip != NULL && iip->ili_format.ilf_fields != 0) {
3173                 /*
3174                  * Flush out the inode buffer according to the directions
3175                  * of the caller.  In the cases where the caller has given
3176                  * us a choice choose the non-delwri case.  This is because
3177                  * the inode is in the AIL and we need to get it out soon.
3178                  */
3179                 switch (flags) {
3180                 case XFS_IFLUSH_SYNC:
3181                 case XFS_IFLUSH_DELWRI_ELSE_SYNC:
3182                         flags = 0;
3183                         break;
3184                 case XFS_IFLUSH_ASYNC:
3185                 case XFS_IFLUSH_DELWRI_ELSE_ASYNC:
3186                         flags = INT_ASYNC;
3187                         break;
3188                 case XFS_IFLUSH_DELWRI:
3189                         flags = INT_DELWRI;
3190                         break;
3191                 default:
3192                         ASSERT(0);
3193                         flags = 0;
3194                         break;
3195                 }
3196         } else {
3197                 switch (flags) {
3198                 case XFS_IFLUSH_DELWRI_ELSE_SYNC:
3199                 case XFS_IFLUSH_DELWRI_ELSE_ASYNC:
3200                 case XFS_IFLUSH_DELWRI:
3201                         flags = INT_DELWRI;
3202                         break;
3203                 case XFS_IFLUSH_ASYNC:
3204                         flags = INT_ASYNC;
3205                         break;
3206                 case XFS_IFLUSH_SYNC:
3207                         flags = 0;
3208                         break;
3209                 default:
3210                         ASSERT(0);
3211                         flags = 0;
3212                         break;
3213                 }
3214         }
3215
3216         /*
3217          * First flush out the inode that xfs_iflush was called with.
3218          */
3219         error = xfs_iflush_int(ip, bp);
3220         if (error) {
3221                 goto corrupt_out;
3222         }
3223
3224         /*
3225          * inode clustering:
3226          * see if other inodes can be gathered into this write
3227          */
3228
3229         ip->i_chash->chl_buf = bp;
3230
3231         ch = XFS_CHASH(mp, ip->i_blkno);
3232         s = mutex_spinlock(&ch->ch_lock);
3233
3234         clcount = 0;
3235         for (iq = ip->i_cnext; iq != ip; iq = iq->i_cnext) {
3236                 /*
3237                  * Do an un-protected check to see if the inode is dirty and
3238                  * is a candidate for flushing.  These checks will be repeated
3239                  * later after the appropriate locks are acquired.
3240                  */
3241                 iip = iq->i_itemp;
3242                 if ((iq->i_update_core == 0) &&
3243                     ((iip == NULL) ||
3244                      !(iip->ili_format.ilf_fields & XFS_ILOG_ALL)) &&
3245                       xfs_ipincount(iq) == 0) {
3246                         continue;
3247                 }
3248
3249                 /*
3250                  * Try to get locks.  If any are unavailable,
3251                  * then this inode cannot be flushed and is skipped.
3252                  */
3253
3254                 /* get inode locks (just i_lock) */
3255                 if (xfs_ilock_nowait(iq, XFS_ILOCK_SHARED)) {
3256                         /* get inode flush lock */
3257                         if (xfs_iflock_nowait(iq)) {
3258                                 /* check if pinned */
3259                                 if (xfs_ipincount(iq) == 0) {
3260                                         /* arriving here means that
3261                                          * this inode can be flushed.
3262                                          * first re-check that it's
3263                                          * dirty
3264                                          */
3265                                         iip = iq->i_itemp;
3266                                         if ((iq->i_update_core != 0)||
3267                                             ((iip != NULL) &&
3268                                              (iip->ili_format.ilf_fields & XFS_ILOG_ALL))) {
3269                                                 clcount++;
3270                                                 error = xfs_iflush_int(iq, bp);
3271                                                 if (error) {
3272                                                         xfs_iunlock(iq,
3273                                                                     XFS_ILOCK_SHARED);
3274                                                         goto cluster_corrupt_out;
3275                                                 }
3276                                         } else {
3277                                                 xfs_ifunlock(iq);
3278                                         }
3279                                 } else {
3280                                         xfs_ifunlock(iq);
3281                                 }
3282                         }
3283                         xfs_iunlock(iq, XFS_ILOCK_SHARED);
3284                 }
3285         }
3286         mutex_spinunlock(&ch->ch_lock, s);
3287
3288         if (clcount) {
3289                 XFS_STATS_INC(xs_icluster_flushcnt);
3290                 XFS_STATS_ADD(xs_icluster_flushinode, clcount);
3291         }
3292
3293         /*
3294          * If the buffer is pinned then push on the log so we won't
3295          * get stuck waiting in the write for too long.
3296          */
3297         if (XFS_BUF_ISPINNED(bp)){
3298                 xfs_log_force(mp, (xfs_lsn_t)0, XFS_LOG_FORCE);
3299         }
3300
3301         if (flags & INT_DELWRI) {
3302                 xfs_bdwrite(mp, bp);
3303         } else if (flags & INT_ASYNC) {
3304                 xfs_bawrite(mp, bp);
3305         } else {
3306                 error = xfs_bwrite(mp, bp);
3307         }
3308         return error;
3309
3310 corrupt_out:
3311         xfs_buf_relse(bp);
3312         xfs_force_shutdown(mp, XFS_CORRUPT_INCORE);
3313         xfs_iflush_abort(ip);
3314         /*
3315          * Unlocks the flush lock
3316          */
3317         return XFS_ERROR(EFSCORRUPTED);
3318
3319 cluster_corrupt_out:
3320         /* Corruption detected in the clustering loop.  Invalidate the
3321          * inode buffer and shut down the filesystem.
3322          */
3323         mutex_spinunlock(&ch->ch_lock, s);
3324
3325         /*
3326          * Clean up the buffer.  If it was B_DELWRI, just release it --
3327          * brelse can handle it with no problems.  If not, shut down the
3328          * filesystem before releasing the buffer.
3329          */
3330         if ((bufwasdelwri= XFS_BUF_ISDELAYWRITE(bp))) {
3331                 xfs_buf_relse(bp);
3332         }
3333
3334         xfs_force_shutdown(mp, XFS_CORRUPT_INCORE);
3335
3336         if(!bufwasdelwri)  {
3337                 /*
3338                  * Just like incore_relse: if we have b_iodone functions,
3339                  * mark the buffer as an error and call them.  Otherwise
3340                  * mark it as stale and brelse.
3341                  */
3342                 if (XFS_BUF_IODONE_FUNC(bp)) {
3343                         XFS_BUF_CLR_BDSTRAT_FUNC(bp);
3344                         XFS_BUF_UNDONE(bp);
3345                         XFS_BUF_STALE(bp);
3346                         XFS_BUF_SHUT(bp);
3347                         XFS_BUF_ERROR(bp,EIO);
3348                         xfs_biodone(bp);
3349                 } else {
3350                         XFS_BUF_STALE(bp);
3351                         xfs_buf_relse(bp);
3352                 }
3353         }
3354
3355         xfs_iflush_abort(iq);
3356         /*
3357          * Unlocks the flush lock
3358          */
3359         return XFS_ERROR(EFSCORRUPTED);
3360 }
3361
3362
3363 STATIC int
3364 xfs_iflush_int(
3365         xfs_inode_t             *ip,
3366         xfs_buf_t               *bp)
3367 {
3368         xfs_inode_log_item_t    *iip;
3369         xfs_dinode_t            *dip;
3370         xfs_mount_t             *mp;
3371 #ifdef XFS_TRANS_DEBUG
3372         int                     first;
3373 #endif
3374         SPLDECL(s);
3375
3376         ASSERT(ismrlocked(&ip->i_lock, MR_UPDATE|MR_ACCESS));
3377         ASSERT(valusema(&ip->i_flock) <= 0);
3378         ASSERT(ip->i_d.di_format != XFS_DINODE_FMT_BTREE ||
3379                ip->i_d.di_nextents > ip->i_df.if_ext_max);
3380
3381         iip = ip->i_itemp;
3382         mp = ip->i_mount;
3383
3384
3385         /*
3386          * If the inode isn't dirty, then just release the inode
3387          * flush lock and do nothing.
3388          */
3389         if ((ip->i_update_core == 0) &&
3390             ((iip == NULL) || !(iip->ili_format.ilf_fields & XFS_ILOG_ALL))) {
3391                 xfs_ifunlock(ip);
3392                 return 0;
3393         }
3394
3395         /* set *dip = inode's place in the buffer */
3396         dip = (xfs_dinode_t *)xfs_buf_offset(bp, ip->i_boffset);
3397
3398         /*
3399          * Clear i_update_core before copying out the data.
3400          * This is for coordination with our timestamp updates
3401          * that don't hold the inode lock. They will always
3402          * update the timestamps BEFORE setting i_update_core,
3403          * so if we clear i_update_core after they set it we
3404          * are guaranteed to see their updates to the timestamps.
3405          * I believe that this depends on strongly ordered memory
3406          * semantics, but we have that.  We use the SYNCHRONIZE
3407          * macro to make sure that the compiler does not reorder
3408          * the i_update_core access below the data copy below.
3409          */
3410         ip->i_update_core = 0;
3411         SYNCHRONIZE();
3412
3413         if (XFS_TEST_ERROR(INT_GET(dip->di_core.di_magic,ARCH_CONVERT) != XFS_DINODE_MAGIC,
3414                                mp, XFS_ERRTAG_IFLUSH_1, XFS_RANDOM_IFLUSH_1)) {
3415                 xfs_cmn_err(XFS_PTAG_IFLUSH, CE_ALERT, mp,
3416                     "xfs_iflush: Bad inode %Lu magic number 0x%x, ptr 0x%p",
3417                         ip->i_ino, (int) INT_GET(dip->di_core.di_magic, ARCH_CONVERT), dip);
3418                 goto corrupt_out;
3419         }
3420         if (XFS_TEST_ERROR(ip->i_d.di_magic != XFS_DINODE_MAGIC,
3421                                 mp, XFS_ERRTAG_IFLUSH_2, XFS_RANDOM_IFLUSH_2)) {
3422                 xfs_cmn_err(XFS_PTAG_IFLUSH, CE_ALERT, mp,
3423                         "xfs_iflush: Bad inode %Lu, ptr 0x%p, magic number 0x%x",
3424                         ip->i_ino, ip, ip->i_d.di_magic);
3425                 goto corrupt_out;
3426         }
3427         if ((ip->i_d.di_mode & S_IFMT) == S_IFREG) {
3428                 if (XFS_TEST_ERROR(
3429                     (ip->i_d.di_format != XFS_DINODE_FMT_EXTENTS) &&
3430                     (ip->i_d.di_format != XFS_DINODE_FMT_BTREE),
3431                     mp, XFS_ERRTAG_IFLUSH_3, XFS_RANDOM_IFLUSH_3)) {
3432                         xfs_cmn_err(XFS_PTAG_IFLUSH, CE_ALERT, mp,
3433                                 "xfs_iflush: Bad regular inode %Lu, ptr 0x%p",
3434                                 ip->i_ino, ip);
3435                         goto corrupt_out;
3436                 }
3437         } else if ((ip->i_d.di_mode & S_IFMT) == S_IFDIR) {
3438                 if (XFS_TEST_ERROR(
3439                     (ip->i_d.di_format != XFS_DINODE_FMT_EXTENTS) &&
3440                     (ip->i_d.di_format != XFS_DINODE_FMT_BTREE) &&
3441                     (ip->i_d.di_format != XFS_DINODE_FMT_LOCAL),
3442                     mp, XFS_ERRTAG_IFLUSH_4, XFS_RANDOM_IFLUSH_4)) {
3443                         xfs_cmn_err(XFS_PTAG_IFLUSH, CE_ALERT, mp,
3444                                 "xfs_iflush: Bad directory inode %Lu, ptr 0x%p",
3445                                 ip->i_ino, ip);
3446                         goto corrupt_out;
3447                 }
3448         }
3449         if (XFS_TEST_ERROR(ip->i_d.di_nextents + ip->i_d.di_anextents >
3450                                 ip->i_d.di_nblocks, mp, XFS_ERRTAG_IFLUSH_5,
3451                                 XFS_RANDOM_IFLUSH_5)) {
3452                 xfs_cmn_err(XFS_PTAG_IFLUSH, CE_ALERT, mp,
3453                         "xfs_iflush: detected corrupt incore inode %Lu, total extents = %d, nblocks = %Ld, ptr 0x%p",
3454                         ip->i_ino,
3455                         ip->i_d.di_nextents + ip->i_d.di_anextents,
3456                         ip->i_d.di_nblocks,
3457                         ip);
3458                 goto corrupt_out;
3459         }
3460         if (XFS_TEST_ERROR(ip->i_d.di_forkoff > mp->m_sb.sb_inodesize,
3461                                 mp, XFS_ERRTAG_IFLUSH_6, XFS_RANDOM_IFLUSH_6)) {
3462                 xfs_cmn_err(XFS_PTAG_IFLUSH, CE_ALERT, mp,
3463                         "xfs_iflush: bad inode %Lu, forkoff 0x%x, ptr 0x%p",
3464                         ip->i_ino, ip->i_d.di_forkoff, ip);
3465                 goto corrupt_out;
3466         }
3467         /*
3468          * bump the flush iteration count, used to detect flushes which
3469          * postdate a log record during recovery.
3470          */
3471
3472         ip->i_d.di_flushiter++;
3473
3474         /*
3475          * Copy the dirty parts of the inode into the on-disk
3476          * inode.  We always copy out the core of the inode,
3477          * because if the inode is dirty at all the core must
3478          * be.
3479          */
3480         xfs_xlate_dinode_core((xfs_caddr_t)&(dip->di_core), &(ip->i_d),
3481                 -1, ARCH_CONVERT);
3482
3483         /* Wrap, we never let the log put out DI_MAX_FLUSH */
3484         if (ip->i_d.di_flushiter == DI_MAX_FLUSH)
3485                 ip->i_d.di_flushiter = 0;
3486
3487         /*
3488          * If this is really an old format inode and the superblock version
3489          * has not been updated to support only new format inodes, then
3490          * convert back to the old inode format.  If the superblock version
3491          * has been updated, then make the conversion permanent.
3492          */
3493         ASSERT(ip->i_d.di_version == XFS_DINODE_VERSION_1 ||
3494                XFS_SB_VERSION_HASNLINK(&mp->m_sb));
3495         if (ip->i_d.di_version == XFS_DINODE_VERSION_1) {
3496                 if (!XFS_SB_VERSION_HASNLINK(&mp->m_sb)) {
3497                         /*
3498                          * Convert it back.
3499                          */
3500                         ASSERT(ip->i_d.di_nlink <= XFS_MAXLINK_1);
3501                         INT_SET(dip->di_core.di_onlink, ARCH_CONVERT, ip->i_d.di_nlink);
3502                 } else {
3503                         /*
3504                          * The superblock version has already been bumped,
3505                          * so just make the conversion to the new inode
3506                          * format permanent.
3507                          */
3508                         ip->i_d.di_version = XFS_DINODE_VERSION_2;
3509                         INT_SET(dip->di_core.di_version, ARCH_CONVERT, XFS_DINODE_VERSION_2);
3510                         ip->i_d.di_onlink = 0;
3511                         INT_ZERO(dip->di_core.di_onlink, ARCH_CONVERT);
3512                         memset(&(ip->i_d.di_pad[0]), 0, sizeof(ip->i_d.di_pad));
3513                         memset(&(dip->di_core.di_pad[0]), 0,
3514                               sizeof(dip->di_core.di_pad));
3515                         ASSERT(ip->i_d.di_projid == 0);
3516                 }
3517         }
3518
3519         if (xfs_iflush_fork(ip, dip, iip, XFS_DATA_FORK, bp) == EFSCORRUPTED) {
3520                 goto corrupt_out;
3521         }
3522
3523         if (XFS_IFORK_Q(ip)) {
3524                 /*
3525                  * The only error from xfs_iflush_fork is on the data fork.
3526                  */
3527                 (void) xfs_iflush_fork(ip, dip, iip, XFS_ATTR_FORK, bp);
3528         }
3529         xfs_inobp_check(mp, bp);
3530
3531         /*
3532          * We've recorded everything logged in the inode, so we'd
3533          * like to clear the ilf_fields bits so we don't log and
3534          * flush things unnecessarily.  However, we can't stop
3535          * logging all this information until the data we've copied
3536          * into the disk buffer is written to disk.  If we did we might
3537          * overwrite the copy of the inode in the log with all the
3538          * data after re-logging only part of it, and in the face of
3539          * a crash we wouldn't have all the data we need to recover.
3540          *
3541          * What we do is move the bits to the ili_last_fields field.
3542          * When logging the inode, these bits are moved back to the
3543          * ilf_fields field.  In the xfs_iflush_done() routine we
3544          * clear ili_last_fields, since we know that the information
3545          * those bits represent is permanently on disk.  As long as
3546          * the flush completes before the inode is logged again, then
3547          * both ilf_fields and ili_last_fields will be cleared.
3548          *
3549          * We can play with the ilf_fields bits here, because the inode
3550          * lock must be held exclusively in order to set bits there
3551          * and the flush lock protects the ili_last_fields bits.
3552          * Set ili_logged so the flush done
3553          * routine can tell whether or not to look in the AIL.
3554          * Also, store the current LSN of the inode so that we can tell
3555          * whether the item has moved in the AIL from xfs_iflush_done().
3556          * In order to read the lsn we need the AIL lock, because
3557          * it is a 64 bit value that cannot be read atomically.
3558          */
3559         if (iip != NULL && iip->ili_format.ilf_fields != 0) {
3560                 iip->ili_last_fields = iip->ili_format.ilf_fields;
3561                 iip->ili_format.ilf_fields = 0;
3562                 iip->ili_logged = 1;
3563
3564                 ASSERT(sizeof(xfs_lsn_t) == 8); /* don't lock if it shrinks */
3565                 AIL_LOCK(mp,s);
3566                 iip->ili_flush_lsn = iip->ili_item.li_lsn;
3567                 AIL_UNLOCK(mp, s);
3568
3569                 /*
3570                  * Attach the function xfs_iflush_done to the inode's
3571                  * buffer.  This will remove the inode from the AIL
3572                  * and unlock the inode's flush lock when the inode is
3573                  * completely written to disk.
3574                  */
3575                 xfs_buf_attach_iodone(bp, (void(*)(xfs_buf_t*,xfs_log_item_t*))
3576                                       xfs_iflush_done, (xfs_log_item_t *)iip);
3577
3578                 ASSERT(XFS_BUF_FSPRIVATE(bp, void *) != NULL);
3579                 ASSERT(XFS_BUF_IODONE_FUNC(bp) != NULL);
3580         } else {
3581                 /*
3582                  * We're flushing an inode which is not in the AIL and has
3583                  * not been logged but has i_update_core set.  For this
3584                  * case we can use a B_DELWRI flush and immediately drop
3585                  * the inode flush lock because we can avoid the whole
3586                  * AIL state thing.  It's OK to drop the flush lock now,
3587                  * because we've already locked the buffer and to do anything
3588                  * you really need both.
3589                  */
3590                 if (iip != NULL) {
3591                         ASSERT(iip->ili_logged == 0);
3592                         ASSERT(iip->ili_last_fields == 0);
3593                         ASSERT((iip->ili_item.li_flags & XFS_LI_IN_AIL) == 0);
3594                 }
3595                 xfs_ifunlock(ip);
3596         }
3597
3598         return 0;
3599
3600 corrupt_out:
3601         return XFS_ERROR(EFSCORRUPTED);
3602 }
3603
3604
3605 /*
3606  * Flush all inactive inodes in mp.  Return true if no user references
3607  * were found, false otherwise.
3608  */
3609 int
3610 xfs_iflush_all(
3611         xfs_mount_t     *mp,
3612         int             flag)
3613 {
3614         int             busy;
3615         int             done;
3616         int             purged;
3617         xfs_inode_t     *ip;
3618         vmap_t          vmap;
3619         vnode_t         *vp;
3620
3621         busy = done = 0;
3622         while (!done) {
3623                 purged = 0;
3624                 XFS_MOUNT_ILOCK(mp);
3625                 ip = mp->m_inodes;
3626                 if (ip == NULL) {
3627                         break;
3628                 }
3629                 do {
3630                         /* Make sure we skip markers inserted by sync */
3631                         if (ip->i_mount == NULL) {
3632                                 ip = ip->i_mnext;
3633                                 continue;
3634                         }
3635
3636                         /*
3637                          * It's up to our caller to purge the root
3638                          * and quota vnodes later.
3639                          */
3640                         vp = XFS_ITOV_NULL(ip);
3641
3642                         if (!vp) {
3643                                 XFS_MOUNT_IUNLOCK(mp);
3644                                 xfs_finish_reclaim(ip, 0, XFS_IFLUSH_ASYNC);
3645                                 purged = 1;
3646                                 break;
3647                         }
3648
3649                         if (vn_count(vp) != 0) {
3650                                 if (vn_count(vp) == 1 &&
3651                                     (ip == mp->m_rootip ||
3652                                      (mp->m_quotainfo &&
3653                                       (ip->i_ino == mp->m_sb.sb_uquotino ||
3654                                        ip->i_ino == mp->m_sb.sb_gquotino)))) {
3655
3656                                         ip = ip->i_mnext;
3657                                         continue;
3658                                 }
3659                                 if (!(flag & XFS_FLUSH_ALL)) {
3660                                         busy = 1;
3661                                         done = 1;
3662                                         break;
3663                                 }
3664                                 /*
3665                                  * Ignore busy inodes but continue flushing
3666                                  * others.
3667                                  */
3668                                 ip = ip->i_mnext;
3669                                 continue;
3670                         }
3671                         /*
3672                          * Sample vp mapping while holding mp locked on MP
3673                          * systems, so we don't purge a reclaimed or
3674                          * nonexistent vnode.  We break from the loop
3675                          * since we know that we modify
3676                          * it by pulling ourselves from it in xfs_reclaim()
3677                          * called via vn_purge() below.  Set ip to the next
3678                          * entry in the list anyway so we'll know below
3679                          * whether we reached the end or not.
3680                          */
3681                         VMAP(vp, vmap);
3682                         XFS_MOUNT_IUNLOCK(mp);
3683
3684                         vn_purge(vp, &vmap);
3685
3686                         purged = 1;
3687                         break;
3688                 } while (ip != mp->m_inodes);
3689                 /*
3690                  * We need to distinguish between when we exit the loop
3691                  * after a purge and when we simply hit the end of the
3692                  * list.  We can't use the (ip == mp->m_inodes) test,
3693                  * because when we purge an inode at the start of the list
3694                  * the next inode on the list becomes mp->m_inodes.  That
3695                  * would cause such a test to bail out early.  The purged
3696                  * variable tells us how we got out of the loop.
3697                  */
3698                 if (!purged) {
3699                         done = 1;
3700                 }
3701         }
3702         XFS_MOUNT_IUNLOCK(mp);
3703         return !busy;
3704 }
3705
3706
3707 /*
3708  * xfs_iaccess: check accessibility of inode for mode.
3709  */
3710 int
3711 xfs_iaccess(
3712         xfs_inode_t     *ip,
3713         mode_t          mode,
3714         cred_t          *cr)
3715 {
3716         int             error;
3717         mode_t          orgmode = mode;
3718         struct inode    *inode = LINVFS_GET_IP(XFS_ITOV(ip));
3719
3720         if (mode & S_IWUSR) {
3721                 umode_t         imode = inode->i_mode;
3722
3723                 if (IS_RDONLY(inode) &&
3724                     (S_ISREG(imode) || S_ISDIR(imode) || S_ISLNK(imode)))
3725                         return XFS_ERROR(EROFS);
3726
3727                 if (IS_IMMUTABLE(inode))
3728                         return XFS_ERROR(EACCES);
3729         }
3730
3731         /*
3732          * If there's an Access Control List it's used instead of
3733          * the mode bits.
3734          */
3735         if ((error = _ACL_XFS_IACCESS(ip, mode, cr)) != -1)
3736                 return error ? XFS_ERROR(error) : 0;
3737
3738         if (current_fsuid(cr) != ip->i_d.di_uid) {
3739                 mode >>= 3;
3740                 if (!in_group_p((gid_t)ip->i_d.di_gid))
3741                         mode >>= 3;
3742         }
3743
3744         /*
3745          * If the DACs are ok we don't need any capability check.
3746          */
3747         if ((ip->i_d.di_mode & mode) == mode)
3748                 return 0;
3749         /*
3750          * Read/write DACs are always overridable.
3751          * Executable DACs are overridable if at least one exec bit is set.
3752          */
3753         if (!(orgmode & S_IXUSR) ||
3754             (inode->i_mode & S_IXUGO) || S_ISDIR(inode->i_mode))
3755                 if (capable_cred(cr, CAP_DAC_OVERRIDE))
3756                         return 0;
3757
3758         if ((orgmode == S_IRUSR) ||
3759             (S_ISDIR(inode->i_mode) && (!(orgmode & S_IWUSR)))) {
3760                 if (capable_cred(cr, CAP_DAC_READ_SEARCH))
3761                         return 0;
3762 #ifdef  NOISE
3763                 cmn_err(CE_NOTE, "Ick: mode=%o, orgmode=%o", mode, orgmode);
3764 #endif  /* NOISE */
3765                 return XFS_ERROR(EACCES);
3766         }
3767         return XFS_ERROR(EACCES);
3768 }
3769
3770 /*
3771  * xfs_iroundup: round up argument to next power of two
3772  */
3773 uint
3774 xfs_iroundup(
3775         uint    v)
3776 {
3777         int i;
3778         uint m;
3779
3780         if ((v & (v - 1)) == 0)
3781                 return v;
3782         ASSERT((v & 0x80000000) == 0);
3783         if ((v & (v + 1)) == 0)
3784                 return v + 1;
3785         for (i = 0, m = 1; i < 31; i++, m <<= 1) {
3786                 if (v & m)
3787                         continue;
3788                 v |= m;
3789                 if ((v & (v + 1)) == 0)
3790                         return v + 1;
3791         }
3792         ASSERT(0);
3793         return( 0 );
3794 }
3795
3796 /*
3797  * Change the requested timestamp in the given inode.
3798  * We don't lock across timestamp updates, and we don't log them but
3799  * we do record the fact that there is dirty information in core.
3800  *
3801  * NOTE -- callers MUST combine XFS_ICHGTIME_MOD or XFS_ICHGTIME_CHG
3802  *              with XFS_ICHGTIME_ACC to be sure that access time
3803  *              update will take.  Calling first with XFS_ICHGTIME_ACC
3804  *              and then XFS_ICHGTIME_MOD may fail to modify the access
3805  *              timestamp if the filesystem is mounted noacctm.
3806  */
3807 void
3808 xfs_ichgtime(xfs_inode_t *ip,
3809              int flags)
3810 {
3811         timespec_t      tv;
3812         vnode_t         *vp = XFS_ITOV(ip);
3813         struct inode    *inode = LINVFS_GET_IP(vp);
3814
3815         /*
3816          * We're not supposed to change timestamps in readonly-mounted
3817          * filesystems.  Throw it away if anyone asks us.
3818          */
3819         if (unlikely(vp->v_vfsp->vfs_flag & VFS_RDONLY))
3820                 return;
3821
3822         /*
3823          * Don't update access timestamps on reads if mounted "noatime"
3824          * Throw it away if anyone asks us.
3825          */
3826         if ((ip->i_mount->m_flags & XFS_MOUNT_NOATIME || IS_NOATIME(inode)) &&
3827             ((flags & (XFS_ICHGTIME_ACC|XFS_ICHGTIME_MOD|XFS_ICHGTIME_CHG))
3828                         == XFS_ICHGTIME_ACC))
3829                 return;
3830
3831         nanotime(&tv);
3832         if (flags & XFS_ICHGTIME_MOD) {
3833                 VN_MTIMESET(vp, &tv);
3834                 ip->i_d.di_mtime.t_sec = (__int32_t)tv.tv_sec;
3835                 ip->i_d.di_mtime.t_nsec = (__int32_t)tv.tv_nsec;
3836         }
3837         if (flags & XFS_ICHGTIME_ACC) {
3838                 VN_ATIMESET(vp, &tv);
3839                 ip->i_d.di_atime.t_sec = (__int32_t)tv.tv_sec;
3840                 ip->i_d.di_atime.t_nsec = (__int32_t)tv.tv_nsec;
3841         }
3842         if (flags & XFS_ICHGTIME_CHG) {
3843                 VN_CTIMESET(vp, &tv);
3844                 ip->i_d.di_ctime.t_sec = (__int32_t)tv.tv_sec;
3845                 ip->i_d.di_ctime.t_nsec = (__int32_t)tv.tv_nsec;
3846         }
3847
3848         /*
3849          * We update the i_update_core field _after_ changing
3850          * the timestamps in order to coordinate properly with
3851          * xfs_iflush() so that we don't lose timestamp updates.
3852          * This keeps us from having to hold the inode lock
3853          * while doing this.  We use the SYNCHRONIZE macro to
3854          * ensure that the compiler does not reorder the update
3855          * of i_update_core above the timestamp updates above.
3856          */
3857         SYNCHRONIZE();
3858         ip->i_update_core = 1;
3859         if (!(inode->i_state & I_LOCK))
3860                 mark_inode_dirty_sync(inode);
3861 }
3862
3863 #ifdef XFS_ILOCK_TRACE
3864 ktrace_t        *xfs_ilock_trace_buf;
3865
3866 void
3867 xfs_ilock_trace(xfs_inode_t *ip, int lock, unsigned int lockflags, inst_t *ra)
3868 {
3869         ktrace_enter(ip->i_lock_trace,
3870                      (void *)ip,
3871                      (void *)(unsigned long)lock, /* 1 = LOCK, 3=UNLOCK, etc */
3872                      (void *)(unsigned long)lockflags, /* XFS_ILOCK_EXCL etc */
3873                      (void *)ra,                /* caller of ilock */
3874                      (void *)(unsigned long)current_cpu(),
3875                      (void *)(unsigned long)current_pid(),
3876                      NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL);
3877 }
3878 #endif