fs/btrfs/inode.c

   1 // SPDX-License-Identifier: GPL-2.0
   2 /*
   3  * Copyright (C) 2007 Oracle.  All rights reserved.
   4  */
   5
   6 #include <linux/kernel.h>
   7 #include <linux/bio.h>
   8 #include <linux/buffer_head.h>
   9 #include <linux/file.h>
  10 #include <linux/fs.h>
  11 #include <linux/pagemap.h>
  12 #include <linux/highmem.h>
  13 #include <linux/time.h>
  14 #include <linux/init.h>
  15 #include <linux/string.h>
  16 #include <linux/backing-dev.h>
  17 #include <linux/writeback.h>
  18 #include <linux/compat.h>
  19 #include <linux/xattr.h>
  20 #include <linux/posix_acl.h>
  21 #include <linux/falloc.h>
  22 #include <linux/slab.h>
  23 #include <linux/ratelimit.h>
  24 #include <linux/btrfs.h>
  25 #include <linux/blkdev.h>
  26 #include <linux/posix_acl_xattr.h>
  27 #include <linux/uio.h>
  28 #include <linux/magic.h>
  29 #include <linux/iversion.h>
  30 #include <linux/swap.h>
  31 #include <asm/unaligned.h>
  32 #include "ctree.h"
  33 #include "disk-io.h"
  34 #include "transaction.h"
  35 #include "btrfs_inode.h"
  36 #include "print-tree.h"
  37 #include "ordered-data.h"
  38 #include "xattr.h"
  39 #include "tree-log.h"
  40 #include "volumes.h"
  41 #include "compression.h"
  42 #include "locking.h"
  43 #include "free-space-cache.h"
  44 #include "inode-map.h"
  45 #include "backref.h"
  46 #include "props.h"
  47 #include "qgroup.h"
  48 #include "dedupe.h"
  49
  50 struct btrfs_iget_args {
  51         struct btrfs_key *location;
  52         struct btrfs_root *root;
  53 };
  54
  55 struct btrfs_dio_data {
  56         u64 reserve;
  57         u64 unsubmitted_oe_range_start;
  58         u64 unsubmitted_oe_range_end;
  59         int overwrite;
  60 };
  61
  62 static const struct inode_operations btrfs_dir_inode_operations;
  63 static const struct inode_operations btrfs_symlink_inode_operations;
  64 static const struct inode_operations btrfs_dir_ro_inode_operations;
  65 static const struct inode_operations btrfs_special_inode_operations;
  66 static const struct inode_operations btrfs_file_inode_operations;
  67 static const struct address_space_operations btrfs_aops;
  68 static const struct file_operations btrfs_dir_file_operations;
  69 static const struct extent_io_ops btrfs_extent_io_ops;
  70
  71 static struct kmem_cache *btrfs_inode_cachep;
  72 struct kmem_cache *btrfs_trans_handle_cachep;
  73 struct kmem_cache *btrfs_path_cachep;
  74 struct kmem_cache *btrfs_free_space_cachep;
  75
  76 #define S_SHIFT 12
  77 static const unsigned char btrfs_type_by_mode[S_IFMT >> S_SHIFT] = {
  78         [S_IFREG >> S_SHIFT]    = BTRFS_FT_REG_FILE,
  79         [S_IFDIR >> S_SHIFT]    = BTRFS_FT_DIR,
  80         [S_IFCHR >> S_SHIFT]    = BTRFS_FT_CHRDEV,
  81         [S_IFBLK >> S_SHIFT]    = BTRFS_FT_BLKDEV,
  82         [S_IFIFO >> S_SHIFT]    = BTRFS_FT_FIFO,
  83         [S_IFSOCK >> S_SHIFT]   = BTRFS_FT_SOCK,
  84         [S_IFLNK >> S_SHIFT]    = BTRFS_FT_SYMLINK,
  85 };
  86
  87 static int btrfs_setsize(struct inode *inode, struct iattr *attr);
  88 static int btrfs_truncate(struct inode *inode, bool skip_writeback);
  89 static int btrfs_finish_ordered_io(struct btrfs_ordered_extent *ordered_extent);
  90 static noinline int cow_file_range(struct inode *inode,
  91                                    struct page *locked_page,
  92                                    u64 start, u64 end, u64 delalloc_end,
  93                                    int *page_started, unsigned long *nr_written,
  94                                    int unlock, struct btrfs_dedupe_hash *hash);
  95 static struct extent_map *create_io_em(struct inode *inode, u64 start, u64 len,
  96                                        u64 orig_start, u64 block_start,
  97                                        u64 block_len, u64 orig_block_len,
  98                                        u64 ram_bytes, int compress_type,
  99                                        int type);
 100
 101 static void __endio_write_update_ordered(struct inode *inode,
 102                                          const u64 offset, const u64 bytes,
 103                                          const bool uptodate);
 104
 105 /*
 106  * Cleanup all submitted ordered extents in specified range to handle errors
 107  * from the fill_dellaloc() callback.
 108  *
 109  * NOTE: caller must ensure that when an error happens, it can not call
 110  * extent_clear_unlock_delalloc() to clear both the bits EXTENT_DO_ACCOUNTING
 111  * and EXTENT_DELALLOC simultaneously, because that causes the reserved metadata
 112  * to be released, which we want to happen only when finishing the ordered
 113  * extent (btrfs_finish_ordered_io()). Also note that the caller of
 114  * btrfs_run_delalloc_range already does proper cleanup for the first page of
 115  * the range, that is, it invokes the callback writepage_end_io_hook() for the
 116  * range of the first page.
 117  */
 118 static inline void btrfs_cleanup_ordered_extents(struct inode *inode,
 119                                                  const u64 offset,
 120                                                  const u64 bytes)
 121 {
 122         unsigned long index = offset >> PAGE_SHIFT;
 123         unsigned long end_index = (offset + bytes - 1) >> PAGE_SHIFT;
 124         struct page *page;
 125
 126         while (index <= end_index) {
 127                 page = find_get_page(inode->i_mapping, index);
 128                 index++;
 129                 if (!page)
 130                         continue;
 131                 ClearPagePrivate2(page);
 132                 put_page(page);
 133         }
 134         return __endio_write_update_ordered(inode, offset + PAGE_SIZE,
 135                                             bytes - PAGE_SIZE, false);
 136 }
 137
 138 static int btrfs_dirty_inode(struct inode *inode);
 139
 140 #ifdef CONFIG_BTRFS_FS_RUN_SANITY_TESTS
 141 void btrfs_test_inode_set_ops(struct inode *inode)
 142 {
 143         BTRFS_I(inode)->io_tree.ops = &btrfs_extent_io_ops;
 144 }
 145 #endif
 146
 147 static int btrfs_init_inode_security(struct btrfs_trans_handle *trans,
 148                                      struct inode *inode,  struct inode *dir,
 149                                      const struct qstr *qstr)
 150 {
 151         int err;
 152
 153         err = btrfs_init_acl(trans, inode, dir);
 154         if (!err)
 155                 err = btrfs_xattr_security_init(trans, inode, dir, qstr);
 156         return err;
 157 }
 158
 159 /*
 160  * this does all the hard work for inserting an inline extent into
 161  * the btree.  The caller should have done a btrfs_drop_extents so that
 162  * no overlapping inline items exist in the btree
 163  */
 164 static int insert_inline_extent(struct btrfs_trans_handle *trans,
 165                                 struct btrfs_path *path, int extent_inserted,
 166                                 struct btrfs_root *root, struct inode *inode,
 167                                 u64 start, size_t size, size_t compressed_size,
 168                                 int compress_type,
 169                                 struct page **compressed_pages)
 170 {
 171         struct extent_buffer *leaf;
 172         struct page *page = NULL;
 173         char *kaddr;
 174         unsigned long ptr;
 175         struct btrfs_file_extent_item *ei;
 176         int ret;
 177         size_t cur_size = size;
 178         unsigned long offset;
 179
 180         if (compressed_size && compressed_pages)
 181                 cur_size = compressed_size;
 182
 183         inode_add_bytes(inode, size);
 184
 185         if (!extent_inserted) {
 186                 struct btrfs_key key;
 187                 size_t datasize;
 188
 189                 key.objectid = btrfs_ino(BTRFS_I(inode));
 190                 key.offset = start;
 191                 key.type = BTRFS_EXTENT_DATA_KEY;
 192
 193                 datasize = btrfs_file_extent_calc_inline_size(cur_size);
 194                 path->leave_spinning = 1;
 195                 ret = btrfs_insert_empty_item(trans, root, path, &key,
 196                                               datasize);
 197                 if (ret)
 198                         goto fail;
 199         }
 200         leaf = path->nodes[0];
 201         ei = btrfs_item_ptr(leaf, path->slots[0],
 202                             struct btrfs_file_extent_item);
 203         btrfs_set_file_extent_generation(leaf, ei, trans->transid);
 204         btrfs_set_file_extent_type(leaf, ei, BTRFS_FILE_EXTENT_INLINE);
 205         btrfs_set_file_extent_encryption(leaf, ei, 0);
 206         btrfs_set_file_extent_other_encoding(leaf, ei, 0);
 207         btrfs_set_file_extent_ram_bytes(leaf, ei, size);
 208         ptr = btrfs_file_extent_inline_start(ei);
 209
 210         if (compress_type != BTRFS_COMPRESS_NONE) {
 211                 struct page *cpage;
 212                 int i = 0;
 213                 while (compressed_size > 0) {
 214                         cpage = compressed_pages[i];
 215                         cur_size = min_t(unsigned long, compressed_size,
 216                                        PAGE_SIZE);
 217
 218                         kaddr = kmap_atomic(cpage);
 219                         write_extent_buffer(leaf, kaddr, ptr, cur_size);
 220                         kunmap_atomic(kaddr);
 221
 222                         i++;
 223                         ptr += cur_size;
 224                         compressed_size -= cur_size;
 225                 }
 226                 btrfs_set_file_extent_compression(leaf, ei,
 227                                                   compress_type);
 228         } else {
 229                 page = find_get_page(inode->i_mapping,
 230                                      start >> PAGE_SHIFT);
 231                 btrfs_set_file_extent_compression(leaf, ei, 0);
 232                 kaddr = kmap_atomic(page);
 233                 offset = start & (PAGE_SIZE - 1);
 234                 write_extent_buffer(leaf, kaddr + offset, ptr, size);
 235                 kunmap_atomic(kaddr);
 236                 put_page(page);
 237         }
 238         btrfs_mark_buffer_dirty(leaf);
 239         btrfs_release_path(path);
 240
 241         /*
 242          * we're an inline extent, so nobody can
 243          * extend the file past i_size without locking
 244          * a page we already have locked.
 245          *
 246          * We must do any isize and inode updates
 247          * before we unlock the pages.  Otherwise we
 248          * could end up racing with unlink.
 249          */
 250         BTRFS_I(inode)->disk_i_size = inode->i_size;
 251         ret = btrfs_update_inode(trans, root, inode);
 252
 253 fail:
 254         return ret;
 255 }
 256
 257
 258 /*
 259  * conditionally insert an inline extent into the file.  This
 260  * does the checks required to make sure the data is small enough
 261  * to fit as an inline extent.
 262  */
 263 static noinline int cow_file_range_inline(struct inode *inode, u64 start,
 264                                           u64 end, size_t compressed_size,
 265                                           int compress_type,
 266                                           struct page **compressed_pages)
 267 {
 268         struct btrfs_root *root = BTRFS_I(inode)->root;
 269         struct btrfs_fs_info *fs_info = root->fs_info;
 270         struct btrfs_trans_handle *trans;
 271         u64 isize = i_size_read(inode);
 272         u64 actual_end = min(end + 1, isize);
 273         u64 inline_len = actual_end - start;
 274         u64 aligned_end = ALIGN(end, fs_info->sectorsize);
 275         u64 data_len = inline_len;
 276         int ret;
 277         struct btrfs_path *path;
 278         int extent_inserted = 0;
 279         u32 extent_item_size;
 280
 281         if (compressed_size)
 282                 data_len = compressed_size;
 283
 284         if (start > 0 ||
 285             actual_end > fs_info->sectorsize ||
 286             data_len > BTRFS_MAX_INLINE_DATA_SIZE(fs_info) ||
 287             (!compressed_size &&
 288             (actual_end & (fs_info->sectorsize - 1)) == 0) ||
 289             end + 1 < isize ||
 290             data_len > fs_info->max_inline) {
 291                 return 1;
 292         }
 293
 294         path = btrfs_alloc_path();
 295         if (!path)
 296                 return -ENOMEM;
 297
 298         trans = btrfs_join_transaction(root);
 299         if (IS_ERR(trans)) {
 300                 btrfs_free_path(path);
 301                 return PTR_ERR(trans);
 302         }
 303         trans->block_rsv = &BTRFS_I(inode)->block_rsv;
 304
 305         if (compressed_size && compressed_pages)
 306                 extent_item_size = btrfs_file_extent_calc_inline_size(
 307                    compressed_size);
 308         else
 309                 extent_item_size = btrfs_file_extent_calc_inline_size(
 310                     inline_len);
 311
 312         ret = __btrfs_drop_extents(trans, root, inode, path,
 313                                    start, aligned_end, NULL,
 314                                    1, 1, extent_item_size, &extent_inserted);
 315         if (ret) {
 316                 btrfs_abort_transaction(trans, ret);
 317                 goto out;
 318         }
 319
 320         if (isize > actual_end)
 321                 inline_len = min_t(u64, isize, actual_end);
 322         ret = insert_inline_extent(trans, path, extent_inserted,
 323                                    root, inode, start,
 324                                    inline_len, compressed_size,
 325                                    compress_type, compressed_pages);
 326         if (ret && ret != -ENOSPC) {
 327                 btrfs_abort_transaction(trans, ret);
 328                 goto out;
 329         } else if (ret == -ENOSPC) {
 330                 ret = 1;
 331                 goto out;
 332         }
 333
 334         set_bit(BTRFS_INODE_NEEDS_FULL_SYNC, &BTRFS_I(inode)->runtime_flags);
 335         btrfs_drop_extent_cache(BTRFS_I(inode), start, aligned_end - 1, 0);
 336 out:
 337         /*
 338          * Don't forget to free the reserved space, as for inlined extent
 339          * it won't count as data extent, free them directly here.
 340          * And at reserve time, it's always aligned to page size, so
 341          * just free one page here.
 342          */
 343         btrfs_qgroup_free_data(inode, NULL, 0, PAGE_SIZE);
 344         btrfs_free_path(path);
 345         btrfs_end_transaction(trans);
 346         return ret;
 347 }
 348
 349 struct async_extent {
 350         u64 start;
 351         u64 ram_size;
 352         u64 compressed_size;
 353         struct page **pages;
 354         unsigned long nr_pages;
 355         int compress_type;
 356         struct list_head list;
 357 };
 358
 359 struct async_cow {
 360         struct inode *inode;
 361         struct btrfs_root *root;
 362         struct page *locked_page;
 363         u64 start;
 364         u64 end;
 365         unsigned int write_flags;
 366         struct list_head extents;
 367         struct btrfs_work work;
 368 };
 369
 370 static noinline int add_async_extent(struct async_cow *cow,
 371                                      u64 start, u64 ram_size,
 372                                      u64 compressed_size,
 373                                      struct page **pages,
 374                                      unsigned long nr_pages,
 375                                      int compress_type)
 376 {
 377         struct async_extent *async_extent;
 378
 379         async_extent = kmalloc(sizeof(*async_extent), GFP_NOFS);
 380         BUG_ON(!async_extent); /* -ENOMEM */
 381         async_extent->start = start;
 382         async_extent->ram_size = ram_size;
 383         async_extent->compressed_size = compressed_size;
 384         async_extent->pages = pages;
 385         async_extent->nr_pages = nr_pages;
 386         async_extent->compress_type = compress_type;
 387         list_add_tail(&async_extent->list, &cow->extents);
 388         return 0;
 389 }
 390
 391 static inline int inode_need_compress(struct inode *inode, u64 start, u64 end)
 392 {
 393         struct btrfs_fs_info *fs_info = btrfs_sb(inode->i_sb);
 394
 395         /* force compress */
 396         if (btrfs_test_opt(fs_info, FORCE_COMPRESS))
 397                 return 1;
 398         /* defrag ioctl */
 399         if (BTRFS_I(inode)->defrag_compress)
 400                 return 1;
 401         /* bad compression ratios */
 402         if (BTRFS_I(inode)->flags & BTRFS_INODE_NOCOMPRESS)
 403                 return 0;
 404         if (btrfs_test_opt(fs_info, COMPRESS) ||
 405             BTRFS_I(inode)->flags & BTRFS_INODE_COMPRESS ||
 406             BTRFS_I(inode)->prop_compress)
 407                 return btrfs_compress_heuristic(inode, start, end);
 408         return 0;
 409 }
 410
 411 static inline void inode_should_defrag(struct btrfs_inode *inode,
 412                 u64 start, u64 end, u64 num_bytes, u64 small_write)
 413 {
 414         /* If this is a small write inside eof, kick off a defrag */
 415         if (num_bytes < small_write &&
 416             (start > 0 || end + 1 < inode->disk_i_size))
 417                 btrfs_add_inode_defrag(NULL, inode);
 418 }
 419
 420 /*
 421  * we create compressed extents in two phases.  The first
 422  * phase compresses a range of pages that have already been
 423  * locked (both pages and state bits are locked).
 424  *
 425  * This is done inside an ordered work queue, and the compression
 426  * is spread across many cpus.  The actual IO submission is step
 427  * two, and the ordered work queue takes care of making sure that
 428  * happens in the same order things were put onto the queue by
 429  * writepages and friends.
 430  *
 431  * If this code finds it can't get good compression, it puts an
 432  * entry onto the work queue to write the uncompressed bytes.  This
 433  * makes sure that both compressed inodes and uncompressed inodes
 434  * are written in the same order that the flusher thread sent them
 435  * down.
 436  */
 437 static noinline void compress_file_range(struct inode *inode,
 438                                         struct page *locked_page,
 439                                         u64 start, u64 end,
 440                                         struct async_cow *async_cow,
 441                                         int *num_added)
 442 {
 443         struct btrfs_fs_info *fs_info = btrfs_sb(inode->i_sb);
 444         u64 blocksize = fs_info->sectorsize;
 445         u64 actual_end;
 446         u64 isize = i_size_read(inode);
 447         int ret = 0;
 448         struct page **pages = NULL;
 449         unsigned long nr_pages;
 450         unsigned long total_compressed = 0;
 451         unsigned long total_in = 0;
 452         int i;
 453         int will_compress;
 454         int compress_type = fs_info->compress_type;
 455         int redirty = 0;
 456
 457         inode_should_defrag(BTRFS_I(inode), start, end, end - start + 1,
 458                         SZ_16K);
 459
 460         actual_end = min_t(u64, isize, end + 1);
 461 again:
 462         will_compress = 0;
 463         nr_pages = (end >> PAGE_SHIFT) - (start >> PAGE_SHIFT) + 1;
 464         BUILD_BUG_ON((BTRFS_MAX_COMPRESSED % PAGE_SIZE) != 0);
 465         nr_pages = min_t(unsigned long, nr_pages,
 466                         BTRFS_MAX_COMPRESSED / PAGE_SIZE);
 467
 468         /*
 469          * we don't want to send crud past the end of i_size through
 470          * compression, that's just a waste of CPU time.  So, if the
 471          * end of the file is before the start of our current
 472          * requested range of bytes, we bail out to the uncompressed
 473          * cleanup code that can deal with all of this.
 474          *
 475          * It isn't really the fastest way to fix things, but this is a
 476          * very uncommon corner.
 477          */
 478         if (actual_end <= start)
 479                 goto cleanup_and_bail_uncompressed;
 480
 481         total_compressed = actual_end - start;
 482
 483         /*
 484          * skip compression for a small file range(<=blocksize) that
 485          * isn't an inline extent, since it doesn't save disk space at all.
 486          */
 487         if (total_compressed <= blocksize &&
 488            (start > 0 || end + 1 < BTRFS_I(inode)->disk_i_size))
 489                 goto cleanup_and_bail_uncompressed;
 490
 491         total_compressed = min_t(unsigned long, total_compressed,
 492                         BTRFS_MAX_UNCOMPRESSED);
 493         total_in = 0;
 494         ret = 0;
 495
 496         /*
 497          * we do compression for mount -o compress and when the
 498          * inode has not been flagged as nocompress.  This flag can
 499          * change at any time if we discover bad compression ratios.
 500          */
 501         if (inode_need_compress(inode, start, end)) {
 502                 WARN_ON(pages);
 503                 pages = kcalloc(nr_pages, sizeof(struct page *), GFP_NOFS);
 504                 if (!pages) {
 505                         /* just bail out to the uncompressed code */
 506                         nr_pages = 0;
 507                         goto cont;
 508                 }
 509
 510                 if (BTRFS_I(inode)->defrag_compress)
 511                         compress_type = BTRFS_I(inode)->defrag_compress;
 512                 else if (BTRFS_I(inode)->prop_compress)
 513                         compress_type = BTRFS_I(inode)->prop_compress;
 514
 515                 /*
 516                  * we need to call clear_page_dirty_for_io on each
 517                  * page in the range.  Otherwise applications with the file
 518                  * mmap'd can wander in and change the page contents while
 519                  * we are compressing them.
 520                  *
 521                  * If the compression fails for any reason, we set the pages
 522                  * dirty again later on.
 523                  *
 524                  * Note that the remaining part is redirtied, the start pointer
 525                  * has moved, the end is the original one.
 526                  */
 527                 if (!redirty) {
 528                         extent_range_clear_dirty_for_io(inode, start, end);
 529                         redirty = 1;
 530                 }
 531
 532                 /* Compression level is applied here and only here */
 533                 ret = btrfs_compress_pages(
 534                         compress_type | (fs_info->compress_level << 4),
 535                                            inode->i_mapping, start,
 536                                            pages,
 537                                            &nr_pages,
 538                                            &total_in,
 539                                            &total_compressed);
 540
 541                 if (!ret) {
 542                         unsigned long offset = total_compressed &
 543                                 (PAGE_SIZE - 1);
 544                         struct page *page = pages[nr_pages - 1];
 545                         char *kaddr;
 546
 547                         /* zero the tail end of the last page, we might be
 548                          * sending it down to disk
 549                          */
 550                         if (offset) {
 551                                 kaddr = kmap_atomic(page);
 552                                 memset(kaddr + offset, 0,
 553                                        PAGE_SIZE - offset);
 554                                 kunmap_atomic(kaddr);
 555                         }
 556                         will_compress = 1;
 557                 }
 558         }
 559 cont:
 560         if (start == 0) {
 561                 /* lets try to make an inline extent */
 562                 if (ret || total_in < actual_end) {
 563                         /* we didn't compress the entire range, try
 564                          * to make an uncompressed inline extent.
 565                          */
 566                         ret = cow_file_range_inline(inode, start, end, 0,
 567                                                     BTRFS_COMPRESS_NONE, NULL);
 568                 } else {
 569                         /* try making a compressed inline extent */
 570                         ret = cow_file_range_inline(inode, start, end,
 571                                                     total_compressed,
 572                                                     compress_type, pages);
 573                 }
 574                 if (ret <= 0) {
 575                         unsigned long clear_flags = EXTENT_DELALLOC |
 576                                 EXTENT_DELALLOC_NEW | EXTENT_DEFRAG |
 577                                 EXTENT_DO_ACCOUNTING;
 578                         unsigned long page_error_op;
 579
 580                         page_error_op = ret < 0 ? PAGE_SET_ERROR : 0;
 581
 582                         /*
 583                          * inline extent creation worked or returned error,
 584                          * we don't need to create any more async work items.
 585                          * Unlock and free up our temp pages.
 586                          *
 587                          * We use DO_ACCOUNTING here because we need the
 588                          * delalloc_release_metadata to be done _after_ we drop
 589                          * our outstanding extent for clearing delalloc for this
 590                          * range.
 591                          */
 592                         extent_clear_unlock_delalloc(inode, start, end, end,
 593                                                      NULL, clear_flags,
 594                                                      PAGE_UNLOCK |
 595                                                      PAGE_CLEAR_DIRTY |
 596                                                      PAGE_SET_WRITEBACK |
 597                                                      page_error_op |
 598                                                      PAGE_END_WRITEBACK);
 599                         goto free_pages_out;
 600                 }
 601         }
 602
 603         if (will_compress) {
 604                 /*
 605                  * we aren't doing an inline extent round the compressed size
 606                  * up to a block size boundary so the allocator does sane
 607                  * things
 608                  */
 609                 total_compressed = ALIGN(total_compressed, blocksize);
 610
 611                 /*
 612                  * one last check to make sure the compression is really a
 613                  * win, compare the page count read with the blocks on disk,
 614                  * compression must free at least one sector size
 615                  */
 616                 total_in = ALIGN(total_in, PAGE_SIZE);
 617                 if (total_compressed + blocksize <= total_in) {
 618                         *num_added += 1;
 619
 620                         /*
 621                          * The async work queues will take care of doing actual
 622                          * allocation on disk for these compressed pages, and
 623                          * will submit them to the elevator.
 624                          */
 625                         add_async_extent(async_cow, start, total_in,
 626                                         total_compressed, pages, nr_pages,
 627                                         compress_type);
 628
 629                         if (start + total_in < end) {
 630                                 start += total_in;
 631                                 pages = NULL;
 632                                 cond_resched();
 633                                 goto again;
 634                         }
 635                         return;
 636                 }
 637         }
 638         if (pages) {
 639                 /*
 640                  * the compression code ran but failed to make things smaller,
 641                  * free any pages it allocated and our page pointer array
 642                  */
 643                 for (i = 0; i < nr_pages; i++) {
 644                         WARN_ON(pages[i]->mapping);
 645                         put_page(pages[i]);
 646                 }
 647                 kfree(pages);
 648                 pages = NULL;
 649                 total_compressed = 0;
 650                 nr_pages = 0;
 651
 652                 /* flag the file so we don't compress in the future */
 653                 if (!btrfs_test_opt(fs_info, FORCE_COMPRESS) &&
 654                     !(BTRFS_I(inode)->prop_compress)) {
 655                         BTRFS_I(inode)->flags |= BTRFS_INODE_NOCOMPRESS;
 656                 }
 657         }
 658 cleanup_and_bail_uncompressed:
 659         /*
 660          * No compression, but we still need to write the pages in the file
 661          * we've been given so far.  redirty the locked page if it corresponds
 662          * to our extent and set things up for the async work queue to run
 663          * cow_file_range to do the normal delalloc dance.
 664          */
 665         if (page_offset(locked_page) >= start &&
 666             page_offset(locked_page) <= end)
 667                 __set_page_dirty_nobuffers(locked_page);
 668                 /* unlocked later on in the async handlers */
 669
 670         if (redirty)
 671                 extent_range_redirty_for_io(inode, start, end);
 672         add_async_extent(async_cow, start, end - start + 1, 0, NULL, 0,
 673                          BTRFS_COMPRESS_NONE);
 674         *num_added += 1;
 675
 676         return;
 677
 678 free_pages_out:
 679         for (i = 0; i < nr_pages; i++) {
 680                 WARN_ON(pages[i]->mapping);
 681                 put_page(pages[i]);
 682         }
 683         kfree(pages);
 684 }
 685
 686 static void free_async_extent_pages(struct async_extent *async_extent)
 687 {
 688         int i;
 689
 690         if (!async_extent->pages)
 691                 return;
 692
 693         for (i = 0; i < async_extent->nr_pages; i++) {
 694                 WARN_ON(async_extent->pages[i]->mapping);
 695                 put_page(async_extent->pages[i]);
 696         }
 697         kfree(async_extent->pages);
 698         async_extent->nr_pages = 0;
 699         async_extent->pages = NULL;
 700 }
 701
 702 /*
 703  * phase two of compressed writeback.  This is the ordered portion
 704  * of the code, which only gets called in the order the work was
 705  * queued.  We walk all the async extents created by compress_file_range
 706  * and send them down to the disk.
 707  */
 708 static noinline void submit_compressed_extents(struct inode *inode,
 709                                               struct async_cow *async_cow)
 710 {
 711         struct btrfs_fs_info *fs_info = btrfs_sb(inode->i_sb);
 712         struct async_extent *async_extent;
 713         u64 alloc_hint = 0;
 714         struct btrfs_key ins;
 715         struct extent_map *em;
 716         struct btrfs_root *root = BTRFS_I(inode)->root;
 717         struct extent_io_tree *io_tree;
 718         int ret = 0;
 719
 720 again:
 721         while (!list_empty(&async_cow->extents)) {
 722                 async_extent = list_entry(async_cow->extents.next,
 723                                           struct async_extent, list);
 724                 list_del(&async_extent->list);
 725
 726                 io_tree = &BTRFS_I(inode)->io_tree;
 727
 728 retry:
 729                 /* did the compression code fall back to uncompressed IO? */
 730                 if (!async_extent->pages) {
 731                         int page_started = 0;
 732                         unsigned long nr_written = 0;
 733
 734                         lock_extent(io_tree, async_extent->start,
 735                                          async_extent->start +
 736                                          async_extent->ram_size - 1);
 737
 738                         /* allocate blocks */
 739                         ret = cow_file_range(inode, async_cow->locked_page,
 740                                              async_extent->start,
 741                                              async_extent->start +
 742                                              async_extent->ram_size - 1,
 743                                              async_extent->start +
 744                                              async_extent->ram_size - 1,
 745                                              &page_started, &nr_written, 0,
 746                                              NULL);
 747
 748                         /* JDM XXX */
 749
 750                         /*
 751                          * if page_started, cow_file_range inserted an
 752                          * inline extent and took care of all the unlocking
 753                          * and IO for us.  Otherwise, we need to submit
 754                          * all those pages down to the drive.
 755                          */
 756                         if (!page_started && !ret)
 757                                 extent_write_locked_range(inode,
 758                                                   async_extent->start,
 759                                                   async_extent->start +
 760                                                   async_extent->ram_size - 1,
 761                                                   WB_SYNC_ALL);
 762                         else if (ret)
 763                                 unlock_page(async_cow->locked_page);
 764                         kfree(async_extent);
 765                         cond_resched();
 766                         continue;
 767                 }
 768
 769                 lock_extent(io_tree, async_extent->start,
 770                             async_extent->start + async_extent->ram_size - 1);
 771
 772                 ret = btrfs_reserve_extent(root, async_extent->ram_size,
 773                                            async_extent->compressed_size,
 774                                            async_extent->compressed_size,
 775                                            0, alloc_hint, &ins, 1, 1);
 776                 if (ret) {
 777                         free_async_extent_pages(async_extent);
 778
 779                         if (ret == -ENOSPC) {
 780                                 unlock_extent(io_tree, async_extent->start,
 781                                               async_extent->start +
 782                                               async_extent->ram_size - 1);
 783
 784                                 /*
 785                                  * we need to redirty the pages if we decide to
 786                                  * fallback to uncompressed IO, otherwise we
 787                                  * will not submit these pages down to lower
 788                                  * layers.
 789                                  */
 790                                 extent_range_redirty_for_io(inode,
 791                                                 async_extent->start,
 792                                                 async_extent->start +
 793                                                 async_extent->ram_size - 1);
 794
 795                                 goto retry;
 796                         }
 797                         goto out_free;
 798                 }
 799                 /*
 800                  * here we're doing allocation and writeback of the
 801                  * compressed pages
 802                  */
 803                 em = create_io_em(inode, async_extent->start,
 804                                   async_extent->ram_size, /* len */
 805                                   async_extent->start, /* orig_start */
 806                                   ins.objectid, /* block_start */
 807                                   ins.offset, /* block_len */
 808                                   ins.offset, /* orig_block_len */
 809                                   async_extent->ram_size, /* ram_bytes */
 810                                   async_extent->compress_type,
 811                                   BTRFS_ORDERED_COMPRESSED);
 812                 if (IS_ERR(em))
 813                         /* ret value is not necessary due to void function */
 814                         goto out_free_reserve;
 815                 free_extent_map(em);
 816
 817                 ret = btrfs_add_ordered_extent_compress(inode,
 818                                                 async_extent->start,
 819                                                 ins.objectid,
 820                                                 async_extent->ram_size,
 821                                                 ins.offset,
 822                                                 BTRFS_ORDERED_COMPRESSED,
 823                                                 async_extent->compress_type);
 824                 if (ret) {
 825                         btrfs_drop_extent_cache(BTRFS_I(inode),
 826                                                 async_extent->start,
 827                                                 async_extent->start +
 828                                                 async_extent->ram_size - 1, 0);
 829                         goto out_free_reserve;
 830                 }
 831                 btrfs_dec_block_group_reservations(fs_info, ins.objectid);
 832
 833                 /*
 834                  * clear dirty, set writeback and unlock the pages.
 835                  */
 836                 extent_clear_unlock_delalloc(inode, async_extent->start,
 837                                 async_extent->start +
 838                                 async_extent->ram_size - 1,
 839                                 async_extent->start +
 840                                 async_extent->ram_size - 1,
 841                                 NULL, EXTENT_LOCKED | EXTENT_DELALLOC,
 842                                 PAGE_UNLOCK | PAGE_CLEAR_DIRTY |
 843                                 PAGE_SET_WRITEBACK);
 844                 if (btrfs_submit_compressed_write(inode,
 845                                     async_extent->start,
 846                                     async_extent->ram_size,
 847                                     ins.objectid,
 848                                     ins.offset, async_extent->pages,
 849                                     async_extent->nr_pages,
 850                                     async_cow->write_flags)) {
 851                         struct page *p = async_extent->pages[0];
 852                         const u64 start = async_extent->start;
 853                         const u64 end = start + async_extent->ram_size - 1;
 854
 855                         p->mapping = inode->i_mapping;
 856                         btrfs_writepage_endio_finish_ordered(p, start, end, 0);
 857
 858                         p->mapping = NULL;
 859                         extent_clear_unlock_delalloc(inode, start, end, end,
 860                                                      NULL, 0,
 861                                                      PAGE_END_WRITEBACK |
 862                                                      PAGE_SET_ERROR);
 863                         free_async_extent_pages(async_extent);
 864                 }
 865                 alloc_hint = ins.objectid + ins.offset;
 866                 kfree(async_extent);
 867                 cond_resched();
 868         }
 869         return;
 870 out_free_reserve:
 871         btrfs_dec_block_group_reservations(fs_info, ins.objectid);
 872         btrfs_free_reserved_extent(fs_info, ins.objectid, ins.offset, 1);
 873 out_free:
 874         extent_clear_unlock_delalloc(inode, async_extent->start,
 875                                      async_extent->start +
 876                                      async_extent->ram_size - 1,
 877                                      async_extent->start +
 878                                      async_extent->ram_size - 1,
 879                                      NULL, EXTENT_LOCKED | EXTENT_DELALLOC |
 880                                      EXTENT_DELALLOC_NEW |
 881                                      EXTENT_DEFRAG | EXTENT_DO_ACCOUNTING,
 882                                      PAGE_UNLOCK | PAGE_CLEAR_DIRTY |
 883                                      PAGE_SET_WRITEBACK | PAGE_END_WRITEBACK |
 884                                      PAGE_SET_ERROR);
 885         free_async_extent_pages(async_extent);
 886         kfree(async_extent);
 887         goto again;
 888 }
 889
 890 static u64 get_extent_allocation_hint(struct inode *inode, u64 start,
 891                                       u64 num_bytes)
 892 {
 893         struct extent_map_tree *em_tree = &BTRFS_I(inode)->extent_tree;
 894         struct extent_map *em;
 895         u64 alloc_hint = 0;
 896
 897         read_lock(&em_tree->lock);
 898         em = search_extent_mapping(em_tree, start, num_bytes);
 899         if (em) {
 900                 /*
 901                  * if block start isn't an actual block number then find the
 902                  * first block in this inode and use that as a hint.  If that
 903                  * block is also bogus then just don't worry about it.
 904                  */
 905                 if (em->block_start >= EXTENT_MAP_LAST_BYTE) {
 906                         free_extent_map(em);
 907                         em = search_extent_mapping(em_tree, 0, 0);
 908                         if (em && em->block_start < EXTENT_MAP_LAST_BYTE)
 909                                 alloc_hint = em->block_start;
 910                         if (em)
 911                                 free_extent_map(em);
 912                 } else {
 913                         alloc_hint = em->block_start;
 914                         free_extent_map(em);
 915                 }
 916         }
 917         read_unlock(&em_tree->lock);
 918
 919         return alloc_hint;
 920 }
 921
 922 /*
 923  * when extent_io.c finds a delayed allocation range in the file,
 924  * the call backs end up in this code.  The basic idea is to
 925  * allocate extents on disk for the range, and create ordered data structs
 926  * in ram to track those extents.
 927  *
 928  * locked_page is the page that writepage had locked already.  We use
 929  * it to make sure we don't do extra locks or unlocks.
 930  *
 931  * *page_started is set to one if we unlock locked_page and do everything
 932  * required to start IO on it.  It may be clean and already done with
 933  * IO when we return.
 934  */
 935 static noinline int cow_file_range(struct inode *inode,
 936                                    struct page *locked_page,
 937                                    u64 start, u64 end, u64 delalloc_end,
 938                                    int *page_started, unsigned long *nr_written,
 939                                    int unlock, struct btrfs_dedupe_hash *hash)
 940 {
 941         struct btrfs_fs_info *fs_info = btrfs_sb(inode->i_sb);
 942         struct btrfs_root *root = BTRFS_I(inode)->root;
 943         u64 alloc_hint = 0;
 944         u64 num_bytes;
 945         unsigned long ram_size;
 946         u64 cur_alloc_size = 0;
 947         u64 blocksize = fs_info->sectorsize;
 948         struct btrfs_key ins;
 949         struct extent_map *em;
 950         unsigned clear_bits;
 951         unsigned long page_ops;
 952         bool extent_reserved = false;
 953         int ret = 0;
 954
 955         if (btrfs_is_free_space_inode(BTRFS_I(inode))) {
 956                 WARN_ON_ONCE(1);
 957                 ret = -EINVAL;
 958                 goto out_unlock;
 959         }
 960
 961         num_bytes = ALIGN(end - start + 1, blocksize);
 962         num_bytes = max(blocksize,  num_bytes);
 963         ASSERT(num_bytes <= btrfs_super_total_bytes(fs_info->super_copy));
 964
 965         inode_should_defrag(BTRFS_I(inode), start, end, num_bytes, SZ_64K);
 966
 967         if (start == 0) {
 968                 /* lets try to make an inline extent */
 969                 ret = cow_file_range_inline(inode, start, end, 0,
 970                                             BTRFS_COMPRESS_NONE, NULL);
 971                 if (ret == 0) {
 972                         /*
 973                          * We use DO_ACCOUNTING here because we need the
 974                          * delalloc_release_metadata to be run _after_ we drop
 975                          * our outstanding extent for clearing delalloc for this
 976                          * range.
 977                          */
 978                         extent_clear_unlock_delalloc(inode, start, end,
 979                                      delalloc_end, NULL,
 980                                      EXTENT_LOCKED | EXTENT_DELALLOC |
 981                                      EXTENT_DELALLOC_NEW | EXTENT_DEFRAG |
 982                                      EXTENT_DO_ACCOUNTING, PAGE_UNLOCK |
 983                                      PAGE_CLEAR_DIRTY | PAGE_SET_WRITEBACK |
 984                                      PAGE_END_WRITEBACK);
 985                         *nr_written = *nr_written +
 986                              (end - start + PAGE_SIZE) / PAGE_SIZE;
 987                         *page_started = 1;
 988                         goto out;
 989                 } else if (ret < 0) {
 990                         goto out_unlock;
 991                 }
 992         }
 993
 994         alloc_hint = get_extent_allocation_hint(inode, start, num_bytes);
 995         btrfs_drop_extent_cache(BTRFS_I(inode), start,
 996                         start + num_bytes - 1, 0);
 997
 998         while (num_bytes > 0) {
 999                 cur_alloc_size = num_bytes;
1000                 ret = btrfs_reserve_extent(root, cur_alloc_size, cur_alloc_size,
1001                                            fs_info->sectorsize, 0, alloc_hint,
1002                                            &ins, 1, 1);
1003                 if (ret < 0)
1004                         goto out_unlock;
1005                 cur_alloc_size = ins.offset;
1006                 extent_reserved = true;
1007
1008                 ram_size = ins.offset;
1009                 em = create_io_em(inode, start, ins.offset, /* len */
1010                                   start, /* orig_start */
1011                                   ins.objectid, /* block_start */
1012                                   ins.offset, /* block_len */
1013                                   ins.offset, /* orig_block_len */
1014                                   ram_size, /* ram_bytes */
1015                                   BTRFS_COMPRESS_NONE, /* compress_type */
1016                                   BTRFS_ORDERED_REGULAR /* type */);
1017                 if (IS_ERR(em)) {
1018                         ret = PTR_ERR(em);
1019                         goto out_reserve;
1020                 }
1021                 free_extent_map(em);
1022
1023                 ret = btrfs_add_ordered_extent(inode, start, ins.objectid,
1024                                                ram_size, cur_alloc_size, 0);
1025                 if (ret)
1026                         goto out_drop_extent_cache;
1027
1028                 if (root->root_key.objectid ==
1029                     BTRFS_DATA_RELOC_TREE_OBJECTID) {
1030                         ret = btrfs_reloc_clone_csums(inode, start,
1031                                                       cur_alloc_size);
1032                         /*
1033                          * Only drop cache here, and process as normal.
1034                          *
1035                          * We must not allow extent_clear_unlock_delalloc()
1036                          * at out_unlock label to free meta of this ordered
1037                          * extent, as its meta should be freed by
1038                          * btrfs_finish_ordered_io().
1039                          *
1040                          * So we must continue until @start is increased to
1041                          * skip current ordered extent.
1042                          */
1043                         if (ret)
1044                                 btrfs_drop_extent_cache(BTRFS_I(inode), start,
1045                                                 start + ram_size - 1, 0);
1046                 }
1047
1048                 btrfs_dec_block_group_reservations(fs_info, ins.objectid);
1049
1050                 /* we're not doing compressed IO, don't unlock the first
1051                  * page (which the caller expects to stay locked), don't
1052                  * clear any dirty bits and don't set any writeback bits
1053                  *
1054                  * Do set the Private2 bit so we know this page was properly
1055                  * setup for writepage
1056                  */
1057                 page_ops = unlock ? PAGE_UNLOCK : 0;
1058                 page_ops |= PAGE_SET_PRIVATE2;
1059
1060                 extent_clear_unlock_delalloc(inode, start,
1061                                              start + ram_size - 1,
1062                                              delalloc_end, locked_page,
1063                                              EXTENT_LOCKED | EXTENT_DELALLOC,
1064                                              page_ops);
1065                 if (num_bytes < cur_alloc_size)
1066                         num_bytes = 0;
1067                 else
1068                         num_bytes -= cur_alloc_size;
1069                 alloc_hint = ins.objectid + ins.offset;
1070                 start += cur_alloc_size;
1071                 extent_reserved = false;
1072
1073                 /*
1074                  * btrfs_reloc_clone_csums() error, since start is increased
1075                  * extent_clear_unlock_delalloc() at out_unlock label won't
1076                  * free metadata of current ordered extent, we're OK to exit.
1077                  */
1078                 if (ret)
1079                         goto out_unlock;
1080         }
1081 out:
1082         return ret;
1083
1084 out_drop_extent_cache:
1085         btrfs_drop_extent_cache(BTRFS_I(inode), start, start + ram_size - 1, 0);
1086 out_reserve:
1087         btrfs_dec_block_group_reservations(fs_info, ins.objectid);
1088         btrfs_free_reserved_extent(fs_info, ins.objectid, ins.offset, 1);
1089 out_unlock:
1090         clear_bits = EXTENT_LOCKED | EXTENT_DELALLOC | EXTENT_DELALLOC_NEW |
1091                 EXTENT_DEFRAG | EXTENT_CLEAR_META_RESV;
1092         page_ops = PAGE_UNLOCK | PAGE_CLEAR_DIRTY | PAGE_SET_WRITEBACK |
1093                 PAGE_END_WRITEBACK;
1094         /*
1095          * If we reserved an extent for our delalloc range (or a subrange) and
1096          * failed to create the respective ordered extent, then it means that
1097          * when we reserved the extent we decremented the extent's size from
1098          * the data space_info's bytes_may_use counter and incremented the
1099          * space_info's bytes_reserved counter by the same amount. We must make
1100          * sure extent_clear_unlock_delalloc() does not try to decrement again
1101          * the data space_info's bytes_may_use counter, therefore we do not pass
1102          * it the flag EXTENT_CLEAR_DATA_RESV.
1103          */
1104         if (extent_reserved) {
1105                 extent_clear_unlock_delalloc(inode, start,
1106                                              start + cur_alloc_size,
1107                                              start + cur_alloc_size,
1108                                              locked_page,
1109                                              clear_bits,
1110                                              page_ops);
1111                 start += cur_alloc_size;
1112                 if (start >= end)
1113                         goto out;
1114         }
1115         extent_clear_unlock_delalloc(inode, start, end, delalloc_end,
1116                                      locked_page,
1117                                      clear_bits | EXTENT_CLEAR_DATA_RESV,
1118                                      page_ops);
1119         goto out;
1120 }
1121
1122 /*
1123  * work queue call back to started compression on a file and pages
1124  */
1125 static noinline void async_cow_start(struct btrfs_work *work)
1126 {
1127         struct async_cow *async_cow;
1128         int num_added = 0;
1129         async_cow = container_of(work, struct async_cow, work);
1130
1131         compress_file_range(async_cow->inode, async_cow->locked_page,
1132                             async_cow->start, async_cow->end, async_cow,
1133                             &num_added);
1134         if (num_added == 0) {
1135                 btrfs_add_delayed_iput(async_cow->inode);
1136                 async_cow->inode = NULL;
1137         }
1138 }
1139
1140 /*
1141  * work queue call back to submit previously compressed pages
1142  */
1143 static noinline void async_cow_submit(struct btrfs_work *work)
1144 {
1145         struct btrfs_fs_info *fs_info;
1146         struct async_cow *async_cow;
1147         struct btrfs_root *root;
1148         unsigned long nr_pages;
1149
1150         async_cow = container_of(work, struct async_cow, work);
1151
1152         root = async_cow->root;
1153         fs_info = root->fs_info;
1154         nr_pages = (async_cow->end - async_cow->start + PAGE_SIZE) >>
1155                 PAGE_SHIFT;
1156
1157         /* atomic_sub_return implies a barrier */
1158         if (atomic_sub_return(nr_pages, &fs_info->async_delalloc_pages) <
1159             5 * SZ_1M)
1160                 cond_wake_up_nomb(&fs_info->async_submit_wait);
1161
1162         if (async_cow->inode)
1163                 submit_compressed_extents(async_cow->inode, async_cow);
1164 }
1165
1166 static noinline void async_cow_free(struct btrfs_work *work)
1167 {
1168         struct async_cow *async_cow;
1169         async_cow = container_of(work, struct async_cow, work);
1170         if (async_cow->inode)
1171                 btrfs_add_delayed_iput(async_cow->inode);
1172         kfree(async_cow);
1173 }
1174
1175 static int cow_file_range_async(struct inode *inode, struct page *locked_page,
1176                                 u64 start, u64 end, int *page_started,
1177                                 unsigned long *nr_written,
1178                                 unsigned int write_flags)
1179 {
1180         struct btrfs_fs_info *fs_info = btrfs_sb(inode->i_sb);
1181         struct async_cow *async_cow;
1182         struct btrfs_root *root = BTRFS_I(inode)->root;
1183         unsigned long nr_pages;
1184         u64 cur_end;
1185
1186         clear_extent_bit(&BTRFS_I(inode)->io_tree, start, end, EXTENT_LOCKED,
1187                          1, 0, NULL);
1188         while (start < end) {
1189                 async_cow = kmalloc(sizeof(*async_cow), GFP_NOFS);
1190                 BUG_ON(!async_cow); /* -ENOMEM */
1191                 async_cow->inode = igrab(inode);
1192                 async_cow->root = root;
1193                 async_cow->locked_page = locked_page;
1194                 async_cow->start = start;
1195                 async_cow->write_flags = write_flags;
1196
1197                 if (BTRFS_I(inode)->flags & BTRFS_INODE_NOCOMPRESS &&
1198                     !btrfs_test_opt(fs_info, FORCE_COMPRESS))
1199                         cur_end = end;
1200                 else
1201                         cur_end = min(end, start + SZ_512K - 1);
1202
1203                 async_cow->end = cur_end;
1204                 INIT_LIST_HEAD(&async_cow->extents);
1205
1206                 btrfs_init_work(&async_cow->work,
1207                                 btrfs_delalloc_helper,
1208                                 async_cow_start, async_cow_submit,
1209                                 async_cow_free);
1210
1211                 nr_pages = (cur_end - start + PAGE_SIZE) >>
1212                         PAGE_SHIFT;
1213                 atomic_add(nr_pages, &fs_info->async_delalloc_pages);
1214
1215                 btrfs_queue_work(fs_info->delalloc_workers, &async_cow->work);
1216
1217                 *nr_written += nr_pages;
1218                 start = cur_end + 1;
1219         }
1220         *page_started = 1;
1221         return 0;
1222 }
1223
1224 static noinline int csum_exist_in_range(struct btrfs_fs_info *fs_info,
1225                                         u64 bytenr, u64 num_bytes)
1226 {
1227         int ret;
1228         struct btrfs_ordered_sum *sums;
1229         LIST_HEAD(list);
1230
1231         ret = btrfs_lookup_csums_range(fs_info->csum_root, bytenr,
1232                                        bytenr + num_bytes - 1, &list, 0);
1233         if (ret == 0 && list_empty(&list))
1234                 return 0;
1235
1236         while (!list_empty(&list)) {
1237                 sums = list_entry(list.next, struct btrfs_ordered_sum, list);
1238                 list_del(&sums->list);
1239                 kfree(sums);
1240         }
1241         if (ret < 0)
1242                 return ret;
1243         return 1;
1244 }
1245
1246 /*
1247  * when nowcow writeback call back.  This checks for snapshots or COW copies
1248  * of the extents that exist in the file, and COWs the file as required.
1249  *
1250  * If no cow copies or snapshots exist, we write directly to the existing
1251  * blocks on disk
1252  */
1253 static noinline int run_delalloc_nocow(struct inode *inode,
1254                                        struct page *locked_page,
1255                               u64 start, u64 end, int *page_started, int force,
1256                               unsigned long *nr_written)
1257 {
1258         struct btrfs_fs_info *fs_info = btrfs_sb(inode->i_sb);
1259         struct btrfs_root *root = BTRFS_I(inode)->root;
1260         struct extent_buffer *leaf;
1261         struct btrfs_path *path;
1262         struct btrfs_file_extent_item *fi;
1263         struct btrfs_key found_key;
1264         struct extent_map *em;
1265         u64 cow_start;
1266         u64 cur_offset;
1267         u64 extent_end;
1268         u64 extent_offset;
1269         u64 disk_bytenr;
1270         u64 num_bytes;
1271         u64 disk_num_bytes;
1272         u64 ram_bytes;
1273         int extent_type;
1274         int ret;
1275         int type;
1276         int nocow;
1277         int check_prev = 1;
1278         bool nolock;
1279         u64 ino = btrfs_ino(BTRFS_I(inode));
1280
1281         path = btrfs_alloc_path();
1282         if (!path) {
1283                 extent_clear_unlock_delalloc(inode, start, end, end,
1284                                              locked_page,
1285                                              EXTENT_LOCKED | EXTENT_DELALLOC |
1286                                              EXTENT_DO_ACCOUNTING |
1287                                              EXTENT_DEFRAG, PAGE_UNLOCK |
1288                                              PAGE_CLEAR_DIRTY |
1289                                              PAGE_SET_WRITEBACK |
1290                                              PAGE_END_WRITEBACK);
1291                 return -ENOMEM;
1292         }
1293
1294         nolock = btrfs_is_free_space_inode(BTRFS_I(inode));
1295
1296         cow_start = (u64)-1;
1297         cur_offset = start;
1298         while (1) {
1299                 ret = btrfs_lookup_file_extent(NULL, root, path, ino,
1300                                                cur_offset, 0);
1301                 if (ret < 0)
1302                         goto error;
1303                 if (ret > 0 && path->slots[0] > 0 && check_prev) {
1304                         leaf = path->nodes[0];
1305                         btrfs_item_key_to_cpu(leaf, &found_key,
1306                                               path->slots[0] - 1);
1307                         if (found_key.objectid == ino &&
1308                             found_key.type == BTRFS_EXTENT_DATA_KEY)
1309                                 path->slots[0]--;
1310                 }
1311                 check_prev = 0;
1312 next_slot:
1313                 leaf = path->nodes[0];
1314                 if (path->slots[0] >= btrfs_header_nritems(leaf)) {
1315                         ret = btrfs_next_leaf(root, path);
1316                         if (ret < 0) {
1317                                 if (cow_start != (u64)-1)
1318                                         cur_offset = cow_start;
1319                                 goto error;
1320                         }
1321                         if (ret > 0)
1322                                 break;
1323                         leaf = path->nodes[0];
1324                 }
1325
1326                 nocow = 0;
1327                 disk_bytenr = 0;
1328                 num_bytes = 0;
1329                 btrfs_item_key_to_cpu(leaf, &found_key, path->slots[0]);
1330
1331                 if (found_key.objectid > ino)
1332                         break;
1333                 if (WARN_ON_ONCE(found_key.objectid < ino) ||
1334                     found_key.type < BTRFS_EXTENT_DATA_KEY) {
1335                         path->slots[0]++;
1336                         goto next_slot;
1337                 }
1338                 if (found_key.type > BTRFS_EXTENT_DATA_KEY ||
1339                     found_key.offset > end)
1340                         break;
1341
1342                 if (found_key.offset > cur_offset) {
1343                         extent_end = found_key.offset;
1344                         extent_type = 0;
1345                         goto out_check;
1346                 }
1347
1348                 fi = btrfs_item_ptr(leaf, path->slots[0],
1349                                     struct btrfs_file_extent_item);
1350                 extent_type = btrfs_file_extent_type(leaf, fi);
1351
1352                 ram_bytes = btrfs_file_extent_ram_bytes(leaf, fi);
1353                 if (extent_type == BTRFS_FILE_EXTENT_REG ||
1354                     extent_type == BTRFS_FILE_EXTENT_PREALLOC) {
1355                         disk_bytenr = btrfs_file_extent_disk_bytenr(leaf, fi);
1356                         extent_offset = btrfs_file_extent_offset(leaf, fi);
1357                         extent_end = found_key.offset +
1358                                 btrfs_file_extent_num_bytes(leaf, fi);
1359                         disk_num_bytes =
1360                                 btrfs_file_extent_disk_num_bytes(leaf, fi);
1361                         if (extent_end <= start) {
1362                                 path->slots[0]++;
1363                                 goto next_slot;
1364                         }
1365                         if (disk_bytenr == 0)
1366                                 goto out_check;
1367                         if (btrfs_file_extent_compression(leaf, fi) ||
1368                             btrfs_file_extent_encryption(leaf, fi) ||
1369                             btrfs_file_extent_other_encoding(leaf, fi))
1370                                 goto out_check;
1371                         /*
1372                          * Do the same check as in btrfs_cross_ref_exist but
1373                          * without the unnecessary search.
1374                          */
1375                         if (btrfs_file_extent_generation(leaf, fi) <=
1376                             btrfs_root_last_snapshot(&root->root_item))
1377                                 goto out_check;
1378                         if (extent_type == BTRFS_FILE_EXTENT_REG && !force)
1379                                 goto out_check;
1380                         if (btrfs_extent_readonly(fs_info, disk_bytenr))
1381                                 goto out_check;
1382                         ret = btrfs_cross_ref_exist(root, ino,
1383                                                     found_key.offset -
1384                                                     extent_offset, disk_bytenr);
1385                         if (ret) {
1386                                 /*
1387                                  * ret could be -EIO if the above fails to read
1388                                  * metadata.
1389                                  */
1390                                 if (ret < 0) {
1391                                         if (cow_start != (u64)-1)
1392                                                 cur_offset = cow_start;
1393                                         goto error;
1394                                 }
1395
1396                                 WARN_ON_ONCE(nolock);
1397                                 goto out_check;
1398                         }
1399                         disk_bytenr += extent_offset;
1400                         disk_bytenr += cur_offset - found_key.offset;
1401                         num_bytes = min(end + 1, extent_end) - cur_offset;
1402                         /*
1403                          * if there are pending snapshots for this root,
1404                          * we fall into common COW way.
1405                          */
1406                         if (!nolock && atomic_read(&root->snapshot_force_cow))
1407                                 goto out_check;
1408                         /*
1409                          * force cow if csum exists in the range.
1410                          * this ensure that csum for a given extent are
1411                          * either valid or do not exist.
1412                          */
1413                         ret = csum_exist_in_range(fs_info, disk_bytenr,
1414                                                   num_bytes);
1415                         if (ret) {
1416                                 /*
1417                                  * ret could be -EIO if the above fails to read
1418                                  * metadata.
1419                                  */
1420                                 if (ret < 0) {
1421                                         if (cow_start != (u64)-1)
1422                                                 cur_offset = cow_start;
1423                                         goto error;
1424                                 }
1425                                 WARN_ON_ONCE(nolock);
1426                                 goto out_check;
1427                         }
1428                         if (!btrfs_inc_nocow_writers(fs_info, disk_bytenr))
1429                                 goto out_check;
1430                         nocow = 1;
1431                 } else if (extent_type == BTRFS_FILE_EXTENT_INLINE) {
1432                         extent_end = found_key.offset +
1433                                 btrfs_file_extent_ram_bytes(leaf, fi);
1434                         extent_end = ALIGN(extent_end,
1435                                            fs_info->sectorsize);
1436                 } else {
1437                         BUG_ON(1);
1438                 }
1439 out_check:
1440                 if (extent_end <= start) {
1441                         path->slots[0]++;
1442                         if (nocow)
1443                                 btrfs_dec_nocow_writers(fs_info, disk_bytenr);
1444                         goto next_slot;
1445                 }
1446                 if (!nocow) {
1447                         if (cow_start == (u64)-1)
1448                                 cow_start = cur_offset;
1449                         cur_offset = extent_end;
1450                         if (cur_offset > end)
1451                                 break;
1452                         path->slots[0]++;
1453                         goto next_slot;
1454                 }
1455
1456                 btrfs_release_path(path);
1457                 if (cow_start != (u64)-1) {
1458                         ret = cow_file_range(inode, locked_page,
1459                                              cow_start, found_key.offset - 1,
1460                                              end, page_started, nr_written, 1,
1461                                              NULL);
1462                         if (ret) {
1463                                 if (nocow)
1464                                         btrfs_dec_nocow_writers(fs_info,
1465                                                                 disk_bytenr);
1466                                 goto error;
1467                         }
1468                         cow_start = (u64)-1;
1469                 }
1470
1471                 if (extent_type == BTRFS_FILE_EXTENT_PREALLOC) {
1472                         u64 orig_start = found_key.offset - extent_offset;
1473
1474                         em = create_io_em(inode, cur_offset, num_bytes,
1475                                           orig_start,
1476                                           disk_bytenr, /* block_start */
1477                                           num_bytes, /* block_len */
1478                                           disk_num_bytes, /* orig_block_len */
1479                                           ram_bytes, BTRFS_COMPRESS_NONE,
1480                                           BTRFS_ORDERED_PREALLOC);
1481                         if (IS_ERR(em)) {
1482                                 if (nocow)
1483                                         btrfs_dec_nocow_writers(fs_info,
1484                                                                 disk_bytenr);
1485                                 ret = PTR_ERR(em);
1486                                 goto error;
1487                         }
1488                         free_extent_map(em);
1489                 }
1490
1491                 if (extent_type == BTRFS_FILE_EXTENT_PREALLOC) {
1492                         type = BTRFS_ORDERED_PREALLOC;
1493                 } else {
1494                         type = BTRFS_ORDERED_NOCOW;
1495                 }
1496
1497                 ret = btrfs_add_ordered_extent(inode, cur_offset, disk_bytenr,
1498                                                num_bytes, num_bytes, type);
1499                 if (nocow)
1500                         btrfs_dec_nocow_writers(fs_info, disk_bytenr);
1501                 BUG_ON(ret); /* -ENOMEM */
1502
1503                 if (root->root_key.objectid ==
1504                     BTRFS_DATA_RELOC_TREE_OBJECTID)
1505                         /*
1506                          * Error handled later, as we must prevent
1507                          * extent_clear_unlock_delalloc() in error handler
1508                          * from freeing metadata of created ordered extent.
1509                          */
1510                         ret = btrfs_reloc_clone_csums(inode, cur_offset,
1511                                                       num_bytes);
1512
1513                 extent_clear_unlock_delalloc(inode, cur_offset,
1514                                              cur_offset + num_bytes - 1, end,
1515                                              locked_page, EXTENT_LOCKED |
1516                                              EXTENT_DELALLOC |
1517                                              EXTENT_CLEAR_DATA_RESV,
1518                                              PAGE_UNLOCK | PAGE_SET_PRIVATE2);
1519
1520                 cur_offset = extent_end;
1521
1522                 /*
1523                  * btrfs_reloc_clone_csums() error, now we're OK to call error
1524                  * handler, as metadata for created ordered extent will only
1525                  * be freed by btrfs_finish_ordered_io().
1526                  */
1527                 if (ret)
1528                         goto error;
1529                 if (cur_offset > end)
1530                         break;
1531         }
1532         btrfs_release_path(path);
1533
1534         if (cur_offset <= end && cow_start == (u64)-1)
1535                 cow_start = cur_offset;
1536
1537         if (cow_start != (u64)-1) {
1538                 cur_offset = end;
1539                 ret = cow_file_range(inode, locked_page, cow_start, end, end,
1540                                      page_started, nr_written, 1, NULL);
1541                 if (ret)
1542                         goto error;
1543         }
1544
1545 error:
1546         if (ret && cur_offset < end)
1547                 extent_clear_unlock_delalloc(inode, cur_offset, end, end,
1548                                              locked_page, EXTENT_LOCKED |
1549                                              EXTENT_DELALLOC | EXTENT_DEFRAG |
1550                                              EXTENT_DO_ACCOUNTING, PAGE_UNLOCK |
1551                                              PAGE_CLEAR_DIRTY |
1552                                              PAGE_SET_WRITEBACK |
1553                                              PAGE_END_WRITEBACK);
1554         btrfs_free_path(path);
1555         return ret;
1556 }
1557
1558 static inline int need_force_cow(struct inode *inode, u64 start, u64 end)
1559 {
1560
1561         if (!(BTRFS_I(inode)->flags & BTRFS_INODE_NODATACOW) &&
1562             !(BTRFS_I(inode)->flags & BTRFS_INODE_PREALLOC))
1563                 return 0;
1564
1565         /*
1566          * @defrag_bytes is a hint value, no spinlock held here,
1567          * if is not zero, it means the file is defragging.
1568          * Force cow if given extent needs to be defragged.
1569          */
1570         if (BTRFS_I(inode)->defrag_bytes &&
1571             test_range_bit(&BTRFS_I(inode)->io_tree, start, end,
1572                            EXTENT_DEFRAG, 0, NULL))
1573                 return 1;
1574
1575         return 0;
1576 }
1577
1578 /*
1579  * Function to process delayed allocation (create CoW) for ranges which are
1580  * being touched for the first time.
1581  */
1582 int btrfs_run_delalloc_range(void *private_data, struct page *locked_page,
1583                 u64 start, u64 end, int *page_started, unsigned long *nr_written,
1584                 struct writeback_control *wbc)
1585 {
1586         struct inode *inode = private_data;
1587         int ret;
1588         int force_cow = need_force_cow(inode, start, end);
1589         unsigned int write_flags = wbc_to_write_flags(wbc);
1590
1591         if (BTRFS_I(inode)->flags & BTRFS_INODE_NODATACOW && !force_cow) {
1592                 ret = run_delalloc_nocow(inode, locked_page, start, end,
1593                                          page_started, 1, nr_written);
1594         } else if (BTRFS_I(inode)->flags & BTRFS_INODE_PREALLOC && !force_cow) {
1595                 ret = run_delalloc_nocow(inode, locked_page, start, end,
1596                                          page_started, 0, nr_written);
1597         } else if (!inode_need_compress(inode, start, end)) {
1598                 ret = cow_file_range(inode, locked_page, start, end, end,
1599                                       page_started, nr_written, 1, NULL);
1600         } else {
1601                 set_bit(BTRFS_INODE_HAS_ASYNC_EXTENT,
1602                         &BTRFS_I(inode)->runtime_flags);
1603                 ret = cow_file_range_async(inode, locked_page, start, end,
1604                                            page_started, nr_written,
1605                                            write_flags);
1606         }
1607         if (ret)
1608                 btrfs_cleanup_ordered_extents(inode, start, end - start + 1);
1609         return ret;
1610 }
1611
1612 void btrfs_split_delalloc_extent(struct inode *inode,
1613                                  struct extent_state *orig, u64 split)
1614 {
1615         u64 size;
1616
1617         /* not delalloc, ignore it */
1618         if (!(orig->state & EXTENT_DELALLOC))
1619                 return;
1620
1621         size = orig->end - orig->start + 1;
1622         if (size > BTRFS_MAX_EXTENT_SIZE) {
1623                 u32 num_extents;
1624                 u64 new_size;
1625
1626                 /*
1627                  * See the explanation in btrfs_merge_delalloc_extent, the same
1628                  * applies here, just in reverse.
1629                  */
1630                 new_size = orig->end - split + 1;
1631                 num_extents = count_max_extents(new_size);
1632                 new_size = split - orig->start;
1633                 num_extents += count_max_extents(new_size);
1634                 if (count_max_extents(size) >= num_extents)
1635                         return;
1636         }
1637
1638         spin_lock(&BTRFS_I(inode)->lock);
1639         btrfs_mod_outstanding_extents(BTRFS_I(inode), 1);
1640         spin_unlock(&BTRFS_I(inode)->lock);
1641 }
1642
1643 /*
1644  * Handle merged delayed allocation extents so we can keep track of new extents
1645  * that are just merged onto old extents, such as when we are doing sequential
1646  * writes, so we can properly account for the metadata space we'll need.
1647  */
1648 void btrfs_merge_delalloc_extent(struct inode *inode, struct extent_state *new,
1649                                  struct extent_state *other)
1650 {
1651         u64 new_size, old_size;
1652         u32 num_extents;
1653
1654         /* not delalloc, ignore it */
1655         if (!(other->state & EXTENT_DELALLOC))
1656                 return;
1657
1658         if (new->start > other->start)
1659                 new_size = new->end - other->start + 1;
1660         else
1661                 new_size = other->end - new->start + 1;
1662
1663         /* we're not bigger than the max, unreserve the space and go */
1664         if (new_size <= BTRFS_MAX_EXTENT_SIZE) {
1665                 spin_lock(&BTRFS_I(inode)->lock);
1666                 btrfs_mod_outstanding_extents(BTRFS_I(inode), -1);
1667                 spin_unlock(&BTRFS_I(inode)->lock);
1668                 return;
1669         }
1670
1671         /*
1672          * We have to add up either side to figure out how many extents were
1673          * accounted for before we merged into one big extent.  If the number of
1674          * extents we accounted for is <= the amount we need for the new range
1675          * then we can return, otherwise drop.  Think of it like this
1676          *
1677          * [ 4k][MAX_SIZE]
1678          *
1679          * So we've grown the extent by a MAX_SIZE extent, this would mean we
1680          * need 2 outstanding extents, on one side we have 1 and the other side
1681          * we have 1 so they are == and we can return.  But in this case
1682          *
1683          * [MAX_SIZE+4k][MAX_SIZE+4k]
1684          *
1685          * Each range on their own accounts for 2 extents, but merged together
1686          * they are only 3 extents worth of accounting, so we need to drop in
1687          * this case.
1688          */
1689         old_size = other->end - other->start + 1;
1690         num_extents = count_max_extents(old_size);
1691         old_size = new->end - new->start + 1;
1692         num_extents += count_max_extents(old_size);
1693         if (count_max_extents(new_size) >= num_extents)
1694                 return;
1695
1696         spin_lock(&BTRFS_I(inode)->lock);
1697         btrfs_mod_outstanding_extents(BTRFS_I(inode), -1);
1698         spin_unlock(&BTRFS_I(inode)->lock);
1699 }
1700
1701 static void btrfs_add_delalloc_inodes(struct btrfs_root *root,
1702                                       struct inode *inode)
1703 {
1704         struct btrfs_fs_info *fs_info = btrfs_sb(inode->i_sb);
1705
1706         spin_lock(&root->delalloc_lock);
1707         if (list_empty(&BTRFS_I(inode)->delalloc_inodes)) {
1708                 list_add_tail(&BTRFS_I(inode)->delalloc_inodes,
1709                               &root->delalloc_inodes);
1710                 set_bit(BTRFS_INODE_IN_DELALLOC_LIST,
1711                         &BTRFS_I(inode)->runtime_flags);
1712                 root->nr_delalloc_inodes++;
1713                 if (root->nr_delalloc_inodes == 1) {
1714                         spin_lock(&fs_info->delalloc_root_lock);
1715                         BUG_ON(!list_empty(&root->delalloc_root));
1716                         list_add_tail(&root->delalloc_root,
1717                                       &fs_info->delalloc_roots);
1718                         spin_unlock(&fs_info->delalloc_root_lock);
1719                 }
1720         }
1721         spin_unlock(&root->delalloc_lock);
1722 }
1723
1724
1725 void __btrfs_del_delalloc_inode(struct btrfs_root *root,
1726                                 struct btrfs_inode *inode)
1727 {
1728         struct btrfs_fs_info *fs_info = root->fs_info;
1729
1730         if (!list_empty(&inode->delalloc_inodes)) {
1731                 list_del_init(&inode->delalloc_inodes);
1732                 clear_bit(BTRFS_INODE_IN_DELALLOC_LIST,
1733                           &inode->runtime_flags);
1734                 root->nr_delalloc_inodes--;
1735                 if (!root->nr_delalloc_inodes) {
1736                         ASSERT(list_empty(&root->delalloc_inodes));
1737                         spin_lock(&fs_info->delalloc_root_lock);
1738                         BUG_ON(list_empty(&root->delalloc_root));
1739                         list_del_init(&root->delalloc_root);
1740                         spin_unlock(&fs_info->delalloc_root_lock);
1741                 }
1742         }
1743 }
1744
1745 static void btrfs_del_delalloc_inode(struct btrfs_root *root,
1746                                      struct btrfs_inode *inode)
1747 {
1748         spin_lock(&root->delalloc_lock);
1749         __btrfs_del_delalloc_inode(root, inode);
1750         spin_unlock(&root->delalloc_lock);
1751 }
1752
1753 /*
1754  * Properly track delayed allocation bytes in the inode and to maintain the
1755  * list of inodes that have pending delalloc work to be done.
1756  */
1757 void btrfs_set_delalloc_extent(struct inode *inode, struct extent_state *state,
1758                                unsigned *bits)
1759 {
1760         struct btrfs_fs_info *fs_info = btrfs_sb(inode->i_sb);
1761
1762         if ((*bits & EXTENT_DEFRAG) && !(*bits & EXTENT_DELALLOC))
1763                 WARN_ON(1);
1764         /*
1765          * set_bit and clear bit hooks normally require _irqsave/restore
1766          * but in this case, we are only testing for the DELALLOC
1767          * bit, which is only set or cleared with irqs on
1768          */
1769         if (!(state->state & EXTENT_DELALLOC) && (*bits & EXTENT_DELALLOC)) {
1770                 struct btrfs_root *root = BTRFS_I(inode)->root;
1771                 u64 len = state->end + 1 - state->start;
1772                 u32 num_extents = count_max_extents(len);
1773                 bool do_list = !btrfs_is_free_space_inode(BTRFS_I(inode));
1774
1775                 spin_lock(&BTRFS_I(inode)->lock);
1776                 btrfs_mod_outstanding_extents(BTRFS_I(inode), num_extents);
1777                 spin_unlock(&BTRFS_I(inode)->lock);
1778
1779                 /* For sanity tests */
1780                 if (btrfs_is_testing(fs_info))
1781                         return;
1782
1783                 percpu_counter_add_batch(&fs_info->delalloc_bytes, len,
1784                                          fs_info->delalloc_batch);
1785                 spin_lock(&BTRFS_I(inode)->lock);
1786                 BTRFS_I(inode)->delalloc_bytes += len;
1787                 if (*bits & EXTENT_DEFRAG)
1788                         BTRFS_I(inode)->defrag_bytes += len;
1789                 if (do_list && !test_bit(BTRFS_INODE_IN_DELALLOC_LIST,
1790                                          &BTRFS_I(inode)->runtime_flags))
1791                         btrfs_add_delalloc_inodes(root, inode);
1792                 spin_unlock(&BTRFS_I(inode)->lock);
1793         }
1794
1795         if (!(state->state & EXTENT_DELALLOC_NEW) &&
1796             (*bits & EXTENT_DELALLOC_NEW)) {
1797                 spin_lock(&BTRFS_I(inode)->lock);
1798                 BTRFS_I(inode)->new_delalloc_bytes += state->end + 1 -
1799                         state->start;
1800                 spin_unlock(&BTRFS_I(inode)->lock);
1801         }
1802 }
1803
1804 /*
1805  * Once a range is no longer delalloc this function ensures that proper
1806  * accounting happens.
1807  */
1808 void btrfs_clear_delalloc_extent(struct inode *vfs_inode,
1809                                  struct extent_state *state, unsigned *bits)
1810 {
1811         struct btrfs_inode *inode = BTRFS_I(vfs_inode);
1812         struct btrfs_fs_info *fs_info = btrfs_sb(vfs_inode->i_sb);
1813         u64 len = state->end + 1 - state->start;
1814         u32 num_extents = count_max_extents(len);
1815
1816         if ((state->state & EXTENT_DEFRAG) && (*bits & EXTENT_DEFRAG)) {
1817                 spin_lock(&inode->lock);
1818                 inode->defrag_bytes -= len;
1819                 spin_unlock(&inode->lock);
1820         }
1821
1822         /*
1823          * set_bit and clear bit hooks normally require _irqsave/restore
1824          * but in this case, we are only testing for the DELALLOC
1825          * bit, which is only set or cleared with irqs on
1826          */
1827         if ((state->state & EXTENT_DELALLOC) && (*bits & EXTENT_DELALLOC)) {
1828                 struct btrfs_root *root = inode->root;
1829                 bool do_list = !btrfs_is_free_space_inode(inode);
1830
1831                 spin_lock(&inode->lock);
1832                 btrfs_mod_outstanding_extents(inode, -num_extents);
1833                 spin_unlock(&inode->lock);
1834
1835                 /*
1836                  * We don't reserve metadata space for space cache inodes so we
1837                  * don't need to call dellalloc_release_metadata if there is an
1838                  * error.
1839                  */
1840                 if (*bits & EXTENT_CLEAR_META_RESV &&
1841                     root != fs_info->tree_root)
1842                         btrfs_delalloc_release_metadata(inode, len, false);
1843
1844                 /* For sanity tests. */
1845                 if (btrfs_is_testing(fs_info))
1846                         return;
1847
1848                 if (root->root_key.objectid != BTRFS_DATA_RELOC_TREE_OBJECTID &&
1849                     do_list && !(state->state & EXTENT_NORESERVE) &&
1850                     (*bits & EXTENT_CLEAR_DATA_RESV))
1851                         btrfs_free_reserved_data_space_noquota(
1852                                         &inode->vfs_inode,
1853                                         state->start, len);
1854
1855                 percpu_counter_add_batch(&fs_info->delalloc_bytes, -len,
1856                                          fs_info->delalloc_batch);
1857                 spin_lock(&inode->lock);
1858                 inode->delalloc_bytes -= len;
1859                 if (do_list && inode->delalloc_bytes == 0 &&
1860                     test_bit(BTRFS_INODE_IN_DELALLOC_LIST,
1861                                         &inode->runtime_flags))
1862                         btrfs_del_delalloc_inode(root, inode);
1863                 spin_unlock(&inode->lock);
1864         }
1865
1866         if ((state->state & EXTENT_DELALLOC_NEW) &&
1867             (*bits & EXTENT_DELALLOC_NEW)) {
1868                 spin_lock(&inode->lock);
1869                 ASSERT(inode->new_delalloc_bytes >= len);
1870                 inode->new_delalloc_bytes -= len;
1871                 spin_unlock(&inode->lock);
1872         }
1873 }
1874
1875 /*
1876  * Merge bio hook, this must check the chunk tree to make sure we don't create
1877  * bios that span stripes or chunks
1878  *
1879  * return 1 if page cannot be merged to bio
1880  * return 0 if page can be merged to bio
1881  * return error otherwise
1882  */
1883 int btrfs_merge_bio_hook(struct page *page, unsigned long offset,
1884                          size_t size, struct bio *bio,
1885                          unsigned long bio_flags)
1886 {
1887         struct inode *inode = page->mapping->host;
1888         struct btrfs_fs_info *fs_info = btrfs_sb(inode->i_sb);
1889         u64 logical = (u64)bio->bi_iter.bi_sector << 9;
1890         u64 length = 0;
1891         u64 map_length;
1892         int ret;
1893
1894         if (bio_flags & EXTENT_BIO_COMPRESSED)
1895                 return 0;
1896
1897         length = bio->bi_iter.bi_size;
1898         map_length = length;
1899         ret = btrfs_map_block(fs_info, btrfs_op(bio), logical, &map_length,
1900                               NULL, 0);
1901         if (ret < 0)
1902                 return ret;
1903         if (map_length < length + size)
1904                 return 1;
1905         return 0;
1906 }
1907
1908 /*
1909  * in order to insert checksums into the metadata in large chunks,
1910  * we wait until bio submission time.   All the pages in the bio are
1911  * checksummed and sums are attached onto the ordered extent record.
1912  *
1913  * At IO completion time the cums attached on the ordered extent record
1914  * are inserted into the btree
1915  */
1916 static blk_status_t btrfs_submit_bio_start(void *private_data, struct bio *bio,
1917                                     u64 bio_offset)
1918 {
1919         struct inode *inode = private_data;
1920         blk_status_t ret = 0;
1921
1922         ret = btrfs_csum_one_bio(inode, bio, 0, 0);
1923         BUG_ON(ret); /* -ENOMEM */
1924         return 0;
1925 }
1926
1927 /*
1928  * in order to insert checksums into the metadata in large chunks,
1929  * we wait until bio submission time.   All the pages in the bio are
1930  * checksummed and sums are attached onto the ordered extent record.
1931  *
1932  * At IO completion time the cums attached on the ordered extent record
1933  * are inserted into the btree
1934  */
1935 blk_status_t btrfs_submit_bio_done(void *private_data, struct bio *bio,
1936                           int mirror_num)
1937 {
1938         struct inode *inode = private_data;
1939         struct btrfs_fs_info *fs_info = btrfs_sb(inode->i_sb);
1940         blk_status_t ret;
1941
1942         ret = btrfs_map_bio(fs_info, bio, mirror_num, 1);
1943         if (ret) {
1944                 bio->bi_status = ret;
1945                 bio_endio(bio);
1946         }
1947         return ret;
1948 }
1949
1950 /*
1951  * extent_io.c submission hook. This does the right thing for csum calculation
1952  * on write, or reading the csums from the tree before a read.
1953  *
1954  * Rules about async/sync submit,
1955  * a) read:                             sync submit
1956  *
1957  * b) write without checksum:           sync submit
1958  *
1959  * c) write with checksum:
1960  *    c-1) if bio is issued by fsync:   sync submit
1961  *         (sync_writers != 0)
1962  *
1963  *    c-2) if root is reloc root:       sync submit
1964  *         (only in case of buffered IO)
1965  *
1966  *    c-3) otherwise:                   async submit
1967  */
1968 static blk_status_t btrfs_submit_bio_hook(void *private_data, struct bio *bio,
1969                                  int mirror_num, unsigned long bio_flags,
1970                                  u64 bio_offset)
1971 {
1972         struct inode *inode = private_data;
1973         struct btrfs_fs_info *fs_info = btrfs_sb(inode->i_sb);
1974         struct btrfs_root *root = BTRFS_I(inode)->root;
1975         enum btrfs_wq_endio_type metadata = BTRFS_WQ_ENDIO_DATA;
1976         blk_status_t ret = 0;
1977         int skip_sum;
1978         int async = !atomic_read(&BTRFS_I(inode)->sync_writers);
1979
1980         skip_sum = BTRFS_I(inode)->flags & BTRFS_INODE_NODATASUM;
1981
1982         if (btrfs_is_free_space_inode(BTRFS_I(inode)))
1983                 metadata = BTRFS_WQ_ENDIO_FREE_SPACE;
1984
1985         if (bio_op(bio) != REQ_OP_WRITE) {
1986                 ret = btrfs_bio_wq_end_io(fs_info, bio, metadata);
1987                 if (ret)
1988                         goto out;
1989
1990                 if (bio_flags & EXTENT_BIO_COMPRESSED) {
1991                         ret = btrfs_submit_compressed_read(inode, bio,
1992                                                            mirror_num,
1993                                                            bio_flags);
1994                         goto out;
1995                 } else if (!skip_sum) {
1996                         ret = btrfs_lookup_bio_sums(inode, bio, NULL);
1997                         if (ret)
1998                                 goto out;
1999                 }
2000                 goto mapit;
2001         } else if (async && !skip_sum) {
2002                 /* csum items have already been cloned */
2003                 if (root->root_key.objectid == BTRFS_DATA_RELOC_TREE_OBJECTID)
2004                         goto mapit;
2005                 /* we're doing a write, do the async checksumming */
2006                 ret = btrfs_wq_submit_bio(fs_info, bio, mirror_num, bio_flags,
2007                                           bio_offset, inode,
2008                                           btrfs_submit_bio_start);
2009                 goto out;
2010         } else if (!skip_sum) {
2011                 ret = btrfs_csum_one_bio(inode, bio, 0, 0);
2012                 if (ret)
2013                         goto out;
2014         }
2015
2016 mapit:
2017         ret = btrfs_map_bio(fs_info, bio, mirror_num, 0);
2018
2019 out:
2020         if (ret) {
2021                 bio->bi_status = ret;
2022                 bio_endio(bio);
2023         }
2024         return ret;
2025 }
2026
2027 /*
2028  * given a list of ordered sums record them in the inode.  This happens
2029  * at IO completion time based on sums calculated at bio submission time.
2030  */
2031 static noinline int add_pending_csums(struct btrfs_trans_handle *trans,
2032                              struct inode *inode, struct list_head *list)
2033 {
2034         struct btrfs_ordered_sum *sum;
2035         int ret;
2036
2037         list_for_each_entry(sum, list, list) {
2038                 trans->adding_csums = true;
2039                 ret = btrfs_csum_file_blocks(trans,
2040                        BTRFS_I(inode)->root->fs_info->csum_root, sum);
2041                 trans->adding_csums = false;
2042                 if (ret)
2043                         return ret;
2044         }
2045         return 0;
2046 }
2047
2048 int btrfs_set_extent_delalloc(struct inode *inode, u64 start, u64 end,
2049                               unsigned int extra_bits,
2050                               struct extent_state **cached_state, int dedupe)
2051 {
2052         WARN_ON((end & (PAGE_SIZE - 1)) == 0);
2053         return set_extent_delalloc(&BTRFS_I(inode)->io_tree, start, end,
2054                                    extra_bits, cached_state);
2055 }
2056
2057 /* see btrfs_writepage_start_hook for details on why this is required */
2058 struct btrfs_writepage_fixup {
2059         struct page *page;
2060         struct btrfs_work work;
2061 };
2062
2063 static void btrfs_writepage_fixup_worker(struct btrfs_work *work)
2064 {
2065         struct btrfs_writepage_fixup *fixup;
2066         struct btrfs_ordered_extent *ordered;
2067         struct extent_state *cached_state = NULL;
2068         struct extent_changeset *data_reserved = NULL;
2069         struct page *page;
2070         struct inode *inode;
2071         u64 page_start;
2072         u64 page_end;
2073         int ret;
2074
2075         fixup = container_of(work, struct btrfs_writepage_fixup, work);
2076         page = fixup->page;
2077 again:
2078         lock_page(page);
2079         if (!page->mapping || !PageDirty(page) || !PageChecked(page)) {
2080                 ClearPageChecked(page);
2081                 goto out_page;
2082         }
2083
2084         inode = page->mapping->host;
2085         page_start = page_offset(page);
2086         page_end = page_offset(page) + PAGE_SIZE - 1;
2087
2088         lock_extent_bits(&BTRFS_I(inode)->io_tree, page_start, page_end,
2089                          &cached_state);
2090
2091         /* already ordered? We're done */
2092         if (PagePrivate2(page))
2093                 goto out;
2094
2095         ordered = btrfs_lookup_ordered_range(BTRFS_I(inode), page_start,
2096                                         PAGE_SIZE);
2097         if (ordered) {
2098                 unlock_extent_cached(&BTRFS_I(inode)->io_tree, page_start,
2099                                      page_end, &cached_state);
2100                 unlock_page(page);
2101                 btrfs_start_ordered_extent(inode, ordered, 1);
2102                 btrfs_put_ordered_extent(ordered);
2103                 goto again;
2104         }
2105
2106         ret = btrfs_delalloc_reserve_space(inode, &data_reserved, page_start,
2107                                            PAGE_SIZE);
2108         if (ret) {
2109                 mapping_set_error(page->mapping, ret);
2110                 end_extent_writepage(page, ret, page_start, page_end);
2111                 ClearPageChecked(page);
2112                 goto out;
2113          }
2114
2115         ret = btrfs_set_extent_delalloc(inode, page_start, page_end, 0,
2116                                         &cached_state, 0);
2117         if (ret) {
2118                 mapping_set_error(page->mapping, ret);
2119                 end_extent_writepage(page, ret, page_start, page_end);
2120                 ClearPageChecked(page);
2121                 goto out;
2122         }
2123
2124         ClearPageChecked(page);
2125         set_page_dirty(page);
2126         btrfs_delalloc_release_extents(BTRFS_I(inode), PAGE_SIZE, false);
2127 out:
2128         unlock_extent_cached(&BTRFS_I(inode)->io_tree, page_start, page_end,
2129                              &cached_state);
2130 out_page:
2131         unlock_page(page);
2132         put_page(page);
2133         kfree(fixup);
2134         extent_changeset_free(data_reserved);
2135 }
2136
2137 /*
2138  * There are a few paths in the higher layers of the kernel that directly
2139  * set the page dirty bit without asking the filesystem if it is a
2140  * good idea.  This causes problems because we want to make sure COW
2141  * properly happens and the data=ordered rules are followed.
2142  *
2143  * In our case any range that doesn't have the ORDERED bit set
2144  * hasn't been properly setup for IO.  We kick off an async process
2145  * to fix it up.  The async helper will wait for ordered extents, set
2146  * the delalloc bit and make it safe to write the page.
2147  */
2148 int btrfs_writepage_cow_fixup(struct page *page, u64 start, u64 end)
2149 {
2150         struct inode *inode = page->mapping->host;
2151         struct btrfs_fs_info *fs_info = btrfs_sb(inode->i_sb);
2152         struct btrfs_writepage_fixup *fixup;
2153
2154         /* this page is properly in the ordered list */
2155         if (TestClearPagePrivate2(page))
2156                 return 0;
2157
2158         if (PageChecked(page))
2159                 return -EAGAIN;
2160
2161         fixup = kzalloc(sizeof(*fixup), GFP_NOFS);
2162         if (!fixup)
2163                 return -EAGAIN;
2164
2165         SetPageChecked(page);
2166         get_page(page);
2167         btrfs_init_work(&fixup->work, btrfs_fixup_helper,
2168                         btrfs_writepage_fixup_worker, NULL, NULL);
2169         fixup->page = page;
2170         btrfs_queue_work(fs_info->fixup_workers, &fixup->work);
2171         return -EBUSY;
2172 }
2173
2174 static int insert_reserved_file_extent(struct btrfs_trans_handle *trans,
2175                                        struct inode *inode, u64 file_pos,
2176                                        u64 disk_bytenr, u64 disk_num_bytes,
2177                                        u64 num_bytes, u64 ram_bytes,
2178                                        u8 compression, u8 encryption,
2179                                        u16 other_encoding, int extent_type)
2180 {
2181         struct btrfs_root *root = BTRFS_I(inode)->root;
2182         struct btrfs_file_extent_item *fi;
2183         struct btrfs_path *path;
2184         struct extent_buffer *leaf;
2185         struct btrfs_key ins;
2186         u64 qg_released;
2187         int extent_inserted = 0;
2188         int ret;
2189
2190         path = btrfs_alloc_path();
2191         if (!path)
2192                 return -ENOMEM;
2193
2194         /*
2195          * we may be replacing one extent in the tree with another.
2196          * The new extent is pinned in the extent map, and we don't want
2197          * to drop it from the cache until it is completely in the btree.
2198          *
2199          * So, tell btrfs_drop_extents to leave this extent in the cache.
2200          * the caller is expected to unpin it and allow it to be merged
2201          * with the others.
2202          */
2203         ret = __btrfs_drop_extents(trans, root, inode, path, file_pos,
2204                                    file_pos + num_bytes, NULL, 0,
2205                                    1, sizeof(*fi), &extent_inserted);
2206         if (ret)
2207                 goto out;
2208
2209         if (!extent_inserted) {
2210                 ins.objectid = btrfs_ino(BTRFS_I(inode));
2211                 ins.offset = file_pos;
2212                 ins.type = BTRFS_EXTENT_DATA_KEY;
2213
2214                 path->leave_spinning = 1;
2215                 ret = btrfs_insert_empty_item(trans, root, path, &ins,
2216                                               sizeof(*fi));
2217                 if (ret)
2218                         goto out;
2219         }
2220         leaf = path->nodes[0];
2221         fi = btrfs_item_ptr(leaf, path->slots[0],
2222                             struct btrfs_file_extent_item);
2223         btrfs_set_file_extent_generation(leaf, fi, trans->transid);
2224         btrfs_set_file_extent_type(leaf, fi, extent_type);
2225         btrfs_set_file_extent_disk_bytenr(leaf, fi, disk_bytenr);
2226         btrfs_set_file_extent_disk_num_bytes(leaf, fi, disk_num_bytes);
2227         btrfs_set_file_extent_offset(leaf, fi, 0);
2228         btrfs_set_file_extent_num_bytes(leaf, fi, num_bytes);
2229         btrfs_set_file_extent_ram_bytes(leaf, fi, ram_bytes);
2230         btrfs_set_file_extent_compression(leaf, fi, compression);
2231         btrfs_set_file_extent_encryption(leaf, fi, encryption);
2232         btrfs_set_file_extent_other_encoding(leaf, fi, other_encoding);
2233
2234         btrfs_mark_buffer_dirty(leaf);
2235         btrfs_release_path(path);
2236
2237         inode_add_bytes(inode, num_bytes);
2238
2239         ins.objectid = disk_bytenr;
2240         ins.offset = disk_num_bytes;
2241         ins.type = BTRFS_EXTENT_ITEM_KEY;
2242
2243         /*
2244          * Release the reserved range from inode dirty range map, as it is
2245          * already moved into delayed_ref_head
2246          */
2247         ret = btrfs_qgroup_release_data(inode, file_pos, ram_bytes);
2248         if (ret < 0)
2249                 goto out;
2250         qg_released = ret;
2251         ret = btrfs_alloc_reserved_file_extent(trans, root,
2252                                                btrfs_ino(BTRFS_I(inode)),
2253                                                file_pos, qg_released, &ins);
2254 out:
2255         btrfs_free_path(path);
2256
2257         return ret;
2258 }
2259
2260 /* snapshot-aware defrag */
2261 struct sa_defrag_extent_backref {
2262         struct rb_node node;
2263         struct old_sa_defrag_extent *old;
2264         u64 root_id;
2265         u64 inum;
2266         u64 file_pos;
2267         u64 extent_offset;
2268         u64 num_bytes;
2269         u64 generation;
2270 };
2271
2272 struct old_sa_defrag_extent {
2273         struct list_head list;
2274         struct new_sa_defrag_extent *new;
2275
2276         u64 extent_offset;
2277         u64 bytenr;
2278         u64 offset;
2279         u64 len;
2280         int count;
2281 };
2282
2283 struct new_sa_defrag_extent {
2284         struct rb_root root;
2285         struct list_head head;
2286         struct btrfs_path *path;
2287         struct inode *inode;
2288         u64 file_pos;
2289         u64 len;
2290         u64 bytenr;
2291         u64 disk_len;
2292         u8 compress_type;
2293 };
2294
2295 static int backref_comp(struct sa_defrag_extent_backref *b1,
2296                         struct sa_defrag_extent_backref *b2)
2297 {
2298         if (b1->root_id < b2->root_id)
2299                 return -1;
2300         else if (b1->root_id > b2->root_id)
2301                 return 1;
2302
2303         if (b1->inum < b2->inum)
2304                 return -1;
2305         else if (b1->inum > b2->inum)
2306                 return 1;
2307
2308         if (b1->file_pos < b2->file_pos)
2309                 return -1;
2310         else if (b1->file_pos > b2->file_pos)
2311                 return 1;
2312
2313         /*
2314          * [------------------------------] ===> (a range of space)
2315          *     |<--->|   |<---->| =============> (fs/file tree A)
2316          * |<---------------------------->| ===> (fs/file tree B)
2317          *
2318          * A range of space can refer to two file extents in one tree while
2319          * refer to only one file extent in another tree.
2320          *
2321          * So we may process a disk offset more than one time(two extents in A)
2322          * and locate at the same extent(one extent in B), then insert two same
2323          * backrefs(both refer to the extent in B).
2324          */
2325         return 0;
2326 }
2327
2328 static void backref_insert(struct rb_root *root,
2329                            struct sa_defrag_extent_backref *backref)
2330 {
2331         struct rb_node **p = &root->rb_node;
2332         struct rb_node *parent = NULL;
2333         struct sa_defrag_extent_backref *entry;
2334         int ret;
2335
2336         while (*p) {
2337                 parent = *p;
2338                 entry = rb_entry(parent, struct sa_defrag_extent_backref, node);
2339
2340                 ret = backref_comp(backref, entry);
2341                 if (ret < 0)
2342                         p = &(*p)->rb_left;
2343                 else
2344                         p = &(*p)->rb_right;
2345         }
2346
2347         rb_link_node(&backref->node, parent, p);
2348         rb_insert_color(&backref->node, root);
2349 }
2350
2351 /*
2352  * Note the backref might has changed, and in this case we just return 0.
2353  */
2354 static noinline int record_one_backref(u64 inum, u64 offset, u64 root_id,
2355                                        void *ctx)
2356 {
2357         struct btrfs_file_extent_item *extent;
2358         struct old_sa_defrag_extent *old = ctx;
2359         struct new_sa_defrag_extent *new = old->new;
2360         struct btrfs_path *path = new->path;
2361         struct btrfs_key key;
2362         struct btrfs_root *root;
2363         struct sa_defrag_extent_backref *backref;
2364         struct extent_buffer *leaf;
2365         struct inode *inode = new->inode;
2366         struct btrfs_fs_info *fs_info = btrfs_sb(inode->i_sb);
2367         int slot;
2368         int ret;
2369         u64 extent_offset;
2370         u64 num_bytes;
2371
2372         if (BTRFS_I(inode)->root->root_key.objectid == root_id &&
2373             inum == btrfs_ino(BTRFS_I(inode)))
2374                 return 0;
2375
2376         key.objectid = root_id;
2377         key.type = BTRFS_ROOT_ITEM_KEY;
2378         key.offset = (u64)-1;
2379
2380         root = btrfs_read_fs_root_no_name(fs_info, &key);
2381         if (IS_ERR(root)) {
2382                 if (PTR_ERR(root) == -ENOENT)
2383                         return 0;
2384                 WARN_ON(1);
2385                 btrfs_debug(fs_info, "inum=%llu, offset=%llu, root_id=%llu",
2386                          inum, offset, root_id);
2387                 return PTR_ERR(root);
2388         }
2389
2390         key.objectid = inum;
2391         key.type = BTRFS_EXTENT_DATA_KEY;
2392         if (offset > (u64)-1 << 32)
2393                 key.offset = 0;
2394         else
2395                 key.offset = offset;
2396
2397         ret = btrfs_search_slot(NULL, root, &key, path, 0, 0);
2398         if (WARN_ON(ret < 0))
2399                 return ret;
2400         ret = 0;
2401
2402         while (1) {
2403                 cond_resched();
2404
2405                 leaf = path->nodes[0];
2406                 slot = path->slots[0];
2407
2408                 if (slot >= btrfs_header_nritems(leaf)) {
2409                         ret = btrfs_next_leaf(root, path);
2410                         if (ret < 0) {
2411                                 goto out;
2412                         } else if (ret > 0) {
2413                                 ret = 0;
2414                                 goto out;
2415                         }
2416                         continue;
2417                 }
2418
2419                 path->slots[0]++;
2420
2421                 btrfs_item_key_to_cpu(leaf, &key, slot);
2422
2423                 if (key.objectid > inum)
2424                         goto out;
2425
2426                 if (key.objectid < inum || key.type != BTRFS_EXTENT_DATA_KEY)
2427                         continue;
2428
2429                 extent = btrfs_item_ptr(leaf, slot,
2430                                         struct btrfs_file_extent_item);
2431
2432                 if (btrfs_file_extent_disk_bytenr(leaf, extent) != old->bytenr)
2433                         continue;
2434
2435                 /*
2436                  * 'offset' refers to the exact key.offset,
2437                  * NOT the 'offset' field in btrfs_extent_data_ref, ie.
2438                  * (key.offset - extent_offset).
2439                  */
2440                 if (key.offset != offset)
2441                         continue;
2442
2443                 extent_offset = btrfs_file_extent_offset(leaf, extent);
2444                 num_bytes = btrfs_file_extent_num_bytes(leaf, extent);
2445
2446                 if (extent_offset >= old->extent_offset + old->offset +
2447                     old->len || extent_offset + num_bytes <=
2448                     old->extent_offset + old->offset)
2449                         continue;
2450                 break;
2451         }
2452
2453         backref = kmalloc(sizeof(*backref), GFP_NOFS);
2454         if (!backref) {
2455                 ret = -ENOENT;
2456                 goto out;
2457         }
2458
2459         backref->root_id = root_id;
2460         backref->inum = inum;
2461         backref->file_pos = offset;
2462         backref->num_bytes = num_bytes;
2463         backref->extent_offset = extent_offset;
2464         backref->generation = btrfs_file_extent_generation(leaf, extent);
2465         backref->old = old;
2466         backref_insert(&new->root, backref);
2467         old->count++;
2468 out:
2469         btrfs_release_path(path);
2470         WARN_ON(ret);
2471         return ret;
2472 }
2473
2474 static noinline bool record_extent_backrefs(struct btrfs_path *path,
2475                                    struct new_sa_defrag_extent *new)
2476 {
2477         struct btrfs_fs_info *fs_info = btrfs_sb(new->inode->i_sb);
2478         struct old_sa_defrag_extent *old, *tmp;
2479         int ret;
2480
2481         new->path = path;
2482
2483         list_for_each_entry_safe(old, tmp, &new->head, list) {
2484                 ret = iterate_inodes_from_logical(old->bytenr +
2485                                                   old->extent_offset, fs_info,
2486                                                   path, record_one_backref,
2487                                                   old, false);
2488                 if (ret < 0 && ret != -ENOENT)
2489                         return false;
2490
2491                 /* no backref to be processed for this extent */
2492                 if (!old->count) {
2493                         list_del(&old->list);
2494                         kfree(old);
2495                 }
2496         }
2497
2498         if (list_empty(&new->head))
2499                 return false;
2500
2501         return true;
2502 }
2503
2504 static int relink_is_mergable(struct extent_buffer *leaf,
2505                               struct btrfs_file_extent_item *fi,
2506                               struct new_sa_defrag_extent *new)
2507 {
2508         if (btrfs_file_extent_disk_bytenr(leaf, fi) != new->bytenr)
2509                 return 0;
2510
2511         if (btrfs_file_extent_type(leaf, fi) != BTRFS_FILE_EXTENT_REG)
2512                 return 0;
2513
2514         if (btrfs_file_extent_compression(leaf, fi) != new->compress_type)
2515                 return 0;
2516
2517         if (btrfs_file_extent_encryption(leaf, fi) ||
2518             btrfs_file_extent_other_encoding(leaf, fi))
2519                 return 0;
2520
2521         return 1;
2522 }
2523
2524 /*
2525  * Note the backref might has changed, and in this case we just return 0.
2526  */
2527 static noinline int relink_extent_backref(struct btrfs_path *path,
2528                                  struct sa_defrag_extent_backref *prev,
2529                                  struct sa_defrag_extent_backref *backref)
2530 {
2531         struct btrfs_file_extent_item *extent;
2532         struct btrfs_file_extent_item *item;
2533         struct btrfs_ordered_extent *ordered;
2534         struct btrfs_trans_handle *trans;
2535         struct btrfs_root *root;
2536         struct btrfs_key key;
2537         struct extent_buffer *leaf;
2538         struct old_sa_defrag_extent *old = backref->old;
2539         struct new_sa_defrag_extent *new = old->new;
2540         struct btrfs_fs_info *fs_info = btrfs_sb(new->inode->i_sb);
2541         struct inode *inode;
2542         struct extent_state *cached = NULL;
2543         int ret = 0;
2544         u64 start;
2545         u64 len;
2546         u64 lock_start;
2547         u64 lock_end;
2548         bool merge = false;
2549         int index;
2550
2551         if (prev && prev->root_id == backref->root_id &&
2552             prev->inum == backref->inum &&
2553             prev->file_pos + prev->num_bytes == backref->file_pos)
2554                 merge = true;
2555
2556         /* step 1: get root */
2557         key.objectid = backref->root_id;
2558         key.type = BTRFS_ROOT_ITEM_KEY;
2559         key.offset = (u64)-1;
2560
2561         index = srcu_read_lock(&fs_info->subvol_srcu);
2562
2563         root = btrfs_read_fs_root_no_name(fs_info, &key);
2564         if (IS_ERR(root)) {
2565                 srcu_read_unlock(&fs_info->subvol_srcu, index);
2566                 if (PTR_ERR(root) == -ENOENT)
2567                         return 0;
2568                 return PTR_ERR(root);
2569         }
2570
2571         if (btrfs_root_readonly(root)) {
2572                 srcu_read_unlock(&fs_info->subvol_srcu, index);
2573                 return 0;
2574         }
2575
2576         /* step 2: get inode */
2577         key.objectid = backref->inum;
2578         key.type = BTRFS_INODE_ITEM_KEY;
2579         key.offset = 0;
2580
2581         inode = btrfs_iget(fs_info->sb, &key, root, NULL);
2582         if (IS_ERR(inode)) {
2583                 srcu_read_unlock(&fs_info->subvol_srcu, index);
2584                 return 0;
2585         }
2586
2587         srcu_read_unlock(&fs_info->subvol_srcu, index);
2588
2589         /* step 3: relink backref */
2590         lock_start = backref->file_pos;
2591         lock_end = backref->file_pos + backref->num_bytes - 1;
2592         lock_extent_bits(&BTRFS_I(inode)->io_tree, lock_start, lock_end,
2593                          &cached);
2594
2595         ordered = btrfs_lookup_first_ordered_extent(inode, lock_end);
2596         if (ordered) {
2597                 btrfs_put_ordered_extent(ordered);
2598                 goto out_unlock;
2599         }
2600
2601         trans = btrfs_join_transaction(root);
2602         if (IS_ERR(trans)) {
2603                 ret = PTR_ERR(trans);
2604                 goto out_unlock;
2605         }
2606
2607         key.objectid = backref->inum;
2608         key.type = BTRFS_EXTENT_DATA_KEY;
2609         key.offset = backref->file_pos;
2610
2611         ret = btrfs_search_slot(NULL, root, &key, path, 0, 0);
2612         if (ret < 0) {
2613                 goto out_free_path;
2614         } else if (ret > 0) {
2615                 ret = 0;
2616                 goto out_free_path;
2617         }
2618
2619         extent = btrfs_item_ptr(path->nodes[0], path->slots[0],
2620                                 struct btrfs_file_extent_item);
2621
2622         if (btrfs_file_extent_generation(path->nodes[0], extent) !=
2623             backref->generation)
2624                 goto out_free_path;
2625
2626         btrfs_release_path(path);
2627
2628         start = backref->file_pos;
2629         if (backref->extent_offset < old->extent_offset + old->offset)
2630                 start += old->extent_offset + old->offset -
2631                          backref->extent_offset;
2632
2633         len = min(backref->extent_offset + backref->num_bytes,
2634                   old->extent_offset + old->offset + old->len);
2635         len -= max(backref->extent_offset, old->extent_offset + old->offset);
2636
2637         ret = btrfs_drop_extents(trans, root, inode, start,
2638                                  start + len, 1);
2639         if (ret)
2640                 goto out_free_path;
2641 again:
2642         key.objectid = btrfs_ino(BTRFS_I(inode));
2643         key.type = BTRFS_EXTENT_DATA_KEY;
2644         key.offset = start;
2645
2646         path->leave_spinning = 1;
2647         if (merge) {
2648                 struct btrfs_file_extent_item *fi;
2649                 u64 extent_len;
2650                 struct btrfs_key found_key;
2651
2652                 ret = btrfs_search_slot(trans, root, &key, path, 0, 1);
2653                 if (ret < 0)
2654                         goto out_free_path;
2655
2656                 path->slots[0]--;
2657                 leaf = path->nodes[0];
2658                 btrfs_item_key_to_cpu(leaf, &found_key, path->slots[0]);
2659
2660                 fi = btrfs_item_ptr(leaf, path->slots[0],
2661                                     struct btrfs_file_extent_item);
2662                 extent_len = btrfs_file_extent_num_bytes(leaf, fi);
2663
2664                 if (extent_len + found_key.offset == start &&
2665                     relink_is_mergable(leaf, fi, new)) {
2666                         btrfs_set_file_extent_num_bytes(leaf, fi,
2667                                                         extent_len + len);
2668                         btrfs_mark_buffer_dirty(leaf);
2669                         inode_add_bytes(inode, len);
2670
2671                         ret = 1;
2672                         goto out_free_path;
2673                 } else {
2674                         merge = false;
2675                         btrfs_release_path(path);
2676                         goto again;
2677                 }
2678         }
2679
2680         ret = btrfs_insert_empty_item(trans, root, path, &key,
2681                                         sizeof(*extent));
2682         if (ret) {
2683                 btrfs_abort_transaction(trans, ret);
2684                 goto out_free_path;
2685         }
2686
2687         leaf = path->nodes[0];
2688         item = btrfs_item_ptr(leaf, path->slots[0],
2689                                 struct btrfs_file_extent_item);
2690         btrfs_set_file_extent_disk_bytenr(leaf, item, new->bytenr);
2691         btrfs_set_file_extent_disk_num_bytes(leaf, item, new->disk_len);
2692         btrfs_set_file_extent_offset(leaf, item, start - new->file_pos);
2693         btrfs_set_file_extent_num_bytes(leaf, item, len);
2694         btrfs_set_file_extent_ram_bytes(leaf, item, new->len);
2695         btrfs_set_file_extent_generation(leaf, item, trans->transid);
2696         btrfs_set_file_extent_type(leaf, item, BTRFS_FILE_EXTENT_REG);
2697         btrfs_set_file_extent_compression(leaf, item, new->compress_type);
2698         btrfs_set_file_extent_encryption(leaf, item, 0);
2699         btrfs_set_file_extent_other_encoding(leaf, item, 0);
2700
2701         btrfs_mark_buffer_dirty(leaf);
2702         inode_add_bytes(inode, len);
2703         btrfs_release_path(path);
2704
2705         ret = btrfs_inc_extent_ref(trans, root, new->bytenr,
2706                         new->disk_len, 0,
2707                         backref->root_id, backref->inum,
2708                         new->file_pos); /* start - extent_offset */
2709         if (ret) {
2710                 btrfs_abort_transaction(trans, ret);
2711                 goto out_free_path;
2712         }
2713
2714         ret = 1;
2715 out_free_path:
2716         btrfs_release_path(path);
2717         path->leave_spinning = 0;
2718         btrfs_end_transaction(trans);
2719 out_unlock:
2720         unlock_extent_cached(&BTRFS_I(inode)->io_tree, lock_start, lock_end,
2721                              &cached);
2722         iput(inode);
2723         return ret;
2724 }
2725
2726 static void free_sa_defrag_extent(struct new_sa_defrag_extent *new)
2727 {
2728         struct old_sa_defrag_extent *old, *tmp;
2729
2730         if (!new)
2731                 return;
2732
2733         list_for_each_entry_safe(old, tmp, &new->head, list) {
2734                 kfree(old);
2735         }
2736         kfree(new);
2737 }
2738
2739 static void relink_file_extents(struct new_sa_defrag_extent *new)
2740 {
2741         struct btrfs_fs_info *fs_info = btrfs_sb(new->inode->i_sb);
2742         struct btrfs_path *path;
2743         struct sa_defrag_extent_backref *backref;
2744         struct sa_defrag_extent_backref *prev = NULL;
2745         struct rb_node *node;
2746         int ret;
2747
2748         path = btrfs_alloc_path();
2749         if (!path)
2750                 return;
2751
2752         if (!record_extent_backrefs(path, new)) {
2753                 btrfs_free_path(path);
2754                 goto out;
2755         }
2756         btrfs_release_path(path);
2757
2758         while (1) {
2759                 node = rb_first(&new->root);
2760                 if (!node)
2761                         break;
2762                 rb_erase(node, &new->root);
2763
2764                 backref = rb_entry(node, struct sa_defrag_extent_backref, node);
2765
2766                 ret = relink_extent_backref(path, prev, backref);
2767                 WARN_ON(ret < 0);
2768
2769                 kfree(prev);
2770
2771                 if (ret == 1)
2772                         prev = backref;
2773                 else
2774                         prev = NULL;
2775                 cond_resched();
2776         }
2777         kfree(prev);
2778
2779         btrfs_free_path(path);
2780 out:
2781         free_sa_defrag_extent(new);
2782
2783         atomic_dec(&fs_info->defrag_running);
2784         wake_up(&fs_info->transaction_wait);
2785 }
2786
2787 static struct new_sa_defrag_extent *
2788 record_old_file_extents(struct inode *inode,
2789                         struct btrfs_ordered_extent *ordered)
2790 {
2791         struct btrfs_fs_info *fs_info = btrfs_sb(inode->i_sb);
2792         struct btrfs_root *root = BTRFS_I(inode)->root;
2793         struct btrfs_path *path;
2794         struct btrfs_key key;
2795         struct old_sa_defrag_extent *old;
2796         struct new_sa_defrag_extent *new;
2797         int ret;
2798
2799         new = kmalloc(sizeof(*new), GFP_NOFS);
2800         if (!new)
2801                 return NULL;
2802
2803         new->inode = inode;
2804         new->file_pos = ordered->file_offset;
2805         new->len = ordered->len;
2806         new->bytenr = ordered->start;
2807         new->disk_len = ordered->disk_len;
2808         new->compress_type = ordered->compress_type;
2809         new->root = RB_ROOT;
2810         INIT_LIST_HEAD(&new->head);
2811
2812         path = btrfs_alloc_path();
2813         if (!path)
2814                 goto out_kfree;
2815
2816         key.objectid = btrfs_ino(BTRFS_I(inode));
2817         key.type = BTRFS_EXTENT_DATA_KEY;
2818         key.offset = new->file_pos;
2819
2820         ret = btrfs_search_slot(NULL, root, &key, path, 0, 0);
2821         if (ret < 0)
2822                 goto out_free_path;
2823         if (ret > 0 && path->slots[0] > 0)
2824                 path->slots[0]--;
2825
2826         /* find out all the old extents for the file range */
2827         while (1) {
2828                 struct btrfs_file_extent_item *extent;
2829                 struct extent_buffer *l;
2830                 int slot;
2831                 u64 num_bytes;
2832                 u64 offset;
2833                 u64 end;
2834                 u64 disk_bytenr;
2835                 u64 extent_offset;
2836
2837                 l = path->nodes[0];
2838                 slot = path->slots[0];
2839
2840                 if (slot >= btrfs_header_nritems(l)) {
2841                         ret = btrfs_next_leaf(root, path);
2842                         if (ret < 0)
2843                                 goto out_free_path;
2844                         else if (ret > 0)
2845                                 break;
2846                         continue;
2847                 }
2848
2849                 btrfs_item_key_to_cpu(l, &key, slot);
2850
2851                 if (key.objectid != btrfs_ino(BTRFS_I(inode)))
2852                         break;
2853                 if (key.type != BTRFS_EXTENT_DATA_KEY)
2854                         break;
2855                 if (key.offset >= new->file_pos + new->len)
2856                         break;
2857
2858                 extent = btrfs_item_ptr(l, slot, struct btrfs_file_extent_item);
2859
2860                 num_bytes = btrfs_file_extent_num_bytes(l, extent);
2861                 if (key.offset + num_bytes < new->file_pos)
2862                         goto next;
2863
2864                 disk_bytenr = btrfs_file_extent_disk_bytenr(l, extent);
2865                 if (!disk_bytenr)
2866                         goto next;
2867
2868                 extent_offset = btrfs_file_extent_offset(l, extent);
2869
2870                 old = kmalloc(sizeof(*old), GFP_NOFS);
2871                 if (!old)
2872                         goto out_free_path;
2873
2874                 offset = max(new->file_pos, key.offset);
2875                 end = min(new->file_pos + new->len, key.offset + num_bytes);
2876
2877                 old->bytenr = disk_bytenr;
2878                 old->extent_offset = extent_offset;
2879                 old->offset = offset - key.offset;
2880                 old->len = end - offset;
2881                 old->new = new;
2882                 old->count = 0;
2883                 list_add_tail(&old->list, &new->head);
2884 next:
2885                 path->slots[0]++;
2886                 cond_resched();
2887         }
2888
2889         btrfs_free_path(path);
2890         atomic_inc(&fs_info->defrag_running);
2891
2892         return new;
2893
2894 out_free_path:
2895         btrfs_free_path(path);
2896 out_kfree:
2897         free_sa_defrag_extent(new);
2898         return NULL;
2899 }
2900
2901 static void btrfs_release_delalloc_bytes(struct btrfs_fs_info *fs_info,
2902                                          u64 start, u64 len)
2903 {
2904         struct btrfs_block_group_cache *cache;
2905
2906         cache = btrfs_lookup_block_group(fs_info, start);
2907         ASSERT(cache);
2908
2909         spin_lock(&cache->lock);
2910         cache->delalloc_bytes -= len;
2911         spin_unlock(&cache->lock);
2912
2913         btrfs_put_block_group(cache);
2914 }
2915
2916 /* as ordered data IO finishes, this gets called so we can finish
2917  * an ordered extent if the range of bytes in the file it covers are
2918  * fully written.
2919  */
2920 static int btrfs_finish_ordered_io(struct btrfs_ordered_extent *ordered_extent)
2921 {
2922         struct inode *inode = ordered_extent->inode;
2923         struct btrfs_fs_info *fs_info = btrfs_sb(inode->i_sb);
2924         struct btrfs_root *root = BTRFS_I(inode)->root;
2925         struct btrfs_trans_handle *trans = NULL;
2926         struct extent_io_tree *io_tree = &BTRFS_I(inode)->io_tree;
2927         struct extent_state *cached_state = NULL;
2928         struct new_sa_defrag_extent *new = NULL;
2929         int compress_type = 0;
2930         int ret = 0;
2931         u64 logical_len = ordered_extent->len;
2932         bool nolock;
2933         bool truncated = false;
2934         bool range_locked = false;
2935         bool clear_new_delalloc_bytes = false;
2936         bool clear_reserved_extent = true;
2937
2938         if (!test_bit(BTRFS_ORDERED_NOCOW, &ordered_extent->flags) &&
2939             !test_bit(BTRFS_ORDERED_PREALLOC, &ordered_extent->flags) &&
2940             !test_bit(BTRFS_ORDERED_DIRECT, &ordered_extent->flags))
2941                 clear_new_delalloc_bytes = true;
2942
2943         nolock = btrfs_is_free_space_inode(BTRFS_I(inode));
2944
2945         if (test_bit(BTRFS_ORDERED_IOERR, &ordered_extent->flags)) {
2946                 ret = -EIO;
2947                 goto out;
2948         }
2949
2950         btrfs_free_io_failure_record(BTRFS_I(inode),
2951                         ordered_extent->file_offset,
2952                         ordered_extent->file_offset +
2953                         ordered_extent->len - 1);
2954
2955         if (test_bit(BTRFS_ORDERED_TRUNCATED, &ordered_extent->flags)) {
2956                 truncated = true;
2957                 logical_len = ordered_extent->truncated_len;
2958                 /* Truncated the entire extent, don't bother adding */
2959                 if (!logical_len)
2960                         goto out;
2961         }
2962
2963         if (test_bit(BTRFS_ORDERED_NOCOW, &ordered_extent->flags)) {
2964                 BUG_ON(!list_empty(&ordered_extent->list)); /* Logic error */
2965
2966                 /*
2967                  * For mwrite(mmap + memset to write) case, we still reserve
2968                  * space for NOCOW range.
2969                  * As NOCOW won't cause a new delayed ref, just free the space
2970                  */
2971                 btrfs_qgroup_free_data(inode, NULL, ordered_extent->file_offset,
2972                                        ordered_extent->len);
2973                 btrfs_ordered_update_i_size(inode, 0, ordered_extent);
2974                 if (nolock)
2975                         trans = btrfs_join_transaction_nolock(root);
2976                 else
2977                         trans = btrfs_join_transaction(root);
2978                 if (IS_ERR(trans)) {
2979                         ret = PTR_ERR(trans);
2980                         trans = NULL;
2981                         goto out;
2982                 }
2983                 trans->block_rsv = &BTRFS_I(inode)->block_rsv;
2984                 ret = btrfs_update_inode_fallback(trans, root, inode);
2985                 if (ret) /* -ENOMEM or corruption */
2986                         btrfs_abort_transaction(trans, ret);
2987                 goto out;
2988         }
2989
2990         range_locked = true;
2991         lock_extent_bits(io_tree, ordered_extent->file_offset,
2992                          ordered_extent->file_offset + ordered_extent->len - 1,
2993                          &cached_state);
2994
2995         ret = test_range_bit(io_tree, ordered_extent->file_offset,
2996                         ordered_extent->file_offset + ordered_extent->len - 1,
2997                         EXTENT_DEFRAG, 0, cached_state);
2998         if (ret) {
2999                 u64 last_snapshot = btrfs_root_last_snapshot(&root->root_item);
3000                 if (0 && last_snapshot >= BTRFS_I(inode)->generation)
3001                         /* the inode is shared */
3002                         new = record_old_file_extents(inode, ordered_extent);
3003
3004                 clear_extent_bit(io_tree, ordered_extent->file_offset,
3005                         ordered_extent->file_offset + ordered_extent->len - 1,
3006                         EXTENT_DEFRAG, 0, 0, &cached_state);
3007         }
3008
3009         if (nolock)
3010                 trans = btrfs_join_transaction_nolock(root);
3011         else
3012                 trans = btrfs_join_transaction(root);
3013         if (IS_ERR(trans)) {
3014                 ret = PTR_ERR(trans);
3015                 trans = NULL;
3016                 goto out;
3017         }
3018
3019         trans->block_rsv = &BTRFS_I(inode)->block_rsv;
3020
3021         if (test_bit(BTRFS_ORDERED_COMPRESSED, &ordered_extent->flags))
3022                 compress_type = ordered_extent->compress_type;
3023         if (test_bit(BTRFS_ORDERED_PREALLOC, &ordered_extent->flags)) {
3024                 BUG_ON(compress_type);
3025                 btrfs_qgroup_free_data(inode, NULL, ordered_extent->file_offset,
3026                                        ordered_extent->len);
3027                 ret = btrfs_mark_extent_written(trans, BTRFS_I(inode),
3028                                                 ordered_extent->file_offset,
3029                                                 ordered_extent->file_offset +
3030                                                 logical_len);
3031         } else {
3032                 BUG_ON(root == fs_info->tree_root);
3033                 ret = insert_reserved_file_extent(trans, inode,
3034                                                 ordered_extent->file_offset,
3035                                                 ordered_extent->start,
3036                                                 ordered_extent->disk_len,
3037                                                 logical_len, logical_len,
3038                                                 compress_type, 0, 0,
3039                                                 BTRFS_FILE_EXTENT_REG);
3040                 if (!ret) {
3041                         clear_reserved_extent = false;
3042                         btrfs_release_delalloc_bytes(fs_info,
3043                                                      ordered_extent->start,
3044                                                      ordered_extent->disk_len);
3045                 }
3046         }
3047         unpin_extent_cache(&BTRFS_I(inode)->extent_tree,
3048                            ordered_extent->file_offset, ordered_extent->len,
3049                            trans->transid);
3050         if (ret < 0) {
3051                 btrfs_abort_transaction(trans, ret);
3052                 goto out;
3053         }
3054
3055         ret = add_pending_csums(trans, inode, &ordered_extent->list);
3056         if (ret) {
3057                 btrfs_abort_transaction(trans, ret);
3058                 goto out;
3059         }
3060
3061         btrfs_ordered_update_i_size(inode, 0, ordered_extent);
3062         ret = btrfs_update_inode_fallback(trans, root, inode);
3063         if (ret) { /* -ENOMEM or corruption */
3064                 btrfs_abort_transaction(trans, ret);
3065                 goto out;
3066         }
3067         ret = 0;
3068 out:
3069         if (range_locked || clear_new_delalloc_bytes) {
3070                 unsigned int clear_bits = 0;
3071
3072                 if (range_locked)
3073                         clear_bits |= EXTENT_LOCKED;
3074                 if (clear_new_delalloc_bytes)
3075                         clear_bits |= EXTENT_DELALLOC_NEW;
3076                 clear_extent_bit(&BTRFS_I(inode)->io_tree,
3077                                  ordered_extent->file_offset,
3078                                  ordered_extent->file_offset +
3079                                  ordered_extent->len - 1,
3080                                  clear_bits,
3081                                  (clear_bits & EXTENT_LOCKED) ? 1 : 0,
3082                                  0, &cached_state);
3083         }
3084
3085         if (trans)
3086                 btrfs_end_transaction(trans);
3087
3088         if (ret || truncated) {
3089                 u64 start, end;
3090
3091                 if (truncated)
3092                         start = ordered_extent->file_offset + logical_len;
3093                 else
3094                         start = ordered_extent->file_offset;
3095                 end = ordered_extent->file_offset + ordered_extent->len - 1;
3096                 clear_extent_uptodate(io_tree, start, end, NULL);
3097
3098                 /* Drop the cache for the part of the extent we didn't write. */
3099                 btrfs_drop_extent_cache(BTRFS_I(inode), start, end, 0);
3100
3101                 /*
3102                  * If the ordered extent had an IOERR or something else went
3103                  * wrong we need to return the space for this ordered extent
3104                  * back to the allocator.  We only free the extent in the
3105                  * truncated case if we didn't write out the extent at all.
3106                  *
3107                  * If we made it past insert_reserved_file_extent before we
3108                  * errored out then we don't need to do this as the accounting
3109                  * has already been done.
3110                  */
3111                 if ((ret || !logical_len) &&
3112                     clear_reserved_extent &&
3113                     !test_bit(BTRFS_ORDERED_NOCOW, &ordered_extent->flags) &&
3114                     !test_bit(BTRFS_ORDERED_PREALLOC, &ordered_extent->flags))
3115                         btrfs_free_reserved_extent(fs_info,
3116                                                    ordered_extent->start,
3117                                                    ordered_extent->disk_len, 1);
3118         }
3119
3120
3121         /*
3122          * This needs to be done to make sure anybody waiting knows we are done
3123          * updating everything for this ordered extent.
3124          */
3125         btrfs_remove_ordered_extent(inode, ordered_extent);
3126
3127         /* for snapshot-aware defrag */
3128         if (new) {
3129                 if (ret) {
3130                         free_sa_defrag_extent(new);
3131                         atomic_dec(&fs_info->defrag_running);
3132                 } else {
3133                         relink_file_extents(new);
3134                 }
3135         }
3136
3137         /* once for us */
3138         btrfs_put_ordered_extent(ordered_extent);
3139         /* once for the tree */
3140         btrfs_put_ordered_extent(ordered_extent);
3141
3142         /* Try to release some metadata so we don't get an OOM but don't wait */
3143         btrfs_btree_balance_dirty_nodelay(fs_info);
3144
3145         return ret;
3146 }
3147
3148 static void finish_ordered_fn(struct btrfs_work *work)
3149 {
3150         struct btrfs_ordered_extent *ordered_extent;
3151         ordered_extent = container_of(work, struct btrfs_ordered_extent, work);
3152         btrfs_finish_ordered_io(ordered_extent);
3153 }
3154
3155 void btrfs_writepage_endio_finish_ordered(struct page *page, u64 start,
3156                                           u64 end, int uptodate)
3157 {
3158         struct inode *inode = page->mapping->host;
3159         struct btrfs_fs_info *fs_info = btrfs_sb(inode->i_sb);
3160         struct btrfs_ordered_extent *ordered_extent = NULL;
3161         struct btrfs_workqueue *wq;
3162         btrfs_work_func_t func;
3163
3164         trace_btrfs_writepage_end_io_hook(page, start, end, uptodate);
3165
3166         ClearPagePrivate2(page);
3167         if (!btrfs_dec_test_ordered_pending(inode, &ordered_extent, start,
3168                                             end - start + 1, uptodate))
3169                 return;
3170
3171         if (btrfs_is_free_space_inode(BTRFS_I(inode))) {
3172                 wq = fs_info->endio_freespace_worker;
3173                 func = btrfs_freespace_write_helper;
3174         } else {
3175                 wq = fs_info->endio_write_workers;
3176                 func = btrfs_endio_write_helper;
3177         }
3178
3179         btrfs_init_work(&ordered_extent->work, func, finish_ordered_fn, NULL,
3180                         NULL);
3181         btrfs_queue_work(wq, &ordered_extent->work);
3182 }
3183
3184 static int __readpage_endio_check(struct inode *inode,
3185                                   struct btrfs_io_bio *io_bio,
3186                                   int icsum, struct page *page,
3187                                   int pgoff, u64 start, size_t len)
3188 {
3189         char *kaddr;
3190         u32 csum_expected;
3191         u32 csum = ~(u32)0;
3192
3193         csum_expected = *(((u32 *)io_bio->csum) + icsum);
3194
3195         kaddr = kmap_atomic(page);
3196         csum = btrfs_csum_data(kaddr + pgoff, csum,  len);
3197         btrfs_csum_final(csum, (u8 *)&csum);
3198         if (csum != csum_expected)
3199                 goto zeroit;
3200
3201         kunmap_atomic(kaddr);
3202         return 0;
3203 zeroit:
3204         btrfs_print_data_csum_error(BTRFS_I(inode), start, csum, csum_expected,
3205                                     io_bio->mirror_num);
3206         memset(kaddr + pgoff, 1, len);
3207         flush_dcache_page(page);
3208         kunmap_atomic(kaddr);
3209         return -EIO;
3210 }
3211
3212 /*
3213  * when reads are done, we need to check csums to verify the data is correct
3214  * if there's a match, we allow the bio to finish.  If not, the code in
3215  * extent_io.c will try to find good copies for us.
3216  */
3217 static int btrfs_readpage_end_io_hook(struct btrfs_io_bio *io_bio,
3218                                       u64 phy_offset, struct page *page,
3219                                       u64 start, u64 end, int mirror)
3220 {
3221         size_t offset = start - page_offset(page);
3222         struct inode *inode = page->mapping->host;
3223         struct extent_io_tree *io_tree = &BTRFS_I(inode)->io_tree;
3224         struct btrfs_root *root = BTRFS_I(inode)->root;
3225
3226         if (PageChecked(page)) {
3227                 ClearPageChecked(page);
3228                 return 0;
3229         }
3230
3231         if (BTRFS_I(inode)->flags & BTRFS_INODE_NODATASUM)
3232                 return 0;
3233
3234         if (root->root_key.objectid == BTRFS_DATA_RELOC_TREE_OBJECTID &&
3235             test_range_bit(io_tree, start, end, EXTENT_NODATASUM, 1, NULL)) {
3236                 clear_extent_bits(io_tree, start, end, EXTENT_NODATASUM);
3237                 return 0;
3238         }
3239
3240         phy_offset >>= inode->i_sb->s_blocksize_bits;
3241         return __readpage_endio_check(inode, io_bio, phy_offset, page, offset,
3242                                       start, (size_t)(end - start + 1));
3243 }
3244
3245 /*
3246  * btrfs_add_delayed_iput - perform a delayed iput on @inode
3247  *
3248  * @inode: The inode we want to perform iput on
3249  *
3250  * This function uses the generic vfs_inode::i_count to track whether we should
3251  * just decrement it (in case it's > 1) or if this is the last iput then link
3252  * the inode to the delayed iput machinery. Delayed iputs are processed at
3253  * transaction commit time/superblock commit/cleaner kthread.
3254  */
3255 void btrfs_add_delayed_iput(struct inode *inode)
3256 {
3257         struct btrfs_fs_info *fs_info = btrfs_sb(inode->i_sb);
3258         struct btrfs_inode *binode = BTRFS_I(inode);
3259
3260         if (atomic_add_unless(&inode->i_count, -1, 1))
3261                 return;
3262
3263         spin_lock(&fs_info->delayed_iput_lock);
3264         ASSERT(list_empty(&binode->delayed_iput));
3265         list_add_tail(&binode->delayed_iput, &fs_info->delayed_iputs);
3266         spin_unlock(&fs_info->delayed_iput_lock);
3267 }
3268
3269 void btrfs_run_delayed_iputs(struct btrfs_fs_info *fs_info)
3270 {
3271
3272         spin_lock(&fs_info->delayed_iput_lock);
3273         while (!list_empty(&fs_info->delayed_iputs)) {
3274                 struct btrfs_inode *inode;
3275
3276                 inode = list_first_entry(&fs_info->delayed_iputs,
3277                                 struct btrfs_inode, delayed_iput);
3278                 list_del_init(&inode->delayed_iput);
3279                 spin_unlock(&fs_info->delayed_iput_lock);
3280                 iput(&inode->vfs_inode);
3281                 spin_lock(&fs_info->delayed_iput_lock);
3282         }
3283         spin_unlock(&fs_info->delayed_iput_lock);
3284 }
3285
3286 /*
3287  * This creates an orphan entry for the given inode in case something goes wrong
3288  * in the middle of an unlink.
3289  */
3290 int btrfs_orphan_add(struct btrfs_trans_handle *trans,
3291                      struct btrfs_inode *inode)
3292 {
3293         int ret;
3294
3295         ret = btrfs_insert_orphan_item(trans, inode->root, btrfs_ino(inode));
3296         if (ret && ret != -EEXIST) {
3297                 btrfs_abort_transaction(trans, ret);
3298                 return ret;
3299         }
3300
3301         return 0;
3302 }
3303
3304 /*
3305  * We have done the delete so we can go ahead and remove the orphan item for
3306  * this particular inode.
3307  */
3308 static int btrfs_orphan_del(struct btrfs_trans_handle *trans,
3309                             struct btrfs_inode *inode)
3310 {
3311         return btrfs_del_orphan_item(trans, inode->root, btrfs_ino(inode));
3312 }
3313
3314 /*
3315  * this cleans up any orphans that may be left on the list from the last use
3316  * of this root.
3317  */
3318 int btrfs_orphan_cleanup(struct btrfs_root *root)
3319 {
3320         struct btrfs_fs_info *fs_info = root->fs_info;
3321         struct btrfs_path *path;
3322         struct extent_buffer *leaf;
3323         struct btrfs_key key, found_key;
3324         struct btrfs_trans_handle *trans;
3325         struct inode *inode;
3326         u64 last_objectid = 0;
3327         int ret = 0, nr_unlink = 0;
3328
3329         if (cmpxchg(&root->orphan_cleanup_state, 0, ORPHAN_CLEANUP_STARTED))
3330                 return 0;
3331
3332         path = btrfs_alloc_path();
3333         if (!path) {
3334                 ret = -ENOMEM;
3335                 goto out;
3336         }
3337         path->reada = READA_BACK;
3338
3339         key.objectid = BTRFS_ORPHAN_OBJECTID;
3340         key.type = BTRFS_ORPHAN_ITEM_KEY;
3341         key.offset = (u64)-1;
3342
3343         while (1) {
3344                 ret = btrfs_search_slot(NULL, root, &key, path, 0, 0);
3345                 if (ret < 0)
3346                         goto out;
3347
3348                 /*
3349                  * if ret == 0 means we found what we were searching for, which
3350                  * is weird, but possible, so only screw with path if we didn't
3351                  * find the key and see if we have stuff that matches
3352                  */
3353                 if (ret > 0) {
3354                         ret = 0;
3355                         if (path->slots[0] == 0)
3356                                 break;
3357                         path->slots[0]--;
3358                 }
3359
3360                 /* pull out the item */
3361                 leaf = path->nodes[0];
3362                 btrfs_item_key_to_cpu(leaf, &found_key, path->slots[0]);
3363
3364                 /* make sure the item matches what we want */
3365                 if (found_key.objectid != BTRFS_ORPHAN_OBJECTID)
3366                         break;
3367                 if (found_key.type != BTRFS_ORPHAN_ITEM_KEY)
3368                         break;
3369
3370                 /* release the path since we're done with it */
3371                 btrfs_release_path(path);
3372
3373                 /*
3374                  * this is where we are basically btrfs_lookup, without the
3375                  * crossing root thing.  we store the inode number in the
3376                  * offset of the orphan item.
3377                  */
3378
3379                 if (found_key.offset == last_objectid) {
3380                         btrfs_err(fs_info,
3381                                   "Error removing orphan entry, stopping orphan cleanup");
3382                         ret = -EINVAL;
3383                         goto out;
3384                 }
3385
3386                 last_objectid = found_key.offset;
3387
3388                 found_key.objectid = found_key.offset;
3389                 found_key.type = BTRFS_INODE_ITEM_KEY;
3390                 found_key.offset = 0;
3391                 inode = btrfs_iget(fs_info->sb, &found_key, root, NULL);
3392                 ret = PTR_ERR_OR_ZERO(inode);
3393                 if (ret && ret != -ENOENT)
3394                         goto out;
3395
3396                 if (ret == -ENOENT && root == fs_info->tree_root) {
3397                         struct btrfs_root *dead_root;
3398                         struct btrfs_fs_info *fs_info = root->fs_info;
3399                         int is_dead_root = 0;
3400
3401                         /*
3402                          * this is an orphan in the tree root. Currently these
3403                          * could come from 2 sources:
3404                          *  a) a snapshot deletion in progress
3405                          *  b) a free space cache inode
3406                          * We need to distinguish those two, as the snapshot
3407                          * orphan must not get deleted.
3408                          * find_dead_roots already ran before us, so if this
3409                          * is a snapshot deletion, we should find the root
3410                          * in the dead_roots list
3411                          */
3412                         spin_lock(&fs_info->trans_lock);
3413                         list_for_each_entry(dead_root, &fs_info->dead_roots,
3414                                             root_list) {
3415                                 if (dead_root->root_key.objectid ==
3416                                     found_key.objectid) {
3417                                         is_dead_root = 1;
3418                                         break;
3419                                 }
3420                         }
3421                         spin_unlock(&fs_info->trans_lock);
3422                         if (is_dead_root) {
3423                                 /* prevent this orphan from being found again */
3424                                 key.offset = found_key.objectid - 1;
3425                                 continue;
3426                         }
3427
3428                 }
3429
3430                 /*
3431                  * If we have an inode with links, there are a couple of
3432                  * possibilities. Old kernels (before v3.12) used to create an
3433                  * orphan item for truncate indicating that there were possibly
3434                  * extent items past i_size that needed to be deleted. In v3.12,
3435                  * truncate was changed to update i_size in sync with the extent
3436                  * items, but the (useless) orphan item was still created. Since
3437                  * v4.18, we don't create the orphan item for truncate at all.
3438                  *
3439                  * So, this item could mean that we need to do a truncate, but
3440                  * only if this filesystem was last used on a pre-v3.12 kernel
3441                  * and was not cleanly unmounted. The odds of that are quite
3442                  * slim, and it's a pain to do the truncate now, so just delete
3443                  * the orphan item.
3444                  *
3445                  * It's also possible that this orphan item was supposed to be
3446                  * deleted but wasn't. The inode number may have been reused,
3447                  * but either way, we can delete the orphan item.
3448                  */
3449                 if (ret == -ENOENT || inode->i_nlink) {
3450                         if (!ret)
3451                                 iput(inode);
3452                         trans = btrfs_start_transaction(root, 1);
3453                         if (IS_ERR(trans)) {
3454                                 ret = PTR_ERR(trans);
3455                                 goto out;
3456                         }
3457                         btrfs_debug(fs_info, "auto deleting %Lu",
3458                                     found_key.objectid);
3459                         ret = btrfs_del_orphan_item(trans, root,
3460                                                     found_key.objectid);
3461                         btrfs_end_transaction(trans);
3462                         if (ret)
3463                                 goto out;
3464                         continue;
3465                 }
3466
3467                 nr_unlink++;
3468
3469                 /* this will do delete_inode and everything for us */
3470                 iput(inode);
3471         }
3472         /* release the path since we're done with it */
3473         btrfs_release_path(path);
3474
3475         root->orphan_cleanup_state = ORPHAN_CLEANUP_DONE;
3476
3477         if (test_bit(BTRFS_ROOT_ORPHAN_ITEM_INSERTED, &root->state)) {
3478                 trans = btrfs_join_transaction(root);
3479                 if (!IS_ERR(trans))
3480                         btrfs_end_transaction(trans);
3481         }
3482
3483         if (nr_unlink)
3484                 btrfs_debug(fs_info, "unlinked %d orphans", nr_unlink);
3485
3486 out:
3487         if (ret)
3488                 btrfs_err(fs_info, "could not do orphan cleanup %d", ret);
3489         btrfs_free_path(path);
3490         return ret;
3491 }
3492
3493 /*
3494  * very simple check to peek ahead in the leaf looking for xattrs.  If we
3495  * don't find any xattrs, we know there can't be any acls.
3496  *
3497  * slot is the slot the inode is in, objectid is the objectid of the inode
3498  */
3499 static noinline int acls_after_inode_item(struct extent_buffer *leaf,
3500                                           int slot, u64 objectid,
3501                                           int *first_xattr_slot)
3502 {
3503         u32 nritems = btrfs_header_nritems(leaf);
3504         struct btrfs_key found_key;
3505         static u64 xattr_access = 0;
3506         static u64 xattr_default = 0;
3507         int scanned = 0;
3508
3509         if (!xattr_access) {
3510                 xattr_access = btrfs_name_hash(XATTR_NAME_POSIX_ACL_ACCESS,
3511                                         strlen(XATTR_NAME_POSIX_ACL_ACCESS));
3512                 xattr_default = btrfs_name_hash(XATTR_NAME_POSIX_ACL_DEFAULT,
3513                                         strlen(XATTR_NAME_POSIX_ACL_DEFAULT));
3514         }
3515
3516         slot++;
3517         *first_xattr_slot = -1;
3518         while (slot < nritems) {
3519                 btrfs_item_key_to_cpu(leaf, &found_key, slot);
3520
3521                 /* we found a different objectid, there must not be acls */
3522                 if (found_key.objectid != objectid)
3523                         return 0;
3524
3525                 /* we found an xattr, assume we've got an acl */
3526                 if (found_key.type == BTRFS_XATTR_ITEM_KEY) {
3527                         if (*first_xattr_slot == -1)
3528                                 *first_xattr_slot = slot;
3529                         if (found_key.offset == xattr_access ||
3530                             found_key.offset == xattr_default)
3531                                 return 1;
3532                 }
3533
3534                 /*
3535                  * we found a key greater than an xattr key, there can't
3536                  * be any acls later on
3537